Помогите дописать скрипт

Статус
В этой теме нельзя размещать новые ответы.

Bananious

Известный
Автор темы
238
17
Хочу чтобы при заходе на каждый из серверов Advance Rp
CLEO:
chatmsg "{C31FC7}[RP Задания] | {915221}для Advance Rp | Ïîìîùü: /rphelp | {F32B31}Автор:SaMMpeR"
Надпись Advance Rp red к примеру была красной
При заходе на Advance Rp Chocolate надпись была Шоколадной итд
Вот код:
CLEO:
{$CLEO .cs}
0000: NOP

:SAMPAvailable
:NONAME_2
wait 2000
if
    SAMP.Available()
jf @SAMPAvailable
else_jump @NONAME_2

if 8AAB:  file_exists "CLEO\[RP Задания] для ARP by SaMMpeR.cs"
then
SAMP.Disconnect(0)
chatmsg "{D52039} Внимание"
chatmsg "{2067CF} Скрипт [RP Задания] для ARP by SaMMpeR.cs {D52039} Было переименовано!"
chatmsg "{D52039} Скрипт не будет работать, пока вы не переименуете его обратно"
end

chatmsg "{C31FC7}[RP Задания] | {915221}для Advance Rp | Помощь: /rphelp | {F32B31}Автор:SaMMpeR"
0B34: samp register_client_command "мвд_белье" to_label @1
0B34: samp register_client_command "мвд_бумаги" to_label @2
0B34: samp register_client_command "мвд_антивирус" to_label @3
0B34: samp register_client_command "мвд_шлагбаум" to_label @4
0B34: samp register_client_command "мвд_вертолет" to_label @5
0B34: samp register_client_command "мвд_салон" to_label @6
0B34: samp register_client_command "мвд_газон" to_label @7
0B34: samp register_client_command "мвд_дверь" to_label @8
0B34: samp register_client_command "мвд_авто" to_label @9
0B34: samp register_client_command "мвд_еда" to_label @10
0B34: samp register_client_command "мвд_help" to_label @help
0B34: samp register_client_command "rphelp" to_label @rphelp

0B34: samp register_client_command "здрав_help" to_label @help1
0B34: samp register_client_command "здрав_цветы" to_label @11
0B34: samp register_client_command "здрав_windows" to_label @12
0B34: samp register_client_command "здрав_пол" to_label @13
0B34: samp register_client_command "здрав_карета" to_label @14
0B34: samp register_client_command "здрав_антивирус" to_label @15

