版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领
文档简介
1、实验一:编写程序,比较两个字符串STRING1和STRING2所含的字符是否相同,若字符相同则显示“Match”,否则显示“No Match”参考程序:DATA SEGMENTSTRING1 DB HAPPY ASMLEN EQU $-STRING1STRING2 DB HAPPY ASMMESSAGE1 DB MATCH,0DH,0AH,$MESSAGE2 DB NO MATCH,0DH,0AH,$DATA ENDSCODE SEGMENT ASSUME CS:CODE,DS:DATA,ES:DATASTART:MOV AX,DATAMOV DS,AXMOV ES,AXLEA SI,STRI
2、NG1LEA DI,STRING2MOV CX,LENCOMPARE:MOV AL,SIMOV BL,DICMP AL,BLJNE DISMATCHINC SIINC DILOOP COMPAREMATCH:LEA DX,MESSAGE1JMP DISPDISMATCH:LEA DX,MESSAGE2DISP: MOV AH,09HINT 21HMOV AH,4CHINT 21HCODE ENDSEND START实验二:编写程序,从键盘输入一串字符,以$或回车结束,将其中的小写字母转变为大写字母,其余字符不做转换,原样输出,结果显示在屏幕上。参考程序:DATA SEGMENTBUF DB 5
3、0 DB ? DB 50 DUP(?)INPUTSTRING DB PLEASE INPUT A STRING:,$OUTPUTSTRING DB OUTPUTSTRING IS:,$ENTERSTRING DB 0DH,0AH,$DATA ENDSCODE SEGMENTASSUME CS:CODE,DS:DATASTART:MOV AX,DATAMOV DS,AXLEA DX,INPUTSTRINGMOV AH,09HINT 21HLEA DX,BUFMOV AH,0AHINT 21HLEA DX,ENTERSTRINGMOV AH,09HINT 21H LEA BX,BUFADD BX,
4、2NEXT1:MOV AL,BXINC BXCOMPARE:CMP AL,24H JZ DISP CMP AL,61H JB NEXT1 CMP AL,7AH JA NEXT1 SUB AL,20H MOV BX-1,AL JMP NEXT1DISP:LEA DX,OUTPUTSTRING MOV AH,09H INT 21H LEA DX,BUF+2 MOV AH,09H INT 21H MOV AH,4CH INT 21HCODE ENDSEND START实验三:利用子程序方法编写程序,设有10个无符号数的字节序列,查找该序列中的最大值和最小值,并把结果显示在屏幕上。参考程序1:(针对一
5、位10进制数)STACK SEGMENT STACKDW 256 DUP(?) TOP LABEL WORDSTACK ENDSDATA SEGMENTBUF DB 00H,01H,02H,03H,04HDB 05H,06H,07H,08H,09HCOUNT EQU $-BUFENTERSTRING DB 0DH,0AH,$MAXSTRING DB THE MAXIMUN NUMBER IS:,$MINSTRING DB THE MINIMUN NUMBER IS:,$DATA ENDSCODE SEGMENTASSUME CS:CODE,DS:DATA,SS:STACKSTART:MOV A
6、X,DATAMOV DS,AXMOV AX,STACKMOV SS,AXLEA SP,TOPMOV SI,OFFSET BUFMOV CX,COUNTCALL BRANCHPUSH AXLEA DX,MAXSTRINGMOV AH,09HINT 21HPOP AXMOV DL,AHADD DL,30HPUSH AXMOV AH,02HINT 21HLEA DX,ENTERSTRINGMOV AH,09HINT 21HLEA DX,MINSTRINGMOV AH,09HINT 21HPOP AXMOV DL,ALADD DL,30HMOV AH,02HINT 21HMOV AH,4CHINT 2
7、1HBRANCHPROC NEARJCXZ NEXT4PUSH SIPUSH CXPUSH BXMOV BH,SIMOV BL,BHCLDNEXT1:LODSBCMP AL,BHJBE NEXT2MOV BH,ALJMP NEXT3NEXT2:CMP AL,BLJAE NEXT3MOV BL,ALNEXT3:LOOP NEXT1MOV AX,BXPOP BXPOP CXPOP SINEXT4:RETBRANCHENDPCODE ENDS END START参考程序二:(针对两位十六进制数或无符号数)STACK SEGMENT STACKDW 256 DUP(?) TOP LABEL WORDS
8、TACK ENDSDATA SEGMENTBUF DB 0FFH,55H,33H,44H,54HDB 45H,46H,47H,48H,1AHCOUNT EQU $-BUFENTERSTRING DB 0DH,0AH,$MAXSTRING DB THE MAXIMUN NUMBER IS:,$MINSTRING DB THE MINIMUN NUMBER IS:,$DATA ENDSCODE SEGMENTASSUME CS:CODE,DS:DATA,SS:STACKSTART:MOV AX,DATAMOV DS,AXMOV AX,STACKMOV SS,AXLEA SP,TOPMOV SI,O
9、FFSET BUFMOV CX,COUNTCALL BRANCHMOV DX,AXPUSH DXLEA DX,MAXSTRINGMOV AH,09HINT 21HPOP DXMOV AL,DHPUSH DXCALL DISPGAO4POP DXMOV AL,DHPUSH DXCALL DISPDI4LEA DX,ENTERSTRINGMOV AH,09HINT 21HLEA DX,MINSTRINGMOV AH,09HINT 21HPOP DXMOV AL,DLPUSH DXCALL DISPGAO4POP DXMOV AL,DLCALL DISPDI4MOV AH,4CHINT 21HBRA
10、NCHPROC NEARJCXZ NEXT4PUSH SIPUSH CXPUSH BXMOV BH,SIMOV BL,BHCLDNEXT1:LODSBCMP AL,BHJBE NEXT2MOV BH,ALJMP NEXT3NEXT2:CMP AL,BLJAE NEXT3MOV BL,ALNEXT3:LOOP NEXT1MOV AX,BXPOP BXPOP CXPOP SINEXT4:RETBRANCHENDPDISPDI4PROC NERR ;低四位AND AL,0FHMOV DL,ALCMP DL,9JLE NUM1ADD DL,7NUM1:ADD DL,30HMOV AH,02HINT 2
11、1HRETDISPDI4 ENDPDISPGAO4PROC NERR ;高四位SAR AL,4AND AL,0FHMOV DL,ALCMP DL,9JLE NUM2ADD DL,7NUM2:ADD DL,30HMOV AH,02HINT 21HRETDISPGAO4 ENDPCODE ENDS END START实验四:8255交通灯参考程序:MY8255_A EQU 288H ;8255的A口地址MY8255_B EQU 289H ;8255的B口地址MY8255_C EQU 28AH ;8255的C口地址MY8255_MODE EQU 28BH ;8255的控制寄存器地址STACK1 SE
12、GMENT STACK DW 256 DUP(?)STACK1 ENDSDATA SEGMENT LA DB ? ;定义数据变量LB DB ?DATA ENDSCODE SEGMENT ASSUME CS:CODE,DS:DATASTART: MOV AX,DATA MOV DS,AX MOV DX,MY8255_MODE ;定义8255工作方式 MOV AL,80H ;工作方式0,A口和B口为输出 OUT DX,ALL1: MOV DX,MY8255_A ;写A口发出的数据,1组绿灯亮,2组红灯亮 MOV AL,24H OUT DX,AL CALL DALLY1 MOV CX,05HL2:
13、MOV DX,MY8255_A ;写A口发出的数据,1组黄灯亮,2组红灯亮 MOV AL,44H OUT DX,AL CALL DALLY2 MOV DX,MY8255_A ;写A口发出的数据,1组黄灯灭,2组红灯亮 MOV AL,04H OUT DX,AL CALL DALLY2 LOOP L2L3: MOV DX,MY8255_A ;写A口发出的数据,1组绿灯亮,2组红灯亮 MOV AL,81H OUT DX,AL CALL DALLY1 MOV CX,05HL4: MOV DX,MY8255_A ;写A口发出的数据,1组黄灯亮,2组红灯亮 MOV AL,82H OUT DX,AL CAL
14、L DALLY2 MOV DX,MY8255_A ;写A口发出的数据,1组黄灯灭,2组红灯亮 MOV AL,80H OUT DX,AL CALL DALLY2 LOOP L4L5: MOV AH,01H ;判断是否有按键按下,调用功能号1 INT 16H ;ROM BIOS 功能调用 JZ L1 ;无按键则跳回继续循环,有则退出QUIT: MOV AX,4C00H ;结束程序退出; INT 21H ;DOS 系统功能调用DALLY1 PROC NEAR ;软件延时子程序,东西方向红灯亮,南北方向绿灯亮 PUSH CX PUSH DI MOV CX,3FFHY1: MOV DI,9000HX1:
15、 DEC DI JNZ X1 LOOP Y1 POP DI POP CX RETDALLY1 ENDPDALLY2 PROC NEAR ;软件延时子程序,黄灯闪烁(即亮与灭)的时间间隔, PUSH CX PUSH DI MOV CX,3FHY2: MOV DI,9000HX2: DEC DI JNZ X2 LOOP Y2 POP DI POP CX RETDALLY2 ENDPCODE ENDS END START参考程序2:流水灯MY8255_A EQU 288H ;8255的A口地址MY8255_B EQU 289H ;8255的B口地址MY8255_C EQU 28AH ;8255的C口
16、地址MY8255_MODE EQU 28BH ;8255的控制寄存器地址STACK1 SEGMENT STACK DW 256 DUP(?)STACK1 ENDSDATA SEGMENT LA DB ? ;定义数据变量DATA ENDSCODE SEGMENT ASSUME CS:CODE,DS:DATASTART: MOV AX,DATA MOV DS,AX MOV DX,MY8255_MODE ;定义8255工作方式 MOV AL,80H ;工作方式0,A口和B口为输出 OUT DX,AL MOV CX,0FFFFH MOV BL,80HL1: MOV DX,MY8255_A ;写A口发出
17、的数据 MOV AL,BL OUT DX,AL CALL DALLY1 ROR BL,1 LOOP L1QUIT: MOV AX,4C00H ;结束程序退出 INT 21H ;DOS 系统功能调用DALLY1 PROC NEAR ;软件延时子程序,东西方向红灯亮,南北方向绿灯亮 PUSH CX PUSH DI MOV CX,3FHY1: MOV DI,9000HX1: DEC DI JNZ X1 LOOP Y1 POP DI POP CX RETDALLY1 ENDPCODE ENDS END START实验五:8254一赫兹方波输出参考程序:MY8254_COUNT0 EQU 280H ;8
18、254计数器0端口地址MY8254_COUNT1 EQU 281H ;8254计数器1端口地址MY8254_COUNT2 EQU 282H ;8254计数器2端口地址MY8254_MODE EQU 283H ;8254控制寄存器端口地址 STACK1 SEGMENT STACK DW 256 DUP(?)STACK1 ENDSCODE SEGMENT ASSUME CS:CODESTART: MOV DX,MY8254_MODE ;初始化8254工作方式 MOV AL,37H ;计数器0,方式3 OUT DX,AL MOV DX,MY8254_COUNT0 ;装入计数初值 MOV AL,00 ;1000分频 OUT DX,AL MOV AL,10 OUT DX,AL MOV DX,MY8254_MODE ;初始化8254工作方式 MOV AL,77H ;计数器1,方式3 OUT DX,AL MOV DX,MY8254_COUNT1 ;装
温馨提示
- 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
- 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
- 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
- 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
- 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
- 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
- 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
最新文档
- 二零二五年度餐饮泔水回收与环保设施投资合同3篇
- 二零二五年矿山土地及资源使用权转让合同3篇
- 二零二五版白糖进口许可证申请代理服务合同下载2篇
- 二零二五年度驾驶员押运员安全责任及培训合同3篇
- 二零二五版企事业单位节能环保办公电脑采购合同2篇
- 二零二五版电子商务平台借款及库存商品质押合同3篇
- 二零二五年纺织原料市场调研与分析合同2篇
- 小区下水管网清理疏通承包合同(2篇)
- 二零二五版房产买卖合同含抵押权转移及贷款利率协商协议0183篇
- 2025年度农业科技推广财产赠与合同3篇
- 部编新改版语文一年级下册《语文园地四》教学设计
- 2025年北京铁路局集团招聘笔试参考题库含答案解析
- 《药品招商营销概论》课件
- 曙光磁盘阵列DS800-G10售前培训资料V1.0
- 寺庙祈福活动方案(共6篇)
- 2025年病案编码员资格证试题库(含答案)
- 企业财务三年战略规划
- 2025新译林版英语七年级下单词表
- 提高脓毒性休克患者1h集束化措施落实率
- 山东省济南市天桥区2024-2025学年八年级数学上学期期中考试试题
- 主播mcn合同模板
评论
0/150
提交评论