hedgewars/CCHandlers.inc
changeset 174 0b2c5b22f644
parent 167 805fa9a27e9e
child 175 d226d976d836
--- a/hedgewars/CCHandlers.inc	Tue Sep 26 20:25:42 2006 +0000
+++ b/hedgewars/CCHandlers.inc	Wed Sep 27 20:13:29 2006 +0000
@@ -402,3 +402,23 @@
 SDL_ShowCursor(0)
 end;
 
+procedure chVolUp_p(var s: shortstring);
+begin
+cVolumeDelta:= 3
+end;
+
+procedure chVolUp_m(var s: shortstring);
+begin
+cVolumeDelta:= 0
+end;
+
+procedure chVolDown_p(var s: shortstring);
+begin
+cVolumeDelta:= -3
+end;
+
+procedure chVolDown_m(var s: shortstring);
+begin
+cVolumeDelta:= 0
+end;
+