viewing paste Unknown #17869 | Athena

Posted on the
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49
-       script  Agit_Event      -1,{
        end;
 
OnClock2100:    //start time for Tues(2), Thurs(4)
OnClock2230:    //end time for Tues(2), Thurs(4)
//OnClock1600:  //start time for Sat(6)
//OnClock1800:  //end time for Sat(6)
 
OnAgitInit:
        // starting time checks
        if((gettime(4)==3) && (gettime(3)==21 && gettime(2)==00) )
            {
                if (!agitcheck()) {
                        agitstart;
                        callsub S_DisplayOwners;
setmapflag      "alde_gld",     mf_bg_consume;
setmapflag      "alde_gld",     bg_consume;
setmapflag      "aldeg_cas02",  mf_bg_consume;
                }
                end;
        }
        // end time checks
        if ((gettime(4)==3) && (gettime(3)==22 && gettime(2)==30) )
        {
                if (agitcheck()) {
                        agitend;
                        callsub S_DisplayOwners;
removemapflag   "alde_gld",     mf_bg_consume;
removemapflag   "alde_gld",     bg_consume;
removemapflag   "aldeg_cas02",  mf_bg_consume;
                }
                end;
        }
        end;
 
S_DisplayOwners:
        setarray .@maps$[0],"aldeg_cas02";
//      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";
        for (.@i = 0; .@i <= 19; ++.@i) {
                if (getcastledata(.@maps$[.@i],1))
                        announce "The [" + getcastlename(.@maps$[.@i]) + "] castle has been conquered by the [" + getguildname(getcastledata(.@maps$[.@i],1)) + "] guild.",bc_all|bc_woe;
                else
                        announce "The [" + getcastlename(.@maps$[.@i]) + "] castle is currently unoccupied.",bc_all|bc_woe;
        }
        end;
}
Viewed 762 times, submitted by milk.