PR Geldwahl0
bild
GeldautomatB
;*Wahl 1
sh aufxy 550 617 sa
schreibe "10 Euro"
;*Wahl 2
sh aufxy 550 577 sa
schreibe "25 Euro"
;*Wahl 3
sh aufxy 550 537 sa
schreibe "50 Euro"
;*Wahl 4
sh aufxy 550 497 sa
schreibe "100 Euro"
;*Wahl 5
sh aufxy 680 617 sa
schreibe "250 Euro"
;*Wahl 6
sh aufxy 680 577
schreibe "500 Euro"
;*Wahl 7
sh aufxy 680 537 sa
schreibe "1000 Euro"
;*Wahl 8
sh aufxy 680 497 sa
schreibe "5000 Euro"
ENDE
PR Geldwahl
:Wahl
wenn
:Wahl=10
dann Geldausgabe sonst wenn
:Wahl=25
dann Geldausgabe sonst wenn
:Wahl=50
dann Geldausgabe sonst wenn
:Wahl=100
dann Geldausgabe sonst wenn
:Wahl=250
dann Geldausgabe sonst wenn
:Wahl=500
dann Geldausgabe sonst wenn
:Wahl=1000
dann Geldausgabe sonst wenn
:Wahl=5000
dann Geldausgabe sonst sh aufxy 550 600 sa [Falscher Berag] Geldwahl
ENDE