-	script	woe_random_main	-1,{

	OnInit:
		setarray .region$, "prt", "pay", "gef", "ald", "aru", "sch";

		.region_size = getarraysize(.region$);

		for (.@i = 0; .@i < .castle_size; .@i++)
			for (.@x = 1; .@x <= 5; .@x++)
				setmapflag .castle$[.@i]+"g_cas0"+.@x, mf_loadevent;
		end;

	OnClock1200: // start at 12pm
		.region = rand(.region_size);
		agitstart;
		agitstart2;

		sleep (60 * 60000); // 1 hour

		agitend;
		agitend2;
		end;

	OnPCLoadMapEvent:
		.@map$ = strcharinfo(3);
		if (compare(.@map$, "g_cas")) {
			if (agitcheck() || agitcheck2()) {
				if (compare(.@map$, .region$[.region] + "g_cas") {
					end;
				}
				else {
					warp "SavePoint", 0, 0;
				}
			}
		}
		end;
}