| changeset 991 | d17c71ee074e |
| parent 990 | dfa6a6fe1542 |
| child 1022 | f6a3fcb329ca |
| 990:dfa6a6fe1542 | 991:d17c71ee074e |
|---|---|
527 procedure chChat(var s: shortstring); |
527 procedure chChat(var s: shortstring); |
528 begin |
528 begin |
529 GameState:= gsChat; |
529 GameState:= gsChat; |
530 KeyPressChat(27) |
530 KeyPressChat(27) |
531 end; |
531 end; |
532 |
|
533 procedure chHistory(var s: shortstring); |
|
534 begin |
|
535 uChat.showAll:= not uChat.showAll |
|
536 end; |