#Commodore VIC-20/VC-20/C64 - ~95 tokenized BASIC bytes used
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.