The Code

 
Below is the computer code running on the Nylon circuit board on which The Tome operates.
 
int a = 0;
int q = 6;
int chars(int i, int p) {
if (p>13 || p<-q)
return q;
stroke(0);
rect(0,p,10,q);
stroke(1);
if (i==0)
return q;
if (i==1) {
line(1,p,6,p);
point(7,p+1);
point(8,p+2);
point(7,p+3);
line(1,p+4,6,p+4);
line(4,p+1,4,p+3);
return q;}
if (i==2) {
line(1,p,8,p);
line(1,p+1,1,p+3);
line(5,p+1,5,p+3);
line(8,p+1,8,p+3);
line(2,p+4,4,p+4);
line(6,p+4,7,p+4);
return q;}
if (i==3) {
line(3,p,6,p);
point(2,p+1);
point(7,p+1);
line(1,p+2,1,p+3);
line(8,p+2,8,p+3);
point(2,p+4);
point(7,p+4);
return q;}
if (i==4) {
line(1,p,8,p);
line(1,p+1,1,p+2);
line(8,p+1,8,p+2);
point(2,p+3);
point(7,p+3);
line(3,p+4,6,p+4);
return q;}
//"E"
if (i==5) {
line(1,p,8,p);
line(1,p+1,1,p+4);
line(5,p+1,5,p+3);
line(8,p+1,8,p+4);
return q;}
if (i==6) {
line(1,p,8,p);
line(5,p+1,5,p+3);
line(8,p+1,8,p+4);
return q;}
if (i==7) {
line(3,p,6,p);
point(2,p+1);
point(7,p+1);
line(1,p+2,1,p+3);
line(8,p+2,8,p+3);
point(4,p+3);
line(2,p+4,4,p+4);
point(7,p+4);
return q;}
if (i==8) {
line(1,p,8,p);
line(5,p+1,5,p+3);
line(1,p+4,8,p+4);
return q;}
if (i==9) {
point(1,p);
point(8,p);
line(1,p+1,8,p+1);
point(1,p+2);
point(8,p+2);
return 4;}
//"J"
if (i==10) {
line(3,p,4,p);
line(8,p,8,p+4);
point(2,p+1);
line(1,p+2,1,p+3);
line(2,p+4,7,p+4);
return q;}
if (i==11) {
line(1,p,8,p);
line(5,p+1,8,p+4);
line(1,p+4,4,p+1);
return q;}
if (i==12) {
line(1,p,8,p);
line(1,p+1,1,p+4);
return q;}
if (i==13) {
line(1,p,8,p);
point(7,p+1);
point(6,p+2);
point(7,p+3);
line(1,p+4,8,p+4);
return q;}
if (i==14) {
line(1,p,8,p);
line(6,p+1,3,p+3);
line(1,p+4,8,p+4);
return q;}
//"O"
if (i==15) {
line(2,p,7,p);
line(1,p+1,1,p+3);
line(8,p+1,8,p+3);
line(2,p+4,7,p+4);
return q;}
if (i==16) {
line(1,p,8,p);
line(5,p+1,5,p+3);
line(8,p+1,8,p+3);
line(6,p+4,7,p+4);
return q;}
if (i==17) {
line(2,p,7,p);
line(1,p+1,1,p+2);
line(8,p+1,8,p+3);
line(3,p+4,7,p+4);
line(3,p+2,1,p+4);
return q;}
if (i==18) {
line(1,p,8,p);
line(5,p+1,5,p+3);
line(8,p+1,8,p+3);
line(6,p+4,7,p+4);
line(4,p+1,1,p+4);
return q;}
if (i==19) {
point(2,p);
line(6,p,7,p);
line(1,p+1,1,p+3);
line(5,p+1,5,p+3);
line(8,p+1,8,p+3);
line(2,p+4,4,p+4);
point(7,p+4);
return q;}
//"T"
if (i==20) {
line(8,p,8,p+4);
line(1,p+2,7,p+2);
return q;}
if (i==21) {
line(2,p,8,p);
line(1,p+1,1,p+3);
line(2,p+4,8,p+4);
return q;}
if (i==22) {
line(5,p,8,p);
line(3,p+1,4,p+1);
line(1,p+2,2,p+2);
line(3,p+3,4,p+3);
line(5,p+4,8,p+4);
return q;}
if (i==23) {
stroke(0);
rect(0,p+q,10,2);
stroke(1);
line(5,p,8,p);
line(3,p+1,4,p+1);
line(1,p+2,2,p+2);
line(3,p+3,4,p+3);
line(1,p+4,2,p+4);
line(3,p+5,4,p+5);
line(5,p+6,8,p+6);
return 8;}
if (i==-1) return 24;
if (i==24) {
ful();
o0=0;
o2=0;
o5=0;
o7=0;}
if (i==25) {
ful();
o3=0;
o7=0;}
if (i==26) {
ful();
o0=0;
o3=0;
o5=0;
o6=0;}
if (i==27+0) {
ful();
o4=0;}
if (i==27+1) {
nul();
o0=1;
o6=1;}
if (i==27+2) {
ful();
o0=0;
o5=0;}
if (i==27+3) {
ful();
o3=0;
o5=0;}
if (i==27+4) {
ful();
o2=0;
o3=0;
o7=0;}
if (i==27+5) {
ful();
o3=0;
o6=0;}
if (i==27+6) {
ful();
o6=0;}
if (i==27+7) {
ful();
o2=0;
o3=0;
o4=0;
o5=0;}
if (i==27+8)
ful();
if (i==27+9) {
ful();
o2=0;
o3=0;}
//"."
if (i==37) {
nul();
o1=1;}
//"-"
if (i==38) {
nul();
o4=1;}
//"["
if (i==39) {
ful();
o0=0;
o4=0;
o6=0;}
//"]"
if (i==40) {
ful();
o3=0;
o4=0;
o5=0;}
//","
if (i==41) {
nul();
o1=1;
o2=1;}
//"'"
if (i==42) {
nul();
o6=1;}
}

