Advertisement
Madrasso

Untitled

Jun 16th, 2018
97
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. #NoEnv
  2. #Include samp-udf.ahk
  3. FileInstall, F:\AutoHotKey\SciTE\tools\SmartGUI\rose.jpg, %A_Temp%\logo-madrasso.jpg, 1
  4. shield := 1
  5. if !A_IsAdmin && !%False%
  6. {
  7. if A_OSVersion not in WIN_2003,WIN_XP,WIN_2000
  8. {
  9. Run *RunAs "%A_ScriptFullPath%" ,, UseErrorLevel
  10. if !ErrorLevel
  11. ExitApp
  12. }
  13. ExitApp
  14. }
  15. Gui, Add, Text, x2 y149 w470 h30 +Center, all rights reserved.`n - © madrasso ( vk.com/e.madrasso )
  16. Gui, Add, Picture, x-8 y-1 w490 h140 , %A_Temp%\logo-madrasso.jpg
  17. Gui, Add, Button, x12 y179 w110 h30 ginfo, ИНФОРМАЦИЯ
  18. Gui, Add, Button, x182 y179 w110 h20 gauthor, АВТОР
  19. Gui, Add, Button, x132 y209 w210 h20 gidea, ПРЕДЛОЖИТЬ СВОЮ ИДЕЮ
  20. Gui, Add, Button, x352 y179 w110 h30 +Center ggroupvk, ГРУППА
  21. Gui, Add, Text, x352 y219 w110 h30 +Center, Удачи)
  22. time1 := A_Hour ":" A_Min
  23. Gui, Add, Text, x12 y219 w110 h30 +Center, Время:`n%time1%
  24. Gui, Show, w479 h265, AHK SCRIPT - MADRASSO
  25. Menu, Tray, NoStandard
  26. Menu, Tray, DeleteAll
  27. Menu, Tray, Add, Author, author
  28. Menu, Tray, Add, Group VK, groupvk
  29. SetTimer, times, on
  30. return
  31. idea:
  32. Run, https://vk.com/im?sel=-167523533
  33. return
  34. times:
  35. time1 := A_Hour ":" A_Min
  36. Gui, Add, Text, x12 y219 w110 h30 +Center, Время:`n%time1%
  37. sleep, 5000
  38. return
  39. author:
  40. Run, https://vk.com/e.madrasso
  41. return
  42. groupvk:
  43. run, https://vk.com/mdx_ahk
  44. return
  45. info:
  46. msgbox, Всю информацию можно узнать через игру, введя команду /inf.
  47. return
  48. askill1:
  49. sleep, 500
  50. Send, {Click Down}
  51. sleep, 200
  52. Send, {Click up}
  53. return
  54. am1:
  55. sendchat("/pay " ids1 " " ids2)
  56. sleep, 1200
  57. return
  58. NumPad3::
  59. sendchat("/time")
  60. return
  61. NumPad2::
  62. addChatMessage("{13d5a1}------------------------------------------------------------------------------------------------------------------------------")
  63. addChatMessage("{b400ff}Подсказка{F5F5DC}: Нажмите 1, наркотики.")
  64. addChatMessage("{b400ff}Подсказка{F5F5DC}: Нажмите 2, бронижелет.")
  65. addChatMessage("{b400ff}Подсказка{F5F5DC}: Нажмите 3, оружие.")
  66. addChatMessage("{b400ff}Подсказка{F5F5DC}: Нажмите 4, маска.")
  67. addChatMessage("{13d5a1}------------------------------------------------------------------------------------------------------------------------------")
  68. loop
  69. {
  70.     Input , OutputVar, L1 V, {1}{2}{3}{4}
  71.     if (ErrorLevel = "EndKey:1") or (ErrorLevel = "EndKey:2") or (ErrorLevel = "EndKey:3") or (ErrorLevel = "EndKey:4")
  72.     break
  73. }
  74. if ErrorLevel = EndKey:1
  75. {
  76.     SendChat("/me достал конфеты с надписью 'Loweza'")
  77. }
  78. else
  79. if ErrorLevel = EndKey:2
  80. {
  81.     SendChat("/me достал бронижелет с надписью 'Loweza'")
  82. }
  83. if ErrorLevel = EndKey:3
  84. {
  85.     SendChat("/me достал оружие с гравировкой 'Loweza'")
  86. }
  87. if ErrorLevel = EndKey:4
  88. {
  89.     SendChat("/me достал маску с надписью 'Loweza'")
  90. }
  91. return
  92.  
  93.  
  94. $~NumpadEnter::
  95. $~Enter::
  96. if (isInChat() = 1 && isDialogOpen() == 0)
  97. {
  98.     Sleep 250
  99.     dwAddress := dwSAMP + 0x12D8F8
  100.     chatInput := readString(hGTA, dwAddress, 256)
  101.     IfWinNotActive, GTA:SA:MP
  102.         return
  103.     blockChatInput()
  104.     if (activated = 0) {
  105.         showdialog("0", "{FFFFFF}AHK MULTI-CHEAT - {edf505}MADRASSO", "{FF0000}------------------------------ {FFFFFF}Время: " A_Hour ":" A_Min " {FF0000}-------------------------------`n    {FFFFFF}                           Доброго времени суток, уважаемый, {89f505}" name ".`n{FFFFFF}             Ваш скрипт не активирован, за активацией обращаться к автору!.", "Закрыть")
  106.         return
  107.     } else if (chatInput = "/inf") {
  108.         name := RegExReplace(getUsername(), "_.*", "")
  109.         showdialog("0", "{FFFFFF}AHK MULTI-CHEAT - {edf505}MADRASSO", "{FF0000}------------------------------ {FFFFFF}Время: " A_Hour ":" A_Min " {FF0000}--------------------------------`n{FFFFFF}                           Доброго времени суток, уважаемый, {89f505}" name ".`n{FFFFFF}                          Спасибо что вы пользуетесь моими скриптами.`n`n{89f505}Инструкция:{FFFFFF} Что бы включить какою-либо функцию, просто`nвведите любую команду, которые написаны и описаны ниже.`n`n{05c1f5}/autoskill {FFFFFF}- Автопрокачка скиллов. (возьмите в руки оружие и сядьте, после чего активируйте)`n{05c1f5}/automoney ID Сумма{FFFFFF}- автоматическая передача денег(для выключения введите эту же команду)", "Закрыть")
  110.     } else if (chatinput = "/autoskill") {
  111.         if(askill = 1) {
  112.             addchatmessage("{05c1f5}[AutoSkill] {FFFFFF}- {f50559}Деактивировано")
  113.             askill=0
  114.             settimer, askill1, off
  115.         } else {
  116.             addchatmessage("{05c1f5}[AutoSkill] {FFFFFF}- {2df505}Активировано")
  117.             askill=1
  118.             SetTimer, askill1, on
  119.         }
  120.     } else if (regexmatch(chatinput, "/automoney ([0-9]+) ([0-9]+)", IDs)) {
  121.         if(am = 1) {
  122.             am=0
  123.             SetTimer, am1, off
  124.         } else {
  125.             am=1
  126.             SetTimer, am1, on
  127.         }
  128.     } else
  129.         unBlockChatInput()
  130. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement