equal
deleted
inserted
replaced
19 {$INCLUDE "options.inc"} |
19 {$INCLUDE "options.inc"} |
20 |
20 |
21 unit uStore; |
21 unit uStore; |
22 interface |
22 interface |
23 uses sysutils, uConsts, SDLh, GLunit, uTypes; |
23 uses sysutils, uConsts, SDLh, GLunit, uTypes; |
24 |
|
25 |
|
26 var PixelFormat: PSDL_PixelFormat; |
|
27 SDLPrimSurface: PSDL_Surface; |
|
28 PauseTexture, |
|
29 SyncTexture, |
|
30 ConfirmTexture: PTexture; |
|
31 cScaleFactor: GLfloat; |
|
32 SupportNPOTT: Boolean; |
|
33 Step: LongInt; |
|
34 squaresize : LongInt; |
|
35 numsquares : LongInt; |
|
36 ProgrTex: PTexture; |
|
37 MissionIcons: PSDL_Surface; |
|
38 ropeIconTex: PTexture; |
|
39 rotationQt: GLfloat; |
|
40 |
24 |
41 procedure initModule; |
25 procedure initModule; |
42 procedure freeModule; |
26 procedure freeModule; |
43 |
27 |
44 procedure StoreLoad; |
28 procedure StoreLoad; |