jrdmdyhx.asm

用增强型单片机51RD2做的控制器

;===自动转换程序产生的汇编字符串代码 Author Wuzhihui 2003===
;
;
;       ******  显示"ＪＲ－２０００型智能控制器"  ******
;
ShowType:       MOV     DPTR,#TypeTab
                MOV     LcdShowC,#13
                MOV     LcdShowX,#07
                MOV     LcdShowY,#16
                LCALL   DdShowString
                RET
TypeTab:        DB ZW1,089,ZW1,090,ZW1,091,ZW1,092 ;ＪＲ－２０００型智能控制器
                DB ZW1,093,ZW1,093,ZW1,093,ZW1,094
                DB ZW1,095,ZW1,096,ZW1,097,ZW1,098
                DB ZW1,099

;
;       ******  显示"TPB9智能无源接地检测装置测试选择"  ******
;
ShowType2:      MOV     DPTR,#TypeTab2
                MOV     LcdShowC,#17
                MOV     LcdShowX,#03
                MOV     LcdShowY,#16
                LCALL   DdShowString
                RET
TypeTab2:       DB ZW1,233,ZW1,234,ZW1,235,ZW1,236     ;TPB9智能无源接地检测装置测试选择
                DB ZW1,041,ZW1,042,ZW1,237,ZW1,238
                DB ZW1,239,ZW1,240,ZW1,241,ZW1,242
                DB ZW1,243 ZW1,244,ZW1,245,ZW1,246
                DB ZW1,247

;
;       ******  显示"时代徽标"  ******
;
ShowSDHB:       MOV     DPTR,#DNHB1Tab
                MOV     LcdShowC,#6
                MOV     LcdShowX,#14
                MOV     LcdShowY,#64
                LCALL   DdShowString
                NOP
                MOV     DPTR,#DNHB2Tab
                MOV     LcdShowC,#6
                MOV     LcdShowX,#14
                MOV     LcdShowY,#80
                LCALL   DdShowString
                NOP
                MOV     DPTR,#DNHB3Tab
                MOV     LcdShowC,#6
                MOV     LcdShowX,#14
                MOV     LcdShowY,#96
                LCALL   DdShowString

                NOP
                MOV     DPTR,#DNHB4Tab
                MOV     LcdShowC,#6
                MOV     LcdShowX,#14
                MOV     LcdShowY,#112
                LCALL   DdShowString
                NOP
                MOV     DPTR,#DNHB5Tab
                MOV     LcdShowC,#6
                MOV     LcdShowX,#14
                MOV     LcdShowY,#128
                LCALL   DdShowString

                RET
DNHB1TAB:       DB      TSK,012,TSK,013,TSK,014,TSK,015,TSK,016,TSK,017
DNHB2TAB:       DB      TSK,018,TSK,019,TSK,020,TSK,021,TSK,022,TSK,023
DNHB3TAB:       DB      TSK,024,TSK,025,TSK,026,TSK,027,TSK,028,TSK,029
DNHB4TAB:       DB      TSK,030,TSK,031,TSK,032,TSK,033,TSK,034,TSK,035
DNHB5TAB:       DB      TSK,036,TSK,037,TSK,038,TSK,039,TSK,040,TSK,041


;
;       ******  显示"时代集团株洲杰瑞"  ******
;
ShowDnkj:       MOV     DPTR,#DnkjTab
                MOV     LcdShowC,#8
                MOV     LcdShowX,#12
                MOV     LcdShowY,#154
                LCALL   DdShowString
                RET
DnkjTab:        DB ZW1,033,ZW1,034,ZW1,035,ZW1,036 ;时代集团株洲杰瑞
                DB ZW1,037,ZW1,038,ZW1,039,ZW1,040


;
;  ******  显示"直流６００Ｖ地面电源工作状态选择"  ******
;
ShowGzZtXz:     MOV     DPTR,#GzZtXzTab
                MOV     LcdShowC,#5
                MOV     LcdShowX,#14
                MOV     LcdShowY,#16
                LCALL   DdShowString
                RET
GzZtXzTab:      DB ZW1,004,ZW1,005,ZW1,006,ZW1,007      ;选择接地测试类型：
                DB ZW1,008



