xT@P C' 5< W̧TOF. 5LCEF OP%%IN (U8,,ADD) LSTON. REF LSTON.C2L{G ( G<^D35-<^L<) RHBT.()>>+<^D3$87*<<^L>/^D36>>>.()C:' BTXZ ,-1-TXZ ,-1-ES| )< S REPEAT )L3Y< TXCE ,1B<>!1B<> >B OPCODE NEWG>vC@ &\ LALL &l A PAGE ;(CONTINxUED ON NEXT PAGE) SALL ;(CO8NTINUED FROM PREVIOUS PAGE) REVGJ5GP I6= +  ..OLD==+,1a ..TYP==3 IF,xE <>+1,..TYP==0- IFE <>-^O7777-877,..TYP==1 IFE -X<>-^O777777B17,-x..TYP==2 ..POS==.POS(<>) ..WID=.8=WID(<>) RADI.XX 10 DF%%ST (\..x.TYP,,<>,\..P/OS,\..WID) PURG/8E ..OLD,..TYP,..POS,..WIDTYP,..PI(\z + '  RADIX ., .LD DEFINE (08OPS,AC,E),< ..C0X==0 IRP OPS,< 0x IFE -..C,< 1 STOPI IFN 318-..C, OPS ,1X'E IFE 3-..C,1x OPS ,[POINT 2,'E,] >28 ..C==..C+1> PURGE ..C> PI'7 6<  LSTOF. 6LCEF OP%%IN (6\,B,DIV) LSTON. REF LSTON.Kc  % w IRP ,%< IF2,< IFNDEF 8, >>, >>M&. 3 LSTOF. CRE3F OP%%FA (,O,FADR,FSBR) LSTON. CREF M6. 4l #LSTOF. CRE4|F OP%%FP (,R,FDVR) LSTON. CREF LSTOM&eG ( 7<<>!<->>- MJY' *  OLD%%%=*=c0 ; RADIX 8 (X N%%%==0 ; IRP (x,< FR%%AM (),\) ; N)8%%%==N%%%+1 ; >)X ADD P,[N%%%,,N)x%%%] ; PUSHJ P,* ; SKIPA *8 AOS -N%%%(P) ; *X SUB P,[N%%%,,N%%*x%] ; POPJ P, ;+ : RADIX OLD+8%%% PURGE N%%%,OLD%%% E N%%%,MN. 3 LSTOF. CRE3F OP%%FA (,P,FSBR,FADR) LSTON. CREF M\u|RQ O2|  %  IRP ,& < IF2,< IFDEF 8A, XIFNDEF , SUPPRE >> SUPPRE S tsQ S uQ pS uQ xS uRQ S uxQ pc:#Q S wSNn 6|  LSTOF. 6CEF OP%%IN (6,B,IDIV) LSTON.CREF LSTONS7-N 5  LSTOF. 6 CEF OP%%IN (6,B,IMUL) LSTON.CREF LSTONS;k )l [<<<>B)>>&<>>S? BTXO ,<>TXO ,_G1},< IFE <>,<X JUMP , > xIFN <>,< IFE < <>&<>>,< JU 8MPL , > IFN X <<>&<>>,<  xJUMPGE , >>>! IFN <<>_1>,<!8 TXCA ,<<>&<!X>> JRST .+5 !x TXCE ,<<>&<"B>> JRST T"8XNE ,<<-<>-1>"X&<>> JRST >>> JRST UVn ' F IFE <1>,< IFE <>,X< JUMPA , x> IFN <>,< IFE <<>&<>>,< 8 JUMPGE , >X IFN <<>&<>>,x< JUMPL , >>> IFN <<>_1>8,< TXCA ,<<X>&<>> JRST .+x5 TXCE ,<<>&<>> JRST .+38 TXNN ,<<-<X>-1>&<>> JRST >>> JRSTUVn  H IFDIF ,< JFCL 1#X,.+1 ; JRST .+#x1 ; IFNB <>,<$ JFCL 1, IFN$8B <>,<>,$x<>,< JRST >>>%> IFB <>,< JFC%8L 1, IFIDN <%X><>,<>,< JRST >&>> >;<><> IFD&8IF <><>,< H&XRLOI ,-2 ; IF&xNB <>,< AOBJP 'A, IFNB <>'8,<>,'X>> IFB 'x<>,<(>,(8 IFIDN <>(X<>,> >;<><> IFD)IF <><>,< I)8F2,*> MOVEI ,0 ;*8 BLT ,0 ; I*XFNB <>,< JUMPE *x, IFNB <+>,< JRST >> IF+8B <>,< JUMPN +X,> >;<><> L+xSTOF. CREF : LSTON. CREFi: Y$- ( +<1B<^L<>>}<1B<^L<>Y tQ xY> C@ , 3 (,<>,<>)LDB>,,< IFND8EF CRFIN.,CRFIN.=X=0 IFGE CRFIN.,x.XCREF CRFIN.==CRFIN.+1> IFDIF 8<>< IFNXDEF LSTIN.,LSTIN.x==0 IFGE LSTIN.,XLIST LSTIN.==LSTIN.+1> N.==YO%{G 'l  IFDIF <'|A},< LSTIN.==LSTIN.-1 IF8LE LSTIN.,LIST> XIFDIF <>,x< CRFIN.==CRFIN.-1 IFLE CRFIN.,.CREF> CRFIN.[3@ (l <<<1_<>>-c>B<>>_<>>[?7 -l  LSTOF. -|CEF TEST%%=0 6IFE <<>_-^D18>,68< TEST%%=1 LS6XTON. CREF MOVEI6x ,<> LSTOF.7 CREF > IFN <78>,< IFE <<>_^D7X18>,< TEST%%=17x LSTON. CREF M8OVSI ,() LS88TOF. CREF > IFE8X <<<>_-^D18>-^O8x777777>,< TEST%9%=1 LSTON. CREF98 HRROI ,<>9X LSTOF. CREF >9x IFE TEST%%,< IF:E <<<>_^D1ޟ:877۷17>,<ԋ:XST^ LST :xREE RLOI V(y;oOo۷o#E ;8ST REF > IF;XE iK%,< 3)ԟ;xN.0E MOD<,[ LSTO˄å<8EF>} PUQ≩ F ]` %L W IFNDEF %\,<==> SHOW. () SHOX / Ƌ <<0 >-^D18>,< LSTO@8N. CREF CAI @XA,<> LSTOF. C@xREF > IFN <<>A_-^D18>,< LSTONA8. CREF CAM 0l,] LSTOF. CREF > LSTOF. CRY 4 G IFE <<<4B}_^D18>-^O777777SB17>,< LSTON. CS8REF I ,(-) LSTOF. CREFSx > IFN <<<>_^TD18>-^O777777B17>T8,< OP%%FP ,<B>, >P ,<@(YX 6  IFE <<6>^D18>,< LSTON[8. CREF I ,([X) LSTOF. CREF[x > IFN <<>_^D\18>,< LSTON. CR\8EF ,[] LSTOF. CREF >Za 0  IFE <<<0B}_-^D18>-^O77777BX7>,< LSTON. CREBxF I ,-<>C LSTOF. CREF >C8 IFN <<<>_-^D182>[^O777777>,< OKxP%%IN ,<>, >N ,<>,_@(Z7 3  IFE <<3,>-^D18>,< LSTOLxN. CREF I ,M<> LSTOF. CREMxF > IFN <<>_-3^18>,< LSTON. M8CREF ,[]3l  LSTOF. CREF > LSTOF. CREF >_@(] A  IFN <M^O777777777760>x, PRINTX ? IS NOT AN ACCUMULATO8R TEMP%%=0 IXFE <<>_^D18>,<x IFN <>,< TEMP%%=1 LSTON. CR8EF ,() X LSTOF. CREF >>x IFE <<>_-^D18> ,< TEMP%%=1 L 8STON. CREF XA,<> LSTOF. C xREF > IFE TEMP% %,< LSTON. CREF 8 ,[] L XSTOF. CREF > PURGE TEMP%% P#:Q a tQ #:*sQ a t>(Q #:>QQ a tk{Q a tm3Q a uJ8Q @a uiQ a u}SQ @#;ZoQ a v\yQ *  5 * % 4`a+= +a+= +a+ - *% 4@*' 5`a+-\ 4 a+-\ 5@a>Mm (< ),,POS()>?H6 +a? ( <^L<>+^L(<[<<>_<^L<>>>-1>-1><^L<>>>e$YG ) { DEFINE )IFO.(OPCODE,NEWA'XRG)< OPCODE < NEWARG>> &-<>}<<>&- .XORG .-1 LSTON. CREF LSTONgR~#@ , ? (,<>,<>)DPB>,gR~)  /L  IFE?}/\,y SETZM >.Ɗ=XFE?}+1,< qjO=x O IFN >U><<+c>,8,< w &ϭ>XEM ,> ;RcN>x <>,< ;Bfϭ?E V[B,,ln?8 B, ; >B; >V 5| g LSTOF. 5CEF OP%%IN (5,B,SUB) LSTON. REF LSTON.i'%I' $ 3 TITLE $AA% -- IF2,X PRINTX ASSEMBLINxG % -- .TEXT */VERSION:B* */VERSION:b 9_ LSTOF. @CEF IFB <>, T8XC (<^O37777777&XA>,1B<_-^D30>)x IFNB <>,< IFN <<>&^O7777777787760>, PRINTX ? XA IS NOT AN ACCUMxULATOR IFE <<<>_-^D18>-^O7777778>,< LSTON. CREFX EQVI ,<,,-1-x<>> LSTOF. CREF> IFN <<<>_-8^D18>-^O777777>,<X OP%%TX ,<>x,TLC,TRC,TDC >> LSTON. CREF >> ib ?̧TOF. @ CEF IFB <>, 8OP%%TX <^O3777777X7&>,1B<_-^D30x>,TLCA,TRCA,TDCA IFNB <>, OP%%T8X ,<>,TLCA,TRXCA,TDCA LSTON. CREF LSTON. ibP > LS.>CEF IА y,{xOPjXo۷o|7&_,cB<_3a|8>,!YTRCE,!|X Iӡ y>, |xX V,TLqVT}CE"C LS.CR LS.ib` ?l LS.?|CEF IFB <,~OPjX<^O37۷o~87&_,cB<_3a~X>,TLCN,TRCN,!~x IFNB <>, X V,TLsTCN"C LSTON. CR"̧TON. ibp 7<  IFB <>7L,AJFCL 0 IFNB <]8B>, TRN ,<,,<>> N ,<,,, lOP%%TX <^O3777777l87&>,1B<_-^D30lX>,TLNA,TRNA,TDNAlx IFNB <>, OP%%TmX ,<>,TLNA,TRm8NA,TDNA LSTON. CREF LSTON. ibtC@ E IFE <<1+^L<>>>,< IFE <<>&<>>,<8 TXNN ,<> X> IFN <<>&<>x>,< TXNE ,<> >> IFN <<>_8<1+^L<>>>,< TXXCA ,<<>&<>x> JRST .+4 TXCE ,<<>&<>>8 JRST .+3 TXNXN ,<<-<>-1>&<>> >>-1>&, gXOP%%TX <^O3777777gx7&>,1B<_-^D30h>,TLNE,TRNE,TDNEh8 IFNB <>, OP%%ThXX ,<>,TLNE,TRhxNE,TDNE LSTON. CREF LSTON. ibu@ E s IFE <<1+^L<>>>,< XIFE <<>&<>>,<x TXNE ,<> > IFN <<>&<>8>,< TXNN ,<X> >> IFN <<>_x<1+^L<>>>,< TXCA ,<<>&<>8> JRST .+4 TXXCE ,<<>&<>>x JRST .+2 TXNE ,<<-<>-1>&<>> >>-1>&, ixOP%%TX <^O3777777j7&>,1B<_-^D30j8>,TLNN,TRNN,TDNNjX IFNB <>, OP%%TjxX ,<>,TLNN,TRkNN,TDNN LSTON. CREF LSTON. ibx 8g LSTOF. 8CEF IFB <>, TbxXO (<^O37777777&cA>,1B<_-^D30>)c8 IFNB <>,< IFNcX <<>&^O7777777787o60>, PRINTX ? 9 AAIS NOT AN ACCUMd8ULATOR IFE <<<dX>_-^D18>-^O777777dx>,< LSTON. CREFe ORCMI ,<,,-1e8-<>> LSTOF. CeXREF> IFN <<<>_ex-^D18>-^O777777>,f< OP%%TX ,<f8>,TLO,TRO,TDO >> LSTON. CREF >>ib| >L LSTOF. >\CEF IFB <,yXOPjX<^O37۷oyx7&_,cB<_3az>,'YTROA,'z8 Iӡ y>, zXX ,<>,TLVTzxOA,TDOA LS.CR LS.ib|P =,g LSTOF. =, uOP%%TX <^O3777777u87&>,1B<_-^D30uX>,TLOE,TROE,TDOEux Iӡ y>, OP%%TvX V,TLVTv8OE"O LS.CR LS.ib}` = LS.=CEF IFB <,w8OPjX<^O37۷owX7&_,cB<_3awx>,'YTRON,'x Iӡ y>, x8X V,TLTxXON"O LS.CR LS.icP 7| LSTOF. 7CEF IFB <>, T^8XZ (<^O37777777&^XA>,1B<_-^D30>)^x IFNB <>,< IFN_ <<>&^O77777777_87760>, PRINTX ? _XA IS NOT AN ACCUM_xULATOR IFE <<<`8>_-^D18>-^O7777778 >Y< LSTON. CREF8,  ANDI ,<,,-1-8<> LSTOF. CRaEF> IFN <<<>_-a8^D18>-^O777777>,<aX OP%%TX ,<>ax,TLZ,TRZ,TDZ >> LSTON. CREF >> icT <C LSTOF. , rxOP%%TX <^O3777777s7&>,1B<_-^D30s8>,TLZA,TRZA,TDZAsX IFNB <>, OP%%TsxX ,<>,TLZA,TRtZA,TDZA LSTON. CREF LSTON. icTP ;| LSTOF. ;CEF IFB <>, n8OP%%TX <^O3777777nX7&>,1B<_-^D30nx>,TLZE,TRZE,TDZEo IFNB <>, OP%%To8X ,<>,TLZE,TRoXZE,TDZE LSTON. CREF LSTON. icU` <  LSTOF. <CEF IFB <>, pXOP%%TX <^O3777777px7&>,1B<_-^D30q>,TLZN,TRZN,TDZNq8 IFNB <>, OP%%TqXX ,<>,TLZN,TRqxZN,TDZN LSTON. CREF LSTON. if` D; MOVX D,cB<_-^D30> LSTOF. CREF !<37777777&X> LSTON. CREF LSTON. CREFiftS@ C, MOVX C<,cB<_-^D30> LSTOF. CREF !<37777777&X> LSTON. CREF LSTON. CREFifuc@ C MOVX C,cB<_-^D30> LXSTOF. CREF !<37777777&> LSTON. CREF LSTON. CREFify` C  MOVX C,cB<_-^D30> LSTOF. CREF !<37777777&X> LSTON. CREF LSTON. CREFigQ` DL# MOVX D\,cB<_-^D30> LXSTOF. CREF !<37777777&> LSTON. CREF LSTON. CRmHtYmHuZ7Q xmHvi9Q |;z/Q pmKc@ $L BYTE $\WO (9)VER (6)AMIN (18)EDTo&  ' <^L<-<<>_y^L<>>>-1>>>q? C TXC ,<>TXC ,,<8A==> IFNB <>,<=> >,<>,<>)TE>>,<>,<>) lzQ D P ?D}D)68P D8sP ;D;QP ;D;RP ;D;SP D;TP D;WP ;D;XP ;D;YP ;D;ZP ;D;[P ;D;\P ;D;]P D