| branch | hedgeroid |
| changeset 5359 | 86b76c93a612 |
| parent 5339 | bc8560452143 |
| child 5365 | 326c7db9e410 |
| 5356:bf058f0a77d6 | 5359:86b76c93a612 |
|---|---|
29 program hwengine; |
29 program hwengine; |
30 {$ENDIF} |
30 {$ENDIF} |
31 |
31 |
32 uses SDLh, uMisc, uConsole, uGame, uConsts, uLand, uAmmos, uVisualGears, uGears, uStore, uWorld, uKeys, uSound, |
32 uses SDLh, uMisc, uConsole, uGame, uConsts, uLand, uAmmos, uVisualGears, uGears, uStore, uWorld, uKeys, uSound, |
33 uScript, uTeams, uStats, uIO, uLocale, uChat, uAI, uAIMisc, uRandom, uLandTexture, uCollisions, |
33 uScript, uTeams, uStats, uIO, uLocale, uChat, uAI, uAIMisc, uRandom, uLandTexture, uCollisions, |
34 sysutils, uTypes, uVariables, uCommands, uUtils, uCaptions, uDebug, uCommandHandlers, uLandPainted; |
34 sysutils, uTypes, uVariables, uCommands, uUtils, uCaptions, uDebug, uCommandHandlers, uLandPainted {$IFDEF ANDROID}, GLUnit {$ENDIF}; |
35 |
35 |
36 {$IFDEF HWLIBRARY} |
36 {$IFDEF HWLIBRARY} |
37 procedure initEverything(complete:boolean); |
37 procedure initEverything(complete:boolean); |
38 procedure freeEverything(complete:boolean); |
38 procedure freeEverything(complete:boolean); |
39 procedure Game(gameArgs: PPChar); cdecl; export; |
39 procedure Game(gameArgs: PPChar); cdecl; export; |
215 begin |
215 begin |
216 {$IFDEF HWLIBRARY} |
216 {$IFDEF HWLIBRARY} |
217 cBits:= 32; |
217 cBits:= 32; |
218 cFullScreen:= false; |
218 cFullScreen:= false; |
219 cTimerInterval:= 8; |
219 cTimerInterval:= 8; |
220 PathPrefix:= 'Data'; |
220 PathPrefix:= '/sdcard/Data'; |
221 UserPathPrefix:= '.'; |
221 UserPathPrefix:= '.'; |
222 cShowFPS:= {$IFDEF DEBUGFILE}true{$ELSE}false{$ENDIF}; |
222 cShowFPS:= {$IFDEF DEBUGFILE}true{$ELSE}false{$ENDIF}; |
223 val(gameArgs[0], ipcPort); |
223 val(gameArgs[0], ipcPort); |
224 val(gameArgs[1], cScreenWidth); |
224 val(gameArgs[1], cScreenWidth); |
225 val(gameArgs[2], cScreenHeight); |
225 val(gameArgs[2], cScreenHeight); |
343 |
343 |
344 uIO.initModule; |
344 uIO.initModule; |
345 |
345 |
346 if complete then |
346 if complete then |
347 begin |
347 begin |
348 {$IFDEF ANDROID} |
348 {$IFDEF ANDROID} |
349 GLUnit.init; |
349 GLUnit.init; |
350 {$ENDIF} |
350 {$ENDIF} |
351 uAI.initModule; |
351 uAI.initModule; |
352 //uAIActions does not need initialization |
352 //uAIActions does not need initialization |
353 //uAIAmmoTests does not need initialization |
353 //uAIAmmoTests does not need initialization |
354 uAIMisc.initModule; |
354 uAIMisc.initModule; |
355 uAmmos.initModule; |
355 uAmmos.initModule; |