home *** CD-ROM | disk | FTP | other *** search
/ Turbo Toolbox / Turbo_Toolbox.iso / 1990 / 03 / tricks / readdemo.bat < prev    next >
Encoding:
DOS Batch File  |  1980-12-30  |  852 b   |  39 lines
  1. Echo Off
  2. : Anfang
  3. Cls
  4. Echo .
  5. Echo .
  6. Echo                   Stapeldateimenü
  7. Echo                  -----------------
  8. Echo .
  9. Echo                  [t,T] : Textverarbeitung,
  10. Echo                  [p,P] : Turbo Pascal,
  11. Echo                  [c,C] : Turbo C,
  12. Echo .
  13. Echo                  [e,E] : Ende des Menüs.
  14. Echo .
  15. READKEY "_Bitte_wählen_Sie_einen_Menüpunkt_..._",tpce INVERS
  16. Echo .
  17. If Errorlevel 4 Goto Ende
  18. If Errorlevel 3 Goto TurboC
  19. If Errorlevel 2 Goto Pascal
  20. If Errorlevel 1 Goto Text
  21. : TurboC
  22. Echo Turbo C wird gestartet.
  23. tc
  24. Goto Anfang
  25. : Pascal
  26. Echo Turbo Pascal wird gestartet.
  27. turbo
  28. Goto Anfang
  29. : Text
  30. Echo Word wird gestartet.
  31. word
  32. Goto Anfang
  33. : Ende
  34. READKEY "_Sind_Sie_sicher_?_[ESC]-Nocheinmal,_[RETURN]-Ende_..._" 141
  35. If Errorlevel 27 Goto Anfang
  36. If Errorlevel 13 Goto Ade
  37. : Ade
  38. Echo Auf Wiedersehen.
  39.