home *** CD-ROM | disk | FTP | other *** search
/ Global Amiga Experience / globalamigaexperience.iso / graphic / cad / xcad3000 / menus / tablet / 1
Encoding:
Text File  |  1995-07-10  |  10.3 KB  |  474 lines
  1. : 1  5   "draw text text !!"
  2. : 2  5   "select text parameters"
  3. : 3  5   " height "
  4. : 4  5   " width "
  5. : 5  5   "draw textfile name "
  6. : 7  5   "select environment filereq ON
  7. "
  8. : 8  5   "select environment filereq OFF
  9. "
  10. : 9  5   "select environment filereq OFF
  11. "
  12. :10  5   "echo entity entity all ON
  13. "
  14. :11  5   "echo entity entity all DOT
  15. "
  16. :12  5   "select environment automenus all on
  17. "
  18. :13  5   "select environment automenus all off
  19. "
  20. :15  5   "select grid size 0.0625 emphasize 4
  21. "
  22. :16  5   "select grid size 0.125 emphasize 4
  23. "
  24. :17  5   "select grid size 0.25 emphasize 4
  25. "
  26. :18  5   "select grid size 0.5 emphasize 4
  27. "
  28. :19  5   "echo grid on
  29. "
  30. :21  5   "measure distance:"
  31. :22  5   "measure area:"
  32. :24  5   "select laycolour colour "
  33. :25  5   " colour "
  34. :26  5   " layer "
  35. :27  5   "change colour
  36. "
  37. :28  5   "change colour reset
  38. "
  39. :30  5   "open drawing name drawings:"
  40. :31  5   "open drawing name "
  41. :32  5   "open drawing name "
  42. :33  5   "save drawing
  43. "
  44. :34  5   "save drawing
  45. "
  46. :35  5   "save drawing name "
  47.  
  48.  
  49. : 1  6   " justify LEFT "
  50. : 2  6   " justify CENTRE "
  51. : 3  6   " justify RIGHT "
  52. : 4  6   " spacing UNIFORM "
  53. : 5  6   " spacing PROPORTIONAL "
  54. : 7  6   "amigados command string !!"
  55. : 8  6   "amigados command string !calc "
  56. : 9  6   "execute file name work:dynamic
  57. "
  58. :10  6   "open tablet summagraphics MM1812 tabletmenu menus:tablet/1 left 11 top 14 right 12 keysize 12
  59. "
  60. :11  6   "close tablet
  61. "
  62. :12  6   "echo borders on
  63. "
  64. :13  6   "echo borders off
  65. "
  66. :15  6   "select grid size "
  67. :16  6   " emphasize "
  68. :17  6   " xpitch "
  69. :18  6   " ypitch "
  70. :19  6   "echo grid off
  71. "
  72. :21  6   "measure angle:"
  73. :30  6   "define viewport name "
  74. :31  6   " scale "
  75. :32  6   " units "
  76. :33  6   "select viewport sheet
  77. "
  78. :34  6   "select viewport:"
  79. :35  6   "select viewport viewport AA
  80. "
  81.  
  82.  
  83. : 1  7   " font "
  84. : 2  7   " font STANDARD "
  85. : 3  7   " font TEMPO "
  86. : 4  7   " font HELV "
  87. : 5  7   " font TIMES "
  88. :23  7   "select layer layer "
  89. :24  7   "change layer layer "
  90. :25  7   "echo layer "
  91. :26  7   " depth "
  92. :27  7   " none "
  93. :28  7   " all
  94. "
  95. :30  7   "MM"
  96. :31  7   "CM"
  97. :32  7   "KM"
  98. :33  7   "IN"
  99. :34  7   "FT"
  100. :35  7   "MILES"
  101.  
  102.  
  103. : 1  8   " increment ASCENDING "
  104. : 2  8   "!"
  105. : 3  8   "!! parameters "
  106. : 4  8   " slant "
  107. : 5  8   " tnod "
  108. : 7  8   " ia "
  109. : 8  8   " ir "
  110. : 9  8   "7"
  111. :10  8   "8"
  112. :11  8   "9"
  113. :12  8   " angle "
  114. :13  8   " angle 0 "
  115. :15  8   " tangential"
  116. :16  8   "draw spline"
  117. :17  8   " rectangle"
  118. :18  8   "draw polygon"
  119. :19  8   "draw string"
  120. :20  8   "change string"
  121. :21  8   "draw xhatch distance "
  122. :22  8   "draw fillet radius "
  123. :23  8   "select depth depth "
  124. :24  8   "change depth depth "
  125. :25  8   "echo depth "
  126. :26  8   " layer "
  127. :27  8   " include "
  128. :28  8   " exclude "
  129. :30  8   "select environment filereq off
  130. open drawing name drawings:format/a0 as drawings:"
  131. :31  8   "select environment filereq off
  132. open drawing name drawings:format/a1 as drawings:"
  133. :32  8   "select environment filereq off
  134. open drawing name drawings:format/a2 as drawings:"
  135. :33  8   "select environment filereq off
  136. open drawing name drawings:format/a3 as drawings:"
  137. :34  8   "select environment filereq off
  138. open drawing name drawings:format/a4 as drawings:"
  139. :35  8   " vertical "
  140.  
  141.  
  142. : 1  9   "define text font test character "
  143. : 2  9   "change text parameters"
  144. : 3  9   "change text edit:"
  145. : 7  9   " ix "
  146. : 8  9   " iy "
  147. : 9  9   "4"
  148. :10  9   "5"
  149. :11  9   "6"
  150. :12  9   " angle 90 "
  151. :13  9   " angle 180 "
  152. :15  9   "draw line"
  153. :16  9   " hardfont thickness 3"
  154. :17  9   " hardfont style 3"
  155. :18  9   " hardfont style 7"
  156. :19  9   " parallel "
  157. :20  9   "draw line vertical"
  158. :21  9   "draw line horizontal"
  159.  
  160.  
  161. : 7  10  " x "
  162. : 8  10  " y "
  163. : 9  10  "1"
  164. :10  10  "2"
  165. :11  10  "3"
  166. :12  10  ":"
  167. :13  10  " angle 270 "
  168. :14  10  ":"
  169. :15  10  "draw circle:"
  170. :16  10  "draw circle diameter:"
  171. :17  10  "draw circle radius "
  172. :18  10  "draw circle diameter "
  173. :19  10  "draw arc"
  174. :20  10  "draw arc radius"
  175. :21  10  "draw tnode parameters"
  176. :23  10  "change font"
  177. :24  10  "change font hardfont "
  178. :25  10  " style "
  179. :26  10  " thickness "
  180. :29  10  "scroll window up left
  181. "
  182. :30  10  "scroll window up
  183. "
  184. :31  10  "scroll window up right
  185. "
  186. :32  10  "zoom all
  187. "
  188. :33  10  "zoom window:"
  189. :34  10  "zoom map zoomall
  190. "
  191. :35  10  "zoom window down
  192. "
  193.  
  194.  
  195. : 1  11  "list hardfont
  196. "
  197. : 2  11  "list patternfill
  198. "
  199. : 3  11  "list grid
  200. "
  201. : 4  11  "list text
  202. "
  203. : 5  11  "list viewport all
  204. "
  205. : 7  11  "-"
  206. : 8  11  " "
  207. : 9  11  ","
  208. :10  11  "."
  209. :11  11  "0"
  210. :12  11  "
  211. "
  212. :13  11  " array "
  213. :14  11  "
  214. "
  215. :15  11  "draw arc parallel "
  216. :16  11  "draw ellipse majoraxis minoraxis"
  217. :17  11  "draw ellipse majoraxis minoraxis endangle 180"
  218. :18  11  "draw ellipse majoraxis minoraxis startangle 180 endangle 360"
  219. :19  11  "draw ellipse majoraxis minoraxis startangle 180 endangle 360 rot 90"
  220. :20  11  "draw fillet radius "
  221. :21  11  "draw cpoint:"
  222. :23  11  " softfont "
  223. :24  11  " width "
  224. :25  11  " patternfill "
  225. :26  11  " spacing "
  226. :29  11  "scroll window left
  227. "
  228. :30  11  "scroll window:"
  229. :31  11  "scroll window right
  230. "
  231. :32  11  "define image name "
  232. :33  11  "zoom image name "
  233. :34  11  "redraw display
  234. "
  235. :35  11  "redraw display
  236. "
  237.  
  238.  
  239. :29  12  "scroll window down left
  240. "
  241. :30  12  "scroll window down
  242. "
  243. :31  12  "scroll window down right
  244. "
  245. :32  12  "A
  246. "
  247. :33  12  "B
  248. "
  249. :34  12  "C
  250. "
  251. :35  12  "D
  252. "
  253.  
  254.  
  255. : 1  13  "draw dimension dparameters "
  256. : 2  13  "draw dimension type VERTICAL dparameters "
  257. : 3  13  "draw dimension dparameters text dtext "
  258. : 4  13  "draw dimension type VERTICAL dparameters text dtext "
  259. : 5  13  "draw dimension type LINEAR dparameters "
  260. : 6  13  "draw dimension type DIAMETRIC dparameters "
  261. : 7  13  "draw dimension type RADIAL dparameters "
  262. : 8  13  "draw dimension type ANGULAR dparameters text position HORIZONTAL "
  263. :10  13  " ref "
  264. :11  13  " mid "
  265. :12  13  " intof "
  266. :13  13  " ent "
  267. :14  13  " trap small "
  268. :15  13  " trap standard "
  269. :16  13  " generate "
  270. :17  13  " chain "
  271. :18  13  " xlock "
  272. :19  13  " ylock "
  273. :20  13  " xylock "
  274. :21  13  " lockoff "
  275. :22  13  " gridon "
  276. :23  13  " gridoff "
  277. :25  13  " define_image "
  278. :26  13  " zoom_image "
  279.  
  280.  
  281.  
  282. : 1  14  " suppress FIRST "
  283. : 2  14  " suppress SECOND "
  284. : 3  14  " suppress BOTH "
  285. : 4  14  " suppress NONE "
  286. : 5  14  " align "
  287. : 7  14  " text precision "
  288. : 8  14  " text position HORIZONTAL "
  289. :10  14  " end "
  290. :11  14  " org "
  291. :12  14  " near "
  292. :13  14  " loc "
  293. :14  14  " lorg "
  294. :15  14  " trap large "
  295. :16  14  " window "
  296. :17  14  " inside cross "
  297. :18  14  " outside cross "
  298. :19  14  " units "
  299. :20  14  " viewport "
  300. :21  14  " nohilite "
  301. :22  14  " exclude "
  302. :24  14  " scroll_window "
  303. :25  14  " zoom_window "
  304. :26  14  " zoom_all "
  305. :28  14  "trim entity:"
  306. :29  14  "trim entity intersection:"
  307. :30  14  "trim entity against:"
  308. :31  14  "trim entity length "
  309. :32  14  "stretch entity:"
  310. :33  14  "stretch window:"
  311. :34  14  "move entity:"
  312. :35  14  "move entity copy:"
  313.  
  314.  
  315.  
  316. : 1  15  "select dimension parameters arrowhead FILLED length .3 ratio 3 leadergap .3 leaderextension .3
  317. "
  318.  
  319. : 2  15  "select dimension parameters arrowhead FILLED length 3 ratio 3 leadergap 3 leaderextension 3
  320. "
  321. : 3  15  "select dimension parameters "
  322. : 4  15  "change dimension "
  323. : 5  15  "explode dimension"
  324. :28  15  "rotate entity"
  325. :29  15  "rotate entity copy"
  326. :30  15  " angle "
  327. :31  15  " ntimes "
  328. :32  15  "break entity:"
  329. :33  15  "break entity against:"
  330. :34  15  "mirror entity:"
  331. :35  15  "mirror entity copy:"
  332.  
  333.  
  334. : 7  16  " angle "
  335. : 8  16  " angle 0 "
  336. :10  16  " arc "
  337. :11  16  " circle "
  338. :28  16  "delete entity:"
  339. :29  16  "delete entity:"
  340. :30  16  "undo last
  341. "
  342. :31  16  "undo last
  343. "
  344. :32  16  "verify entity"
  345. :33  16  "include entity
  346. "
  347. :34  16  "scale entity scale "
  348. :35  16  "scale entity copy scale "
  349.  
  350.  
  351.  
  352. : 1  17  "define symbol name "
  353. : 2  17  "draw symbol name "
  354. : 3  17  "change symbol parameters"
  355. : 4  17  "explode symbol"
  356. : 5  17  " mirrorx "
  357. : 6  17  " mirrory "
  358. : 7  17  " angle 90 "
  359. : 8  17  " angle 180 "
  360. :10  17  " cpoint "
  361. :11  17  " dimension "
  362.  
  363.  
  364.  
  365. : 1  18  " scale "
  366. : 2  18  " explode "
  367. : 3  18  " unlink "
  368. : 4  18  "select symbol directory symbols:"
  369. : 5  18  " xscale "
  370. : 6  18  " yscale "
  371. : 7  18  " align "
  372. : 8  18  " angle 270 "
  373. :10  18  " ellipse "
  374. :11  18  " line "
  375. :28  18  "draw string softfont openended width "
  376. :29  18  "draw terminal"
  377. :30  18  "draw string softfont openended width "
  378. :31  18  "draw string softfont width .3 openended "
  379. :32  18  "draw string softfont width .1 openended "
  380. :33  18  "left"
  381. :34  18  "centre"
  382. :35  18  "right"
  383.  
  384.  
  385.  
  386. :10  19  " netline "
  387. :11  19  " polygon "
  388. :28  19  "delete component:"
  389. :29  19  "delete component:"
  390.  
  391.  
  392.  
  393. : 1  20  "draw label text !!"
  394. : 2  20  "draw label parameters boxed text !!"
  395. : 3  20  "draw arrow extension:"
  396. : 4  20  "Ð"
  397. : 5  20  "º"
  398. : 6  20  "Ø"
  399. : 7  20  "÷"
  400. : 8  20  "¦"
  401. :10  20  " spline "
  402. :11  20  " string "
  403. :31  20  "draw symbol name symbols:arch/windows/1 explode parameters "
  404. :32  20  "draw symbol name symbols:arch/windows/2 explode parameters "
  405. :33  20  "draw symbol name symbols:arch/doors/external explode parameters "
  406. :34  20  " mirrorx "
  407. :35  20  " mirrory "
  408.  
  409.  
  410.  
  411. : 1  21  "Å"
  412. : 2  21  "¿"
  413. : 3  21  "®"
  414. : 4  21  "µ"
  415. : 5  21  "¶"
  416. : 6  21  "Þ"
  417. : 7  21  "©"
  418. : 8  21  "§"
  419. :10  21  " symbol "
  420. :11  21  " terminal "
  421. :28  21  "draw symbol name arch/walls/t-.1 explode parameters "
  422. :29  21  "draw symbol name arch/walls/t-.3 explode parameters "
  423. :30  21  "draw symbol name arch/walls/x-.1 explode parameters "
  424. :31  21  "draw symbol name arch/walls/x-.3 explode parameters "
  425. :32  21  "draw symbol name arch/walls/t-.3-.1 explode parameters "
  426. :33  21  "draw symbol name arch/doors/internal parameters "
  427. :34  21  " angle "
  428. :35  21  " angle 0 "
  429.  
  430.  
  431.  
  432.  
  433. : 1  22  "¥"
  434. : 2  22  "Æ"
  435. : 3  22  "£"
  436. : 4  22  "Ç"
  437. : 5  22  "¯"
  438. : 6  22  "ª"
  439. : 7  22  " "
  440. : 8  22  " "
  441. :10  22  " text "
  442. :11  22  " tnode "
  443. :28  22  "draw symbol name chair/exec parameters "
  444. :29  22  "draw symbol name chair/salaried parameters "
  445. :30  22  "draw symbol name desk/c90-2 parameters "
  446. :31  22  "draw symbol name desk/c90-2 parameters angle 270 "
  447. :34  22  " angle 90 "
  448. :35  22  " angle 180 "
  449.  
  450.  
  451.  
  452. : 1  23  " "
  453. : 2  23  " "
  454. : 3  23  " "
  455. : 4  23  " "
  456. : 5  23  " "
  457. : 6  23  " "
  458. : 7  23  " "
  459. : 8  23  " "
  460. :10  23  " xhatch "
  461. :28  23  "draw symbol name desk/cc60sp parameters "
  462. :29  23  "draw symbol name desk/cct60 parameters "
  463. :30  23  "draw symbol name desk/c90-2 parameters angle 90 "
  464. :31  23  "draw symbol name desk/c90-2 parameters angle 180 "
  465. :34  23  " angle 270 "
  466. :35  23  " align "
  467.  
  468.  
  469. :1   24  "list symbol to work:superbase/temp-X1 attribute COMPTYPE fieldlength 20 attribute ITEMTYPE fieldlength 20
  470. "
  471. :34  24  "execute xmac from work:xmacros/"
  472. :35  24  "execute xmac from work:xmacros/chip-1
  473. "
  474.