mREC COM.lICNVSM REC18CNVLIB RECi1MAZE CNVETOUR CNVMAZE RECTOUR REC(DODEC TOUѳDODEC ASM#DODEC COMMAZE DQC(@d*D~/O#~/GZ^#V!*Ds#r#"F2s#"F2s#r#"F*F*D{OzG+V+^{̳}o|g}|*Dy Nwy#o*DMD2  s#r#*D"D "F*D^#VZ^#VZ^#VZ*D*F}o|gZ{zijxijy  ͳww#w&*ͳw#DHͳwN#F^#V!Bxijyʁʅͳ~/w~/_#~/Wr+s͔*D~w#~w*D~w#~wZͳZ#Z>)i`)MD=>))#  =GҬAڙ7xPY~ xzG{O*DT] "Fbk>H~#~w# x>^xGyO+~w+ xkx`i DM#"Fͤͨ x‘^Ɛ'@'+w*D^#V*D~_w#~Ww2w#"F*D^#V*D~_w#~Ww2w#w#"F#*D^#V+ "F2 "FF-͛ ZZ^#V r+s ~#~#ܳ Z~#~#ܳ q#p# Z͛*D^#V^#V*Ds#ryʳ#*D^ù*D^#V*8*Ds#r#"F*H4Z*H+p+q"H2"F*HN#F#x̳ "F"H*HN#Fx̳ "HZ "Fy#"F#*D#6#"F44*D~Ow#~Gw#"F*D4"bZ!9xž2s#r#"F*b~#·Z##^#V!*bV+^*b*DN#FZ*D^#VZZMDyx#yxw#yx+w y%x#y5x#-yw# >yw# Jyw# Vy~/w# b*P*LÃ"N}O|G4*L#*P}|*N"L"N*N}_|W*J{z"L*J*L+}|"L͵*N*Lͦ"N*PMD*L"P*R*P*P"L"N"P*P{OzG4LK ͒KLK*FDM*D*LZ*P}|Z"N*N*L {zZ*D*L "L*D*Fè*L"N*PDM*L-Z"^*FDM*^yxZ"N*^"L*D*^#ð*N"L*D*F*R*PÜ*P"P "N*D*LZ2*L"N(*J"L*D*F}o|gZ*D*LDM*FÃ`iyx*L# yj"NZ*P|}~ ~]Tͭ*N4*L4*L*N2*L*D "FyZ 2J "F! } *D!J Z*Dͺ"J"L "N"P"R*L*N"L͒< *L"N"L"L*L*N"L͒Y "L"L! }*Dʘ ^#V*J{zڒ *P}|ڏ *N{zҒ "N"LN#F#y_#xW*JyxZ*P}|Zi`"L"N*N"L2*P"N = 2  *R*PÜ*NDM*P*R *R|}*J|}"Ri`"P*L"J2= *R^#V{̳#N#F#"J*P"P"R~#!} O! ^#V"u *4*2*0!"4"2"0*0 * *4 "4* >  ͹ *2 "2"0|  * "2*4 "46#* *4 "2"46#s#r#}Ns#Fri` *2 "2!"0"2"4͹ !u ''"p K ͹ !u '"'V e +p+qN#F# 2 "F'][̔ Ô ͹ '͢ ͽ o'͎þ gO>G*:~ _#V# | ## DMù ͹ ' ͹ ͙33F  3 & W F ͹ s#r#}/o|/g#DM)) )o$o&'͙; K 2w#w#"F#*F6*D!ʌ ͙; } *Ds#r#"F#yʴ ^=ʴ #V+>0! ! ! !     w#"Fi` < w#>0采O  *6 N#F#DM'({[̔ & '͎7  7 : Z& *>*>: *@Ð">r | ">">>KB  *0!"0#& : '}ʿ ͎ä *8 Ú s#ri`+))9 y6*#w#w#6#6#6!#w#w#6"#w#w# 6#s#r#6###6#6##6##6##6#s#r y@6#6#6"#s#r#(6#"0}Rs#rq#p+++r+s6#33~#@ƒy}~Z*8 ^#V! :Ҭ0ڬ0{z33!`~#"`*`!"`{2s#r#"FZ###*D*F}O|G {z {zyw # y +w*H+*DÖ*H+*F##Ö*D*Fs#r#"DFZZ*D+V+^{̳"F"D*V*TÁÊ~#"T*V*T   !"T+^#"V*TÓ~#"T REC80> $ $!6~##"T"V!"(O$_2*w#"F*Dͺ6/Z*F*D{>z~-#6*Dͺ{~#R*D~2Y2Xw#"F*DFZ~2\x[*DN#F*D+V+^^#V*Dw#6 !]> w#³*D~@2\Z*D*F!] !e> 6R#6E#6C:] !"T"V!h>w#\*V*T@\Š!"V!"T~#"TL  \*P *LN  *L#"Ni 4 L i xx!Rdß!Cpß!PDß!WS"  ovfl$*>"ByZ y³">y! y y³!o"(y *>*@+^#V"T "V'ͬ!$!!"(I 44*B">nn z[  / FA n n 4 nn nn X W W W W W W W W W W n n  =  f     L     2  Z 9  k h   - /  B J ^ n ; n   m  X   p  t b (     x L   Q   ;  _  n nn i nEz'JZ z< Z>: Jj%Z< pGED?J>4 Iz jJ/>< ^^QDFD3nL&S$LLW$r$S*&LQqLJ< I< TL)!!8d6*7~@w> çE>*>M>C>UͧE6*7#{G#^#V#^#V"Y8ͪ"7#~ >IçE!v8"t8*t86!v8~G#^#Vm !2EIdW7 end main July 6, 1985',CR,LF,'$' ,*6+6+"R!d"<">{_zWzW{_‡"@6#6#"D"F"H6#6#"J"L"N"P!dw#w*""""%:] !"(4 I*LO  "P*L#"L"N\*P__*J"Lɷ =_.:;<>'G Q!\Qʁ@G*N~:xÁxw#ͩG.ŸͩGâ'*ʾw#é? q#*L+~> 5*N~#"N>?*J"L"N"P *<*@`i"G*D*H`i"Z*J*R`i"m*`i"̀  CPL W ͐̀  PDL W ͐̀  WS W ͐̀  Stk W ͐W ͖x͚ /Z REC(8080)/ICUAP Universidad Autonoma de Puebla July 6, 1985 $͐̀  Stk W [CNVSM.REC] [13 July 1985] { ($m33cmpw0%(f:;)wnnS;) F { ((' 'ED:;)(' 'FjJ<;Z<;) @d(@m;Z'.'IJj:)@x>JZDI;) n (j':'UQD':'ED\64-%;0%;) d ('.'U<(8a;@b;)Q|D>;) m ('.'FJDZ(3a;@b;)Q|;) x (Zz(d' 'I:;)JZ;) b (@nA' 'E'No file given'TLxM;B 9aQpG'REC'|m (Z3b' 'E'CNV';Q;)|mJZqtD 30@F 31@F n30$rS 30@f n31$rS 31@g31@e ;) } G ( @p'.'=:L@y:(@p'.'=:0=;e26%(f:;)@pL;L;) 31$r16k ;) H (R26%='';T127%(=)(@J|;L@J;);) J (jJ<(@p'.'=:0=:L;)Zz>;) P (')'Ez;'<(>'Ez:'<)>'Ez: '(QUO'EzABQzFzA:'('Ez@d:A:) d { (39%I;) q (50(b;J;)@&qt@&'Stx err'TLxM) X (zZ<(','E;'<(>'Ez:'<)>'Ez:'<,>'Ez: '(QUO'EzABQzFzA:'('Ez@d:A:)jJ>;J>) r ('('E;'<'E;','E;A:) h ('<<'E'>>'VD;) x (('%'EQDZ;'';)m''(z@q3bjA@qZQ|D:;) DJj(n''='@';L'x';)IZQ|DI;) l ((@h@x:;)'('EDZ<@dBD' 'IJ>(@h@x:;)','ED;@X) n (I;) m (@s;"''"IIQ'x)'Iz;) o (' '=' ';) s (qLJ'ED(1b'D'ED;@X) ((@x:;)'<=>'ED'QI'Iz:@c;)>;@c>;) p ('('F'Jj'I@r<@b> zZ','FD'JZD'IzZ<@dBjJ> @p';'Iz')'Fz;@X) a ('('FD'{'I '('FDZ<@dBDJ><(@hzZ<@dBj';'IjJ<@b>>:;)> '('FDZ<@dBDJ><(@hz'JZD'Iz Z<@dBj';'IjJ>@pz:;)> '('FzZ<@dBD' 'IJ> '('F (@sD;pGI<(A' 'FD'x( 'Iz:;)'('Iz>;) ('('Ej(@s;'@;'Iz;)Z<@aZz>: ')'ED';)'Iz;A:;) (@sL;'@;'I@m';)'Iz;) ')'FD'}'I z ;) } t { (1b39%ED;39%I'Ez'Iz;) E (1b39%ED;39%I'(Fz;Zz<)'Iz;) F (I;) ) (z @x: '<['ED @E']>'U<(QOL>'(a;L)z'Iz; Lj'j<'Iz@c>'JQD>(Oa;L)z'Iz;)']>'ED@q : '<:'ED @E (':>'U;@X) (Q''=@X;L<@l>;) ':>'FD@q : '<-->'ED @E ('(('I@qzZ (AB('<>'ED))3bD'Zz'Iz@b; <(@hj;;)>@F 'Z<'Iz@b'>;J>);A:)'I;) ; '<(>'ED '('I : '<)>'ED ')'I : '<,>'ED ','I : '<()>'ED @E "'('Ezx*"I'()'@I@q : 10044[<']ED'>'ED@E'39%Ez'I@q : 8764[<"] ED'>'ED@E'34%Ez'I@q : '<>'ED @E(2b'Zz'E;3b'(A)'E;'(A)'I;)@q : '<'ED @E '>'UQD'>'ED Z<((@hjJ>Qj)J>Qj ''=I'x]'I; ''=('<>'EDI'x](A)'Iz@b;''); ' {[vbl] ('Iz @b ';) # ('I (''=I'x<'I;@qI@qI'x>'I;) ';)}[vbl] 'I ;) ; '(DEF,' @) ' {[def] ('Iz (@, <@b>';) 'I> @, >' ('I: <@b>';)}[def] 'Iz>;)@q : '(ITR,'ED @E '([ITR] Z<'I zZ<@dBDJ><@b>'>:J>;)[ITR] 'I@q : '(itr,' @) ' ([itr] Z<'IzZ <@b> '>; J>'II <@b> ':) [itr] 'I ; '(OR)'ED @E '()'I@q: '(OR,' @) ' {[OR] ('IzZ <@b> ';)& (Z'@&;x{Jl'I>: <@b>'@&;x{)L>;>)} [OR] 'Iz>;) ; '(AND)'ED @E @q: '(AND,' @) ( @, QD ' [AND] Z<(l'II<@b>' jJ><'I> ( @, <'<>'IJ@b>'J'I>: <'<>'IJ@b>';x{>)L> [AND] 'Iz;); JZ@b;)> @q: '(and)'ED @E @q: '(and,' @) ( @, QD ' [and] Z<('II<@b>' jJ><'I> ( @, <'<>'IJ@b>'J'I>: <'<>'IJ@b>';>)> [and] 'Iz;); JZ@b;)> @q: '(or)'ED @E '()'I@q: '(or,' @) ' [or] Z<('I ( @, <@b>'; J'I>: <@b>';>)> [or] 'Iz>;) @q: '(NOT,'ED @E'[not] (Z< 'I zZ<@dBDJ><@b> 'J>)J>[not] 'I(zABj('<>'ED);'Zz'I;)@q : '(nor,'ED Z : '(QUO'ED @E ABQD@qZ< jA("''"%FQD@E'39%Ez'IIz:;) JjA('""'%FD@E'34%Ez'I@qz:;)Zz>')'ED@E@q : '(DEC,'ED @E ')'FD'%Ez'I@q : '(HEX,'ED @E ')'UQD')'ED@qI@q'HEz'I@q : '(^)'ED @E'0%31%Mz'I@q : '(^'ED @E ')'UQD')'ED I@q : '(IVL'ED @E ABQQD@qFD@q @qFD')'ED@q'Mz'I@q : '(LAM,'ED @E @n'{('I@o@m';); ('Iz Z<@dBDJ><@b>'@;;@;)}'I@q : '(PWS)'ED @E'2573TLZqtj'I@q : '(PWS,'ED @E'2573TL'I@q')'FD@q'TLZqtj'I@q : '(HLT)'ED @E'RL'I@q : '(HLT,'ED @E'2573TL'I@q')'FD@q'TLRL'I@q : '(NOP)'ED : '(NOP,'E ')'VD : '(PVR,'ED @E ')'FD"x_"I'v '@I@q: '(<)'ED '<'I : '(>)'ED '>'I : '('Ej@EAZ<@dJ>B<@cz>BjBD'JZQD'IzA'Ez'I@q: A:@E;) B (j@q@Bz;)} b {(1b39%ED;39%I'I'I;) Q (Z<@dBjJ>;>) 1 (I;) k ((@n@s;'{('I@o';);('I;);) ; ((@s;'@;'I;)'Jj'ImpGIn(@r;@X)<@b>z ','EDm&pGI&n'JZD'I;) . ((@sL;'@;;)}'I@m;)LL@q;) f (z @x: '<(>'ED'('I: '<)>'ED')'I: '<,>'ED','I: '<=>'ED@QJ<(2b'z<'Ej:'z~'Ej: 12b"{(Jjx|;) ~ ("Ej: (z2b('JZ'E;'QI'E;); 3b('JZD'E;'ZQD'E;'QQD'E;)AAj; 'JZQ'E;'ZQQ'E;'QQQ'E; 'QIQ'E;'IQQ'E;'z'I'I;@X)@q: 10044[<']ED'>'ED@Q'39%I'I@q: 8764[<"]ED'>'ED@Q'34%I'I@q: '<'ED@Q'>'FD'x['I@q: '(<)'ED'<'I: '(>)'ED'>'I: '(^'ED')'UQD')'ED@QI @q: '(LAM,'ED@Q@nZ<@dBDJ><@c>@o@m@q: '(QUO'ED @Q zABQD@qZ< jA("''"%FQD@Q'39%I'IIz:;) JjA('""'%FD@Q'34%I'I@qz:;)Zz>')'ED@Q@q : (('(IF,'E''pG;'(NF,'E')''(';)(D@1;@X); '(if,'ED''pG'(),';'(nf,'ED')''(''(),';) @Q'z<'IzZ<@dBjJ>qLJz','EDI@;'('I (@.(@r@p';JZD'Iz;@p';;'Iz;) ','ED((@r;;)@pz','ED;';'Iz): >')'Ez'Z>'I;@X)@f: (('(WHILE,'E''pG; '(UNTIL,'E')''(';)(D@1;@X); '(while,'ED''pG'(),'; '(until,'ED')''(''(),';) @Q'z<'Iz Z<@dBjJ>qLJz','EDI@; ('('I@.(@r;@X)QD','ED'z~'Iz (@r;;)qLJ'Z>'IZ>':'Iz','ED (@rj';)'I;j'JZD'IzZ@p): >';'Iz')'Ez'Z>'I;)@f: ('(%V,'E'V '@I'xV';'(%W,'E'xW'; '(%H'E1a','U<@i@lJQD>ABB;)D@Q'z~'Iz (@1Z<@dBjJ>qLJ;<','IJQD>;) J<('z~'Fz:;)BD'<'IIqLJZ I'Z>'Iz>')'ED@q: '(%R,CTR:'(Ej) '(%R'ED@Qz(','ED;;)Z<@dBDJ>QD ("{(Jjx|;) ~ (z"I''=; mqL'}x~Z>''<'Fzn@kqLJ0=FzL; mFYn<"x|"FQDm@k'xRA'F'BD'I'x~'FD' 'I;I>;)0=Z>; Z2bj2bD4bjqL&A'JZD'I@k@p0=Yj'x~'IZ>; &Yj'JZD'II@pZ>;)@q: '(@' ED (')'ED@Q3b'JZD'ED;@X) '@@'I@q: '('ED@Qz')'(V;@X) ('z<'Iz@c (''='JZD>'I;I<@i@l'Z>'I>;); j'z<'Iz')'U<@i@l'Z>'I>')'FD>;)@q: ')'ED; A:;) C (j@q@C@Q;)} c (']'Ez;'['Ez@j:A:) j (@h$r15K(255=22K255='Dir full'TLxM;;)LL;) e (@h$r15K(255='Not Found'TLxM;;)LL;) f (@h$r19k;) g ('080'H26k;) h (Jj26%EZD0;128aqL26k31$r 21K(0=L;1='Dir full'TLxM;'Disk full'TLxM) D'.'T;) p (" ~ {((Jj':'UQD':'ED\64-%;0%;) ('.'U<(8a;xb;)Q|D>;Z'.'IJj:) '.'FJD(3a;xb;)Q|JZDI;) u (255='Not Found'I;) v (Zz(d' 'I:;)JZ;) b (w0%(f:;)w;) - (cmpx-n;) 0 (128,26k;) 5 (x+'[[]]'TL;) Q ((B13%ED;;)J(10%FD:;)Z;) ~ (13%Fz;26%F((2b);J6666EA;zBj;)z;) | (|0|0|0|pLpGnpG6-mSpG8+n&S;) 3 (x00x3;) ` (mx0n&mx0nx3;) z (30$r128eqL26k20K0=L;DLL) y (('L/'FDZ<(' 'FjJ;;)QD> ((B;;)' 'ED;;);'';)mZ 188@0pG66-,127$Sx! 'uvb-05Q~|3`zy'I@i 33@0pG30$SnI <@u(A' 'EZD'CNVLIB REC'I;;)JQD>&S @5,30$r15K(@vu\64+%':'|&11G|':'|TLqt_;LL;) '[!!]'m'()'p''C32$SLLZz;) x (&pG8+0&SrSJZD>;) q (31$J(('TTY:'E;A)' ''05D'HS;;)Zz '05C'H12GIzZ<(J@|J>JZD;QDlyw&FwJZD>;w:):Z;) >J<'[!]'FDBQD\pG+127$r+mJq32$rC mpGlyG-'w'$r'x'$r- (NLnLq'x'$rC&'x'$SnS;32$SnnS;)D::) w (@x<<@w>JZD>J'Next: '32$r!|TLxQ (A;{(Jx|;) ~ (xR;;)}x~;);)} % (@%@~xTxE;) } "I <'[[]]'FDnIZ'[!!]'FDIZ>;) u ( 12(d(@y;;):;) J('.CNV]'FD'.REC]'Iz;;) ('[Include 'F']'UQ;'';) J('[Exclude LIB]'Fz'LB';'';) ('[['F']]'UQD;'cnvsm/icuap/1985';)mmm ('('Ej;2573pG|pG|E4b2aD;'['Ej;A:;)@P '{'I ('['E@&qtzZ<(@jJqtz;@kJ:)>: '('EzZ<(@d;@kJ:)J>B't'TL<@K>@t@P: A:@y:;) J(26%FZD;Zz;)((B);'}'Ez;:) (nn'LB'='} ['I I']'InL;L'u'TL@u;)@P @H ;) w (''('MEM:'F'm 'J;;)('CTR:'F'c 'J;;) ('NUL:'F'n ';;)JZ(''=;@I:);) K (q|&nZI<(pGFL;ZI;)JZQDm>Y;) I (('&'(E)'#'(E);j'%'IZ'&'IjJ;)QZI< '%'(ED(A;@X)B)D>;QD' 'I(pGABQD|@I:LL;)>J;) i (128(e)'WS ovf'TLxM;qL26k30$r20K0=L;DLL@h) y (_) M (@y;'Stx err'TLxM;) k (2573TL;) & (30pGm$rm 31pGm$rm 'cnvsm.rec> 'TL @G @w JZDLLnn$Snn$S;)} [end] [CNVLIB.REC] [13 July 1985] [H ]{ [HiHhHs](4/&LpG+;)/ [Hi](pGr&^^rq(4=L;LL)mpGr^^pGndN(&pGm+^^QHD;nL)&SnpGpGr^^&S@u;LL;)i [Hi](pG^^pG127$S-1&SpGrpGm+^^rpG [Hi](lyG@/pGm127$r+rpGm&Nnn&n127$r+SmpG:nLnL127$rpG0&Sn+S;);)u [Hr](rpGpG^^r&r=26%IL;^^pGm&^^pGmSnn+r!I;)r [Hh](rpG^^127$SrpGm@/0=nL;(@d2-,0=;:)@e;)h [Hs](rpGrpG2NLL;m^^127$S@e;)s [HhHs](127$rpGm^^pGrnlyG+pGrmSn&Sn2-,2=;m2@dL:)e [HhHs](pGpG127$r+r&(pGlyG@/NpGpG+pGlyG [HhHs](=;^^pGm127$r+rmpG127$r+rn&NnL;Ln;) [HhHs]mmpGn&lyG127$r+r&(NnL)127$r+lyG127$r+r&Sn:;)127$r+S;)d [H ](m(Jj','U;Z;)<('MEM:'(E)>;0xf0=xc>;&Lxj^^n@@0m;)nL;)}H[!] [X ]{{(128az;L)~ (31x[xRABD;)} R [X ](pG^^pGr0&S^^-1&SpGr12+,21x-15Kxv;L) o [X ]((mmpLn=n;LmmL0npLn&mpLn&Sn)@oxc;'Not Found'Exc;) t [X ](^^rr0=255xv;@@;;) d [X ](@t;@r;;) l [X ](@t;@d;) x [X ](@t;32$r&pG@rLL;@d32$S;) v [X ](pGru'@'+':'|&8G|'.BIM'|pGmImxf(0=;pGxc;) [X ]@oxcnLnL;nn30x(31x(ml31$SpGr30$S^^r0&S [X ](0,32$rCpG128&(N;LL)wD(xy:JZqD(xy)pGe;LLw) [X ]mmwn32$rpGn+32$S30$SpLpGrd&S [X ]((A)@R;J1aQD8(dmpG\pG+%m128% [X ](NpGpGr30$r+&S;;)uLnn:L;)pLr^^32$rN:);;)LnL2x:) r [X ](m(J(A);'.'F;Z'.COM'I;)pLm-1m'r'xqJZDnLnL;n&n@@;)} X[!] [Z ](0,13k;) Z[!] [L ]{ [Lr](0,25K64+%IL;) r [Lw](Jj(AB;'A'I;)QZD\65-,14k;) w [L ](@@;)} L[!] [B ](ZQDH;L0;) k[!] [B ](Jj','U3axhJQDpLnx5;) a[!] [S A ](xaK(xv;128pGGI(d32aD:;) [S A ]32a;)LLzZDJ;) $[!] [S ](17x$;) S[!] [A ](18x$;) A[!] [D ](19xakL;) D[!] [S A D N ](0pG|I;) h[!] [N ](Jj','UxhJQD','FDZxhJQD&|pL [N ]23K(xv;L;)LL;ZD;) N[!] (xE_) M[!] (31$r;) 1[!] ( [c ]'CTR:'E; [m ]'MEM:'E; [n ]'NUL:'E; ) 2[!] (Jj'TTY:'EQZD;(x2z(8azZD;xb;)JZ;xu;) x1(pGr12GE; 6+pGmr0=( [c ]'CTR:'EZ16x`; [m ]'MEM:'EZ(0=1024;;)4+pG3-n&mm [m ]12xzpG4+n&S; 130,33xz;)pGQ&rS0;nL:)D;) f[!] (^^rpG^^128w26%(f:;)w128&S;) 4[!] [O ](pG('r'=-1;L1;)pGmmmxq( [O ][m ]'MEM:'=(','FDxe;0;)xf(0=;&L;)^^r [O ][m ](n1=pG0&S;L;)pG^^0&S^^!I; [O ][c ]'CTR:'=nLxf(0=;;)x%0&S; [O ]);ZDnLL;) O[!] {(pGr12+21x-pG^^pGr0&S^^-1&Sr15K (xvz;L;)L;) r (pGpG4+1&SrpG19k22kx4;) w (Jx2QnLnL;''(ALxf(0=;'TTY:'(='T');)) ('T'='';Lx1pGr4G'TTY:'=;L)nLnL; (pG4+r0=pGnx5@@nL;nLn=;L'R/W err'TLxM))} q[!] [c ](r14+pG1&Sdd;) %[!] (Jj','U<1m'w'mxq( [m ]'MEM:'=0xfxj(0=;&L;)(^^pGrrmpG^^rn- [m ]q&LpGmNnLL;rpGpG4+&r+mQDnSpGrn+&S;); [c ]'CTR:'=xfxj(0=;;)r12+pGj(','UJZD; LxjqtDx\;);xj','EDZ;;) j[!] (pG^^rpGpGmrpGm-,130+n&m(a)JZQD>nSnSL; QD>ZZ^^r0&S; LpGx4:) g[!] (x5pGpG4+pGrm0&Sn(0=L;-1=r16k;1(N)^^r^^0&S; pG^^rpGr127(N^^26kpGr21k;L;)r16k;) x1=;mpLn(=)L;pL^^pG6+r6+0&Sr(0=;LL;)LL;) c[!] (x1(6+pGr0=;&L:)6-(pG8+rmxcn0=;:);) E[!] [C ](J(A)x1xc;B'NUL:'EZD;xf'TTY:'=;(0=;;)xc;) C[!] [v ](pGx+#'= '|TL(x^'undef';yG;)TL;) _[!] [()](')'Ez;'('Ezx*:A:) *[!] (2573TL;)+[!] [P p ](JZqWx\;) P[!] [p ](xPD;) p[!] (x+JZqtx\;) T[!] [t ](xTD;) t[!] [# ]{ [#f]('0''9'Mz;) 9 [#f](@9:;) 8 [#f][#.](Z<('E'Ez;'D'Ez;)(@a;;)@9@8>;Jj>;) 7 [#f][#.](Z< [#f](@9@8 [#f][#.]'.'Ez;J'.'Ez@9;J@9;Jj>)>@8@7 [#f];) q [#f][#^]('^'Ez;'**'Ez;) i [#f]('*'Ez;'/'Ez;'%'Ez;) M [#f]('+'Ez;'-'Ez;) a [#f](@q;'('Ez@e')'Ez;) t [#f](Z<(@t;J@a@t;>)>(Z<( [#f][#^]@i; [#f]@a;@M;)@t>:Jj>;);) e [#f](127$r5+,127$S;) ( [#f](127$r5-,127$S;) ) [#f](127$r+(pGlyGNInLn@@QD:;) [#f][#^]5/5*&(4=3;;)+ [#f]BQDmm;) c [#f](@e (A) 0,127$S 0m J('+'ED;'-'Ej'0'I;;) [#f]J('(+'FAD:;) J('(-'FAj'0'I:;) [#f][#^]J('**'FD'^'I:;) [#f]J('('ED@(: ')'ED@): Z<@qJQDO>:> @a1@c: [#f][#^]@i4@c: [#f]@M2@c:;) (n0=;Ln@@:) x,;;) f [#f#+](+;)+ [#f#-](-;)- [#f#*](*;)* [#f#/](/p4NL&L;L;)/ [#^](p4(N)'Xpterr'TLL%:L((p2=LpG32767;LLpG00&;)N; [#^]~m-1=-1n;1&@/n;) [#^]1m(dd^^2/&(dL&pGn*m;&;)pG*&:n*;);)^ [#%](mp4NL(np4NL;&m)/L;LpGlyG/(%p4NL;L%\;)\n*-;)% [#|](pGm/L1=nL1;0=n;n&:) | [#|#=#>#<#+#-#*#/#^](<('-'EDZ'-'-1;''1;)m>QDOn*&L;|InL) n [#|#=#>#<#+#-#*#/#^]((pGm(AFj);J(@n); [#|#=#>#<#+#-#*#/#^]ABDZ(@n)jlyGIjx,;n)nLJZ;) 2 [#>#<#=](','@2;L) 3 [#>#<](N'f'I;'t'I;) 4 [#>#<](p4&NL00;L0(='f'I)~32768(=0,1;32768;);) w [#=](@3(@n0);pGm&pGn(N;LL)N't'I;'f'I;) = [#>](@3(@n@w);@4;) > [#<](@3(@n@w);&@4;) < [#p](QOD^#I;L;) p [#m](QOD1-#I;L;) m [#l](QOD\#I;L;) l [#s](QOD%#I;L;) s [#D](QODI;L;) D [#H](QHDI;L;) H [#d](Q#DI;) d [#h](Q!DI;) h [# ]((I<'0''z'M'^'(E)QD>JZ@@;QD>Jj [# ]@2;@@x,;)'&'=;:) } #[!] [& ]{ [&D](('-'=-1;1;)m [&D]0(&''='';O&10*+:;)&n*I''=;L:) D [&H](0(&''='';H\&16*+:;)&I''=;L:) H [&d]((','I''=D;&''=#I;|x,:)J','ED;;) d [&h]((','I''=D;&''=!I;|!I:)J','ED;;) h [&u](''=;I'a''z'MQD\32-%I::) u [&l](''=;I'A''Z'MQD\32+%I::) l [&a](''=;'7F'H*I:) a [&s](''=;'80'H+I:) s [&p](''=;I(' ''~'M;D'.'I;):) p [&n](''=;!I:) n [&b](''=;&|HI:) b [&i](''='000'I;\8/&@08/&@0@0''=;Z','I:) i [&I](0m(''=n%I'';H\n8*+m:Ln%I;)''=;:) I [&8](''='00000000'I; [&8]\@2@2@2@2@2@2@2@0''=;Z','I:) 8 [&8](2/&@0;) 2 [&B](0m(''=n%I'';H\npG++m:Ln%I;)''=;:) B [&i&8](%'0'+Ij;)0 [&>&<](''='f'I;(&''=;&L:)''&) 9 [&=&>&<]((''='f';(&''=;+:)0%='t';L'f';)I;) = [&>&<](@9;'80'H*@=;) > [&<](@9;~@>;) < [&!](JZqD#IL;) ! [&#](0%(&''=;-:)\13/L#I;) # [& ](('!'=@!;m''Zz(BQD:;)n@@;)'&'=;:)} &[!] (p2NLpG(32767N'';0&-'-';)&#|I;L#I;) ,[!] (13%=2573;8%(=) (TRx=|;8%T' 'TLTLLRx=;);) =[!] (-1m'r'mxq( [m ]'MEM:'=(0xf(0=;&L;)^^pGr&^^rm [m ]pGr&^^pGpGrpGn&-dm+^^nwmpGmr-azZDnn [m ](@~''j;26%Z;)mmJQnwIqmLpGrn+&SnI;); [c ]'CTR:'=(xf0=x%0pGm1;r14+pGrmdd [c ]pGrpGn&m;) +&Snx,; [n ]'NUL:'=ZD26%I; L(2573'> '|TL(R3%=xM;x=I;:)@~ZD;Z:); ); (ZpG^^rpGmr(0=(lyGpG128&S^^26kpGr 20K0=L;LL-1lyGS;)lyGr;;) -1=26%InLL;pG130&-lyG+&GI n@~mZqDnSLL;0&S:);) R[!] [V ](Jj','U<('MEM:'E0xf(0=;&L;)^^rpGrm4+n; [V ]xuAQDJQD'@'+;)>','ED [V ]32$rIQzZJ2aQD32$S;) V[!] (pGpGm$rm0&$S;) ([!] (x\0m(''=;pGx^L:Ln^m0&$S:)n(dnL:;);) )[!] (dnn$S:;) :[!] ($r0=;) ^[!] (jJQmpGl&$SzZ;x{J>) .[!] (l=;l30(pGm$r=0n$S;nd:)nL:) {[!] (pGx^ZQzml&$S;&LyGEz;) ][!] (pG(x^)yG(E;&L)z&L(l@#L;x{)L;pG$r(0=;LL) Z<(&pGm&n(F;''mZz)x.;nLA:0&$SL>)>LL;) >[!] (pG(x^)yGEz(l@#L;x{)L;pG$r(0=;LL) Z<(x.;nLA:0&$S>)>L;) <[!] (x^'Und var'TLxM;yGI;) [[!] [MAZE.CNV] [G. Cisneros 6.6.84] [Exclude ALL] [[ All paths in a maze: (ni nf (na (na1 na2 ... nak) ... nz (nz1 ... nzj)))]] [compute paths] (( )( )(0 1 2 3 4)( (<(>(and,<:n:>,<0>) <0> <-->/<1>,<1> <0><)>) ; (<(>(and,<:n:>,<0>) (and,<:n:>,<1>) <2><< >>(or, <0>,<0>) <(><3><)>(or, ,)<4>,<< >>(WHILE,(5 6),<< >><3>,(and,<:n:>,<5>)(or, ,)<6>,<< >>(if,(M,<(><5> <1> <2><4>(if,<0>,<9><>,<(>, )<0>),$,),<< >><6>)<< >>) ; (,$) ; )) M [check input, call M] (( ((or,(IVL,a,z,),(IVL,A,Z,),(IVL,0,9,))) a [alfanum] (<:a:>(ITR,<:a:>)) n [name] (<(>(or,<:n:>(ITR, <:n:>),)<)>) l [node list] (<:n:> <:l:>) p [node & neighbors] )( )(0 8 9)( ((^A),) ; ((and,<(>(and,<:n:>,<9>) (and,<:n:>,<8>)<< >> <(><:p:>(ITR, <:p:>)<)><)>,<0>),<< >>(,(%T,Initial: <9>; Final: <8>))<< >>(,(%T,(WHILE,(1 2),<(>(M,<0>/)<)>,(and,<[65]><--><)>,<1>)<2>,<< >><1>(^MJ),<2>,<=>(^MJ))<< >>))(%R)) : (<>,(%R)) : (,(,(%T,not a maze))(%Q)) : )) [endfile]  [TOUR.CNV] [G. Cisneros 6.6.84] [Exclude ALL] [[Knights Tour]] [examine node] (()()(0 1)( (<0> <(><1><)>,(w,<< >>X<0>: lxi h<,>Q<0> mov a<,>m ora a rnz mvi a<,>0<0>H stax d inx d dcr b jz type mvi m<,>0FFH << >>(WHILE,(0 1),<1> ,<0> <1>,<< >> call X<0> << >>,<1>)<< >> inr b dcx d lxi h<,>Q<0> mvi m<,>000H ret << >>)); )) a [initialization] (()()()( (,(w,<< >> org 0100H begn: lxi h<,>0000 dad sp shld stak lxi sp<,>stak mvi b<,><8> mvi a<,>00 lxi h<,>Q11 zerr: mov m<,>a inx h dcr b jnz zerr lxi d<,>tour mvi b<,><8> call X11 lhld stak sphl jmp 0000 << >>)); )) b [db's for nodes] (()()(0 1)( (<0> <1>,(w,Q<0>:(^I)ds(^I)1(^MJ))<1>): )) c [postscript] (()()()( (,(w,<< >>type: inr b dcx d push b push d push h call line call crlf pop h pop d pop b ret crlf: mvi a<,>0DH call cona mvi a<,>0AH jmp cona cona: push b push h mov e<,>a mvi c<,>02 call 0005 pop h pop b ret hexc: push psw rar rar rar rar call hexx pop psw hexx: ani 0FH adi 30H jmp cona line: mvi b<,><8> lxi h<,>tour linn: mov a<,>m call hexc mvi a<,><'> <'> call cona inx h dcr b jnz linn ret ds 500 stak: ds 2 tour: ds 256 end << >>)); )) d [write output] (()()(0)( (<0>,(%W,<9>.ASM,(%T,<0>))); )) w [bind parameters] (()()(8)( (<8>,<< >>(b)<< >>(c,(WHILE,(0 1),(R),<0> <1>,<0> (a,<0> <1>),(R),))<< >>(d)<< >>); )) x [main program] (()( ((%T,(%R,<9>.TOU))) R )(9)( ((PWS)(or),); (<9>(or,., ,<>),<< >>(%Ow,<9>.ASM)<< >>(%Or,<9>.TOU)<< >>(x,(R))<< >>(%E)<< >>); )) [endfile] [MAZE.REC] [G. Cisneros 6.6.84] [Exclude ALL] [[]] { [compute paths] { (''0 1 2 3 4 x););(0x( 1x( 2x( 3x( 4x( ( @;(Jj'('Ez [and] Z<(@n jJ><0x](A);>)> [and] ' 'Ez {[vbl] (' 'Ez(('/'(Fz;Zz<)Z<1x]>;J>);A:);) # (' '0x>;)}[vbl] JZD1x[' 'I0x[')'I;) ; @;(Jj'('Ez [and] Z<(@n jJ><0x](A);>)> [and] ' 'Ez [and] Z<(@n jJ><1x](A);>)> [and] ' 'Ez {[vbl] ( [or] Z<(' 'Ez0x]; J0x];>)> [or] ' ('Ez {[vbl] (')'Ez [or] Z<(' 'Ez; J;>)> [or] 4x];) # (3x<;)}[vbl] ;) # (2x<;)}[vbl] JZDz<3x[5x( 6x( {(''5 6 x););((@;Jj [and] Z<(@n jJ><5x](A);>)> [and] [or] Z<(' 'Ez; J;>)> [or] 6x]JZDz0x[@MZ> (Jj'$'EzJZD;;)Z>Z>z<6x[:;)Z>@;;)}2x:;) ; @;(JjJZD'$'I;) ; ;)@;5x:;)} M [check input, call M] { ( [or] Z<('a''z'Mz; J'A''Z'Mz; J'0''9'Mz;>)> [or] ;) a [alfanum] (@a([ITR] Z<@a>:J>;)[ITR] ;) n [name] ('('Ez [or] Z<(@n([ITR] Z<' 'Ez@n>:J>;)[ITR] ; J;>)> [or] ')'Ez;) l [node list] (@n' 'Ez@l;) p [node & neighbors] (''0 8 9 x););(0x( 8x( 9x( ( @;(Jj1%EzJZD;) ; @;(Jj [and] Z<('('Ez [and] Z<(@n jJ><9x](A);>)> [and] ' 'Ez [and] Z<(@n jJ><8x](A);>)> [and] ' ('Ez@p([ITR] Z<' 'Ez@p>:J>;)[ITR] '))'Ez jJ><0x](A);>)> [and] JZDzJZD>z')'I1x( 2x( {(''1 2 x););((@;Jj [and] Z<(65(a;L)z((Z<')'Ez>;J>);A:) jJ><1x](A);>)> [and] 2x]JZD1x[13%I10%IZ>z<2x[:JZ13%I10%I;)Z>@;;)}2x:xTZ>JZD>{(Jjx|;) ~ (z;) : @;(Jj(A)JZD{(Jjx|;) ~ (z;) : @;(JjJZDzJZD>z;) : ;)@;3x:;)} ~ {((Jj':'UQD':'ED\64-%;0%;) ('.'U<(8a;xb;)Q|D>;Z'.'IJj:) '.'FJD(3a;xb;)Q|JZDI;) u (255='Not Found'I;) v (Zz(d' 'I:;)JZ;) b (w0%(f:;)w;) - (cmpx-n;) 0 (128,26k;) 5 (x+' All paths in a maze: (ni nf (na (na1 na2 ... nak) ... nz (nz1 ... nzj)))'TL;) Q ((B13%ED;;)J(10%FD:;)Z;) ~ (13%Fz;26%F((2b);J6666EA;zBj;)z;) | (|0|0|0|pLpGnpG6-mSpG8+n&S;) 3 (x00x3;) ` (mx0n&mx0nx3;) z (30$r128eqL26k20K0=L;DLL) y (('L/'FDZ<(' 'FjJ;;)QD> ((B;;)' 'ED;;);'';)mZ 188@0pG66-,127$Sx! 'uvb-05Q~|3`zy'I@i 33@0pG30$SnI <@u(A' 'EZD'CNVLIB REC'I;;)JQD>&S @5,30$r15K(@vu\64+%':'|&11G|':'|TLqt_;LL;) 'T Q 'm'()'p''C32$SLLZz;) x (&pG8+0&SrSJZD>;) q (31$J(('TTY:'E;A)' ''05D'HS;;)Zz '05C'H12GIzZ<(J@|J>JZD;QDlyw&FwJZD>;w:):Z;) >J<'[!]'FDBQD\pG+127$r+mJq32$rC mpGlyG-'w'$r'x'$r- (NLnLq'x'$rC&'x'$SnS;32$SnnS;)D::) w (@x<<@w>JZD>J'Next: '32$r!|TLxQ (A;{(Jx|;) ~ (xR;;)}x~;);)} % (@%@~xTxE;) } [endfile]  [TOUR.REC] [G. Cisneros 6.6.84] [Exclude ALL] [[]] { { [drive] (Jj':'UQD':'ED\64-%;0%;) d [filename] ('.'U<(8a;@b;)Q|D>;) m [extension] ('.'FJD(3a;@b;)Q|JZDI;) x [plain name] (@d(@m;Z'.'IJj:)@x;) u [search failure] (255='Not Found'Iz;) v [1st address in chain] (31$r;) 1 [CTR: or MEM:] ( ) 2 [build addr block] (|0|0|0|pLpGnpG6-mSpG8+n&S;) 3 [find/make FCB] (Jj'TTY:'EQZD;(@2z(8azZD;@b;)JZ; @d(@m;Z'.DAT'IJj:)@x;) @1(pGr12GE; 6+pGmr0=( 130,33@z;)pGQ&rS0;nL:)D;) f [form CTR and TTY block] (@00@3;) ` [blank fill by count] (Zz(d' 'I:;)JZ;) b [zero fill] (w0%(f:;)w;) - [make block] (cmp@-n;) 0 [make name block & buffer] (m@0n&m@0n@3;) z [set default input file] {(&pG8+0&SrS;) i (31$'05C'H12GI','EDZ;;) j [write to disk] (pG^^rpGpGmrpGm-,130+n&m(a)JZQD>nSnSL; QD>ZZ^^r0&S; LpG@4:) g [close by address] (@5pGpG4+pGrm0&Sn(0=L;-1=r16k;1(N)^^r^^0&S; pG^^rpGr127(N^^26kpGr21k;L;) r16k;)@1=;mpLn(=)L;pL8+rpG6+0&S (mLpLn&=;:);) c [close all files] (@1(6+pGr0=;&L:)6-(pG8+rm@cn0=;:);) E [cr, lf] (2573TL;)& [write WS] (@&JZqt@\;) T [write WS, kill] (@TD;) t [display at logon] (@&'Knights Tour'TL;) Q (@@;) } % [signed # string] (p2NLpG(32767N'';0&-'-';)&#|I;L#I;) , [default patt] {(J<(10%FD:;)Zz>;)l (13%FD@l;26%F@l(JQ26%=;LzBj;)z;)} | [read console] {(13%=2573;8%(=) (TR@#|;8%T' 'TLTLLR@#;);) # [read] (-1m'r'm'q'@%( L(2573'> '|TL(R3%=_;@#I;:)@~ZD;Z:); ); (ZpG^^rpGmr(0=(lyGpG128&S^^26kpGr 20K0=L;LL-1lyGS;)lyGr;;) -1=26%InLL;pG130&-lyG+&GI n@~mZqDnSLL;0&S:);)} _ [save & init vars] (pGpGm$rm0&$S;) ( [undef & reinit var] ('\'@%0m(''=;pG@^L:Ln^m0&$S:)n(dnL:;);) ) [restore vars] (dnn$S:;) : [T and lift if undef] ($r0=;) ^ [try a value for a var] (jJQmpGl&$SzZ;@{J>) . [undef vars on failure] (l=;l30(pGm$r=0n$S;nd:)nL:) { [compare/define var] (pG@^ZQzml&$S;&LyGEz;) ] [body of var search] (pG(@^)yG(E;&L)z&L(l@=L;@{)L;pG$r(0=;LL) Z<(&pGm&n(F;''mZz)@.;nLA:0&$SL>)>LL;) > [body of var search] (pG(@^)yGEz(l@=L;@{)L;pG$r(0=;LL) Z<(@.;nLA:0&$S>)>L;) < [insert var] (@^'Und var'T_;yGI;) [ [examine node] {(''0 1 @););(0@( 1@( ( @;(Jj {[vbl] (' ('Ez {[vbl] (')'Ez;) = (1@<;)}[vbl] ;) = (' '0@>;)}[vbl] JZDz<'X'I0@[': lxi h,Q'I0@[' mov a,m ora a rnz mvi a,0'I0@['H stax d inx d dcr b jz type mvi m,0FFH 'Iz<1@[' 'I0@( 1@( {(''0 1 @););((@;Jj {[vbl] (' 'Ez1@];) = (' '0@>;)}[vbl] JZD' call X'I0@[' 'IZ>z<1@[:;)Z>@;;)}2@:' inr b dcx d lxi h,Q'I0@[' mvi m,000H ret 'I@wZ>;); ;)@;2@:;)} a [initialization] {( (JjJZDz<' org 0100H begn: lxi h,0000 dad sp shld stak lxi sp,stak mvi b,'I8@[' mvi a,00 lxi h,Q11 zerr: mov m,a inx h dcr b jnz zerr lxi d,tour mvi b,'I8@[' call X11 lhld stak sphl jmp 0000 'I@wZ>;); ;)} b [db's for nodes] {(''0 1 @););(0@( 1@( ( @;(Jj {[vbl] (' 'Ez1@];) = (' '0@>;)}[vbl] JZDz<'Q'I0@[':'I9%I'ds'I9%I'1'I13%I10%I@wZ>1@[;): ;)@;2@:;)} c [postscript] {( (JjJZDz<'type: inr b dcx d push b push d push h call line call crlf pop h pop d pop b ret crlf: mvi a,0DH call cona mvi a,0AH jmp cona cona: push b push h mov e,a mvi c,02 call 0005 pop h pop b ret hexc: push psw rar rar rar rar call hexx pop psw hexx: ani 0FH adi 30H jmp cona line: mvi b,'I8@[' lxi h,tour linn: mov a,m call hexc mvi a,'I39%I' 'I39%I' call cona inx h dcr b jnz linn ret ds 500 stak: ds 2 tour: ds 256 end 'I@wZ>;); ;)} d [write output] {(''0 @););(0@( ( @;(Jj0@]JZDz<9@['.ASM,'Iz<0@['T'@%Z>'W'@%Z>;); ;)@;1@:;)} w [bind parameters] {(''8 @););(8@( ( @;(Jj8@]JZDz<@bZ>z0@( 1@( {(''0 1 @););((@;Jj {[vbl] (' 'Ez1@];) = (' '0@>;)}[vbl] JZD0@[' 'Iz<0@[' 'I1@[@aZ>Z>z:JZD;)Z>@;;)}2@:@cZ>z<@dZ>;); ;)@;1@:;)} x [main program] { (JZDz<{(Jj@|;) ~ (z<9@['.TOU'I@_26%E(@~ZD);;)}Z>'T'@%Z>;) R (''9 @););(9@( ( @;(Jj2573TLZqtj()JZD;); @;(Jj {[vbl] ( [or] Z<('.'Ez; J' 'Ez; J(A);>)> [or] ;) = (9@<;)}[vbl] JZDz<9@['.ASM'I'w''O'@%Z>z<9@['.TOU'I'r''O'@%Z>z@xZ>z<'E'@%Z>;); ;)@;1@:;)} ~ ('()'p''C'Next: 'TL!TH32$SLL'i'@%JZD>'Q'@%(A;{(@|;) ~ (@_;;)};)@~ 'T'@% 'E'@%;) } [endfile] :20 1 (2 5 8) 2 (1 3 10) 3 (2 4 12) 4 (3 5 14) 5 (1 4 6) 6 (5 7 15) 7 (6 8 16) 8 (1 7 9) 9 (8 10 17) 10 (2 9 11) 11 (10 12 18) 12 (3 11 13) 13 (12 14 19) 14 (4 13 15) 15 (6 14 20) 16 (7 17 20) 17 (9 16 18) 18 (11 17 19) 19 (13 18 20) 20 (15 16 19)  org 0100H begn: lxi h,0000 dad sp shld stak lxi sp,stak mvi b,:20 mvi a,00 lxi h,Q11 zerr: mov m,a inx h dcr b jnz zerr lxi d,tour mvi b,:20 call X11 lhld stak sphl jmp 0000 X1: lxi h,Q1 mov a,m ora a rnz mvi a,01H stax d inx d dcr b jz type mvi m,0FFH call X2 call X5 call X8 inr b dcx d lxi h,Q1 mvi m,000H ret X2: lxi h,Q2 mov a,m ora a rnz mvi a,02H stax d inx d dcr b jz type mvi m,0FFH call X1 call X3 call X10 inr b dcx d lxi h,Q2 mvi m,000H ret X3: lxi h,Q3 mov a,m ora a rnz mvi a,03H stax d inx d dcr b jz type mvi m,0FFH call X2 call X4 call X12 inr b dcx d lxi h,Q3 mvi m,000H ret X4: lxi h,Q4 mov a,m ora a rnz mvi a,04H stax d inx d dcr b jz type mvi m,0FFH call X3 call X5 call X14 inr b dcx d lxi h,Q4 mvi m,000H ret X5: lxi h,Q5 mov a,m ora a rnz mvi a,05H stax d inx d dcr b jz type mvi m,0FFH call X1 call X4 call X6 inr b dcx d lxi h,Q5 mvi m,000H ret X6: lxi h,Q6 mov a,m ora a rnz mvi a,06H stax d inx d dcr b jz type mvi m,0FFH call X5 call X7 call X15 inr b dcx d lxi h,Q6 mvi m,000H ret X7: lxi h,Q7 mov a,m ora a rnz mvi a,07H stax d inx d dcr b jz type mvi m,0FFH call X6 call X8 call X16 inr b dcx d lxi h,Q7 mvi m,000H ret X8: lxi h,Q8 mov a,m ora a rnz mvi a,08H stax d inx d dcr b jz type mvi m,0FFH call X1 call X7 call X9 inr b dcx d lxi h,Q8 mvi m,000H ret X9: lxi h,Q9 mov a,m ora a rnz mvi a,09H stax d inx d dcr b jz type mvi m,0FFH call X8 call X10 call X17 inr b dcx d lxi h,Q9 mvi m,000H ret X10: lxi h,Q10 mov a,m ora a rnz mvi a,010H stax d inx d dcr b jz type mvi m,0FFH call X2 call X9 call X11 inr b dcx d lxi h,Q10 mvi m,000H ret X11: lxi h,Q11 mov a,m ora a rnz mvi a,011H stax d inx d dcr b jz type mvi m,0FFH call X10 call X12 call X18 inr b dcx d lxi h,Q11 mvi m,000H ret X12: lxi h,Q12 mov a,m ora a rnz mvi a,012H stax d inx d dcr b jz type mvi m,0FFH call X3 call X11 call X13 inr b dcx d lxi h,Q12 mvi m,000H ret X13: lxi h,Q13 mov a,m ora a rnz mvi a,013H stax d inx d dcr b jz type mvi m,0FFH call X12 call X14 call X19 inr b dcx d lxi h,Q13 mvi m,000H ret X14: lxi h,Q14 mov a,m ora a rnz mvi a,014H stax d inx d dcr b jz type mvi m,0FFH call X4 call X13 call X15 inr b dcx d lxi h,Q14 mvi m,000H ret X15: lxi h,Q15 mov a,m ora a rnz mvi a,015H stax d inx d dcr b jz type mvi m,0FFH call X6 call X14 call X20 inr b dcx d lxi h,Q15 mvi m,000H ret X16: lxi h,Q16 mov a,m ora a rnz mvi a,016H stax d inx d dcr b jz type mvi m,0FFH call X7 call X17 call X20 inr b dcx d lxi h,Q16 mvi m,000H ret X17: lxi h,Q17 mov a,m ora a rnz mvi a,017H stax d inx d dcr b jz type mvi m,0FFH call X9 call X16 call X18 inr b dcx d lxi h,Q17 mvi m,000H ret X18: lxi h,Q18 mov a,m ora a rnz mvi a,018H stax d inx d dcr b jz type mvi m,0FFH call X11 call X17 call X19 inr b dcx d lxi h,Q18 mvi m,000H ret X19: lxi h,Q19 mov a,m ora a rnz mvi a,019H stax d inx d dcr b jz type mvi m,0FFH call X13 call X18 call X20 inr b dcx d lxi h,Q19 mvi m,000H ret X20: lxi h,Q20 mov a,m ora a rnz mvi a,020H stax d inx d dcr b jz type mvi m,0FFH call X15 call X16 call X19 inr b dcx d lxi h,Q20 mvi m,000H ret Q1: ds 1 Q2: ds 1 Q3: ds 1 Q4: ds 1 Q5: ds 1 Q6: ds 1 Q7: ds 1 Q8: ds 1 Q9: ds 1 Q10: ds 1 Q11: ds 1 Q12: ds 1 Q13: ds 1 Q14: ds 1 Q15: ds 1 Q16: ds 1 Q17: ds 1 Q18: ds 1 Q19: ds 1 Q20: ds 1 type: inr b dcx d push b push d push h call line call crlf pop h pop d pop b ret crlf: mvi a,0DH call cona mvi a,0AH jmp cona cona: push b push h mov e,a mvi c,02 call 0005 pop h pop b ret hexc: push psw rar rar rar rar call hexx pop psw hexx: ani 0FH adi 30H jmp cona line: mvi b,:20 lxi h,tour linn: mov a,m call hexc mvi a,' ' call cona inx h dcr b jnz linn ret ds 500 stak: ds 2 tour: ds 256 end !9" 1 >!w# &* !~>6Gͪ !6!~>6&hO!6!~>6G͉͑!6!~>6hͪ!6!~>6&͉!6!~>6ͪ!6!~>6 !6!~>6&.!6!~> 6 O6!6!~>6G.p!6!~>6O͑W!6!~>6hpͲ!6!~>6͑x!6!~>6͉Ͳ!6!~>6͙!6!~>66͙!6!~>6.W!6!~>6p6x!6!~>6ͲW͙!6!~> 6x!6> > _0! ~> #vUMAZE.DOCP   ! "#%$&'()*,+-.0/124365789;:<>=?@ABCEDFGIHJKoOMNLg)ND g.XυeUˊ!de pqomH9j#!dnEVxNsڇ cJ9],+F=TYGqVr,de/ъ\cqo`].LUiݟK 'GYf`bǽ0ZAoYGYDŜ_BY9[| &NxV>e/z8e9[υ[= ?Kd8Qdq<SNuY\J8927TiNbo,+b=G`Q1g7[zBaO{; ڞ%_8ƁlOz^%7ez`]qˊ=5fsַ[.+v@Z #X|_*ˊAPL` @A{N+%N‰n,+B1*T ޺uY1ӼYʄbYtԅU~3y iN),} +;$9e/+sB?N'꭫YG+yN.|&kLs߄=O?^ЗSY*ˊI8o~Yqzہ} b.+&N!qj}bL~'xKnUZu/+fj 2q7}. ו5,v~oλk7k4z(XJ8o|0i{d u0wE@dˊyVe{ˊ[V,|uM`s+$Wc@f`Y1H󨷁by]tO9[@2kM{*b]o,K ]Y+f7uDu5ہ} ɩ.x# ?2ˣ 6g[żX.;fsݟƳc @f @c!wez֑?wܟr7ȟ;4*u2!㽝 fPXA)'eeYVh˂ܫޕ%aY1HlWwz8<=Tc,+4[NuG %4Uߺ2w_뼋v~oλk7kXP,f]VɊ.qTʌzBaY1y?}wyy8e]ͺ0AvDXȺ2h KS ;>(/ 2/j*vqoho%V=wV8 ,+{.;ec!z%,}ib:k"302?6A3@}eǛxr jT~6D sAçXuL`Y LXP)̍߂ᾱMܟN4V/9 Ί4+4!mb x q D5b xוWeu:oYmNu ;`RXgpDi.#ofcYq0}.O SIK!fU?N.}C ˊƺUipC( /="* ]eշi=C 9ȟ;7k5Xg%>&&Ȯ7qu {uyJp8CS]լ{=p=GYG4q >ᄩx,30(ȼX %L5hr(,+ AINuY*ӷ,J9pW1w~0ıRINuu d<~kzHy<9\XnEVe VܟJ4Af eCxV9\XR֭XX {C+uL F d>x^!6U]r*b5wSYW.+&P~T̉P?D\V>n7ݟ8zpj,2~4kVk딧kjLbAnߺG3!SYt~úUi]WC>.֬ƺuӨ~pKu)b rXJCoٲUieie]ͺ߶/džXo{6@Ui_76וW>nW^$T/=.}< K&N/#kҩm*rYYkyO`>)CT̥߳A5Vʩ.eŨ= X.;V^rʚuu50YV,ր5+kw-/IKXkV֬ l,5`=f`z# @i@4AfVYWSK>bޟ*#iNͻ׆|SZnx^W^1%?VD\j\ mNs=f`ַxY},$@wȟ;ъ\zob h5ZT֭JJ8lP_iET[f2꽭d*s㷠9,+vAiBF=Yb?xAçp]'  !sx,`~v@%s*S]#k@c^ʬGk҇mbYяPX|_yk"jVosK*׊4jY_2qRCh5ZU~3Co:E_Kd]z?#Z_ucϗs.X7PX`b7Ѣby&w3{S2-}YnQ4Ncݟr.^,/dʚu5j?6fe:e֋jVF+r߶/B YV~j^,x8%u5Ryf}f7efBp8AfV^eqo5Z5=/8Ʋb֑?w\/ր7F+r9a/u5wsYgYM߲rtD~+[=xˊh*Q.K_p_V[=`xO JT=TΊ,SP1p=^imeb=/T+/ykӼ5k.};XA>vkif ?K GlZe\Rˊ]#;Y/ր%@4Af P17gj `<ٮo*ˊW}S7m 30(P,nOVb??퀥h 'wڐo}Q5`,+˲byur㭫Y=.s/)ޛQ>GAm Y{cY5k[L-AT1`l_^tz[WG<2qb~9f\J8u,spBƣ.9cPxxKY?!լ =7p u}C+UHgZUbl\ƳbC.H"拱22P%>۹׆|sYxxA{M{ʫ5wZycO5F`C9eŤ y/}`Z'Np]'@&Q[Ve~pXZ{lw<%8*r.+%j[z{f7w`ϊWъ CRP[E]%u5f70+vV~u^Pze ;3o]0km<^Vh zg)FP7۵pD*mDr?u\ߟ% W<}fWܟ傼l݃&(5e.bJ}~Y]?K៍76ps)g7ylT>H,څN+)eŚGęTxJnܟ4։%y.J?ݟ%x}Vi#zOY YʚqY~?Vr˛ˊEYMVtE-_VvER^1PXq*HqGQ;eϥ?KuVi#z~t5 鯎uxgˊ¢sַz5xޟ%q e.tXvъ&ebY\]euEirg,&F]Ks=G`Q1g7oݣ\0s)XȲbg*$nxYjT8zޟ%2~4kVk딧5E?nYH*E?p]z?K]wqk~PhE),:i{w\_kݟh~"L0R1L?TXYGoiu-+5k- ?zXȞgy⁐⽿$:7ߴ_Vcx9X97GPxxKY?!լ =7p u}C+UHgZUbl\ƳbC.H"拱22P%>۹׆|sYxxA{M{