1 o=1024:c=40:a=42:fory=0to8:forx=0toy:pokeo+175+x+y*c,a:pokeo+183-x+y*c,a
2 pokeo+815+x-y*c,a:pokeo+823-x-y*c,a:pokeo+331+y+x*c,a
3 pokeo+347-y+x*c,a:pokeo+651+y-x*c,a:pokeo+667-y-x*c,a:next:next