Using the following routine I would like
to be able to insert the smaller circle (that
needs to be arrayed around the larger circle)
on one of the qudrants of the larger circle.
At the moment the routine dosen't seem 'slick' enough
with the second use of a getpoint.I have attempted
to 'auto' insert the circle without any decent result.
Can anybody give me some ideas?
Thanks
Matt
;**************** DRILL4.LSP **********
;A routine to draw a circular pattern of holes
;of user defined type.Uses a data file for
;storing user defined variables.
(Defun C:DRILL4 ()
(Graphscr)
(Setvar "OSMODE" 16) ;temporary while trying to auto insert C2
(Initget 1 "A B C D")
(Setq T1 (Getkword "Please enter hole pattern type:
"))
(Setq P1 (Getpoint "\nPick insertion point: "))
(Setq FD (Open "D:/Autolisp/DRILL.DAT" "r" )) ...