100 REM ARABESCHI
110 :
120 A$=CHR$(29)+CHR$(17)
130 A$=A$+CHR$(145)+CHR$(157)
140 A$=A$+CHR$(105)+CHR$(106)
150 A$=A$*CHR$(107)+CHR$(117)
160 A$=A$+CHR$(32)
170 L=LEN(A$):PRINTCHR$(147);
180 X=INT(RND(0)*L)+1
190 PRINT MID$(As,X,l);
200 GOTO 180
210 END