2309     fuel:= 5;

  2309     fuel:= 5;

  2310     end;*)

  2310     end;*)

  2311 

  2311 

  2312 if (HHGear^.Message and gm_Up) <> 0 then

  2312 if (HHGear^.Message and gm_Up) <> 0 then

  2313     begin

  2313     begin

  2314     HHGear^.dY:= HHGear^.dY - move;

  2316     HHGear^.dY:= HHGear^.dY - move;

  2315     dec(Gear^.Health, fuel);

  2317     dec(Gear^.Health, fuel);

  2316     Gear^.MsgParam:= Gear^.MsgParam or gm_Up;

  2318     Gear^.MsgParam:= Gear^.MsgParam or gm_Up;

  2317     Gear^.Timer:= GameTicks

  2319     Gear^.Timer:= GameTicks

  2318     end;

  2320     end;