Results 1 to 8 of 8

Thread: Write a LISP routine to enhance the revcloud command

  1. #1
    Member
    Join Date
    2005-08
    Posts
    5
    Login to Give a bone
    0

    Default LISP routine to enhance the revcloud command

    I am trying to write a lisp routine to enhance the revcloud routine and make the clouds a different 'global width' based on whether metric or imperial is chosen. I am also prompting for a choice between 3 pre-set sizes (arc lengths), inserting a rev triangle, and putting everything on the correct layer automatically.

    It is working beautifully, except the revcloud command doesn't seem to be reacting the same way other commands do. Upon execution, the lisp routine keeps going even though the cloud is not finished. This causes errors when it gets to the 'entlast' type stuff to alter the appearance of the cloud which isn't complete.

    It would seem that I need to find out what internally 'triggers' the end of the revcloud routine and causes the verbage "Revision cloud finished." to print on the screen. I'm sure it is checking for a matching start and endpoint, but I have no idea what variables it could be using. If I knew that, I think I could set up a loop checking for that condition to delay the start of the rest of the routine. Anyone know how to access that programming?

    Any thoughts??
    Melissa
    Last edited by melissa.j.seidel; 2005-11-11 at 11:10 PM.

  2. #2
    The Silent Type Mike.Perry's Avatar
    Join Date
    2000-11
    Posts
    13,656
    Login to Give a bone
    0

    Default Re: Write a LISP routine to enhance the revcloud command

    Hi Melissa

    Please note I have *split* this post into its own thread from thread "Nov '05 - TIPniques: How Things Stack Up ( found in the Hot News forum ).

    +

    I have *moved* this newly created thread from the Hot News forum to this one as I believe it would be better served here.

    Thanks, Mike

    Forum Moderator

  3. #3
    AUGI Addict
    Join Date
    2005-08
    Posts
    1,043
    Login to Give a bone
    0

    Default Re: Write a LISP routine to enhance the revcloud command

    You can use this in your lisp, without seeing it, and it should work.
    Code:
    (command "_.revcloud")
    (while (> (getvar "cmdactive") 1)
     (command pause)
    )
    Tim

  4. #4
    Administrator Opie's Avatar
    Join Date
    2002-01
    Location
    jUSt Here (a lot)
    Posts
    9,124
    Login to Give a bone
    0

    Default Re: Write a LISP routine to enhance the revcloud command

    Can you post what you have, so others may be able to see where you have been?
    If you have a technical question, please find the appropriate forum and ask it there.
    You will get a quicker response from your fellow AUGI members than if you sent it to me via a PM or email.
    jUSt

  5. #5
    The Silent Type Mike.Perry's Avatar
    Join Date
    2000-11
    Posts
    13,656
    Login to Give a bone
    0

    Default Re: Write a LISP routine to enhance the revcloud command

    Quote Originally Posted by melissa.j.seidel
    Okay, I need help again! I couldn't figure out how to start a new RELEVANT thread...
    Hi Melissa

    Try the following...

    Most Frequently Asked Questions

    +

    The AUGI Forums...

    Need Help with Forum Activities?

    Did you see the How to Forum article by our good friend and board member, Mike Perry in the last issue of AUGIWorld magazine? If not, be sure to download the issue and read it or get a pdf copy of it by clicking this link..
    +

    AUGI Forum Guidelines

    User Maintenance

    General Forum Usage

    Reading and Posting Messages

    Hope the above helps,

    Mike

    Forum Moderator

  6. #6
    All AUGI, all the time CAB2k's Avatar
    Join Date
    2016-01
    Location
    Brandon, Florida
    Posts
    687
    Login to Give a bone
    0

    Default Re: Write a LISP routine to enhance the revcloud command

    Check out pl2cloud as an alternative routine.
    http://forums.augi.com/showthread.ph...light=pl2cloud
    Attached Images Attached Images
    Last edited by CAB2k; 2005-11-11 at 11:33 PM.

  7. #7
    Member
    Join Date
    2005-08
    Posts
    5
    Login to Give a bone
    0

    Default Re: Write a LISP routine to enhance the revcloud command

    Thanks CiphDRMRS!
    You wrote:
    Try this:
    (command "_.revcloud")
    (while (> (getvar "cmdactive") 1)
    (command pause)
    )

    That didn't work initially, but when I replaced the > with and =, it worked beautifully! I am now debugging the rest of the routine(in my spare time). I will post the whole routine when complete.

    Thanks for your help!
    Melissa

  8. #8
    AUGI Addict
    Join Date
    2005-08
    Posts
    1,043
    Login to Give a bone
    0

    Default Re: Write a LISP routine to enhance the revcloud command

    Quote Originally Posted by melissa.j.seidel
    Thanks CiphDRMRS!
    You wrote:
    Try this:
    (command "_.revcloud")
    (while (> (getvar "cmdactive") 1)
    (command pause)
    )

    That didn't work initially, but when I replaced the > with and =, it worked beautifully! I am now debugging the rest of the routine(in my spare time). I will post the whole routine when complete.

    Thanks for your help!
    Melissa
    You're welcome. I'm glad you got past that part, and I hope that there isn't too much debugging you have to do.

    Tim

Similar Threads

  1. Use Saveas Command from a Lisp Routine
    By CADdancer in forum AutoLISP
    Replies: 6
    Last Post: 2011-06-23, 03:01 PM
  2. LISP routine for Area Command
    By Mac Demer in forum AutoCAD General
    Replies: 12
    Last Post: 2010-07-14, 06:24 PM
  3. Replies: 9
    Last Post: 2007-10-23, 12:34 PM
  4. enhance a routine to heal lines
    By clovis in forum AutoLISP
    Replies: 7
    Last Post: 2007-09-17, 05:11 PM
  5. BURST command in Lisp Routine
    By mhollar in forum AutoLISP
    Replies: 6
    Last Post: 2005-12-19, 11:08 PM

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •