to countdown.while :n
 while [greaterp :n 0] [print :n make "n :n-1]
 print "Blastoff!
end

to oddsum :count
 local "total
 make "total 0
 
 for [i 1 :count] [make "total :total + 2*i-1]
 output :total
end