hedgewars/uInputHandler.pas
changeset 7848 775a72905708
parent 7442 9bb6abdb5675
child 7869 5dd2c047c96f
equal deleted inserted replaced
7847:a595d4f4837d 7848:775a72905708
   424     ProcessKey(k +  ControllerNumAxes[joy]*2 + ControllerNumHats[joy]*4 + button, pressed);
   424     ProcessKey(k +  ControllerNumAxes[joy]*2 + ControllerNumHats[joy]*4 + button, pressed);
   425 end;
   425 end;
   426 
   426 
   427 procedure initModule;
   427 procedure initModule;
   428 begin
   428 begin
   429     wheelUp:= false;
       
   430     wheelDown:= false;
       
   431 end;
   429 end;
   432 
   430 
   433 procedure freeModule;
   431 procedure freeModule;
   434 var j: LongInt;
   432 var j: LongInt;
   435 begin
   433 begin