Trailing-Edge
-
PDP-10 Archives
-
decus_20tap1_198111
-
decus/20-0003/c.unv
There are 18 other files named c.unv in the archive. Click here to see a list.
x @ P C% P ` C' A(
OP%%IA (A ,B,ADD,SUB)(AC2L{G (
<^D35-<^L< HRGHBT.(A)>>+<^D3 h7*<<^L<RGHBT.(A) >>/^D36>>>.(A)C2exg ` 8C:' yhN TXZ A,-1- <B> TXZ A,-1-C@tUP @ C@t{P C@t;P C@tk{P C@uP C@unP C@v9P C@v {P " C@v)7P $ CC[Q ` CPv[6Q @ CPv]6Q CS$t ` "EuQQ EuzQ @ EuhPP 'Ev:=Q ?x Ev=P 'EvhYQ @ ES | !(
REPEAT !H3,<
TXCE A,1B< B>!1B<C>
>B<FDrQP 'FDrWQ P x FE ` *Gbv ` 7G@ ; X OP%%CA (A ,B,)OP%%CA (AGD >H t OP%%CA (A ,B,A)P%%CA (AGDP <H d OP%%CA (A ,B,E)P%%CA (AGDp = h OP%%CA (A ,B,G)P%%CA (AGDy =H l OP%%CA (A ,B,GE)%%CA (AGE@ ;H \ OP%%CA (A ,B,L)P%%CA (AGEI < ` OP%%CA (A ,B,LE)%%CA (AGE` > p OP%%CA (A ,B,N)P%%CA (AG">
` G"\q ` G&tkg "H
DEFINE "hINFO.(OPCODE,NEWA#RG)<
OPCODE NEW ARG> OPCODE NEWG0tyP G0tH:P G0tKP G0u@P G0uk1P G0u}:P G0v,zP G2~9 G3)T
2 G3)W
4 G3P G G3kbP G3= L ` .G8-[QP G8-[YP `G8-[ZP 'p G8-[\Q @ G: ;"P G: M"P G: "P G: hbP G: iBP G: k"P G: kbP G: 9P G: YP G: YBP G:,= ` ,G>n
PAGE ;(CONTIN(UED ON NEXT PAGE)H
SALL ;(COhNTINUED FROM PREV IOUS PAGE)
REVG?P ` GHv88P GHv<Q GHv<{Q GRe+q ` GX.-7Q @ I,j7 ` "I-[w ` !I$P ` I
t vQ I
t;WP `I
t;ZP ~ I
tHwP ' I
uQ I
u\qQ I
ukPQ I
ulQ @ I
uyVQ I
v*Q @ I
v83Q I
v=Q ` I
v=xQ I
vN8Q 8 I
vXqQ ` I
vXzQ x I
vX|P 'I
v[WP I
v[ZP I
w+:Q I$} ` I%@ ` I%}: ` I&+ ` I
= ` I*g ` /I6= (h
^
..OLD==)10
..TYP==3
IF)(E <C>+1,..TYP==0)H
IFE <C>-^O7777)h77,..TYP==1
IFE *<C>-^O777777B17,*(..TYP==2
..POS==*HPOS(<C>)
..WID=*h=WID(<C>)
RADI+X 10
DF%%ST (\.+(.TYP,A,<B>,\..P+HOS,\..WID)
PURG+hE ..OLD,..TYP,..P OS,..WIDTYP,..PI ` ` 5I4: ` I4y7 ` I5KV ` #I5h6 ` I6
` I6:= ` I6= ` I6N8 ` I(\z ,(
v
RADIX .,H.OLD
DEFINE B (,hOPS,AC,E),<
..C-==0
IRP OPS,<
-( IFE A-..C,<
-H STOPI
IFN 3-h-..C, OPS <AC>,C.'E
IFE 3-..C,.( OPS <AC>,[POINT .HE,C'E,D]
>
..C==..C+1>
P URGE ..C>
PIv;QQ Iv<VP Iv=vQ @ I=BP I=KBP I=lP I>
P I' 3@ ` (I'7 C(
OP%%IN (A ,B,DIV)%IN (AI6
:bP I6 yBP I64hBP I6MIBP I6v v ` IVMIBQ v IVMLQ e IXt qP $ IXt xP " IXt VQ IXt9Q IXtJ9Q IXtJ9Q @ IXtLTQ @ IXtLuQ K IXtMQ IXu@Q IXuKSQ IXuLQ IXuT P IXuT P IXuT(P IXuT(P IXuT)P IXuT)P IXuT*P IXuT*P IXuT+P @ IXuT+P ! IXuT@P IXuT`P IXuU P IXuU P IXuU@P IXuU`P @IXu]Q IXu}:Q IXv
(BP K;
(bP K;
)BP K;
*BP K;
+P K;
,P K;
3@ ` 5K;
8bP K;
LBP K;
YP K;
kBP K;
K;P K;
K;P K; P K;
"P K;"P K;-"P K;=P K;$\@ ` KDt-1Q P KDt9TQ @ KDt9UP 'KDt9VQ x KDt9WQ KDt9XQ KDt9\Q KDtITP 'KDtIVQ x KDtIyQ x KDtJWP KDtJ[Q KDtKQ @ KDtKQ KDtKQ KDtLP 'KDtLQ x KDtLTP 'KDtNQ KDthVQ KDthqP 'KDtkQ x KDtlyQ @ KDuKP 'KDuKVQ x KDv
P 'KDv
Q x KHtZ5P KHtm6P KHuqP KHuP KHu\sQ @ KHuyVP KHv<P KHvK P KJ
YBP KJiBP KJ 9P KJ%h"P KJ%i"P KJ4+"P KJ4="P
KJ5iBP KJMM"P KJN
P KJN="P KJd(bP KJek"P KJezP
KJf= ` -KJfkP
KJt9"P ` KJtXbP KJt]P KJuJ"P KK-P KK
KK iBP KK lbP KK&+BP KK=JbP KbN@ ` Kc ( .
IRP A,H<
IF2,< IFNDEF hA,<EXTERNLA>>> ,<EXTERNQA> >>L(TQ z LuQ R @ L Q 9 L)6P 7 L93Q ( L=xQ L.]7Q Y 0 L24Q 1 @ L L k`Q L
0Q 2 L% SQ 8 L%6Q @ L% uQ 8 L%\QQ 8 L%|Q 8 L&
TQ 0 L& Q 0 L&)Q 0 L&95Q 0 @L&:6Q 1 L&;1Q 8 L&=Q 8 L&=8Q 0 L&YQQ 8 L-@ Q L.P L/6Q L/ Q L/ wQ L4lRQ 8 L5TQ L<P L<]P L> iQ @ L><QQ 0 LDQ ( LDL Q @ LE[Q LF
Q LF;Q H LNsP LT;wP m L\(Q m L\= Q @ L](Q m L] Q m L]D(Q ( m Le@Q 0 00 LexuQ LeytQ H 8L Lf H Lv8tQ Lv[ Q 0@ L~
RQ H L Q ( LHYQ LY5P @L7Q 0 L P LzrP L-@P LN:P L
;vQ L:Q ( LHPQ J LX9Q L[ Q H L
Q < L< Q ( @LH`Q LMQ L ;Q @ L ;YQ @ L YQ L ] Q L i Q 0 L VQ @L HuQ : L I2Q L P L L@Q 0 L x8Q L |Q 8 L$Q L$ Q H@ L$ uQ H L$+Q @ L%2Q L%H1Q I L%J6Q L%\ Q H L&3Q @ @L&(1Q ( L&,Q L&l Q @ L' Q @ L-h6Q L4\YQ L5P Q L< Q L= Q ( LFH`Q H M&. HH
D OP%%FA (A ,B,FADR,FSBR)AM6. J
P OP%%FP (A ,B,FDVR)FP (AM&eG H ~ <<A>!<<LF hTBT.(A)>-<RGHBT. (A)>>>-<RGHBT.M&e| ` 6M7. IH
L OP%%FP (A ,B,FMPR)FP (AM<v
[Q @ MH(X6 ((
B
DEFINE A,<-^OB(P)>
MJ $H
>
OLD%%%=$h=10 ;
RADIX 8
% N%%%==0 ;
IRP %(A,<
FR%%AM (A%H,\<N%%%+1>) ;
N%h%%%==N%%%+1 ;
>&
ADD P,[N%%%,,N&(%%%] ;
PUSHJ P,&Hb ;
SKIPA
&h AOS -N%%%(P) ;
' SUB P,[N%%%,,N%%'(%] ;
POPJ P, ;'H
b:
RADIX OLD'h%%%
PURGE N%%%, OLD%%%
E N%%%,MJ ]7 ` #MJ,: ` MLu[QQ MLu]vQ @ MLv,pQ MLv-vQ @ MLv\pQ MLv]vQ @ MN. I
H OP%%FA (A ,B,FSBR,FADR)AMN68"P MNMI"P MNMIBP MNMKP MNl;BP MNt<bP MNtlbP $ MNv ` O%Ht
, O%J7 ` O&
`
O&93 ` O&=
@ O&H1 O ` O0t= Q O ) O0tLvQ O O0tLxQ O O0u Q O0u Q @ O0uHvQ O0uHxQ O0uJ7Q O0v
IRP A,H<
IF2,< IFDEF hA,<INTERN A>
IFNDEF A,<EXTERN( A>
SUPPRE A >>
SUPPRE AO>= ` ORn9g 8
.XCREF ;
HRROI A,.G @TWCH ;
.CREF
`GETTAB A, ;
. XCREF
MOVEI A,0 ;
TXNN A, @JW.WMS ;
TXO A `,.JWWPO_<ALIGN. (! JW.WMS)> ;
TXN! E A,JW.WCN ;
T!@XO A,JW.WFL ;
.CREF
WFL ;
Qf@ + Qu Q Qv*7Q Qv,Q Qv-Q @ Qv-Q Qv-uQ Qv-xQ Qv-zQ Qv=xQ @ Q&\@ ` QC ` SNn Ch
OP%%IN (A ,B,IDIV)IN (AS7-N Bh
OP%%IN (A ,B,IMUL)IN (AS8 @ S:Y@
Y
$ S:
[
S:
v
* S:
( S:N@ " S;]
<<<A>B<PO S(<B>)>>&<B>>S<tzP S<t*zP @ S<t+zP S<tDLP S<tI7P @S<tI9P " S<tMP ! S<t[sP S<t[zP S<t\YP '@ S<thyP S<u8P $ S<uI6P S<u[rP S<ulQP S<ulrP S<v9P S<v
: S? y(J TXO A,<B > TXO A,<BS@t9QQ @ S@t9QP S@t9RP `S@t9VP S@t9WQ S@t9XP $ S@t9YQ S@t9YQ S@t9ZQ S@t9[P " S@t<1P 'S@t<2Q x S@t<7P S@t<8P '~ S@t<8Q S@t<9P S@t<9P '~ S@t<<Q @ S@u Q S@u(1Q @ S@u+Q S@v uQ S@v>Q SB bP SB *"P SB *BP SB +BP SB ,P SB 9BP SB IP SB KBP SB M"P SB iBP SB l' ` 2SB lG ` 1SB lg ` 1SB m"P SB "P SB bP SB "P SB kP SB kBP SB lP SB BP SB
"P SB
BP SB P SB ,BP SB ,bP SB ."P SB KP SB YBP SB Z"P
SB \P UuHZQ UuHyQ ?p UuL|Q UuMQ UvYQ UvZPQ @ UvZQQ UvZWP 'Uv[Q Uv[6Q Uv[pQ U ] ` %U> 5 ` !U>= ` U>= ` U@t8qQ U@tLQ 0 U@t[XQ U@u
Q p U@u Q @ U@uHuQ @ U@uY:Q U@ulxQ U@v uQ U@v-Q U@v<Q U@v<Q U@vLXQ ULtIYP ULv6P ULvxP ULvyP ULv P ULv
P ULv
P ULv
TP UVn
| IFE <<B>_
(1>,<
IFE <B>,<
H
JUMP A,D
>
hIFN <B>,<
IFEC<<B>>,<
JU A,D
>
IFNC>&<B>>,<
UMPGE A,D
>>>
IFN <<B>1>,<
TXCA A,<<C>&<HB>>
JRST .+5
h TXCE A,<<C>&<B>>
JRST D
T(XNE A,<<-<C>-1>H&<B>>
JRST D
>>>
JRST D
' \
IFE <<B(>_1>,<
IFE <B>,H<
JUMPA A,D
h>
IFN <B>,<
IF E <<C>&<B>>,<
( JUMPGE A,D
> H
IFN <<C>&<B>>, h<
JUMPL A,D
>>>
IFN <<B>_1>
(,<
TXCA A,<<C
H>&<B>>
JRST .+
h5
TXCE A,<<C> &<B>>
JRST .+3 (
TXNN A,<<-<C H>-1>&<B>>
JRST D
>>>
JRSTUVn
D
IFDIF <(B><C>,<
JFCL 1H,.+1 ;
JRST .+h1 ;
IFNB <B>,< JFCL 1,B
IFN(B <C>,<IFIDN <CH><D>,<IFIDN <D>h<E>,< JRST C>>>>
IFB <B>,< JFC(L 1,i
IFIDN <HC><D>,<IFIDN <hD><E>,< JRST C>>>
>;<><>
IFD(IF <C><D>,<
HHRLOI A,-2 ;
IFhNB <C>,< AOBJP A,C
IFNB <D>(,<IFIDN <D><E>,H<JRST D>>>
IFB h<C>,<IFDIF <D><E>,<AOBJP A,i>(
IFIDN <D>H<E>,<AOBJN A,Dh>>
>;<><>
IFDIF <D><E>,<
I(F2,<IFE A,<PRINTHX ? A MUST BE NOhN-ZERO IN JUMPPT>>
MOVEI A,0 ;(
BLT A,0 ;
IHFNB <D>,< JUMPE hA,D
IFNB <E>,< JRST E>>
IF(B <D>,< JUMPN AH,E>
>;<><>
i:
>;<><>
U\vx6Q ?@ U\vxwQ U\vyQ U\vyQ U\vy Q u P U\vyVQ U\v{9Q t U\v{:Q @ U\v|Q u U\v|WQ U\v}YQ U\v}zQ Y$- x <1B<^L<A> >> <1B<^L<A>Y tQ x Y&=
C@ /(
| B (<MOVE/H,HRRZ,HLRZ,LDB>,< A>,<C>)LDB>,<Y> ` Y> 0 ` Y>=@ ` Y>=}: ` Y>}=8 @ YO%yG ( R
IFNDEF HLSTIN., LSTIN.==0h
IFE LSTIN.,<
IFB <A>, .XCREF
XLIST>
LSTIN .==LSTIN.+1
INYO%{G h \
IFG LSTIN., LSTIN.==LSTIN(.-1
IFLE LSTIN.,H< .CREF
LIST>
CREF
LIST> p <<<1<A>> -1>B<B>><A>>[
v=Q ~ [
v\pQ [
vx5Q @ [LP [L BP [L=P [MIBP [MX"P [N
P [KP [h"P [$\G ` $[>v- b [?7 2 >
.XCREF
TEST%%=0
IFE <2H<B>_-^D18>,<
T2hEST%%=1
.CREF
3 MOVEI A,<B>
3(.XCREF
>
IFN <3HB>,<
IFE <<B>_^3hD18>,<
TEST%%=14
.CREF
MOVSI 4(A,(B)
.XCREF
>
IFE <<<B>-^4hD18>-^O777777>,<
TEST%%=1
.CRE5(F
HRROI A,<B>5H
.XCREF
>
IFE5h TEST%%,<
IFE <<6<B>_^D18>-^O77776(77B17>,<
TEST%%6H=1
.CREF
HRLO6hI A,(<B>-^O7777777)
.XCREF
>
7(IFE TEST%%,<
.C7HREF
MOVE A,[B7h]
>>>
PURGE TE ST%%
.CREF TE[@t[QQ @ [@v=Q ~ [@v\pQ [O%2 ` [Pr}P [Pt qQ x [Pt<QP '~ [PtI7P [PuhyP `[Pv{P [R
G ` %[R$Xg @ [R-yG @ [R-} @ [RMh"Q [RMi @ [RMnQ [RfJ @ @[S]g @ [S 9G @ [S <G @ [S-k @ [S< @ [Vg B(
OP%%IN (A ,B,MUL)%IN (A[ZDLBP [ZDLG ` ,] (
IFNDEF A,<A==B>
F ]` H
IFNDEF hA,<A==B>
SHO W. (A)
SHO]>$S@ ` 7_@(Xp ?
.XCREF
IFE <<B>_-^D18>?H,<
.CREF
CAI?hC A,<B>
.XCRE@F
>
IFN <<B>_-@(^D18>,<
.CREF
@H CAMC A,[B]
@h.XCREF
>
.CREF CREF
>
.CREF_@(YP JH
d
.XCREF
IFE <<<B>_^D18>K-^O777777B17>,<
K( .CREF
DI A,(KH-<B>)
.XCREF
Kh>
IFN <<<B>_^D1L8>-^O777777B17>,<L(
OP%%FP A,<B>LH,C
>
.CREF
C
>
.CREF
_@(YX M
t
.XCREF
IFE <<B>_^D18>,MH<
.CREF
CI MhA,(B)
.XCREF
N>
IFN <<B>_^D18N(>,<
.CREF
C NHA,[B]
.XCREF
>
.CREFCREF(
0
.XCREF
IFE <<<B>_-^D18Dh>-^O777777>,<
.ECREF
DI A,-<E(B>
.XCREF
>
IEHFN <<<B>_-^D18>-Eh^O777777>,<
OP%F%IN A,<B>,C
>
.CREF>,C
>_@(Z7 FH
@
.XCREF
IFE <<B>_-^D18>G,<
.CREF
CI G(A,<B>
.XCREF
>
IFN <<B>_-^DGh18>,<
.CREF
HC A,[B]
.XCRE F
>
.CREFCRE_@(] thF
.XCREF
IFN <<A>&^O7777u(77777760>, PRINTXuH ? A IS NOT AN AuhCCUMULATOR
TEvMP%%=0
IFE <<B>v(_^D18>,<
IFN <BvH>,<
TEMP%%=1
vh.CREF
C A,(Bw)
.XCREF
>>
Iw(FE <<B>_-^D18>,<wH
TEMP%%=1
.CRwhEF
D A,<B>
x .XCREF
>
IFE Tx(EMP%%,<
.CREF
xH E A,[B]
>
xhPURGE TEMP%%
.C REF TEMP%%
.C_B-`
RF\y ` W ` W$-3
" W&=
& atx0Q atx=Q atxrQ atxxQ at{RQ @ at|Q at|RQ at|vQ at}yQ a<9"P a<:"P a<S@ ` 2a="P a=P a=bP a= P a=I"P a=Y"P a=Z"P a=lbP a=nP a>:P a>YBP a%@ ` $a
tTQ a
t Q a
t*9Q a
t>(Q a
t>(Q a
tk{Q a
tm3Q a
uJ8Q @ a
uiQ a
u}SQ @ a
vZ7Q a
v\yQ a-0 Q ` au QP 'au
Q x a&Mj' ` .a'= ` 0a' G ` 0a' g ` /a*n r 5 a*n 4` a*| `
a+= + a+= + a+ - a+-\ 4@ a+-\ 5` a+-\ 4 a+-\ 5@ a>Mm ( l <POINT WID H(B),A,POS(B)> B),A,POS(B)>a>\S@ ` &a?H6 + a? H f <^L<A>+^L h<-<<A>_<^L<A>>> -1>-1><^L<A>>>aLth1Q aLthxQ aLthyQ aLtksQ aLtkwQ aLtlQQ aLv)P aLv)P aLv)3P @ aLv*2P " aLv*2P aLv+rP ! aLv+rP aLv,2P aLv-zP aLv;wQ @ aLvh4Q aLviQ aLvj8Q aLvlQ aLvlQ aLvmQ aN)BP aNLbP aN%kbP aNNkbP aNtlbP aNv,bP aNv-bP aN}yBP aOiP aO-BP aOKP aO%X"P aO-8bP aO-9BP aO-<BP aPt<RP aPu P aPuJ1P aPuKuP aPui;P aPv8wP aPv;P `aPv;[P aPv<QP aPv<|P aPv>9P etrP et<RP et<ZQ p et<\P ' eu[rQ eulrP $ ev
[Q ` e<t ` e$YG #H
DEFINE #hINFO.(OPCODE,NEWA$RG)<
OPCODE <A
NEWARG>> <AedX9 el ` et2 e 87
0 e MG ` 'e ] ` e D- H t <<A>&-<A >> <<A>&-<Ae tP 'e4v9Q e4v=8Q x e@tQP e@tZP e@t)P e@t)PP e@t;8P e@t<TP e@tJ9P $ e@t\YP fe@thrP e@tlRP e@tmrP @e@uKsQ @ e@uiP " e@uiYP @ e@ul1P e@vXrQ e@vY9Q e@v\RQ e@v]rQ eR% "P eR,BP eRL "P eRMIBP eRUkP @eRUlP eRt4P eSh"P eShBP eSz"P eS I"P eS$BP eS&, ` eVp ` eVvJ6 ` gDbP gDXBP gDY ` 4gEZ"P gEhbP gElP gFXbP gFYBP gFZBP gF\"P g-0 ` gv9' ` -g$I ` g%Ht
. g%h6 ` g& { `
g&]7 ` g&]x ` g"~s@ h .XCREF
EXP <A>
.ORG . -1
.CREFG .g/Q
6 g/V
8 g2,\ `
g8-KuQ g8.:Q g; )P g@t<HP g@t<HP g@t<IP g@t<IP g@t<JP g@t<JP g@v8hP gCH ` gP, yP gP,+wP gP,<Q gP,>1Q gP,HSQ @ gP,LuQ @ gP,M6Q gP,Y9P gP,[7Q gP,[XP gP,\ZP ! gP,^P @ gP,mQ gP,x6P gP-
Q @ gP-3Q gP-RQ gP- P gP-KsQ gP-XRP gP-XSQ gP-Y9P gP-\QQ gP-\sP gP-h9Q gP-iP $ gP-jWP gP-kP gP-kxP gP-lVP gP-lZP gP-lrP gP-lxP @gP.
[Q gP.
tP gP.)Q gP.*RQ gP.-Q gP.:P @gP.<xP gP.=xQ gP.H8P gP.IQ p gP.MyQ gP.k9P gP/
P " gPvlsP $ gPvx6P #| gPvyP gPvyP gPvy P " gPv{:P gPv|WP ! gPv}YP gPv}zP @ gRK`
gRN@
` gR~#@ 0 B (<MOVE0(M,HRRM,HRLM,DPB>, <A>,<C>)DPB>,gR~) 8( T
IFE <D>8H,< SETZM B> ;
I8hFE <D>+1,< SETOM9 B> ;
IFN <D>*9(<<D>+1>,<MOVX A9H,<D> ;
MOV9hEM A,B> ;
IFNB: <C>,< ;
MOV:(E A,[B,,B+1]
:H BLT A,C ;
> BLT A,C ;
>gS]7 ` gTv8VQ gTv8tQ gTv;7Q gTv;zQ gV Ah
OP%%IA (A ,B,SUB,ADD)(AgW ] ` 3gW lQ gX,;wQ gX,lP gX-
9Q @ gX.
P gX.)8Q ` gX.:Q gX.>6Q gX.|ZQ g^NHt ` gg
` gg = ` i| ` 6it+zP " iuyVP iv);P @ iv96P iv=P iv[YP $ iv{P ! i&l\@ ` i7;y ` i>
HBP i>%P i>M\P i?(bP i?xBP iB
<BP iB
<bQ iB ,bP iBLhbP iBu"P iBu]P iC-BP iC5|BP iJmkg ` &iJm| ` 'iK)7 ` iK9: `
ib XH"
.XCREF
IFB <B>, TXC (<q^O37777777&A>,1Bq(<A_-^D30>)
IFNBqH <B>,<
IFN <<Aqh>&^O777777777760>r, PRINTX ? A IS r(NOT AN ACCUMULATOrHR
IFE <<<B>_-^Drh18>-^O777777>,<
s .CREF
EQVI A,s(<,,-1-<B>>
.XCsHREF>
IFN <<<B>_sh-^D18>-^O777777>,t<
OP%%TX A,<Bt(>,TLC,TRC,TDC
>> .CREFC,TDC
>>ib nh
.XCREF
IFB <B>, OP%%To(X <^O37777777&A>oH,1B<A_-^D30>,TLCohA,TRCA,TDCA
IFNBp <B>, OP%%TX A,p(<B>,TLCA,TRCA,TD CA
.CREF
,TDib P jhb
.XCREF
IFB <B>, OP%%Tk(X <^O37777777&A>kH,1B<A_-^D30>,TLCkhE,TRCE,TDCE
IFNBl <B>, OP%%TX A,l(<B>,TLCE,TRCE,TD CE
.CREF
,TDib ` lhr
.XCREF
IFB <B>, OP%%Tm(X <^O37777777&A>mH,1B<A_-^D30>,TLCmhN,TRCN,TDCN
IFNBn <B>, OP%%TX A,n(<B>,TLCN,TRCN,TD CN
.CREF
,TDibp O
|
IFB <B>O(, JFCL 0
IFNB <OHB>, TRN A,<,,<B >>
N A,<,,<Bibt \h
.XCREF
IFB <B>, OP%%T](X <^O37777777&A>]H,1B<A_-^D30>,TLN]hA,TRNA,TDNA
IFNB^ <B>, OP%%TX A,^(<B>,TLNA,TRNA,TD NA
.CREF
,TDibtC@ H<
IFE <<Bh>_<1+^L<B>>>,<
IFE <<B>&<C>>,<(
TXNN A,<B>
H>
IFN <<B>&<C>h>,<
TXNE A,<B>
>>
IFN <<B>_(<1+^L<B>>>,<
THXCA A,<<C>&<B>h>
JRST .+4
TXCE A,<<C>&<B>>(
JRST .+3
TXNHN A,<<-<C>-1>&< B>>
>C>-1>&<ibtP Xh
.XCREF
IFB <B>, OP%%TY(X <^O37777777&A>YH,1B<A_-^D30>,TLNYhE,TRNE,TDNE
IFNBZ <B>, OP%%TX A,Z(<B>,TLNE,TRNE,TD NE
.CREF
,TDibu@
IFE <<B(>_<1+^L<B>>>,<
HIFE <<B>&<C>>,<h
TXNE A,<B>
>
IFN <<B>&<C>(>,<
TXNN A,<BH>
>>
IFN <<B>_h<1+^L<B>>>,<
TXCA A,<<C>&<B>(>
JRST .+4
TXHCE A,<<C>&<B>>h
JRST .+2
TXNE A,<<-<C>-1>&< B>>
>C>-1>&<ibu` Zh
.XCREF
IFB <B>, OP%%T[(X <^O37777777&A>[H,1B<A_-^D30>,TLN[hN,TRNN,TDNN
IFNB\ <B>, OP%%TX A,\(<B>,TLNN,TRNN,TD NN
.CREF
,TDibx T(
.XCREF
IFB <B>, TXO (<Th^O37777777&A>,1BU<A_-^D30>)
IFNBU( <B>,<
IFN <<AUH>&^O777777777760>Uh, PRINTX ? A IS VNOT AN ACCUMULATOV(R
IFE <<<B>_-^DVH18>-^O777777>,<
Vh .CREF
ORCMI AW,<,,-1-<B>>
.XW(CREF>
IFN <<<B>WH_-^D18>-^O777777>Wh,<
OP%%TX A,<XB>,TLO,TRO,TDO
> > .CREFO,TDO
>ib| hhR
.XCREF
IFB <B>, OP%%Ti(X <^O37777777&A>iH,1B<A_-^D30>,TLOihA,TROA,TDOA
IFNBj <B>, OP%%TX A,j(<B>,TLOA,TROA,TD OA
.CREF
,TDib|P dh2
.XCREF
IFB <B>, OP%%Te(X <^O37777777&A>eH,1B<A_-^D30>,TLOehE,TROE,TDOE
IFNBf <B>, OP%%TX A,f(<B>,TLOE,TROE,TD OE
.CREF
,TDib}` fhB
.XCREF
IFB <B>, OP%%Tg(X <^O37777777&A>gH,1B<A_-^D30>,TLOghN,TRON,TDON
IFNBh <B>, OP%%TX A,h(<B>,TLON,TRON,TD ON
.CREF
,TDicP P
.XCREF
IFB <B>, TXZ (<PH^O37777777&A>,1BPh<A_-^D30>)
IFNBQ <B>,<
IFN <<AQ(>&^O777777777760>QH, PRINTX ? A IS QhNOT AN ACCUMULATOR(R
IFE <<<B>_-^DR18>-^O777777>,<
RH .CREF
ANDI A,Rh<,,-1-<B>>
.XCSREF>
IFN <<<B>_S(-^D18>-^O777777>,SH<
OP%%TX A,<BSh>,TLZ,TRZ,TDZ
>> .CREFZ,TDZ
>>icT bh"
.XCREF
IFB <B>, OP%%Tc(X <^O37777777&A>cH,1B<A_-^D30>,TLZchA,TRZA,TDZA
IFNBd <B>, OP%%TX A,d(<B>,TLZA,TRZA,TD ZA
.CREF
,TDicTP ^h
.XCREF
IFB <B>, OP%%T_(X <^O37777777&A>_H,1B<A_-^D30>,TLZ_hE,TRZE,TDZE
IFNB` <B>, OP%%TX A,`(<B>,TLZE,TRZE,TD ZE
.CREF
,TDicU` `h
.XCREF
IFB <B>, OP%%Ta(X <^O37777777&A>aH,1B<A_-^D30>,TLZahN,TRZN,TDZN
IFNBb <B>, OP%%TX A,b(<B>,TLZN,TRZN,TD ZN
.CREF
,TDidt VQ idtI;P idtZQ idu@Q iduZQ @ idu+qP '~ iduX7Q @ iduYQ idu\ Q idu}:Q idv(9P idv<Q idvh9Q if` h
MOVX A ,1B<B_-^D30>
. (XCREF
<XORM A, H>!<37777777&B>
.CREF
7&B>
iftS@ zh\
MOVX A{,1B<B_-^D30>
.{(XCREF
<TDNE A,{H>!<37777777&B>
.CREF
7&B>
ifuc@ |f
MOVX A|(,1B<B_-^D30>
.|HXCREF
<TDNN A,|h>!<37777777&B>
.CREF
7&B>
ify` }(p
MOVX A}H,1B<B_-^D30>
.}hXCREF
<IORM A,~>!<37777777&B>
.CREF
7&B>
igQ` ~Hz
MOVX A~h,1B<B_-^D30>
.XCREF
<ANDCAM (A,>!<37777777&B>
.CREF
7&B>k .I@ ` k*-` k:ezg ` (kN.J kN.K` kS; ` kTt7Q kTtI6Q kTtI9Q kTuQQ kTv
Q @ kTv
P " kTv;rQ k`vN8P ~ k`v[ZP mHtYP 'mHuZ7Q x mHvi9Q | mHvzQ p mK c@ (
BYTE (3)AHWHO (9)AVER (6) AMIN (18)AEDToN@ ` o\P ` o".) ` o& ` <^L<-<<A> _<^L<A>>>-1>>>q? z(R TXC A,<B > TXC A,<Bq@ ( &
INTERN HA
IFB <C>,<hA==B>
IFNB <C >,<A=B>
<CqS&:g ` *us@ 0h
B (<SETZ1M,HLLZS,HRRZS,<PR1(INTX ?CAN'T ZERO 1HBYTE>>,<A>,<C>) TE>>,<A>,<C>)
Q $ J
.[yQ $ J J|Q ` XYQ h KsQ XYQ p \Q 8 zxQ 9Q P
Q ( X -Q @ -Q H 99Q KyQ N8Q 0 n{Q % n Q % n :P % t+7Q P t+<Q H t+VQ h t8tQ x t:Q 8 t=WQ @ tH:Q H tH<Q tHSQ ( tI;Q ` tIQQ P tKQ p tLqQ h tMQ ( tMQ 0 tMQ X tMWQ H t]Q t^Q ( tihP tihQ tiiQ tiiQ tijQ tlRQ tlZQ 0 t{:Q u yQ u
Q ` u
vQ u
wQ uIQ h uIQ uKQ uK<Q @ uKVQ ` uKXQ X uKYQ P uKqQ uLrQ uY9Q uZ7Q uZ8Q x u[<Q p u[ZQ P u[wQ x u]WQ p ulqQ x ulvQ umqQ uxxQ ` uxyQ X u|Q 0 u|Q X v Q ( v yQ h v
0Q H v
6Q @ v
6Q 8 v uQ v-Q X v91Q v99Q v9zQ v:=Q P v:WQ h v= Q 0 v=Q ( v=Q x vH8Q 8 vHvQ 8 vJ1Q vJ6Q @ vMQ @ vMQ 8 vMQ H vMyQ p v]Q vi9Q ` vz Q w9Q p 4PQ @ 4QQ 8 4YQ 4]Q ` 4]VQ 4]ZQ 5+qQ 5JYQ H 5KQ ( 5LzQ P 5[PQ X 5\Q x 5\Q p 5\Q 5\Q 5jPQ P 5mQ ` 5m6Q x 5zQ 60P 61P 6yP 6 P 6 9P 6 pP 6 qP 6
qP 6*P 6*P 6*P 6*P 6* P 6+P 6+P 6+P 6+P 6+ P 6+QP 6+TP 6+WP 6+YP 6+\P 6,qP 6,tP 6,wP 6,yP 6,|P 6-7Q p 6;RQ H 6<Q h 6=Q h 6JQQ 8 6KRQ @ 6LQ ` 6M1Q 0 6\Q (
Q +
I8Q ( +
LyQ +
\yQ + $qQ $;vQ $I1Q ( $LuQ 8 $\YQ & 9Q H &-Q &8wQ @ &=Q 0 &]7P '8xQ = ( '9Q = ';6P = ';8Q 8 ';XQ @ '<Q 0 '<tQ '=Q Y '=Q H '=Q 2$Q P 2$(9Q H 2$(XQ 2$+Q X 2$;qQ P 2$<WQ H 2$<XQ p 2$I1Q 8 2$K8Q h 2$KqQ \ 2$h4Q ( 2$iPQ 2$kyQ ` 2% Q 2%LwQ 2%X1Q h 2%XWQ ` 2%XYQ 2%YRP 2%[ZQ 2%\vQ H 2%]9Q 0 2%^Q X 2%^Q 2%iQ @ 2%i6Q ` 2%i;Q ( 2%{Q 0 2& xQ p 2&
QQ ; Q ` ; =Q h ; JYQ ; LzQ ; [9Q ; \Q 8 ; \Q 0 ; \Q H ; \Q @ ; ^Q ` ; hyQ ; 8yQ ; :Q p ; :Q X ; <Q ( ; =Q x ; LQ ; \Q h >%5Q >&
PQ >&
ZQ >&=xP N h2P N h6Q N h6Q N h9Q N i4Q N k1Q N lQ ( N lPQ 0 N lTP N mQ @ N nQ 8 N nQ NMSQ + NM P + NMYQ + NN yQ + NNKQ + O YQ 8 & O X3Q H & O X:Q P & O vQ ( & O KyQ & O \tQ 0 & O m6Q & O |UQ & O |wP & O ,1Q & O ,yQ X & O L:Q @ & O<)tP O<\QQ ( O<j7Q O<j:Q O<lQQ O>
7Q 0 O>lZQ OL8wQ OLI6Q OL\YP OMhxQ 0 OMiQ OMjYQ ( ON:WQ 8 ON<Q ON<Q H ON<Q ` ON=Q @ ON=8Q X ON=:Q P Zl;<Q ( % Zl;wQ 8 % ZnQQ @ % Zn+5Q H % Zn+<Q 0 % Zn8wQ % Zn:8Q % Zn;Q % Zn<Q X % Zn=hQ ` % Zn=iQ h % Zn=iQ p % Zn=xP % ZnKQ P % ZnMQ % P <P <RP ^P )2P )7P <QP \P |TP
4P
4;ZP
4=P
5 P
6P
6=P
6Y P
2P
wP
P
7P
<P
QP
VP
:P
8P
;SP
;yP
IP
i:P KP 8<P :<P ; P D P ? DP > D)6P D8YP D8sP D;PP D;QP D;QP D;RP D;RP D;SP D;TP D;WP D;WP D;XP D;XP D;YP D;YP D;ZP
D;ZP
D;[P D;[P D;\P
D;\P
D;]P D<ZP D=7P DI6P ? D\qP exuP f,zP f,|P t8wP t9P t9P S@Q -1P -6P 9P 9TP >6P hzP 5P LP MP
h6P |RP 85P ;:P ;VP <P =P =P =P H1P HqP HwP IP IYP LP M3P XtP Y P Y P YRP YVP YYP YZP Z2P [P [ZP \P \}P |P .P .P .2P 4\YP 4yP 4zWP 4{VP 4|P 4|zP 5)P 5+VP 5,zP 6
rP TYP T;WP T=VP TH:P TI;P TMVP U
P U
P U
SP U
ZP J U P X U P \ U P ] U P k U,wP U8zP UJ6P
Uk)P
V
P V
SP V
[P < V(zP V,xP V-P
V<P V=P V=xP VIP VJ6P VK8P VLXP V\P Vi9P VlZP VxtP
VxzP l=P l\YP n 2P -{P -{P -{VP .
TP .96P .=P .[VP v0P vVP vXP vqP vrP vsP vsP vtP vyP vzP vVP vP v0P v P v TP v tP
IUP
IVP
ItP
LP
LzP
MP
ivP '
jQP '
lP '~ 8vP ;P lP |P
= P v | P |,TP |;P |<RP |I;P |kQP }yP }I1P }X:P }hSP ~:P ~)2P ~8:P ~\QP ~|ZP I3P IVP JWP LP LvP XpP XqP XwP YP YP YP YzP ]P ]7P KuP YVP YYP [[P lzP m7P )P )6P *WP +VP ,P ,zP 8QP 8ZP 8pP 8qP 8uP :P :3P ;6P ;8P ;VP ;ZP ;rP <QP <SP <XP <zP <}P =P =P =7P XQP XvP XyP YP YxP Z2P [P [P [P [VP \qP \xP \zP ]P ]yP $YP $ $P $4P $4P $41P $4;P $4QP $4[P $4qP $4{P $5P $5P $51P $5;P $;)P $;8P % $;:P $;;P $;SP $;WP
$;yP $<5P ) $<8P ( $<YP $<ZP ) $=VP ! $HYP $HsP ' $I;P
$MVP $ $XYP - $XZP , $YP $[XP + $i:P % P " % P % P # % P " % P # % qP %+P , %-P ( %8zP %J6P %KqP %MRP %XYP . %XZP - %]VP ! %k(P
%k)P %yP %|qP &
2P &
P &
SP &
[P &QP & 8P &(zP &,xP &-P &8wP &9P &9wP &:2P + &;P &;PP &<P &<P &< P * &<4P * &<qP &<zP & &= P ' &=P &=xP &>9P &IP &J6P &K8P &LXP &M P &\P &k P % &lZP & &xtP &xzP &z P &|wP
&tj7Q ? &| qP &| vP &|*7P &|K8P &|LP &}WP &}P &}3P &~
6P '8qP '8sP '8xP '9QP '9VP '9WP '9XP '9YP '9YP '9ZP ':(P ':(P ':)P ':2P ':3P ':4P ':5P ':6P ':9P ':9P ':;P '<P '<P '<P '<P '<P '<XP
'<hP '<hP '<iP '<iP '<qP '<rP '<rP '<sP '<tP '<uP '<vP '<wP '<xP '<xP '<yP '<yP '<zP '<{P '<}P '=xP
*D A *D * A * *+A *+ *:A *: *;TA *;T *;yA *;y *<zA *<z *H A *H *IA *I *\YA *\Y *i@A *i@ *A * *yA *y * A * * pA * p * tA * t * VA * V *
VA *
V *
WA *
W *
pA *
p *
vA *
v * * *Z *|A *| *|A *| *}VA *}V * TA * T * TA * T *)6A *)6 *)7A *)7 *8 A *8 *>6A *>6 *LA *L *\|A *\| *]7A *]7 *i9A *i9 +>{P +>{vP +>|P +>|P +>|P 2^
P 6 )VP 6 -3P 6 :2P 6 ;ZP 6 kP 6 m7P 6 |P 6 +qP 6 hyP 6,lP 6,lP 6,lP 6MiTQ @ 7P 7 P 7:2P 7\YP 7m7P 7+qP 7h6P 7m6P 79P 7
2P 7
XP 7
ZP 7+@P 7- P 7-P 7-@P 7-TP 7=P 7$D+P 7$KIP 7$KJP 7$KLP 7$hqP 7$hyP 7%
RP 7%qP 7%yP 7%iQP 7%lSP 7&*2P 7&<RP 7&=rP 7&IP 7&K2P 7&L\P 7&M7P 7&|RP 7&}zP ?-3P ?I;P ?[rP B
x0P B
xpP B
xrP B
xtP B
y6P B
ypP B
z7P B
}yP B UQ v B ZQ B uQ | B Q z B TQ | B H:Q w B LqQ x B 9Q } B Q v B :Q } B <|Q x B nQ z B Q { B 2Q u B +1Q u B =Q ~ B KQ B M Q { B Y5Q y B ]7Q ~ B x5Q w B 5Q y B5 QP B5 PP B5 TP B5 XP B5 xP B5
P B5TP B5ZP C XwP C [yP C \P C 8VP C 9QP C :;P C iVP C j9P C kXP C kxP C$ P C$<P C$^P C$hwP C$lRQ C$lVQ ~ C$lrQ C$lvQ ~ C%X<P C%kwP C&
P m C&)2P ] C&)7P h C&8wP h C&8|P n C&;P C&;P C&;P C&=P C&=zP C&\P C&|TP JP J :P J;ZP JI;P J[P J\zP J]7P J^P JkP
J yP J
P J
RP
J
[P J P J P J P
J:=P J<P J=P JJ6P JYRP
Ji9P J
PP Jn=2P Jn=3P Jn=6P Jn=7P N (xP N (zP N (zP N )3P N *QP N +1P N +4P N +6P N ,P N , P N ,tP N -3P N (xP N (zP N )3P N *QP N +1P N +4P N +6P N ,tP N -P N -3P N 8xP $ N 93P $ N :QP $ N ;1P $ N ;4P $ N ;6P $ N <tP $ N =P $ N =3P $ N:D P ) N<IP & N<I;P N=K{P N=h6P N>
P Nv9P Nv9P Nv<zP O$UP O$+7P O$+<P O$9P O$;P O$;7P O$;<P O$<P O$<WP O$=VP
O$H:P O$H<P O$IVP O$IYP
O%<|P O%K<P O%]VP O%]YP O%|P O& vP
O&8tP O&<P O&KP O&MVP O&]VP
O&}P O,pP O,tP O,vP O, P O4J9P O4[RP O4lP O6
P R )P R )P R )YP R ,RP R ,SP R -sP R4,qP R4,sP R4,}P R4;ZP R4<QP R4DP R4D+P R4DHP R4E*P R4EIP R4FP R4I7P R4K9P R4LrP R4i2P R4i8P R4i9P R4i;P R4lqP R4lsP R4lwP
R58P R59P R5=P R5=P R5=P R5=P R5= P R5H6P R5H:P R5HSP R5HVP
R5HXP R5IP R5J6P R5J:P R5KVP R5KYP R5LVP R5LzP R5MP R5MP R5MP R5UQP R5UqP R5UzP R5VP R5YP R5Z2P R5[rP R69P R6 P
R6)P R6);P R6*2P R69:P R6;P R6=P R6=P R6HxP R6IP R6IP R6JP R6KP R6LRP R6LUP R6L\P R6MP R6MVP R6MvP R6[VP R6\XP R6x:P R6{P R6{P R6{P R6}P Rz%jP
R|:1P R|;qP R|;vP R|HUP R|X1P R|[P R|kP R|lVP R} P R}
P R}1P R}QP R}HxP R}HzP R}iQP R}z1P R}z8P R}}1P R}}9P R~3P R~YP R~zP
R~
}P R~+:P R~,qP R~,xP
R~-P R~9:P R~:8P R~;P R~;RP R~;xP R~=P R~H1P R~H8P R~I P R~LxP
R~z2P R wP S \zP S j6P S
RP S )1P S <RP S =rP S HyP S H{P S IP S [VP SL9P SL9P SLJ9P SLLuP SLMP SL^P SMLP SMLP SM\ P SM]P SN8P SN9P SNxP SNyP SN P SN
QP # WFLVP " j.+jP >}{woP