home *** CD-ROM | disk | FTP | other *** search
/ CD-ROM Magazin 1997 March / Image.iso / afs_soft / disks / ctcprof / sodic.ac_ / sodic.ac
Encoding:
Text File  |  1996-04-01  |  1.7 KB  |  134 lines
  1. //+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
  2. //+++                                +++
  3. //+++        AFS - CNC Multiprogramming System(R) V1.00    +++
  4. //+++                                +++
  5. //+++           für AFS (CAD to CNC) Profi-System        +++
  6. //+++                                +++
  7. //+++ --------------------------------------------------------- +++
  8. //+++                                +++
  9. //+++               Sodick/Erodieren                +++
  10. //+++                                +++
  11. //+++ --------------------------------------------------------- +++
  12. //+++                                +++
  13. //+++               (c) 1996 by AFS-Software            +++
  14. //+++                                +++
  15. //+++              (w) 1996 by Arno Freisinger        +++
  16. //+++                                +++
  17. //+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
  18.  
  19.  
  20.  
  21. Haupt_Kopf{                // Def. Programmkopf
  22.  
  23. ["]+ProgrammNummer+[ (MAIN PROGRAM);"]
  24.  
  25. }
  26.  
  27.  
  28. Unter_Kopf{                // Def. Programmkopf
  29.  
  30. [%]+ProgrammNummer
  31.  
  32. }
  33.  
  34. Programm_Abschluß{
  35. ::26
  36. }
  37.  
  38. GlobalerProgrammkopf{            // Hier können Standart def. stehen
  39.  
  40. G90;
  41. G54;
  42. G92 X0Y0Z0;
  43. T89;
  44. T84;
  45. G42H000;
  46. G50A0;
  47. C000WS00WT09;
  48. M98P0010;
  49. M02;
  50. ;
  51. N0010;
  52.  
  53. }
  54.  
  55. GlobalesProgrammende{    
  56.  
  57. M99;
  58. ;
  59.  
  60. }
  61.  
  62. Global{                    // Def. Globale Einstellungen
  63.  
  64.  
  65. Koordinaten        =    3
  66.  
  67. Koordinaten_3        =    3
  68.  
  69. BefehleProZeile        =    1
  70.  
  71. // VORSCHUB        =    SF
  72.  
  73. AUSBLENDEN        =    /
  74.  
  75. }
  76.  
  77.  
  78. Befehle{
  79.  
  80. //
  81. //    M-Funktionen
  82. //
  83.  
  84. PROGRAMM_STOP        =    M00;
  85.  
  86. //PROGRAMM_ENDE        =    M99|;
  87.  
  88. //
  89. //    G-Funktionen
  90. //
  91.  
  92.  
  93. EILGANG         =    G00;X;Y;Z|;
  94.  
  95. GERADEN            =    G01;X;Y;Z|;
  96.  
  97. KREIS20            =    G02;X;Y;Z;R|;
  98.  
  99. KREIS30            =    G03;X;Y;Z;R|;
  100.  
  101. KREIS21            =    G02;X;Y;Z;I;J;K|;
  102.  
  103. KREIS31            =    G03;X;Y;Z;I;J;K|;
  104.  
  105. KORREKTUR_AUS        =    G40|;
  106.  
  107. KORREKTUR_LINKS        =    G41;X;Y;Z|;
  108.  
  109. KORREKTUR_RECHTS    =    G42;X;Y;Z|;
  110.  
  111. KORREKTUR_BIS        =    G43;X;Y;Z|;
  112.  
  113. KORREKTUR_ÜBER        =    G44;X;Y;Z|;
  114.  
  115. MAß_ZOLL        =    G70|;
  116.  
  117. MAß_MM            =    G71|;
  118.  
  119. BEZUGMAß        =    G90|;
  120.  
  121. KETTENMAß        =    G91|;
  122.  
  123. }
  124.  
  125.  
  126.  
  127.  
  128.  
  129.  
  130.  
  131.  
  132.  
  133.  
  134.