hedgewars/HHHandlers.inc
changeset 285 cdab49768c83
parent 282 b1e3387389b6
child 295 8834f3cb620e
equal deleted inserted replaced
284:22ce72bd637f 285:cdab49768c83
    66                        amDEagle: AddGear(round(X), round(Y), gtDEagleShot, 0, xx * 0.5, yy * 0.5);
    66                        amDEagle: AddGear(round(X), round(Y), gtDEagleShot, 0, xx * 0.5, yy * 0.5);
    67                      amDynamite: AddGear(round(X) + hwSign(dX) * 7, round(Y), gtDynamite, 0, hwSign(dX) * 0.035, 0, 5000);
    67                      amDynamite: AddGear(round(X) + hwSign(dX) * 7, round(Y), gtDynamite, 0, hwSign(dX) * 0.035, 0, 5000);
    68                   amBaseballBat: AddGear(round(X) + hwSign(dX) * 10, round(Y), gtShover, 0, xx * 0.5, yy * 0.5).Radius:= 20;
    68                   amBaseballBat: AddGear(round(X) + hwSign(dX) * 10, round(Y), gtShover, 0, xx * 0.5, yy * 0.5).Radius:= 20;
    69                     amFirePunch: CurAmmoGear:= AddGear(round(X) + hwSign(dX) * 10, round(Y), gtFirePunch, 0);
    69                     amFirePunch: CurAmmoGear:= AddGear(round(X) + hwSign(dX) * 10, round(Y), gtFirePunch, 0);
    70                     amParachute: CurAmmoGear:= AddGear(round(X), round(Y), gtParachute, 0);
    70                     amParachute: CurAmmoGear:= AddGear(round(X), round(Y), gtParachute, 0);
    71                     amAirAttack: AddGear(0, 0, gtAirAttack, 0, 0, 0);
    71                     amAirAttack: AddGear(0, 0, gtAirAttack, 0);
       
    72                    amMineStrike: AddGear(0, 0, gtAirAttack, 1);
    72                   end;
    73                   end;
    73         Power:= 0;
    74         Power:= 0;
    74         if CurAmmoGear <> nil then
    75         if CurAmmoGear <> nil then
    75            begin
    76            begin
    76            Message:= Message or gm_Attack;
    77            Message:= Message or gm_Attack;