Скрипты для дальнобоя и охраника и начальника охраны .

Тема в разделе "Корзина", создана пользователем Boris_Corleone, 12 авг 2018.

  1. Boris_Corleone

    Boris_Corleone Участник

    Сообщения:
    246
    Симпатии:
    32
    Баллы:
    28
    Сервер:
    01
    Новые скрипты ))



    ;Alt+1 - /vlock
    ;Alt+2 - Отправляет в чат /tload и ждет, пока не введете число, после чего, если произошла загрузка, запускает таймер до разгрузки
    ;Alt+3 - Отправляет в чат /tunload и, если произошла разгрузка, запускает таймер до загрузки
    ;Левый Ctrl+2 - сообщение в рацию о том, что загрузились
    ;Левый Ctrl+3 - сообщение в рацию о том, что разгрузились
    ;Alt+4 - Счетчик перевезенного груза/заработанныхъ денег
    ;Alt+5 - Показать еще раз время, оставшееся до загрузки/разгрузки
    poezdki=0
    gruz= 0
    dengi=0
    !1::
    SendInput, {F6}/Vlock{Enter}
    Return
    !3::
    checkfile = %A_MyDocuments%\GTA San Andreas User Files\CR-MP\GenerationC\chatlog.txt
    FileRead, info, %checkfile%
    FileDelete %checkfile%
    FileAppend %checkfile%
    SendMessage, 0x50,, 0x4190419,, A
    SendInput,{F6}/tunload{Enter}
    sleep 1600
    FileRead, info, %checkfile%
    if info contains Вы разгрузили
    {
    ruda=0
    gruz+= %Amount%
    poezdki+=1
    ruda+=%Amount%
    ruda*=800
    dengi+= %ruda%
    SendInput,{F6}/do Время на часах золотой приборной панели %A_Hour%:%A_Min%:%A_Sec%.{Enter} ;
    hour = %A_Hour%
    min = %A_Min%
    sec = %A_Sec%
    min+= 5
    sec+= 30
    if (sec >= 60) {
    sec-= 60
    min+= 1
    }
    if(min >=60) {
    min-= 60
    hour+= 1
    }
    if (hour >= 24) {
    hour-= 24
    }
    if (sec < 10){
    sec= 0%sec%
    }
    if (min < 10){
    min= 0%min%
    }
    Sleep 1100
    SendInput,{F6}/do Навигатор указал примерное время загрузки %hour%:%min%:%sec%{Enter}
    loop
    {
    if ( A_Hour = hour and A_Min = min and A_Sec = sec) {
    SoundPlay, *48
    Exit
    }
    }
    }
    return
    !2::
    checkfile = %A_MyDocuments%\GTA San Andreas User Files\CR-MP\GenerationC\chatlog.txt
    FileRead, info, %checkfile%
    FileDelete %checkfile%
    FileAppend %checkfile%
    SendMessage, 0x50,, 0x4190419,, A
    SendInput,{F6}/tload{Space}
    Input, Amount, V, {Enter}
    sleep 1600
    FileRead, info, %checkfile%
    if info contains Вы загрузили
    {
    SendInput,{F6}/do Время на часах золотой приборной панели %A_Hour%:%A_Min%:%A_Sec%.{Enter}
    hour = %A_Hour%
    min = %A_Min%
    sec = %A_Sec%
    min+= 5
    sec+= 30
    if (sec >= 60) {
    sec-= 60
    min+= 1
    }
    if(min >=60) {
    min-= 60
    hour+= 1
    }
    if (hour >= 24) {
    hour-= 24
    }
    if (sec < 10){
    sec= 0%sec%
    }
    if (min < 10){
    min= 0%min%
    }
    Sleep 1100
    SendInput,{F6}/do Навигатор указал примерное время разгрузки %hour%:%min%:%sec% {Enter}
    loop
    {
    if ( A_Hour = hour and A_Min = min and A_Sec = sec) {
    SoundPlay, *48
    Exit
    }
    }
    }
    return

    Numpad1::
    SendMessage, 0x50,, 0x4190419,, A
    SendInput,{F6}Здравия желаю !!! Я "ЗВАНИЯ" АП{ENTER}
    Sleep 1500
    SendInput,{F6}/me Достал документы , затем передал{ENTER}
    Sleep 1000
    SendInput,{F6}/showpass{SPACE}
    Return
    Numpad2::
    SendMessage, 0x50,, 0x4190419,, A
    Sendinput, {F6}/me отстегнул электрошокер "Аир-107у" с крепления на разгрузке{ENTER}
    Sleep, 1350
    Sendinput, {F6}/me применил электрошокер на нарушителе/преступнике{ENTER}
    Sleep, 1350
    SendInput, {f6}/tazer {SPASE}
    Return
    Numpad3::
    SendMessage 0x50,, 0x4190419,, A
    Sendinput, {F6}Прошу покинуть тереторию или я пременю меры .{ENTER}
    Sleep, 1350
    Sendinput, {F6}1{ENTER}
    Sleep, 1350
    SendInput, {f6}2{ENTER}
    Sleep 1350
    SendInput, {f6}3{ENTER}
    Return
    Numpad4::
    SendMessage 0x50,, 0x4190419,, A
    Sendinput, {F6}/me Достал автомать и-за спины{ENTER}
    sleep 1500
    Sendinput, {F6}/me Снял с предохронителя{ENTER}
    Sleep 1500
    Sendinput, {F6}/me Оружия в боеготовности{ENTER}
    Return
    Numpad5::
    SendMessage 0x50,, 0x4190419,, A
    Sendinput, {F6}/me Поставил автомат на предохронитель{ENTER}
    sleep 1500
    Sendinput, {F6}/me Убрал автомат за спину{ENTER}
    Sleep 1500
    Sendinput, {F6}/do Автомат за спиной{ENTER}
    Return
    Numpad6::
    SendMessage 0x50,, 0x4190419,, A
    Sendinput, {F6}/me Достал пистолет и-за спины{ENTER}
    sleep 1500
    Sendinput, {F6}/me Снял с предохронителя{ENTER}
    Sleep 1500
    Sendinput, {F6}/me Оружия в боеготовности{ENTER}
    Return
    Numpad5::
    SendMessage 0x50,, 0x4190419,, A
    Sendinput, {F6}/me Поставил пистолет на предохронитель{ENTER}
    sleep 1500
    Sendinput, {F6}/me Убрал пистолет за спину{ENTER}
    Sleep 1500
    Sendinput, {F6}/do Пистолет за спиной{ENTER}
    Return
     
  2. Daniel_Batonov

    Daniel_Batonov Memento Mory

    Сообщения:
    2.328
    Симпатии:
    1.237
    Баллы:
    113
    Сайт:
    Ник:
    Daniel_Batonov
    Сервер:
    01
    Круто ;)
     

Поделиться этой страницей