├── options.ini
├── README.md
├── vkeys.au3
├── TPMouse.au3
└── LICENSE
/options.ini:
--------------------------------------------------------------------------------
1 | [Inertia]
2 | DampingCoef=6
3 | BrakingCoef=60
4 | NormalSensitivity=1
5 | ScrollSensitivity=1
6 |
7 | [Bindings]
8 | up=VK_I
9 | left=VK_J
10 | down=VK_K
11 | right=VK_L
12 | mb1=VK_F
13 | mb2=VK_E
14 | mb3=VK_R
15 | brake=VK_S
16 | scroll=VK_SPACE
17 |
--------------------------------------------------------------------------------
/README.md:
--------------------------------------------------------------------------------
1 | # TPMouse
2 | Control the cursor with your hand staying on the keyboard's homerow, even if you don't have a ThinkPad.
3 |
4 | Inspired by [rvaiya/warpd](https://github.com/rvaiya/warpd).
5 |
6 | ## Inertia Mode
7 | 
8 |
9 |
10 | 1. To activate, press `CapsLk` `C` or `LShift` `RShift` `C`. You'll see your main cursor switched to a crosshair.
11 | 2. Press `I`/`J`/`K`/`L` to move the cursor. Hold `S` to brake for more precise movement, hold `Space` to scroll vertically/horizontally.
12 | 3. Press `F`/`E`/`R` to left/right/middle click at the cursor position.
13 | 4. To quit, press `CapsLk` `Q` or `LShift` `RShift` `Q` or just `Esc`.
14 |
15 |
16 | ## Grid Mode
17 | 
18 |
19 | 1. To activate, press `CapsLk` `G` or `LShift` `RShift` `G`. You'll see your main cursor switched to a crosshair, and a thin red border surrounding your screen.
20 | 2. Press `I`/`J`/`K`/`L` to narrow down the search border.
21 | 3. Press `F`/`E`/`R` to left/right/middle click at the cursor position.
22 | 4. To quit, press `CapsLk` `Q` or `LShift` `RShift` `Q` or just `Esc`.
23 |
24 |
25 | ## Demonstration
26 |
27 | ### Inertia Mode
28 |
29 | https://user-images.githubusercontent.com/98432183/198895264-45823df6-8e8e-4135-9e7d-4ea9c5408c43.mp4
30 |
31 |
32 |
33 | ### Grid Mode
34 |
35 | https://user-images.githubusercontent.com/98432183/198895269-4a5b7266-f662-491c-810e-5a2d87ddfc47.mp4
36 |
37 | ## Configuration
38 |
39 | Edit the `options.ini` file to modify the inertia parameters or keybinds. If not present, the script uses the following defaults:
40 |
41 | ```
42 | [Inertia]
43 | DampingCoef=6
44 | BrakingCoef=60
45 | NormalSensitivity=1
46 | ScrollSensitivity=1
47 |
48 | [Bindings]
49 | up=VK_I
50 | left=VK_J
51 | down=VK_K
52 | right=VK_L
53 | mb1=VK_F
54 | mb2=VK_E
55 | mb3=VK_R
56 | brake=VK_S
57 | scroll=VK_SPACE
58 | ```
59 |
60 | The keybinds will require the script to be restarted to take effect, whereas the inertia parameters are reloaded upon activation of Inertia Mode.
61 |
--------------------------------------------------------------------------------
/vkeys.au3:
--------------------------------------------------------------------------------
1 | Global Const $VK_LBUTTON = 0x01, $VK_MOUSE1 = 0x01, $VK_MB1 = 0x01
2 | Global Const $VK_RBUTTON = 0x02, $VK_MOUSE2 = 0x02, $VK_MB2 = 0x02
3 | Global Const $VK_CANCEL = 0x03
4 | Global Const $VK_MBUTTON = 0x04, $VK_MOUSE3 = 0x04, $VK_MB3 = 0x04
5 | Global Const $VK_XBUTTON1 = 0x05, $VK_MOUSE4 = 0x05, $VK_MB4 = 0x05
6 | Global Const $VK_XBUTTON2 = 0x06, $VK_MOUSE5 = 0x06, $VK_MB5 = 0x06
7 | ; 0x07 undefined
8 | Global Const $VK_BACK = 0x08, $VK_BACKSPACE = 0x08
9 | Global Const $VK_TAB = 0x09
10 | ; 0x0A reserved
11 | ; 0x0B reserved
12 | Global Const $VK_CLEAR = 0x0C
13 | Global Const $VK_RETURN = 0x0D, $VK_ENTER = 0x0D
14 | ; 0x0E undefined
15 | ; 0x0F unedfined
16 | Global Const $VK_SHIFT = 0x10
17 | Global Const $VK_CONTROL = 0x11, $VK_CTRL = 0x11
18 | Global Const $VK_MENU = 0x12, $VK_ALT = 0x12
19 | Global Const $VK_PAUSE = 0x13
20 | Global Const $VK_CAPITAL = 0x14, $VK_CAPSLK = 0x14, $VK_CAPSLOCK = 0x14, $VK_CAPS = 0x14
21 | Global Const $VK_HANGEUL = 0x15, $VK_HANGUL = 0x15, $VK_KANA = 0x15
22 | Global Const $VK_IME_ON = 0x16
23 | Global Const $VK_JUNJA = 0x17
24 | Global Const $VK_FINAL = 0x18
25 | Global Const $VK_HANJA = 0x19, $VK_KANJI = 0x19
26 | Global Const $VK_IME_OFF = 0x1A
27 | Global Const $VK_ESCAPE = 0x1B, $VK_ESC = 0x1B
28 | Global Const $VK_CONVERT = 0x1C
29 | Global Const $VK_NONCONVERT = 0x1D
30 | Global Const $VK_ACCEPT = 0x1E
31 | Global Const $VK_MODECHANGE = 0x1F
32 | Global Const $VK_SPACE = 0x20
33 | Global Const $VK_PRIOR = 0x21, $VK_PGUP = 0x21, $VK_PAGEUP = 0x21
34 | Global Const $VK_NEXT = 0x22, $VK_PGDN = 0x22, $VK_PAGEDOWN = 0x22
35 | Global Const $VK_END = 0x23
36 | Global Const $VK_HOME = 0x24
37 | Global Const $VK_LEFT = 0x25
38 | Global Const $VK_UP = 0x26
39 | Global Const $VK_RIGHT = 0x27
40 | Global Const $VK_DOWN = 0x28
41 | Global Const $VK_SELECT = 0x29
42 | Global Const $VK_PRINT = 0x2A
43 | Global Const $VK_EXECUTE = 0x2B
44 | Global Const $VK_SNAPSHOT = 0x2C, $VK_PRTSCN = 0x2C, $VK_PRINTSCREEN = 0x2C
45 | Global Const $VK_INSERT = 0x2D, $VK_INS = 0x2D
46 | Global Const $VK_DELETE = 0x2E, $VK_DEL = 0x2E
47 | Global Const $VK_HELP = 0x2F
48 | Global Const $VK_0 = 0x30
49 | Global Const $VK_1 = 0x31
50 | Global Const $VK_2 = 0x32
51 | Global Const $VK_3 = 0x33
52 | Global Const $VK_4 = 0x34
53 | Global Const $VK_5 = 0x35
54 | Global Const $VK_6 = 0x36
55 | Global Const $VK_7 = 0x37
56 | Global Const $VK_8 = 0x38
57 | Global Const $VK_9 = 0x39
58 | ; 0x3A undefined
59 | ; 0x3B undefined
60 | ; 0x3C undefined
61 | ; 0x3D undefined
62 | ; 0x3E undefined
63 | ; 0x3F undefined
64 | ; 0x40 undefined
65 | Global Const $VK_A = 0x41
66 | Global Const $VK_B = 0x42
67 | Global Const $VK_C = 0x43
68 | Global Const $VK_D = 0x44
69 | Global Const $VK_E = 0x45
70 | Global Const $VK_F = 0x46
71 | Global Const $VK_G = 0x47
72 | Global Const $VK_H = 0x48
73 | Global Const $VK_I = 0x49
74 | Global Const $VK_J = 0x4A
75 | Global Const $VK_K = 0x4B
76 | Global Const $VK_L = 0x4C
77 | Global Const $VK_M = 0x4D
78 | Global Const $VK_N = 0x4E
79 | Global Const $VK_O = 0x4F
80 | Global Const $VK_P = 0x50
81 | Global Const $VK_Q = 0x51
82 | Global Const $VK_R = 0x52
83 | Global Const $VK_S = 0x53
84 | Global Const $VK_T = 0x54
85 | Global Const $VK_U = 0x55
86 | Global Const $VK_V = 0x56
87 | Global Const $VK_W = 0x57
88 | Global Const $VK_X = 0x58
89 | Global Const $VK_Y = 0x59
90 | Global Const $VK_Z = 0x5A
91 | Global Const $VK_LWIN = 0x5B
92 | Global Const $VK_RWIN = 0x5C
93 | Global Const $VK_APPS = 0x5D, $VK_CONTEXT = 0x5D, $VK_CONTEXTMENU = 0x5D
94 | ; 0x5E reserved
95 | Global Const $VK_SLEEP = 0x5F
96 | Global Const $VK_NUMPAD0 = 0x60, $VK_NUM0 = 0x60
97 | Global Const $VK_NUMPAD1 = 0x61, $VK_NUM1 = 0x61
98 | Global Const $VK_NUMPAD2 = 0x62, $VK_NUM2 = 0x62
99 | Global Const $VK_NUMPAD3 = 0x63, $VK_NUM3 = 0x63
100 | Global Const $VK_NUMPAD4 = 0x64, $VK_NUM4 = 0x64
101 | Global Const $VK_NUMPAD5 = 0x65, $VK_NUM5 = 0x65
102 | Global Const $VK_NUMPAD6 = 0x66, $VK_NUM6 = 0x66
103 | Global Const $VK_NUMPAD7 = 0x67, $VK_NUM7 = 0x67
104 | Global Const $VK_NUMPAD8 = 0x68, $VK_NUM8 = 0x68
105 | Global Const $VK_NUMPAD9 = 0x69, $VK_NUM9 = 0x69
106 | Global Const $VK_MULTIPLY = 0x6A
107 | Global Const $VK_ADD = 0x6B
108 | Global Const $VK_SEPARATOR = 0x6C
109 | Global Const $VK_SUBTRACT = 0x6D
110 | Global Const $VK_DECIMAL = 0x6E
111 | Global Const $VK_DIVIDE = 0x6F
112 | Global Const $VK_F1 = 0x70
113 | Global Const $VK_F2 = 0x71
114 | Global Const $VK_F3 = 0x72
115 | Global Const $VK_F4 = 0x73
116 | Global Const $VK_F5 = 0x74
117 | Global Const $VK_F6 = 0x75
118 | Global Const $VK_F7 = 0x76
119 | Global Const $VK_F8 = 0x77
120 | Global Const $VK_F9 = 0x78
121 | Global Const $VK_F10 = 0x79
122 | Global Const $VK_F11 = 0x7A
123 | Global Const $VK_F12 = 0x7B
124 | Global Const $VK_F13 = 0x7C
125 | Global Const $VK_F14 = 0x7D
126 | Global Const $VK_F15 = 0x7E
127 | Global Const $VK_F16 = 0x7F
128 | Global Const $VK_F17 = 0x80
129 | Global Const $VK_F18 = 0x81
130 | Global Const $VK_F19 = 0x82
131 | Global Const $VK_F20 = 0x83
132 | Global Const $VK_F21 = 0x84
133 | Global Const $VK_F22 = 0x85
134 | Global Const $VK_F23 = 0x86
135 | Global Const $VK_F24 = 0x87
136 | Global Const $VK_NAVIGATION_VIEW = 136 ; 0x88 unassigned
137 | Global Const $VK_NAVIGATION_MENU = 137 ; 0x89 unassigned
138 | Global Const $VK_NAVIGATION_UP = 138 ; 0x8A unassigned
139 | Global Const $VK_NAVIGATION_DOWN = 139 ; 0x8B unassigned
140 | Global Const $VK_NAVIGATION_LEFT = 140 ; 0x8C unassigned
141 | Global Const $VK_NAVIGATION_RIGHT = 141 ; 0x8D unassigned
142 | Global Const $VK_NAVIGATION_ACCEPT = 142 ; 0x8E unassigned
143 | Global Const $VK_NAVIGATION_CANCEL = 143 ; 0x8F unassigned
144 | Global Const $VK_NUMLOCK = 0x90, $VK_NUMLK = 0x90
145 | Global Const $VK_SCROLL = 0x91, $VK_SCRLK = 0x91
146 | Global Const $VK_OEM_FJ_JISHO = 146, $VK_OEM_NEC_EQUAL = 146 ; 0x92 OEM specific
147 | Global Const $VK_OEM_FJ_MASSHOU = 147 ; 0x93 OEM specific
148 | Global Const $VK_OEM_FJ_TOUROKU = 148 ; 0x94 OEM specific
149 | Global Const $VK_OEM_FJ_LOYA = 149 ; 0x95 OEM specific
150 | Global Const $VK_OEM_FJ_ROYA = 150 ; 0x96 OEM specific
151 | ; 0x97 unassigned
152 | ; 0x98 unassigned
153 | ; 0x99 unassigned
154 | ; 0x9A unassigned
155 | ; 0x9B unassigned
156 | ; 0x9C unassigned
157 | ; 0x9D unassigned
158 | ; 0x9E unassigned
159 | ; 0x9F unassigned
160 | Global Const $VK_LSHIFT = 0xA0
161 | Global Const $VK_RSHIFT = 0xA1
162 | Global Const $VK_LCONTROL = 0xA2, $VK_LCTRL = 0xA2
163 | Global Const $VK_RCONTROL = 0xA3, $VK_RCTRL = 0xA3
164 | Global Const $VK_LMENU = 0xA4, $VK_LALT = 0xA4
165 | Global Const $VK_RMENU = 0xA5, $VK_RALT = 0xA5
166 | Global Const $VK_BROWSER_BACK = 0xA6
167 | Global Const $VK_BROWSER_FORWARD = 0xA7
168 | Global Const $VK_BROWSER_REFRESH = 0xA8
169 | Global Const $VK_BROWSER_STOP = 0xA9
170 | Global Const $VK_BROWSER_SEARCH = 0xAA
171 | Global Const $VK_BROWSER_FAVORITES = 0xAB
172 | Global Const $VK_BROWSER_HOME = 0xAC
173 | Global Const $VK_VOLUME_MUTE = 0xAD
174 | Global Const $VK_VOLUME_DOWN = 0xAE
175 | Global Const $VK_VOLUME_UP = 0xAF
176 | Global Const $VK_MEDIA_NEXT_TRACK = 0xB0
177 | Global Const $VK_MEDIA_PREV_TRACK = 0xB1
178 | Global Const $VK_MEDIA_STOP = 0xB2
179 | Global Const $VK_MEDIA_PLAY_PAUSE = 0xB3
180 | Global Const $VK_LAUNCH_MAIL = 0xB4
181 | Global Const $VK_LAUNCH_MEDIA_SELECT = 0xB5
182 | Global Const $VK_LAUNCH_APP1 = 0xB6
183 | Global Const $VK_LAUNCH_APP2 = 0xB7
184 | ; 0xB8 reserved
185 | ; 0xB9 reserved
186 | Global Const $VK_OEM_1 = 0xBA ; semicolon/colon for US standard, can vary by keyboard
187 | Global Const $VK_OEM_PLUS = 0xBB ; equal/plus, all layouts
188 | Global Const $VK_OEM_COMMA = 0xBC ; comma/lessthan, all layouts
189 | Global Const $VK_OEM_MINUS = 0xBD ; minus/underscore, all layouts
190 | Global Const $VK_OEM_PERIOD = 0xBE ; period/greaterthan, all layouts
191 | Global Const $VK_OEM_2 = 0xBF ; slash/questionmark for US standard, can vary by keyboard
192 | Global Const $VK_OEM_3 = 0xC0 ; backtick/tilde for US standard, can vary by keyboard
193 | ; 0xC1 reserved
194 | ; 0xC2 reserved
195 | Global Const $VK_GAMEPAD_A = 195 ; 0xC3 reserved
196 | Global Const $VK_GAMEPAD_B = 196 ; 0xC4 reserved
197 | Global Const $VK_GAMEPAD_X = 197 ; 0xC5 reserved
198 | Global Const $VK_GAMEPAD_Y = 198 ; 0xC6 reserved
199 | Global Const $VK_GAMEPAD_RIGHT_SHOULDER = 199 ; 0xC7 reserved
200 | Global Const $VK_GAMEPAD_LEFT_SHOULDER = 200 ; 0xC8 reserved
201 | Global Const $VK_GAMEPAD_LEFT_TRIGGER = 201 ; 0xC9 reserved
202 | Global Const $VK_GAMEPAD_RIGHT_TRIGGER = 202 ; 0xCA reserved
203 | Global Const $VK_GAMEPAD_DPAD_UP = 203 ; 0xCB reserved
204 | Global Const $VK_GAMEPAD_DPAD_DOWN = 204 ; 0xCC reserved
205 | Global Const $VK_GAMEPAD_DPAD_LEFT = 205 ; 0xCD reserved
206 | Global Const $VK_GAMEPAD_DPAD_RIGHT = 206 ; 0xCE reserved
207 | Global Const $VK_GAMEPAD_MENU = 207 ; 0xCF reserved
208 | Global Const $VK_GAMEPAD_VIEW = 208 ; 0xD0 reserved
209 | Global Const $VK_GAMEPAD_LEFT_THUMBSTICK_BUTTON = 209 ; 0xD1 reserved
210 | Global Const $VK_GAMEPAD_RIGHT_THUMBSTICK_BUTTON = 210 ; 0xD2 reserved
211 | Global Const $VK_GAMEPAD_LEFT_THUMBSTICK_UP = 211 ; 0xD3 reserved
212 | Global Const $VK_GAMEPAD_LEFT_THUMBSTICK_DOWN = 212 ; 0xD4 reserved
213 | Global Const $VK_GAMEPAD_LEFT_THUMBSTICK_RIGHT = 213 ; 0xD5 reserved
214 | Global Const $VK_GAMEPAD_LEFT_THUMBSTICK_LEFT = 214 ; 0xD6 reserved
215 | Global Const $VK_GAMEPAD_RIGHT_THUMBSTICK_UP = 215 ; 0xD7 reserved
216 | Global Const $VK_GAMEPAD_RIGHT_THUMBSTICK_DOWN = 216 ; 0xD8 reserved
217 | Global Const $VK_GAMEPAD_RIGHT_THUMBSTICK_RIGHT = 217 ; 0xD9 reserved
218 | Global Const $VK_GAMEPAD_RIGHT_THUMBSTICK_LEFT = 218 ; 0xDA reserved
219 | Global Const $VK_OEM_4 = 0xDB ; left square/curly bracket for US standard, can vary by keyboard
220 | Global Const $VK_OEM_5 = 0xDC ; backslash/pipe for US standard, can vary by keyboard
221 | Global Const $VK_OEM_6 = 0xDD ; right square/curly bracket for US standard, can vary by keyboard
222 | Global Const $VK_OEM_7 = 0xDE ; single/double quote for US standard, can vary by keyboard
223 | Global Const $VK_OEM_8 = 0xDF
224 | ; 0xE0 reserved
225 | Global Const $VK_OEM_AX = 225 ; 0xE1 OEM specific
226 | Global Const $VK_OEM_102 = 0xE2
227 | Global Const $VK_ICO_HELP = 227 ; 0xE3 OEM specific
228 | Global Const $VK_ICO_00 = 228 ; 0xE4 OEM specific
229 | Global Const $VK_PROCESSKEY = 0xE5
230 | Global Const $VK_ICO_CLEAR = 230 ; 0xE6 OEM specific
231 | Global Const $VK_PACKET = 0xE7
232 | ; 0xE8 unassigned
233 | Global Const $VK_OEM_RESET = 233 ; 0xE9 OEM specific
234 | Global Const $VK_OEM_JUMP = 234 ; 0xEA OEM specific
235 | Global Const $VK_OEM_PA1 = 235 ; 0xEB OEM specific
236 | Global Const $VK_OEM_PA2 = 236 ; 0xEC OEM specific
237 | Global Const $VK_OEM_PA3 = 237 ; 0xED OEM specific
238 | Global Const $VK_OEM_WSCTRL = 238 ; 0xEE OEM specific
239 | Global Const $VK_OEM_CUSEL = 239 ; 0xEF OEM specific
240 | Global Const $VK_OEM_ATTN = 240 ; 0xF0 OEM specific
241 | Global Const $VK_OEM_FINISH = 241 ; 0xF1 OEM specific
242 | Global Const $VK_OEM_COPY = 242 ; 0xF2 OEM specific
243 | Global Const $VK_OEM_AUTO = 243 ; 0xF3 OEM specific
244 | Global Const $VK_OEM_ENLW = 244 ; 0xF4 OEM specific
245 | Global Const $VK_OEM_BACKTAB = 245 ; 0xF5 OEM specific
246 | Global Const $VK_ATTN = 0xF6
247 | Global Const $VK_CRSEL = 0xF7
248 | Global Const $VK_EXSEL = 0xF8
249 | Global Const $VK_EREOF = 0xF9
250 | Global Const $VK_PLAY = 0xFA
251 | Global Const $VK_ZOOM = 0xFB
252 | Global Const $VK_NONAME = 0xFC
253 | Global Const $VK_PA1 = 0xFD
254 | Global Const $VK_OEM_CLEAR = 0xFE
255 | Global Const $VK_NONE = 0xFF ; no mapping
256 | #include-once
257 |
--------------------------------------------------------------------------------
/TPMouse.au3:
--------------------------------------------------------------------------------
1 | #NoTrayIcon
2 | #OnAutoItStartRegister SetProcessDPIAware
3 | #include 'vkeys.au3'
4 | If IsAdmin() Then Sleep(100)
5 |
6 | DllCall("kernel32.dll", "handle", "CreateMutexW", "struct*", 0, "bool", 1, "wstr", "TPMouse")
7 | If 183 = DllCall("kernel32.dll", "dword", "GetLastError")[0] Then Exit
8 |
9 | Global $HOTKEY_STR_MAP
10 |
11 | Opt('TrayAutoPause',0)
12 | Opt('TrayOnEventMode',1)
13 | Opt('TrayMenuMode',1+2)
14 | If Not IsAdmin() Then TrayItemSetOnEvent(TrayCreateItem('Restart as admin'),Elevate)
15 | TrayItemSetOnEvent(TrayCreateItem('Open config'),OpenConfig)
16 | TrayItemSetOnEvent(TrayCreateItem('Reload config'),ReloadKeybinds)
17 | TrayItemSetOnEvent(TrayCreateItem('Quit TPMouse'),Quit)
18 | TraySetIcon('%windir%\Cursors\aero_link_xl.cur')
19 | TraySetToolTip('TPMouse - Inactive')
20 | Global $user32 = DllOpen('user32.dll')
21 | Global $hInputWnd = GUICreate('')
22 | Global $hCursors = [CopyIcon(GetSystemCursor('NORMAL')),CopyIcon(GetSystemCursor('CROSS')),CopyIcon(GetSystemCursor('SIZEALL'))]
23 | GUIRegisterMsg(0x00ff,WM_INPUT)
24 | GUIRegisterMsg(0x0400,ReloadKeybinds)
25 | SetRawinput($hInputWnd, True)
26 | SingletonOverlay('init')
27 | SingletonInertia('init')
28 | OnAutoItExitRegister(Cleanup)
29 | ProgramLoop()
30 |
31 | Func Elevate()
32 | ShellExecute( @AutoItExe , @Compiled ? '' : @ScriptFullPath , '' , 'runas' )
33 | Exit
34 | EndFunc
35 |
36 | Func Quit()
37 | Exit
38 | EndFunc
39 |
40 | Func ProgramLoop()
41 | While 1
42 | If SingletonInertia('sim') Then
43 | Sleep(10)
44 | Else
45 | Sleep(100)
46 | EndIf
47 | WEnd
48 | EndFunc
49 |
50 | Func Cleanup()
51 | DllCall( $user32 , 'bool' , 'SystemParametersInfo' , 'uint' , 0x0057 , 'uint' , 0 , 'struct*' , Null , 'uint' , 0 )
52 | DllClose($user32)
53 | EndFunc
54 |
55 | Func SetProcessDPIAware()
56 | GUICreate("")
57 | DllCall("user32.dll", "bool", "SetProcessDPIAware")
58 | GUIDelete()
59 | EndFunc
60 |
61 | Func SetRawinput($hWnd, $enable)
62 | Local $struct = DllStructCreate('struct;ushort UsagePage;ushort Usage;dword Flags;hwnd Target;endstruct')
63 | $struct.Target = $hWnd
64 | $struct.Flags = $enable ? 0x00000100 : 0x00000001
65 | $struct.UsagePage = 0x01 ; generic desktop
66 | $struct.Usage = 0x06 ; keyboard
67 | DllCall($user32, 'bool', 'RegisterRawInputDevices', 'struct*', $struct, 'uint', 1, 'uint', DllStructGetSize($struct))
68 | EndFunc
69 |
70 | Func ReloadKeybinds()
71 | Local Static $struct = DllStructCreate('ushort MakeCode;ushort Flags;ushort VKey;')
72 | Local Static $_1 = DllStructSetData($struct,'VKey',$VK_ESC)
73 | Local Static $_2 = DllStructSetData($struct,'Flags',1)
74 | ProcessKeypress($struct)
75 | SingletonKeybinds('reload')
76 | EndFunc
77 |
78 | Func OpenConfig()
79 | ShellExecute(@WorkingDir & '\' & 'options.ini')
80 | EndFunc
81 |
82 | Func ProcessKeypress($struct)
83 | Local Static $_ = SingletonKeybinds, $sks=SingletonKeyState, $functionlist = [SingletonInertia,SingletonOverlay]
84 | Local Static $shiftprimed = False, $capsprimed = False
85 | If 0<$struct.VKey and $struct.VKey<255 Then SingletonKeyState($struct.VKey,$struct.MakeCode,$struct.Flags)
86 | Switch $struct.VKey
87 | Case $VK_SHIFT ; only set priming here because user might still press other keys before releasing
88 | If BitAnd(0x0001,$struct.Flags) Then
89 | If $shiftprimed Then
90 | HotKeySet('+{c}')
91 | HotKeySet('+{g}')
92 | HotKeySet('+{q}')
93 | EndIf
94 | $shiftprimed = False
95 | ElseIf (Not $shiftprimed) And ($sks($VK_LSHIFT) And $sks($VK_RSHIFT)) Then
96 | HotKeySet('+{c}',UnsetSelf)
97 | HotKeySet('+{g}',UnsetSelf)
98 | HotKeySet('+{q}',UnsetSelf)
99 | $shiftprimed = True
100 | EndIf
101 | Case $VK_CAPS ; only set priming here because user might still press other keys before releasing
102 | If BitAnd(0x0001,$struct.Flags) Then
103 | If $capsprimed Then
104 | HotKeySet('{c}')
105 | HotKeySet('{g}')
106 | HotKeySet('{q}')
107 | EndIf
108 | $capsprimed = False
109 | ElseIf Not $capsprimed Then
110 | HotKeySet('{c}',UnsetSelf)
111 | HotKeySet('{g}',UnsetSelf)
112 | HotKeySet('{q}',UnsetSelf)
113 | $capsprimed = True
114 | EndIf
115 | Case $VK_ESC, $VK_Q
116 | If BitAnd(0x0001,$struct.Flags) Then
117 | If $VK_Q = $struct.VKey And Not ( $sks($VK_CAPS) Or ($sks($VK_LSHIFT) And $sks($VK_RSHIFT)) ) Then Return
118 | For $func in $functionlist
119 | If $func() Then $func('deactivate')
120 | Next
121 | DllCall($user32, "bool", "SetSystemCursor", "handle", CopyIcon($hCursors[0]), "dword", 32512)
122 | TraySetIcon("%windir%\Cursors\aero_link_xl.cur")
123 | TraySetToolTip('TPMouse - Inactive')
124 | EndIf
125 | Case $VK_C, $VK_G
126 | If BitAnd(0x0001,$struct.Flags) Then
127 | If $sks($VK_CAPS) Or ($sks($VK_LSHIFT) And $sks($VK_RSHIFT)) Then
128 | Local $act = ( $VK_C=$struct.VKey ? SingletonInertia : SingletonOverlay ) , _
129 | $ico = ( $VK_C=$struct.VKey ? 'aero_person_xl.cur' : 'aero_pin_xl.cur' ) , _
130 | $cur = ( $VK_C=$struct.VKey ? CopyIcon($hCursors[1]) : CopyIcon($hCursors[2]) ) , _
131 | $tip = ( $VK_C=$struct.VKey ? 'TPMouse - Inertia' : 'TPMouse - Grid')
132 | For $func in $functionlist
133 | If $func() and not ($func=$act) Then $func('deactivate')
134 | Next
135 | $act('activate')
136 | DllCall($user32, "bool", "SetSystemCursor", "handle", $cur, "dword", 32512)
137 | TraySetIcon('%windir%\Cursors\' & $ico)
138 | TraySetToolTip($tip)
139 | EndIf
140 | EndIf
141 | Case $_('up')
142 | If BitAnd(0x0001,$struct.Flags) Then SingletonOverlay('up')
143 | Case $_('left')
144 | If BitAnd(0x0001,$struct.Flags) Then SingletonOverlay('left')
145 | Case $_('down')
146 | If BitAnd(0x0001,$struct.Flags) Then SingletonOverlay('down')
147 | Case $_('right')
148 | If BitAnd(0x0001,$struct.Flags) Then SingletonOverlay('right')
149 | Case $_('mb1')
150 | SingletonMoupress('mb1',Not BitAnd(0x0001,$struct.Flags))
151 | Case $_('mb2')
152 | SingletonMoupress('mb2',Not BitAnd(0x0001,$struct.Flags))
153 | Case $_('mb3')
154 | SingletonMoupress('mb3',Not BitAnd(0x0001,$struct.Flags))
155 | Case $_('brake')
156 | If BitAnd(1,$struct.Flags) Then SingletonInertia('clip',15)
157 | Case $_('scroll')
158 | SingletonInertia('lock',Not BitAnd(0x0001,$struct.Flags))
159 | EndSwitch
160 | EndFunc
161 |
162 | Func SingletonMoupress($msg=null,$arg=null)
163 | Local Static $self = DllStructCreate('bool active;bool mb1;bool mb2;bool mb3;bool mb4;bool mb5')
164 | Switch $msg
165 | Case 'reset'
166 | If $self.mb1 Then ClickMouse(1,False)
167 | If $self.mb2 Then ClickMouse(2,False)
168 | If $self.mb3 Then ClickMouse(3,False)
169 | If $self.mb4 Then ClickMouse(4,False)
170 | If $self.mb5 Then ClickMouse(5,False)
171 | $self.mb1 = False
172 | $self.mb2 = False
173 | $self.mb3 = False
174 | $self.mb4 = False
175 | $self.mb5 = False
176 | Case 'activate'
177 | SingletonMoupress('reset')
178 | EnableHotKeys()
179 | $self.active = True
180 | Case 'deactivate'
181 | $self.active = False
182 | DisableHotKeys()
183 | SingletonMoupress('reset')
184 | Case 'mb1'
185 | If $self.active Then
186 | If Not( $arg = $self.mb1 ) Then ClickMouse(1,$arg)
187 | $self.mb1 = $arg
188 | EndIf
189 | Case 'mb2'
190 | If $self.active Then
191 | If Not( $arg = $self.mb2 ) Then ClickMouse(2,$arg)
192 | $self.mb2 = $arg
193 | EndIf
194 | Case 'mb3'
195 | If $self.active Then
196 | If Not( $arg = $self.mb3 ) Then ClickMouse(3,$arg)
197 | $self.mb3 = $arg
198 | EndIf
199 | Case 'mb4'
200 | If $self.active Then
201 | If Not( $arg = $self.mb4 ) Then ClickMouse(4,$arg)
202 | $self.mb4 = $arg
203 | EndIf
204 | Case 'mb5'
205 | If $self.active Then
206 | If Not( $arg = $self.mb5 ) Then ClickMouse(5,$arg)
207 | $self.mb5 = $arg
208 | EndIf
209 | EndSwitch
210 | Return $self.active
211 | EndFunc
212 |
213 | Func SingletonInertia($msg=null,$arg=null)
214 | Local Static $_=SingletonKeybinds, $sks=SingletonKeyState
215 | Local Static $lastTime = TimerInit()
216 | Local Static $self = DllStructCreate( 'bool active;' & _
217 | 'bool lock;' & _
218 | 'bool up;' & _
219 | 'bool down;' & _
220 | 'bool left;' & _
221 | 'bool right;' & _
222 | 'bool brake;' & _
223 | 'float rx;' & _
224 | 'float ry;' & _
225 | 'float vx;' & _
226 | 'float vy;' & _
227 | 'float a0;' & _
228 | 'float mu;' & _
229 | 'float br;' & _
230 | 'float dm;' & _
231 | 'float ds;' )
232 | Switch $msg
233 | Case 'reset'
234 | $self.up = False
235 | $self.down = False
236 | $self.left = False
237 | $self.right = False
238 | $self.brake = False
239 | $self.lock = False
240 | $self.vx = 0
241 | $self.vy = 0
242 | $self.a0 = 3200*6 ; top speed is 3200 ct/s when damping is 6 and sens is 1
243 | Local $damp = IniRead('options.ini','Inertia','DampingCoef',6)
244 | Local $brak = IniRead('options.ini','Inertia','BrakingCoef',60)
245 | Local $norm = IniRead('options.ini','Inertia','NormalSensitivity',1)
246 | Local $scro = IniRead('options.ini','Inertia','ScrollSensitivity',1)
247 | $self.mu = ( 0 <= $damp ? $damp : 6 )
248 | $self.br = ( 0 <= $brak ? $brak : 60 )
249 | $self.dm = ( 0 < $norm ? $norm : 1 )
250 | $self.ds = ( 0 < $scro ? $scro : 1 )
251 | Case 'activate'
252 | SingletonMoupress('activate')
253 | SingletonInertia('reset')
254 | $self.active = True
255 | $lastTime = TimerInit()
256 | Case 'deactivate'
257 | $self.active = False
258 | SingletonInertia('reset')
259 | SingletonMoupress('deactivate')
260 | Case 'lock'
261 | If $self.active Then
262 | If $self.lock <> $arg Then
263 | $self.lock=$arg
264 | SingletonInertia('clip',15)
265 | EndIf
266 | EndIf
267 | Case 'clip'
268 | If $self.active Then
269 | If BitAnd(1,$arg) Then $self.vx=($self.vx>0?$self.vx:0)
270 | If BitAnd(2,$arg) Then $self.vx=($self.vx<0?$self.vx:0)
271 | If BitAnd(4,$arg) Then $self.vy=($self.vy>0?$self.vy:0)
272 | If BitAnd(8,$arg) Then $self.vy=($self.vy<0?$self.vy:0)
273 | EndIf
274 | Case 'sim'
275 | If $self.active Then
276 | Local $dt = TimerDiff($lastTime)/1000
277 | $lastTime = TimerInit()
278 | Local $ds = ( $self.lock ? $self.ds : $self.dm )
279 | Local $mu = ( $self.brake ? $self.br : $self.mu )
280 | Local $f0 = ( $mu = 0 ? 1 : exp(-$mu*$dt) )
281 | Local $f1 = ( $mu = 0 ? $dt : (1-$f0)/$mu )
282 | Local $f2 = ( $mu = 0 ? $dt^2 : ($dt-$f1)/$mu )
283 | Local $ax = ($self.left?-1:0)+($self.right?1:0), $ay = ($self.up?-1:0)+($self.down?1:0)
284 | Local $a0 = ( $ax*$ax+$ay*$ay ? $self.a0/sqrt($ax*$ax+$ay*$ay) : 0 )
285 | Local $dx = $f2*$a0*$ax + $f1*$self.vx, $dy = $f2*$a0*$ay + $f1*$self.vy
286 | Local $vx = $f1*$a0*$ax + $f0*$self.vx, $vy = $f1*$a0*$ay + $f0*$self.vy
287 | $dx = $dx*$ds + $self.rx
288 | $dy = $dy*$ds + $self.ry
289 | If (Round($dx)<>0 Or Round($dy)<>0) Then ($self.lock ? ScrollMouseXY(Round($dx),Round(-$dy)) : MoveMouseRel(Round($dx),Round($dy)) )
290 | $self.rx = $dx-Round($dx)
291 | $self.ry = $dy-Round($dy)
292 | $self.vx = ( 0=$a0 And 1/$ds>$vx*$vx+$vy*$vy ) ? 0 : $vx
293 | $self.vy = ( 0=$a0 And 1/$ds>$vx*$vx+$vy*$vy ) ? 0 : $vy
294 | $self.up = $sks($_('up'))
295 | $self.left = $sks($_('left'))
296 | $self.down = $sks($_('down'))
297 | $self.right = $sks($_('right'))
298 | $self.brake = $sks($_('brake'))
299 | Local $cur=GetCursorPos()
300 | SingletonInertia('clip', 1*($cur.x=0) + 2*($cur.x=@DesktopWidth-1) + 4*($cur.y=0) + 8*($cur.y=@DesktopHeight-1))
301 | EndIf
302 | Case Else
303 | EndSwitch
304 | Return $self.active
305 | EndFunc
306 |
307 | Func SingletonOverlay($msg=null,$arg=null)
308 | Local Static $hOverlay, $hFrame, $self = DllStructCreate('bool active;uint left;uint right;uint top;uint bottom')
309 | Switch $msg
310 | Case 'init'
311 | $hOverlay = GUICreate("Overlay",@DesktopWidth,@DesktopHeight,0,0,0x80000000,0x02080088)
312 | $hFrame = GUICtrlCreateGraphic(0,0,@DesktopWidth,@DesktopHeight)
313 | GUISetBkColor(0xe1e1e1,$hOverlay) ; sets window color
314 | GUICtrlSetColor($hFrame,0xff0000) ; sets border color
315 | GUICtrlSetBkColor($hFrame,0xe1e1e1) ; sets canvas color
316 | DllCall("user32.dll", "bool", "SetLayeredWindowAttributes", "hwnd", $hOverlay, "INT", 0x00e1e1e1, "byte", 255, "dword", 0x03)
317 | GUISetState(@SW_DISABLE)
318 | Case 'set'
319 | GUICtrlSetPos($hFrame,$self.left,$self.top,$self.right-$self.left,$self.bottom-$self.top)
320 | Case 'reset'
321 | $self.left = 0
322 | $self.top = 0
323 | $self.right = @DesktopWidth
324 | $self.bottom = @DesktopHeight
325 | SingletonOverlay('set')
326 | Case 'activate'
327 | SingletonOverlay('reset')
328 | If Not $self.active Then
329 | $self.active = True
330 | GUISetState(@SW_SHOW,$hOverlay)
331 | SetCursorPos(Int(($self.left+$self.right)/2),Int(($self.top+$self.bottom)/2))
332 | SingletonMoupress('activate')
333 | EndIf
334 | Case 'deactivate'
335 | SingletonOverlay('reset')
336 | If $self.active Then
337 | $self.active = False
338 | SingletonMoupress('deactivate')
339 | GUISetState(@SW_HIDE,$hOverlay)
340 | EndIf
341 | Case 'up'
342 | If $self.active Then
343 | $self.bottom = Int(($self.top+$self.bottom)/2)
344 | SingletonOverlay('set')
345 | SetCursorPos( Int(($self.left+$self.right)/2), Int(($self.top+$self.bottom)/2) )
346 | EndIf
347 | Case 'left'
348 | If $self.active Then
349 | $self.right = Int(($self.left+$self.right)/2)
350 | SingletonOverlay('set')
351 | SetCursorPos( Int(($self.left+$self.right)/2), Int(($self.top+$self.bottom)/2) )
352 | EndIf
353 | Case 'down'
354 | If $self.active Then
355 | $self.top = Int(($self.top+$self.bottom)/2)
356 | SingletonOverlay('set')
357 | SetCursorPos( Int(($self.left+$self.right)/2), Int(($self.top+$self.bottom)/2) )
358 | EndIf
359 | Case 'right'
360 | If $self.active Then
361 | $self.left = Int(($self.left+$self.right)/2)
362 | SingletonOverlay('set')
363 | SetCursorPos(Int(($self.left+$self.right)/2), Int(($self.top+$self.bottom)/2))
364 | EndIf
365 | Case Else
366 | EndSwitch
367 | Return $self.active
368 | EndFunc
369 |
370 | Func SingletonKeyState($vKey=Null, $make=Null, $flag=Null)
371 | Local Static $self[256] ; vkey range from 0 to 255
372 | Local $change = Not ( ($flag=Null) or ($make=Null) )
373 | Local $after = Not BitAnd(1,$flag)
374 | Switch $vKey
375 | Case $VK_SHIFT
376 | If $change Then $self[ ( $make = 0x36 ? $VK_RSHIFT : $VK_LSHIFT )] = $after ; (vkey,e0,mk) of lshift is (0xA0,0x00,0x2A), of rshift is (0xA1,0x00,0x36)
377 | Return ( $self[$VK_LSHIFT] or $self[$VK_RSHIFT] )
378 | Case $VK_CTRL
379 | If $change Then $self[ ( BitAnd(2,$flag) ? $VK_RCTRL : $VK_LCTRL) ] = $after ; (vkey,e0,mk) of lctrl is (0xA2,0x00,0x1D), of rctrl is (0xA3,0xE0,0x1D)
380 | Return ( $self[$VK_LCTRL] or $self[$VK_RCTRL] )
381 | Case $VK_ALT
382 | If $change Then $self[ ( BitAnd(2,$flag) ? $VK_RALT : $VK_LALT) ] = $after ; (vkey,e0,mk) of lalt is (0xA4,0x00,0x38), of ralt is (0xA5,0xE0,0x38)
383 | Return ( $self[$VK_LALT] or $self[$VK_RALT] )
384 | Case $VK_NONE, $VK_CANCEL, $VK_PRTSCN ; keys that don't deactivate normally
385 | Return False
386 | Case Else
387 | If $vKey Then
388 | If $change Then $self[$vKey]=$after
389 | Return $self[$vKey]
390 | ElseIf $vKey=Null Then
391 | $self = []
392 | ReDim $self[256]
393 | Return False
394 | EndIf
395 | EndSwitch
396 | EndFunc
397 |
398 | Func WM_INPUT($hWnd, $iMsg, $wParam, $lParam)
399 | ; only registered for keyboard so no need to check header for device type
400 | Local Static $tagHeader = 'dword dwType;dword dwSize;handle hDevice;wparam wParam;'
401 | Local Static $tag = $tagHeader & 'ushort MakeCode;ushort Flags;ushort Reserved;ushort VKey;uint Message;ulong ExtraInformation'
402 | Local Static $sizeHeader = DllStructGetSize(DllStructCreate($tagHeader)), $size = DllStructGetSize(DllStructCreate($tag))
403 | Local $struct = DllStructCreate($tag)
404 | DllCall($user32, 'uint', 'GetRawInputData', 'handle', $lParam, 'uint', 0x10000003, 'struct*', $struct, 'uint*', $size, 'uint', $sizeHeader)
405 | ProcessKeypress($struct)
406 | If $wParam Then Return 0
407 | EndFunc
408 |
409 | Func ClickMouse($button, $state)
410 | Local $struct = DllStructCreate("dword type;struct;long dx;long dy;dword mouseData;dword dwFlags;dword time;ulong_ptr dwExtraInfo;endstruct;")
411 | Switch $button
412 | Case 1
413 | $struct.dwFlags=($state?0x0002:0x0004)
414 | Case 2
415 | $struct.dwFlags=($state?0x0008:0x0010)
416 | Case 3
417 | $struct.dwFlags=($state?0x0020:0x0040)
418 | Case 4
419 | $struct.dwFlags=($state?0x0080:0x0100)
420 | $struct.mouseData=1
421 | Case 5
422 | $struct.dwFlags=($state?0x0080:0x0100)
423 | $struct.mouseData=2
424 | Case Else
425 | Return
426 | EndSwitch
427 | $struct.type=0
428 | DllCall($user32,"uint","SendInput","uint",1,"struct*",$struct,"int",DllStructGetSize($struct))
429 | EndFunc
430 |
431 | Func MoveMouseRel($dx,$dy)
432 | Local $struct = DllStructCreate("dword type;struct;long dx;long dy;dword mouseData;dword dwFlags;dword time;ulong_ptr dwExtraInfo;endstruct;")
433 | $struct.dwFlags=0x0001
434 | $struct.dx=$dx
435 | $struct.dy=$dy
436 | $struct.type=0
437 | DllCall($user32,"uint","SendInput","uint",1,"struct*",$struct,"int",DllStructGetSize($struct))
438 | EndFunc
439 |
440 | Func ScrollMouseXY($dx,$dy)
441 | Local Static $SIZE = DllStructGetSize(DllStructCreate('dword;struct;long;long;dword;dword;dword;ulong_ptr;endstruct;'))
442 | Local $count = ($dx?1:0)+($dy?1:0)
443 | Local $struct, $arr = DllStructCreate('byte[' & $count*$SIZE & ']'), $ptr = DllStructGetPtr($arr)
444 | If $dy Then
445 | $struct = DllStructCreate('dword type;struct;long;long;dword data;dword flag;dword;ulong_ptr;endstruct;', $ptr)
446 | DllStructSetData($struct,'type',0)
447 | DllStructSetData($struct,'flag',0x0800)
448 | DllStructSetData($struct,'data',$dy)
449 | EndIf
450 | If $dx Then
451 | $struct = DllStructCreate('dword type;struct;long;long;dword data;dword flag;dword;ulong_ptr;endstruct;', $ptr+($dy?$SIZE:0))
452 | DllStructSetData($struct,'type',0)
453 | DllStructSetData($struct,'flag',0x1000)
454 | DllStructSetData($struct,'data',$dx)
455 | EndIf
456 | Local $aCall = DllCall( $user32, 'uint', 'SendInput', 'uint', $count, 'struct*', $ptr, 'int', $SIZE )
457 | Return $aCall[0]
458 | EndFunc
459 |
460 | Func GetSystemCursor($name)
461 | Local $id
462 | Switch $name
463 | Case "ARROW", "NORMAL"
464 | $id=32512
465 | Case "IBEAM"
466 | $id=32513
467 | Case "WAIT"
468 | $id=32514
469 | Case "CROSS"
470 | $id=32515
471 | Case "UPARROW"
472 | $id=32516
473 | Case "SIZE" ; doesn't seem to work
474 | $id=32640
475 | Case "ICON" ; doesn't seem to work
476 | $id=32641
477 | Case "SIZENWSE"
478 | $id=32642
479 | Case "SIZENESW"
480 | $id=32643
481 | Case "SIZEWE"
482 | $id=32644
483 | Case "SIZENS"
484 | $id=32645
485 | Case "SIZEALL"
486 | $id=32646
487 | Case "NO"
488 | $id=32648
489 | Case "HAND"
490 | $id=32649
491 | Case "APPSTARTING"
492 | $id=32650
493 | Case "HELP"
494 | $id=32651
495 | Case Else
496 | Return Null
497 | EndSwitch
498 | Local $aCall = DllCall($user32,"handle","LoadCursor","handle",Null,"int",$id)
499 | Return $aCall[0]
500 | EndFunc
501 |
502 | Func CopyIcon($handle)
503 | Local $aCall = DllCall($user32,"handle","CopyIcon","handle",$handle)
504 | Return $aCall[0]
505 | EndFunc
506 |
507 | Func GetCursorPos()
508 | Local $struct = DllStructCreate("long x;long y")
509 | DllCall($user32,"bool","GetCursorPos","struct*",$struct)
510 | Return $struct
511 | EndFunc
512 |
513 | Func SetCursorPos($x,$y)
514 | DllCall($user32,"bool","SetCursorPos","int",$x,"int",$y)
515 | EndFunc
516 |
517 | Func UnsetSelf()
518 | HotKeySet(@HotKeyPressed)
519 | EndFunc
520 |
521 |
522 | #Region keybinds
523 |
524 |
525 | Func SingletonKeybinds($action, $mode=0)
526 | ; mode 0 returns vkey, mode 1 returns hotkey
527 | Local Static _
528 | $up = [ $VK_I , '{i}' ] , _
529 | $left = [ $VK_J , '{j}' ] , _
530 | $down = [ $VK_K , '{k}' ] , _
531 | $right = [ $VK_L , '{l}' ] , _
532 | $mb1 = [ $VK_F , '{f}' ] , _
533 | $mb2 = [ $VK_E , '{e}' ] , _
534 | $mb3 = [ $VK_R , '{r}' ] , _
535 | $brake = [ $VK_S , '{s}' ] , _
536 | $scroll = [ $VK_SPACE , '{space}' ]
537 | Local Static $map = InitializeKeybinds($up,$left,$down,$right,$mb1,$mb2,$mb3,$brake,$scroll)
538 | Local $i = $mode ? 1 : 0
539 | Switch $action
540 | Case 'up'
541 | Return $up[$i]
542 | Case 'left'
543 | Return $left[$i]
544 | Case 'down'
545 | Return $down[$i]
546 | Case 'right'
547 | Return $right[$i]
548 | Case 'mb1'
549 | Return $mb1[$i]
550 | Case 'mb2'
551 | Return $mb2[$i]
552 | Case 'mb3'
553 | Return $mb3[$i]
554 | Case 'brake'
555 | Return $brake[$i]
556 | Case 'scroll'
557 | Return $scroll[$i]
558 | Case 'reload'
559 | $map = InitializeKeybinds($up,$left,$down,$right,$mb1,$mb2,$mb3,$brake,$scroll)
560 | EndSwitch
561 | EndFunc
562 | Func EnableHotKeys()
563 | Local Static $_ = SingletonKeybinds, $arr = ['up','left','down','right','mb1','mb2','mb3','brake','scroll']
564 | For $cmd in $arr
565 | HotKeySet( $_($cmd,1) , TranslateHotKeys )
566 | Next
567 | EndFunc
568 | Func DisableHotKeys()
569 | Local Static $_ = SingletonKeybinds, $arr = ['up','left','down','right','mb1','mb2','mb3','brake','scroll']
570 | For $cmd in $arr
571 | HotKeySet( $_($cmd,1) )
572 | Next
573 | EndFunc
574 | Func TranslateHotKeys()
575 | Local Static $struct = DllStructCreate('ushort MakeCode;ushort Flags;ushort VKey;')
576 | Local $vk = $HOTKEY_STR_MAP[@HotKeyPressed]
577 | If 0<$vk and $vk<255 Then
578 | $struct.VKey = $vk
579 | ProcessKeypress($struct)
580 | EndIf
581 | EndFunc
582 | Func InitializeKeybinds(ByRef $up,ByRef $left,ByRef $down,ByRef $right,ByRef $mb1,ByRef $mb2,ByRef $mb3,ByRef $brake,ByRef $scroll)
583 | Local $upKey = IniRead('options.ini','Bindings','up' , 'VK_I')
584 | Local $leftKey = IniRead('options.ini','Bindings','left' , 'VK_J')
585 | Local $downKey = IniRead('options.ini','Bindings','down' , 'VK_K')
586 | Local $rightKey = IniRead('options.ini','Bindings','right' , 'VK_L')
587 | Local $mb1Key = IniRead('options.ini','Bindings','mb1' , 'VK_F')
588 | Local $mb2Key = IniRead('options.ini','Bindings','mb2' , 'VK_E')
589 | Local $mb3Key = IniRead('options.ini','Bindings','mb3' , 'VK_R')
590 | Local $brakeKey = IniRead('options.ini','Bindings','brake' , 'VK_S')
591 | Local $scrollKey = IniRead('options.ini','Bindings','scroll', 'VK_SPACE')
592 | $up[0] = Eval($upKey)
593 | $left[0] = Eval($leftKey)
594 | $down[0] = Eval($downKey)
595 | $right[0] = Eval($rightKey)
596 | $mb1[0] = Eval($mb1Key)
597 | $mb2[0] = Eval($mb2Key)
598 | $mb3[0] = Eval($mb3Key)
599 | $brake[0] = Eval($brakeKey)
600 | $scroll[0] = Eval($scrollKey)
601 | $up[1] = '{' & StringLower(StringReplace($upKey,'VK_','')) & '}'
602 | $left[1] = '{' & StringLower(StringReplace($leftKey,'VK_','')) & '}'
603 | $down[1] = '{' & StringLower(StringReplace($downKey,'VK_','')) & '}'
604 | $right[1] = '{' & StringLower(StringReplace($rightKey,'VK_','')) & '}'
605 | $mb1[1] = '{' & StringLower(StringReplace($mb1Key,'VK_','')) & '}'
606 | $mb2[1] = '{' & StringLower(StringReplace($mb2Key,'VK_','')) & '}'
607 | $mb3[1] = '{' & StringLower(StringReplace($mb3Key,'VK_','')) & '}'
608 | $brake[1] = '{' & StringLower(StringReplace($brakeKey,'VK_','')) & '}'
609 | $scroll[1] = '{' & StringLower(StringReplace($scrollKey,'VK_','')) & '}'
610 | Local $map[]
611 | $map[$up[1]]=$up[0]
612 | $map[$left[1]]=$left[0]
613 | $map[$down[1]]=$down[0]
614 | $map[$right[1]]=$right[0]
615 | $map[$mb1[1]]=$mb1[0]
616 | $map[$mb2[1]]=$mb2[0]
617 | $map[$mb3[1]]=$mb3[0]
618 | $map[$brake[1]]=$brake[0]
619 | $map[$scroll[1]]=$scroll[0]
620 | $HOTKEY_STR_MAP = $map
621 | Return $map
622 | EndFunc
623 |
624 | #EndRegion
--------------------------------------------------------------------------------
/LICENSE:
--------------------------------------------------------------------------------
1 | GNU GENERAL PUBLIC LICENSE
2 | Version 3, 29 June 2007
3 |
4 | Copyright (C) 2007 Free Software Foundation, Inc.
5 | Everyone is permitted to copy and distribute verbatim copies
6 | of this license document, but changing it is not allowed.
7 |
8 | Preamble
9 |
10 | The GNU General Public License is a free, copyleft license for
11 | software and other kinds of works.
12 |
13 | The licenses for most software and other practical works are designed
14 | to take away your freedom to share and change the works. By contrast,
15 | the GNU General Public License is intended to guarantee your freedom to
16 | share and change all versions of a program--to make sure it remains free
17 | software for all its users. We, the Free Software Foundation, use the
18 | GNU General Public License for most of our software; it applies also to
19 | any other work released this way by its authors. You can apply it to
20 | your programs, too.
21 |
22 | When we speak of free software, we are referring to freedom, not
23 | price. Our General Public Licenses are designed to make sure that you
24 | have the freedom to distribute copies of free software (and charge for
25 | them if you wish), that you receive source code or can get it if you
26 | want it, that you can change the software or use pieces of it in new
27 | free programs, and that you know you can do these things.
28 |
29 | To protect your rights, we need to prevent others from denying you
30 | these rights or asking you to surrender the rights. Therefore, you have
31 | certain responsibilities if you distribute copies of the software, or if
32 | you modify it: responsibilities to respect the freedom of others.
33 |
34 | For example, if you distribute copies of such a program, whether
35 | gratis or for a fee, you must pass on to the recipients the same
36 | freedoms that you received. You must make sure that they, too, receive
37 | or can get the source code. And you must show them these terms so they
38 | know their rights.
39 |
40 | Developers that use the GNU GPL protect your rights with two steps:
41 | (1) assert copyright on the software, and (2) offer you this License
42 | giving you legal permission to copy, distribute and/or modify it.
43 |
44 | For the developers' and authors' protection, the GPL clearly explains
45 | that there is no warranty for this free software. For both users' and
46 | authors' sake, the GPL requires that modified versions be marked as
47 | changed, so that their problems will not be attributed erroneously to
48 | authors of previous versions.
49 |
50 | Some devices are designed to deny users access to install or run
51 | modified versions of the software inside them, although the manufacturer
52 | can do so. This is fundamentally incompatible with the aim of
53 | protecting users' freedom to change the software. The systematic
54 | pattern of such abuse occurs in the area of products for individuals to
55 | use, which is precisely where it is most unacceptable. Therefore, we
56 | have designed this version of the GPL to prohibit the practice for those
57 | products. If such problems arise substantially in other domains, we
58 | stand ready to extend this provision to those domains in future versions
59 | of the GPL, as needed to protect the freedom of users.
60 |
61 | Finally, every program is threatened constantly by software patents.
62 | States should not allow patents to restrict development and use of
63 | software on general-purpose computers, but in those that do, we wish to
64 | avoid the special danger that patents applied to a free program could
65 | make it effectively proprietary. To prevent this, the GPL assures that
66 | patents cannot be used to render the program non-free.
67 |
68 | The precise terms and conditions for copying, distribution and
69 | modification follow.
70 |
71 | TERMS AND CONDITIONS
72 |
73 | 0. Definitions.
74 |
75 | "This License" refers to version 3 of the GNU General Public License.
76 |
77 | "Copyright" also means copyright-like laws that apply to other kinds of
78 | works, such as semiconductor masks.
79 |
80 | "The Program" refers to any copyrightable work licensed under this
81 | License. Each licensee is addressed as "you". "Licensees" and
82 | "recipients" may be individuals or organizations.
83 |
84 | To "modify" a work means to copy from or adapt all or part of the work
85 | in a fashion requiring copyright permission, other than the making of an
86 | exact copy. The resulting work is called a "modified version" of the
87 | earlier work or a work "based on" the earlier work.
88 |
89 | A "covered work" means either the unmodified Program or a work based
90 | on the Program.
91 |
92 | To "propagate" a work means to do anything with it that, without
93 | permission, would make you directly or secondarily liable for
94 | infringement under applicable copyright law, except executing it on a
95 | computer or modifying a private copy. Propagation includes copying,
96 | distribution (with or without modification), making available to the
97 | public, and in some countries other activities as well.
98 |
99 | To "convey" a work means any kind of propagation that enables other
100 | parties to make or receive copies. Mere interaction with a user through
101 | a computer network, with no transfer of a copy, is not conveying.
102 |
103 | An interactive user interface displays "Appropriate Legal Notices"
104 | to the extent that it includes a convenient and prominently visible
105 | feature that (1) displays an appropriate copyright notice, and (2)
106 | tells the user that there is no warranty for the work (except to the
107 | extent that warranties are provided), that licensees may convey the
108 | work under this License, and how to view a copy of this License. If
109 | the interface presents a list of user commands or options, such as a
110 | menu, a prominent item in the list meets this criterion.
111 |
112 | 1. Source Code.
113 |
114 | The "source code" for a work means the preferred form of the work
115 | for making modifications to it. "Object code" means any non-source
116 | form of a work.
117 |
118 | A "Standard Interface" means an interface that either is an official
119 | standard defined by a recognized standards body, or, in the case of
120 | interfaces specified for a particular programming language, one that
121 | is widely used among developers working in that language.
122 |
123 | The "System Libraries" of an executable work include anything, other
124 | than the work as a whole, that (a) is included in the normal form of
125 | packaging a Major Component, but which is not part of that Major
126 | Component, and (b) serves only to enable use of the work with that
127 | Major Component, or to implement a Standard Interface for which an
128 | implementation is available to the public in source code form. A
129 | "Major Component", in this context, means a major essential component
130 | (kernel, window system, and so on) of the specific operating system
131 | (if any) on which the executable work runs, or a compiler used to
132 | produce the work, or an object code interpreter used to run it.
133 |
134 | The "Corresponding Source" for a work in object code form means all
135 | the source code needed to generate, install, and (for an executable
136 | work) run the object code and to modify the work, including scripts to
137 | control those activities. However, it does not include the work's
138 | System Libraries, or general-purpose tools or generally available free
139 | programs which are used unmodified in performing those activities but
140 | which are not part of the work. For example, Corresponding Source
141 | includes interface definition files associated with source files for
142 | the work, and the source code for shared libraries and dynamically
143 | linked subprograms that the work is specifically designed to require,
144 | such as by intimate data communication or control flow between those
145 | subprograms and other parts of the work.
146 |
147 | The Corresponding Source need not include anything that users
148 | can regenerate automatically from other parts of the Corresponding
149 | Source.
150 |
151 | The Corresponding Source for a work in source code form is that
152 | same work.
153 |
154 | 2. Basic Permissions.
155 |
156 | All rights granted under this License are granted for the term of
157 | copyright on the Program, and are irrevocable provided the stated
158 | conditions are met. This License explicitly affirms your unlimited
159 | permission to run the unmodified Program. The output from running a
160 | covered work is covered by this License only if the output, given its
161 | content, constitutes a covered work. This License acknowledges your
162 | rights of fair use or other equivalent, as provided by copyright law.
163 |
164 | You may make, run and propagate covered works that you do not
165 | convey, without conditions so long as your license otherwise remains
166 | in force. You may convey covered works to others for the sole purpose
167 | of having them make modifications exclusively for you, or provide you
168 | with facilities for running those works, provided that you comply with
169 | the terms of this License in conveying all material for which you do
170 | not control copyright. Those thus making or running the covered works
171 | for you must do so exclusively on your behalf, under your direction
172 | and control, on terms that prohibit them from making any copies of
173 | your copyrighted material outside their relationship with you.
174 |
175 | Conveying under any other circumstances is permitted solely under
176 | the conditions stated below. Sublicensing is not allowed; section 10
177 | makes it unnecessary.
178 |
179 | 3. Protecting Users' Legal Rights From Anti-Circumvention Law.
180 |
181 | No covered work shall be deemed part of an effective technological
182 | measure under any applicable law fulfilling obligations under article
183 | 11 of the WIPO copyright treaty adopted on 20 December 1996, or
184 | similar laws prohibiting or restricting circumvention of such
185 | measures.
186 |
187 | When you convey a covered work, you waive any legal power to forbid
188 | circumvention of technological measures to the extent such circumvention
189 | is effected by exercising rights under this License with respect to
190 | the covered work, and you disclaim any intention to limit operation or
191 | modification of the work as a means of enforcing, against the work's
192 | users, your or third parties' legal rights to forbid circumvention of
193 | technological measures.
194 |
195 | 4. Conveying Verbatim Copies.
196 |
197 | You may convey verbatim copies of the Program's source code as you
198 | receive it, in any medium, provided that you conspicuously and
199 | appropriately publish on each copy an appropriate copyright notice;
200 | keep intact all notices stating that this License and any
201 | non-permissive terms added in accord with section 7 apply to the code;
202 | keep intact all notices of the absence of any warranty; and give all
203 | recipients a copy of this License along with the Program.
204 |
205 | You may charge any price or no price for each copy that you convey,
206 | and you may offer support or warranty protection for a fee.
207 |
208 | 5. Conveying Modified Source Versions.
209 |
210 | You may convey a work based on the Program, or the modifications to
211 | produce it from the Program, in the form of source code under the
212 | terms of section 4, provided that you also meet all of these conditions:
213 |
214 | a) The work must carry prominent notices stating that you modified
215 | it, and giving a relevant date.
216 |
217 | b) The work must carry prominent notices stating that it is
218 | released under this License and any conditions added under section
219 | 7. This requirement modifies the requirement in section 4 to
220 | "keep intact all notices".
221 |
222 | c) You must license the entire work, as a whole, under this
223 | License to anyone who comes into possession of a copy. This
224 | License will therefore apply, along with any applicable section 7
225 | additional terms, to the whole of the work, and all its parts,
226 | regardless of how they are packaged. This License gives no
227 | permission to license the work in any other way, but it does not
228 | invalidate such permission if you have separately received it.
229 |
230 | d) If the work has interactive user interfaces, each must display
231 | Appropriate Legal Notices; however, if the Program has interactive
232 | interfaces that do not display Appropriate Legal Notices, your
233 | work need not make them do so.
234 |
235 | A compilation of a covered work with other separate and independent
236 | works, which are not by their nature extensions of the covered work,
237 | and which are not combined with it such as to form a larger program,
238 | in or on a volume of a storage or distribution medium, is called an
239 | "aggregate" if the compilation and its resulting copyright are not
240 | used to limit the access or legal rights of the compilation's users
241 | beyond what the individual works permit. Inclusion of a covered work
242 | in an aggregate does not cause this License to apply to the other
243 | parts of the aggregate.
244 |
245 | 6. Conveying Non-Source Forms.
246 |
247 | You may convey a covered work in object code form under the terms
248 | of sections 4 and 5, provided that you also convey the
249 | machine-readable Corresponding Source under the terms of this License,
250 | in one of these ways:
251 |
252 | a) Convey the object code in, or embodied in, a physical product
253 | (including a physical distribution medium), accompanied by the
254 | Corresponding Source fixed on a durable physical medium
255 | customarily used for software interchange.
256 |
257 | b) Convey the object code in, or embodied in, a physical product
258 | (including a physical distribution medium), accompanied by a
259 | written offer, valid for at least three years and valid for as
260 | long as you offer spare parts or customer support for that product
261 | model, to give anyone who possesses the object code either (1) a
262 | copy of the Corresponding Source for all the software in the
263 | product that is covered by this License, on a durable physical
264 | medium customarily used for software interchange, for a price no
265 | more than your reasonable cost of physically performing this
266 | conveying of source, or (2) access to copy the
267 | Corresponding Source from a network server at no charge.
268 |
269 | c) Convey individual copies of the object code with a copy of the
270 | written offer to provide the Corresponding Source. This
271 | alternative is allowed only occasionally and noncommercially, and
272 | only if you received the object code with such an offer, in accord
273 | with subsection 6b.
274 |
275 | d) Convey the object code by offering access from a designated
276 | place (gratis or for a charge), and offer equivalent access to the
277 | Corresponding Source in the same way through the same place at no
278 | further charge. You need not require recipients to copy the
279 | Corresponding Source along with the object code. If the place to
280 | copy the object code is a network server, the Corresponding Source
281 | may be on a different server (operated by you or a third party)
282 | that supports equivalent copying facilities, provided you maintain
283 | clear directions next to the object code saying where to find the
284 | Corresponding Source. Regardless of what server hosts the
285 | Corresponding Source, you remain obligated to ensure that it is
286 | available for as long as needed to satisfy these requirements.
287 |
288 | e) Convey the object code using peer-to-peer transmission, provided
289 | you inform other peers where the object code and Corresponding
290 | Source of the work are being offered to the general public at no
291 | charge under subsection 6d.
292 |
293 | A separable portion of the object code, whose source code is excluded
294 | from the Corresponding Source as a System Library, need not be
295 | included in conveying the object code work.
296 |
297 | A "User Product" is either (1) a "consumer product", which means any
298 | tangible personal property which is normally used for personal, family,
299 | or household purposes, or (2) anything designed or sold for incorporation
300 | into a dwelling. In determining whether a product is a consumer product,
301 | doubtful cases shall be resolved in favor of coverage. For a particular
302 | product received by a particular user, "normally used" refers to a
303 | typical or common use of that class of product, regardless of the status
304 | of the particular user or of the way in which the particular user
305 | actually uses, or expects or is expected to use, the product. A product
306 | is a consumer product regardless of whether the product has substantial
307 | commercial, industrial or non-consumer uses, unless such uses represent
308 | the only significant mode of use of the product.
309 |
310 | "Installation Information" for a User Product means any methods,
311 | procedures, authorization keys, or other information required to install
312 | and execute modified versions of a covered work in that User Product from
313 | a modified version of its Corresponding Source. The information must
314 | suffice to ensure that the continued functioning of the modified object
315 | code is in no case prevented or interfered with solely because
316 | modification has been made.
317 |
318 | If you convey an object code work under this section in, or with, or
319 | specifically for use in, a User Product, and the conveying occurs as
320 | part of a transaction in which the right of possession and use of the
321 | User Product is transferred to the recipient in perpetuity or for a
322 | fixed term (regardless of how the transaction is characterized), the
323 | Corresponding Source conveyed under this section must be accompanied
324 | by the Installation Information. But this requirement does not apply
325 | if neither you nor any third party retains the ability to install
326 | modified object code on the User Product (for example, the work has
327 | been installed in ROM).
328 |
329 | The requirement to provide Installation Information does not include a
330 | requirement to continue to provide support service, warranty, or updates
331 | for a work that has been modified or installed by the recipient, or for
332 | the User Product in which it has been modified or installed. Access to a
333 | network may be denied when the modification itself materially and
334 | adversely affects the operation of the network or violates the rules and
335 | protocols for communication across the network.
336 |
337 | Corresponding Source conveyed, and Installation Information provided,
338 | in accord with this section must be in a format that is publicly
339 | documented (and with an implementation available to the public in
340 | source code form), and must require no special password or key for
341 | unpacking, reading or copying.
342 |
343 | 7. Additional Terms.
344 |
345 | "Additional permissions" are terms that supplement the terms of this
346 | License by making exceptions from one or more of its conditions.
347 | Additional permissions that are applicable to the entire Program shall
348 | be treated as though they were included in this License, to the extent
349 | that they are valid under applicable law. If additional permissions
350 | apply only to part of the Program, that part may be used separately
351 | under those permissions, but the entire Program remains governed by
352 | this License without regard to the additional permissions.
353 |
354 | When you convey a copy of a covered work, you may at your option
355 | remove any additional permissions from that copy, or from any part of
356 | it. (Additional permissions may be written to require their own
357 | removal in certain cases when you modify the work.) You may place
358 | additional permissions on material, added by you to a covered work,
359 | for which you have or can give appropriate copyright permission.
360 |
361 | Notwithstanding any other provision of this License, for material you
362 | add to a covered work, you may (if authorized by the copyright holders of
363 | that material) supplement the terms of this License with terms:
364 |
365 | a) Disclaiming warranty or limiting liability differently from the
366 | terms of sections 15 and 16 of this License; or
367 |
368 | b) Requiring preservation of specified reasonable legal notices or
369 | author attributions in that material or in the Appropriate Legal
370 | Notices displayed by works containing it; or
371 |
372 | c) Prohibiting misrepresentation of the origin of that material, or
373 | requiring that modified versions of such material be marked in
374 | reasonable ways as different from the original version; or
375 |
376 | d) Limiting the use for publicity purposes of names of licensors or
377 | authors of the material; or
378 |
379 | e) Declining to grant rights under trademark law for use of some
380 | trade names, trademarks, or service marks; or
381 |
382 | f) Requiring indemnification of licensors and authors of that
383 | material by anyone who conveys the material (or modified versions of
384 | it) with contractual assumptions of liability to the recipient, for
385 | any liability that these contractual assumptions directly impose on
386 | those licensors and authors.
387 |
388 | All other non-permissive additional terms are considered "further
389 | restrictions" within the meaning of section 10. If the Program as you
390 | received it, or any part of it, contains a notice stating that it is
391 | governed by this License along with a term that is a further
392 | restriction, you may remove that term. If a license document contains
393 | a further restriction but permits relicensing or conveying under this
394 | License, you may add to a covered work material governed by the terms
395 | of that license document, provided that the further restriction does
396 | not survive such relicensing or conveying.
397 |
398 | If you add terms to a covered work in accord with this section, you
399 | must place, in the relevant source files, a statement of the
400 | additional terms that apply to those files, or a notice indicating
401 | where to find the applicable terms.
402 |
403 | Additional terms, permissive or non-permissive, may be stated in the
404 | form of a separately written license, or stated as exceptions;
405 | the above requirements apply either way.
406 |
407 | 8. Termination.
408 |
409 | You may not propagate or modify a covered work except as expressly
410 | provided under this License. Any attempt otherwise to propagate or
411 | modify it is void, and will automatically terminate your rights under
412 | this License (including any patent licenses granted under the third
413 | paragraph of section 11).
414 |
415 | However, if you cease all violation of this License, then your
416 | license from a particular copyright holder is reinstated (a)
417 | provisionally, unless and until the copyright holder explicitly and
418 | finally terminates your license, and (b) permanently, if the copyright
419 | holder fails to notify you of the violation by some reasonable means
420 | prior to 60 days after the cessation.
421 |
422 | Moreover, your license from a particular copyright holder is
423 | reinstated permanently if the copyright holder notifies you of the
424 | violation by some reasonable means, this is the first time you have
425 | received notice of violation of this License (for any work) from that
426 | copyright holder, and you cure the violation prior to 30 days after
427 | your receipt of the notice.
428 |
429 | Termination of your rights under this section does not terminate the
430 | licenses of parties who have received copies or rights from you under
431 | this License. If your rights have been terminated and not permanently
432 | reinstated, you do not qualify to receive new licenses for the same
433 | material under section 10.
434 |
435 | 9. Acceptance Not Required for Having Copies.
436 |
437 | You are not required to accept this License in order to receive or
438 | run a copy of the Program. Ancillary propagation of a covered work
439 | occurring solely as a consequence of using peer-to-peer transmission
440 | to receive a copy likewise does not require acceptance. However,
441 | nothing other than this License grants you permission to propagate or
442 | modify any covered work. These actions infringe copyright if you do
443 | not accept this License. Therefore, by modifying or propagating a
444 | covered work, you indicate your acceptance of this License to do so.
445 |
446 | 10. Automatic Licensing of Downstream Recipients.
447 |
448 | Each time you convey a covered work, the recipient automatically
449 | receives a license from the original licensors, to run, modify and
450 | propagate that work, subject to this License. You are not responsible
451 | for enforcing compliance by third parties with this License.
452 |
453 | An "entity transaction" is a transaction transferring control of an
454 | organization, or substantially all assets of one, or subdividing an
455 | organization, or merging organizations. If propagation of a covered
456 | work results from an entity transaction, each party to that
457 | transaction who receives a copy of the work also receives whatever
458 | licenses to the work the party's predecessor in interest had or could
459 | give under the previous paragraph, plus a right to possession of the
460 | Corresponding Source of the work from the predecessor in interest, if
461 | the predecessor has it or can get it with reasonable efforts.
462 |
463 | You may not impose any further restrictions on the exercise of the
464 | rights granted or affirmed under this License. For example, you may
465 | not impose a license fee, royalty, or other charge for exercise of
466 | rights granted under this License, and you may not initiate litigation
467 | (including a cross-claim or counterclaim in a lawsuit) alleging that
468 | any patent claim is infringed by making, using, selling, offering for
469 | sale, or importing the Program or any portion of it.
470 |
471 | 11. Patents.
472 |
473 | A "contributor" is a copyright holder who authorizes use under this
474 | License of the Program or a work on which the Program is based. The
475 | work thus licensed is called the contributor's "contributor version".
476 |
477 | A contributor's "essential patent claims" are all patent claims
478 | owned or controlled by the contributor, whether already acquired or
479 | hereafter acquired, that would be infringed by some manner, permitted
480 | by this License, of making, using, or selling its contributor version,
481 | but do not include claims that would be infringed only as a
482 | consequence of further modification of the contributor version. For
483 | purposes of this definition, "control" includes the right to grant
484 | patent sublicenses in a manner consistent with the requirements of
485 | this License.
486 |
487 | Each contributor grants you a non-exclusive, worldwide, royalty-free
488 | patent license under the contributor's essential patent claims, to
489 | make, use, sell, offer for sale, import and otherwise run, modify and
490 | propagate the contents of its contributor version.
491 |
492 | In the following three paragraphs, a "patent license" is any express
493 | agreement or commitment, however denominated, not to enforce a patent
494 | (such as an express permission to practice a patent or covenant not to
495 | sue for patent infringement). To "grant" such a patent license to a
496 | party means to make such an agreement or commitment not to enforce a
497 | patent against the party.
498 |
499 | If you convey a covered work, knowingly relying on a patent license,
500 | and the Corresponding Source of the work is not available for anyone
501 | to copy, free of charge and under the terms of this License, through a
502 | publicly available network server or other readily accessible means,
503 | then you must either (1) cause the Corresponding Source to be so
504 | available, or (2) arrange to deprive yourself of the benefit of the
505 | patent license for this particular work, or (3) arrange, in a manner
506 | consistent with the requirements of this License, to extend the patent
507 | license to downstream recipients. "Knowingly relying" means you have
508 | actual knowledge that, but for the patent license, your conveying the
509 | covered work in a country, or your recipient's use of the covered work
510 | in a country, would infringe one or more identifiable patents in that
511 | country that you have reason to believe are valid.
512 |
513 | If, pursuant to or in connection with a single transaction or
514 | arrangement, you convey, or propagate by procuring conveyance of, a
515 | covered work, and grant a patent license to some of the parties
516 | receiving the covered work authorizing them to use, propagate, modify
517 | or convey a specific copy of the covered work, then the patent license
518 | you grant is automatically extended to all recipients of the covered
519 | work and works based on it.
520 |
521 | A patent license is "discriminatory" if it does not include within
522 | the scope of its coverage, prohibits the exercise of, or is
523 | conditioned on the non-exercise of one or more of the rights that are
524 | specifically granted under this License. You may not convey a covered
525 | work if you are a party to an arrangement with a third party that is
526 | in the business of distributing software, under which you make payment
527 | to the third party based on the extent of your activity of conveying
528 | the work, and under which the third party grants, to any of the
529 | parties who would receive the covered work from you, a discriminatory
530 | patent license (a) in connection with copies of the covered work
531 | conveyed by you (or copies made from those copies), or (b) primarily
532 | for and in connection with specific products or compilations that
533 | contain the covered work, unless you entered into that arrangement,
534 | or that patent license was granted, prior to 28 March 2007.
535 |
536 | Nothing in this License shall be construed as excluding or limiting
537 | any implied license or other defenses to infringement that may
538 | otherwise be available to you under applicable patent law.
539 |
540 | 12. No Surrender of Others' Freedom.
541 |
542 | If conditions are imposed on you (whether by court order, agreement or
543 | otherwise) that contradict the conditions of this License, they do not
544 | excuse you from the conditions of this License. If you cannot convey a
545 | covered work so as to satisfy simultaneously your obligations under this
546 | License and any other pertinent obligations, then as a consequence you may
547 | not convey it at all. For example, if you agree to terms that obligate you
548 | to collect a royalty for further conveying from those to whom you convey
549 | the Program, the only way you could satisfy both those terms and this
550 | License would be to refrain entirely from conveying the Program.
551 |
552 | 13. Use with the GNU Affero General Public License.
553 |
554 | Notwithstanding any other provision of this License, you have
555 | permission to link or combine any covered work with a work licensed
556 | under version 3 of the GNU Affero General Public License into a single
557 | combined work, and to convey the resulting work. The terms of this
558 | License will continue to apply to the part which is the covered work,
559 | but the special requirements of the GNU Affero General Public License,
560 | section 13, concerning interaction through a network will apply to the
561 | combination as such.
562 |
563 | 14. Revised Versions of this License.
564 |
565 | The Free Software Foundation may publish revised and/or new versions of
566 | the GNU General Public License from time to time. Such new versions will
567 | be similar in spirit to the present version, but may differ in detail to
568 | address new problems or concerns.
569 |
570 | Each version is given a distinguishing version number. If the
571 | Program specifies that a certain numbered version of the GNU General
572 | Public License "or any later version" applies to it, you have the
573 | option of following the terms and conditions either of that numbered
574 | version or of any later version published by the Free Software
575 | Foundation. If the Program does not specify a version number of the
576 | GNU General Public License, you may choose any version ever published
577 | by the Free Software Foundation.
578 |
579 | If the Program specifies that a proxy can decide which future
580 | versions of the GNU General Public License can be used, that proxy's
581 | public statement of acceptance of a version permanently authorizes you
582 | to choose that version for the Program.
583 |
584 | Later license versions may give you additional or different
585 | permissions. However, no additional obligations are imposed on any
586 | author or copyright holder as a result of your choosing to follow a
587 | later version.
588 |
589 | 15. Disclaimer of Warranty.
590 |
591 | THERE IS NO WARRANTY FOR THE PROGRAM, TO THE EXTENT PERMITTED BY
592 | APPLICABLE LAW. EXCEPT WHEN OTHERWISE STATED IN WRITING THE COPYRIGHT
593 | HOLDERS AND/OR OTHER PARTIES PROVIDE THE PROGRAM "AS IS" WITHOUT WARRANTY
594 | OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING, BUT NOT LIMITED TO,
595 | THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
596 | PURPOSE. THE ENTIRE RISK AS TO THE QUALITY AND PERFORMANCE OF THE PROGRAM
597 | IS WITH YOU. SHOULD THE PROGRAM PROVE DEFECTIVE, YOU ASSUME THE COST OF
598 | ALL NECESSARY SERVICING, REPAIR OR CORRECTION.
599 |
600 | 16. Limitation of Liability.
601 |
602 | IN NO EVENT UNLESS REQUIRED BY APPLICABLE LAW OR AGREED TO IN WRITING
603 | WILL ANY COPYRIGHT HOLDER, OR ANY OTHER PARTY WHO MODIFIES AND/OR CONVEYS
604 | THE PROGRAM AS PERMITTED ABOVE, BE LIABLE TO YOU FOR DAMAGES, INCLUDING ANY
605 | GENERAL, SPECIAL, INCIDENTAL OR CONSEQUENTIAL DAMAGES ARISING OUT OF THE
606 | USE OR INABILITY TO USE THE PROGRAM (INCLUDING BUT NOT LIMITED TO LOSS OF
607 | DATA OR DATA BEING RENDERED INACCURATE OR LOSSES SUSTAINED BY YOU OR THIRD
608 | PARTIES OR A FAILURE OF THE PROGRAM TO OPERATE WITH ANY OTHER PROGRAMS),
609 | EVEN IF SUCH HOLDER OR OTHER PARTY HAS BEEN ADVISED OF THE POSSIBILITY OF
610 | SUCH DAMAGES.
611 |
612 | 17. Interpretation of Sections 15 and 16.
613 |
614 | If the disclaimer of warranty and limitation of liability provided
615 | above cannot be given local legal effect according to their terms,
616 | reviewing courts shall apply local law that most closely approximates
617 | an absolute waiver of all civil liability in connection with the
618 | Program, unless a warranty or assumption of liability accompanies a
619 | copy of the Program in return for a fee.
620 |
621 | END OF TERMS AND CONDITIONS
622 |
623 | How to Apply These Terms to Your New Programs
624 |
625 | If you develop a new program, and you want it to be of the greatest
626 | possible use to the public, the best way to achieve this is to make it
627 | free software which everyone can redistribute and change under these terms.
628 |
629 | To do so, attach the following notices to the program. It is safest
630 | to attach them to the start of each source file to most effectively
631 | state the exclusion of warranty; and each file should have at least
632 | the "copyright" line and a pointer to where the full notice is found.
633 |
634 |
635 | Copyright (C)
636 |
637 | This program is free software: you can redistribute it and/or modify
638 | it under the terms of the GNU General Public License as published by
639 | the Free Software Foundation, either version 3 of the License, or
640 | (at your option) any later version.
641 |
642 | This program is distributed in the hope that it will be useful,
643 | but WITHOUT ANY WARRANTY; without even the implied warranty of
644 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
645 | GNU General Public License for more details.
646 |
647 | You should have received a copy of the GNU General Public License
648 | along with this program. If not, see .
649 |
650 | Also add information on how to contact you by electronic and paper mail.
651 |
652 | If the program does terminal interaction, make it output a short
653 | notice like this when it starts in an interactive mode:
654 |
655 | Copyright (C)
656 | This program comes with ABSOLUTELY NO WARRANTY; for details type `show w'.
657 | This is free software, and you are welcome to redistribute it
658 | under certain conditions; type `show c' for details.
659 |
660 | The hypothetical commands `show w' and `show c' should show the appropriate
661 | parts of the General Public License. Of course, your program's commands
662 | might be different; for a GUI interface, you would use an "about box".
663 |
664 | You should also get your employer (if you work as a programmer) or school,
665 | if any, to sign a "copyright disclaimer" for the program, if necessary.
666 | For more information on this, and how to apply and follow the GNU GPL, see
667 | .
668 |
669 | The GNU General Public License does not permit incorporating your program
670 | into proprietary programs. If your program is a subroutine library, you
671 | may consider it more useful to permit linking proprietary applications with
672 | the library. If this is what you want to do, use the GNU Lesser General
673 | Public License instead of this License. But first, please read
674 | .
675 |
--------------------------------------------------------------------------------