SET
SAVE
= L 12.1
L #IN0
L #IN2
-R
L #IN1
ITD
DTR
*R
L #IN3
TAK
T LD 14
TAK
L #IN2
-R
L LD 14
TAK
/R
T #TEMP7
L #IN1
NEGI
ITD
DTR
L 1.100000e+000
*R
T #TEMP5
L #IN1
ITD
DTR
L 1.100000e+000
*R
T #TEMP6
L #TEMP7
TAK
>R
JCN M001
L #TEMP6
T #TEMP7
JU M002
M001: L #TEMP7
L #TEMP5
JCN M002
L #TEMP5
T #TEMP7
M002: L #TEMP7
RND
T #OUT4
CLR
A L 12.1
SAVE
BE