;METEOR SHOWER - include a, b, c, e, f in human child scripts **********************
:stellar200a
if
	0
then
	set meteorcreated 1
	disable
end

:stellar201a
if
	0
then
	set meteorcreated 2
	disable
end

:stellar202a
if
	0
then
	set meteorcreated 3
	disable
end

:stellar203a
if
	0
then
	set meteorcreated 4
	disable
end

:stellar204a
if
	0
then
	set meteorcreated 5
	disable
end

:stellar205a
if
	0
then
	set meteorcreated 6
	disable
end

:stellar206a
if
	0
then
	set meteorcreated 7
	disable
end

:stellar207a
if
	0
then
	set meteorcreated 8
	disable
end

:stellar208a
if
	0
then
	set meteorcreated 9
	disable
end

:stellar209a
if
	0
then
	set meteorcreated 10
	disable
end

:stellar210a
if
	0
then
	set meteorcreated 11
	disable
end

:stellar211a
if
	0
then
	set meteorcreated 12
	disable
end

:stellar212a
if
	0
then
	set meteorcreated 13
	disable
end

:stellar213a
if
	0
then
	set meteorcreated 14
	disable
end

:stellar214a
if
	0
then
	set meteorcreated 15
	disable
end

:stellar215a
if
	0
then
	set meteorcreated 16
	disable
end

;***********************************
:stellar200aAI
if
	meteorcreated = 1
	human = 0
then
	set evactime ((turn + 1900) - (satcom_count * 100))
	set meteor 0
	set meteorcreated 0
	disable
end

:stellar201aAI
if
	meteorcreated = 2
	human = 0
then
	set evactime ((turn + 1900) - (satcom_count * 100))
	set meteor 1
	set meteorcreated 0
	disable
end

:stellar202aAI
if
	meteorcreated = 3
	human = 0
then
	set evactime ((turn + 1900) - (satcom_count * 100))
	set meteor 2
	set meteorcreated 0
	disable
end

:stellar203aAI
if
	meteorcreated = 4
	human = 0
then
	set evactime ((turn + 1900) - (satcom_count * 100))
	set meteor 3
	set meteorcreated 0
	disable
end

:stellar204aAI
if
	meteorcreated = 5
	human = 0
then
	set evactime ((turn + 1900) - (satcom_count * 100))
	set meteor 4
	set meteorcreated 0
	disable
end

:stellar205aAI
if
	meteorcreated = 6
	human = 0
then
	set evactime ((turn + 1900) - (satcom_count * 100))
	set meteor 5
	set meteorcreated 0
	disable
end

:stellar206aAI
if
	meteorcreated = 7
	human = 0
then
	set evactime ((turn + 1900) - (satcom_count * 100))
	set meteor 6
	set meteorcreated 0
	disable
end

:stellar207aAI
if
	meteorcreated = 8
	human = 0
then
	set evactime ((turn + 1900) - (satcom_count * 100))
	set meteor 7
	set meteorcreated 0
	disable
end

:stellar208aAI
if
	meteorcreated = 9
	human = 0
then
	set evactime ((turn + 1900) - (satcom_count * 100))
	set meteor 8
	set meteorcreated 0
	disable
end

:stellar209aAI
if
	meteorcreated = 10
	human = 0
then
	set evactime ((turn + 1900) - (satcom_count * 100))
	set meteor 9
	set meteorcreated 0
	disable
end

:stellar210aAI
if
	meteorcreated = 11
	human = 0
then
	set evactime ((turn + 1900) - (satcom_count * 100))
	set meteor 10
	set meteorcreated 0
	disable
end

:stellar211aAI
if
	meteorcreated = 12
	human = 0
then
	set evactime ((turn + 1900) - (satcom_count * 100))
	set meteor 11
	set meteorcreated 0
	disable
end

:stellar212aAI
if
	meteorcreated = 13
	human = 0
then
	set evactime ((turn + 1900) - (satcom_count * 100))
	set meteor 12
	set meteorcreated 0
	disable
end

:stellar213aAI
if
	meteorcreated = 14
	human = 0
then
	set evactime ((turn + 1900) - (satcom_count * 100))
	set meteor 13
	set meteorcreated 0
	disable
end

:stellar214aAI
if
	meteorcreated = 15
	human = 0
then
	set evactime ((turn + 1900) - (satcom_count * 100))
	set meteor 14
	set meteorcreated 0
	disable
