equal
deleted
inserted
replaced
16 * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA |
16 * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA |
17 *) |
17 *) |
18 |
18 |
19 unit uStore; |
19 unit uStore; |
20 interface |
20 interface |
21 uses uConsts, uTeams, SDLh, uFloat, GL; |
21 uses uConsts, uTeams, SDLh, |
|
22 {$IFDEF IPHONE} |
|
23 gles11, |
|
24 {$ELSE} |
|
25 GL, |
|
26 {$ENDIF} |
|
27 uFloat; |
22 {$INCLUDE options.inc} |
28 {$INCLUDE options.inc} |
23 |
29 |
24 procedure StoreInit; |
30 procedure StoreInit; |
25 procedure StoreLoad; |
31 procedure StoreLoad; |
26 procedure StoreRelease; |
32 procedure StoreRelease; |
48 SDLPrimSurface: PSDL_Surface = nil; |
54 SDLPrimSurface: PSDL_Surface = nil; |
49 PauseTexture, |
55 PauseTexture, |
50 ConfirmTexture: PTexture; |
56 ConfirmTexture: PTexture; |
51 |
57 |
52 implementation |
58 implementation |
53 uses uMisc, uConsole, uLand, uLocale, GLU; |
59 uses uMisc, uConsole, uLand, uLocale; |
54 |
60 |
55 var |
61 var |
56 HHTexture: PTexture; |
62 HHTexture: PTexture; |
57 |
63 |
58 procedure StoreInit; |
64 procedure StoreInit; |