mausu: speedbug? rlease? mantner clic? tuckaway?

mausu.ahk

@@ -0,0 +1,67 @@
+#MaxThreadsPerHotkey 1
+
+;;For debugging purposes, it controls nothing, as it happens to us all with the flow of our lives
+mouseActive := 0
+
+rightMov := 0
+lefMov := 0
+upMov := 0
+downMov := 0
+
+mouseSpeed := 1
+speedUp := 0
+speedUpFactor := 20
+
+;;2 is default speed
+RCtrl & Left::lefMov := -1
+RCtrl & Left Up::lefMov := 0
+RCtrl & Right::rightMov := 1
+RCtrl & Right Up::rightMov := 0
+RCtrl & Up::upMov := -1
+RCtrl & Up Up::upMov := 0
+RCtrl & Down::downMov := 1
+RCtrl & Down Up::downMov := 0
+
+
+RCtrl & /::
+	  SendInput, {RCtrl Up}
+	  speedUp := !(speedUp)
+	  mouseSpeed := speedUp * speedUpFactor + 3 
+	  SendInput, {RCtrl Down}
+	  return
+
+
+;;Toggle mouse action
+~RCtrl::
+	  Global mouseActive, mouseSpeed
+	  mouseActive := 1
+	  while (GetKeyState("RCtrl", "P") != 0) {
+	  		MouseMove, (rightMov + lefMov) * (mouseSpeed), (upMov + downMov) * (mouseSpeed), 0, R
+	  }
+	  mouseActive := 0
+	  rightMov := 0
+	  lefMov := 0
+	  upMov := 0
+	  downMov := 0
+	  return
+
+;;Mouse buttons
+RCtrl & RShift::
+	  SendInput, {RCtrl Up}
+	  SendInput, {RShift Up}
+	  SendInput, {LButton}
+	  SendInput, {RCtrl Down}
+	  return
+RCtrl & End::
+	  SendInput, {RCtrl Up}
+	  SendInput, {End Up}
+	  SendInput, {RButton}
+	  SendInput, {RCtrl Down}
+	  return
+RCtrl & Enter::
+	  SendInput, {RCtrl Up}
+	  SendInput, {Enter Up}
+	  SendInput, {MButton}
+	  SendInput, {RCtrl Down}
+	  return
+