;
;  ******  显示"直流６００Ｖ地面电源监控状态"  ******
;
ShowDmDyJkZt:   MOV     DPTR,#DmDyJkZtTab
                MOV     LcdShowC,#14
                MOV     LcdShowX,#6
                MOV     LcdShowY,#0
                LCALL   DdShowString
                RET
DmDyJkZtTab:    DB ZW1,019,ZW1,020,ZW1,021,ZW1,004 ;直流６００Ｖ地面电源监控状态
                DB ZW1,004,ZW1,022,ZW1,023,ZW1,024
                DB ZW1,025,ZW1,026,ZW1,033,ZW1,008
                DB ZW1,029,ZW1,030


;
;       ******  显示"１、绝缘电阻检测"  ******
;
ShowJyDzJc:     MOV     DPTR,#JyDzJcTab
                MOV     LcdShowC,#6
                MOV     LcdShowX,#12
                MOV     LcdShowY,#80;64
                LCALL   DdShowString
                RET
JyDzJcTab:       DB ZW1,009,ZW1,010,ZW1,011,ZW1,012 ;１、手动测试
                 DB ZW1,013,ZW1,014

;
;       ******  显示"２、系统实时监控"  ******
;
ShowXtSsJk:     MOV     DPTR,#XtSsJkTab
                MOV     LcdShowC,#6
                MOV     LcdShowX,#12
                MOV     LcdShowY,#112;96
                LCALL   DdShowString
                RET
XtSsJkTab:      DB ZW1,015,ZW1,016,ZW1,017,ZW1,018 ;２、自动测试
                DB ZW1,019,ZW1,020

;
;       ******  显示"３、运行参数存盘"  ******
;
ShowYxCsCp:     MOV     DPTR,#YxCsCpTab
                MOV     LcdShowC,#6
                MOV     LcdShowX,#12
                MOV     LcdShowY,#144;128
                LCALL   DdShowString
                RET
YxCsCpTab:      DB ZW1,021,ZW1,022,ZW1,023,ZW1,024 ;３、接地电阻选择
                DB ZW1,137,ZW1,138;,ZW1,027,ZW1,028

;
;       ******  显示"5、退出工作状态"  ******
;
ShowTcGzZt:     MOV     DPTR,#TcGzZtTab
                MOV     LcdShowC,#6
                MOV     LcdShowX,#12
                MOV     LcdShowY,#190;160
                LCALL   DdShowString
                RET
TcGzZtTab:      DB ZW1,056,ZW1,030,ZW1,031,ZW1,032
                DB ZW1,019,ZW1,020                 ;5、退出测试
;
;       ******  显示"３、运行参数存盘"  ******
;
ShowSrCs:       MOV     DPTR,#SrCsTab
                MOV     LcdShowC,#6
                MOV     LcdShowX,#12
                MOV     LcdShowY,#176;128
                LCALL   DdShowString
                RET
SrCsTab:        DB ZW1,029,ZW1,022,ZW1,108,ZW1,125 ;4、输入参数
                DB ZW1,143,ZW1,144
;
;       ******  显示"４、退出工作状态"  ******
;
ShowExit:     MOV     DPTR,#TcGzZtTab1
                MOV     LcdShowC,#6
                MOV     LcdShowX,#11
                MOV     LcdShowY,#176;160
                LCALL   DdShowString
                RET
TcGzZtTab1:     DB ZW1,195,ZW1,030,ZW1,031,ZW1,032
                DB ZW1,019,ZW1,020                 ;４、退出测试


;
;       ******  显示"绝缘电阻检测工作状态"  ******
;
ShowJyDzJcGzZt: MOV     DPTR,#JyDzJcGzZtTab
                MOV     LcdShowC,#6
                MOV     LcdShowX,#13
                MOV     LcdShowY,#10
                LCALL   DdShowString
                RET
JyDzJcGzZtTab:  DB ZW1,011,ZW1,012,ZW1,013,ZW1,014 ;手动测试步骤
                DB ZW1,043,ZW1,044


;
;  ******  显示"接地电阻选择”