66 cursorPos, cursorX, selectedPos, selectionDx: LongInt; |
66 cursorPos, cursorX, selectedPos, selectionDx: LongInt; |
67 LastKeyPressTick: LongWord; |
67 LastKeyPressTick: LongWord; |
68 |
68 |
69 |
69 |
70 const |
70 const |
71 colors: array[#0..#6] of TSDL_Color = ( |
71 colors: array[#0..#9] of TSDL_Color = ( |
72 (r:$FF; g:$FF; b:$FF; a:$FF), // unused, feel free to take it for anything |
72 (r:$FF; g:$FF; b:$FF; a:$FF), // #0 unused, feel free to take it for anything |
73 (r:$FF; g:$FF; b:$FF; a:$FF), // chat message [White] |
73 (r:$FF; g:$FF; b:$FF; a:$FF), // #1 chat message [White] |
74 (r:$FF; g:$00; b:$FF; a:$FF), // action message [Purple] |
74 (r:$FF; g:$00; b:$FF; a:$FF), // #2 action message [Purple] |
75 (r:$90; g:$FF; b:$90; a:$FF), // join/leave message [Lime] |
75 (r:$90; g:$FF; b:$90; a:$FF), // #3 join/leave message [Lime] |
76 (r:$FF; g:$FF; b:$A0; a:$FF), // team message [Light Yellow] |
76 (r:$FF; g:$FF; b:$A0; a:$FF), // #4 team message [Light Yellow] |
77 (r:$FF; g:$00; b:$00; a:$FF), // error messages [Red] |
77 (r:$FF; g:$00; b:$00; a:$FF), // #5 error messages [Red] |
78 (r:$00; g:$FF; b:$FF; a:$FF) // input line [Light Blue] |
78 (r:$00; g:$FF; b:$FF; a:$FF), // #6 input line [Light Blue] |
|
79 (r:$FF; g:$80; b:$80; a:$FF), // #7 team gone [Light Red] |
|
80 (r:$FF; g:$D0; b:$80; a:$FF), // #8 team back [Light Orange] |
|
81 (r:$DF; g:$DF; b:$DF; a:$FF) // #9 hog speech [Light Gray] |
79 ); |
82 ); |
80 ChatCommandz: array [TChatCmd] of record |
83 ChatCommandz: array [TChatCmd] of record |
81 ChatCmd: string[31]; |
84 ChatCmd: string[31]; |
82 ProcedureCallChatCmd: string[31]; |
85 ProcedureCallChatCmd: string[31]; |
83 end = ( |
86 end = ( |