21 uses SDLh, GL, uLocale; |
21 uses SDLh, GL, uLocale; |
22 {$INCLUDE options.inc} |
22 {$INCLUDE options.inc} |
23 {$INCLUDE proto.inc} |
23 {$INCLUDE proto.inc} |
24 type |
24 type |
25 |
25 |
26 TGameState = (gsLandGen, gsStart, gsGame, gsConsole, gsChat, gsExit); |
26 TGameState = (gsLandGen, gsStart, gsGame, gsChat, gsExit); |
27 |
27 |
28 TGameType = (gmtLocal, gmtDemo, gmtNet, gmtSave, gmtLandPreview); |
28 TGameType = (gmtLocal, gmtDemo, gmtNet, gmtSave, gmtLandPreview); |
29 |
29 |
30 TPathType = (ptNone, ptData, ptGraphics, ptThemes, ptCurrTheme, ptTeams, ptMaps, |
30 TPathType = (ptNone, ptData, ptGraphics, ptThemes, ptCurrTheme, ptTeams, ptMaps, |
31 ptMapCurrent, ptDemos, ptSounds, ptGraves, ptFonts, ptForts, |
31 ptMapCurrent, ptDemos, ptSounds, ptGraves, ptFonts, ptForts, |
37 sprMineOn, sprCase, sprFAid, sprDynamite, sprPower, |
37 sprMineOn, sprCase, sprFAid, sprDynamite, sprPower, |
38 sprClusterBomb, sprClusterParticle, sprFlame, sprHorizont, |
38 sprClusterBomb, sprClusterParticle, sprFlame, sprHorizont, |
39 sprSky, sprAMBorders, sprAMSlot, sprAMSlotName, sprAMAmmos, |
39 sprSky, sprAMBorders, sprAMSlot, sprAMSlotName, sprAMAmmos, |
40 sprAMSlotKeys, sprAMSelection, sprFinger, sprAirBomb, |
40 sprAMSlotKeys, sprAMSelection, sprFinger, sprAirBomb, |
41 sprAirplane, sprAmAirplane, sprAmGirder, sprHHTelepMask, |
41 sprAirplane, sprAmAirplane, sprAmGirder, sprHHTelepMask, |
42 sprSwitch, sprParachute, sprTarget, sprRopeNode, sprConsoleBG, |
42 sprSwitch, sprParachute, sprTarget, sprRopeNode, |
43 sprQuestion, sprPowerBar, sprWindBar, sprWindL, sprWindR, |
43 sprQuestion, sprPowerBar, sprWindBar, sprWindL, sprWindR, |
44 sprFlake, sprHandRope, sprHandBazooka, sprHandShotgun, |
44 sprFlake, sprHandRope, sprHandBazooka, sprHandShotgun, |
45 sprHandDEagle, sprHandAirAttack, sprHandBaseball, sprPHammer, |
45 sprHandDEagle, sprHandAirAttack, sprHandBaseball, sprPHammer, |
46 sprHandBlowTorch, sprBlowTorch, sprTeleport, sprHHDeath, |
46 sprHandBlowTorch, sprBlowTorch, sprTeleport, sprHHDeath, |
47 sprShotgun, sprDEagle, sprHHIdle, sprMortar, sprTurnsLeft, |
47 sprShotgun, sprDEagle, sprHHIdle, sprMortar, sprTurnsLeft, |
344 Width: 48; Height: 48; saveSurf: false),// sprParachute |
344 Width: 48; Height: 48; saveSurf: false),// sprParachute |
345 (FileName: 'Target'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil; |
345 (FileName: 'Target'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil; |
346 Width: 32; Height: 32; saveSurf: false),// sprTarget |
346 Width: 32; Height: 32; saveSurf: false),// sprTarget |
347 (FileName: 'RopeNode'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil; |
347 (FileName: 'RopeNode'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil; |
348 Width: 6; Height: 6; saveSurf: false),// sprRopeNode |
348 Width: 6; Height: 6; saveSurf: false),// sprRopeNode |
349 (FileName: 'Console'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil; |
|
350 Width: 256; Height:256; saveSurf: false),// sprConsoleBG |
|
351 (FileName: 'thinking'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil; |
349 (FileName: 'thinking'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil; |
352 Width: 32; Height: 32; saveSurf: false),// sprQuestion |
350 Width: 32; Height: 32; saveSurf: false),// sprQuestion |
353 (FileName: 'PowerBar'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil; |
351 (FileName: 'PowerBar'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil; |
354 Width: 256; Height: 32; saveSurf: false),// sprPowerBar |
352 Width: 256; Height: 32; saveSurf: false),// sprPowerBar |
355 (FileName: 'WindBar'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil; |
353 (FileName: 'WindBar'; Path: ptGraphics; AltPath: ptNone; Texture: nil; Surface: nil; |