Text in lisp

Discussion in 'AutoCAD' started by iwafb, Aug 19, 2004.

  1. iwafb

    iwafb Guest

    Hi all,

    This is going to sound dumb. However, I am trying to write a simple text routine so that you could say type t20 and produce 2mm high text (times dimscale) in the right layer etc. The problem lies in that I want to use a similar prompt to the native autocad text command, that is:

    Specify start point of text or [Justify/Style]:

    Sounds simple, except I am stuck between using getpoint (for point selection) and getkword (for keyboard input). Is there a way to combine the two?

    Thanks in advance
    Dart
     
    iwafb, Aug 19, 2004
    #1
  2. iwafb

    Jasehuss Guest

    Try using initget, I did someting similar with this

    (initget 130 "Select")
    (setq an (getpoint "\nDigitise first point or [Select closed Polyline]: " ))

    You may have to play about abit and check out the initget bit codes to suit your prompt. The square brackets make the command options apear on the right click context menu.

    Regards
    J
     
    Jasehuss, Aug 19, 2004
    #2
  3. iwafb

    iwafb Guest

    Thanks J, I'll do a bit of research.

    Dart
     
    iwafb, Aug 19, 2004
    #3
Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments (here). After that, you can post your question and our members will help you out.