end

:stellar215aAI
if
	meteorcreated = 16
	human = 0
then
	set evactime ((turn + 1900) - (satcom_count * 100))
	set meteor 15
	set meteorcreated 0
	disable
end

;***********************************************************
:stellar200aHuman
if
	meteorcreated = 1
	human = 1
then
	set meteorcreated 0
	set meteorand 99
	set meteormessage 0
	set meteor 0
	disable
end

:stellar201aHuman
if
	meteorcreated = 2
	human = 1
then
	set meteorcreated 0
	set meteorand 99
	set meteormessage 1
	set meteor 1
	disable
end

:stellar202aHuman
if
	meteorcreated = 3
	human = 1
then
	set meteorcreated 0
	set meteorand 99
	set meteormessage 2
	set meteor 2
	disable
end

:stellar203aHuman
if
	meteorcreated = 4
	human = 1
then
	set meteorcreated 0
	set meteorand 99
	set meteormessage 3
	set meteor 3
	disable
end

:stellar204aHuman
if
	meteorcreated = 5
	human = 1
then
	set meteorcreated 0
	set meteorand 99
	set meteormessage 4
	set meteor 4
	disable
end

:stellar205aHuman
if
	meteorcreated = 6
	human = 1
then
	set meteorcreated 0
	set meteorand 99
	set meteormessage 5
	set meteor 5
	disable
end

:stellar206aHuman
if
	meteorcreated = 7
	human = 1
then
	set meteorcreated 0
	set meteorand 99
	set meteormessage 6
	set meteor 6
	disable
end

:stellar207aHuman
if
	meteorcreated = 8
	human = 1
then
	set meteorcreated 0
	set meteorand 99
	set meteormessage 7
	set meteor 7
	disable
end

:stellar208aHuman
if
	meteorcreated = 9
	human = 1
then
	set meteorcreated 0
	set meteorand 99
	set meteormessage 8
	set meteor 8
	disable
end

:stellar209aHuman
if
	meteorcreated = 10
	human = 1
then
	set meteorcreated 0
	set meteorand 99
	set meteormessage 9
	set meteor 9
	disable
end

:stellar210aHuman
if
	meteorcreated = 11
	human = 1
then
	set meteorcreated 0
	set meteorand 99
	set meteormessage 10
	set meteor 10
	disable
end

:stellar211aHuman
if
	meteorcreated = 12
	human = 1
then
	set meteorcreated 0
	set meteorand 99
	set meteormessage 11
	set meteor 11
	disable
end

:stellar212aHuman
if
	meteorcreated = 13
	human = 1
then
	set meteorcreated 0
	set meteorand 99
	set meteormessage 12
	set meteor 12
	disable
end

:stellar213aHuman
if
	meteorcreated = 14
	human = 1
then
	set meteorcreated 0
	set meteorand 99
	set meteormessage 13
	set meteor 13
	disable
end

:stellar214aHuman
if
	meteorcreated = 15
	human = 1
then
	set meteorcreated 0
	set meteorand 99
	set meteormessage 14
	set meteor 14
	disable
end

:stellar215aHuman
if
	meteorcreated = 16
	human = 1
then
	set meteorcreated 0
	set meteorand 99
	set meteormessage 15
	set meteor 15
	disable
end

;***************************************************
:stellar200bHuman
if
	human = 1
	array ownbiodeck 0 = 1
	meteormessage = 0
then
	incoming stellar_event respond evac within 1900 icon 9 skill ((rnd%10000) + 100) "events_meteor00"
;	status_message "DEBUG ** Meteors have been created ** DEBUG"
	set meteormessage 99
end

:stellar201bHuman
if
	human = 1
	array ownbiodeck 1 = 1
	meteormessage = 1
then
	incoming stellar_event respond evac within 1900 icon 9 skill ((rnd%10000) + 100) "events_meteor01"
;	status_message "DEBUG ** Meteors have been created ** DEBUG"
	set meteormessage 99
end

:stellar202bHuman
if
	human = 1
	array ownbiodeck 2 = 1
	meteormessage = 2
then
	incoming stellar_event respond evac within 1900 icon 9 skill ((rnd%10000) + 100) "events_meteor02"
;	status_message "DEBUG ** Meteors have been created ** DEBUG"
	set meteormessage 99
end

