找回密碼
 立即注冊(cè)

QQ登錄

只需一步,快速開(kāi)始

帖子
查看: 3625|回復(fù): 0
打印 上一主題 下一主題
收起左側(cè)

51單片機(jī)生日快樂(lè)potuse匯編代碼

[復(fù)制鏈接]
跳轉(zhuǎn)到指定樓層
樓主
ID:209242 發(fā)表于 2017-6-8 15:52 | 只看該作者 回帖獎(jiǎng)勵(lì) |倒序?yàn)g覽 |閱讀模式
ORG 0000H;   
AJMP READY;                   //短轉(zhuǎn)移
ORG 000BH;                    //定時(shí)器0中斷入口
AJMP EXT0;                    
ORG 0030H;
READY:MOV TMOD,#00010001B;   //設(shè)置寄存器初始化
MOV  IE,#10000010B;          //允許中斷總控與定時(shí)器0中斷         
AGAIN:MOV DPTR,#TABLE;       //DRTR指向字形碼表首址
MAINL:CLR A;                 //清0
MOVC A, @A+DPTR;             //取地址值
MOV R1,A;
INC DPTR;                    //地址加一
CLR A;
MOVC A,@A+DPTR;
MOV R0,A ;
INC DPTR;
ORL A,R1;                    //或
JZ XZF;                      //A=0轉(zhuǎn)移
MOV A,R0;
ANL A,R1;                    //與
CJNE A,#0FFH,START;          //比較轉(zhuǎn)移
AJMP AGAIN;
START:MOV TL0,R0;            //將R0,R1分別放入TL0與TH0寄存器
MOV TH0,R1;
SETB TR0;
CLR A;
MOVC A,@A+DPTR;
MOV R2,A;
INC DPTR;
AJMP DELAY;
XZF:CLR TR0;
CLR A;
MOVC A,@A+DPTR;
MOV R2,A;
INC DPTR;
DELAY:ACALL YS187MS;        //調(diào)用子程序
DJNZ R2 ,DELAY;             //減一不為0轉(zhuǎn)移
AJMP MAINL;
EXT0:MOV TL0,R0;           
MOV TH0,R1;
CPL P1.0;                   //P1.0引腳輸出取反
RETI;
YS187MS:SETB TR1;
MOV R5,#100;
YSLOOP:MOV TL1,#LOW(65536-1870);//取低八位
MOV TH1,#HIGH(65536-1870);      //取高八位
YSPD:JBC TF1,YSLOOP1;           //TF1為1跳轉(zhuǎn)為0執(zhí)行下一條
AJMP YSPD;
YSLOOP1:DJNZ R5,YSLOOP;
CLR TR1;
RET;                            //子程序返回
TABLE:DB 0FDH,80H,03H,0FDH,80H,01H; //字形碼表
DB 0FDH,0C6H,04H,0FDH,80H,04H;
DB 0FEH,2AH,04H,0FEH,02H,04H;
DB 00H,00H,04H;
DB 0FDH,80H,03H,0FDH,80H,01H;
DB 0FDH,0C6H,04H,0FDH,80H,04H;
DB 0FEH,5CH,04H,0FEH,2AH,04H;
DB 00H,00H,04H;
DB 0FDH,80H,03H,0FDH,80H,01H;
DB 0FEH,0C0H,04H,0FEH,84H,04H;
DB 0FEH,2AH,04H,0FEH,02H,04H;
DB 0FDH,0C6H,04H;
DB 0FFH,98H,03H,0FEH,98H,01H;
DB 0FEH,84H,04H,0FEH,2AH,04H;
DB 0FEH,5CH,04H,0FEH,2AH,04H;
DB 00H,00H,04H;
DB 0FFH,0FFH;
END;

分享到:  QQ好友和群QQ好友和群 QQ空間QQ空間 騰訊微博騰訊微博 騰訊朋友騰訊朋友
收藏收藏 分享淘帖 頂 踩

相關(guān)帖子

回復(fù)

使用道具 舉報(bào)

本版積分規(guī)則

小黑屋|51黑電子論壇 |51黑電子論壇6群 QQ 管理員QQ:125739409;技術(shù)交流QQ群281945664

Powered by 單片機(jī)教程網(wǎng)

快速回復(fù) 返回頂部 返回列表