年计算机三级pc技术上机指导.docVIP

年计算机三级PC技术上机指导 　　 　　编制程序题 　　 　　这种题型是根据考题要求，在BEGIN和END区间自行编制程序，然后进行汇编、连接，并运行程序，最后得到正确结果。下面是一个编制程序的例子，题目要求是: 　　 　　内存中连续存放着二十个字(WORD)，对每个字逻辑左移，使其最高位为1，其中值为零的不变。例如： 　　 　　内存中有29C1H(0010100111000001B)，0000H，134BH，... 　　 　　结果为A704H(1010011100000100B)，0000H，9A58H，... 　　 　　部分程序已给出，其中原始数据由过程LOAD从文件INPUT1.DAT中读入SOURCE开始的内存单元中，运算结果要求从RESULT开始存放，由过程SAVE保存到文件OUTPUT1.DAT中。 　　 　　下面是程序清单，其中BEGIN和END之间的程序段由考生编写。 　　 　　;PROG1.ASM 　　 　　EXTRNLOAD:FAR，SAVE:FAR 　　 　　NEQU20;需输入的字节数 　　 　　DSEGSEGMENT;数据段 　　 　　SOURCEDWNDUP(?);存放原始数据 　　 　　RESULTDWNDUP(0);存放运算结果 　　 　　NAME0DBINPUT1.DAT，0;输入文件名 　　 　　NAME1DBOUTPUT1.DAT，0;输出文件名 　　 　　DSEGENDS 　　 　　SSEGSEGMENTSTACK;堆栈段 　　 　　DB128DUP(?) 　　 　　SSEGENDS 　　 　　CSEGSEGMENT;代码段 　　 　　ASSUMECS:CSEG，DS:DSEG，SS:SSEG 　　 　　STARTPROCFAR 　　 　　PUSHDS 　　 　　XORAX，AX 　　 　　PUSHAX 　　 　　MOVAX，DSEG 　　 　　MOVDS，AX 　　 　　LEADX，SOURCE;原始数据区首址送DX 　　 　　LEASI，NAME0;输入文件名首址送SI 　　 　　MOVCX，2*N;输入字节数送CX 　　 　　CALLLOAD;从INPUT1.DAT中读取数据 　　 　　;****BEGIN**** 　　 　　LEASI，SOURCE;原始数据首地址送SI 　　 　　MOVDI，OFFSETRESULT;结果数据首地址送DI 　　 　　MOVCX，N;字节数送CX 　　 　　NEXT:MOVAX，[SI];取一个字数据 　　 　　CMPAX，0;是0吗? 　　 　　JESKIP;是，跳过这一个字 　　 　　LOOP1:TESTAX，8000H;否，最高位是1吗? 　　 　　JNESKIP;是，跳过这一个字 　　 　　SHLAX，1;否，左移一位 　　 　　JMPLOOP1;继续测试最高位是否为1 　　 　　SKIP:MOV[DI]，AX;保存变换结果于RESULT中 　　 　　ADDSI，2;修改原始数据区指针 　　 　　ADDDI，2;修改结果数据区指针 　　 　　LOOPNEXT;继续检查下一个字数据 　　 　　;****END**** 　　 　　LEADX，RESULT;结果数据区首址送DX 　　 　　LEASI，NAME1;结果文件名首址送SI 　　 　　MOVCX，N*2;结果字节数送CX 　　 　　CALLSAVE;保存结果到OUTPUT1.DAT 　　 　　RET 　　 　　STARTENDP 　　 　　CSEGENDS 　　 　　ENDSTART 　　 ?