loop
stof
lfl4
temp grtn -37 clr1 cin1/temp cin1 grtn -41 clr6/temp cin1 500
m2f= hght clr2 dots/
endl
loop
lfl4
temp grtn -39 clr1 cin1/temp cin1 grtn -43 clr6/temp cin1 400
m2f= hght clr2 dots/
endl
loop
lfl4
temp grtn -41 clr1 cin1/temp cin1 grtn -44 clr6/temp cin1 300
m2f= hght clr2 dots/
endl
loop
lfl4
temp grtn -43 clr1 cin1/temp cin1 grtn -47 clr6/temp cin1 250
m2f= hght clr2 dots/
endl
loop
lfl4
temp grtn -44 clr1 cin1/temp cin1 grtn -50 clr6/temp cin1 200
m2f= hght clr2 dots/
endl
loop
lfl4
temp grtn -48 clr1 cin1/temp cin1 grtn -52 clr6/temp cin1 150
m2f= hght clr2 dots/
endl
loop
lfl4
temp grtn -52 clr1 cin1/temp cin1 grtn -56 clr6/temp cin1 100
m2f= hght clr2 dots/
endl
