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

. ?「*i ?「r j r、丫? v r、v ?八 v r j「、?八 v °、?八 r、f ?、? r ■ ?八 r、“r r、?八 ^i% ■八 r、?八 r、r、r、f r、丫? r、v r、v v r j xt% ?、、v *| ?.、r、、、?八丫? v r ? v v r、r ? r、r、v v r、■八 r、?「r、r、 ;Aexp8. asm 走马灯（灯光变幻）程 序 * ; 内容：用DIP的8位开关控制走马灯的花样，用SW3控制走马灯的起/ 停 ； 运行步骤：1.按下一次开关SW3,开始灯光变幻，再按下一次则停止；可重复进行* ; 2.按下SW3后，拨动不同的数码开关DIP,就会出现不同的灯光变幻 * ； 3.按下〃q〃或者〃Q〃，退 出 * . rT^ T^ rT^ rT^ xT^ T^ T^ T^ T^ T^ T^ T^ T^ T^ *y T^ T^ T^ T^ T^ ?T^ T^ T^ ?T^ T^ T^ T^ T^ ?T^ T^ T^ T^ T^ T^ sseg segnoent para stack，stack dw 200 dip (?) sseg ends dseg segnoent para public data message db * press SW3 to start and thon press SW3 to stop, and so on! ,0sh, Odh;系统提 示信息 db * turn on DIP one by one and display various soud-op patterns!* db Oah, Odh db if you want to quit, please hit q or Q !, Oah, Odh, S flag db 0 ；初始化状态标志变量火/0 t ckv 0 ;初始化延时变量为 0 num ckv 0 ;初始化数字变量火/0 datal db 80h, 40h, 20h, lOh, 08h, 04h, 02h, Olh ;八 种不同的灯光变幻组合 data2 db Olh, 02h, 04h, 08h, lOh, 20h, 40h, 80h data3 db 80h, 20h, 08h, 02h, 40h, lOh, 04h, Olh data4 db Olh, 04h, lOh, 40h, 02h, 08h, 20h, 80h data5 db OcOh, 30h, Och, 03h, OcOh, 30h, Och, 03h data6 db 03h, Och, 30h, OcOh, 03h, Och, 30h, OcOh data7 db 81h, 42h, 24h, 18h, 81h, 42h, 24h, 18h data8 db 18h, 24h, 42h, 81h, 18h, 24h, 42h, 81h dseg ends cseg segment para public J code assume ss: sseg, cs: cscg, ds: dseg m proc far start: mov ax, ds push ax mov ax,OOh push ax mov ah, 09h mov dx,scg message mov ds, dx mov dx,offset message int 21h ;初始化8255 mov dx,303h 地址 mov al, 91h 和C 口高四位为输出模式 XIUGAI1 out dx, al 输入模式 XIUGAI1 ;初始化灯LED全灭 mov dx,301h 址 ;XIUGAI mov al, OOh 为0 ;保留程序数据段地址; ;保留程序数据段地址 ;显示系统提乐信息 ;取8255的控制端口的 ;初始化8255的B 口 ;A口和C 口低四位为 ;取8255的端口 B的地 ;使 8255 的 PAO PA7 全 ；使所有的灯LED全灭 wait: ；检测〃 q 〃或者V键 ;调用 ;调用DOS 2111功 ;检测是否有键按下 ;调用DOS 21H功能 ；检测到〃 q 〃，退出 ；检测到V,退出 ;取8255的端口 C的地 ;读端口 C的值 ；当按下开关SW3 ;检测PC2 口状态 ;循环检测直至放开 ；将状态值取反 ；进行状态值比较 ；调用灯光变幻过程 ;取8255的端口 B的地 mov ah, Obh int 21h 能0B1I进行键盘判断 inc al jnz readpc mov ah, 08h int 21h 08H进行键盘输入判断 cmp al,，q， jz quit cmp al, Q‘ jz quit readpc:；判断开关SW3的状态