Jump to content

Добро пожаловать на форум проекта RP GameWorld!

[AHK] Полезные бинды


Kangaroo

Recommended Posts

1 час назад, Гнилой сказал:

Здраствуйте хотел узнать есть бинд который показывает когда последний раз угнал машину ну или ограбил дом....(CRMP-RP)игра

Здравствуйте, я в это говно не играл, поэтому скриптов для него не имею.

  • I like it (+1) 1
Link to comment
Share on other sites

22 минуты назад, Kangaroo сказал:

Здравствуйте, я в это (Слово удалено системой) не играл, поэтому скриптов для него не имею.

да я Samp пытался играть сложно чет команды трудные или привыкнуть стоит

 

Link to comment
Share on other sites

9 часов назад, Kangaroo сказал:

Опиши нормально проблему, ничего не понятно))

 

И на какой другой бинд нажимаешь?

Смотри, я нажимаю бинд num2 - /inv, и всеровно он копирует чатлог, т.е я нажимаю на num2 - другой бинд ( /inv ), и он копирует строку, хотя копировать у меня совсем на другую клавишу

Link to comment
Share on other sites

47 минут назад, kaboomer сказал:

Смотри, я нажимаю бинд num2 - /inv, и всеровно он копирует чатлог, т.е я нажимаю на num2 - другой бинд ( /inv ), и он копирует строку, хотя копировать у меня совсем на другую клавишу

Звучит похоже на то, что в конце этих биндов не хватает return (отдельной строкой).

Если не поможет, то скинь текст всего скрипта.

 

Link to comment
Share on other sites

1 час назад, Kangaroo сказал:

Звучит похоже на то, что в конце этих биндов не хватает return (отдельной строкой).

Если не поможет, то скинь текст всего скрипта.

 

!down::
SendMessage, 0x50,, 0x4190419,, A
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
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
Clipboard := MY_REPEAT_STRING
Sendinput {f6}%MY_REPEAT_STRING%^{vk41}
return
!up::
SendMessage, 0x50,, 0x4190419,, A
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
Clipboard := MY_REPEAT_STRING
Sendinput {del}%MY_REPEAT_STRING%^{vk41}
return

 

Link to comment
Share on other sites

help -_-

ситуация такая: вместо  %myId% в чат пишет "0" (не мой iD в общем пишет)

 

Скрытый текст

^1::
SendMessage, 0x50,, 0x4190419,, A
sendinput, {f6}/id Jackson_Avery{enter}
sleep 1150
loop, read, %A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt
{
    if RegExMatch(A_LoopReadLine, "^\[\d{2}\:\d{2}\:\d{2}\] ID\: \((\d+)\) (.*);?", lastidtarget)
    {
        myId := lastidtarget1
    }
    if RegExMatch(A_LoopReadLine, "^\[\d{2}\:\d{2}\:\d{2}\] ID\: \((\d+)\) (.*) \{\w{6}\}<PAUSE\: \d+ sec\.?>", lastidtarget)
    {
        myId := lastidtarget1
    }
}
SendInput, {f6}Приветствую Вас на тестировании{!} Сотрудник отдела кадров - Employee ICD, Jackson Avery.{Enter}
Sleep 2000 ;
SendInput, {f6}Прошу предоставить Ваш паспорт, лицензии, медицинскую карту.{Enter}
Sleep 1700 ;
SendInput, {F6}/b Используйте: /sl %myId%; /pas %myId%; /showmc %myId% {Enter}
Sleep 2000 ;
SendInput, {F6}После этого ожидайте пару минут - я проверю Вас в БДНП и ЧСПО.{enter}
Sleep 2000 ;
SendInput, {F6}/checkbl {space}
Return

 

Edited by Vendettа
Link to comment
Share on other sites

1 час назад, Vendettа сказал:

help -_-

ситуация такая: вместо  %myId% в чат пишет "0" (не мой iD в общем пишет)

Более удобный (и работающий) бинд:

 

^1::
MY_ID1 :=
Loop, read, %A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt
    IfInString, A_LoopReadLine, ] * Jackson_Avery[
        MY_ID := A_LoopReadLine
RegExMatch(MY_ID, "Jackson_Avery\[(.*)\]", MY_ID)
If !MY_ID
{
    SendInput {f6}/id Jackson_Avery{enter}
    sleep 1111
    Loop, read, %A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt
        IfInString, A_LoopReadLine, ) Jackson_Avery
            MY_ID := A_LoopReadLine
    RegExMatch(MY_ID, "ID: \((.*)\) Jackson_Avery", MY_ID)
}
SendInput {f6}Приветствую Вас на тестировании{!} Сотрудник отдела кадров - Employee ICD, Jackson Avery.{Enter}
Sleep 2000
SendInput {f6}Прошу предоставить Ваш паспорт, лицензии, медицинскую карту.{Enter}
Sleep 1700
SendInput {F6}/b Используйте: /sl %MY_ID1%; /pas %MY_ID1%; /showmc %MY_ID1% {Enter}
Sleep 2000
SendInput {F6}После этого ожидайте пару минут - я проверю Вас в БДНП и ЧСПО.{enter}
Sleep 2000
SendInput {F6}/checkbl{space}
return

 

1 час назад, kaboomer сказал:

Numpad2::
Sendinput, {F6}/inv{enter}
return

 

 

Numpad1::
Sendinput, {F6}/towcar{enter}
return

Не вижу ничего неправильного. Можешь скинуть весь скрипт в скайп macropus9, протестирую сам.

  • Thanks (+1) 1
Link to comment
Share on other sites

Пацаны или Ken, скиньте готовый бинд для доставания быстро оружия из рюкзака, " Ячейка 1-ая пистолет: глушитель 50патронов ", F1, буду очень благодарен. 

Link to comment
Share on other sites

1 час назад, Vitalik02 сказал:

Пацаны или Ken, скиньте готовый бинд для доставания быстро оружия из рюкзака, " Ячейка 1-ая пистолет: глушитель 50патронов ", F1, буду очень благодарен. 

1 слот рюкзака:

f1::
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 слот рюкзака:

f2::
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

Работает на любых разрешениях.

Edited by Egor13
Link to comment
Share on other sites

6 минут назад, Egor13 сказал:

1 слот рюкзака:


f1::
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 слот рюкзака:


f2::
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

Работает на любых разрешениях.

Он даже /bag не открывает ну то что ты скинул бинд, скиньте мне сразу готовый.

Link to comment
Share on other sites

56 минут назад, Vitalik02 сказал:

Он даже /bag не открывает ну то что ты скинул бинд, скиньте мне сразу готовый.

Это готовый и работающий.

Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...