chars(0); pause(200);
int a=50;
while (true) {
if (@0 == 1) {
chars(20); pause(a); //"T"
chars(8); pause(a); //"h"
chars(5); pause(a); //"e"
chars(0); pause(a); //" "
chars(2); pause(a); //"b"
chars(15); pause(a); //"o"
chars(14); pause(a); //"n"
chars(5); pause(a); //"e"
chars(38); pause(a); //"-"
chars(3); pause(a); //"c"
chars(8); pause(a); //"h"
chars(9); pause(a); //"i"
chars(12); pause(a); //"l"
chars(12); pause(a); //"l"
chars(9); pause(a); //"i"
chars(14); pause(a); //"n"
chars(7); pause(a); //"g"
chars(0); pause(a); //" "
chars(19); pause(a); //"s"
chars(3); pause(a); //"c"
chars(18); pause(a); //"r"
chars(5); pause(a); //"e"
chars(1); pause(a); //"a"
chars(13); pause(a); //"m"
chars(0); pause(a); //" "
chars(19); pause(a); //"s"
chars(16); pause(a); //"p"
chars(12); pause(a); //"l"
chars(9); pause(a); //"i"
chars(20); pause(a); //"t"
chars(0); pause(a); //" "
chars(20); pause(a); //"t"
chars(8); pause(a); //"h"
chars(5); pause(a); //"e"
chars(0); pause(a); //" "
chars(23); pause(a); //"w"
chars(1); pause(a); //"a"
chars(18); pause(a); //"r"
chars(13); pause(a); //"m"
chars(0); pause(a); //" "
chars(19); pause(a); //"s"
chars(21); pause(a); //"u"
chars(13); pause(a); //"m"
chars(13); pause(a); //"m"
chars(5); pause(a); //"e"
chars(18); pause(a); //"r"
chars(0); pause(a); //" "
chars(14); pause(a); //"n"
chars(9); pause(a); //"i"
chars(7); pause(a); //"g"
chars(8); pause(a); //"h"
chars(20); pause(a); //"t"
chars(0); pause(a); //" "
chars(9); pause(a); //"i"
chars(14); pause(a); //"n"
chars(0); pause(a); //" "
chars(20); pause(a); //"t"
chars(23); pause(a); //"w"
chars(15); pause(a); //"o"
chars(41); pause(a); //","
chars(0); pause(a); //" "
pause(200);}
if (@1 == 1) {
chars(20); pause(a); //"t"
chars(8); pause(a); //"h"
chars(5); pause(a); //"e"
chars(0); pause(a); //" "
chars(6); pause(a); //"f"
chars(9); pause(a); //"i"
chars(18); pause(a); //"r"
chars(19); pause(a); //"s"
chars(20); pause(a); //"t"
chars(0); pause(a); //" "
chars(8); pause(a); //"h"
chars(1); pause(a); //"a"
chars(12); pause(a); //"l"
chars(6); pause(a); //"f"
chars(0); pause(a); //" "
chars(2); pause(a); //"b"
chars(5); pause(a); //"e"
chars(9); pause(a); //"i"
chars(14); pause(a); //"n"
chars(7); pause(a); //"g"
chars(0); pause(a); //" "
chars(2); pause(a); //"b"
chars(5); pause(a); //"e"
chars(6); pause(a); //"f"
chars(15); pause(a); //"o"
chars(18); pause(a); //"r"
chars(5); pause(a); //"e"
chars(0); pause(a); //" "
chars(20); pause(a); //"t"
chars(8); pause(a); //"h"
chars(5); pause(a); //"e"
chars(0); pause(a); //" "
chars(19); pause(a); //"s"
chars(3); pause(a); //"c"
chars(18); pause(a); //"r"
chars(5); pause(a); //"e"
chars(1); pause(a); //"a"
chars(13); pause(a); //"m"
chars(0); pause(a); //" "
chars(23); pause(a); //"w"
chars(8); pause(a); //"h"
chars(5); pause(a); //"e"
chars(14); pause(a); //"n"
chars(0); pause(a); //" "
chars(9); pause(a); //"i"
chars(20); pause(a); //"t"
chars(0); pause(a); //" "
chars(23); pause(a); //"w"
chars(1); pause(a); //"a"
chars(19); pause(a); //"s"
chars(0); pause(a); //" "
chars(6); pause(a); //"f"
chars(1); pause(a); //"a"
chars(9); pause(a); //"i"
chars(18); pause(a); //"r"
chars(12); pause(a); //"l"
chars(25); pause(a); //"y"
chars(0); pause(a); //" "
chars(2); pause(a); //"b"
chars(1); pause(a); //"a"
chars(12); pause(a); //"l"
chars(13); pause(a); //"m"
chars(25); pause(a); //"y"
chars(0); pause(a); //" "
chars(1); pause(a); //"a"
chars(14); pause(a); //"n"
chars(4); pause(a); //"d"
chars(0); pause(a); //" "
chars(3); pause(a); //"c"
chars(1); pause(a); //"a"
chars(12); pause(a); //"l"
chars(13); pause(a); //"m"
chars(0); pause(a); //" "
chars(1); pause(a); //"a"
chars(14); pause(a); //"n"
chars(4); pause(a); //"d"
chars(0); pause(a); //" "
chars(16); pause(a); //"p"
chars(12); pause(a); //"l"
chars(5); pause(a); //"e"
chars(1); pause(a); //"a"
chars(19); pause(a); //"s"
chars(1); pause(a); //"a"
chars(14); pause(a); //"n"
chars(20); pause(a); //"t"
chars(0); pause(a); //" "
chars(6); pause(a); //"f"
chars(15); pause(a); //"o"
chars(18); pause(a); //"r"
chars(0); pause(a); //" "
chars(20); pause(a); //"t"
chars(8); pause(a); //"h"
chars(15); pause(a); //"o"
chars(19); pause(a); //"s"
chars(5); pause(a); //"e"
chars(0); pause(a); //" "
chars(23); pause(a); //"w"
chars(8); pause(a); //"h"
chars(15); pause(a); //"o"
chars(0); pause(a); //" "
chars(8); pause(a); //"h"
chars(1); pause(a); //"a"
chars(4); pause(a); //"d"
chars(14); pause(a); //"n"
chars(42); pause(a); //"'"
chars(20); pause(a); //"t"
chars(0); pause(a); //" "
chars(8); pause(a); //"h"
chars(5); pause(a); //"e"
chars(1); pause(a); //"a"
chars(18); pause(a); //"r"
chars(4); pause(a); //"d"
chars(0); pause(a); //" "
chars(20); pause(a); //"t"
chars(8); pause(a); //"h"
chars(5); pause(a); //"e"
chars(0); pause(a); //" "
chars(19); pause(a); //"s"
chars(3); pause(a); //"c"
chars(18); pause(a); //"r"
chars(5); pause(a); //"e"
chars(1); pause(a); //"a"
chars(13); pause(a); //"m"
chars(0); pause(a); //" "
chars(1); pause(a); //"a"
chars(20); pause(a); //"t"
chars(0); pause(a); //" "
chars(1); pause(a); //"a"
chars(12); pause(a); //"l"
chars(12); pause(a); //"l"
chars(41); pause(a); //","
chars(0); pause(a); //" "
pause(200);}
if (@2 == 1) {
chars(2); pause(a); //"b"
chars(21); pause(a); //"u"
chars(20); pause(a); //"t"
chars(0); pause(a); //" "
chars(14); pause(a); //"n"
chars(15); pause(a); //"o"
chars(20); pause(a); //"t"
chars(0); pause(a); //" "
chars(3); pause(a); //"c"
chars(1); pause(a); //"a"
chars(12); pause(a); //"l"
chars(13); pause(a); //"m"
chars(0); pause(a); //" "
chars(15); pause(a); //"o"
chars(18); pause(a); //"r"
chars(0); pause(a); //" "
chars(2); pause(a); //"b"
chars(1); pause(a); //"a"
chars(12); pause(a); //"l"
chars(13); pause(a); //"m"
chars(25); pause(a); //"y"
chars(0); pause(a); //" "
chars(15); pause(a); //"o"
chars(18); pause(a); //"r"
chars(0); pause(a); //" "
chars(5); pause(a); //"e"
chars(22); pause(a); //"v"
chars(5); pause(a); //"e"
chars(14); pause(a); //"n"
chars(0); pause(a); //" "
chars(22); pause(a); //"v"
chars(5); pause(a); //"e"
chars(18); pause(a); //"r"
chars(25); pause(a); //"y"
chars(0); pause(a); //" "
chars(14); pause(a); //"n"
chars(9); pause(a); //"i"
chars(3); pause(a); //"c"
chars(5); pause(a); //"e"
chars(0); pause(a); //" "
chars(6); pause(a); //"f"
chars(15); pause(a); //"o"
chars(18); pause(a); //"r"
chars(0); pause(a); //" "
chars(20); pause(a); //"t"
chars(8); pause(a); //"h"
chars(15); pause(a); //"o"
chars(19); pause(a); //"s"
chars(5); pause(a); //"e"
chars(0); pause(a); //" "
chars(23); pause(a); //"w"
chars(8); pause(a); //"h"
chars(15); pause(a); //"o"
chars(0); pause(a); //" "
chars(4); pause(a); //"d"
chars(9); pause(a); //"i"
chars(4); pause(a); //"d"
chars(0); pause(a); //" "
chars(8); pause(a); //"h"
chars(5); pause(a); //"e"
chars(1); pause(a); //"a"
chars(18); pause(a); //"r"
chars(0); pause(a); //" "
chars(20); pause(a); //"t"
chars(8); pause(a); //"h"
chars(5); pause(a); //"e"
chars(0); pause(a); //" "
chars(19); pause(a); //"s"
chars(3); pause(a); //"c"
chars(18); pause(a); //"r"
chars(5); pause(a); //"e"
chars(1); pause(a); //"a"
chars(13); pause(a); //"m"
chars(41); pause(a); //","
chars(0); pause(a); //" "
pause(200);}
if (@3 == 1) {
chars(4); pause(a); //"d"
chars(9); pause(a); //"i"
chars(19); pause(a); //"s"
chars(3); pause(a); //"c"
chars(15); pause(a); //"o"
chars(21); pause(a); //"u"
chars(14); pause(a); //"n"
chars(20); pause(a); //"t"
chars(9); pause(a); //"i"
chars(14); pause(a); //"n"
chars(7); pause(a); //"g"
chars(0); pause(a); //" "
chars(20); pause(a); //"t"
chars(8); pause(a); //"h"
chars(5); pause(a); //"e"
chars(0); pause(a); //" "
chars(12); pause(a); //"l"
chars(9); pause(a); //"i"
chars(20); pause(a); //"t"
chars(20); pause(a); //"t"
chars(12); pause(a); //"l"
chars(5); pause(a); //"e"
chars(0); pause(a); //" "
chars(16); pause(a); //"p"
chars(5); pause(a); //"e"
chars(18); pause(a); //"r"
chars(9); pause(a); //"i"
chars(15); pause(a); //"o"
chars(4); pause(a); //"d"
chars(0); pause(a); //" "
chars(15); pause(a); //"o"
chars(6); pause(a); //"f"
chars(0); pause(a); //" "
chars(20); pause(a); //"t"
chars(9); pause(a); //"i"
chars(13); pause(a); //"m"
chars(5); pause(a); //"e"
chars(0); pause(a); //" "
chars(4); pause(a); //"d"
chars(21); pause(a); //"u"
chars(18); pause(a); //"r"
chars(9); pause(a); //"i"
chars(14); pause(a); //"n"
chars(7); pause(a); //"g"
chars(0); pause(a); //" "
chars(20); pause(a); //"t"
chars(8); pause(a); //"h"
chars(5); pause(a); //"e"
chars(0); pause(a); //" "
chars(1); pause(a); //"a"
chars(3); pause(a); //"c"
chars(20); pause(a); //"t"
chars(21); pause(a); //"u"
chars(1); pause(a); //"a"
chars(12); pause(a); //"l"
chars(0); pause(a); //" "
chars(19); pause(a); //"s"
chars(3); pause(a); //"c"
chars(18); pause(a); //"r"
chars(5); pause(a); //"e"
chars(1); pause(a); //"a"
chars(13); pause(a); //"m"
chars(0); pause(a); //" "
chars(9); pause(a); //"i"
chars(20); pause(a); //"t"
chars(19); pause(a); //"s"
chars(5); pause(a); //"e"
chars(12); pause(a); //"l"
chars(6); pause(a); //"f"
chars(0); pause(a); //" "
chars(23); pause(a); //"w"
chars(8); pause(a); //"h"
chars(5); pause(a); //"e"
chars(14); pause(a); //"n"
chars(0); pause(a); //" "
pause(200);}
if (#0 == 100) {
chars(25); pause(a); //"y"
chars(15); pause(a); //"o"
chars(21); pause(a); //"u"
chars(18); pause(a); //"r"
chars(0); pause(a); //" "
chars(5); pause(a); //"e"
chars(1); pause(a); //"a"
chars(18); pause(a); //"r"
chars(19); pause(a); //"s"
chars(0); pause(a); //" "
chars(13); pause(a); //"m"
chars(9); pause(a); //"i"
chars(7); pause(a); //"g"
chars(8); pause(a); //"h"
chars(20); pause(a); //"t"
chars(0); pause(a); //" "
chars(8); pause(a); //"h"
chars(1); pause(a); //"a"
chars(22); pause(a); //"v"
chars(5); pause(a); //"e"
chars(0); pause(a); //" "
chars(2); pause(a); //"b"
chars(5); pause(a); //"e"
chars(5); pause(a); //"e"
chars(14); pause(a); //"n"
chars(0); pause(a); //" "
chars(8); pause(a); //"h"
chars(5); pause(a); //"e"
chars(1); pause(a); //"a"
chars(18); pause(a); //"r"
chars(9); pause(a); //"i"
chars(14); pause(a); //"n"
chars(7); pause(a); //"g"
chars(0); pause(a); //" "
chars(9); pause(a); //"i"
chars(20); pause(a); //"t"
chars(0); pause(a); //" "
chars(2); pause(a); //"b"
chars(21); pause(a); //"u"
chars(20); pause(a); //"t"
chars(0); pause(a); //" "
chars(25); pause(a); //"y"
chars(15); pause(a); //"o"
chars(21); pause(a); //"u"
chars(18); pause(a); //"r"
chars(0); pause(a); //" "
chars(2); pause(a); //"b"
chars(18); pause(a); //"r"
chars(1); pause(a); //"a"
chars(9); pause(a); //"i"
chars(14); pause(a); //"n"
chars(0); pause(a); //" "
chars(23); pause(a); //"w"
chars(1); pause(a); //"a"
chars(19); pause(a); //"s"
chars(14); pause(a); //"n"
chars(42); pause(a); //"'"
chars(20); pause(a); //"t"
chars(0); pause(a); //" "
chars(18); pause(a); //"r"
chars(5); pause(a); //"e"
chars(1); pause(a); //"a"
chars(3); pause(a); //"c"
chars(20); pause(a); //"t"
chars(9); pause(a); //"i"
chars(14); pause(a); //"n"
chars(7); pause(a); //"g"
chars(0); pause(a); //" "
chars(25); pause(a); //"y"
chars(5); pause(a); //"e"
chars(20); pause(a); //"t"
chars(0); pause(a); //" "
chars(20); pause(a); //"t"
chars(15); pause(a); //"o"
chars(0); pause(a); //" "
chars(12); pause(a); //"l"
chars(5); pause(a); //"e"
chars(20); pause(a); //"t"
chars(0); pause(a); //" "
chars(25); pause(a); //"y"
chars(15); pause(a); //"o"
chars(21); pause(a); //"u"
chars(0); pause(a); //" "
chars(11); pause(a); //"k"
chars(14); pause(a); //"n"
chars(15); pause(a); //"o"
chars(23); pause(a); //"w"
chars(37); pause(a); //"."
pause(200);}
}