📄 currenttestreslt.asm
字号:
;*************************************************
; 测试结果：
;
;
;**************************************************
CurrTestResult: LCALL RelayClear ;将继电器清零
LCALL LcdInit;LcdClear
MOV R3,#000 ; 设置 X 坐标低 8 位初值
MOV R4,#80H ; 设置 X 坐标高 8 位初值
MOV R5,#40H ; 设置 X 坐标低 8 位末值
MOV R6,#81H ; 设置 X 坐标高 8 位末值
MOV R7,#020 ; 设置 Y 坐标初值
LCALL DrawThwartwise
MOV R3,#000 ; 设置 X 坐标低 8 位初值
MOV R4,#80H ; 设置 X 坐标高 8 位初值
MOV R5,#40H ; 设置 X 坐标低 8 位末值
MOV R6,#81H ; 设置 X 坐标高 8 位末值
MOV R7,#150 ; 设置 Y 坐标初值
LCALL DrawThwartwise
lcall ShowTestResult
LCALL ShowZD1 ; 显示"端 动作 正地电压 负地电压 接地电阻"
LCALL ShowPostive
LCALL ShowNegtive
LCALL ShowCurrent1
LCALL ShowLinkGndRko
LCALL ShowLinkGndRko1
LCALL ShowLinkGndRko2 ;显示“KO”
LCALL ShowPrint
LCALL BzDataLoadBuf ;此条调用不用的话，电阻值第二位是乱码
MOV DataH,#01H;Variable1
MOV DataL,#2ch;Variable2
LCALL TestShowVolt ;显示300V
MOV LcdShowX,#12
MOV LcdShowY,#113
MOV LcdShowC,#4
LCALL DdShowString2 ;接地电阻动态在屏幕上显示出来
MOV DataH,#01H;Variable1
MOV DataL,#02ch;Variable2
LCALL TestShowVolt ;显示300V
MOV LcdShowX,#21
MOV LcdShowY,#113
MOV LcdShowC,#4
LCALL DdShowString2 ;接地电阻动态在屏幕上显示出来
LCALL ShowCxKjRq ;显示“检测日期”
LCALL ShowCxKjSj ;显示“检测时间”
LCALL ShowBcJj ;显示“被测装置”
LCALL ShowCxJch ;显示“拆下机号：SS9”
LCALL ShowZxJch ;显示"装上机号：SS9"
LCALL ShowZzCxRq ;显示"拆下日期:"
LCALL ShowZzZsRq ;显示"装上日期"
;--------------------------------------------------
LCALL DisplayCurrTest ;显示当前"查询测试记录"
CurrTestResult2:LCALL ScanKey
JNB KeyF,CurrTestResult2 ; scan key
CLR KeyF
MOV A,KeyNumber
CJNE A,#0AH,CurrTestResult3
LCALL MainInterFace1
RET
CurrTestResult3:CJNE A,#10H,CurrTestResult4
LCALL PrintReport ; 打印试验报告
CurrTestResult4:SJMP CurrTestResult2
;
; ****** 显示查询测试记录数据 ******
;
DisplayCurrTest:
MOV R0,#TempBuf ; 临时数据缓冲区(32Byte)
MOV A,DataH
MOV @R0,A
INC R0
MOV A,DataL
MOV @R0,A
INC R0
MOV R1,#ActiveFlagBuf+0 ; 正端:动作标志 (TempBuf+2)
MOVX A,@R1
MOV @R0,A
INC R0
MOV R1,#ActiveFlagBuf+1 ; 负端:动作标志
MOVX A,@R1
MOV @R0,A
INC R0
MOV R1,#ActiveFlagBuf+3 ; 交流端:动作标志
MOVX A,@R1
MOV @R0,A
INC R0
MOV R1,#VoltBuf+0 ; 正端：正地电压 (TempBuf+5)
MOVX A,@R1
MOV @R0,A
INC R0
INC R1
MOVX A,@R1
MOV @R0,A
INC R0
MOV R1,#VoltBuf+2 ; 正端：负地电压 (TempBuf+7)
MOVX A,@R1
MOV @R0,A
INC R0
INC R1
MOVX A,@R1
MOV @R0,A
INC R0
MOV R1,#VoltBuf+4 ; 负端：负地电压 (TempBuf+9)
MOVX A,@R1
MOV @R0,A
INC R0
INC R1
MOVX A,@R1
MOV @R0,A
INC R0
MOV R1,#VoltBuf+6 ; 负端：正地电压 (TempBuf+11)
MOVX A,@R1
MOV @R0,A
INC R0
INC R1
MOVX A,@R1
MOV @R0,A
INC R0
MOV R1,#LinkG_R_buf+0 ; 正端：接地电阻 (TempBuf+13)
MOVX A,@R1
MOV @R0,A
INC R0
INC R1
MOVX A,@R1
MOV @R0,A
INC R0
MOV R1,#LinkG_R_buf+2 ; 负端：接地电阻 (TempBuf+15)
MOVX A,@R1
MOV @R0,A
INC R0
INC R1
MOVX A,@R1
MOV @R0,A
INC R0
MOV R1,#LinkG_R_buf+6 ; 交流端：接地电阻(TempBuf+17)
MOVX A,@R1
MOV @R0,A
INC R0
INC R1
MOVX A,@R1
MOV @R0,A
INC R0
MOV DPTR,#ExtTempBuf+10 ; 拆下机车号：XXXX (TempBuf+19)
MOVX A,@DPTR
MOV @R0,A
INC R0
INC DPTR
MOVX A,@DPTR
MOV @R0,A
INC R0
INC DPTR
MOVX A,@DPTR
MOV @R0,A
INC R0
INC DPTR
MOVX A,@DPTR
MOV @R0,A
INC R0
INC DPTR
MOV DPTR,#ExtTempBuf+14 ; 装上机车号：XXXX (TempBuf+23)
MOVX A,@DPTR
MOV @R0,A
INC R0
INC DPTR
MOVX A,@DPTR
MOV @R0,A
INC R0
INC DPTR
MOVX A,@DPTR
MOV @R0,A
INC R0
INC DPTR
MOVX A,@DPTR
MOV @R0,A
INC R0
INC DPTR
MOV DPTR,#ExtTempBuf+18 ; 拆下日期：XXXXXX (TempBuf+27)
MOVX A,@DPTR
MOV @R0,A
INC R0
INC DPTR
MOVX A,@DPTR
MOV @R0,A
INC R0
INC DPTR
MOVX A,@DPTR
MOV @R0,A
INC R0
INC DPTR
MOVX A,@DPTR
MOV @R0,A
INC R0
INC DPTR
MOVX A,@DPTR
MOV @R0,A
INC R0
INC DPTR
MOVX A,@DPTR
MOV @R0,A
INC R0
INC DPTR
MOV DPTR,#ExtTempBuf+24 ; 装上日期：XXXXXX (TempBuf+33)
MOVX A,@DPTR
MOV @R0,A
INC R0
INC DPTR
MOVX A,@DPTR
MOV @R0,A
INC R0
INC DPTR
MOVX A,@DPTR
MOV @R0,A
INC R0
INC DPTR
MOVX A,@DPTR
MOV @R0,A
INC R0
INC DPTR
MOVX A,@DPTR
MOV @R0,A
INC R0
INC DPTR
MOVX A,@DPTR
MOV @R0,A
INC R0
INC DPTR
MOV DPTR,#ExtTempBuf+4 ; 检测日期：XXX (TempBuf+39)
MOVX A,@DPTR
MOV @R0,A
INC R0
INC DPTR
MOVX A,@DPTR
MOV @R0,A
INC R0
INC DPTR
MOVX A,@DPTR
MOV @R0,A
INC R0
INC DPTR
MOV DPTR,#ExtTempBuf+7 ; 检测时间：XXX (TempBuf+42)
MOVX A,@DPTR
MOV @R0,A
INC R0
INC DPTR
MOVX A,@DPTR
MOV @R0,A
INC R0
INC DPTR
MOVX A,@DPTR
MOV @R0,A
INC R0
INC DPTR
MOV DPTR,#ExtTempBuf+0 ; 被测装置号：XXXX (TempBuf+45)
MOVX A,@DPTR
MOV @R0,A
INC R0
INC DPTR
MOVX A,@DPTR
MOV @R0,A
INC R0
INC DPTR
MOVX A,@DPTR
MOV @R0,A
INC R0
INC DPTR
MOVX A,@DPTR
MOV @R0,A
INC R0
INC DPTR ;(end 48 ,total 2+47 byte)
LCALL ShowDq ; 显示"当前"
LCALL ShowKjRqSj ;显示“检测日期数据”
LCALL ShowKjSjSj ;显示“检测时间数据”
LCALL ShowBcJjSj ;显示“被测装置数据”
LCALL ShowCsJchSj ;显示“拆下机号数据“
LCALL ShowZsJchSj ;显示"装上机号：数据“
LCALL ShowCsRqSj ;显示"拆下日期:数据"
LCALL ShowZsRqSj ;显示"装上日期数据"
LCALL ShowActiveSj ;显示"是否动作数据"
LCALL ShowZdZdySj ;显示"正端正电压数据"
LCALL ShowZdFdySj ;显示"正端负电压数据"
LCALL ShowFdZdySj ;显示"负端正电压数据"
LCALL ShowFdFdySj ;显示"负端负电压数据"
LCALL ShowZdJddzSj ;显示"正端接地电阻数据"
LCALL ShowFdJddzSj ;显示"负端接地电阻数据"
LCALL ShowJldJddzSj ;显示"交流端接地电阻数据"
RET
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -