equal
deleted
inserted
replaced
88 if checkFails((byte(ammoLoadout[0]) = byte(ord(High(TAmmoType)))) and (byte(ammoProbability[0]) = byte(ord(High(TAmmoType)))) and (byte(ammoDelay[0]) = byte(ord(High(TAmmoType)))) and (byte(ammoReinforcement[0]) = byte(ord(High(TAmmoType)))) |
88 if checkFails((byte(ammoLoadout[0]) = byte(ord(High(TAmmoType)))) and (byte(ammoProbability[0]) = byte(ord(High(TAmmoType)))) and (byte(ammoDelay[0]) = byte(ord(High(TAmmoType)))) and (byte(ammoReinforcement[0]) = byte(ord(High(TAmmoType)))) |
89 , 'Incomplete or missing ammo scheme set (incompatible frontend or demo/save?)' |
89 , 'Incomplete or missing ammo scheme set (incompatible frontend or demo/save?)' |
90 , true) |
90 , true) |
91 then exit; |
91 then exit; |
92 |
92 |
|
93 if checkFails(StoreCnt < cMaxHHs, 'Ammo stores overflow', true) then exit; |
93 inc(StoreCnt); |
94 inc(StoreCnt); |
94 if checkFails(StoreCnt <= cMaxHHs, 'Ammo stores overflow', true) then exit; |
|
95 |
95 |
96 new(StoresList[Pred(StoreCnt)]); |
96 new(StoresList[Pred(StoreCnt)]); |
97 |
97 |
98 for a:= Low(TAmmoType) to High(TAmmoType) do |
98 for a:= Low(TAmmoType) to High(TAmmoType) do |
99 begin |
99 begin |