Возможно вы искали: 'Sven Zwø'

November 29 2024 05:34:18

Статистика

Статей: 87772
Просмотров: 93114195

Игры

Injustice: Gods Among Us ...
Dark Souls 2 Dark Souls II - вторая часть самой хардкорной ролевой игры 2011-2012 года, с новым героем, сюжето...
Battlefield 4 Battlefield 4 - продолжение венценосного мультиплеер-ориентированного шутера от первого ли...

Кино

Steins;Gate Любители японской анимации уже давно поняли ,что аниме сериалы могут дать порой гораздо больше пи...
Ку! Кин-дза-дза Начинающий диджей Толик и всемирно известный виолончелист Владимир Чижов встречают на шумной моск...

Обзоры на игры

• Обзор Ibara [PCB/PS2]	17932
• Обзор The Walking ...	18322
• Обзор DMC: Devil M...	19461
• Обзор на игру Valk...	15463
• Обзор на игру Stars!	17311
• Обзор на Far Cry 3	17506
• Обзор на Resident ...	15547
• Обзор на Chivalry:...	17039
• Обзор на игру Kerb...	17535
• Обзор игры 007: Fr...	16149

Превью о играх

• Превью к игре Comp...	17568
• Превью о игре Mage...	14081
• Превью Incredible ...	14323
• Превью Firefall	13083
• Превью Dead Space 3	15923
• Превью о игре SimC...	14329
• Превью к игре Fuse	15033
• Превью Red Orche...	15158
• Превью Gothic 3	15884
• Превью Black & W...	17006

Главная » Статьи » Разное » Танки скриптово не стреляют? ;-)

Танки скриптово не стреляют? ;-)

Танки скриптово не стреляют? ;-) Танки скриптово не стреляют ? Нет,танки скриптово не стреляли до этого времени !
Вот решил я написать небольшую функцию под СБ для выстрела танка,ловите:
Установка:
1)Ищем строчку с текстом "//-------------Mission 0--" над ней вставляем это :

