A = GetOEMled (1140) 
B = GetUserDRO (1140)

If A And (B = 0) Then
Code "M615"
SetUserDRO(1140,1)
End If

If Not A And (B > 0) Then
SetUserDRO(1140,0)
End If