King of Emperium (only member of the guild have prize)

[Jin Freecs]

i have this KOE but the problem is after the event is finish all the players who inside the guild_vs1 can get the price. i want to make only members of the guild who own the KOE only can get the price and how to fix this?

- script KoE -1,{
OnInit:
disablenpc "The King#KoE";
disablenpc "Exit#KoE";
end;
OnWhisperGlobal:
if ( getgmlevel() < 99 ) end;
else if ( compare ( @whispervar0$, "on" ) ) goto L_start;
else if ( compare ( @whispervar0$, "off" ) ) goto L_end;
else end;

L_end:
OnClock0740:
OnClock1240:
OnClock1740:
announce "The King of Emperium Hill is over!", 0;
set .koe_start, 0;
enablenpc "Exit#KoE";
disablenpc "The King#KoE";
killmonsterall "guild_vs1";
end;L_start:
OnClock0710:
OnClock1210:
OnClock1710:
announce "The King of Emperium Hill has begun!", 0;
set .koe_start, 1;
enablenpc "The King#KoE";
disablenpc "Exit#KoE";
set $koegid, 0;
donpcevent "::OnRevKoE";
maprespawnguildid "guild_vs1", $koegid, 6;
monster "guild_vs1",49,49,"EMPERIUM",1288,1,"KoE::OnEmpDead";
end;
OnEmpDead:
set $koegid, getcharid(2);
announce "The current King of Emperium Hill is the [" + strcharinfo(2) + "] guild.", 0;
donpcevent "::OnRevKoE";
maprespawnguildid "guild_vs1", $koegid, 6;
sleep 500;
if ( .koe_start )
 monster "guild_vs1",49,49,"EMPERIUM",1288,1,"KoE::OnEmpDead";
end;
}// KoE Entrance
prontera,164,161,4 script The King#KoE 966,{
   mes "[The King]";
if ( getcharid(2) == 0 ) {
 mes "You must have a guild to participate in the ^FF0000King of Emperium Hill Tournament^000000.";
 close;
}
   mes "Hello.";
   mes "Would you like to participate in the ^FF0000King of Emperium Hill Tournament^000000?";
if ( select ( "Yes", "No" ) == 2 ) close;
   switch( rand(1,4) ){
    case 1: warp "guild_vs1", 50, 88; end;
    case 2: warp "guild_vs1", 88, 50; end;
    case 3: warp "guild_vs1", 50, 11; end;
    case 4: warp "guild_vs1", 11, 50; end;
}
}
// KoE Exit
guild_vs1,49,56,5 script Exit#KoE 51,{
mes "[Exit]";
mes "See ya.";
if ( getcharid(2) == $koegid )
 getitem 14232, 5; // configure prize here
 getitem 7829, 50; // configure prize here
 getitem 7711, 100; // configure prize here
next;
warp "Save",0,0;
close;
}// Flags
guild_vs1,49,38,4 script King of Emperium Hill#1::koe_flag 722,{
set .@gid, $koegid;
if ( .@gid == 0 ) end;
mes "[King of Emperium Hill]";
mes "The Current King of Emperium Hill is the ["+ getguildname(.@gid) +"] guild.";
close;
OnRevKoE:
flagemblem $koegid;
end;
}
guild_vs1,61,49,6 duplicate(koe_flag) King of Emperium Hill#2 722
guild_vs1,38,49,2 duplicate(koe_flag) King of Emperium Hill#3 722
guild_vs1,49,61,0 duplicate(koe_flag) King of Emperium Hill#4 722
prontera,164,152,4 duplicate(koe_flag) King of Emperium Hill#5 722
guild_vs1 mapflag gvg
guild_vs1 mapflag nobranch
guild_vs1 mapflag nomemo
guild_vs1 mapflag nopenalty
guild_vs1 mapflag noreturn
guild_vs1 mapflag nosave SavePoint
guild_vs1 mapflag noteleport
guild_vs1 mapflag gvg_noparty
guild_vs1 mapflag nowarp
guild_vs1 mapflag nowarpto

Edited May 29, 2012 by Jin Freecs

[Joseph]

Add this:

query_sql "SELECT `account_id` and FROM `char` WHERE `last_map`='guild_vs1' AND `online`=1",.@aid;

for ( set .@i, 0; .@i < getarraysize(.@aid); set .@i, .@i + 1 )
{
if ( getcharid(2) == $koegid )
{
attachrid(.@aid);
getitem 14232, 5;
getitem 7829, 50;
getitem 7711, 100;
}

if ( .@i % 10 == 0 ) sleep 100;
}

Edited May 30, 2012 by Joseph