equal
deleted
inserted
replaced
19 {$INCLUDE "options.inc"} |
19 {$INCLUDE "options.inc"} |
20 |
20 |
21 unit uVariables; |
21 unit uVariables; |
22 interface |
22 interface |
23 |
23 |
24 uses SDLh, uTypes, uFloat, GLunit, uConsts, Math, uMobile, uUtils; |
24 uses SDLh, uTypes, uFloat, GLunit, uConsts, Math, uUtils; |
25 |
25 |
26 var |
26 var |
27 /////// init flags /////// |
27 /////// init flags /////// |
28 cMinScreenWidth : LongInt; |
28 cMinScreenWidth : LongInt; |
29 cMinScreenHeight : LongInt; |
29 cMinScreenHeight : LongInt; |
194 LuaGoals : shortstring; |
194 LuaGoals : shortstring; |
195 |
195 |
196 LuaTemplateNumber : LongWord; |
196 LuaTemplateNumber : LongWord; |
197 |
197 |
198 LastVoice : TVoice = ( snd: sndNone; voicepack: nil ); |
198 LastVoice : TVoice = ( snd: sndNone; voicepack: nil ); |
|
199 |
|
200 mobileRecord: TMobileRecord; |
199 |
201 |
200 ///////////////////////////////////// |
202 ///////////////////////////////////// |
201 //Buttons |
203 //Buttons |
202 {$IFDEF USE_TOUCH_INTERFACE} |
204 {$IFDEF USE_TOUCH_INTERFACE} |
203 buttonScale: GLFloat; |
205 buttonScale: GLFloat; |
2517 |
2519 |
2518 LuaGoals:= ''; |
2520 LuaGoals:= ''; |
2519 cMapName:= ''; |
2521 cMapName:= ''; |
2520 |
2522 |
2521 LuaTemplateNumber:= 0; |
2523 LuaTemplateNumber:= 0; |
|
2524 |
|
2525 mobileRecord.getScreenDPI:= @getScreenDPI; //TODO: define external function. |
|
2526 {$IFDEF IPHONEOS} |
|
2527 mobileRecord.PerformRumble:= @AudioServicesPlaySystemSound; |
|
2528 mobileRecord.GameLoading:= @startLoadingIndicator; |
|
2529 mobileRecord.GameLoaded:= @stopLoadingIndicator; |
|
2530 mobileRecord.SaveLoadingEnded:= @saveFinishedSynching; |
|
2531 {$ELSE} |
|
2532 mobileRecord.PerformRumble:= nil; |
|
2533 mobileRecord.GameLoading:= nil; |
|
2534 mobileRecord.GameLoaded:= nil; |
|
2535 mobileRecord.SaveLoadingEnded:= nil; |
|
2536 {$ENDIF} |
2522 end; |
2537 end; |
2523 |
2538 |
2524 procedure freeModule; |
2539 procedure freeModule; |
2525 begin |
2540 begin |
2526 end; |
2541 end; |