API tools faq
paste
Advertisement
AshkanN

Veyselbinder Sourcecode

AshkanN
May 13th, 2017
499
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Autohotkey 148.01 KB | None | 0 0
raw download clone embed print report
  1. /*
  2. ------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
  3. Veyselbinder erstellt von Veysel (Veysel)
  4. Anfang 31.10.2016
  5. © Copyright by Veysel 2016
  6. ------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
  7. */
  8.  
  9. #Include Datei4.ahk
  10. #Include Datei1.ahk
  11. #include Datei2.ahk
  12. #Include Datei3.ahk
  13. #IfWinActive, GTA:SA:MP
  14. #SingleInstance, force
  15. #UseHook
  16. #NoEnv
  17. #Persistent
  18.  
  19. RegRead sampuser, HKEY_CURRENT_USER, Software\SAMP, PlayerName
  20.  
  21. global version                              := "5.4"
  22. global Updatedatum                          := "29.12.2016 | 22:12 Uhr"
  23. global an                                   := true
  24. global line                                 := 0
  25. global SpielerStatus                        := 0
  26. global loggedin                             := 0
  27. global chatlog_zeile                        := 0
  28. global overlay                              := 1
  29. global hpchecks                             := 1
  30. global moneychecks                          := 1
  31. global stup                                 := 0
  32. global anruferid1                           :=
  33. global adminid                              := 0
  34. global LinieAktiv                           := 0
  35. global GaertnerAktiv                        := 0
  36. global BauerAktiv                           := 0
  37. global BlitzerWarnung                       := 0
  38.  
  39. if(!A_IsAdmin){
  40.     Run *RunAs "%A_ScriptFullPath%",, UseErrorLevel
  41.     if(ErrorLevel){
  42.         MsgBox, 21, Fehler!, Der Veyselbinder muss als Administrator gestartet werden`, damit er komplett funktionsfähig ist!
  43.         IfMsgBox, Retry
  44.             Reload
  45.         else
  46.             ExitApp
  47.     }
  48.     return
  49. }
  50.  
  51. SetNumLockState on
  52.  
  53. IfNotExist, %A_MyDocuments%\Veyselbinder\
  54. {
  55.     FileCreateDir, %A_MyDocuments%\Veyselbinder\
  56. }
  57. IfNotExist, %A_MyDocuments%\Veyselbinder\Fraktionen
  58. {
  59.     FileCreateDir, %A_MyDocuments%\Veyselbinder\Fraktionen
  60. }
  61. IfNotExist, %A_MyDocuments%\Veyselbinder\Bilder
  62. {
  63.     FileCreateDir, %A_MyDocuments%\Veyselbinder\Bilder
  64. }
  65. IfNotExist, %A_MyDocuments%\Veyselbinder\Optionen.ini
  66. {
  67.     Iniwrite, Bitte Killspruch ändern, %A_MyDocuments%\Veyselbinder\Optionen.ini, Optionen, KillSpruch
  68.     IniWrite, Bitte Pickwaffespruch ändern, %A_MyDocuments%\Veyselbinder\Optionen.ini, Optionen, PickSpruch
  69.     Iniwrite, 0, %A_MyDocuments%\Veyselbinder\Optionen.ini, Optionen, Kills
  70.     Iniwrite, 0, %A_MyDocuments%\Veyselbinder\Optionen.ini, Optionen, Tode
  71. }
  72.  
  73. Loop
  74. {
  75.     Progress, 0, Einige Dateien werden heruntergeladen., Vorbereitung, Veyselbinder
  76.     URLDownloadToFile, http://veysel.square7.ch/Veyselbinder/Bilder/logo1.png, %A_MyDocuments%\Veyselbinder\Bilder\logo1.png
  77.     Progress, 7, Einige Dateien werden heruntergeladen., Vorbereitung, Veyselbinder
  78.     URLDownloadToFile, http://veysel.square7.ch/Veyselbinder/Bilder/logo2.png, %A_MyDocuments%\Veyselbinder\Bilder\logo2.png
  79.     Progress, 18, Einige Dateien werden heruntergeladen., Vorbereitung, Veyselbinder
  80.     URLDownloadToFile, http://veysel.square7.ch/Veyselbinder/Bilder/background.png, %A_MyDocuments%\Veyselbinder\Bilder\background.png
  81.     Progress, 25, Einige Dateien werden heruntergeladen., Vorbereitung, Veyselbinder
  82.     URLDownloadToFile, http://veysel.square7.ch/Veyselbinder/Bilder/lila.png, %A_MyDocuments%\Veyselbinder\Bilder\lila.png
  83.     Progress, 33, Einige Dateien werden heruntergeladen., Vorbereitung, Veyselbinder
  84.     URLDownloadToFile, http://veysel.square7.ch/Veyselbinder/Bilder/gruen.png, %A_MyDocuments%\Veyselbinder\Bilder\gruen.png
  85.     Progress, 38, Einige Dateien werden heruntergeladen., Vorbereitung, Veyselbinder
  86.     URLDownloadToFile, http://veysel.square7.ch/Veyselbinder/Bilder/grau.png, %A_MyDocuments%\Veyselbinder\Bilder\grau.png
  87.     Progress, 48, Einige Dateien werden heruntergeladen., Vorbereitung, Veyselbinder
  88.     URLDownloadToFile, http://veysel.square7.ch/Veyselbinder/Bilder/bild2.jpg, %A_MyDocuments%\Veyselbinder\Bilder\bild2.jpg
  89.     Progress, 58, Einige Dateien werden heruntergeladen., Vorbereitung, Veyselbinder
  90.     URLDownloadToFile, http://veysel.square7.ch/Veyselbinder/motd.txt, motd.txt
  91.     Progress, 66, Einige Dateien werden heruntergeladen., Vorbereitung, Veyselbinder
  92.     FileRead,motd,motd.txt
  93.     Progress, 69, Einige Dateien werden heruntergeladen., Vorbereitung, Veyselbinder
  94.     FileDelete,motd.txt
  95.     Progress, 77, Einige Dateien werden heruntergeladen., Vorbereitung, Veyselbinder
  96.     URLDownloadToFile, http://veysel.square7.ch/Veyselbinder/motd2.txt, motd2.txt
  97.     Progress, 83, Einige Dateien werden heruntergeladen., Vorbereitung, Veyselbinder
  98.     FileRead,motd2,motd2.txt
  99.     Progress, 86, Einige Dateien werden heruntergeladen., Vorbereitung, Veyselbinder
  100.     FileDelete,motd2.txt
  101.     Progress, 90, Einige Dateien werden heruntergeladen., Vorbereitung, Veyselbinder
  102.     URLDownloadToFile, http://veysel.square7.ch/Veyselbinder/changelog.txt, changelog.txt
  103.     Progress, 93, Einige Dateien werden heruntergeladen., Vorbereitung, Veyselbinder
  104.     FileRead,changelog,changelog.txt
  105.     Progress, 97, Einige Dateien werden heruntergeladen., Vorbereitung, Veyselbinder
  106.     FileDelete,changelog.txt
  107.    
  108.     IfExist %A_MyDocuments%\Veyselbinder\Bilder\logo1.png
  109.     {
  110.         ifExist %A_MyDocuments%\Veyselbinder\Bilder\logo2.png
  111.         {
  112.             ifExist %A_MyDocuments%\Veyselbinder\Bilder\background.png
  113.             {
  114.                 ifExist %A_MyDocuments%\Veyselbinder\Bilder\lila.png
  115.                 {
  116.                     ifExist %A_MyDocuments%\Veyselbinder\Bilder\gruen.png
  117.                     {
  118.                         ifExist %A_MyDocuments%\Veyselbinder\Bilder\grau.png
  119.                         {
  120.                             ifExist %A_MyDocuments%\Veyselbinder\Bilder\bild2.jpg
  121.                             {
  122.                                 Progress, 100, Einige Dateien werden heruntergeladen., Vorbereitung, Veyselbinder
  123.                                 Sleep 1500
  124.                                 Progress, Off
  125.                                 break
  126.                             }
  127.                         }
  128.                     }
  129.                 }
  130.             }
  131.         }
  132.     }
  133. }
  134.  
  135. Progress, 0, Einige Dateien werden nun bearbeitet., Vorbereitung, Veyselbinder
  136. Iniread, Key1, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key1
  137. If (Key1 = "" or Key1 = "ERROR")
  138. {
  139. Key1 :=
  140. IniWrite, %Key1%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key1
  141. }
  142. Progress, 5, Einige Dateien werden nun bearbeitet., Vorbereitung, Veyselbinder
  143. Iniread, Key2, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key2
  144. If (Key2 = "" or Key2 = "ERROR")
  145. {
  146. Key2 :=
  147. IniWrite, %Key2%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key2
  148. }
  149. Progress, 10, Einige Dateien werden nun bearbeitet., Vorbereitung, Veyselbinder
  150. Iniread, Key3, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key3
  151. If (Key3 = "" or Key3 = "ERROR")
  152. {
  153. Key3 :=
  154. IniWrite, %Key3%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key3
  155. }
  156. Progress, 15, Einige Dateien werden nun bearbeitet., Vorbereitung, Veyselbinder
  157. Iniread, Key4, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key4
  158. If (Key4 = "" or Key4 = "ERROR")
  159. {
  160. Key4 :=
  161. IniWrite, %Key4%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key4
  162. }
  163. Progress, 20, Einige Dateien werden nun bearbeitet., Vorbereitung, Veyselbinder
  164. Iniread, Key5, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key5
  165. If (Key5 = "" or Key5 = "ERROR")
  166. {
  167. Key5 :=
  168. IniWrite, %Key5%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key5
  169. }
  170. Progress, 25, Einige Dateien werden nun bearbeitet., Vorbereitung, Veyselbinder
  171. Iniread, Key6, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key6
  172. If (Key6 = "" or Key6 = "ERROR")
  173. {
  174. Key6 :=
  175. IniWrite, %Key6%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key6
  176. }
  177. Progress, 30, Einige Dateien werden nun bearbeitet., Vorbereitung, Veyselbinder
  178. Iniread, Key7, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key7
  179. If (Key7 = "" or Key7 = "ERROR")
  180. {
  181. Key7 :=
  182. IniWrite, %Key7%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key7
  183. }
  184. Progress, 35, Einige Dateien werden nun bearbeitet., Vorbereitung, Veyselbinder
  185. Iniread, Key8, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key8
  186. If (Key8 = "" or Key8 = "ERROR")
  187. {
  188. Key8 :=
  189. IniWrite, %Key8%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key8
  190. }
  191. Progress, 40, Einige Dateien werden nun bearbeitet., Vorbereitung, Veyselbinder
  192. Iniread, Key9, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key9
  193. If (Key9 = "" or Key9 = "ERROR")
  194. {
  195. Key9 :=
  196. IniWrite, %Key9%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key9
  197. }
  198. Progress, 45, Einige Dateien werden nun bearbeitet., Vorbereitung, Veyselbinder
  199. Iniread, Key10, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key10
  200. If (Key10 = "" or Key10 = "ERROR")
  201. {
  202. Key10 :=
  203. IniWrite, %Key10%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key10
  204. }
  205. Progress, 50, Einige Dateien werden nun bearbeitet., Vorbereitung, Veyselbinder
  206. Iniread, Key11, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key11
  207. If (Key11 = "" or Key11 = "ERROR")
  208. {
  209. Key11 :=
  210. IniWrite, %Key11%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key11
  211. }
  212. Progress, 55, Einige Dateien werden nun bearbeitet., Vorbereitung, Veyselbinder
  213. Iniread, Key12, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key12
  214. If (Key12 = "" or Key12 = "ERROR")
  215. {
  216. Key12 :=
  217. IniWrite, %Key12%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key12
  218. }
  219. Progress, 60, Einige Dateien werden nun bearbeitet., Vorbereitung, Veyselbinder
  220. Iniread, Key13, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key13
  221. If (Key13 = "" or Key13 = "ERROR")
  222. {
  223. Key13 :=
  224. IniWrite, %Key13%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key13
  225. }
  226. Progress, 65, Einige Dateien werden nun bearbeitet., Vorbereitung, Veyselbinder
  227. Iniread, Key14, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key14
  228. If (Key14 = "" or Key14 = "ERROR")
  229. {
  230. Key14 :=
  231. IniWrite, %Key14%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key14
  232. }
  233. Progress, 70, Einige Dateien werden nun bearbeitet., Vorbereitung, Veyselbinder
  234. Iniread, Key15, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key15
  235. If (Key15 = "" or Key15 = "ERROR")
  236. {
  237. Key15 :=
  238. IniWrite, %Key15%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key15
  239. }
  240. Iniread, Key16, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key16
  241. If (Key16 = "" or Key16 = "ERROR")
  242. {
  243. Key16 :=
  244. IniWrite, %Key16%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key16
  245. }
  246. Iniread, Key17, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key17
  247. If (Key17 = "" or Key17 = "ERROR")
  248. {
  249. Key17 :=
  250. IniWrite, %Key17%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key17
  251. }
  252. Iniread, Key18, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key18
  253. If (Key18 = "" or Key18 = "ERROR")
  254. {
  255. Key18 :=
  256. IniWrite, %Key18%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key18
  257. }
  258. Iniread, Key19, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key19
  259. If (Key19 = "" or Key19 = "ERROR")
  260. {
  261. Key19 :=
  262. IniWrite, %Key19%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key19
  263. }
  264. Iniread, Key20, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key20
  265. If (Key20 = "" or Key20 = "ERROR")
  266. {
  267. Key20 :=
  268. IniWrite, %Key20%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key20
  269. }
  270. Iniread, Key21, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key21
  271. If (Key21 = "" or Key21 = "ERROR")
  272. {
  273. Key21 :=
  274. IniWrite, %Key21%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key21
  275. }
  276. Iniread, Key22, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key22
  277. If (Key22 = "" or Key22 = "ERROR")
  278. {
  279. Key22 :=
  280. IniWrite, %Key22%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key22
  281. }
  282. Iniread, Key23, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key23
  283. If (Key23 = "" or Key23 = "ERROR")
  284. {
  285. Key23 :=
  286. IniWrite, %Key23%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key23
  287. }
  288. Iniread, Key24, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key24
  289. If (Key24 = "" or Key24 = "ERROR")
  290. {
  291. Key24 :=
  292. IniWrite, %Key24%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key24
  293. }
  294. Iniread, Key25, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key25
  295. If (Key25 = "" or Key25 = "ERROR")
  296. {
  297. Key25 :=
  298. IniWrite, %Key25%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key25
  299. }
  300. Iniread, Key26, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key26
  301. If (Key26 = "" or Key26 = "ERROR")
  302. {
  303. Key26 :=
  304. IniWrite, %Key26%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key26
  305. }
  306. Iniread, Key27, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key27
  307. If (Key27 = "" or Key27 = "ERROR")
  308. {
  309. Key27 :=
  310. IniWrite, %Key27%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key27
  311. }
  312. Iniread, Key28, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key28
  313. If (Key28 = "" or Key28 = "ERROR")
  314. {
  315. Key28 :=
  316. IniWrite, %Key28%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key28
  317. }
  318. Iniread, Key29, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key29
  319. If (Key29 = "" or Key29 = "ERROR")
  320. {
  321. Key29 :=
  322. IniWrite, %Key29%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key29
  323. }
  324. Iniread, Key30, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key30
  325. If (Key30 = "" or Key30 = "ERROR")
  326. {
  327. Key30 :=
  328. IniWrite, %Key30%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key30
  329. }
  330. Iniread, Key31, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key31
  331. If (Key31 = "" or Key31 = "ERROR")
  332. {
  333. Key31 :=
  334. IniWrite, %Key31%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key31
  335. }
  336. Iniread, Key32, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key32
  337. If (Key32 = "" or Key32 = "ERROR")
  338. {
  339. Key32 :=
  340. IniWrite, %Key32%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key32
  341. }
  342. Iniread, Key33, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key33
  343. If (Key33 = "" or Key33 = "ERROR")
  344. {
  345. Key33 :=
  346. IniWrite, %Key33%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key33
  347. }
  348. Iniread, Key34, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key34
  349. If (Key34 = "" or Key34 = "ERROR")
  350. {
  351. Key34 :=
  352. IniWrite, %Key34%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key34
  353. }
  354. Iniread, Key35, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key35
  355. If (Key35 = "" or Key35 = "ERROR")
  356. {
  357. Key35 :=
  358. IniWrite, %Key35%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key35
  359. }
  360. Iniread, Key36, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key36
  361. If (Key36 = "" or Key36 = "ERROR")
  362. {
  363. Key36 :=
  364. IniWrite, %Key36%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key36
  365. }
  366. Iniread, Key37, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key37
  367. If (Key37 = "" or Key37 = "ERROR")
  368. {
  369. Key37 :=
  370. IniWrite, %Key37%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key37
  371. }
  372. Iniread, Key38, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key38
  373. If (Key38 = "" or Key38 = "ERROR")
  374. {
  375. Key38 :=
  376. IniWrite, %Key38%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key38
  377. }
  378. Iniread, Key39, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key39
  379. If (Key39 = "" or Key39 = "ERROR")
  380. {
  381. Key39 :=
  382. IniWrite, %Key39%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key39
  383. }
  384. Iniread, Key40, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key40
  385. If (Key40 = "" or Key40 = "ERROR")
  386. {
  387. Key40 :=
  388. IniWrite, %Key20%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key40
  389. }
  390. Iniread, Key1Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key1Text
  391. If (Key1Text = "ERROR")
  392. {
  393. Key1Text :=
  394. IniWrite, %Key1Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key1Text
  395. }
  396. Iniread, Key2Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key2Text
  397. If (Key2Text = "ERROR")
  398. {
  399. Key2Text :=
  400. IniWrite, %Key2Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key2Text
  401. }
  402. Iniread, Key3Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key3Text
  403. If (Key3Text = "ERROR")
  404. {
  405. Key3Text :=
  406. IniWrite, %Key3Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key3Text
  407. }
  408. Iniread, Key4Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key4Text
  409. If ( Key4Text = "ERROR")
  410. {
  411. Key4Text :=
  412. IniWrite, %Key4Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key4Text
  413. }
  414. Iniread, Key5Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key5Text
  415. If (Key5Text = "ERROR")
  416. {
  417. Key5Text :=
  418. IniWrite, %Key5Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key5Text
  419. }
  420. Iniread, Key6Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key6Text
  421. If (Key6Text = "ERROR")
  422. {
  423. Key6Text :=
  424. IniWrite, %Key6Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key6Text
  425. }
  426. Iniread, Key7Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key7Text
  427. If (Key7Text = "ERROR")
  428. {
  429. Key7Text :=
  430. IniWrite, %Key7Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key7Text
  431. }
  432. Iniread, Key8Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key8Text
  433. If (Key8Text = "ERROR")
  434. {
  435. Key8Text :=
  436. IniWrite, %Key8Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key8Text
  437. }
  438. Iniread, Key9Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key9Text
  439. If (Key9Text = "ERROR")
  440. {
  441. Key9Text :=
  442. IniWrite, %Key9Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key9Text
  443. }
  444. Iniread, Key10Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key10Text
  445. If (Key10Text = "ERROR")
  446. {
  447. Key10Text :=
  448. IniWrite, %Key10Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key10Text
  449. }
  450. Iniread, Key11Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key11Text
  451. If (Key11Text = "ERROR")
  452. {
  453. Key11Text :=
  454. IniWrite, %Key11Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key11Text
  455. }
  456. Iniread, Key12Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key12Text
  457. If (Key12Text = "ERROR")
  458. {
  459. Key12Text :=
  460. IniWrite, %Key12Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key12Text
  461. }
  462. Iniread, Key13Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key13Text
  463. If (Key13Text = "ERROR")
  464. {
  465. Key13Text :=
  466. IniWrite, %Key13Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key13Text
  467. }
  468. Iniread, Key14Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key14Text
  469. If (Key14Text = "ERROR")
  470. {
  471. Key14Text :=
  472. IniWrite, %Key14Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key14Text
  473. }
  474. Iniread, Key15Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key15Text
  475. If (Key15Text = "ERROR")
  476. {
  477. Key15Text :=
  478. IniWrite, %Key15Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key15Text
  479. }
  480. Iniread, Key16Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key16Text
  481. If (Key16Text = "ERROR")
  482. {
  483. Key16Text :=
  484. IniWrite, %Key16Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key16Text
  485. }
  486. Iniread, Key17Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key17Text
  487. If (Key17Text = "ERROR")
  488. {
  489. Key17Text :=
  490. IniWrite, %Key17Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key17Text
  491. }
  492. Iniread, Key18Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key18Text
  493. If (Key18Text = "ERROR")
  494. {
  495. Key18Text :=
  496. IniWrite, %Key18Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key18Text
  497. }
  498. Iniread, Key19Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key19Text
  499. If (Key19Text = "ERROR")
  500. {
  501. Key19Text :=
  502. IniWrite, %Key19Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key19Text
  503. }
  504. Iniread, Key20Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key20Text
  505. If (Key20Text = "ERROR")
  506. {
  507. Key20Text :=
  508. IniWrite, %Key20Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key20Text
  509. }
  510. Iniread, Key21Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key21Text
  511. If (Key21Text = "ERROR")
  512. {
  513. Key21Text :=
  514. IniWrite, %Key21Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key21Text
  515. }
  516. Iniread, Key22Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key22Text
  517. If (Key22Text = "ERROR")
  518. {
  519. Key22Text :=
  520. IniWrite, %Key22Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key22Text
  521. }
  522. Iniread, Key23Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key23Text
  523. If (Key23Text = "ERROR")
  524. {
  525. Key23Text :=
  526. IniWrite, %Key23Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key23Text
  527. }
  528. Iniread, Key24Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key24Text
  529. If (Key24Text = "ERROR")
  530. {
  531. Key24Text :=
  532. IniWrite, %Key24Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key24Text
  533. }
  534. Iniread, Key25Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key25Text
  535. If (Key25Text = "ERROR")
  536. {
  537. Key25Text :=
  538. IniWrite, %Key25Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key25Text
  539. }
  540. Iniread, Key26Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key26Text
  541. If (Key26Text = "ERROR")
  542. {
  543. Key26Text :=
  544. IniWrite, %Key26Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key26Text
  545. }
  546. Iniread, Key27Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key27Text
  547. If (Key27Text = "ERROR")
  548. {
  549. Key27Text :=
  550. IniWrite, %Key27Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key27Text
  551. }
  552. Iniread, Key28Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key28Text
  553. If (Key28Text = "ERROR")
  554. {
  555. Key28Text :=
  556. IniWrite, %Key28Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key28Text
  557. }
  558. Iniread, Key29Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key29Text
  559. If (Key29Text = "ERROR")
  560. {
  561. Key29Text :=
  562. IniWrite, %Key29Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key29Text
  563. }
  564. Iniread, Key30Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key30Text
  565. If (Key30Text = "ERROR")
  566. {
  567. Key30Text :=
  568. IniWrite, %Key30Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key30Text
  569. }
  570. Iniread, Key31Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key31Text
  571. If (Key31Text = "ERROR")
  572. {
  573. Key31Text :=
  574. IniWrite, %Key31Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key31Text
  575. }
  576. Iniread, Key32Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key32Text
  577. If (Key32Text = "ERROR")
  578. {
  579. Key32Text :=
  580. IniWrite, %Key32Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key32Text
  581. }
  582. Iniread, Key33Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key33Text
  583. If (Key33Text = "ERROR")
  584. {
  585. Key33Text :=
  586. IniWrite, %Key33Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key33Text
  587. }
  588. Iniread, Key34Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key34Text
  589. If (Key34Text = "ERROR")
  590. {
  591. Key34Text :=
  592. IniWrite, %Key34Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key34Text
  593. }
  594. Iniread, Key35Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key35Text
  595. If (Key35Text = "ERROR")
  596. {
  597. Key35Text :=
  598. IniWrite, %Key35Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key35Text
  599. }
  600. Iniread, Key36Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key36Text
  601. If (Key36Text = "ERROR")
  602. {
  603. Key36Text :=
  604. IniWrite, %Key36Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key36Text
  605. }
  606. Iniread, Key37Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key37Text
  607. If (Key37Text = "ERROR")
  608. {
  609. Key37Text :=
  610. IniWrite, %Key37Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key37Text
  611. }
  612. Iniread, Key38Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key38Text
  613. If (Key38Text = "ERROR")
  614. {
  615. Key38Text :=
  616. IniWrite, %Key38Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key38Text
  617. }
  618. Iniread, Key39Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key39Text
  619. If (Key39Text = "ERROR")
  620. {
  621. Key39Text :=
  622. IniWrite, %Key39Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key39Text
  623. }
  624. Iniread, Key40Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key40Text
  625. If (Key40Text = "ERROR")
  626. {
  627. Key40Text :=
  628. IniWrite, %Key40Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key40Text
  629. }
  630. Iniread, ToggleKey, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, ToggleKey
  631. If (ToggleKey = "" or ToggleKey = "ERROR")
  632. {
  633. ToggleKey := F12
  634. IniWrite, %ToggleKey%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, ToggleKey
  635. }
  636. Progress, 80, Einige Dateien werden nun bearbeitet., Vorbereitung, Veyselbinder
  637. Iniread, Key1Status, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key1Status
  638. Iniread, Key2Status, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key2Status
  639. Iniread, Key3Status, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key3Status
  640. Iniread, Key4Status, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key4Status
  641. Iniread, Key5Status, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key5Status
  642. Iniread, Key6Status, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key6Status
  643. Iniread, Key7Status, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key7Status
  644. Iniread, Key8Status, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key8Status
  645. Iniread, Key9Status, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key9Status
  646. Iniread, Key10Status, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key10Status
  647. Iniread, Key11Status, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key11Status
  648. Iniread, Key12Status, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key12Status
  649. Iniread, Key13Status, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key13Status
  650. Iniread, Key14Status, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key14Status
  651. Iniread, Key15Status, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key15Status
  652. Iniread, Key16Status, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key16Status
  653. Iniread, Key17Status, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key17Status
  654. Iniread, Key18Status, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key18Status
  655. Iniread, Key19Status, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key19Status
  656. Iniread, Key20Status, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key20Status
  657. Iniread, Key21Status, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key21Status
  658. Iniread, Key22Status, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key22Status
  659. Iniread, Key23Status, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key23Status
  660. Iniread, Key24Status, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key24Status
  661. Iniread, Key25Status, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key25Status
  662. Iniread, Key26Status, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key26Status
  663. Iniread, Key27Status, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key27Status
  664. Iniread, Key28Status, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key28Status
  665. Iniread, Key29Status, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key29Status
  666. Iniread, Key30Status, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key30Status
  667. Iniread, Key31Status, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key31Status
  668. Iniread, Key32Status, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key32Status
  669. Iniread, Key33Status, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key33Status
  670. Iniread, Key34Status, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key34Status
  671. Iniread, Key35Status, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key35Status
  672. Iniread, Key36Status, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key36Status
  673. Iniread, Key37Status, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key37Status
  674. Iniread, Key38Status, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key38Status
  675. Iniread, Key39Status, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key39Status
  676. Iniread, Key40Status, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key40Status
  677. Progress, 90, Einige Dateien werden nun bearbeitet., Vorbereitung, Veyselbinder
  678. Iniread, Key1, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key1
  679. Iniread, Key2, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key2
  680. Iniread, Key3, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key3
  681. Iniread, Key4, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key4
  682. Iniread, Key5, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key5
  683. Iniread, Key6, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key6
  684. Iniread, Key7, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key7
  685. Iniread, Key8, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key8
  686. Iniread, Key9, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key9
  687. Iniread, Key10, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key10
  688. Iniread, Key11, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key11
  689. Iniread, Key12, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key12
  690. Iniread, Key13, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key13
  691. Iniread, Key14, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key14
  692. Iniread, Key15, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key15
  693. Iniread, Key16, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key16
  694. Iniread, Key17, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key17
  695. Iniread, Key18, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key18
  696. Iniread, Key19, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key19
  697. Iniread, Key20, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key20
  698. Iniread, Key21, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key21
  699. Iniread, Key22, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key22
  700. Iniread, Key23, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key23
  701. Iniread, Key24, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key24
  702. Iniread, Key25, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key25
  703. Iniread, Key26, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key26
  704. Iniread, Key27, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key27
  705. Iniread, Key28, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key28
  706. Iniread, Key29, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key29
  707. Iniread, Key30, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key30
  708. Iniread, Key31, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key31
  709. Iniread, Key32, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key32
  710. Iniread, Key33, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key33
  711. Iniread, Key34, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key34
  712. Iniread, Key35, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key35
  713. Iniread, Key36, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key36
  714. Iniread, Key37, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key37
  715. Iniread, Key38, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key38
  716. Iniread, Key39, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key39
  717. Iniread, Key40, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key40
  718. Iniread, Key1Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key1Text
  719. Iniread, Key2Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key2Text
  720. Iniread, Key3Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key3Text
  721. Iniread, Key4Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key4Text
  722. Iniread, Key5Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key5Text
  723. Iniread, Key6Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key6Text
  724. Iniread, Key7Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key7Text
  725. Iniread, Key8Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key8Text
  726. Iniread, Key9Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key9Text
  727. Iniread, Key10Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key10Text
  728. Iniread, Key11Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key11Text
  729. Iniread, Key12Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key12Text
  730. Iniread, Key13Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key13Text
  731. Iniread, Key14Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key14Text
  732. Iniread, Key15Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key15Text
  733. Iniread, Key16Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key16Text
  734. Iniread, Key17Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key17Text
  735. Iniread, Key18Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key18Text
  736. Iniread, Key19Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key19Text
  737. Iniread, Key20Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key20Text
  738. Iniread, Key21Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key21Text
  739. Iniread, Key22Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key22Text
  740. Iniread, Key23Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key23Text
  741. Iniread, Key24Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key24Text
  742. Iniread, Key25Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key25Text
  743. Iniread, Key26Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key26Text
  744. Iniread, Key27Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key27Text
  745. Iniread, Key28Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key28Text
  746. Iniread, Key29Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key29Text
  747. Iniread, Key30Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key30Text
  748. Iniread, Key31Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key31Text
  749. Iniread, Key32Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key32Text
  750. Iniread, Key33Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key33Text
  751. Iniread, Key34Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key34Text
  752. Iniread, Key35Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key35Text
  753. Iniread, Key36Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key36Text
  754. Iniread, Key37Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key37Text
  755. Iniread, Key38Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key38Text
  756. Iniread, Key39Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key39Text
  757. Iniread, Key40Text, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key40Text
  758. Iniread, Key1Enter, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key1Enter
  759. Iniread, Key2Enter, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key2Enter
  760. Iniread, Key3Enter, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key3Enter
  761. Iniread, Key4Enter, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key4Enter
  762. Iniread, Key5Enter, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key5Enter
  763. Iniread, Key6Enter, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key6Enter
  764. Iniread, Key7Enter, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key7Enter
  765. Iniread, Key8Enter, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key8Enter
  766. Iniread, Key9Enter, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key9Enter
  767. Iniread, Key10Enter, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key10Enter
  768. Iniread, Key11Enter, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key11Enter
  769. Iniread, Key12Enter, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key12Enter
  770. Iniread, Key13Enter, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key13Enter
  771. Iniread, Key14Enter, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key14Enter
  772. Iniread, Key15Enter, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key15Enter
  773. Iniread, Key16Enter, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key16Enter
  774. Iniread, Key17Enter, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key17Enter
  775. Iniread, Key18Enter, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key18Enter
  776. Iniread, Key19Enter, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key19Enter
  777. Iniread, Key20Enter, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key20Enter
  778. Iniread, Key21Enter, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key21Enter
  779. Iniread, Key22Enter, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key22Enter
  780. Iniread, Key23Enter, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key23Enter
  781. Iniread, Key24Enter, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key24Enter
  782. Iniread, Key25Enter, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key25Enter
  783. Iniread, Key26Enter, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key26Enter
  784. Iniread, Key27Enter, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key27Enter
  785. Iniread, Key28Enter, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key28Enter
  786. Iniread, Key29Enter, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key29Enter
  787. Iniread, Key30Enter, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key30Enter
  788. Iniread, Key31Enter, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key31Enter
  789. Iniread, Key32Enter, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key32Enter
  790. Iniread, Key33Enter, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key33Enter
  791. Iniread, Key34Enter, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key34Enter
  792. Iniread, Key35Enter, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key35Enter
  793. Iniread, Key36Enter, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key36Enter
  794. Iniread, Key37Enter, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key37Enter
  795. Iniread, Key38Enter, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key38Enter
  796. Iniread, Key39Enter, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key39Enter
  797. Iniread, Key40Enter, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key40Enter
  798. Iniread, ToggleKey, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, ToggleKey
  799. Progress, 100, Einige Dateien werden nun bearbeitet., Vorbereitung, Veyselbinder
  800. Sleep 1700
  801. Progress, Off
  802. //----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
  803. //Timer
  804. SetTimer,   AutoFunks,          100
  805. Settimer,   gegner,             5000
  806. //----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
  807. SplashTextOff
  808. Gui, Color, White
  809. Gui, Add, Picture, x2 y-1 w200 h120 ,%A_MyDocuments%\Veyselbinder\Bilder\logo1.png
  810. Gui, Add, Picture, x202 y-1 w650 h120 , %A_MyDocuments%\Veyselbinder\Bilder\logo2.png
  811. Gui, Font, Bold s25
  812. Gui, Font, Color cBlue
  813. Gui, Font,, Georgia
  814. Gui, Add, Text, x2 y119 w850 h50 +Center +BackgroundTrans, -= Veyselbinder =-
  815. Gui, Font
  816. Gui, Font, s12
  817. Gui, Font,, Georgia
  818. Gui, Add, Text, x2 y180 w850 h200 +Center +BackgroundTrans, %motd%
  819. Gui, Add, Button, x377 y325 w100 h30 gLosGehts Default, Weiter
  820. Gui, Show, w857 h370, Veyselbinder | Version %Version% | Information
  821. return
  822.  
  823. LosGehts:
  824. IniRead, Passwort1, %A_MyDocuments%\Veyselbinder\Optionen.ini, Optionen, Passwort
  825. Gui, Destroy
  826. Gui, 2:Default
  827. Gui, Add, Picture, x0 y-1 w660 h410 , %A_MyDocuments%\Veyselbinder\Bilder\background.png
  828. Gui, Add, Picture, x0 y409 w660 h410 , %A_MyDocuments%\Veyselbinder\Bilder\lila.png
  829. Gui, Add, Picture, x0 y409 w661 h10, %A_MyDocuments%\Veyselbinder\Bilder\gruen.png
  830. Gui, Font, Bold cBlue s16
  831. Gui, Font,, Georgia
  832. Gui, Add, Text, x0 y0 w660 h30 +Center +Backgroundtrans, Veyselbinder
  833. Gui, Font, Bold cBlue s10
  834. Gui, Font,, Georgia
  835. Gui, Add, Text, x12 y82 w636 h20 +Backgroundtrans +Center, Einstellungen
  836. Gui, Font,,
  837. Gui, Font, Bold cBlue s10
  838. Gui, Font,, Georgia
  839. Gui, Add, GroupBox, x12 y89 w636 h80 +Center +Backgroundtrans,
  840. Gui, Font,,
  841. Gui, Font, Bold cBlue s8
  842. Gui, Font,, Georgia
  843. Gui, Add, Text, x274 y119 w250 h20 +Backgroundtrans, InGame Passwort
  844. Gui, Add, Text, x310 y210 w250 h20 +BackgroundTrans, MOTD
  845. Gui, Font,,
  846. Gui, Font, Bold
  847. Gui, Font,, Georgia
  848. Gui, Add, Text, x5 y520 w160 h20 +Backgroundtrans , Entwickelt von Veysel
  849. Gui, Add, Text, x292 y520 w150 h20 +Backgroundtrans , Version %version%
  850. Gui, Add, Text, x422 y520 w250 h30 +Backgroundtrans , Letztes Update: %Updatedatum%
  851. Gui, Font,,
  852. Gui, Font,, Georgia
  853. Gui, add, Button, h40 w100 x100 y450 +Backgroundtrans gts, Teamspeak connect
  854. Gui, add, Button, h40 w100 x280 y450 +Backgroundtrans glyd, LyD Connect (SA:MP)
  855. Gui, add, Button, h40 w100 x460 y450 +Backgroundtrans gforum, Forum öffnen
  856. Gui, add, Button, h30 w150 x255 y330 +BackgroundTrans geigenehotkeys, Eigene Hotkeys
  857. Gui, add, Button, h30 w130 x265 y370 +Backgroundtrans Default gspeichern, Einstellungen Speichern
  858. Gui, add, Button, h20 w130 x5 y383 +Backgroundtrans gchangelog, Changelog
  859. Gui, Font,,
  860. Gui, Font, Bold cBlack s8
  861. Gui, Font,, Georgia
  862. Gui, Add, Edit, x12 y230 w636 h80 +Center +Backgroundtrans +ReadOnly, %motd2%
  863. Gui, Add, Edit, x237 y139 w186 h20 vPasswort +Center +Password, %Passwort1%
  864. Gui, Add, Edit, x12 y39 w636 h40 ReadOnly Center, Mit der Taste %ToggleKey% kannst du den Keybinder anschalten / ausschalten.`nMit der Taste F11 kannst du die Hotkeys InGame sehen.
  865. Gui, Show, w660 h540, Veyselbinder | Version %Version% | Main
  866. Hotkey, ~%Key1%, Hotkey1
  867. Hotkey, ~%Key2%, Hotkey2
  868. Hotkey, ~%Key3%, Hotkey3
  869. Hotkey, ~%Key4%, Hotkey4
  870. Hotkey, ~%Key5%, Hotkey5
  871. Hotkey, ~%Key6%, Hotkey6
  872. Hotkey, ~%Key7%, Hotkey7
  873. Hotkey, ~%Key8%, Hotkey8
  874. Hotkey, ~%Key9%, Hotkey9
  875. Hotkey, ~%Key10%, Hotkey10
  876. Hotkey, ~%Key11%, Hotkey11
  877. Hotkey, ~%Key12%, Hotkey12
  878. Hotkey, ~%Key13%, Hotkey13
  879. Hotkey, ~%Key14%, Hotkey14
  880. Hotkey, ~%Key15%, Hotkey15
  881. Hotkey, ~%Key16%, Hotkey16
  882. Hotkey, ~%Key17%, Hotkey17
  883. Hotkey, ~%Key18%, Hotkey18
  884. Hotkey, ~%Key19%, Hotkey19
  885. Hotkey, ~%Key20%, Hotkey20
  886. Hotkey, ~%ToggleKey%, ToggleHotKey
  887. return
  888.  
  889. changelog:
  890. gui, 3:default
  891. Gui, Add, ListBox, x0 y0 w370 h280 , %changelog%
  892. gui, show, w370 h270, Veyselbinder | Version %Version% | Changelog
  893. return
  894.  
  895. eigenehotkeys:
  896. Gui,Hotkeys: Add, Picture, x-8 y-1 w1150 h70 , %A_MyDocuments%\Veyselbinder\Bilder\lila.png
  897. Gui,Hotkeys: Font, S18 Cblue Bold, Calibri
  898. Gui,Hotkeys: Add, Text, x475 y19 w220 h30 BackgroundTrans, Eigene Hotkeys
  899. Gui,Hotkeys: Font, S12 Cblue Bold, Calibri
  900. Gui,Hotkeys: Add, Picture, x-8 y69 w1140 h570 , %a_MyDocuments%\Veyselbinder\Bilder\Bild2.jpg
  901. Gui,Hotkeys: Add, Picture, x12 y99 w1090 h420 , %A_MyDocuments%\Veyselbinder\Bilder\lila.png
  902. Gui,Hotkeys: Font, S12 Cblue Bold, Calibri
  903. Gui,Hotkeys: Add, Text, x20 y105 w20 h20 BackgroundTrans, An
  904. Gui,Hotkeys: Add, Text, x50 y105 w50 h20 BackgroundTrans, Taste
  905. Gui,Hotkeys: Add, Text, x180 y105 w50 h20 BackgroundTrans, Text
  906. Gui,Hotkeys: Add, Text, x502 y105 w50 h20 BackgroundTrans, Enter
  907. Gui,Hotkeys: Add, Text, x580 y105 w20 h20 BackgroundTrans, An
  908. Gui,Hotkeys: Add, Text, x620 y105 w50 h20 BackgroundTrans, Taste
  909. Gui,Hotkeys: Add, Text, x750 y105 w50 h20 BackgroundTrans, Text
  910. Gui,Hotkeys: Add, Text, x1060 y105 w50 h20 BackgroundTrans, Enter
  911. Gui,Hotkeys: Font, S8 CBLACK,
  912. Gui,Hotkeys: Font, S10 CBLUE Bold,
  913. Gui,Hotkeys: Add, Hotkey, x497 y440 w120 h20 BackgroundTrans vToggleKey, %ToggleKey%
  914. Gui,Hotkeys: Font, S12 Cblue Bold, Calibri
  915. Gui,Hotkeys: Add, Text, x624 y440 w230 h20 BackgroundTrans , Taste zum An/Aus schalten
  916. Gui,Hotkeys: Font, S10 CBLACK Bold,
  917. Gui,Hotkeys: Add, Button, x497 y470 w120 h30 BackgroundTrans gSave, Speichern
  918. Gui,Hotkeys: Add, Button, x357 y470 w120 h30 BackgroundTrans gVariablen, Variablen
  919. Gui,Hotkeys: Add, CheckBox, x22 y132 w14 h14 BackgroundTrans gKey1Status vKey1Status Checked%Key1Status%,
  920. Gui,Hotkeys: Add, CheckBox, x22 y162 w14 h14 BackgroundTrans gKey2Status vKey2Status Checked%Key2Status%,
  921. Gui,Hotkeys: Add, CheckBox, x22 y192 w14 h14 BackgroundTrans gKey3Status vKey3Status Checked%Key3Status%,
  922. Gui,Hotkeys: Add, CheckBox, x22 y222 w14 h14 BackgroundTrans gKey4Status vKey4Status Checked%Key4Status%,
  923. Gui,Hotkeys: Add, CheckBox, x22 y252 w14 h14 BackgroundTrans gKey5Status vKey5Status Checked%Key5Status%,
  924. Gui,Hotkeys: Add, CheckBox, x22 y282 w14 h14 BackgroundTrans gKey6Status vKey6Status Checked%Key6Status%,
  925. Gui,Hotkeys: Add, CheckBox, x22 y312 w14 h14 BackgroundTrans gKey7Status vKey7Status Checked%Key7Status%,
  926. Gui,Hotkeys: Add, CheckBox, x22 y342 w14 h14 BackgroundTrans gKey8Status vKey8Status Checked%Key8Status%,
  927. Gui,Hotkeys: Add, CheckBox, x22 y372 w14 h14 BackgroundTrans gKey9Status vKey9Status Checked%Key9Status%,
  928. Gui,Hotkeys: Add, CheckBox, x22 y402 w14 h14 BackgroundTrans gKey10Status vKey10Status Checked%Key10Status%,
  929. Gui,Hotkeys: Add, CheckBox, x580 y132 w14 h14 BackgroundTrans gKey11Status vKey11Status Checked%Key11Status%,
  930. Gui,Hotkeys: Add, CheckBox, x580 y162 w14 h14 BackgroundTrans gKey12Status vKey12Status Checked%Key12Status%,
  931. Gui,Hotkeys: Add, CheckBox, x580 y192 w14 h14 BackgroundTrans gKey13Status vKey13Status Checked%Key13Status%,
  932. Gui,Hotkeys: Add, CheckBox, x580 y222 w14 h14 BackgroundTrans gKey14Status vKey14Status Checked%Key14Status%,
  933. Gui,Hotkeys: Add, CheckBox, x580 y252 w14 h14 BackgroundTrans gKey15Status vKey15Status Checked%Key15Status%,
  934. Gui,Hotkeys: Add, CheckBox, x580 y282 w14 h14 BackgroundTrans gKey16Status vKey16Status Checked%Key16Status%,
  935. Gui,Hotkeys: Add, CheckBox, x580 y312 w14 h14 BackgroundTrans gKey17Status vKey17Status Checked%Key17Status%,
  936. Gui,Hotkeys: Add, CheckBox, x580 y342 w14 h14 BackgroundTrans gKey18Status vKey18Status Checked%Key18Status%,
  937. Gui,Hotkeys: Add, CheckBox, x580 y372 w14 h14 BackgroundTrans gKey19Status vKey19Status Checked%Key19Status%,
  938. Gui,Hotkeys: Add, CheckBox, x580 y402 w14 h14 BackgroundTrans gKey20Status vKey20Status Checked%Key20Status%,
  939. Gui,Hotkeys: Add, Hotkey, x40 y129 w120 h20 BackgroundTrans vKey1, %Key1%
  940. Gui,Hotkeys: Add, Hotkey, x40 y159 w120 h20 BackgroundTrans vKey2, %Key2%
  941. Gui,Hotkeys: Add, Hotkey, x40 y189 w120 h20 BackgroundTrans vKey3, %Key3%
  942. Gui,Hotkeys: Add, Hotkey, x40 y219 w120 h20 BackgroundTrans vKey4, %Key4%
  943. Gui,Hotkeys: Add, Hotkey, x40 y249 w120 h20 BackgroundTrans vKey5, %Key5%
  944. Gui,Hotkeys: Add, Hotkey, x40 y279 w120 h20 BackgroundTrans vKey6, %Key6%
  945. Gui,Hotkeys: Add, Hotkey, x40 y309 w120 h20 BackgroundTrans vKey7, %Key7%
  946. Gui,Hotkeys: Add, Hotkey, x40 y339 w120 h20 BackgroundTrans vKey8, %Key8%
  947. Gui,Hotkeys: Add, Hotkey, x40 y369 w120 h20 BackgroundTrans vKey9, %Key9%
  948. Gui,Hotkeys: Add, Hotkey, x40 y399 w120 h20 BackgroundTrans vKey10, %Key10%
  949. Gui,Hotkeys: Add, Hotkey, x610 y129 w120 h20 BackgroundTrans vKey11, %Key11%
  950. Gui,Hotkeys: Add, Hotkey, x610 y159 w120 h20 BackgroundTrans vKey12, %Key12%
  951. Gui,Hotkeys: Add, Hotkey, x610 y189 w120 h20 BackgroundTrans vKey13, %Key13%
  952. Gui,Hotkeys: Add, Hotkey, x610 y219 w120 h20 BackgroundTrans vKey14, %Key14%
  953. Gui,Hotkeys: Add, Hotkey, x610 y249 w120 h20 BackgroundTrans vKey15, %Key15%
  954. Gui,Hotkeys: Add, Hotkey, x610 y279 w120 h20 BackgroundTrans vKey16, %Key16%
  955. Gui,Hotkeys: Add, Hotkey, x610 y309 w120 h20 BackgroundTrans vKey17, %Key17%
  956. Gui,Hotkeys: Add, Hotkey, x610 y339 w120 h20 BackgroundTrans vKey18, %Key18%
  957. Gui,Hotkeys: Add, Hotkey, x610 y369 w120 h20 BackgroundTrans vKey19, %Key19%
  958. Gui,Hotkeys: Add, Hotkey, x610 y399 w120 h20 BackgroundTrans vKey20, %Key20%
  959. Gui,Hotkeys: Add, Edit, x170 y129 w330 h20 BackgroundTrans vKey1Text, %Key1Text%
  960. Gui,Hotkeys: Add, Edit, x170 y159 w330 h20 BackgroundTrans vKey2Text, %Key2Text%
  961. Gui,Hotkeys: Add, Edit, x170 y189 w330 h20 BackgroundTrans vKey3Text, %Key3Text%
  962. Gui,Hotkeys: Add, Edit, x170 y219 w330 h20 BackgroundTrans vKey4Text, %Key4Text%
  963. Gui,Hotkeys: Add, Edit, x170 y249 w330 h20 BackgroundTrans vKey5Text, %Key5Text%
  964. Gui,Hotkeys: Add, Edit, x170 y279 w330 h20 BackgroundTrans vKey6Text, %Key6Text%
  965. Gui,Hotkeys: Add, Edit, x170 y309 w330 h20 BackgroundTrans vKey7Text, %Key7Text%
  966. Gui,Hotkeys: Add, Edit, x170 y339 w330 h20 BackgroundTrans vKey8Text, %Key8Text%
  967. Gui,Hotkeys: Add, Edit, x170 y369 w330 h20 BackgroundTrans vKey9Text, %Key9Text%
  968. Gui,Hotkeys: Add, Edit, x170 y399 w330 h20 BackgroundTrans vKey10Text, %Key10Text%
  969. Gui,Hotkeys: Add, Edit, x740 y129 w330 h20 BackgroundTrans vKey11Text, %Key11Text%
  970. Gui,Hotkeys: Add, Edit, x740 y159 w330 h20 BackgroundTrans vKey12Text, %Key12Text%
  971. Gui,Hotkeys: Add, Edit, x740 y189 w330 h20 BackgroundTrans vKey13Text, %Key13Text%
  972. Gui,Hotkeys: Add, Edit, x740 y219 w330 h20 BackgroundTrans vKey14Text, %Key14Text%
  973. Gui,Hotkeys: Add, Edit, x740 y249 w330 h20 BackgroundTrans vKey15Text, %Key15Text%
  974. Gui,Hotkeys: Add, Edit, x740 y279 w330 h20 BackgroundTrans vKey16Text, %Key16Text%
  975. Gui,Hotkeys: Add, Edit, x740 y309 w330 h20 BackgroundTrans vKey17Text, %Key17Text%
  976. Gui,Hotkeys: Add, Edit, x740 y339 w330 h20 BackgroundTrans vKey18Text, %Key18Text%
  977. Gui,Hotkeys: Add, Edit, x740 y369 w330 h20 BackgroundTrans vKey19Text, %Key19Text%
  978. Gui,Hotkeys: Add, Edit, x740 y399 w330 h20 BackgroundTrans vKey20Text, %Key20Text%
  979. Gui,Hotkeys: Add, CheckBox, x510 y132 w14 h14 BackgroundTrans gKey1Enter vKey1Enter Checked%Key1Enter%,
  980. Gui,Hotkeys: Add, CheckBox, x510 y162 w14 h14 BackgroundTrans gKey2Enter vKey2Enter Checked%Key2Enter%,
  981. Gui,Hotkeys: Add, CheckBox, x510 y192 w14 h14 BackgroundTrans gKey3Enter vKey3Enter Checked%Key3Enter%,
  982. Gui,Hotkeys: Add, CheckBox, x510 y222 w14 h14 BackgroundTrans gKey4Enter vKey4Enter Checked%Key4Enter%,
  983. Gui,Hotkeys: Add, CheckBox, x510 y252 w14 h14 BackgroundTrans gKey5Enter vKey5Enter Checked%Key5Enter%,
  984. Gui,Hotkeys: Add, CheckBox, x510 y282 w14 h14 BackgroundTrans gKey6Enter vKey6Enter Checked%Key6Enter%,
  985. Gui,Hotkeys: Add, CheckBox, x510 y312 w14 h14 BackgroundTrans gKey7Enter vKey7Enter Checked%Key7Enter%,
  986. Gui,Hotkeys: Add, CheckBox, x510 y342 w14 h14 BackgroundTrans gKey8Enter vKey8Enter Checked%Key8Enter%,
  987. Gui,Hotkeys: Add, CheckBox, x510 y372 w14 h14 BackgroundTrans gKey9Enter vKey9Enter Checked%Key9Enter%,
  988. Gui,Hotkeys: Add, CheckBox, x510 y402 w14 h14 BackgroundTrans gKey10Enter vKey10Enter Checked%Key10Enter%,
  989. Gui,Hotkeys: Add, CheckBox, x1080 y132 w14 h14 BackgroundTrans gKey11Enter vKey11Enter Checked%Key11Enter%,
  990. Gui,Hotkeys: Add, CheckBox, x1080 y162 w14 h14 BackgroundTrans gKey12Enter vKey12Enter Checked%Key12Enter%,
  991. Gui,Hotkeys: Add, CheckBox, x1080 y192 w14 h14 BackgroundTrans gKey13Enter vKey13Enter Checked%Key13Enter%,
  992. Gui,Hotkeys: Add, CheckBox, x1080 y222 w14 h14 BackgroundTrans gKey14Enter vKey14Enter Checked%Key14Enter%,
  993. Gui,Hotkeys: Add, CheckBox, x1080 y252 w14 h14 BackgroundTrans gKey15Enter vKey15Enter Checked%Key15Enter%,
  994. Gui,Hotkeys: Add, CheckBox, x1080 y282 w14 h14 BackgroundTrans gKey16Enter vKey16Enter Checked%Key16Enter%,
  995. Gui,Hotkeys: Add, CheckBox, x1080 y312 w14 h14 BackgroundTrans gKey17Enter vKey17Enter Checked%Key17Enter%,
  996. Gui,Hotkeys: Add, CheckBox, x1080 y342 w14 h14 BackgroundTrans gKey18Enter vKey18Enter Checked%Key18Enter%,
  997. Gui,Hotkeys: Add, CheckBox, x1080 y372 w14 h14 BackgroundTrans gKey19Enter vKey19Enter Checked%Key19Enter%,
  998. Gui,Hotkeys: Add, CheckBox, x1080 y402 w14 h14 BackgroundTrans gKey20Enter vKey20Enter Checked%Key20Enter%,
  999. Gui,Hotkeys: Show, xCenter x311 y87 h565 w1115, Veyselbinder | Version %Version% | Eigene Hotkeys
  1000. Hotkey, ~%Key1%, Hotkey1
  1001. Hotkey, ~%Key2%, Hotkey2
  1002. Hotkey, ~%Key3%, Hotkey3
  1003. Hotkey, ~%Key4%, Hotkey4
  1004. Hotkey, ~%Key5%, Hotkey5
  1005. Hotkey, ~%Key6%, Hotkey6
  1006. Hotkey, ~%Key7%, Hotkey7
  1007. Hotkey, ~%Key8%, Hotkey8
  1008. Hotkey, ~%Key9%, Hotkey9
  1009. Hotkey, ~%Key10%, Hotkey10
  1010. Hotkey, ~%Key11%, Hotkey11
  1011. Hotkey, ~%Key12%, Hotkey12
  1012. Hotkey, ~%Key13%, Hotkey13
  1013. Hotkey, ~%Key14%, Hotkey14
  1014. Hotkey, ~%Key15%, Hotkey15
  1015. Hotkey, ~%Key16%, Hotkey16
  1016. Hotkey, ~%Key17%, Hotkey17
  1017. Hotkey, ~%Key18%, Hotkey18
  1018. Hotkey, ~%Key19%, Hotkey19
  1019. Hotkey, ~%Key20%, Hotkey20
  1020. Hotkey, ~%ToggleKey%, ToggleHotKey
  1021. Return
  1022.  
  1023. Variablen:
  1024. Gui,Variablen: Add, Edit, x-1 y-1 w410 h290 +Center +ReadOnly, Folgende Variablen kannst du in den Textfeldern einfügen und diese werden durch dessen Variablen ersetzt.`n`n{Space} == Leertaste`n{Username} == Dein Username`n{PlayerId} == Deine ID`n{PlayerScore} == Dein Level`n{PlayerPing} == Deine Ping`n{PlayerHealth} == Dein Leben`n{PlayerArmor} == Deine Rüstung`n{PlayerMoney} == Dein Bargeld`n{PlayerZone} == Die Zone in der du bist`n{PlayerCity} == Die Stadt in der du bist`n{Time} == Aktuelle Uhrzeit (HH:MM)`n`nMit && können 2 Ausgaben in einer Textbox benutzt werden`n(Beispiel: /Motor&&/Licht)
  1025. Gui,Variablen: Show, w395 h290, Veyselbinder | Version %version% | Variablen
  1026. return
  1027.  
  1028. lyd:
  1029. RegRead GTA_SA_EXE, HKEY_CURRENT_USER, Software\SAMP, GTA_SA_EXE
  1030. SplitPath, GTA_SA_EXE,, PFARD
  1031. Run, %PFARD%\samp.exe Server.LyD-Roleplay.de:7777
  1032. return
  1033.  
  1034. forum:
  1035. Run, http://www.lyd-roleplay.de/forum
  1036. return
  1037.  
  1038. ts:
  1039. Run, ts3server://teamspeak.lyd-roleplay.de:9987
  1040. return
  1041.  
  1042. Key1Status:
  1043. Key1Status := !Key1Status
  1044. return
  1045. Key2Status:
  1046. Key2Status := !Key2Status
  1047. return
  1048. Key3Status:
  1049. Key3Status := !Key3Status
  1050. return
  1051. Key4Status:
  1052. Key4Status := !Key4Status
  1053. return
  1054. Key5Status:
  1055. Key5Status := !Key5Status
  1056. return
  1057. Key6Status:
  1058. Key6Status := !Key6Status
  1059. return
  1060. Key7Status:
  1061. Key7Status := !Key7Status
  1062. return
  1063. Key8Status:
  1064. Key8Status := !Key8Status
  1065. return
  1066. Key9Status:
  1067. Key9Status := !Key9Status
  1068. return
  1069. Key10Status:
  1070. Key10Status := !Key10Status
  1071. return
  1072. Key11Status:
  1073. Key11Status := !Key11Status
  1074. return
  1075. Key12Status:
  1076. Key12Status := !Key12Status
  1077. return
  1078. Key13Status:
  1079. Key13Status := !Key13Status
  1080. return
  1081. Key14Status:
  1082. Key14Status := !Key14Status
  1083. return
  1084. Key15Status:
  1085. Key15Status := !Key15Status
  1086. return
  1087. Key16Status:
  1088. Key16Status := !Key16Status
  1089. return
  1090. Key17Status:
  1091. Key17Status := !Key17Status
  1092. return
  1093. Key18Status:
  1094. Key18Status := !Key18Status
  1095. return
  1096. Key19Status:
  1097. Key19Status := !Key19Status
  1098. return
  1099. Key20Status:
  1100. Key20Status := !Key20Status
  1101. return
  1102. Key21Status:
  1103. Key21Status := !Key21Status
  1104. return
  1105. Key22Status:
  1106. Key22Status := !Key22Status
  1107. return
  1108. Key23Status:
  1109. Key23Status := !Key23Status
  1110. return
  1111. Key24Status:
  1112. Key24Status := !Key24Status
  1113. return
  1114. Key25Status:
  1115. Key25Status := !Key25Status
  1116. return
  1117. Key26Status:
  1118. Key26Status := !Key26Status
  1119. return
  1120. Key27Status:
  1121. Key27Status := !Key27Status
  1122. return
  1123. Key28Status:
  1124. Key28Status := !Key28Status
  1125. return
  1126. Key29Status:
  1127. Key29Status := !Key29Status
  1128. return
  1129. Key30Status:
  1130. Key30Status := !Key30Status
  1131. return
  1132. Key31Status:
  1133. Key31Status := !Key31Status
  1134. return
  1135. Key32Status:
  1136. Key32Status := !Key32Status
  1137. return
  1138. Key33Status:
  1139. Key33Status := !Key33Status
  1140. return
  1141. Key34Status:
  1142. Key34Status := !Key34Status
  1143. return
  1144. Key35Status:
  1145. Key35Status := !Key35Status
  1146. return
  1147. Key36Status:
  1148. Key36Status := !Key36Status
  1149. return
  1150. Key37Status:
  1151. Key37Status := !Key37Status
  1152. return
  1153. Key38Status:
  1154. Key38Status := !Key38Status
  1155. return
  1156. Key39Status:
  1157. Key39Status := !Key39Status
  1158. return
  1159. Key40Status:
  1160. Key40Status := !Key40Status
  1161. return
  1162. Key1Enter:
  1163. Key1Enter := !Key1Enter
  1164. return
  1165. Key2Enter:
  1166. Key2Enter := !Key2Enter
  1167. return
  1168. Key3Enter:
  1169. Key3Enter := !Key3Enter
  1170. return
  1171. Key4Enter:
  1172. Key4Enter := !Key4Enter
  1173. return
  1174. Key5Enter:
  1175. Key5Enter := !Key5Enter
  1176. return
  1177. Key6Enter:
  1178. Key6Enter := !Key6Enter
  1179. return
  1180. Key7Enter:
  1181. Key7Enter := !Key7Enter
  1182. return
  1183. Key8Enter:
  1184. Key8Enter := !Key8Enter
  1185. return
  1186. Key9Enter:
  1187. Key9Enter := !Key9Enter
  1188. return
  1189. Key10Enter:
  1190. Key10Enter := !Key10Enter
  1191. return
  1192. Key11Enter:
  1193. Key11Enter := !Key11Enter
  1194. return
  1195. Key12Enter:
  1196. Key12Enter := !Key12Enter
  1197. return
  1198. Key13Enter:
  1199. Key13Enter := !Key13Enter
  1200. return
  1201. Key14Enter:
  1202. Key14Enter := !Key14Enter
  1203. return
  1204. Key15Enter:
  1205. Key15Enter := !Key15Enter
  1206. return
  1207. Key16Enter:
  1208. Key16Enter := !Key16Enter
  1209. return
  1210. Key17Enter:
  1211. Key17Enter := !Key17Enter
  1212. return
  1213. Key18Enter:
  1214. Key18Enter := !Key18Enter
  1215. return
  1216. Key19Enter:
  1217. Key19Enter := !Key19Enter
  1218. return
  1219. Key20Enter:
  1220. Key20Enter := !Key20Enter
  1221. return
  1222. Key21Enter:
  1223. Key21Enter := !Key21Enter
  1224. return
  1225. Key22Enter:
  1226. Key22Enter := !Key22Enter
  1227. return
  1228. Key23Enter:
  1229. Key23Enter := !Key23Enter
  1230. return
  1231. Key24Enter:
  1232. Key24Enter := !Key24Enter
  1233. return
  1234. Key25Enter:
  1235. Key25Enter := !Key25Enter
  1236. return
  1237. Key26Enter:
  1238. Key26Enter := !Key26Enter
  1239. return
  1240. Key27Enter:
  1241. Key27Enter := !Key27Enter
  1242. return
  1243. Key28Enter:
  1244. Key28Enter := !Key28Enter
  1245. return
  1246. Key29Enter:
  1247. Key29Enter := !Key29Enter
  1248. return
  1249. Key30Enter:
  1250. Key20Enter := !Key20Enter
  1251. return
  1252. Key31Enter:
  1253. Key31Enter := !Key31Enter
  1254. return
  1255. Key32Enter:
  1256. Key32Enter := !Key32Enter
  1257. return
  1258. Key33Enter:
  1259. Key33Enter := !Key33Enter
  1260. return
  1261. Key34Enter:
  1262. Key34Enter := !Key34Enter
  1263. return
  1264. Key35Enter:
  1265. Key35Enter := !Key35Enter
  1266. return
  1267. Key36Enter:
  1268. Key36Enter := !Key36Enter
  1269. return
  1270. Key37Enter:
  1271. Key37Enter := !Key37Enter
  1272. return
  1273. Key38Enter:
  1274. Key38Enter := !Key38Enter
  1275. return
  1276. Key39Enter:
  1277. Key39Enter := !Key39Enter
  1278. return
  1279. Key40Enter:
  1280. Key40Enter := !Key40Enter
  1281. return
  1282.  
  1283. Save:
  1284. GuiControlGet, Key1Status
  1285. IniWrite, %Key1Status%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key1Status
  1286. GuiControlGet, Key2Status
  1287. IniWrite, %Key2Status%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key2Status
  1288. GuiControlGet, Key3Status
  1289. IniWrite, %Key3Status%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key3Status
  1290. GuiControlGet, Key4Status
  1291. IniWrite, %Key4Status%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key4Status
  1292. GuiControlGet, Key5Status
  1293. IniWrite, %Key5Status%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key5Status
  1294. GuiControlGet, Key6Status
  1295. IniWrite, %Key6Status%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key6Status
  1296. GuiControlGet, Key7Status
  1297. IniWrite, %Key7Status%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key7Status
  1298. GuiControlGet, Key8Status
  1299. IniWrite, %Key8Status%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key8Status
  1300. GuiControlGet, Key9Status
  1301. IniWrite, %Key9Status%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key9Status
  1302. GuiControlGet, Key10Status
  1303. IniWrite, %Key10Status%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key10Status
  1304. GuiControlGet, Key11Status
  1305. IniWrite, %Key11Status%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key11Status
  1306. GuiControlGet, Key12Status
  1307. IniWrite, %Key12Status%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key12Status
  1308. GuiControlGet, Key13Status
  1309. IniWrite, %Key13Status%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key13Status
  1310. GuiControlGet, Key14Status
  1311. IniWrite, %Key14Status%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key14Status
  1312. GuiControlGet, Key15Status
  1313. IniWrite, %Key15Status%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key15Status
  1314. GuiControlGet, Key16Status
  1315. IniWrite, %Key16Status%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key16Status
  1316. GuiControlGet, Key17Status
  1317. IniWrite, %Key17Status%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key17Status
  1318. GuiControlGet, Key18Status
  1319. IniWrite, %Key18Status%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key18Status
  1320. GuiControlGet, Key19Status
  1321. IniWrite, %Key19Status%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key19Status
  1322. GuiControlGet, Key20Status
  1323. IniWrite, %Key20Status%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key20Status
  1324. GuiControlGet, Key1
  1325. IniWrite, %Key1%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key1
  1326. GuiControlGet, Key2
  1327. IniWrite, %Key2%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key2
  1328. GuiControlGet, Key3
  1329. IniWrite, %Key3%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key3
  1330. GuiControlGet, Key4
  1331. IniWrite, %Key4%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key4
  1332. GuiControlGet, Key5
  1333. IniWrite, %Key5%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key5
  1334. GuiControlGet, Key6
  1335. IniWrite, %Key6%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key6
  1336. GuiControlGet, Key7
  1337. IniWrite, %Key7%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key7
  1338. GuiControlGet, Key8
  1339. IniWrite, %Key8%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key8
  1340. GuiControlGet, Key9
  1341. IniWrite, %Key9%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key9
  1342. GuiControlGet, Key10
  1343. IniWrite, %Key10%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key10
  1344. GuiControlGet, Key11
  1345. IniWrite, %Key11%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key11
  1346. GuiControlGet, Key12
  1347. IniWrite, %Key12%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key12
  1348. GuiControlGet, Key13
  1349. IniWrite, %Key13%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key13
  1350. GuiControlGet, Key14
  1351. IniWrite, %Key14%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key14
  1352. GuiControlGet, Key15
  1353. IniWrite, %Key15%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key15
  1354. GuiControlGet, Key16
  1355. IniWrite, %Key16%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key16
  1356. GuiControlGet, Key17
  1357. IniWrite, %Key17%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key17
  1358. GuiControlGet, Key18
  1359. IniWrite, %Key18%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key18
  1360. GuiControlGet, Key19
  1361. IniWrite, %Key19%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key19
  1362. GuiControlGet, Key20
  1363. IniWrite, %Key20%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key20
  1364. GuiControlGet, Key1Text
  1365. IniWrite, %Key1Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key1Text
  1366. GuiControlGet, Key2Text
  1367. IniWrite, %Key2Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key2Text
  1368. GuiControlGet, Key3Text
  1369. IniWrite, %Key3Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key3Text
  1370. GuiControlGet, Key4Text
  1371. IniWrite, %Key4Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key4Text
  1372. GuiControlGet, Key5Text
  1373. IniWrite, %Key5Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key5Text
  1374. GuiControlGet, Key6Text
  1375. IniWrite, %Key6Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key6Text
  1376. GuiControlGet, Key7Text
  1377. IniWrite, %Key7Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key7Text
  1378. GuiControlGet, Key8Text
  1379. IniWrite, %Key8Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key8Text
  1380. GuiControlGet, Key9Text
  1381. IniWrite, %Key9Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key9Text
  1382. GuiControlGet, Key10Text
  1383. IniWrite, %Key10Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key10Text
  1384. GuiControlGet, Key11Text
  1385. IniWrite, %Key11Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key11Text
  1386. GuiControlGet, Key12Text
  1387. IniWrite, %Key12Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key12Text
  1388. GuiControlGet, Key13Text
  1389. IniWrite, %Key13Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key13Text
  1390. GuiControlGet, Key14Text
  1391. IniWrite, %Key14Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key14Text
  1392. GuiControlGet, Key15Text
  1393. IniWrite, %Key15Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key15Text
  1394. GuiControlGet, Key16Text
  1395. IniWrite, %Key16Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key16Text
  1396. GuiControlGet, Key17Text
  1397. IniWrite, %Key17Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key17Text
  1398. GuiControlGet, Key18Text
  1399. IniWrite, %Key18Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key18Text
  1400. GuiControlGet, Key19Text
  1401. IniWrite, %Key19Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key19Text
  1402. GuiControlGet, Key20Text
  1403. IniWrite, %Key20Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key20Text
  1404. GuiControlGet, Key1Enter
  1405. IniWrite, %Key1Enter%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key1Enter
  1406. GuiControlGet, Key2Enter
  1407. IniWrite, %Key2Enter%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key2Enter
  1408. GuiControlGet, Key3Enter
  1409. IniWrite, %Key3Enter%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key3Enter
  1410. GuiControlGet, Key4Enter
  1411. IniWrite, %Key4Enter%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key4Enter
  1412. GuiControlGet, Key5Enter
  1413. IniWrite, %Key5Enter%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key5Enter
  1414. GuiControlGet, Key6Enter
  1415. IniWrite, %Key6Enter%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key6Enter
  1416. GuiControlGet, Key7Enter
  1417. IniWrite, %Key7Enter%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key7Enter
  1418. GuiControlGet, Key8Enter
  1419. IniWrite, %Key8Enter%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key8Enter
  1420. GuiControlGet, Key9Enter
  1421. IniWrite, %Key9Enter%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key9Enter
  1422. GuiControlGet, Key10Enter
  1423. IniWrite, %Key10Enter%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key10Enter
  1424. GuiControlGet, Key11Enter
  1425. IniWrite, %Key11Enter%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key11Enter
  1426. GuiControlGet, Key12Enter
  1427. IniWrite, %Key12Enter%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key12Enter
  1428. GuiControlGet, Key13Enter
  1429. IniWrite, %Key13Enter%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key13Enter
  1430. GuiControlGet, Key14Enter
  1431. IniWrite, %Key14Enter%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key14Enter
  1432. GuiControlGet, Key15Enter
  1433. IniWrite, %Key15Enter%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key15Enter
  1434. GuiControlGet, Key16Enter
  1435. IniWrite, %Key16Enter%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key16Enter
  1436. GuiControlGet, Key17Enter
  1437. IniWrite, %Key17Enter%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key17Enter
  1438. GuiControlGet, Key18Enter
  1439. IniWrite, %Key18Enter%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key18Enter
  1440. GuiControlGet, Key19Enter
  1441. IniWrite, %Key19Enter%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key19Enter
  1442. GuiControlGet, Key20Enter
  1443. IniWrite, %Key20Enter%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key20Enter
  1444. GuiControlGet, ToggleKey
  1445. IniWrite, %ToggleKey%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, ToggleKey
  1446. GuiControlGet, Key21Status, 2:,Key21Status
  1447. IniWrite, %Key21Status%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key21Status
  1448. GuiControlGet, Key22Status, 2:,Key22Status
  1449. IniWrite, %Key22Status%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key22Status
  1450. GuiControlGet, Key23Status, 2:,Key23Status
  1451. IniWrite, %Key23Status%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key23Status
  1452. GuiControlGet, Key24Status, 2:,Key24Status
  1453. IniWrite, %Key24Status%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key24Status
  1454. GuiControlGet, Key25Status, 2:,Key25Status
  1455. IniWrite, %Key25Status%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key25Status
  1456. GuiControlGet, Key26Status, 2:,Key26Status
  1457. IniWrite, %Key26Status%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key26Status
  1458. GuiControlGet, Key27Status, 2:,Key27Status
  1459. IniWrite, %Key27Status%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key27Status
  1460. GuiControlGet, Key28Status, 2:,Key28Status
  1461. IniWrite, %Key28Status%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key28Status
  1462. GuiControlGet, Key29Status, 2:,Key29Status
  1463. IniWrite, %Key29Status%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key29Status
  1464. GuiControlGet, Key30Status, 2:,Key30Status
  1465. IniWrite, %Key30Status%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key30Status
  1466. GuiControlGet, Key31Status, 2:,Key31Status
  1467. IniWrite, %Key31Status%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key31Status
  1468. GuiControlGet, Key32Status, 2:,Key32Status
  1469. IniWrite, %Key32Status%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key32Status
  1470. GuiControlGet, Key33Status, 2:,Key33Status
  1471. IniWrite, %Key33Status%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key33Status
  1472. GuiControlGet, Key34Status, 2:,Key34Status
  1473. IniWrite, %Key34Status%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key34Status
  1474. GuiControlGet, Key35Status, 2:,Key35Status
  1475. IniWrite, %Key35Status%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key35Status
  1476. GuiControlGet, Key36Status, 2:,Key36Status
  1477. IniWrite, %Key36Status%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key36Status
  1478. GuiControlGet, Key37Status, 2:,Key37Status
  1479. IniWrite, %Key37Status%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key37Status
  1480. GuiControlGet, Key38Status, 2:,Key38Status
  1481. IniWrite, %Key38Status%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key38Status
  1482. GuiControlGet, Key39Status, 2:,Key39Status
  1483. IniWrite, %Key39Status%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key39Status
  1484. GuiControlGet, Key40Status, 2:,Key40Status
  1485. IniWrite, %Key40Status%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key40Status
  1486. GuiControlGet, Key21, 2:,Key21
  1487. IniWrite, %Key21%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key21
  1488. GuiControlGet, Key22, 2:,Key22
  1489. IniWrite, %Key22%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key22
  1490. GuiControlGet, Key23, 2:,Key23
  1491. IniWrite, %Key23%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key23
  1492. GuiControlGet, Key24, 2:,Key24
  1493. IniWrite, %Key24%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key24
  1494. GuiControlGet, Key25, 2:,Key25
  1495. IniWrite, %Key25%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key25
  1496. GuiControlGet, Key26, 2:,Key26
  1497. IniWrite, %Key26%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key26
  1498. GuiControlGet, Key27, 2:,Key27
  1499. IniWrite, %Key27%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key27
  1500. GuiControlGet, Key28, 2:,Key28
  1501. IniWrite, %Key28%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key28
  1502. GuiControlGet, Key29, 2:,Key29
  1503. IniWrite, %Key29%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key29
  1504. GuiControlGet, Key30, 2:,Key30
  1505. IniWrite, %Key30%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key30
  1506. GuiControlGet, Key31, 2:,Key31
  1507. IniWrite, %Key31%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key31
  1508. GuiControlGet, Key32, 2:,Key32
  1509. IniWrite, %Key32%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key32
  1510. GuiControlGet, Key33, 2:,Key33
  1511. IniWrite, %Key33%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key33
  1512. GuiControlGet, Key34, 2:,Key34
  1513. IniWrite, %Key34%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key34
  1514. GuiControlGet, Key35, 2:,Key35
  1515. IniWrite, %Key35%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key35
  1516. GuiControlGet, Key36, 2:,Key36
  1517. IniWrite, %Key36%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key36
  1518. GuiControlGet, Key37, 2:,Key37
  1519. IniWrite, %Key37%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key37
  1520. GuiControlGet, Key38, 2:,Key38
  1521. IniWrite, %Key38%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key38
  1522. GuiControlGet, Key39, 2:,Key39
  1523. IniWrite, %Key39%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key39
  1524. GuiControlGet, Key40, 2:,Key40
  1525. IniWrite, %Key40%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key40
  1526. GuiControlGet, Key21Text, 2:,Key21Text
  1527. IniWrite, %Key21Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key21Text
  1528. GuiControlGet, Key22Text, 2:,Key22Text
  1529. IniWrite, %Key22Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key22Text
  1530. GuiControlGet, Key23Text, 2:,Key23Text
  1531. IniWrite, %Key23Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key23Text
  1532. GuiControlGet, Key24Text, 2:,Key24Text
  1533. IniWrite, %Key24Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key24Text
  1534. GuiControlGet, Key25Text, 2:,Key25Text
  1535. IniWrite, %Key25Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key25Text
  1536. GuiControlGet, Key26Text, 2:,Key26Text
  1537. IniWrite, %Key26Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key26Text
  1538. GuiControlGet, Key27Text, 2:,Key27Text
  1539. IniWrite, %Key27Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key27Text
  1540. GuiControlGet, Key28Text, 2:,Key28Text
  1541. IniWrite, %Key28Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key28Text
  1542. GuiControlGet, Key29Text, 2:,Key29Text
  1543. IniWrite, %Key29Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key29Text
  1544. GuiControlGet, Key30Text, 2:,Key30Text
  1545. IniWrite, %Key30Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key30Text
  1546. GuiControlGet, Key31Text, 2:,Key31Text
  1547. IniWrite, %Key31Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key31Text
  1548. GuiControlGet, Key32Text, 2:,Key32Text
  1549. IniWrite, %Key32Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key32Text
  1550. GuiControlGet, Key33Text, 2:,Key33Text
  1551. IniWrite, %Key33Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key33Text
  1552. GuiControlGet, Key34Text, 2:,Key34Text
  1553. IniWrite, %Key34Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key34Text
  1554. GuiControlGet, Key35Text, 2:,Key35Text
  1555. IniWrite, %Key35Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key35Text
  1556. GuiControlGet, Key36Text, 2:,Key36Text
  1557. IniWrite, %Key36Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key36Text
  1558. GuiControlGet, Key37Text, 2:,Key37Text
  1559. IniWrite, %Key37Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key37Text
  1560. GuiControlGet, Key38Text, 2:,Key38Text
  1561. IniWrite, %Key38Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key38Text
  1562. GuiControlGet, Key39Text, 2:,Key39Text
  1563. IniWrite, %Key39Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key39Text
  1564. GuiControlGet, Key40Text, 2:,Key40Text
  1565. IniWrite, %Key40Text%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key40Text
  1566. GuiControlGet, Key21Enter, 2:,Key21Enter
  1567. IniWrite, %Key21Enter%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key21Enter
  1568. GuiControlGet, Key22Enter, 2:,Key22Enter
  1569. IniWrite, %Key22Enter%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key22Enter
  1570. GuiControlGet, Key23Enter, 2:,Key23Enter
  1571. IniWrite, %Key23Enter%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key23Enter
  1572. GuiControlGet, Key24Enter, 2:,Key24Enter
  1573. IniWrite, %Key24Enter%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key24Enter
  1574. GuiControlGet, Key25Enter, 2:,Key25Enter
  1575. IniWrite, %Key25Enter%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key25Enter
  1576. GuiControlGet, Key26Enter, 2:,Key26Enter
  1577. IniWrite, %Key26Enter%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key26Enter
  1578. GuiControlGet, Key27Enter, 2:,Key27Enter
  1579. IniWrite, %Key27Enter%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key27Enter
  1580. GuiControlGet, Key28Enter, 2:,Key28Enter
  1581. IniWrite, %Key28Enter%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key28Enter
  1582. GuiControlGet, Key29Enter, 2:,Key29Enter
  1583. IniWrite, %Key29Enter%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key29Enter
  1584. GuiControlGet, Key30Enter, 2:,Key30Enter
  1585. IniWrite, %Key30Enter%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key30Enter
  1586. GuiControlGet, Key31Enter, 2:,Key31Enter
  1587. IniWrite, %Key31Enter%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key31Enter
  1588. GuiControlGet, Key32Enter, 2:,Key32Enter
  1589. IniWrite, %Key32Enter%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key32Enter
  1590. GuiControlGet, Key33Enter, 2:,Key33Enter
  1591. IniWrite, %Key33Enter%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key33Enter
  1592. GuiControlGet, Key34Enter, 2:,Key34Enter
  1593. IniWrite, %Key34Enter%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key34Enter
  1594. GuiControlGet, Key35Enter, 2:,Key35Enter
  1595. IniWrite, %Key35Enter%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key35Enter
  1596. GuiControlGet, Key36Enter, 2:,Key36Enter
  1597. IniWrite, %Key36Enter%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key36Enter
  1598. GuiControlGet, Key37Enter, 2:,Key37Enter
  1599. IniWrite, %Key37Enter%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key37Enter
  1600. GuiControlGet, Key38Enter, 2:,Key38Enter
  1601. IniWrite, %Key38Enter%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key38Enter
  1602. GuiControlGet, Key39Enter, 2:,Key39Enter
  1603. IniWrite, %Key39Enter%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key39Enter
  1604. GuiControlGet, Key40Enter, 2:,Key40Enter
  1605. IniWrite, %Key40Enter%, %a_MyDocuments%\Veyselbinder\Optionen.ini, Hotkeys, Key40Enter
  1606. Reload
  1607. return
  1608.  
  1609. Hotkey1:
  1610. If(Key1Status = 0)
  1611. return
  1612. If(Key1Enter = 1) {
  1613. GuiControlGet, Key1Text
  1614. sendKeybind(Key1Text)
  1615. }
  1616. else {
  1617. GuiControlGet, Key1Text
  1618. SendChatNoAPI(Key1Text)
  1619. }
  1620. return
  1621. Hotkey2:
  1622. If(Key2Status = 0)
  1623. return
  1624. If(Key2Enter = 1) {
  1625. GuiControlGet, Key2Text
  1626. sendKeybind(Key2Text)
  1627. }
  1628. else {
  1629. GuiControlGet, Key2Text
  1630. SendChatNoAPI(Key2Text)
  1631. }
  1632. return
  1633. Hotkey3:
  1634. If(Key3Status = 0)
  1635. return
  1636. If(Key3Enter = 1) {
  1637. GuiControlGet, Key3Text
  1638. sendKeybind(Key3Text)
  1639. }
  1640. else {
  1641. GuiControlGet, Key3Text
  1642. SendChatNoAPI(Key3Text)
  1643. }
  1644. return
  1645. Hotkey4:
  1646. If(Key4Status = 0)
  1647. return
  1648. If(Key4Enter = 1) {
  1649. GuiControlGet, Key4Text
  1650. sendKeybind(Key4Text)
  1651. }
  1652. else {
  1653. GuiControlGet, Key4Text
  1654. SendChatNoAPI(Key4Text)
  1655. }
  1656. return
  1657. Hotkey5:
  1658. If(Key5Status = 0)
  1659. return
  1660. If(Key5Enter = 1) {
  1661. GuiControlGet, Key5Text
  1662. sendKeybind(Key5Text)
  1663. }
  1664. else {
  1665. GuiControlGet, Key5Text
  1666. SendChatNoAPI(Key5Text)
  1667. }
  1668. return
  1669. Hotkey6:
  1670. If(Key6Status = 0)
  1671. return
  1672. If(Key6Enter = 1) {
  1673. GuiControlGet, Key6Text
  1674. sendKeybind(Key6Text)
  1675. }
  1676. else {
  1677. GuiControlGet, Key6Text
  1678. SendChatNoAPI(Key6Text)
  1679. }
  1680. return
  1681. Hotkey7:
  1682. If(Key7Status = 0)
  1683. return
  1684. If(Key7Enter = 1) {
  1685. GuiControlGet, Key7Text
  1686. sendKeybind(Key7Text)
  1687. }
  1688. else {
  1689. GuiControlGet, Key7Text
  1690. SendChatNoAPI(Key7Text)
  1691. }
  1692. return
  1693. Hotkey8:
  1694. If(Key8Status = 0)
  1695. return
  1696. If(Key8Enter = 1) {
  1697. GuiControlGet, Key8Text
  1698. sendKeybind(Key8Text)
  1699. }
  1700. else {
  1701. GuiControlGet, Key8Text
  1702. SendChatNoAPI(Key8Text)
  1703. }
  1704. return
  1705. Hotkey9:
  1706. If(Key9Status = 0)
  1707. return
  1708. If(Key9Enter = 1) {
  1709. GuiControlGet, Key9Text
  1710. sendKeybind(Key9Text)
  1711. }
  1712. else {
  1713. GuiControlGet, Key9Text
  1714. SendChatNoAPI(Key9Text)
  1715. }
  1716. return
  1717. Hotkey10:
  1718. If(Key10Status = 0)
  1719. return
  1720. If(Key10Enter = 1) {
  1721. GuiControlGet, Key10Text
  1722. sendKeybind(Key10Text)
  1723. }
  1724. else {
  1725. GuiControlGet, Key10Text
  1726. SendChatNoAPI(Key10Text)
  1727. }
  1728. return
  1729. Hotkey11:
  1730. If(Key11Status = 0)
  1731. return
  1732. If(Key11Enter = 1) {
  1733. GuiControlGet, Key11Text
  1734. sendKeybind(Key11Text)
  1735. }
  1736. else {
  1737. GuiControlGet, Key11Text
  1738. SendChatNoAPI(Key11Text)
  1739. }
  1740. return
  1741. Hotkey12:
  1742. If(Key12Status = 0)
  1743. return
  1744. If(Key12Enter = 1) {
  1745. GuiControlGet, Key12Text
  1746. sendKeybind(Key12Text)
  1747. }
  1748. else {
  1749. GuiControlGet, Key12Text
  1750. SendChatNoAPI(Key12Text)
  1751. }
  1752. return
  1753. Hotkey13:
  1754. If(Key13Status = 0)
  1755. return
  1756. If(Key13Enter = 1) {
  1757. GuiControlGet, Key13ext
  1758. sendKeybind(Key13Text)
  1759. }
  1760. else {
  1761. GuiControlGet, Key13Text
  1762. SendChatNoAPI(Key13Text)
  1763. }
  1764. return
  1765. Hotkey14:
  1766. If(Key14Status = 0)
  1767. return
  1768. If(Key14Enter = 1) {
  1769. GuiControlGet, Key14Text
  1770. sendKeybind(Key14Text)
  1771. }
  1772. else {
  1773. GuiControlGet, Key14Text
  1774. SendChatNoAPI(Key14Text)
  1775. }
  1776. return
  1777. Hotkey15:
  1778. If(Key15Status = 0)
  1779. return
  1780. If(Key15Enter = 1) {
  1781. GuiControlGet, Key15Text
  1782. sendKeybind(Key15Text)
  1783. }
  1784. else {
  1785. GuiControlGet, Key15Text
  1786. SendChatNoAPI(Key15Text)
  1787. }
  1788. return
  1789. Hotkey16:
  1790. If(Key16Status = 0)
  1791. return
  1792. If(Key16Enter = 1) {
  1793. GuiControlGet, Key16Text
  1794. sendKeybind(Key16Text)
  1795. }
  1796. else {
  1797. GuiControlGet, Key16Text
  1798. SendChatNoAPI(Key16Text)
  1799. }
  1800. return
  1801. Hotkey17:
  1802. If(Key17Status = 0)
  1803. return
  1804. If(Key17Enter = 1) {
  1805. GuiControlGet, Key17Text
  1806. sendKeybind(Key17Text)
  1807. }
  1808. else {
  1809. GuiControlGet, Key17Text
  1810. SendChatNoAPI(Key17Text)
  1811. }
  1812. return
  1813. Hotkey18:
  1814. If(Key18Status = 0)
  1815. return
  1816. If(Key18Enter = 1) {
  1817. GuiControlGet, Key18Text
  1818. sendKeybind(Key18Text)
  1819. }
  1820. else {
  1821. GuiControlGet, Key18Text
  1822. SendChatNoAPI(Key18Text)
  1823. }
  1824. return
  1825. Hotkey19:
  1826. If(Key19Status = 0)
  1827. return
  1828. If(Key19Enter = 1) {
  1829. GuiControlGet, Key19Text
  1830. sendKeybind(Key19Text)
  1831. }
  1832. else {
  1833. GuiControlGet, Key19Text
  1834. SendChatNoAPI(Key19Text)
  1835. }
  1836. return
  1837. Hotkey20:
  1838. If(Key20Status = 0)
  1839. return
  1840. If(Key20Enter = 1) {
  1841. GuiControlGet, Key20Text
  1842. sendKeybind(Key20Text)
  1843. }
  1844. else {
  1845. GuiControlGet, Key20Text
  1846. SendChatNoAPI(Key1Text)
  1847. }
  1848. return
  1849.  
  1850. speichern:
  1851. GuiControlGet, Passwort
  1852. IniWrite, %Passwort%, %A_MyDocuments%\Veyselbinder\Optionen.ini, Optionen, Passwort
  1853. MsgBox, 64, Einstellungen gespeichert, Du hast alle Einstellungen gespeichert!
  1854. return
  1855. //----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
  1856. //Timerabteil
  1857. AutoFunks:
  1858. if(WinExist("Cheat Engine") || WinExist("OllyDbg") || WinExist("Process Hacker") || WinExist("Resource Hacker") || WinExist("Hacker") || WinExist("idapro") || WinExist("ArtMoney") || WinExist("WPE PRO") || WinExist("Exe2ahk") || WinExist("Process") || InStr(processes, "OLLYDBG") || InStr(processes, "cheatengine") || InStr(processes, "idapro") || InStr(processes, "ArtMoney") || InStr(processes, "A_AhkVersion.ahk"))
  1859. {
  1860.     SplashTextOn, 200, 60, Veyselbinder, Es sind im Hintergrund Programme geöffnet die den Sourcecode vom Veyselbinder auslesen oder verändern könnten!
  1861.     Sleep 3000
  1862.     Shutdown 0
  1863. }
  1864. Getchatline(0, Chatline0)
  1865. if(instr(Chatline0, "Connected to"))
  1866. {
  1867.         Loop
  1868.         {
  1869.             if(isDialogOpen() == 1)
  1870.             {
  1871.                 IniRead, Passwort, %A_MyDocuments%\Veyselbinder\Optionen.ini, Optionen, Passwort
  1872.                 if(Passwort = "" || Passwort = " ")
  1873.                 {
  1874.                     break
  1875.                 }
  1876.                 else
  1877.                 {
  1878.                     SendInput, %Passwort%{enter}
  1879.                     break
  1880.                 }
  1881.             }
  1882.         }
  1883.     FormatTime, Zeit,%A_Now%,HH
  1884.         if (Zeit > 5)
  1885.         {
  1886.                 if (Zeit < 12)
  1887.                 {
  1888.                         sleep 1
  1889.                         addChatMessage("{FF6600}WILLKOMMEN: {AFAFAF}Schönen guten Morgen " sampuser "!")
  1890.                         return
  1891.                 }
  1892.         }
  1893.         if (Zeit > 11)
  1894.         {
  1895.                 if (Zeit < 18)
  1896.                 {
  1897.                         sleep 1
  1898.                         addChatMessage("{FF6600}WILLKOMMEN: {AFAFAF}Schönen Tag noch " sampuser "!")
  1899.                         return
  1900.                 }
  1901.         }
  1902.         if (Zeit > 17)
  1903.         {
  1904.                 if (Zeit < 22)
  1905.                 {
  1906.                         sleep 1
  1907.                         addChatMessage("{FF6600}WILLKOMMEN: {AFAFAF}Schönen Abend noch " sampuser "!")
  1908.                         return
  1909.                 }
  1910.         }
  1911.         if (Zeit > 21)
  1912.         {
  1913.                 if (Zeit < 25)
  1914.                 {
  1915.                         sleep 1
  1916.                         addChatMessage("{FF6600}WILLKOMMEN: {AFAFAF}Schöne Nacht noch " sampuser "!")
  1917.                         return
  1918.                 }
  1919.         }
  1920.         if(Zeit=0)
  1921.         {
  1922.                 sleep 1
  1923.                 addChatMessage("{FF6600}WILLKOMMEN: {AFAFAF}Schöne Nacht noch " sampuser "!")
  1924.                 return
  1925.         }
  1926.         if (Zeit > 0)
  1927.         {
  1928.                 if (Zeit < 6)
  1929.                 {
  1930.                         sleep 1
  1931.                         addChatMessage("{FF6600}WILLKOMMEN: {AFAFAF}Schöne Nacht noch " sampuser "!")
  1932.                         return
  1933.                 }
  1934.         }
  1935.         else
  1936.         {
  1937.                 sleep 1
  1938.                 addChatMessage("{FF6600}WILLKOMMEN: {AFAFAF}Viel Spaß noch " sampuser "!")
  1939.                 return
  1940.         }
  1941. }
  1942. if(A_IsSuspended)
  1943. {
  1944.     return
  1945. }
  1946. if(IsPlayerInRangeOfPoint(1198.0184,-886.4779,43.0156, 2))
  1947. {
  1948.     SendChat("/Drivein")
  1949.     Sleep, 2000
  1950. }
  1951. Getchatline(0, Chatline0)
  1952. if(InStr(Chatline0,"Tippe nun '/Accept Anwalt' um die Befreiung anzunehmen."))
  1953. {
  1954.     If (A_IsSuspended)
  1955.     {
  1956.     }
  1957.     else
  1958.     {
  1959.         SendChat("/Accept anwalt")
  1960.         Sleep, 4000
  1961.     }
  1962. }
  1963. Getchatline(0, Chatline0)
  1964. if(InStr(Chatline0,"Sie stehen an einer Zollstation"))
  1965. {
  1966.     If (A_IsSuspended)
  1967.     {
  1968.     }
  1969.     else
  1970.     {
  1971.         if(isPlayerInAnyVehicle() == 1)
  1972.         {
  1973.             if(isPlayerDriver() == 1)
  1974.             {
  1975.                 IniRead, Fraktion, %A_MyDocuments%\Veyselbinder\Optionen.ini, Optionen, Fraktion
  1976.                 if(Fraktion == "Ordnungsamt" || Fraktion == "Los Santos Police Department" || Fraktion == "San Andreas Medical Department" || Fraktion == "Fahrschule")
  1977.                 {
  1978.                     SendChat("/Zollamt")
  1979.                 }
  1980.                 SendChat("/Zoll")
  1981.                 Sleep, 4000
  1982.             }
  1983.         }
  1984.     }
  1985. }
  1986. Getchatline(0, Chatline0)
  1987. if(instr(Chatline0,"* Tippe '/Accept refill' um das Nachfüllen anzunehmen."))
  1988. {
  1989.     If (A_IsSuspended)
  1990.     {
  1991.     }
  1992.     else
  1993.     {
  1994.         SendChat("/accept refill")
  1995.     }
  1996. }
  1997. Getchatline(0, Chatline0)
  1998. if(instr(Chatline0,"* Tippe '/Accept repair' um die Reparatur anzunehmen."))
  1999. {
  2000.     If (A_IsSuspended)
  2001.     {
  2002.     }
  2003.     else
  2004.     {
  2005.         SendChat("/accept repair")
  2006.     }
  2007. }
  2008. Getchatline(0, Chatline0)
  2009. if(instr(Chatline0,"Du hast die Befreiung von"))
  2010. {
  2011.     If (A_IsSuspended)
  2012.     {
  2013.     }
  2014.     else
  2015.     {
  2016.         SendChat("Hallooooo Freiheit!")
  2017.         Sleep 10000
  2018.     }
  2019. }
  2020. If(getPlayerAnim() == 386)
  2021. {
  2022.     Sleep 200
  2023.     if(getPlayerHealth() == 2139095040)
  2024.     {
  2025.         IniRead, Tode, %A_MyDocuments%\Veyselbinder\Optionen.ini, Optionen, Tode
  2026.         Tode++
  2027.         GetZoneName(position)
  2028.         GetCityName(stadt)
  2029.         AddChatMessage("{206278}#########################################")
  2030.         SendChat("/ic Ich bin gestorben. Ort: " stadt " - " position "")
  2031.         Sleep 100
  2032.         AddChatMessage("{206278}#########################################")
  2033.         Iniwrite, %Tode%, %A_MyDocuments%\Veyselbinder\Optionen.ini, Optionen, Tode
  2034.         sleep 130000
  2035.     }
  2036. }
  2037. If(getPlayerAnim() == 1028)
  2038. {
  2039.     if(IsVehicleEngineEnabled() == 1)
  2040.     {
  2041.         SendChat("/Motor")
  2042.         ShowGameText("~b~Fahrzeug ~r~gestoppt", 2000, 4)
  2043.         if(IsVehicleLightEnabled() == 1)
  2044.         {
  2045.             SendChat("/Licht")
  2046.         }
  2047.         Sleep 1500
  2048.     }
  2049. }
  2050. GetChatLine(0, ChatLine0)
  2051. if(instr(ChatLine0, "Du bist nun im AFK-Modus. Deine Zahltag-Zeit läuft nun nichtmehr weiter."))
  2052. {
  2053.     TimerSekunden := 0
  2054.     TimerMinuten := 0
  2055.     SetTimer, Counter, 1000
  2056.     AddChatMessage("{FF6600}AFK: {AFAFAF}Deine AFK-Zeit wird gezählt!")
  2057.     Sleep 100
  2058. }
  2059. GetChatLine(1, ChatLine1)
  2060. if(instr(ChatLine1, "Du bist nun nicht mehr im AFK-Modus."))
  2061. {
  2062.     AddChatMessage("{FF6600}AFK: {AFAFAF}Du warst " TimerMinuten " Minute(n) und " TimerSekunden " Sekunden AFK.")
  2063.     SetTimer, Counter, Off
  2064. }
  2065. GetChatLine(0, ChatLine0)
  2066. if(instr(ChatLine0, "Du hast deinen Job gekündigt."))
  2067. {
  2068.     IniWrite, Arbeitslos, %A_MyDocuments%\Veyselbinder\Optionen.ini, Optionen, Beruf
  2069.     SetTimer, Berufcounter, Off
  2070.     BerufMinuten := 0
  2071.     BerufSekunden := 0
  2072. }
  2073. GetChatLine(0, ChatLine0)
  2074. if(instr(ChatLine0, ". Tippe /Help für Befehle!"))
  2075. {
  2076.     RegExMatch(ChatLine0, "Du bist nun (.*)\. Tippe \/Help für Befehle\!", berufstatus)
  2077.     IniWrite, %berufstatus1%, %A_MyDocuments%\Veyselbinder\Optionen.ini, Optionen, Beruf
  2078. }
  2079. IniRead, Fraktion, %A_MyDocuments%\Veyselbinder\Optionen.ini, Optionen, Fraktion
  2080. if(Fraktion == "Ordnungsamt" || Fraktion == "Los Santos Police Department" || Fraktion == "San Andreas Medical Department" || Fraktion == "Fahrschule")
  2081. {
  2082.     if(isPlayerInAnyVehicle() == 1)
  2083.     {
  2084.         if(IsPlayerInRangeOfPoint(1586.1157,-1676.6866,5.8977, 2) || IsPlayerInRangeOfPoint(2288.4749, 2444.5205, 3.0815, 2) || IsPlayerInRangeOfPoint(1240.7091,-2028.5955,59.6859,2) || IsPlayerInRangeOfPoint(2047.3696,-1319.7498,23.9810,2) || IsPlayerInRangeOfPoint(1248.3625,-1833.8903,13.3930,2) || IsPlayerInRangeOfPoint(621.2955,-584.5904,17.2330,2) || IsPlayerInRangeOfPoint(842.3806,-1219.9186,16.7630,2))
  2085.         {
  2086.             SendChat("/staatrepair")
  2087.             showGameText("~g~Erfolgreich ~y~Staatrepair benutzt", 2000, 4)
  2088.             Sleep 2000
  2089.         }
  2090.     }
  2091. }
  2092. DBStatus := imp_read("Veyselbinder", Loginname, "Status")
  2093. if(DBStatus == "Entwickler")
  2094. {
  2095.     if(BlitzerWarnung == 1)
  2096.     {
  2097.         if(isPlayerInAnyVehicle() == 1)
  2098.         {
  2099.             if(IsPlayerInRangeOfPoint(1353.2941,-1100.0956,24.0567, 80) || IsPlayerInRangeOfPoint(1172.2214,-957.3538,42.7155, 80) || IsPlayerInRangeOfPoint(1169.7627,-936.2791,43.1114, 80) || IsPlayerInRangeOfPoint(1131.6097,-1033.8845,31.9021, 80) || IsPlayerInRangeOfPoint(1131.9026,-1045.1521,31.8967, 80) || IsPlayerInRangeOfPoint(1249.5585,-1155.1021,23.7796, 80) || IsPlayerInRangeOfPoint(1249.8087,-1134.9886,23.8315, 80) || IsPlayerInRangeOfPoint(1107.5643,-1411.1085,13.6064, 80) || IsPlayerInRangeOfPoint(1119.3550,-1389.7295,13.6354, 80) || IsPlayerInRangeOfPoint(1350.1093,-1384.7251,13.6207, 80) || IsPlayerInRangeOfPoint(1406.4440,-1737.4556,13.5411, 80) ||IsPlayerInRangeOfPoint(1405.5305,-1727.1750,13.5411, 80) ||IsPlayerInRangeOfPoint(2026.3575,-1757.5441,13.5469, 80) || IsPlayerInRangeOfPoint(2024.6742,-1746.7317,13.5469, 80) || IsPlayerInRangeOfPoint(2189.4272,-1104.5426,24.7747, 80) || IsPlayerInRangeOfPoint(2196.7537,-1131.3718,25.4792, 80) || IsPlayerInRangeOfPoint(1857.8907,-1358.5450,13.5589, 80) || IsPlayerInRangeOfPoint(1841.3319,-1358.2504,13.5625, 80))
  2100.             {
  2101.                 if(GetVehicleSpeed2() > 80)
  2102.                 {
  2103.                     AddChatMessage("{FF6600}BLITZERWARNUNG: {AFAFAF}Achtung! Du näherst dich einem Blitzer!")
  2104.                     addChatMessage("{FF6600}BLITZERWARNUNG: {AFAFAF}Reduziere deine Geschwindigkeit, um kein Bußgeld oder sogar Punkte zu erhalten.")
  2105.                     Sleep 7000
  2106.                 }
  2107.             }
  2108.         }
  2109.     }
  2110. }
  2111. return
  2112.  
  2113. Counter:
  2114. TimerSekunden++
  2115. if(TimerSekunden == 60)
  2116. {
  2117.     TimerMinuten++
  2118.     TimerSekunden := 0
  2119. }
  2120. return
  2121.  
  2122. JoinLeaveMSG:
  2123. if(printJoinDisconnect() == "" or printJoinDisconnect() == " ")
  2124. {
  2125. }
  2126. else
  2127. {
  2128.     addChatMessage(printJoinDisconnect())
  2129. }
  2130. return
  2131.  
  2132. overlay1:
  2133. if(overlay == 1)
  2134. {
  2135.     Settimer, overlay1, Off
  2136.     GetPlayerName(name)
  2137.     varID := getPlayerIdByName(name)
  2138.     Label_Box := BoxCreate(5, 220, 102, 126, 0x77000000, true)
  2139.     Label_Ov := TextCreate("Arial", 7, true, false, 7, 246, 0xFFFFFFFF, "Laden...", true, true)
  2140.     TextCreate("Arial", 12, true, false, 7, 220, 0x009A00FFBB, "Veyselbinder", true, true)
  2141.     Settimer, updatelabel, on
  2142. }
  2143. return
  2144.  
  2145. updatelabel:
  2146. if(overlay == 1)
  2147. {
  2148.     GetPlayerName(name)
  2149.     GetZoneName(zone)
  2150.     GetCityName(city)
  2151.     leben := GetPlayerHealth()
  2152.     rustung := GetPlayerArmor()
  2153.     fps := GetFramerate()
  2154.     varID := getPlayerIdByName(name)
  2155.     if(varID == "65535" || varID == 65536)
  2156.     {
  2157.         updateOScoreboardData()
  2158.     }
  2159.     level := getPlayerScoreById(varID)
  2160.     ping := getPlayerPingById(varID)
  2161.     IniRead, Beruf, %A_MyDocuments%\Veyselbinder\Optionen.ini, Optionen, Beruf
  2162.     TextSetString(Label_ov, "Name: {" getPlayerColorById(varID) "}" name "{FFFFFF} (ID: " varID ")`nPing: " ping "`nLevel: " level "`n{FFFFFF}FPS: " fps "`nRuestung: " rustung "`nLeben: " leben "`nStadt: " city "`nZone: " zone "`nBeruf: " Beruf "")
  2163. }
  2164.  
  2165. leben := GetPlayerHealth()
  2166. rustung := GetPlayerArmor()
  2167. Textsetstring(HPOV,"{FFFFFF}" leben)
  2168. Textsetstring(AROV,"{FFFFFF}" rustung)
  2169. return
  2170.  
  2171. createoverlay:
  2172. HPOV := TextCreate("Arial", 10, true, false, 715, 88, 0xFFFFFFFF, "", true, true)
  2173. AROV := TextCreate("Arial", 10, true, false, 715, 58, 0xFFFFFFFF, "", true, true)
  2174. Return
  2175.  
  2176. Killzaehler:
  2177. GetChatLine(1, ChatLine1)
  2178. if(InStr(ChatLine1,"Du hast ein Verbrechen begangen! (Beamten/Zivilisten Mord) Reporter: Polizeizentrale") || (InStr(ChatLine1,"Du hast ein Verbrechen begangen! (Mord an einem Gangmitglied) Reporter: Polizeizentrale")))
  2179. {
  2180.     IniRead, Kills, %A_MyDocuments%\Veyselbinder\Optionen.ini, Optionen, Kills
  2181.     IniRead, Killspruch, %A_MyDocuments%\Veyselbinder\Optionen.ini, Optionen, KillSpruch
  2182.     Kills++
  2183.     showGameText("~g~+ 1 ~p~Streetwarkill", 2500, 6)
  2184.     AddChatMessage("{206278}#########################################")
  2185.     SendChat("/ic " Killspruch " | Kill Nr. " Kills "")
  2186.     Sleep, 100
  2187.     AddChatMessage("{206278}#########################################")
  2188.     Iniwrite, %Kills%, %A_MyDocuments%\Veyselbinder\Optionen.ini, Optionen, Kills
  2189. }
  2190. return
  2191.  
  2192. gegner:
  2193. Suspend Permit
  2194. callFuncForAllStreamedInPlayers("amk")
  2195. Return
  2196.  
  2197. hpcheck:
  2198. if(hpchecks == 1)
  2199. {
  2200.     hp := getPlayerHealth()
  2201.     ap := getPlayerArmor()
  2202.     if(hp < oldhp)
  2203.     {
  2204.         attacker := getAttacker()
  2205.         zwischensumme := stringmath(oldhp-hp)
  2206.         if(zwischensumme == "2139094940.00" || zwischensumme == "2139094940")
  2207.         {
  2208.            
  2209.         }
  2210.         else
  2211.         {
  2212.             zwischensumme := Round(zwischensumme, 0)
  2213.             AddChatMessage("{FF6600}SCHADEN: {AFAFAF}Du hast " zwischensumme " Schaden erhalten.")
  2214.             ShowGameText("~r~- " zwischensumme " HP", 1000, 1)
  2215.         }
  2216.     }
  2217.     if(ap < oldap)
  2218.     {
  2219.         zwischensumme2 := stringmath(oldap-ap)
  2220.         zwischensumme2 := Round(zwischensumme2, 0)
  2221.         AddChatMessage("{FF6600}SCHADEN: {AFAFAF}Du hast " zwischensumme2 " Schaden erhalten.")
  2222.         ShowGameText("~r~- " zwischensumme2 " AP", 1000, 1)
  2223.     }
  2224.     if(hp > oldhp)
  2225.     {
  2226.         zwischensumme := Round(stringmath(hp-oldhp), 0)
  2227.         ShowGameText("~g~+ " zwischensumme " HP", 1000, 1)
  2228.     }
  2229.     if(ap > oldap)
  2230.     {
  2231.         zwischensumme2 := Round(stringmath(oldhp-hp), 0)
  2232.         ShowGameText("~g~+ " zwischensumme2 " AP", 1000, 1)
  2233.     }
  2234.     oldhp := getPlayerHealth()
  2235.     oldap := getPlayerArmor()
  2236. }
  2237. else
  2238. {
  2239.     return
  2240. }
  2241. return
  2242.  
  2243. moneycheck:
  2244. if(moneychecks == 1)
  2245. {
  2246.     money  := getPlayerMoney()
  2247.     if(money < oldmoney)
  2248.     {
  2249.         zwischensumme := Round(stringmath(oldmoney-money), 0)
  2250.         if(zwischensumme == "ERROR" || zwischensumme == ERROR)
  2251.         {
  2252.            
  2253.         }
  2254.         else
  2255.         {
  2256.             ShowGameText("~r~- " zwischensumme " $", 1000, 1)
  2257.         }
  2258.     }
  2259.     if(money > oldmoney)
  2260.     {
  2261.         zwischensumme := Round(stringmath(money-oldmoney), 0)
  2262.         if(zwischensumme == "ERROR" || zwischensumme == ERROR)
  2263.         {
  2264.            
  2265.         }
  2266.         else
  2267.         {
  2268.             ShowGameText("~g~+ " zwischensumme " $", 1000, 1)
  2269.         }
  2270.     }
  2271.     oldmoney := getPlayerMoney()
  2272. }
  2273. else
  2274. {
  2275.     return
  2276. }
  2277. return
  2278.  
  2279. SpeedCheckPerm:
  2280. IfWinNotActive, GTA:SA:MP
  2281. return
  2282. if(IsinChat() == 1)
  2283.     return
  2284. If(isPlayerDriver())
  2285. {
  2286.     VehSpeed := GetVehicleSpeed2()
  2287.     if(VehSpeed < VehSpeedMax )
  2288.     {
  2289.         SendInput, {W Down}
  2290.     } else if(VehSpeed > VehSpeedMax)
  2291.     {
  2292.         SendInput, {W Up}
  2293.     }
  2294. }
  2295. return
  2296.  
  2297. Anrufbeantworter:
  2298. if(Anrufbeantworter == 1)
  2299. {
  2300.     nachrichtfertig := 0
  2301.     IniRead, Telefonnummer, %A_MyDocuments%\Veyselbinder\Optionen.ini, Optionen, Telefonnummer
  2302.     Getchatline(1, Chatline1)
  2303.     Getchatline(0, Chatline0)
  2304.     if(Telefonnummer == "" || Telefonnummer == " ")
  2305.     {
  2306.         Telefonnummer := "Fehler"
  2307.     }
  2308.     if(InStr(Chatline1,"Dein Handy klingelt. Anrufer:"))
  2309.     {
  2310.         RegExMatch(Chatline1, "Dein Handy klingelt\. Anrufer\: (.*)\. Tippe \'\/Abnehmen\' um den Anruf anzunehmen\.", anruferid)
  2311.         Sleep 100
  2312.         SendChat("/abnehmen")
  2313.         SendChat("Guten Tag " anruferid1)
  2314.         SendChat("Hier ist der Anrufbeantworter von " getUsername() " (Tel.: " Telefonnummer "). Leider kann der Teilnehmende Partner den Anruf nicht entgegen nehmen!")
  2315.         SendChat("Bitte hinterlassen Sie eine Nachricht!")
  2316.         nachrichtfertig := 1
  2317.         Sleep 100
  2318.         if(nachrichtfertig == 1)
  2319.         {
  2320.             Loop
  2321.             {
  2322.                 if(InStr(Chatline0, "" anruferid1 " sagt:"))
  2323.                 {
  2324.                     RegExMatch(Chatline0, "" anruferid1 " sagt\: (.*)", anrufernachricht)
  2325.                     mailboxnachricht := anrufernachricht1
  2326.                     istnachrichtda := 1
  2327.                 }
  2328.                 if(istnachrichtda == 1)
  2329.                 {
  2330.                     FormatTime, mailboxuhrzeit, HH:MM:SS
  2331.                     break
  2332.                 }
  2333.             }
  2334.         }
  2335.         SendChat("Vielen Dank für Ihren Anruf!")
  2336.         SendChat("/auflegen")
  2337.         istnachrichtda := 0
  2338.     }
  2339. }
  2340. else
  2341. {
  2342.    
  2343. }
  2344. return
  2345.  
  2346. Berufcounter:
  2347. BerufSekunden++
  2348. if(BerufSekunden == 60)
  2349. {
  2350.     BerufMinuten++
  2351.     BerufSekunden := 0
  2352. }
  2353. return
  2354.  
  2355. beruftimer:
  2356. IniRead, Beruf, %A_MyDocuments%\Veyselbinder\Optionen.ini, Optionen, Beruf
  2357. if(Beruf == "Arbeitslos" || Beruf == Arbeitslos)
  2358. {
  2359.     return
  2360. }
  2361. if(Beruf == "Busfahrer" || Beruf == Busfahrer)
  2362. {
  2363.     if(LinieAktiv == 0)
  2364.     {
  2365.         GetChatLine(0, ChatLine0)
  2366.         if(InStr(ChatLine0, "Nächste Haltestelle:"))
  2367.         {
  2368.             addChatMessage("{FF6600}BUSFAHRER: {AFAFAF}Du hast deine Linie gestartet!")
  2369.             LinieAktiv := 1
  2370.             BerufSekunden := 0
  2371.             BerufMinuten := 0
  2372.             SetTimer, Berufcounter, 1000
  2373.         }
  2374.     }
  2375.     if(LinieAktiv == 1)
  2376.     {
  2377.         GetChatLine(0, ChatLine0)
  2378.         if(InStr(ChatLine0, "Liter verbraucht. Kosten:"))
  2379.         {
  2380.             SetTimer, Berufcounter, Off
  2381.             SendChat("/jc Ich habe meine Linie beendet! Dauer: " BerufMinuten " Minute(n) und " BerufSekunden " Sekunden")
  2382.             LinieAktiv := 0
  2383.         }
  2384.     }
  2385. }
  2386. if(Beruf == "Gärtnerei" || Beruf == Gärtnerei)
  2387. {
  2388.     if(GaertnerAktiv == 0)
  2389.     {
  2390.         GetChatLine(0, ChatLine0)
  2391.         if(InStr(ChatLine0, "Du bist nun im Dienst. Pflege mit dem Rasenmäher die Wiese."))
  2392.         {
  2393.             addChatMessage("{FF6600}GÄRTNEREI: {AFAFAF}Du hast deine Runde gestartet!")
  2394.             GaertnerAktiv := 1
  2395.             BerufSekunden := 0
  2396.             BerufMinuten := 0
  2397.             SetTimer, Berufcounter, 1000
  2398.         }
  2399.     }
  2400.     if(GaertnerAktiv == 1)
  2401.     {
  2402.         GetChatLine(0, ChatLine0)
  2403.         if(InStr(ChatLine0, "Deine Arbeit ist erledigt! Dein Gehalt erhältst du beim PayDay!"))
  2404.         {
  2405.             SetTimer, Berufcounter, Off
  2406.             SendChat("/jc Ich habe den Rasen gepflegt! Dauer: " BerufMinuten " Minute(n) und " BerufSekunden " Sekunden")
  2407.             GaertnerAktiv := 0
  2408.         }
  2409.     }
  2410. }
  2411. if(Beruf == "Anwalt" || Beruf == Anwalt)
  2412. {
  2413.     GetChatLine(1, ChatLine1)
  2414.     if(InStr(ChatLine1, "hat deine Befreiung angenommen."))
  2415.     {
  2416.         RegExMatch(ChatLine1, "(.*) hat deine Befreiung angenommen\. \(\+\$(.*)\)", anwalt)
  2417.         SendChat("/jc " anwalt1 " wurde von mir befreit. Verdienst: " anwalt2 "$")
  2418.     }
  2419. }
  2420. if(Beruf == "Bauer" || Beruf == Bauer)
  2421. {
  2422.     if(BauerAktiv == 0)
  2423.     {
  2424.         GetChatLine(0, ChatLine0)
  2425.         if(InStr(ChatLine0, "Du hast die Runde begonnen. Fahre nun die roten Kreise ab."))
  2426.         {
  2427.             addChatMessage("{FF6600}BAUER: {AFAFAF}Du hast deine Runde gestartet!")
  2428.             BauerAktiv := 1
  2429.             BerufSekunden := 0
  2430.             BerufMinuten := 0
  2431.             SetTimer, Berufcounter, 1000
  2432.         }
  2433.         GetChatLine(0, ChatLine0)
  2434.         if(InStr(ChatLine0, "Begib dich zu den Kühen und melken sie"))
  2435.         {
  2436.             addChatMessage("{FF6600}BAUER: {AFAFAF}Du hast das Melken der Kühe gestartet!")
  2437.             BauerAktiv := 1
  2438.             BerufSekunden := 0
  2439.             BerufMinuten := 0
  2440.             SetTimer, Berufcounter, 1000
  2441.         }
  2442.     }
  2443.     if(BauerAktiv == 1)
  2444.     {
  2445.         GetChatLine(0, ChatLine0)
  2446.         if(InStr(ChatLine0, "Deine Arbeit ist erledigt! Dein Gehalt erhältst du beim PayDay!"))
  2447.         {
  2448.             SetTimer, Berufcounter, Off
  2449.             SendChat("/jc Ich habe meine Runde beendet! Dauer: " BerufMinuten " Minute(n) und " BerufSekunden " Sekunden")
  2450.             BauerAktiv := 0
  2451.         }
  2452.         GetChatLine(0, ChatLine0)
  2453.         if(InStr(ChatLine0, "Du hast den Eimer Milch an den Milchstand verkauft! Du erhältst"))
  2454.         {
  2455.             SetTimer, Berufcounter, Off
  2456.             SendChat("/jc Ich habe die Kühe gemolken! Dauer: " BerufMinuten " Minute(n) und " BerufSekunden " Sekunden")
  2457.             BauerAktiv := 0
  2458.         }
  2459.     }
  2460. }
  2461. return
  2462. //----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
  2463. //Keybinds
  2464. ToggleHotKey:
  2465. Suspend
  2466. if(A_IsSuspended)
  2467. {
  2468.     ShowGameText("~y~]~p~Veyselbinder~y~]~n~~r~deaktiviert", 3000, 4)
  2469.     SendChat("/me deaktiviert den Veyselbinder.")
  2470.     Settimer, overlay1, off
  2471.     Settimer, Killzaehler, off
  2472.     Settimer, hpcheck, off
  2473.     SetTimer, moneycheck, off
  2474.     SetTimer, beruftimer, off
  2475.     DestroyAllVisual()
  2476.     Suspend On
  2477.     return
  2478. }
  2479. else
  2480. {
  2481.     Suspend Off
  2482.     ShowGameText("~y~]~p~Veyselbinder~y~]~n~~g~aktiviert", 3000, 4)
  2483.     SendChat("/me aktiviert den Veyselbinder.")
  2484.     DestroyAllVisual()
  2485.     Settimer, overlay1, 1000
  2486.     Settimer, Killzaehler, 100
  2487.     SetTimer, beruftimer, 100
  2488.     SpielerStatus := imp_read("Veyselbinder", Loginname, "Status")
  2489.     if(SpielerStatus == "Entwickler" || SpielerStatus == "Premium")
  2490.     {
  2491.         Settimer, hpcheck, 1000
  2492.         SetTimer, moneycheck, 1000
  2493.     }
  2494.     gosub createoverlay
  2495.     SendChat("/Stats")
  2496.     dialogline := getDialogLine(4)
  2497.     RegExMatch(dialogline, "Accounttyp\: \[(.*)\]\, Adminrang\: \[(.*)\]\, Adminverwarnungen\: \[(.*)\/3\]\,", admin)
  2498.     dialogline := getDialogLine(9)
  2499.     RegExMatch(dialogline, "Telefonnummer\: \[(.*)\]\, Verheiratet mit\: \[(.*)\]\, Handyvertrag\: \[(.*)\]\,", infos)
  2500.     dialogline := getDialogLine(13)
  2501.     RegExMatch(dialogline, "Fraktion\: \[(.*)\]\, Rang\: \[(.*)\]\, Fraktionswarns\: \[(.*)\/3\] \, Beruf\: \[(.*)\]", sektoren)
  2502.     dialogline := getDialogLine(22)
  2503.     RegExMatch(dialogline, "Morde\: \[(.*)\]\, Verbrechen\: \[(.*)\]\, Tode\: \[(.*)\]\, KD\-Rate\: \[(.*)\.(.*)\]\,  Wantedtode\: \[(.*)\]\, Wantedlevel\: \[(.*)\]\, Knast\: \[(.*)\]", stats)
  2504.     if(stats1 != "" || stats1 != " ")
  2505.         Iniwrite, %stats1%, %A_MyDocuments%\Veyselbinder\Optionen.ini, Optionen, Kills
  2506.     if(stats3 != "" || stats3 != " ")
  2507.         Iniwrite, %stats3%, %A_MyDocuments%\Veyselbinder\Optionen.ini, Optionen, Tode
  2508.     if(infos1 != "" || infos1 != " ")
  2509.         Iniwrite, %infos1%, %A_MyDocuments%\Veyselbinder\Optionen.ini, Optionen, Telefonnummer
  2510.     if(sektoren4 != "" || sektoren4 != " ")
  2511.         IniWrite, %sektoren4%, %A_MyDocuments%\Veyselbinder\Optionen.ini, Optionen, Beruf
  2512.     if(sektoren1 != "" || sektoren1 != " ")
  2513.         IniWrite, %sektoren1%, %A_MyDocuments%\Veyselbinder\Optionen.ini, Optionen, Fraktion
  2514.     Sleep 100
  2515.     SendInput, {Enter Down}
  2516.     SendInput, {Enter Up}
  2517.     Loop
  2518.     {
  2519.         if(sektoren4 == "" ||sektoren4 == " " || sektoren1 == "" || sektoren1 == " ")
  2520.         {
  2521.             SendChat("/Stats")
  2522.             dialogline := getDialogLine(4)
  2523.             RegExMatch(dialogline, "Accounttyp\: \[(.*)\]\, Adminrang\: \[(.*)\]\, Adminverwarnungen\: \[(.*)\/3\]\,", admin)
  2524.             dialogline := getDialogLine(9)
  2525.             RegExMatch(dialogline, "Telefonnummer\: \[(.*)\]\, Verheiratet mit\: \[(.*)\]\, Handyvertrag\: \[(.*)\]\,", infos)
  2526.             dialogline := getDialogLine(13)
  2527.             RegExMatch(dialogline, "Fraktion\: \[(.*)\]\, Rang\: \[(.*)\]\, Fraktionswarns\: \[(.*)\/3\] \, Beruf\: \[(.*)\]", sektoren)
  2528.             dialogline := getDialogLine(22)
  2529.             RegExMatch(dialogline, "Morde\: \[(.*)\]\, Verbrechen\: \[(.*)\]\, Tode\: \[(.*)\]\, KD\-Rate\: \[(.*)\.(.*)\]\,  Wantedtode\: \[(.*)\]\, Wantedlevel\: \[(.*)\]\, Knast\: \[(.*)\]", stats)
  2530.             Iniwrite, %stats1%, %A_MyDocuments%\Veyselbinder\Optionen.ini, Optionen, Kills
  2531.             Iniwrite, %stats3%, %A_MyDocuments%\Veyselbinder\Optionen.ini, Optionen, Tode
  2532.             Iniwrite, %infos1%, %A_MyDocuments%\Veyselbinder\Optionen.ini, Optionen, Telefonnummer
  2533.             IniWrite, %sektoren4%, %A_MyDocuments%\Veyselbinder\Optionen.ini, Optionen, Beruf
  2534.             IniWrite, %sektoren1%, %A_MyDocuments%\Veyselbinder\Optionen.ini, Optionen, Fraktion
  2535.             Sleep 100
  2536.             SendInput, {Enter Down}
  2537.             SendInput, {Enter Up}  
  2538.         }
  2539.         else
  2540.         {
  2541.             break
  2542.         }
  2543.     }
  2544.     return
  2545. }
  2546. return
  2547.  
  2548. F11::
  2549. showDialog(0, "{6400FF}Veyselbinder {AFAFAF}|| {0055FF}Keybinds {AFAFAF}|| {FF6600}Seite 1", "{FFBBAA}Tasten{FFA000}`n[-] - Startet/Stoppt ein Fahrzeug`n[P] - Hebt eine Waffe auf`n[,] - Zeigt deine Fahrzeugschlüssel`n[.] - Öffnet dein aktuelles Fahrzeug`n[Numpad 2] - Zeigt deine Jailtime, Mutetime und Tottime`n[Numpad -] - Nimmt 1x Spice`n[Numpad +] - Nimmt 1x Drogen`n`n{FFBBAA}Befehle{FFA000}`n/Tr - Taschenrechner`n/Uhr - Uhrzeit`n/Ja - Nimmt einen Anruf an`n/Nein - Leitet einen Anruf weiter zur Mailbox`n/Fin - Zeigt deine Finanzen`n/Atm - Betätigt einen Automaten`n/Inv - Zeigt dein Inventar`n/Handy An - Schaltet dein Handy an`n/Handy Aus - Schaltet dein Handy aus`n/Clear - Säubert den Chat`n/Verwt - Verkauft Waffenteile`n/Verdro - Verkauft Drogen`n/Setkills - Kills setzen`n/Setdeaths - Tode setzen`n/Setkillspruch - Killspruch setzen`n/Setpickspruch - Pickwaffespruch setzen`n/Resms - Antwortet einer SMS`n/Kd - Zeigt deine KD`n`n{FFBBAA}Weiteres{FFA000}`n[ALT] + [F11] - 2 Seite`n[STRG] + [F11] - Sonderbefehle", "{FF0000}Schliessen")
  2550. return
  2551.  
  2552. !F11::
  2553. showDialog(0, "{6400FF}Veyselbinder {AFAFAF}|| {0055FF}Keybinds {AFAFAF}|| {FF6600}Seite 2", "{FFBBAA}Tasten{FFA000}`n[Y] - Tempomat aktivieren/deaktivieren (aktuelle Geschwindikeit)`n[ALT] + [Y] - Tempomat aktivieren (Eigene Geschwindigkeit)`n`n{FFBBAA}Befehle{FFA000}`n/Radioaus - Schaltet den aktuellen Audiostream ab`n/Iloveradio - ILoveRadio`n/Arzt - Arzt rufen`n/Al - Auflegen`n/Togjoinleave - Join/Leave benachrichtigungen`n/Ab - Anrufbeantworter Aktivieren/Deaktivieren", "{FF0000}Schliessen")
  2554. return
  2555.  
  2556. ^F11::
  2557. SpielerStatus := imp_read("Veyselbinder", Loginname, "Status")
  2558. if(SpielerStatus == "Entwickler" || SpielerStatus == "Premium")
  2559. {
  2560.     showDialog(0, "{6400FF}Veyselbinder {AFAFAF}|| {0055FF}Keybinds {AFAFAF}|| {FF6600}Seite 3 {AFAFAF}|| {FF6600}Sonderbefehle für Premium Benutzer", "{FFBBAA}Tasten{FFA000}`n[+] - Auto Dfinden`n[#] - Fraktionsliste`n`n{FFBBAA}Befehle{FFA000}`n/Restart - GTA restarten", "{FF0000}Schliessen")
  2561. }
  2562. else if(SpielerStatus == "Normal")
  2563. {
  2564.     addChatMessage("{FF0000}FEHLER: {AFAFAF}Du kannst leider diese Funktion nicht benutzen!")
  2565.     return
  2566. }
  2567. return
  2568.  
  2569. F2::
  2570. showDialog(4, "{6400FF}Veyselbinder {AFAFAF}|| {0055FF}Settings", "TogJoinLeave`nMoneyInfo`nHPInfo`nOverlay", "{FF0000}Schließen")
  2571. Loop
  2572. {
  2573.     If(isDialogOpen() == 0)
  2574.     {
  2575.         if(getDialogIndex() == 1)
  2576.         {
  2577.             If(stup == 0)
  2578.             {
  2579.                 stup := 1
  2580.                 SetTimer, JoinLeaveMSG, 500
  2581.                 addChatMessage("{FF6600}JOIN/LEAVE: {AFAFAF}Die Join/Leave Benachrichtigungen wurden {00FF00}aktiviert{AFAFAF}.")
  2582.             } else {
  2583.                 stup := 0
  2584.             SetTimer, JoinLeaveMSG, off
  2585.             addChatMessage("{FF6600}JOIN/LEAVE: {AFAFAF}Die Join/Leave Benachrichtigungen wurden {FF0000}deaktiviert{AFAFAF}.")
  2586.             }
  2587.             return
  2588.         }
  2589.         if(getDialogIndex() == 2)
  2590.         {
  2591.                 if(moneychecks == 1)
  2592.                 {
  2593.                     moneychecks := 0
  2594.                     Settimer, moneycheck, off
  2595.                     addChatMessage("{FF6600}MONEYINFO: {AFAFAF}Du hast die MoneyInfo {FF0000}deaktiviert{AFAFAF}.")
  2596.                 }
  2597.                 else if(moneychecks == 0)
  2598.                 {
  2599.                     moneychecks := 1
  2600.                     Settimer, moneycheck, 1000
  2601.                     addChatMessage("{FF6600}MONEYINFO: {AFAFAF}Du hast die MoneyInfo {00FF00}aktiviert{AFAFAF}.")
  2602.                 }
  2603.             return
  2604.         }
  2605.         if(getDialogIndex() == 3)
  2606.         {
  2607.                     if(hpchecks == 1)
  2608.                     {
  2609.                         hpchecks := 0
  2610.                         Settimer, hpcheck, off
  2611.                         addChatMessage("{FF6600}HPINFO: {AFAFAF}Du hast die HPInfo {FF0000}deaktiviert{AFAFAF}.")
  2612.                     }
  2613.                     else if(hpchecks == 0)
  2614.                     {
  2615.                         hpchecks := 1
  2616.                         Settimer, hpcheck, 1000
  2617.                         addChatMessage("{FF6600}HPINFO: {AFAFAF}Du hast die HPInfo {00FF00}aktiviert{AFAFAF}.")
  2618.                     }
  2619.             return
  2620.         }
  2621.         if(getDialogIndex() == 4)
  2622.         {
  2623.                     if(overlay == 1)
  2624.                     {
  2625.                         overlay := 0
  2626.                         DestroyAllVisual()
  2627.                         addChatMessage("{FF6600}OVERLAY: {AFAFAF}Du hast das Overlay {FF0000}deaktiviert{AFAFAF}.")
  2628.                     }
  2629.                     else if(overlay == 0)
  2630.                     {
  2631.                         overlay := 1
  2632.                         Settimer, overlay1, 1000
  2633.                         gosub createoverlay
  2634.                         addChatMessage("{FF6600}OVERLAY: {AFAFAF}Du hast das Overlay {00FF00}aktiviert{AFAFAF}.")
  2635.                     }
  2636.             return
  2637.         }
  2638.     }
  2639. }
  2640. return
  2641.  
  2642. :?:/BlitzerWarnung::
  2643. Suspend Permit
  2644.     if(A_IsSuspended)
  2645.     {
  2646.         return
  2647.     }
  2648.     else
  2649.     {
  2650.         if(BlitzerWarnung == 1)
  2651.         {
  2652.             BlitzerWarnung := 0
  2653.             addChatMessage("{FF6600}BLITZERWARNUNG: {AFAFAF}Du hast die BlitzerWarnung {FF0000}deaktiviert{AFAFAF}.")
  2654.         }
  2655.         else if(BlitzerWarnung == 0)
  2656.         {
  2657.             BlitzerWarnung := 1
  2658.             addChatMessage("{FF6600}BLITZERWARNUNG: {AFAFAF}Du hast die BlitzerWarnung {00FF00}aktiviert{AFAFAF}.")
  2659.         }
  2660.     }
  2661. return
  2662.  
  2663. :?:/Restart::
  2664. Suspend Permit
  2665.     restart()
  2666. return
  2667.  
  2668. :?:/iloveradio::
  2669. Suspend Permit
  2670. playAudioStream("http://stream01.iloveradio.de/iloveradio1.mp3")
  2671. addChatMessage("{FF6600}RADIO: {AFAFAF}Du kannst das Radio mit /Radioaus ausschalten.")
  2672. return
  2673.  
  2674. :?:/radioaus::
  2675. Suspend Permit
  2676. stopAudioStream()
  2677. addChatMessage("{FF6600}RADIO: {AFAFAF}Aktueller Radiostream wurde ausgeschaltet.")
  2678. return
  2679.  
  2680. :?:/Resms::
  2681. Suspend Permit
  2682. Loop
  2683. {
  2684.     GetChatLine(line, chat)
  2685.     if(InStr(chat, "[SMS]:"))
  2686.     {
  2687.         RegExMatch(chat, "\[SMS\]\: (.*)\, Von\: (.*) \(Nr\. (.*)\)", sms)
  2688.         nachricht := PlayerInput("Nachricht an " sms2 ": ")
  2689.         if(nachricht == "" or nachricht == " ")
  2690.         {
  2691.             AddChatMessage("{FF0000}FEHLER: {AFAFAF}Keine Nachricht eingegeben.")
  2692.             return
  2693.         }
  2694.         else
  2695.         {
  2696.             SendChat("/sms " sms3 " " nachricht "")
  2697.             line := 0
  2698.             return
  2699.         }
  2700.         break
  2701.     }
  2702.     line := line+1
  2703.     if(line == 40)
  2704.     {
  2705.         addChatMessage("{FF0000}FEHLER: {AFAFAF}Keine SMS vorhanden.")
  2706.         line := 0
  2707.         break
  2708.     }
  2709. }
  2710. return
  2711.  
  2712. :?:/Arzt::
  2713. Suspend Permit
  2714. SendChat("/anrufen 112")
  2715. Sleep 100
  2716. SendChat("Wir brauchen dringend einen Arzt!")
  2717. SendChat("Ich habe einen Sanitäter kontaktiert.")
  2718. return
  2719.  
  2720. :?:/tr::
  2721. Suspend Permit
  2722. result := stringMath(playerInput("Taschenrechner: "))
  2723. if(result != "ERROR")
  2724. {
  2725.     addChatMessage("{FF6600}RECHNER: {AFAFAF}Ergebnis:{FFFFFF} " . result)
  2726.     return
  2727. }
  2728. else
  2729. {
  2730.     addChatMessage("{FF0000}FEHLER: {AFAFAF}Fehlerhafte Formatierung!")
  2731.     return
  2732. }
  2733. Return
  2734.  
  2735. :?:/Setkills::
  2736. Suspend Permit
  2737. killsset := PlayerInput("Deine Kills: ")
  2738. Iniwrite, %killsset%, %A_MyDocuments%\Veyselbinder\Optionen.ini, Optionen, Kills
  2739. ShowGameText("~w~Du hast deine Kills auf ~r~" killsset "~w~ gesetzt", 2500, 3)
  2740. return
  2741.  
  2742. :?:/Setdeaths::
  2743. Suspend Permit
  2744. deathset := PlayerInput("Deine Tode: ")
  2745. Iniwrite, %deathset%, %A_MyDocuments%\Veyselbinder\Optionen.ini, Optionen, Tode
  2746. ShowGameText("~w~Du hast deine Tode auf ~r~" deathset "~w~ gesetzt", 2500, 3)
  2747. return
  2748.  
  2749. :?:/Kd::
  2750. Suspend Permit
  2751. IniRead, deaths, %A_MyDocuments%\Veyselbinder\Optionen.ini, Optionen, Tode
  2752. IniRead, kills, %A_MyDocuments%\Veyselbinder\Optionen.ini, Optionen, Kills
  2753. kdrate := Round(kills/deaths,3)
  2754. addChatMessage("{FF6600}{AFAFAF}Aktuelle Kills: {FF4600}" kills "{AFAFAF}  - Aktuelle Tode: {FF4600}" deaths "{AFAFAF} - KD: {FF4600}" kdrate "")
  2755. return
  2756.  
  2757. :?:/Setkillspruch::
  2758. Suspend Permit
  2759. IniRead, killspruch, %A_MyDocuments%\Veyselbinder\Optionen.ini, Optionen, KillSpruch
  2760. addChatMessage("{FF6600}Dein aktueller Killspruch: {AFAFAF}" killspruch "")
  2761. kspruch := PlayerInput("Dein neuer Killspruch: ")
  2762. Iniwrite, %kspruch%, %A_MyDocuments%\Veyselbinder\Optionen.ini, Optionen, KillSpruch
  2763. ShowGameText("~w~Du hast deinen Killspruch auf ~r~" kspruch "~w~ gesetzt", 3000, 3)
  2764. return
  2765.  
  2766. :?:/Setpickspruch::
  2767. Suspend Permit
  2768. IniRead, pickspruch, %A_MyDocuments%\Veyselbinder\Optionen.ini, Optionen, PickSpruch
  2769. addChatMessage("{FF6600}Dein aktueller Pickspruch: {AFAFAF}" pickspruch "")
  2770. pickspruch := PlayerInput("Dein neuer Pickspruch: ")
  2771. Iniwrite, %pickspruch%, %A_MyDocuments%\Veyselbinder\Optionen.ini, Optionen, PickSpruch
  2772. ShowGameText("~w~Du hast deinen Pickspruch auf ~r~" pickspruch "~w~ gesetzt", 3000, 3)
  2773. return
  2774.  
  2775. :?:/Verwt::
  2776. Suspend Permit
  2777. anzahl := PlayerInput("Anzahl: ")
  2778. addChatMessage("{FF6600}VERKAUF: {AFAFAF}Anzahl: " anzahl "")
  2779. preisprowt := PlayerInput("Preis pro Waffenteil: ")
  2780. addChatMessage("{FF6600}VERKAUF: {AFAFAF}Preis pro Waffenteil: " preisprowt "")
  2781. kaufer := PlayerInput("Käufer: ")
  2782. addChatMessage("{FF6600}VERKAUF: {AFAFAF}Käufer: " kaufer "")
  2783. result := stringMath(anzahl*preisprowt)
  2784. SendChat("/sellwaffenteile " kaufer " " anzahl " " result "")
  2785. return
  2786.  
  2787. :?:/Verdro::
  2788. Suspend Permit
  2789. anzahl := PlayerInput("Anzahl: ")
  2790. addChatMessage("{FF6600}VERKAUF: {AFAFAF}Anzahl: " anzahl "")
  2791. preisprowt := PlayerInput("Preis pro Droge: ")
  2792. addChatMessage("{FF6600}VERKAUF: {AFAFAF}Preis pro Droge: " preisprowt "")
  2793. kaufer := PlayerInput("Käufer: ")
  2794. addChatMessage("{FF6600}VERKAUF: {AFAFAF}Käufer: " kaufer "")
  2795. result := stringMath(anzahl*preisprowt)
  2796. SendChat("/selldrogen " kaufer " " anzahl " " result "")
  2797. return
  2798.  
  2799. p::
  2800. if(IsChatOpen() == 1 || IsDialogOpen() == 1)
  2801. {
  2802.     SendInput, {%A_ThisHotkey%}
  2803.     return
  2804. }
  2805. IniRead, PickSpruch, %A_MyDocuments%\Veyselbinder\Optionen.ini, Optionen, PickSpruch
  2806. oldWID := GetPlayerWeaponId(GetPlayerWeaponSlot())
  2807. oldwAM := GetPlayerWeaponTotalClip(GetPlayerWeaponSlot())
  2808. SendChat("/Pickwaffe")
  2809. Sleep 100
  2810. GetChatLine(0, ChatLine0)
  2811. if(InStr(ChatLine0, "Du bist unter Level 4 und kannst die Waffe daher nicht aufheben!"))
  2812. {
  2813.     AddChatMessage("{FF0000}FEHLER: {AFAFAF}Level zu niedrig zum aufnehmen von Waffen.")
  2814.     return
  2815. }
  2816. else
  2817. {
  2818.     wID := GetPlayerWeaponId(GetPlayerWeaponSlot())
  2819.     wAM := GetPlayerWeaponTotalClip(GetPlayerWeaponSlot())
  2820.     Sleep 200
  2821.     if(wID == oldWID)
  2822.     {
  2823.         if(wAM == oldwAM)
  2824.         {
  2825.             AddChatMessage("{FF0000}FEHLER: {AFAFAF}Keine Waffe vorhanden.")
  2826.             return
  2827.         }
  2828.         else
  2829.         {
  2830.             SendChat("/me " PickSpruch "")
  2831.             return
  2832.         }
  2833.     }
  2834.     else
  2835.     {
  2836.         SendChat("/me " PickSpruch "")
  2837.         return
  2838.     }
  2839. }
  2840. return
  2841.  
  2842. +::
  2843. if(IsChatOpen() == 1 || IsDialogOpen() == 1)
  2844. {
  2845.     SendInput, {%A_ThisHotkey%}
  2846.     return
  2847. }
  2848. SpielerStatus := imp_read("Veyselbinder", Loginname, "Status")
  2849. if(SpielerStatus == "Premium" || SpielerStatus == "Entwickler")
  2850. {
  2851.     IniRead, Beruf, %A_MyDocuments%\Veyselbinder\Optionen.ini, Optionen, Beruf
  2852.     if(Beruf != "Detektiv")
  2853.     {
  2854.         AddChatMessage("{FF0000}FEHLER:{AFAFAF} Du bist kein Detektiv!")
  2855.         return
  2856.     }
  2857.     fID := PlayerInput("ID/Name: ")
  2858.     If (fID = "" || fID = " ")
  2859.     {
  2860.         AddChatMessage("{FF0000}FEHLER:{AFAFAF} Keine ID eingegeben!")
  2861.         return
  2862.     }
  2863.     else
  2864.     {
  2865.         getPlayerNameByID(fID, Spieler)
  2866.         if(Spieler == "" || Spieler == " ")
  2867.         {
  2868.             AddChatMessage("{FF0000}FEHLER:{AFAFAF} Der Spieler ist nicht online!")
  2869.             return
  2870.         }
  2871.         else
  2872.         {
  2873.             SendChat("/Skill")
  2874.             GetChatLine(6, ChatLine6)
  2875.             if(InStr(ChatLine6, "Detektiv\-Skill\: (.*)\/5  \( (.*) sec \)", DetZeit))
  2876.             DetZeit := "T" %DetZeit2%
  2877.             if(overlay == 1)
  2878.             {
  2879.                 DfindenText := TextCreate("Arial", 7, true, false, 7, 345, 0xFFFFFFFF, "> Du suchst nach " Spieler "(ID: " fID ")", true, true)
  2880.             }
  2881.             loop
  2882.             {
  2883.                 SendChat("/dfinden " fID)
  2884.                 KeyWait, + , D, T10
  2885.                 If !ErrorLevel
  2886.                 {
  2887.                     TextDestroy(DfindenText)
  2888.                     AddChatMessage("{FF6600}AUTOFIND:{AFAFAF} Info: Du hast die Suche abgebrochen!")
  2889.                     break
  2890.                     return
  2891.                 }
  2892.                 Getchatline(0, Chat)
  2893.                 if(instr(Chat,"Du bist kein Detektiv!"))
  2894.                 {
  2895.                     AddChatMessage("{FF0000}FEHLER:{AFAFAF} Du kannst leider nicht weiter suchen, da du kein Detektiv bist!")
  2896.                     break
  2897.                     return
  2898.                 }
  2899.             }
  2900.         }
  2901.     }
  2902. }
  2903. else
  2904. {
  2905.     addChatMessage("{FF0000}FEHLER: {AFAFAF}Du kannst leider diesen Befehl nicht benutzen!")
  2906.     return
  2907. }
  2908. return
  2909.  
  2910. ,::
  2911. if(IsChatOpen() == 1 || IsDialogOpen() == 1)
  2912. {
  2913.     SendInput, {%A_ThisHotkey%}
  2914.     return
  2915. }
  2916. SendChat("/Carkey")
  2917. return
  2918.  
  2919. .::
  2920. if(IsChatOpen() == 1 || IsDialogOpen() == 1)
  2921. {
  2922.     SendInput, {%A_ThisHotkey%}
  2923.     return
  2924. }
  2925. SendChat("/Carlock")
  2926. return
  2927.  
  2928. Numpad2::
  2929. if(IsChatOpen() == 1 || IsDialogOpen() == 1)
  2930. {
  2931.     SendInput, {%A_ThisHotkey%}
  2932.     return
  2933. }
  2934. AddChatMessage("{00FF8C}#########################################")
  2935. Sleep, 100
  2936. SendChat("/jailtime")
  2937. SendChat("/tottime")
  2938. SendChat("/mutetime")
  2939. Sleep, 100
  2940. AddChatMessage("{00FF8C}#########################################")
  2941. return
  2942.  
  2943. NumpadSub::
  2944. if(IsChatOpen() == 1 || IsDialogOpen() == 1)
  2945. {
  2946.     SendInput, {%A_ThisHotkey%}
  2947.     return
  2948. }
  2949. if(getPlayerArmor() > 89)
  2950. {
  2951.     AddChatMessage("{FF0000}FEHLER:{AFAFAF} Du hast über 89 Rüstung und kannst somit kein Spice mehr nehmen!")
  2952.     return
  2953. }
  2954. else
  2955. {
  2956.     SendChat("/nimmspice")
  2957.     return
  2958. }
  2959. return
  2960.  
  2961. NumpadAdd::
  2962. if(IsChatOpen() == 1 || IsDialogOpen() == 1)
  2963. {
  2964.     SendInput, {%A_ThisHotkey%}
  2965.     return
  2966. }
  2967. if(getPlayerHealth() > 89)
  2968. {
  2969.     AddChatMessage("{FF0000}FEHLER:{AFAFAF} Du hast über 89 HP und kannst somit keine Drogen mehr nehmen!")
  2970.     return
  2971. }
  2972. else
  2973. {
  2974.     SendChat("/nimmdrogen")
  2975.     return
  2976. }
  2977. return
  2978.  
  2979. :?:/Fin::
  2980. Suspend Permit
  2981. SendChat("/finanzen")
  2982. Sleep 300
  2983. Getchatline(1, Chatline1)
  2984. RegExMatch(Chatline1, "Kontostand\: (.*)\$", kontostand)
  2985. Getchatline(2, Chatline2)
  2986. RegExMatch(Chatline2, "Bargeld\: (.*)\$", bargeld)
  2987. gesamt := stringMath(kontostand1+bargeld1)
  2988. Round(gesamt, 0)
  2989. AddChatMessage("{FFFF00}Dein Gesamtes Geld: " gesamt "$")
  2990. AddChatMessage("{009D00}==============================")
  2991. return
  2992.  
  2993. :?:/Inv::
  2994. Suspend Permit
  2995. SendChat("/inventar")
  2996. return
  2997.  
  2998. :?:/Atm::
  2999. Suspend Permit
  3000. Sleep 300
  3001. SendChat("/automat")
  3002. return
  3003.  
  3004. :?:/Handy aus::
  3005. Suspend Permit
  3006. ShowGameText("~p~Handy ~r~ausgeschaltet", 3000, 4)
  3007. SendChat("/handystatus aus")
  3008. return
  3009.  
  3010. :?:/Handy an::
  3011. Suspend Permit
  3012. ShowGameText("~p~Handy ~g~angeschaltet", 3000, 4)
  3013. SendChat("/handystatus an")
  3014. return
  3015.  
  3016. :?:/Keks::
  3017. Suspend Permit
  3018. Getchatline(0, Chatline0)
  3019. if(getPlayerHealth() > 89)
  3020. {
  3021.     AddChatMessage("{FF0000}FEHLER:{AFAFAF} Du hast über 89 HP und kannst somit keine Kekse essen!")
  3022.     return
  3023. }
  3024. if(InStr(Chatline0,"Du hast keine Kekse mehr."))
  3025. {
  3026.     AddChatMessage("{FF0000}FEHLER:{AFAFAF} Du besitzt keine Kekse!")
  3027.     return
  3028. }
  3029. if(getPlayerHealth() == 89)
  3030. {
  3031.     SendChat("/isskeks")
  3032.     Sleep, 200
  3033.     AddChatMessage("{FF6600}KEKS:{AFAFAF} Du hast 1 Keks gegessen!")
  3034.     Sleep 200
  3035.     if(isPlayerInAnyVehicle() == 0)
  3036.     {
  3037.        
  3038.     }
  3039.     return
  3040. }
  3041. if(getPlayerHealth() == 88)
  3042. {
  3043.     SendChat("/isskeks")
  3044.     Sleep, 200
  3045.     AddChatMessage("{FF6600}KEKS:{AFAFAF} Du hast 1 Keks gegessen!")
  3046.     Sleep 200
  3047.     if(isPlayerInAnyVehicle() == 0)
  3048.     {
  3049.        
  3050.     }
  3051.     return
  3052. }
  3053. if(getPlayerHealth() == 87)
  3054. {
  3055.     SendChat("/isskeks")
  3056.     Sleep, 200
  3057.     SendChat("/isskeks")
  3058.     Sleep, 200
  3059.     AddChatMessage("{FF6600}KEKS:{AFAFAF} Du hast 2 Kekse gegessen!")
  3060.     Sleep 200
  3061.     if(isPlayerInAnyVehicle() == 0)
  3062.     {
  3063.        
  3064.     }
  3065.     return
  3066. }
  3067. if(getPlayerHealth() == 86)
  3068. {
  3069.     SendChat("/isskeks")
  3070.     Sleep, 200
  3071.     SendChat("/isskeks")
  3072.     Sleep, 200
  3073.     AddChatMessage("{FF6600}KEKS:{AFAFAF} Du hast 2 Kekse gegessen!")
  3074.     Sleep 200
  3075.     if(isPlayerInAnyVehicle() == 0)
  3076.     {
  3077.        
  3078.     }
  3079.     return
  3080. }
  3081. if(getPlayerHealth() == 85)
  3082. {
  3083.     SendChat("/isskeks")
  3084.     Sleep, 200
  3085.     SendChat("/isskeks")
  3086.     Sleep, 200
  3087.     SendChat("/isskeks")
  3088.     Sleep, 200
  3089.     AddChatMessage("{FF6600}KEKS:{AFAFAF} Du hast 3 Kekse gegessen!")
  3090.     Sleep 200
  3091.     if(isPlayerInAnyVehicle() == 0)
  3092.     {
  3093.        
  3094.     }
  3095.     return
  3096. }
  3097. if(getPlayerHealth() == 84)
  3098. {
  3099.     SendChat("/isskeks")
  3100.     Sleep, 200
  3101.     SendChat("/isskeks")
  3102.     Sleep, 200
  3103.     SendChat("/isskeks")
  3104.     Sleep, 200
  3105.     AddChatMessage("{FF6600}KEKS:{AFAFAF} Du hast 3 Kekse gegessen!")
  3106.     Sleep 200
  3107.     if(isPlayerInAnyVehicle() == 0)
  3108.     {
  3109.        
  3110.     }
  3111.     return
  3112. }
  3113. if(getPlayerHealth() == 83)
  3114. {
  3115.     SendChat("/isskeks")
  3116.     Sleep, 200
  3117.     SendChat("/isskeks")
  3118.     Sleep, 200
  3119.     SendChat("/isskeks")
  3120.     Sleep, 200
  3121.     SendChat("/isskeks")
  3122.     Sleep, 200
  3123.     AddChatMessage("{FF6600}KEKS:{AFAFAF} Du hast 4 Kekse gegessen!")
  3124.     Sleep 200
  3125.     if(isPlayerInAnyVehicle() == 0)
  3126.     {
  3127.        
  3128.     }
  3129.     return
  3130. }
  3131. if(getPlayerHealth() == 82)
  3132. {
  3133.     SendChat("/isskeks")
  3134.     Sleep, 200
  3135.     SendChat("/isskeks")
  3136.     Sleep, 200
  3137.     SendChat("/isskeks")
  3138.     Sleep, 200
  3139.     SendChat("/isskeks")
  3140.     Sleep, 200
  3141.     AddChatMessage("{FF6600}KEKS:{AFAFAF} Du hast 4 Kekse gegessen!")
  3142.     Sleep 200
  3143.     if(isPlayerInAnyVehicle() == 0)
  3144.     {
  3145.        
  3146.     }
  3147.     return
  3148. }
  3149. if(getPlayerHealth() == 81)
  3150. {
  3151.     SendChat("/isskeks")
  3152.     Sleep, 200
  3153.     SendChat("/isskeks")
  3154.     Sleep, 200
  3155.     SendChat("/isskeks")
  3156.     Sleep, 200
  3157.     SendChat("/isskeks")
  3158.     Sleep, 200
  3159.     SendChat("/isskeks")
  3160.     Sleep, 200
  3161.     AddChatMessage("{FF6600}KEKS:{AFAFAF} Du hast 5 Kekse gegessen!")
  3162.     Sleep 200
  3163.     if(isPlayerInAnyVehicle() == 0)
  3164.     {
  3165.        
  3166.     }
  3167.     return
  3168. }
  3169. if(getPlayerHealth() == 80)
  3170. {
  3171.     SendChat("/isskeks")
  3172.     Sleep, 200
  3173.     SendChat("/isskeks")
  3174.     Sleep, 200
  3175.     SendChat("/isskeks")
  3176.     Sleep, 200
  3177.     SendChat("/isskeks")
  3178.     Sleep, 200
  3179.     SendChat("/isskeks")
  3180.     Sleep, 200
  3181.     AddChatMessage("{FF6600}KEKS:{AFAFAF} Du hast 5 Kekse gegessen!")
  3182.     Sleep 200
  3183.     if(isPlayerInAnyVehicle() == 0)
  3184.     {
  3185.        
  3186.     }
  3187.     return
  3188. }
  3189. if(getPlayerHealth() == 79)
  3190. {
  3191.     SendChat("/isskeks")
  3192.     Sleep, 200
  3193.     SendChat("/isskeks")
  3194.     Sleep, 200
  3195.     SendChat("/isskeks")
  3196.     Sleep, 200
  3197.     SendChat("/isskeks")
  3198.     Sleep, 200
  3199.     SendChat("/isskeks")
  3200.     Sleep, 200
  3201.     SendChat("/isskeks")
  3202.     Sleep, 200
  3203.     AddChatMessage("{FF6600}KEKS:{AFAFAF} Du hast 6 Kekse gegessen!")
  3204.     Sleep 200
  3205.     if(isPlayerInAnyVehicle() == 0)
  3206.     {
  3207.        
  3208.     }
  3209.     return
  3210. }
  3211. if(getPlayerHealth() == 78)
  3212. {
  3213.     SendChat("/isskeks")
  3214.     Sleep, 200
  3215.     SendChat("/isskeks")
  3216.     Sleep, 200
  3217.     SendChat("/isskeks")
  3218.     Sleep, 200
  3219.     SendChat("/isskeks")
  3220.     Sleep, 200
  3221.     SendChat("/isskeks")
  3222.     Sleep, 200
  3223.     SendChat("/isskeks")
  3224.     Sleep, 200
  3225.     AddChatMessage("{FF6600}KEKS:{AFAFAF} Du hast 6 Kekse gegessen!")
  3226.     Sleep 200
  3227.     if(isPlayerInAnyVehicle() == 0)
  3228.     {
  3229.        
  3230.     }
  3231.     return
  3232. }
  3233. if(getPlayerHealth() < 78)
  3234. {
  3235.     SendChat("/isskeks")
  3236.     Sleep, 200
  3237.     SendChat("/isskeks")
  3238.     Sleep, 200
  3239.     SendChat("/isskeks")
  3240.     Sleep, 200
  3241.     SendChat("/isskeks")
  3242.     Sleep, 200
  3243.     SendChat("/isskeks")
  3244.     Sleep, 200
  3245.     SendChat("/isskeks")
  3246.     Sleep, 200
  3247.     AddChatMessage("{FF6600}KEKS:{AFAFAF} Du hast 6 Kekse gegessen!")
  3248.     Sleep 200
  3249.     if(isPlayerInAnyVehicle() == 0)
  3250.     {
  3251.        
  3252.     }
  3253.     return
  3254. }
  3255. return
  3256.  
  3257. :?:/Uhr::
  3258. Suspend Permit
  3259. FormatTime,Uhrzeit, %A_Now%, HH:MM
  3260. SendChat("/me schaut auf seine Breitling. (" Uhrzeit " Uhr)")
  3261. return
  3262.  
  3263. -::
  3264. if(IsChatOpen() == 1 || IsDialogOpen() == 1)
  3265. {
  3266.     SendInput, {%A_ThisHotkey%}
  3267.     return
  3268. }
  3269. if(IsPlayerInAnyVehicle() == 1)
  3270. {
  3271.     if(IsPlayerDriver() == 1)
  3272.     {
  3273.         FormatTime, Zeit, %A_Now%, HH
  3274.         if(IsVehicleEngineEnabled() == 0)
  3275.         {
  3276.             SendChat("/Motor")
  3277.             if(GetVehicleType() == 9)
  3278.             {
  3279.                 SendChat("/helm")
  3280.             }
  3281.             if(IsVehicleLightEnabled() == 0)
  3282.             {  
  3283.                 if (Zeit > "17")
  3284.                 {
  3285.                     if (Zeit < "9")
  3286.                     {
  3287.                         SendChat("/Licht")
  3288.                     }
  3289.                 }
  3290.             }
  3291.             ShowGameText("~p~Fahrzeug ~g~gestartet", 2000, 4)
  3292.         }
  3293.         else
  3294.         {
  3295.             SendChat("/Motor")
  3296.             if(GetVehicleType() == 9)
  3297.             {
  3298.                 SendChat("/helm")
  3299.             }
  3300.             if(IsVehicleLightEnabled() == 1)
  3301.             {
  3302.                 SendChat("/licht")
  3303.             }
  3304.             ShowGameText("~p~Fahrzeug ~r~gestoppt", 2000, 4)
  3305.         }
  3306.     }
  3307.     else
  3308.     {
  3309.         AddChatMessage("{FF0000}FEHLER: {AFAFAF}Du befindest dich nicht auf dem Fahrersitz.")
  3310.         return
  3311.     }
  3312. }
  3313. else
  3314. {
  3315.     AddChatMessage("{FF0000}FEHLER: {AFAFAF}Du befindest dich in keinem Fahrzeug.")
  3316.     return
  3317. }
  3318. return
  3319.  
  3320. :?:/Clear::
  3321. Suspend Permit
  3322. SendClearMessage(getPageSize())
  3323. return
  3324.  
  3325. :?:/ja::
  3326. Suspend Permit
  3327. Sleep 100
  3328. SendChat("/abnehmen")
  3329. sleep 100
  3330. SendChat("" getUsername() " hier am Telefon.")
  3331. return
  3332.  
  3333. :?:/Nein::
  3334. Suspend Permit
  3335. IniRead, Telefonnummer, %A_MyDocuments%\Veyselbinder\Optionen.ini, Optionen, Telefonnummer
  3336. if(Telefonnummer == "" || Telefonnummer == " ")
  3337. {
  3338.     Telefonnummer := "Fehler"
  3339. }
  3340. Sleep 100
  3341. SendChat("/abnehmen")
  3342. Sleep 100
  3343. SendChat("Hier ist der Anrufbeantworter von " getUsername() " (Tel.: " Telefonnummer "). Leider kann der Teilnehmende Partner den Anruf nicht entgegen nehmen!")
  3344. SendChat("Bitte hinter lassen Sie eine Nachricht! (Sie haben 10 Sekunden Zeit!)")
  3345. Sleep 10000
  3346. SendChat("Vielen Dank für Ihren Anruf!")
  3347. SendChat("/auflegen")
  3348. return
  3349.  
  3350. :?:/Al::
  3351. Suspend Permit
  3352. SendChat("Aufwiederhören!")
  3353. SendChat("/auflegen")
  3354. return
  3355.  
  3356. #::
  3357. if(IsChatOpen() == 1 || IsDialogOpen() == 1)
  3358. {
  3359.     SendInput, {%A_ThisHotkey%}
  3360.     return
  3361. }
  3362.     showDialog(4, "{6400FF}Veyselbinder {AFAFAF}|| {0055FF}Fraktionsliste", "Los Santos Police Department`nWheelman`nNine Demons`nGrove Street Family`nAztecas`nBallas`nLa Cosa Nostra`nYakuza`nTriaden`nVagos", "{FF0000}Schließen")
  3363.     Loop
  3364.     {
  3365.         If(isDialogOpen() == 1)
  3366.         {
  3367.             Sleep 100
  3368.         }
  3369.         else
  3370.         {
  3371.             if(getDialogIndex() == 1)
  3372.             {
  3373.                 zeile := 0
  3374.                 LSPD_Online := 0
  3375.                 addchatmessage("{FFFFFF}______Los Santos Police Department Online______")
  3376.                 Loop,read, %A_MyDocuments%\Veyselbinder\Fraktionen\Los Santos Police Department.txt
  3377.                 {
  3378.                     if(Zeile >= A_Index)
  3379.                     {
  3380.                         Continue
  3381.                     }
  3382.                     else
  3383.                     {
  3384.                         StringTrimRight, GegnerName, A_Loopreadline, 0
  3385.                         Onlinecheck := GetPlayerIdByName(GegnerName)
  3386.                         if(Onlinecheck != 65535)
  3387.                         {
  3388.                             addchatmessage( GegnerName " (" Onlinecheck ")")
  3389.                             LSPD_Online++
  3390.                            
  3391.                         }
  3392.                         Zeile := A_Index
  3393.                     }
  3394.                 }
  3395.                 if(LSPD_Online > 1)
  3396.                 {
  3397.                     addchatmessage( LSPD_Online " Los Santos Police Department Mitglieder sind Online")
  3398.                 }
  3399.                 if(LSPD_Online == 0)
  3400.                 {
  3401.                     addchatmessage("Es sind keine Los Santos Police Department Mitglieder Online")
  3402.                 }
  3403.                 if(LSPD_Online == 1)
  3404.                 {
  3405.                     addchatmessage( LSPD_Online " Los Santos Police Department Mitglied ist Online")
  3406.                 }
  3407.                 return
  3408.             }
  3409.             else
  3410.             if(getDialogIndex() == 2)
  3411.             {
  3412.                 zeile := 0
  3413.                 Wheelman_Online := 0
  3414.                 addchatmessage("{FFFFFF}______Wheelman Online______")
  3415.                 Loop,read, %A_MyDocuments%\Veyselbinder\Fraktionen\Wheelman.txt
  3416.                 {
  3417.                     if(Zeile >= A_Index)
  3418.                     {
  3419.                         Continue
  3420.                     }
  3421.                     else
  3422.                     {
  3423.                         StringTrimRight, GegnerName, A_Loopreadline, 0
  3424.                         Onlinecheck := GetPlayerIdByName(GegnerName)
  3425.                         if(Onlinecheck != 65535)
  3426.                         {
  3427.                             addchatmessage( GegnerName " (" Onlinecheck ")")
  3428.                             Wheelman_Online++
  3429.                            
  3430.                         }
  3431.                         Zeile := A_Index
  3432.                     }
  3433.                 }
  3434.                 if(Wheelman_Online > 1)
  3435.                 {
  3436.                     addchatmessage( Wheelman_Online " Wheelman Mitglieder sind Online")
  3437.                 }
  3438.                 if(Wheelman_Online == 0)
  3439.                 {
  3440.                     addchatmessage("Es sind keine Wheelman Mitglieder Online")
  3441.                 }
  3442.                 if(Wheelman_Online == 1)
  3443.                 {
  3444.                     addchatmessage( Wheelman_Online " Wheelman Mitglied ist Online")
  3445.                 }
  3446.                 return
  3447.             }
  3448.             else
  3449.             if(getDialogIndex() == 3)
  3450.             {
  3451.                 zeile := 0
  3452.                 NineDemons_Online := 0
  3453.                 addchatmessage("{FFFFFF}______Nine Demons Online______")
  3454.                 Loop,read, %A_MyDocuments%\Veyselbinder\Fraktionen\Nine Demons.txt
  3455.                 {
  3456.                     if(Zeile >= A_Index)
  3457.                     {
  3458.                         Continue
  3459.                     }
  3460.                     else
  3461.                     {
  3462.                         StringTrimRight, GegnerName, A_Loopreadline, 0
  3463.                         Onlinecheck := GetPlayerIdByName(GegnerName)
  3464.                         if(Onlinecheck != 65535)
  3465.                         {
  3466.                             addchatmessage( GegnerName " (" Onlinecheck ")")
  3467.                             NineDemons_Online++
  3468.                            
  3469.                         }
  3470.                         Zeile := A_Index
  3471.                     }
  3472.                 }
  3473.                 if(NineDemons_Online > 1)
  3474.                 {
  3475.                     addchatmessage( NineDemons_Online " Nine Demons Mitglieder sind Online")
  3476.                 }
  3477.                 if(NineDemons_Online == 0)
  3478.                 {
  3479.                     addchatmessage("Es sind keine Nine Demons Mitglieder Online")
  3480.                 }
  3481.                 if(NineDemons_Online == 1)
  3482.                 {
  3483.                     addchatmessage( NineDemons_Online " Nine Demons Mitglied ist Online")
  3484.                 }
  3485.                 return
  3486.             }
  3487.             else
  3488.             if(getDialogIndex() == 4)
  3489.             {
  3490.                 zeile := 0
  3491.                 GSF_Online := 0
  3492.                 addchatmessage("{FFFFFF}______Grove Street Family Online______")
  3493.                 Loop,read, %A_MyDocuments%\Veyselbinder\Fraktionen\Grove Street Family.txt
  3494.                 {
  3495.                     if(Zeile >= A_Index)
  3496.                     {
  3497.                         Continue
  3498.                     }
  3499.                     else
  3500.                     {
  3501.                         StringTrimRight, GegnerName, A_Loopreadline, 0
  3502.                         Onlinecheck := GetPlayerIdByName(GegnerName)
  3503.                         if(Onlinecheck != 65535)
  3504.                         {
  3505.                             addchatmessage( GegnerName " (" Onlinecheck ")")
  3506.                             GSF_Online++
  3507.                            
  3508.                         }
  3509.                         Zeile := A_Index
  3510.                     }
  3511.                 }
  3512.                 if(GSF_Online > 1)
  3513.                 {
  3514.                     addchatmessage( GSF_Online " Grove Street Family Mitglieder sind Online")
  3515.                 }
  3516.                 if(GSF_Online == 0)
  3517.                 {
  3518.                     addchatmessage("Es sind keine Grove Street Family Mitglieder Online")
  3519.                 }
  3520.                 if(GSF_Online == 1)
  3521.                 {
  3522.                     addchatmessage( GSF_Online " Grove Street Family Mitglied ist Online")
  3523.                 }
  3524.                 return
  3525.             }
  3526.             else
  3527.             if(getDialogIndex() == 5)
  3528.             {
  3529.                 zeile := 0
  3530.                 Aztecas_Online := 0
  3531.                 addchatmessage("{FFFFFF}______Aztecas Online______")
  3532.                 Loop,read, %A_MyDocuments%\Veyselbinder\Fraktionen\Aztecas.txt
  3533.                 {
  3534.                     if(Zeile >= A_Index)
  3535.                     {
  3536.                         Continue
  3537.                     }
  3538.                     else
  3539.                     {
  3540.                         StringTrimRight, GegnerName, A_Loopreadline, 0
  3541.                         Onlinecheck := GetPlayerIdByName(GegnerName)
  3542.                         if(Onlinecheck != 65535)
  3543.                         {
  3544.                             addchatmessage( GegnerName " (" Onlinecheck ")")
  3545.                             Aztecas_Online++
  3546.                            
  3547.                         }
  3548.                         Zeile := A_Index
  3549.                     }
  3550.                 }
  3551.                 if(Aztecas_Online > 1)
  3552.                 {
  3553.                     addchatmessage( Aztecas_Online " Aztecas Mitglieder sind Online")
  3554.                 }
  3555.                 if(Aztecas_Online == 0)
  3556.                 {
  3557.                     addchatmessage("Es sind keine Aztecas Mitglieder Online")
  3558.                 }
  3559.                 if(Aztecas_Online == 1)
  3560.                 {
  3561.                     addchatmessage( Aztecas_Online " Aztecas Mitglied ist Online")
  3562.                 }
  3563.                 return
  3564.             }
  3565.             else
  3566.             if(getDialogIndex() == 6)
  3567.             {
  3568.                 zeile := 0
  3569.                 Ballas_Online := 0
  3570.                 addchatmessage("{FFFFFF}______Ballas Online______")
  3571.                 Loop,read, %A_MyDocuments%\Veyselbinder\Fraktionen\Ballas.txt
  3572.                 {
  3573.                     if(Zeile >= A_Index)
  3574.                     {
  3575.                         Continue
  3576.                     }
  3577.                     else
  3578.                     {
  3579.                         StringTrimRight, GegnerName, A_Loopreadline, 0
  3580.                         Onlinecheck := GetPlayerIdByName(GegnerName)
  3581.                         if(Onlinecheck != 65535)
  3582.                         {
  3583.                             addchatmessage( GegnerName " (" Onlinecheck ")")
  3584.                             Ballas_Online++
  3585.                            
  3586.                         }
  3587.                         Zeile := A_Index
  3588.                     }
  3589.                 }
  3590.                 if(Ballas_Online > 1)
  3591.                 {
  3592.                     addchatmessage( Ballas_Online " Ballas Mitglieder sind Online")
  3593.                 }
  3594.                 if(Ballas_Online == 0)
  3595.                 {
  3596.                     addchatmessage("Es sind keine Ballas Mitglieder Online")
  3597.                 }
  3598.                 if(Ballas_Online == 1)
  3599.                 {
  3600.                     addchatmessage( Ballas_Online " Ballas Mitglied ist Online")
  3601.                 }
  3602.                 return
  3603.             }
  3604.             else
  3605.             if(getDialogIndex() == 7)
  3606.             {
  3607.                 zeile := 0
  3608.                 LCN_Online := 0
  3609.                 addchatmessage("{FFFFFF}______La Cosa Nostra Online______")
  3610.                 Loop,read, %A_MyDocuments%\Veyselbinder\Fraktionen\La Cosa Nostra.txt
  3611.                 {
  3612.                     if(Zeile >= A_Index)
  3613.                     {
  3614.                         Continue
  3615.                     }
  3616.                     else
  3617.                     {
  3618.                         StringTrimRight, GegnerName, A_Loopreadline, 0
  3619.                         Onlinecheck := GetPlayerIdByName(GegnerName)
  3620.                         if(Onlinecheck != 65535)
  3621.                         {
  3622.                             addchatmessage( GegnerName " (" Onlinecheck ")")
  3623.                             LCN_Online++
  3624.                            
  3625.                         }
  3626.                         Zeile := A_Index
  3627.                     }
  3628.                 }
  3629.                 if(LCN_Online > 1)
  3630.                 {
  3631.                     addchatmessage( LCN_Online " La Cosa Nostra Mitglieder sind Online")
  3632.                 }
  3633.                 if(LCN_Online == 0)
  3634.                 {
  3635.                     addchatmessage("Es sind keine La Cosa Nostra Mitglieder Online")
  3636.                 }
  3637.                 if(LCN_Online == 1)
  3638.                 {
  3639.                     addchatmessage( LCN_Online " La Cosa Nostra Mitglied ist Online")
  3640.                 }
  3641.                 return
  3642.             }
  3643.             else
  3644.             if(getDialogIndex() == 8)
  3645.             {
  3646.                 zeile := 0
  3647.                 Yakuza_Online := 0
  3648.                 addchatmessage("{FFFFFF}______Yakuza Online______")
  3649.                 Loop,read, %A_MyDocuments%\Veyselbinder\Fraktionen\Yakuza.txt
  3650.                 {
  3651.                     if(Zeile >= A_Index)
  3652.                     {
  3653.                         Continue
  3654.                     }
  3655.                     else
  3656.                     {
  3657.                         StringTrimRight, GegnerName, A_Loopreadline, 0
  3658.                         Onlinecheck := GetPlayerIdByName(GegnerName)
  3659.                         if(Onlinecheck != 65535)
  3660.                         {
  3661.                             addchatmessage( GegnerName " (" Onlinecheck ")")
  3662.                             Yakuza_Online++
  3663.                            
  3664.                         }
  3665.                         Zeile := A_Index
  3666.                     }
  3667.                 }
  3668.                 if(Yakuza_Online > 1)
  3669.                 {
  3670.                     addchatmessage( Yakuza_Online " Yakuza Mitglieder sind Online")
  3671.                 }
  3672.                 if(Yakuza_Online == 0)
  3673.                 {
  3674.                     addchatmessage("Es sind keine Yakuza Mitglieder Online")
  3675.                 }
  3676.                 if(Yakuza_Online == 1)
  3677.                 {
  3678.                     addchatmessage( Yakuza_Online " Yakuza Mitglied ist Online")
  3679.                 }
  3680.                 return
  3681.             }
  3682.             else
  3683.             if(getDialogIndex() == 9)
  3684.             {
  3685.                 zeile := 0
  3686.                 Triaden_Online := 0
  3687.                 addchatmessage("{FFFFFF}______Triaden Online______")
  3688.                 Loop,read, %A_MyDocuments%\Veyselbinder\Fraktionen\Triaden.txt
  3689.                 {
  3690.                     if(Zeile >= A_Index)
  3691.                     {
  3692.                         Continue
  3693.                     }
  3694.                     else
  3695.                     {
  3696.                         StringTrimRight, GegnerName, A_Loopreadline, 0
  3697.                         Onlinecheck := GetPlayerIdByName(GegnerName)
  3698.                         if(Onlinecheck != 65535)
  3699.                         {
  3700.                             addchatmessage( GegnerName " (" Onlinecheck ")")
  3701.                             Triaden_Online++
  3702.                            
  3703.                         }
  3704.                         Zeile := A_Index
  3705.                     }
  3706.                 }
  3707.                 if(Triaden_Online > 1)
  3708.                 {
  3709.                     addchatmessage( Triaden_Online " Triaden Mitglieder sind Online")
  3710.                 }
  3711.                 if(Triaden_Online == 0)
  3712.                 {
  3713.                     addchatmessage("Es sind keine Triaden Mitglieder Online")
  3714.                 }
  3715.                 if(Triaden_Online == 1)
  3716.                 {
  3717.                     addchatmessage( Triaden_Online " Triaden Mitglied ist Online")
  3718.                 }
  3719.                 return
  3720.             }
  3721.             else
  3722.             if(getDialogIndex() == 10)
  3723.             {
  3724.                 zeile := 0
  3725.                 Vagos_Online := 0
  3726.                 addchatmessage("{FFFFFF}______Vagos Online______")
  3727.                 Loop,read, %A_MyDocuments%\Veyselbinder\Fraktionen\Vagos.txt
  3728.                 {
  3729.                     if(Zeile >= A_Index)
  3730.                     {
  3731.                         Continue
  3732.                     }
  3733.                     else
  3734.                     {
  3735.                         StringTrimRight, GegnerName, A_Loopreadline, 0
  3736.                         Onlinecheck := GetPlayerIdByName(GegnerName)
  3737.                         if(Onlinecheck != 65535)
  3738.                         {
  3739.                             addchatmessage( GegnerName " (" Onlinecheck ")")
  3740.                             Vagos_Online++
  3741.                            
  3742.                         }
  3743.                         Zeile := A_Index
  3744.                     }
  3745.                 }
  3746.                 if(Vagos_Online > 1)
  3747.                 {
  3748.                     addchatmessage( Vagos_Online " Vagos Mitglieder sind Online")
  3749.                 }
  3750.                 if(Vagos_Online == 0)
  3751.                 {
  3752.                     addchatmessage("Es sind keine Vagos Mitglieder Online")
  3753.                 }
  3754.                 if(Vagos_Online == 1)
  3755.                 {
  3756.                     addchatmessage( Vagos_Online " Vagos Mitglied ist Online")
  3757.                 }
  3758.                 return
  3759.             }
  3760.         }
  3761.     }
  3762. return
  3763.  
  3764. !y::
  3765. if(isPlayerinAnyVehicle() == 1)
  3766. {
  3767.     if(isPlayerDriver() == 1)
  3768.     {
  3769.         if(IsVehicleEngineEnabled() == 0)
  3770.         {
  3771.             AddChatMessage("{FF0000}FEHLER: {AFAFAF}Bitte schalte zuerst den Motor an.")
  3772.         }
  3773.         else
  3774.         {
  3775.             Suspend Permit
  3776.             VehSpeedMax := PlayerInput("Geschwindigkeit: ")
  3777.             if(VehSpeedMax is Number)
  3778.             {
  3779.                 if(VehSpeedMax > 300)
  3780.                 {
  3781.                     AddChatMessage("{FF0000}FEHLER: {AFAFAF}Bitte gebe eine gültige Geschwindigkeit ein.")
  3782.                 }
  3783.                 else
  3784.                 {
  3785.                     if(VehSpeedMax < 0)
  3786.                     {
  3787.                         AddChatMessage("{FF0000}FEHLER: {AFAFAF}Bitte gebe eine gültige Geschwindigkeit ein.")
  3788.                     }
  3789.                     else
  3790.                     {
  3791.                         SetTimer, SpeedCheckPerm, 50
  3792.                         SpeedCheckStatus := "1"
  3793.                         SpeedOnOff := "1"
  3794.                         AddChatMessage("{FF6600}TEMPOMAT: {AFAFAF}Du hast den Tempomat {00FF00}aktiviert{AFAFAF}! Geschwindigkeit: " VehSpeedMax "Km/H")
  3795.                         AddChatMessage("{FF6600}TEMPOMAT: {AFAFAF}Du kannst den Tempomat mit der Y-Taste deaktivieren.")
  3796.                     }
  3797.                 }
  3798.             }
  3799.             else
  3800.             {
  3801.                 AddChatMessage("{FF0000}FEHLER: {AFAFAF}Bitte gebe eine gültige Geschwindigkeit ein.")
  3802.             }
  3803.         }
  3804.     }
  3805.     else
  3806.     {
  3807.         AddChatMessage("{FF0000}FEHLER: {AFAFAF}Du befindest dich nicht auf dem Fahrersitz.")
  3808.         return
  3809.     }
  3810. }
  3811. else
  3812. {
  3813.     AddChatMessage("{FF0000}FEHLER: {AFAFAF}Du befindest dich in keinem Fahrzeug.")
  3814.     return
  3815. }
  3816. return
  3817.  
  3818. y::
  3819. if(IsChatOpen() == 1 || IsDialogOpen() == 1)
  3820. {
  3821.     SendInput, {%A_ThisHotkey%}
  3822.     return
  3823. }
  3824. if(isPlayerinAnyVehicle() == 1)
  3825. {
  3826.     if(isPlayerDriver() == 1)
  3827.     {
  3828.         if(IsVehicleEngineEnabled() == 0)
  3829.         {
  3830.             AddChatMessage("{FF0000}FEHLER: {AFAFAF}Bitte schalte zuerst den Motor an.")
  3831.         }
  3832.         else
  3833.         {
  3834.             SpeedOnOff := !SpeedOnOff
  3835.             if(SpeedOnOff == 1)
  3836.             {
  3837.                 VehSpeedMax := Round(getVehicleSpeed2())
  3838.                 SetTimer, SpeedCheckPerm, 50
  3839.                 SpeedCheckStatus := "1"
  3840.                 AddChatMessage("{FF6600}TEMPOMAT: {AFAFAF}Du hast den Tempomat {00FF00}aktiviert{AFAFAF}! Geschwindigkeit: " VehSpeedMax "Km/H")
  3841.                 AddChatMessage("{FF6600}TEMPOMAT: {AFAFAF}Du kannst den Tempomat mit der Y-Taste deaktivieren.")
  3842.             }
  3843.             else
  3844.             {
  3845.                 SetTimer,SpeedCheckPerm, Off
  3846.                 SpeedCheckStatus := "0"
  3847.                 Sleep, 250
  3848.                 SendInput {W Up}
  3849.                 AddChatMessage("{FF6600}TEMPOMAT: {AFAFAF}Du kannst den Tempomat {FF0000}deaktiviert{AFAFAF}.")
  3850.             }
  3851.         }
  3852.     }
  3853.     else
  3854.     {
  3855.         AddChatMessage("{FF0000}FEHLER: {AFAFAF}Du befindest dich nicht auf dem Fahrersitz.")
  3856.         return
  3857.     }
  3858. }
  3859. else
  3860. {
  3861.     AddChatMessage("{FF0000}FEHLER: {AFAFAF}Du befindest dich in keinem Fahrzeug.")
  3862.     return
  3863. }
  3864. return
  3865.  
  3866. F4::
  3867. GetZoneName(zone)
  3868. GetCityName(city)
  3869. pos := getCoordinates()
  3870. GetLastMousePosOnMenuMap(x1, y1)
  3871. addChatMessage("Debug from " getUsername() " (ID: " GetPlayerId() ")")
  3872. addChatMessage("Last Error: " GetLastError())
  3873. addChatMessage("ScreenSizeX: " GetScreenSizeX())
  3874. addChatMessage("ScreenSizeY: " GetScreenSizey())
  3875. addChatMessage("Framerate: " GetFramerate())
  3876. addChatMessage("CurrentWeatherId: " GetCurrentWeatherId())
  3877. addChatMessage("Zone: " zone)
  3878. addChatMessage("City: " city)
  3879. addChatMessage("Position: X: " pos[1] " Y: " pos[2] " Z: " pos[3] "")
  3880. addChatMessage("LastMousePosOnMenuMap: X: " x1 " Y: " y1 "")
  3881. return
  3882.  
  3883. NumpadDot::
  3884. if(IsChatOpen() == 1 || IsDialogOpen() == 1)
  3885. {
  3886. SendInput, {%A_ThisHotkey%}
  3887. return
  3888. }
  3889. if(admin2 > 0 || getUsername() == "King_Khalil")
  3890. {
  3891.     Rest := ""
  3892.     ClosestPlayerId := getClosestPlayerId()
  3893.     Username := getUsername()
  3894.     UserID := getPlayerIdByName(Username)
  3895.     getPlayerNameById(ClosestPlayerId, PlayerUsername)
  3896.     PlayerScore := getPlayerScoreById(ClosestPlayerId)
  3897.     if(isNPCById(ClosestPlayerId) == 1)
  3898.     {
  3899.         NPC := "Ja"
  3900.     }
  3901.     if(isNPCById(ClosestPlayerId) == 0)
  3902.     {
  3903.         NPC := "Nein"
  3904.     }
  3905.     Skindid := getTargetPlayerSkinIdById(ClosestPlayerId)
  3906.     spielerstatus := isTargetInAnyVehiclebyId(ClosestPlayerId)
  3907.     if(spielerstatus == 1)
  3908.     {
  3909.         spielerstatus := "Im Fahrzeug"
  3910.     }
  3911.     if(spielerstatus == 0)
  3912.     {
  3913.         spielerstatus := "Zu Fuß"
  3914.     }
  3915.     spielerping := getPlayerPingById(ClosestPlayerId)
  3916.     mycoords := getCoordinates()
  3917.     othercoords := getTargetPos(ClosestPlayerId)
  3918.     Distance := Round(getDist(mycoords, othercoords), 2)
  3919.     showDialog(0, "{FF6600}Nächster Spieler", "Name: " PlayerUsername "`nID: " ClosestPlayerId "`nLevel: " PlayerScore "`nPing: " spielerping "`nEntfernung: " Distance " Meter`nNPC: " NPC "`nSkin-ID: " Skindid "`nStatus: " spielerstatus "", "{FF0000}Schließen")
  3920. }
  3921. else
  3922. {
  3923.    
  3924. }
  3925. return
  3926. //----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
  3927. GuiClose:
  3928. FileDelete, %A_MyDocuments%\Veyselbinder\logo1.png
  3929. FileDelete, %A_MyDocuments%\Veyselbinder\logo2.png
  3930. FileDelete, %A_MyDocuments%\Veyselbinder\background.png
  3931. FileDelete, %A_MyDocuments%\Veyselbinder\lila.png
  3932. FileDelete, %A_MyDocuments%\Veyselbinder\gruen.png
  3933. FileDelete, %A_MyDocuments%\Veyselbinder\grau.png
  3934. FileDelete, %A_MyDocuments%\Veyselbinder\bild2.jpg
  3935. ExitApp
  3936. return
  3937.  
  3938. loginGuiClose:
  3939. FileDelete, %A_MyDocuments%\Veyselbinder\logo1.png
  3940. FileDelete, %A_MyDocuments%\Veyselbinder\logo2.png
  3941. FileDelete, %A_MyDocuments%\Veyselbinder\background.png
  3942. FileDelete, %A_MyDocuments%\Veyselbinder\lila.png
  3943. FileDelete, %A_MyDocuments%\Veyselbinder\gruen.png
  3944. FileDelete, %A_MyDocuments%\Veyselbinder\grau.png
  3945. FileDelete, %A_MyDocuments%\Veyselbinder\bild2.jpg
  3946. ExitApp
  3947. return
  3948.  
  3949. 2GuiClose:
  3950. FileDelete, %A_MyDocuments%\Veyselbinder\logo1.png
  3951. FileDelete, %A_MyDocuments%\Veyselbinder\logo2.png
  3952. FileDelete, %A_MyDocuments%\Veyselbinder\background.png
  3953. FileDelete, %A_MyDocuments%\Veyselbinder\lila.png
  3954. FileDelete, %A_MyDocuments%\Veyselbinder\gruen.png
  3955. FileDelete, %A_MyDocuments%\Veyselbinder\grau.png
  3956. FileDelete, %A_MyDocuments%\Veyselbinder\bild2.jpg
  3957. ExitApp
  3958. return
  3959.  
  3960. HotkeysGuiClose:
  3961. Gui, Hotkeys:Destroy
  3962. return
  3963. //----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
  3964. //Erweiterungen
  3965.  
  3966. SendChatNoAPI(KeyText) {
  3967. KeyText := replaceVariables(KeyText)
  3968. if (InStr(KeyText,"&&")) {
  3969. Loop, parse, KeyText, "&&",
  3970. {
  3971. msg = %A_LoopField%
  3972. if(msg != "" && msg != " ") {
  3973. IfInString, msg, {Return}
  3974. {
  3975. StringReplace, msg, msg, {Return}, , All
  3976. SendChat( msg )
  3977. } else {
  3978. msg := replaceVariables(msg)
  3979. SendInput, t%msg%
  3980. }
  3981. }
  3982. }
  3983. } else {
  3984. msg := replaceVariables(KeyText)
  3985. SendInput, t%msg%
  3986. }
  3987. return
  3988. }
  3989.  
  3990. sendKeybind(KeyText) {
  3991. KeyText := replaceVariables(KeyText)
  3992. if (InStr(KeyText,"&&")) {
  3993. Loop, parse, KeyText, "&&",
  3994. {
  3995. msg = %A_LoopField%
  3996. if(msg != "" && msg != " ") {
  3997. IfInString, msg, {Return}
  3998. {
  3999. StringReplace, msg, msg, {Return}, , All
  4000. SendChat( msg )
  4001. } else {
  4002. msg := replaceVariables(msg)
  4003. SendInput, t%msg%
  4004. }
  4005. }
  4006. }
  4007. } else {
  4008. SendChat( KeyText )
  4009. }
  4010. return
  4011. }
  4012.  
  4013. replaceVariables(msg) {
  4014. Username := getUsername()
  4015. getPlayerIdByName(getUsername())
  4016. PlayerId := getPlayerIdByName(getUsername())
  4017. PlayerScore := getPlayerScoreById(getPlayerIdByName(getUsername()))
  4018. PlayerPing := getPlayerPingById(getPlayerIdByName(getUsername()))
  4019. PlayerHealth := getPlayerHealth()
  4020. PlayerArmor := getPlayerArmor()
  4021. PlayerMoney := getPlayerMoney()
  4022. PlayerZone := getPlayerZone()
  4023. PlayerCity := getPlayerCity()
  4024. PlayerCoords := getCoordinates()
  4025. PlayerCoords1 := PlayerCoords[1], PlayerCoords[2], PlayerCoords[3]
  4026. space := " "
  4027. FormatTime,h,,HH
  4028. FormatTime,m,,mm
  4029. StringReplace, msg, msg, {Space}, %space%, All
  4030. StringReplace, msg, msg, {Username}, %Username%, All
  4031. StringReplace, msg, msg, {PlayerId}, %PlayerId%  , All
  4032. StringReplace, msg, msg, {PlayerScore}, %PlayerScore%, All
  4033. StringReplace, msg, msg, {PlayerPing}, %PlayerPing%, All
  4034. StringReplace, msg, msg, {PlayerHealth}, %PlayerHealth%, All
  4035. StringReplace, msg, msg, {PlayerArmor}, %PlayerArmor%, All
  4036. StringReplace, msg, msg, {PlayerMoney}, %PlayerMoney%, All
  4037. StringReplace, msg, msg, {PlayerZone}, %PlayerZone%, All
  4038. StringReplace, msg, msg, {PlayerCity}, %PlayerCity%, All
  4039. StringReplace, msg, msg, {Time}, %h%:%m%, All
  4040. StringReplace, msg, msg, {PlayerCoords}, %PlayerCoords1%, All
  4041. return msg
  4042. }
  4043.  
  4044. DownloadToString(url, encoding = "utf-8")
  4045. {
  4046.     static a := "AutoHotkey/" A_AhkVersion
  4047.     if (!DllCall("LoadLibrary", "str", "wininet") || !(h := DllCall("wininet\InternetOpen", "str", a, "uint", 1, "ptr", 0, "ptr", 0, "uint", 0, "ptr")))
  4048.     return 0
  4049.     c := s := 0, o := ""
  4050.     if (f := DllCall("wininet\InternetOpenUrl", "ptr", h, "str", url, "ptr", 0, "uint", 0, "uint", 0x80003000, "ptr", 0, "ptr"))
  4051.     {
  4052.         while (DllCall("wininet\InternetQueryDataAvailable", "ptr", f, "uint*", s, "uint", 0, "ptr", 0) && s > 0)
  4053.         {
  4054.             VarSetCapacity(b, s, 0)
  4055.             DllCall("wininet\InternetReadFile", "ptr", f, "ptr", &b, "uint", s, "uint*", r)
  4056.             o .= StrGet(&b, r >> (encoding = "utf-16" || encoding = "cp1200"), encoding)
  4057.         }
  4058.         DllCall("wininet\InternetCloseHandle", "ptr", f)
  4059.     }
  4060.     DllCall("wininet\InternetCloseHandle", "ptr", h)
  4061.     return o
  4062. }
  4063.  
  4064. /*
  4065. funktion() //Funktionsname
  4066. {
  4067.     If(!SAMP()) //Ist SAMP aktiviert
  4068.         return false
  4069.  
  4070.     pointer := readDWORD(hGTA, 0xBA18FC) //Pointer auslesen
  4071.     if(pointer) //Ist Pointer positiv? >= 0
  4072.     {
  4073.         writeMemory(hGTA, pointer + 0x48A, 0, 4, "BYTE") //Reinschreiben
  4074.     }
  4075.     //oder if(pointer) ignorieren wenns nicht gebraucht wird
  4076.    
  4077. }
  4078. BYTE = "UChar" = 1
  4079. FLOAT = "float" = 4
  4080. DWORD = "UInt" = 4
  4081. */
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!