LJMP MAIN1
組織003H
LJMP INT0
ORG 030H
面1:MOV P1，#0FFH
nototherwiseprovided（for）除非另有規定
nototherwiseprovided（for）除非另有規定
MOV P1，#00H
MOV P0，#0FFH
nototherwiseprovided（for）除非另有規定
nototherwiseprovided（for）除非另有規定
MOV P0，#00H
CLR 00H
CLR P1.0
CLR P2.1
CLR P2.3
CLR P2.2
SETB電子藝界
SETB EX0
SETB EX1
SETB PX0
SJMP元
進:CPL OOH
KK JNB 00H
姚
KK:LJMP荀集
雷蒂
姚:A，p 1；遙控判斷
ANL A，#0FH
MOV P1，A
CJNE A，#01H，NC1
LCALL ST
NC1:CJNE A，#02H，NC2
LCALL LEF2
NC2:CJNE A，#04H，NC3
l呼叫權限2
NC3:姚
荀記:JNB P1.3，N1
LCALL ST
n 1:N2 JNB p 1.2
LCALL LEF1
N2:JNB 1.4，N3
LCALL RIG1
N3:JNB P1.0，N4
LCALL LEF2
N4:JNB P1.5，N5
l呼叫權限2
N5:LJMP迅疾
聖SETB P2.1
SETB P2.3
MOV R2，#；可變驅動時間
LCALL DEL1
CLR P2.1
CLR P2.3
浸水使柔軟
SETB P2.3
MOV·R2 #
LCALL DEL1
CLR P2.3
浸水使柔軟
裏格1:SETB 2.1
MOV·R2 #
LCALL DEL1
CLR P2.1
浸水使柔軟
LEF2:SETB P2.3
MOV R2，#；次要判斷
LCALL DEL1
CLR P2.3
浸水使柔軟
RIG2:SETB P2.1
MOV·R2 #
LCALL DEL1
CLR P2.1
浸水使柔軟
DEL1:MOV R3，# 90；計時大概是100ms，可以微調。
DD2:MOV·R4，第50位
DD3，MOV R5，#10
DJNZ R5，美元
DJNZ R4，DD3
DJNZ R3
DJNZ R2，DEL1
浸水使柔軟