Jump to content

Cubic Feet Calcualtor


Efeezy

Recommended Posts

I appreciate everyones hard work and effort also. I wish I had more to contribute. I no nothing about lisp and don't even know where to go to school for it or were to start to learn these.

Link to comment
Share on other sites

  • Replies 31
  • Created
  • Last Reply

Top Posters In This Topic

  • Efeezy

    9

  • alanjt

    8

  • Lee Mac

    8

  • Freerefill

    3

I appreciate everyones hard work and effort also. I wish I had more to contribute. I no nothing about lisp and don't even know where to go to school for it or were to start to learn these.

 

I admit my introduction to LISP was indeed in a classroom, but my co-worker CommandantBill (who occasionally posts here) learned the basics from me, in nothing but a few hours one afternoon. From there, it was simply applying them, getting used to them, and whenever he needed something new, he'd ask a question or look it up. He's as good as me now, if not better. So don't lose hope, just dig in and don't give up. ^.^

Link to comment
Share on other sites

I admit my introduction to LISP was indeed in a classroom, but my co-worker CommandantBill (who occasionally posts here) learned the basics from me, in nothing but a few hours one afternoon. From there, it was simply applying them, getting used to them, and whenever he needed something new, he'd ask a question or look it up. He's as good as me now, if not better. So don't lose hope, just dig in and don't give up. ^.^
I learned form hanging out in the forums and reading.
Link to comment
Share on other sites

We made a mistake on this one.If anyone chooses to use Volume lisp and formats to architectural or engineering units it will come up with the wrong answer. If we format units are in decimal (inches) then divided by(12x12x12)=1728 to be correct for cubic feet.

 

using the converter formatted in arch or eng.

ExLxWxH=144” wrong

 

In decimal

LxWxH= 12x12x12=1728”

 

1728/1728= 1 cubic foot

 

(defun c:Volume ( / ent obj )

(vl-load-com)

 

(if (setq ent (car (entsel)))

 

(if (vlax-property-available-p

(setq obj (vlax-ename->vla-object ent)) 'Volume)

 

(alert (strcat "Volume: " (rtos (vla-get-Volume obj))))

 

(alert "Selected Object Does not have a Volume Property")

 

)

)

(princ)

)

Link to comment
Share on other sites

Sorry, wasn't trying to be a jerk. Was trying to show the right way to use it. I was wrong yesterday and didn't want anyone else to be wrong.

Link to comment
Share on other sites

what is a good book or site to learn lisp? I want to learn in my spare time. I don't even know where to start. Buttons and macros are easy so far...

Link to comment
Share on other sites

These are good sites to learn the very basics:

http://www.afralisp.net/

http://www.jefferypsanders.com/autolisptut.html

http://ronleigh.info/autolisp/index.htm

 

If you want to get more advanced or look at the general concepts behind programming itself:

http://augiru.augi.com/content/library/au07/data/paper/CP311-4.pdf

http://mitpress.mit.edu/sicp/full-text/book/book-Z-H-4.html

http://www.cs.cmu.edu/afs/cs.cmu.edu/project/ai-repository/ai/html/cltl/clm/node1.html

 

But really, you can learn a lot more from examples posted on the forums with the VLIDE help files as a reference.

 

Just dissect a few examples line by line, using the VLIDE as a reference and ask if you get stuck.

 

Lee

Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.
Note: Your post will require moderator approval before it will be visible.

Guest
Unfortunately, your content contains terms that we do not allow. Please edit your content to remove the highlighted words below.
Reply to this topic...

×   Pasted as rich text.   Restore formatting

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.


×
×
  • Create New...