; 99 Bottles of Beer on the Wall ; for Orthogonal ; written by Brian Raiter 5/96 :set bX = 7 :set bY = 20 [0,0] 99 1 cw 0 cw 0 ':' 'd' 'n' 'u' 'o' 'r' ' ' 't' 'i' ' ' cw 99 cw 0 ':' 'e' 'r' 'o' 'm' ' ' 'e' 'm' cw 's' 1 ? 'o' 's' 99 ! 's' 'a' cw J c 0 cw ? c 0 s '.' 0 ccw ? s ' ' ccw 'p' ~ d cw ' ' J 0 d s ';' ' ' 0 cw 'y' 'b' ' ' 0 0 'o' 'r' 'u' 'o' ',' ~ 'l' 'n' 'e' 'b' 't' 'n' 0 'l' ' ' 'e' ' ' 't' 'w' @ 'a' 't' 'b' ',' 'l' 'o' ~ 'w' 'h' ccw ' ' 'f' 'o' ' ' bY bX = ? 's' 'e' ccw 'd' 1 ' ' 'e' 'r' ' ' @ ccw ccw cw 'l' 'l' 'a' 'w' ' ' 'e' 'h' 't' cw 'o' bY ~ '.' cw 's' 'e' 'l' 't' 't' 'o' cw ' ' 't' bX 0 0 ' ' cw c 0 ret 'b' 'n' 's' = ~ c 'o' cw 0 s d 99 ' ' cw 'o' ' ' ? 1 0 cw 'f' ' ' 'b' 'e' 'e' 'r' ' ' cw 'e' ccw cw @ cw s 'G' 'o' ' ' 't' 'o' ' ' 't' 'h' cw 't' 'e' # 'i' 'n' cw bX bY - 1 @ 98 nop c 0 s 'T' 'a' 'k' 'e' ' ' H 'o' cw cw