[CLEO] Помощь по редактированию скриптов - Страница 35 - Форум Cheat-Master.ru
Модератор форума: Alowir, Sanoxxx  
[CLEO] Помощь по редактированию скриптов
Toplivo Дата: Суббота, 05.09.2015, 21:36 | Сообщение # 511
Советник
Сообщений: 728
Статус: Offline
Цитата Kol9n ()
деактивация

Дезактивация на те же кнопки:
Код

while true   
     wait 0   
     if and   
         Player.Defined($PLAYER_CHAR)  
         0AB0: key_pressed 67  
         0AB0: key_pressed 80   
     then
         0B12: 0@ = 0@ XOR 1
         if 0@ == 1
         then
             08C6: set_actor $PLAYER_ACTOR stay_on_bike 1   
             0acd: "AntiBikeFall ON" 1000  
             while true  
                 wait 0  
                 if or  
                     8ab0: 67  
                     8ab0: 80  
                 then break  
                 end  
             end
         else
             08C6: set_actor $PLAYER_ACTOR stay_on_bike 0   
             0acd: "AntiBikeFall OFF" 1000
             while true  
                 wait 0  
                 if or  
                     8ab0: 67  
                     8ab0: 80  
                 then break  
                 end  
             end
         end
      end  
end



Дурак дает,умный берет.
Kol9n Дата: Суббота, 05.09.2015, 21:36 | Сообщение # 512
Новичок
Сообщений: 5
Статус: Offline
Toplivo, всё спасибо, вроде помогло happy

Сообщение отредактировал Kol9n - Воскресенье, 23.02.2014, 19:19
fleimos Дата: Суббота, 05.09.2015, 21:36 | Сообщение # 513
Новичок
Сообщений: 8
Статус: Offline
странно,сделал клео а запустить не могу