While True
      wait 0
      if 1@ == 1
      then
        0AF9: samp say_msg "/me принес корзину с бельем"
        wait 1000
        0AF9: samp say_msg "/me поставил корзину на землю"
        wait 1000
        0AF9: samp say_msg "/me натянул верёвку"
        wait 1000
        0AF9: samp say_msg "/me начал вешать постиранное белье"
        wait 1000
        0AF9: samp say_msg "/me повешал постираное белье"
        wait 1000
        0AF9: samp say_msg "/time"
        wait 200
        0AB1: call @key 2 key 119 time 1000  
          1@ = 0
      end
     
      if 2@ == 1 
            then
          0AF9: samp say_msg "/me снял все бумаги с полок"  
          wait 1000  
          0AF9: samp say_msg "/me начал сортировку бумаг в офисе"  
          wait 1000  
          0AF9: samp say_msg "/me достал влажную тряпку"  
          wait 1000
          0AF9: samp say_msg "/do тряпка в руке"
          wait 1000
          0AF9: samp say_msg "/me протирает пыль на полке где лежали бумаги"  
          wait 1000
          0AF9: samp say_msg "/me положил все бумаги на полку в офисе"  
          wait 1000
          0AF9: samp say_msg "/time"  
          wait 200  
          0AB1: call @key 2 key 119 time 1000  
          2@ = 0
      end
     
      if 3@ == 1
            then
            0AF9: samp say_msg "/do диск с установщиком Антивируса на столе."
            wait 1000
            0AF9: samp say_msg "/me включил ПК"
            wait 1000
            0AF9: samp say_msg "/me открыл дисковод"
            wait 1000
            0AF9: samp say_msg "/me закрыл дисковод"
            wait 1000
            0AF9: samp say_msg "/me открыл установщик на ПК"
            wait 1000
            0AF9: samp say_msg "/do На ПК выполняется установка Антивируса"
            wait 1000
            0AF9: samp say_msg "/do Антивирус установлен."
            wait 1000
            0AF9: samp say_msg "/time"  
            wait 200  
            0AB1: call @key 2 key 119 time 1000
            3@ = 0
        end
     
      if 4@ == 1
            then
          0AF9: samp say_msg "/do тряпка с полиролью в руках"  
          wait 1000  
          0AF9: samp say_msg "/me начал полировать шлагбаум"  
          wait 1000          
          0AF9: samp say_msg "/me протирает бутку КПП"
          wait 1000
          0AF9: samp say_msg "/me закончил полировать шлагбаум"
          wait 1000
          0AF9: samp say_msg "/time"  
          wait 200  
          0AB1: call @key 2 key 119 time 1000
          4@ = 0
      end
     
      if 5@ == 1
            then
          0AF9: samp say_msg "/do ящик с инструментами в руке"  
          wait 1000  
          0AF9: samp say_msg "/me достал с ящика большой гаечный ключ"  
          wait 1000  
          0AF9: samp say_msg "/me открутил лопасти вертолета"
          wait 1000
          0AF9: samp say_msg "/do в руке преобразователь ржавчины"
          wait 1000
          0AF9: samp say_msg "/me начал тиреть лопасти вертолета"
          wait 1000
          0AF9: samp say_msg "/me прикрутил лопасти вертолета"
          wait 1000
          0AF9: samp say_msg "/me закрыл ящик с инструментами"
          wait 1000
          0AF9: samp say_msg "/time"  
          wait 200  
          0AB1: call @key 2 key 119 time 1000
          5@ = 0
      end
      if 6@ == 1
            then
          0AF9: samp say_msg "/do ведро наполненное водой стоит на земле"  
          wait 1000  
          0AF9: samp say_msg "/do тряпка в руке"  
          wait 1000  
          0AF9: samp say_msg "/me смочил тряпку в ведре с водой"
          wait 1000
          0AF9: samp say_msg "/me моет салон автомобиля"
          wait 1000  
          0AF9: samp say_msg "/do в салоне машины не единого пятнышка"
          wait 1000  
          0AF9: samp say_msg "/time"  
          wait 200  
          0AB1: call @key 2 key 119 time 1000
          6@ = 0
      end
     
         if 7@ == 1 
            then
          0AF9: samp say_msg "/me включил газонокосилку"  
          wait 1000  
          0AF9: samp say_msg "/do газонокосилка завилась"  
          wait 1000  
          0AF9: samp say_msg "/me начал стричь газон"  
          wait 1000
          0AF9: samp say_msg "/me завершил стричь газон"  
          wait 1000
          0AF9: samp say_msg "/do на газоне не единой травинки"  
          wait 1000
          0AF9: samp say_msg "/time"  
          wait 200  
          0AB1: call @key 2 key 119 time 1000  
          wait 1000  
          7@ = 0
      end
     
        if 8@ == 1 
            then
          0AF9: samp say_msg "/do в руках ящик с инструментами"  
          wait 1000  
          0AF9: samp say_msg "/me достал отвертку"  
          wait 1000  
          0AF9: samp say_msg "/me снял дверь машины"  
          wait 1000
          0AF9: samp say_msg "/me чинит дверь машины"  
          wait 1000
          0AF9: samp say_msg "/do дверь починенная"  
          wait 1000
          0AF9: samp say_msg "/time"  
          wait 200  
          0AB1: call @key 2 key 119 time 1000  
          wait 1000  
          8@ = 0
      end
     
      if 9@ == 1 
            then
          0AF9: samp say_msg "/do ведро наполненное водой стоит на земле"  
          wait 1000  
          0AF9: samp say_msg "/do тряпка в руке"  
          wait 1000  
          0AF9: samp say_msg "/me смочил тряпку в ведре с водой"
          wait 1000
          0AF9: samp say_msg "/me моет автомобиль"  
          wait 1000  
          0AF9: samp say_msg "/do на машине не единого пятнышка"
          wait 1000  
          0AF9: samp say_msg "/time"  
          wait 200  
          0AB1: call @key 2 key 119 time 1000  
          wait 1000  
          9@ = 0
      end
     
      if 10@ == 1 
            then
          0AF9: samp say_msg "/do поднос с едой в руках"  
          wait 1000  
          0AF9: samp say_msg "/me открыл решетку"  
          wait 1000  
          0AF9: samp say_msg "/me дал еду заключенному"
          wait 1000
          0AF9: samp say_msg "/me закрыл решетку"  
          wait 1000  
          0AF9: samp say_msg "/time"  
          wait 200  
          0AB1: call @key 2 key 119 time 1000  
          wait 1000  
          10@ = 0
      end
     
      if 11@ == 1 
        then
        0AF9: samp say_msg "/me открыл(а) шкаф"
        wait 1000
        0AF9: samp say_msg "/do Шкаф открыт."
        wait 1000
        0AF9: samp say_msg "/do В шкафу стоит лейка."
        wait 1000
        0AF9: samp say_msg "/me достал(а) лейку из шкафа"
        wait 1000
        0AF9: samp say_msg "/do Лейка в руке."
        wait 1000
        0AF9: samp say_msg "/me открыл(а) кран с водой"
        wait 1000
        0AF9: samp say_msg "/me набирает воду в лейку"
        wait 1000
        0AF9: samp say_msg "/do Лейка наполнена водой."
        wait 1000
        0AF9: samp say_msg "/me поливает цветы"
        wait 1000
        0AF9: samp say_msg "/me закончил(а) поливать цветы"
        wait 1000
        0AF9: samp say_msg "/me положил(а) лейку в шкаф, после чего закрыл(а) его"
        wait 1000
        0AF9: samp say_msg "/time"
        wait 200
        0AB1: call @key 2 key 119 time 1000  
          11@ = 0
      end
     
      if 12@ == 1 
        then
        0AF9: samp say_msg "/me открыл(а) тумбочку"
        wait 1000
        0AF9: samp say_msg "/do Тумбочка открыта."
        wait 1000
        0AF9: samp say_msg "/do В тумбочки лежат различные диски."
        wait 1000
        0AF9: samp say_msg "/me начал(а) искать диски с программой Windows"
        wait 1000
        0AF9: samp say_msg "/me взял(а) диск с ОС Windows 10"
        wait 1000
        0AF9: samp say_msg "/do Установочный диск в руке."
        wait 1000
        0AF9: samp say_msg "/me закрыл(а) тумбочку"
        wait 1000
        0AF9: samp say_msg "/me включил(а) компьютер"
        wait 1000
        0AF9: samp say_msg "/do Компьютер включен."
        wait 1000
        0AF9: samp say_msg "/me открыл(а) дисковод, после чего вставил(а) диск"
        wait 1000
        0AF9: samp say_msg "/do Windows 10 устанавливается."
        wait 1000
        0AF9: samp say_msg "/do Установка завершена."
        wait 1000
        0AF9: samp say_msg "/me выключил(а) компьютер"
        wait 1000
        0AF9: samp say_msg "/do Компьютер выключен."
        wait 1000
        0AF9: samp say_msg "/time"
        wait 200
        0AB1: call @key 2 key 119 time 1000  
          12@ = 0
      end
     
      if 13@ == 1 
        then
        0AF9: samp say_msg "/me открыл(а) шкаф"
        wait 1000
        0AF9: samp say_msg "/do Шкаф открыт."
        wait 1000
        0AF9: samp say_msg "/me достал тряпку и ведро"
        wait 1000
        0AF9: samp say_msg "/do Тряпка и ведро в руках."
        wait 1000
        0AF9: samp say_msg "/me открыл(а) кран"
        wait 1000
        0AF9: samp say_msg "/me набрал(а) в ведро воду"
        wait 1000
        0AF9: samp say_msg "/do Ведро наполнено водой."
        wait 1000
        0AF9: samp say_msg "/me закрыл(а) кран"
        wait 1000
        0AF9: samp say_msg "/do Кран закрыт."
        wait 1000
        0AF9: samp say_msg "/me взял(а) средство для мытья полов и налил(а) в ведро"
        wait 1000
        0AF9: samp say_msg "/me намочил(а) тряпку, после чего выжал(а)"
        wait 1000
        0AF9: samp say_msg "/me начинает мыть полы"
        wait 1000
        0AF9: samp say_msg "/do На полу следы от башмаков."
        wait 1000
        0AF9: samp say_msg "/me тщательно протирает место с пятном"
        wait 1000
        0AF9: samp say_msg "/do Пол чистый."
        wait 1000
        0AF9: samp say_msg "/me вылил(а) из ведра воду в унитаз, после чего поставил(а) на место"
        wait 1000
        0AF9: samp say_msg "/me положил(а) тряпку"
        wait 1000
        0AF9: samp say_msg "/me закрыл(а) шкаф"
        wait 1000
        0AF9: samp say_msg "/time"
        wait 200
        0AB1: call @key 2 key 119 time 1000  
          13@ = 0
      end
     
      if 14@ == 1 
        then
        0AF9: samp say_msg "/me открыл(а) двери кареты"
        wait 1000
        0AF9: samp say_msg "/me завел(а) двигатель"
        wait 1000
        0AF9: samp say_msg "/do Двигатель заведен."
        wait 1000
        0AF9: samp say_msg "/me услышал(а) шум в двигателе"
        wait 1000
        0AF9: samp say_msg "/me дсотал(а) из бардачка сумку с инструментами"
        wait 1000
        0AF9: samp say_msg "/me прикрыл(а) дверь кареты"
        wait 1000
        0AF9: samp say_msg "/me открыл(а) капот"
        wait 1000
        0AF9: samp say_msg "/me обнаружил(а) поломку"
        wait 1000
        0AF9: samp say_msg "/me достал(а) из сумки необходимый инструмент"
        wait 1000
        0AF9: samp say_msg "/me открутил(а) сломавшуюся деталь"
        wait 1000
        0AF9: samp say_msg "/me открыл(а) багажник, после чего достал(а) необходимую деталь"
        wait 1000
        0AF9: samp say_msg "/me положил(а) старую деталь в багажник"
        wait 1000
        0AF9: samp say_msg "/me закрыл(а) багажник"
        wait 1000
        0AF9: samp say_msg "/me поменял(а) запчасть"
        wait 1000
        0AF9: samp say_msg "/do Запчасть заменена."
        wait 1000
        0AF9: samp say_msg "/me закрыл(а) капот"
        wait 1000
        0AF9: samp say_msg "/do Капот закрыт."
        wait 1000
        0AF9: samp say_msg "/time"
        wait 200
        0AB1: call @key 2 key 119 time 1000  
          14@ = 0
      end   
     
      if 15@ == 1 
        then
        0AF9: samp say_msg "/do диск с установщиком Антивируса на столе."
            wait 1000
            0AF9: samp say_msg "/me включил ПК"
            wait 1000
            0AF9: samp say_msg "/me открыл дисковод"
            wait 1000
            0AF9: samp say_msg "/me закрыл дисковод"
            wait 1000
            0AF9: samp say_msg "/me открыл установщик на ПК"
            wait 1000
            0AF9: samp say_msg "/do На ПК выполняется установка Антивируса"
            wait 1000
            0AF9: samp say_msg "/do Антивирус установлен."
            wait 1000
            0AF9: samp say_msg "/time"  
            wait 200  
            0AB1: call @key 2 key 119 time 1000
          15@ = 0
      end       
