hedgewars/uTouch.pas
changeset 6808 e9c45f3c5b9c
parent 6806 cdfb6c7099e5
child 6919 bf7433e62b9c
equal deleted inserted replaced
6807:f4816282ba01 6808:e9c45f3c5b9c
   143     exit;
   143     exit;
   144     end;
   144     end;
   145 
   145 
   146 if isOnWidget(utilityWidget, finger^) then
   146 if isOnWidget(utilityWidget, finger^) then
   147     begin
   147     begin
   148     ParseCommand('/timer ' + inttostr((CurrentHedgeHog^.CurWeapon^.Timer div 1000 + 1) mod 5));
   148     //ParseCommand('/timer ' + inttostr((CurrentHedgeHog^.CurWeapon^.Timer div 1000 + 1) mod 5));
   149     end; 
   149     end; 
   150 dec(buttonsDown);//no buttonsDown, undo the inc() above
   150 dec(buttonsDown);//no buttonsDown, undo the inc() above
   151 if buttonsDown = 0 then
   151 if buttonsDown = 0 then
   152     begin
   152     begin
   153     moveCursor:= true;
   153     moveCursor:= true;