/scan 1, cn, scan 2 s1, zero ldl zero ucd zero num zero psi zero chi zero g zero r zero cm sett fc, 40 sett fu, 100 s10, call rch store chr trze s11 tgrec 20, s11 s12, step1 psi test1 ldl, s13 sett ldl, 1 s13, testnl chr, (20, s14 clear s14, store dig load num x10dec addi dig store num goto s10 s11, test0 ldl, s15 zero ldl test0 ucd, s17 tgrec 1, s16 move num, n2 goto s16 s17, move num, n1 store n2 zero num s16, step1 ucd s15, test0 chr, s18 trel (21, s18 step1 chi step1 psi load chr ftrel (73, s19 ftrel (27, s1a ftrel (51, s1b ftrel (67, s1c trel (33, s1d goto s10 s19, move fc, fu s1a, halfof fc goto s10 s1b, step1 r goto s10 s1c, step1 g goto s10 s1d, step1 cm goto s10 s18, step1 tc move chr, trm test0 psi, te load ucd addi cm trze pc test1 chi, s1e test1 ao, ps testnl tbc, (1, s98 move n1, bc1 s98, testel n1, bc2, te complaint flexo bbl move n1, bc2 goto te s1e, zero ao load r tlesc 2, s1f complaint flexo tmr sett r, 1 s1f, load g tlesc 2, s1g complaint flexo tmg sett g, 1 s1g, load cm tlesc 2, s1h complaint flexo tmc sett cm, 1 s1h, load cm addi r addi ucd tgrec 2, s1y test1 cm,s1s load r addi g addi ucd subt (2 trmi s1x trnz s1t test0 g, s1t sett rt, 1 goto sli s1s, sett rt, 2 goto sli s1t, zero rt sli, test1 r, s1k test1 ucd, s1j load (2 goto s1l s1j, clear goto s1l s1k, test1 sid, sk1 load nl lookup not band (117777 addi (400000 store t1 load nl putback not, t1 sk1, load (1 s1l, store lt test0 rt, s1n tgrec 1, s1m sett tim, 2 goto s1o s1m, testm tim, s1w goto s1o s1n, sett tim, 100 sett t2, 1 move n2, t1 trze s1v tgrec 100, s1v s1q, halfof t1 trze s1p halfof tim halfof fu double t2 goto s1q s1p, testnl n2, t2, s1v test1 fu, s1o complaint flexo dtu s1o, load tim halve store fc goto s2 /scan 2 s2, zero fu zero sr zero 3i zero si zero aci zero acc zero et zero ete call rrc s20, call rch store chr trze s21 tgrec 20, s21 goto s20 s21, load chr search s2z, 25, s20 dispatch s2y s2b, sett sv, 200000 goto s2a s2c, sett sv, 400000 goto s2a 2sr, sett sv, 20000 goto s2a 2ss, sett sv, 40000 goto s2a s2d, zero sv s2a, stepa si, 1 goto s20 s2e, stepa sr, 14 goto s20 s2f, istepa sr, 14 goto s20 s2g, sett 3i, 100000 goto s20 s2h, testm aci, s24 step1 acc goto s25 s2i, testm aci, s24 istepa acc, 1 s25, sett aci, 1 goto s20 s24, complaint flexo nor goto s20 s2j, testel aci, (1, s26 s27, sett aci, -1 goto s20 s26, complaint flexo nor zero acc goto s27 s2k, load (1 goto s28 s2l, load (2 goto s28 s2m, load (3 goto s28 s2n, load (4 goto s28 s2o, load (5 goto s28 s38, load (6 s28, store et test0 ete, s29 complaint flexo tme s29, move et, ete goto s20 s2p, step fu, fc s2q, halfof fc goto s20 s2r, test0 si, s51 trel (1, s52 complaint flexo tms s51, move ss, sv s52, test1 cm, s69 move 3i, ccc 2s3, load tim addi fu store nft store nfp test1 g, 2s1 zero gi test0 rob, s2s load nft subt rob store nft tlesc 2, 2s2 22s, zero rob goto s2s 2s2, load nft tgrel rob, 22s move nls, nl zero rob complaint flexo itg goto 2s3 2s1, step rob, tim sett gi, 1 goto s2s s69, move nfp, nft test1 3i, s2t move ccc, 3i s2t, test0 fu, 2s4 complaint flexo tic 2s4, test1 g, 2s1 zero gi s2s, test0 lt, s2u tgrec 1, sv2 load aci addi ete trze s2w complaint flexo air s2w, sett tne, 200 goto s70 s2u, load n1 addi sr addi st store ton trmi s40 tlesc 44, s2v s40, complaint flexo uat goto s2w sv2, testel tne, (200, s70 s2v, test0 aci, s31 load ton lookup nt addi acc store t1 tlesc 2, s41 load t1 tlesc 77, s42 s41, complaint flexo aor goto s2w s42, load ton putback mt, t1 s31, load ton lookup mt addi tll store tne tlesc 2, s40 load tne tgrec 76, s40 load tne x2to7 store tne s30, test0 ete, s70 test0 3i, s71 s72, complaint flexo etr goto s70 s71, load ete lookup ebl-1 subt nft trze s99 complement s99, store ex trpl s73 s79, complaint flexo eit goto s70 s73, load ton addi (1 lookup mt addi tll store tnf tlesc 2, s39 load tnf tgrec 76, s39 load tnf x2to7 store tnf load ton subt (1 lookup mt addi tll store tnd tlesc 2, s39 load tnd tgrec 76, s39 load tnd x2to7 store tnd load ete dispatch ebd-1 s81, load (2 addi tne call cn load (2 addi tnd call cn goto s75 s82, zero cut goto s76 s83, sett cut, 4 s76, load nft band (3 trnz s79 s77, load nft subt cut trze s78 load (2 addi tnf call cn load (2 addi tne call cn stepa cut, 4 goto s77 s84, load (400002 addi tnf call cn load (400002 addi tne call cn load (400002 addi tnd call cn goto s75 s85, load (2 addi tne call cn goto s83 s86, load (1 addi tnf call cn load (1 addi tne call cn load (1 addi tnf call cn s75, load ex addi (2 addi tne addi sv call cn goto s32 s78, load ete dispatch ebe-1 s93, load (2 addi tnd call cn load (2 addi tne call cn goto s32 s95, load (2 addi tnf call cn goto s32 cn, answer cnx store nf call snl putback not, nf cnx, exit cn s39, complaint flexo eor s70, load nft addi tne addi sv addi 3i call cn test0 gi, 2sa test1 gis, 2sb sett gis, 1 grow nl, -1, nls goto 2sb 2sa, zero gis 2sb, test0 3i, s32 load nft x2to1 store tu goto s33 s32, load nft store tu x2to1 addi tu store tu s33, step mm, tu move si, sid goto te s2z, 22 /s 43 /l 65 /e 61 /a 62 /b 63 /c 57 /( + 54 /- 55 /) = 64 /d 44 /m 45 /n 47 /p 24 /u 26 /w 73 /. 27 /x 21 // | 00 / space 50 /q 70 /h s2z+25, s2y, s2b s2c s2d s2e s2f s2g s2h s2i s2j s2k s2l s2m s38 s2n s2o s2p s2q s2r s2r 2sr 2ss s2y+25, ebl, 6 /d 4 /m 10 /n 10 /u 4 /w 5 /p ebl+6, ebd, s81 s82 s83 s84 s85 s86 ebd+6, ebe, s32 s32 s93 s32 s95 s32 ebe+6, start