51单片机MODBUS协议汇编-蚂蚁叼骨头1.docVIP

51单片机汇编—MODBUS协议 （带写入功能） //读数据帧：01设备地址 03功能码 0000起始地址 0001数据长度 840A校验码 //读返回帧：01设备地址 03功能码 02数据个数 12 数据 34数据 B533校验码 //写数据帧：01设备地址 10功能码 0001起始地址 0001数据长度 02数据字节数 12数据 34数据 AAF6校验码 //写返回帧：以写帧相同。 //带此‘-----’标志，且后无任何备注的可以去除或用空指令代替，此些地方时是为了测试时使用的状态显示位。 ORG 0000H LJMP MAIN; ORG 0023H LJMP PCTX; ORG 0100H MAIN: MOV SP,#30H; MOV P0,#00H; MOV 60H,#12H;--------------- MOV 61H,#34H;---------------------- MOV 62H,#56H; -------- MOV 63H,#78H;--- MOV TMOD,#20H; MOV TL1,#0FDH; MOV TH1,#0FDH; MOV SCON,#50H; MOV PCON,#00H; ;/MOV R3,#00H;存入数据个数（未用） MOV P1,#00H; MOV R3,#00H; MOV R2,#08H; MOV R1,#40H;数据首地址（未用） //MOV 0B8H,#10H; 串口优先级 SETB TR1; SETB ES; //MOV DPTR,#0100H; SETB EA; MOV P0,#00H; MOV R4,#00H; LOON:MOV R5,#0FH; LOO:MOV A,R3; JNZ LOP; MOV A,R4; MOV P1,A; INC R4; LCALL DELAY1S; DJNZ R5,LOO; JMP LOON; PCTX: SETB P0.0;------------------ TX: JB RI,LOOP; LCALL DELAY10;延时10ms等待； JNB RI,LOP; SETB P0.1;----------------- LJMP OUT; LOOP: MOV A,SBUF; MOV 3EH,A; CLR RI; MOV A,R1; ADD A,R3; MOV R0,A; MOV @R0,3EH; INC R3;存入数据个数（未用） MOV A,R3;------------- MOV P2,A;------------- LCALL DELAY10; LJMP OUT; //DJNZ R2,OUT; LOP:CLR ES; //LCALL DELAY1S;延时10ms MOV R1,#40H; MOV A,@R1;(数据地址送A比较器) SUBB A,#01H;(地址为01响应) JNZ RESET; SETB P0.2;---------- MOV A,41H; SUBB A,#03;功能码为03，对数据读操作。 JNZ LOOP1;----------------------- 数据写操作入口 LCALL CRC16; MOV R1,#46H; MOV A,@R1; SUBB A,3CH; JNZ RESET; SETB P0.0;---------- INC R1; MOV A,@R1; SUBB A,3BH; JNZ RESET; MOV A,42H; JNZ RESET; MOV A,43H;数据首地址R4 RL A; 字节成以2，以字为单位； CLR C; MOV R4,A; MOV A,44H; JNZ RESET; MOV A,45H;读数据长度R5 SUBB A,#09H;----限制读8个字，缓冲数据存放40-5FH；数据存储在60H-7FH； JNC RESET; MOV A,45H;--------频定义的数据长度。 RL A; CLR C; MOV R5,A; MOV R7,A; 读数据长度R7 MOV A,#60H;数据区转移到发送缓冲区 ADD A,R4; MOV R4,A; MOV R6,#43H; LOOP3: MOV A,R4;数据区转移到发送缓冲区 MOV R0,A; MOV A,@R0; MOV 3EH,A; MOV A,R6; MOV R0,A; MOV @R0,3EH; INC R4; INC R6; DJNZ R5,LOOP3; MOV A,R7;数据校验准备，原数据长度 MO