cls
give zahl1!=1
give zahl2!=1
give menu$=-
bg=1
fg=7
#menue
cls
print Mini-Taschenrechner 1.0 for BatchBASIC//
print Programmiert von J.M.K S.F. für J.M.K S.F. BatchBASIC 1.5//
print ---------------------------------------------------------//
print                         M * E * N * U//
print //
print                     Plus...............1//
print                     Minus..............2//
print                     Division...........3//
print                     Multiplikation.....4//
print //
print                     Programm beenden...5//
print //
input                     Ihre Wahl:\menu$
if (menu$=5) goto ende
cls
input Zahl-1 >\zahl1!
input Zahl-2 >\zahl2!
if (menu$=1) ar zahl1! + zahl2!
if (menu$=2) ar zahl1! - zahl2!
if (menu$=3) ar zahl1! / zahl2!
if (menu$=4) ar zahl1! * zahl2!
print Ergebnis: /\
print zahl1!/
pause
goto menue

#ende
cls
end menue
