[CLEO] Помощь по редактированию скриптов - Страница 61 - Форум Cheat-Master.ru
Модератор форума: Alowir, Sanoxxx  
[CLEO] Помощь по редактированию скриптов
Tosoti Дата: Воскресенье, 06.09.2015, 12:25 | Сообщение # 901
Боец
Сообщений: 150
Статус: Offline
Bad_Fenix, так каким опкодом узнать координаты маркера? Мне это очень нужно.
И ещё вопрос: Кто подскажет как эмулировать нажатие клавиш или как сделать так, чтобы, к примеру, в диалоговое окно скрипт вводил твой пароль и нажимал Enter или подтверждал как-то.
Liptonus777 Дата: Воскресенье, 06.09.2015, 21:33 | Сообщение # 902
Боец
Сообщений: 106
Статус: Offline
Цитата Tosoti ()
в диалоговое окно скрипт вводил твой пароль и нажимал Enter или подтверждал как-то.

http://cheat-master.ru/forum/129-499621-1
Вот код, который это делает smile Посмотри его


Мои CLEO скрипты:
http://cheat-master.ru/forum/129-501817-1 - FAST ADVANCE
http://cheat-master.ru/forum/129-501195-1 - AUTO BH
http://cheat-master.ru/forum/146-495210-1 - [ARP] FAKE GNEWS
http://cheat-master.ru/forum/129-495372-1 - FAST EXIT
http://cheat-master.ru/forum/129-495141-1 - [ARP] DGUN
http://cheat-master.ru/forum/129-495585-1 - BOOST CAR/Тормоз
http://cheat-master.ru/forum/129-499621-1 - FAST LOGIN
http://cheat-master.ru/forum/129-499617-1 - SBIV
http://cheat-master.ru/forum/129-499029-1 - TP PLAYERS
http://cheat-master.ru/forum/129-500349-1 - [ARP] Fake Pass
:notCoder: Дата: Понедельник, 07.09.2015, 20:16 | Сообщение # 903
Новичок
Сообщений: 1
Статус: Offline
Мне нужно чтобы при нажатии клавиши 1 происходила эмуляция клавиши alt и открывалось меню ,а затем выбирался 12 пункт, но при нажатии на клавишу 1 открывается только меню, пункт не выбирается, что не так? Можете исправить?
Код
{$CLEO}
0000:

repeat
wait 0
until SAMP.Available()

repeat
wait 0

if
0AB0: key_pressed 49  
then
    0B21:     samp is_chat_opened
    0B4C:  samp is_dialog_active -1
     jf @g
     :g
    repeat
    wait 0
    until 0AB0: key_pressed 49  
   wait 100
   0C72: set_virtual_key 18 down true
   wait 50
   0C72: set_virtual_key 18 down false
      if
       0B4C:  samp is_dialog_active -1  
       then
       0B49: samp set_current_dialog_list_item 12
         wait 50   
0B47: samp close_current_dialog_with_button 1
end
end
until false
[CM]TAR1K Дата: Вторник, 08.09.2015, 14:20 | Сообщение # 904
Любитель
Сообщений: 39
Статус: Offline
:notCoder:,
Код
{$CLEO}
0000:
repeat
wait 0
until SAMP.Available()

while true
wait 0
     if and
         0AB0:   key_pressed 49
         8B21: not samp is_chat_opened
         8B4C: not samp is_dialog_active -1  
     then
             repeat
             wait 0
             until 8AB0:   key_pressed 49
         0C72: set_virtual_key 18 down true
         wait 50
         0C72: set_virtual_key 18 down false
             repeat
             wait 0
             until 0B4C: samp is_dialog_active -1   
         0B49: samp set_current_dialog_list_item 1  
         0B47: samp close_current_dialog_with_button 1

     end  
end
ChangeLife Дата: Понедельник, 21.09.2015, 00:12 | Сообщение # 905
Новичок
Сообщений: 8
Статус: Offline
Ребята, подскажите пожалуйста - как сделать дабы этот гм.кар не работал на взрывы. т.е. что бы от взрывов хп отнималось у машины .
Код
// This file was decompiled using SASCM.ini published by GTAG (http://gtag.gtagaming.com/opcode-database) on 14.6.2013
{$CLEO .cs}

