prontera,155,188,5 script reset castles 100,{
if(getgmlevel()!=99) {
mes "you are not admin!";
close;
}
mes "Are you sure reset all castles ?";
if(select("no:yes") == 2 ) {
set .@gid,getcharid(2);
if(!.@gid) {
mes "you haven't joined a guild!";
close;
}
setarray .@maps$[0],"aldeg_cas01","aldeg_cas02","aldeg_cas03","aldeg_cas04","aldeg_cas05";
setarray .@maps$[5],"gefg_cas01","gefg_cas02","gefg_cas03","gefg_cas04","gefg_cas05";
setarray .@maps$[10],"payg_cas01","payg_cas02","payg_cas03","payg_cas04","payg_cas05";
setarray .@maps$[15],"prtg_cas01","prtg_cas02","prtg_cas03","prtg_cas04","prtg_cas05";
setarray .@maps$[20],"prontera";
for( set .@i, 0; .@i <= 20; set .@i, .@i+1 )
setcastledata .@maps$[.@i],1,.@gid;
mes "All castles have been set to"+getguildname(.@gid)+"!";
}
close;
}
prontera,152,185,4 script test flag 722,{
dispbottom "=========================";
set .@gid, getcastledata( "prontera", 1 );
dispbottom "owner of the castle : "+( ( .@gid )? "["+ getguildname(.@gid) +"]" : "<none>" );
dispbottom "agit check : "+( ( agitcheck() )?"on":"off" );
dispbottom "gvg_castle mapflag : "+( ( getmapflag( strcharinfo(3), mf_gvg_castle )?"on":"off" ) );
dispbottom "=========================";
end;
OnInit:
if ( !agitcheck() )
agitstart;
else
donpcevent strnpcinfo(0)+"::OnAgitStart";
setmapflag "prontera", mf_gvg_castle;
flagemblem getcastledata("prontera",1);
end;
OnAgitStart:
monster "prontera",151,181,"EMPERIUM",1288,1,strnpcinfo(0)+"::OnEmpBreak";
end;
OnAgitEnd:
killmonster strnpcinfo(4), strnpcinfo(0)+"::OnEmpBreak";
end;
OnEmpBreak:
announce "The Emperium has fallen", bc_map;
setcastledata "prontera", 1, getcharid(2);
donpcevent "::OnRecvCastle123";
sleep getbattleflag("gvg_eliminate_time");
monster "prontera",151,181,"EMPERIUM",1288,1,strnpcinfo(0)+"::OnEmpBreak";
end;
OnAgitInit:
requestguildinfo getcastledata("prontera", 1);
OnRecvCastle123:
flagemblem getcastledata("prontera",1);
end;
OnGuildBreak:
setcastledata "prontera", 1, 0;
donpcevent "::OnRecvCastle123";
end;
}