//_______________________________________________________________________________________________________________________________
// DescX Notes:
//      Sample code
//      How to make array.cs do something!
//_______________________________________________________________________________________________________________________________
$WeatherDevices = Array::New("", "WeatherDeviceRequirements");
Array::Fill($WeatherDevices,
            "WeatherDevice EnchantedStone Quartz Opal,"         @
            "WeatherDevice ControlCrystal Granite Diamond,"     @
            "WeatherDevice EnergyCrystal Turquoise Sapphire,"   @
            "WeatherDevice MagicDust Topaz Gold,"               @
            "WeatherDevice GreenSkin Jade Emerald,"             @
            "WeatherDevice VigorousVial Ruby Keldrinite",       ",");
Array::Fill(Array::New("", $WeatherDevices @ "Enable0"), "5000,50000,25000", ",");
Array::Fill(Array::New("", $WeatherDevices @ "Enable1"), "1000,50000,5000", ",");
Array::Fill(Array::New("", $WeatherDevices @ "Enable2"), "5000,40000,10000", ",");
Array::Fill(Array::New("", $WeatherDevices @ "Enable3"), "250000,10000,5000", ",");
Array::Fill(Array::New("", $WeatherDevices @ "Enable4"), "7500,75000,3000", ",");
Array::Fill(Array::New("", $WeatherDevices @ "Enable5"), "75000,75000,500", ",");

function rpg::WeatherDeviceEnable(%clientId, %device, %response, %keyword, %index) {
    Array::Copy($WeatherDevices @ "Enable" @ %index, $WeatherDevices @ %index);
}

function DisableAllWeatherDevices() {
    for(%x=0;%x<$Array::Size[$WeatherDevices];%x++)
        Array::Insert(Array::New("", $WeatherDevices @ %x), 999999, 0, 2);
}
DisableAllWeatherDevices(); // Start disabled. LoadWorld and SaveWorld take care of things from here.