308 exit(); |
308 exit(); |
309 end; |
309 end; |
310 |
310 |
311 procedure initEverything; |
311 procedure initEverything; |
312 begin |
312 begin |
313 init_uConsts(); |
313 uConsts.initModule; |
314 init_uMisc(); |
314 uMisc.initModule; |
315 init_uConsole(); // MUST happen after uMisc |
315 uConsole.initModule; // MUST happen after uMisc |
316 |
316 |
317 init_uAI(); |
317 uAI.initModule; |
318 //uAIActions does not need initialization |
318 //uAIActions does not need initialization |
319 //uAIAmmoTests does not need initialization |
319 //uAIAmmoTests does not need initialization |
320 init_uAIMisc(); |
320 uAIMisc.initModule; |
321 init_uAmmos(); |
321 uAmmos.initModule; |
322 init_uChat(); |
322 uChat.initModule; |
323 init_uCollisions(); |
323 uCollisions.initModule; |
324 //uFloat does not need initialization |
324 //uFloat does not need initialization |
325 //uGame does not need initialization |
325 //uGame does not need initialization |
326 init_uGears(); |
326 uGears.initModule; |
327 init_uIO(); |
327 uIO.initModule; |
328 init_uKeys(); |
328 uKeys.initModule; |
329 init_uLand(); |
329 uLand.initModule; |
330 //uLandGraphics does not need initialization |
330 //uLandGraphics does not need initialization |
331 //uLandObjects does not need initialization |
331 //uLandObjects does not need initialization |
332 //uLandTemplates does not need initialization |
332 //uLandTemplates does not need initialization |
333 //uLandTexture does not need initialization |
333 //uLandTexture does not need initialization |
334 //uLocale does not need initialization |
334 //uLocale does not need initialization |
335 init_uRandom(); |
335 uRandom.initModule; |
336 //uSHA does not need initialization |
336 //uSHA does not need initialization |
337 init_uSound(); |
337 uSound.initModule; |
338 init_uStats(); |
338 uStats.initModule; |
339 init_uStore(); |
339 uStore.initModule; |
340 init_uTeams(); |
340 uTeams.initModule; |
341 init_uVisualGears(); |
341 uVisualGears.initModule; |
342 init_uWorld(); |
342 uWorld.initModule; |
343 init_uScript(); |
343 uScript.initModule; |
344 end; |
344 end; |
345 |
345 |
346 procedure freeEverything; |
346 procedure freeEverything; |
347 begin |
347 begin |
348 free_uWorld(); |
348 uWorld.freeModule; |
349 free_uVisualGears(); //stub |
349 uVisualGears.freeModule; //stub |
350 free_uTeams(); |
350 uTeams.freeModule; |
351 free_uStore(); |
351 uStore.freeModule; |
352 free_uStats(); //stub |
352 uStats.freeModule; //stub |
353 free_uSound(); //stub |
353 uSound.freeModule; //stub |
354 //uSHA does not need to be freed |
354 //uSHA does not need to be freed |
355 free_uRandom(); //stub |
355 uRandom.freeModule; //stub |
356 //uLocale does not need to be freed |
356 //uLocale does not need to be freed |
357 //uLandTemplates does not need to be freed |
357 //uLandTemplates does not need to be freed |
358 //uLandTexture does not need to be freed |
358 //uLandTexture does not need to be freed |
359 //uLandObjects does not need to be freed |
359 //uLandObjects does not need to be freed |
360 //uLandGraphics does not need to be freed |
360 //uLandGraphics does not need to be freed |
361 free_uLand(); |
361 uLand.freeModule; |
362 free_uKeys(); //stub |
362 uKeys.freeModule; //stub |
363 free_uIO(); |
363 uIO.freeModule; |
364 free_uGears(); |
364 uGears.freeModule; |
365 //uGame does not need to be freed |
365 //uGame does not need to be freed |
366 //uFloat does not need to be freed |
366 //uFloat does not need to be freed |
367 free_uCollisions(); |
367 uCollisions.freeModule; |
368 free_uChat(); |
368 uChat.freeModule; |
369 free_uAmmos(); |
369 uAmmos.freeModule; |
370 free_uAIMisc(); //stub |
370 uAIMisc.freeModule; //stub |
371 //uAIAmmoTests does not need to be freed |
371 //uAIAmmoTests does not need to be freed |
372 //uAIActions does not need to be freed |
372 //uAIActions does not need to be freed |
373 free_uAI(); //stub |
373 uAI.freeModule; //stub |
374 |
374 |
375 free_uConsole(); |
375 uConsole.freeModule; |
376 free_uMisc(); |
376 uMisc.freeModule; |
377 free_uConsts(); //stub |
377 uConsts.freeModule; //stub |
378 free_uScript(); |
378 uScript.freeModule; |
379 end; |
379 end; |
380 |
380 |
381 ///////////////////////// |
381 ///////////////////////// |
382 procedure GenLandPreview; |
382 procedure GenLandPreview; |
383 var Preview: TPreview; |
383 var Preview: TPreview; |