10 A$="  Double-size Text"
100 LPRINTCHR$(27)CHR$(28);:FORSE=0TO2:BI=2^(3*SE):LPRINTCHR$(18);
110 FORCH=1TOLEN(A$):CS=30320+5*ASC(MID$(A$,CH)):FORBY=1TO5:B=PEEK(CS+BY)
120 LPRINTSTRING$(2,128-3*((BANDBI)>0)-12*((BAND2*BI)>0)-48*((BAND4*BI)>0));
130 NEXTBY:LPRINTSTRING$(2,128);:NEXTCH:LPRINTCHR$(30):NEXTSE
140 LPRINT:LPRINTCHR$(27)CHR$(54);