1 ;*******ZLG7289 PARAMETERS******* 2 ZLG_BIT_CNT EQU 30H ;The number of data sended ;循环次数 3 ZLG_REC_BUF EQU 31H ;The buffer of data received ;做接收缓冲，传过来什么先放在该变量中 4 ZLG_SEND_BUF EQU 32H ;The buffer of data sended ;做发送缓冲， 5 ZLG_DECIMAL EQU 33H ;The digit of decimal ;要显示的十进制的数字 6 7 ZLG_CS EQU P0.0 ;/CS of ZLG7289 ;四根引脚线：/CS,CLK,DATA,/KEY 8 ZLG_CLK EQU P0.1 ;CLK of ZLG7289 9 ZLG_DATA EQU P0.2 ;DIO of ZLG7289 10 ZLG_KEY EQU P0.3 ;/KEY of ZLG7289 ;key:告诉cpu有按键 11 ;定义的几个变量四根线将ZLG和cpu连起来 12 13 SECOND EQU 34H ;second 14 MIN EQU 35H ;min 15 HOUR EQU 36H ;hour 16 VAR_TIMER EQU 37H ;Soft timer，溢出次数 17 18 19 ;*******DELAY PARAMETERS******* 20 VAR_DELAY EQU 71H ;The variable for delay function 21 ;****************************************************** 22 org 0000H 23 ljmp MAIN 24 25 org 000BH 26 jmp interrupt_T0 27 ;****************************************************** 28 29 org 0030H 30 MAIN: 31 32 setb ZLG_CS ;先关闭 33 setb ZLG_KEY ;先关闭 34 setb ZLG_DATA ;先关闭 35 call delay_50 ;给时间上电各自启动，让ZLG正常上电 36 37 mov ZLG_SEND_BUF,#10100100B ;Initialize ZLG7289，初始化zlg放到变量里 38 call zlg_send ;调用一个发送函数 39 setb ZLG_CS ;Set standby mode 40 41 /*Initilize the var*/ 42 mov SECOND,#50 43 mov MIN,#12 44 mov HOUR,#14 45 mov VAR_TIMER,#00H 46 47 /*Initialize T0*/ 48 mov TMOD,#01H 49 mov TH0,#0B1H ;20ms,load number 50 mov TL0,#0E0H 51 setb TR0 ;Start T0 52 setb ET0 ;Enable T0 inerrupt 53 setb EA ;Enable interrupt 54 ;mov IE,#82H ;#10000010B 55 56 57 MAIN_LOOP: 58 ;*******display num : hour, minutes,second*************** 59 ;***************second******************* 60 61 mov b,#10 ;b:低位 62 mov a,SECOND ; 63 div ab 64 mov ZLG_DECIMAL,a 65 66 mov ZLG_SEND_BUF,#10000000B ;显示位1 67 lcall zlg_send 68 mov ZLG_SEND_BUF,ZLG_DECIMAL 69 70 lcall zlg_send 71 setb ZLG_CS 72 73 mov ZLG_SEND_BUF,#10000001B ;显示位2 74 lcall zlg_send 75 mov ZLG_SEND_BUF,b 76 lcall zlg_send 77 setb ZLG_CS 78 79 ;**************"-"************************* 80 mov ZLG_SEND_BUF,#10000010B ;显示位3 81 lcall zlg_send 82 mov ZLG_SEND_BUF,#00001010B 83 lcall zlg_send 84 setb ZLG_CS 85 86 ;**************MIN************************* 87 88 mov b,#10 ;b:min低位 89 mov a,MIN ; 90 div ab 91 mov ZLG_DECIMAL,a 92 93 mov ZLG_SEND_BUF,#10000011B ;显示位4 94 lcall zlg_send 95 mov ZLG_SEND_BUF,ZLG_DECIMAL 96 97 lcall zlg_send 98 setb ZLG_CS 99 100 mov ZLG_SEND_BUF,#10000100B ;显示位5 101 lcall zlg_send 102 mov ZLG_SEND_BUF,b 103 lcall zlg_send 104 setb ZLG_CS 105 106 ;**************"-"************************* 107 mov ZLG_SEND_BUF,#10000101B ;显示位6 108 lcall zlg_send 109 mov ZLG_SEND_BUF,#00001010B 110 lcall zlg_send 111 setb ZLG_CS 112 113 114 ;**************HOUR************************* 115 116 mov b,#10 ;b:min低位 117 mov a,HOUR ; 118 div ab 119 mov ZLG_DECIMAL,a 120 121 mov ZLG_SEND_BUF,#10000110B ;显示位7 122 lcall zlg_send 123 mov ZLG_SEND_BUF,ZLG_DECIMAL 124 125 lcall zlg_send 126 setb ZLG_CS 127 128 mov ZLG_SEND_BUF,#10000111B ;显示位8 129 lcall zlg_send 130 mov ZLG_SEND_BUF,b 131 lcall zlg_send 132 setb ZLG_CS 133 134 135 136 mov ZLG_SEND_BUF,#10001000B ;闪烁显示：闪烁控制 137 lcall zlg_send 138 mov ZLG_SEND_BUF,#11111100B ;1-7段闪烁，第8段不闪烁 139 lcall zlg_send 140 setb ZLG_CS 141 142 ;WAIT_KEY_POP: 143 jnb ZLG_KEY,$ ;Wait the key to pop，等待按键放开 144 145 ajmp MAIN_LOOP ;再回到主程序，等待按键按下去 146 147 ;JMP $ 148 ret ;main return 149 ;***************************************************************** 150 151 152 interrupt_T0: 153 push acc ;Pay attention to here 154 push psw 155 156 ;Reset T0,must be done 157 ;clr TF0 ;auto clear the tag of overflow 158 mov TH0,#0B1H ;20ms,reload number 159 mov TL0,#0E0H 160 161 inc VAR_TIMER ;Add 20ms 162 /*If VAR_TIMER=50,then time for 1s */ 163 mov a,VAR_TIMER 164 cjne a,#50,INT_T0_EXIT 165 166 mov VAR_TIMER,#00H 167 call NUM_ADD_SECOND 168 169 INT_T0_EXIT: 170 pop psw 171 pop acc 172 173 reti 174 ;***************************************************************** 175 ;Send a byte to MCU with higer bit first 176 zlg_send: 177 mov ZLG_BIT_CNT,#8 ;Set the number of data sended，发送：循环8次，左移 178 clr ZLG_CS ;Set set ZLG7289 ready,T1 179 call delay_50;T1 180 181 ZLG_SEND_LP: 182 ;Send a bit 183 mov a,ZLG_SEND_BUF 184 rlc a 185 mov ZLG_SEND_BUF,a 186 mov ZLG_DATA,c 187 nop ;Wait for data to ready 188 nop 189 190 setb ZLG_CLK ;T2，拉高拉低直接setb clr时间不够：74164位ns级+delay 191 lcall delay_8 ;delay一个8微秒或者8个nop，然后再处理下一位 192 clr ZLG_CLK ;T3 193 lcall delay_8 194 195 djnz ZLG_BIT_CNT,ZLG_SEND_LP ;Loop to next bit 196 197 ;clr ZLG_DATA 198 199 ret 200 ;***************************************************************** 201 ;Receive a byte to ZLG7289 with higer bit first 202 zlg_receive: 203 mov ZLG_BIT_CNT,#8 ;Set the number of data received 204 clr ZLG_CS ;Set set ZLG7289 ready,T1 205 lcall delay_50 206 207 ZLG_REC_LP: 208 ;Receive a bit 209 setb ZLG_CLK ;T6 210 lcall delay_8 211 212 mov c,ZLG_DATA 213 mov a,ZLG_REC_BUF 214 rlc a 215 mov ZLG_REC_BUF,acc 216 217 clr ZLG_CLK ;T7 218 lcall delay_8 219 220 djnz ZLG_BIT_CNT,ZLG_REC_LP ;Loop to next bit、 221 222 clr ZLG_DATA 223 224 ret 225 226 ;**************************************************** 227 228 NUM_ADD_SECOND: 229 ;Get previos value 230 mov a,SECOND 231 inc a 232 mov SECOND,a 233 cjne a,#59,NUM_ADD_EXIT 234 235 236 237 NUM_ADD_RESET_SECOND: 238 239 mov SECOND,#00 ; 240 ;应该调用的是分钟数+1 241 242 243 NUM_ADD_MIN: 244 245 ;到了59min，分钟数清零，没到加一 246 ;判断MIN是不是59，是的话清零，不是+1 247 ;get previous value 248 mov a,MIN 249 inc a 250 mov MIN,a 251 cjne a,#59,NUM_ADD_EXIT 252 253 NUM_ADD_RESET_MIN: 254 255 mov MIN,#00 ; 256 257 NUM_ADD_HOUR: 258 259 ;到了59hour。小时数清零，没到加一 260 ;判断HOUR是不是59，是的话清零，不是+1 261 ;get previous value 262 mov a,HOUR 263 inc a 264 mov HOUR,a 265 cjne a,#24,NUM_ADD_EXIT 266 267 NUM_ADD_RESET_HOUR: 268 269 mov HOUR,#00 270 271 NUM_ADD_EXIT: 272 273 ret 274 275 ;***************************************************************** 276 ;Delay for (50+2) us 277 delay_50: 278 mov VAR_DELAY,#25 279 djnz VAR_DELAY,$ 280 ret 281 ;***************************************************************** 282 ;Delay for (8+2) us 283 delay_8: 284 mov VAR_DELAY,#4 285 djnz VAR_DELAY,$ 286 ret 287 ;***************************************************************** 288 END
标签：ZLG,ZLG7289,51,mov,SEND,单片机,zlg,lcall,BUF From： https://www.cnblogs.com/luoxiaoluo/p/16920392.html