hedgewars/uGears.pas
changeset 1088 9702e17146e6
parent 1070 6371ecc10806
child 1089 24e9e1ca0394
equal deleted inserted replaced
1087:69ee85df0283 1088:9702e17146e6
   135                                                                @doStepHealthTag,
   135                                                                @doStepHealthTag,
   136                                                                @doStepSwitcher,
   136                                                                @doStepSwitcher,
   137                                                                @doStepCase,
   137                                                                @doStepCase,
   138                                                                @doStepMortar,
   138                                                                @doStepMortar,
   139                                                                @doStepWhip,
   139                                                                @doStepWhip,
   140                                                                @doStepKamikaze
   140                                                                @doStepKamikaze,
       
   141                                                                @doStepSpider
   141                                                                );
   142                                                                );
   142 
   143 
   143 procedure InsertGearToList(Gear: PGear);
   144 procedure InsertGearToList(Gear: PGear);
   144 var tmp, ptmp: PGear;
   145 var tmp, ptmp: PGear;
   145 begin
   146 begin