equal
deleted
inserted
replaced
71 getScreenDPI:= 1; |
71 getScreenDPI:= 1; |
72 {$ENDIF} |
72 {$ENDIF} |
73 end; |
73 end; |
74 |
74 |
75 // this function should make the device vibrate in some way |
75 // this function should make the device vibrate in some way |
76 procedure PerformRumble; inline; |
76 procedure performRumble; inline; |
77 {$IFDEF IPHONEOS}const kSystemSoundID_Vibrate = $00000FFF;{$ENDIF} |
77 {$IFDEF IPHONEOS}const kSystemSoundID_Vibrate = $00000FFF;{$ENDIF} |
78 begin |
78 begin |
79 // do not vibrate while synchronising a demo/save |
79 // do not vibrate while synchronising a demo/save |
80 if not fastUntilLag then |
80 if not fastUntilLag then |
81 begin |
81 begin |