UID24893
帖子
精華
主題
積分334
現金
積極性
威望
違規
熱心
推廣次數
閱讀權限5
註冊時間2007-10-13
在線時間 小時
最後登錄1970-1-1
TA的每日心情 | 擦汗 2016-10-20 04:06 AM |
---|
簽到天數: 57 天 連續簽到: 1 天 [LV.5]常住居民I
|
樓主 |
發表於 2008-12-25 13:35:44
|
顯示全部樓層
// Function for OnAgitStart =========================================
function script F_AgitStart {
set .@map$, getarg(0);
set .@castle$, getarg(1);
set .@empx, getarg(2);
set .@empy, getarg(3);
MapRespawnGuildID .@map$,GetCastleData(.@map$,1),2;
monster .@map$,.@empx,.@empy,"華麗金屬",1288,1,"Agit_"+.@castle$+"::OnAgitBreak";
GvgOn .@map$;
if (GetCastleData(.@map$,1) != 0) return;
if (compare(.@map$,"aldeg_cas")) {
areamonster .@map$,0,0,300,300,"--ja--",1117,10;
areamonster .@map$,0,0,300,300,"--ja--",1132,4;
areamonster .@map$,0,0,300,300,"--ja--",1219,2;
areamonster .@map$,0,0,300,300,"--ja--",1205,1;
areamonster .@map$,0,0,300,300,"--ja--",1216,10;
areamonster .@map$,0,0,300,300,"--ja--",1193,17;
areamonster .@map$,0,0,300,300,"--ja--",1269,9;
areamonster .@map$,0,0,300,300,"--ja--",1276,7;
areamonster .@map$,0,0,300,300,"--ja--",1208,3;
areamonster .@map$,0,0,300,300,"--ja--",1275,1;
areamonster .@map$,0,0,300,300,"--ja--",1268,1;
areamonster .@map$,0,0,300,300,"--ja--",1272,1;
monster .@map$,.@empx+1,.@empy,"--ja--",1272,1;
monster .@map$,.@empx-1,.@empy,"--ja--",1270,4;
monster .@map$,.@empx,.@empy+1,"--ja--",1268,1;
monster .@map$,.@empx,.@empy-1,"--ja--",1219,1;
monster .@map$,.@empx,.@empy,"--ja--",1276,5;
return;
}
else if (compare(.@map$,"gefg_cas")) {
areamonster .@map$,0,0,300,300,"--ja--",1117,10;
areamonster .@map$,0,0,300,300,"--ja--",1263,11;
areamonster .@map$,0,0,300,300,"--ja--",1102,10;
areamonster .@map$,0,0,300,300,"--ja--",1130,10;
areamonster .@map$,0,0,300,300,"--ja--",1140,20;
areamonster .@map$,0,0,300,300,"--ja--",1163,9;
areamonster .@map$,0,0,300,300,"--ja--",1275,1;
areamonster .@map$,0,0,300,300,"--ja--",1219,1;
areamonster .@map$,0,0,300,300,"--ja--",1150,1;
areamonster .@map$,0,0,300,300,"--ja--",1159,1;
monster .@map$,.@empx+1,.@empy,"--ja--",1203,1;
monster .@map$,.@empx-1,.@empy,"--ja--",1087,1;
monster .@map$,.@empx,.@empy+1,"--ja--",1213,7;
monster .@map$,.@empx,.@empy-1,"--ja--",1189,7;
return;
}
else if (compare(.@map$,"payg_cas")) {
areamonster .@map$,0,0,300,300,"--ja--",1277,10;
areamonster .@map$,0,0,300,300,"--ja--",1208,10;
areamonster .@map$,0,0,300,300,"--ja--",1262,5;
areamonster .@map$,0,0,300,300,"--ja--",1102,5;
areamonster .@map$,0,0,300,300,"--ja--",1150,1;
areamonster .@map$,0,0,300,300,"--ja--",1115,1;
areamonster .@map$,0,0,300,300,"--ja--",1129,11;
areamonster .@map$,0,0,300,300,"--ja--",1276,5;
areamonster .@map$,0,0,300,300,"--ja--",1282,4;
areamonster .@map$,0,0,300,300,"--ja--",1253,5;
monster .@map$,.@empx,.@empy,"--ja--",1150,1;
monster .@map$,.@empx,.@empy,"--ja--",1115,1;
monster .@map$,.@empx,.@empy+1,"--ja--",1208,6;
monster .@map$,.@empx,.@empy-1,"--ja--",1276,5;
return;
}
else if (compare(.@map$,"prtg_cas")) {
areamonster .@map$,0,0,300,300,"--ja--",1163,15;
areamonster .@map$,0,0,300,300,"--ja--",1132,10;
areamonster .@map$,0,0,300,300,"--ja--",1219,5;
areamonster .@map$,0,0,300,300,"--ja--",1268,5;
areamonster .@map$,0,0,300,300,"--ja--",1251,1;
areamonster .@map$,0,0,300,300,"--ja--",1252,1;
areamonster .@map$,0,0,300,300,"--ja--",1276,5;
areamonster .@map$,0,0,300,300,"--ja--",1259,1;
areamonster .@map$,0,0,300,300,"--ja--",1283,1;
areamonster .@map$,0,0,300,300,"--ja--",1275,1;
areamonster .@map$,0,0,300,300,"--ja--",1200,1;
monster .@map$,.@empx+1,.@empy,"--ja--",1268,1;
monster .@map$,.@empx-1,.@empy,"--ja--",1251,1;
monster .@map$,.@empx,.@empy+1,"--ja--",1252,1;
monster .@map$,.@empx,.@empy-1,"--ja--",1219,2;
monster .@map$,.@empx,.@empy,"--ja--",1276,5;
return;
}
}
// Function for OnGuildBreak ======================================
function script F_GuildBreak {
set .@map$, getarg(0);
set .@castle$, getarg(1);
killmonsterall .@map$;
Announce "秘密基地 [" + GetCastleName(.@map$) + "]被 [] 工會佔領了",0;
disablenpc "卡普拉 職員::"+.@castle$;
SetCastleData .@map$,0,0;
return;
}
// Function for OnAgitBreak ======================================
function script F_AgitBreak {
set .@map$, getarg(0);
set .@castle$, getarg(1);
set .@GID,getcharid(2);
if (.@GID <= 0) return;
set .@Economy,GetCastleData(.@map$,2) - 5;
if (.@Economy < 0) set .@Economy, 0;
SetCastleData .@map$, 2, .@Economy;
set .@Defence,GetCastleData(.@map$,3) - 5;
if (.@Defence < 0) set .@Defence, 0;
SetCastleData .@map$, 3, .@Defence;
SetCastleData .@map$,1, .@GID;
MapAnnounce .@map$,strcharinfo(0) + "華麗金屬被破壞了",bc_map,0x00FF00;
Announce "秘密基地 [" + GetCastleName(.@map$) + "]被 [" + GetGuildName(.@GID) + "] 工會佔領了",bc_all;
GetCastleData .@map$,0,"::OnRecvCastle"+.@castle$;
disablenpc "卡普拉 職員::"+.@castle$;
// remove investment data and kafra
for( set .@i, 4; .@i <= 9; set .@i, .@i+1 )
SetCastleData .@map$, .@i, 0;
// if the new guild doesn't have Guardian Research, erase guardians
if( getgdskilllv(.@GID,10002) == 0 )
for( set .@i, 10; .@i <= 17; set .@i, .@i+1 )
SetCastleData .@map$, .@i, 0;
return;
}
// Function for OnAgitEnd ======================================
function script F_AgitEnd {
set .@map$, getarg(0);
set .@castle$, getarg(1);
GvgOff .@map$;
if (GetCastleData(.@map$,1) == 0) return;
MapRespawnGuildID .@map$,GetCastleData(.@map$,1),4;
KillMonster .@map$,"Agit_"+.@castle$+"::OnAgitBreak";
end;
} |
|