1A$="@P@TTXXP\T@Y@RRTDY__DYRT@R@Y\TXPTX@T@P"
2B$="":FORI=1TO2:X=X+1:C=ASC(MID$(A$,X,1)):FORJ=0TO4:C$=CHR$(32+10*(1ANDC)):C=C/2:PRINTC$;:B$=C$+B$:NEXTJ,I:PRINTMID$(B$,2):IFX<38THEN2
