Простой полет на основе парашюта.
Вверх - летать вперед, вверх+бег летать вперед и вверх, дествие - поврот направо, налево - поворот налево. Т.к. на основе парашюта то нужен импульс.
Импульс даю ввиде пинка машиной) скрипт сырой, но буду дополнять со временем. А пока пользуйтесь на здоровье =)

Скрипт на импульс:
:PONT1
0001: wait 0 ms
0247: request model 415
038B: load requested models

:PONT2
0001: wait 0 ms
00D6: if 0
0038: $POLET == 1 ;; integer values
004D: jump if false ££PONT2
00D6: if 0
80DF: actor $PLAYER_ACTOR driving
004D: jump if false ££PONT2
00D6: if 0
00E1: key pressed 0 17
004D: jump if false ££PONT2
04C4: create coordinate $730 $740 $750 from actor $PLAYER_ACTOR offset 0.0 -12.0 -1.0
00A5: $111 = create_car 415 at $730 $740 $750
0172: $7002 = actor $PLAYER_ACTOR z angle
0175: set car $111 z angle to $7002
0229: set car $111 color to 0 0
04BA: set car $111 speed instantly 180.0
0001: wait 100 ms
00A6: destroy car $111
0002: jump ££PONT2

Скрипт на полет:
:LAB3
0001: wait 0 ms
04ED: load_animation "PARACHUTE"

:LAB3_1
0001: wait 0 ms
0004: $POLET = 0 ;; integer values
00D6: if 0
80DF: actor $PLAYER_ACTOR driving
004D: jump if false ££LAB3_1
00D6: if 0
80E1: key pressed 0 14
004D: jump if false ££LAB3_1
0819: $PLAYER_ACTOR $u3
0008: $u3 = -1065353216 ;; integer values
00D6: if 0
0029: $u3 >= 300 ;; integer values
004D: jump if false ££LAB3_1
0004: $POLET = 1 ;; integer values
0812: unknown_action_sequence $PLAYER_ACTOR "FALL_SKYDIVE" "PED" 1.0 1 0 0 0 -1
0002: jump ££LAB3_2

:LAB3_2
0001: wait 0 ms
00D6: if 0
80E1: key pressed 0 1
004D: jump if false ££LAB3_3
0819: $PLAYER_ACTOR $u3
0008: $u3 = -1065353216 ;; integer values
00D6: if 0
8029: $u3 == 300 ;; integer values
004D: jump if false ££LAB3_2
01B4: set player $PLAYER_CHAR frozen state 0 (unfrozen)
01B4: set player $PLAYER_CHAR frozen state 1 (unfrozen)
0002: jump ££LAB3_1

:LAB3_3
0001: wait 0 ms
0494: get_joystick_data 0 $8278 $8279 $8276 $8277
04F7: status_text $8278 0 line 1 "SPEED"
0004: $8278 = 10.5 ;; integer values
0004: $8277 = 0.0 ;; integer values
0004: $8276 = 10.5 ;; integer values
0004: $8279 = 10.5 ;; integer values
0172: $27 = actor $PLAYER_ACTOR z angle
02F6: $73 = cosine $27 ;; sinus swapped with cosine
02F7: $74 = sinus $27 ;; cosine swapped with sinus
083D: $PLAYER_ACTOR $8278 $8279 $8276
083C: $PLAYER_ACTOR $8278 $8279 $8277
083E: $PLAYER_ACTOR $26 0.0 $27
0812: unknown_action_sequence $PLAYER_ACTOR "FALL_SKYDIVE_ACCEL" "PARACHUTE" 1.0 1 0 0 0 -1 ;;
00D6: if 0
80E1: key pressed 0 0
004D: jump if false ££LAB3_4
00D6: if 0
80E1: key pressed 0 4
004D: jump if false ££LAB3_5
00D6: if 0
80E1: key pressed 0 16
004D: jump if false ££LAB3_6
00D6: if 0
80E1: key pressed 0 1
004D: jump if false ££LAB3_3
0002: jump ££LAB3_1

:LAB3_4
0001: wait 0 ms
00D6: if 0
00E1: key pressed 0 1
004D: jump if false ££LAB3_1
00D6: if 0
00E1: key pressed 0 0
004D: jump if false ££LAB3_3
0009: $27 += 7.0 ;; floating-point values
0173: set actor $PLAYER_ACTOR z angle to $27
00D6: if 0
00E1: key pressed 0 1
004D: jump if false ££LAB3_1
00D6: if 0
80E1: key pressed 0 16
004D: jump if false ££LAB3_6
0002: jump ££LAB3_3

:LAB3_5
0001: wait 0 ms
00D6: if 0
00E1: key pressed 0 1
004D: jump if false ££LAB3_1
00D6: if 0
00E1: key pressed 0 4
004D: jump if false ££LAB3_3
0009: $27 += -7.0 ;; floating-point values
0173: set actor $PLAYER_ACTOR z angle to $27
00D6: if 0
00E1: key pressed 0 1
004D: jump if false ££LAB3_1
00D6: if 0
80E1: key pressed 0 16
004D: jump if false ££LAB3_6
0002: jump ££LAB3_3

:LAB3_6
0001: wait 0 ms
0494: get_joystick_data 0 $8278 $8279 $8276 $8277
04F7: status_text $8278 0 line 1 "SPEED"
0004: $8278 = 10.5 ;; integer values
0004: $8277 = 10.5 ;; integer values
0004: $8276 = 10.5 ;; integer values
0004: $8279 = 10.5 ;; integer values
0172: $27 = actor $PLAYER_ACTOR z angle
02F6: $73 = cosine $27 ;; sinus swapped with cosine
02F7: $74 = sinus $27 ;; cosine swapped with sinus
083D: $PLAYER_ACTOR $8278 $8279 $8276
083C: $PLAYER_ACTOR $8278 $8279 $8277
083E: $PLAYER_ACTOR $26 0.0 $27
0812: unknown_action_sequence $PLAYER_ACTOR "FALL_SKYDIVE_ACCEL" "PARACHUTE" 1.0 1 0 0 0 -1 ;;
00D6: if 0
80E1: key pressed 0 0
004D: jump if false ££LAB3_4
00D6: if 0
80E1: key pressed 0 4
004D: jump if false ££LAB3_5
00D6: if 0
00E1: key pressed 0 1
004D: jump if false ££LAB3_1
00D6: if 0
80E1: key pressed 0 16
004D: jump if false ££LAB3_6
0002: jump ££LAB3_1

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

---