home *** CD-ROM | disk | FTP | other *** search
/ Chip: Special Survival Kit / Chip_Special_Survival_Kit_fuer_PC_Anwender.iso / 01tools / arcedit / start.bat < prev    next >
DOS Batch File  |  1994-09-01  |  2KB  |  128 lines
  1. @echo off
  2. echo off
  3. cls
  4. rem C:CFG,F:File,J:Jump
  5. if not exist getfunc.com goto gf_fehler
  6.  
  7. echo  
  8. echo                             START.BAT
  9. echo  
  10. echo Hinweis: Dies ist *nicht* das eigentliche Programm, sondern nur ein
  11. echo          kleines Menü, welches Ihnen den Einstieg ein wenig erleichtern 
  12. echo          soll und gelöscht werden kann, sobald es seinen Zweck erfüllt
  13. echo          hat.
  14. echo           
  15. echo          Das eigentliche Programm wird von der DOS-Ebene aus mit 
  16. echo          "arcedit" gestartet.
  17. echo  
  18. echo  
  19. echo Taste drücken...
  20. echo  
  21. pause > nul
  22. set C=ARCEDIT
  23.  
  24. :REPEAT
  25. cls
  26. type start.msg
  27. echo  
  28. echo Aktuelle Farbeinstellung: %c%.KFG (umschalten mit Shift-F4)
  29. getfunc
  30. if errorlevel 15 goto ENDE
  31. if errorlevel 14 goto SF4
  32. if errorlevel 7 goto ENDE
  33. if errorlevel 6 goto F6
  34. if errorlevel 5 goto F5
  35. if errorlevel 4 goto F4
  36. if errorlevel 3 goto F3
  37. if errorlevel 2 goto F2
  38. if errorlevel 1 goto F1
  39. goto REPEAT
  40.  
  41. :F1
  42. show arcedit.dok
  43. goto REPEAT
  44.  
  45. :F2
  46. show schnell.dok
  47. goto REPEAT
  48.  
  49. :F3
  50. cls
  51. echo  
  52. echo Sie benötigen für ARCEDIT.DOK ca. 55 Blatt Papier, für SCHNELL.DOK fünf 
  53. echo Blatt.
  54. echo  
  55. set F=ARCEDIT.DOK
  56. set J=Weiter2
  57. goto Drucken
  58. :Weiter2
  59. set F=SCHNELL.DOK
  60. set J=REPEAT
  61. goto Drucken
  62.  
  63. :F4
  64. arcedit /c%c%
  65. goto REPEAT
  66.  
  67. :SF4
  68. if %c%==WINFARB  set c=xxx
  69. if %c%==MONOHELL set c=WINFARB
  70. if %c%==HELL     set c=MONOHELL
  71. if %c%==DUNKEL   set c=HELL
  72. if %c%==ARCEDIT  set c=DUNKEL
  73. if %c%==xxx      set c=ARCEDIT
  74. goto REPEAT
  75.  
  76. :F5
  77. show fragen.txt
  78. cls
  79. set F=FRAGEN.TXT
  80. set J=REPEAT
  81. goto Drucken
  82.  
  83. :F6
  84. show produkte.txt
  85. cls
  86. echo  
  87. echo  
  88. echo  Falls Sie die soeben gezeigten Informationen auch ausdrucken wollen: 
  89. echo  Es handelte sich um die Datei "PRODUKTE.TXT".
  90. echo  
  91. echo  
  92. echo Taste drücken
  93. echo  
  94. pause > nul
  95. goto REPEAT 
  96.  
  97. :Drucken
  98. echo  
  99. echo %F% ausdrucken ?
  100. echo  
  101. echo F1: Druckvorgang starten 
  102. echo F2: Nicht ausdrucken
  103. echo  
  104. :nochmal
  105. getfunc
  106. if errorlevel 2 goto %J%
  107. if errorlevel 1 goto los
  108. if errorlevel 0 goto nochmal
  109. goto %J%
  110. :los
  111. copy %F% lpt1 > nul
  112. goto %J%
  113.  
  114. :gf_fehler
  115. echo Das Programm GETFUNC.COM ist im aktuellen Verzeichnis nicht vorhanden. 
  116. echo Kopieren Sie das Programm bitte von der ArcEdit-Originaldiskette in das
  117. echo aktuelle Verzeichnis und starten Sie dann nochmal.
  118. echo  
  119. goto Ende1
  120.  
  121. :ENDE
  122. cls
  123. :Ende1
  124. set C=
  125. set F=
  126. set J=
  127.  
  128.