(global short behavior 0)
(global boolean there false)

(script command_script go_point
	(print "fucker?")
	(cs_go_to behaviors/mid1)
	(print "there?")
)


(script continuous fight_beh
	(sleep_until (= 1 behavior))
	(ai_set_orders marine behaviors/fight)
	(set behavior 0)
)

(script static void elite_spawner
	(ai_place elite)
)

(script static void marine_die
	(if (> 2 (ai_living_count marine))
		(begin
			(ai_place marine)
			(if (> 2 (ai_living_count marine))
				(ai_place marine)
			)
		)
	)
	(cs_run_command_script marine go_point)
  	(sleep_until (volume_test_objects_all mid1 (ai_actors marine)) 30 300)
	(unit_kill (unit (list_get (ai_actors marine) 1)))
)

(script continuous marine_spawner
	(sleep_until (= 0 (ai_living_count marine)))
		(ai_place marine)
)

(script continuous hog_check
	(sleep_until (vehicle_test_seat_list warthog1 "" (players)))
	(sleep_until (not (vehicle_test_seat_list warthog1 "" (players))))
	(ai_exit_vehicle marine)
)

(script startup begin
	(ai_allegiance human player)
	(ai_allegiance covenant player)
)