home *** CD-ROM | disk | FTP | other *** search
/ The World of Computer Software / World_Of_Computer_Software-02-387-Vol-3of3.iso / p / punchcad.zip / ACAD10.EXE / PIVOT.MNU
Lisp/Scheme  |  1992-12-04  |  79KB  |  4,463 lines
  1. ***BUTTONS
  2. ;
  3. $p1=*
  4. ^c^c
  5. ^B
  6. ^O
  7. ^G
  8. ^D
  9. ^E
  10. ^T
  11. ***AUX1
  12. ;
  13. $p1=*
  14. ^C^C
  15. ^B
  16. ^O
  17. ^G
  18. ^D
  19. ^E
  20. ^T
  21.  
  22. ***POP1
  23. [Tools]
  24. [OSNAP]^C^C$p1= $p1=* OSNAP \
  25. CENter
  26. ENDpoint
  27. INSert
  28. [INTersection]INT
  29. MIDpoint
  30. NEArest
  31. NODe
  32. [PERpendicular]PER
  33. QUAdrant
  34. [QUICK,]QUICK,^Z$p1=*
  35. TANgent
  36. NONE
  37. [~--]
  38. [FILTERS...   ]$p1=filters $p1=*
  39. [Cancel]^C^C
  40. [U]^C^CU
  41. [Redo]^C^CREDO
  42. [List]^C^CLIST
  43.  
  44. **filters
  45. [Filters]
  46. .X
  47. .Y
  48. .Z
  49. .XY
  50. .XZ
  51. .YZ
  52. [TOOLS...]$p1= $p1=*
  53.  
  54. ***POP2
  55. **p2draw
  56. [Draw]
  57. [Line]*^C^C$S=X $s=line line
  58. [Arc]*^C^C$S=X $s=poparc arc
  59. [Circle]*^C^C$S=X $s=popcircl circle
  60. [Polyline]*^C^C$S=X $s=pline pline
  61. [3D Polyline]*^C^C$S=X $S=3dpoly 3dpoly
  62. [Insert]^C^Csetvar attdia 1 $S=X $s=insert insert
  63. [Dtext]*^C^C$S=X $s=Dtext Dtext
  64. [Hatch...]^C^C$i=hatch1 $i=*
  65. [3D Construction...]$i=3dobjects $i=*
  66. [~--]
  67. [Pivot Punch]^C^C^P(vmon) (load "/ppc/pivot") (menucmd  "P2=P13pivot" "P2=*")
  68.  
  69. ***POP3
  70. [Modify]
  71. [Erase]*^C^C$S=X $s=erase erase si auto
  72. [Move]*^C^C$S=X $s=move move si auto
  73. [Copy]*^C^C$S=X $s=copy copy si auto
  74. [Properties]*^C^C$S=X $S=chprop chprop si auto
  75. [Break]*^C^C$S=X $S=break break
  76. [Fillet]*^C^C$S=X $S=fillet fillet
  77. [Mirror]*^C^C$S=X $S=mirror mirror auto
  78. [Trim]*^C^C$S=X $s=trim trim auto
  79. [Extend]*^C^C$S=X $s=extend extend auto
  80. [Stretch]*^C^C$S=X $s=stretch stretch crossing
  81. [Edit Polylines]^C^C^P+
  82. (defun m:p1(/ m:pa m:pc m:d m:w)(menucmd "S=X")(menucmd "S=PSEL");+
  83. (setq m:d T)(while m:d (setq m:pc (ssget))(setq m:pa (ssname m:pc 0));+
  84. (if(=(cdr(assoc 0 (entget m:pa))) "POLYLINE")(progn(setq m:d nil)+
  85. (m:p2 m:pa m:pc))(progn(prompt "Entity selected is not a polyline")(terpri);+
  86. (if (member (cdr (assoc 0 (entget m:pa))) '("LINE" "ARC"))(progn+
  87. (initget "Yes No")(setq m:w (getkword "Do you want to turn it into one? <Y>"));+
  88. (if (or (= m:w "Yes")(null m:w))(progn(setq m:d nil)(menucmd "S=X");+
  89. (menucmd "S=P0")(command "PEDIT" m:pa "yes" pause)))))))))+
  90. (defun m:p2(m:pa m:pc / m:pb)(menucmd "S=X")+
  91. (if (= (setq m:pb (cdr (assoc 70 (entget m:pa)))) nil)(menucmd "S=P0");+
  92. (progn (setq m:pb (/ m:pb 2))(if (>= m:pb 8)(menucmd "S=P16");+
  93. (if(< m:pb 4)(menucmd "S=P0")(menucmd "S=P8")))))(command "PEDIT" m:pa pause))+
  94. (defun perror (msg)(setq *error* m:err m:err nil)(princ))+
  95. (defun C:PEDITM (/ m:err)(setq m:err *error* *error* perror)(m:p1);+
  96. (setq *error* m:err m:err nil)(princ))(princ) PEDITM ^P
  97.  
  98. ***POP4
  99. [Display]
  100. [Redraw]'redraw
  101. [~--]
  102. [Zoom Window]'zoom w
  103. [Zoom Previous]'zoom p
  104. [Zoom All]^C^Czoom a
  105. [Zoom Dynamic]'zoom d
  106. [~--]
  107. [Pan]'pan
  108. [Dview Options...]^C^C$i=dviewi $i=*
  109. [Vpoint 3D...]^C^C$S=X $S=VPOINT3D $i=3dviews $i=*
  110. [~--]
  111. [Plan View (UCS)]^C^Cplan;;
  112. [Plan View (World)]^C^Cplan wo
  113. [~--]
  114. [Set Viewports...]^C^C$S=X $S=vports $i=vporti $i=*
  115.  
  116. ***POP5
  117. [Settings]
  118. [UCS Dialogue...]^C^Cdducs
  119. [UCS Options...]$i=ucs $i=*
  120. [UCS Previous]^C^CUCS P
  121. [~--]
  122. [Drawing Aids...]'ddrmodes
  123. [Entity Creation...]'ddemodes
  124. [Modify Layer...]'ddlmodes
  125.  
  126. ***POP6
  127. [Options]
  128. [Ashade...]^C^C^P(progn(setq m:err *error*)(princ))+
  129. (defun *error* (msg)(princ msg)(setq *error* m:err m:err nil)(princ))+
  130. (cond ((null C:SCENE)(vmon)(if (/= nil (findfile "ashade.lsp"));+
  131. (progn (terpri)(prompt "Please wait...  Loading ashade.  ")(load "ashade")+
  132. (menucmd "I=AS")(menucmd "I=*")(setq *error* m:err m:err nil))(progn (terpri);+
  133. (prompt "The file 'Ashade.lsp' was not found in your current search directories.")+
  134. (terpri)(prompt "Check your AutoShade Manual for installation instructions.");+
  135. (setq *error* m:err m:err nil)(princ))))+
  136. (T (setq *error* m:err m:err nil)(menucmd "I=AS")(menucmd "I=*")(princ))) ^P
  137. [Fonts...]^C^C$i=fonts1 $i=*
  138.  
  139. ***POP7
  140. [File ]
  141. [Save ]^C^CSave;
  142. [End  ]^C^Cend
  143. [Quit ]^C^C$S=X $s=quit quit
  144. [~--  ]
  145. [Plot ]^C^Cplot
  146. [Print]^C^Cprplot
  147.  
  148. ***POP8
  149. [Help]
  150. [Help]'help
  151.  
  152. ***POP13
  153. **P13pivot
  154. [Pivot ]   
  155. [~--]
  156. [Perforator]
  157. [ Solid    ]^C^C^P(Load "/ppc/pperf") perf
  158. [Ejector   ]^C^C^P(Load "/ppc/eperf") perf
  159. [    repeat]perf
  160. [~--]
  161. [Guide     ]^C^C^P(Load "/ppc/gguide") guide
  162. [    repeat]guide
  163. [~--]
  164. [Die Button]^C^C^P(Load "/ppc/ddies") button
  165. [    repeat]button
  166. [~--]
  167. [Pilot     ]^C^C^P(Load "/ppc/npilot") pilot
  168. [    repeat]pilot
  169. [~--]
  170. [Parts List]^C^Cattext s /ppc/pivtemp  script /ppc/pivpart
  171. [~--]
  172. [Draw    > ]^C^C^P(menucmd "P2=P2draw"  "P2=*")
  173.  
  174. **P13shape1
  175. [Shape] 
  176. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  177. [~--]
  178. [   Round   ]C
  179. [  Square   ]S
  180. [  Flatted  ]F
  181. [  Oblong   ]O
  182. [ Rectangle ]R
  183. [  Hexagon  ]H
  184. [     F4    ]F4
  185. [    F11    ]F11
  186. [    F12    ]F12
  187. [    F19    ]F19
  188. [    F20    ]F20
  189. [    F23    ]F23
  190. [    F24    ]F24
  191. [    F35    ]F35
  192. [    F36    ]F36
  193.  
  194. **P13shape1a
  195. [Shape] 
  196. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  197. [~--]
  198. [   Round   ]C
  199. [  Square   ]S
  200. [  Flatted  ]F
  201. [  Oblong   ]O
  202. [ Rectangle ]R
  203. [  Hexagon  ]H
  204. [     F4    ]F4
  205. [    F11    ]F11
  206. [    F12    ]F12
  207. [    F19    ]F19
  208. [    F20    ]F20
  209. [    F23    ]F23
  210. [    F24    ]F24
  211.  
  212. **P13shape1b
  213. [Shape] 
  214. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  215. [~--]
  216. [   Round   ]C
  217. [  Square   ]S
  218. [  Flatted  ]F
  219. [  Oblong   ]O
  220. [ Rectangle ]R
  221. [  Hexagon  ]H
  222.  
  223. **P13shank1
  224. [Shank ]
  225. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  226. [-------]
  227. [  15   ]15
  228. [  12   ]12
  229.  
  230. **P13shank2
  231. [Shank ]
  232. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  233. [-------]
  234. [  12   ]12
  235.  
  236. **P13shank3
  237. [Shank ]
  238. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  239. [-------]
  240. [  18   ]18
  241. [  15   ]15
  242. [  12   ]12
  243.  
  244. **P13shank4
  245. [Shank ]
  246. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  247. [-------]
  248. [  18   ]18
  249. [  15   ]15
  250.  
  251. **P13shank5
  252. [Shank ]
  253. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  254. [-------]
  255. [  18   ]18
  256.  
  257. **P13shank6
  258. [Shank ]
  259. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  260. [-------]
  261. [  25   ]25
  262. [  18   ]18
  263. [  15   ]15
  264. [  12   ]12
  265.  
  266. **P13shank7
  267. [Shank ]
  268. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  269. [-------]
  270. [  25   ]25
  271. [  18   ]18
  272. [  15   ]15
  273.  
  274. **P13shank8
  275. [Shank ]
  276. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  277. [-------]
  278. [  25   ]25
  279. [  18   ]18
  280.  
  281. **P13shank9
  282. [Shank ]
  283. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  284. [-------]
  285. [  25   ]25
  286.  
  287. **P13shank10
  288. [Shank ]
  289. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  290. [-------]
  291. [  31   ]31
  292. [  25   ]25
  293. [  18   ]18
  294. [  15   ]15
  295. [  12   ]12
  296.  
  297. **P13shank11
  298. [Shank ]
  299. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  300. [-------]
  301. [  31   ]31
  302. [  25   ]25
  303. [  18   ]18
  304. [  15   ]15
  305.  
  306. **P13shank12
  307. [Shank ]
  308. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  309. [-------]
  310. [  31   ]31
  311. [  25   ]25
  312. [  18   ]18
  313.  
  314. **P13shank13
  315. [Shank ]
  316. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  317. [-------]
  318. [  31   ]31
  319. [  25   ]25
  320.  
  321. **P13shank14
  322. [Shank ]
  323. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  324. [-------]
  325. [  31   ]31
  326.  
  327. **P13shank15
  328. [Shank ]
  329. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  330. [-------]
  331. [  37   ]37
  332. [  31   ]31
  333. [  25   ]25
  334. [  18   ]18
  335. [  15   ]15
  336.  
  337. **P13shank16
  338. [Shank ]
  339. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  340. [-------]
  341. [  37   ]37
  342. [  31   ]31
  343. [  25   ]25
  344. [  18   ]18
  345.  
  346. **P13shank17
  347. [Shank ]
  348. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  349. [-------]
  350. [  37   ]37
  351. [  31   ]31
  352. [  25   ]25
  353.  
  354. **P13shank18
  355. [Shank ]
  356. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  357. [-------]
  358. [  37   ]37
  359. [  31   ]31
  360.  
  361. **P13shank19
  362. [Shank ]
  363. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  364. [-------]
  365. [  37   ]37
  366.  
  367. **P13shank21
  368. [Shank ]
  369. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  370. [-------]
  371. [  43   ]43
  372. [  37   ]37
  373. [  31   ]31
  374. [  25   ]25
  375.  
  376. **P13shank22
  377. [Shank ]
  378. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  379. [-------]
  380. [  43   ]43
  381. [  37   ]37
  382. [  31   ]31
  383.  
  384. **P13shank23
  385. [Shank ]
  386. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  387. [-------]
  388. [  43   ]43
  389. [  37   ]37
  390.  
  391. **P13shank24
  392. [Shank ]
  393. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  394. [-------]
  395. [  43   ]43
  396.  
  397. **P13shank25
  398. [Shank ]
  399. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  400. [-------]
  401. [  50   ]50
  402. [  43   ]43
  403. [  37   ]37
  404. [  31   ]31
  405. [  25   ]25
  406.  
  407. **P13shank26
  408. [Shank ]
  409. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  410. [-------]
  411. [  50   ]50
  412. [  43   ]43
  413. [  37   ]37
  414. [  31   ]31
  415.  
  416. **P13shank27
  417. [Shank ]
  418. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  419. [-------]
  420. [  50   ]50
  421. [  43   ]43
  422. [  37   ]37
  423.  
  424. **P13shank28
  425. [Shank ]
  426. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  427. [-------]
  428. [  50   ]50
  429. [  43   ]43
  430.  
  431. **P13shank29
  432. [Shank ]
  433. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  434. [-------]
  435. [  50   ]50
  436.  
  437. **P13shank30
  438. [Shank ]
  439. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  440. [-------]
  441. [  62   ]62
  442. [  50   ]50
  443. [  43   ]43
  444. [  37   ]37
  445.  
  446. **P13shank31
  447. [Shank ]
  448. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  449. [-------]
  450. [  62   ]62
  451. [  50   ]50
  452. [  43   ]43
  453.  
  454. **P13shank32
  455. [Shank ]
  456. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  457. [-------]
  458. [  62   ]62
  459. [  50   ]50
  460.  
  461. **P13shank33
  462. [Shank ]
  463. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  464. [-------]
  465. [  62   ]62
  466.  
  467. **P13shank34
  468. [Shank ]
  469. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  470. [-------]
  471. [  75   ]75
  472. [  62   ]62
  473. [  50   ]50
  474.  
  475. **P13shank35
  476. [Shank ]
  477. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  478. [-------]
  479. [  75   ]75
  480. [  62   ]62
  481.  
  482. **P13shank36
  483. [Shank ]
  484. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  485. [-------]
  486. [  75   ]75
  487.  
  488. **P13shank37
  489. [Shank ]
  490. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  491. [-------]
  492. [ 100   ]100
  493. [  75   ]75
  494.  
  495. **P13shank38
  496. [Shank ]
  497. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  498. [-------]
  499. [ 100   ]100
  500.  
  501. **P13shank39
  502. [Shank ]
  503. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  504. [-------]
  505. [  62   ]62
  506. [  50   ]50
  507. [  43   ]43
  508. [  37   ]37
  509. [  31   ]31
  510.  
  511. **P13shank40
  512. [Shank ]
  513. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  514. [-------]
  515. [ 100   ]100
  516. [  75   ]75
  517. [  62   ]62
  518.  
  519. **P13shank43
  520. [Shank ]
  521. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  522. [-------]
  523. [  75   ]75
  524. [  62   ]62
  525. [  50   ]50
  526. [  43   ]43
  527.  
  528. **P13shank44
  529. [Shank ]
  530. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  531. [-------]
  532. [ 100   ]100
  533. [  75   ]75
  534. [  62   ]62
  535. [  50   ]50
  536.  
  537. **P13shank46
  538. [Shank ]
  539. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  540. [-------]
  541. [  75   ]75
  542. [  62   ]62
  543. [  50   ]50
  544. [  43   ]43
  545. [  37   ]37
  546.  
  547. **P13shank47
  548. [Shank ]
  549. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  550. [-------]
  551. [  62   ]62
  552. [  50   ]50
  553. [  43   ]43
  554. [  37   ]37
  555. [  31   ]31
  556. [  25   ]25
  557.  
  558. **P13shank48
  559. [Shank ]
  560. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  561. [-------]
  562. [  37   ]37
  563. [  31   ]31
  564. [  25   ]25
  565. [  18   ]18
  566. [  15   ]15
  567. [  12   ]12
  568.  
  569. **P13shank49
  570. [Shank ]
  571. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  572. [-------]
  573. [ 100   ]100
  574. [  75   ]75
  575. [  62   ]62
  576. [  50   ]50
  577. [  43   ]43
  578.  
  579. **P13shank50
  580. [Shank ]
  581. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  582. [-------]
  583. [  43   ]43
  584. [  37   ]37
  585. [  31   ]31
  586. [  25   ]25
  587. [  18   ]18
  588. [  15   ]15
  589. [  12   ]12
  590.  
  591. **P13shank51
  592. [Shank ]
  593. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  594. [-------]
  595. [  43   ]43
  596. [  37   ]37
  597. [  31   ]31
  598. [  25   ]25
  599. [  18   ]18
  600. [  15   ]15
  601. [  12   ]12
  602.  
  603. **P13shank52
  604. [Shank ]
  605. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  606. [-------]
  607. [  43   ]43
  608. [  37   ]37
  609. [  31   ]31
  610. [  25   ]25
  611. [  18   ]18
  612.  
  613. **P13shank53
  614. [Shank ]
  615. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  616. [-------]
  617. [  50   ]50
  618. [  43   ]43
  619. [  37   ]37
  620. [  31   ]31
  621. [  25   ]25
  622. [  18   ]18
  623. [  15   ]15
  624.  
  625. **P13shank54
  626. [Shank ]
  627. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  628. [-------]
  629. [  50   ]50
  630. [  43   ]43
  631. [  37   ]37
  632. [  31   ]31
  633. [  25   ]25
  634. [  18   ]18
  635.  
  636. **P13shank55
  637. [Shank ]
  638. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  639. [-------]
  640. [  75   ]75
  641. [  62   ]62
  642. [  50   ]50
  643. [  43   ]43
  644. [  37   ]37
  645. [  31   ]31
  646.  
  647. **P13shank56
  648. [Shank ]
  649. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  650. [-------]
  651. [ 100   ]100
  652. [  75   ]75
  653. [  62   ]62
  654. [  50   ]50
  655. [  43   ]43
  656.  
  657. **P13shank57
  658. [Shank ]
  659. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  660. [-------]
  661. [ 100   ]100
  662. [  75   ]75
  663. [  62   ]62
  664. [  50   ]50
  665. [  43   ]43
  666. [  37   ]37
  667. [  31   ]31
  668. [  25   ]25
  669.  
  670. **P13shank58
  671. [Shank ]
  672. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  673. [-------]
  674. [ 100   ]100
  675. [  75   ]75
  676. [  62   ]62
  677. [  50   ]50
  678. [  43   ]43
  679. [  37   ]37
  680. [  31   ]31
  681.  
  682. **P13shank59
  683. [Shank ]
  684. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  685. [-------]
  686. [ 100   ]100
  687. [  75   ]75
  688. [  62   ]62
  689. [  50   ]50
  690. [  43   ]43
  691. [  37   ]37
  692.  
  693. **P13body1
  694. [Body ]
  695. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  696. [-------]
  697. [  25   ]25
  698. [  18   ]18
  699.  
  700. **P13body2
  701. [Body ]
  702. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  703. [-------]
  704. [  25   ]25
  705.  
  706. **P13body3
  707. [Body ]
  708. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  709. [-------]
  710. [  31   ]31
  711. [  25   ]25
  712. [  18   ]18
  713.  
  714. **P13body4
  715. [Body ]
  716. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  717. [-------]
  718. [  31   ]31
  719. [  25   ]25
  720.  
  721. **P13body5
  722. [Body ]
  723. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  724. [-------]
  725. [  31   ]31
  726.  
  727. **P13body6
  728. [Body ]
  729. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  730. [-------]
  731. [  37   ]37
  732. [  31   ]31
  733. [  25   ]25
  734. [  18   ]18
  735.  
  736. **P13body7
  737. [Body ]
  738. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  739. [-------]
  740. [  37   ]37
  741. [  31   ]31
  742. [  25   ]25
  743.  
  744. **P13body8
  745. [Body ]
  746. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  747. [-------]
  748. [  37   ]37
  749. [  31   ]31
  750.  
  751. **P13body9
  752. [Body ]
  753. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  754. [-------]
  755. [  37   ]37
  756.  
  757. **P13body10
  758. [Body ]
  759. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  760. [-------]
  761. [  43   ]43
  762. [  37   ]37
  763. [  31   ]31
  764.  
  765. **P13body11
  766. [Body ]
  767. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  768. [-------]
  769. [  43   ]43
  770. [  37   ]37
  771.  
  772. **P13body12
  773. [Body ]
  774. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  775. [-------]
  776. [  43   ]43
  777.  
  778. **P13body13
  779. [Body ]
  780. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  781. [-------]
  782. [  50   ]50
  783. [  43   ]43
  784. [  37   ]37
  785.  
  786. **P13body14
  787. [Body ]
  788. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  789. [-------]
  790. [  50   ]50
  791. [  43   ]43
  792.  
  793. **P13body15
  794. [Body ]
  795. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  796. [-------]
  797. [  50   ]50
  798.  
  799. **P13body16
  800. [Body ]
  801. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  802. [-------]
  803. [  62   ]62
  804. [  50   ]50
  805. [  43   ]43
  806.  
  807. **P13body17
  808. [Body ]
  809. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  810. [-------]
  811. [  62   ]62
  812. [  50   ]50
  813.  
  814. **P13body18
  815. [Body ]
  816. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  817. [-------]
  818. [  62   ]62
  819.  
  820. **P13body19
  821. [Body ]
  822. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  823. [-------]
  824. [  75   ]75
  825. [  62   ]62
  826.  
  827. **P13body20
  828. [Body ]
  829. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  830. [-------]
  831. [  75   ]75
  832.  
  833. **P13body21
  834. [Body ]
  835. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  836. [-------]
  837. [  100  ]100
  838. [   75  ]75
  839.  
  840. **P13body22
  841. [Body ]
  842. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  843. [-------]
  844. [  100  ]100
  845.  
  846. **P13body23
  847. [Body ]
  848. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  849. [-------]
  850. [  125  ]125
  851. [  100  ]100
  852.  
  853. **P13body24
  854. [Body ]
  855. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  856. [-------]
  857. [  125  ]125
  858.  
  859. **P13body25
  860. [Body ]
  861. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  862. [-------]
  863. [  50   ]50
  864. [  43   ]43
  865. [  37   ]37
  866. [  31   ]31
  867. [  25   ]25
  868.  
  869. **P13body26
  870. [Body ]
  871. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  872. [-------]
  873. [  50   ]50
  874. [  43   ]43
  875. [  37   ]37
  876. [  31   ]31
  877.  
  878. **P13body27
  879. [Body ]
  880. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  881. [-------]
  882. [  62   ]62
  883. [  50   ]50
  884. [  43   ]43
  885. [  37   ]37
  886. [  31   ]31
  887. [  25   ]25
  888.  
  889. **P13body28
  890. [Body ]
  891. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  892. [-------]
  893. [  62   ]62
  894. [  50   ]50
  895. [  43   ]43
  896. [  37   ]37
  897. [  31   ]31
  898.  
  899. **P13body29
  900. [Body ]
  901. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  902. [-------]
  903. [  62   ]62
  904. [  50   ]50
  905. [  43   ]43
  906. [  37   ]37
  907.  
  908. **P13body30
  909. [Body ]
  910. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  911. [-------]
  912. [  75   ]75
  913. [  62   ]62
  914. [  50   ]50
  915. [  43   ]43
  916.  
  917. **P13body31
  918. [Body ]
  919. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  920. [-------]
  921. [  75   ]75
  922. [  62   ]62
  923. [  50   ]50
  924.  
  925. **P13body32
  926. [Body ]
  927. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  928. [-------]
  929. [  100  ]100
  930. [   75  ]75
  931. [   62  ]62
  932.  
  933. **P13body33
  934. [Body ]
  935. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  936. [-------]
  937. [  75   ]75
  938. [  62   ]62
  939. [  50   ]50
  940. [  43   ]43
  941. [  37   ]37
  942. [  31   ]31
  943. [  25   ]25
  944.  
  945. **P13body34
  946. [Body ]
  947. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  948. [-------]
  949. [  75   ]75
  950. [  62   ]62
  951. [  50   ]50
  952. [  43   ]43
  953. [  37   ]37
  954. [  31   ]31
  955.  
  956. **P13body35
  957. [Body ]
  958. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  959. [-------]
  960. [  75   ]75
  961. [  62   ]62
  962. [  50   ]50
  963. [  43   ]43
  964. [  37   ]37
  965.  
  966. **P13body36
  967. [Body ]
  968. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  969. [-------]
  970. [  100  ]100
  971. [   75  ]75
  972. [   62  ]62
  973. [   50  ]50
  974. [   43  ]43
  975. [   37  ]37
  976. [   31  ]31
  977.  
  978. **P13body37
  979. [Body ]
  980. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  981. [-------]
  982. [  100  ]100
  983. [   75  ]75
  984. [   62  ]62
  985. [   50  ]50
  986. [   43  ]43
  987. [   37  ]37
  988.  
  989. **P13body38
  990. [Body ]
  991. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  992. [-------]
  993. [  100  ]100
  994. [   75  ]75
  995. [   62  ]62
  996. [   50  ]50
  997. [   43  ]43
  998.  
  999. **P13body39
  1000. [Body ]
  1001. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  1002. [-------]
  1003. [  100  ]100
  1004. [   75  ]75
  1005. [   62  ]62
  1006. [   50  ]50
  1007.  
  1008. **P13body40
  1009. [Body ]
  1010. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  1011. [-------]
  1012. [  125  ]125
  1013. [  100  ]100
  1014. [   75  ]75
  1015. [   62  ]62
  1016. [   50  ]50
  1017. [   43  ]43
  1018.  
  1019. **P13body41
  1020. [Body ]
  1021. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  1022. [-------]
  1023. [  125  ]125
  1024. [  100  ]100
  1025. [   75  ]75
  1026. [   62  ]62
  1027. [   50  ]50
  1028.  
  1029. **P13body42
  1030. [Body ]
  1031. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  1032. [-------]
  1033. [  125  ]125
  1034. [  100  ]100
  1035. [   75  ]75
  1036. [   62  ]62
  1037.  
  1038. **P13body43
  1039. [Body ]
  1040. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  1041. [-------]
  1042. [  125  ]125
  1043. [  100  ]100
  1044. [   75  ]75
  1045.  
  1046. **P13body44
  1047. [Body ]
  1048. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  1049. [-------]
  1050. [  43   ]43
  1051. [  37   ]37
  1052. [  31   ]31
  1053. [  25   ]25
  1054.  
  1055. **P13body45
  1056. [Body ]
  1057. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  1058. [-------]
  1059. [  100  ]100
  1060. [   75  ]75
  1061. [   62  ]62
  1062. [   50  ]50
  1063. [   43  ]43
  1064. [   37  ]37
  1065. [   31  ]31
  1066. [   25  ]25
  1067.  
  1068. **P13body46
  1069. [Body ]
  1070. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  1071. [-------]
  1072. [  125  ]125
  1073. [  100  ]100
  1074. [   75  ]75
  1075. [   62  ]62
  1076. [   50  ]50
  1077. [   43  ]43
  1078. [   37  ]37
  1079. [   31  ]31
  1080.  
  1081. **P13body47
  1082. [Body ]
  1083. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  1084. [-------]
  1085. [  125  ]125
  1086. [  100  ]100
  1087. [   75  ]75
  1088. [   62  ]62
  1089. [   50  ]50
  1090. [   43  ]43
  1091. [   37  ]37
  1092.  
  1093. **P13point1
  1094. [Point Length]
  1095. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  1096. [------------]
  1097. [    .500    ].500
  1098. [    .750    ].750
  1099. [   1.000    ]1.000
  1100. [   1.250    ]1.250
  1101. [   1.500    ]1.500
  1102.  
  1103. **P13point2
  1104. [Point Length]
  1105. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  1106. [------------]
  1107. [    .500    ].500
  1108. [    .750    ].750
  1109. [   1.000    ]1.000
  1110. [   1.250    ]1.250
  1111.  
  1112. **P13point3
  1113. [Point Length]
  1114. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  1115. [------------]
  1116. [    .750    ].750
  1117. [   1.000    ]1.000
  1118. [   1.250    ]1.250
  1119. [   1.500    ]1.500
  1120.  
  1121. **P13point4
  1122. [Point Length]
  1123. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  1124. [------------]
  1125. [    .500    ].500
  1126. [    .750    ].750
  1127. [   1.000    ]1.000
  1128. [   1.250    ]1.250
  1129.  
  1130. **P13point5
  1131. [Point Length]
  1132. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  1133. [------------]
  1134. [    .750    ].750
  1135. [   1.000    ]1.000
  1136. [   1.250    ]1.250
  1137.  
  1138. **P13olength1
  1139. [Length  ]
  1140. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  1141. [-----------]
  1142. [ 1.50   12 ]12
  1143. [ 1.75   13 ]13
  1144. [ 2.00   20 ]20
  1145. [ 2.25   21 ]21
  1146. [ 2.50   22 ]22
  1147.  
  1148. **P13olength2
  1149. [Length  ]
  1150. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  1151. [-----------]
  1152. [ 1.50   12 ]12
  1153. [ 1.75   13 ]13
  1154. [ 2.00   20 ]20
  1155. [ 2.25   21 ]21
  1156. [ 2.50   22 ]22
  1157.  
  1158. **P13olength3
  1159. [Length  ]
  1160. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  1161. [-----------]
  1162. [ 1.50   12 ]12
  1163. [ 1.75   13 ]13
  1164. [ 2.00   20 ]20
  1165. [ 2.25   21 ]21
  1166. [ 2.50   22 ]22
  1167. [ 2.75   23 ]23
  1168.  
  1169. **P13olength4
  1170. [Length  ]
  1171. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  1172. [-----------]
  1173. [ 1.50   12 ]12
  1174. [ 1.75   13 ]13
  1175. [ 2.00   20 ]20
  1176. [ 2.25   21 ]21
  1177. [ 2.50   22 ]22
  1178. [ 2.75   23 ]23
  1179. [ 3.00   30 ]30
  1180.  
  1181. **P13olength5
  1182. [Length  ]
  1183. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  1184. [-----------]
  1185. [ 1.50   12 ]12
  1186. [ 1.75   13 ]13
  1187. [ 2.00   20 ]20
  1188. [ 2.25   21 ]21
  1189. [ 2.50   22 ]22
  1190. [ 2.75   23 ]23
  1191. [ 3.00   30 ]30
  1192. [ 3.25   31 ]31
  1193.  
  1194. **P13olength6
  1195. [Length  ]
  1196. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  1197. [-----------]
  1198. [ 1.50   12 ]12
  1199. [ 1.75   13 ]13
  1200. [ 2.00   20 ]20
  1201. [ 2.25   21 ]21
  1202. [ 2.50   22 ]22
  1203. [ 2.75   23 ]23
  1204. [ 3.00   30 ]30
  1205. [ 3.25   31 ]31
  1206. [ 3.50   32 ]32
  1207.  
  1208. **P13olength7
  1209. [Length  ]
  1210. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  1211. [-----------]
  1212. [ 1.75   13 ]13
  1213. [ 2.00   20 ]20
  1214. [ 2.25   21 ]21
  1215. [ 2.50   22 ]22
  1216.  
  1217. **P13olength8
  1218. [Length  ]
  1219. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  1220. [-----------]
  1221. [ 1.75   13 ]13
  1222. [ 2.00   20 ]20
  1223. [ 2.25   21 ]21
  1224. [ 2.50   22 ]22
  1225. [ 2.75   23 ]23
  1226.  
  1227. **P13olength9
  1228. [Length  ]
  1229. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  1230. [-----------]
  1231. [ 1.75   13 ]13
  1232. [ 2.00   20 ]20
  1233. [ 2.25   21 ]21
  1234. [ 2.50   22 ]22
  1235. [ 2.75   23 ]23
  1236. [ 3.00   30 ]30
  1237.  
  1238. **P13olength10
  1239. [Length  ]
  1240. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  1241. [-----------]
  1242. [ 1.75   13 ]13
  1243. [ 2.00   20 ]20
  1244. [ 2.25   21 ]21
  1245. [ 2.50   22 ]22
  1246. [ 2.75   23 ]23
  1247. [ 3.00   30 ]30
  1248. [ 3.25   31 ]31
  1249. [ 3.50   32 ]32
  1250.  
  1251. **P13olength11
  1252. [Length  ]
  1253. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  1254. [-----------]
  1255. [ 2.00   20 ]20
  1256. [ 2.25   21 ]21
  1257. [ 2.50   22 ]22
  1258.  
  1259. *P2o0length12
  1260. [Length  ]
  1261. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  1262. [-----------]
  1263. [ 2.00   20 ]20
  1264. [ 2.25   21 ]21
  1265. [ 2.50   22 ]22
  1266. [ 2.75   23 ]23
  1267.  
  1268. **P13olength13
  1269. [Length  ]
  1270. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  1271. [-----------]
  1272. [ 2.00   20 ]20
  1273. [ 2.25   21 ]21
  1274. [ 2.50   22 ]22
  1275. [ 2.75   23 ]23
  1276. [ 3.00   30 ]30
  1277.  
  1278. **P13olength14
  1279. [Length  ]
  1280. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  1281. [-----------]
  1282. [ 2.00   20 ]20
  1283. [ 2.25   21 ]21
  1284. [ 2.50   22 ]22
  1285. [ 2.75   23 ]23
  1286. [ 3.00   30 ]30
  1287. [ 3.25   31 ]31
  1288. [ 3.50   32 ]32
  1289.  
  1290. **P13olength15
  1291. [Length  ]
  1292. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  1293. [-----------]
  1294. [ 2.25   21 ]21
  1295. [ 2.50   22 ]22
  1296. [ 2.75   23 ]23
  1297.  
  1298. **P13olength16
  1299. [Length  ]
  1300. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  1301. [-----------]
  1302. [ 2.25   21 ]21
  1303. [ 2.50   22 ]22
  1304. [ 2.75   23 ]23
  1305. [ 3.00   30 ]30
  1306.  
  1307. **P13olength17
  1308. [Length  ]
  1309. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  1310. [-----------]
  1311. [ 2.25   21 ]21
  1312. [ 2.50   22 ]22
  1313. [ 2.75   23 ]23
  1314. [ 3.00   30 ]30
  1315. [ 3.25   31 ]31
  1316. [ 3.50   32 ]32
  1317.  
  1318. **P13dlength1
  1319. [Length  ]
  1320. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  1321. [-----------]
  1322. [ 0.500  50 ]50
  1323. [ 0.625  62 ]62
  1324. [ 0.750  75 ]75
  1325. [ 0.875  87 ]87
  1326. [ 1.000  100]100
  1327. [ 1.125  112]112
  1328.  
  1329. **P13dlength2
  1330. [Length  ]
  1331. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  1332. [-----------]
  1333. [ 0.500  50 ]50
  1334. [ 0.625  62 ]62
  1335. [ 0.750  75 ]75
  1336. [ 0.875  87 ]87
  1337. [ 1.000  100]100
  1338. [ 1.125  112]112
  1339. [ 1.250  125]125
  1340.  
  1341. **P13dlength3
  1342. [Length  ]
  1343. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  1344. [-----------]
  1345. [ 0.500  50 ]50
  1346. [ 0.625  62 ]62
  1347. [ 0.750  75 ]75
  1348. [ 0.875  87 ]87
  1349. [ 1.000  100]100
  1350. [ 1.125  112]112
  1351. [ 1.250  125]125
  1352. [ 1.375  137]137
  1353.  
  1354. **P13dlength4
  1355. [Length  ]
  1356. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  1357. [-----------]
  1358. [ 0.750  75 ]75
  1359. [ 0.875  87 ]87
  1360. [ 1.000  100]100
  1361. [ 1.125  112]112
  1362. [ 1.250  125]125
  1363. [ 1.375  137]137
  1364.  
  1365. **P13glength1
  1366. [Length  ]
  1367. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  1368. [-----------]
  1369. [ 0.3125 31 ]31
  1370. [ 0.375  37 ]37
  1371. [ 0.500  50 ]50
  1372.  
  1373. **P13glength2
  1374. [Length  ]
  1375. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  1376. [-----------]
  1377. [ 0.375  37 ]37
  1378. [ 0.500  50 ]50
  1379. [ 0.625  62 ]62
  1380.  
  1381. **P13mat1
  1382. [Material]
  1383. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  1384. [--------]
  1385. [   A    ]A
  1386. [   H    ]H
  1387. [   Y    ]Y
  1388. [   X    ]X
  1389.  
  1390. **P13mat2
  1391. [Material]
  1392. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  1393. [--------]
  1394. [   A    ]A
  1395. [   H    ]H
  1396. [   P    ]P
  1397. [   Y    ]Y
  1398. [   PY   ]PY
  1399. [   X    ]X
  1400. [   PX   ]PX
  1401.  
  1402. **P13mat3
  1403. [Material]
  1404. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  1405. [--------]
  1406. [   A    ]A
  1407. [   H    ]H
  1408.  
  1409. **P13mat4
  1410. [Material]
  1411. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  1412. [--------]
  1413. [   H    ]H
  1414. [   P    ]P
  1415.  
  1416. **P13style1
  1417. [Style ]
  1418. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  1419. [----------]
  1420. [  Headed  ]H
  1421. [----------]
  1422. [ Headless ]D
  1423.  
  1424. **P13style2
  1425. [Wire Cut ]
  1426. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  1427. [---------]
  1428. [    Yes   ]Y
  1429. [----------]
  1430. [    No    ]N
  1431.  
  1432. **P13style3
  1433. [ style ]
  1434. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  1435. [---------------]
  1436. [ Headless "G"]G
  1437. [---------------]
  1438. [ Head Down "B" ]B
  1439. [---------------]
  1440. [  Head Up "T" ]T
  1441.  
  1442. **P13D
  1443. [Point size ]
  1444. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  1445. [   Repeat   ];
  1446. [~--]$P2=*
  1447. [    ENTER   ];
  1448. [ BACK SPACE ]^H$P2=*
  1449. [      .     ]._^H$P2=*
  1450. [      0     ]0_^H$P2=*
  1451. [      1     ]1_^H$P2=*
  1452. [      2     ]2_^H$P2=*
  1453. [      3     ]3_^H$P2=*
  1454. [      4     ]4_^H$P2=*
  1455. [      5     ]5_^H$P2=*
  1456. [      6     ]6_^H$P2=*
  1457. [      7     ]7_^H$P2=*
  1458. [      8     ]8_^H$P2=*
  1459. [      9     ]9_^H$P2=*
  1460. [      0     ]0_^H$P2=*
  1461. [ BACK SPACE ]^H$P2=*
  1462. [    ENTER   ];
  1463.  
  1464. **P13E
  1465. [Plan View]
  1466. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  1467. [~--]$P2=*
  1468. [~--]Y
  1469. [   YES    ]Y
  1470. [~--]Y
  1471. [~--]N
  1472. [    NO    ]N
  1473. [~--]N
  1474.  
  1475. **P13E1
  1476. [Side View]
  1477. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  1478. [~--]$P2=*
  1479. [~--]Y
  1480. [   YES    ]Y
  1481. [~--]Y
  1482. [~--]N
  1483. [    NO    ]N
  1484. [~--]N
  1485.  
  1486. **P13F
  1487. [ROTATE  90]
  1488. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  1489. [~--]$P2=*
  1490. [~--]Y
  1491. [   YES    ]Y
  1492. [~--]Y
  1493. [~--]N
  1494. [    NO    ]N
  1495. [~--]N
  1496.  
  1497. **P13tol1
  1498. [Tolerance]
  1499. [-Main Menu-]^C^C^P(menucmd  "P2=P13pivot" "P2=*")
  1500. [------------]
  1501. [Tolerance #1]1
  1502. [------------]
  1503. [Tolerance #2]2
  1504.  
  1505.  
  1506.  
  1507. ***icon
  1508. **poly
  1509. [Set Polymesh and Polyline Variables]
  1510. [acad(pmq)]'setvar surftype 5
  1511. [acad(pmc)]'setvar surftype 6
  1512. [acad(pmb)]'setvar surftype 8
  1513. [acad(plq)]'setvar splinetype 5
  1514. [acad(plc)]'setvar splinetype 6
  1515. [ Set SPLINESEGS]'setvar splinesegs \
  1516. [ Set SPLFRAME]'setvar splframe \
  1517. [ Set DENSITY]'setvar surfu \'setvar surfv \
  1518. [ Exit]$p3=pop3
  1519.  
  1520.  
  1521. **as
  1522. [Select Ashade Command]
  1523. [acad(camera)]^C^C$S=X $S=CAMERA camera \\\$i=as $i=*
  1524. [acad(camview)]^C^C$S=X $S=ASHADE camview
  1525. [acad(point)]^C^C$S=X $S=LIGHTS LIGHT \p \$i=as $i=*
  1526. [acad(directed)]^C^C$S=X $S=LIGHTS LIGHT \d \\$i=as $i=*
  1527. [acad(scene)]^C^C$S=X $S=ACTION scene
  1528. [acad(filmroll)]^C^C$S=X $S=ACTION filmroll
  1529. [ Exit]^c^c
  1530.  
  1531. **ucs
  1532. [User Coordinate System Options]
  1533. [ Set to World]^C^Cucs world
  1534. [acad(left)]^c^c^P(setvar"lastpoint"(trans(getvar"ucsorg")0 1))(princ) +
  1535. ucs 3p \@0,-1,0 @0,0,1 ^P
  1536. [ Set to Screen]^C^Cucs view
  1537. [acad(top)]^c^c^P(setvar"lastpoint"(trans(getvar"ucsorg")0 1))(princ) +
  1538. ucs 3p \@1,0,0 @0,1,0 ^P
  1539. [acad(front)]^c^c^P(setvar"lastpoint"(trans(getvar"ucsorg")0 1))(princ) +
  1540. ucs 3p \@1,0,0 @0,0,1 ^P
  1541. [acad(bottom)]^c^c^P(setvar"lastpoint"(trans(getvar"ucsorg")0 1))(princ) +
  1542. ucs 3p \@1,0,0 @0,-1,0 ^P
  1543. [acad(back)]^c^c^P(setvar"lastpoint"(trans(getvar"ucsorg")0 1))(princ) +
  1544. ucs 3p \@-1,0,0 @0,0,1 ^P
  1545. [acad(right)]^c^c^P(setvar"lastpoint"(trans(getvar"ucsorg")0 1))(princ) +
  1546. ucs 3p \@0,1,0 @0,0,1 ^P
  1547. [ Exit]^c^c
  1548.  
  1549. **3DViews
  1550. [Select View Direction]
  1551. [acad(ul)]^C^CVPOINT R;<<135;
  1552. [acad(l)]^C^CVPOINT R;<<180;
  1553. [acad(ll)]^C^CVPOINT R;<<225;
  1554. [acad(user)]
  1555. [acad(u)]^C^CVPOINT R;<<90;
  1556. [acad(p)]^C^Cvpoint 0,0,1
  1557. [acad(lo)]^C^CVPOINT R;<<270;
  1558. [acad(user)]
  1559. [acad(ur)]^C^CVPOINT R;<<45;
  1560. [acad(r)]^C^CVPOINT R;<<0;
  1561. [acad(lr)]^C^CVPOINT R;<<315;
  1562. [acad(user)]
  1563. [acad(t)]VPOINT;;
  1564. [acad(h)]$S=X $S=HIDE
  1565. [ Exit]^c^c
  1566.  
  1567. **dviewi
  1568. [DVIEW Options]
  1569. [acad(dvca)]^C^C$S=X $S=DVIEW select;\dview;p;;ca;\\;
  1570. [acad(dvzo)]^C^C$S=X $S=DVIEW select;\dview;p;;z;\;
  1571. [acad(dvpa)]^C^C$S=X $S=DVIEW select;\dview;p;;pa;\\;
  1572. [ Exit]^c^c
  1573.  
  1574. **3DObjects
  1575. [3D Objects and 3D Surface Commands]
  1576. [acad(box3d)]^C^C^P(progn(setq m:err *error*)(prin1))+
  1577. (defun m:l3d ()(cond ((null C:BOX)(vmon)(if (/= nil (findfile "3d.lsp"))+
  1578. (progn (terpri)(prompt "Please wait...  Loading 3D Objects.  ");+
  1579. (load "3d")(menucmd "S=X")(menucmd "S=3D2")(princ))(progn (terpri)(prompt +
  1580. "The file `3d.lsp' was not found in your current search path directories. ")(terpri);+
  1581. (prompt "Check installation of the Support Files and try again.")+
  1582. (princ))))(T (princ)))(cond ((not (null C:BOX))(C:BOX))(T (princ)));+
  1583. (setq *error* m:err m:err nil))(defun *error* (msg)(princ msg)+
  1584. (setq *error* m:err m:err nil)(prin1))(m:l3d)(princ) ^P
  1585. [acad(wedge)]^C^C^P(progn(setq m:err *error*)(princ));+
  1586. (defun m:l3d ()(cond ((null C:BOX)(vmon)(if (/= nil (findfile "3d.lsp"))+
  1587. (progn (terpri)(prompt "Please wait...  Loading 3D Objects.  ");+
  1588. (load "3d")(menucmd "S=X")(menucmd "S=3D2")(princ))(progn (terpri)(prompt +
  1589. "The file `3d.lsp' was not found in your current search path directories. ")(terpri);+
  1590. (prompt "Check installation of the Support Files and try again.")+
  1591. (princ))))(T (princ)))(cond ((not (null C:WEDGE))(C:WEDGE))(T (princ)));+
  1592. (setq *error* m:err m:err nil))(defun *error* (msg)(princ msg)+
  1593. (setq *error* m:err m:err nil)(prin1))(m:l3d)(princ) ^P
  1594. [acad(rev)]^C^C$S=X $S=3D revsurf
  1595. [acad(surftab1)]'setvar surftab1 \$I=*
  1596. [acad(pyramid)]^C^C^P(progn(setq m:err *error*)(princ))+
  1597. (defun m:l3d ()(cond ((null C:BOX)(vmon)(if (/= nil (findfile "3d.lsp"))+
  1598. (progn (terpri)(prompt "Please wait...  Loading 3D Objects.  ");+
  1599. (load "3d")(menucmd "S=X")(menucmd "S=3D2")(princ))(progn (terpri)(prompt +
  1600. "The file `3d.lsp' was not found in your current search path directories. ")(terpri);+
  1601. (prompt "Check installation of the Support Files and try again.")+
  1602. (princ))))(T (princ)))(cond ((not (null C:PYRAMID))(C:PYRAMID))(T (princ)));+
  1603. (setq *error* m:err m:err nil))(defun *error* (msg)(princ msg)+
  1604. (setq *error* m:err m:err nil)(prin1))(m:l3d)(princ) ^P
  1605. [acad(cone)]^C^C^P(progn(setq m:err *error*)(princ));+
  1606. (defun m:l3d ()(cond ((null C:BOX)(vmon)(if (/= nil (findfile "3d.lsp"))+
  1607. (progn (terpri)(prompt "Please wait...  Loading 3D Objects.  ");+
  1608. (load "3d")(menucmd "S=X")(menucmd "S=3D2")(princ))(progn (terpri)(prompt +
  1609. "The file `3d.lsp' was not found in your current search path directories. ")(terpri);+
  1610. (prompt "Check installation of the Support Files and try again.")+
  1611. (princ))))(T (princ)))(cond ((not (null C:CONE))(C:CONE))(T (princ)));+
  1612. (setq *error* m:err m:err nil))(defun *error* (msg)(princ msg)+
  1613. (setq *error* m:err m:err nil)(prin1))(m:l3d)(princ) ^P
  1614. [acad(rul)]^C^C$S=X $S=3D rulesurf
  1615. [acad(surftab2)]'setvar surftab2 \$I=*
  1616. [acad(dome)]^C^C^P(progn(setq m:err *error*)(princ));+
  1617. (defun m:l3d ()(cond ((null C:BOX)(vmon)(if (/= nil (findfile "3d.lsp"))+
  1618. (progn (terpri)(prompt "Please wait...  Loading 3D Objects.  ");+
  1619. (load "3d")(menucmd "S=X")(menucmd "S=3D2")(princ))(progn (terpri)(prompt +
  1620. "The file `3d.lsp' was not found in your current search path directories. ")(terpri);+
  1621. (prompt "Check installation of the Support Files and try again.")+
  1622. (princ))))(T (princ)))(cond ((not (null C:DOME))(C:DOME))(T (princ)));+
  1623. (setq *error* m:err m:err nil))(defun *error* (msg)(princ msg)+
  1624. (setq *error* m:err m:err nil)(prin1))(m:l3d)(princ) ^P
  1625. [acad(dish)]^C^C^P(progn(setq m:err *error*)(princ));+
  1626. (defun m:l3d ()(cond ((null C:BOX)(vmon)(if (/= nil (findfile "3d.lsp"))+
  1627. (progn (terpri)(prompt "Please wait...  Loading 3D Objects.  ");+
  1628. (load "3d")(menucmd "S=X")(menucmd "S=3D2")(princ))(progn (terpri)(prompt +
  1629. "The file `3d.lsp' was not found in your current search path directories. ")(terpri);+
  1630. (prompt "Check installation of the Support Files and try again.")+
  1631. (princ))))(T (princ)))(cond ((not (null C:DISH))(C:DISH))(T (princ)));+
  1632. (setq *error* m:err m:err nil))(defun *error* (msg)(princ msg)+
  1633. (setq *error* m:err m:err nil)(prin1))(m:l3d)(princ) ^P
  1634. [acad(edg)]^C^C$S=X $S=3D edgesurf
  1635. [acad(mesh)]^C^C^P(progn(setq m:err *error*)(princ));+
  1636. (defun m:l3d ()(cond ((null C:BOX)(vmon)(if (/= nil (findfile "3d.lsp"))+
  1637. (progn (terpri)(prompt "Please wait...  Loading 3D Objects.  ");+
  1638. (load "3d")(menucmd "S=X")(menucmd "S=3D2")(princ))(progn (terpri)(prompt +
  1639. "The file `3d.lsp' was not found in your current search path directories. ")(terpri);+
  1640. (prompt "Check installation of the Support Files and try again.")+
  1641. (princ))))(T (princ)))(cond ((not (null C:MESH))(C:MESH))(T (princ)));+
  1642. (setq *error* m:err m:err nil))(defun *error* (msg)(princ msg)+
  1643. (setq *error* m:err m:err nil)(prin1))(m:l3d)(princ) ^P
  1644. [acad(sphere)]^C^C^P(progn(setq m:err *error*)(princ));+
  1645. (defun m:l3d ()(cond ((null C:BOX)(vmon)(if (/= nil (findfile "3d.lsp"))+
  1646. (progn (terpri)(prompt "Please wait...  Loading 3D Objects.  ");+
  1647. (load "3d")(menucmd "S=X")(menucmd "S=3D2")(princ))(progn (terpri)(prompt +
  1648. "The file `3d.lsp' was not found in your current search path directories. ")(terpri);+
  1649. (prompt "Check installation of the Support Files and try again.")+
  1650. (princ))))(T (princ)))(cond ((not (null C:SPHERE))(C:SPHERE))(T (princ)));+
  1651. (setq *error* m:err m:err nil))(defun *error* (msg)(princ msg)+
  1652. (setq *error* m:err m:err nil)(prin1))(m:l3d)(princ) ^P
  1653. [acad(torus)]^C^C^P(progn(setq m:err *error*)(princ));+
  1654. (defun m:l3d ()(cond ((null C:BOX)(vmon)(if (/= nil (findfile "3d.lsp"))+
  1655. (progn (terpri)(prompt "Please wait...  Loading 3D Objects.  ");+
  1656. (load "3d")(menucmd "S=X")(menucmd "S=3D2"))(progn (terpri)(prompt +
  1657. "The file `3d.lsp' was not found in your current search path directories. ")(terpri);+
  1658. (prompt "Check installation of the Support Files and try again.")+
  1659. (princ))))(T (princ)))(cond ((not (null C:TORUS))(C:TORUS))(T (princ)));+
  1660. (setq *error* m:err m:err nil))(defun *error* (msg)(princ msg)+
  1661. (setq *error* m:err m:err nil)(prin1))(m:l3d)(princ) ^P
  1662. [acad(tab)]^C^C$S=X $S=3D tabsurf
  1663. [ Exit]^c^c
  1664.  
  1665. **fonts1
  1666. [Select Text Font]
  1667. [acad(romans)]^c^cstyle romans romans
  1668. [acad(romanc)]^c^cstyle romanc romanc
  1669. [acad(italicc)]^c^cstyle italicc italicc
  1670. [acad(romand)]^c^cstyle romand romand
  1671. [acad(romant)]^c^cstyle romant romant
  1672. [acad(italict)]^c^cstyle italict italict
  1673. [acad(monotxt)]^c^cstyle monotxt monotxt
  1674. [ Next]$i=fonts2 $i=*
  1675. [ Exit]^c^c
  1676.  
  1677. **fonts2
  1678. [Select Text Font]
  1679. [acad(gothice)]^c^cstyle gothice gothice
  1680. [acad(greeks)]^c^cstyle greeks greeks
  1681. [acad(scripts)]^c^cstyle scripts scripts
  1682. [acad(gothicg)]^c^cstyle gothicg gothicg
  1683. [acad(greekc)]^c^cstyle greekc greekc
  1684. [acad(scriptc)]^c^cstyle scriptc scriptc
  1685. [acad(gothici)]^c^cstyle gothici gothici
  1686. [ Next]$i=fonts3 $i=*
  1687. [ Exit]^c^c
  1688.  
  1689. **fonts3
  1690. [Select Text Font]
  1691. [acad(syastro)]^c^cstyle syastro syastro
  1692. [acad(symath)]^c^cstyle symath symath
  1693. [acad(symusic)]^c^cstyle symusic symusic
  1694. [acad(symap)]^c^cstyle symap symap
  1695. [acad(symeteo)]^c^cstyle symeteo symeteo
  1696. [acad(txt)]^c^cstyle txt txt
  1697. [acad(user)]
  1698. [ Beginning]$i=fonts1 $i=*
  1699. [ Exit]^c^c
  1700.  
  1701. **hatch1
  1702. [Select Hatch Pattern]
  1703. [ Previous/User]^c^chatch
  1704. [acad(ansi31)]^c^chatch ansi31
  1705. [acad(ansi32)]^c^chatch ansi32
  1706. [acad(ansi34)]^c^chatch ansi34
  1707. [acad(ansi35)]^c^chatch ansi35
  1708. [acad(ansi33)]^c^chatch ansi33
  1709. [acad(ansi36)]^c^chatch ansi36
  1710. [acad(ansi37)]^c^chatch ansi37
  1711. [acad(ansi38)]^c^chatch ansi38
  1712. [acad(box)]^c^chatch box
  1713. [acad(brass)]^c^chatch brass
  1714. [acad(brick)]^c^chatch brick
  1715. [acad(clay)]^c^chatch clay
  1716. [acad(cork)]^c^chatch cork
  1717. [ Next]$i=hatch2 $i=*
  1718. [ Exit]^c^c
  1719.  
  1720. **hatch2
  1721. [Select Hatch Pattern]
  1722. [acad(cross)]^c^chatch cross
  1723. [acad(dash)]^c^chatch dash
  1724. [acad(dolmit)]^c^chatch dolmit
  1725. [acad(dots)]^c^chatch dots
  1726. [acad(earth)]^c^chatch earth
  1727. [acad(escher)]^c^chatch escher
  1728. [acad(flex)]^c^chatch flex
  1729. [acad(grass)]^c^chatch grass
  1730. [acad(grate)]^c^chatch grate
  1731. [acad(hex)]^c^chatch hex
  1732. [acad(honey)]^c^chatch honey
  1733. [acad(hound)]^c^chatch hound
  1734. [acad(insul)]^c^chatch insul
  1735. [acad(line)]^c^chatch line
  1736. [ Next]$i=hatch3 $i=*
  1737. [ Exit]^c^c
  1738.  
  1739. **hatch3
  1740. [Select Hatch Pattern]
  1741. [acad(mudst)]^c^chatch mudst
  1742. [acad(net)]^c^chatch net
  1743. [acad(net3)]^c^chatch net3
  1744. [acad(plast)]^c^chatch plast
  1745. [acad(plasti)]^c^chatch plasti
  1746. [acad(sacncr)]^c^chatch sacncr
  1747. [acad(square)]^c^chatch square
  1748. [acad(stars)]^c^chatch stars
  1749. [acad(steel)]^c^chatch steel
  1750. [acad(swamp)]^c^chatch swamp
  1751. [acad(trans)]^c^chatch trans
  1752. [acad(triang)]^c^chatch triang
  1753. [acad(zigzag)]^c^chatch zigzag
  1754. [acad(angle)]^c^chatch angle
  1755. [ Beginning]$i=hatch1 $i=*
  1756. [ Exit]^c^c
  1757.  
  1758. **vporti
  1759. [Viewport Settings (Current is dominant)]
  1760. [acad(vp1)]^C^CVPORTS;SI
  1761. [acad(vp3v)]^C^CVPORTS;SI;;3;v
  1762. [acad(vp3h)]^C^CVPORTS;SI;;3;h
  1763. [acad(vp4)]^C^CVPORTS;SI;;4
  1764. [acad(vp2v)]^C^CVPORTS;SI;;2;v
  1765. [acad(vp3r)]^C^CVPORTS;SI;;3;r
  1766. [acad(vp3l)]^C^CVPORTS;SI;;3;l
  1767. [acad(vp4l)]^C^C^PUNDO;M;(setq m:g (getvar "gridmode"));SETVAR;GRIDMODE;0;+
  1768. VPORTS;SI;;2;;(setvar "CVPORT" (car (cadr (vports))))(princ);;2;;;J;;+
  1769. (car (cadr (vports)));(setvar "CVPORT" (car (cadr (vports))))(princ)+
  1770. ;;3;h;(setvar "gridmode" m:g)(princ);ZOOM;A;(setvar "CVPORT"+
  1771. (car (cadddr (vports))))(setvar "gridmode" m:g)(princ);ZOOM;A;+
  1772. (setvar "CVPORT" (car (cadddr (vports))))(setvar "gridmode" m:g)(princ);+
  1773. ZOOM;A;(setvar "CVPORT" (car (cadddr (vports))))(setvar "gridmode" m:g)+
  1774. (princ);ZOOM;A;UNDO;E ^P
  1775. [acad(vp2h)]^C^CVPORTS;SI;;2;h
  1776. [acad(vp3a)]^C^CVPORTS;SI;;3;a;
  1777. [acad(vp3b)]^C^CVPORTS;SI;;3;b;
  1778. [acad(vp4r)]^C^C^PUNDO;M;(setq m:g (getvar "gridmode"));SETVAR;GRIDMODE;0;+
  1779. VPORTS;SI;;2;;;2;;(setvar "CVPORT" (car (caddr (vports))));;j;;+
  1780. (car (caddr (vports)));(setvar "CVPORT" (car (cadr (vports))));;3;h;+
  1781. (setvar "gridmode" m:g)(princ);ZOOM;A;(setvar "CVPORT" (car (cadddr (vports))))+
  1782. (setvar "gridmode" m:g)(princ);ZOOM;A;(setvar "CVPORT" (car (cadddr (vports))))+
  1783. (setvar "gridmode" m:g)(princ);ZOOM;A;(setvar "CVPORT" (car (cadddr (vports))))+
  1784. (setvar "gridmode" m:g)(princ);ZOOM;A;UNDO;E ^P
  1785. [ Join Viewports]^C^CVPORTS;J
  1786. [ Restore Saved]^C^CVPORTS;R;
  1787. [ List Saved]^C^CVPORTS;?;
  1788. [ Exit]^c^c
  1789.  
  1790. ***SCREEN
  1791. **S
  1792. [AutoCAD]^C^C$S=X $S=S $P1=POP1 $P3=POP3
  1793. [* * * *]$S=OSNAPB
  1794. [Setup]^C^C^P(progn(prompt "Loading setup...   ")(load "setup")) ^P$S=X $S=UNITS
  1795.  
  1796. [BLOCKS]$S=X $S=BL
  1797. [DIM:]$S=X $S=DIM ^C^CDIM
  1798. [DISPLAY]$S=X $S=DS
  1799. [DRAW]$S=X $S=DR
  1800. [EDIT]$S=X $S=ED
  1801. [INQUIRY]$S=X $S=INQ
  1802. [LAYER:]$S=X $S=LAYER ^C^CLAYER
  1803. [SETTINGS]$S=X $S=SET
  1804. [PLOT]$S=X $S=PLOT
  1805. [UCS:]$S=X $S=UCS1 ^C^CUCS
  1806. [UTILITY]$S=X $S=UT
  1807.  
  1808. [3D]$S=X $S=3D
  1809. [ASHADE]^C^C^P(progn(setq m:err *error*)(prin1))(defun *error* (msg)(princ msg)+
  1810. (setq *error* m:err m:err nil)(princ))(cond ((null C:SCENE)(vmon)+
  1811. (if (/= nil (findfile "ashade.lsp"))(progn (terpri);+
  1812. (prompt "Please wait...  Loading ashade.  ")(load "ashade")+
  1813. (menucmd "S=X")(menucmd "S=ASHADE")(setq *error* m:err m:err nil))(progn (terpri);+
  1814. (prompt "The file 'Ashade.lsp' was not found in your current search directories.")+
  1815. (terpri)(prompt "Check your AutoShade Manual for installation instructions.");+
  1816. (setq *error* m:err m:err nil)(princ))))+
  1817. (T (setq *error* m:err m:err nil)(menucmd "S=X")(menucmd "S=ASHADE")(princ))) ^P
  1818.  
  1819. [SAVE:]^C^CSAVE
  1820. **X 3
  1821.  
  1822.  
  1823.  
  1824.  
  1825.  
  1826.  
  1827.  
  1828.  
  1829.  
  1830.  
  1831.  
  1832.  
  1833.  
  1834.  
  1835.  
  1836. [__LAST__]$S= $S=
  1837. [  DRAW  ]^C^C$S=X $S=DR
  1838. [  EDIT  ]^C^C$S=X $S=ED
  1839. **BL 3
  1840. [ATTDEF:]$S=X $S=ATTDEF ^C^CATTDEF
  1841. [BASE:]^C^CBASE
  1842. [BLOCK:]$S=X $S=BLOCK ^C^CBLOCK
  1843. [INSERT:]$S=X $S=INSERT ^C^CINSERT
  1844. [MINSERT:]$S=X $S=MINSERT ^C^CMINSERT
  1845. [WBLOCK:]$S=X $S=WBLOCK ^C^CWBLOCK
  1846. **DS 3
  1847.  
  1848. [ATTDISP:]$S=X $S=ATTDISP ^C^CATTDISP
  1849. [DVIEW:]$S=X $S=DVIEW ^C^CDVIEW
  1850. [PAN:]'PAN
  1851. [PLAN:]$S=X $S=PLAN ^C^CPLAN
  1852. [REDRAW:]'REDRAW
  1853. [REDRALL:]'REDRAWALL
  1854. [REGEN:]^C^CREGEN
  1855. [REGNALL:]^C^CREGENALL
  1856. [RGNAUTO:]$S=X $S=RGNAUTO ^C^CREGENAUTO
  1857. [VIEW:]$S=X $S=VIEW 'VIEW
  1858. [VIEWRES:]$S=X $S=VIEWRES ^C^CVIEWRES
  1859. [VPOINT:]$S=X $S=VPOINT ^C^CVPOINT
  1860. [ZOOM:]$S=X $S=ZOOM 'ZOOM
  1861. **DR 3
  1862. [ARC]$S=X $S=ARC
  1863. [ATTDEF:]$S=X $S=ATTDEF ^C^CATTDEF
  1864. [CIRCLE]$S=X $S=CIRCLE
  1865. [DONUT:]^C^CDONUT
  1866. [DTEXT:]$S=X $S=DTEXT ^C^CDTEXT
  1867. [ELLIPSE:]$S=X $S=ELLIPSE ^C^CELLIPSE
  1868. [HATCH:]$S=X $S=HATCH ^C^CHATCH
  1869. [INSERT:]$S=X $S=INSERT ^C^CINSERT
  1870. [LINE:]$S=X $S=LINE ^C^CLINE
  1871. [MINSERT:]$S=X $S=MINSERT ^C^CMINSERT
  1872. [OFFSET:]$S=X $S=OFFSET ^C^COFFSET
  1873. [PLINE:]$S=X $S=PLINE ^C^CPLINE
  1874.  
  1875. [next]$S=X $S=DR2
  1876. **DR2 3
  1877. [POINT:]$S=X $S=POINT ^C^CPOINT
  1878. [POLYGON:]$S=X $S=POLYGON ^C^CPOLYGON
  1879. [SHAPE:]$S=X $S=SHAPE ^C^CSHAPE
  1880. [SKETCH:]$S=X $S=SKETCH ^C^CSKETCH
  1881. [SOLID:]$S=X $S=SOLID ^C^CSOLID
  1882. [TEXT:]$S=X $S=TEXT ^C^CTEXT
  1883. [TRACE:]$S=X $S=TRACE ^C^CTRACE
  1884. [3DFACE:]$S=X $S=3DFACE ^C^C3DFACE
  1885.  
  1886. [3D]$S=X $S=3D
  1887.  
  1888.  
  1889.  
  1890. [previous]$S=X $S=DR
  1891.  
  1892. [__LAST__]$S= $S=
  1893. **ED 3
  1894. [ARRAY:]$S=X $S=ARRAY ^C^CARRAY
  1895. [ATTEDIT:]$S=X $S=ATTEDIT ^C^CATTEDIT
  1896. [DDATTE:]^C^CDDATTE
  1897. [BREAK:]$S=X $S=BREAK ^C^CBREAK
  1898. [CHAMFER:]$S=X $S=CHAMFER ^C^CCHAMFER
  1899. [CHANGE:]$S=X $S=CHANGE ^C^CCHANGE
  1900. [CHPROP:]$S=X $S=CHPROP ^C^CCHPROP
  1901. [COPY:]$S=X $S=COPY ^C^CCOPY
  1902. [DIVIDE:]$S=X $S=DIVIDE ^C^CDIVIDE
  1903. [ERASE:]$S=X $S=ERASE ^C^CERASE
  1904. [EXPLODE:]^C^CEXPLODE
  1905. [EXTEND:]$S=X $S=EXTEND ^C^CEXTEND
  1906.  
  1907. [next]$S=X $S=ED2
  1908. **ED2 3
  1909. [FILLET:]$S=X $S=FILLET ^C^CFILLET
  1910. [MEASURE:]$S=X $S=MEASURE ^C^CMEASURE
  1911. [MIRROR:]$S=X $S=MIRROR ^C^CMIRROR
  1912. [MOVE:]$S=X $S=MOVE ^C^CMOVE
  1913. [OFFSET:]$S=X $S=OFFSET ^C^COFFSET
  1914. [PEDIT:]^C^C^P+
  1915. (defun m:p1(/ m:pa m:pc m:d m:w)(menucmd "S=X")(menucmd "S=PSEL");+
  1916. (setq m:d T)(while m:d (setq m:pc (ssget))(setq m:pa (ssname m:pc 0));+
  1917. (if(=(cdr(assoc 0 (entget m:pa))) "POLYLINE")(progn(setq m:d nil)+
  1918. (m:p2 m:pa m:pc))(progn(prompt "Entity selected is not a polyline")(terpri);+
  1919. (if (member (cdr (assoc 0 (entget m:pa))) '("LINE" "ARC"))(progn+
  1920. (initget "Yes No")(setq m:w (getkword "Do you want to turn it into one? <Y>"));+
  1921. (if (or (= m:w "Yes")(null m:w))(progn(setq m:d nil)(menucmd "S=X");+
  1922. (menucmd "S=P0")(command "PEDIT" m:pa "yes" pause)))))))))+
  1923. (defun m:p2(m:pa m:pc / m:pb)(menucmd "S=X")+
  1924. (if (= (setq m:pb (cdr (assoc 70 (entget m:pa)))) nil)(menucmd "S=P0");+
  1925. (progn (setq m:pb (/ m:pb 2))(if (>= m:pb 8)(menucmd "S=P16");+
  1926. (if(< m:pb 4)(menucmd "S=P0")(menucmd "S=P8")))))(command "PEDIT" m:pa pause))+
  1927. (defun perror (msg)(setq *error* m:err m:err nil)(princ))+
  1928. (defun C:PEDITM (/ m:err)(setq m:err *error* *error* perror)(m:p1);+
  1929. (setq *error* m:err m:err nil)(princ))(princ) PEDITM ^P
  1930. [ROTATE:]$S=X $S=ROTATE ^C^CROTATE
  1931. [SELECT:]$S=X $S=SELECT ^C^CSELECT
  1932. [SCALE:]$S=X $S=SCALE ^C^CSCALE
  1933. [STRETCH:]$S=X $S=STRETCH ^C^CSTRETCH C
  1934. [TRIM:]$S=X $S=TRIM ^C^CTRIM
  1935. [UNDO:]$S=X $S=UNDO ^C^CUNDO
  1936.  
  1937. [previous]$S=X $S=ED
  1938. **INQ 5
  1939. [AREA:]$S=X $S=AREA ^C^CAREA
  1940. [DBLIST:]^CDBLIST
  1941. [DIST:]^C^CDIST
  1942. [HELP:]'HELP
  1943. [ID:]$S=X $S=ID ^C^CID
  1944. [LIST:]$S=X $S=LIST ^C^CLIST
  1945. [STATUS:]^C^CSTATUS
  1946. [TIME:]^C^CTIME
  1947. **SET 3
  1948. [DDEMODES]'DDEMODES
  1949. [DDRMODES]'DDRMODES
  1950. [--------]
  1951. [APERTUR:]$S=X $S=APERTURE ^C^CAPERTURE
  1952. [AXIS:]$S=X $S=AXIS ^C^CAXIS
  1953. [BLIPS:]$S=X $S=BLIPMODE ^C^CBLIPMODE
  1954. [COLOR:]$S=X $S=COLOR ^C^CCOLOR
  1955. [DRAGMOD:]$S=X $S=DRAGMODE ^C^CDRAGMODE
  1956. [ELEV:]^C^CELEV
  1957. [GRID:]$S=X $S=GRID ^C^CGRID
  1958. [HANDLES:]$S=X $S=HANDLES ^C^CHANDLES
  1959. [LINETYP:]$S=X $S=LINETYPE ^C^CLINETYPE
  1960. [LIMITS:]$S=X $S=LIMITS ^C^CLIMITS
  1961.  
  1962. [next]$S=X $S=SET2
  1963. **SET2 3
  1964. [LTSCALE:]^C^CLTSCALE
  1965. [OSNAP:]$S=X $S=OSNAPC ^C^COSNAP
  1966. [QTEXT:]$S=X $S=QTEXT ^C^CQTEXT
  1967. [SETVAR:]$S=X $S=SETVAR 'SETVAR
  1968. [SNAP:]$S=X $S=SNAP ^C^CSNAP
  1969. [STYLE:]$S=X $S=STYLE ^C^CSTYLE
  1970. [TABLET:]$S=X $S=TABLET ^C^CTABLET
  1971. [UCS:]$S=X $S=UCS1 ^C^CUCS
  1972. [UCSICON:]$S=X $S=UCSICON ^C^CUCSICON
  1973. [UNITS:]^CUNITS
  1974. [VPORTS:]$S=X $S=VPORTS ^C^CVPORTS
  1975.  
  1976.  
  1977.  
  1978. [previous]$S=X $S=SET
  1979. **PLOT 3
  1980.  
  1981. [ C   D]
  1982. [ H   E]
  1983. [ O   V]
  1984. [ O   I]
  1985. [ S   C]
  1986. [ E   E]
  1987.  
  1988.  
  1989. [PLOTTER]^C^CPLOT
  1990.  
  1991. [PRINTER]^C^CPRPLOT
  1992. **UT 3
  1993. [ATTEXT:]$S=X $S=ATTEXT ^C^CATTEXT
  1994. [DXF/DXB]$S=X $S=DXF
  1995. [FILES:]^C^CFILES
  1996. [IGES]$S=X $S=IGES
  1997. [MENU:]$S=X $S=CHTEMP ^C^CMENU
  1998. [PURGE:]$S=X $S=PURGE ^C^CPURGE
  1999. [RENAME:]$S=X $S=RENAME ^C^CRENAME
  2000. [SCRIPT:]$S=X $S=SCRIPT ^C^CSCRIPT
  2001. [SLIDES]$S=X $S=SLIDES
  2002.  
  2003. [External]$S=X $S=EXCOMDS
  2004. [Commands]$S=X $S=EXCOMDS
  2005.  
  2006. [END]$S=X $S=END
  2007. [QUIT]$S=X $S=QUIT
  2008. **OSNAPB 2
  2009. [  HELP  ]$S= 'help 
  2010. [CENter]CENTER $S=
  2011. [ENDpoint]ENDPOINT $S=
  2012. [INSert]INSERT $S=
  2013. [INTersec]INTERSEC $S=
  2014. [MIDpoint]MIDPOINT $S=
  2015. [NEArest]NEAREST $S=
  2016. [NODe]NODE $S=
  2017. [PERpend]PERPEND $S=
  2018. [QUAdrant]QUADRANT $S=
  2019. [QUICK,]QUICK,^Z
  2020. [TANgent]TANGENT $S=
  2021. [NONE]NONE $S=
  2022. [CANCEL:]^C^C$S=
  2023. [U:]^C^CU $S=
  2024. [REDO:]^C^CREDO $S=
  2025. [REDRAW:]'REDRAW $S=
  2026. [SETVAR:]$S= 'SETVAR
  2027. [__LAST__]$S=
  2028. **BLOCK 3
  2029. [BLOCK:]^C^CBLOCK
  2030. ?
  2031.  
  2032. Window
  2033. Last
  2034. Previous
  2035. Crossing
  2036. Remove
  2037. Add
  2038.  
  2039. Yes
  2040. [OOPS]^C^COOPS
  2041. **INSERT 3
  2042. [INSERT:]^C^CINSERT
  2043. ?
  2044. [*]*\
  2045. corner
  2046. xyz
  2047. drag
  2048.  
  2049. Scale
  2050. Xscale
  2051. Yscale
  2052. Zscale
  2053. Rotate
  2054. **WBLOCK 3
  2055. [WBLOCK:]^C^CWBLOCK
  2056.  
  2057. =
  2058. *
  2059. [blank];
  2060.  
  2061. Window
  2062. Last
  2063. Previous
  2064. Crossing
  2065. Remove
  2066. Add
  2067. Undo
  2068. **MINSERT 3
  2069. [MINSERT:]^C^CMINSERT
  2070. ?
  2071.  
  2072. corner
  2073. xyz
  2074. drag
  2075. **DIM 3
  2076. [DIM:]^C^CDIM
  2077. [DIM1:]^C^CDIM1
  2078.  
  2079. [LINEAR]$S=X $S=DIMLINEAR
  2080. angular
  2081. diameter
  2082. radius
  2083. center
  2084. leader
  2085. [Dim Vars]$S=X $S=VAR1
  2086. [redraw]'REDRAW
  2087. status
  2088. undo
  2089. style
  2090. [EXIT]EXIT;$S=X $S=S
  2091. [next]$S=X $S=FORMAT
  2092. **DIMLINEAR 3
  2093. [DIM:]^C^CDIM
  2094. [DIM1:]^C^CDIM1
  2095.  
  2096. horiz
  2097. vertical
  2098. aligned
  2099. rotated
  2100.  
  2101. [baseline]^C^Cdim BASE
  2102. [continue]^C^Cdim CONT
  2103.  
  2104.  
  2105.  
  2106. [previous]$S=X $S=DIM
  2107. **ATTDEF 3
  2108. [ATTDEF:]^C^CATTDEF
  2109.  
  2110. Invisibl
  2111. Constant
  2112. Verify
  2113. [Preset]P
  2114.  
  2115. Aligned
  2116. [Centered]C
  2117. Fit
  2118. Middle
  2119. Right
  2120. Style
  2121. **LAYER 3
  2122. [DDLMODES]'DDLMODES
  2123. [LAYER:]^C^CLAYER
  2124. [?]? *
  2125.  
  2126. Make
  2127. Set
  2128. New
  2129. ON
  2130. OFF
  2131. [Color]COLOR $S=X $S=LACOLOR \$S=X $S=LAYER
  2132. [Chroma]^C^CVSLIDE chroma
  2133. [ Restore]'REDRAW
  2134. [Ltype]LTYPE $S=X $S=LALT \$S=X $S=LAYER
  2135. Freeze
  2136. Thaw
  2137. **LACOLOR 3
  2138. [COLOR]
  2139.  
  2140. red
  2141. yellow
  2142. green
  2143. cyan
  2144. blue
  2145. magenta
  2146. white
  2147.  
  2148.  
  2149.  
  2150.  
  2151.  
  2152. **LALT 3
  2153. [LINETYPE]
  2154.  
  2155. [contin.]CONTINUOUS
  2156. dashed
  2157. hidden
  2158. center
  2159. phantom
  2160. dot
  2161. dashdot
  2162. border
  2163. divide
  2164.  
  2165. **ZOOM 3
  2166. [ZOOM:]'ZOOM
  2167.  
  2168. All
  2169. [Center]C
  2170. Dynamic
  2171. Extents
  2172. Left
  2173. Previous
  2174. Window
  2175.  
  2176. Yes
  2177. No
  2178. **ATTDISP 3
  2179. [ATTDISP:]^C^CATTDISP
  2180.  
  2181. Normal
  2182. ON
  2183. OFF
  2184. **DVIEW 3
  2185. [DVIEW:]^C^CDview
  2186.  
  2187. Window
  2188. Last
  2189. Previous
  2190. Crossing
  2191. Remove
  2192. Add
  2193.  
  2194. [By Layer]^P(defun berror (msg)(setq *error* m:err m:err nil)(princ))+
  2195. (progn (setq m:err *error* *error* berror);+
  2196. (setq l(getstring (strcat "Layer name: <" (getvar "clayer") "> ")))+
  2197. (if (= l "")(setq s(ssget "X" (list(cons 8 (getvar "clayer")))))+
  2198. (setq s(ssget "X" (list(cons 8 l)))))(setq *error* m:err m:err nil) s) ^P
  2199. [--------]
  2200. [Dviewblk]^C^CDVIEW;;
  2201.  
  2202. [ Dview ]$S=X $S=DVIEW1
  2203. [Options]$S=X $S=DVIEW1
  2204. **DVIEW1 3
  2205. CAmera
  2206. TArget
  2207. Distance
  2208. POints
  2209. PAn
  2210. Zoom
  2211. TWist
  2212. [CLip]Clip $S=X $S=DVIEW2
  2213. Hide
  2214. Off
  2215. Undo
  2216.  
  2217. [eXit]Exit $S=X $S=S
  2218. **DVIEW2 3
  2219. [Back]Back $S=X $S=BACK
  2220. [Front]Front $S=X $S=FRONT
  2221. [Off]Off $S=X $S=DVIEW1
  2222. **BACK 3
  2223. [ back]
  2224. [clipping]
  2225.  
  2226. [ON]On $S=X $S=DVIEW1
  2227. [OFF]Off $S=X $S=DVIEW1
  2228. **FRONT 3
  2229. [ front]
  2230. [clipping]
  2231.  
  2232. [ON]On $S=X $S=DVIEW1
  2233. [OFF]Off $S=X $S=DVIEW1
  2234.  
  2235. [Eye]Eye $S=X $S=DVIEW1
  2236. **RGNAUTO 3
  2237. [RGNAUTO:]^C^CREGENAUTO
  2238.  
  2239. [ON]On $S=X $S=DS
  2240. [OFF]Off $S=X $S=DS
  2241. **VIEW 3
  2242. [VIEW:]'VIEW
  2243. ?
  2244.  
  2245. [Delete]Delete;
  2246. [Restore]Restore;
  2247. [Save]Save;
  2248. [Window]Window;
  2249. **VPORTS 3
  2250. [VPORTS:]^C^CVPORTS
  2251.  
  2252. Save
  2253. Restore
  2254. Delete
  2255. Join
  2256. Single
  2257. ?
  2258.  
  2259. [2]2 $S=X $S=VP2
  2260. [3]3 $S=X $S=VP3
  2261. 4
  2262. **VP2 3
  2263.  
  2264. [Horizont]H $S=X $S=VPORTS
  2265. [Vertical]V $S=X $S=VPORTS
  2266. **VP3 3
  2267.  
  2268. [Horizont]H $S=X $S=VPORTS
  2269. [Vertical]V $S=X $S=VPORTS
  2270. [Above]A $S=X $S=VPORTS
  2271. [Below]B $S=X $S=VPORTS
  2272. [Left]L $S=X $S=VPORTS
  2273. [Right]R $S=X $S=VPORTS
  2274. **LINE 3
  2275. [LINE:]^C^CLINE
  2276.  
  2277. [continue]^C^CLINE;;
  2278. close
  2279. undo
  2280. .x
  2281. .y
  2282. .z
  2283. .xy
  2284. .xz
  2285. .yz
  2286. **3D 3
  2287. [EDGSURF:]^C^CEDGESURF
  2288. [REVSURF:]^C^CREVSURF
  2289. [RULSURF:]^C^CRULESURF
  2290. [TABSURF:]^C^CTABSURF
  2291.  
  2292. [Surftb1:]'SETVAR SURFTAB1
  2293. [Surftb2:]'SETVAR SURFTAB2
  2294.  
  2295. [3DFACE:]$S=X $S=3DFACE ^C^C3DFACE
  2296. [3DMESH:]^C^C3DMESH
  2297. [3DPOLY:]$S=X $S=3DPOLY ^C^C3DPOLY
  2298.  
  2299. [  3d   ]^C^C^P(progn(setq m:err *error*)(princ))+
  2300. (defun m:l3d () (cond ((null C:BOX)(vmon)(if (/= nil (findfile "3d.lsp"))+
  2301. (progn (terpri)(prompt "Please wait...  Loading 3D Objects.  ");+
  2302. (load "3d")(menucmd "S=X")(menucmd "S=3D2")(princ))(progn(terpri)(prompt +
  2303. "The file `3d.lsp' was not found in your search path directories. ")(terpri);+
  2304. (prompt "Check installation of the Support Files and try again.");+
  2305. (princ))))((not (null C:BOX)) (menucmd "S=X") (menucmd "S=3D2")(princ))+
  2306. (T(princ)))(setq *error* m:err m:err nil))(defun *error* (msg)(princ msg);+
  2307. (menucmd "S=X")(menucmd "S=S")(setq *error* m:err m:err nil)(princ))(m:l3d);^P
  2308. [objects]^C^C^P(progn(setq m:err *error*)(princ))+
  2309. (defun m:l3d () (cond ((null C:BOX)(vmon)(if (/= nil (findfile "3d.lsp"))+
  2310. (progn (terpri)(prompt "Please wait...  Loading 3D Objects.  ");+
  2311. (load "3d")(menucmd "S=X")(menucmd "S=3D2")(princ))(progn(terpri)(prompt +
  2312. "The file `3d.lsp' was not found in your search path directories. ")(terpri);+
  2313. (prompt "Check installation of the Support Files and try again.");+
  2314. (princ))))((not (null C:BOX)) (menucmd "S=X") (menucmd "S=3D2")(princ))+
  2315. (T(princ)))(setq *error* m:err m:err nil))(defun *error* (msg)(princ msg);+
  2316. (menucmd "S=X")(menucmd "S=S")(setq *error* m:err m:err nil)(princ))(m:l3d);^P
  2317.  
  2318. **3D2 3
  2319.  
  2320. Box
  2321. Cone
  2322. Dish
  2323. Dome
  2324. Mesh
  2325. Pyramid
  2326. Sphere
  2327. Torus
  2328. Wedge
  2329. **ELEVTHK 3
  2330. [ELEV:]^C^CELEV
  2331.  
  2332. [CHANGE:]^C^CCHANGE
  2333. Window
  2334. Last
  2335. Previous
  2336. Crossing
  2337. Remove
  2338. Add
  2339. Undo
  2340. [Elev]PROP E
  2341. [Thick]PROP T
  2342. **HIDE 3
  2343. [HIDE ?]
  2344.  
  2345. [YES]^C^CHIDE
  2346. [NO]$S= $S=
  2347. **VPOINT 3
  2348. [VPOINT:]^C^CVPOINT
  2349.  
  2350. [rotate]rotate;
  2351. [axes];
  2352. [plan]none 0,0,1
  2353.  
  2354. [HIDE:]$S=X $S=HIDE
  2355. **VPOINT3D 3
  2356. [ Angle  ]^C^CVPOINT R;;
  2357. [from XY ]^C^CVPOINT R;;
  2358. [ Plane  ]^C^CVPOINT R;;
  2359. [    +80 ]<<80
  2360. [    +60 ]<<60
  2361. [    +45 ]<<45
  2362. [    +30 ]<<30
  2363. [    +10 ]<<10
  2364. [      0 ]<<0
  2365. [    -10 ]<<350
  2366. [    -30 ]<<330
  2367. [    -45 ]<<315
  2368. [    -60 ]<<300
  2369. [    -80 ]<<280
  2370. **PLINE 3
  2371. [PLINE:]^C^CPLINE
  2372.  
  2373. [Arc]ARC $S=X $S=PARC
  2374. Close
  2375. Halfwid
  2376. Length
  2377. Undo
  2378. Width
  2379.  
  2380. [FILL ON]'SETVAR FILLMODE 1
  2381. [FILL OFF]'SETVAR FILLMODE 0
  2382. **PARC 3
  2383. [POLYARC]
  2384.  
  2385. [angle]$S=X $S=PARCANG A
  2386. [CEnter]$S=X $S=PARCEN CE
  2387. [tanDir]D \DRAG
  2388. [Radius]$S=X $S=PARCRAD R
  2389. [2nd PT]S \DRAG
  2390. [CLose]$S=X $S=PLINE CLOSE
  2391.  
  2392. undo
  2393.  
  2394. [contline]$S=X $S=PLINE L
  2395.  
  2396. [PLINE:]$S=X $S=PLINE ^C^CPLINE
  2397. **PARCANG 3
  2398. [ANGLE]
  2399.  
  2400. [center]$S=X $S=PARC Center drag
  2401. [radius]$S=X $S=PARC R \
  2402. [drag]$S=X $S=PARC drag
  2403. **PARCEN 3
  2404. [CENTER]
  2405.  
  2406. [angle]$S=X $S=PARC A drag
  2407. [length]$S=X $S=PARC L drag
  2408. [drag]$S=X $S=PARC drag
  2409. **PARCRAD 3
  2410. [RADIUS]
  2411.  
  2412. [angle]A \drag $S=X $S=PARC A \drag
  2413. [drag]$S=X $S=PARC drag
  2414. **OFFSET 3
  2415. [OFFSET:]^C^COFFSET
  2416.  
  2417. Through
  2418.  
  2419. [done];
  2420.  
  2421. **ARC 3
  2422. [ARC]
  2423.  
  2424. [3-point:]^C^CARC \\DRAG
  2425. [S,C,E:]^C^CARC \C \DRAG
  2426. [S,C,A:]^C^CARC \C \A DRAG
  2427. [S,C,L:]^C^CARC \C \L DRAG
  2428. [S,E,A:]^C^CARC \E \A
  2429. [S,E,R:]^C^CARC \E \R
  2430. [S,E,D:]^C^CARC \E \D DRAG
  2431. [C,S,E:]^C^CARC C \\DRAG
  2432. [C,S,A:]^C^CARC C \\A DRAG
  2433. [C,S,L:]^C^CARC C \\L DRAG
  2434. [CONTIN:]^C^CARC ;DRAG
  2435. **popARC 3
  2436. [ARC]
  2437.  
  2438. [3-point:]*^C^CARC \\DRAG
  2439. [S,C,E:]*^C^CARC \C \DRAG
  2440. [S,C,A:]*^C^CARC \C \A DRAG
  2441. [S,C,L:]*^C^CARC \C \L DRAG
  2442. [S,E,A:]*^C^CARC \E \A
  2443. [S,E,R:]*^C^CARC \E \R
  2444. [S,E,D:]*^C^CARC \E \D DRAG
  2445. [C,S,E:]*^C^CARC C \\DRAG
  2446. [C,S,A:]*^C^CARC C \\A DRAG
  2447. [C,S,L:]*^C^CARC C \\L DRAG
  2448. [CONTIN:]^C^CARC ;DRAG
  2449. **CIRCLE 3
  2450. [CIRCLE]
  2451.  
  2452. [CEN,RAD:]^C^CCIRCLE \DRAG
  2453. [CEN,DIA:]^C^CCIRCLE \D
  2454. [2 POINT:]^C^CCIRCLE 2P \DRAG
  2455. [3 POINT:]^C^CCIRCLE 3P \\DRAG
  2456. [TTR:]^C^CCIRCLE TTR
  2457. **popCIRCL 3
  2458. [CIRCLE]
  2459.  
  2460. [CEN,RAD:]*^C^CCIRCLE \DRAG
  2461. [CEN,DIA:]*^C^CCIRCLE \D
  2462. [2 POINT:]*^C^CCIRCLE 2P \DRAG
  2463. [3 POINT:]*^C^CCIRCLE 3P \\DRAG
  2464. [TTR:]*^C^CCIRCLE TTR
  2465. **ASHADE 3
  2466. [LIGHTS:]^C^C$S=X $S=LIGHTS LIGHT
  2467. [CAMERA:]^C^C$S=X $S=CAMERA CAMERA
  2468. [ACTION]^C^C$S=X $S=ACTION
  2469.  
  2470. [CAMVIEW:]^C^CCAMVIEW
  2471. **LIGHTS 3
  2472. [LIGHT:]^C^CLIGHT
  2473.  
  2474. [Point]p
  2475. Directed
  2476.  
  2477. [Filters]
  2478. .x
  2479. .y
  2480. .z
  2481. .xy
  2482. .xz
  2483. .yz
  2484.  
  2485. [CAMERA:]^C^C$S=X $S=CAMERA CAMERA
  2486. [ACTION]$S=X $S=ACTION
  2487. **CAMERA 3
  2488. [CAMERA:]^C^CCAMERA
  2489.  
  2490. [Filters]
  2491. .x
  2492. .y
  2493. .z
  2494. .xy
  2495. .xz
  2496. .yz
  2497.  
  2498. [CAMVIEW:]^C^CCAMVIEW
  2499.  
  2500.  
  2501. [LIGHTS:]^C^C$S=X $S=LIGHTS LIGHT
  2502. [ACTION]$S=X $S=ACTION
  2503. **ACTION 3
  2504. [ACTION]
  2505.  
  2506. [SCENE:]^C^CSCENE
  2507. [FLMROLL:]^C^CFILMROLL
  2508.  
  2509.  
  2510.  
  2511.  
  2512.  
  2513.  
  2514.  
  2515.  
  2516.  
  2517. [LIGHTS:]^C^C$S=X $S=LIGHTS LIGHT
  2518. [CAMERA:]^C^C$S=X $S=CAMERA CAMERA
  2519. **ELLIPSE 3
  2520. [ELLIPSE:]^C^CELLIPSE
  2521.  
  2522. [Center]C
  2523. Rotation
  2524. Iso
  2525. Diameter
  2526. **POLYGON 3
  2527. [POLYGON:]^C^CPOLYGON
  2528.  
  2529. Edge
  2530. [I-scribe]I
  2531. [C-scribe]C
  2532. **SHAPE 3
  2533. [SHAPE:]^C^CSHAPE
  2534. ?
  2535.  
  2536. [LOAD:]^C^CLOAD
  2537. ?
  2538. **SKETCH 3
  2539. [SKETCH:]^C^CSKETCH
  2540.  
  2541. Connect
  2542. Erase
  2543. Record
  2544.  
  2545. [eXit]x
  2546. Quit
  2547.  
  2548. [------]
  2549. [SKPOLY:]'SETVAR SKPOLY 1
  2550. [SKLINE:]'SETVAR SKPOLY 0
  2551. [------]
  2552. **SOLID 3
  2553. [SOLID:]^C^CSOLID
  2554.  
  2555. [FILL ON]'SETVAR FILLMODE 1
  2556. [FILL OFF]'SETVAR FILLMODE 0
  2557. **TRACE 3
  2558. [TRACE:]^C^CTRACE
  2559.  
  2560. [FILL ON]'SETVAR FILLMODE 1
  2561. [FILL OFF]'SETVAR FILLMODE 0
  2562. **POINT 3
  2563. [POINT:]^C^CPOINT
  2564. .x
  2565. .y
  2566. .z
  2567. .xy
  2568. .xz
  2569. .yz
  2570.  
  2571. [Complex]
  2572. [Points]
  2573. [example:]^C^CVSLIDE points
  2574. [remove]^C^CREDRAW
  2575. [example:]^C^CREDRAW
  2576. [Pdmode:]'SETVAR PDMODE
  2577. [Pdsize:]'SETVAR PDSIZE
  2578. **HATCH 3
  2579. [HATCH:]^C^CHATCH
  2580. ?
  2581.  
  2582. u
  2583. u,o
  2584. u,i
  2585. Yes
  2586.  
  2587. Window
  2588. Last
  2589. Previous
  2590. Crossing
  2591. Remove
  2592. Add
  2593. Undo
  2594. **3DFACE 3
  2595. [3DFACE:]^C^C3DFACE
  2596.  
  2597. .x
  2598. .y
  2599. .z
  2600. .xy
  2601. .xz
  2602. .yz
  2603.  
  2604. [Invisibl]I
  2605.  
  2606. [ShowEdge]^P(setvar "splframe" 1)(prompt "Invisible edges will be SHOWN after next Regeneration.")(princ) ^P
  2607. [HideEdge]^P(setvar "splframe" 0)(prompt "Invisible edges will be HIDDEN after next Regeneration.")(princ) ^P
  2608.  
  2609. **3DPOLY 3
  2610. [3DPOLY:]^C^C3DPOLY
  2611.  
  2612. Close
  2613. Undo
  2614. .x
  2615. .y
  2616. .z
  2617. .xy
  2618. .xz
  2619. .yz
  2620. **ID 3
  2621. [ID:]^C^CID
  2622.  
  2623. .x
  2624. .y
  2625. .z
  2626. .xy
  2627. .xz
  2628. .yz
  2629. **LIMITS 3
  2630.  
  2631. [LIMITS:]^C^CLIMITS
  2632.  
  2633. ON
  2634. OFF
  2635. **UCS1 3
  2636. [UCS:]^C^CUCS
  2637. [DDUCS:]^C^CDDUCS
  2638.  
  2639. ?
  2640. Previous
  2641. Restore
  2642. [Save]S
  2643. Delete
  2644. World
  2645.  
  2646. [RENAME:]^C^CRename UCS
  2647. [Follow:]'SETVAR UCSFOLLOW
  2648.  
  2649. [next]$S=X $S=UCS2
  2650. **UCS2 3
  2651. [UCS:]$S=X $S=UCS1 ^C^CUCS
  2652.  
  2653. Origin
  2654. Zaxis
  2655. 3point
  2656.  
  2657. X
  2658. Y
  2659. Z
  2660.  
  2661. View
  2662. Entity
  2663.  
  2664. [previous]$S=X $S=UCS1
  2665. **UCSICON 3
  2666. [UCSICON:]^C^CUCSICON
  2667.  
  2668. ON
  2669. OFF
  2670.  
  2671. All
  2672. Origin
  2673. Noorigin
  2674. **PLAN 3
  2675. [PLAN:]^C^CPLAN
  2676.  
  2677. Current
  2678. UCS
  2679. World
  2680.  
  2681. [Follow:]'SETVAR UCSFOLLOW
  2682. **LIST 3
  2683. [LIST:]^C^CLIST
  2684.  
  2685. Window
  2686. Last
  2687. Previous
  2688. Crossing
  2689. Remove
  2690. Add
  2691. Undo
  2692. **AREA 3
  2693. [AREA:]^C^CAREA
  2694.  
  2695. Entity
  2696. Add
  2697. Subtract
  2698. **TEXT 3
  2699. [TEXT:]^C^CTEXT
  2700. [DTEXT:]^C^CDTEXT
  2701.  
  2702. aligned
  2703. [centered]C
  2704. fit
  2705. middle
  2706. right
  2707. style
  2708.  
  2709. [STYLE:]$S=X $S=STYLE ^C^CSTYLE
  2710. **TEXTSET 5
  2711. [DTEXT]$S=X $S=DTEXT ^C^C$T4=DTEXT1 $T4=DTEXT2
  2712.  
  2713. [REG.TEXT]$S=X $S=TEXT ^C^C$T4=TEXT1 $T4=TEXT2
  2714.  
  2715. [STYLE:]$S=X $S=STYLE ^C^CSTYLE
  2716. **STYLE 3
  2717. [STYLE:]^C^CSTYLE
  2718. ?
  2719.  
  2720. [Fonts]$S=X $S=F1
  2721.  
  2722. Yes
  2723. No
  2724.  
  2725. [DTEXT:]$S=X $S=DTEXT ^C^CDTEXT
  2726. [TEXT:]$S=X $S=TEXT ^C^CTEXT
  2727. **F1 3
  2728. Cyrillic
  2729. Cyriltlc
  2730. Greekc
  2731. Greeks
  2732. Gothice
  2733. Gothicg
  2734. Gothici
  2735. Italicc
  2736. Italict
  2737. Romanc
  2738. Romand
  2739. Romans
  2740.  
  2741.  
  2742.  
  2743.  
  2744. [next]$S=X $S=F2
  2745. [STYLMNU]$S=X $S=STYLE
  2746. **F2 3
  2747. Romant
  2748. Scriptc
  2749. Scripts
  2750. Syastro
  2751. Symap
  2752. Symath
  2753. Symeteo
  2754. Symusic
  2755.  
  2756.  
  2757.  
  2758.  
  2759.  
  2760.  
  2761.  
  2762.  
  2763. [previous]$S=X $S=F1
  2764. [STYLMNU]$S=X $S=STYLE
  2765. **DTEXT 3
  2766. [DTEXT:]^C^CDTEXT
  2767. [TEXT:]^C^CTEXT
  2768.  
  2769. [centered]C
  2770. right
  2771. aligned
  2772. middle
  2773. fit
  2774. style
  2775.  
  2776. [STYLE:]$S=X $S=STYLE ^C^CSTYLE
  2777. **AXIS 3
  2778. [AXIS:]^C^CAXIS
  2779.  
  2780. [axs=snap]SNAP
  2781.  
  2782. ON
  2783. OFF
  2784. Aspect
  2785. **BLIPMODE 3
  2786. [BLIPS:]^C^CBLIPMODE
  2787.  
  2788. ON
  2789. OFF
  2790. **END 3
  2791. END ?
  2792.  
  2793. [Yes]^C^CEND
  2794. [No]$S=X $S=S
  2795. **QUIT 3
  2796. [QUIT:]^c^cquit
  2797.  
  2798. [Yes]Y
  2799. [No]n $S=X $S=S
  2800. **VAR1 3
  2801. [dimalt]$S=X $S=OF DIMALT \
  2802. [dimaltd]DIMALTD \
  2803. [dimaltf]DIMALTF \
  2804. [dimapost]DIMAPOST \
  2805. [dimaso]$S=X $S=OF DIMASO \
  2806. [dimasz]DIMASZ \
  2807. [--------]
  2808. [dimblk]DIMBLK \
  2809. [dimblk1]DIMBLK1 \
  2810. [dimblk2]DIMBLK2 \
  2811. [--------]
  2812. [dimcen]DIMCEN \
  2813. [dimdle]DIMDLE \
  2814. [dimdli]DIMDLI \
  2815. [dimexe]DIMEXE \
  2816.  
  2817. [next]$S=X $S=VAR2
  2818. [DIMMENU]$S=X $S=DIM
  2819.  
  2820.  
  2821. **VAR2 3
  2822. [dimexo]DIMEXO \
  2823. [dimlfac]DIMLFAC \
  2824. [dimlim]$S=X $S=OF DIMLIM \
  2825. [dimpost]DIMPOST \
  2826. [dimrnd]DIMRND \
  2827. [dimsah]$S=X $S=OF DIMSAH \
  2828. [dimscale]DIMSCALE \
  2829. [dimse1]$S=X $S=OF DIMSE1 \
  2830. [dimse2]$S=X $S=OF DIMSE2 \
  2831. [dimsho]$S=X $S=OF DIMSHO \
  2832. [dimsoxd]$S=X $S=OF DIMSOXD \
  2833. [dimtad]$S=X $S=OF DIMTAD \
  2834. [dimtih]$S=X $S=OF DIMTIH \
  2835. [dimtix]$S=X $S=OF DIMTIX \
  2836.  
  2837. [previous]$S=X $S=VAR1
  2838. [next]$S=X $S=VAR3
  2839. [DIMMENU]$S=X $S=DIM
  2840.  
  2841.  
  2842. **VAR3 3
  2843. [dimtm]DIMTM \
  2844. [dimtofl]$S=X $S=OF DIMTOFL \
  2845. [dimtoh]$S=X $S=OF DIMTOH \
  2846. [dimtol]$S=X $S=OF DIMTOL \
  2847. [dimtp]DIMTP \
  2848. [dimtsz]DIMTSZ \
  2849. [dimtvp]DIMTVP \
  2850. [dimtxt]DIMTXT \
  2851. [dimzin]$S=X $S=DIMZIN DIMZIN \
  2852.  
  2853.  
  2854.  
  2855.  
  2856.  
  2857.  
  2858.  
  2859. [previous]$S=X $S=VAR2
  2860. [DIMMENU]$S=X $S=DIM
  2861. **OF 3
  2862. [ON]$S= $S= ON
  2863.  
  2864. [OFF]$S= $S= OFF
  2865. **DIMZIN 4
  2866. [  New]
  2867. [ Dimzin]
  2868. [ Value]
  2869.  
  2870.  
  2871.  
  2872.  
  2873. [0]$S= $S= 0
  2874. [1]$S= $S= 1
  2875. [2]$S= $S= 2
  2876. [3]$S= $S= 3
  2877. **FORMAT 3
  2878. [DIM:]^C^CDIM
  2879. [DIM1:]^C^CDIM1
  2880.  
  2881. [HOMETEXT]$S=X $S=HOMETEXT HOMETEXT
  2882. [UPDATE]$S=X $S=UPDATE UPDATE
  2883. [NEWTEXT]$S=X $S=NEWTEXT NEWTEXT
  2884.  
  2885.  
  2886.  
  2887.  
  2888.  
  2889.  
  2890.  
  2891.  
  2892.  
  2893. [DIMMENU]$S=X $S=DIM
  2894. **HOMETEXT 3
  2895. [DIM:]^C^CDIM
  2896. [DIM1:]^C^CDIM1
  2897.  
  2898. HOMETEXT
  2899.  
  2900. Window
  2901. Last
  2902. Previous
  2903. Crossing
  2904. Remove
  2905. Add
  2906. Undo
  2907. **UPDATE 3
  2908. [DIM:]^C^CDIM
  2909. [DIM1:]^C^CDIM1
  2910.  
  2911. UPDATE
  2912.  
  2913. Window
  2914. Last
  2915. Previous
  2916. Crossing
  2917. Remove
  2918. Add
  2919. Undo
  2920. **NEWTEXT 3
  2921. [DIM:]^C^CDIM
  2922. [DIM1:]^C^CDIM1
  2923.  
  2924. [NEWTEXT]NEWTEXT
  2925.  
  2926. Window
  2927. Last
  2928. Previous
  2929. Crossing
  2930. Remove
  2931. Add
  2932. Undo
  2933. **LINETYPE 3
  2934. [LINETYP:]^C^CLINETYPE
  2935. ?
  2936.  
  2937. Create
  2938. Load
  2939. [Set]S $S=X $S=CHLT \$S=X $S=LINETYPE
  2940.  
  2941. Yes
  2942. No
  2943. **LIMITS 3
  2944. [LIMITS:]^C^CLIMITS
  2945.  
  2946. On
  2947. Off
  2948. **SNAP 3
  2949. [SNAP:]^C^CSNAP
  2950.  
  2951. ON
  2952. OFF
  2953.  
  2954. [Aspect]A;
  2955. [Rotate]R;
  2956.  
  2957. [Style]S;
  2958. [ Iso]Iso;
  2959. [ Standrd]Standard;
  2960. **TABLET 3
  2961. [TABLET:]^C^CTABLET
  2962.  
  2963. cal
  2964. [config]CFG 4 25 9 11 9 9 13 25 7 Y
  2965. [re-cfg]CFG 4 Y 25 9 11 9 9 13 25 7 Y
  2966. ON
  2967. OFF
  2968. Yes
  2969. No
  2970. **OSNAPC 3
  2971. [OSNAP:]^C^COSNAP
  2972.  
  2973. [CENter]CENTER\
  2974. [ENDpoint]ENDPOINT\
  2975. [INSert]INSERT\
  2976. [INTersec]INTERSEC\
  2977. [MIDpoint]MIDPOINT\
  2978. [NEArest]NEAREST\
  2979. [NODe]NODE\
  2980. [PERpend]PERPEND\
  2981. [QUAdrant]QUADRANT\
  2982. [TANgent]TANGENT\
  2983. [NONE]^C^COSNAP NONE $S= $S=
  2984. [Quick,]QUICK,^Z
  2985. [,],\
  2986. **DRAGMODE 3
  2987. [DRAGMODE]^C^CDRAGMODE
  2988.  
  2989. [ON]ON $S=X $S=S
  2990. [OFF]OFF $S=X $S=S
  2991. [Auto]A $S=X $S=S
  2992.  
  2993. **GRID 3
  2994. [GRID:]^C^CGRID
  2995.  
  2996. [grd=snap]SNAP
  2997.  
  2998. ON
  2999. OFF
  3000. Aspect
  3001. **HANDLES 3
  3002. [HANDLES:]^C^CHANDLES
  3003.  
  3004. [ON]ON
  3005. [DESTROY]DESTROY
  3006.  
  3007. **SETVAR 3
  3008. [SETVAR:]^C^CSETVAR
  3009. ?
  3010.  
  3011. ['SETVAR]'SETVAR
  3012. **QTEXT 3
  3013. [QTEXT:]^C^CQTEXT
  3014.  
  3015. ON
  3016. OFF
  3017. [REGEN:]REGEN
  3018. **VIEWRES 3
  3019. [VIEWRES:]^C^CVIEWRES
  3020.  
  3021. No
  3022. Yes
  3023.  
  3024. 100
  3025. 500
  3026.  
  3027. [RGNAUTO:]^C^CREGENAUTO
  3028. [ On]On
  3029. [ Off]Off
  3030. **APERTURE 3
  3031. [APERTUR:]'SETVAR APERTURE
  3032. [PICKBOX:]'SETVAR PICKBOX
  3033.  
  3034. [1]$S= $S= 1
  3035. [2]$S= $S= 2
  3036. [3]$S= $S= 3
  3037. [4]$S= $S= 4
  3038. [5]$S= $S= 5
  3039. [6]$S= $S= 6
  3040. [7]$S= $S= 7
  3041. [8]$S= $S= 8
  3042. [9]$S= $S= 9
  3043. [10]$S= $S= 10
  3044. [15]$S= $S= 15
  3045. **ARRAY 3
  3046. [ARRAY:]^C^CARRAY
  3047.  
  3048. Window
  3049. Last
  3050. Previous
  3051. Crossing
  3052. Remove
  3053. Add
  3054. Undo
  3055.  
  3056. Rectang
  3057. Polar
  3058. Yes
  3059. No
  3060. **ROTATE 3
  3061. [ROTATE:]^C^CROTATE
  3062.  
  3063. Window
  3064. Last
  3065. Previous
  3066. Crossing
  3067. Remove
  3068. Add
  3069. Undo
  3070.  
  3071. Referenc
  3072. **SELECT 3
  3073. [SELECT:]^C^CSELECT
  3074.  
  3075. Window
  3076. Last
  3077. Previous
  3078. Crossing
  3079. Remove
  3080. Add
  3081. Undo
  3082. **SCALE 3
  3083. [SCALE:]^C^CSCALE
  3084.  
  3085. Window
  3086. Last
  3087. Previous
  3088. Crossing
  3089. Remove
  3090. Add
  3091. Undo
  3092.  
  3093. Referenc
  3094. **BREAK 3
  3095. [BREAK:]^C^CBREAK
  3096.  
  3097. First
  3098. @
  3099. **BREAK2P 3
  3100. [BREAK:]^C^CBREAK \F
  3101. **BREAKSPL 3
  3102. [BREAK:]^C^CBREAK \F \@
  3103. **MOVE 3
  3104. [MOVE:]^C^CMOVE
  3105.  
  3106. Window
  3107. Last
  3108. Previous
  3109. Crossing
  3110. Remove
  3111. Add
  3112. Undo
  3113. **COPY 3
  3114. [COPY:]^C^CCOPY
  3115.  
  3116. Window
  3117. Last
  3118. Previous
  3119. Crossing
  3120. Remove
  3121. Add
  3122. Undo
  3123.  
  3124. Multiple
  3125. **UNDO 3
  3126. [UNDO:]^C^CUNDO
  3127.  
  3128. [Back 1]^C^CUNDO 1
  3129.  
  3130. [Auto]$S=X $S=UNDOA Auto
  3131. Back
  3132. End
  3133. Group
  3134. Mark
  3135. [Control]$S=X $S=UNDOC Control
  3136.  
  3137. Yes
  3138. No
  3139.  
  3140. [REDO:]REDO
  3141. **UNDOC 3
  3142. All
  3143. None
  3144. One
  3145. **UNDOA 3
  3146. On 
  3147. Off
  3148. **ERASE 3
  3149. [ERASE:]^C^CERASE
  3150.  
  3151. Window
  3152. Last
  3153. Previous
  3154. Crossing
  3155. Remove
  3156. Add
  3157. Undo
  3158.  
  3159. [OOPS:]^C^COOPS
  3160. **PSEL 3
  3161.  
  3162. Window
  3163. Last
  3164. Crossing
  3165.  
  3166. Yes
  3167. No
  3168. **P0 3
  3169. [PEDIT:]^C^C^P+
  3170. (defun m:p1(/ m:pa m:pc m:d m:w)(menucmd "S=X")(menucmd "S=PSEL");+
  3171. (setq m:d T)(while m:d (setq m:pc (ssget))(setq m:pa (ssname m:pc 0));+
  3172. (if(=(cdr(assoc 0 (entget m:pa))) "POLYLINE")(progn(setq m:d nil)+
  3173. (m:p2 m:pa m:pc))(progn(prompt "Entity selected is not a polyline")(terpri);+
  3174. (if (member (cdr (assoc 0 (entget m:pa))) '("LINE" "ARC"))(progn+
  3175. (initget "Yes No")(setq m:w (getkword "Do you want to turn it into one? <Y>"));+
  3176. (if (or (= m:w "Yes")(null m:w))(progn(setq m:d nil)(menucmd "S=X");+
  3177. (menucmd "S=P0")(command "PEDIT" m:pa "yes" pause)))))))))+
  3178. (defun m:p2(m:pa m:pc / m:pb)(menucmd "S=X")+
  3179. (if (= (setq m:pb (cdr (assoc 70 (entget m:pa)))) nil)(menucmd "S=P0");+
  3180. (progn (setq m:pb (/ m:pb 2))(if (>= m:pb 8)(menucmd "S=P16");+
  3181. (if(< m:pb 4)(menucmd "S=P0")(menucmd "S=P8")))))(command "PEDIT" m:pa pause))+
  3182. (defun perror (msg)(setq *error* m:err m:err nil)(princ))+
  3183. (defun C:PEDITM (/ m:err)(setq m:err *error* *error* perror)(m:p1);+
  3184. (setq *error* m:err m:err nil)(princ))(princ) PEDITM ^P
  3185.    
  3186. Close
  3187. Open
  3188. Join
  3189. Width
  3190. [Ed Vrtx]E $S=X $S=PVERTED
  3191. [Fit Curv]Fit
  3192. Spline
  3193. Decurve
  3194. [Undo]U
  3195. [eXit]X $S=X $S=S
  3196.  
  3197. [PolyVars]$S=X $S=PVARS $i=poly $i=*
  3198. **P8 3
  3199. [PEDIT:]^C^C^P+
  3200. (defun m:p1(/ m:pa m:pc m:d m:w)(menucmd "S=X")(menucmd "S=PSEL");+
  3201. (setq m:d T)(while m:d (setq m:pc (ssget))(setq m:pa (ssname m:pc 0));+
  3202. (if(=(cdr(assoc 0 (entget m:pa))) "POLYLINE")(progn(setq m:d nil)+
  3203. (m:p2 m:pa m:pc))(progn(prompt "Entity selected is not a polyline")(terpri);+
  3204. (if (member (cdr (assoc 0 (entget m:pa))) '("LINE" "ARC"))(progn+
  3205. (initget "Yes No")(setq m:w (getkword "Do you want to turn it into one? <Y>"));+
  3206. (if (or (= m:w "Yes")(null m:w))(progn(setq m:d nil)(menucmd "S=X");+
  3207. (menucmd "S=P0")(command "PEDIT" m:pa "yes" pause)))))))))+
  3208. (defun m:p2(m:pa m:pc / m:pb)(menucmd "S=X")+
  3209. (if (= (setq m:pb (cdr (assoc 70 (entget m:pa)))) nil)(menucmd "S=P0");+
  3210. (progn (setq m:pb (/ m:pb 2))(if (>= m:pb 8)(menucmd "S=P16");+
  3211. (if(< m:pb 4)(menucmd "S=P0")(menucmd "S=P8")))))(command "PEDIT" m:pa pause))+
  3212. (defun perror (msg)(setq *error* m:err m:err nil)(princ))+
  3213. (defun C:PEDITM (/ m:err)(setq m:err *error* *error* perror)(m:p1);+
  3214. (setq *error* m:err m:err nil)(princ))(princ) PEDITM ^P
  3215.  
  3216. Close
  3217. Open
  3218. [Ed Vrtx]E $S=X $S=3DPVERTED
  3219. Spline
  3220. Decurve
  3221. [Undo]U
  3222. [eXit]X $S=X $S=S
  3223.  
  3224. [PolyVars]$S=X $S=PVARS $i=poly $i=*
  3225. **P16 3
  3226. [PEDIT:]^C^C^P+
  3227. (defun m:p1(/ m:pa m:pc m:d m:w)(menucmd "S=X")(menucmd "S=PSEL");+
  3228. (setq m:d T)(while m:d (setq m:pc (ssget))(setq m:pa (ssname m:pc 0));+
  3229. (if(=(cdr(assoc 0 (entget m:pa))) "POLYLINE")(progn(setq m:d nil)+
  3230. (m:p2 m:pa m:pc))(progn(prompt "Entity selected is not a polyline")(terpri);+
  3231. (if (member (cdr (assoc 0 (entget m:pa))) '("LINE" "ARC"))(progn+
  3232. (initget "Yes No")(setq m:w (getkword "Do you want to turn it into one? <Y>"));+
  3233. (if (or (= m:w "Yes")(null m:w))(progn(setq m:d nil)(menucmd "S=X");+
  3234. (menucmd "S=P0")(command "PEDIT" m:pa "yes" pause)))))))))+
  3235. (defun m:p2(m:pa m:pc / m:pb)(menucmd "S=X")+
  3236. (if (= (setq m:pb (cdr (assoc 70 (entget m:pa)))) nil)(menucmd "S=P0");+
  3237. (progn (setq m:pb (/ m:pb 2))(if (>= m:pb 8)(menucmd "S=P16");+
  3238. (if(< m:pb 4)(menucmd "S=P0")(menucmd "S=P8")))))(command "PEDIT" m:pa pause))+
  3239. (defun perror (msg)(setq *error* m:err m:err nil)(princ))+
  3240. (defun C:PEDITM (/ m:err)(setq m:err *error* *error* perror)(m:p1);+
  3241. (setq *error* m:err m:err nil)(princ))(princ) PEDITM ^P
  3242.  
  3243. [Ed Vrtx]E $S=X $S=3DMVERTED
  3244. Smooth
  3245. Desmooth
  3246. [Mclose]M
  3247. [Nclose]N
  3248. [Mopen]M
  3249. [Nopen]N
  3250.  
  3251. [Undo]U
  3252. [eXit]X $S=X $S=S
  3253.  
  3254. [PolyVars]$S=X $S=PVARS $i=poly $i=*
  3255. **PVERTED 3
  3256. [ED VRTX]
  3257.  
  3258. Next
  3259. Previous
  3260. Break
  3261. Insert
  3262. Move
  3263. Straight
  3264. Width
  3265. Tangent
  3266. Go
  3267. Regen
  3268. [Undo]X U $S=X $S=P0
  3269. [eXit]X $S=X $S=P0
  3270. **3DPVERTED 3
  3271. [ED VRTX]
  3272.  
  3273. Next
  3274. Previous
  3275. Break
  3276. Insert
  3277. Move
  3278. Regen
  3279. Straight
  3280. [eXit]X $S=X $S=P8
  3281. **3DMVERTED 3
  3282. [ED VRTX]
  3283.  
  3284. Next
  3285. Previous
  3286. Left
  3287. Right
  3288. Up
  3289. Down
  3290. Move
  3291. Regen
  3292. [eXit]X $S=X $S=P16
  3293. **PVARS 3
  3294. [Polyvars]$i=poly $i=*
  3295.  
  3296. [SPLframe]'SETVAR SPLFRAME
  3297. [ On]1
  3298. [ Off]0
  3299. [SPLsegs]'SETVAR SPLINESEGS
  3300. [SPLtype]'SETVAR SPLINETYPE
  3301. [ Quad]5
  3302. [ Cubic]6
  3303. [SURFtype]'SETVAR SURFTYPE
  3304. [ Quad]5
  3305. [ Cubic]6
  3306. [ Bezier]8
  3307. [UDensity]'SETVAR SURFU
  3308. [VDensity]'SETVAR SURFV
  3309. **TRIM 3
  3310. [TRIM:]^C^CTRIM
  3311.  
  3312. Window
  3313. Last
  3314. Previous
  3315. Crossing
  3316. Remove
  3317. Add
  3318. Undo
  3319. **ATTEXT 3
  3320. [ATTEXT:]^C^CATTEXT
  3321.  
  3322. CDF
  3323. SDF
  3324. DXF
  3325. [Entities]Ent
  3326.  
  3327. Window
  3328. Last
  3329. Previous
  3330. Crossing
  3331. Remove
  3332. Add
  3333. Undo
  3334. **SLIDES 3
  3335. [MSLIDE:]^C^CMSLIDE
  3336.  
  3337. [VSLIDE:]^C^CVSLIDE
  3338.  
  3339. **SCRIPT 3
  3340. [SCRIPT:]^C^CSCRIPT
  3341.  
  3342. [RESUME:]'RESUME
  3343. [RSCRIPT:]^C^CRSCRIPT
  3344. **PURGE 3
  3345. [PURGE:]^C^CPURGE
  3346.  
  3347. Blocks
  3348. LAyers
  3349. LTypes
  3350. SHapes
  3351. STyles
  3352. All
  3353.  
  3354. Yes
  3355. No
  3356. **RENAME 3
  3357. [RENAME:]^C^CRENAME
  3358.  
  3359. Block
  3360. LAyer
  3361. LType
  3362. Style
  3363. Ucs
  3364. VIew
  3365. VPort
  3366.  
  3367. **DXF 3
  3368. [DXFIN:]^C^CDXFIN
  3369.  
  3370. [DXFOUT:]^C^CDXFOUT
  3371. 16
  3372. Entities
  3373.  
  3374. Window
  3375. Last
  3376. Previous
  3377. Crossing
  3378. Remove
  3379. Add
  3380. Undo
  3381.  
  3382. [DXBIN:]^C^CDXBIN
  3383. **IGES 3
  3384. [IGESIN:]^C^CIGESIN
  3385.  
  3386. [IGESOUT:]^C^CIGESOUT
  3387. **EXTEND 3
  3388. [EXTEND:]^C^CEXTEND
  3389.  
  3390. Window
  3391. Last
  3392. Previous
  3393. Crossing
  3394. Remove
  3395. Add
  3396. Undo
  3397.  
  3398. [SELECT:]^C^CSELECT
  3399. [ZOOM W:]'ZOOM W
  3400. **STRETCH 3
  3401. [STRETCH:]^C^CSTRETCH C
  3402.  
  3403. Window
  3404. Last
  3405. Previous
  3406. Crossing
  3407. Remove
  3408. Add
  3409. Undo
  3410. **MIRROR 3
  3411. [MIRROR:]^C^CMIRROR
  3412. Window
  3413. Last
  3414. Previous
  3415. Crossing
  3416. Remove
  3417. Add
  3418. Undo
  3419.  
  3420. Yes
  3421. No
  3422. **FILLET0 3
  3423. [FILLET:0]^C^CFILLET R 0;;
  3424.  
  3425. [polyline]P
  3426. **FILLET 3
  3427. [FILLET:]^C^CFILLET
  3428.  
  3429. [radius]R \FILLET
  3430. [radius 0]R 0 FILLET
  3431. polyline
  3432. **CHAMFER 3
  3433. [CHAMFER:]^C^CCHAMFER
  3434.  
  3435. [distance]D \\CHAMFER
  3436. [dist = 0]D 0 0 CHAMFER
  3437. polyline
  3438. **DIVIDE 3
  3439. [DIVIDE:]^C^CDIVIDE
  3440.  
  3441. Block
  3442. Yes
  3443. No
  3444. **MEASURE 3
  3445. [MEASURE:]^C^CMEASURE
  3446.  
  3447. Block
  3448. Yes
  3449. No
  3450. **CHANGE 3
  3451. [CHANGE:]^C^CCHANGE
  3452. Window
  3453. Last
  3454. Previous
  3455. Crossing
  3456. Remove
  3457. Add
  3458. Undo
  3459. [Color]PROP COLOR $S=X $S=CHCOLOR \ $S=X $S=CHANGE
  3460. [Chroma]^C^CVSLIDE chroma
  3461. [ Restore]^C^CREDRAW
  3462. [Elev]PROP ELEV
  3463. [LAyer]PROP LAYER
  3464. [LType]PROP LT $S=X $S=CHLT \$S=X $S=CHANGE
  3465. [Thicknes]PROP THICKNESS
  3466. **CHPROP 3
  3467. [CHPROP:]^C^CCHPROP
  3468. Window
  3469. Last
  3470. Previous
  3471. Crossing
  3472. Remove
  3473. Add 
  3474. Undo
  3475. [Color]COLOR $S=X $S=CHCOLOR \$S=X $S=CHPROP
  3476. [Chroma]^C^CVSLIDE chroma
  3477. [ Restore]^C^CREDRAW
  3478. [LAyer]LAYER
  3479. [LType]LT $S=X $S=CHLT \$S=X $S=CHPROP
  3480. [Thicknes]THICKNESS
  3481. **CHCOLOR 3
  3482. [COLOR]
  3483.  
  3484. bylayer
  3485. byblock
  3486.  
  3487. red
  3488. yellow
  3489. green
  3490. cyan
  3491. blue
  3492. magenta
  3493. white
  3494. **CHLT 3
  3495. [LTYPE]
  3496.  
  3497. bylayer
  3498. byblock
  3499.  
  3500. [contin.]CONTINUOUS
  3501. dashed
  3502. hidden
  3503. center
  3504. phantom
  3505. dot
  3506. dashdot
  3507. border
  3508. divide
  3509.  
  3510. **COLOR 3
  3511. [COLOR:]^C^CCOLOR
  3512. bylayer
  3513. byblock
  3514. red
  3515. yellow
  3516. green
  3517. cyan
  3518. blue
  3519. magenta
  3520. white
  3521.  
  3522. [Chroma]^C^CVSLIDE chroma
  3523. [ Restore]^C^CREDRAW
  3524. **ATTEDIT 3
  3525. [ATTEDIT:]^C^CATTEDIT
  3526. Window
  3527. Last
  3528. Crossing
  3529. Remove
  3530. Add
  3531. Undo
  3532.  
  3533. [Value]Value $S=X $S=ATTEDIT2
  3534. Position
  3535. Height
  3536. Angle
  3537. Style
  3538. Layer
  3539. [Color]C $S=X $S=ATTCOLOR
  3540. Next
  3541.  
  3542. [__LAST__]$S= $S=
  3543. **ATTEDIT2 3
  3544.  
  3545. [Change]Change $S=X $S=ATTEDIT
  3546. [Replace]Replace $S=X $S=ATTEDIT
  3547. **ATTCOLOR 3
  3548. [COLOR]
  3549.  
  3550. [red]RED $S= $S=
  3551. [yellow]YELLOW $S= $S=
  3552. [green]GREEN $S= $S=
  3553. [cyan]CYAN $S= $S=
  3554. [blue]BLUE $S= $S=
  3555. [magenta]MAGENTA $S= $S=
  3556. [white]WHITE $S= $S=
  3557. **UNITS 2
  3558.  
  3559. [UNIT    ]
  3560. [TYPE    ]
  3561.  
  3562. [scientfc]1;
  3563.  
  3564. [decimal ]2;
  3565.  
  3566. [enginrng]3;
  3567.  
  3568. [archtect]4;
  3569.  
  3570. [metric  ]5;
  3571.  
  3572.  
  3573.  
  3574.  
  3575.  
  3576.  
  3577. **U1 2
  3578.  
  3579. [Scientfc]
  3580. [Scale   ]
  3581.  
  3582.  
  3583. [4 TIMES ]4.0;
  3584.  
  3585. [2 TIMES ]2.0;
  3586.  
  3587. [FULL    ]1.0;
  3588.  
  3589. [HALF    ]0.5;
  3590.  
  3591. [QUARTER ]0.25;
  3592.  
  3593. [OTHER   ]^P0;^P
  3594.  
  3595.  
  3596.  
  3597.  
  3598. **U2 2
  3599.  
  3600. [Decimal ]
  3601. [Scale   ]
  3602.  
  3603.  
  3604. [4 TIMES ]4.0;
  3605.  
  3606. [2 TIMES ]2.0;
  3607.  
  3608. [FULL    ]1.0;
  3609.  
  3610. [HALF    ]0.5;
  3611.  
  3612. [QUARTER ]0.25;
  3613.  
  3614. [OTHER   ]^P0;^P
  3615.  
  3616.  
  3617.  
  3618.  
  3619. **U3 2
  3620.  
  3621. [Enginrng]
  3622. [Scale   ]
  3623.  
  3624.  
  3625. [1"=10'  ]120.0;
  3626. [1"=20'  ]240.0;
  3627.  
  3628. [1"=30'  ]360.0;
  3629. [1"=40'  ]480.0;
  3630.  
  3631. [1"=50'  ]600.0;
  3632. [1"=60'  ]720.0;
  3633.  
  3634. [1"=80'  ]960.0;
  3635. [1"=100' ]1200.0;
  3636.  
  3637. [OTHER   ]^P0;^P
  3638.  
  3639.  
  3640. **U4 2
  3641.  
  3642. [Archtect]
  3643.  
  3644.  
  3645. [1/40"=1']480.0;
  3646. [1/20"=1']240.0;
  3647. [1/16"=1']192.0;
  3648. [ 1/8"=1']96.0;
  3649. [ 1/4"=1']48.0;
  3650.  
  3651. [ 1/2"=1']24.0;
  3652. [ 3/4"=1']16.0;
  3653. [   1"=1']12.0;
  3654. [   3"=1']4.0;
  3655. [   6"=1']2.0;
  3656. [  FULL  ]1.0;
  3657.  
  3658. [OTHER...]^P0;^P
  3659.  
  3660.  
  3661. **U5 2
  3662.  
  3663. [Metric  ]
  3664.  
  3665. [ 1:5000 ]5000.0;
  3666. [ 1:2000 ]2000.0;
  3667. [ 1:1000 ]1000.0;
  3668. [ 1:500  ]500.0;
  3669. [ 1:200  ]200.0;
  3670.  
  3671. [ 1:100  ]100.0;
  3672. [ 1:75   ]75.0;
  3673. [ 1:50   ]50.0;
  3674. [ 1:20   ]20.0;
  3675. [ 1:10   ]10.0;
  3676. [ 1:5    ]5.0;
  3677. [  FULL  ]1.0;
  3678.  
  3679. [OTHER...]^P0;^P
  3680.  
  3681.  
  3682. **ENGLISH 2
  3683.  
  3684. [Horizntl]
  3685.  
  3686. [ Sheet  ]
  3687. [ Size   ]
  3688.  
  3689. [A-8.5x11]11.0 8.5;
  3690. [B- 11x17]17.0 11.0;
  3691. [C- 17x22]22.0 17.0;
  3692. [   18x24]24.0 18.0;
  3693.  
  3694. [D- 22X34]34.0 22.0;
  3695. [   24x36]36.0 24.0;
  3696. [E- 34x44]44.0 34.0;
  3697.  
  3698. [OTHER...]^P0 0;^P
  3699.  
  3700. [VERTCAL>]$S=X $S=ENGVERT
  3701.  
  3702.  
  3703. **ENGVERT 2
  3704.  
  3705. [Vertical]
  3706.  
  3707. [ Sheet  ]
  3708. [ Size   ]
  3709.  
  3710. [A-8.5x11]8.5 11.0;
  3711. [B- 11x17]11.0 17.0;
  3712. [C- 17x22]17.0 22.0;
  3713. [   18x24]18.0 24.0;
  3714.  
  3715. [D- 22X34]22.0 34.0;
  3716. [   24x36]24.0 36.0;
  3717. [E- 34x44]34.0 44.0;
  3718.  
  3719. [OTHER...]^P0 0;^P
  3720.  
  3721. [HORZNTL>]$S=X $S=ENGLISH
  3722.  
  3723.  
  3724. **METRIC 2
  3725.  
  3726. [Horizntl]
  3727.  
  3728. [ Sheet  ]
  3729. [ Size   ]
  3730.  
  3731. [1189x841]1189.0 841.0;
  3732. [1000x707]1000.0 707.0;
  3733. [ 841x594]841.0 594.0;
  3734.  
  3735. [ 594x420]594.0 420.0;
  3736. [ 420x297]420.0 297.0;
  3737. [ 297x210]297.0 210.0;
  3738.  
  3739. [OTHER...]^P0 0;^P
  3740.  
  3741.  
  3742. [VERTCAL>]$S=X $S=METRICVERT
  3743.  
  3744.  
  3745. **METRICVERT 2
  3746.  
  3747. [Vertical]
  3748.  
  3749. [ Sheet  ]
  3750. [ Size   ]
  3751.  
  3752. [1189x841]841.0 1189.0;
  3753. [1000x707]707.0 1000.0;
  3754. [ 841x594]594.0 841.0;
  3755.  
  3756. [ 594x420]420.0 594.0;
  3757. [ 420x297]297.0 420.0;
  3758. [ 297x210]210.0 297.0;
  3759.  
  3760. [OTHER...]^P0 0;^P
  3761.  
  3762.  
  3763. [HORZNTL>]$S=X $S=METRIC
  3764.  
  3765.  
  3766. **CHTEMP 3
  3767. [Change  ]
  3768. [Template]
  3769.  
  3770. [Arch...]^C^C^P(progn(if v:acam(progn(command "menu" (strcat v:acam "aec-a"))+
  3771. (prompt "AEC Architectural loaded."))(prompt "AEC Architectural not available.")+
  3772. )(princ)) ^P
  3773. [Mech...]^C^C^P(progn(if v:acmm(progn(command "menu" (strcat v:acmm "aec-m"))+
  3774. (prompt "AEC Mechanical loaded."))(prompt "AEC Mechanical not available.")+
  3775. )(princ)) ^P
  3776. **EXCOMDS 3
  3777. [CATALOG:]^C^CCATALOG
  3778. [DEL:]^C^CDEL
  3779. [DIR:]^C^CDIR
  3780. [EDIT:]^C^CEDIT
  3781. [SH:]^C^CSH
  3782. [SHELL:]^C^CSHELL
  3783. [TYPE:]^C^CTYPE
  3784.  
  3785. ***TABLET1
  3786. [A-1] 
  3787. [A-2] 
  3788. [A-3] 
  3789. [A-4] 
  3790. [A-5] 
  3791. [A-6] 
  3792. [A-7] 
  3793. [A-8] 
  3794. [A-9] 
  3795. [A-10] 
  3796. [A-11] 
  3797. [A-12] 
  3798. [A-13] 
  3799. [A-14] 
  3800. [A-15] 
  3801. [A-16] 
  3802. [A-17] 
  3803. [A-18] 
  3804. [A-19] 
  3805. [A-20] 
  3806. [A-21] 
  3807. [A-22] 
  3808. [A-23] 
  3809. [A-24] 
  3810. [A-25] 
  3811. [B-1] 
  3812. [B-2] 
  3813. [B-3] 
  3814. [B-4] 
  3815. [B-5] 
  3816. [B-6] 
  3817. [B-7] 
  3818. [B-8] 
  3819. [B-9] 
  3820. [B-10] 
  3821. [B-11] 
  3822. [B-12] 
  3823. [B-13] 
  3824. [B-14] 
  3825. [B-15] 
  3826. [B-16] 
  3827. [B-17] 
  3828. [B-18] 
  3829. [B-19] 
  3830. [B-20] 
  3831. [B-21] 
  3832. [B-22] 
  3833. [B-23] 
  3834. [B-24] 
  3835. [B-25] 
  3836. [C-1] 
  3837. [C-2] 
  3838. [C-3] 
  3839. [C-4] 
  3840. [C-5] 
  3841. [C-6] 
  3842. [C-7] 
  3843. [C-8] 
  3844. [C-9] 
  3845. [C-10] 
  3846. [C-11] 
  3847. [C-12] 
  3848. [C-13] 
  3849. [C-14] 
  3850. [C-15] 
  3851. [C-16] 
  3852. [C-17] 
  3853. [C-18] 
  3854. [C-19] 
  3855. [C-20] 
  3856. [C-21] 
  3857. [C-22] 
  3858. [C-23] 
  3859. [C-24] 
  3860. [C-25] 
  3861. [D-1] 
  3862. [D-2] 
  3863. [D-3] 
  3864. [D-4] 
  3865. [D-5] 
  3866. [D-6] 
  3867. [D-7] 
  3868. [D-8] 
  3869. [D-9] 
  3870. [D-10] 
  3871. [D-11] 
  3872. [D-12] 
  3873. [D-13] 
  3874. [D-14] 
  3875. [D-15] 
  3876. [D-16] 
  3877. [D-17] 
  3878. [D-18] 
  3879. [D-19] 
  3880. [D-20] 
  3881. [D-21] 
  3882. [D-22] 
  3883. [D-23] 
  3884. [D-24] 
  3885. [D-25] 
  3886. [E-1] 
  3887. [E-2] 
  3888. [E-3] 
  3889. [E-4] 
  3890. [E-5] 
  3891. [E-6] 
  3892. [E-7] 
  3893. [E-8] 
  3894. [E-9] 
  3895. [E-10] 
  3896. [E-11] 
  3897. [E-12] 
  3898. [E-13] 
  3899. [E-14] 
  3900. [E-15] 
  3901. [E-16] 
  3902. [E-17] 
  3903. [E-18] 
  3904. [E-19] 
  3905. [E-20] 
  3906. [E-21] 
  3907. [E-22] 
  3908. [E-23] 
  3909. [E-24] 
  3910. [E-25] 
  3911. [F-1] 
  3912. [F-2] 
  3913. [F-3] 
  3914. [F-4] 
  3915. [F-5] 
  3916. [F-6] 
  3917. [F-7] 
  3918. [F-8] 
  3919. [F-9] 
  3920. [F-10] 
  3921. [F-11] 
  3922. [F-12] 
  3923. [F-13] 
  3924. [F-14] 
  3925. [F-15] 
  3926. [F-16] 
  3927. [F-17] 
  3928. [F-18] 
  3929. [F-19] 
  3930. [F-20] 
  3931. [F-21] 
  3932. [F-22] 
  3933. [F-23] 
  3934. [F-24] 
  3935. [F-25] 
  3936. [G-1] 
  3937. [G-2] 
  3938. [G-3] 
  3939. [G-4] 
  3940. [G-5] 
  3941. [G-6] 
  3942. [G-7] 
  3943. [G-8] 
  3944. [G-9] 
  3945. [G-10] 
  3946. [G-11] 
  3947. [G-12] 
  3948. [G-13] 
  3949. [G-14] 
  3950. [G-15] 
  3951. [G-16] 
  3952. [G-17] 
  3953. [G-18] 
  3954. [G-19] 
  3955. [G-20] 
  3956. [G-21] 
  3957. [G-22] 
  3958. [G-23] 
  3959. [G-24] 
  3960. [G-25] 
  3961. [H-1] 
  3962. [H-2] 
  3963. [H-3] 
  3964. [H-4] 
  3965. [H-5] 
  3966. [H-6] 
  3967. [H-7] 
  3968. [H-8] 
  3969. [H-9] 
  3970. [H-10] 
  3971. [H-11] 
  3972. [H-12] 
  3973. [H-13] 
  3974. [H-14] 
  3975. [H-15] 
  3976. [H-16] 
  3977. [H-17] 
  3978. [H-18] 
  3979. [H-19] 
  3980. [H-20] 
  3981. [H-21] 
  3982. [H-22] 
  3983. [H-23] 
  3984. [H-24] 
  3985. [H-25] 
  3986. ;
  3987. ;
  3988. ;
  3989. ;
  3990. ;
  3991. ;
  3992. ;
  3993. ;
  3994. ;
  3995. ;
  3996. ;
  3997. ;
  3998. ;
  3999. ;
  4000. ;
  4001. ;
  4002. ;
  4003. ;
  4004. ;
  4005. ;
  4006. ;
  4007. ;
  4008. ;
  4009. ;
  4010. ;
  4011. ***TABLET2
  4012. $S=X $S=HIDE
  4013. $S=X $S=VPOINT VPOINT;;
  4014. $S=X $S=ELEVTHK ^C^CELEV
  4015. $S=X $S=UCS1 ^C^CUCS
  4016. ^C^CUCS;PREV
  4017. ^C^CUCS;V
  4018. ;
  4019. ^O
  4020. $S=X $S=ZOOM 'ZOOM W
  4021. $S=X $S=LINE ^C^CLINE
  4022. 'REDRAW
  4023. [VPOINT  ]^C^CVPOINT R;<<135;$S=X $S=VPOINT3D
  4024. [VPT rear]^C^CVPOINT R;<<90;$S=X $S=VPOINT3D
  4025. [VPOINT  ]^C^CVPOINT R;<<45;$S=X $S=VPOINT3D
  4026. $S=X $S=UCS1 ^C^CUCS
  4027. ^C^CUCS;;
  4028. ^C^CPLAN;W
  4029. ;
  4030. ^O
  4031. $S=X $S=ZOOM 'ZOOM W
  4032. $S=X $S=PLINE ^C^CPLINE
  4033. 'REDRAW
  4034. [VPT left]^C^CVPOINT R;<<180;$S=X $S=VPOINT3D
  4035. [VPT plan]^C^CPLAN;;
  4036. [VPT rigt]^C^CVPOINT R;<<0;$S=X $S=VPOINT3D
  4037. $S=X $S=DVIEW ^C^CDVIEW
  4038. $S=X $S=DVIEW ^C^CSELECT;\DVIEW;P;;CA;\\;
  4039. $S=X $S=DVIEW ^C^C$S=X $S=DVIEW1 DVIEW;;
  4040. ;
  4041. ^D
  4042. $S=X $S=ZOOM 'ZOOM D
  4043. $S=X $S=ARC ^C^CARC
  4044. 'REDRAW
  4045. [VPOINT  ]^C^CVPOINT R;<<225;$S=X $S=VPOINT3D
  4046. [VPT frnt]^C^CVPOINT R;<<270;$S=X $S=VPOINT3D
  4047. [VPOINT  ]^C^CVPOINT R;<<315;$S=X $S=VPOINT3D
  4048. $S=X $S=DVIEW ^C^CDVIEW
  4049. $S=X $S=DVIEW ^C^CSELECT;\DVIEW;P;;Z;\;
  4050. $S=X $S=DVIEW ^C^CSELECT;\DVIEW;P;;PA;\\;
  4051. ;
  4052. ^Q
  4053. $S=X $S=ZOOM 'ZOOM A
  4054. $S=X $S=CIRCLE ^C^CCIRCLE
  4055. 'REDRAW
  4056. ^C^C^P(progn(setq m:err *error*)(prin1))(defun *error* (msg)(princ msg)+
  4057. (setq *error* m:err m:err nil)(princ))(cond ((null C:LIGHT)(vmon)+
  4058. (if (/= nil (findfile "ashade.lsp"))(progn (terpri);+
  4059. (prompt "Please wait...  Loading ashade.  ")(load "ashade")+
  4060. (menucmd "S=X")(menucmd "S=LIGHTS")(setq *error* m:err m:err nil))(progn (terpri);+
  4061. (prompt "The file 'Ashade.lsp' was not found in your current search directories")+
  4062. (terpri)(prompt "Check your AutoShade Manual for installation instructions.");+
  4063. (setq *error* m:err m:err nil)(princ))))+
  4064. (T (setq *error* m:err m:err nil)(menucmd "S=X")(menucmd "S=LIGHTS")(princ)));+
  4065. (if (and C:LIGHT as-err)(C:LIGHT)(prompt "LIGHT is not properly loaded."))(princ) ^P
  4066. ^C^C^P(progn(setq m:err *error*)(prin1))(defun *error* (msg)(princ msg)+
  4067. (setq *error* m:err m:err nil)(princ))(cond ((null C:CAMERA)(vmon)+
  4068. (if (/= nil (findfile "ashade.lsp"))(progn (terpri);+
  4069. (prompt "Please wait...  Loading ashade.  ")(load "ashade")+
  4070. (menucmd "S=X")(menucmd "S=CAMERA")(setq *error* m:err m:err nil))(progn (terpri);+
  4071. (prompt "The file 'Ashade.lsp' was not found in your current search directories")+
  4072. (terpri)(prompt "Check your AutoShade Manual for installation instructions.");+
  4073. (setq *error* m:err m:err nil)(princ))))+
  4074. (T (setq *error* m:err m:err nil)(menucmd "S=X")(menucmd "S=CAMERA")(princ)));+
  4075. (if (and C:CAMERA as-err)(C:CAMERA)(prompt "CAMERA is not properly loaded."))(princ) ^P
  4076. ^C^C^P(progn(setq m:err *error*)(prin1))(defun *error* (msg)(princ msg)+
  4077. (setq *error* m:err m:err nil)(princ))(cond ((null C:LIGHT)(vmon)+
  4078. (if (/= nil (findfile "ashade.lsp"))(progn (terpri);+
  4079. (prompt "Please wait...  Loading ashade.  ")(load "ashade")+
  4080. (menucmd "S=X")(menucmd "S=ACTION")(setq *error* m:err m:err nil))(progn (terpri);+
  4081. (prompt "The file 'Ashade.lsp' was not found in your current search directories")+
  4082. (terpri)(prompt "Check your AutoShade Manual for installation instructions.");+
  4083. (setq *error* m:err m:err nil)(princ))))+
  4084. (T (setq *error* m:err m:err nil)(menucmd "S=X")(menucmd "S=ACTION")(princ))) ^P
  4085. $S=X $S=3D ^C^CRULESURF
  4086. $S=X $S=3D ^C^CREVSURF
  4087. $S=X $S=3DFACE ^C^C3DFACE
  4088. ;
  4089. 'GRAPHSCR
  4090. $S=X $S=ZOOM 'ZOOM P
  4091. $S=X $S=ELLIPSE ^C^CELLIPSE
  4092. 'REDRAW
  4093. $S=X $S=VPORTS ^C^CVPORTS
  4094. $S=X $S=VPORTS ^C^CVPORTS;JOIN
  4095. ^C^CVPORTS;SI
  4096. $S=X $S=3D ^C^CEDGESURF
  4097. $S=X $S=3D ^C^CTABSURF
  4098. $S=X $S=3DPOLY ^C^C3DPOLY
  4099. ;
  4100. ^E
  4101. $S=X $S=ZOOM 'ZOOM E
  4102. $S=X $S=POLYGON ^C^CPOLYGON
  4103. 'REDRAW
  4104. ;
  4105. ;
  4106. ;
  4107. ;
  4108. ;
  4109. ;
  4110. ;
  4111. ^G
  4112. $S=X $S=ZOOM 'ZOOM
  4113. $S=X $S=POINT ^C^CPOINT
  4114. 'REDRAW
  4115. $S=X $S=BLOCK ^C^CBLOCK
  4116. $S=X $S=INSERT ^C^CINSERT
  4117. $S=X $S=ATTDEF ^C^CATTDEF
  4118. ;
  4119. $S=X $S=LAYER ^C^CLAYER
  4120. $S=X $S=LAYER ^C^CLAYER
  4121. ;
  4122. ^B
  4123. $S=X $S=PAN 'PAN
  4124. ^C^CDONUT
  4125. 'REDRAW
  4126. $S=X $S=WBLOCK ^C^CWBLOCK
  4127. $S=X $S=MINSERT ^C^CMINSERT
  4128. $S=X $S=ATTDEF ^C^CATTDEF
  4129. ;
  4130. $S=X $S=LAYER ^C^CLAYER ? *;;
  4131. ^C^CLAYER S \;
  4132. ;
  4133. ^B
  4134. $S=X $S=DS
  4135. $S=X $S=DR
  4136. 'REDRAW
  4137. ***TABLET3
  4138. ;
  4139. ;
  4140. ;
  4141. <<135
  4142. <<135
  4143. <<90
  4144. <<90
  4145. <<45
  4146. <<45
  4147. ;
  4148. ;
  4149. ;
  4150. <<180
  4151. <<180
  4152. <\
  4153. <\
  4154. <<0
  4155. <<0
  4156. ;
  4157. ;
  4158. ;
  4159. <<225
  4160. <<225
  4161. <<270
  4162. <<270
  4163. <<315
  4164. <<315
  4165. ;
  4166. ;
  4167. ;
  4168. ^H
  4169. ^H
  4170. ^H
  4171. ^H
  4172. ^H
  4173. ^H
  4174. ;
  4175. ;
  4176. ;
  4177. 7/8\
  4178. 7/8\
  4179. /16\
  4180. /16\
  4181. /32\
  4182. /32\
  4183. ;
  4184. ;
  4185. ;
  4186. 1/2\
  4187. 1/2\
  4188. 5/8\
  4189. 5/8\
  4190. 3/4\
  4191. 3/4\
  4192. ;
  4193. ;
  4194. ;
  4195. 1/8\
  4196. 1/8\
  4197. 1/4\
  4198. 1/4\
  4199. 3/8\
  4200. 3/8\
  4201. ;
  4202. ;
  4203. ;
  4204. -\
  4205. -\
  4206. /\
  4207. /\
  4208. X\
  4209. X\
  4210. ;
  4211. ;
  4212. ;
  4213. @\
  4214. @\
  4215. '\
  4216. '\
  4217. "\
  4218. "\
  4219. ;
  4220. ;
  4221. ;
  4222. 7\
  4223. 7\
  4224. 8\
  4225. 8\
  4226. 9\
  4227. 9\
  4228.  
  4229. ;
  4230. ;
  4231. 4\
  4232. 4\
  4233. 5\
  4234. 5\
  4235. 6\
  4236. 6\
  4237. ;
  4238. ;
  4239. ;
  4240. 1\
  4241. 1\
  4242. 2\
  4243. 2\
  4244. 3\
  4245. 3\
  4246.  
  4247. ;
  4248. ;
  4249. 0\
  4250. 0\
  4251. .\
  4252. .\
  4253. ,\
  4254. ,\
  4255. ***TABLET4
  4256. ;
  4257. ;
  4258. ;
  4259. ;
  4260. ;
  4261. ;
  4262. ;
  4263. ;
  4264. ;
  4265. ;
  4266. ;
  4267. ;
  4268. ;
  4269. ;
  4270. ;
  4271. ;
  4272. ;
  4273. ;
  4274. ;
  4275. ;
  4276. ;
  4277. ;
  4278. ;
  4279. ;
  4280. ;
  4281. ^C^CTIME
  4282. $S=X $S=ID ^C^CID
  4283. ^C^CSTATUS
  4284. $S=X $S=LIST ^C^CLIST
  4285. 'HELP
  4286. 'HELP
  4287. ;
  4288. $S=X $S=DTEXT ^C^CDTEXT
  4289. $S=X $S=DTEXT ^C^CDTEXT C
  4290. $S=X $S=DTEXT ^C^CDTEXT R
  4291. ;
  4292. ^C^COSNAP NONE
  4293. CENTER
  4294. ENDPOINT
  4295. INSERT
  4296. INTERSEC
  4297. MIDPOINT
  4298. NEAREST
  4299. NODE
  4300. PERPEND
  4301. QUADRANT
  4302. TANGENT
  4303. ;
  4304. ^C^CSAVE
  4305. ^C^CSAVE
  4306. ^C^CDBLIST
  4307. $S=X $S=AREA ^C^CAREA
  4308. ^C^CDIST
  4309. $S=X $S=LIST ^C^CLIST
  4310. 'HELP
  4311. 'HELP
  4312. ;
  4313. $S=X $S=DTEXT ^C^CDTEXT A
  4314. $S=X $S=DTEXT ^C^CDTEXT M
  4315. $S=X $S=DTEXT ^C^CDTEXT F
  4316. ;
  4317. ^C^C
  4318. ^C^C
  4319. ^C^CU
  4320. ^C^CREDO
  4321. MULTIPLE
  4322. WINDOW
  4323. LAST
  4324. PREVIOUS
  4325. CROSSING
  4326. REMOVE
  4327. ADD
  4328. ;
  4329. $S=X $S=END ^C^CEND
  4330. $S=X $S=QUIT ^C^CQUIT
  4331. ;
  4332. ;
  4333. ;
  4334. ;
  4335. ;
  4336. ;
  4337. ;
  4338. ;
  4339. ;
  4340. ;
  4341. ;
  4342. ;
  4343. ;
  4344. ;
  4345. ;
  4346. ;
  4347. ;
  4348. ;
  4349. ;
  4350. ;
  4351. ;
  4352. ;
  4353. ;
  4354. ^C^CFILES
  4355. ^C^CFILES
  4356. ^C^CDIM1 STATUS
  4357. $S=X $S=VAR1 ^C^CDIM
  4358. UNDO
  4359. 'REDRAW
  4360. EXIT;$S=X $S=S
  4361. EXIT;$S=X $S=S
  4362. ;
  4363. $S=X $S=TEXTSET
  4364. $S=X $S=SNAP ^C^CSNAP
  4365. $S=X $S=GRID ^C^CGRID
  4366. ;
  4367. $S=X $S=SCALE ^C^CSCALE
  4368. $S=X $S=ROTATE ^C^CROTATE
  4369. $S=X $S=OFFSET ^C^COFFSET
  4370. $S=X $S=MOVE ^C^CMOVE
  4371. $S=X $S=ERASE ^C^CERASE
  4372. $S=X $S=ERASE ^C^CERASE
  4373. ^C^COOPS
  4374. ^C^C^P+
  4375. (defun m:p1(/ m:pa m:pc m:d m:w)(menucmd "S=X")(menucmd "S=PSEL");+
  4376. (setq m:d T)(while m:d (setq m:pc (ssget))(setq m:pa (ssname m:pc 0));+
  4377. (if(=(cdr(assoc 0 (entget m:pa))) "POLYLINE")(progn(setq m:d nil)+
  4378. (m:p2 m:pa m:pc))(progn(prompt "Entity selected is not a polyline")(terpri);+
  4379. (if (member (cdr (assoc 0 (entget m:pa))) '("LINE" "ARC"))(progn+
  4380. (initget "Yes No")(setq m:w (getkword "Do you want to turn it into one? <Y>"));+
  4381. (if (or (= m:w "Yes")(null m:w))(progn(setq m:d nil)(menucmd "S=X");+
  4382. (menucmd "S=P0")(command "PEDIT" m:pa "yes" pause)))))))))+
  4383. (defun m:p2(m:pa m:pc / m:pb)(menucmd "S=X")+
  4384. (if (= (setq m:pb (cdr (assoc 70 (entget m:pa)))) nil)(menucmd "S=P0");+
  4385. (progn (setq m:pb (/ m:pb 2))(if (>= m:pb 8)(menucmd "S=P16");+
  4386. (if(< m:pb 4)(menucmd "S=P0")(menucmd "S=P8")))))(command "PEDIT" m:pa pause))+
  4387. (defun perror (msg)(setq *error* m:err m:err nil)(princ))+
  4388. (defun C:PEDITM (/ m:err)(setq m:err *error* *error* perror)(m:p1);+
  4389. (setq *error* m:err m:err nil)(princ))(princ) PEDITM ^P
  4390. ^C^CEXPLODE
  4391. $S=X $S=ARRAY ^C^CARRAY
  4392. $S=X $S=DIVIDE ^C^CDIVIDE
  4393. ;
  4394. ^C^CPLOT
  4395. ^C^CPRPLOT
  4396. $S=X $S=DIM ^C^CDIM1
  4397. $S=X $S=DIM ^C^CDIM LEADER
  4398. $S=X $S=DIMLINEAR BASELINE
  4399. $S=X $S=DIMLINEAR CONTIN
  4400. $S=X $S=DIMLINEAR ^C^CDIM VERT
  4401. $S=X $S=DIMLINEAR ^C^CDIM HORIZ
  4402. ;
  4403. $S=X $S=AXIS ^C^CAXIS
  4404. $S=X $S=SET
  4405. $S=X $S=OSNAPC ^C^COSNAP
  4406. ;
  4407. $S=X $S=MIRROR ^C^CMIRROR
  4408. $S=X $S=BREAK2P ^C^CBREAK \F
  4409. $S=X $S=BREAKSPL ^C^CBREAK \F \@
  4410. $S=X $S=COPY ^C^CCOPY
  4411. $S=X $S=EXTEND ^C^CEXTEND
  4412. $S=X $S=STRETCH ^C^CSTRETCH C
  4413. $S=X $S=TRIM ^C^CTRIM
  4414. $S=X $S=FILLET0 ^C^CFILLET R 0;;
  4415. $S=X $S=FILLET ^C^CFILLET
  4416. $S=X $S=CHAMFER ^C^CCHAMFER
  4417. $S=X $S=MEASURE ^C^CMEASURE
  4418. ;
  4419. $S=X $S=UT
  4420. $S=X $S=CHTEMP ^C^CMENU
  4421. $S=X $S=DIM ^C^CDIM CENTER
  4422. $S=X $S=DIM ^C^CDIM RADIUS
  4423. $S=X $S=DIM ^C^CDIM DIAMETER
  4424. $S=X $S=DIM ^C^CDIM ANGULAR
  4425. $S=X $S=DIM ^C^CDIM ROTATED
  4426. $S=X $S=DIMLINEAR ^C^CDIM ALIGNED
  4427. ;
  4428. $S=X $S=QTEXT ^C^CQTEXT
  4429. $S=X $S=DRAGMODE ^C^CDRAGMODE
  4430. $S=X $S=APERTURE
  4431. ;
  4432.  
  4433.  
  4434.  
  4435.  
  4436. $S=X $S=CHANGE ^C^CCHANGE
  4437. $S=X $S=CHANGE ^C^CCHANGE
  4438. $S=X $S=ATTEDIT ^C^CATTEDIT
  4439.  
  4440.  
  4441.  
  4442.  
  4443. ;
  4444. $S=X $S=EXCOMDS
  4445. $S=X $S=EXCOMDS
  4446. **DTEXT1 33
  4447. $S=X $S=DTEXT ^C^CDTEXT
  4448. $S=X $S=DTEXT ^C^CDTEXT C
  4449. $S=X $S=DTEXT ^C^CDTEXT R
  4450. **DTEXT2 58
  4451. $S=X $S=DTEXT ^C^CDTEXT A
  4452. $S=X $S=DTEXT ^C^CDTEXT M
  4453. $S=X $S=DTEXT ^C^CDTEXT F
  4454. **TEXT1 33
  4455. $S=X $S=TEXT ^C^CTEXT
  4456. $S=X $S=TEXT ^C^CTEXT C
  4457. $S=X $S=TEXT ^C^CTEXT R
  4458. **TEXT2 58
  4459. $S=X $S=TEXT ^C^CTEXT A
  4460. $S=X $S=TEXT ^C^CTEXT M
  4461. $S=X $S=TEXT ^C^CTEXT F
  4462.  
  4463.