home *** CD-ROM | disk | FTP | other *** search
- Echo Off
- : Anfang
- Cls
- Echo .
- Echo .
- Echo Stapeldateimenü
- Echo -----------------
- Echo .
- Echo [t,T] : Textverarbeitung,
- Echo [p,P] : Turbo Pascal,
- Echo [c,C] : Turbo C,
- Echo .
- Echo [e,E] : Ende des Menüs.
- Echo .
- READKEY "_Bitte_wählen_Sie_einen_Menüpunkt_..._",tpce INVERS
- Echo .
- If Errorlevel 4 Goto Ende
- If Errorlevel 3 Goto TurboC
- If Errorlevel 2 Goto Pascal
- If Errorlevel 1 Goto Text
- : TurboC
- Echo Turbo C wird gestartet.
- tc
- Goto Anfang
- : Pascal
- Echo Turbo Pascal wird gestartet.
- turbo
- Goto Anfang
- : Text
- Echo Word wird gestartet.
- word
- Goto Anfang
- : Ende
- READKEY "_Sind_Sie_sicher_?_[ESC]-Nocheinmal,_[RETURN]-Ende_..._" 141
- If Errorlevel 27 Goto Anfang
- If Errorlevel 13 Goto Ade
- : Ade
- Echo Auf Wiedersehen.