[CLEO урок #2] Работа с машинами - Форум Cheat-Master.ru
  • Страница 1 из 1
  • 1
Модератор форума: Admin_Bot, Admin_Bot2, Admin_Bot3, Admin_Bot4  
[CLEO урок #2] Работа с машинами
iSanta_CM Дата: Среда, 03.10.2012, 22:32 | Сообщение # 1
Начинающий барыга
Сообщений: 653
Статус: Offline
В прошлом уроке мы учились спавнить машины... А в этом уроке мы научимся швыряться ими!

Открываем SannyB. дальше жмём на "Файл" > "Создать" и вставляем

Code

// This file was decompiled using sascm.ini published by Seemann (http://sannybuilder.com/files/SASCM.rar) on 13.10.2007

{$VERSION 3.1.0027}
{$CLEO .cs} // указывает на то что это .cs скрипт

//-------------MAIN---------------
0000: NOP  "Lesson #2 Work this cars" // автор (в этом случае урок)


Далее:

Code

:NONAME_2 // имени нет
wait 0 // ждём 0 сек
if // если
0AB0:   key_pressed 165 // нажата клавиша  
else_jump @NONAME_2  
if or // если или
0AB0:   key_pressed 75 // зажаты клавиши:
0AB0:   key_pressed 74  
0AB0:   key_pressed 73  
else_jump @NONAME_2 // дальше
20@ = 1.0 // вроде скорости (точно не знаю)
25@ = 1.0  
Actor.StorePos($PLAYER_ACTOR, 11@, 12@, 13@)


Как мы поняли,это всё активации и скорости (точно не знаю,не могу сказать),далее вставляем окончание скрипта...

Code


if  
0AB0:   key_pressed 75  
else_jump @NONAME_169  
0AB5: store_actor $PLAYER_ACTOR closest_vehicle_to 31@ closest_ped_to 30@  
31@ = -1  
if  
056D:   actor 30@ defined  
else_jump @NONAME_2  
Actor.StorePos(30@, 1@, 2@, 3@)
3@ += 5.0  
25@ = 2.0  
jump @NONAME_223  

:NONAME_169
if  
0AB0:   key_pressed 73  
else_jump @NONAME_194  
25@ = 3.0  

:NONAME_194
04C4: store_coords_to 1@ 2@ 3@ from_actor $PLAYER_ACTOR with_offset 0.0 3.0 0.0  

:NONAME_223
if  
hex
  E2 0A 03 0B 00 03
end
13@ -= 100000.0   
else_jump @NONAME_1482  
if  
    Actor.Driving($PLAYER_ACTOR)
else_jump @NONAME_341  
20@ = 2.0  
03C0: 10@ = actor $PLAYER_ACTOR car  
3@ += 2.0  
if  
    not 25@ == 3.0  
else_jump @NONAME_341  
if  
803B:   not  0@ == 10@ // (int)  
else_jump @NONAME_438  

:NONAME_341
if  
    not 25@ == 3.0  
else_jump @NONAME_393  
Car.PutAt(0@, 1@, 2@, 3@)
3@ += 2.0  
jump @NONAME_982  

:NONAME_393
018C: play_sound 1058 at 0.0 0.0 0.0  

:NONAME_413
wait 0  
if and
8AB0:   not key_pressed 73  
80E1:   not player 0 pressed_key 17  
else_jump @NONAME_413  

:NONAME_438
wait 0  
if  
    not Actor.Dead($PLAYER_ACTOR)
else_jump @NONAME_1482  
if or
0AB0:   key_pressed 74  
0AB0:   key_pressed 75  
   25@ == 3.0  
else_jump @NONAME_1482  
if  
   25@ == 3.0  
else_jump @NONAME_634  
if  
0AB0:   key_pressed 73  
else_jump @NONAME_550  
018C: play_sound 1057 at 0.0 0.0 0.0  
jump @NONAME_1482  

:NONAME_550
if  
    Actor.Driving($PLAYER_ACTOR)
else_jump @NONAME_583  
20@ = 2.0  
jump @NONAME_593  

:NONAME_583
20@ = 1.0  

:NONAME_593
if  
00E1:   player 0 pressed_key 17  
else_jump @NONAME_438  
Actor.StorePos($PLAYER_ACTOR, 11@, 12@, 13@)
13@ -= 1.0  

:NONAME_634
if  
hex
  E2 0A 03 0B 00 03
end
13@ -= 100000.0  
hex
  00 00
end
else_jump @NONAME_1154  
if  
   25@ == 3.0  
else_jump @NONAME_713  
046C: 33@ = car 0@ driver  
if  
856D:   not actor 33@ defined  
else_jump @NONAME_438  

:NONAME_713
if  
   20@ == 2.0  
else_jump @NONAME_761  
03C0: 10@ = actor $PLAYER_ACTOR car  
if  
803B:   not  0@ == 10@ // (int)  
else_jump @NONAME_438  

:NONAME_761
if  
   25@ == 2.0  
else_jump @NONAME_822  
if  
056D:   actor 30@ defined  
else_jump @NONAME_1482  
Actor.StorePos(30@, 1@, 2@, 33@)
3@ += 2.0  

:NONAME_822
if  
   25@ == 3.0  
else_jump @NONAME_958  
099A: set_car 0@ collision_detection 0  
if  
   20@ == 2.0  
else_jump @NONAME_907  
04C4: store_coords_to 1@ 2@ 3@ from_actor $PLAYER_ACTOR with_offset 0.0 0.0 1.0  
jump @NONAME_921  

:NONAME_907
Actor.StorePos($PLAYER_ACTOR, 1@, 2@, 3@)

:NONAME_921
4@ = Actor.Angle($PLAYER_ACTOR)
Car.PutAt(0@, 1@, 2@, 3@)
Car.Angle(0@) = 4@
jump @NONAME_982  

:NONAME_958
Car.PutAt(0@, 1@, 2@, 3@)
3@ += 2.0  

:NONAME_982
wait 0  
if  
056E:   car 0@ defined  
else_jump @NONAME_438  
036A: put_actor $PLAYER_ACTOR in_car 0@  
if  
   25@ == 3.0  
else_jump @NONAME_1041  
Car.SetSpeedInstantly(0@, 100.0)

:NONAME_1041
wait 70  
099A: set_car 0@ collision_detection 1  
if  
   20@ == 2.0  
else_jump @NONAME_1088  
036A: put_actor $PLAYER_ACTOR in_car 10@  
jump @NONAME_1110  

:NONAME_1088
0362: remove_actor $PLAYER_ACTOR from_car_and_place_at 11@ 12@ 13@  
Actor.Angle($PLAYER_ACTOR) = 4@

:NONAME_1110
Camera.Restore_WithJumpCut
if  
   25@ == 3.0  
else_jump @NONAME_1147  
jump @NONAME_413  
jump @NONAME_1154  

:NONAME_1147
jump @NONAME_438  

:NONAME_1154
wait 0  
if  
    not 25@ == 1.0  
else_jump @NONAME_1482  
if  
hex
  E2 0A 03 0B 00 03
end
13@ -= 100000.0   
else_jump @NONAME_1482  
if  
   20@ == 2.0  
else_jump @NONAME_1261  
03C0: 10@ = actor $PLAYER_ACTOR car  
if  
803B:   not  0@ == 10@ // (int)  
else_jump @NONAME_438  

:NONAME_1261
if  
   25@ == 2.0  
else_jump @NONAME_1322  
if  
056D:   actor 30@ defined  
else_jump @NONAME_1482  
Actor.StorePos(30@, 1@, 2@, 33@)
3@ += 2.0  

:NONAME_1322
if  
   25@ == 3.0  
else_jump @NONAME_1451  
if  
   20@ == 2.0  
else_jump @NONAME_1400  
04C4: store_coords_to 1@ 2@ 3@ from_actor $PLAYER_ACTOR with_offset 0.0 0.0 1.0  
jump @NONAME_1414  

:NONAME_1400
Actor.StorePos($PLAYER_ACTOR, 1@, 2@, 3@)

:NONAME_1414
4@ = Actor.Angle($PLAYER_ACTOR)
Car.PutAt(0@, 1@, 2@, 3@)
Car.Angle(0@) = 4@
jump @NONAME_1475  

:NONAME_1451
Car.PutAt(0@, 1@, 2@, 3@)
3@ += 2.0  

:NONAME_1475
jump @NONAME_982  

:NONAME_1482
wait 0  
if and
8AB0:   not key_pressed 73  
8AB0:   not key_pressed 74  
else_jump @NONAME_1482  
30@ = -1  
0@ = -1  
jump @NONAME_2


Заходим в игру и далее жмём на клавиши активации... в след. уроке я напишу основы для новичков

за основу был взят скрипт SYSTEM"a
shoma19981 Дата: Среда, 10.10.2012, 21:52 | Сообщение # 2
Боец
Сообщений: 201
Статус: Offline
Не оч понял если чесно !
iSanta_CM Дата: Среда, 10.10.2012, 23:19 | Сообщение # 3
Начинающий барыга
Сообщений: 653
Статус: Offline
shoma19981, позже опкоды выпишу,скорее всего завтра.
shoma19981 Дата: Пятница, 26.10.2012, 14:58 | Сообщение # 4
Боец
Сообщений: 201
Статус: Offline
ну и где опкоды ? santa_333,
Minigan Дата: Пятница, 26.10.2012, 15:07 | Сообщение # 5
Бывалый
Сообщений: 413
Статус: Offline
Quote (santa_333)
А в этом уроке мы научимся швыряться ими!

Как в собейте пушка?


Вы здесь: 1005 дней
[CM]Рафаэль Дата: Пятница, 26.10.2012, 15:28 | Сообщение # 6
Cheat-Master
Сообщений: 3080
Статус: Offline
Quote (Minigan)
Как в собейте пушка?

нет. В собе пушка отправка пакетов.



Мой Shop
Официальный гарант

Контактные данные:
VK: vk.com/ali_benua
Skype: lvinyipen
Telegram: @AliBenua
ICQ: 552-090-283
cooles Дата: Воскресенье, 28.10.2012, 10:39 | Сообщение # 7
Новичок
Статус: Offline
Quote (|CM|Рафаэль)
нет. В собе пушка отправка пакетов.

Синхра авто
iSanta_CM Дата: Среда, 31.10.2012, 20:49 | Сообщение # 8
Начинающий барыга
Сообщений: 653
Статус: Offline
Работает так: актёр сажается в машину и едет,а как ты едешь,не видно. обычный кар-спам. без пакетов и т.п как у колеса
  • Страница 1 из 1
  • 1
Поиск:
Статистика Форума