scn Schmiedeschmelze
short menuechose
short metall
short edel
short spezial
short oblivion
Begin OnActivate
MessageBox "Was möchtet ihr einschmelzen?", "Metalle", "Edelmetalle", "Spezielle Metalle","Metalle von Oblivion", "Beenden"
End
Begin GameMode
Set menuechose to GetButtonPressed
if (menuechose== 0)
Set metall to GetButtonPressed
MessageBox "Wähle dein Metall:", "Kupfer","Eisen","Feinstahl","Dunkelstahl","Stahl","Zurück"
if metall == 0 && menuechose== 0
player.additem Gold001 1
;Auswahl Kupfer
elseIf metall == 1 && menuechose== 0
player.additem Gold001 2
;Auswahl Eisen
elseIf metall == 2 && menuechose== 0
player.additem Gold001 3
;Auswahl Feinstahl
elseIf metall == 3 && menuechose== 0
player.additem Gold001 4
;Auswahl Dunkelstahl
elseIf metall == 4 && menuechose== 0
player.additem Gold001 5
;Auswahl Stahl
;elseIf metall == 5 && menuechose== 0
player.additem Gold001 6
return
;Auswahl Zurück
endif
elseIf (menuechose ==1)
MessageBox "Wähle dein Edelmetall:","Silber","Echtsilber","Gold","Zurück"
If menueem == 0
;Auswahl Silber
elseIf menueem == 1
;Auswahl Echsilber
elseIf menueem == 2
;Auswahl Gold
;elseIf menueem == 3
;Auswahl Zurück
endif
elseIf (menuechose ==2)
MessageBox "Wähle dein Spezielles Metall","Dwemer und Zwergen Metalle","Glas","Elfen Metalle","Mithril","Zurück"
elseIf menuesm == 0
;Auswahl Dwmer und Zwergen Metalle
elseIf menuesm == 1
;Auswahl Glas
elseIf menuesm == 2
;Auswahl Elfen Metalle
elseIf menuesm == 3
;Auswahl Mithril
;elseIf menuesm == 4
;Auswahl Zurück
endif
elseIf (menuechose ==3)
MessageBox "v","x Inseln","y","Metalle aus Mania","z","Zurück"
elseIf menueom == 1
;Auswahl v
elseIf menueom == 2
;Auswahl x
elseIf menueom == 3
;Auswahl Bernstein
elseIf menueom == 4
;Auswahl y
elseIf menueom == 5
;Auswahl z
elseIf menueom == 6
;Auswahl Zurück
endif
elseIf (menuechose ==4)
return
;Auswahl Zurück/beenden Des Hauptmenüs
endif
end