MF2KP走馬燈燈光變幻程序

1、.*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后，撥動不同的數(shù)碼開關d

2、ip,就會出現(xiàn)不同的燈光變幻 *；3.按下q或者q，退出*.rt "t rt rt xt "t"t "t "t"t "t "t "t "t*y> "t "t "t "t"tt "t "tt "t "t "t "tt "t"t "t"t "tsseg segnoent para stack，stack'dw 200 dip (

3、?)sseg endsdseg segnoent para public 'data'message db * press sw3 to start and thon press sw3 to stop, and so on!' ,0sh, odh;系統(tǒng)提 示信息db * turn on dip one by one and display various soud-op patterns!*db oah, odhdb ' if you want to quit, please hit '' q'' or '' q

4、' ' !', oah, odh,' s'flag db0；初始化狀態(tài)標志變量火/0tckv0;初始化延時變量為0num ckv0;初始化數(shù)字變量火/0dataldb80h, 40h, 20h, loh, 08h, 04h, 02h, olh;八種不同的燈光變幻組合data2db olh, 02h, 04h, 08h, loh, 20h, 40h, 80hdata3db 80h, 20h, 08h, 02h, 40h, loh, 04h, olhdata4dbolh,04h,loh, 40h, 02h, 08h, 20h, 80hdata5dbocoh,

5、30h, och, 03h, ocoh, 30h, och, 03hdata6db03h,och,30h, ocoh, 03h, och, 30h, ocohdata7db81h,42h,24h, 18h, 81h, 42h, 24h, 18hdata8db18h,24h,42h, 81h, 18h, 24h, 42h, 81hdseg ends cseg segment para public j codeassume ss: sseg, cs: cscg, ds: dsegm proc farstart:mov ax, dspush axmov ax,oohpush axmov ah, 0

6、9hmov dx,scg messagemov ds, dxmov dx,offset messageint 21h;初始化8255mov dx,303h地址mov al, 91h和c 口高四位為輸出模式xiugai1out dx, al輸入模式xiugai1;初始化燈led全滅mov dx,301h址;xiugaimov al, ooh為0;保留程序數(shù)據(jù)段地址;顯示系統(tǒng)提樂信息;取8255的控制端口的;初始化8255的b 口;a口和c 口低四位為;取8255的端口 b的地;使 8255 的 pao pa7 全；使所有的燈led全滅out dx, alwait:；檢測 q 或者v鍵;調用dos

7、 2111功;檢測是否有鍵按下;調用dos 21h功能；檢測到 q ，退出；檢測到v,退出;取8255的端口 c的地;讀端口 c的值；當按下開關sw3;檢測pc2 口狀態(tài);循環(huán)檢測直至放開；將狀態(tài)值取反；進行狀態(tài)值比較；調用燈光變幻過程;取8255的端口 b的地mov ah, obhint 21h能0b1i進行鍵盤判斷inc aljnz readpcmov ah, 08hint 21h08h進行鍵盤輸入判斷cmp al,，q， jz quit cmp al,' q jz quitreadpc:；判斷開關sw3的狀態(tài) mov dx,302h址in al, dx時,pc2 口為低電平tes

8、t al, 04h jnz caselp:in al, dxtest al, 04h jz lpxor flag, olhcase:cmp flag, olhjne stopbegin:call ledflashcall delay2 jmp waittled全滅stop:mov dx,301h址；xiugaimov al, ooh為oout dx, aljmp waitquit:mtled 全滅mov dx,301h 址;xiugaimov al, ooh為0out dx, al;返回dosmov ah, 4chint 21hm enctdelay2 procpush expush bxmo

9、v ex,02ffhdl4:mov bx,offffhc!13:dec bxjnz dl3dee exjnz dl4pop bxpop exretdclay2 en<t);使 8255 的 pao pa7 全；使所有的燈led全滅;取8255的端口 b的地;使 8255 的 pa0-pa7 全；使所有的燈led全滅；dos功能調用;返回dos；檢測數(shù)碼開關dip的狀態(tài)，以便產(chǎn)生八種不同的燈光變幻 ledflash procmov dx,300h;取8255的端口 a的地;xiugaiin al, dx；讀端口a的;xiugai1cmpal, ofchjnechoicclmovsi, of

10、fsetdataljmpherechoiccl:cmp al, ofdhjnechoicc2i11ovsi, offsetdata2jmpherechoice2:cmp al, ofbhjnechoicc3i11ovsi, offsetdata3jmpherechoice3:cmp al, 0f7hjnechoicc4i11ovsi, offsetdata4jmpherechoice4:cmp al, ocfhjne choicc5mov si,offsetdata5choice5:choice6:jmp herecmp al, odfhjne choicc6mov si,offsetjmp

11、herecmp al, obfhjne choicc7mov si,offsetjmp heredata6data7;檢測pbo 口是否為0；置第一種燈光變幻組;檢測pb1 口是否為;置第二種燈光變幻組;檢測pb2 口是否為0;置第三種燈光變幻組;檢測pb3 口是否為0；置第四種燈光變幻組;檢測pb4 口是否為0;置第五種燈光變幻組合;檢測pb5 口是否為0；置第六種燈光變幻組合;檢測pb6 口是否為0;置第七種燈光變幻組合choice7: cmp al, 7fh;檢測pb7 口是否為0jne choiccomov si,offset data8 jmp here;choicco: call mo程choicco: jmp wait;送加電數(shù)據(jù)here:addsi, nummov al, sixoral, offhxiug