view rotation

Question

Hi, 
 I want to set the default "step" in the dialog to 90&deg; now it is 1&deg; what can I add to the key-in to make the step 90 
 OBD 10.10.01.151

Andrew Bell · Answer

Unfortunately there does not appear to be any options to defined this option within the View Rotation dialog with this keyin. 
 I have recorded a macro and can see that you may need to define it using VB code. 
 Sub BmrViewRotation90()
 Dim startPoint As Point3d
 Dim point As Point3d, point2 As Point3d
 Dim lngTemp As Long
 Dim oMessage As CadInputMessage

' Send a keyin that can be a command string
 CadInputQueue.SendKeyin "dialog viewrotation"

' Set a variable associated with a dialog box
 SetCExpressionValue "msDialogState.viewRotationP->increment", 90, "MGDSHOOK"
 CommandState.StartDefaultCommand
End Sub