:autorun
if
then
	title "Tutorial03"
	disallow decks bio_deck
	disallow decks mid_deck
	set reply01 3
	set reply02 3
	disable
end

:energytopup
if
	energy < 50000
	turn > topup
then
	set topup (turn + 10)
	set energy 50000
end


:cargotutorial010
if
	turn > 10
then
	place_peep scutter 6 2 sub_deck 1024
	tutorial "tutorial_tutorial50" set cargotutorial 1
	disable
end

:cargotutorial020
if
	  cargotutorial = 1
then
	cam_pos 80 100 200 0 256
	placeportable hard_plan_crate 8 12 sub_deck 1000 cargo_bay
	tutorial "tutorial_tutorial51" set cargotutorial 2 "opencratebutton"
	disable
end

:cargotutorial030
if
	  cargotutorial = 2
then
	tutorial "tutorial_tutorial52" set cargotutorial 3 special cargobaybuilt
	disable
end

:cargotutorial035
if
	cargo_bay_count > 0
then
	set cargobaybuilt 1
	disable
end

:cargotutorial040
if
	  cargotutorial = 3
then
	tutorial "tutorial_tutorial53" set tradetutorial 1
	disable
end

:tradetutorial040
if
	said = 0
	cargo_bay_count > 0
	tradetutorial = 1
then
	trader "arona3000.csv" 50 "tutorial_tutorial54"
	set tradetimer (turn + 1250)
	tutorial "tutorial_tutorial55" set tradetutorial 2
	set said 1
end

:tradetutorial050
if
	turn > tradetimer
	tradetimer > 0
then
	trader "arona3000.csv" 50 "tutorial_tutorial54"
	set tradetimer (turn + 1250)
end

:cargocounter
if
	tradetutorial < 4
	turn > cargotimer
then
	set cargostock (((((((Industrial_crate_count + Medical_Supply_crate_count) + Food_Supply_crate_count) + Hardware_crate_count) + Luxury_Item_crate_count) + Ore_crate_count) + Black_Market_Goods_crate_count) + Furniture_plan_crate_count)
	set cargotimer (turn + 6)
end

:cargobought
if
	tradetutorial < 4
	cargostock > cargotraded
then
	set somethingbought (somethingbought + 1)
	set cargotraded (cargostock)
end

:cargosold
if
	tradetutorial < 4
	cargostock < cargotraded
then
	set somethingsold (somethingsold + 1)
	set cargotraded (cargostock)
end


:tradetutorial060
if
	cargo_bay_count > 0
	(somethingsold + somethingbought) > 6
then
	tutorial "tutorial_tutorial56" set tradetutorial 3 findroom cargo_bay
	disable
end

:cargobayreplace
if
	cargotutorial > 2
	cargo_bay_count < 1
then
	tutorial "tutorial_tutorial60" set said 0
	set tradetutorial 1
	disable
end

:tradetutorial070
if
	cargo_bay_count > 0
	tradetutorial = 3
then
	tutorial "tutorial_tutorial57" set tradetutorial 4 special pbuffer_size 1
	set pbuffer_test 0 
	set pbuffer_test2 1
	disable
end

:tradetutorial080
if
	tradetutorial = 4
then
	pbuffer pbuffer_test2
;	set pbuffer_test (1 - buffer_test2)
end

:tutorial080b
if
	pbuffer_test2 = 0
then
	set pbuffer_test 1
end


:tradetutorial085
if
	tradetutorial = 4
then
	tutorial "tutorial_tutorial58" set tradetutorial 5 special pbuffer_test
	disable
end	

:tradetutorial090
if
	tradetutorial = 5
then
	set scriptwait (turn + 100)
	set tradetutorial 6
	disable
end

:tradetutorial100
if
	turn > scriptwait
	tradetutorial = 6
then
	set scriptwait (turn + 200)
	set tradetutorial 7
	incoming local_comms icon 0 respond reply02 "tutorial_tutorial59"
end

:tradetutorial110
if
	reply02 = 2
then
	win
	disable
end

:tradetutorial120
if
	reply02 < 2
then
	set reply02 3
	set scriptwait (turn + 200)
	set tradetutorial 6
end