API tools faq
paste
comniemeer

Teambinder.ahk

comniemeer
Mar 15th, 2016
187
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 7.91 KB | None | 0 0
raw download clone embed print report
  1. #IfWinActive, GTA:SA:MP
  2. #SingleInstance force
  3. #Include UDF.ahk
  4. #UseHook
  5. #Persistent
  6. #NoEnv
  7.  
  8. SetTimer, tickets, 100
  9. setworkingdir, %a_scriptdir%
  10.  
  11. if !A_IsAdmin {
  12. try {
  13. Run *RunAs "%A_ScriptFullPath%"
  14. } catch {
  15. MsgBox, 48, Administratorenrechte, Der Keybinder benötigt Administratorenrechte und wird nun beendet. Führe den Keybinder als Administrator aus!, 5
  16. ExitApp
  17. }
  18. }
  19.  
  20. tickets:
  21. {
  22. IfWinNotActive, GTA:SA:MP
  23. return
  24.  
  25. GetChatLine(0, chat)
  26.  
  27. If (InStr(chat, "Du hast das Ticket von")) {
  28. RegExMatch(chat, "Du hast das Ticket von (.*) (.+).", var)
  29.  
  30. IniRead, DTickets, Tickets.ini, Ticketzähler, DTickets[%A_DD%:%A_MM%:%A_YYYY%]
  31.  
  32. DTickets ++
  33.  
  34. IniWrite, %DTickets%, Tickets.ini, Ticketzähler, DTickets[%A_DD%:%A_MM%:%A_YYYY%]
  35. IniRead, gestickets, Tickets.ini, Gesamt, gestickets, 0
  36.  
  37. gestickets ++
  38.  
  39. IniWrite, %gestickets%, Tickets.ini, Gesamt, gestickets
  40. IniRead, MTickets, Tickets.ini, Ticketzähler, MTickets[%A_MM%:%A_YYYY%]
  41.  
  42. MTickets ++
  43.  
  44. IniWrite, %MTickets%, Tickets.ini, Ticketzähler, MTickets[%A_MM%:%A_YYYY%]
  45. IniRead, monthtickets, Tickets.ini, Monat, monthtickets[%A_MM%:%A_YYYY%]
  46.  
  47. monthtickets ++
  48.  
  49. IniWrite, %monthtickets%, Tickets.ini, Monat, monthtickets[%A_MM%:%A_YYYY%]
  50.  
  51. If (var2 = "geschlossen") {
  52. AddChatMessage("{2550A7}|Teambinder| {FFFFFF}Du hast bereits {FF9E00}" . gestickets . " {FFFFFF}Tickets bearbeitet. Davon in diesem Monat: {FF9E00}" . monthtickets . "")
  53. return
  54. }
  55. }
  56. }
  57. return
  58.  
  59. :?:/tt::
  60. {
  61. name := getUsername()
  62. TT_ID := PlayerInput("/Ticket-ID: ")
  63.  
  64. If(TT_ID = "")
  65. return
  66.  
  67. SetTimer, Ticketannahme, -1
  68. }
  69. return
  70.  
  71. ~^Numpad1::
  72. TT_ID := 1
  73. SetTimer, Ticketannahme, -1
  74. return
  75.  
  76. ~^Numpad2::
  77. TT_ID := 2
  78. SetTimer, Ticketannahme, -1
  79. return
  80.  
  81. ~^Numpad3::
  82. TT_ID := 3
  83. SetTimer, Ticketannahme, -1
  84. return
  85.  
  86. ~^Numpad4::
  87. TT_ID := 4
  88. SetTimer, Ticketannahme, -1
  89. return
  90.  
  91. ~^Numpad5::
  92. TT_ID := 5
  93. SetTimer, Ticketannahme, -1
  94. return
  95.  
  96. ~^Numpad6::
  97. TT_ID := 6
  98. SetTimer, Ticketannahme, -1
  99. return
  100.  
  101. ~^Numpad7::
  102. TT_ID := 7
  103. SetTimer, Ticketannahme, -1
  104. return
  105.  
  106. ~^Numpad8::
  107. TT_ID := 8
  108. SetTimer, Ticketannahme, -1
  109. return
  110.  
  111. ~^Numpad9::
  112. TT_ID := 9
  113. SetTimer, Ticketannahme, -1
  114. return
  115.  
  116. Ticketannahme:
  117. {
  118. TT_B = Guten Tag!
  119.  
  120. If(A_Hour > 4 && A_Hour < 12)
  121. TT_B = Guten Morgen!
  122.  
  123. If(A_Hour > 19 || A_Hour = 0)
  124. TT_B = Guten Abend!
  125.  
  126. SendChat("/tt " . TT_ID)
  127. Sleep, 100
  128. GetChatLine(0, a)
  129.  
  130. If (a = "Dieses Ticket wird bereits bearbeitet.")
  131. return
  132.  
  133. SendChat("/aw " . TT_ID . " " . TT_B)
  134. SendChat("/aw " . TT_ID . " Mein Name ist " . name . " und ich bin für deine Fragen oder Probleme offen!")
  135. }
  136. return
  137.  
  138. :?:/gt::
  139. {
  140. T_ID := PlayerInput("/Ticket-ID: ")
  141.  
  142. If (T_ID = "")
  143. return
  144.  
  145. T_Grund := PlayerInput("/Grund: ")
  146.  
  147. If (T_Grund = "")
  148. return
  149.  
  150. T_Wen := PlayerInput("/An wen?: ")
  151.  
  152. If (T_Wen = "")
  153. return
  154.  
  155. If (T_Wen = "Admin" || T_Wen = "Head Admin" || T_Wen = "Moderator" || T_Wen = "Projektleiter" || T_Wen = "Supporter"){
  156. Pl = +
  157.  
  158. If(T_Wen = "Projektleiter")
  159. Pl =
  160.  
  161. SendChat("/aw " . T_ID . " Ich werde dich nun an einen " . T_Wen . Pl . " weiterleiten.")
  162. SendChat("/aw " . T_ID . " Bitte gedulde dich, bis ein " . T_Wen . Pl . " dein Ticket annimmt.")
  163.  
  164. If(T_Wen = "Head Admin")
  165. T_Wen = Head
  166.  
  167. SendChat("/gt " . T_ID . " " . T_Wen)
  168. Sleep, 200
  169. SendChat("/com Ticket " . T_ID . " für einen " . T_Wen . Pl . " Grund: " . T_Grund . "")
  170. } else {
  171. SendChat("/aw " . T_ID . " Ich werde dich nun an " . T_Wen . " weiterleiten.")
  172. SendChat("/aw " . T_ID . " Bitte gedulde dich, bis " . T_Wen . " dein Ticket annimmt.")
  173. SendChat("/gt " . T_ID . " " . T_Wen)
  174. Sleep, 200
  175. SendChat("/com Ticket " . T_ID . " für " . T_Wen . " Grund: " . T_Grund)
  176. }
  177. }
  178. return
  179.  
  180. :?:/dt::
  181. {
  182. DT_ID := PlayerInput("/Ticket-ID: ")
  183.  
  184. If(DT_ID = "")
  185. return
  186.  
  187. SetTimer, Ticketschliessen, -1
  188. }
  189. return
  190.  
  191. ~!Numpad1::
  192. DT_ID := 1
  193. SetTimer, Ticketschliessen, -1
  194. return
  195.  
  196. ~!Numpad2::
  197. DT_ID := 2
  198. SetTimer, Ticketschliessen, -1
  199. return
  200.  
  201. ~!Numpad3::
  202. DT_ID := 3
  203. SetTimer, Ticketschliessen, -1
  204. return
  205.  
  206. ~!Numpad4::
  207. DT_ID := 4
  208. SetTimer, Ticketschliessen, -1
  209. return
  210.  
  211. ~!Numpad5::
  212. DT_ID := 5
  213. SetTimer, Ticketschliessen, -1
  214. return
  215.  
  216. ~!Numpad6::
  217. DT_ID := 6
  218. SetTimer, Ticketschliessen, -1
  219. return
  220.  
  221. ~!Numpad7::
  222. DT_ID := 7
  223. SetTimer, Ticketschliessen, -1
  224. return
  225.  
  226. ~!Numpad8::
  227. DT_ID := 8
  228. SetTimer, Ticketschliessen, -1
  229. return
  230.  
  231. ~!Numpad9::
  232. DT_ID := 9
  233. SetTimer, Ticketschliessen, -1
  234. return
  235.  
  236. Ticketschliessen:
  237. {
  238. DT_S =
  239. If((A_WDay = 6 && Uhrzeit > 12) || A_WDay = 7 || (A_WDay = 1 && A_Hour < 12))
  240. DT_S := " und ein schönes Wochenende"
  241.  
  242. SendChat("/aw " . DT_ID . " Ich wünsche dir noch einen schönen Aufenthalt auf RPG-City" . DT_S . ".")
  243. SendChat("/aw " . DT_ID . " Bei weiteren Fragen kannst du dich gerne wieder über das Ticketsystem melden.")
  244.  
  245. Sleep, 100
  246. GetChatLine(0, a)
  247.  
  248. If(a != "Dieses Ticket wurde nicht erstellt." && a != "Du bearbeitest dieses Ticket nicht.")
  249. SendChat("/dt " . DT_ID)
  250. }
  251. return
  252.  
  253. :?:/fragen::
  254. {
  255. ID := PlayerInput("/Ticket-ID: ")
  256. SendChat("/aw " . ID . " Hast du weitere Fragen, Probleme oder Anliegen?")
  257. }
  258. return
  259.  
  260. :?:/tafk::
  261. {
  262. ID := PlayerInput("/Ticket-ID: ")
  263.  
  264. If(ID = "")
  265. return
  266.  
  267. SendChat("/aw " . ID . " Da du nicht mehr antwortest, werde ich das Ticket nun schließen!")
  268. SendChat("/aw " . ID . " Bei weiteren Fragen kannst du dich gerne wieder im Ticket-System melden!")
  269. SendChat("/aw " . ID . " Ich wünsche dir noch einen schönen Aufenthalt auf RPG-City.")
  270. Sendchat("/dt " . ID)
  271. }
  272. return
  273.  
  274. :?:/wh::
  275. {
  276. T_ID := PlayerInput("/Ticket-ID: ")
  277.  
  278. If(T_ID = "")
  279. return
  280.  
  281. SendChat("/aw " . T_ID . " Wie kann ich dir helfen?")
  282. }
  283. return
  284.  
  285. :?:/grund::
  286. {
  287. T_ID := PlayerInput("/Ticket-ID: ")
  288.  
  289. If(T_ID = "")
  290. return
  291.  
  292. SendChat("/aw " . T_ID . " Warum soll ich dich an das gewünschte Mitglied weiterleiten?")
  293. }
  294. return
  295.  
  296. :?:/ubbw::
  297. {
  298. T_ID := PlayerInput("/Ticket-ID: ")
  299.  
  300. If(T_ID = "")
  301. return
  302.  
  303. SendChat("/aw " . T_ID . " UBB (= Neon) bzw. Unterbodenbeleuchtungs Codes kannst du in speziellen Events gewinnen (äußerst selten).")
  304. SendChat("/aw " . T_ID . " Ebenfalls ist es möglich einen UBB-Code bzw. ein UBB-Car für InGame Geld von anderen Spielern abzukaufen.")
  305. }
  306. return
  307.  
  308. :?:/autow::
  309. {
  310. T_ID := PlayerInput("/Ticket-ID: ")
  311.  
  312. If(T_ID = "")
  313. return
  314.  
  315. SendChat("/aw " . T_ID . " Dein Auto findest du ganz einfach per /carkey -> Auto auswählen -> /findcar wieder.")
  316. }
  317. return
  318.  
  319. :?:/level::
  320. {
  321. Level := PlayerInput("/Level: ")
  322.  
  323. If(Level = "")
  324. return
  325.  
  326. If Level is not number
  327. return
  328.  
  329. Chat := PlayerInput("/chat: ")
  330.  
  331. If(Chat = "")
  332. Chat = l
  333.  
  334. If Chat is number
  335. Chat = aw %Chat%
  336.  
  337. Temp := (Level - 1) * (Level - 2) * 2 + (Level - 1) * 8
  338.  
  339. SendChat("/" . Chat . " |---------------------------------------------|")
  340. SendChat("/" . Chat . " Informationen zum Level " . FormatNumber(Level) . ".")
  341. SendChat("/" . Chat . " Spielstunden mit Premium: " . FormatNumber(Round(Temp / 2,0)) . ".")
  342. SendChat("/" . Chat . " Spielstunden ohne Premium: " . FormatNumber(Temp) . ".")
  343. SendChat("/" . Chat . " Benötigte Respektpunkte zum nächsten Level: " . FormatNumber(8 + (Level - 1) * 4) . ".")
  344. SendChat("/" . Chat . " |---------------------------------------------|")
  345. }
  346. return
  347.  
  348. PlayerInput(text)
  349. {
  350. s := A_IsSuspended
  351. KeyWait Enter
  352. SendInput t^a{backspace}%text%
  353. Input, var, v, {enter}
  354. BlockInput, on
  355. SendInput ^a{backspace 100}{enter}
  356. Sleep, 20
  357. BlockInput, off
  358. return var
  359. }
  360. return
  361.  
  362. FormatNumber(_number)
  363. {
  364. StringReplace _number, _number, -
  365. IfEqual ErrorLevel,0, SetEnv Sign,-
  366. Loop Parse, _number, .
  367.  
  368. If (A_Index = 1)
  369. {
  370. len := StrLen(A_LoopField)
  371. Loop Parse, A_LoopField
  372. If (Mod(len-A_Index,3) = 0 and A_Index != len)
  373. x .= A_LoopField "."
  374. Else
  375. x .= A_LoopField
  376. }
  377. Else
  378. Return Sign x "." A_LoopField
  379. Return Sign x
  380. }
  381. return
Advertisement
Add Comment
Please, Sign In to add comment
Public Pastes
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!