| changeset 196 | 993cf173218b |
| parent 183 | 57c2ef19f719 |
| child 205 | 8d9aff55e6ab |
| 195:edae828322a0 | 196:993cf173218b |
|---|---|
31 procedure ParseCommand(CmdStr: shortstring; const TrustedSource: boolean = true); |
31 procedure ParseCommand(CmdStr: shortstring; const TrustedSource: boolean = true); |
32 function GetLastConsoleLine: shortstring; |
32 function GetLastConsoleLine: shortstring; |
33 |
33 |
34 implementation |
34 implementation |
35 {$J+} |
35 {$J+} |
36 uses uMisc, uStore, Types, uConsts, uGears, uTeams, uIO, uKeys, uSound, uWorld, uLand, uRandom; |
36 uses uMisc, uStore, Types, uConsts, uGears, uTeams, uIO, uKeys, uWorld, uLand, uRandom; |
37 const cLineWidth: integer = 0; |
37 const cLineWidth: integer = 0; |
38 cLinesCount = 256; |
38 cLinesCount = 256; |
39 |
39 |
40 type PVariable = ^TVariable; |
40 type PVariable = ^TVariable; |
41 TVariable = record |
41 TVariable = record |