山东大学汇编语言第五章上机实验

1、实验三 AL,BL,CL,DL 中.。 将AX寄存器中的16位数分成4组，每组4位，然后把这四组数分别放在 实验代码如下： DSEG SEGMENT STORE DB 4 DUP DSEG ENDS CSEG SEGMENT MAIN PROC FAR ASSUME CS: CSEG , DS: DSEG START: PUSH DS ;设置返回 DOS SUB AX, AX PUSH AX MOV AX, 1234H MOV DS, AX ;给 DS 赋值 BEGIN: MOV CL, 4 ;右移四次 MOV CH, 4 ;循环四次 LEA BX, STORE A10: MOV DX, AX

2、 AND DX, 0FH ;取AX的低四位 MOV BX, DL ;低四位存入 STORE中 INC BX SHR AX, CL ;右移四次 DEC CH JNZ A10 ;循环四次完了码？ B10: MOV DL, STORE ;四组数分别放在 AL、BL、CL和DL中 MOV CL, STORE+1 MOV BL, STORE+2 MOV AL, STORE+3 INT 21H STOP: RET MAIN ENDP CSEG ENDS ;以上定义代码段 END START 实验截图如下: | ca c：Iim)0Ssyste32cMd.exe - DEBUG TEST3.EXE Micr

3、osoft Macro Assembler Uersion 5.00 Copyright Microsoft Corp 1981-1985, 1987. All rights reserved. Object filenane LTEST3. OBJ： Source listing NUL.LST: |Cross-reference NUL.CRF: 50698 + 450566 Bytes symbol space free 0 Warning Errors 5 0 Severe Errors 8 |C:DOCUMETAADMINIT?masmLINK TEST3 Microsoft Oue

4、rlay Linker Uersion 3.60 Copyright Microsoft Corp 1983-1987. All rights reserved. Bun File TEST3.EXE1： List File NUL.MAP1： Libraries .LIB： LINK : warning L4021: no stack segment Ic: DOCUME/vlADMINI/vl?nasnDEBUG TEST3 EXE 1 0B5B：0000 PUSH DS 0B5B：0001 2BC0 SUB AX,AX 0B5B：0003 PUSH AX 0B5B：0004 B83412

5、 MOU AX,1234 0B5B：0007 8ED8 MOU DS.AX H 0B5B：0009 B104 MOU CL, 04 0B5B：000B B504 MOU CH, 04 0B5B：000D 8D1E0000 LEA BX,0000 0B5B：0011 8BD0 MOU DX.AX 0B5B：0013 83E20F AND DX.+0F 0B5B：0016 8817 MOU BXl.DL 0B5B：0018 43 INC BX 0B5B：0019 D3E8 SHR AX,CL 0B5B：001B FECD DEC CH 0B5B：001D 75 F2 JNZ 0011 0B5B：0

6、01F UH 8A160000 MH 7777 MOU DL,0000 C C:fIKD0fSsystea32cBd.exe - DEBUG TEST3.EZE B n|x Run File 1 TEST3.EXE： List File NUL.MAPJ IjibrArics (.LID)： LINK : warning L4021: no stack senent LxDOCUME-IXADMINI- l?nasnDEBUG TEST3.EXE QBGB：0888 IE PUSH DS 0B5B：0001 2BC0 SUB AX.AX HBSB：0883 50 PUSH AX 0B5B：00

7、84 B83412 MOU AX,1234 8ED8 MOU DS, AX 0B5B：0089 B104 MOU CL, 04 MB5B：000B B504 MOU CH, 04 0BSB：000D 8D1E0000 LEfl BX,0000 0B5B：0011 8BD0 MOU DX.AX 0B5B：0613 83E20F AND DX,*0F 0B5B：0ei6 8817 MOU BX1.DL 0B5B：0818 43 INC BX 0B5B：0019 D3E8 SHR AX,CL 0B5B：001B FECD DEC CH 0B5B：001D 75 F2 JNZ 0011 BSB：0H1

