Add color zippy lines for winboard
[xboard.git] / winboard / winboard.c
index 32addcc..c000f95 100644 (file)
@@ -3108,7 +3108,19 @@ MouseEvent(HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam)
       dragInfo.lastpos = dragInfo.pos;\r
     }\r
     break;\r
-\r
+  case WM_MOUSEWHEEL:\r
+       /* Mouse Wheel is being rolled forward \r
+        * Play moves forward\r
+        */\r
+       if ((short)HIWORD(wParam) > 0) \r
+          if (forwardMostMove > 0 && currentMove != forwardMostMove)\r
+                  ForwardEvent();\r
+          /* Mouse Wheel is being rolled backward \r
+           * Play moves backward\r
+           */\r
+       if ((short)HIWORD(wParam) < 0) \r
+          if (currentMove > 0) BackwardEvent();\r
+       break;\r
   case WM_MBUTTONDOWN:\r
   case WM_RBUTTONDOWN:\r
     ErrorPopDown();\r
@@ -3415,6 +3427,7 @@ WndProc(HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam)
   case WM_MBUTTONUP:\r
   case WM_RBUTTONUP:\r
   case WM_MOUSEMOVE:\r
+  case WM_MOUSEWHEEL:\r
     MouseEvent(hwnd, message, wParam, lParam);\r
     break;\r
 \r