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

[Xample]

Я чето нихуя не понял, ты используешь переменную для проверки была ли прописана команда /shahtaon и в то же время эту же переменную записываешь в глобальную для проверки вкл бота?ЧО КАК? Это у тебя каша или я ебанутый?

ахахах. покрайней мере всё работает)
нужно только както так

:testchat
0BFD: 10@ = get_global_var "BOTSTATE"
if
10@ == 0
else_jump @testchat
но почемуто не проверяет

 

[Enjoy]

Сразу 2 вопроса... Как можно без песочницы запустить более 2-ух аккаунтов? И как сделать чтоб все они синхронно работали от одного клео скрипта?
Я реально видел, как пацан запустил 8 (восемь) акков и все они синхронно работали на одном боте шахтера... Он с одного окна сампа включал, и выключал сразу все... Как такое сделать?

Более двух акков без песка можно, в СФ есть же фича, ты открываешь клиент SAMP и просто коннектишься к серверу, меняя ники.
На счет синхронной работы, то хз, это настолько важно? Если да, то ты можешь у бота сделать проверку на чат, пишешь заранее заготовленную фразу, они все активируются. Если я тебя правильно понял короче.

 

[cover]

Сразу 2 вопроса... Как можно без песочницы запустить более 2-ух аккаунтов? И как сделать чтоб все они синхронно работали от одного клео скрипта?
Я реально видел, как пацан запустил 8 (восемь) акков и все они синхронно работали на одном боте шахтера... Он с одного окна сампа включал, и выключал сразу все... Как такое сделать?

Вроде СФ запускает сразу 2 окна. Скрипты работают на всех окнах, если они установлены до запуска ГТА

 

[cover]

Еще вопрос... Есть такой скрипт на погрузчик.. "cg". Вот, как он работает? Он берет ящики на работе погрузчика , на растоянии... Но эти ящики не пикапы... А просто объекты ... Как можно взять обьект на расстоянии?

Отправить пакет о взятии координат ящика.

 

[Enjoy]

Короче хотел сделать топ скриптяру, но не вышло, начинает лагать после активации.
Че не так?

Спойлер

{$CLEO .cs}

Thread 'Test'

repeat
    wait 400
until 0AFA:  is_samp_available

0B34: samp register_client_command "test" to_label @cmd

while true
wait 0

    if 1@ == 1
    then
        Actor.StorePos($PLAYER_ACTOR, 2@, 3@, 4@)
        for 13@ = 0 to 1000
            if 0B23: samp is_player_connected 13@
            then
                0B20: samp 14@ = actor_handle_by_samp_player_id 13@
                if 14@ <> 0
                then
                    if 00FE: actor 14@ sphere 0 in_sphere 2@ 3@ 4@ radius 80.0 80.0 80.0
                    then
                        if Actor.Model(14@) == #ballas1
                        then
                            if Actor.DrivingVehicleType(14@, 412)
                            then
                                // Äåéñòâèÿ.
                            end
                        end
                    end
                end
            end
        end
    end
end

:cmd
wait 0
0B12: 1@ = 1@ XOR 1
if 1@ == 1
then
    0AF8: samp add_message_to_chat "Start." color -1
else
    0AF8: samp add_message_to_chat "Stop." color -1
end
Samp.CmdRet()

 

[Enjoy]

Чето все равно лагает, фризит короче, а потом когда офаю, то нормас.

 

[Enjoy]

Память выдели для переменных.

энивей лагает, выделяю, а потом в конечном итоге освобождают и так постоянно, все гуд же?

 

[DubStep_]

Спасибо чувак. Я уже разобрался... Бота на погрузчик замутил... 2 Часа уже работаю, не банят)

Банят там, с делал бота но не выкладывал, за мной админ следил и говорил типо не палишься парень))0

 

[semka_]

У меня вот такой вопрос.
Можно ли в дамаг информере сделать так, что бы показывало не 100 хп, а 160?

 

[Dark_Knight]

У меня вот такой вопрос.
Можно ли в дамаг информере сделать так, что бы показывало не 100 хп, а 160?

Нет.

 

[itsLegend]

https://sampwiki.blast.hk/wiki/Weapons

 

[itsLegend]

until 32@ >= 10000

 

[itsLegend]

Я более чем уверен, что ты запускаешь, а эти 10 секунд уже прошли.
Обнуляй переменную 32 после запуска или где-то там.

 

[Enjoy]

Ребзи, кто знает принцип работы warp key(v sobe), оче нужно, хочу запитонить в клео попробовать.

 

[DubStep_]

Почему эмуляция происходит, но камера направлена в одни и те же координаты, какие бы я корды не ставил.

{$CLEO .cs}
0000:

while not SAMP.Available()
  wait 400
end

0B34: samp register_client_command "on" to_label @on
0B34: samp register_client_command "off" to_label @off


while true
wait 0
if 0@ == 1
then
0AB1: call_scm_func @keyPress 2 key 87 time 500 // Кароче это W
0AB1: call_scm_func @set_angle 2 -1759.7299 13.5858
wait 500
end
end

:keyPress
if 0AA2: 2@ = load_library "User32.dll"
then
  if 0AA4: 2@ = get_proc_address "keybd_event" library 2@
  then
  0AA5: call 2@ num_params 4 pop 0 0 0 0 0@
  wait 1@
  0AA5: call 2@ num_params 4 pop 0 0 0x02 0 0@
  end
end
0AB2: ret 0

:on
0@ = 1
chatmsg "Включено"
Samp.CmdRet()

:off
0@ = 0
chatmsg "Отключено"
Samp.CmdRet()
:set_angle
Actor.StorePos($PLAYER_ACTOR, 3@, 4@, 5@)
0063: 0@ -= 3@
0063: 1@ -= 4@
0604: get_Z_angle_for_point 3@ 4@ store_to 5@
Actor.Angle($PLAYER_ACTOR) = 5@
Camera.Restore_WithJumpCut()
0AB2: ret 0

:set_angle
0604: get_Z_angle_for_point 0@ 1@ store_to 5@
Actor.Angle($PLAYER_ACTOR) = 5@
Camera.Restore_WithJumpCut()
0AB2: ret 0

Это тоже должно работать