编制一个程序，其实现的功能为：将内存中从SOURCE开始的区域里存放的20个字节的压缩BCD码转换为ASCⅡ码，每个压缩的BCD码转换为两个ASCⅡ码，并在最高位加上奇校验位，结果存放到RESULT开始的内存区域。例如：内存中有：73H，45H……则结果为：37H，B3H，34H，B5H……部分程序已经给出，其中原始数据由过程LOAD从文件INPUT.DAT中读入以SOURCE开始的内存单元中。运算结果要求从RESULT开始的内存单元存放，由过程SAVE保存到文件OUTPUT.DAT中。请填空BEGIN和END之间已给出的源程序使其完整，空白已经用横线标出，每行空白一般只需要一条指令，但采用功能相当的多条指令也行，考生也可以删除BEGIN和END之间原有的代码并自行编程来完成要求的功能。对程序必须进行汇编，并与IO.OBJ链接产生可执行文件，最终运行程序产生结果。调试中若发现整个程序中存在错误之处，请加以修改。【试题程序】EXTRN LOAD:FAR,SAVE:FARN EQU 20DSEG SEGMENTSOURCE DB N DUP(?)RESULT DB N*2 DUP(0)NAME0 DB 'INPUT.DAT',0NAME1 DB 'OUTPUT.DAT',0DSEG ENDSSSEG SEGMENT STACKDB 256 DUP(?) SSEG ENDS CSEG SEGMENTASSUME CS:CSEG,DS:DSEG,SS:SSEG START PROC FARPUSH DSXOR AX,AXPUSH AXMOV AX,DSEGMOV DS,AXLEA DX,SOURCELEA SI,NAME0MOV CX,NCALL LOAD; ******** BEGIN ********LEA SI,SOURCELEA DI,RESULTMOV CX,NAGAIN: MOV AL,[SI]MOV AH,AL(1)AND AH,0FOH(2)MOV CL,4(3)POP CXADD AL,30H(4) NEXTOR AL,80HNEXT: MOV [DI],ALINC DIADD AH,30H(5) NEXT1OR AH,80HNEXT1: MOV [DI],AHINC DIINC SILOOP AGAIN; ******** END ********LEA DX,RESULTLEA SI,NAME1MOV CX,N*2CALL SAVERETSTART ENDPCSEG ENDSEND START
编制一个程序，其实现的功能为：将内存中从SOURCE开始的区域里存放的20个字节的压缩BCD码转换为ASCⅡ码，每个压缩的BCD码转换为两个ASCⅡ码，并在最高位加上奇校验位，结果存放到RESULT开始的内存区域。
例如：
内存中有：73H，45H……
则结果为：37H，B3H，34H，B5H……
部分程序已经给出，其中原始数据由过程LOAD从文件INPUT.DAT中读入以SOURCE开始的内存单元中。运算结果要求从RESULT开始的内存单元存放，由过程SAVE保存到文件OUTPUT.DAT中。
请填空BEGIN和END之间已给出的源程序使其完整，空白已经用横线标出，每行空白一般只需要一条指令，但采用功能相当的多条指令也行，考生也可以删除BEGIN和END之间原有的代码并自行编程来完成要求的功能。
对程序必须进行汇编，并与IO.OBJ链接产生可执行文件，最终运行程序产生结果。调试中若发现整个程序中存在错误之处，请加以修改。
【试题程序】
EXTRN LOAD:FAR,SAVE:FAR
N EQU 20
DSEG SEGMENT
SOURCE DB N DUP(?)
RESULT DB N*2 DUP(0)
NAME0 DB 'INPUT.DAT',0
NAME1 DB 'OUTPUT.DAT',0
DSEG ENDS
SSEG SEGMENT STACK
DB 256 DUP(?) SSEG ENDS CSEG SEGMENT
ASSUME CS:CSEG,DS:DSEG,SS:SSEG START PROC FAR
PUSH DS
XOR AX,AX
PUSH AX
MOV AX,DSEG
MOV DS,AX
LEA DX,SOURCE
LEA SI,NAME0
MOV CX,N
CALL LOAD
; ******** BEGIN ********
LEA SI,SOURCE
LEA DI,RESULT
MOV CX,N
AGAIN: MOV AL,[SI]
MOV AH,AL
(1)
AND AH,0FOH
(2)
MOV CL,4
(3)
POP CX
ADD AL,30H
(4) NEXT
OR AL,80H
NEXT: MOV [DI],AL
INC DI
ADD AH,30H
(5) NEXT1
OR AH,80H
NEXT1: MOV [DI],AH
INC DI
INC SI
LOOP AGAIN
; ******** END ********
LEA DX,RESULT
LEA SI,NAME1
MOV CX,N*2
CALL SAVE
RET
START ENDP
CSEG ENDS
END START
相关考题：
请编制程序PROG1.ASM，其功能是：以SOURCE开始的内存区域存放着多个字节的数据，其中有压缩BCD码和其他数据。现按下列编码规则进行编码：在每个压缩BCD码前面加两个字节前缀代码BEH和CCH，并在其后加两个字节后缀代码DDH和EDH；如果不是压缩BCD码，则该数据前后均加两个代码0DH和0EH。编码后的数据存放到RESULT指示的内存区域。例如：原信息为：12H,D9H,86H,54H,……结果为：BEH,CCH,12H,DDH,EDH,0DH,0EH,D9H,0DH,0EH,BEH,CCH,86H,DDH,EDH,BEH， CCH,86H,DDH,EDH,……部分程序已给出，其中原始数据由过程LOAD从文件INPUT1.DAT中读入SOURCE开始的内存单元中。运算结果要求从RESULT开始存放，由过程SAVE保存到文件 OUTPUT1.DAT中。填空BEGIN和END之间已给出的源程序使其完整(空白已用横线标出，每行空白一般只需一条指令，但采用功能相当的多条指令亦可)，或删除BEGIN和END之间原有的代码并自行编程来完成要求的功能。对程序必须进行汇编，并与IO.OBJ链接产生PROG1.EXE执行文件，最终运行程序产生结果(无结果或结果不正确者均不得分)。调试中若发现整个程序中存在错误之处，请加以修改。试题程序：EXTRN LOAD:FAR, SAVE:FARN EQU 10STAC SEGMENT STACKDB 128 DUP (?)STAC ENDSDATA SEGMENTSOURCE DB N DUP(0)RESULT DB 5*N DUP(0)NAME0 DB 'INPUT1.DAT',0NAME1 DB 'OUTPUT1.DAT',0DATA ENDSCODE SEGMENTASSUME CS:CODE, DS:DATA, SS:STACSTART PROC FARPUSH DSXOR AX,AXPUSH AXMOV AX,DATAMOV DS,AXMOV ES,AX ; 置附加段寄存器LEA DX,SOURCE ; 数据区起始地址LEA SI,NAME0 ; 原始数据文件名MOV CX,N ; 字节数CALL LOAD ; 从INPUT1.DAT中读取数据;**** BEGIN ****LEA SI, SOURCEMOV DI,OFFSET RESULTMOV CX,NCLP1: MOV AL, [SI]MOV BL,ALMOV AH,AL(1)AND AL,0FOH(2)MOV CL,4(3)POP CXCMP (4)JA CLP2CMP AH,9JA CLP2MOV (5)INC DI&nbs
请编制程序，其功能是：以SOURCE开始的内存区域存放着N个字节的压缩BCD码，将每个压缩BCD码转换成两个 ASCII值，并在每个ASCII值的最高位增加偶校验位，结果存放在RESULT指示的内存区域。例如：原压缩BCD码：26H，75H，91H，33H…结果为： B2H，36H，B7H…部分程序已经给出，其中原始数据由过程LOAD从文件INPUT1.DAT中读入SOURCE开始的内存单元中，转换结果要求从RESULT开始存放，由过程SAVE保存到文件OUTPUT1.DAT中。请填空BEGIN和END之间已经给出的一段原程序使其完整，需填空处已经用横线标出，每个空白一般只需要填一条指令或指令的一部分(指令助记符或操作数)，也可以填入功能相当的多条指令，或删去BEGIN和END之间原有的代码并自行编程来完成所要求的功能。对程序必须进行汇编，并与IO.OBJ链接产生可执行文件，最终运行程序产生结果。调试中若发现整个程序中存在错误之处，请加以修改。[试题程序]EXTRN LOAD：FAR，SAVE：FARN EQU 10STAC SEGMENT STACKDB 128 DUP(?)STAC ENDSDATA SEGMENTSOURCE DB N DUP(0)RESULT DB 2*N DUP(0)NAME0 DB 'INPUT1.DAT'，0NAME1 DB 'OUTPUT1.DAT'，0DATA ENDSCODE SEGMENTASSUME CS：CODE， DS：DATA， SS：STACSTART PROC FARPUSH DSXOR AX，AXPUSH AXMOV AX，DATAMOV DS，AXMOV ES，AX ；置附力，段寄存器LEA DX，SOURCE ；数据区起始地址LEA SI，NANE0 ；原始数据文件名MOV CX，N ；字节数CALL LOAD ；从'INPUT1.DAT' 中读取数据； *************BEGIN *************LEA SI，SOURCEMOV DI，OFFSET RESULTMOV CX，NSERCH1： MOV (1)MOV AH，ALAND AH，0FHAND AL，0FOHPUSH CXMOV CL，4(2)(3)ADD AL，30H(4)OR AL，80HSERCH2： MOV [DI]，ALINC DI(5)JP SERCH3OR AH，80HSERCH3： MOV [DI]，AHINC DIINC SI(6) SERCH1； ******** END ***********LEA DX，RESULT ； 结果数据区首址LEA
请编制程序PROG1.ASM，其功能是：将连续20个字节的ASCII码(30～39之间)顺序转换成10个压缩BCD码。例如：原始数据 31H，33H，35H，38H……(后面依次有16个ASCII码)转换后为 13H，58H，……(后面依次有8个压缩BCD码)部分程序已经给出，其中原始数据由过程LOAD从文件INPUT1.DAT中读入SOURCE开始的内存单元中，运算结果(要求从RESULT开始存入)由SAVE过程保存到OUTPUT. DAT中。请在BEGIN和END之间补充一段源程序，完成要求的功能。原有数据由过程LOAD从文件INPUT1.DAT中读入SOURCE开始的内存单元中，结果要求从RESULT开始存放，由SAVE保存到OUTPUT1.DAT文件对程序必须进行汇编，并与IO.OBJ连接产生PROG1.EXE执行文件，最终产生运行结果(无结果或结果不正确均不得分)。部分程序如下：EXTRN LOAD：FAR，SAVE：FARN EQU 20STAC SEGMENT STACKDB 128 DUP(?)STAC ENDSDATA SEGMENTSOURCE DB 31H，32H，33H，34H，35H，36H，37H，38HRESULT DB N DUP(0)NAME0 DB 'INPUT1.DAT'， 0NAME1 DB 'OUTPUT1.DAT'， 0DATA ENDSCODE SEGMENTASSUME CS：CODE，DS：DATA，SS：STACSTART PROC FARPUSH DSXOR AX,AXPUSH AXMOV AX,DATAMOV DS,AXLEA DX，SOURCE ; 数据区起始地址LEA SI，NAME0 ; 原始数据文件名MOV CX,N ; 字节数CALL LOAD ; 从 "INPUT1. DAT"中读取数据**** BEGIN ******** END ****LEA DX,RESULT ; 结果数据区首地址LEA SI, NAME1 ; 结果文件名MOV CX,N ; 结果字节数CALL SAVE ; 保存结果到文件RETSTART ENDPCODE ENDSEND START相关知识：●BCD码和压缩BCD码BCD码就是以二进制数表示十进制数，以4位二进制数表示1位十进制数，0000～1001表示0～9，1010～1111六个状态无意义。非压缩BCD码以一个字节表示一位BCD码，压缩BCD码一个字节表示两位BCD码。●ASCII码与压缩BCD码之间的转换0～9的ASCH码为30H～39H，从数字的ASCII码求数字本身，只要用他的ASCII码减去30H即可。由两位非压缩BCD码构成一个字节的压缩BCD码可将高位的BCD码移到高四位，然后与低位的BCD码进行逻辑或(OR)操作即可完成。编程思路：第一步：分析本程序要求完成的功能。本程序要求完成以下功能：(1)从数据文件INPUT1.DAT中读取20个字节的ASCII码存放在SOURCE开始的内存单元中。(2)将SOURCE开始的20个ASCII码求出其对应的数值，然后转换成压缩的BCD码，依次放在RESULT开始的内存单元中。(3)将处理之后的字符串存入到OUTPUT1.DAT。第二步：用相应汇编程序来实现其功能。(1)数据的读取和存入题目中已经给出，只要完成20个ASCII码到压缩BCD的转换即可。(2)由ASCII码到压缩BCD码的转换过程如下：由于20位ASCII码正好转换成10个字节压缩BCD码，不存在某个字节的BCD码只有一位。因此依次从SOURCE开始的内存单元取两个ASCII码，前一个转换成压缩BCD码的高位，后一个转换成压缩BCD码的低位来构成压缩BCD码；每两个ASCII码转换成一个字节的压缩BCD码，直至转换完毕。
请编制程序PROG1.ASM，其功能是：以SOURCE开始的内存区域存放着红外数据通信系统传输的数据信息，其编码形式为：AACCXYXYDDEE，表示传送的数据为压缩BCD码XY。如AACCl212DDEE表示数据12。现要求编程实现解码，如果压缩BCD码不是以AACC开始或者不是以DDEE结束或中间两个BCD码不同，则此数据不解码。解码后的BCD码存入 RESULT开始的内存区域。例如：原信息为：AAH,CCH,05H,05H,DDH,EEH,AAH,C8H,43H,43H,DDH,0EH,AAH,CCH,87H，87H,DDH,EEH,......结果为：05H,87H,……部分程序已给出，其中原始数据由过程LOAD从文件INPUT1.DAT中读入SOURCE开始的内存单元中。运算结果要求从RESULT开始存放，由过程SAVE保存到文件 OUTPUT1.DAT中。填空BEGIN和END之间已给出的源程序使其完整(空白已用横线标出，每行空白一般只需一条指令，但采用功能相当的多条指令亦可)，或删除BEGIN和END之间原有的代码并自行编程来完成要求的功能。对程序必须进行汇编，并与IO.OBJ链接产生PROG1.EXE执行文件，最终运行程序产生结果(无结果或结果不正确者均不得分)。调试中若发现整个程序中存在错误之处，请加以修改。试题程序：EXTRN LOAD:FAR, SAVE:FARN EQU 10STAC SEGMENT STACKDB 128 DUP (?)STAC ENDSDATA SEGMENTSOURCE DB 6*N DUP(0)RESULT DB N DUP(0)NAME0 DB 'INPUT1.DAT',0NAME1 DB 'OUTPUT1.DAT',0DATA ENDSCODE SEGMENTASSUME CS:CODE, DS:DATA, SS:STACSTART PROC FARPUSH DSXOR AX ,AXPUSH AXMOV AX,DATAMOV DS,AXMOV ES,AX ; 置附加段寄存器LEA DX,SOURCE ; 数据区起始地址LEA SI,NAME0 ; 原始数据文件名MOV CX,6*N ; 字节数CALL LOAD ; 从INPUT1.DAT中读取数据; **** BEGIN ****LEA SI,SOURCEMOV DI,OFFSET RESULTMOV CX, (1)LPST: MOV DL, 6MCLP1: MOV AL, (2)MOV BX,SICMP AL,0AAHJNZ NEXTDINC SIMOV AL,[SI]CMP AL,0CCH(3)INC SIMOV AL,[SI]MOV DH,ALINC SIMOV AL,[SI](4)JNZ NEXTDINC SIMOV AL,[SI]
编程实现将片内RAM 20H单元的压缩BCD码转换为非压缩BCD码，结果存于R0和R1中