《系统执行软件源程序代码》由会员分享，可在线阅读，更多相关《系统执行软件源程序代码（13页珍藏版）》请在金锄头文库上搜索。
1、附录一系统执行软件源程序代码一、系统多机通信从机源程序代码TXCJ.ASM*TXCJ.ASM*Lu Bo*2007.5.26*ORG 0000HSJMP MAINORG 0023H;串行口中断入口SJMP SJCS主程序MAIN:SLAVE EQU 12DK EQU P1.0MOV SCON,#0B0HMOV TMOD,#20HMOV TL1,#0FDHMOV TH1,#0FDHMOV IE,#90HSETB TR1LCALL WDCJSETB RS1CLR RS0LCALL BCDZHLCALL DISPLAYCLR RS1CLR RS0SJMP MAIN 串 行 口 中 断 服 务 子 程
2、 序SJCS:CLR RIPUSH APUSH PSW MOV A,SBUF XRL A,#SLA VE JZ SJCS0SJCS1:SETB SM2POP PSWPOP ARETISJCS0:CLR SM2MOV SBUF,#SLA VEJNB TI,$CLR TIJNB RI,$CLR RIMOV A,SBUFXRL A,#11HJZ SJCS2SJMP SJCS1SJCS2:MOV A,25HADD A,#1MOV SBUF,AJNB TI,$CLR TIMOV 22H,#00HSJMP SJCS118B20温 度 采 集 子 程 序WDCJ:MOV SP,#60HLCALL GET_T
3、EMPMOV A,21HMOV C,00HRRC AMOV C,01HRRC AMOV C,02HRRC AMOV C,03HRRC AMOV 21H,AMOV 25H,ALCALL BCDZHLCALL DISPLAYAJMP MAIN18B20 温 度 采 集 时 序 子 程 序GET_TEMP: CLR EALCALL INTMOV A,#0CCHLCALL WRITEMOV A,#44HLCALL WRITELCALL INTMOV A,#0CCHLCALL WRITEMOV A,#0BEH LCALL WRITE LCALL READMOV 21H,A LCALL READMOV 2
4、0H,ASETB EA始化子程RET18B20初INT:CLREAL0:CLRDKMOV R2,#200L1:CLRDKDJNZ R2,L1SETB DKMOV R2,#30L4:DJNZ R2,L4CLR CORL C,DKJC L0MOV R6,#80L5:ORL C,DKJC L3DJNZ R6,L5SJMP L0L3:MOV R2,#200L2:DJNZ R2,L2RET18B20写命令子程WRITE:CLR EAMOV R3,#8WR1:SETB DKMOV R4,#8RRC ACLR DKWR2:DJNZ R4,WR2MOV DK,CMOV R4,#20WR3:DJNZ R4,WR
5、3DJNZ R3,WR1SETB DKRET18B20 读数据子程序READ:CLR EAMOV R6,#8RE1:CLR DKMOV R4,#4NOPSETB DKRE2:DJNZ R4,RE2MOV C,DKRRC AMOV R5,#30RE3:DJNZ R5,RE3DJNZ R6,RE1SETB DKRET八为十六转十进制子程序BCDZH:INC 21HMOV A,21HMOV 30H,#12JNB ACC.7,BCD0MOV 30H,#11CPL AADD A,#1BCD0:MOV R1,#00HMOV R2,#00HCLR CBCD1:SUBB A,#64HJC BCD2INC R1
6、SJMP BCD1BCD2:ADD A,#64HBCD3:SUBB A,#0AHJC BCD4INC R2SJMP BCD3BCD4:ADD A,#0AHMOV 31H,R1MOV 32H,R2MOV 33H,ARET位数码子程序DISPLAY:MOV R3,#4MOV R0,#30HMOV 3AH,#0f7HDISP0:MOV A,R0MOV DPTR,#TAB MOVC A,A+DPTR MOV DPTR,#0D00H MOVX DPTR,A MOV DPTR,#0E00H MOV A,3AHMOVX DPTR,A RR AMOV 3AH,AACALL DY1msINC R0DJNZ R3
7、,DISP0 RET-0.2ms延时子程序DY1ms:LOOP: MOV R4,#50NOPNOPDJNZ R4,LOOPRET-10ms延时子程序DY10ms:LOOP0:LOOP1: MOV R4,#10MOV R5,#250NOPNOPDJNZ R5,LOOPDJNZ R4,LOOP0RET十进制码表TAB:DB 3fh,06h,5bh,4fh,66hDB 6dh,7dh,07h,7fh,6fhDB 058H,040H,00H END、系统多机通信主机源程序代码*TXCJ.ASM*Lu Bo* *2007.5.26*;0,1,2,3;4,5,6,7;8,9,C,-,黑屏TXZJ.ASMO
8、RG 0000HSJMP MAIN主程序MAIN:MOV SP,#70HMOV SCON,#98HMOV TMOD,#20HMOV TL1,#0FDHMOV TH1,#0FDHMOV PCON,#00HMOV R6,#10MOV R7,#3MOV 55H,#00HSETB TR1LCALL BCDZHLCALL DISPLAYMAIN00: LCALL PCJCXLCALL SJCSMOV SCON,#50Hlcall serial_sendMOV SCON,#98HLCALL PCJCXLCALL SJCS11LCALL PCJCXSJMP MAIN00通信子程SJCS:MOV A,R6MO
9、V SBUF,ALCALL BCDZHLCALL DISPLAYJNB TI,$CLR TILCALL BCDZHLCALL DISPLAYJNB RI,$CLR RIMOV A,SBUFXRL A,R6JZ SJCS0SJCS00: LCALL BCDZHLCALL DISPLAYSETB TB8SJMP SJCSSJCS0:CLR TB8MOV 30H,R6MOV A,#11HMOV SBUF,ALCALL BCDZHLCALL DISPLAYJNB TI,$CLR TIJNB RI,$CLR RIMOV A,SBUFMOV 44H,ALCALL SFJSJSETB TB8DJNZ 55H
10、,SJCSRETSJCS11: MOV 55H,#00HINC R6DJNZ R7,SJCSMOV R6,#10MOV R7,#3RETSFJSJ:CJNE R6,#11,SFJSJ3MOV 62H,44HMOV 58H,44HSJMP SFJSJ0SFJSJ3: JC SFJSJ1MOV 63H,44HMOV 58H,44HSJMP SFJSJ0SFJSJ1: MOV 61H,44HMOV 58H,44HSFJSJ0: RETPCJCX:MOV SCON,#50HJNB RI,HH1LJMP HH2HH1:LCALL BCDZHLCALL DISPLAYJNB RI,WW5HH2:CLR R
11、IMOV A,SBUFWW1:CJNE A,#49,WW2mov 44h,61hlcall bcdzhlcall displayMOV 58H,61Hlcall serial_sendLJMP WW5-PC机地址判别子程序WW2:WW3:WW4:WW5: CJNE A,#50,WW3 mov 44h,62h lcall bcdzh lcall display MOV58H,62Hlcall serial_send LJMPWW5CJNEA,#51,WW4mov44h,63hlcall bcdzh lcall display MOV58H,63Hlcall serial_send LJMPWW5
12、CJNEA,#52,WW5LJMPMAINMOV SCON,#98H RET八为十六转十进制子程序BCDZH:MOV A,44HMOV 31H,#15JNB ACC.7,BCD0MOV 31H,#14CPL AADD A,#1BCD0:MOV R1,#00HMOV R2,#00HCLR CBCD1:SUBB A,#64HJC BCD2INC R1SJMP BCD1BCD2:ADD A,#64HBCD3:SUBB A,#0AHJC BCD4INC R2SJMP BCD3BCD4:ADD A,#0AHMOV 32H,R1MOV 33H,R2MOV 34H,A RET六位数码子程序DISPLAY:D
13、ISP0:MOV R3,#6MOV 35H,#13MOV R0,#30HMOV 3AH,#0DFHMOV A,R0MOV DPTR,#TAB MOVC A,A+DPTR MOV DPTR,#0D00H MOVX DPTR,A MOV DPTR,#0E00HMOV A,3AHMOVX DPTR,A RR AMOV 3AH,AACALL DY1msINC R0DJNZ R3,DISP0 RET-0.2ms延时子程序DY1ms:LOOP:MOV R4,#50NOPNOPDJNZ R4,LOOPRET10ms延时子程序DY10ms:LOOP0:LOOP1:MOV R4,#10MOV R5,#250NOPNOPDJNZ R5,LOOPDJNZ R4,LOOP0RETPC机通信-子程序serial_send:NOPNOP NOP NOP DEC 58
