MorrisonLegend Опубликовано: 7 января 2021 Поделиться Опубликовано: 7 января 2021 #Persistent Checkchat(Chatmessage, MY_VAR1:=0, MY_VAR2:=0, MY_VAR3:=0) { StringReplace, Chatmessage, Chatmessage, (.1), %MY_VAR1% StringReplace, Chatmessage, Chatmessage, (.2), %MY_VAR2% StringReplace, Chatmessage, Chatmessage, (.3), %MY_VAR3% SetFormat, Integer, H Locale1=0x4090409 ; Английский (американский). Locale2=0x4190419 ; Русский. WinGet, WinID,, A ThreadID:=DllCall("GetWindowThreadProcessId", "Int", WinID, "Int", "0") InputLocaleID:=DllCall("GetKeyboardLayout", "Int", ThreadID) SendMessage, 0x50,, 0x4190419,, A sleep 100 TEMP := Clipboard Clipboard := SendInput 1+{left}^{vk58} sleep 50 If Clipboard { SendInput ^{vk41}^{vk58}{enter} sleep 50 SendInput {f6}%Chatmessage%{enter} StringReplace, Clipboard, Clipboard, !, {!}, All StringReplace, Clipboard, Clipboard, +, {+}, All StringReplace, Clipboard, Clipboard, ^, {^}, All StringReplace, Clipboard, Clipboard, #, {#}, All SendInput {f6}%Clipboard% } Else SendInput {f6}%Chatmessage%{enter} Clipboard := TEMP TEMP := sleep 200 SendMessage, 0x50,, % InputLocaleID,, A } MY_STRING_NUMBER := 1 SetTimer, MY_REACTION_TIMER, 50 return MY_REACTION_TIMER: IfWinActive GTA:SA:MP { MY_REACTION_STRING := MY_REACTION_STRING2 := FileReadLine, MY_REACTION_STRING, %A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt, %MY_STRING_NUMBER% MY_STRING_NUMBER2 := (MY_STRING_NUMBER+20) FileReadLine, MY_REACTION_STRING2, %A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt, %MY_STRING_NUMBER2% If MY_REACTION_STRING2 Loop, read, %A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt MY_STRING_NUMBER := (A_Index-1) else if MY_REACTION_STRING { MY_STRING_NUMBER += 2 IfInString, MY_REACTION_STRING, * Ваш автомобиль припаркован. Если Вы не нашли свой автомобиль, используйте: /mycar { Checkchat("/tognews") sleep 1111 Checkchat("/mafiatop") sleep 1111 Checkchat("/members") sleep 1111 } IfInString, MY_REACTION_STRING, * Материалов в машине { sleep 15000 Checkchat("/inv") sleep 30000 Checkchat("/inv") sleep 45000 Checkchat("/inv") sleep 60000 Checkchat("/inv") } IfInString, MY_REACTION_STRING, * ТС успешно пригнано, Вы получили { sleep 600 Checkchat("/FAM [JACKCAR ALERT] ТС УСПЕШНО ПРИГНАНО{!}") sleep 1380000 Checkchat("/FAM [JACKCAR ALERT] УГОН НОВОГО ТС ДОСТУПЕН{!}") sleep 600 Checkchat("/FAM [JACKCAR ALERT] УГОН НОВОГО ТС ДОСТУПЕН{!}") sleep 600 Checkchat("/FAM [JACKCAR ALERT] УГОН НОВОГО ТС ДОСТУПЕН{!}") } IfInString, MY_REACTION_STRING, предлагает вам дозаправку за $1, (введите /accept refill) { Checkchat("/accept refill") sleep 1500 } IfInString, MY_REACTION_STRING, грамм наркотиков. Введите /td для согласия { Checkchat("/td") sleep 1111 } } } IfWinNotExist GTA:SA:MP MY_STRING_NUMBER := 1 return #IfWinActive, GTA:SA:MP F1:: Sendinput {f6}/drink{enter} sleep 50 loop 60 { Send {space down}{space up} } return #MaxThreadsPerHotkey 3 ^2:: #MaxThreadsPerHotkey 1 if SmartLoop { SmartLoop := false return } SmartLoop := true SendInput {f6}/find{space} Input, MY_INPUT, V, {enter} Loop { sleep 1111 Sendinput {f6}/find %MY_INPUT%{enter} if not SmartLoop break } SmartLoop := false return ^ё:: Loop, read, %A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt { IfInString, A_LoopReadLine, ] [MATERIALS] Корабль с материалами покинул MY_SHIP := A_LoopReadLine IfInString, A_LoopReadLine, ] [MATERIALS] В порт MY_SHIP := A_LoopReadLine } If MY_SHIP { IfInString, MY_SHIP, ] [MATERIALS] В порт { FoundPos := RegExMatch(MY_SHIP, "(.*) \[MATERIALS\] В порт (.*) прибыл корабль с материалами", MY_FINAL_SHIP) SendInput {f6}/f [MATERIALS] Лодка находится в порту %MY_FINAL_SHIP2% с %MY_FINAL_SHIP1%{enter} } IfInString, MY_SHIP, ] [MATERIALS] Корабль с материалами покинул { FoundPos := RegExMatch(MY_SHIP, "(.*) \[MATERIALS\] Корабль с материалами покинул штат.", MY_FINAL_SHIP) SendInput {f6} Последняя лодка уплыла в %MY_FINAL_SHIP1%{home} } } else SendInput {f6}/f [MATERIALS] Информация о последней лодке отсутствует [НЕИЗВЕСТНО]{enter} return ^NumPad0:: loop 2 { SendInput {enter} sleep 120 SendInput 98{enter} sleep 200 Sendinput {f6}/bag{enter} sleep 500 Click 852, 221, 0 Click MouseClick, Left, A_ScreenWidth/1.2, A_ScreenHeight/3.47 MouseClick, Left, A_ScreenWidth/1.2, A_ScreenHeight/3.47 sleep 100 Sendinput {down} sleep 100 Sendinput {enter} sleep 100 Sendinput {enter}{esc} sleep 3000 } SendInput {enter} sleep 120 SendInput 98{enter} return ^Numpad4:: Loop, read, %A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt { IfInString, A_LoopReadLine, ] 1. La Cosa Nostra [Базы RegExMatch(A_LoopReadLine, "Материалы: (.*); Эликсир жизни: (.*); Бланки: (.*);", MAFIA_L_START) IfInString, A_LoopReadLine, ] 2. Russian Mafia [Базы RegExMatch(A_LoopReadLine, "Материалы: (.*); Эликсир жизни: (.*); Бланки: (.*);", MAFIA_R_START) IfInString, A_LoopReadLine, ] 3. Yakuza [Базы RegExMatch(A_LoopReadLine, "\[(.*)\] .* Материалы: (.*); Эликсир жизни: (.*); Бланки: (.*);", MAFIA_Y_START) } sleep 1111 SendInput {f6}/mafiatop{enter} sleep 800 Loop, read, %A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt { IfInString, A_LoopReadLine, ] 1. La Cosa Nostra [Базы RegExMatch(A_LoopReadLine, "Материалы: (.*); Эликсир жизни: (.*); Бланки: (.*);", MAFIA_L_FINISH) IfInString, A_LoopReadLine, ] 2. Russian Mafia [Базы RegExMatch(A_LoopReadLine, "Материалы: (.*); Эликсир жизни: (.*); Бланки: (.*);", MAFIA_R_FINISH) IfInString, A_LoopReadLine, ] 3. Yakuza [Базы RegExMatch(A_LoopReadLine, "Материалы: (.*); Эликсир жизни: (.*); Бланки: (.*);", MAFIA_Y_FINISH) } MAFIA_L_RESULT1 := (MAFIA_L_FINISH1-MAFIA_L_START1) MAFIA_L_RESULT2 := (MAFIA_L_FINISH2-MAFIA_L_START2) MAFIA_L_RESULT3 := (MAFIA_L_FINISH3-MAFIA_L_START3) MAFIA_R_RESULT1 := (MAFIA_R_FINISH1-MAFIA_R_START1) MAFIA_R_RESULT2 := (MAFIA_R_FINISH2-MAFIA_R_START2) MAFIA_R_RESULT3 := (MAFIA_R_FINISH3-MAFIA_R_START3) MAFIA_Y_RESULT1 := (MAFIA_Y_FINISH1-MAFIA_Y_START2) MAFIA_Y_RESULT2 := (MAFIA_Y_FINISH2-MAFIA_Y_START3) MAFIA_Y_RESULT3 := (MAFIA_Y_FINISH3-MAFIA_Y_START4) SendInput {f6}/f С %MAFIA_Y_START1%: L: %MAFIA_L_RESULT1%, %MAFIA_L_RESULT2%, %MAFIA_L_RESULT3%. || R: %MAFIA_R_RESULT1%, %MAFIA_R_RESULT2%, %MAFIA_R_RESULT3%. || Yakuza; Materials: %MAFIA_Y_RESULT1% Narko: %MAFIA_Y_RESULT2% Blanks: %MAFIA_Y_RESULT3%{enter} return ^NumPad5:: Loop, read, %A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt IfInString, A_LoopReadLine, [MAFIA ALERT] Операция по конфискату склада RegExMatch(A_LoopReadLine, "\[(.*)] \ .* \[MAFIA ALERT\] Операция по конфискату склада (.*) окончена.", MY_KONFISKAT) If !MY_KONFISKAT1 MY_KONFISKAT1 := "[Неизвестно]" If !MY_KONFISKAT2 MY_KONFISKAT2 := "[Неизвестно]" Sendinput {f6}/u [MAFIA ALERT] Последний конфискат был в %MY_KONFISKAT1% на %MY_KONFISKAT2%.{enter} return home:: Sendinput {f6}/tie{space} Input, MY_TARGET, V, {enter} Sleep 1200 Sendinput {f6}/gag %MY_TARGET%{enter} Sleep 1200 Sendinput {f6}/steal %MY_TARGET%{enter} Sleep 1200 Sendinput {f6}/eject %MY_TARGET%{enter} Return F2:: sendinput, {f6}/bag{enter} sleep, 301 MouseClick, Left, A_ScreenWidth/1.33, A_ScreenHeight/2.56 MouseClick, Left, A_ScreenWidth/1.33, A_ScreenHeight/2.56 sleep, 301 sendinput, 21{enter} sleep, 50 MouseClick, Left, A_ScreenWidth/1.33+A_ScreenWidth/26.6, A_ScreenHeight/2.56 MouseClick, Left, A_ScreenWidth/1.33+A_ScreenWidth/26.6, A_ScreenHeight/2.56 sleep, 301 sendinput, 100{enter}{esc} Return ^NumPad6:: MY_CHATLOG -= 2 FileReadLine, MY_REPEAT_STRING, %A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt, %MY_CHATLOG% StringTrimLeft, MY_REPEAT_STRING, MY_REPEAT_STRING, 11 StringReplace, MY_REPEAT_STRING, MY_REPEAT_STRING, !, {!}, All StringReplace, MY_REPEAT_STRING, MY_REPEAT_STRING, +, {+}, All StringReplace, MY_REPEAT_STRING, MY_REPEAT_STRING, #, {#}, All StringReplace, MY_REPEAT_STRING, MY_REPEAT_STRING, ^, {^}, All Sendinput {del}%MY_REPEAT_STRING%^{vk41} return ^NumPad9:: Loop, read, %A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt { If A_LoopReadLine MY_REPEAT_STRING := A_LoopReadLine MY_CHATLOG := (A_Index-1) } StringTrimLeft, MY_REPEAT_STRING, MY_REPEAT_STRING, 11 Clipboard := MY_REPEAT_STRING Sendinput {f6}%MY_REPEAT_STRING%^{vk41} Soundbeep return F3:: sendinput, {f6}/healme{enter} return ё:: sendinput, {f6}South Carolina{enter} return ^NumPad8:: sendinput, {f6}/ad Пушки и Нарко от Yakuza{enter} return ^1:: sendinput, {f6}/bl{enter} return #SingleInstance, force #IfWinActive, GTA:SA:MP F10:: Sleep, 550 Loop { SendInput, {Up Down} SendInput, {Up Up} } F11:: Reload return :?:/угон:: sleep 200 JACKCAR := JACKCAR1 := Loop, read, %A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt IfInString, A_LoopReadLine, Следующий заказ можно взять через 20 минут. JACKCAR := A_LoopReadLine RegExMatch(JACKCAR, "\[(.*)]", JACKCAR) SendInput {f6}/fam Последний угон совершен в %JACKCAR1%^{enter} return Del:: sendinput, {f6}/u [MAFIA ALERT] ВНИМАНИЕ{!} КОНФИСКАТ БУДЕТ ДОСТУПЕН В [] [LAST:]{left 9} return End:: sendinput, {f6}/selldrugs{space}1{space}98{space}15000{left}{left}{left}{left}{left}{left}{left}{left}{left}{left}{left}{space} return Цитата Ссылка на комментарий Поделиться на других сайтах Больше способов поделиться...
akatsuki Опубликовано: 9 января 2021 Поделиться Опубликовано: 9 января 2021 коничива Цитата Ссылка на комментарий Поделиться на других сайтах Больше способов поделиться...
Ilua_Volkov. Опубликовано: 9 января 2021 Поделиться Опубликовано: 9 января 2021 6 часов назад, akatsuki сказал: коничива Konbanwa Цитата Ссылка на комментарий Поделиться на других сайтах Больше способов поделиться...
Enotya1394 Опубликовано: 11 февраля 2021 Поделиться Опубликовано: 11 февраля 2021 1/9/2021 в 9:51 PM, Ilua_Volkov. сказал: Konbanwa Старушки у власти)) Цитата Ссылка на комментарий Поделиться на других сайтах Больше способов поделиться...
Enotya1394 Опубликовано: 11 февраля 2021 Поделиться Опубликовано: 11 февраля 2021 Как там на гв? Цитата Ссылка на комментарий Поделиться на других сайтах Больше способов поделиться...
Ilua_Volkov. Опубликовано: 11 февраля 2021 Поделиться Опубликовано: 11 февраля 2021 3 часа назад, Enotya1394 сказал: Как там на гв? огонь Цитата Ссылка на комментарий Поделиться на других сайтах Больше способов поделиться...
Shakz Опубликовано: 14 сентября 2021 Поделиться Опубликовано: 14 сентября 2021 KONNICHIWA GANGSTERI! Цитата Ссылка на комментарий Поделиться на других сайтах Больше способов поделиться...
monterofam Опубликовано: 14 сентября 2021 Поделиться Опубликовано: 14 сентября 2021 10 минут назад, Shakz сказал: KONNICHIWA GANGSTERI! Выйди, тут никого нет Цитата Ссылка на комментарий Поделиться на других сайтах Больше способов поделиться...
Shakz Опубликовано: 14 сентября 2021 Поделиться Опубликовано: 14 сентября 2021 6 минут назад, monterofam сказал: Выйди, тут никого нет теперь я здесь. пришел улучшить гв своим присутствием Цитата Ссылка на комментарий Поделиться на других сайтах Больше способов поделиться...
MorrisonLegend Опубликовано: 14 сентября 2021 Поделиться Опубликовано: 14 сентября 2021 2 hours ago, Shakz said: теперь я здесь. пришел улучшить гв своим присутствием много воды утекло... Цитата Ссылка на комментарий Поделиться на других сайтах Больше способов поделиться...
Shakz Опубликовано: 14 сентября 2021 Поделиться Опубликовано: 14 сентября 2021 11 минут назад, MorrisonLegend сказал: много воды утекло... ой даже хз кто ты, но (Слово удалено системой) сколько утекло) Цитата Ссылка на комментарий Поделиться на других сайтах Больше способов поделиться...
monterofam Опубликовано: 14 сентября 2021 Поделиться Опубликовано: 14 сентября 2021 6 часов назад, Shakz сказал: ой даже хз кто ты, но (Слово удалено системой) сколько утекло) (Слово удалено системой) дебил хахахаа, ток не говори что на гв вернешься Цитата Ссылка на комментарий Поделиться на других сайтах Больше способов поделиться...
Shakz Опубликовано: 15 сентября 2021 Поделиться Опубликовано: 15 сентября 2021 12 часов назад, monterofam сказал: (Слово удалено системой) дебил хахахаа, ток не говори что на гв вернешься если мне кто-то поможет на мак установить Samp, то да) Цитата Ссылка на комментарий Поделиться на других сайтах Больше способов поделиться...
monterofam Опубликовано: 15 сентября 2021 Поделиться Опубликовано: 15 сентября 2021 6 часов назад, Shakz сказал: если мне кто-то поможет на мак установить Samp, то да) Надеюсь тебе никто не поможет, что бы в это (Слово удалено системой) возвращаться) Цитата Ссылка на комментарий Поделиться на других сайтах Больше способов поделиться...
Marka Banzai Опубликовано: 15 сентября 2021 Поделиться Опубликовано: 15 сентября 2021 Shakz посмотри в инете есть различные видео , ищи источники информаций разве сложно. Цитата Ссылка на комментарий Поделиться на других сайтах Больше способов поделиться...
Рекомендованные сообщения
Присоединяйтесь к обсуждению
Вы можете опубликовать сообщение сейчас, а зарегистрироваться позже. Если у вас есть аккаунт, войдите в него для написания от своего имени.