changeset 4393 | 883b979697e4 |
parent 4389 | d1c65b60cd68 |
child 4403 | 0dfe26f48ec1 |
4392:95e27e12d0e9 | 4393:883b979697e4 |
---|---|
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, uMobile, |
33 uScript, uTeams, uStats, uIO, uLocale, uChat, uAI, uAIMisc, uRandom, uLandTexture, uCollisions, uMobile, |
34 sysutils, uTypes, uVariables, uCommands, uUtils; |
34 sysutils, uTypes, uVariables, uCommands, uUtils, uCaptions; |
35 |
35 |
36 var isTerminated: boolean = false; |
36 var isTerminated: boolean = false; |
37 alsoShutdownFrontend: boolean = false; |
37 alsoShutdownFrontend: boolean = false; |
38 |
38 |
39 {$IFDEF HWLIBRARY} |
39 {$IFDEF HWLIBRARY} |
352 uStats.initModule; |
352 uStats.initModule; |
353 uStore.initModule; |
353 uStore.initModule; |
354 uTeams.initModule; |
354 uTeams.initModule; |
355 uVisualGears.initModule; |
355 uVisualGears.initModule; |
356 uWorld.initModule; |
356 uWorld.initModule; |
357 uCaptions.initModule; |
|
357 end; |
358 end; |
358 end; |
359 end; |
359 |
360 |
360 procedure freeEverything (complete:boolean); |
361 procedure freeEverything (complete:boolean); |
361 begin |
362 begin |
362 if complete then |
363 if complete then |
363 begin |
364 begin |
365 uCaptions.freeModule; |
|
364 uWorld.freeModule; |
366 uWorld.freeModule; |
365 uVisualGears.freeModule; |
367 uVisualGears.freeModule; |
366 uTeams.freeModule; |
368 uTeams.freeModule; |
367 uStore.freeModule; //stub |
369 uStore.freeModule; //stub |
368 uStats.freeModule; //stub |
370 uStats.freeModule; //stub |