4.207: Sample AutoLISP

Repetition and Conditional

4.207 Tutorials and Samples
write requests to: takehiko@mit.edu
last revised : 2/5/01

LISPLOADERŠ Set Up

AutoLISP file

repeat_02.lsp: : this program provides a function to draw a row of domed bays.

Functions Defined (click button for dispatching to AutoCAD)

(c:demo): : draws various repetitions of domes and vaults.
(dome_row_while xpos ypos xwidth ywidth number_of_horizontal_bays): : draws a row of domes using AutoLISP command, WHILE; (dome_row_while 0 0 2 3 4 )
(dome_row_repeat xpos ypos xwidth ywidth number_of_horizontal_bays): : draws a row of domes using AutoLISP command, REPEAT; (dome_row_repeat 0 0 2 3 4 )
(dome_matrix xpos ypos xwidth ywidth number_of_horizontal_bays number_of_vertical_bays): : draws a matrix of domes using a nested loop; (dome_matrix 0 0 2 3 3 2 )
(alternate_bays xpos ypos xwidth ywidth number_of_horizontal_bays): : draws a row of alternating domes and vaults using AutoLISP command, if; (alternate_bays 0 0 2 3 5 )
(cornered_matrix xpos ypos xwidth ywidth number_of_horizontal_bays number_of_vertical_bays): : draws a matrix of vault bays with the corner domes; (cornered_matrix 0 0 2 3 3 3 )

Standard AutoCAD Commands