home *** CD-ROM | disk | FTP | other *** search
/ Piper's Pit BBS/FTP: ibm 0010 - 0019 / ibm0010-0019 / ibm0010.tar / ibm0010 / CADKEY_C.ZIP / CADKEY12.ZIP / PLOTCAP < prev    next >
Encoding:
Text File  |  1989-08-30  |  3.6 KB  |  124 lines
  1. #
  2. #        Plotcap source file
  3. #
  4. #            plotter commands:
  5. #
  6. #     cb  --  command bias
  7. #     cn  --  center origin flag
  8. #     dl  --  coordinate system written using deltas flag
  9. #     fl  --  fill command envoke if set with string
  10. #     in  --  initialization instructions
  11. #     mv  --  pen move command
  12. #     pc  --  pen change command
  13. #     pd  --  pen down command
  14. #     pe  --  polygon fill end command
  15. #     ps  --  polygon fill start command
  16. #     pu  --  pen up command
  17. #     rs  --  plotter resolution (in millimeters)
  18. #     rx  --  coordinate radix
  19. #     sn  --  pen starting number
  20. #     sp  --  coordinate separator
  21. #     s2  --  coordinate separator number 2, for coordinate pairs
  22. #     st  --  string terminator
  23. #     sy  --  similiar to exst. code(ie. 1,hp 2,dmp 3,cal 4,rs274, 5,BGL 0,none)
  24. #     tc  --  for other capabilities see other definition (must be last command)
  25. #     tm  --  plotter termination instructions
  26. #     vl  --  pen velocity command
  27. #     w1  --  first part of window instruction
  28. #     w2  --  second part of window instruction
  29. #
  30. #    HPGL lower left origin
  31. #
  32. HP|hp|HPGL|hpgl:\
  33.     :cb#0:cn@:dl@:fl=;\
  34.     :in=\E.Y\E.@;3\072\E.I20;;17\072\E.N;19\072;IN;IP;IW;LT;PU;PA0,0;SP1;:\
  35.     :mv=PA:pc=SP%d:pd=PD;:pe=:ps=:pu=PU;:rs=0.025:rx#0:sn#1:sp=,:s2=,:\
  36.     :st=;\n:sy#1:tm=PU;PA0,0;SP0;\E.Z\n:vl=VS:w1=IW:w2=:
  37. #
  38. #    HPGL center origin
  39. #
  40. HPCEN|hpcen:\
  41.     :cn:tc=hp:
  42. #
  43. #    HPGL lower left with use of fill command 
  44. #
  45. HPFILL|hpfill:\
  46.     :fl=FP;:pe=PM2;:ps=PM0;:tc=hp:
  47. #
  48. #    DMPL 5 mills
  49. #
  50. DMPL|dmpl|dmpl5m:\
  51.     :cb#0:cn@:dl@:fl=:\
  52.     :in=;\072 A EC5 U H L0 :mv=:pc=P%d,:pd=D :pe=:ps=:pu=U :\
  53.     :rs=0.1270:rx#0:sn#1:sp=,:s2=,:st= \n:sy#2:tm=U 0,0 H P0, @ \n:vl=V:\
  54.     :w1=W:w2=:
  55. #
  56. #    DMPL 1 mills
  57. #
  58. DMPL1m|dmpl1m:\
  59.     :in=;\072 A EC1 U H L0 :rs=0.0254:tc=dmpl:
  60. #
  61. #    DMPL 2.5 mills
  62. #
  63. DMPL25m|dmpl25m:\
  64.     :in=;\072 A EC2 U H L0 :rs=0.0635:tc=dmpl:
  65. #
  66. #    DMPL 4 mills
  67. #
  68. DMPL4m|dmpl4m:\
  69.     :in=;\072 A EC4 U H L0 :rs=0.1016:tc=dmpl:
  70. #
  71. #    CALCOMP 104X pen plotter    (PCI controller)
  72. #
  73. CAL|cal|cal104X:\
  74.     :cb#32:cn@:dl:fl:\
  75.     :in=\002\040\041\040\040\041\047\176\050\052\044\041\051\041\003                    \002\040:\
  76.     :mv=:pc=\044%c:pd=\042:pe=:ps=:pu=\043:rs=0.0125:rx#95:sn#1:sp=:s2=:\
  77.     :st=:sy#3:tm=\043\057:vl=\053\040\045\053\040\052\053:\
  78.     :w1=\056\076\040\040:w2=\056\076\040\041:
  79. #
  80. #    CALCOMP electrostatic plotter
  81. #
  82. CALEL|calel:\
  83.     :tm=\043\057\003\040\040\040\040\040\040\040\040\040\040\040\040\040\040\040\040\040\040\040\040\002\040\041\041\052\070:tc=cal
  84. #
  85. #    RS-274 code (gerber out)
  86. #
  87. RS274|rs274|GEROUT:\
  88.     :cb#0:cn@:dl@:fl:\
  89.     :in=*%FSLAX53Y53*SFA1.0B1.0*%G01G54D10G71:\
  90.     :mv=X:pc=G54D1%d:pd=D01:pe=:ps=:pu=D02*:rs=0.001:rx#0:sn#1:sp=Y:s2=*X:\
  91.     :st=*:sy#4:tm=M00M02*:vl=:w1=:w2=:
  92. #
  93. #    Benson BGL language
  94. #
  95. BGL|bgl|BENSON|benson:\
  96.     :cb#0:cn@:dl@:fl=;\
  97.     :in=\nGW 20 1 0 18 MA0 0 NP0 LM0 :\
  98.     :mv=:pc=\nNP%d :pd=\nDA:pe=:ps=:pu=\nMA:rs=0.050:rx#0:sn#0:sp= :s2= :\
  99.     :st= :sy#5:tm=\nMA0 0 NP0 MP1 GW21 1 0 18\n\n:vl=0 ZZ:w1=WW :w2=:
  100. #
  101. #    Roland Plotter
  102. #
  103. ROLAND|roland:\
  104.     :cb#0:cn@:dl@:fl=;\
  105.     :in=\E.Y\E.@;3\072\E.I20;;17\072\E.N;19\072;IN;IP;IW;LT;PU;PA0,0;SP1;:\
  106.     :mv=PA:pc=SP%d:pd=PD;:pe=:ps=:pu=PU;:rs=0.025:rx#0:sn#1:sp=,:s2=;\nPA:\
  107.     :st=;\n:sy#1:tm=PU;PA0,0;SP0;\E.Z\n:vl=VS:w1=IW:w2=:
  108. #
  109. #    Western Graphtec GPGL
  110. #
  111. WEST|west:\
  112.     :cb#0:cn@:dl@:fl=;\
  113.     :in=;\003L0\003J1\003H\003:\
  114.     :mv=D:pc=J%d:pd=:pe=:ps=:pu=M:rs=0.1:rx#0:sn#1:sp=,:s2=\003D\
  115.     :st=\003:sy#6:tm=\003H\003J0\003\003:vl=!:w1=\\:w2=Z:
  116. #
  117. #    IP-MUTOH 
  118. #
  119. MUTOH|mutoh|IP|ip:\
  120.     :cb#0:cn@:dl@:fl=;\
  121.     :in=\IN\nHP\nMA0,0\nPC1\n:\
  122.     :mv=:pc=PC%d:pd=DA:pe=:ps=:pu=MA:rs=0.01:rx#0:sn#1:sp=,:s2=\nDA:\
  123.     :st=\n:sy#7:tm=HP\n:vl=PV:w1=WL:w2=WR:
  124.