【正文】 KEY: mov a,2 add a,time_20ms cjne a,time_20ms,$key_1: mov wdt,0 orl 96h,0e1h jnb key_f,key_1 mov a,2 add a,time_20ms cjne a,time_20ms,$ jnb key_f,key_1 clr ea clr ex1 cpl key_work。name keyEXTRN CODE(START)extrn bit(key_work,key_f)EXTRN DATA(DISP_buf,disp_wc,time_20ms,wdt)PUBLIC KEYprog SEGMENT CODE 。設置最大接收字節(jié)數(shù) ajmp rec_1rec_0: mov a,sbuf cjne a,0dh,rec_1 clr ri_frec_1: mov r0,rec_buf_z mov r0,a inc rec_buf_z djnz rec_err,rec_out 。置接收中標志 mov rec_buf_z,rec_buf 。,rec_out 。為發(fā)送中斷跳出 clr ri jb ri_f,rec_0 mov a,sbuf cjne a,39。接收區(qū)指針 rec_err: ds 1 。定義字節(jié)數(shù)據(jù)段2bit_buff segment data bitaddressable 。定義代碼段byte_buff segment data 。讀f表全部動態(tài)數(shù)據(jù)命令 END５、串行接收子模塊（）。0FRD6039。,0DH 。讀d表全部動態(tài)數(shù)據(jù)命令e_order: db 39。0DRD6239。,0DH 。讀B表全部動態(tài)數(shù)據(jù)命令c_order: db 39。0BRD6439。,0DH 。a_order: db 39。檢驗接收緩沖區(qū)數(shù)據(jù) mov r0,rec_buf+1 mov a,r0 inc r0send_24:xrl a,r0 inc r0 cjne r0,0dh,send_24 cjne a,0,send_200 。還原校驗碼 mov r0,rec_buf+70 mov a,r0 clr c subb a,3ah jnc SEND_25 add a,7send_25:add a,3 mov r0,a dec r0 mov a,r0 clr c subb a,3ah jnc SEND_26 add a,7send_26:ADD A,3 swap a inc r0 xchd a,r0 dec r0 xch a,r0 inc r0 mov r0,0dh 。達到允許錯誤次數(shù)退出 ajmp send_outsend_22:mov r0,rec_buf+71 cjne r0,0dh,send_23 。*39。*39。延時200MS等待接收結束 add a,time_20mssend_28:jnb ri_f,send_29 cjne a,time_20ms,send_28 clr ri_f 。 ajmp send_23。延時檢測儀表有無回應 add a,time_20ms send_21:jb ri_f,send_20 cjne a,time_20ms,send_21 mov a,39。延時60uS等待停止位發(fā)送完畢 djnz r0,$ setb es clr 。檢測到結束標志退出。切換75176至發(fā)送狀態(tài) mov r0,order_buf1send_10:inc r0 mov sbuf,r0 jnb ti,$ 。設置允許錯誤次數(shù) mov b,10 clr c subb a,b mov b,8 mul ab mov dptr,a_order mov r0,order_buf1 mov r1,10start_mov:inc r0 push acc movc a,a+dptr mov r0,a inc dptr pop acc cjne r0,0dh,start_mov。清接收緩沖區(qū) MOV R0,REC_BUFSEND_A: MOV R0,0 INC R0 DJNZ DPL,SEND_A 。設置允許錯誤次數(shù) using 0。定義位數(shù)據(jù)段 rseg byte_buff send_n:ds 1 order_buf:ds 10 rseg prog dd_c equ 4 。定義字節(jié)數(shù)據(jù)段1byte_buffI segment idata 。ri_f 正在接收標志PUBLIC send_orderprog SEGMENT CODE 。name send_orderextrn idata (rec_buf) 。 . 空 n o u c h a 1 。 A B C D E F DB 0BFH,86H,0DBH,0CFH,0E6H,0EDH,0FDH,87H,0FFH,0EFH 。TAB: DB 3FH,06H,5BH,4FH,66H,6DH,7DH,07H,7FH,6FH 。軟看門狗處理程序 mov a,wdt cjne a,wdt_time,d_12 mov wdt,0 mov a,0 push acc push acc reti。若disp_c=10則清disp_c mov disp_c,0 inc time_s_c 。無 mov A,disp_7 mov p1,0FFH mov p0,0bfh ajmp d_10DISP8: CJNE R0,8,d_10 。顯示通道號 mov A,disp_5 mov p1,0FFH mov p0,0efh ajmp d_10DISP6: CJNE R0,6,DISP7 。顯示百位 mov c,disp_c_3 mov A,disp_3 mov p1,0FFH mov p0,0fbh ajmp d_10DISP4: CJNE R0,4,DISP5 。r0=1顯示個位 mov c,disp_c_1 mov A,disp_buf mov p1,0FFH mov p0,0feh ajmp d_10DISP2: CJNE R0,2,DISP3 。 djnz disp_s,d_20 cpl disp_s_c。千位閃爍標志位 disp_s_c bit 。十位閃爍標志位 disp_c_3 bit 。閃爍計數(shù)器 rseg bit_buff disp_wc: ds 1 disp_c_1 bit 。無 disp_8 data disp_c+8 。通道位緩沖區(qū) disp_6 data disp_c+6 。百位緩沖區(qū) disp_4 data disp_c+4 。個位緩沖區(qū)，此個位并非真正的個位，指最右一位，以下類推 disp_2 data disp_c+2 。定義位數(shù)據(jù)段 RSEG BYTE_BUFF wdt: ds 1 time_s_c: ds 1 time_20ms: ds 1 DISP_C: ds 11 。定義字節(jié)數(shù)據(jù)段1 byte_buffI segment idata 。name rand_disp extrn number(TH0_H,TL0_L,wdt_time) PUBLIC I_T0,disp_buf,disp_wc,time_20ms,wdt prog SEGMENT CODE 。入口：R0=ASCII地址。出口:r1=BIN碼低字節(jié)，R2=BIN碼高字節(jié)ascii4_bin2:PUSH ACC acall ascii_bin anl a,0fh swap a mov r1,a inc r0 acall ascii_bin anl a,0fh orl ar1,a inc r0 acall ascii_bin anl a,0fh swap a mov r2,a inc r0 acall ascii_bin anl a,0fh orl ar2,a POP ACC ret。ASCII4_BIN2轉(zhuǎn)換子程序。設置二進制數(shù)位數(shù) clr cbin_0: mov a,r1 rlc a mov r1,a mov a,r2 rlc a mov r2,a mov r0,ar3 mov r7,3 。出口：r3=低2位BCD碼，r4=高2位BCD碼,r5=可能的最高位BCD碼 bin_bcd:PUSH ACC PUSH PSW mov r3,0 。BIN_BCD轉(zhuǎn)換子程序。入口：r0=四字節(jié)ASCII碼首地址。加入小數(shù)點信息 jz bcd2_out add a,ar1 mov r0,a mov a,r0 add a,10h mov r0,abcd2_out:ret。個位及十位BCD數(shù)處理 anl a,0fh mov r1,a mov a,r3 anl a,0f0h swap a mov r2,a mov a,r4 。入口：r3=個位及十位BCD碼,r4=百位及千位BCD碼,r6=小數(shù)位數(shù)。清除有效位前面的0 jnz asc_sw_1 mov r4,1ch mov a,r3 jnz asc_sw_1 mov r3,1chasc_sw_1:clr aasc_out:ret。 mov r4,23h ajmp asc_swasc_100:mov r4,23h mov r3,9 mov r2,19h mov r1,9 ajmp asc_sw_1asc_ok: acall bcd2_bcd1 。還原小數(shù)位數(shù) add a,7 mov r0,a acall ascii_bin mov r6,a 。小數(shù)位數(shù)暫存在R6中 mov a,r5 jz asc_oK mov a,dpl cpl a clr c inc a mov dpl,a mov a,dph cpl a addc a,0 mov dph,a jnz asc_basc_0: mov a,dpl dec a jnz asc_b mov r1,0fh mov r2,0fh mov r3,0fh mov r4,0fh mov a,0fh ajmp asc_outasc_b: mov r1,dpl 。計算該通道數(shù)據(jù)偏移首地址 mul ab ad