end          

:1  
1@ = 1
SAMP.CmdRet()  

:2  
2@ = 1
SAMP.CmdRet()

:3  
3@ = 1
SAMP.CmdRet()  

:4 
4@ = 1
SAMP.CmdRet()

:5 
5@ = 1
SAMP.CmdRet()  

:6
6@ = 1
SAMP.CmdRet() 

:7  
7@ = 1
SAMP.CmdRet()

:8  
8@ = 1
SAMP.CmdRet()

:9  
9@ = 1
SAMP.CmdRet()

:10  
10@ = 1
SAMP.CmdRet()

:11  
11@ = 1
SAMP.CmdRet()

:12  
12@ = 1
SAMP.CmdRet()

:13 
13@ = 1
SAMP.CmdRet()

:14 
14@ = 1
SAMP.CmdRet()

:15 
15@ = 1
SAMP.CmdRet()

:key  
if 0AA2: 2@ = load_library "User32.dll"  
then  
if 0AA4: 2@ = get_proc_address "keybd_event" library 2@  
then  
0AA5: call 2@ num_params 4 pop 0 0 0 0 0@  
wait 1@  
0AA5: call 2@ num_params 4 pop 0 0 0x02 0 0@  
end  
end  
0AB2: ret 0

//=============================================
:help
wait 0
0AC6: 6@ = label @TextThree offset
0B3B: samp show_dialog id 15 caption "{C31FC7}[RP Задания] {19278A}[МВД , {915221}Мин.Обороны{19278A}] | {915221}для Advance Rp | {F32B31}By SaMMpeR" text 6@ button_1 "ОК" button_2 "" style 0
SAMP.CmdRet()

