1 DIM A$(18):A$="                ":? :? A$;:? "\O/":Z=0    
2 A=43:B=45:C=33:D=32:Z=Z+1:GOSUB 4
3 A=A-10:B=B-13:FOR I=0 TO 8:GOSUB 4:NEXT I:FOR J=0 TO 6:GOSUB 4:NEXT J:GOTO 2
4 ? A$(10);:? CHR$(A);:FOR I=0 TO 8:? CHR$(B);:NEXT I:? CHR$(A);:FOR I=0 TO 8:? CHR$(B);:NEXT I:? CHR$(A)
5 IF Z=3 THEN GOTO 9
6 RETURN
9 GOTO 9