equal
deleted
inserted
replaced
29 procedure BlitImageAndGenerateCollisionInfo(cpX, cpY, Width: Longword; Image: PSDL_Surface; extraFlags: Word); |
29 procedure BlitImageAndGenerateCollisionInfo(cpX, cpY, Width: Longword; Image: PSDL_Surface; extraFlags: Word); |
30 procedure AddOnLandObjects(Surface: PSDL_Surface); |
30 procedure AddOnLandObjects(Surface: PSDL_Surface); |
31 |
31 |
32 implementation |
32 implementation |
33 uses uStore, uConsts, uConsole, uRandom, uSound, GLunit, |
33 uses uStore, uConsts, uConsole, uRandom, uSound, GLunit, |
34 uTypes, uVariables, uUtils, uDebug, sysutils; |
34 uTypes, uVariables, uUtils, uDebug, SysUtils; |
35 |
35 |
36 const MaxRects = 512; |
36 const MaxRects = 512; |
37 MAXOBJECTRECTS = 16; |
37 MAXOBJECTRECTS = 16; |
38 MAXTHEMEOBJECTS = 32; |
38 MAXTHEMEOBJECTS = 32; |
39 |
39 |