scn Name
short once
short choice
Begin OnActivate
if once == 0
MessageBox "Wer seit ihr", "Magi", "Kriegi", "Meuchi", "niemi"
Set once to 1
endif
end
Begin GameMode
If once == 1
set choice to GetButtonPressed
endif
if choice == -1
set choice to GetButtonPressed
elseif
choice == 0
Player.Additem...
Set once to 10
elseif
choice == 1
Player.Additem...
Set once to 10
elseif
choice == 2
Player.Additem...
Set once to 10
elseif
choice == 3
Set once to 0
endif
end