• Industries
  • Products
  • Buy
  • Services & Support
  • Communities
  • Visual LISP, AutoLISP and General Customization

    Reply
    Distinguished Contributor
    Posts: 202
    Registered: ‎12-09-2003

    Progress Meter (repost)

    75 Views, 6 Replies
    12-03-2003 01:28 AM
    Is there a way to show progress in a routine? I have a routine that currently princs the precentage done from each pass of a repeat. Is there something out there that displays a progress meter at the bottom of the command prompt or something similar? for example (meter 50) would display 50% done. I have seen this with 3rd party softwares...
    Please use plain text.
    *Turvill, Paul

    Meter

    12-03-2003 01:28 AM in reply to: hulioman
    ALLCAPS.LSP from
    http://www.turvill.com/t2/free_stuff
    will do what you want.

    Please don't cross-post.
    ___

    "David K." wrote in message
    news:EAA7AC464389A153059925DB185E6468@in.WebX.maYIadrTaRb...
    > I'd like to either be able to
    > change more than one line of text at a time using a selection set
    Please use plain text.
    *Spangler, Timothy

    Re: Progress Meter (repost)

    12-03-2003 01:53 AM in reply to: hulioman
    Try this.  This is an DCL
    example:

     



    --
    _________________________________
    Timothy Spangler

     

    "You cannot escape the responsibility of tomorrow by evading it
    today"
    Abraham Lincoln
    _________________________________

     

    AutoCAD 2002
    WinXP
    Compaq Evo W6000
    Intel Xeon / 1G RAM


    style="PADDING-RIGHT: 0px; PADDING-LEFT: 5px; MARGIN-LEFT: 5px; BORDER-LEFT: #000000 2px solid; MARGIN-RIGHT: 0px">
    Is
    there a way to show progress in a routine? I have a routine that currently
    princs the precentage done from each pass of a repeat. Is there something out
    there that displays a progress meter at the bottom of the command prompt or
    something similar? for example (meter 50) would display 50% done. I have seen
    this with 3rd party softwares...
    Please use plain text.
    *real JD, The

    Re: Progress Meter (repost)

    12-03-2003 01:59 AM in reply to: hulioman
    Doslib offers that.... Can't tell you much more
    than that. But worth checking out.


    style="PADDING-RIGHT: 0px; PADDING-LEFT: 5px; MARGIN-LEFT: 5px; BORDER-LEFT: #000000 2px solid; MARGIN-RIGHT: 0px">
    Is
    there a way to show progress in a routine?
    I have a routine that currently
    princs the precentage done from each pass of a repeat. Is there something out
    there that displays a progress meter at the bottom of the command prompt or
    something similar?
      for example (meter 50) would display 50%
    done.
    I have seen this with 3rd party
    softwares...
    Please use plain text.
    *real JD, The

    Re: Progress Meter (repost)

    12-03-2003 02:00 AM in reply to: hulioman
    Doslib...


    style="PADDING-RIGHT: 0px; PADDING-LEFT: 5px; MARGIN-LEFT: 5px; BORDER-LEFT: #000000 2px solid; MARGIN-RIGHT: 0px">
    Is
    there a way to show progress in a routine? I have a routine that currently
    princs the precentage done from each pass of a repeat. Is there something out
    there that displays a progress meter at the bottom of the command prompt or
    something similar? for example (meter 50) would display 50% done. I have seen
    this with 3rd party softwares...
    Please use plain text.
    Distinguished Contributor
    Posts: 4,707
    Registered: ‎12-12-2003

    Re: Progress Meter (repost)

    12-03-2003 02:43 AM in reply to: hulioman
    (dos_progbar "title" amount)

    Allows you to use the built in AutoCAD progress bar.

    Dos_getprogress gives you a modeless box on the screen.

    Bill
    Please use plain text.
    Active Contributor
    Posts: 26
    Registered: ‎12-11-2003

    Re: Progress Meter (repost)

    12-03-2003 03:45 AM in reply to: hulioman
    Try this crude implementation....
    (setq num 1000
    cnt 0.0
    incr (/ 1.0 num)
    )
    (repeat num
    (setq pct (fix (* 100 (setq cnt (+ cnt incr)))))
    (princ (strcat "\r" "...Processing..." (itoa pct) "% Done..."))
    (rest of your code here.......)
    );repeat........Don
    Please use plain text.