MF2KP走马灯灯光变幻程序.docx

  1. 1、本文档共5页,可阅读全部内容。
  2. 2、有哪些信誉好的足球投注网站(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
  3. 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  4. 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
MF2KP走马灯灯光变幻程序

;*********************************************************************; ?Aexp8.asm ?走马灯(灯光变幻)程序 ??????????????????????????*; ??内容:用DIP的8位开关控制走马灯的花样,用SW3控制走马灯的起/停; ??运行步骤:1.按下一次开关SW3,开始灯光变幻,再按下一次则停止; 可重复进行 *; ???????2.按下SW3后,拨动不同的数码开关DIP,就会出现不同的灯光变幻 ?*; ???????3.按下q或者Q,退出 ????????????????????????????*;*********************************************************************sseg segment para stack stack?dw 200 dup (?)sseg endsdseg segment para public datamessage db press SW3 to start and then press SW3 to stop,and so on!,0ah,0dh;系统提示信息?db turn on DIP one by one and display various soud-op patterns!?db 0ah,0dh?db if you want to quit, please hit q or Q!,0ah,0dh,$flag ?db 0?;初始化状态标志变量为0tdw 0?;初始化延时变量为0numdw 0?;初始化数字变量为0data1db 80h,40h,20h,10h,08h,04h,02h,01h?;八种不同的灯光变幻组合 data2db 01h,02h,04h,08h,10h,20h,40h,80h data3db 80h,20h,08h,02h,40h,10h,04h,01h?data4db 01h,04h,10h,40h,02h,08h,20h,80hdata5db 0c0h,30h,0ch,03h,0c0h,30h,0ch,03hdata6db 03h,0ch,30h,0c0h,03h,0ch,30h,0c0hdata7db 81h,42h,24h,18h,81h,42h,24h,18h data8db 18h,24h,42h,81h,18h,24h,42h,81hdseg endscseg segment para public code?assume ss:sseg,cs:cseg,ds:dsegm proc farstart:mov?ax,ds?push?ax?mov?ax,00h?push?ax?;保留程序数据段地址??mov ah,09h?;显示系统提示信息?mov dx,seg message?mov ds,dx?mov dx,offset message?int 21h??;初始化8255?mov dx,303h?;取8255的控制端口的地址?mov al,91h?;初始化8255的B口和C口高四位为输出模式XIUGAI1?out dx,al?;A口和C口低四位为输入模式XIUGAI1?;初始化灯LED全灭?mov dx,301h?;取8255的端口B的地址 ???;XIUGAI?mov al,00h?;使8255的PA0-PA7全为0?out dx,al?;使所有的灯LED全灭?wait:;检测q或者Q键?mov ah,0bh?int 21h?;调用DOS 21H 功能0BH 进行键盘判断?inc al?jnz readpc;检测是否有键按下?mov ah,08h?int 21h?;调用DOS 21H 功能08H 进行键盘输入判断?cmp al,q?jz quit;检测到q,退出 ?cmp al,Q?jz quit;检测到Q,退出 readpc: ?;判断开关SW3的状态?mov dx,302h?;取8255的端口C的地址?in al,dx?;读端口C的值?;当按下开关SW3时,PC2口为低电平?test al,04h?;检测PC2口状态?jnz caselp:in al,dx?test al,04h?jz lp;循环检测直至放开?xor flag,01h?;将状态值取反case:cmp flag,01h?;进行状态值比较?jne stopbegin:call ledflash;调用灯光变幻过程 ???call delay2?jmp wait?;灯LED全灭 stop:mov dx,301h?;取8255的端口B的地址 ??;XIUGAI?mov al,00h?;使8255的PA0-PA7全为0?out d

文档评论(0)

xcs88858 + 关注
实名认证
内容提供者

该用户很懒,什么也没介绍

版权声明书
用户编号:8130065136000003

1亿VIP精品文档

相关文档