:stellar203bHuman
if
	human = 1
	array ownbiodeck 3 = 1
	meteormessage = 3
then
	incoming stellar_event respond evac within 1900 icon 9 skill ((rnd%10000) + 100) "events_meteor03"
;	status_message "DEBUG ** Meteors have been created ** DEBUG"
	set meteormessage 99
end

:stellar204bHuman
if
	human = 1
	array ownbiodeck 4 = 1
	meteormessage = 4
then
	incoming stellar_event respond evac within 1900 icon 9 skill ((rnd%10000) + 100) "events_meteor04"
;	status_message "DEBUG ** Meteors have been created ** DEBUG"
	set meteormessage 99
end

:stellar205bHuman
if
	human = 1
	array ownbiodeck 5 = 1
	meteormessage = 5
then
	incoming stellar_event respond evac within 1900 icon 9 skill ((rnd%10000) + 100) "events_meteor05"
;	status_message "DEBUG ** Meteors have been created ** DEBUG"
	set meteormessage 99
end

:stellar206bHuman
if
	human = 1
	array ownbiodeck 6 = 1
	meteormessage = 6
then
	incoming stellar_event respond evac within 1900 icon 9 skill ((rnd%10000) + 100) "events_meteor06"
;	status_message "DEBUG ** Meteors have been created ** DEBUG"
	set meteormessage 99
end

:stellar207bHuman
if
	human = 1
	array ownbiodeck 7 = 1
	meteormessage = 7
then
	incoming stellar_event respond evac within 1900 icon 9 skill ((rnd%10000) + 100) "events_meteor07"
;	status_message "DEBUG ** Meteors have been created ** DEBUG"
	set meteormessage 99
end

:stellar208bHuman
if
	human = 1
	array ownbiodeck 8 = 1
	meteormessage = 8
then
	incoming stellar_event respond evac within 1900 icon 9 skill ((rnd%10000) + 100) "events_meteor08"
;	status_message "DEBUG ** Meteors have been created ** DEBUG"
	set meteormessage 99
end

:stellar209bHuman
if
	human = 1
	array ownbiodeck 9 = 1
	meteormessage = 9
then
	incoming stellar_event respond evac within 1900 icon 9 skill ((rnd%10000) + 100) "events_meteor09"
;	status_message "DEBUG ** Meteors have been created ** DEBUG"
	set meteormessage 99
end

:stellar210bHuman
if
	human = 1
	array ownbiodeck 10 = 1
	meteormessage = 10
then
	incoming stellar_event respond evac within 1900 icon 9 skill ((rnd%10000) + 100) "events_meteor10"
;	status_message "DEBUG ** Meteors have been created ** DEBUG"
	set meteormessage 99
end

:stellar211bHuman
if
	human = 1
	array ownbiodeck 11 = 1
	meteormessage = 11
then
	incoming stellar_event respond evac within 1900 icon 9 skill ((rnd%10000) + 100) "events_meteor11"
;	status_message "DEBUG ** Meteors have been created ** DEBUG"
	set meteormessage 99
end

:stellar212bHuman
if
	human = 1
	array ownbiodeck 12 = 1
	meteormessage = 12
then
	incoming stellar_event respond evac within 1900 icon 9 skill ((rnd%10000) + 100) "events_meteor12"
;	status_message "DEBUG ** Meteors have been created ** DEBUG"
	set meteormessage 99
end

:stellar213bHuman
if
	human = 1
	array ownbiodeck 13 = 1
	meteormessage = 13
then
	incoming stellar_event respond evac within 1900 icon 9 skill ((rnd%10000) + 100) "events_meteor13"
;	status_message "DEBUG ** Meteors have been created ** DEBUG"
	set meteormessage 99
end

:stellar214bHuman
if
	human = 1
	array ownbiodeck 14 = 1
	meteormessage = 14
then
	incoming stellar_event respond evac within 1900 icon 9 skill ((rnd%10000) + 100) "events_meteor14"
;	status_message "DEBUG ** Meteors have been created ** DEBUG"
	set meteormessage 99
end

:stellar215bHuman
if
	human = 1
	array ownbiodeck 15 = 1
	meteormessage = 15
then
	incoming stellar_event respond evac within 1900 icon 9 skill ((rnd%10000) + 100) "events_meteor15"
;	status_message "DEBUG ** Meteors have been created ** DEBUG"
	set meteormessage 99
