-   script  ksjfsdkjfsdk    -1,{
OnInit:
    bindatcmd "resetcastle", strnpcinfo(0)+"::Onaaa", 99, 99;
    end;
Onaaa:
    .@gid = getcharid(2);
    if( !.@gid ) {
        mes "you haven't joined a guild!";
        close;
    }
    setarray .@castle$[0],
        "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",
        "arug_cas01","arug_cas02","arug_cas03","arug_cas04","arug_cas05",
        "schg_cas01","schg_cas02","schg_cas03","schg_cas04","schg_cas05";
//      "prontera";
    sleep2 1;
    for ( .@i = 0; .@i < 20; .@i++ ) {
        killmonster .@castle$[.@i], "Agit#"+ .@castle$[.@i] +"::OnAgitBreak";
        addtimer 1, "Agit#"+ .@castle$[.@i] +"::OnAgitBreak";
        sleep2 1;
    }
    for ( .@i = 20; .@i < 30; .@i++ ) {
        .@str$ = substr( .@castle$[.@i], 0, 1 ) + substr( .@castle$[.@i], 8, 9 );
        killmonster .@castle$[.@i], "Steward#"+ .@str$ +"::OnStartArena";
        addtimer 1, "Steward#"+ .@str$ +"::OnStartArena";
        sleep2 1;
    }
//  killmonster "prontera", "test flag::OnEmpBreak";
//  addtimer 1, "test flag::OnEmpBreak";
//  sleep2 1;
    dispbottom "All castles have been set to "+ strcharinfo(2) +"!";
    end;
}
 
/*
99,prontera,Prontera Test Castle,test flag,1
 
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_woe;
    setcastledata "prontera", 1, getcharid(2);
    donpcevent "::OnRecvCastle123";
    sleep 8000;
    if ( agitcheck() )
        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;
}
*/