;LOVENESTS
:AILoveNestHelp
if
	turn > 10000
	human = 0
	turn > AIstuff
	energy > 5000
	love_nest_count < (segmentdecks / 3)
	cargoexists hard_plan_crate love_nest < 1
then
	set AIstuff (turn + 5000)
	placeportable hard_plan_crate 5 13 mid_deck 600 love_nest
	addenergy (0 - 2000)
end

;LOVECHAIRS
:AILoveChairHelp
if
	turn > 20000
	human = 0
	turn > AIstuff
	energy > 5000
	love_chair_count < (love_nest_count * 3)
	cargoexists furniture_plan_crate love_chair < 1
then
	placeportable furniture_plan_crate 5 13 mid_deck 600 love_chair
	placeportable furniture_plan_crate 5 14 mid_deck 600 love_bench
	placeportable furniture_plan_crate 6 13 mid_deck 600 love_bench
	set AIstuff (turn + 5000)
	addenergy (0 - 1000)
end

;STARMOTELS
:AIStarMotelHelp
if
	turn > 5000
	human = 0
	turn > AIstuff
	energy > 10000
	((one_star_hotel_count) + 1) < (segmentdecks / 3)
	cargoexists hard_plan_crate one_star_hotel < 1
then
	set AIstuff (turn + 5000)
	placeportable hard_plan_crate 5 13 mid_deck 600 one_star_hotel
	addenergy (0 - 4000)
end