Sheep Posted August 24, 2020 Share Posted August 24, 2020 I want to increase to number in the WHILE. For example IP1 (starting number) when i click the next point it will change to IP2. Below is what i've tried but i dont know how to change it. (while (setq IP (getpoint "\nPick IP: ")) (setq txt_IP_1 00) (setq txt_IP_2 (+ 1 txt_IP_1)) (setq txt_IP_Node (strcat "IP" (rtos txt_IP_2 2 0))) (command ".text" "C" (list ( car IP) (+ 1 (cadr IP)) 0.0) 0.75 0 txt_IP_Node) ) Thank you. Quote Link to comment Share on other sites More sharing options...
Jonathan Handojo Posted August 24, 2020 Share Posted August 24, 2020 (edited) (setq txt_IP_1 00) (while (setq IP (getpoint "\nPick IP: ")) (setq txt_IP_1 (1+ txt_IP_1)) (setq txt_IP_Node (strcat "IP" (rtos txt_IP_1 2 0))) (command ".text" "C" (list ( car IP) (1+ (cadr IP)) 0.0) 0.75 0 txt_IP_Node) ) On a more advanced note, this will do: Incremental Numbering Suite... And I mean, waaaay more advanced Edited August 24, 2020 by Jonathan Handojo 1 Quote Link to comment Share on other sites More sharing options...
Sheep Posted August 24, 2020 Author Share Posted August 24, 2020 15 minutes ago, Jonathan Handojo said: (setq txt_IP_1 00) (while (setq IP (getpoint "\nPick IP: ")) (setq txt_IP_1 (1+ txt_IP_1)) (setq txt_IP_Node (strcat "IP" (rtos txt_IP_1 2 0))) (command ".text" "C" (list ( car IP) (1+ (cadr IP)) 0.0) 0.75 0 txt_IP_Node) ) On a more advanced note, this will do: Incremental Numbering Suite... And I mean, waaaay more advanced Thank you so much. Quote Link to comment Share on other sites More sharing options...
BIGAL Posted August 24, 2020 Share Posted August 24, 2020 Another for you to try. Does numbers and A-Z etc. Pt num bubble.lsp Quote Link to comment Share on other sites More sharing options...
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.