Royan_Millans
Известный
- 145
- 183
Всем ку, как можно проверить существование TextDraw'а на экране?
0C5D: samp textdraw 0@ is_exists
Всем ку, как можно проверить существование TextDraw'а на экране?
0C5D: samp textdraw 0@ is_exists
poskusite takoTorej. Vsi poznamo avtomobil s sestavnimi deli poplav. kdorkoli mi lahko pomaga in ga naredim tako, da ko pritisnem 1, se vhodna vrata zrušijo. Prosim, dajte mi vir
{$CLEO}
0000:
while true
wait 0
if and
Actor.Driving($PLAYER_ACTOR)
0AB0: 49
then
00D9: 1@ = actor $PLAYER_ACTOR car
0689: set_car 1@ remove_door 2 removed_door_visible 1
while 0AB0: 49
wait 0
end
end
end
Does not work ;(poskusite tako
CLEO:{$CLEO} 0000: while true wait 0 if and Actor.Driving($PLAYER_ACTOR) 0AB0: 49 then 00D9: 1@ = actor $PLAYER_ACTOR car 0689: set_car 1@ remove_door 2 removed_door_visible 1 while 0AB0: 49 wait 0 end end end
{$CLEO}
0000:NOP
wait 3000
:warelock
wait 0
if and
not SAMP.IsDialogActive(-1)
not SAMP.ChatInputOpened()
0AB0: key_pressed 76
not key_down 18
jf @warelock
0AF9: samp say_msg "/warelock"
wait 200
Что не так?Код:{$CLEO} 0000:NOP wait 3000 :warelock wait 0 if and not SAMP.IsDialogActive(-1) not SAMP.ChatInputOpened() 0AB0: key_pressed 76 not key_down 18 jf @warelock 0AF9: samp say_msg "/warelock" wait 200
{$CLEO}
0000:
repeat
wait 0
until SAMP.Available()
while true
wait 0
if and
not SAMP.IsDialogActive(-1)
not SAMP.ChatInputOpened()
0AB0: key_pressed 76
not key_down 18
then
0AF9: samp say_msg "/warelock"
wait 200
end
END
В конце надо было прыгнуть на начало циклаЧто не так?Код:{$CLEO} 0000:NOP wait 3000 :warelock wait 0 if and not SAMP.IsDialogActive(-1) not SAMP.ChatInputOpened() 0AB0: key_pressed 76 not key_down 18 jf @warelock 0AF9: samp say_msg "/warelock" wait 200
Код скинуть, не?Ну я тип лах, и вот.... пишу такой скрипт, всё ок, там команду регаю, потом создаю диалог в стиле list, добавляю элементы. Добавляю чек на нажатия пунктов и тд, но когда в игре выбираю пунктик и нажимаю enter ничего не происходит, только после повторного ввода команды. Шо робить?))))
нет, зачем оно xDКод скинуть, не?
{$CLEO}
0000:
const
DIALOG_STYLE_LIST = 2
end
repeat
wait 400
until 0AFA: is_samp_available
0B34: samp register_client_command "pizdec" to_label @pizdec
while true
wait 0
end
:pizdec
0ac8: alloc 0@ size 256
0ad3: format_stirng 0@ = "first%csecond" 0xA
0B3B: samp show_dialog id 85 caption "Pizdec" text 0@ button_1 "Âûáðàòü" button_2 "Çàêðûòü" style DIALOG_STYLE_LIST
if 0B3C: samp is_dialog_responded id 85 button 1@ list_item 3@ input_text 0
then
if 1@ == 1
then
if 3@ == 0
then
actor.PutAt(1609.124 971.5497 17.6145)
end
else
end
end
0ac9: free 0@
0B43: samp cmd_ret
нет, зачем оно xD
CLEO:{$CLEO} 0000: const DIALOG_STYLE_LIST = 2 end repeat wait 400 until 0AFA: is_samp_available 0B34: samp register_client_command "pizdec" to_label @pizdec while true wait 0 end :pizdec 0ac8: alloc 0@ size 256 0ad3: format_stirng 0@ = "first%csecond" 0xA 0B3B: samp show_dialog id 85 caption "Pizdec" text 0@ button_1 "Âûáðàòü" button_2 "Çàêðûòü" style DIALOG_STYLE_LIST if 0B3C: samp is_dialog_responded id 85 button 1@ list_item 3@ input_text 0 then if 1@ == 1 then if 3@ == 0 then actor.PutAt(1609.124 971.5497 17.6145) end else end end 0ac9: free 0@ 0B43: samp cmd_ret
while true
wait 0
if 0B3C: samp is_dialog_responded id 85 button 1@ list_item 3@ input_text 0
then
if 1@ == 1
then
if 3@ == 0
then
actor.PutAt(1609.124 971.5497 17.6145)
end
end
end
end
:pizdec
0ac8: alloc 0@ size 256
0ad3: format_stirng 0@ = "first%csecond" 0xA
0B3B: samp show_dialog id 85 caption "Pizdec" text 0@ button_1 "Âûáðàòü" button_2 "Çàêðûòü" style DIALOG_STYLE_LIST
0ac9: free 0@
0B43: samp cmd_ret