KievStar
Участник
- 142
- 13
хотелось бы чтобы сразу все)) но впринципе можно и кулаками)Что же ты такое там делаешь, что это не получается уже 5й день?) Вопрос, нужно чтоб он бил кулаками, или стрелял в определенную точку в пространстве?
хотелось бы чтобы сразу все)) но впринципе можно и кулаками)Что же ты такое там делаешь, что это не получается уже 5й день?) Вопрос, нужно чтоб он бил кулаками, или стрелял в определенную точку в пространстве?
вообщем посчитал что будет полезно сделать клео который сам использует ( аптечку/армор/нарко/маску )
(ну типо ты нажимаешь на одну из кнопок и ты надел маску, нажал другую и ты одел бронежилет)
как можно это написать? помогите пожалуйста :(
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
Спасибо большое) Все возможно xD]
Ну банально же, ты интересуешься вообще тем что просишь или просто х.ней маешься?
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
// 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
/color health 0xFFe8690eНарод создал скрипт который меняет цвет худа по команде и хочу сделать сохранение цвета, создал ini файл и при перезаходе ничего не сохраняется понять немогу. Знаю что код говно но это мой первый скрипт над которым я работаю
Можете ещё чекнуть код в SBCLEO:// 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
{$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@
Когда компилирую скрипт лезет ошибка мол "неизвестная команда key_down 49" шо делать(]
Ну банально же, ты интересуешься вообще тем что просишь или просто х.ней маешься?
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
ГУГл наше всё...Как получить угол поворота камеры
Далее сравниваешь строку с ip и портНужно сделать так чтобы клко работало только на одном сервере уже создавал тему с таким де вопросом и мне даже ответили я уже поход понял как получать название и ip сервера(( возможно. Если не сложно объясните это ещё )) но я непонял что делать дальше. По нику можете понять кто я...
Вот именно этого я не понимаю, я просто +- неделю полторы Клео учу, и сделал скрипт который удаляет TextDraw лога Аризоны и редрерит мою текстуру-лого и ставит на нужные координаты и на монсере меня бесит это лого и нужно как-то сделать работу только на РозеДалее сравниваешь строку с ip и порт
Если условие не выполняется, то end custom thread
Порт вроде int, а ip - string