changeset 4377 | 43945842da0c |
parent 4374 | bcefeeabaa33 |
child 4389 | d1c65b60cd68 |
4376:9654205a9424 | 4377:43945842da0c |
---|---|
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, uUtils; |
33 uTypes, uVariables, uUtils, uIO; |
34 |
34 |
35 const MaxRects = 512; |
35 const MaxRects = 512; |
36 MAXOBJECTRECTS = 16; |
36 MAXOBJECTRECTS = 16; |
37 MAXTHEMEOBJECTS = 32; |
37 MAXTHEMEOBJECTS = 32; |
38 |
38 |