10 A$="HAMBURGER":B$="SENF":C$="KETCHUP":D$="SALAT":E$="FLEISCH":F$="BROETCHEN"
11 INPUT"WAS MOECHTEN SIE BITTE";Z$
12 IFZ$=A$THEN GOTO16
13 IFZ$<>A$THENPRINT"HABEN WIR NICHT. WIE WAERS MIT EINEM HAMBURGER?"
14 GOTO11
15 PRINT"KOMMEN SIE MORGEN WIEDER, MIR WIRD UEBEL":GOTO24
16 INPUT"NA PRIMA, WAS GEHOERT DAZU";Z$
17 IFZ$=B$THENPRINT"WIE DAS SCHMECKT!":GOTO23
18 IFZ$=C$THENPRINT"DARF NICHT FEHLEN!":GOTO23
19 IFZ$=D$THENPRINT"SIE SIND EIN KENNER!":GOTO23
20 IF Z$=E$THENGOTO15
21 IFZ$=F$THENPRINT"DAMIT ER NICHT SO IN DER HAND RUMFLUTSCHT!":GOTO23
22 PRINT"ABER WIRKLICH NICHT!"
23 INPUT"WAS NOCH";Z$:GOTO17
24 FORA=1TO3000:NEXT:GOTO10