:TextThree
hex
    "{FFFFFF}1.{F4362F}/мвд_белье - {FFFFFF}Развесить постиранное белье\n"
    "{FFFFFF}2.{F4362F}/мвд_бумаги - {FFFFFF}Рассортировать бумаги в офисе\n"
    "{FFFFFF}3.{F4362F}/мвд_антивирус - {FFFFFF}Обновить антивирусы на компьютерах\n"
    "{FFFFFF}4.{F4362F}/мвд_шлагбаум - {FFFFFF}Отполировать шлагбаум\n"
    "{FFFFFF}5.{F4362F}/мвд_вертолет - {FFFFFF}Покрасить вертолет (избавиться от ржавчины)                   |\n"                 
    "{FFFFFF}6.{F4362F}/мвд_салон - {FFFFFF}Вычистить салон автомобиля\n"
    "{FFFFFF}7.{F4362F}/мвд_газон - {FFFFFF}Постричь газон\n"
    "{FFFFFF}8.{F4362F}/мвд_дверь - {FFFFFF}Починить дверь (сломанную)\n"
    "{FFFFFF}9.{F4362F}/мвд_авто - {FFFFFF}Вымыть авто до блеска\n"
    "{FFFFFF}10.{F4362F}/мвд_еда - {FFFFFF}Покормить заключенных\n"
    "{F4362F}Подписывайся на мой канал SaMMpeR Cheats\n"  
