【正文】 7=1時(shí)，轉(zhuǎn)OTADDCMPB JL，AH ；JLT JLLAH ；JL〈AH時(shí)，轉(zhuǎn)JLLAHSUBBJH，JL，AH ；轉(zhuǎn)RESMY SJMP PESMY ；求階碼JLLAH：SUBB JH，80H ；SJMP RESMY ；轉(zhuǎn)RESMYOTADD：ANDB JL，0EFH ；ADDB JH，JL，AH ；ORB JH，80H ；RESMY：LD UT，4200H ；存運(yùn)算結(jié)果STB JH，[UT]+ ；STB EH，[UT]+ ；STB EL，[UT]+ ；STB DH，[UT]+ ；RET ；返回NGONE：NEGB EL ；EL求補(bǔ)SJMP CHKHL ；轉(zhuǎn)CHKHLNGTWO：NEGB HL ；HL求補(bǔ) SJMP ONATW ；轉(zhuǎn)ONATW附錄３：顯示子程序SHOWR： LD HX，4600H ；取BCD碼整數(shù)LDB AH，[HX] ；的最低位LDB BH，AHSHLB BH，04HLDB CH，AHSHPB CH，04HLDB DH，AHSHLB DH，04HLDB EH，AHSHRB CH，04HORB BH，CHORB DH，EHORB BH，DHANDB FH，BH，DHANDB FH，BH，0FH ；存于FH的低4位INC HX ；HX=460HLDB BL，ALSHLB BL，04HLDB CL，ALSHLB BL，04HLDB DL，ALSHLB DL，04HLDB EL，ALSHRB EL，04HORB BL，CLORB DL，ELORB BL，DLANDB FL，BL，F(xiàn)0H ；存入FL的高4位ORB FH，F(xiàn)L ；存于FH中LD BX，8FFFH ；向174LS273送去STB FH，[GX] ； INC HX ；HX=4602HLDB VEH，[HX]LDB VFH，VEHSHLB VFH，04HLDB VGH，VEHSHLB VGH，04HLDB WIH，VEHSHLB WIH，04HLDB VIH，VEHSHRB VIH，04HORB VFH，VGHORB WIH，VIHORB VFH，WIHANDB VJH，VFH，0FH ；存入VJH的低四位INC HX ；HX=4603HLDB VEL，[HX]LDB VFL，VELSHLB VFL，04HLDB VGL，WELSHLB VGL，04HLDB VIL，VELSHRB VIL，04HORB VFL，VGLORB WIL，VILERB VFL，WILANDB VJL，VFL，0F0H ；存于VJL的高四位ORB VJH，VJL ；存于VJH中 LDGX，9FFFH ；向274LS273送去STB VJH，[GX] ；RET ；返回58。7=1時(shí)，轉(zhuǎn)NGONECHKHL：JBS HL，7，NGTWO ；EL。7=0時(shí)，轉(zhuǎn)TWOPOOATNE：AND CX，0EFFH ；AND EX，0EFFH ；ADD BX，DX ；求和ADDC CX，EX ；SHLL BX，03H ；BX擴(kuò)大8倍ORB CH，80H ；SJMP NPMOP ；轉(zhuǎn)NRMOPTWOPO： NEG BX ； ADDC CX，0000H ； NEG CX ； SJMP OADDT ；轉(zhuǎn)OADDTTAIL2： JBC CH，7，ONEPO ；CH。7=1時(shí)，轉(zhuǎn)OTADDCMPB FL，AH ；JLT FLLAH ；FL〈AH時(shí)，轉(zhuǎn)FLLAHSUBB FH，F(xiàn)L，AH ；計(jì)算階碼SJMP RESMY ；轉(zhuǎn)PESMYFLLAH：SUBB FH，AH，F(xiàn)L ；計(jì)算階碼ORB FH，80H ；SJMP RESMY ；轉(zhuǎn)RESMYOTADD：LD TR，4000H ；存運(yùn)算結(jié)果STB FH，[TR]+ ；STB CH，[TR]+ ；STB CL。7=1時(shí)，轉(zhuǎn)TAIL2OADDT：ADD BX，DX ；求和ADDC CX，EX ；NEG BX ；ADDC CX，0000H ；NEG CX ；JBS CH，7，NEGOP ；CH。7=0時(shí)，轉(zhuǎn)MASS2SJMP ORDR2 ；轉(zhuǎn)ORDRTAADD：JBS CH，7，TAIL 2 ； CH。7=1時(shí)，轉(zhuǎn)NEAG2ORDR2：ANDB TSH，JL，0EFH ；CMPB TSL，TSH ；比較兩數(shù)階碼值JE TAADD ；相等，轉(zhuǎn)TAADDJH ONHTW ；TSL〉TSH時(shí)，轉(zhuǎn)ONHTWTWHON：SUBB AL，TSH，TSL ；計(jì)算SHPJ1： LDB BL，00H ；取出被加數(shù)尾LDB BH，IH ；數(shù)（含尾符）LDB CL，IL ；LDB CH，HH ；LDB YSH，CH ；保存尾符ANDB USH，80H ；ANDB CH，0EFH ；SHRL BX，AL ；被加數(shù)尾數(shù)右移SHRL BX，03H ；BX縮小8位，防止溢出ORB CH，USH ；LDB DH，KH ；（含尾符）LDB EL，KL ；LDB EH，JH ；LDB YTL，EH 保存尾符ANDB UTL，80H ；ANDB EH，0EFH ；SHRL DX，03H ；DX縮小8倍ORB CH，UTL LDB FL，JL ；SJMP TAADD ；轉(zhuǎn)TAADDONHTW：SUBB AL，TSL，TSH ；計(jì)算SHRH2：LDB DL，00H ；取出加數(shù)尾數(shù)LDB DH，KH ；含尾數(shù)）LDB EL，KL ；LDB EH，JH ；LDB YTL，EH ；保存尾數(shù)ANDB UTL，80H ；ANDB EH，0EFH ；SHRL DX，AL ；SHRL DX，03H ；DX縮小8倍ORB CH，UTL ；LDB BL，00H ；取出被加數(shù)尾數(shù)（含尾符）LDB BH，IH ；LDB CL，IH ；LBD CH，HH ；LBD USH，CH ；（保存尾符）ANDB USH，80H ；ANDB CH，0EFH ；SHPL BX，03H ；BX縮小8倍ORB CH，USH ；LDB FL，HL ；SJMP TAADD ；轉(zhuǎn)TAADDNEGB HL ；HL求補(bǔ)JBC JL，7，MASS1 ；JL。附　　錄附錄1：　浮點(diǎn)數(shù)加法子程序 28E0HFBADD LD GX，AX ；取出被加數(shù) LDB HL，[GX]+ ； LDB HH