mul.srm

这是我自己写的两个8位二进制数的乘法程序

@E"VRMNFMl;C"RHyVDjCR
"VR8#:\FIV0N\sC#b$MD$HVR3PUnb\VoUN_nD4\HGL\HMDHGM\kHl#H3;P"RHyVD4CR
"VR8E:\FIlCF\s	HU#C3I4RF\s	l0kD\Dlk3;P"RHyVD.CR
qehv' RzphQQqA3h37.uv)Q'y;RRCPHI8RHRej
h qvRh'zQApQ3.m)3Qu)vR';yHRPCHIR8
R4evhq zR'hQQpAh3q74.A3Qu)vR';yHRPCHIR8
R.evhq zR'hQQpAm3X)u.3)'Qv;RRyPIHCRRH8dh
eqRv 'Qzhp3QAQ3heuv)Q'y;RRCPHI8RHRec
h qvRB'Xgj6j3zmAw)3uQ;v'RPyRHRCIH68R
qehv' RX6BgjQj3A3zwuv)Q'y;RRCPHI8RHRen
h qvRF'Isv	3k3D0PHCsD'Fo;RRyPIHCRRH8(R
MRQzhpRQAq.h7RQu)vN;
PGR3O#_HoCN0R
4;N3PRGDO_F$O0bDCRFOoHRN;
P8R3s_NIo#k0R
4;N3PRb_E$#CH0Rz"pa
";N3PR8#H#FCDPlRC.4N;
PHR3#Hbsl;R4
QHRjH;
R;Q4
mFR;L
oR
m;N3LRb_E$#CH0_MbH_lMNCmR"z;a"
fbRjR:jNRM8mRRmQQj,4M;
RhRzQApQR.m)RQu)vN;
PGR3O#_HoCN0R
4;N3PRGDO_F$O0bDCRFOoHRN;
P8R3s_NIo#k0R
4;N3PR8#H#FCDPlRC.4N;
PHR3#Hbsl;R4
QHRjH;
R;Q4
mFR;R
bfjj:RRFsmRRmQQj,4M;
RhRzQApQR7qh.RA4uv)Q;P
NRO3G_oH#NR0C4N;
PGR3OF_DOb0$CFRDoRHO;P
NRH38#D#FPCCl.;R4
RNP3bH#sRHl4H;
R;Qj
QHR4F;
R
m;bjRf:HjRMQPRjQhRjQhRjb;
R:fjjMRN8RRmmjRQh4,Q;R
MRQzhpRQAX.m)RQu)vN;
PGR3O#_HoCN0R
4;N3PRGDO_F$O0bDCRFOoHRN;
P8R3s_NIo#k0R
4;N3PR8#H#FCDPlRC.4N;
PHR3#Hbsl;R4
QHRjH;
R;Q4
mFR;R
bfjj:RsGFRmmRR,QjQ
4;MzRRhQQpAhRQe)RuQ
v;N3PRGHO_#0oNC;R4
RNP3_GOD0FO$RbCDHFoO
R;N3PRb_E$#CH0Rz"pa
";N3PRHs#bH4lR;P
NRC38DRN$jH;
R
Q;F;Rm
RNH3sPC__MF8NCD$;R4
RoLQN;
LbR3E#$_H_0Cb_HMMCNlRj"Q"o;
L;Rm
RNL3$bE_0#HCH_bMN_Ml"CRm"za;R
bfjj:RPHMRmmRR
Q;MXRRBjg6jARmzuwR);Qv
RNP3_GOHN#o04CR;P
NRC38DRN$4
j;N3PRGDO_F$O0bFCRkk0b0
R;N3PRb_E$#CH0Rm"QA"zw;P
NR#3HblsHR
4;H;RQ
mFR;H
NR#3HbRN84b;
R:fjjkRLVRRmm;RQ
RMRX6BgjQjRARzwuv)Q;P
NRO3G_oH#NR0C4N;
P8R3C$DNR;4j
RNP3_GOD0FO$RbCHkMb0
R;N3PRb_E$#CH0Rm"QA"zw;P
NR#3HblsHR
4;H;RQ
RNH3bH#N48R;R
Fmb;
R:fjjkRLVRRmm;RQ