:SHOOTING_PANZER
wait 0
if
not model.Available(#RCBOMB)
jf @SHOOTING_PANZER_2
model.Load(#RCBOMB)
038B: load_requested_models
jump @SHOOTING_PANZER_3

:SHOOTING_PANZER_2
wait 0
$MODELCHECK = 1

:SHOOTING_PANZER_3
wait 0
if
model.Available(#RCBOMB)
jf @SHOOTING_PANZER_3
0407: create_coordinate $X_PATRON $Y_PATRON $Z_PATRON from_car $SHOOTING_PANZER offset 0.0 7.0 1.3
object.Create($TANK_PATRON,#RCBOMB,$X_PATRON,$Y_PATRON,$Z_PATRON)
$TANK_ANGLE = car.Angle($SHOOTING_PANZER)

:SHOOTING_PANZER_4
0453: object $TANK_PATRON set_rotation $SHOOT_ANGLE 0.0 $TANK_ANGLE
object.ToggleInMovingList($TANK_PATRON)=false
0682: detach_object $TANK_PATRON 0.0 0.0 0.0 collision_detection 0
Object.CollisionDetection($TANK_PATRON) = True
038C: object $TANK_PATRON scatter 0.0 0.0 0.0
04D9: object $TANK_PATRON set_scripted_collision_check 1
$SHOOTING_TIME = 8000
066B: $SHOOT_PARTICLE = attach_particle "gunflash" to_car $SHOOTING_PANZER offset 0.0 7.0 1.3 1
064C: make_particle $SHOOT_PARTICLE visible
$Z_PATRON += 20.0
020C: create_explosion_with_radius 1 at $X_PATRON $Y_PATRON $Z_PATRON
car.StorePos($SHOOTING_PANZER,$X_PATRON,$Y_PATRON,$Z_PATRON)
0407: create_coordinate $X_PATRON $Y_PATRON $Z_PATRON from_car $SHOOTING_PANZER offset 0.0 -1.0 0.0
car.PutAt($SHOOTING_PANZER,$X_PATRON,$Y_PATRON,$Z_PATRON)

:SHOOTING_PANZER_5
wait 10
0400: create_coordinate $X_PATRON $Y_PATRON $Z_PATRON from_object $TANK_PATRON offset 0.0 3.0 0.0
object.PutAt($TANK_PATRON,$X_PATRON,$Y_PATRON,$Z_PATRON)
$SHOOTING_TIME -= 200
if or
04DA: has_object $TANK_PATRON collided
04E7: object $TANK_PATRON in_water
$SHOOTING_TIME < 1
jf @SHOOTING_PANZER_5
Object.StorePos($TANK_PATRON, $X_PATRON,$Y_PATRON,$Z_PATRON )
020C: create_explosion_with_radius 7 at $X_PATRON $Y_PATRON $Z_PATRON
04D9: object $TANK_PATRON set_scripted_collision_check 0
object.Destroy($TANK_PATRON)
object.RemoveReferences($TANK_PATRON)
car.RemoveReferences($SHOOTING_PANZER)
$SHOOT_ANGLE = -1
if
not $MODELCHECK == 1
jf @SHOOTING_PANZER_6
model.Destroy(#RCBOMB)

:SHOOTING_PANZER_6
wait 0
return

2) Теперь для вызова этой функции из любого потока нам понадобяться всего лишь 3 опкода , вот они :

0085: $SHOOTING_PANZER = 1@ // 1@ - переменная вашего танка
$SHOOT_ANGLE = 4.0 // 4.0 - угол выстрела относительно земли (4.0-лучший)
gosub @SHOOTING_PANZER // 'Вызов' нашей функции

Опкоды , как Вы наверное уже поняли , надо писать вместе .

Снаряд танка после выстрела взрывается или при попаданиии во что-либо , или по истечению некоторого времени .

Вот пример потока вызова функции , на котором я тестил (не идеально,но пашет ):

:TEST
wait 3000
model.Load(#RHINO)
038B: load_requested_models
wait 2000
04C4: create_coordinate $X $Y $Z from_actor $PLAYER_ACTOR offset 0.0 5.0 1.0
wait 1000
car.Create(1@,#RHINO,$X ,$Y, $Z)
car.Angle(1@) = 180.0
wait 1000
$SHOOT_ANGLE = 4.0
0085: $SHOOTING_PANZER = 1@
gosub @SHOOTING_PANZER
end_thread

Жду комментов к статье ...
(С) Alexander aka Александр Корякин

Ссылки

HTML:
[BB Url]:

Похожие статьи
Название	Добавил	Добавлено
• Танки скриптово не стреляют? ;-)	Vova	13.05.2012

Ни одного комментария? Будешь первым :).

Пожалуйста, авторизуйтесь для добавления комментария.

Статьи

Рецензия на Pressure Чтобы обратить на себя внимание, начинающие маленькие разработчики, как правило, уходят в жанры, ...
Рецензия на Lost Chron... Игры, сделанные без любви и старания, похожи на воздушный шар – оболочка есть, а внутри пусто. Lo...
Рецензия на The Bridge «Верх» и «низ» в The Bridge — понятия относительные. Прогуливаясь под аркой, можно запросто перей...
Рецензия на SimCity Когда месяц назад состоялся релиз SimCity, по Сети прокатилось цунами народного гнева – глупые ош...
Рецензия на Strategy &... Название Strategy & Tactics: World War II вряд ли кому-то знакомо. Зато одного взгляда на ее скри...
Рецензия на игру Scrib... По сложившейся традиции в информационной карточке игры мы приводим в пример несколько похожих игр...
Рецензия на игру Walki... Зомби и продукция-по-лицензии — которые и сами по себе не лучшие представители игровой биосферы —...