Вопросы по CLEO-скриптингу

[iGO[R]]

Спс Дупсчик :), теперь у меня другой вопрос, возможно ли сделать так, чтобы в "Однорукий бандит" (это в казино - игра на деньги) всегда выпадали три одинаковые картинки?

Для нубо-рп, не для нубо-рп разницы нету ;D

 

[DubStep_]

Как проверить, есть ли на персонаже объект который присвоил сервер?

 

[DarkP1xel]

Как проверить, есть ли на персонаже объект который присвоил сервер?

00A0: store_actor $PLAYER_ACTOR position_to 0@ 1@ 2@
0AE3: 3@ = random_object_near_point 0@ 1@ 2@ in_radius 2.0 find_next 1
0B52: samp 4@ = object_id_by_handle 3@

Если 4@ вернёт: -1, то объект который на тебе создан не сервером, а если что-то другое, то сервером. Можешь в качестве страховки использовать этот опкод:

0685:   object 3@ attached

Не проверял, но по идеи должен проверять прикреплён ли объект к чему-то или нет.

 

[Dark_Knight]

Как проверить, есть ли на персонаже объект который присвоил сервер?

Лучше юзать хук ракнета.

 

[iGO[R]]

Есть ли урок по отправке пакетов на сервер (неважно, примит он их или нет)?
Допустим мне нужно отправить пакет на сервер, о том, что я купил оружие в магазине. Как узнать какой именно пакет надо отправлять, название или что там, и как его потом отправить? :)

 

[DarkP1xel]

Есть ли урок по отправке пакетов на сервер (неважно, примит он их или нет)?
Допустим мне нужно отправить пакет на сервер, о том, что я купил оружие в магазине. Как узнать какой именно пакет надо отправлять, название или что там, и как его потом отправить? :)

http://ru.cleo.wikia.com/wiki/Cleo_вики

 

[iGO[R]]

Почему виснет игра?

Вот код:

{$CLEO .cs}

//—————————————————————————MAIN—————————————————————————
0000: NOP

Thread "Test"

if 8AF7: get_samp_base_to 33@
then 0A93: end_custom_thread
end
repeat
    wait 400
until 0AFA: is_samp_structures_available
0B34: samp register_client_command "передать" to_label @Transfer
while true
    wait 0
end

:Transfer
0@ = SAMP.RegisterClientCommand()
if
0AD4: 0@ = scan_string 0@ format "%d %f %g" 1@ 2@ 3@
then

For 4@ = 1 to 3@
0B49: samp set_current_dialog_list_item 3
Wait 1000
samp.CloseDialog(1)
Wait 5000
0B4B: samp set_current_dialog_editbox_text 1@
Wait 1000
samp.CloseDialog(1)
Wait 5000
0B4B: samp set_current_dialog_editbox_text 2@
wait 1000
samp.CloseDialog(1)
End
else
print "~B~deactivated" 2000
end
SAMP.CmdRet()

 

[Dark_Knight]

Циклы нельзя использовать в командах

 

[iGO[R]]

Что совсем никак? А как тогда делают ботов, они ведь через команду активируются.)

 

[DarkP1xel]

Что совсем никак?

Можно через XOR.

 

[iGO[R]]

Можешь пример привести? У меня то получилось с XOR, но как то не правильно :)

 

[iGO[R]]

А во получилось, вот только скрипт как будто не воспринимает Wait, кароч в диалог текст не выводится:

Вот код:

{$CLEO .cs}

Thread "Test"

0B34: samp register_client_command "test" to_label @Test

While TRUE
Wait 0
End

:Test
0B12: 10@ = 10@ XOR 1
If 10@ == 1
Then
For 4@ = 1 To 5
0B49: samp set_current_dialog_list_item 3
SAMP.CloseDialog(1)
Wait 5000
0B4B: samp set_current_dialog_editbox_text "101010"
SAMP.CloseDialog(1)
Wait 5000
0B4B: samp set_current_dialog_editbox_text "100"  
SAMP.CloseDialog(1)
End
End
SAMP.CmdRet()

 

[Dark_Knight]

Ты слепой?

Циклы нельзя использовать в командах

 

[Vingt_Deux]

Как имитировать нажатие клавиши?
Например:

call @playersynccoord 3 -23.7561 -55.3719 1003.5469
call @playersynccoord 3 531.6459 -1293.0018 17.2422
0AF9: samp say_msg "/join"
call @playersynccoord 3 -23.7561 -55.3719 1003.5469

А мне надо, чтобы вместо

0AF9: samp say_msg "/join"

Было нажатие на кнопку ALT.

 

[iGO[R]]

Ты слепой?

Я не с тобой разговаривал.