home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 1996 May / PCW596.iso / polskie / cadsoft / robstart / rc_rst.exe / POST.PLT < prev    next >
Text File  |  1988-04-20  |  15KB  |  708 lines
  1. * % $
  2. *****************************************************************
  3. *              PLOTTER DESCRIPTOR FILE FOR POSTCRIPT            *
  4. *Ver 1                                                4/10/87 *
  5. *    Portrait Mode only is supported                *
  6. *    Paper size for user is 190 x 275 mm            *
  7. *                                *
  8. *****************************************************************
  9.  
  10. *Special chars are '*' for comment, '%' for special field,
  11. *'$' for command terminator
  12.  
  13. *Name of plotter
  14. POSTCRIPT
  15.  
  16. *****************************************************************
  17. *Paper sizes*
  18. *****************************************************************
  19.  
  20. *No of paper sizes
  21. 6
  22.  
  23. ******************************************************************
  24. *Details of 1st size
  25. ******************************************************************
  26.  
  27.  
  28. *Name of 1st size
  29. PORTRAIT A4 
  30. *Code for size
  31. 1
  32.  
  33. *x,y displacement of plotter image from B\L
  34. -10 -10
  35. *Bottom left, top right hand coords
  36. 300 300
  37. 5700 8100
  38. *Plotter units / mm
  39. 28.35 0.1
  40.  
  41. *Handedness of coords
  42. Right
  43.  
  44. *Home counter
  45. 0
  46.  
  47. *start up instruction - initialise plotter
  48. %%!PS-Adobe-2.0%0D%0A
  49. %%%%Title: %ti%0D%0A
  50. %%%%Creator: %cr%0D%0A
  51. %%%%CreationDate: %da%0D%0A
  52. %%%%BoundingBox: %lx %ly %ux %uy%0D%0A
  53. %%%%Pages: 1%0D%0A
  54. %%%%EndComments%0D%0A
  55.  
  56. /UnitsPerMM 28.35 def%0D%0A
  57.  
  58. /LineTypes [%0D%0A
  59.     [] [20 20] [20 60] [40 40] [80 80] [100 60] [120 20 20 20] [120 20 40 20]%0D%0A
  60.        ] def%0D%0A
  61.  
  62. *Select linetype
  63. /t%0D%0A
  64. { LineTypes exch get%0D%0A
  65.   0 setdash%0D%0A
  66. } def%0D%0A
  67.  
  68. /PenWidths [%0D%0A
  69. * This line is the pen widths in mm
  70.     0.1 0.2 0.3 0.4 0.5 0.6 0.7 0.8%0D%0A
  71. * Dimension A
  72.     0.2%0D%0A
  73. * Dimension B (hairline)
  74.     0.01%0D%0A
  75.        ] def%0D%0A
  76.  
  77. *Select pen width
  78. /p%0D%0A
  79. { PenWidths exch get UnitsPerMM mul%0D%0A
  80.   setlinewidth%0D%0A
  81. } def%0D%0A
  82.  
  83. *2 point line
  84. /l { moveto lineto stroke } def%0D%0A
  85.  
  86. *circle
  87. /i { 0 360 arc stroke } def%0D%0A
  88.  
  89. *clockwise arc
  90. /c { arc stroke } def%0D%0A
  91.  
  92. *anti-clockwise arc
  93. /a { arcn stroke } def%0D%0A
  94. %%%%EndProlog%0D%0A
  95.  
  96. %%%%BeginSetup%0D%0A
  97. newpath 0.1 0.1 scale%0D%0A
  98.  
  99. /SaveImage save def%0D%0A
  100.  
  101. *Projecting square caps
  102. 2 setlinecap%0D%0A
  103.  
  104. * Mitred line joins ...
  105. * Will have to wait for ordered output
  106. * 0 setlinejoin%0D%0A
  107. * internal angle < 60 deg will butt
  108. * 2 setmiterlimit%0D%0A
  109. %%%%EndSetup%0D%0A$
  110.  
  111. *Close down instruction - return paper to loading position, return pen to
  112. *     carousel
  113. %0D%0A
  114. %%%%Trailer%0D%0A
  115. showpage%0D%0A
  116. SaveImage restore%0D%0A%04$
  117.  
  118. ******************************************************************
  119. *Details of 2nd size
  120. ******************************************************************
  121.  
  122.  
  123. *Name of 2nd size
  124. LANDSCAPE A4 
  125. *Code for size
  126. 1
  127.  
  128. *x,y displacement of plotter image from B\L
  129. -10 -10
  130. *Bottom left, top right hand coords
  131. 300 300
  132. 8100 5700
  133. *Plotter units / mm
  134. 28.35 0.1
  135.  
  136. *Handedness of coords
  137. Right
  138.  
  139. *Home counter
  140. 0
  141.  
  142. *start up instruction - initialise plotter
  143. %%!PS-Adobe-2.0%0D%0A
  144. %%%%Title: %ti%0D%0A
  145. %%%%Creator: %cr%0D%0A
  146. %%%%CreationDate: %da%0D%0A
  147. %%%%BoundingBox: %lx %ly %ux %uy%0D%0A
  148. %%%%Pages: 1%0D%0A
  149. %%%%EndComments%0D%0A
  150.  
  151. /UnitsPerMM 28.35 def%0D%0A
  152.  
  153. /LineTypes [%0D%0A
  154.     [] [20 20] [20 60] [40 40] [80 80] [100 60] [120 20 20 20] [120 20 40 20]%0D%0A
  155.        ] def%0D%0A
  156.  
  157. *Select linetype
  158. /t%0D%0A
  159. { LineTypes exch get%0D%0A
  160.   0 setdash%0D%0A
  161. } def%0D%0A
  162.  
  163. /PenWidths [%0D%0A
  164. * This line is the pen widths in mm
  165.     0.1 0.2 0.3 0.4 0.5 0.6 0.7 0.8%0D%0A
  166. * Dimension A
  167.     0.2%0D%0A
  168. * Dimension B (hairline)
  169.     0.01%0D%0A
  170.        ] def%0D%0A
  171.  
  172. *Select pen width
  173. /p%0D%0A
  174. { PenWidths exch get UnitsPerMM mul%0D%0A
  175.   setlinewidth%0D%0A
  176. } def%0D%0A
  177.  
  178. *2 point line
  179. /l { moveto lineto stroke } def%0D%0A
  180.  
  181. *circle
  182. /i { 0 360 arc stroke } def%0D%0A
  183.  
  184. *clockwise arc
  185. /c { arc stroke } def%0D%0A
  186.  
  187. *anti-clockwise arc
  188. /a { arcn stroke } def%0D%0A
  189. %%%%EndProlog%0D%0A
  190.  
  191. %%%%BeginSetup%0D%0A
  192. newpath 0.1 0.1 scale%0D%0A
  193. 90 rotate 0 -5700 translate%0D%0A
  194.  
  195. /SaveImage save def%0D%0A
  196. *Projecting square caps
  197. 2 setlinecap%0D%0A
  198. %%%%EndSetup%0D%0A$
  199.  
  200. *Close down instruction - return paper to loading position, return pen to
  201. *     carousel
  202. %0D%0A
  203. %%%%Trailer%0D%0A
  204. showpage%0D%0A
  205. SaveImage restore%0D%0A%04$
  206.  
  207. ******************************************************************
  208. *Details of 3rd size
  209. ******************************************************************
  210.  
  211. *This is correct, vanilla Encapsulated PostScript
  212. *Known to work on: Xerox Ventura Publisher
  213. *Name of 3rd size
  214. EPS 
  215. *Code for size
  216. 1
  217.  
  218. *x,y displacement of plotter image from B\L
  219. -10 -10
  220. *Bottom left, top right hand coords
  221. 300 300
  222. 5700 8100
  223. *Plotter units / mm
  224. 28.35 0.1
  225.  
  226. *Handedness of coords
  227. Right
  228.  
  229. *Home counter
  230. 0
  231.  
  232. *start up instruction - initialise plotter
  233. %%!PS-Adobe-2.0 EPSF-1.2%0D%0A
  234. %%%%Title: %ti%0D%0A
  235. %%%%Creator: %cr%0D%0A
  236. %%%%CreationDate: %da%0D%0A
  237. %%%%BoundingBox: %lx %ly %ux %uy%0D%0A
  238. %%%%Pages: 0%0D%0A
  239. %%%%EndComments%0D%0A
  240.  
  241. /UnitsPerMM 28.35 def%0D%0A
  242.  
  243. /LineTypes [%0D%0A
  244.     [] [20 20] [20 60] [40 40] [80 80] [100 60] [120 20 20 20] [120 20 40 20]%0D%0A
  245.        ] def%0D%0A
  246.  
  247. *Select linetype
  248. /t%0D%0A
  249. { LineTypes exch get%0D%0A
  250.   0 setdash%0D%0A
  251. } def%0D%0A
  252.  
  253. /PenWidths [%0D%0A
  254. * This line is the pen widths in mm
  255.     0.1 0.2 0.3 0.4 0.5 0.6 0.7 0.8%0D%0A
  256. * Dimension A
  257.     0.2%0D%0A
  258. * Dimension B (hairline)
  259.     0.01%0D%0A
  260.        ] def%0D%0A
  261.  
  262. *Select pen width
  263. /p%0D%0A
  264. { PenWidths exch get UnitsPerMM mul%0D%0A
  265.   setlinewidth%0D%0A
  266. } def%0D%0A
  267.  
  268. *2 point line
  269. /l { moveto lineto stroke } def%0D%0A
  270.  
  271. *circle
  272. /i { 0 360 arc stroke } def%0D%0A
  273.  
  274. *clockwise arc
  275. /c { arc stroke } def%0D%0A
  276.  
  277. *anti-clockwise arc
  278. /a { arcn stroke } def%0D%0A
  279. %%%%EndProlog%0D%0A
  280.  
  281. %%%%BeginSetup%0D%0A
  282. newpath 0.1 0.1 scale%0D%0A
  283.  
  284. /SaveImage save def%0D%0A
  285. *Projecting square caps
  286. 2 setlinecap%0D%0A
  287.  
  288. * Mitred line joins ...
  289. * Will have to wait for ordered output
  290. * 0 setlinejoin%0D%0A
  291. * internal angle < 60 deg will butt
  292. * 2 setmiterlimit%0D%0A
  293. %%%%EndSetup%0D%0A$
  294.  
  295. *Close down instruction - return paper to loading position, return pen to
  296. *     carousel
  297. %0D%0A
  298. %%%%Trailer%0D%0A
  299. SaveImage restore%0D%0A$
  300.  
  301. ******************************************************************
  302. *Details of 4th size
  303. ******************************************************************
  304.  
  305. *This is brain-damaged Encapsulated PostScript
  306. *It expects 0,0 to be at the postion where the graphic is wanted
  307. *It also expects the following to be on the stack (order as pushed)
  308. * W H
  309. *where W and H are the width and height of the box in which to fit.
  310. *All units are assumed to be in default 1/72 inch
  311. *Known to work on: Frame Maker
  312.  
  313. *Name of 4th size
  314. EPS-FrameMaker
  315. *Code for size
  316. 1
  317.  
  318. *x,y displacement of plotter image from B\L
  319. -10 -10
  320. *Bottom left, top right hand coords
  321. 300 300
  322. 5700 8100
  323. *Plotter units / mm
  324. 28.35 0.1
  325.  
  326. *Handedness of coords
  327. Right
  328.  
  329. *Home counter
  330. 0
  331.  
  332. *start up instruction - initialise plotter
  333. %%!PS-Adobe-2.0 EPSF-1.2%0D%0A
  334. %%%%Title: %ti (EPSF for FrameMaker)%0D%0A
  335. %%%%Creator: %cr%0D%0A
  336. %%%%CreationDate: %da%0D%0A
  337. %%%%BoundingBox: %lx %ly %ux %uy%0D%0A
  338. %%%%Pages: 0%0D%0A
  339. %%%%EndComments%0D%0A
  340.  
  341. /UnitsPerMM 28.35 def%0D%0A
  342.  
  343. /LineTypes [%0D%0A
  344.     [] [20 20] [20 60] [40 40] [80 80] [100 60] [120 20 20 20] [120 20 40 20]%0D%0A
  345.        ] def%0D%0A
  346.  
  347. *Select linetype
  348. /t%0D%0A
  349. { LineTypes exch get%0D%0A
  350.   0 setdash%0D%0A
  351. } def%0D%0A
  352.  
  353. /PenWidths [%0D%0A
  354. * This line is the pen widths in mm
  355.     0.1 0.2 0.3 0.4 0.5 0.6 0.7 0.8%0D%0A
  356. * Dimension A
  357.     0.2%0D%0A
  358. * Dimension B (hairline)
  359.     0.01%0D%0A
  360.        ] def%0D%0A
  361.  
  362. *Select pen width
  363. /p%0D%0A
  364. { PenWidths exch get UnitsPerMM mul%0D%0A
  365.   setlinewidth%0D%0A
  366. } def%0D%0A
  367.  
  368. *2 point line
  369. /l { moveto lineto stroke } def%0D%0A
  370.  
  371. *circle
  372. /i { 0 360 arc stroke } def%0D%0A
  373.  
  374. *clockwise arc
  375. /c { arc stroke } def%0D%0A
  376.  
  377. *anti-clockwise arc
  378. /a { arcn stroke } def%0D%0A
  379. %%%%EndProlog%0D%0A
  380.  
  381. %%%%BeginSetup%0D%0A
  382. newpath%0D%0A
  383. * Scale so as to fit in box
  384. /boxheight exch def /boxwidth exch def%0D%0A
  385. boxwidth %ux %lx sub div%0D%0A
  386. boxheight %uy %ly sub div%0D%0A
  387. scale%0D%0A
  388. * Move origin to negative of lower left of bounding box
  389. %lx neg %ly neg translate%0D%0A
  390. * Now our own scaling
  391. 0.1 0.1 scale%0D%0A
  392.  
  393. /SaveImage save def%0D%0A
  394. *Projecting square caps
  395. 2 setlinecap%0D%0A
  396.  
  397. * Mitred line joins ...
  398. * Will have to wait for ordered output
  399. * 0 setlinejoin%0D%0A
  400. * internal angle < 60 deg will butt
  401. * 2 setmiterlimit%0D%0A
  402. %%%%Endetup%0D%0A$
  403.  
  404. *Close down instruction - return paper to loading position, return pen to
  405. *     carousel
  406. %0D%0A
  407. %%%%Trailer%0D%0A
  408. SaveImage restore%0D%0A$
  409.  
  410. ******************************************************************
  411. *Details of 5th size
  412. ******************************************************************
  413.  
  414. *This is brain-damaged Encapsulated PostScript
  415. *It expects 0,0 to be at the postion where the graphic is wanted
  416. *It also expects the following to be on the stack (order as pushed)
  417. * W H
  418. *where W and H are the width and height of the box in which to fit.
  419. *All units are assumed to be in default 1/72 inch
  420.  
  421. *Performs scaling so as to keep image orthogonal.
  422.  
  423. *Known to work on: Frame Maker
  424.  
  425. *Name of 5th size
  426. EPS-FrMaORTH
  427. *Code for size
  428. 1
  429.  
  430. *x,y displacement of plotter image from B\L
  431. -10 -10
  432. *Bottom left, top right hand coords
  433. 300 300
  434. 5700 8100
  435. *Plotter units / mm
  436. 28.35 0.1
  437.  
  438. *Handedness of coords
  439. Right
  440.  
  441. *Home counter
  442. 0
  443.  
  444. *start up instruction - initialise plotter
  445. %%!PS-Adobe-2.0 EPSF-1.2%0D%0A
  446. %%%%Title: %ti (EPSF for FrameMaker)%0D%0A
  447. %%%%Creator: %cr%0D%0A
  448. %%%%CreationDate: %da%0D%0A
  449. %%%%BoundingBox: %lx %ly %ux %uy%0D%0A
  450. %%%%Pages: 0%0D%0A
  451. %%%%EndComments%0D%0A
  452.  
  453. /UnitsPerMM 28.35 def%0D%0A
  454.  
  455. /LineTypes [%0D%0A
  456.     [] [20 20] [20 60] [40 40] [80 80] [100 60] [120 20 20 20] [120 20 40 20]%0D%0A
  457.        ] def%0D%0A
  458.  
  459. *Select linetype
  460. /t%0D%0A
  461. { LineTypes exch get%0D%0A
  462.   0 setdash%0D%0A
  463. } def%0D%0A
  464.  
  465. /PenWidths [%0D%0A
  466. * This line is the pen widths in mm
  467.     0.1 0.2 0.3 0.4 0.5 0.6 0.7 0.8%0D%0A
  468. * Dimension A
  469.     0.2%0D%0A
  470. * Dimension B (hairline)
  471.     0.01%0D%0A
  472.        ] def%0D%0A
  473.  
  474. *Select pen width
  475. /p%0D%0A
  476. { PenWidths exch get UnitsPerMM mul%0D%0A
  477.   setlinewidth%0D%0A
  478. } def%0D%0A
  479.  
  480. *2 point line
  481. /l { moveto lineto stroke } def%0D%0A
  482.  
  483. *circle
  484. /i { 0 360 arc stroke } def%0D%0A
  485.  
  486. *clockwise arc
  487. /c { arc stroke } def%0D%0A
  488.  
  489. *anti-clockwise arc
  490. /a { arcn stroke } def%0D%0A
  491. %%%%EndProlog%0D%0A
  492.  
  493. %%%%BeginSetup%0D%0A
  494.  
  495. newpath%0D%0A
  496. * Scale so as to fit in box
  497. /boxheight exch def /boxwidth exch def%0D%0A
  498. /xscale boxwidth %ux %lx sub div def%0D%0A
  499. /yscale boxheight %uy %ly sub div def%0D%0A
  500. xscale yscale lt {xscale} {yscale} ifelse dup%0D%0A
  501. scale%0D%0A
  502. * Move origin to negative of lower left of bounding box
  503. %lx neg %ly neg translate%0D%0A
  504. * Now our own scaling
  505. 0.1 0.1 scale%0D%0A
  506.  
  507. /SaveImage save def%0D%0A
  508. *Projecting square caps
  509. 2 setlinecap%0D%0A
  510.  
  511. * Mitred line joins ...
  512. * Will have to wait for ordered output
  513. * 0 setlinejoin%0D%0A
  514. * internal angle < 60 deg will butt
  515. * 2 setmiterlimit%0D%0A
  516. %%%%EndSetup%0D%0A$
  517.  
  518. *Close down instruction - return paper to loading position, return pen to
  519. *     carousel
  520. %0D%0A
  521. %%%%Trailer%0D%0A
  522. SaveImage restore%0D%0A$
  523.  
  524. ******************************************************************
  525. *Details of 6th size
  526. ******************************************************************
  527.  
  528. *This is brain-damaged Encapsulated PostScript
  529. *Known to work on: TeX dvi driver for SUN and VAX (dvi2ps)
  530. *It expects 0,0 to have been moved to the lower left of the desired
  531. *position, and co-ordinates to increase to the right and up.
  532.  
  533. *Name of 6th size
  534. EPS-TeX
  535. *Code for size
  536. 1
  537.  
  538. *x,y displacement of plotter image from B\L
  539. -10 -10
  540. *Bottom left, top right hand coords
  541. 300 300
  542. 5700 8100
  543. *Plotter units / mm
  544. 28.35 0.1
  545.  
  546. *Handedness of coords
  547. Right
  548.  
  549. *Home counter
  550. 0
  551.  
  552. *start up instruction - initialise plotter
  553. %%!PS-Adobe-2.0 EPSF-1.2%0D%0A
  554. %%%%Title: %ti (EPSF for TeX dvi2ps)%0D%0A
  555. %%%%Creator: %cr%0D%0A
  556. %%%%CreationDate: %da%0D%0A
  557. %%%%BoundingBox: %lx %ly %ux %uy%0D%0A
  558. %%%%Pages: 0%0D%0A
  559. %%%%EndComments%0D%0A
  560.  
  561. /UnitsPerMM 28.35 def%0D%0A
  562.  
  563. /LineTypes [%0D%0A
  564.     [] [20 20] [20 60] [40 40] [80 80] [100 60] [120 20 20 20] [120 20 40 20]%0D%0A
  565.        ] def%0D%0A
  566.  
  567. *Select linetype
  568. /t%0D%0A
  569. { LineTypes exch get%0D%0A
  570.   0 setdash%0D%0A
  571. } def%0D%0A
  572.  
  573. /PenWidths [%0D%0A
  574. * This line is the pen widths in mm
  575.     0.1 0.2 0.3 0.4 0.5 0.6 0.7 0.8%0D%0A
  576. * Dimension A
  577.     0.2%0D%0A
  578. * Dimension B (hairline)
  579.     0.01%0D%0A
  580.        ] def%0D%0A
  581.  
  582. *Select pen width
  583. /p%0D%0A
  584. { PenWidths exch get UnitsPerMM mul%0D%0A
  585.   setlinewidth%0D%0A
  586. } def%0D%0A
  587.  
  588. *2 point line
  589. /l { moveto lineto stroke } def%0D%0A
  590.  
  591. *circle
  592. /i { 0 360 arc stroke } def%0D%0A
  593.  
  594. *clockwise arc
  595. /c { arc stroke } def%0D%0A
  596.  
  597. *anti-clockwise arc
  598. /a { arcn stroke } def%0D%0A
  599. %%%%EndProlog%0D%0A
  600.  
  601. %%%%BeginSetup
  602. newpath%0D%0A
  603. *Handle translation
  604. %lx neg %ly neg translate%0D%0A
  605. 0.1 0.1 scale%0D%0A
  606.  
  607. /SaveImage save def%0D%0A
  608. *Projecting square caps
  609. 2 setlinecap%0D%0A
  610.  
  611. * Mitred line joins ...
  612. * Will have to wait for ordered output
  613. * 0 setlinejoin%0D%0A
  614. * internal angle < 60 deg will butt
  615. * 2 setmiterlimit%0D%0A
  616. %%%%EndSetup%0D%0A$
  617.  
  618. *Close down instruction - return paper to loading position, return pen to
  619. *     carousel
  620. %0D%0A
  621. %%%%Trailer%0D%0A
  622. SaveImage restore%0D%0A$
  623.  
  624. *****************************************************************
  625. *Plotting commands
  626. *****************************************************************
  627.  
  628. *Line from current point
  629. %none$
  630.  
  631. *Line between 2 points
  632. %xe %ye %xs %ys l $
  633.  
  634. *Circle
  635. %xc %yc %rd i $
  636.  
  637. *CW arc from current point
  638. %none$
  639.  
  640. *A/CW arc from current point
  641. %none$
  642.  
  643. *CW arc between 2 points
  644. %xc %yc %rd %a2 %a1 c $
  645.  
  646. *A/CW arc between 2 points
  647. %xc %yc %rd %a1 %a2 a $
  648.  
  649. *No ellipse command
  650. %none$
  651.  
  652. *No elliptical arc commands
  653. %none$
  654. %none$
  655. %none$
  656. %none$
  657.  
  658. *****************************************************************
  659. *Pen parameters
  660. *****************************************************************
  661.  
  662. *No. of pens
  663. 10
  664.  
  665. *No. of 1st pen
  666. 0
  667.  
  668. *Select pen instruction
  669. %pn p $
  670.  
  671. *No. of linetypes
  672. 8
  673.  
  674. *Line type instructions
  675. 0 t $
  676. 1 t $
  677. 2 t $
  678. 3 t $
  679. 4 t $
  680. 5 t $
  681. 6 t $
  682. 7 t $
  683.  
  684. *----------------------------------------------------------------------
  685. *Select pen speed instruction
  686. %none$
  687.  
  688.  
  689. *----------------------------------------------------------------------
  690.  
  691. *Select pen pressure instruction
  692. %none$
  693.  
  694. *Arc chord angle in degrees
  695. 3.0
  696.  
  697. *Minimum step length(mm)
  698. 0.2
  699.  
  700. *Minimum no. of steps
  701. 3
  702.  
  703. *Maximum step length(mm)
  704. 3.0
  705.  
  706. *Text height (in mm) below which text is plotted with lines only
  707. 1.0
  708.