51單片機(jī)課程設(shè)計(jì)匯本俄羅斯方塊

...wd......wd......wd...單片機(jī)課程設(shè)計(jì)俄羅斯方塊學(xué)院：工程技術(shù)學(xué)院專業(yè)：08級(jí)電子科學(xué)與技術(shù)小組成員：何冠羲，馬志祥，李洋，張世剛，葉彪，鄭先安，洪之目錄摘要引言1．程序整體思路2．8X8LED模塊顯示原理3．硬件電路仿真圖4．圖形顯示5．消層算法6．旋轉(zhuǎn)算法7．實(shí)物焊接8．心得體會(huì)附錄程序代碼摘要記得在很小的時(shí)候，有一種掌上游戲機(jī)，里面有一款游戲叫做俄羅斯方塊，那時(shí)的我們只是簡(jiǎn)單的按照游戲規(guī)則進(jìn)展“堆積木〞，而其中的原理卻很少有人去思考，畢竟當(dāng)時(shí)的我們都還很年幼?；趩纹瑱C(jī)課程設(shè)計(jì)的時(shí)機(jī)，我們這個(gè)小組將使用51單片機(jī)和8x8led的組合，來(lái)實(shí)現(xiàn)比擬簡(jiǎn)單的俄羅斯方塊設(shè)計(jì)。此次設(shè)計(jì)初期是在keil和proteus聯(lián)合仿真中進(jìn)展，編程語(yǔ)言為51匯編，后期是進(jìn)展實(shí)物焊接。論文描述了俄羅斯方塊的主要功能函數(shù)的實(shí)現(xiàn)，算法分析和實(shí)物焊接過(guò)程中遇到的問(wèn)題。關(guān)鍵詞：俄羅斯方塊；算法；8X8led；引言游戲是人們活動(dòng)中一項(xiàng)非常重要的內(nèi)容，有人認(rèn)為如果哪一天人類對(duì)所有的游戲都失去興趣，恐怕世界的末日就要到了。電腦對(duì)游戲的奉獻(xiàn)有目共睹，現(xiàn)在摸過(guò)電腦的人很少有沒(méi)玩過(guò)電腦游戲的，喜歡游戲的人也很少有不玩電腦的。俄羅斯方塊是一款風(fēng)行全球的電視游戲機(jī)和掌上游戲機(jī)游戲，它曾經(jīng)造成的轟動(dòng)與造成的經(jīng)濟(jì)價(jià)值可以說(shuō)是游戲史上的一件大事。這款游戲最初是由蘇聯(lián)的游戲制作人AlexPajitnov制作的，它看似簡(jiǎn)單但卻變化無(wú)窮，令人上癮。相信大多數(shù)用戶都還記得為它癡迷得茶不思飯不想的那個(gè)俄羅斯方塊時(shí)代。究其歷史，俄羅斯方塊最早還是出現(xiàn)在PC機(jī)上，而我國(guó)的用戶都是通過(guò)紅白機(jī)了解、喜歡上它的?，F(xiàn)在聯(lián)眾又將重新掀起這股讓人沉迷的俄羅斯方塊風(fēng)潮。對(duì)一般用戶來(lái)說(shuō)，它的規(guī)則簡(jiǎn)單，容易上手，且游戲過(guò)程變化無(wú)窮，而在"聯(lián)眾俄羅斯方塊"中，更有一些聯(lián)眾網(wǎng)絡(luò)游戲所獨(dú)有的魅力――有單機(jī)作戰(zhàn)與兩人在線對(duì)戰(zhàn)兩種模式，用戶可任選一種進(jìn)展游戲。網(wǎng)絡(luò)模式還增加了積分制，使用戶既能感受到游戲中的樂(lè)趣，也給用戶提供了一個(gè)展現(xiàn)自己高超技藝的場(chǎng)所。俄羅斯方塊游戲可以說(shuō)是隨計(jì)算機(jī)的開(kāi)展而開(kāi)展，并不斷推陳出新演變出各種類似游戲,深受廣闊玩家喜愛(ài)。這個(gè)游戲有的簡(jiǎn)單,有的復(fù)雜,但其根本原理是一樣的都是對(duì)運(yùn)動(dòng)的方塊進(jìn)展組合,來(lái)訓(xùn)練玩家的反響能力。本文利用單片機(jī)進(jìn)展俄羅斯方塊設(shè)計(jì)，采用51匯編語(yǔ)言進(jìn)展編程,基于匯編語(yǔ)言的原因是在編寫程序的過(guò)程中，對(duì)于程序的執(zhí)行會(huì)有一個(gè)比擬直觀的表現(xiàn)。程序整體思路單片機(jī)上的程序設(shè)計(jì)一般是一個(gè)大循環(huán)構(gòu)造，對(duì)于俄羅斯方塊的程序設(shè)計(jì)，首先產(chǎn)生一個(gè)偽隨機(jī)數(shù)，其范圍是0-6，然后程序根據(jù)此數(shù)值所對(duì)應(yīng)的圖形模塊裝入ram的固定區(qū)域內(nèi)，緊接著將此圖像寫入led所對(duì)應(yīng)的顯示緩沖區(qū)中，顯示程序?qū)⒕彌_區(qū)內(nèi)的內(nèi)容顯示在led上，如果沒(méi)有控制鍵按下，圖形將自動(dòng)向下移動(dòng)。如果有鍵按下，程序?qū)⒏鶕?jù)按下的鍵來(lái)改變圖形存儲(chǔ)區(qū)的值，同時(shí)程序?qū)⑴袛鄨D形是否已到達(dá)邊界，當(dāng)圖形最上層到達(dá)顯示區(qū)頂部，則游戲完畢，此時(shí)將清楚顯示緩沖的內(nèi)容，游戲重新開(kāi)場(chǎng)。2．8x8led顯示原理8x8led顯示屏的原理圖如下由于人眼的視覺(jué)暫留現(xiàn)象，通過(guò)逐行掃描顯示的方式來(lái)顯示要顯示的內(nèi)容，當(dāng)每一行掃描的時(shí)間很小時(shí)人眼觀察的將是一幅完整的圖像。3．硬件電路仿真圖.4．圖形顯示8x8led一共有64個(gè)led，可以從下至上一次對(duì)其編號(hào)，對(duì)于顯示類的根本操作是任意點(diǎn)亮一個(gè)點(diǎn)，熄滅一個(gè)點(diǎn)，任意點(diǎn)亮n〔0<n<=64〕個(gè)點(diǎn)，滅掉n個(gè)點(diǎn)，如此一來(lái)游戲的第一個(gè)關(guān)鍵點(diǎn)就完成了。我們將ram中從21h單元到28h單元作為led的顯示緩沖區(qū)，這里面的每一位對(duì)應(yīng)led的一個(gè)點(diǎn)，led將實(shí)時(shí)顯示緩沖區(qū)的內(nèi)容，也就是當(dāng)此緩沖區(qū)內(nèi)容一改變，led上看到的也會(huì)做出相應(yīng)的改變。同時(shí)在俄羅斯方塊中那些方塊被存放在一個(gè)類似于一維的數(shù)組之中，每一個(gè)方塊對(duì)應(yīng)四個(gè)小方塊，根據(jù)偽隨機(jī)數(shù)將這四個(gè)小方塊對(duì)應(yīng)的值裝入ram固定的區(qū)域內(nèi)。如果要顯示方塊只需將這些方塊所對(duì)應(yīng)的點(diǎn)寫入緩沖區(qū)。5．消層算法設(shè)置循環(huán)變量數(shù)R2=8，即總共至少要掃描8次，每一次循環(huán)過(guò)程中檢測(cè)此行是否已滿，也就是檢測(cè)這一行所對(duì)應(yīng)的存儲(chǔ)單元是否全為一，如果全為一則將消去此行，即將此行對(duì)應(yīng)的ram清零。同時(shí)將此行上面ram的內(nèi)容按每列依次下移，下移完之后重新將R2=0，又從第一行開(kāi)場(chǎng)檢測(cè)。此行不全為零時(shí)只需將R2=R2+1。直到R2=9消層過(guò)程完畢。6．旋轉(zhuǎn)算法首先要確定一個(gè)旋轉(zhuǎn)中心，假設(shè)旋轉(zhuǎn)中心的編號(hào)是34，將34除以8，商是4存入R1余數(shù)是2存入R2，及時(shí)用商和余數(shù)建設(shè)坐標(biāo)系。此時(shí)假設(shè)以此為旋轉(zhuǎn)中心的圖形需要旋轉(zhuǎn)，則將每一個(gè)小方塊對(duì)應(yīng)編號(hào)除以8，商減去R1，余數(shù)減去R2，而每一個(gè)方塊一次將旋轉(zhuǎn)90度，所以有公式x1,y1,x2,y2x2=-y1,y2=x1其中x1，y1為旋轉(zhuǎn)之前的坐標(biāo)，x2,y2為旋轉(zhuǎn)之后的坐標(biāo)。旋轉(zhuǎn)完之后將x2加上R1將y2加上R2，然后將x2乘以8再加上y2。執(zhí)行四次此過(guò)程旋轉(zhuǎn)完畢。7．實(shí)物焊接器件：stc51單片機(jī)一塊，8x8led顯示模塊一塊，電阻10k10個(gè)，開(kāi)關(guān)5個(gè)，與門，12m晶振一個(gè)，電容3個(gè)。首先按照目的進(jìn)展進(jìn)展元器件布局，然后按照電路圖里的導(dǎo)線的連接次序?qū)⒃骷冈陔娐钒迳?，焊好之后進(jìn)展調(diào)試。8．心得體會(huì)寫程序的過(guò)程中，首先應(yīng)該把程序思路理清，然后再寫代碼，否則寫到一半感覺(jué)行不通時(shí)是很令人心煩的。還有就是焊接是一個(gè)技術(shù)活，因?yàn)樵陔娮庸に噷?shí)習(xí)之后大家便沒(méi)有碰過(guò)電烙鐵，所以焊的過(guò)程還是很辛苦的。附錄：程序代碼 ORG0000HAJMPSTARTORG0003HAJMPINTERRUPTAAEQU10000000BBBEQU11111111BHANGEQU32HLIEEQU33HCOUNTEQU34HREMOVEROWEQU35HSTEPSEQU36HXUNHUANEQU37HBIANLIANGEQU38HGRAPHRAM1EQU39HGRAPHRAM2EQU40HGRAPHRAM3EQU41HGRAPHRAM4EQU42HXXXEQU43HYYYEQU44HKEYEQU45HLEDHEADEQU21HTESTBIT100BITSBIT99RIGHTBIT98LEFTBIT97DOWNBIT96HARDBIT95TURNBIT94KEYDOWNBIT93TESTINGBIT92BOTTOMBIT91;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;程序由此處開(kāi)場(chǎng)執(zhí)行;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;START:MOVTCON,#00000001B;;;;;;;;;;;;;設(shè)置外部中斷0響應(yīng)方式為下降沿觸發(fā)SETBEX0SETBEAMOVSP,#60H;;;;;;;;;;;;;;;;;;;;;將堆棧指針SP設(shè)置在RAM的高地址處MOVR7,#6;;;;;;;;;;;;;;;;;;;;;;R7作為存放0-6這7個(gè)隨機(jī)數(shù)的變量MOVP0,#11111111B;;;;;;;;;;;;;;;;;;;;;;將P0口最為輸入口LCALLWRITEGRAPHTORAMCLRTESTINGGAMELOOP:;CLREALCALLSHOWGRAPHMOVR6,#30TIMING:LCALLSHOWLEDRAMLCALLDELAYDJNZR6,TIMINGLCALLDOWNTESTJNBDOWN,NEXT1ABCD:MOVA,28HCJNEA,#0,GAMEOVERLCALLREMOVEBLOCKLCALLWRITEGRAPHTORAMJMPGAMELOOPNEXT1:;JBKEYDOWN,KEY1JMPKEY4KEY1:CLRTESTINGCLRKEYDOWNMOVA,KEYCJNEA,#1,KEY2;1-LEFTLCALLLEFTTESTJBLEFT,KEY4LCALLCLEANGRAPHLCALLMOVELEFTLCALLGAMELOOPKEY2:CJNEA,#2,KEY3;2-RIGHTLCALLRIGHTTESTJBRIGHT,KEY4LCALLCLEANGRAPHLCALLMOVERIGHTLCALLGAMELOOPKEY3:CJNEA,#4,KEY4;4-ROTATE;LCALLROTATIONTEST;JNBTURN,KEY4LCALLCLEANGRAPHLCALLROTATIONJMPGAMELOOPKEY4:CJNEA,#8,KEY5SWEAT:LCALLDOWNTESTJBDOWN,GAMELOOPLCALLCLEANGRAPHLCALLMOVEDOWNJMPSWEATKEY5:LCALLCLEANGRAPHLCALLMOVEDOWNINCR7CJNER7,#7,NEXT5MOVR7,#0NEXT5:JMPGAMELOOPGAMEOVER:MOVR0,#8MOVR1,#LEDHEADCLEAR:LCALLCLEANGRAPHMOV@R1,#0INCR1DJNZR0,CLEARMOVR0,#4MOVR1,#GRAPHRAM1ASDF:MOVA,@R1ADDA,#16MOV@R1,AINCR1DJNZR0,ASDFJMPGAMELOOP;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;測(cè)試圖形是否能向下移動(dòng);;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;DOWNTEST:PUSH0PUSH1PUSH2PUSH3PUSHBPUSHACCMOVR2,#4MOVR0,#GRAPHRAM1DOWN0:MOVA,@R0SUBBA,#8MOVB,AMOVR3,#4CLRCMOVR1,#GRAPHRAM1DOWN2:CLRCSUBBA,@R1JZDOWN1INCR1MOVA,BDJNZR3,DOWN2LCALLTESTBITJBBITS,DOWN3DOWN1:INCR0DJNZR2,DOWN0CLRDOWNJMPHOPEDOWN3:SETBDOWN;DOWNWEIYIBIAOSHIBUNENGWANGXIAYIDONGCPLP3.4JMPDOWN4HOPE:MOVR2,#4MOVR0,#GRAPHRAM1YOUQIANG2:MOVR3,#1CCC2:MOVA,R3MOVB,ACLRCSUBBA,@R0JNZCCC1SETBDOWNSETBBOTTOMJMPDOWN4CCC1:MOVA,BINCR3CJNER3,#9,CCC2INCR0DJNZR2,YOUQIANG2DOWN4:POPACCPOPBPOP3POP2POP1POP0RET;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;外部中斷0中斷處理程序;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;INTERRUPT:PUSH0PUSH1PUSHACCINCR7CJNER7,#7,INTTMOVR7,#0INTT:SETBTESTINGSETBKEYDOWNMOVA,P0CPLAMOVKEY,APOPACCPOP1POP0RETI;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;測(cè)試能否旋轉(zhuǎn);;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;向下移動(dòng);;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;MOVEDOWN:PUSH0PUSH1PUSHACCMOVR0,#GRAPHRAM1MOVR1,#4MOVE1:MOVA,@R0CLRCSUBBA,#8MOV@R0,AINCR0DJNZR1,MOVE1POPACCPOP1POP0RET;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;向左移動(dòng);;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;MOVELEFT:PUSH0PUSH1PUSHACCMOVR0,#GRAPHRAM1MOVR1,#4MOVE2:MOVA,@R0CLRCSUBBA,#1MOV@R0,AINCR0DJNZR1,MOVE2POPACCPOP1POP0RET;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;向右移動(dòng);;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;MOVERIGHT:PUSH0PUSH1PUSHACCMOVR0,#GRAPHRAM1MOVR1,#4MOVE3:MOVA,@R0CLRCINCAMOV@R0,AINCR0DJNZR1,MOVE3POPACCPOP1POP0RET;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;將圖形寫入RAM緩存中;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;WRITEGRAPHTORAM:PUSHACCPUSHBPUSH0PUSH1PUSH2PUSH7MOVR1,#4MOVA,R7MOVB,#4MULABMOVR2,AMOVR0,#GRAPHRAM1MOVDPTR,#GRAPHWRITEGRAPH:MOVA,R2MOVCA,@A+DPTR;SUBBA,#16MOV@R0,AINCR2INCR0DJNZR1,WRITEGRAPHPOP7POP2POP1POP0POPBPOPACCRET;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;測(cè)試某一個(gè)二進(jìn)制位是否為1;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;TESTBIT:PUSH0PUSH1PUSHBPUSHACCMOVB,#8DIVABMOVR0,AMOVA,BCJNEA,#0,TEST3MOVA,R0DECAJMPTEST4TEST3:MOVA,R0TEST4:MOVDPTR,#TAB1MOVR1,#LEDHEADADDA,R1MOVR1,AMOVA,BMOVCA,@A+DPTRANLA,@R1CJNEA,#0,TEST1CLRBITSJMPTEST2TEST1:SETBBITSTEST2:POPACCPOPBPOP1POP0RET;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;測(cè)試圖形是否能向左移動(dòng);;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;LEFTTEST:PUSH0PUSH1PUSH2PUSH3PUSHBPUSHACCMOVR2,#4MOVR0,#GRAPHRAM1LEFT0:MOVA,@R0CLRCSUBBA,#1MOVB,AMOVR3,#4;CLRCMOVR1,#GRAPHRAM1LEFT2:CLRCSUBBA,@R1JZLEFT1INCR1MOVA,BDJNZR3,LEFT2LCALLTESTBITJBBITS,LEFT3LEFT1:INCR0DJNZR2,LEFT0CLRLEFTJMPLEFT4LEFT3:SETBLEFT;DOWNWEIYIBIAOSHIBUNENGWANGXIAYIDONGCPLP3.4JMPLEFT5LEFT4:MOVR2,#4MOVR0,#GRAPHRAM1YOUQIANG:MOVR3,#9MOVA,#1HHH2:MOVB,ACLRCSUBBA,@R0JNZHHH1SETBLEFTJMPLEFT5HHH1:MOVA,BADDA,#8DJNZR3,HHH2INCR0DJNZR2,YOUQIANGLEFT5:POPACCPOPBPOP3POP2POP1POP0RET;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;測(cè)試圖形是否能向右移動(dòng);;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;RIGHTTEST:PUSH0PUSH1PUSH2PUSH3PUSHBPUSHACCMOVR2,#4MOVR0,#GRAPHRAM1RIGHT0:MOVA,@R0ADDA,#1MOVB,AMOVR3,#4;CLRCMOVR1,#GRAPHRAM1RIGHT2:SUBBA,@R1JZRIGHT1INCR1MOVA,BDJNZR3,RIGHT2LCALLTESTBITJBBITS,RIGHT3RIGHT1:INCR0DJNZR2,RIGHT0CLRRIGHTJMPRIGHT4RIGHT3:SETBRIGHT;DOWNWEIYIBIAOSHIBUNENGWANGXIAYIDONGCPLP3.4JMPRIGHT5RIGHT4:MOVR2,#4MOVR0,#GRAPHRAM1YOUQIANG1:MOVR3,#8MOVA,#8III2:MOVB,ACLRCSUBBA,@R0JNZIII1SETBRIGHTJMPRIGHT5III1:MOVA,BADDA,#8DJNZR3,III2INCR0DJNZR2,YOUQIANG1RIGHT5:POPACCPOPBPOP3POP2POP1POP0RET;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;圖形旋轉(zhuǎn);;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;ROTATION:PUSH0PUSH1PUSH2PUSH3PUSHBPUSHACCMOVA,GRAPHRAM1;A=50MOVB,#8DIVAB;A=6B=2MOVHANG,A;HANG=6MOVLIE,B;LIE=2MOVR3,#4MOVR0,#GRAPHRAM1ROTATESTART:MOVA,@R0MOVB,#8DIVABCLRCSUBBA,HANGMOVR1,AMOVA,BCLRCSUBBA,LIEMOVR2,A;;;;;;;;;;;;;;;;;;X2=-Y1Y2=X1MOVA,#0CLRCSUBBA,R2;-Y1MOVB,R1;X1MOVR1,A;X2=-Y1MOVR2,B;Y2=X1MOVA,R1ADDA,HANGMOVR1,AMOVA,R2ADDA,LIEMOVR2,AMOVA,R1MOVB,#8MULABADDA,R2MOV@R0,A INCR0DJNZR3,ROTATESTARTPOPACCPOPBPOP3POP2POP1POP0RET;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;顯示LEDRAM中的內(nèi)容;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;SHOWLEDRAM:PUSH0PUSH1PUSHBPUSHACCMOVR0,#LEDHEADMOVR1,#8MOVA,#AASHOW1:MOVP1,AMOVP2,@R0LCALLDELAYINCR0RLADJNZR1,SHOW1POPACCPOPBPOP1POP0RET;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;軟件延時(shí);;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;DELAY:PUSH1PUSH2MOVR1,#5FQFQ:MOVR2,#200FWFW:DJNZR2,FWFWDJNZR1,FQFQPOP2POP1RET;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;清楚圖形在LEDRAM中的內(nèi)容;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;CLEANGRAPH:PUSHACCPUSH1MOVA,#GRAPHRAM1MOVXUNHUAN,#4MOVR1,ADADA1:MOVA,@R1;SUBBA,#16LCALLWRITEPOINT0INCR1DJNZXUNHUAN,DADA1POP1POPACCRET;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;顯示圖形在LEDRAM中的內(nèi)容;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;SHOWGRAPH:PUSHACCPUSH1MOVA,#GRAPHRAM1MOVXUNHUAN,#4MOVR1,ADADA2:MOVA,@R1;SUBBA,#16LCALLWRITEPOINT1INCR1DJNZXUNHUAN,DADA2POP1POPACCRET;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;消除已經(jīng)填滿的行;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;REMOVEBLOCK:PUSH0PUSH1PUSHBPUSHACCREMOVESTART:MOVR0,#1MOVR1,#LEDHEADREMOVE2:MOVA,@R1CJNEA,#11111111B,REMOVE1MOV@R1,#00000000BMOVREMOVEROW,R0LCALLDOWNBLOCKJMPREMOVESTARTREMOVE1:INCR0INCR1MOVA,R0CJNEA,#9,REMOVE2POPACCPOPBPOP1POP0RETDOWNBLOCK:PUSH0PUSH1PUSHBPUSHACCMOVR0,#1DOWN11:MOVA,REMOVEROWMOVB,#8MULABADDA,R0LCALLDOWNSTEPLCALLJUSTMOVEINCR0MOVA,R0CJNEA,#9,DOWN11POPACCPOPBPOP1POP0RETDOWNSTEP:PUSH0PUSH1PUSHBPUSHACCMOVR0,#0MOVR1,REMOVEROWSTEP2:CLRCSUBBA,#8LCALLTESTBITJBBITS,STEP1INCR0DJNZR1,STEP2STEP1:MOVSTEPS,R0POPACCPOPBPOP1POP0RETJUSTMOVE:PUSH0PUSH1PUSH2PUSHBPUSHACCMOVR0,AMOVA,STEPSMOVB,#8MULABMOVB,AMOVA,R0CLRCSUBBA,BMOVR1,AMOVR2,REMOVEROWMOVA,#8CLRCSUBBA,R2MOVR2,AJUST3:MOVA,R0LCALLTESTBITJBBITS,JUST1MOVA,R1LCALLWRITEPOINT0JMPJUST2JUST1:MOVA,R1LCALLWRITEPOINT1JUST2:MOVA,R0ADDA,#8MOVR0,AMOVA,R1ADDA,#8MOVR1,ADJNZR2,JUST3MOVR2,REMOVEROWDDD:MOVA,R1LCALLWRITEPOINT0MOVA,R1ADDA,#8MOVR1,ADJNZR2,DDDJUSTEND:POPACCPOPBPOP2POP1POP0RET;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;將某個(gè)二進(jìn)制位寫