1/1/1 102       // literal 0x66
18/0/0 3        // shift it up 3
1/1/1 1638      // radix word now in A
2/0/0 173       // store (A) in 173 short, clear A
0/0/3 173       // set radix
1/1/2 19        // subtract 13 from zero A decimal
3/1/0 170       // store (A) in 170 long
3/0/0 172       // store (A) in 172 short
1/1/3 166       // unimplemented instruction
  6/0/3 1638      // radix word