1?"        \O/"
2for i=0to 18:for j=0to 18
3a=32-10*((i mod 9)=0)-((j mod 9)=0):a=a-(a=42)*3
4?chr$(a);:next:?:next
