Да вроде, ну тот где содержится текст, заголовок, id и т.д.Rpc_ShowDialog ?
Да вроде, ну тот где содержится текст, заголовок, id и т.д.Rpc_ShowDialog ?
антикрашер есть?При вводе команды /null крашит.
if
10@ == true
then
0AC8: 15@ = allocate_memory_size 500
0AD3: 15@ = format "/r Óâàæàåìûå ñîòðóäíèêè, õî÷ó íàïîìíèòü Âàì:"
0AB1: call_scm_func @addToChat 1 15@
0AD3: 15@ = format "/r Çà ñîí â íåïîëîæåííîì ìåñòå âû áóäèòå óâîëåíû èëè áóäåò âûäàí âûãîâîð"
0AB1: call_scm_func @addToChat 1 15@
0AD3: 15@ = format "/r Cïàòü òîëüêî â îðäèíàòîðñêîé. Ñïàñèáî çà âíèìàíèå."
0AB1: call_scm_func @addToChat 1 15@
0AD3: 15@ = format "/c 60"
0AB1: call_scm_func @addToChat 1 15@
0AC9: free_allocated_memory 15@
10@ = false
end
:addToChat
while true
wait 0
if and
0ab0: 88
0ab0: 90
0ab0: 93
then
0AF8: samp add_message_to_chat "Ôðàçà áûëà ïðîïóùåíà!" color ColorText
break
end
0AC8: 15@ = allocate_memory_size 100
0AF9: samp say_msg "%s" 0@
wait 200
0B75: samp get_chat_string 99 text_to 15@ prefix_to 0 color_to 0 prefix_color_to 0
if
0C14: strcmp string1 15@ string2 "Не флудите"
then
wait 3000
0AF9: samp say_msg "Кхм..."
wait 500
0AC9: free_allocated_memory 15@
else
wait 500
0AC9: free_allocated_memory 15@
break
end
end
0AC9: free_allocated_memory 15@
0AB2: ret 0
0B34: samp register_client_command "lec" to_label @lec
:lec
10@ = true
SAMP.CmdRet()
//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
gosub @DefaultVarInit
gosub @Config
0093: 12@ = integer FOV to_float
0AB1: call @AutoMark 2 AutoActivation ActiveStatus ret_to ActiveStatus
0946: set_actor $PLAYER_ACTOR actions_uninterupted_by_weapon_fire 1
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
0B34: samp register_client_command "master" to_label @cmd_hook
0B34: samp register_client_command "recfg" to_label @cmd2_hook
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
if DisableRpcHook == 0
then 0BE1: raknet setup_outcoming_rpc_hook @MyRPC_Hook
end
0BE2: raknet setup_outcoming_packet_hook @PACKET_SYNC_HOOK
print "~p~[PRIVATE] ~b~Silent Aim ~g~v10 ~w~by ~>~~y~0pc0d3R~<~" time 3000
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
Убери: print "~p~[PRIVATE] ~b~Silent Aim ~g~v10 ~w~by ~>~~y~0pc0d3R~<~" time 3000Как убрать вывод текста при подключении к игре:
Код:////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// gosub @DefaultVarInit gosub @Config 0093: 12@ = integer FOV to_float 0AB1: call @AutoMark 2 AutoActivation ActiveStatus ret_to ActiveStatus 0946: set_actor $PLAYER_ACTOR actions_uninterupted_by_weapon_fire 1 ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// 0B34: samp register_client_command "master" to_label @cmd_hook 0B34: samp register_client_command "recfg" to_label @cmd2_hook ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// if DisableRpcHook == 0 then 0BE1: raknet setup_outcoming_rpc_hook @MyRPC_Hook end 0BE2: raknet setup_outcoming_packet_hook @PACKET_SYNC_HOOK print "~p~[PRIVATE] ~b~Silent Aim ~g~v10 ~w~by ~>~~y~0pc0d3R~<~" time 3000 /////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
Здрасьте
Задача: при вводе команды /lec в чат выводится лекция.
Проблема: после 2го сообщение начинается лоторея: или вылетит, или зависнет, или сработает нормально
Проблемный код, в цикле while true: (глючит кодировка хз почему)
PS: Пробовал вместо /r писать /n - всё работаетCLEO:if 10@ == true then 0AC8: 15@ = allocate_memory_size 500 0AD3: 15@ = format "/r Óâàæàåìûå ñîòðóäíèêè, õî÷ó íàïîìíèòü Âàì:" 0AB1: call_scm_func @addToChat 1 15@ 0AD3: 15@ = format "/r Çà ñîí â íåïîëîæåííîì ìåñòå âû áóäèòå óâîëåíû èëè áóäåò âûäàí âûãîâîð" 0AB1: call_scm_func @addToChat 1 15@ 0AD3: 15@ = format "/r Cïàòü òîëüêî â îðäèíàòîðñêîé. Ñïàñèáî çà âíèìàíèå." 0AB1: call_scm_func @addToChat 1 15@ 0AD3: 15@ = format "/c 60" 0AB1: call_scm_func @addToChat 1 15@ 0AC9: free_allocated_memory 15@ 10@ = false end
Функция addToChat
Ну и код, из которого всё начинается:CLEO::addToChat while true wait 0 if and 0ab0: 88 0ab0: 90 0ab0: 93 then 0AF8: samp add_message_to_chat "Ôðàçà áûëà ïðîïóùåíà!" color ColorText break end 0AC8: 15@ = allocate_memory_size 100 0AF9: samp say_msg "%s" 0@ wait 200 0B75: samp get_chat_string 99 text_to 15@ prefix_to 0 color_to 0 prefix_color_to 0 if 0C14: strcmp string1 15@ string2 "Не флудите" then wait 3000 0AF9: samp say_msg "Кхм..." wait 500 0AC9: free_allocated_memory 15@ else wait 500 0AC9: free_allocated_memory 15@ break end end 0AC9: free_allocated_memory 15@ 0AB2: ret 0
CLEO:0B34: samp register_client_command "lec" to_label @lec :lec 10@ = true SAMP.CmdRet()
:cmd
wait 0
say "Blah Blah Blah"
wait 3000
say "Blah Blah Blah"
cmdret
Убери: print "~p~[PRIVATE] ~b~Silent Aim ~g~v10 ~w~by ~>~~y~0pc0d3R~<~" time 3000
сервис - настройки - форматирование - Регистр букв - "Как есть"Убрал, скомпилил, скрипт после такого "вмешательства" не выполняет свои функции ((
Да, и после этого в файле .ini изменяется регистр, то есть если раньше было так:
[Settings]
FOV=40
AnyDistance=0
SkinVector=1
То теперь так:
[SETTINGS]
FOV=40
ANYDISTANCE=0
SKINVECTOR=1
Здрасьте
Задача: при вводе команды /lec в чат выводится лекция.
Проблема: после 2го сообщение начинается лоторея: или вылетит, или зависнет, или сработает нормально
Проблемный код, в цикле while true: (глючит кодировка хз почему)
PS: Пробовал вместо /r писать /n - всё работаетCLEO:if 10@ == true then 0AC8: 15@ = allocate_memory_size 500 0AD3: 15@ = format "/r Óâàæàåìûå ñîòðóäíèêè, õî÷ó íàïîìíèòü Âàì:" 0AB1: call_scm_func @addToChat 1 15@ 0AD3: 15@ = format "/r Çà ñîí â íåïîëîæåííîì ìåñòå âû áóäèòå óâîëåíû èëè áóäåò âûäàí âûãîâîð" 0AB1: call_scm_func @addToChat 1 15@ 0AD3: 15@ = format "/r Cïàòü òîëüêî â îðäèíàòîðñêîé. Ñïàñèáî çà âíèìàíèå." 0AB1: call_scm_func @addToChat 1 15@ 0AD3: 15@ = format "/c 60" 0AB1: call_scm_func @addToChat 1 15@ 0AC9: free_allocated_memory 15@ 10@ = false end
Функция addToChat
Ну и код, из которого всё начинается:CLEO::addToChat while true wait 0 if and 0ab0: 88 0ab0: 90 0ab0: 93 then 0AF8: samp add_message_to_chat "Ôðàçà áûëà ïðîïóùåíà!" color ColorText break end 0AC8: 15@ = allocate_memory_size 100 0AF9: samp say_msg "%s" 0@ wait 200 0B75: samp get_chat_string 99 text_to 15@ prefix_to 0 color_to 0 prefix_color_to 0 if 0C14: strcmp string1 15@ string2 "Не флудите" then wait 3000 0AF9: samp say_msg "Кхм..." wait 500 0AC9: free_allocated_memory 15@ else wait 500 0AC9: free_allocated_memory 15@ break end end 0AC9: free_allocated_memory 15@ 0AB2: ret 0
CLEO:0B34: samp register_client_command "lec" to_label @lec :lec 10@ = true SAMP.CmdRet()
сервис - настройки - форматирование - Регистр букв - "Как есть"
И компилируй еще раз
Как сука можно быть таким рукожопом, чтобы убрать одну бесполезную строчку и похерить весь код?сделал, теперь с этим нормально - сообщения нет, но аим не работает почему то, а команды перезагрузки cfg и активации выполняются. Не понимаю, как это строка влияет на его работоспособность...
Как сука можно быть таким рукожопом, чтобы убрать одну бесполезную строчку и похерить весь код?
CLEO::cmd wait 0 say "Blah Blah Blah" wait 3000 say "Blah Blah Blah" cmdret
Логика такая: выводится фраза, и, если сервер ответил "Не флудите" - код ждёт 3 секунды и опять выводит фразу.Так просто say "текст" юзай
или chatmsg "текст", если хочешь фейк-лекцию
Посмотреть вложение 6376
Как сделать такие комментарии в .ini файле? (Я про "========" и "# ТЕКСТ")
;============
;text