JackShapard

Ух ток мне форумник забанили, спасибо Андхрюше, тут движ начался

#MaxThreadsPerHotkey 3F1::#MaxThreadsPerHotkey 1if SmartLoop { SmartLoop := false return }SmartLoop := trueLoop{SendInput {f6}КОМАНДА ИЛИ ТО ЧТО НАДО ФЛУДИТЬ{enter}sleep 1050if not SmartLoop break }SmartLoop := false Return

Типа берут тебя на биту, жмешь бинд. У игроков ты АФК 5 сек, возобновляется, и ты в другом месте

*[RP]GameWorld: Ken_Guru забанен администратором Tomas_Silver; срок 90(д), причина: распространение читов

Привет, полезная организация

Ты наверное тут убрал: SendInput %stroka1%{enter}

С днём рождения, счастья, здоровья, всех благ

F1:: Sendinput, {F6}/rentroom{enter} Return

Попробуй открыть через Notepad ++. Или кинь мне в Скайп (он есть в профиле) я гляну

Флуд захват: #MaxThreadsPerHotkey 3F1::#MaxThreadsPerHotkey 1if SmartLoop { SmartLoop := false return }SmartLoop := trueLoop{SendInput {f6}/zahvat{enter}sleep 1050if not SmartLoop break }SmartLoop := false Return Дринк: F2::Sendinput {f6}/drink{enter}sleep 50loop 30{Send {space down}{space up}}return

Эт Кен делал как замену для удф функции

#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, прибыл корабль с материалами { FoundPos := RegExMatch(MY_REACTION_STRING, "\[MATERIALS\] В порт (.*) прибыл корабль с материалами",MY_LODKA) Checkchat("/f ВНИМАНИЕ!!! В порт %MY_LODKA% прибыл корабль с материалами ") Sleep 1500 Checkchat("/f [USS Numnutz]Кто рядом с респой,берём буссы и бурито,кто взял {+} в чат") Sleep 1500 Checkchat("/f [USS Numnutz]Все остальные берём оружие + 160хп и направляемся на лодку") Sleep 1500 Checkchat("/f [USS Numnutz]Не будет буссов и бурито на лодке -будут отдуватся все") Sleep 1500 Checkchat("/f [USS Numnutz]Помните{!} Кого не будет на лодке - выговор[Скрин состава]") Return } @Bogdan_Kudinov

через программу для редакции худа попробуй

Numpad0:: Sendinput {f6}Хоп-хей {enter} return Просто перед приземлением жми)

Я в том 24/7 покупаю ключи вечно))

F2:: loop, read, %A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt { i=%A_Index% } FileReadLine, line, %A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt, i-1 StringReplace, line, line, !, {!}, ,All StringReplace, line, line, #, {#}, ,All StringReplace, line, line, ^, {^}, ,All StringReplace, line, line, +, {+}, ,All StringTrimLeft, line, line, 11 sendinput, {f6}%line%{enter} return F1:: loop, read, %A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt { i=%A_Index% } FileReadLine, line, %A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt, i-1 StringTrimLeft, line, line, 11 IfInString, line, : { RegExMatch(line,"\Q: \E(.*)",line) StringTrimLeft, line, line, 2 } StringReplace, line, line, !, {!}, ,All StringReplace, line, line, #, {#}, ,All StringReplace, line, line, ^, {^}, ,All StringReplace, line, line, +, {+}, ,All sendinput, {f6}%line%{enter} return

У меня такое бывает когда оператива забита сильно

Это у тебя комп слабый и теперь лаги

С др, мальцев

1 слот рюкзака: f11:: sendinput, {f6}/bag{enter} sleep, 300 ; Задержка. Скрипт/сервер работает через жопу = увеличиваем, перезапускаем скрипт. MouseClick, Left, A_ScreenWidth/1.33, A_ScreenHeight/2.56 MouseClick, Left, A_ScreenWidth/1.33, A_ScreenHeight/2.56 sleep, 300 ; Задержка. Скрипт/сервер работает через жопу = увеличиваем, перезапускаем скрипт. sendinput, 50{enter}{esc} ; 50 - количество патронов для оружия в первом слоте Return 2 слот рюкзака: f12:: sendinput, {f6}/bag{enter} sleep, 300 ; Задержка. Скрипт/сервер работает через жопу = увеличиваем, перезапускаем скрипт. 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, 300 ; Задержка. Скрипт/сервер работает через жопу = увеличиваем, перезапускаем скрипт. sendinput, 10{enter}{esc} ; 10 - количество патронов для оружия во втором слоте Return

А стрелочками открыть карту не?

Лол, во 1-х ты сам раньше кидал этот код, во 2-х я уже год с ним бегаю и не пропадает)

Numpad3:: SendMessage, 0x50,, 0x4190419,, A Sendinput, {F6}Хоп-хей {enter} return Нужно вставлять вот это перед текстом бинда: SendMessage, 0x50,, 0x4190419,, A

Дороу