// Made by Inochi for LuminaRO // LOG // 1.0 = created NPC // 1.1 = fixed rotation bug // 2.0 = altered for one castle only - script WoE_FE_Rotator -1,{ OnInit: setarray .castle_list$[0],"prtg_cas01","prtg_cas02","prtg_cas03","prtg_cas04","prtg_cas05", "aldeg_cas01","aldeg_cas02","aldeg_cas03","aldeg_cas04","aldeg_cas05", "payg_cas01","payg_cas02","payg_cas03","payg_cas04","payg_cas05", "gefg_cas01","gefg_cas02","gefg_cas03","gefg_cas04","gefg_cas05"; end; OnWhisperGlobal: if(getgmlevel()<70) end; donpcevent "WoE_FE_Rotator::OnInit"; mes "Pick first castles?"; if(select("Yes","No")==2) close; next; mes "Rotate WoE SE? One time use."; if(select("Yes","No")==1){ //Rotating arug_cas01 Mardol to schg_cas03 Vidblain and schg_cas02 Andlangr to arug_cas03 Horn set .name1$,"arug_cas01"; set .name2$,"schg_cas02"; set .name3$,"arug_cas03"; set .name4$,"schg_cas03"; announce "["+getguildname(getcastledata(.name1$,1))+"] guild base was transfered from ["+getcastlename(.name1$)+" (arug_cas01)] to ["+getcastlename(.name3$)+" (schg_cas03)]",0; announce "["+getguildname(getcastledata(.name2$,1))+"] guild base was transfered from ["+getcastlename(.name2$)+" (schg_cas02)] to ["+getcastlename(.name4$)+" (arug_cas03)]",0; for(set .@a,1; .@a<26; set .@a,.@a+1){ setcastledata "schg_cas03",.@a,getcastledata("arug_cas01",.@a); setcastledata "arug_cas03",.@a,getcastledata("schg_cas02",.@a); setcastledata "arug_cas01",.@a,0; setcastledata "schg_cas02",.@a,0; } disablenpc "Kafra Employee#aru01"; disablenpc "Kafra Employee#sch02"; donpcevent "Manager#aru01_02::Onreset"; donpcevent "Manager#sch02_02::Onreset"; donpcevent "Manager#aru03_02::Onreset"; donpcevent "Manager#sch03_02::Onreset"; GetCastleData "arug_cas03",0,"::OnRecvCastleAr03"; GetCastleData "schg_cas03",0,"::OnRecvCastleSc03"; GetCastleData "arug_cas01",0,"::OnRecvCastleAr01"; GetCastleData "schg_cas02",0,"::OnRecvCastleSc02"; RequestGuildInfo GetCastleData("arug_cas01",1); RequestGuildInfo GetCastleData("schg_cas02",1); RequestGuildInfo GetCastleData("arug_cas03",1); RequestGuildInfo GetCastleData("schg_cas03",1); close; } set .@menu$,""; for(set @i,0; @i70) { dispbottom "Warp avoided by GM level."; } else { warp "SavePoint",0,0; } end; } prtg_cas01 mapflag loadevent prtg_cas02 mapflag loadevent prtg_cas03 mapflag loadevent prtg_cas04 mapflag loadevent prtg_cas05 mapflag loadevent aldeg_cas01 mapflag loadevent aldeg_cas02 mapflag loadevent aldeg_cas03 mapflag loadevent aldeg_cas04 mapflag loadevent aldeg_cas05 mapflag loadevent payg_cas01 mapflag loadevent payg_cas02 mapflag loadevent payg_cas03 mapflag loadevent payg_cas04 mapflag loadevent payg_cas05 mapflag loadevent gefg_cas01 mapflag loadevent gefg_cas02 mapflag loadevent gefg_cas03 mapflag loadevent gefg_cas04 mapflag loadevent gefg_cas05 mapflag loadevent