[ Новые сообщения · Участники · Правила форума · Поиск · RSS ]
  • Страница 1 из 1
  • 1
Форум » Тесты созданных модов » Миссии » SKV Misssions (Миссии бай СКВ!)
SKV Misssions
SKV1991Дата: Среда, 08.08.2007, 20:42 | Сообщение # 1
Ранг: Лейтенант
Группа: Администраторы
Сообщений: 65
Награды: 1
Репутация: 2
Статус: Offline
Вот очень простая миссиия,тут надо убить вертолёт который мочит ракетами!

:SM_DEH
wait 0
if
player.defined($PLAYER_CHAR)
Jf @SM_DEH
//wait 3000
//Actor.PutAt($PLAYER_ACTOR,2771.1331, -1620.7606, 10.9219)
//Marker.CreateIconAndSphere(1@ , 51 , 2770.6458, -1625.7834, 10.9272) // íîìåðà èêîíîê â ãë "Ìàðêåðû..."

:SM_DEH_2
wait 0
//if and
//0101: actor $PLAYER_ACTOR stopped_near_point 2770.6458 -1625.7834 10.9272 radius 3.0 3.0 3.0 sphere 1
//not wasted_or_busted
//$ONMISSION == 0
//Jf @SM_DEH_2
00BA: text_styled 'INTRO' 1000 ms 2 // íó íàäî æå òåêñò âûâåñòè.
marker.Disable(1@)
start_mission 3
end_thread

Code
//-------------MISSION 2ND---------------
// Originally: Destroy_hunter

:H_DESTR
gosub @KM_1  
if  
wasted_or_busted
jf @PRK_1
gosub @KP_1  

:PRK_1
gosub @UDK_1
end_thread

:KM_1  
increment_mission_attempts
$ONMISSION = 1
0110: clear_player $PLAYER_CHAR wanted_level

:H_DESTR_1
wait 0
model.Load(#HUNTER)
model.Load(#ARMY)
model.Load(#HEATSEEK)
038B: load_requested_models  

:H_DESTR_2
wait 0
if and
Model.Available(#HUNTER)
Model.Available(#ARMY)
Model.Available(#HEATSEEK)
jf @H_DESTR_2
Player.CanMove($PLAYER_CHAR) = False  
fade 0 500
wait 500
03DE: set_pedestrians_density_multiplier_to 0.0
01EB: set_car_density_to 0.0  
1@ = Car.Create(#HUNTER,-2337.479, 2565.1733, 24.0069)
Car.Angle(1@) = 210.0
0825: set_helicopter 1@ instant_rotor_start  
0129: 2@ = create_actor 24 #ARMY in_car 1@ driverseat
01B2: give_actor $PLAYER_ACTOR weapon 36 ammo 10 // Load the weapon model before using this
0992: set_player $PLAYER_CHAR weapons_scrollable 0  
Player.CanMove($PLAYER_CHAR) = True
3@ = Marker.CreateAboveCar(1@)
Car.SetMaxSpeed(1@, 20.0)
04BA: set_car 1@ speed_instantly 10.0
07E0: set_marker 3@ type_to 1
Actor.SetImmunities($PLAYER_ACTOR,1,1,1,1,1)
Car.Health(1@) = 2000
084E: flying_vehicle 1@ use_primary_gun 1  
0724: flying_vehicle 1@ follow_and_attack_player $PLAYER_ACTOR radius 50.0
Actor.PutAt($PLAYER_ACTOR, -2091.0532, 2313.9749, 25.9141)
Actor.Angle($PLAYER_ACTOR) = 351.8675
wait 2000
fade 1 500
wait 200
015D: set_gamespeed 1.0
wait 100
015D: set_gamespeed 0.1
067B: put_camera_on_car 1@ with_offset -1.5 1.5 1.5 point_to_actor $PLAYER_ACTOR tilt 6.0 2  
0460: set_camera_pointing_time 0.0 60
wait 2000
Camera.Restore_WithJumpCut
015D: set_gamespeed 1.0

:H_DESTR_3
wait 0
if
   Car.Wrecked(1@)
jf @H_DESTR_3
Marker.Disable(3@)
00BE: text_clear_all  
097A: 0.0 0.0 0.0 1058
0992: set_player $PLAYER_CHAR weapons_scrollable 1
jump @UDAC_1

:UDAC_1
wait 0  
0110: clear_player $PLAYER_CHAR wanted_level
0394: play_music 1   
01EB: set_car_density_to 1.0
03DE: set_pedestrians_density_multiplier_to 1.0  
030C: set_mission_points += 1
wait 100
01E3: text_1number_styled 'M_PASS' 100 5000 ms 4   
Player.Money($PLAYER_CHAR) += 100  
gosub @PRK_1
return

:KP_1
00BA: text_styled 'M_FAIL' 5000 ms 1
$ONMISSION = 0    
mission_cleanup
create_thread @DEH
return

:UDK_1  
$ONMISSION = 0
mission_cleanup
return


Кухня от Мэрдока,профессиональная кухня,пальчики оближешь!


 
Форум » Тесты созданных модов » Миссии » SKV Misssions (Миссии бай СКВ!)
  • Страница 1 из 1
  • 1
Поиск: