equal
deleted
inserted
replaced
295 |
295 |
296 function HW_getAmmoDelays: PByte; cdecl; export; |
296 function HW_getAmmoDelays: PByte; cdecl; export; |
297 var skipTurns : PByte; |
297 var skipTurns : PByte; |
298 a : TAmmoType; |
298 a : TAmmoType; |
299 begin |
299 begin |
300 if (CurrentTeam^.ExtDriven) or (CurrentTeam^.Hedgehogs[0].BotLevel <> 0) then |
|
301 exit(nil); |
|
302 GetMem(skipTurns,ord(High(TAmmoType))); |
300 GetMem(skipTurns,ord(High(TAmmoType))); |
303 FillChar(skipTurns^,ord(High(TAmmoType)),0); |
301 FillChar(skipTurns^,ord(High(TAmmoType)),0); |
304 for a:= Low(TAmmoType) to High(TAmmoType) do |
302 for a:= Low(TAmmoType) to High(TAmmoType) do |
305 skipTurns[ord(a)-1]:= byte(Ammoz[a].SkipTurns); |
303 skipTurns[ord(a)-1]:= byte(Ammoz[a].SkipTurns); |
306 exit(skipTurns); |
304 exit(skipTurns); |