网络1
LD SM0.0
MOVD &VB101, VD131
MOVW 0, VW129
MOVB VB100, AC1
MOVW AC1, VW127
-I 2, VW127
网络2
LD SM0.0
FOR VW125, 1, VW127
网络3
LD SM0.0
MOVB *VD131, AC0
+I AC0, VW129
+D 1, VD131
网络4
NEXT
网络5
LD SM0.0
MOVW 16#FF, AC0
ANDW VW129, AC0
INVW AC0
+I 1, AC0
ANDW 16#7F, AC0
ORW 16#40, AC0
MOVB AC0, *VD131
+D 1, VD131
MOVB 16#0D, *VD131
网络六
LDB<> SMB86, 0
XMT VB100, 0
网络7
LD SM0.0
CRET