Sub ButtonOrientation_Click
If RadioButtonPortrait.Checked = True Then
OriMode = 1
'Log("ChkBoxPortraitRotButt: " & OriMode)
Else If RadioButtonLandscape.Checked = True Then
OriMode = 0
'Log("ChkBoxLandscapeOriButt: " & OriMode)
End If
kvs.PutSimple("orientation", OriMode)
OrientationPanel.Visible = False
RestartApplication
End Sub