Message 1 of 6
error: no function definition: MAKE-ARRAY
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report
Hi,
I'm fairly new to AutoLisp and still trying to learn how it works. I was writing a script that needed inputs into arrays for it to function properly but I keep getting this message when I try to execute the functions "error: no function definition: MAKE-ARRAY". Is there a different way of defining an array?
I know the script below is incomplete but I like to test the code as I'm writing it to avoid tedious debugging later on. I will be doing calculations involving the elements contained in the arrays after I get past this error.
P.S. I started using Autolisp about a week ago so please excuse any other errors I might've made in the script, I'm still learning.
(defun platformLoading()
(setq numOPL (getint "Enter number of platforms: "))
(setq n 0)
(setf PlArray(make-array '(numOPL)))
(setf xCenterArray(make-array '(numOPL)))
(setf yCenterArray(make-array '(numOPL)))
(setf mofPlArray(make-array '(numOPL)))
(while (>= numOPL 1)
(setf (aref PlArray n) (getint "Enter length of Platform: "))
(setf (aref xCenterArray n) (getpoint "Select x-center for Platform"))
(setf (aref yCenterArray n) (getpoint "Select y-center for Platform"))
(setf (aref mofPlArray n) (getint "Enter mass for Platform: "))
(setq nOPL (1- numOPL))
(setq n (1+ n))
)
)