I've been working on my weather control shrine script.
It uses the "modweather" function to permanently change the weather over a specified region,
with a "reset" function to return it to the default settings.
However, I've hit a bit of a snag... The prototype doesn't work, and I'm not sure why.
It starts properly, but when you select a weather type, nothing happens.
Begin _weatherchanger
short button
short status
if (menumode == 1)
return
endif
if (OnActivate == 0)
Set status to 11
return
endif
if (status == 11)
MessageBox "What weather?", "Clear", "Foggy", "Overcast", "Rain", "Thunder", "Ash", "Snow", "Blizzard", "Reset"
set status to 21
elseif (status == 21)
set button to GetButtonPressed
if (button == 0) ;Clear
set status to 31
playsound "Thunder2"
ModRegion, "Bitter Coast Region", 100,0,0,0,0,0,0,0,0,0
elseif (button == 1);Foggy
set status to 31
playsound "Thunder2"
ModRegion, "Bitter Coast Region", 0,0,100,0,0,0,0,0,0,0
elseif (button == 2);Overcast
set status to 31
playsound "Thunder2"
ModRegion, "Bitter Coast Region", 0,0,0,100,0,0,0,0,0,0
elseif (button == 3);Rain
set status to 31
playsound "Thunder2"
ModRegion, "Bitter Coast Region", 0,0,0,0,100,0,0,0,0,0
elseif (button == 4);Thunder
set status to 31
playsound "Thunder0"
ModRegion, "Bitter Coast Region", 0,0,0,0,0,100,0,0,0,0
elseif (button == 5);Ash
set status to 31
playsound "Thunder2"
ModRegion, "Bitter Coast Region", 0,0,0,0,0,0,100,0,0,0
elseif (button == 6);Snow
set status to 31
playsound "Thunder2"
ModRegion, "Bitter Coast Region", 0,0,0,0,0,0,0,0,100,0
elseif (button == 7);Blizzard
set status to 31
playsound "Thunder2"
ModRegion, "Bitter Coast Region", 0,0,0,0,0,0,0,0,0,100
elseif (button == 8);Reset
set status to 31
playsound "Thunder2"
ModRegion, "Bitter Coast Region", 10,60,10,0,10,10,0,0,0,0
else
set status to 31
return
endif
endif
End
It seems like it should work, but it doesn't, and I'm not sure why...