for i=1to 130a=asc(mid$("�������\����Ʊ��������yyxbfyw��xv��xu��x^��bt�|ctMQ�����5>�5>�LS�cRz]dfduz{zu�{v�\{w�|x�}�������������.�.��\����",i))
while(a)b$="#"
q=q+1
d=23
if(mod(a,d))b$=".":d=1
a=a-d:?b$;
if(!mod(q,44))?
wend
next