end

;**********************************************************************************
:stellar200c
if
	array ownbiodeck 0 = 0
	meteormessage = 0
then
	incoming stellar_event within 1900 icon 9 skill ((rnd%10000) + 100) "events_meteor00a"
;	status_message "DEBUG ** Meteors have been created ** DEBUG"
	set meteormessage 99
end

:stellar201c
if
	array ownbiodeck 1 = 0
	meteormessage = 1
then
	incoming stellar_event within 1900 icon 9 skill ((rnd%10000) + 100) "events_meteor01a"
;	status_message "DEBUG ** Meteors have been created ** DEBUG"
	set meteormessage 99
end

:stellar202c
if
	array ownbiodeck 2 = 0
	meteormessage = 2
then
	incoming stellar_event within 1900 icon 9 skill ((rnd%10000) + 100) "events_meteor02a"
;	status_message "DEBUG ** Meteors have been created ** DEBUG"
	set meteormessage 99
end

:stellar203c
if
	array ownbiodeck 3 = 0
	meteormessage = 3
then
	incoming stellar_event within 1900 icon 9 skill ((rnd%10000) + 100) "events_meteor03a"
;	status_message "DEBUG ** Meteors have been created ** DEBUG"
	set meteormessage 99
end

:stellar204c
if
	array ownbiodeck 4 = 0
	meteormessage = 4
then
	incoming stellar_event within 1900 icon 9 skill ((rnd%10000) + 100) "events_meteor04a"
;	status_message "DEBUG ** Meteors have been created ** DEBUG"
	set meteormessage 99
end

:stellar205c
if
	array ownbiodeck 5 = 0
	meteormessage = 5
then
	incoming stellar_event within 1900 icon 9 skill ((rnd%10000) + 100) "events_meteor05a"
;	status_message "DEBUG ** Meteors have been created ** DEBUG"
	set meteormessage 99
end

:stellar206c
if
	array ownbiodeck 6 = 0
	meteormessage = 6
then
	incoming stellar_event within 1900 icon 9 skill ((rnd%10000) + 100) "events_meteor06a"
;	status_message "DEBUG ** Meteors have been created ** DEBUG"
	set meteormessage 99
end

:stellar207c
if
	array ownbiodeck 7 = 0
	meteormessage = 7
then
	incoming stellar_event within 1900 icon 9 skill ((rnd%10000) + 100) "events_meteor07a"
;	status_message "DEBUG ** Meteors have been created ** DEBUG"
	set meteormessage 99
end

:stellar208c
if
	array ownbiodeck 8 = 0
	meteormessage = 8
then
	incoming stellar_event within 1900 icon 9 skill ((rnd%10000) + 100) "events_meteor08a"
;	status_message "DEBUG ** Meteors have been created ** DEBUG"
	set meteormessage 99
end

:stellar209c
if
	array ownbiodeck 9 = 0
	meteormessage = 9
then
	incoming stellar_event within 1900 icon 9 skill ((rnd%10000) + 100) "events_meteor09a"
;	status_message "DEBUG ** Meteors have been created ** DEBUG"
	set meteormessage 99
end

:stellar210c
if
	array ownbiodeck 10 = 0
	meteormessage = 10
then
	incoming stellar_event within 1900 icon 9 skill ((rnd%10000) + 100) "events_meteor10a"
;	status_message "DEBUG ** Meteors have been created ** DEBUG"
	set meteormessage 99
end

:stellar211c
if
	array ownbiodeck 11 = 0
	meteormessage = 11
then
	incoming stellar_event within 1900 icon 9 skill ((rnd%10000) + 100) "events_meteor11a"
;	status_message "DEBUG ** Meteors have been created ** DEBUG"
	set meteormessage 99
end

:stellar212c
if
	array ownbiodeck 12 = 0
	meteormessage = 12
then
	incoming stellar_event within 1900 icon 9 skill ((rnd%10000) + 100) "events_meteor12a"
;	status_message "DEBUG ** Meteors have been created ** DEBUG"
	set meteormessage 99
end

:stellar213c
if
	array ownbiodeck 13 = 0
	meteormessage = 13
then
	incoming stellar_event within 1900 icon 9 skill ((rnd%10000) + 100) "events_meteor13a"
;	status_message "DEBUG ** Meteors have been created ** DEBUG"
	set meteormessage 99
end

