| changeset 4359 | 83ef50815535 |
| parent 4357 | a1fcfc341a52 |
| child 4367 | f4a0ec067601 |
| 4357:a1fcfc341a52 | 4359:83ef50815535 |
|---|---|
27 procedure LoadThemeConfig; |
27 procedure LoadThemeConfig; |
28 procedure BlitImageAndGenerateCollisionInfo(cpX, cpY, Width: Longword; Image: PSDL_Surface); |
28 procedure BlitImageAndGenerateCollisionInfo(cpX, cpY, Width: Longword; Image: PSDL_Surface); |
29 procedure AddOnLandObjects(Surface: PSDL_Surface); |
29 procedure AddOnLandObjects(Surface: PSDL_Surface); |
30 |
30 |
31 implementation |
31 implementation |
32 uses uLand, uStore, uConsts, uMisc, uConsole, uRandom, uVisualGears, uSound, GLunit, uTypes; |
32 uses uLand, uStore, uConsts, uMisc, uConsole, uRandom, uVisualGears, uSound, GLunit, |
33 uTypes, uVariables; |
|
33 |
34 |
34 const MaxRects = 512; |
35 const MaxRects = 512; |
35 MAXOBJECTRECTS = 16; |
36 MAXOBJECTRECTS = 16; |
36 MAXTHEMEOBJECTS = 32; |
37 MAXTHEMEOBJECTS = 32; |
37 |
38 |