max7219匯編程序

;==========================================================
;??function:?sd_7219??;向7219送地址或數(shù)據(jù)
;??input:??a
;??output:??MAX7219??
;??usage:??a,r2
;========================================================
sd_7219: ;向7219送地址或數(shù)據(jù)
??mov??r2,??#08h?;向7219送地址或數(shù)據(jù)
c_sd:??nop
??clr??disp_clk
??rlc??a
??mov??disp_din,?c?;準(zhǔn)備數(shù)據(jù)
??nop
??setb??disp_clk??;上升沿將數(shù)據(jù)傳入
??djnz??r2,??c_sd
??ret

;==========================================================
;??function:?w_7219??;顯示驅(qū)動程序
;??input:??a----------傳送7219的地址
;????b----------傳送7219數(shù)據(jù)
;??output:??-----------------??
;??usage:??a,r2
;=========================================================
w_7219:?;顯示驅(qū)動程序
??clr??disp_load??;置load=0
??lcall??sd_7219???;傳送7219的地址
??mov??a,??b
??lcall??sd_7219???;傳送數(shù)據(jù)
??setb??disp_load??;數(shù)據(jù)裝載
??ret?

;=========================================================
;?????????????? function:? MAX7219????? initialization 初始化Max7219
;??input:???? -------------
;??output:??? -------------
;?????????????? usage:???? a,b
;========================================================
????????? ;Set_Model????????? equ??????? 0ffh?//將BCD碼譯成B碼；
????????? ;Set_Bright???????? equ??????? 04h?//占空比為15/32；
????????? ;Set_Limit????????? equ??????? 07h?//8位顯示方式；
????????? ;Set_Sart?????????? equ??????? 01h?//進(jìn)入啟動工作方式?
????????? ;Set_Halt??????????

Init_Max7219:?;初始化Max7219
??
??mov??a,??#0ch
??mov??b,??#Set_Halt???????? ;進(jìn)入停機工作方式
??lcall??w_7219

??mov??a,??#0bh????????????? ;設(shè)置掃描界限
??mov??b,??#Set_Limit??????? ;
??lcall??w_7219?
????????????
??mov??a,??#09h????????????? ;將BCD碼譯成B碼
??mov??b,??#Set_Model??????? ;
??lcall??w_7219

??mov??a,??#0ah????????????? ;設(shè)置亮度
??mov??b,??#Set_Bright?????? ;15/32亮度
??lcall??w_7219??????????? ???
?
??mov??a,??#0fh????????????? ;設(shè)置正常工作方式
??mov??b,??#Set_Normal?????? ;
??lcall??w_7219

??mov??a,??#0ch????????????? ;進(jìn)入啟動工作方式?
???

????????????? mov??b,??#Set_Sart???????? ;
??lcall??w_7219
?
??mov??a,??judge_er
??rl??a?
??mov??judge_er,?a

??ret