Вопросы по CLEO-скриптингу

KievStar

Участник
142
13
Что же ты такое там делаешь, что это не получается уже 5й день?) Вопрос, нужно чтоб он бил кулаками, или стрелял в определенную точку в пространстве?
хотелось бы чтобы сразу все)) но впринципе можно и кулаками)
 

KievStar

Участник
142
13
вообщем посчитал что будет полезно сделать клео который сам использует ( аптечку/армор/нарко/маску )
(ну типо ты нажимаешь на одну из кнопок и ты надел маску, нажал другую и ты одел бронежилет)
как можно это написать? помогите пожалуйста :(​
 

D3.Pheonix

🎹
Модератор
2,867
1,642
вообщем посчитал что будет полезно сделать клео который сам использует ( аптечку/армор/нарко/маску )
(ну типо ты нажимаешь на одну из кнопок и ты надел маску, нажал другую и ты одел бронежилет)
как можно это написать? помогите пожалуйста :(

]
Ну банально же, ты интересуешься вообще тем что просишь или просто х.ней маешься?
CLEO:
while true
wait 0

if
key_down 49 // 1
then
say "/mask"
wait 300
end

if
key_down 50 // 2
then
say "/bron"
wait 300
end

end
 

_!danek!_

Новичок
9
3
Попробуй перекинуть эти файлы в ..\Sanny Builder 3\data\sa
 

Вложения

  • SannyBuilder Data.rar
    73.1 KB · Просмотры: 6

ARMOR

Модератор по раксампу
Модератор
4,936
6,732
Народ создал скрипт который меняет цвет худа по команде и хочу сделать сохранение цвета, создал ini файл и при перезаходе ничего не сохраняется понять немогу. Знаю что код говно но это мой первый скрипт над которым я работаю

CLEO:
// This file was decompiled using SASCM.ini published by GTAG (http://gtag.gtagaming.com/opcode-database) on 14.6.2013
{$CLEO .cs}

//-------------MAIN---------------
0000: NOP

:SampAv
wait 0
0AFA:  is_samp_available
jf @SampAv
0AF8: samp add_message_to_chat "{FF0000}[Hud Colors]{FFFFFF} Скрипт загружен{FF0000} [Для помощь со скриптом /colorhelp]" color 0xFFFFFF

:32
0B34: samp register_client_command "ColorGreen" to_label @Green
0B34: samp register_client_command "ColorYellow" to_label @yellow
0B34: samp register_client_command "ColorBlue" to_label @Blue
0B34: samp register_client_command "ColorHelp" to_label @Help
0BDE: pause_thread 0

:Yellow
wait 0

0A8D: 0@ = read_memory 0xBAB230 size 4 virtual_protect 1
0A8C: write_memory 0xBAB230 size 4 value 0xFF00CDFF virtual_protect 1
0A8D: 0@ = read_memory 0xBAB22C size 4 virtual_protect 1
0A8C: write_memory 0xBAB22C size 4 value 0xFF00CDFF virtual_protect 1
0A8D: 0@ = read_memory 0xBAB244 size 4 virtual_protect 1
0A8C: write_memory 0xBAB244 size 4 value 0xFF00CDFF virtual_protect 1
0AF1: write_int 1 to_ini_file "CLEO\HudColors.ini" section "Color" key "Color"
0B43: samp cmd_ret
jump @yellow

:Green
wait 0
0AF1: write_int 2 to_ini_file "CLEO\HudColors.ini" section "Color" key "Color"
0A8D: 0@ = read_memory 0xBAB22C size 4 virtual_protect 1
0A8C: write_memory 0xBAB22C size 4 value 0xFF00FF00 virtual_protect 1
0A8D: 0@ = read_memory 0xBAB230 size 4 virtual_protect 1
0A8C: write_memory 0xBAB230 size 4 value 0xFF00FF00 virtual_protect 1
0A8D: 0@ = read_memory 0xBAB244 size 4 virtual_protect 1
0A8C: write_memory 0xBAB244 size 4 value 0xFF00FF00 virtual_protect 1
0B43: samp cmd_ret
jump @Green

:Blue
wait 0
0AF1: write_int 3 to_ini_file "CLEO\HudColors.ini" section "Color" key "Color"
0A8D: 0@ = read_memory 0xBAB230 size 4 virtual_protect 1
0A8C: write_memory 0xBAB230 size 4 value 0x00CC0000 virtual_protect 1
0A8D: 0@ = read_memory 0xBAB244 size 4 virtual_protect 1
0A8C: write_memory 0xBAB244 size 4 value 0x00CC0000 virtual_protect 1
0A8D: 0@ = read_memory 0xBAB22C size 4 virtual_protect 1
0A8C: write_memory 0xBAB22C size 4 value 0xFF33FF virtual_protect 1  // Ещё дорабатываю есть баг с полоской ХП
0B43: samp cmd_ret
jump @Blue

:Help
wait 0
0B3B: samp show_dialog id 228 caption "[ColorHelp]" text "/coloryellow меняет цвет худа на желтый. /colorgreen меняет цвет худа на зеленый. /colorblue меняет цвет худа на синий." button_1 "Close" button_2 "Close" style 0
0B43: samp cmd_ret
jump @Help

:IniFile
wait 0
0AF0: 1@ = get_int_from_ini_file "CLEO\HudColors.ini" section "Color" key "Color"
jump @IniFile
Можете ещё чекнуть код в SB
 

Вложения

  • HudColors[1].cs
    20.5 KB · Просмотры: 3
Последнее редактирование:

D3.Pheonix

🎹
Модератор
2,867
1,642
Народ создал скрипт который меняет цвет худа по команде и хочу сделать сохранение цвета, создал ini файл и при перезаходе ничего не сохраняется понять немогу. Знаю что код говно но это мой первый скрипт над которым я работаю

CLEO:
// This file was decompiled using SASCM.ini published by GTAG (http://gtag.gtagaming.com/opcode-database) on 14.6.2013
{$CLEO .cs}

//-------------MAIN---------------
0000: NOP

:SampAv
wait 0
0AFA:  is_samp_available
jf @SampAv
0AF8: samp add_message_to_chat "{FF0000}[Hud Colors]{FFFFFF} Скрипт загружен{FF0000} [Для помощь со скриптом /colorhelp]" color 0xFFFFFF

:32
0B34: samp register_client_command "ColorGreen" to_label @Green
0B34: samp register_client_command "ColorYellow" to_label @yellow
0B34: samp register_client_command "ColorBlue" to_label @Blue
0B34: samp register_client_command "ColorHelp" to_label @Help
0BDE: pause_thread 0

:Yellow
wait 0

0A8D: 0@ = read_memory 0xBAB230 size 4 virtual_protect 1
0A8C: write_memory 0xBAB230 size 4 value 0xFF00CDFF virtual_protect 1
0A8D: 0@ = read_memory 0xBAB22C size 4 virtual_protect 1
0A8C: write_memory 0xBAB22C size 4 value 0xFF00CDFF virtual_protect 1
0A8D: 0@ = read_memory 0xBAB244 size 4 virtual_protect 1
0A8C: write_memory 0xBAB244 size 4 value 0xFF00CDFF virtual_protect 1
0AF1: write_int 1 to_ini_file "CLEO\HudColors.ini" section "Color" key "Color"
0B43: samp cmd_ret
jump @yellow

:Green
wait 0
0AF1: write_int 2 to_ini_file "CLEO\HudColors.ini" section "Color" key "Color"
0A8D: 0@ = read_memory 0xBAB22C size 4 virtual_protect 1
0A8C: write_memory 0xBAB22C size 4 value 0xFF00FF00 virtual_protect 1
0A8D: 0@ = read_memory 0xBAB230 size 4 virtual_protect 1
0A8C: write_memory 0xBAB230 size 4 value 0xFF00FF00 virtual_protect 1
0A8D: 0@ = read_memory 0xBAB244 size 4 virtual_protect 1
0A8C: write_memory 0xBAB244 size 4 value 0xFF00FF00 virtual_protect 1
0B43: samp cmd_ret
jump @Green

:Blue
wait 0
0AF1: write_int 3 to_ini_file "CLEO\HudColors.ini" section "Color" key "Color"
0A8D: 0@ = read_memory 0xBAB230 size 4 virtual_protect 1
0A8C: write_memory 0xBAB230 size 4 value 0x00CC0000 virtual_protect 1
0A8D: 0@ = read_memory 0xBAB244 size 4 virtual_protect 1
0A8C: write_memory 0xBAB244 size 4 value 0x00CC0000 virtual_protect 1
0A8D: 0@ = read_memory 0xBAB22C size 4 virtual_protect 1
0A8C: write_memory 0xBAB22C size 4 value 0xFF33FF virtual_protect 1  // Ещё дорабатываю есть баг с полоской ХП
0B43: samp cmd_ret
jump @Blue

:Help
wait 0
0B3B: samp show_dialog id 228 caption "[ColorHelp]" text "/coloryellow меняет цвет худа на желтый. /colorgreen меняет цвет худа на зеленый. /colorblue меняет цвет худа на синий." button_1 "Close" button_2 "Close" style 0
0B43: samp cmd_ret
jump @Help

:IniFile
wait 0
0AF0: 1@ = get_int_from_ini_file "CLEO\HudColors.ini" section "Color" key "Color"
jump @IniFile
Можете ещё чекнуть код в SB
/color health 0xFFe8690e
Вместо health можешь делать money и wanted. Цвет вводи в формате 0xAARRGGBB
CLEO:
{$CLEO}
0000:

const
MONEY    =  0xBAB230
HEALTH   =  0xBAB22C
WANTED   =  0xBAB244
end

repeat
wait 0
until Samp.Available()
chatmsg "{FFFFFF} Скрипт загружен. Пример: {ff0000}/color [money] [0xARGB]" -1
chatmsg "Доступные варианты: {ff0000}money, hud, wanted" -1
0B34: samp register_client_command "color" to_label @color
    if
    8AAB: not  file_exists "CLEO\HudColors.ini"
    then
    0AF1: write_int -1 to_ini_file "CLEO\HudColors.ini" section "Color" key "MONEY"
    0AF1: write_int -1 to_ini_file "CLEO\HudColors.ini" section "Color" key "HEALTH"
    0AF1: write_int -1 to_ini_file "CLEO\HudColors.ini" section "Color" key "WANTED"
    else
    0AF0: 0@ = get_int_from_ini_file "CLEO\HudColors.ini" section "Color" key "MONEY"
    0AF0: 1@ = get_int_from_ini_file "CLEO\HudColors.ini" section "Color" key "HEALTH"
    0AF0: 2@ = get_int_from_ini_file "CLEO\HudColors.ini" section "Color" key "WANTED"
    0A8C: write_memory MONEY size 4 value 0@ virtual_protect 1             
    0A8C: write_memory HEALTH size 4 value 1@ virtual_protect 1
    0A8C: write_memory WANTED size 4 value 2@ virtual_protect 1
    end
0BDE: pause_thread 0


:color
Samp.IsCommandTyped(3@)
alloc 4@ 24
0AA7: call 0x8220AD num_params 4 pop 4 params 5@v 4@ "%s %x" 3@ 6@
    if
    6@ == 2
    then
        if
        0C21: stricmp string1 4@ string2 "money"
        then
        call @reverse_color 1 5@ 7@
        0A8C: write_memory MONEY size 4 value 7@ virtual_protect 1
        0AF1: write_int 7@ to_ini_file "CLEO\HudColors.ini" section "Color" key "MONEY"
        end
    
        if
        0C21: stricmp string1 4@ string2 "health"
        then
        call @reverse_color 1 5@ 7@
        0A8C: write_memory HEALTH size 4 value 7@ virtual_protect 1
        0AF1: write_int 7@ to_ini_file "CLEO\HudColors.ini" section "Color" key "HEALTH"
        end
    
        if
        0C21: stricmp string1 4@ string2 "wanted"
        then
        call @reverse_color 1 5@ 7@
        0A8C: write_memory WANTED size 4 value 7@ virtual_protect 1
        0AF1: write_int 7@ to_ini_file "CLEO\HudColors.ini" section "Color" key "WANTED"
        end
    end
free 4@
4@ = 0
5@ = 0
Samp.CmdRet()

:reverse_color
0B66: render argb 0@ to_a 1@ r 2@ g 3@ b 4@
0B67: render a 1@ r 4@ g 3@ b 2@ to_argb 0@
ret 1 0@
 

Вложения

  • uuuu.cs
    20.3 KB · Просмотры: 4
Последнее редактирование:
  • Нравится
Реакции: ARMOR

KievStar

Участник
142
13
]
Ну банально же, ты интересуешься вообще тем что просишь или просто х.ней маешься?
CLEO:
while true
wait 0

