
reset : true w 200
helpmode : false
complexitymenu : verysimple 
layoutmenu : 2col 
pan0 _ atco2plot 
pan1 _ glotempplot
w 1000 

show   atco2plot.title 
show   atco2plot.yscale 
show   atco2calc 
show   stabconc 

loop1 if ( stabconc&atlevel < 750 ) ( stabconc&atlevel :+ 10 goto loop1 )
loop2 if ( stabconc&inyear < 2250 ) ( stabconc&inyear :+ 10 goto loop2 )
scriptmode : delay
loop3 if ( stabconc&atlevel > 400 ) ( stabconc&atlevel :- 10 stabconc&inyear :- 5 go goto loop3 )
scriptmode : direct
loop4 if ( stabconc&inyear < 2125 ) ( stabconc&inyear :+ 5 goto loop4 )
loop5 if ( stabconc&atlevel < 500 ) ( stabconc&atlevel :+ 10 goto loop5 )

w 1000 

show glotempplot.title 
show glotempplot.yscale 
show tempav 
show climsens 

loop6 if ( climsens < 4.5 ) ( climsens :+ 0.2 goto loop6 )
loop7 if ( climsens > 1.5 ) ( climsens :- 0.2 goto loop7 )
loop8 if ( climsens < 3 ) ( climsens :+ 0.2 goto loop8 )


