- 286
- 57
Вот решил сделать клео биндер по дилогу, все сделал но что то крашит при каждом заходе в игру
кто знает почему крашит
кто знает почему крашит
CLEO:
{$CLEO}
0000: NOP
repeat
wait 4000
until 0AFA: is_samp_available
cmd "nomer" @number
0AF8: samp add_message_to_chat "Fast-RP-менты{00ff00} loaded" 0xF8F8FF
while true
wait 0
if and
0ADC: test_cheat "J"
0AD2: 0@ = player $PLAYER_CHAR targeted_actor
then
0B2B: samp 1@ = get_player_id_by_actor_handle 0@
alloc 2@ 512
format 2@ "Приветствие%cПассПреступника%cШокер%cGotome%cПреступникВкар%cПреступникаИзкара%cИнкуф%cИстория имен%cОтправить термин" 0xA 0xA 0xA 0xA 0xA 0xA 0xA 0xA
0B3B: samp show_dialog id 64 caption "{ffffff} Fast-RP{ff00ff} By Clopster{ffffff}" text 2@ button_1 "Тык" button_2 "Не тык" style 2
free 2@
end
if 0B3C: samp is_dialog_responded id 64 button 3@ list_item 4@ input_text 0
then
if 3@ == 1
then
018C: play_sound 1058 at 0.0 0.0 0.0
if 4@ == 0
then
say "Здравствуйте, я кадет полиции Марат Халитов"
wait 1400
say "/me достал(а) с кармана удостоверение и предъявил"
wait 1500
say "/showudost %d" 1@
wait 1400
say "Могу я увидеть Ваши документы?"
end
if 4@ == 1
then
say "/me взял(a) паспорт с рук гражданина"
wait 1400
say "/me достал(a) КПК"
wait 1500
say "/me ввел(a) имя человека в базу данных"
wait 1400
say "/do В базе разыскиваемых обнаружен"
wait 1500
say "Уважаемый, вы находитесь в розыске, прошу пройти за мной и не сопротивляться"
end
if 4@ == 2
then
say "/me ловким движением руки сорвал электрошокер Tazer-1337"
wait 1000
say "/tazer %d" 1@
end
if 4@ == 3
then
say "/me заломал(а) руки преступнику, ведёт за собой"
wait 1000
say "/gotome %d" 1@
end
if 4@ == 4
then
say "/me открыл(a) дверь авто"
wait 1300
say "/me затолкал(a) преступника в транспорт"
wait 1000
say "/cput %d" 1@
end
if 4@ == 5
then
say "/me взял(а) преступника за шею, вытолкал с машины в участок"
wait 1000
say "/ceject %d" 1@
end
if 4@ == 6
then
say "/me снял(a) с пояса ключ от наручников"
wait 1000
say "/uncuff %d" 1@
if 4@ == 7
then
alloc 8@ 128
0B36: samp 8@ = get_player_nickname 1@
say "/namestore %s" 8@
free 8@
end
if 4@ == 8
then
msg "[Fast-RP]{ff0000} Внимание!" 0x87CEEB
msg "[Fast-RP]{f8f8ff} Введите {87CEEB}/nomer 'номер' {f8f8ff}чтобы задать телефон получателя" 0x87CEEB
alloc 12@ 500
format 12@ "РП%cДМ%cМГ%cДБ%cТК%cСК%cПГ" 0xA 0xA 0xA 0xA 0xA 0xA
0B3B: samp show_dialog id 67 caption "Выберете нужный термин для отправки" text 12@ button_1 "Тык" button_2 "Не тык" style 2
free 12@
end
end
end
if 0B3C: samp is_dialog_responded id 67 button 13@ list_item 16@ input_text 0
then
if 13@ == 1
then
if 16@ == 0
then
say "/sms %d РП реальная игра, реальное поведение, как в жизни, игра по ролям" 11@
end
if 16@ == 1
then
say "/sms %d ДМ убийство или попытка убийства всех подряд без IC причины" 11@
end
if 16@ == 2
then
say "/sms %d МГ использование OOC информации в IC" 11@
end
if 16@ == 3
then
say "/sms %d ДБ убийство или попытка убийства машиной или с расстрел с водительского места" 11@
end
if 16@ == 4
then
say "/sms %d ТК убийство члена своей команды, фракции" 11@
end
if 16@ == 5
then
say "/sms %d СК убийство на респауне (на месте появления)" 11@
end
if 16@ == 6
then
say "/sms %d ПГ Воображение из себя супергероя" 11@
end
end
end
if 0B3C: samp is_dialog_responded id 74 button 27@ list_item 0 input_text 7@
then
018C: play_sound 1058 at 0.0 0.0 0.0
if 27@ == 1
then
say "/pay %d %s" 1@ 7@
free 7@
end
end
end
:number
wait 0
alloc 25@ 64
0B35: samp 20@ = get_last_command_params
0AD4: 25@ = scan_string 20@ format "%d" 11@
msg "{87CEEB} [Fast-RP] {f8f8ff}Задан номер получателя:{00ff00} %d" 0xffffff 11@
cmdret
