初识UNDO与u的结合

434939575

2. (defun c:tt (/  )  
   
3. (command "UNDO" "g");开始11
   
4. (setq aa (getpoint "1"));
   
5.   (setq bb(getpoint "2"));
   
6.   (command "pline"  aa  bb  "");
   
7. (command "UNDO" "e");end  55
   
8. (command "U" );此句恢复前面的动作11--55
   
9.       (command "circle" aa  50  "");
   
10. 
    
11.     );最后结果只画了圆

(defun c:tt (/  )  <br /> (command "UNDO" "g");开始11<br /> (setq aa (getpoint "1"));<br />   (setq bb(getpoint "2"));<br />   (command "pline"  aa  bb  "");<br /> (command "UNDO" "e");end  55<br /> (command "U" );此句恢复前面的动作11--55<br />       (command "circle" aa  50  "");<br /> <br />     );最后结果只画了圆

xufansw

了解了，一直不明白这个咋用的，大神，谢谢了哈