:stellar214c
if
	array ownbiodeck 14 = 0
	meteormessage = 14
then
	incoming stellar_event within 1900 icon 9 skill ((rnd%10000) + 100) "events_meteor14a"
;	status_message "DEBUG ** Meteors have been created ** DEBUG"
	set meteormessage 99
end

:stellar215c
if
	array ownbiodeck 15 = 0
	meteormessage = 15
then
	incoming stellar_event within 1900 icon 9 skill ((rnd%10000) + 100) "events_meteor15a"
;	status_message "DEBUG ** Meteors have been created ** DEBUG"
	set meteormessage 99
end

;********************************************************************************
:stellar200e
if
	0
then
	status_message "events_meteor00b"
	disable
end

:stellar201e
if
	0
then
	status_message "events_meteor01b"
	disable
end

:stellar202e
if
	0
then
	status_message "events_meteor02b"
	disable
end

:stellar203e
if
	0
then
	status_message "events_meteor03b"
	disable
end

:stellar204e
if
	0
then
	status_message "events_meteor04b"
	disable
end

:stellar205e
if
	0
then
	status_message "events_meteor05b"
	disable
end

:stellar206e
if
	0
then
	status_message "events_meteor06b"
	disable
end

:stellar207e
if
	0
then
	status_message "events_meteor07b"
	disable
end

:stellar208e
if
	0
then
	status_message "events_meteor08b"
	disable
end

:stellar209e
if
	0
then
	status_message "events_meteor09b"
	disable
end

:stellar210e
if
	0
then
	status_message "events_meteor10b"
	disable
end

:stellar211e
if
	0
then
	status_message "events_meteor11b"
	disable
end

:stellar212e
if
	0
then
	status_message "events_meteor12b"
	disable
end

:stellar213e
if
	0
then
	status_message "events_meteor13b"
	disable
end

:stellar214e
if
	0
then
	status_message "events_meteor14b"
	disable
end

:stellar215e
if
	0
then
	status_message "events_meteor15b"
	disable
end

;**************************************************************88
:stellar200fAI
if
	human = 0
	array ownbiodeck 0 = 1
	turn > evactime
	meteor = 0
then
	set meteor 99
	evacuate bio_deck 0 ((meteorcounter - turn) / 24)
end

:stellar201fAI
if
	human = 0
	array ownbiodeck 1 = 1
	turn > evactime
	meteor = 1
then
	set meteor 99
	evacuate bio_deck 1 ((meteorcounter - turn) / 24)
end

:stellar202fAI
if
	human = 0
	array ownbiodeck 2 = 1
	turn > evactime
	meteor = 2
then
	set meteor 99
	evacuate bio_deck 2 ((meteorcounter - turn) / 24)
end

:stellar203fAI
if
	human = 0
	array ownbiodeck 3 = 1
	turn > evactime
	meteor = 3
then
	set meteor 99
	evacuate bio_deck 3 ((meteorcounter - turn) / 24)
end

:stellar204fAI
if
	human = 0
	array ownbiodeck 4 = 1
	turn > evactime
	meteor = 4
then
	set meteor 99
	evacuate bio_deck 4 ((meteorcounter - turn) / 24)
end

:stellar205fAI
if
	human = 0
	array ownbiodeck 5 = 1
	turn > evactime
	meteor = 5
then
	set meteor 99
	evacuate bio_deck 5 ((meteorcounter - turn) / 24)
end

:stellar206fAI
if
	human = 0
	array ownbiodeck 6 = 1
	turn > evactime
	meteor = 6
then
	set meteor 99
	evacuate bio_deck 6 ((meteorcounter - turn) / 24)
end

:stellar207fAI
if
	human = 0
	array ownbiodeck 7 = 1
	turn > evactime
	meteor = 7
then
	set meteor 99
	evacuate bio_deck 7 ((meteorcounter - turn) / 24)
end

:stellar208fAI
if
	human = 0
	array ownbiodeck 8 = 1
	turn > evactime
	meteor = 8
then
	set meteor 99
	evacuate bio_deck 8 ((meteorcounter - turn) / 24)
end

:stellar209fAI
if
	human = 0
	array ownbiodeck 9 = 1
	turn > evactime
	meteor = 9
then
	set meteor 99
	evacuate bio_deck 9 ((meteorcounter - turn) / 24)
end

