changeset 4359 | 83ef50815535 |
parent 4357 | a1fcfc341a52 |
child 4369 | 334fc848e051 |
4357:a1fcfc341a52 | 4359:83ef50815535 |
---|---|
36 |
36 |
37 procedure doPut(putX, putY: LongInt; fromAI: boolean); |
37 procedure doPut(putX, putY: LongInt; fromAI: boolean); |
38 |
38 |
39 implementation |
39 implementation |
40 uses uMisc, uStore, Types, uConsts, uGears, uTeams, uIO, uKeys, uWorld, uMobile, |
40 uses uMisc, uStore, Types, uConsts, uGears, uTeams, uIO, uKeys, uWorld, uMobile, |
41 uRandom, uAmmos, uStats, uChat, SDLh, uSound, uVisualGears, uScript, uTypes; |
41 uRandom, uAmmos, uStats, uChat, SDLh, uSound, uVisualGears, uScript, uTypes, |
42 uVariables; |
|
42 |
43 |
43 const cLineWidth: LongInt = 0; |
44 const cLineWidth: LongInt = 0; |
44 cLinesCount = 256; |
45 cLinesCount = 256; |
45 |
46 |
46 type PVariable = ^TVariable; |
47 type PVariable = ^TVariable; |