ВЕЛИКИЙ И УЖАСНЫЙ ЛОХ(
Edmo Дата: Суббота, 05.09.2015, 21:36 | Сообщение # 514
Новичок
Сообщений: 1
Статус: Offline
Парни я решил создать клео но оно не робит помогите мне плиз.


Лалалай

Сообщение отредактировал Edmo - Понедельник, 24.02.2014, 21:51
RAKSHA1337 Дата: Суббота, 05.09.2015, 21:37 | Сообщение # 515
Советник
Сообщений: 784
Статус: Offline
Edmo, ты сам то понял что написал?
Так ок давай разберёмся.
1.
Цитата Edmo ()

:HEALTH_48
wait 0
if and
0AB0: key_pressed 72
0AB0: key_pressed 96
jf @HEALTH_48
Actor.Health($PLAYER_ACTOR) = 5
jump @HEALTH_48

Нормально, не чё пойдёт идём дальше.

Цитата Edmo ()

jf @HEALTH_302
8AF7: not get_samp_base_to 29@
:2 wait 400
0AFA: is_samp_structures_available
jf @2

Вот тут у тебя какой-то набор слов пошёл, разберись с этим. (И ещё это должно быть в начале скрипта.)

Дальше
Цитата Edmo ()

:1
wait 0
if and
0AB0: key_pressed 72
0AB0: key_pressed 96
jf @1
wait 1000
0AF9: samp say_msg "/me Выпил(а) стакан содовой"
jump @1

вот это наверно лишнее.


В казино рандом. Но рандом в программах - это генератор псевдослучайных чисел, который написан ручками человека. А значит есть формула! Есть алгоритм! Есть тактика!
Кто не согласен - ставьте минус, после того как докажете обратное. https://habrahabr.ru/post/196442/


Сообщение отредактировал RAKSHA1337 - Вторник, 25.02.2014, 02:49
Crime_Streets_Teal Дата: Суббота, 05.09.2015, 21:37 | Сообщение # 516
Новичок
Сообщений: 5
Статус: Offline
Цитата RAKSHA1337 ()
Edmo, ты сам то понял что написал?
Так ок давай разберёмся.
1.
Цитата Edmo ()

:HEALTH_48
wait 0
if and
0AB0: key_pressed 72
0AB0: key_pressed 96
jf @HEALTH_48
Actor.Health($PLAYER_ACTOR) = 5
jump @HEALTH_48

Нормально, не чё пойдёт идём дальше.

Цитата Edmo ()

jf @HEALTH_302
8AF7: not get_samp_base_to 29@
:2 wait 400
0AFA: is_samp_structures_available
jf @2

Вот тут у тебя какой-то набор слов пошёл, разберись с этим. (И ещё это должно быть в начале скрипта.)

Дальше
Цитата Edmo ()

:1
wait 0
if and
0AB0: key_pressed 72
0AB0: key_pressed 96
jf @1
wait 1000
0AF9: samp say_msg "/me Выпил(а) стакан содовой"
jump @1

вот это наверно лишнее.


Срорее всего он хотел что бы когда ему прибавлялось 5 хп в чат Писало: /me Выпил(а) стакан содовой

Помогите ему я лично не знаю как сделать так
[CM]Skand1k Дата: Суббота, 05.09.2015, 21:37 | Сообщение # 517
Боец
Сообщений: 81
Статус: Offline
Crime_Streets_Teal, на крайме такое работать не будет, можете забыть об этой идеи
Sano Дата: Суббота, 05.09.2015, 21:37 | Сообщение # 518
Любитель
Сообщений: 48
Статус: Offline
Цитата Edmo ()
662: printstring "FOR CHEAT-MASTER.RU BY Crime_Streets_Teal" thread "HEALTH" :HEALTH_48 wait 0 if and 0AB0: key_pressed 72 0AB0: key_pressed 96 jf @HEALTH_48 Actor.Health($PLAYER_ACTOR) = 5 jump @HEALTH_48 jf @HEALTH_302 8AF7: not get_samp_base_to 29@ :2 wait 400 0AFA: is_samp_structures_available jf @2 :1 wait 0 if 0AB0: key_pressed 72 0AB0: key_pressed 96 jf @1 wait 1000 0AF9: samp say_msg "/me Выпил(а) стакан содовой" jump @1

Чисто подарочек biggrin
Код
{$CLEO}

if
not 29@ = samp.Base()
then
end_thread
else
      while not samp.Available()
      wait 0
      end
end

while true
      wait 0
      if and   
      0AB0: key_pressed 72   
      0AB0: key_pressed 96
      then      
          1@ = Actor.Health($PLAYER_ACTOR)    
          1@ += 5   
          0B2E: 2@ = read_module_memory "samp.dll" offset 0x5530 size 2   
          0B2D: write_module_memory "samp.dll" offset 0x141D0 value 0xC390 size 2    
          Actor.Health($PLAYER_ACTOR) = 1@
          wait 1000   
          0AF9: samp say_msg "/me Выпил(а) стакан содовой"
          0B2D: write_module_memory "samp.dll" offset 0x141D0 value 2@ size 2   
      end
end


/*============RAMPAGE=============*/

Сообщение отредактировал Sano - Четверг, 27.02.2014, 18:22
Karlik_B Дата: Суббота, 05.09.2015, 21:37 | Сообщение # 519
Боец
Сообщений: 158
Статус: Offline
Нужна ваша помощь. Хочу создать фейковый чат, к примеру бан. Мне нужно, чтобы при вводе /fban высвечивался диалог, в него бы вписывал ник админа, затем след. диалог, там бы нужно было вписать ник забаненного, а в 3 диалоге причину, а после появлялся бы фейковый чат со всем тем, что ввел изначально. Буду рад помощи, с меня "+"


___________________________________________
Fake Chat на заказ.
Sano Дата: Суббота, 05.09.2015, 21:37 | Сообщение # 520
Любитель
Сообщений: 48
Статус: Offline
Цитата Karlik_B ()
Нужна ваша помощь. Хочу создать фейковый чат, к примеру бан. Мне нужно, чтобы при вводе /fban высвечивался диалог, в него бы вписывал ник админа, затем след. диалог, там бы нужно было вписать ник забаненного, а в 3 диалоге причину, а после появлялся бы фейковый чат со всем тем, что ввел изначально. Буду рад помощи, с меня "+"


http://cheat-master.ru/forum/116-70566-1

Здесь тебе помогут, но за тебя делать не будут

Хотя за платно сделаю :P


/*============RAMPAGE=============*/
RAKSHA1337 Дата: Суббота, 05.09.2015, 21:38 | Сообщение # 521
Советник
Сообщений: 784
Статус: Offline
Цитата Sano ()
за платно сделаю

За сколько?


В казино рандом. Но рандом в программах - это генератор псевдослучайных чисел, который написан ручками человека. А значит есть формула! Есть алгоритм! Есть тактика!
Кто не согласен - ставьте минус, после того как докажете обратное. https://habrahabr.ru/post/196442/
Sano Дата: Суббота, 05.09.2015, 21:38 | Сообщение # 522
Любитель
Сообщений: 48
Статус: Offline
Цитата RAKSHA1337 ()
За сколько?

Я имел ввиду показать что за тебя никто ничего делать не будет. А стоить хз, рубасей за 20, делаю прежде всего для себя.


/*============RAMPAGE=============*/
Karlik_B Дата: Суббота, 05.09.2015, 21:38 | Сообщение # 523
Боец
Сообщений: 158
Статус: Offline
Неизвестная команда file.Open | file.Close, прошу помощи


___________________________________________
Fake Chat на заказ.
JJJJJ Дата: Суббота, 05.09.2015, 21:38 | Сообщение # 524
Бывалый
Сообщений: 392
Статус: Offline
Цитата Karlik_B ()
Неизвестная команда file.Open | file.Close, прошу помощи

0A9A: 0@ = openfile "settings.ini" mode "rt" // IF and SET
0A9B: closefile 0@




SAMP 0.3z: http://yadi.sk/d/8ljsLu7m3Iitb
CLEO 4.1: http://clck.ru/978nn
CLEO 4.3: http://cleo.li/cleo4/CLEO4_setup.exe
GTA:SA 1.0 us: http://yadi.sk/d/pJNaahj92MlQD
[CLEO] Админ-чекер на худе: http://cheat-master.ru/forum/129-220729-1
bis Дата: Суббота, 05.09.2015, 21:38 | Сообщение # 525
Любитель
Сообщений: 30
Статус: Offline
Нужна помощь, не могу разобраться как изменить в этом коде активацию на автоматическую, при спавне(т.е. получаешь этот дигл сразу после спавна, а не при нажатии клавиш)
0000: NOP
wait 10
Model.Available(#DESERT_EAGLE)
038B: load_requested_models

:NONAME_13
wait 10
if and
$ONMISSION == 0
Model.Load(#DESERT_EAGLE)
jf @NONAME_13

:NONAME_40
wait 10
if and
$ONMISSION == 0
not Actor.Driving($PLAYER_ACTOR)
0AB0: key_pressed 74
0AB0: key_pressed 17
jf @NONAME_40
018C: play_sound 1058 at 0.0 0.0 0.0
01B2: give_actor $PLAYER_ACTOR weapon 24 ammo 1000
wait 100
Model.Available(#DESERT_EAGLE)
wait 2900
jump @NONAME_40

Добавлено (12.03.2014, 04:57)
---------------------------------------------
Разобрался сам, в помощи не нуждаюсь.

Поиск:
Статистика Форума
Лучшие пользователи
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]

Новые пользователи
060sbr [19:11]

Getrawn [15:53]

malancea98a [03:26]

hgfhfhfhgf [21:19]

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]