An72 Coaler Paradrop script

[miraoister 1]

http://operationflashpoint.filefront.com/file/An72_Coaler;43000

im looking for the the script file mentioned on the above link "trenchfeets paradrop script"

[zulu1 145]

Quote[/b] ]http://operationflashpoint.filefront.com/file/An72_Coaler;43000

im looking for the the script file mentioned on the above link "trenchfeets paradrop script"

Ummm...It's included in the addon (.pbo). It's called

"ejectparas.sqs".

This is a snipet of the script. (Further discussion of this needs to be moved to configs/scripting or mission editing.)

Quote[/b] ]; ****************************************************

;      McDONNELL DOUGLAS C-47 SKYTRAIN

; ****************************************************

;                              25/03/04

;          By Trenchfeet

; ****************************************************

; Adapted by Footmunch 12/Jun/05

_vehicle = _this select 0

; Get the array of units to drop

_crew_array = crew _vehicle

_para_array = []

"if (_x != driver _vehicle && _x != gunner _vehicle) then {_para_array = _para_array + [_x]}" foreach _crew_array

; Get out now if there's no paras aboard

?(count _para_array == 0) : exit

; Slow down

;Turn off the lights

_vehicle setobjecttexture[3, ""]

_vehicle animate ["PA_Green",0]

_vehicle setobjecttexture[4, ""]

_vehicle animate ["PA_Red",0]

; Approach

_vehicle setobjecttexture[4, "\rktcoaler\int\rlight.pac"]

_vehicle setspeedmode "Limited"

_vehicle SetBehaviour "SAFE"

_vehicle Vehiclechat "Stand by. Approaching Drop Zone."

_vehicle setobjecttexture[4, ""]

~.5

_vehicle setobjecttexture[4, "\rktcoaler\int\rlight.pac"]

~.5

_vehicle setobjecttexture[4, ""]

~.5

_vehicle setobjecttexture[4, "\rktcoaler\int\rlight.pac"]

~.5

_vehicle setobjecttexture[4, ""]

~.5

_vehicle setobjecttexture[4, "\rktcoaler\int\rlight.pac"]

_vehicle Vehiclechat "5 Seconds."

~1

_vehicle Vehiclechat "4."

~1

_vehicle Vehiclechat "3."

~1

_vehicle Vehiclechat "2."

~1

_vehicle Vehiclechat "1."

~1

_vehicle Vehiclechat "Go, Go, Go."

_vehicle setobjecttexture[4, ""]

_vehicle setobjecttexture[3,"\rktcoaler\int\glight.pac"]

~1

_count = 0

_vel = [(velocity _vehicle) select 0, (velocity _vehicle) select 1, 20]

#Eject_Loop

_para = _para_array select _count

_vehicle Vehiclechat format ["%1, GO", name _para]

unassignvehicle _para

_para action ["EJECT",_vehicle]

~.03

;_para setvelocity _vel

~0.25

_count = _count + 1

? _count != count _para_array : goto "Eject_Loop"

#Finish

_vehicle setobjecttexture[4, ""]

_vehicle setobjecttexture[3, ""]

~5

_vehicle setspeedmode "normal"

exit