[AHK] AHK для МО Advance-RP (Private)

Тема в разделе "Продажа читов/софта", создана пользователем Dobryak :з, 20 авг 2016.

  1. Dobryak :з

    Dobryak :з Новичок

    Регистрация:
    12.08.2016
    Сообщения:
    1
    Симпатии:
    0
    Репутация:
    -3
    • На каком сервере предоставляете услуги?: AHK скрипт работает на всех серверах АРП.
    • Какую сумму хотите за услугу?: 100р. исходник, халява.
    • Описание услуги?: Универсальный скрипт для МО, такого мало у кого увидите.
      [​IMG]
    • Связь с вами: VK.
     
    Последние данные очков репутации:
    Rellax: -1 Очки (uzhs) 24 авг 2016
    Suicide99: -1 Очки (ahk платный да ты просто овощ) 30 окт 2016
    Andrey_Habaro1: -1 Очки (платно)) 25 янв 2017
  2. Igor1012

    Igor1012 Новичок

    Регистрация:
    15.01.2016
    Сообщения:
    2
    Симпатии:
    1
    Репутация:
    0
    Ой.. На форуме адванса висела такая же тема, уже её удалили. Автор той темы была Nika. Там точно такой же AHK был. Кому нужен код, прошу в ЛС. Скину бесплатно, без смс и регистрации. А эта тема чето плагиатом попахивает.
     
    Primate нравится это.
  3. AWRage

    Проверенный

    Регистрация:
    10.07.2015
    Сообщения:
    645
    Симпатии:
    118
    Репутация:
    57
    Приватный AHK :facepalm:
     
    Последние данные очков репутации:
    YanL: 1 Очко 11 июл 2017
    YanL, ~SERGEY~, Davidka1337 и 2 другим нравится это.
  4. Deucalion_Esposito

    Deucalion_Esposito Пользователь

    Регистрация:
    15.08.2016
    Сообщения:
    11
    Симпатии:
    0
    Репутация:
    1
    Орууу... приват .... нет слов...
     
  5. 15315

    15315 Пользователь

    Регистрация:
    15.06.2014
    Сообщения:
    9
    Симпатии:
    0
    Репутация:
    0
    )))))))))))))))))))))))))))))))
     
  6. RyanKing

    RyanKing Активный пользователь

    Регистрация:
    31.12.2015
    Сообщения:
    36
    Симпатии:
    19
    Репутация:
    3
    щас бы ahk приват софтом делать
     
  7. RedBoxWhite

    RedBoxWhite Известный пользователь

    Регистрация:
    06.03.2016
    Сообщения:
    289
    Симпатии:
    13
    Репутация:
    5
    Платный биндер. Самому не смешно?:pidrila:
     
  8. Rellax

    Rellax Активный пользователь

    Регистрация:
    18.04.2015
    Сообщения:
    26
    Симпатии:
    2
    Репутация:
    4
    Он даже 10 руб. не стоит (facepalm)
     
  9. RyanKing

    RyanKing Активный пользователь

    Регистрация:
    31.12.2015
    Сообщения:
    36
    Симпатии:
    19
    Репутация:
    3
    ахахах сколько рофла
     
  10. Strong Wutang

    Strong Wutang Новичок

    Регистрация:
    25.08.2016
    Сообщения:
    1
    Симпатии:
    0
    Репутация:
    0
    ахаха, платный биндер
     
  11. A1K8M4

    A1K8M4 Известный пользователь

    Регистрация:
    03.02.2015
    Сообщения:
    144
    Симпатии:
    27
    Репутация:
    10
    Человеку просто нужны деньги
     
  12. iAmerican

    Проверенный

    Регистрация:
    17.02.2014
    Сообщения:
    350
    Симпатии:
    70
    Репутация:
    15
    просто пошол он нахуй
     
    Davidka1337 и Igor1012 нравится это.
  13. A1K8M4

    A1K8M4 Известный пользователь

    Регистрация:
    03.02.2015
    Сообщения:
    144
    Симпатии:
    27
    Репутация:
    10
    Можно и так
     
  14. Eldos

    Eldos Новичок

    Регистрация:
    15.12.2016
    Сообщения:
    1
    Симпатии:
    0
    Репутация:
    0
    давай мне в скайп Amangeldi.Eldos
     
  15. rsmistiko

    rsmistiko Пользователь

    Регистрация:
    30.03.2014
    Сообщения:
    7
    Симпатии:
    0
    Репутация:
    0
    Код этого "приватного" ahk который лежит в паблике.
    ; - Auto-МО by Dobryak v.1.0 -
    ; Все функции Вы сможете увидеть при вводе комманды "/helpmo"   
    ; Удачного использования!
    #Persistent
    #ifwinactive GTA:SA:MP
    #include SAMP.ahk
    
    ;ini
    IniRead, army, info.ini,INFO,army
    IniRead, tag, info.ini,INFO,tag
    IniRead, post1, info.ini,INFO,post1
    IniRead, post2, info.ini,INFO,post2
    IniRead, post3, info.ini,INFO,post3
    IniRead, zvanie, info.ini,INFO,zvanie
    IniRead, gravirovka, info.ini,INFO,gravirovka
    
    lastarm:=getPlayerArmor()
    file = %A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt
    msgbox, Auto-MO v.1.0 by Dobryak успешно запущен! Для получения справки введите в игре команду "/helpmo".
    Loop
    {
    ; Ники и прочее...
    Nick:= getUsername()
    RPNick:= getUsername()
    StringReplace, RPNick, RPNick,_,{SPACE}, All
    Fama:= getUsername()
    RegExMatch(Fama, "\Q_\E(.*)\Q\E", Fama)
    StringReplace, Fama, Fama,_,, All
    id:= getId()
    ; >> Броня
    arm:=getPlayerArmor()
    if ( arm > lastarm )
    {
    Sendinput,{F6}/do Бронежилет в шкафчике.{ENTER}
    Sendinput,{F6}/me плавным движением открыл шкафчик{ENTER}
    Sendinput,{F6}/me плавным движением правой руки взял бронежилет и надел его{ENTER}
    }
    lastarm:=getPlayerArmor()
    ; >> Доклады
    if ( dokl = 1 )
    {
    fileread, read, %file%
    if read contains Докладыва
    {
    filedelete, %file%
    fileappend,, %file%
    SendChat("/r Доклад(ы) приняты! Продолжайте в том же духе!")
    SendChat("/c 60")
    Sleep, 1000
    SendInput, {F8}
    }
    }
    ; >> Еда
    fileread, read, %file%
    if read contains %Nick% взял(а)
    {
    filedelete, %file%
    fileappend,, %file%
    Sendinput,{F6}/eat{ENTER}
    }
    ; >> Металл
    fileread, read, %file%
    if read contains %Nick%[%id%] взял(а) на военном складе
    {
    filedelete, %file%
    fileappend,, %file%
    Sendinput,{F6}/do На спине у %Nick% рюкзак.{ENTER}
    Sendinput,{F6}/me положил металлическую заготовку в рюкзак{ENTER}
    }
    ; Анимка при входе в игру
    fileread, read, %file%
    if read contains Добро пожаловать на Advance Role Play
    {
    filedelete, %file%
    fileappend,, %file%
    Sleep, 20000
    Sendinput,{F6}/anim{ENTER}
    ; РП имя
    if !RPNick
    {
    reload
    }
    
    }
    }
    !1::
    if dokl = 1
    {
    dokl = 0
    addchatmessage("{FFFFFF}Авто-ответ на доклады [{FF0000}Выключён{FFFFFF}]")
    }
    else
    {
    dokl = 1
    addchatmessage("{FFFFFF}Авто-ответ на доклады [{3ADF00}Включён{FFFFFF}]")
    }
    return
    Numpad1::
    Sendchat("/s Здравия желаю!")
    Sendchat("/me встал по стойке «Смирно»")
    Sendchat("/me выполнил «Воинское приветствие»")
    Sendchat("/anim 58")
    return
    
    Numpad7::
    Sendinput,{F6}/do Напротив %Nick% пульт управления КПП.{ENTER}
    Sendinput,{F6}/me ввёл секретный PIN-Code, тем самым открыв/закрыв КПП{ENTER}
    Sendinput,{F6}/gate{ENTER}
    return
    
    Numpad0::
    Sendinput, {F6}/me взглянул на золотые часы с гравировкой "%gravirovka%"{ENTER}
    Sendinput, {F6}/do Время на часах: %A_Hour%:%A_Min%.{ENTER}
    SendChat("/c 60")
    return
    
    Numpad9::
    ;if ( lock = 1 )
    ;{
    ;Sendinput, {F6}/me нажал на кнопку брелка "Open/Close"{ENTER}
    ;Sendinput, {F6}/lock 1{ENTER}
    ;}
    ;else
    ;{
    Sendinput,{F6}/lock 1{ENTER}
    ;}
    return
    
    ;!Numpad9::
    ;if ( lock = 1 )
    ;{
    ;lock = 0
    ;addchatmessage("{FFFFFF}РП /lock [{FF0000}Выключен{FFFFFF}]")
    ;}
    ;else
    ;{
    ;lock = 1
    ;addchatmessage("{FFFFFF}РП /lock [{3ADF00}Включён{FFFFFF}]")
    ;}
    ;return
    
    Numpad5::
    Sendinput,{F6}/r [%tag%]:{SPACE}
    return
    
    Numpad6::
    Sendinput,{F6}/f %army% |{SPACE}
    return
    
    NumpadDiv::
    Sendinput,{F6}/r [%tag%]: Докладывает %zvanie% %Fama% | Пост: %post1% | Состояние: тихо{ENTER}
    return
    
    NumpadMult::
    Sendinput,{F6}/r [%tag%]: Докладывает %zvanie% %Fama% | Пост: %post2% | Состояние: тихо{ENTER}
    return
    
    NumpadSub::
    Sendinput,{F6}/r [%tag%]: Докладывает %zvanie% %Fama% | Пост: %post3% | Состояние: тихо{ENTER}
    return
    
    NumpadAdd::
    GetPlayerPos(x,y,z)
    if ( x > -1546.098999 and x < -1515.402710 and y > 470.475830 and y < 508.089172 )
    {
    Sendinput,{F6}/f %army% | Докладывает %zvanie% %Fama% | Пост: КПП(А) | Состояние: тихо{ENTER}
    }
    ; Посты СВ
    if ( x > 341.082642 and x < 348.967468 and y > 1786.131592 and y < 1809.139404 )
    {
    Sendinput,{F6}/r [%tag%]: Докладывает %zvanie% %Fama% | Пост: КПП-1 | Состояние: тихо{ENTER}
    }
    if ( x > 313.566711 and x < 325.066895 and y > 1932.063965 and y < 1970.541748 )
    {
    Sendinput,{F6}/r [%tag%]: Докладывает %zvanie% %Fama% | Пост: Склад | Состояние: тихо{ENTER}
    }
    if ( x > 259.746521 and x < 274.151611 and y > 1886.650269 and y < 1901.946045 )
    {
    Sendinput,{F6}/r [%tag%]: Докладывает %zvanie% %Fama% | Пост: Вышка | Состояние: тихо{ENTER}
    }
    if ( x > 341.072357 and x < 372.049774 and y > 2012.942139 and y < 2045.680420 )
    {
    Sendinput,{F6}/r [%tag%]: Докладывает %zvanie% %Fama% | Пост: ПВО | Состояние: тихо{ENTER}
    }
    if ( x > 306.399109 and x < 319.117126 and y > -169.907547 and y < -158.757004 )
    {
    Sendinput,{F6}/r [%tag%]: Докладывает %zvanie% %Fama% | Пост: Склад(внутри) | Состояние: тихо{ENTER}
    }
    ; Посты ВМФ
    if ( x > -2256.786621 and x < -2238.514893 and y > 2379.674316 and y < 2385.826904 )
    {
    Sendinput,{F6}/r [%tag%]: Докладывает %zvanie% %Fama% | Пост: Cклад | Состояние: тихо{ENTER}
    }
    if ( x > 217.408768 and x < 233.806213 and y > 1286.233276 and y < 1293.712280 )
    {
    Sendinput,{F6}/r [%tag%]: Докладывает %zvanie% %Fama% | Пост: Cклад(Внутри) | Состояние: тихо{ENTER}
    }
    if ( x > -2275.697266 and x < -2272.282227 and y > 2336.769043 and y < 2365.652588 )
    {
    Sendinput,{F6}/r [%tag%]: Докладывает %zvanie% %Fama% | Пост: КПП-1 | Состояние: тихо{ENTER}
    }
    if ( x > -2300.578857 and x < -2296.042969 and y > 2409.341309 and y < 2440.114502 )
    {
    Sendinput,{F6}/r [%tag%]: Докладывает %zvanie% %Fama% | Пост: КПП-2 | Состояние: тихо{ENTER}
    }
    if ( x > -2244.083496 and x < -2228.643066 and y > 2335.114746 and y < 2353.569580 )
    {
    Sendinput,{F6}/r [%tag%]: Докладывает %zvanie% %Fama% | Пост: Вышка | Состояние: тихо{ENTER}
    }
    if ( x > -2302.006348 and x < -2277.656006 and y > 2278.156250 and y < 2294.405762 )
    {
    Sendinput,{F6}/r [%tag%]: Докладывает %zvanie% %Fama% | Пост: Склад торпед | Состояние: тихо{ENTER}
    }
    ; ВВС
    if ( x > 424.585052 and x < 441.646301 and y > 2553.743408 and y < 2580.151367 )
    {
    Sendinput,{F6}/r [%tag%]: Докладывает %zvanie% %Fama% | Пост: КПП-1 | Состояние: тихо{ENTER}
    }
    if ( x > 413.421143 and x < 421.407745 and y > 2534.960205 and y < 2542.731201 )
    {
    Sendinput,{F6}/r [%tag%]: Докладывает %zvanie% %Fama% | Пост: Склад(внутри) | Состояние: тихо{ENTER}
    }
    if ( x > 422.246429 and x < 429.501465 and y > 2531.350586 and y < 2542.289063 )
    {
    Sendinput,{F6}/r [%tag%]: Докладывает %zvanie% %Fama% | Пост: Склад | Состояние: тихо{ENTER}
    }
    if ( x > 280.125031 and x < 296.717407 and y > 2548.930420 and y < 2569.548584 )
    {
    Sendinput,{F6}/r [%tag%]: Докладывает %zvanie% %Fama% | Пост: КПП-2 | Состояние: тихо{ENTER}
    }
    if ( x > 382.856995 and x < 392.867950 and y > 2549.834717 and y < 2559.676758 )
    {
    Sendinput,{F6}/r [%tag%]: Докладывает %zvanie% %Fama% | Пост: Вышка | Состояние: тихо{ENTER}
    }
    return
    
    :?:/helpmo::
    KeyWait, Enter
    ;addchatmessage("{FFFFFF} - Auto-МО by {4000FF}Dobryak{FFFFFF} v.1.0 - ")
    ;addchatmessage("{FFFFFF} Cписок функций: ")
    ;addchatmessage("{FFFFFF} {4000FF}•{FFFFFF} Автоматическая отыгровка взятия бронежилета")
    ;addchatmessage("{FFFFFF} {4000FF}•{FFFFFF} Автоматическая отыгровка взятия металла")
    ;addchatmessage("{FFFFFF} {4000FF}•{FFFFFF} Автоматический ответ на доклад {E6E6E6}(для офицеров){FFFFFF} | Активация: {4000FF}Alt+1{FFFFFF}")
    ;addchatmessage("{FFFFFF} {4000FF}•{FFFFFF} Воинское приветствие | Активация: {4000FF}NumPad 1{FFFFFF}")
    ;addchatmessage("{FFFFFF} {4000FF}•{FFFFFF} Открытие КПП {E6E6E6}(/gate){FFFFFF} | Активация: {4000FF}NumPad 7{FFFFFF}")
    ;addchatmessage("{FFFFFF} {4000FF}•{FFFFFF} Часы {E6E6E6}(С временем в /do){FFFFFF} | Активация: {4000FF}NumPad 0{FFFFFF}")
    ;addchatmessage("{FFFFFF} {4000FF}•{FFFFFF} Открытие личного т/c {E6E6E6}(Без РП){FFFFFF} | Активация: {4000FF}NumPad 9{FFFFFF}")
    ;addchatmessage("{FFFFFF} {4000FF}•{FFFFFF} Ввод в рацию с тэгом {E6E6E6}(/r){FFFFFF} | Активация: {4000FF}NumPad 5{FFFFFF}")
    ;addchatmessage("{FFFFFF} {4000FF}•{FFFFFF} Ввод в рацию с тэгом армии {E6E6E6}(/f){FFFFFF} | Активация: {4000FF}NumPad 6{FFFFFF}")
    ;addchatmessage("{FFFFFF} {4000FF}•{FFFFFF} Доклад со своих постов {E6E6E6}(Надо настроить посты){FFFFFF} | Активация: {4000FF}NumPad /, NumPad *, NumPad -{FFFFFF}")
    ;addchatmessage("{FFFFFF} {4000FF}•{FFFFFF} Автоматических доклад с поста {E6E6E6}(Список постов - /moposts){FFFFFF} | Активация: {4000FF} NumPad +{FFFFFF}")
    ;addchatmessage("{FFFFFF} {4000FF}•{FFFFFF} Автоматическая запись армии и звания {E6E6E6}(В INI файл){FFFFFF} | Активация: {4000FF}/updatemo{FFFFFF}")
    ;addchatmessage("{FFFFFF} {4000FF}•{FFFFFF} Показ военного билета {E6E6E6}(Через /me,/do){FFFFFF} | Активация: {4000FF}/bilet{FFFFFF}")
    ;addchatmessage("{4000FF}[!]{FFFFFF} Перед использование настройте скрипт {E6E6E6}(В файле info.ini){FFFFFF}")
    ShowDialog("0", "{FFFFFF} - Auto-МО by {4000FF}Dobryak{FFFFFF} v.1.0 - ","{FFFFFF} Cписок функций: `n{FFFFFF} {4000FF}•{FFFFFF} Автоматическая отыгровка взятия бронежилета`n{FFFFFF} {4000FF}•{FFFFFF} Автоматическая отыгровка взятия металла`n{FFFFFF} {4000FF}•{FFFFFF} Автоматический ответ на доклад {E6E6E6}(для офицеров){FFFFFF} | Активация: {4000FF}Alt+1{FFFFFF}`n{FFFFFF} {4000FF}•{FFFFFF} Воинское приветствие | Активация: {4000FF}NumPad 1{FFFFFF}`n{FFFFFF} {4000FF}•{FFFFFF} Открытие КПП {E6E6E6}(/gate){FFFFFF} | Активация: {4000FF}NumPad 7{FFFFFF}`n{FFFFFF} {4000FF}•{FFFFFF} Часы {E6E6E6}(С временем в /do){FFFFFF} | Активация: {4000FF}NumPad 0{FFFFFF}`n{FFFFFF} {4000FF}•{FFFFFF} Открытие личного т/c {E6E6E6}(Без РП){FFFFFF} | Активация: {4000FF}NumPad 9{FFFFFF}`n{FFFFFF} {4000FF}•{FFFFFF} Ввод в рацию с тэгом {E6E6E6}(/r){FFFFFF} | Активация: {4000FF}NumPad 5{FFFFFF}`n{FFFFFF} {4000FF}•{FFFFFF} Ввод в рацию с тэгом армии {E6E6E6}(/f){FFFFFF} | Активация: {4000FF}NumPad 6{FFFFFF}`n{FFFFFF} {4000FF}•{FFFFFF} Доклад со своих постов {E6E6E6}(Надо настроить посты){FFFFFF} | Активация: {4000FF}NumPad /, NumPad *, NumPad -{FFFFFF}`n{FFFFFF} {4000FF}•{FFFFFF} Автоматических доклад с поста {E6E6E6}(Список постов - /moposts){FFFFFF} | Активация: {4000FF} NumPad +{FFFFFF}`n{FFFFFF} {4000FF}•{FFFFFF} Автоматическая запись армии и звания {E6E6E6}(В INI файл){FFFFFF} | Активация: {4000FF}/updatemo{FFFFFF}`n{FFFFFF} {4000FF}•{FFFFFF} Показ военного билета {E6E6E6}(Через /me,/do){FFFFFF} | Активация: {4000FF}/bilet{FFFFFF}`n`n{4000FF}[!]{FFFFFF} Перед использование настройте скрипт {E6E6E6}(В файле info.ini){FFFFFF}", "Закрыть")
    return
    
    :?:/moposts::
    KeyWait, Enter
    addchatmessage("{FFFFFF} Cписок постов, стоя на кототорых, нажимая кнопку NumPad + автоматически пишет пост: ")
    addchatmessage("{FFFFFF} {4000FF}>{FFFFFF} Авианосец {E6E6E6}(Доклад в /f){FFFFFF}")
    addchatmessage("{FFFFFF} {4000FF}>{FFFFFF} Сухопутные войска:")
    addchatmessage("{FFFFFF} {4000FF}>{FFFFFF} КПП-1, Склад, Склад(внутри), Вышка, ПВО")
    addchatmessage("{FFFFFF} {4000FF}>{FFFFFF} Военно-морской флот:")
    addchatmessage("{FFFFFF} {4000FF}>{FFFFFF} КПП-1, КПП-2, Вышка, Склад торпед, Склад, Склад(внутри)")
    addchatmessage("{FFFFFF} {4000FF}>{FFFFFF} Военно-воздушные силы:")
    addchatmessage("{FFFFFF} {4000FF}>{FFFFFF} КПП-1, КПП-2, Вышка, Склад, Склад(внутри)")
    addchatmessage("{4000FF}[!]{FFFFFF} Если Вы считаете, что тут не хватает какого-либо поста напишите мне в ВК {E6E6E6}(vk.com/kesik.dobryak){FFFFFF}")
    return
    
    :?:/bilet::
    KeyWait, Enter
    Sendinput,{F6}/me достал из внутреннего кармана формы военное билет{ENTER}
    Sendinput,{F6}/me показал билет. На нём написано...{ENTER}
    Sendinput,{F6}/do "%zvanie% %Fama% | Армия: %army% | Отряд: %tag%"{ENTER}
    Sendinput,{F6}/me cпрятал билет обратно{ENTER}
    return
    
    :?:/updatemo::
    KeyWait, Enter
    Sendinput,{F6}/pass %id%{ENTER}
    Sleep, 1000
    fileread, read, %file%
    RegExMatch(read, "\QРабота: \E(.*)\Q  |  Организация и подразделение: \E", zvanie)
    RegExMatch(read, "\Q  |  Организация и подразделение: Министерство обороны / \E(.*)\Q`n\E", army)
    if ( army = Военно-морской флот )
    {
    army = ВМФ
    }
    if ( army = Военно-воздушные силы )
    {
    army = ВВС
    }
    if ( army = Сухопутные войска )
    {
    army = СВ
    }
    StringReplace, zvanie, zvanie,Работа:%A_SPACE%,, All
    StringReplace, zvanie, zvanie,%A_SPACE%%A_SPACE%|  Организация и подразделение: ,, All
    ;StringReplace, zvanie, zvanie,%A_SPACE%,, All
    IniWrite,%zvanie%,info.ini,INFO,zvanie
    IniWrite,%army%,info.ini,INFO,army
    filedelete, %file%
    fileappend,, %file%
    addchatmessage("{4000FF}[!]{FFFFFF} Информация о фракции успешно обновлена!")
    return
    
    !2::
    SendInput, {F6}/n %Nick%[%id%] взял(а) на военном складе{ENTER}
    return