equal
deleted
inserted
replaced
531 begin |
531 begin |
532 SetRandomSeed(s, true); |
532 SetRandomSeed(s, true); |
533 cSeed:= s; |
533 cSeed:= s; |
534 InitStepsFlags:= InitStepsFlags or cifRandomize |
534 InitStepsFlags:= InitStepsFlags or cifRandomize |
535 end |
535 end |
536 end; |
536 end; |
537 |
537 |
538 procedure chAmmoMenu(var s: shortstring); |
538 procedure chAmmoMenu(var s: shortstring); |
539 begin |
539 begin |
540 s:= s; // avoid compiler hint |
540 s:= s; // avoid compiler hint |
541 if CheckNoTeamOrHH then |
541 if CheckNoTeamOrHH then |