equal
deleted
inserted
replaced
31 procedure ParseCommand(CmdStr: shortstring; TrustedSource: boolean); |
31 procedure ParseCommand(CmdStr: shortstring; TrustedSource: boolean); |
32 procedure ParseTeamCommand(s: shortstring); |
32 procedure ParseTeamCommand(s: shortstring); |
33 procedure StopMessages(Message: Longword); |
33 procedure StopMessages(Message: Longword); |
34 |
34 |
35 implementation |
35 implementation |
36 uses Types, uConsts, uVariables, uConsole, uUtils, uDebug; |
36 uses uConsts, uVariables, uConsole, uUtils, uDebug; |
37 |
37 |
38 type PVariable = ^TVariable; |
38 type PVariable = ^TVariable; |
39 TVariable = record |
39 TVariable = record |
40 Next: PVariable; |
40 Next: PVariable; |
41 Name: string[15]; |
41 Name: string[15]; |