[CLEO] Помощь по редактированию скриптов - Страница 61 - Форум Cheat-Master.ru
Модератор форума: Alowir, Sanoxxx  
[CLEO] Помощь по редактированию скриптов
Liptonus777 Дата: Суббота, 05.09.2015, 22:42 | Сообщение # 901
Боец
Сообщений: 106
Статус: Offline
POW,
на
Код

{$CLEO .cs}  
0000: nop  
:1  
wait 400  
0AFA:  is_samp_available  
jf @1  
0AF8: samp add_message_to_chat "privet" color 0xFF61BB 4 6 10  
wait 0  

:2  
wait 0  
0AB0:  key_pressed 20  
jf @2

:check
wait 0
8AB0:   not key_pressed 20
jf @check
0AF8: samp add_message_to_chat "GM ACTIVATED" color 0xFF61BB  
:main
wait 0
8AB0:   not key_pressed 20
jf @end
samp.WriteSAMPMemory(34944, 12715008, 3)  
actor.SetImmunities($PLAYER_ACTOR, 1, 0, 0, 0, 0)  
jump @main

:end
0AF8: samp add_message_to_chat "GM DEACTIVATED" color 0xFF61BB  
SAMP.WriteSAMPMemory(34944, 7012200, 3)  
actor.SetImmunities($PLAYER_ACTOR, 0, 0, 0, 0, 0)  
jump @2


Мои 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
[nexus] Дата: Суббота, 05.09.2015, 22:42 | Сообщение # 902
Новичок
Сообщений: 6
Статус: Offline
Кароч, нужно вот из этого, сделать так: /rheal [кол-во] [радиус]

Код
{$CLEO}  
0000:  
repeat  
      wait 0  
until Samp.Available()  
0B34: samp register_client_command "rheal" to_label @cmd  
while true  
      if  
      30@ == 1  
      then  
          for 0@ = 0 to 1000   
              if  
              0B20: samp 1@ = actor_handle_by_samp_player_id 0@  
              then  
                  04C4: store_coords_to 2@ 3@ 4@ from_actor 1@ with_offset 0.0 0.0 0.0  
                  04C4: store_coords_to 5@ 6@ 7@ from_actor $3 with_offset 0.0 0.0 0.0  
                  0509: 8@ = distance_between_XY 2@ 3@ and_XY 5@ 6@  
                  0092: 8@ = float 8@ to_integer  
                  if  
                  801d: not 8@ > 11@  
                  then  
                      0af9: "/sethp %d 160" 0@  
                  end  
              end  
          end  
          30@ = 0  
      end  
wait 0  
end  
:cmd  
0B35: samp 10@ = get_last_command_params  
if  
0ad4: 10@ 10@ "%d" 11@  
      then  
      30@ = 1  
      else  
      0af8: "Введите: /rheal [radius]" 0xAAAAAA  
end  
Samp.CmdRet()
Tosoti Дата: Воскресенье, 06.09.2015, 00:41 | Сообщение # 903
Боец
Сообщений: 150
Статус: Offline
1й вопрос:
Как узнать координаты таких вот маркеров (скрипт записал их в переменные):

2й вопрос:
Код
0B79: samp set_chat_input_enabled 1
                0B76: samp set_chat_input_text "/q"

Этими опкодами скрипт открывает чат и вписывает туда /q, вопрос: как подтвердить команду?
Bad_Fenix Дата: Воскресенье, 06.09.2015, 00:55 | Сообщение # 904
Бывалый
Сообщений: 357
Статус: Offline
Tosoti,
1.Разве это не обычный маркер?
2.
Код
Say "/q"
скрипт напишет и сразу отправит в чат сообщение.


Я конченый:D (Но это не точно!)
Tosoti Дата: Воскресенье, 06.09.2015, 12:25 | Сообщение # 905
Боец
Сообщений: 150
Статус: Offline
Bad_Fenix, так каким опкодом узнать координаты маркера? Мне это очень нужно.
И ещё вопрос: Кто подскажет как эмулировать нажатие клавиш или как сделать так, чтобы, к примеру, в диалоговое окно скрипт вводил твой пароль и нажимал Enter или подтверждал как-то.
Liptonus777 Дата: Воскресенье, 06.09.2015, 21:33 | Сообщение # 906
Боец
Сообщений: 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 | Сообщение # 907
Новичок
Сообщений: 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 | Сообщение # 908
Любитель
Сообщений: 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 | Сообщение # 909
Новичок
Сообщений: 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 | Сообщение # 910
Новичок
Сообщений: 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 | Сообщение # 911
Новичок
Сообщений: 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 | Сообщение # 912
Знаток
Сообщений: 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 | Сообщение # 913
Боец
Сообщений: 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 | Сообщение # 914
Новичок
Сообщений: 16
Статус: Offline
Искал клео-суицид с активацией по команде. По всюду только на кшавишах. Уже дошел до ручки на начал сам "писать". Взял и банально переписал, но при вводе команды(активации чита) игра виснет. Помогите найти или скажите как написать чит "суицид по команде"?
Вот взял пример, активация по кнопке.


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



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


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

Сообщение отредактировал DirectXD - Понедельник, 16.11.2015, 23:47
Поиск:
Статистика Форума
Лучшие пользователи
Admin [39113]

GеNius [7210]

[CM]Russel [5557]

kenlo763 [4952]

[CM]AGRESSOR [4639]

Snake_Firm [4452]

Сэс [4416]

Artem_Buero [4223]

[CM]Durman [3204]

[CM]Рафаэль [3080]

iMaddy [2855]

sky_Woker [2854]

getrekt [2745]

Новые пользователи
surreal55 [19:41]

wyatzz1313 [18:45]

Stankeev [16:00]

Lum1x [15:50]

NightMusicant [12:32]

douoling652 [10:40]

billienq1 [01:47]

staciah1 [01:15]

maksmovictimofej [00:18]

jamiedv6 [21:25]

billieds7 [20:51]

aprilez9 [15:57]

am9350450 [14:36]