equal
deleted
inserted
replaced
19 {$INCLUDE "options.inc"} |
19 {$INCLUDE "options.inc"} |
20 {$IF GLunit = GL}{$DEFINE GLunit:=GL,GLext}{$ENDIF} |
20 {$IF GLunit = GL}{$DEFINE GLunit:=GL,GLext}{$ENDIF} |
21 |
21 |
22 unit uStore; |
22 unit uStore; |
23 interface |
23 interface |
24 uses sysutils, uConsts, SDLh, GLunit, uTypes, uLandTexture, uCaptions; |
24 uses sysutils, uConsts, SDLh, GLunit, uTypes, uLandTexture, uCaptions, uChat; |
25 |
25 |
26 procedure initModule; |
26 procedure initModule; |
27 procedure freeModule; |
27 procedure freeModule; |
28 |
28 |
29 procedure StoreLoad(reload: boolean = false); |
29 procedure StoreLoad(reload: boolean = false); |
1041 StoreRelease(true); |
1041 StoreRelease(true); |
1042 StoreLoad(true); |
1042 StoreLoad(true); |
1043 |
1043 |
1044 ResetLand; |
1044 ResetLand; |
1045 ReloadCaptions; |
1045 ReloadCaptions; |
|
1046 ReloadLines; |
1046 |
1047 |
1047 UpdateLandTexture(0, LAND_WIDTH, 0, LAND_HEIGHT) |
1048 UpdateLandTexture(0, LAND_WIDTH, 0, LAND_HEIGHT) |
1048 end; |
1049 end; |
1049 end; |
1050 end; |
1050 |
1051 |