10 print"{clr}" 20 fora=0to4*~step(4*~)/39:y=int(sin(a)*12+12):x=x+1:poke((24-y)*40+32767)+x,46 30 next:print"{down}{down}{down}{down}{down}{down}{down}{down}{down}{down}{down}{down}{down}{down}{down}{down}{down}{down}{down}{down}"