8、F 一 u 8A160000 MOU DL,(00001 0B5B：0023 8ABE0100 MOU CL.0001 0BSB：0027 8A1E0200 MOU BL,0002J 0B5B：002B A00300 MOU AL.(00031 0B5B：882E CD21 I NT 21 0B5B：0e30 CB RETF 0B5B：0831 45 INC BP 0B5B：0032 07 POP ES HBSB：0833 00740A ADD SI*0A,DH 0B5B：0036 FF365607 PUSH 0756J BB5B：003A E821FC CALL FC5E 0B5B：003D

9、 83C402 ADD SP,*02 HB5B：0H40 FF06560? INC WORD PTR 0756】 kG 002E nX-0001DX-0002 CX-0003DX-0904 SP-PPFC DP-00GO fiI-0000 DI-0000 S=1234 ES=0B4A SS=0B5A CS=0B5B IP=002E NU UP El PL ZR NA PE NC 0B5B：002E CD21 I NT 21 rra台而 E E 崔索 d SttingsA r 可以看到AX,BX,CX,DX,中的内容分别为1,2,3,4. 实验7 ,并把它存放在 试编制一个汇编语言程序,求出首地

10、址为DATA的100D字数组中的最小偶数 AX中 实验代码如下： DSEG SEGMENT DATA DW 78,79,80,81,82,83,84 DSEG ENDS CSEG SEGMENT MAIN PROC FAR ASSUME CS: CSEG , DS: DSEG START: PUSH DS ;设置返回 DOS SUB AX, AX PUSH AX MOV AX, DSEG MOV DS, AX ;给 DS 赋值 BEGIN: MOV BX, 0 MOV CX, 100 COMPARE: MOV AX, DATABX; 取数组的第一个偶数 ADD BX, 2 TEST AX, 0

11、1H ;是偶数吗？ LOOPNZ COMPARE ;不是，比较下一个数 JNZ STOP ;没有偶数，退出 JCXZ STOP ;最后一个数是偶数，即为最小偶数，退出 COMPARE1: MOV DX, DATABX; 取数组的下一个偶数 ADD BX, 2 TEST DX, 01H ;是偶数吗？ JNZ NEXT ;不是，比较下一个数 CMP AX, DX ;(AX)(DX) 吗？ JLE NEXT MOV AX, DX ;(AX)(DX)，则置换(AX)为最小偶数 NEXT: LOOP COMPARE1 INT 21H STOP: RET MAIN ENDP CSEG ENDS ;以上定义

12、代码段 END START 实验截图如下: 回收站 = C: limoissyst c32c*d. cxc - DEBUG TEST 7 EXE Microsoft flacro Assenble-r Pers ion 5.08 Copyright HicrDsoft Carp 19S1=1985F 1907- ft 11 rights reserved- Ohject filEnanE (TEST?0Rl = Source listing CHUL.LET 1 CioiB s -re Fe re n c b HUL CRF； 50624 + 450BQ2A 6H5DLQB2C HB5B=Ma

13、E 伽胡砂 田眄阳002T SUSBlQBIL 0B5B：0037 UB5肌曲列 HR5H;AA2$ SS5B;iaB2A QH5D1QB1J) 0U5B：BB40 Fu P9C2fi1 鯨 ?50 JDC2 7E02 BHC2 EMR CD2L CD 36 bEIMii3 :H他 HDU nHPm dBSEiBIM. Source listing NHL.LET： Frvncv IHUL.CRF： EB524i 450940 Byte-s Ewihol space f ree H Unrn Ing 囱 Sewers Errors C; SDOOJriEi HDH H “ 礼总9却 nLI H

14、K TESTiS Hicrciscf t Ovtirlaji Linkur UvriEiQn 3 fcC Hi|fni2a/t Cgrp i96319*67 All right：s rmdl. Run File rESTlBEJCEJ： l.iAt Pj)di NUl-WiPl; Lihrcities ILLIRH k；:XA DH IN I 件 my n. D4 riou SIPPPE A DP ：l . -nr OHF WONE HK IS 1 +MHHA ,+HH DB er TEST AU EEF+SU DEBDG TETb2.EIE FiX-flfiflL KK-flia数组，根据需

15、要设定 n EQU ($-M)/2;数据数量 NUM DW -1；绝对值最大的数，初始值为-1 ADDRA DW -1；偏移地址，初始值为-1 DATAS ENDS CODES SEGMENT ASSUME CS:CODES,DS:DA TAS START: MOV AX,DATAS MOV DS,AX LEA SI,M MOV CX,n L1: MOV AX,SI MOV AX,BX;保存该数 TEST AX,8000H ;判断是否负数 JZ GETNUM DEC AX NOT AX ;求负数的绝对值 GETNUM: CMP AX, NUM JNG NEXT MOV NUM,BX MOV A

16、H,2 ;保存该数和偏移地址 INT 21H MOV ADDRA,SI MOV AH,2 INT 21H NEXT: ADD SI,2 LOOP L1 MOV AH,2 INT 21H MOV AH,4CH INT 21H CODES ENDS END START 实验截图如下: 1总令書岸軒-DEDOC TESTIS.呂勺口 I0 Ssvbtb Ertfvt KiADM1 N1 %礼丁了| NK TEBT15 IHLui-tiHLifi Dii窑中 1赢V Llhk3- UAfaliXI. 3.eH m 1?nr iGl CO Hicravoft Corp l?83=jffl?K All r

17、ights： r自行定义;成绩 COUNT EQU ($-GRADE)/2 RANK DW COUNT DUP (1)排名，初始值为1，大家都第一名，同一起跑线哈 DATAS ENDS CODES SEGMENT ASSUME CS:CODES,DS:DA TAS START: MOV AX,DATAS MOV DS,AX ;此处输入代码段代码 MOV SI,0；要排名的学生号码 MOV CX,COUNT L1: MOV AX,GRADESI;获得第SI号学生的成绩 MOV BX,RANKSI;获得第SI号学生的初始排名 MOV DX,CX;保存 CX MOV DI,0；要比较的学生的号码 M

18、OV CX,COUNT L2: CMP AX,GRADEDI;逐个比较 JNB L3 INC BX；低于某一个学生的成绩，则排名加1 L3: ADD DI,2 LOOP L2 ；保存排名 MOV RANKSI,BX MOV AH,2 INT 21H ADD SI,2 MOV CX,DX LOOP L1 MOV AH,4CH INT 21H CODES ENDS END START 实验截图如下： i 命令探示符-DEBUG TESTIS,EKE :DOCUME1XADMIN1M1 ?XmasmLINK TEST18 licrosoft Oueilay Linker Version 3,60 2

19、opuv*icrht Micvosoft Corp 19831987. All rights i*eserued un File TEST18.EXE1： ist File (NUL.nAPJ： ibraries ,LIB3: 】NH : warn ing L4021: no stack seament :SDOCUMENftDMINI -U BSCsem B5C：B0B3 BSC：0005 B5C=Q008 B5C：0Q0B BSC：000F B5G：0013 B5C：0015 B5G=001B :BSC：001B BSC=001F BB5A0B BEDS BE胴胴 E905B0 fiB4R

20、R0R 8B9CBA0 8BD1 BFQ0BB E90500 3BUSHM00 7301 lX?masnD BIJC 门 STW.EKE J J J J p B OOOOHN $】网胴 CM,0005 BX,SI+0B0A DX,CX DU00B0 CK,0005 AX,DI+000 0022 7G03K CD21 I NT 21 :003ft 55 FUSH BP ：0B3B 8BEC MOU HPSP ：S93D B1EC9BP10 SUB SP,G090 0B5C 0B5C 0BSC 0B5C -G 0034 4 AK=02B5BX=0005 D=0BSA E=0BA 0R阮词阴4 E2

21、D5 -T CX=0635DX=0S05SP=000 S=0B5A CS=0B5GPQ034 LOOP M0B BP=S00a SI=B002 DI=00醐 NV UP EE PL NZ NA PO NC AX-020SBX=0Q05 DS=0B5A ES=0B4A HB5C：000B BB840000 一G AX=02Q1 DS-(JD5ft EI01MA BB5C：693G B44C -T ex MWHd DX HUMS KP WHhM SS=0B5A CS=0B5CIP=000B IMOU AX,. rSI+Q9001 CX=0630DX=0001 SP=S00S SE-0D (2) 若

22、两个数均为奇数，则将两数均加1后存回原变量； (3) 若两个数均为偶数，则两个变量均不改变 实验代码如下： dataseg segment adw 4 bdw 3 dataseg ends codeseg segment assume cs:codeseg,ds:dataseg main proc far start: pushds sub ax,ax push ax mov ax,dataseg mov ds,ax begi n: mov ax,a mov bx,b xor ax,bx test ax,0001h jnz save test bx,OOO1h jz exit inc a in

23、c b jmp exit save: test bx,0001h jz save1 mov ax,a mov a,bx mov b,ax jmp exit save1: jmp exit exit: ret mainendp codeseg ends end start 实验截图如下: C 33 B5B：00G1 2BCB 丽E fiX, fiK B5Q：0Q03 50 PUSH AX B5fi：B004 BBSAOn MOV AX,0B5A B5B：0007 8 EDS MOU DS,AW B5Q：0009 A10000 MOU AX.0腼01 B5B：B00C 8B1EO200 nov W

24、C 0B02 B5B：B010 33C3 0R mx B5B：0012 A9Q100 TEST 瞅 0001 B5B：0O15 7511 JNZ 0028 B5B：0017 F7C30103 TEST BX,0001 B5Q：001B 7421 JE 003 E 站B：001D FF區的酿 INC UORD PTR LUHM0 U B5Q：0021 FFQ602S0 NC WORD FTR Q002 B5B：四站 EB17 JnP 303 E B5B：B027 90 NOF B5B：0028 F7Q3&1Q0 TEST 恥 0001 B5B：U02C 74MD JZ B5B：002E Alld

25、000 MOU flX.0000 B5B：0Q31 Q91E0000 MOU 0000网 B5B：U035 A3H20U nou 00021,AX B5B：B038 EB(d4 JMF 093E B5B：003A 90 NOP 玷B 询mA EBQ1 JMP 003 E B5B：O03D 90 NOF B5B：0Q3E CB RETF B5B：Q03F 02FF ADD BHBH 缶令探示符-DEBUG TEST23,EIE 0B5Bi0047 BBSS ： 0(149 0B5B：O(d4A BB5B：0R4B EJBbB：UU4D BB5B：00S1 0B5B：3052 SB5B：00S5 0B5B：0QSG 6B5B：0059 0B5B：005C 少亦005D FfiB03E 5 FOP BP C3 BET 90 NOP S5 PUSH BF SBEC MOU BPSP 81EC9