hedgewars/uWorld.pas
changeset 2413 d921d13a8546
parent 2409 dbf195c3e09c
child 2426 9d674c5c828d
equal deleted inserted replaced
2412:8f48a9181f99 2413:d921d13a8546
    30 {$IFDEF COUNTTICKS}
    30 {$IFDEF COUNTTICKS}
    31 var cntTicks: LongWord;
    31 var cntTicks: LongWord;
    32 {$ENDIF}
    32 {$ENDIF}
    33 var FollowGear: PGear = nil;
    33 var FollowGear: PGear = nil;
    34 	WindBarWidth: LongInt = 0;
    34 	WindBarWidth: LongInt = 0;
    35 {$IFDEF IPHONEOS}
       
    36 	bShowAmmoMenu: boolean = true;
       
    37 {$ELSE}
       
    38        	bShowAmmoMenu: boolean = false;
    35        	bShowAmmoMenu: boolean = false;
    39 {$ENDIF}
       
    40 	bSelected: boolean = false;
    36 	bSelected: boolean = false;
    41 	bShowFinger: boolean = false;
    37 	bShowFinger: boolean = false;
    42 	Frames: Longword = 0;
    38 	Frames: Longword = 0;
    43 	WaterColor, DeepWaterColor: TSDL_Color;
    39 	WaterColor, DeepWaterColor: TSDL_Color;
    44 
    40