Делай ракнет хук на входящее рпс.как сделать авто-ответ? т.е мне игрок пишет в /pm ку я ему в ответ ку.
Как мне сказал модератор, на этом типе можно сделать авто-тп
Делай ракнет хук на входящее рпс.как сделать авто-ответ? т.е мне игрок пишет в /pm ку я ему в ответ ку.
Как мне сказал модератор, на этом типе можно сделать авто-тп
while true
wait 0
if MarkState == 1
then
for 15@ = 0 to MAX_VEHICLES
16@ = SAMP.GetVehicleHandleBySAMPVehicleID(15@)
if 056E: car 16@ defined
then
00AA: store_car 16@ position_to 21@ 22@ 23@
marker.CreateIconAndSphere(20@, 55, 21@, 22@, 23@)
wait 0
marker.Disable(20@)
end
end
end
if VehicleState == 1
then
for 0@ = 0 to MAX_VEHICLES
03F0: enable_text_draw 1
1@ = SAMP.GetVehicleHandleBySAMPVehicleID(0@)
if 056E: car 1@ defined
then
00AA: store_car 1@ position_to 2@ 3@ 4@
if call @convert 3 2@ 3@ 4@ ret 5@ 6@
then
0C11: 11@ 0 260
format 11@ "{0094c8}Kraft1k{FFFFFF}:{ff0000}Транспорт"
0B6F: render font 13@ draw_text 11@ pos 5@ 6@ color 0xe3dc0bff
end
end
end
end
end
А зачем удаляешь?Текст мигает из-за "wait 0", если убрать, то "маркер" на радаре не появляется. Как решить?
CLEO:while true wait 0 if MarkState == 1 then for 15@ = 0 to MAX_VEHICLES 16@ = SAMP.GetVehicleHandleBySAMPVehicleID(15@) if 056E: car 16@ defined then 00AA: store_car 16@ position_to 21@ 22@ 23@ marker.CreateIconAndSphere(20@, 55, 21@, 22@, 23@) wait 0 marker.Disable(20@) end end end if VehicleState == 1 then for 0@ = 0 to MAX_VEHICLES 03F0: enable_text_draw 1 1@ = SAMP.GetVehicleHandleBySAMPVehicleID(0@) if 056E: car 1@ defined then 00AA: store_car 1@ position_to 2@ 3@ 4@ if call @convert 3 2@ 3@ 4@ ret 5@ 6@ then 0C11: 11@ 0 260 format 11@ "{0094c8}Kraft1k{FFFFFF}:{ff0000}Транспорт" 0B6F: render font 13@ draw_text 11@ pos 5@ 6@ color 0xe3dc0bff end end end end end
Иначе тогда не будут прогружаться новыеА зачем удаляешь?
marker.Disable(20@)
покажи полный кодТекст мигает из-за "wait 0", если убрать, то "маркер" на радаре не появляется. Как решить?
CLEO:while true wait 0 if MarkState == 1 then for 15@ = 0 to MAX_VEHICLES 16@ = SAMP.GetVehicleHandleBySAMPVehicleID(15@) if 056E: car 16@ defined then 00AA: store_car 16@ position_to 21@ 22@ 23@ marker.CreateIconAndSphere(20@, 55, 21@, 22@, 23@) wait 0 marker.Disable(20@) end end end if VehicleState == 1 then for 0@ = 0 to MAX_VEHICLES 03F0: enable_text_draw 1 1@ = SAMP.GetVehicleHandleBySAMPVehicleID(0@) if 056E: car 1@ defined then 00AA: store_car 1@ position_to 2@ 3@ 4@ if call @convert 3 2@ 3@ 4@ ret 5@ 6@ then 0C11: 11@ 0 260 format 11@ "{0094c8}Kraft1k{FFFFFF}:{ff0000}Транспорт" 0B6F: render font 13@ draw_text 11@ pos 5@ 6@ color 0xe3dc0bff end end end end end
{$CLEO .cs}
//-------------MAIN---------------
0000: NOP
:Noname_75
wait 0
SAMP.Available
else_jump @Noname_75
0AF1: write_int 20160226 to_ini_file "CLEO\SaMMpeR.ini" section "AutoUpdate" key "CompileDate"
Dialog.Create(4@, "----------------------------------------------------------------------")
0AB3: var 19 = 4@
Dialog.SetVisible(4@, 0)
Dialog.EnableCaption(4@, 1)
Dialog.SetMinimized(4@, 0)
Dialog.SetBackgroundColor(4@, -939524096)
Dialog.AddCheckBox(4@, 0, "", 288, 4, 20, 20)
Dialog.AddCheckBox(4@, 1, "", 308, 4, 20, 20)
Dialog.AddStatic(4@, 2, "-----------------------------------------------------------------------------", 5, 20, 325, 20)
Dialog.AddStatic(4@, 3, "{FF0000}HK by SaMMpeR.eXe", 5, 5, 325, 20)
31@ = 40
0AC6: 29@ = label @Noname_52640 offset
0C65: 28@ = download_url 29@ to_file "SaMMpeR_info.php"
27@ = -1
Хотел изменить скрипт но когда я его компилирую ошибка:
Неверное выражение Dialog.Create(4@,"----------------------------------------------------------------------").
Одна из переменных имеет неизвестный тип, либо их типы несовместимы.
CLEO:{$CLEO .cs} //-------------MAIN--------------- 0000: NOP :Noname_75 wait 0 SAMP.Available else_jump @Noname_75 0AF1: write_int 20160226 to_ini_file "CLEO\SaMMpeR.ini" section "AutoUpdate" key "CompileDate" Dialog.Create(4@, "----------------------------------------------------------------------") 0AB3: var 19 = 4@ Dialog.SetVisible(4@, 0) Dialog.EnableCaption(4@, 1) Dialog.SetMinimized(4@, 0) Dialog.SetBackgroundColor(4@, -939524096) Dialog.AddCheckBox(4@, 0, "", 288, 4, 20, 20) Dialog.AddCheckBox(4@, 1, "", 308, 4, 20, 20) Dialog.AddStatic(4@, 2, "-----------------------------------------------------------------------------", 5, 20, 325, 20) Dialog.AddStatic(4@, 3, "{FF0000}HK by SaMMpeR.eXe", 5, 5, 325, 20) 31@ = 40 0AC6: 29@ = label @Noname_52640 offset 0C65: 28@ = download_url 29@ to_file "SaMMpeR_info.php" 27@ = -1
{$CLEO .cs}
//-------------MAIN---------------
0000: NOP
:Noname_75
wait 0
SAMP.Available
else_jump @Noname_75
0AF1: write_int 20160226 to_ini_file "CLEO\SaMMpeR.ini" section "AutoUpdate" key "CompileDate"
0B80: dialog 4@ = create "----------------------------------------------------------------------"
0AB3: var 19 = 4@
0B86: dialog 4@ set_visible 0
0B9F: dialog 4@ enable_caption 1
0BA1: dialog 4@ set_minimized 0
0B93: dialog 4@ set_background_color -939524096
0B83: dialog 4@ add_checkbox id 0 text "" pos_XY 288 4 size 20 20
0B83: dialog 4@ add_checkbox id 1 text "" pos_XY 308 4 size 20 20
0B91: dialog 4@ add_static id 2 text "-----------------------------------------------------------------------------" pos_XY 5 20 size 325 20
0B91: dialog 4@ add_static id 3 text "{FF0000}HK by SaMMpeR.eXe" pos_XY 5 5 size 325 20
31@ = 40
0AC6: 29@ = label @Noname_52640 offset
0C65: 28@ = download_url 29@ to_file "SaMMpeR_info.php"
27@ = -1
В файле все естьКто знает EditType`ы у RPC_SendEditObject
там только параметры рпц, а ему надо значения edittyp'aВ файле все есть
А чё за edittype?там только параметры рпц, а ему надо значения edittyp'a
параметр, который присылает рпцА чё за edittype?
Как сравнить 2 локальных переменных, в которых находится текст?
0C21: stricmp string1 1@ string2 2@