Castle Reward NPC

[Neub]

Hello can anyone edit the script i got? and set seperate rewards

 

my script

prontera,149,205,4	script	Castle Rewards	871,{

	mes "[Castle Rewards]";
	if (agitcheck() || agitcheck2()) { mes "WoE is currently still in progress."; close; }
	mes "Please select a castle:";
	next;
	for(set .@i,0; .@i<30; set .@i,.@i+1)
		set .@menu$, .@menu$+getcastlename(.Castles$[.@i])+":";
	set .@i, select(.@menu$)-1;
	mes "[Castle Rewards]";
	if (getcastledata(.Castles$[.@i],1) != getcharid(2)) { mes "You aren't the owner of this castle."; close; }
	if (getguildmasterid(getcharid(2)) != getcharid(0)) { mes "Only the guild master can claim the reward."; close; }
	if ($castle_claimed&(1<<.@i)) { mes "You've already claimed this castle's reward!"; close; }
	mes "Here's your reward for conquering "+getcastlename(.Castles$[.@i])+".";
	set $castle_claimed, $castle_claimed | (1<<.@i);
	getitem 7227,50;  //Set your prize here!
	close;

OnAgitEnd:
	set $castle_claimed, 0;
	end;

OnInit:
	setarray .Castles$[0],
		"prtg_cas01","prtg_cas02","prtg_cas03","prtg_cas04","prtg_cas05",
		"payg_cas01","payg_cas02","payg_cas03","payg_cas04","payg_cas05",
		"gefg_cas01","gefg_cas02","gefg_cas03","gefg_cas04","gefg_cas05",
		"aldeg_cas01","aldeg_cas02","aldeg_cas03","aldeg_cas04","aldeg_cas05",
		"arug_cas01","arug_cas02","arug_cas03","arug_cas04","arug_cas05",
		"schg_cas01","schg_cas02","schg_cas03","schg_cas04","schg_cas05";
	end;
} 

thank you very much

Edited April 30, 2015 by Neub

[kn16]

First, this should be in script support, the next time you post this kind of topic, put it there

or maybe i'm wrong, i'm used to the forum i always use, there is no script request there...

To set separate reward, look here

OnInit:
	setarray .Castles$[0],
		"prtg_cas01","prtg_cas02","prtg_cas03","prtg_cas04","prtg_cas05",
		"payg_cas01","payg_cas02","payg_cas03","payg_cas04","payg_cas05",
		"gefg_cas01","gefg_cas02","gefg_cas03","gefg_cas04","gefg_cas05",
		"aldeg_cas01","aldeg_cas02","aldeg_cas03","aldeg_cas04","aldeg_cas05",
		"arug_cas01","arug_cas02","arug_cas03","arug_cas04","arug_cas05",
		"schg_cas01","schg_cas02","schg_cas03","schg_cas04","schg_cas05";

add this on the next line and keep end; at the bottom, also change all castle maps in quotes to your item ids as i put 7227 there without quote.

setarray .Rewards[0],
		7227,"prtg_cas02","prtg_cas03","prtg_cas04","prtg_cas05",
		"payg_cas01","payg_cas02","payg_cas03","payg_cas04","payg_cas05",
		"gefg_cas01","gefg_cas02","gefg_cas03","gefg_cas04","gefg_cas05",
		"aldeg_cas01","aldeg_cas02","aldeg_cas03","aldeg_cas04","aldeg_cas05",
		"arug_cas01","arug_cas02","arug_cas03","arug_cas04","arug_cas05",
		"schg_cas01","schg_cas02","schg_cas03","schg_cas04","schg_cas05";

then at this line

getitem 7227,50;  //Set your prize here!

//change it to

getitem .Rewards[.@i],50;

Edited April 30, 2015 by kn16

[Neub]

Thank you sir, god bless your soul

 

sorry for posting in the wrong section, im new to rathena

[Rook1es]

Hello sir Can you help me about my castle rewards have 5 items . how can it will works?

thanks i hope you can help me