#Commodore VIC-20/VC-20/C64 - <strike>95</strike> <strike>69</strike> 68 tokenized BASIC bytes used (obfuscated and minimized) 0dEfnb(x)=sgn(xandb):fOi=0to10:b=8:fOj=0to3:?rI(stR(fnb(i)),1);:b=b/2:nEj:?:nE Copy and paste the above text into WinVice, for instance. Just about fits onto 80 characters on a Commodore 64. Here's the original symbolic listing: 0 DEF FN B(X)=SGN(X AND B) 1 FOR I=0 TO 10:B=8 2 FOR J=0 TO 3:PRINT RIGHT$(STR$(FN B(I)),1);:B=B/2:NEXT J 3 PRINT:NEXT I Of course this may be minimised and further obfuscated. I'll update with an explanation later.