prontera,155,181,5	script	Sample	757,{
set .@guild_id,getcharid(2);

if( !.@guild_id ){
	mes "You dont have a guild.";
}else if( getguildmasterid( .@guild_id ) == getcharid(0) ){
	mes "Select your Castle...";
	set .@i,select( .castle_menu$ ) - 1;
	if( $castle_reward & .@i << 2 ){
		mes "You already claimed this.";
	}else{
		mes "Here's your items...";
		getitem 512,100;
		getitem 512,100;
		getitem 512,100;
		set $castle_reward,$castle_reward + ( .@i << 2 );
	}
}else{
	mes "Nothing i can do for you..";
}
close;


OnAgitEnd;
	switch( gettime(4) ){
		Case 0:	//	sunday
			setarray .@today_woe_map$,"aldeg_cas01","aldeg_cas03";
			break;
		Case 1:	//	monday
			setarray .@today_woe_map$,"prtg_cas01","prtg_cas03";
			break;
		Case 2:	//	tuesday
			setarray .@today_woe_map$,"payg_cas01","payg_cas03";
			break;
		Case 3:	//	wednesday
			setarray .@today_woe_map$,"gefg_cas01","gefg_cas03";
			break;
		Case 4:	//	thursday
			setarray .@today_woe_map$,"prtg_cas01","prtg_cas03";
			break;
		Case 5:	//	friday
			setarray .@today_woe_map$,"aldeg_cas01","aldeg_cas03";
			break;
		Case 6:	//	saturday
			setarray .@today_woe_map$,"payg_cas01","payg_cas03";
		default: break;
	}
	set .@today_map_size,getarraysize( .@today_woe_map$ );
	for( set .@x,0; .@x < .castle_size; set .@x,.@x + 1 )
		for( set .@y,0; .@y < .@today_map_size; set .@y,.@y + 1 )
			if( .castle$[.@x] == .@today_woe_map$[.@y] )
				if( $castle_reward & ( .@x << 2 ) ){
					set $castle_reward,$castle_reward - ( .@x << 2 );
					break;
				}
	end;

OnInit:
setarray .castle$,
	aldeg_cas01,
	aldeg_cas02,
	aldeg_cas03,
	aldeg_cas04,
	aldeg_cas05,
	gefg_cas01,
	gefg_cas02,
	gefg_cas03,
	gefg_cas04,
	gefg_cas05,
	payg_cas01,
	payg_cas02,
	payg_cas03,
	payg_cas04,
	payg_cas05,
	prtg_cas01,
	prtg_cas02,
	prtg_cas03,
	prtg_cas04,
	prtg_cas05;
set .castle_size,getarraysize( .castle$ );
for( set .@i,0; .@i < .castle_size; set .@i,.@i + 1 )
	set .castle_menu$,.castle_menu$ + getcastlename( .castle$[.@i] ) +":";
end;
}