Thirsty Panther Posted December 12, 2017 Share Posted December 12, 2017 I'm in the process of developing a RTS camera script in the style of Command and Conquer. So far I've modified the spectator script so that if you move the mouse to the top of the screen the camera moves forward. If you move the mouse to the bottom of the screen the camera moves backwards. Likewise if the mouse moves left or right the camera follows. I've even got the height of the camera linked to the mouse wheel. What I would like to do is to rotate the camera by pressing the middle mouse button and moving the mouse in the direction I want the camera to rotate. local mhit = window:MouseDown(Key.MButton) This code lets me know the Middle button is pressed but how do I get the Left - Right information at the same time? Quote Link to comment Share on other sites More sharing options...
macklebee Posted December 12, 2017 Share Posted December 12, 2017 13 hours ago, Thirsty Panther said: local mhit = window:MouseDown(Key.MButton) This code lets me know the Middle button is pressed but how do I get the Left - Right information at the same time? Just like you would for any other time for the camera rotation but make the middle mouse button the qualifier for allowing the camera to rotate. Look at the orbital camera example I posted almost two years ago for an example: Here's the same code updated to show the use with middle mouse button instead of the right mouse button: window = Window:Create("Orbital Camera",0,0,800,600,Window.Titlebar+Window.Center) context = Context:Create(window) world = World:Create() camera = Camera:Create() camera:SetSkybox("Materials/Sky/skybox_texture.tex") light = DirectionalLight:Create() light:SetRotation(35,35,0) player = Model:Load("Models/Characters/generic/generic.mdl") player:SetColor(0,1,0,1) pivot = Pivot:Create() pivot:SetPosition(0,0.8,0) camera:SetParent(pivot) camera:Move(0,1,-3) mx = 0 my = 0 prevmx = 0 prevmy = 0 toggle = 0 while window:KeyDown(Key.Escape)==false do if window:Closed() then break end if window:MouseHit(Key.MButton) then toggle = 1 end if window:MouseDown(Key.MButton) then mousepos = window:GetMousePosition() mx = pivot:GetRotation().x + (mousepos.y-prevmy) my = pivot:GetRotation().y + (mousepos.x-prevmx) if toggle==1 then toggle = 0 mx = pivot:GetRotation().x my = pivot:GetRotation().y end pivot:SetRotation(mx,my,pivot:GetRotation().z) prevmx = mousepos.x prevmy = mousepos.y end Time:Update() world:Update() world:Render() context:SetBlendMode(Blend.Alpha) context:DrawText(string.format("FPS: %.1f",Time:UPS()), 2, 2) context:DrawText("Hold Middle Mouse Button Down to Rotate", 2, 22) context:SetBlendMode(Blend.Solid) context:Sync(true) end 1 Quote Win7 64bit / Intel i7-2600 CPU @ 3.9 GHz / 16 GB DDR3 / NVIDIA GeForce GTX 590 LE / 3DWS / BMX / Hexagon macklebee's channel Link to comment Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.
Note: Your post will require moderator approval before it will be visible.