hedgewars/uGears.pas
changeset 211 558476056205
parent 191 a03c2d037e24
child 263 36379e6abcdd
equal deleted inserted replaced
210:440575778475 211:558476056205
   109                                                                doStepShover,
   109                                                                doStepShover,
   110                                                                doStepFlame,
   110                                                                doStepFlame,
   111                                                                doStepFirePunch,
   111                                                                doStepFirePunch,
   112                                                                doStepActionTimer,
   112                                                                doStepActionTimer,
   113                                                                doStepActionTimer,
   113                                                                doStepActionTimer,
   114                                                                doStepActionTimer
   114                                                                doStepActionTimer,
       
   115                                                                doStepParachute
   115                                                                );
   116                                                                );
   116 
   117 
   117 function AddGear(X, Y: integer; Kind: TGearType; State: Longword; const dX: Double=0.0; dY: Double=0.0; Timer: LongWord=0): PGear;
   118 function AddGear(X, Y: integer; Kind: TGearType; State: Longword; const dX: Double=0.0; dY: Double=0.0; Timer: LongWord=0): PGear;
   118 const Counter: Longword = 0;
   119 const Counter: Longword = 0;
   119 begin
   120 begin