Network 3 LD I0.1
TODR LB0 //起动/停止开关SB1闭合,则起动程序,读取时
Network 4 LD I0.1 INCB LB0 Network 5 LD I0.1 INCB LB0 Network6 LDI0.1
INCBLB0//T加3指向小时存储单元； Network7
LDI0.1；BTILB0,LW1//将小时由字节型转换为整型； Network8 LDI0.1 MOVWLW1,VW16
*I+100,VW16//将小时的数值乘以100； Network9
LDI0.1；INCBLB0//将T指向分钟存储单元； Network10
16
钟
LD I0.1
BTI LB0,LW3 //将分钟由字节型转换为整型 Network 11 LD I0.1 MOVW LW3, VW18
*I +10, VW18 //将分钟的数值乘以10 Network 12 LD I0.1
MOVW VW16, VW20
+I VW18, VW20 //将小时数乘100与分钟数乘10相加 Network 13 LD I0.1
INCB LB0 //将T指向秒钟存储单元 Network 14 LD I0.1
BTI LB0, LW5 //将秒钟由字节型转换为整型 Network 15 LD I0.1 MOVW VW14, LW7
+I LW5, LW7 //将小时数乘100与分钟数乘10相加所得的结果与秒钟数相//加得Tim
Network 16
17
LDW<= LW7, 630序
CALL SBR1 //Tim小于630时,则调用SBR1(SUBE)子程 Network 17 LDW< LW7, 700
CALL SBR2 //Tim大于630小于700时,则调用SBR2(SUBN)子程序 Network 18
LDW<= LW7, 830
CALL SBR3 //Tim大于700小于830时,则调用SBR3(SUBF)子程序 Network 19
LDW< LW7, 1630
CALL SBR2 //Tim大于830小于1630时,则调用SBR2(SUBN)子程序
Network 20 LDW<= LW7, 1900
CALL SBR3 //Tim大于1630小于1900时,则调用SBR3(SUBF)子程序 Network 21
LDW< LW7, 2100
CALL SBR2 //Tim大于1900小于2100时,则调用SBR2(SUBN)子程序
Network 22 LDW<= LW7, 2359
18
CALL SBR1 //Tim大于2100小于2100时,则调用SBR1(SUBE)子程序END_ORGANIZATION_BLOCK
SUBROUTINE_BLOCK INIT:SBR0 TITLE=子例行程序注解 BEGIN
Network 1 //时钟初始化子程序 LD I0.1 INCB VB0 Network 2 LD I0.1 INCB VB0 Network 3 LD I0.1 INCB VB0 Network 4 LD I0.1
MOVB 0, VB0 //设定时钟小时数 Network 5 LD I0.1 INCB VB0 Network 6 LD I0.1
19
MOVB 0, VB0 //设定时钟分钟数 Network 7 LD I0.1 INCB VB0 Network 8 LD I0.1
MOVB 0, VB0 //设定时钟秒钟数 Network 9 // 网络标题 // 网络注解 LD I0.1 TODW VB0
END_SUBROUTINE_BLOCK
SUBROUTINE_BLOCK SUBE:SBR1 //晚间时段交通灯控制子程序 TITLE=子例行程序注解
BEGIN
Network 1 // 网络标题 // 网络注解 LD I0.1 S S0.1, 1 Network 2
LSCR S0.1 //顺序控制 Network 3
20