changeset 2379 | d62b1f224982 |
parent 2373 | e3989519731b |
child 2396 | e13a1117152b |
--- a/hedgewars/CCHandlers.inc Thu Sep 10 15:35:34 2009 +0000 +++ b/hedgewars/CCHandlers.inc Thu Sep 10 18:50:53 2009 +0000 @@ -690,6 +690,11 @@ if ZoomValue > 1.0 then ZoomValue:= ZoomValue - 0.25; end; +procedure chZoomReset(var s: shortstring); +begin +ZoomValue:= 2.0 +end; + procedure chChat(var s: shortstring); begin GameState:= gsChat;