bluebloodman 

 
ORG 0000H
 AJMP MAIN
ORG 0023H
 LJMP TRANSMIT
ORG 0100H
MAIN:
 LCALL REIINIT     ; 发送接收寄存器初始化
 LCALL TXINIT      ;通信初始化
 NOP
 SJMP  $             ;其他主程序

REIINIT:
 MOV  R2,#3EH
 MOV  R0,#23H 
 MOV  A,#3
REIINIT1:
 MOV  @R0,A
 INC  R0
 DJNZ R2,REIINIT1
 MOV  5AH,#0
 MOV  5BH,#0
 MOV  5CH,#0
 MOV  P2,#0
 RET

SENDEXIT:
 POP ACC
 POP PSW 
 RETI

TRANSMIT:
 PUSH PSW
 PUSH ACC
 CLR  PSW.3
 JBC  TI,SENDEXIT
 CLR  RI
 MOV  A,SBUF
 CJNE A,#43H,NOCAN
 MOV  R0,#0D0H
 MOV  R5,#27
RECDATA:                           ;收到参数标志C
 JNB   RI,$
 CLR   RI
 MOV   A,SBUF
 SUBB  A,#30H
 MOV   @R0,A
 INC   R0
 DJNZ  R5,RECDATA
 SETB  P3.2
 NOP
 NOP
 MOV  A,#43H
 MOV  SBUF,A
 JNB  TI,$
 CLR  TI
 MOV  A,5AH
 ADD  A,#30H
 MOV  SBUF,A
 JNB  TI,$
 CLR  TI
 MOV  A,5BH
 ADD  A,#30H
 MOV  SBUF,A
 JNB  TI,$
 CLR  TI
 MOV  A,5CH
 ADD  A,#30H
 MOV  SBUF,A
 JNB  TI,$
 CLR  TI
 CLR  P3.2
 NOP
 NOP
 POP ACC
 POP PSW
 RETI 
 
NOCAN: 
 CJNE A,#5AH,SENDEXIT   
 SETB  P3.2            ;收到状态标志Z，MAX485转为发状态
 NOP
 NOP
 MOV  R0,#23H          ;发实际开度和开度预置
 MOV  R6,#10
ZHUANG1:                
 MOV  A,@R0
 ADD  A,#30H
 MOV  SBUF,A
 JNB  TI,$
 CLR  TI
 INC  R0
 DJNZ R6,ZHUANG1
 
 MOV  R0,#37H          ;发载荷1和载荷2
 MOV  R7,#8
ZHUANG2:                   
 MOV  A,@R0
 ADD  A,#30H
 MOV  SBUF,A
 JNB  TI,$
 CLR  TI 
 INC  R0
 DJNZ R7,ZHUANG2

WARN:
 CLR   A
 JNB   P2.0,WARN1
 SETB  ACC.0
WARN1:
 JNB   P2.1,WARN2
 SETB  ACC.1
WARN2:
 JNB   P2.2,WARN3
 SETB  ACC.2
WARN3:
 JNB   P2.3,WARN4
 SETB  ACC.3
WARN4:
 JNB   P2.4,WARN5
 SETB  ACC.4
WARN5:
 JNB   P2.5,WARN6
 SETB  ACC.5
WARN6:
 ADD   A,#30H
 MOV   SBUF,A
 JNB   TI,$
 CLR   TI
 MOV   A,#45H             ;$
 MOV   SBUF,A
 JNB   TI,$
 CLR   TI
 CLR   P3.2
 NOP
 NOP
 POP  ACC
 POP  PSW
 RETI

TXINIT:
 MOV PCON,#00
 MOV SCON,#50H
 MOV TMOD,#20H
 MOV TL1,#0FDH
 MOV TH1,#0FDH
 SETB TR1
 SETB EA
 SETB ES
 SETB REN
 CLR  P3.2
 RET

END 

发表时间:2004年4月20日10:35:02