aboutsummaryrefslogtreecommitdiff
path: root/examples/core_mouse_wheel.lua
diff options
context:
space:
mode:
Diffstat (limited to 'examples/core_mouse_wheel.lua')
-rw-r--r--examples/core_mouse_wheel.lua50
1 files changed, 50 insertions, 0 deletions
diff --git a/examples/core_mouse_wheel.lua b/examples/core_mouse_wheel.lua
new file mode 100644
index 00000000..92e0a160
--- /dev/null
+++ b/examples/core_mouse_wheel.lua
@@ -0,0 +1,50 @@
+-------------------------------------------------------------------------------------------
+--
+-- raylib [core] examples - Mouse wheel
+--
+-- This example has been created using raylib 1.6 (www.raylib.com)
+-- raylib is licensed under an unmodified zlib/libpng license (View raylib.h for details)
+--
+-- Copyright (c) 2014-2016 Ramon Santamaria (@raysan5)
+--
+-------------------------------------------------------------------------------------------
+
+-- Initialization
+-------------------------------------------------------------------------------------------
+local screenWidth = 800
+local screenHeight = 450
+
+InitWindow(screenWidth, screenHeight, "raylib [core] example - mouse wheel")
+
+local boxPositionY = screenHeight/2 - 40
+local scrollSpeed = 4 -- Scrolling speed in pixels
+
+SetTargetFPS(60) -- Set target frames-per-second
+----------------------------------------------------------------------------------------
+
+-- Main game loop
+while not WindowShouldClose() do -- Detect window close button or ESC key
+ -- Update
+ ------------------------------------------------------------------------------------
+ boxPositionY = boxPositionY - (GetMouseWheelMove()*scrollSpeed)
+ ------------------------------------------------------------------------------------
+
+ -- Draw
+ ------------------------------------------------------------------------------------
+ BeginDrawing()
+
+ ClearBackground(RAYWHITE)
+
+ DrawRectangle(screenWidth/2 - 40, boxPositionY, 80, 80, MAROON)
+
+ DrawText("Use mouse wheel to move the cube up and down!", 10, 10, 20, GRAY)
+ DrawText(string.format("Box position Y: %03i", boxPositionY), 10, 40, 20, LIGHTGRAY)
+
+ EndDrawing()
+ ------------------------------------------------------------------------------------
+end
+
+-- De-Initialization
+----------------------------------------------------------------------------------------
+CloseWindow() -- Close window and OpenGL context
+---------------------------------------------------------------------------------------- \ No newline at end of file