death-lord
Bürger
Ich möchte eien ring zum wetter verändern machen. Leider kommt die messagebox beim ausrüsten nicht. was mache ich falsch.(der Script editor zeigt mir beim speichern keinen fehler an)
Code:
scn wetteraendern
short button
short doonce
Begin OnEquip player
if doonce == 0
MessageBox "Was wollt ihr tun?""Regen""Schnee""Gewitter""Sonnig"
set doonce to 1
endif
if doonce == 2
MessageBox "Wollt Ihr das Wetter zurücksetzen" "Ja" "Nein"
set doonce to 3
endif
if doonce == 1
set button to GetButtonPressed
else
if doonce == 3
set button to GetButtonPressed
endif
endif
if button == 0 && doonce == 1
fw 00038EF2
set doonce to 2
endif
if button == 1 && doonce == 1
fw 00038EED
set doonce to 2
endif
if button == 2 && doonce == 1
fw 00038EF1
set doonce to 2
endif
if button == 3 && doonce == 1
fw 00038EEE
set doonce to 2
endif
if button == 4 && doonce == 3
fw 0000015E
set doonce to 0
endif
end
;Copyright ©2009 by death-lord