if
key_down 49 // 1
then
say "/mask"
wait 300
end

if
key_down 50 // 2
then
say "/bron"
wait 300
end

end
Когда компилирую скрипт лезет ошибка мол "неизвестная команда key_down 49" шо делать(
 

Scrix

Известный
231
295
Как получить угол поворота камеры
 
Последнее редактирование модератором:

D3.Pheonix

🎹
Модератор
2,867
1,642
Как получить угол поворота камеры
ГУГл наше всё...
 

ARMOR

Модератор по раксампу
Модератор
4,936
6,732
Нужно сделать так чтобы клко работало только на одном сервере уже создавал тему с таким де вопросом и мне даже ответили я уже поход понял как получать название и ip сервера(( возможно. Если не сложно объясните это ещё )) но я непонял что делать дальше. По нику можете понять кто я...
 

D3.Pheonix

🎹
Модератор
2,867
1,642
Нужно сделать так чтобы клко работало только на одном сервере уже создавал тему с таким де вопросом и мне даже ответили я уже поход понял как получать название и ip сервера(( возможно. Если не сложно объясните это ещё )) но я непонял что делать дальше. По нику можете понять кто я...
Далее сравниваешь строку с ip и порт
Если условие не выполняется, то end custom thread
Порт вроде int, а ip - string
 
Последнее редактирование:

ARMOR

Модератор по раксампу
Модератор
4,936
6,732
Далее сравниваешь строку с ip и порт
Если условие не выполняется, то end custom thread
Порт вроде int, а ip - string
Вот именно этого я не понимаю, я просто +- неделю полторы Клео учу, и сделал скрипт который удаляет TextDraw лога Аризоны и редрерит мою текстуру-лого и ставит на нужные координаты и на монсере меня бесит это лого и нужно как-то сделать работу только на Розе