L L#0
T #IO2
L L#0
L 380
M001: T #TEMP2
L #TEMP2
ITD
T #TEMP5
L #TEMP5
TAK
L #TEMP5
+D
T #TEMP4
L #TEMP4
+ L#4
T #TEMP3
L #TEMP3
SLD 3
T #TEMP3
L #TEMP4
SLD 3
T #TEMP4
OPN DB 30
L DBW [#TEMP4]
T DBW [#TEMP3]
L DBW [#TEMP3]
ITD
T #TEMP5
L #TEMP5
TAK
L #IO2
-D
T #IO2
L L#0
L #TEMP2
LOOP M001
L L#4
T #TEMP3
L #TEMP3
SLD 3
T #TEMP3
L #IN0
T DBW [#TEMP3]
L #IN0
ITD
T #TEMP5
L #TEMP5
TAK
L #IO2
-D
T #IO1