2011下半年计算机等考三级PC技术上机100题(92)

会计考友

　请编制程序，其功能是：对内存中存放的六组带符号16位二进制数(每组由三个数组成，均不为零)进行处理。处理方法为：当每组中负数多于正数时，将组内负数变成正数(但绝对值不变，下同)，组内正数不变。反之，将组内正数变成负数，组内负数不变。变换好的数按原序存放在内存中。　　例如：
　　内存中有 0003H,0001H,0002H,0003H,0004H,FFFFH,FFFEH,FFFDH,0001H,FFFEH,FFFDH,FFFFH…(共六组18个数)
　　结果为 FFFDH,FFFFH,FFEH,FFFDH,FFFCH,FFFFH,0002H,0003H,0001H,0002H,0003,0001H…(共18个数)
4 Q- H6 ?. Z( n4 a# ?' C  P　　部分程序已给出, 其中原始数据由过程LOAD从文件INPUT1.DAT中读入SOURCE开始的内存单元中。运算结果要求从RESULT开始存放,由过程SAVE保存到文件OUTPUT1.DAT中。
　　填空BEGIN和END之间已给出的一段源程序使其完整(空白已用横线标出,每行空白一般只需一条指令, 但采用功能相当的多条指令亦可),或删除BEGIN和END之间原有的代码并自行编程来完成要求的功能。
4 {( A. d1 o2 R$ }+ i5 ^( \　　对程序必须进行汇编,并与IO.OBJ链接产生PROG1.EXE执行文件,最终运行程序产生结果(无结果或结果不正确者均不得分)。调试中若发现整个程序中存在错误之处, 请加以修改。
7 |. Z- q4 i4 H2 z# m& G  b　　试题程序：
　　EXTRN LOAD:FAR,SAVE:FAR
) @6 ]. M4 z) o: F  T: m) ?; W　　N EQU 18
　　STAC SEGMENT STACK
　　DB 128 DUP(?)
1 m( }# @6 F9 U! p' ?　　STAC ENDS
" f5 G8 L0 B$ z: [( F8 G( W　　DATA SEGMENT
　　SOURCE DW N DUP(?)
  H) I/ L: R3 \& k, m6 s  b' K　　RESULT DW N DUP(0)
　　NAME0 DB 'INPUT1.DAT',0
　　NAME1 DB 'OUTPUT1.DAT',0
  ?$ Q  K4 e/ ~2 a+ Y- ^7 Z　　DATA ENDS
　　CODE SEGMENT
: K6 {  O) ~2 j& ~3 o) c　　ASSUME CS:CODE,DS:DATA,SS:STAC
　　START PROC FAR
* V  S- Q4 Z& g. q, M% O! a" X/ [　　PUSH DS
5 _0 m1 P6 N& Q7 ~3 ?4 \　　XOR AX,AX
$ w& \* q  ?) E& q　　PUSH AX
6 C* a7 \: [+ E+ c* g　　MOV AX,DATA
　　MOV DS,AX
　　LEA DX,SOURCE ;数据区起始地址
# r7 ~9 u4 `) U1 I* c/ K　　LEA SI,NAME0 ;原始数据文件名
　　MOV CX,N*2 ;字节数
　　CALL LOAD ;从'INPUT1.DAT'中读取数据
, w2 w- X7 S/ W! |0 [0 m+ O6 s" e　　;****BEGIN****
　　MOV SI,0
　　MOV DI,0
　　MOV BX,6
　　REPT1: MOV DX,0
　　____________________________
　　CAMP: MOV AX,SOURCE[SI]
　　____________________________
　　CMP AX,0
　　JL CONT
/ X8 O- g5 v* t; m6 b　　JMP NEXT
7 K! b/ Z6 q, f: R; f  Y( ?　　CONT: INC DX
& W- B* [4 @5 c$ F　　NEXT: LOOP CAMP
　　SUB SI,6
+ i0 t' B9 Z; G1 j" y5 w, V( W8 P2 z　　MOV CX,3
　　CMP DX,2
% X6 p0 r6 Y) K. m0 p# p　　JAE NEG1
　　________ NEXT1
, w) u* q7 m3 H' B7 h  o4 `4 b; C　　NEG1: MOV AX,SOURCE[SI]
9 b3 V) ^# K) e' o; l　　______________________
　　CMP AX,0
4 Y! y, B* A+ X3 }! m1 g* X- c　　JL NEG2
. A( W4 |/ c: g% n. W$ ~　　JMP NOTNEG
: E6 t0 V$ `& @! B' U3 Y) w　　NEG2: ______________________
2 ?; r2 t; z9 x* ]+ U- r　　NOTNEG: MOV RESULT[DI],AX
　　______________________
　　LOOP NEG1
　　JMP NEXT2
　　NEXT1: MOV AX,SOURCE[SI]
　　______________________
　　CMP AX,0
　　JG NEG3
　　JMP NOTNEG1
　　NEG3: NEG AX
, g- F9 d1 Y3 F! i% p　　NOTNEG1:MOV RESULT[DI],AX
　　_______________________
　　LOOP NEXT1
, B2 j, @/ r8 m  j; _$ r! \　　NEXT2: DEC BX
5 m$ b( M8 N$ v1 E/ r) T+ q0 e　　JZ EXIT
　　_______________________
　　EXIT: NOP
! u3 ~3 T8 G5 \) B! i& I: |- r　　;****END****
　　LEA DX,RESULT ;结果数据区首址
　　LEA SI,NAME1 ;结果文件名
/ k% Z6 E/ V/ I$ t% b4 h' {2 x9 o　　MOV CX,N*2 ;字节数
　　CALL SAVE ;保存结果到文件
8 v% _1 M! ]" E) a! T+ E5 C# R　　RET
) E# r: K$ m6 n( ^3 w, V　　START ENDP
6 W) K) X3 b+ U/ V7 @. t　　CODE ENDS
　　END START