hi...help with lisp routine requested

[hhhh]

please provide me with a program in autolisp for the following?

1.>function to calculate tan(x)?

2.>To draw a rectangle when two diagonal corners are given?

3.>To draw a plate with central hole and start points,width and hole diameter are given.?

plz provide at your earliest..

[TimSpangler]

Anything else??

 

What have you gotten so far??

[ReMark]

Cheeky little bloke aren't we now?

 

What, we don't all have better things to do?

 

What have YOU done to search out whether or not Lisp routines like this already haven't been written?

[Lee Mac]

Hi,

 

Just to start:

 

1)

(defun c:tanx (/ ans)
   (initget "Deg Rad")
   (setq ans (getkword "\nInput in Degrees or Radians? [Deg/Rad]: "))
   (setq ang (getreal "Specify Angle: "))
   (if
       (= ans "Deg")
       (setq ang (dtr ang))
   )
   (setq ang2 (/ (sin ang) (cos ang)))
   (alert (rtos ang2))
   (princ)
) ; end tanx
   

(defun dtr (a)
   (* pi (/ a 180.0))
) ; end dtr

2) Just use the inbuilt AutoCAD "rectangle" command...

 

3) Not really sure what you're after, please specify in more detail... i.e. circle with hole? rectangle with hole? width meaning diameter?

[ReMark]

...plz provide at your earliest..

 

We serve and obey master.

[Lee Mac]

We serve and obey master.

 

Haha, well said.

[ReMark]

As you can tell, I have a real problem with the way this guy "asked for a favor." I apologize for my grumpiness.

[Lee Mac]

I must admit, he was very demanding...

[TimSpangler]

Getting right on that request.....

 

 

*EDIT* Sorry that should have said "demand...."

[Lee Mac]

2.>To draw a rectangle when two diagonal corners are given?

I can't understand why he is asking (*demanding*) for a routine to draw a rectangle when given the points of the vertices of one of the diagonals - the inbuilt AutoCAD function does that anyway....

[ReMark]

He took an AutoLisp class and these questions are part of his homework. Now let's see...hmmmm...who gets the 'A' here? Well, it goes to none other than Lee Mac. Congratulations Lee!

[jkristia]

>>He took an AutoLisp class and these questions are part of his homework

Thats what I was thinking too.