jrdmdysjcl.asm
来自「用增强型单片机51RD2做的控制器」· 汇编 代码 · 共 917 行 · 第 1/3 页
ASM
917 行
INC R0
MOV R1,#CxBcCcL ; 本次车次低8位
MOVX A,@R1
MOV @R0,A
INC R0
MOV R1,#CxCzRyH ; 操作人员高8位
MOVX A,@R1
MOV @R0,A
INC R0
; MOV R1,#CxCzRyL ; 操作人员高8位
MOVX A,@R1
MOV @R0,A
INC R0
MOV BNUM,#32 ; 写32个字节
MOV BADR,#TempBuf ; 临时数据缓冲区(32Byte)
LCALL WR_BLK
RET
;
; ****** 发送到远程显示板数据 ******
;
FarShowData: MOV R0,#SendBuf
MOV R1,#CxKjNf ; 开机时间：年
MOVX A,@R1
MOVX @R0,A
INC R0
MOV R1,#CxKjYf ; 开机时间：月
MOVX A,@R1
MOVX @R0,A
INC R0
MOV R1,#CxKjRq ; 开机时间：日
MOVX A,@R1
MOVX @R0,A
INC R0
MOV R1,#CxKjXs ; 开机时间：时
MOVX A,@R1
MOVX @R0,A
INC R0
MOV R1,#CxKjFz ; 开机时间：分
MOVX A,@R1
MOVX @R0,A
INC R0
; MOV ScDyH,#0
; MOV ScDyL,#0
; MOV A,ScDyH ; 输出电压高8位
MOVX @R0,A
INC R0
MOV A,ScDyL ; 输出电压低8位
MOVX @R0,A
INC R0
MOV A,ScDlH ; 输出电流高8位
MOVX @R0,A
INC R0
MOV A,ScDlL ; 输出电流低8位
MOVX @R0,A
INC R0
MOV A,ScXlH ; 输出泄流高8位
MOVX @R0,A
INC R0
MOV A,ScXlL ; 输出泄流低8位
MOVX @R0,A
INC R0
MOV R1,#CxZdDzH ; 正地电阻高8位
MOVX A,@R1
MOV @R0,A
INC R0
MOV R1,#CxZdDzL ; 正地电阻低8位
MOVX A,@R1
MOV @R0,A
INC R0
MOV R1,#CxXjDzH ; 线间电阻高8位
MOVX A,@R1
MOV @R0,A
INC R0
MOV R1,#CxXjDzL ; 线间电阻低8位
MOVX A,@R1
MOV @R0,A
INC R0
MOV R1,#CxFdDzH ; 负地电阻高8位
MOVX A,@R1
MOV @R0,A
INC R0
MOV R1,#CxFdDzL ; 负地电阻低8位
MOVX A,@R1
MOV @R0,A
INC R0
MOV R1,#CxZgDyH ; 最高电压高8位
MOVX A,@R1
MOV @R0,A
INC R0
MOV R1,#CxZgDyL ; 最高电压低8位
MOVX A,@R1
MOV @R0,A
INC R0
MOV R1,#CxZgDlH ; 最高电流高8位
MOVX A,@R1
MOV @R0,A
INC R0
MOV R1,#CxZgDlL ; 最高电流低8位
MOVX A,@R1
MOV @R0,A
INC R0
MOV A,Year
MOVX @R0,A
INC R0
MOV A,Month
MOVX @R0,A
INC R0
MOV A,Day
MOVX @R0,A
INC R0
MOV A,Hour
MOVX @R0,A
INC R0
MOV A,Min
MOVX @R0,A
CLR PSW.3 ; RX : PAGE 2
SETB PSW.4
MOV CallAddr,#FarShowAdr ; 远程显示板地址
MOV FuncCode,#SendCpu1Func30; 写远程显示板数据
LCALL DataToFarCpu ; 发送一条记录到远程CPU
CLR PSW.3 ; RX : PAGE 0
CLR PSW.4
RET
;
; ****** 实时记录存储运行数据 ******
;
SsJlYxSj: MOV A,JcSjL ; 检测时间低8位
SUBB A,#120 ; 检测 120 秒
MOV A,JcSjH ; 检测时间高8位
SUBB A,#00H
JNC SsJlYxSj1
RET
SsJlYxSj1: MOV JcSjL,#0 ; 检测时间低8位
MOV JcSjH,#0 ; 检测时间高8位
SETB MinSaveF ; 若分存储标志为"1" , 则存原地址不变.
LCALL SaveRunData ; 运行参数存盘
RET
;
; ****** 发送到远程显示板试验数据 ******
;
FarShowTestDat: MOV R0,#SendBuf
MOV R1,#CxKjNf ; 开机时间：年
MOVX A,@R1
MOVX @R0,A
INC R0
MOV R1,#CxKjYf ; 开机时间：月
MOVX A,@R1
MOVX @R0,A
INC R0
MOV R1,#CxKjRq ; 开机时间：日
MOVX A,@R1
MOVX @R0,A
INC R0
MOV R1,#CxKjXs ; 开机时间：时
MOVX A,@R1
MOVX @R0,A
INC R0
MOV R1,#CxKjFz ; 开机时间：分
MOVX A,@R1
MOVX @R0,A
INC R0
MOV A,SjDyH ; 施加电压高8位
MOVX @R0,A
INC R0
MOV A,SjDyL ; 施加电压低8位
MOVX @R0,A
INC R0
MOV A,JyXlH ; 绝缘泄流高8位
MOVX @R0,A
INC R0
MOV A,JyXlL ; 绝缘泄流低8位
MOVX @R0,A
INC R0
MOV A,ScXlH ; 输出泄流高8位
MOVX @R0,A
INC R0
MOV A,ScXlL ; 输出泄流低8位
MOVX @R0,A
INC R0
MOV R1,#CxZdDzH ; 正地电阻高8位
MOVX A,@R1
MOV @R0,A
INC R0
MOV R1,#CxZdDzL ; 正地电阻低8位
MOVX A,@R1
MOV @R0,A
INC R0
MOV R1,#CxXjDzH ; 线间电阻高8位
MOVX A,@R1
MOV @R0,A
INC R0
MOV R1,#CxXjDzL ; 线间电阻低8位
MOVX A,@R1
MOV @R0,A
INC R0
MOV R1,#CxFdDzH ; 负地电阻高8位
MOVX A,@R1
MOV @R0,A
INC R0
MOV R1,#CxFdDzL ; 负地电阻低8位
MOVX A,@R1
MOV @R0,A
INC R0
MOV R1,#CxZgDyH ; 最高电压高8位
MOVX A,@R1
MOV @R0,A
INC R0
MOV R1,#CxZgDyL ; 最高电压低8位
MOVX A,@R1
MOV @R0,A
INC R0
MOV R1,#CxZgDlH ; 最高电流高8位
MOVX A,@R1
MOV @R0,A
INC R0
MOV R1,#CxZgDlL ; 最高电流低8位
MOVX A,@R1
MOV @R0,A
INC R0
MOV A,Year
MOVX @R0,A
INC R0
MOV A,Month
MOVX @R0,A
INC R0
MOV A,Day
MOVX @R0,A
INC R0
MOV A,Hour
MOVX @R0,A
INC R0
MOV A,Min
MOVX @R0,A
CLR PSW.3 ; RX : PAGE 2
SETB PSW.4
MOV CallAddr,#FarShowAdr ; 远程显示板地址
MOV FuncCode,#SendCpu1Func30; 写远程显示板数据
LCALL DataToFarCpu ; 发送一条记录到远程CPU
CLR PSW.3 ; RX : PAGE 0
CLR PSW.4
RET
;
; ****** Program end flag ******
;
END
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?