end
//=============================================
:help1
wait 0
0AC6: 6@ = label @TextTwo offset
0B3B: samp show_dialog id 15 caption "{C31FC7}[RP Задания] {E2509C}[Мин.Здрав] | {915221}для Advance Rp | {F32B31}By SaMMpeR" text 6@ button_1 "ОК" button_2 "" style 0
SAMP.CmdRet()

:TextTwo
hex
    "{FFFFFF}1.{F4362F}/здрав_цветы - {FFFFFF}Полить цветы в холле больницы\n"
    "{FFFFFF}2.{F4362F}/здрав_windows - {FFFFFF}Переустановить OC Windows на компютере в ординаторской                |\n"
    "{FFFFFF}3.{F4362F}/здрав_пол - {FFFFFF}Помыть пол в операционной\n"
    "{FFFFFF}4.{F4362F}/здрав_карета - {FFFFFF}Проверить состояние Кареты\n"
    "{FFFFFF}5.{F4362F}/здрав_антивирус - {FFFFFF}Установка антивирусной программы на компютер\n"                 
    "{F4362F}Подписывайся на мой канал SaMMpeR Cheats\n"  
end

:rphelp
wait 0
0AC6: 6@ = label @TextOne offset
0B3B: samp show_dialog id 15 caption "{C31FC7}[RP Задания] {E2509C}[Мин.Здрав] | {915221}для Advance Rp | {F32B31}By SaMMpeR" text 6@ button_1 "ОК" button_2 "" style 0
SAMP.CmdRet()

