; ~Reinforce Alert~ ver 1.41 Add-on Torpedo Chute Part

var z
VAR TEMP
VAR altsbr
var dr
var tr

IF INIT THEN {
	preenable
	z = 1
	dr = 1
IF ( ( OwnName $= "UMGT-1 Chute" ) OR ( OwnName $= "Yu-7 Chute User" ) ) THEN {
	TEMP = ( 580 - ABS OWNSPD )
} ELSEIF ( OwnName $= "MPT-1UE Chute" ) THEN {
	TEMP = ( 1636 - ABS OWNSPD )
} ELSEIF ( OwnName $= "APR-3ME Chute" ) THEN {
	TEMP = ( 1010 - ABS OWNSPD )
} ELSEIF ( OwnName $= "UUM-125B Chute" ) THEN {
	TEMP = ( 968 - ABS OWNSPD )
} ENDIF
	if TEMP < 175 then {
		altsbr = 390
	} elseif TEMP < 225 then {
		altsbr = 200
	} elseif TEMP < 275 then {
		altsbr = 130
	} else {
		altsbr = 0
	} endif

} ELSE {
	SETPRIORITY 250	SetAlt -5
		IF OwnAlt <= altsbr THEN {
			IF z THEN {
				z = 0
				enable
			} ENDIF
			IF NEWTRACK THEN { SETTACTIC "ShuteTRP"	} ENDIF
		} ENDIF
if dr then {
	if ownalt < 0 then {
		dr = 0
		tr = ( time + 70 )
	} endif
} elseif time > tr then {
	shutdown
} endif
} ENDIF