//-------------MAIN---------------
0000: NOP

:INCAR
wait 0

if and
Player.Defined($PLAYER_CHAR)
Actor.Driving($PLAYER_ACTOR)  
0AB0:   key_pressed 16
jf @INCAR
2@ = Actor.CurrentCar($PLAYER_ACTOR)
Car.SetImmunities(2@, 1, 1, 1, 1, 1)
053F: set_car 2@ tires_vulnerability 0
Car.ImmuneToNonPlayer(2@) = True
03F5: set_car 2@ apply_damage_rules 0
0ACD: show_text_highpriority "~R~GM" time 999999999
jump @NOTINCAR

:NOTINCAR
wait 0
if and
8AB0:   not key_pressed 16
Actor.Driving($PLAYER_ACTOR)  
jf  @NOTINCAR
Car.SetImmunities(2@, 0, 0, 0, 0, 0)
Car.ImmuneToNonPlayer(2@) = False
03F5: set_car 2@ apply_damage_rules 1
00BE: text_clear_all
jump @INCAR  

  
reebok11222283 Дата: Понедельник, 21.09.2015, 13:08 | Сообщение # 906
Новичок
Сообщений: 1
Статус: Offline
Как перевести cleo скрипт с версии 0.3z на версию 0.3.7??? ( Или переведите мне сами, буду очень благодарен )

Добавлено (21.09.2015, 13:08)
---------------------------------------------
http://rghost.ru/7TmLBRdYQ - вот скрипт который нужно перевести с 0.3z на 0.3.7


Skholnik
[CM]MickeyD Дата: Воскресенье, 11.10.2015, 18:31 | Сообщение # 907
Новичок
Сообщений: 7
Статус: Offline
Код
{$CLEO}
0000:

:1
wait 0
if
0ab0: key_pressed 49
jf @1
wait 1000
0AF9: samp say_msg "/healme"
jump @1

крашит гта сб 3 если что
+ ещё написал дган тоже крашит
Код
{$CLEO   .cs}
0000: NOP

repeat
wait 0
until SAMP .Available( )
0B34: samp register_client_command "mickeygun" to_label @DGUNbyMickey

repeat
wait 0
    if 0@ == true
    then
    SAMP.IsCommandTyped (1@)
         if 0AD4: 4@ = scan_string 1@ format "%d  %d" 5@ 6@  
         then
           if and
           5@ > 0
           5@ < 46
           then
           Model.Available(5@)
           038B: load_requested_models
           wait 500
           01B2: give_actor $Player_Actor weapon 5@ ammo 6@
           0@ = false
           else
           chatmsg "Íîìåð îðóæèÿ äîëæåí áûòü îò 1 äî 46" 0x0000CD
           0@ = false
           end
        else
        chatmsg "Äëÿ ðàáîòû ñêðèïòà ââåäèòå /mickeygun [id îðóæèÿ] [êîë-âî ïàòðîí]"    
        0@ = false
        end    
   end
until false

:DGUNbyMickey
0@ = true
SAMP.CmdRet ()  


Сообщение отредактировал [CM]MickeyD - Понедельник, 12.10.2015, 14:25
[CM]Vovich Дата: Пятница, 23.10.2015, 14:45 | Сообщение # 908
Знаток
Сообщений: 556
Статус: Offline
Цитата [CM]MickeyD ()
+ ещё написал дган тоже крашит
Код
{$CLEO .cs}
0000: NOP

repeat
wait 0
until SAMP .Available( )
0B34: samp register_client_command "mickeygun" to_label @DGUNbyMickey

repeat
wait 0
if 0@ == true
then
SAMP.IsCommandTyped (1@)
if 0AD4: 4@ = scan_string 1@ format "%d %d" 5@ 6@
then
if and
5@ > 0
5@ < 46
then
Model.Available(5@)
038B: load_requested_models
wait 500
01B2: give_actor $Player_Actor weapon 5@ ammo 6@
0@ = false
else
chatmsg "Íîìåð îðóæèÿ äîëæåí áûòü îò 1 äî 46" 0x0000CD
0@ = false
end
else
chatmsg "Äëÿ ðàáîòû ñêðèïòà ââåäèòå /mickeygun [id îðóæèÿ] [êîë-âî ïàòðîí]"
0@ = false
end
end
until false

