(initget 7) (setq cols (getint "\nNumber of columns: ")) (initget 7) (setq rows (getint "\nNumber of rows: "))
(setq j (1+ j)) ) (setq i (1+ i)) )
;; Optional Z variation (sine wave example) (initget "Yes No") (setq z-var (if (= (getkword "\nAdd Z-axis variation (sine wave)? [Yes/No] <No>: ") "Yes") T nil)) raster autocad