LD SM0.0
-R #Osl:LD10, #Osh:LD6
-I #Isl:LW4, #Input:LW0
ITD #Input:LW0, #Temp_D:LD18
DTR #Temp_D:LD18, #Temp_R:LD22
*R #Temp_R:LD22, #Osh:LD6
-I #Isl:LW4, #Ish:LW2
ITD #Ish:LW2, #Temp_D:LD18
DTR #Temp_D:LD18, #Temp_R:LD22
/R #Temp_R:LD22, #Osh:LD6
+R #Osl:LD10, #Osh:LD6
MOVR #Osh:LD6, #Output:LD14