changeset 4374 | bcefeeabaa33 |
parent 4367 | f4a0ec067601 |
child 4377 | 43945842da0c |
4373:fe0e3903bb9e | 4374:bcefeeabaa33 |
---|---|
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 uStore, uConsts, uMisc, uConsole, uRandom, uVisualGears, uSound, GLunit, |
32 uses uStore, uConsts, uMisc, uConsole, uRandom, uVisualGears, uSound, GLunit, |
33 uTypes, uVariables; |
33 uTypes, uVariables, uUtils; |
34 |
34 |
35 const MaxRects = 512; |
35 const MaxRects = 512; |
36 MAXOBJECTRECTS = 16; |
36 MAXOBJECTRECTS = 16; |
37 MAXTHEMEOBJECTS = 32; |
37 MAXTHEMEOBJECTS = 32; |
38 |
38 |