equal
deleted
inserted
replaced
67 new(StoresList[Pred(StoreCnt)]); |
67 new(StoresList[Pred(StoreCnt)]); |
68 |
68 |
69 for a:= Low(TAmmoType) to High(TAmmoType) do |
69 for a:= Low(TAmmoType) to High(TAmmoType) do |
70 begin |
70 begin |
71 cnt:= byte(s[ord(a) + 1]) - byte('0'); |
71 cnt:= byte(s[ord(a) + 1]) - byte('0'); |
72 if cnt = 9 then cnt:= AMMO_INFINITE; |
72 if cnt = 9 then |
|
73 begin |
|
74 cnt:= AMMO_INFINITE; |
|
75 Ammoz[a].Probability:= 0 |
|
76 end; |
73 ammos[a]:= cnt |
77 ammos[a]:= cnt |
74 end; |
78 end; |
75 |
79 |
76 FillAmmoStore(StoresList[Pred(StoreCnt)], ammos) |
80 FillAmmoStore(StoresList[Pred(StoreCnt)], ammos) |
77 end; |
81 end; |