:DGUNbyMickey
0@ = true
SAMP.CmdRet ()


Модель оружия, это не ID.
У тебя в переменной 5@ хранится ид оружия который ты написал в параметрах команды.
А загружать нужно модель.
Лично я проверял по ID, к примеру:
Код

if 5@ == 24 // дигл
then
7@ = 367 // 367 - номер модели, у каждого оружия он разный естественно. Узанть можешь в гугле, и в sb.

И так с каждым id оружия.
Или просто загружай все модели оружия, а потом выгружай их.
*P.s. Это урок слонобойки?


Пишу CLEO на заказ, мой Вконтакте - http://vk.com/garyachy
Venezka Дата: Понедельник, 09.11.2015, 01:57 | Сообщение # 909
Боец
Сообщений: 54
Статус: Offline
Код
{$CLEO .cs}

thread "Rejoin"
0662: NOP "Edit by [Monstercat]"

const
self = $PLAYER_ACTOR
VK_LSHIFT = 0xA0
VK_KEY_0 = 0x30
SAMP_BASE = 29@

DISCONNECT_QUIT = 0
DISCONNECT_TIMEOUT = 1

GAMESTATE_NONE = 0
GAMESTATE_WAIT_CONNECT = 1
GAMESTATE_AWAIT_JOIN = 2
GAMESTATE_CONNECTING = 3
GAMESTATE_CONNECTED = 4
GAMESTATE_RESTARTING = 5
GAMESTATE_DISCONNECTED = 6

TIME_RECONNECT = 15
end

if
  8AF7: get_samp_base_to SAMP_BASE
then
    0A93: end_custom_thread
end
repeat
    wait 400
until 0AFA: is_samp_structures_available

// ================================== MAIN ================================== //

while true
    wait 0
    if and
    player.Defined(0)
    8B21:  not samp is_chat_not_opened
    0AB0: VK_LSHIFT
    then
        if 0AB0: VK_KEY_0
        then
            0B28: samp disconnect_with_reason DISCONNECT_QUIT
            wait TIME_RECONNECT
            0B27: samp set_gamestate GAMESTATE_WAIT_CONNECT
            repeat
            wait 20
            until 8AB0: VK_KEY_0
        end
        end
    end

// ============================== END OF MAIN ============================== //

Помогите изменить клавишу активации на CTRL+0
Или подскажите как сделать, буду благодарен.


veneza
Danila_n73 Дата: Вторник, 10.11.2015, 20:09 | Сообщение # 910
Новичок
Сообщений: 16
Статус: Offline
Искал клео-суицид с активацией по команде. По всюду только на кшавишах. Уже дошел до ручки на начал сам "писать". Взял и банально переписал, но при вводе команды(активации чита) игра виснет. Помогите найти или скажите как написать чит "суицид по команде"?
Вот взял пример, активация по кнопке.


Вот что получилось, не работает.



Уже сам нашел решение. Может кому другому поможет. Вот изменил активацию с кнопки на команду из чата.


Сообщение отредактировал Danila_n73 - Вторник, 10.11.2015, 23:00
DirectXD Дата: Понедельник, 16.11.2015, 23:35 | Сообщение # 911
Новичок
Сообщений: 10
Статус: Offline
подскажите, как вместо актив.команды, поставить актив.клавишу?

Сообщение отредактировал DirectXD - Понедельник, 16.11.2015, 23:47
comandor Дата: Среда, 18.11.2015, 16:30 | Сообщение # 912
Новичок
Сообщений: 14
Статус: Offline
Код
    {$CLEO .cs}    
   
   0000: NOP   

Create_thread @Bulka_1

