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 {$INCLUDE options.inc} |
21 uses sysutils, uConsts, uTeams, SDLh, |
22 uses sysutils, uConsts, uTeams, SDLh, |
22 {$IFDEF GLES11} |
23 {$IFDEF GLES11} |
23 gles11, |
24 gles11, |
24 {$ELSE} |
25 {$ELSE} |
25 GL, GLext, |
26 GL, GLext, |
26 {$ENDIF} |
27 {$ENDIF} |
27 uFloat; |
28 uFloat; |
28 {$INCLUDE options.inc} |
|
29 |
29 |
30 procedure StoreInit; |
30 procedure StoreInit; |
31 procedure StoreLoad; |
31 procedure StoreLoad; |
32 procedure StoreRelease; |
32 procedure StoreRelease; |
33 procedure DrawSpriteFromRect(Sprite: TSprite; r: TSDL_Rect; X, Y, Height, Position: LongInt); |
33 procedure DrawSpriteFromRect(Sprite: TSprite; r: TSDL_Rect; X, Y, Height, Position: LongInt); |