@ 
ftell;
@E@MR@..:4::(.44:jIRRFRs	v0kDRsPCHoDF;O
NRC38#MHo_sbN0H_GDGHMRO"Ggn6dPcJc-;6"
RNP3_H##sFkO4CR;P
NRH3DMFCMR;.j
RNP3PH#CDsHF4oR;P
NR#3H_sPCHoDFR
4;N3PRFosHhCNlRk"vD;0"
RNP3M#$_lOFbCHD_HbFM40R;P
NRF3OlDbHCF_bH_M0MCNlRDvk0
R;N#PR$bM_NHs00MHFRb"VoXN=Bdg6nceTc"-6;P
NRN3lbb_F0MHF#yR"mQuam:h1\-"|CsMO$|b0-Fbs|N-bsX0|Bdg6nceTc|-6-GlNV|NM4|jj-|l4-CVsJ3|4j|jj-b#N|\7:\]\\FIlCF\s	\Q\\13 U4FRIs\	\\k\vD\0\\C\sP\_.\v\\k#D3N-b|Fb0N|\7:\]\\FIlCF\s	\Q\\13 U4FRIs\	\\k\vD\0\\C\sP\_.\v\\k0D3N-b|FblN|\7:\]\\FIlCF\s	\Q\\13 U4FRIs\	\\k\vD\0\\C\sP\_.\v\\klD3N-b|C_MNP|HV7\:\\F\]lFCIs\	\\1\Q 4U3RsIF	\\\\Dvk0\\\\PsC_\.\\C\Ps\HV\v\\kPD3H-V|b8s[H7s|:\\\\l]FCsIF	\\\\ Q1UR34I	Fs\\\\v0kD\\\\\y"
B:z)\:"7\\\\10FVICNs\\\\1b$MD$HVR3PUn\\\\oVbNn_U4\\\\MLH\\\\lH_GDGHM3CCG\4":4(6j(Ucnj;
"
RNP3VsCFHD8MPo_H_CIH48R;P
NRL3F#0Fb8CFMR
4;N3PRGFON_#bN#;Rj
RNP3_ObOOEC	l#kR64gjdn66;gc
RNP3_kH0HHlM#o_OCNDRj4jj
j;N3PRE0N#HMlHo;R4
RNP3_kHM#D_D	NORcggjjjj;R
H@:@..4.:n.:.:R4nN:r(jN9Rrj(:9N;
HsR30FD_sMHoNRlC";N"
RNH3N#DOH	_MR#0.cnUd66cnH;
R.@@::.d4.n:dn:4R(Lr:Rj9L:r(j
9;N3HRs_0DFosHMCNlR""L;H
NRD3#N_O	H0M#RU.nccd66
n;F@R@.6:.::4d.46:6kRF06r4:Rj9Frk04j6:9N;
HsR30FD_sMHoNRlC"0Fk"N;
H#R3D	NO_#HM0nR.U6cdc;6n
RoLN9rj;L
NRM#$_0MF_8N_sCHPs;R4
RoLN9r4;L
NRM#$_0MF_8N_sCHPs;R4
RoLN9r.;L
NRM#$_0MF_8N_sCHPs;R4
RoLN9rd;L
NRM#$_0MF_8N_sCHPs;R4
RoLN9rc;L
NRM#$_0MF_8N_sCHPs;R4
RoLN9r6;L
NRM#$_0MF_8N_sCHPs;R4
RoLN9rn;L
NRM#$_0MF_8N_sCHPs;R4
RoLN9r(;L
NRM#$_0MF_8N_sCHPs;R4
RoLL9rj;L
NRM#$_0MF_8N_sCHPs;R4
RoLL9r4;L
NRM#$_0MF_8N_sCHPs;R4
RoLL9r.;L
NRM#$_0MF_8N_sCHPs;R4
RoLL9rd;L
NRM#$_0MF_8N_sCHPs;R4
RoLL9rc;L
NRM#$_0MF_8N_sCHPs;R4
RoLL9r6;L
NRM#$_0MF_8N_sCHPs;R4
RoLL9rn;L
NRM#$_0MF_8N_sCHPs;R4
RoLL9r(;L
NRM#$_0MF_8N_sCHPs;R4
@sR@d.:d(:4::dd.((+:nkMUk_#ldr4:R69fjdjjgj:gj(jjzjRhQQpAhRq7u.R)RQvkUMn_l#k_B43mH6___N.jQ
Sjk=#l._4r94jRdfQjjjj:(ggjjjjRQ
S4M=kn#U_k4l_3cBmRdfQjjjj:(ggjjjjRm
S=nkMUk_#l3_4hg_.Rdfmjjjj:(ggjjjjRo;
bjRQ;RobQo4;b;RmN3HRVDkD_O0N0N_MlkCRM_nU#_kl4m3B6__HNj._Rs;
R.@@::dd4d(:d(:.+k(:M_66#rkl4c.:9dRfjjjj:(ggjjjjRQzhpRQAq.h7RQu)vMRk6#6_k4l_3(Bm_NH_.
_jS=QjNr_O(S9
Qk4=M_66#_kl4m3BnQRfdjjjjg:g(jjjjSR
mM=k6#6_k4l_3ch_4mRfdjjjjg:g(jjjj
R;oQbR4b;oRNm;HVR3k_DD00NO_lMNCMRk6#6_k4l_3(Bm_NH_.R_j;R
s@:@.d4d:(d:d:+.((M:kc#._k4lr49:dRjfdj:jjgjg(jRjjzphQQqARhR7.uv)QRckM.k_#l3_4B_mnH._N_Sj
Q#j=kUl_rRg9fjQdj:jjgjg(jRjj
4SQ=ckM.k_#l3_4BRm6fjQdj:jjgjg(jRjj
=Smk.Mc_l#k_h43_Rdcfjmdj:jjgjg(jRjj;b
oR;QjoQbR4b;oRNm;HVR3k_DD00NO_lMNCMRkc#._k4l_3nBm_NH_.R_j;R
s@:@.d4.:4.:d:+4.(k:#l._4r:4.cf9Rdjjjjg:g(jjjjhRzQApQR7qh.)RuQ#vRk4l_..r49Q
Sj_=LO9rc
4SQ=dh_nQRfdjjjjg:g(jjjjSR
mk=#l._4r94.Rdfmjjjj:(ggjjjjRo;
b4RQ;RobmH;NRk3VD0D_N_O0MCNlRk'#l._4r94.'s;
R.@@::d.4d4:..:4+#(:k4l_ncr4:Rn9fjdjjgj:gj(jjzjRhQQpA)Rm.)RuQ#vRk4l_n.r49Q
Sjk=#ln_4_4Nr.f9RQjdjjgj:gj(jj
jRS=Q4#_kl4Ln_r94.RdfQjjjj:(ggjjjjRm
S=l#k_r4n4R.9fjmdj:jjgjg(jRjj;b
oR;QjoQbR4b;oRNm;HVR3k_DD00NO_lMNC#R'k4l_n.r49
';s@R@..:d::44d4.:.:+(#_kl44nrc9:nRjfdj:jjgjg(jRjjzphQQqARhR7.uv)QRl#k__4nLr_j4
.9S=QjLr_OnS9
Qh4=_R6.fjQdj:jjgjg(jRjj
=Sm#_kl4Ln_r94.Rdfmjjjj:(ggjjjjRo;
b4RQ;RobmH;NRk3VD0D_N_O0MCNlRk'#ln_4_jL_r94.'s;
R.@@::d.4d4:..:4+#(:k4l_ncr4:Rn9fjdjjgj:gj(jjzjRhQQpAhRq74.ARQu)vkR#ln_4_4Lr.S9
QLj=_nOr9Q
S4k=#lc_4r94.RdfQjjjj:(ggjjjjRm
S=l#k__4nN.r49mRfdjjjjg:g(jjjj
R;oQbR4b;oRNm;HVR3k_DD00NO_lMNC#R'k4l_nr_L4'.9;R
s@:@.d4.:4.:d:+4.(k:#ln_4r:4cnf9Rdjjjjg:g(jjjjhRzQApQR.m)RQu)vkR#ln_4r94j
jSQ=l#k__4nNjr49QRfdjjjjg:g(jjjjSR
Q#4=k4l_nr_L4Rj9fjQdj:jjgjg(jRjj
=Sm#_kl44nrjf9Rmjdjjgj:gj(jj;jR
RobQoj;b4RQ;RobmH;NRk3VD0D_N_O0MCNlRk'#ln_4r94j's;
R.@@::d.4d4:..:4+#(:k4l_ncr4:Rn9fjdjjgj:gj(jjzjRhQQpAhRq7u.R)RQv#_kl4Ln__4jrjS9
QLj=_nOr9Q
S4_=h6fjRQjdjjgj:gj(jj
jRS#m=k4l_nr_L4Rj9fjmdj:jjgjg(jRjj;b
oR;Q4ombR;RNH3DVkDN_0OM0_NRlC'l#k__4nLr_j4'j9;R
s@:@.d4.:4.:d:+4.(k:#ln_4r:4cnf9Rdjjjjg:g(jjjjhRzQApQR7qh.RA4uv)QRl#k__4nLjr49Q
Sj_=LO9rn
4SQ=l#k_r4c4Rj9fjQdj:jjgjg(jRjj
=Sm#_kl4Nn_r94jRdfmjjjj:(ggjjjjRo;
b4RQ;RobmH;NRk3VD0D_N_O0MCNlRk'#ln_4_4Lrj;9'
@sR@d.:.4:4::d.4(.+:l#k_r4c46d:9dRfjjjj:(ggjjjjRQzhpRQAmR).uv)QRl#k_r4c4
j9S=Qj#_kl4Nc_r94jRdfQjjjj:(ggjjjjRQ
S4k=#lc_4_4Lrjf9RQjdjjgj:gj(jj
jRS#m=k4l_cjr49mRfdjjjjg:g(jjjj
R;oQbRjb;oR;Q4ombR;RNH3DVkDN_0OM0_NRlC'l#k_r4c4'j9;R
s@:@.d4.:4.:d:+4.(k:#lc_4r:4d6f9Rdjjjjg:g(jjjjhRzQApQR7qh.)RuQ#vRk4l_c__Ljjr49Q
Sj_=LO9r6
4SQ=ch_.QRfdjjjjg:g(jjjjSR
mk=#lc_4_4Lrjf9Rmjdjjgj:gj(jj;jR
RobQo4;b;RmN3HRVDkD_O0N0N_Ml'CR#_kl4Lc__4jrj;9'
@sR@d.:.4:4::d.4(.+:l#k_r4c46d:9dRfjjjj:(ggjjjjRQzhpRQAq.h7Au4R)RQv#_kl4Lc_r94j
jSQ=OL_r
69S=Q4#_kl44.rjf9RQjdjjgj:gj(jj
jRS#m=k4l_cr_N4Rj9fjmdj:jjgjg(jRjj;b
oR;Q4ombR;RNH3DVkDN_0OM0_NRlC'l#k__4cLjr49
';s@R@..:d::44d4.:.:+(#_kl44crd9:6Rjfdj:jjgjg(jRjjzphQQmAR)u.R)RQv#_kl4gcr9Q
Sjk=#lc_4_gNr9QRfdjjjjg:g(jjjjSR
Q#4=k4l_cr_Lgf9RQjdjjgj:gj(jj
jRS#m=k4l_c9rgRdfmjjjj:(ggjjjjRo;
bjRQ;RobQo4;b;RmN3HRVDkD_O0N0N_Ml'CR#_kl4gcr9
';s@R@..:d::44d4.:.:+(#_kl44crd9:6Rjfdj:jjgjg(jRjjzphQQqARhR7.uv)QRl#k__4cLr_jgS9
QLj=_6Or9Q
S4_=hcf4RQjdjjgj:gj(jj
jRS#m=k4l_cr_Lgf9Rmjdjjgj:gj(jj;jR
RobQo4;b;RmN3HRVDkD_O0N0N_Ml'CR#_kl4Lc__gjr9
';s@R@..:d::44d4.:.:+(#_kl44crd9:6Rjfdj:jjgjg(jRjjzphQQqARhA7.4)RuQ#vRk4l_cr_LgS9
QLj=_6Or9Q
S4k=#l._4rRg9fjQdj:jjgjg(jRjj
=Sm#_kl4Nc_rRg9fjmdj:jjgjg(jRjj;b
oR;Q4ombR;RNH3DVkDN_0OM0_NRlC'l#k__4cL9rg's;
R.@@::d.4d4:..:4+#(:k4l_..r4:Rc9fjdjjgj:gj(jjzjRhQQpA)Rm.)RuQ#vRk4l_.4r49Q
Sjk=#l._4_4Nr4f9RQjdjjgj:gj(jj
jRS=Q4#_kl4L._r944RdfQjjjj:(ggjjjjRm
S=l#k_r4.4R49fjmdj:jjgjg(jRjj;b
oR;QjoQbR4b;oRNm;HVR3k_DD00NO_lMNC#R'k4l_.4r49
';s@R@..:d::44d4.:.:+(#_kl44.r.9:cRjfdj:jjgjg(jRjjzphQQqARhR7.uv)QRl#k__4.Lr_j4
49S=QjLr_OcS9
Qh4=_Rd6fjQdj:jjgjg(jRjj
=Sm#_kl4L._r944Rdfmjjjj:(ggjjjjRo;
b4RQ;RobmH;NRk3VD0D_N_O0MCNlRk'#l._4_jL_r944's;
R.@@::d.4d4:..:4+#(:k4l_..r4:Rc9fjdjjgj:gj(jjzjRhQQpAhRq74.ARQu)vkR#l._4_4Lr4S9
QLj=_cOr9Q
S4k=#lj_4r944RdfQjjjj:(ggjjjjRm
S=l#k__4.N4r49mRfdjjjjg:g(jjjj
R;oQbR4b;oRNm;HVR3k_DD00NO_lMNC#R'k4l_.r_L4'49;R
s@:@.d4.:4.:d:+4.(k:#lj_4r:44df9Rdjjjjg:g(jjjjhRzQApQR.m)RQu)vkR#lj_4r
g9S=Qj#_kl4Nj_rRg9fjQdj:jjgjg(jRjj
4SQ=l#k__4jL9rgRdfQjjjj:(ggjjjjRm
S=l#k_r4jgf9Rmjdjjgj:gj(jj;jR
RobQoj;b4RQ;RobmH;NRk3VD0D_N_O0MCNlRk'#lj_4r'g9;R
s@:@.d4.:4.:d:+4.(k:#lj_4r:44df9Rdjjjjg:g(jjjjhRzQApQR7qh.)RuQ#vRk4l_j__Lj9rg
jSQ=OL_r
d9S=Q4h6_.RdfQjjjj:(ggjjjjRm
S=l#k__4jL9rgRdfmjjjj:(ggjjjjRo;
b4RQ;RobmH;NRk3VD0D_N_O0MCNlRk'#lj_4_jL_r'g9;R
s@:@.d4.:4.:d:+4.(k:#lj_4r:44df9Rdjjjjg:g(jjjjhRzQApQR7qh.RA4uv)QRl#k__4jL9rg
jSQ=OL_r
d9S=Q4#_klU9rgRdfQjjjj:(ggjjjjRm
S=l#k__4jN9rgRdfmjjjj:(ggjjjjRo;
b4RQ;RobmH;NRk3VD0D_N_O0MCNlRk'#lj_4_gLr9
';s@R@..:d::44d4.:.:+(#_klUjr4:R.9fjdjjgj:gj(jjzjRhQQpA)Rm.)RuQ#vRkUl_r
g9S=Qj#_klUr_Ngf9RQjdjjgj:gj(jj
jRS=Q4#_klUr_Lgf9RQjdjjgj:gj(jj
jRS#m=kUl_rRg9fjmdj:jjgjg(jRjj;b
oR;QjoQbR4b;oRNm;HVR3k_DD00NO_lMNC#R'kUl_r'g9;R
s@:@.d4.:4.:d:+4.(k:#lr_U4.j:9dRfjjjj:(ggjjjjRQzhpRQAq.h7RQu)vkR#l__ULr_jgS9
QLj=_.Or9Q
S4_=h4f(RQjdjjgj:gj(jj
jRS#m=kUl__gLr9mRfdjjjjg:g(jjjj
R;oQbR4b;oRNm;HVR3k_DD00NO_lMNC#R'kUl__jL_r'g9;R
s@:@.d4.:4.:d:+4.(k:#lr_U4.j:9dRfjjjj:(ggjjjjRQzhpRQAq.h7Au4R)RQv#_klUr_LgS9
QLj=_.Or9Q
S4k=#lr_ngf9RQjdjjgj:gj(jj
jRS#m=kUl__gNr9mRfdjjjjg:g(jjjj
R;oQbR4b;oRNm;HVR3k_DD00NO_lMNC#R'kUl__gLr9
';s@R@..:d::44d4.:.:+(F_k046r4:R(9fjdjjgj:gj(jjzjRhQQpA)Rm.)RuQFvRk40_r944
jSQ=0Fk_N4_r944RdfQjjjj:(ggjjjjRQ
S4k=F0__4L4r49QRfdjjjjg:g(jjjjSR
mk=F0r_44;49
RobQoj;b4RQ;RNH3DVkDN_0OM0_NRlC'0Fk_44r4;9'
@sR@d.:.4:4::d.4(.+:0Fk_44r69:(Rjfdj:jjgjg(jRjjzphQQqARhR7.uv)QR0Fk_L4__4jr4S9
QLj=_(Or9Q
S4_=h6fgRQjdjjgj:gj(jj
jRSFm=k40__4Lr4f9Rmjdjjgj:gj(jj;jR
RobQo4;b;RmN3HRVDkD_O0N0N_Ml'CRF_k04__Lj4r49
';s@R@..:d::44d4.:.:+(F_k046r4:R(9fjdjjgj:gj(jjzjRhQQpAhRq74.ARQu)vkRF0__4L4r49Q
Sj_=LO9r(
4SQ=l#k_r4n4R49fjQdj:jjgjg(jRjj
=SmF_k04r_N4R49fjmdj:jjgjg(jRjj;b
oR;Q4ombR;RNH3DVkDN_0OM0_NRlC'0Fk_L4_r944's;
R.@@::d.4d4:..:4+F(:k40_r:46(f9Rdjjjjg:g(jjjjhRzQApQR.m)RQu)vkRF0r_44
j9S=QjF_k04r_N4Rj9fjQdj:jjgjg(jRjj
4SQ=0Fk_L4_r94jRdfQjjjj:(ggjjjjRm
S=0Fk_44rj
9;oQbRjb;oR;Q4N3HRVDkD_O0N0N_Ml'CRF_k04jr49
';s@R@..:d::44d4.:.:+(F_k046r4:R(9fjdjjgj:gj(jjzjRhQQpAhRq7u.R)RQvF_k04__Ljjr49Q
Sj_=LO9r(
4SQ=6h_UQRfdjjjjg:g(jjjjSR
mk=F0__4Ljr49mRfdjjjjg:g(jjjj
R;oQbR4b;oRNm;HVR3k_DD00NO_lMNCFR'k40__jL_r94j's;
R.@@::d.4d4:..:4+F(:k40_r:46(f9Rdjjjjg:g(jjjjhRzQApQR7qh.RA4uv)QR0Fk_L4_r94j
jSQ=OL_r
(9S=Q4#_kl44nrjf9RQjdjjgj:gj(jj
jRSFm=k40__4Nrjf9Rmjdjjgj:gj(jj;jR
RobQo4;b;RmN3HRVDkD_O0N0N_Ml'CRF_k04r_L4'j9;R
s@:@.d4.:4.:d:+4.(k:F0r_44(6:9dRfjjjj:(ggjjjjRQzhpRQAmR).uv)QR0Fk_g4r9Q
Sjk=F0__4N9rgRdfQjjjj:(ggjjjjRQ
S4k=F0__4L9rgRdfQjjjj:(ggjjjjRm
S=0Fk_g4r9o;