changeset 4357 | a1fcfc341a52 |
parent 4159 | 64e677349124 |
child 4359 | 83ef50815535 |
4355:4554c4df9f1a | 4357:a1fcfc341a52 |
---|---|
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; |
32 uses uLand, uStore, uConsts, uMisc, uConsole, uRandom, uVisualGears, uSound, GLunit, uTypes; |
33 |
33 |
34 const MaxRects = 512; |
34 const MaxRects = 512; |
35 MAXOBJECTRECTS = 16; |
35 MAXOBJECTRECTS = 16; |
36 MAXTHEMEOBJECTS = 32; |
36 MAXTHEMEOBJECTS = 32; |
37 |
37 |