{$CLEO}
0000:
repeat
wait 0
until samp.Available()
0BE2: raknet setup_outcoming_packet_hook @TP
0BDE: pause_thread 0
:TP
0BE5: raknet 0@ = get_hook_param 1
if and
0@ == 207
0ADC: test_cheat "JUMP"
then
0BE5: raknet 0@ = get_hook_param 0
0BF1: raknet 2@ = bit_stream 0@ get_write_offset
0BED: raknet bit_stream 0@ set_read_offset 56
0AB6: store_target_marker_coords_to 10@ 11@ 12@ // IF and SET
0B40: raknet bit_stream 0@ write 10@ type 4 size 56
0B40: raknet bit_stream 0@ write 11@ type 4 size 88
0B40: raknet bit_stream 0@ write 12@ type 4 size 120
0BEC: raknet bit_stream 0@ set_write_offset 2@
0BF2: raknet 30@ = bit_stream 0@ get_read_offset
0BE7: raknet 20@ = bit_stream_read 0@ type 4
0BE7: raknet 21@ = bit_stream_read 0@ type 4
0BE7: raknet 22@ = bit_stream_read 0@ type 4
0BEC: raknet bit_stream 0@ set_write_offset 30@
Actor.PutAt($player_actor, 20@, 21@, 22@)
chatmsg "Вы были {00db6a}успешно{ffffff} телепортированы!" -1
else
0BE0: raknet hook_ret 1
end
0BE0: raknet hook_ret 1
ты перепутал рид оффсет с врайт оффсетом просто замени в начале на врайт, а когда вернешь в исх. состояние врайт оффсет сделаешь его и для рид оффсетадолжен записывать координаты метки в плеер синк и потом получать оттуда их, и телепортировать на эти корды, но он телепортирует на то же место где стою, значит я неправильно как-то записываю?CLEO:{$CLEO} 0000: repeat wait 0 until samp.Available() 0BE2: raknet setup_outcoming_packet_hook @TP 0BDE: pause_thread 0 :TP 0BE5: raknet 0@ = get_hook_param 1 if and 0@ == 207 0ADC: test_cheat "JUMP" then 0BE5: raknet 0@ = get_hook_param 0 0BF1: raknet 2@ = bit_stream 0@ get_write_offset 0BED: raknet bit_stream 0@ set_read_offset 56 0AB6: store_target_marker_coords_to 10@ 11@ 12@ // IF and SET 0B40: raknet bit_stream 0@ write 10@ type 4 size 56 0B40: raknet bit_stream 0@ write 11@ type 4 size 88 0B40: raknet bit_stream 0@ write 12@ type 4 size 120 0BEC: raknet bit_stream 0@ set_write_offset 2@ 0BF2: raknet 30@ = bit_stream 0@ get_read_offset 0BE7: raknet 20@ = bit_stream_read 0@ type 4 0BE7: raknet 21@ = bit_stream_read 0@ type 4 0BE7: raknet 22@ = bit_stream_read 0@ type 4 0BEC: raknet bit_stream 0@ set_write_offset 30@ Actor.PutAt($player_actor, 20@, 21@, 22@) chatmsg "Вы были {00db6a}успешно{ffffff} телепортированы!" -1 else 0BE0: raknet hook_ret 1 end 0BE0: raknet hook_ret 1
Слова Write/read вообще не влияют, надо менять сам опкод.ты перепутал рид оффсет с врайт оффсетом просто замени в начале на врайт, а когда вернешь в исх. состояние врайт оффсет сделаешь его и для рид оффсета
это я и имел в видуСлова Write/read вообще не влияют, надо менять сам опкод.
{$CLEO .cs}
0000: NOP
repeat
wait 0
until Samp.Available()
0B34: samp register_client_command "chat" to_label @chat
repeat
wait 0
if 0@ == 1
then
Samp.IsCommandTyped(1@)
if 0AD4: 2@ = scan_string 1@ format "%s" 3@
then
0B2B: samp 4@ = get_player_id_by_actor_handle $PLAYER_ACTOR
0B36: samp 5@ = get_player_nickname 4@
chatmsg "%s (%s)[%d]" 3@ 5@ 4@
else
0AD0: show_formatted_text_lowpriority "~y~/chat [enter in to text]" time 1337
end
0@ = 0
end
until false
:chat
0@ = 1
Samp.CmdRet()
Форматировать текст опкодом 0AD4 нельзя.Здарова всем, поможете? Почему не работает клео. Суть такова при вводе /chat и текст то пишет визуально белым цветом то что я написал ,а в правом углу (мой ник) [мой ид] но я в скин сиджея попадаю прошу помоги.
А как тогда, покажи.Форматировать текст опкодом 0AD4 нельзя.
Слышь, слушайте, дети.Здарова всем, поможете? Почему не работает клео. Суть такова при вводе /chat и текст то пишет визуально белым цветом то что я написал ,а в правом углу (мой ник) [мой ид] но я в скин сиджея попадаю прошу помоги.
CLEO:{$CLEO .cs} 0000: NOP repeat wait 0 until Samp.Available() 0B34: samp register_client_command "chat" to_label @chat repeat wait 0 if 0@ == 1 then Samp.IsCommandTyped(1@) if 0AD4: 2@ = scan_string 1@ format "%s" 3@ then 0B2B: samp 4@ = get_player_id_by_actor_handle $PLAYER_ACTOR 0B36: samp 5@ = get_player_nickname 4@ chatmsg "%s (%s)[%d]" 3@ 5@ 4@ else 0AD0: show_formatted_text_lowpriority "~y~/chat [enter in to text]" time 1337 end 0@ = 0 end until false :chat 0@ = 1 Samp.CmdRet()
{$CLEO}
{$NOSOURCE}
0000: NOP
repeat
wait 0
until samp.Available()
0B34: samp register_client_command "cmd" to_label @SetImagePosition
while true
wait 0
if 30@ == 1
then
// Тело
end
end
:SetImagePosition
0AC8: 7@ = allocate_memory_size 32
0B35: samp 7@ = get_last_command_params
if 0AD4: 24@ = scan_string 7@ format "%d" 8@
then
if 8@ > 0
then
// ну тут просто чекай
else
0AF8: samp add_message_to_chat "Вы ввели значение меньше 0" color 0xf4c99c
end
else
0AF8: samp add_message_to_chat "Ошибка. Укажите параметр. По примеру /cmd 64" color 0xf4c99c
end
0AC9: 7@
samp.CmdRet()
{$CLEO .cs}
0000: NOP
repeat
wait 0
until Samp.Available()
0B34: samp register_client_command "alogin" to_label @ALogin
repeat
wait 0
if 0@ == 1
then
Samp.IsCommandTyped(1@)
if and
0B3C: samp is_dialog_responded id 23333 button 1@ list_item 0 input_text 82624
1@ == 1
0B3B: samp show_dialog id 23333 caption "{00CED1}Админ авторизация" text "Введите Ваш пароль от админки в поле ниже" button_1 "Вход" button_2 "Отмена" style 1
then
0AF8: samp add_message_to_chat "Вы вошли как старший администратор" color 0xFFFF00
end
0@ = 0
end
until false
:alogin
0@ = 1
Samp.CmdRet()
Не понимаю почему не работает
CLEO:{$CLEO .cs} 0000: NOP repeat wait 0 until Samp.Available() 0B34: samp register_client_command "alogin" to_label @ALogin repeat wait 0 if 0@ == 1 then Samp.IsCommandTyped(1@) if and 0B3C: samp is_dialog_responded id 23333 button 1@ list_item 0 input_text 82624 1@ == 1 0B3B: samp show_dialog id 23333 caption "{00CED1}Админ авторизация" text "Введите Ваш пароль от админки в поле ниже" button_1 "Вход" button_2 "Отмена" style 1 then 0AF8: samp add_message_to_chat "Вы вошли как старший администратор" color 0xFFFF00 end 0@ = 0 end until false :alogin 0@ = 1 Samp.CmdRet()
{$CLEO .cs}
0000: NOP
repeat
wait 0
until Samp.Available()
0B34: samp register_client_command "alogin" to_label @ALogin
while true
wait 0
if 0@ == 1
then
Samp.IsCommandTyped(1@)
if and
0B3C: samp is_dialog_responded id 23333 button 1@ list_item 0 input_text 82624
1@ == 1
0B3B: samp show_dialog id 23333 caption "{00CED1}Админ авторизация" text "Введите Ваш пароль от админки в поле ниже" button_1 "Вход" button_2 "Отмена" style 1
then
0AF8: samp add_message_to_chat "Вы вошли как старший администратор" color 0xFFFF00
end
0@ = 0
end
end
:ALogin
0@ = 1
Samp.CmdRet()
Не реагирует на пароль 82624, точнее допустим ввожу /alogin не работает типа вошли как старший администратор ,а когда второй раз ввожу то пишет типа вошли как старший адм. Но мне нужно чтобы когда /alogin и ввели пароль 82624 тогда писало вошли как старший адм.CLEO:{$CLEO .cs} 0000: NOP repeat wait 0 until Samp.Available() 0B34: samp register_client_command "alogin" to_label @ALogin while true wait 0 if 0@ == 1 then Samp.IsCommandTyped(1@) if and 0B3C: samp is_dialog_responded id 23333 button 1@ list_item 0 input_text 82624 1@ == 1 0B3B: samp show_dialog id 23333 caption "{00CED1}Админ авторизация" text "Введите Ваш пароль от админки в поле ниже" button_1 "Вход" button_2 "Отмена" style 1 then 0AF8: samp add_message_to_chat "Вы вошли как старший администратор" color 0xFFFF00 end 0@ = 0 end end :ALogin 0@ = 1 Samp.CmdRet()
попробуй так
Не реагирует на пароль 82624, точнее допустим ввожу /alogin не работает типа вошли как старший администратор ,а когда второй раз ввожу то пишет типа вошли как старший адм. Но мне нужно чтобы когда /alogin и ввели пароль 82624 тогда писало вошли как старший адм.
{$CLEO .cs}
0000: NOP
repeat
wait 0
until Samp.Available()
0B34: samp register_client_command "alogin" to_label @ALogin
while true
wait 0
if 0@ == 1
then
if 0B3C: samp is_dialog_responded id 23333 button 1@ list_item 0 input_text 2@
then
if 1@ == 1
then
if 2@ == 82624
then
0AF8: samp add_message_to_chat "Вы вошли как старший администратор" color 0xFFFF00
else
0AF8: samp add_message_to_chat "Неверный пароль." color 0xFFFF00
end
end
0@ = 0
end
end
end
:ALogin
0@ = 1
0B3B: samp show_dialog id 23333 caption "{00CED1}Админ авторизация" text "Введите Ваш пароль от админки в поле ниже" button_1 "Вход" button_2 "Отмена" style 1
Samp.CmdRet()
{$CLEO}
0B34: samp register_client_command "hl" to_label @hl
0B34: samp register_client_command "tm" to_label @tm
0B34: samp register_client_command "lc" to_label @lc
0BDE: pause_thread 0
:hl
0C8F: samp process_chat_input "От головной боли я выпишу Вам лекарство Цитрамон."
wait 2100
Его цена: %d. // тут должно писать цену которую ты указал в команде /hl ID цена.
wait 2100
0C8F: samp process_chat_input "/me открыл сумку и достал лекарство"
wait 2100
0C8F: samp process_chat_input "/me передал лекарство пациенту"
wait 2100
0C8F: samp process_chat_input "/heal id цена" // вместо ид и цены должно писать то что ты ввел после команды /hl ID цена
0B43: samp cmd_ret
:tm
0C8F: samp process_chat_input "/time"
0B43: samp cmd_ret
:lc
0C8F: samp process_chat_input "/lock"
0B43: samp cmd_ret
посмотри этот говнокод, может поймешь свои ошибки, ну а вообще поучи форматированиеВопрос в том,как доделать,мне нужно использования функций "%d" "%s".Зачем оно мне надо если есть биндер? Я отвечу - командой удобнее.
CLEO:{$CLEO} 0B34: samp register_client_command "hl" to_label @hl 0B34: samp register_client_command "tm" to_label @tm 0B34: samp register_client_command "lc" to_label @lc 0BDE: pause_thread 0 :hl 0C8F: samp process_chat_input "От головной боли я выпишу Вам лекарство Цитрамон." wait 2100 Его цена: %d. // тут должно писать цену которую ты указал в команде /hl ID цена. wait 2100 0C8F: samp process_chat_input "/me открыл сумку и достал лекарство" wait 2100 0C8F: samp process_chat_input "/me передал лекарство пациенту" wait 2100 0C8F: samp process_chat_input "/heal id цена" // вместо ид и цены должно писать то что ты ввел после команды /hl ID цена 0B43: samp cmd_ret :tm 0C8F: samp process_chat_input "/time" 0B43: samp cmd_ret :lc 0C8F: samp process_chat_input "/lock" 0B43: samp cmd_ret