SHARE
TWEET

Untitled

a guest May 29th, 2017 64 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. numpad7::
  2. if (isinchat())
  3. {
  4.     send, {lctrl down}{vk41}{vk58}{lctrl up}{F6}
  5. }
  6. else
  7. {
  8.     loop, read, %A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt
  9.     {
  10.         if RegExMatch(A_LoopReadLine, "^\[\d{2}\:\d{2}\:\d{2}\] \* Вы ударили тазером (.*), он обездвижен на 10 секунд\.", s)
  11.         {
  12.             clipboard := s1
  13.         }
  14.     }
  15.     sendchat("/id " clipboard)
  16. }
  17. return
  18. numpad8::sendchat("/find " Clipboard)
  19. numpadMult::sendchat("/st " clipboard)
  20. ^numpaddiv::sendchat("/checkbdlic " clipboard)
  21. numpaddiv::sendchat("/mdc " clipboard)
  22.  
  23.  
  24. !numpad9::
  25. targetName :=
  26. targetID :=
  27. FileRead, chatlog, %A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt
  28. chatlog := StrSplit(chatlog, "`n")
  29. sendchat("/id " Clipboard)
  30. sleep 1150
  31. loop, read, %A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt
  32. {
  33.     if (A_Index >= chatlog.MaxIndex() * 2 - 1)
  34.     {
  35.         if RegExMatch(A_LoopReadLine, "^\[\d{2}\:\d{2}\:\d{2}\] ID\: \((.*?)\) (.*);?", lastidtarget)
  36.         {
  37.             targetName := lastidtarget2
  38.             targetID := lastidtarget1
  39.         }
  40.         if RegExMatch(A_LoopReadLine, "^\[\d{2}\:\d{2}\:\d{2}\] ID\: \((.*?)\) (.*) \{\w{6}\}<PAUSE\: \d+ sec\.?>", lastidtarget)
  41.         {
  42.             targetName := lastidtarget2
  43.             targetID := lastidtarget1
  44.         }
  45.     }
  46. }
  47. if (targetName)
  48. {
  49.     sendchat(targetName "[id: " targetID "]")
  50. }
  51. return
  52.  
  53. numpad9::
  54. FileRead, chatlog, %A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt
  55. chatlog := StrSplit(chatlog, "`n")
  56. sendchat("/id " Clipboard)
  57. sleep 300
  58. loop, read, %A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt
  59. {
  60.     if (A_Index >= chatlog.MaxIndex() * 2 - 1)
  61.     {
  62.         if RegExMatch(A_LoopReadLine, "^\[\d{2}\:\d{2}\:\d{2}\] ID\: \(\d+\) ([a-zA-Z._0-9]{3,20}).*?", lastChatId)
  63.         {
  64.             Clipboard := lastChatId1
  65.         }
  66.     }
  67. }
  68. return
  69.  
  70. /*
  71. ----------------------------------------------------
  72. Copy nickname of last killed suspected
  73. ----------------------------------------------------
  74. */
  75.  
  76. rctrl & F1::
  77. loop, read, %A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt
  78. {
  79.     if RegExMatch(A_LoopReadLine, "^\[\d{2}:\d{2}:\d{2}\] \* Преступник (.*?) арестован и посажен на \d+ секунд\. Вы получили \$\d+\.", arrestTarget)
  80.     clipboard := arrestTarget1
  81. }
  82. sendchat("/id " clipboard)
  83. return
  84.  
  85.  
  86. /*
  87. ----------------------------------------------------
  88. Copy last /pl player
  89. ----------------------------------------------------
  90. */
  91.  
  92. rctrl & F2::
  93. loop, read, %A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt
  94. {
  95.     if RegExMatch(A_LoopReadLine, "^\[\d{2}:\d{2}:\d{2}\] \[PL\] >>> (.*)\[\d+\] \(.*\) вош(ёл|ла) на сервер\.", pltarget)
  96.     clipboard := pltarget1
  97. }
  98. sendchat("/id " clipboard)
  99. return
  100.  
  101. /*
  102. ----------------------------------------------------
  103. Copy last quit player
  104. ----------------------------------------------------
  105. */
  106.  
  107. rctrl & F3::
  108. loop, read, %A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt
  109. {
  110.     if RegExMatch(A_LoopReadLine, "^\[\d{2}:\d{2}:\d{2}\] \* Ответ принят\: (.*?) вышел при аресте и посажен в тюрьму строгого режима\.", quittarget)
  111.     clipboard := quittarget1
  112. }
  113. sendchat("/id " clipboard)
  114. return
  115.  
  116. /*
  117. ----------------------------------------------------
  118. Copy last seen suspected
  119. ----------------------------------------------------
  120. */
  121.  
  122. rctrl & F4::
  123. loop, read, %A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt
  124. {
  125.     if RegExMatch(A_LoopReadLine, "^\[\d{2}:\d{2}:\d{2}\] \[WANTED\] (.*) заметил подозреваемого (.*)", lasttarget)
  126.     clipboard := lasttarget2
  127. }
  128. sendchat("/id " clipboard)
  129. return
  130.  
  131. /*
  132. ----------------------------------------------------
  133. Copy last /su player
  134. ----------------------------------------------------
  135. */
  136.  
  137. rctrl & f5::
  138. loop, read, %A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt
  139. {
  140.     if RegExMatch(A_LoopReadLine, "^\[\d{2}:\d{2}:\d{2}\] Lewis_Flow\: .*, обвиняемый\: (.*?)\(опасность\: \d+, общий уровень\: \d+\)\.", s)
  141.     clipboard := s1
  142. }
  143. sendchat("/id " clipboard)
  144. return
RAW Paste Data
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!
 
Top