:Bulka_1
wait 0
model.load(#BULLET)
038B: load_requested_models

:Bulka_2
wait 0
if
model.Available(#BULLET)
jf @Bulka_2

:Bullet
wait 0
014B: $Car1 = init_parked_car_generator #BULLET 8 8 0 alarm 0 door_lock 0 1 40000 at 2488.74 -1670.0 13.34 angle 120.0
014C: set_parked_car_generator $Car1 cars_to_generate_to 101
end_thread

Только учусь писать коды, поэтому не могу найти ошибку. Проверял раз 10, и все равно игра вылетает сразу после загрузки. В чем ошибка?
Skylar Дата: Четверг, 19.11.2015, 14:14 | Сообщение # 913
Любитель
Сообщений: 42
Статус: Offline
Цитата comandor ()
    {$CLEO .cs}    
   
   0000: NOP   

Create_thread @Bulka_1

:Bulka_1
wait 0
model.load(#BULLET)
038B: load_requested_models

:Bulka_2
wait 0
if
model.Available(#BULLET)
jf @Bulka_2

:Bullet
wait 0
014B: $Car1 = init_parked_car_generator #BULLET 8 8 0 alarm 0 door_lock 0 1 40000 at 2488.74 -1670.0 13.34 angle 120.0
014C: set_parked_car_generator $Car1 cars_to_generate_to 101
end_thread

Только учусь писать коды, поэтому не могу найти ошибку. Проверял раз 10, и все равно игра вылетает сразу после загрузки. В чем ошибка?


После нулевого опкода впиши в код это:

repeat
wait 0
Samp.Available()

Добавлено (19.11.2015, 14:00)
---------------------------------------------

Цитата DirectXD ()
подскажите, как вместо актив.команды, поставить актив.клавишу?


Нужно практически половину кода переписать, если хочешь могу помочь.
Кидай в личку скрипт.

Добавлено (19.11.2015, 14:14)
---------------------------------------------

Цитата Skylar ()
    {$CLEO .cs}    
   
   0000: NOP   

Create_thread @Bulka_1

:Bulka_1
wait 0
model.load(#BULLET)
038B: load_requested_models

:Bulka_2
wait 0
if
model.Available(#BULLET)
jf @Bulka_2

:Bullet
wait 0
014B: $Car1 = init_parked_car_generator #BULLET 8 8 0 alarm 0 door_lock 0 1 40000 at 2488.74 -1670.0 13.34 angle 120.0
014C: set_parked_car_generator $Car1 cars_to_generate_to 101
end_thread

Только учусь писать коды, поэтому не могу найти ошибку. Проверял раз 10, и все равно игра вылетает сразу после загрузки. В чем ошибка?


А хотя погоди, у тебя скрипт криво написан.
Сейчас перепишу и кину тебе)


Мои работы:
http://cheat-master.ru/forum/146-484446-1 - TP Waxter for ARP
http://cheat-master.ru/forum/146-484599-1 - TP BuyMet for ARP
comandor Дата: Воскресенье, 22.11.2015, 15:04 | Сообщение # 914
Новичок
Сообщений: 14
Статус: Offline
Код
{$CLEO .cs}

0000: NOP

:Start
wait 0
if and
0AAB:  file_exists "CLEO\tp1.ini"
Player.Defined($PLAYER_CAHR)
jf @Start
0AF0: 0@ = get_int_from_ini_file "CLEO\tp1.ini" section "Coord" key "X"
0AF0: 1@ = get_int_from_ini_file "CLEO\tp1.ini" section "Coord" key "Y"
0AF0: 3@ = get_int_from_ini_file "CLEO\tp1.ini" section "Coord" key "Z"
jump @Load

:Load
wait 0
if  
0AB0:   key_pressed 105
jf @Start
Actor.PutAt($PLAYER_CAHR, 0@, 1@, 3@)
jump @Start  

Нашел чей-то скрипт который тпшит игрока на кольцо грув. Все работало нормально. Захотел переделать чтобы тпшило по координатам которые хранятся в .ini файле. Сначала оно по нажатию num9 (105) начало вести себя странно ( экран сразу становился очень светлым, только очертания предметов сохранялись и только часы в углу работали), а потом когда я поменял что--то вообще перестало загружаться и вылетало. Содержание ини файла:
Код

[Coord]
X =2489.74
Y =-1671.0
Z =15.34

помогите пожалуйста. Я новичок, поэтому ошибку вообще не омгу найти. вроде wait везде поставил где надо, ноп 0000 прописал
cover Дата: Воскресенье, 22.11.2015, 21:30 | Сообщение # 915
Бывалый
Сообщений: 343
Статус: Offline
comandor, Ты считываешь целые числа (int) вот этим опкодом "0AF0", а надо дробные (float)
int (intenger) - Целые числа
float - Дробные числа
Поиск:
Статистика Форума