发布于 2007-05-28 17:09:22
0楼
这是我以前做的一个项目的一个子程序,时间长了都忘记了。希望能给你带来帮助。
网络1
LD SM0.0
LPS
BTI 系统时钟:VB400, 年:VW410
AENO
BTI VB401, 月:VW412
AENO
BTI VB402, 日:VW414
AENO
BTI VB403, 时:VW416
AENO
BTI VB404, 分:VW418
AENO
BTI VB405, 秒:VW420
LPP
MOVB 8, 新年月日:VB570
AENO
MOVB 8, 新时分秒:VB580
网络2
LD SM0.0
LPS
ITA 年:VW410, 年A:VB430, 16#0
AENO
BMB VB436, 新年:VB571, 2
AENO
SCPY "-", 横杠字符串:VB590
AENO
MOVB 横杠:VB591, 横杠1:VB573
LRD
ITA 月:VW412, 月A:VB440, 16#0
AENO
BMB VB446, 新月:VB574, 2
AENO
MOVB 横杠:VB591, 横杠2:VB576
LPP
ITA 日:VW414, 日A:VB450, 16#0
AENO
BMB VB456, 新日:VB577, 2
网络3
LD SM0.0
LPS
SCPY ":", 冒号字符串:VB594
AENO
MOVB 冒号:VB595, 冒号1:VB583
AENO
MOVB 冒号:VB595, 冒号2:VB586
LRD
ITA 时:VW416, 时A:VB460, 16#0
AENO
BMB VB466, 新时:VB581, 2
LRD
ITA 分:VW418, 分A:VB470, 16#0
AENO
BMB VB476, 新分:VB584, 2
LPP
ITA 秒:VW420, 秒A:VB480, 16#0
AENO
BMB VB486, 新秒:VB587, 2
上面是一个子程序SBR5,在主程序中有这么一句
LD SM0.0
CALL READ_RTC_I:SBR5, &系统时钟:&VB400
在TD400C上显示结果例如7- 5-28, 8: 6:35,前面的0不会显示,只显示空格。
您的无私多一点,我的无知就会少一点,新手上路,请多关照!!!