Sheep Posted June 30, 2020 Author Posted June 30, 2020 33 minutes ago, BIGAL said: I think your trying to hard just use my multi getvals get X Y Z much simpler. Maybe you're right. To be honest learning LISP between jobs is hard. I have no idea how to execute the task in short way that i can learn and understand. Maybe the long way sometime better so i can learn and fully understand. Quote
Sheep Posted June 30, 2020 Author Posted June 30, 2020 @BIGAL, after following your advice about trying too hard, i took a different approch and manage to make it work. Yes, still the hard way but it's something i can relate to. Thank you for the reminder. Quote
hanhphuc Posted June 30, 2020 Posted June 30, 2020 7 hours ago, Sheep said: (setq xyzCombo (list Text1 (cadr aPLow) 0 )) Whenever i run the lisp, my Acad will stop running. (type Text1) = STR? try distof & atof (setq xyzCombo (list (atof Text1) (cadr aPLow) 0 )) 1 Quote
BIGAL Posted July 1, 2020 Posted July 1, 2020 Should have posted this earlier, when you do Getstring and type 123 once space is hit it stops, but if you do Getstring and type "123 456 789" it will work the string input waits for the closing double quote. So use the convert list to make into ((123)(456)(789)) 1 Quote
Sheep Posted July 1, 2020 Author Posted July 1, 2020 16 hours ago, hanhphuc said: (type Text1) = STR? try distof & atof (setq xyzCombo (list (atof Text1) (cadr aPLow) 0 )) Yes, the text1 was from a Getstring. I need to convert before i make the list. Thank you. One more thing, atof distof, rtos...what category is that? i mean, is that for string@decimal@list? Quote
BIGAL Posted July 1, 2020 Posted July 1, 2020 https://www.afralisp.net/reference/autolisp-functions.php atof atoi rtos distof 1 Quote
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.
Note: Your post will require moderator approval before it will be visible.