26 |
26 |
27 unit uMobile; |
27 unit uMobile; |
28 interface |
28 interface |
29 |
29 |
30 function isPhone: Boolean; inline; |
30 function isPhone: Boolean; inline; |
31 function getScreenDPI: Single; inline; |
31 function getScreenDPI: Double; inline; |
32 procedure performRumble; inline; |
32 procedure performRumble; inline; |
33 |
33 |
34 procedure GameLoading; inline; |
34 procedure GameLoading; inline; |
35 procedure GameLoaded; inline; |
35 procedure GameLoaded; inline; |
36 procedure SaveLoadingEnded; inline; |
36 procedure SaveLoadingEnded; inline; |
37 |
37 |
38 implementation |
38 implementation |
39 uses uVariables, uConsole; |
39 uses uVariables, uConsole, SDLh; |
40 |
40 |
41 // add here any external call that you need |
41 // add here any external call that you need |
42 {$IFDEF IPHONEOS} |
42 {$IFDEF IPHONEOS} |
43 (* iOS calls written in ObjcExports.m *) |
43 (* iOS calls written in ObjcExports.m *) |
44 procedure startLoadingIndicator; cdecl; external; |
44 procedure startLoadingIndicator; cdecl; external; |
45 procedure stopLoadingIndicator; cdecl; external; |
45 procedure stopLoadingIndicator; cdecl; external; |
46 procedure saveFinishedSynching; cdecl; external; |
46 procedure saveFinishedSynching; cdecl; external; |
47 function isApplePhone: Boolean; cdecl; external; |
47 function isApplePhone: Boolean; cdecl; external; |
48 procedure AudioServicesPlaySystemSound(num: LongInt); cdecl; external; |
48 procedure AudioServicesPlaySystemSound(num: LongInt); cdecl; external; |
49 {$ENDIF} |
|
50 |
|
51 {$IFDEF ANDROID} |
|
52 function Android_JNI_getDensity(): Single; cdecl; external; |
|
53 {$ENDIF} |
49 {$ENDIF} |
54 |
50 |
55 // this function is just to determine whether we are running on a limited screen device |
51 // this function is just to determine whether we are running on a limited screen device |
56 function isPhone: Boolean; inline; |
52 function isPhone: Boolean; inline; |
57 begin |
53 begin |