:TextOne
hex
    "{FFFFFF}1.{F4362F}/мвд_help - {FFFFFF}Все РП задания для [МВД,Мин.Обороны]\n"
    "{FFFFFF}2.{F4362F}/здрав_help - {FFFFFF}Все РП задания для [Мин.Здрав]                                    |\n"      
    "{F4362F}Подписывайся на мой канал SaMMpeR Cheats\n"  
end
 

mac

HEY DARLING
1,317
908
Сравнивай на заходе ип текущего сервера с ипом нужного сервера
 

Vovich

HOT
Проверенный
717
197
CLEO:
{CLEO .cs}
{$INCLUDE SF}
0000:
repeat
wait 150
until 0afa:
0B39: samp get_current_server_address 0@ port 1@
// вот тут сравниваешь ип серверов, если совпадают то пишешь нужным тебе цветом, все легко же
if 0@ == "178.12.192" then
chatmsg "text color white" -1
end
//

while true
wait 0
end
 

FSFFGSF

Новичок
28
0
CLEO:
{CLEO .cs}
{$INCLUDE SF}
0000:
repeat
wait 150
until 0afa:
0B39: samp get_current_server_address 0@ port 1@
// вот тут сравниваешь ип серверов, если совпадают то пишешь нужным тебе цветом, все легко же
if 0@ == "178.12.192" then
chatmsg "text color white" -1
end
//

while true
wait 0
end
Если я не ошибаюсь так нихуя не сравнит надо
CLEO:
0AC8: 6@ = allocate_memory_size 260
0AC8: 7@ = allocate_memory_size 260
0AC8: 5@ = allocate_memory_size 260
:3
wait 0
0B39: samp get_current_server_address 6@ port 7@
0AD3: 5@ = format "%s:%i" 6@ 7@
if or
0C14: strcmp string1 5@ string2 "5.254.104.131:7777"
0C14: strcmp string1 5@ string2 "5.254.104.132:7777"
0C14: strcmp string1 5@ string2 "5.254.104.133:7777"
0C14: strcmp string1 5@ string2 "5.254.104.134:7777"
0C14: strcmp string1 5@ string2 "5.254.104.135:7777"
0C14: strcmp string1 5@ string2 "5.254.104.136:7777"
then
jump @1
else
jump @33
:33
wait 0
if or
0C14: strcmp string1 5@ string2 "5.254.104.139:7777"
0C14: strcmp string1 5@ string2 "5.254.104.137:7777"
0C14: strcmp string1 5@ string2 "5.254.104.138:7777"
then
jump @1
else
wait 0
0AC9: free_allocated_memory 5@
0AC9: free_allocated_memory 6@
0AC9: free_allocated_memory 7@
0A93: end_custom_thread
end
end
это для всех арп
 

Vovich

HOT
Проверенный
717
197
Если я не ошибаюсь так нихуя не сравнит надо
CLEO:
0AC8: 6@ = allocate_memory_size 260
0AC8: 7@ = allocate_memory_size 260
0AC8: 5@ = allocate_memory_size 260
:3
wait 0
0B39: samp get_current_server_address 6@ port 7@
0AD3: 5@ = format "%s:%i" 6@ 7@
if or
0C14: strcmp string1 5@ string2 "5.254.104.131:7777"
0C14: strcmp string1 5@ string2 "5.254.104.132:7777"
0C14: strcmp string1 5@ string2 "5.254.104.133:7777"
0C14: strcmp string1 5@ string2 "5.254.104.134:7777"
0C14: strcmp string1 5@ string2 "5.254.104.135:7777"
0C14: strcmp string1 5@ string2 "5.254.104.136:7777"
then
jump @1
else
jump @33
:33
wait 0
if or
0C14: strcmp string1 5@ string2 "5.254.104.139:7777"
0C14: strcmp string1 5@ string2 "5.254.104.137:7777"
0C14: strcmp string1 5@ string2 "5.254.104.138:7777"
then
jump @1
else
wait 0
0AC9: free_allocated_memory 5@
0AC9: free_allocated_memory 6@
0AC9: free_allocated_memory 7@
0A93: end_custom_thread
end
end
это для всех арп
а ну да бл, там же строки, просто в Си сравнило бы.
Я чет протупил с строками)
 
Статус
В этой теме нельзя размещать новые ответы.