:stellar210fAI
if
	human = 0
	array ownbiodeck 10 = 1
	turn > evactime
	meteor = 10
then
	set meteor 99
	evacuate bio_deck 10 ((meteorcounter - turn) / 24)
end

:stellar211fAI
if
	human = 0
	array ownbiodeck 11 = 1
	turn > evactime
	meteor = 11
then
	set meteor 99
	evacuate bio_deck 11 ((meteorcounter - turn) / 24)
end

:stellar212fAI
if
	human = 0
	array ownbiodeck 12 = 1
	turn > evactime
	meteor = 12
then
	set meteor 99
	evacuate bio_deck 12 ((meteorcounter - turn) / 24)
end

:stellar213fAI
if
	human = 0
	array ownbiodeck 13 = 1
	turn > evactime
	meteor = 13
then
	set meteor 99
	evacuate bio_deck 13 ((meteorcounter - turn) / 24)
end

:stellar214fAI
if
	human = 0
	array ownbiodeck 14 = 1
	turn > evactime
	meteor = 14
then
	set meteor 99
	evacuate bio_deck 14 ((meteorcounter - turn) / 24)
end

:stellar215fAI
if
	human = 0
	array ownbiodeck 15 = 1
	turn > evactime
	meteor = 15
then
	set meteor 99
	evacuate bio_deck 15 ((meteorcounter - turn) / 24)
end

;*************************************************************
:stellar200fHuman
if
	human = 1
	meteor = 0
	evac = 2
then
	evacuate bio_deck 0 ((meteorcounter - turn) / 24)
	set evac 3
end

:stellar201fHuman
if
	human = 1
	meteor = 1
	evac = 2
then
	evacuate bio_deck 1 ((meteorcounter - turn) / 24)
	set evac 3
end

:stellar202fHuman
if
	human = 1
	meteor = 2
	evac = 2
then
	evacuate bio_deck 2 ((meteorcounter - turn) / 24)
	set evac 3
end

:stellar203fHuman
if
	human = 1
	meteor = 3
	evac = 2
then
	evacuate bio_deck 3 ((meteorcounter - turn) / 24)
	set evac 3
end

:stellar204fHuman
if
	human = 1
	meteor = 4
	evac = 2
then
	evacuate bio_deck 4 ((meteorcounter - turn) / 24)
	set evac 3
end

:stellar205fHuman
if
	human = 1
	meteor = 5
	evac = 2
then
	evacuate bio_deck 5 ((meteorcounter - turn) / 24)
	set evac 3
end

:stellar206fHuman
if
	human = 1
	meteor = 6
	evac = 2
then
	evacuate bio_deck 6 ((meteorcounter - turn) / 24)
	set evac 3
end

:stellar207fHuman
if
	human = 1
	meteor = 7
	evac = 2
then
	evacuate bio_deck 7 ((meteorcounter - turn) / 24)
	set evac 3
end

:stellar208fHuman
if
	human = 1
	meteor = 8
	evac = 2
then
	evacuate bio_deck 8 ((meteorcounter - turn) / 24)
	set evac 3
end

:stellar209fHuman
if
	human = 1
	meteor = 9
	evac = 2
then
	evacuate bio_deck 9 ((meteorcounter - turn) / 24)
	set evac 3
end

:stellar210fHuman
if
	human = 1
	meteor = 10
	evac = 2
then
	evacuate bio_deck 10 ((meteorcounter - turn) / 24)
	set evac 3
end

:stellar211fHuman
if
	human = 1
	meteor = 11
	evac = 2
then
	evacuate bio_deck 11 ((meteorcounter - turn) / 24)
	set evac 3
end

:stellar212fHuman
if
	human = 1
	meteor = 12
	evac = 2
then
	evacuate bio_deck 12 ((meteorcounter - turn) / 24)
	set evac 3
end

:stellar213fHuman
if
	human = 1
	meteor = 13
	evac = 2
then
	evacuate bio_deck 13 ((meteorcounter - turn) / 24)
	set evac 3
end

:stellar214fHuman
if
	human = 1
	meteor = 14
	evac = 2
then
	evacuate bio_deck 14 ((meteorcounter - turn) / 24)
	set evac 3
end

:stellar215fHuman
if
	human = 1
	meteor = 15
	evac = 2
then
	evacuate bio_deck 15 ((meteorcounter - turn) / 24)
	set evac 3
end