Making option (f3 like) function

This is done by using one of the enterFunctions (e.g. enterPoint, enterPath, enterPoints, etc - check for functions in cdsFinder which begin with enter), and supplying the ?form argument to these functions. The form has to be created as ?formType 'options . It makes sense because the command is to do some kind of digitization, and so as you are prompted to enter points or whatever, you can then hit F3 to alter the behaviour of the command in progress. 

For example (an incomplete example because this example was just an experiment which isn't really working properly in the "DoneProc"):

 procedure(abCreateGuardring()

    unless(boundp('abCreateGuardringForm)
    abCreateGuardringOptionsForm()
    )
    enterPath(?prompts list("Enter points for guard ring")
    ?doneProc "abCreateGuardringDoneProc"
    ?points nil
    ?addPointProc "abCreateGuardringPointTracker"
    ?delPointProc "abCreateGuardringPointTracker"
    ?form abCreateGuardringForm
    ?alwaysMap t
    ?pathWidth abCreateGuardringForm->diffWidth->value
    )
)

procedure(abCreateGuardringOptionsForm()
    let((diffWidth)
    diffWidth=hiCreateFloatField(
        ?name 'diffWidth
        ?value 10.0
        ?callback "abChangeGuardringWidth()"
        ?prompt "Diffusion Width"
    )
    hiCreateAppForm(
        ?name 'abCreateGuardringForm
        ?formType 'options
        ?buttonLayout 'HideCancelDef
        ?fields list(
        list(diffWidth 0:0 400:30 100)
        )
    )
    )
)

Hope that helps,

Andrew

 Hi Andrew,

                  Thanks for the reply. 

The options form works very well for most of the cases. But I am stuck with a situation here.

If I have infix turned on it will take the current cursor location as the first point. So if my enter function is enterPoint then displaying the form by f3 is not possible.

In my case I need to enter a single point only but how to make it compatable to infix on / off? Which enter function should I use [ of course it should have the option form integrated to it] ?

Please help.

The enterPoint command has a ?noInfix argument so that you can turn off infix for that command. You can also use ?alwaysMap to force the form to come up without the need for F3.

Derek