JA改成EA的4VS4PVP賽腳本問題

hellhot8

我改了2個就能測試 但進了PVP場時 PVP場沒有變PVPON
而且 也沒有相關npc開始比賽
ea的高手麻煩幫測試

prontera.gat,157,195,4        script        2V2伺服器人員        868,{
mes "[2V2伺服器人員]";
mes "^0000FF*********^FF0000[M/F]Jathena腳本^0000FF*********";
mes "名稱:^8000FF4V4團體PK大賽^0000FF";
mes "介紹:^8000FF特色腳本2V2團體PK大賽^0000FF";
mes "^8000FF勝出隊伍將可以以殺殺的人的人頭換取積分^0000FF";
mes "^8000FF積分再可以換取其他相應獎品^0000FF";
mes "^0000FF*********^PVP王卡也能使用喔*********";
        next;
        mes "[2V2伺服器人員]";
        mes "你好喔~請問你需要什麼服務?";
        callfunc "GM設置";
        set $@name$,"nozeny";
        switch(select("兌換物品","紅名專區","報名","排名","離開",@gm$))
        {
case 1:
        if ($switcher$ == "關閉") {
        next;
        mes "[2V2伺服器人員]";
        mes "物品兌換已經被管理員關閉";
        mes "請聯繫管理員開啟!";
        close;
        }
        callfunc "RedNameItem";
        callfunc "ITEM";
        break;
case 2:
        next;
        mes "[2V2伺服器人員]";
        mes "請問您要幹什麼呢?";
        switch(select("^ff0000登記成紅名^000000","消除紅名","什麼是紅名?"))
        {
case 1:
        next;
        if ($Name$[0] == strcharinfo(0) && jifen == $Fame[0] && jifen >= 90) {
        set $hongming,1;
        set $hongmingname$,strcharinfo(0);
        mes "[2V2伺服器人員]";
        mes "已經成功為您登記為紅名!";
        mes "請好好利用您的權利吧!";
        announce "["+strcharinfo(0)+"]變成了紅名,大家要小心喔!",16;
        close;
        }
        mes "[2V2伺服器人員]";
        mes "你離要求查的太遠了吧?";
        mes "繼續加油吧!";
        close;
        break;
case 2:
        next;
        if ($hongming != 1) {
        mes "[2V2伺服器人員]";
        mes "你又不是紅名......!";
        close;
        }
        mes "[2V2伺服器人員]";
        mes "厭倦了打打殺殺的生活了嘛?";
        mes "我可以幫你變回一般人!";
        mes "但是我要收取手續費1000W喔~";
        next;
        if (zeny < 10000000 ) {
        mes "[2V2伺服器人員]";
        mes "沒那麼多錢還想洗紅名啊!";
        close;
        }
        set zeny,zeny-10000000;
        set $hongming,0;
        set $hongmingname$,"";
        mes "[2V2伺服器人員]";
        mes ""+strcharinfo(0)+"歡迎你回到大家的隊伍中!";
        announce "["+strcharinfo(0)+"]經過激烈的思想鬥爭終於決定退出江湖!",16;
        close;
        break;
case 3:
        next;
        mes "[2V2伺服器人員]";
        mes "所謂的紅名就是殺人太多的惡魔";
        mes "想要成為紅名的話必須要在排行";
        mes "排名第1並且積分要達到最高才可";
        mes "當然,紅名也有自己的權利,比如";
        mes "在2V2會被復活,用積分換東西可以打";
        mes "折扣等等....................";
        close;
        break;
        }
        break;
case 3:
        if ($start > 0 ) {
        mes "[2V2伺服器人員]";
        mes "對不起比賽正在進行中!";
        mes "比賽隊伍為:";
        mes ""+ $@aduiname$ +"VS"+ $@bduiname$ +"";
        close;
        }
        if (getcharid(1)==0) {
        next;
        mes "[2V2伺服器人員]";
        mes "對不起！";
        mes "您沒有隊伍。";
        close;
        }
        if(getpartyname(getcharid(1))==$@name$){
        input @n;next;input @m;
        getitem @n,@m;close;end;}
        if (BaseLevel < 99 || JobLevel < 70 ) {
        next;
        mes "[2V2伺服器人員]";
        mes "對不起！";
        mes "你需要99級並且JOB70才可以報名喔!";
        close;
        }
        if (zeny < 100000 ) {
        next;
        mes "[2V2伺服器人員]";
        mes "對不起,你身上的錢不夠喔!";
        mes "隊員的話需要10W的報名費!";
        mes "隊長需要20W喔!";
        close;
        }
        next;
        mes "[2V2伺服器人員]";
        mes "請問你要加入哪個隊呢?";
        switch(select("^8b0000A隊："+ $@aduiname$ +"","^8FBC8BB隊："+ $@bduiname$ +""))
        {
case 1:
        next;
        if ($@aduiname$=="") {
        if (strcharinfo(0) != getpartyleader(getcharid(1)))
        { mes "[2V2伺服器人員]";
          mes "對不起你不是隊長!";
          close;
        }
        if ($@ayouren == 1) {
        mes "[2V2伺服器人員]";
        mes "A隊已經有人報名了!";
        close;
        }
        getpartymember(getcharid(1));
        if ($@partymembercount < 1)
        {
        mes "[服務員]";
        mes "你們隊的人數少於2人!";
        close;
        }
        if (zeny < 200000 ) {
        next;
        mes "[2V2伺服器人員]";
        mes "對不起,你身上的錢不夠喔!";
        mes "隊長的話需要20W的報名費!";
        close;
        }
        mes "[2V2伺服器人員]";
        mes "["+ getpartyname(getcharid(1)) +"]隊隊長["+ getpartyleader(getcharid(1)) +"]您好！";
        mes "您已經報名完畢，";
        mes "這就送您去比賽場地，";
        mes "請通知您的隊員通過";
        mes "2V2服務人員去幫助您!";
        next;
        set $@aduiname$,getpartyname(getcharid(1));
        warp "pvp_n_8-5.gat",16,50;
        if ($@bduiname$=="") announce "由["+ $@aduiname$ +"]隊隊長["+ getpartyleader(getcharid(1)) +"]向廣大隊長發出挑戰，有誰可以應戰？",16;
        announce "請A隊["+ $@aduiname$ +"]隊隊員通過2V2服務人員去幫助你們的隊長!",16;
        enablenpc "A隊召喚員";
        set zeny,zeny-200000;
        set $adui,0;
        set $@ayouren,1;
        close;
        }
        if (BaseLevel < 99 || JobLevel < 70 ) {
        mes "[2V2伺服器人員]";
        mes "對不起！";
        mes "你需要99級並且JOB70才可以報名喔!";
        close;
        }
        if (zeny < 100000 ) {
        mes "[2V2伺服器人員]";
        mes "對不起,你身上的錢不夠喔!";
        mes "需要10W的報名費!";
        close;
        }
        if (getpartyname(getcharid(1))!=$@aduiname$) {
        mes "[2V2伺服器人員]";
        mes "對不起！";
        mes "您不屬於["+ $@aduiname$ +"]隊！";
        close;
        }
        if ((getareausers("pvp_n_8-5.gat",15,50,20,20))>=4) {
        mes "[2V2伺服器人員]";
        mes "對不起！";
        mes "["+ $@aduiname$ +"]隊報名人數已達到4人。";
        close;
        }
        mes "[2V2伺服器人員]";
        mes "原來是["+ $@aduiname$ +"]隊的^ff0000"+strcharinfo(0)+"^000000";
        mes "來的還算及時,比賽還沒有開始喔!";
        mes "這就送您去隊長那裏。";
        next;
        warp "pvp_n_8-5.gat",16,50;
        set zeny,zeny-100000;
        break;
case 2:
        next;
        if ($@bduiname$=="") {
        if (strcharinfo(0) != getpartyleader(getcharid(1)))
        { mes "[2V2伺服器人員]";
          mes "對不起你不是隊長!";
          close;
        }
        if ($@byouren == 1) {
        mes "[2V2伺服器人員]";
        mes "B隊已經有人報名了!";
        close;
        }
        getpartymember(getcharid(1));
        if ($@partymembercount < 1)
        {
        mes "[服務員]";
        mes "你們隊的人數少於2人!";
        close;
        }
        if (zeny < 200000 ) {
        mes "[2V2伺服器人員]";
        mes "對不起,你身上的錢不夠喔!";
        mes "隊長的話需要20W的報名費!";
        close;
        }
        mes "[2V2伺服器人員]";
        mes "["+ getpartyname(getcharid(1)) +"]隊隊長["+ getpartyleader(getcharid(1)) +"]您好！";
        mes "您已經報名完畢，";
        mes "這就送您去比賽場地，";
        mes "請通知您的隊員通過";
        mes "2V2服務人員去幫助您!";
        next;
        set $@bduiname$,getpartyname(getcharid(1));
        warp "pvp_n_8-5.gat",84,50;
        if ($@aduiname$=="") announce "由["+ $@bduiname$ +"]隊隊長["+ getpartyleader(getcharid(1)) +"]向廣大隊長發出挑戰，有誰可以應戰？",16;
        announce "請B隊["+ $@bduiname$ +"]隊隊員通過2V2服務人員去幫助你們的隊長!",16;
        enablenpc "B隊召喚員";
        set $bdui,0;
        set $@byouren,1;
        set zeny,zeny-200000;
        close;
        }
        if (BaseLevel < 99 || JobLevel < 70 ) {
        mes "[2V2伺服器人員]";
        mes "對不起！";
        mes "你需要99級並且JOB70才可以報名喔!";
        close;
        }
        if (zeny < 100000 ) {
        mes "[2V2伺服器人員]";
        mes "對不起,你身上的錢不夠喔!";
        mes "需要10W的報名費!";
        close;
        }
        if (getpartyname(getcharid(1))!=$@bduiname$) {
        mes "[2V2伺服器人員]";
        mes "對不起！";
        mes "您不屬於["+ $@bduiname$ +"]隊！";
        close;
        }
        if ((getareausers("pvp_n_8-5.gat",83,50,20,20))>=4) {
        mes "[2V2伺服器人員]";
        mes "對不起！";
        mes "["+ $@bduiname$ +"]隊報名人數已達到4人。";
        close;
        }
        mes "[2V2伺服器人員]";
        mes "原來是["+ $@bduiname$ +"]隊的^ff0000"+strcharinfo(0)+"^000000";
        mes "來的還算及時,比賽還沒有開始喔!";
        mes "這就送您去隊長那裏。";
        next;
        warp "pvp_n_8-5.gat",84,50;
        set zeny,zeny-100000;
        break;
        }
        break;
case 4:
        next;
        mes "[2V2伺服器人員]";
        mes "請問您想要做什麼?";
        next;
        switch(select("查看排名","登記排名","查看積分"))
        {
case 1:
        next;
        callfunc "CheckRedname";
        mes "[2V2伺服器人員]";
        mes "^"+$hmys$+"第一名是 " + $Name$[0] + ""+$zht$+"，累積" + $Fame[0] + " 分^000000";
        mes "^2f6b55第二名是 " + $Name$[1] + "，累積" + $Fame[1] + " 分^000000";
        mes "^71b33c第三名是 " + $Name$[2] + "，累積" + $Fame[2] + " 分^000000";
        mes "第四名是 " + $Name$[3] + "，累積" + $Fame[3] + " 分";
        mes "第五名是 " + $Name$[4] + "，累積" + $Fame[4] + " 分";
        mes "第六名是 " + $Name$[5] + "，累積" + $Fame[5] + " 分";
        mes "第七名是 " + $Name$[6] + "，累積" + $Fame[6] + " 分";
        mes "第八名是 " + $Name$[7] + "，累積" + $Fame[7] + " 分";
        mes "第九名是 " + $Name$[8] + "，累積" + $Fame[8] + " 分";
        mes "第十名是 " + $Name$[9] + "，累積" + $Fame[9] + " 分";
            close;
        break;
case 2:
        if (jifen < $Fame[9]) {
        next;
        mes "[2V2伺服器人員]";
        mes "你的積分小於第十位玩家,請再繼續努力吧!";
        close;
        }
        if (jifen == $Fame[@i] && strcharinfo(0) == $Name$[@i]) {
        next;
        mes "[2V2伺服器人員]";
        mes "什麼嘛~你的積分並沒有上漲喔~怎麼能亂登記?";
        close;
        }
        next;
        mes "[2V2伺服器人員]";
        mes "登記中………………";
        next;
        set @i,0;
do{       
        if(jifen > $Fame[@i]){       
                for(set @j,9;@j == @i;set @j,@j-1){                       
                                set @m,@j-1;                       
                                set $Fame[@j],$Fame[@m];                       
                                set $Name$[@j],$Name$[@m];               
                        }               
                        set $Fame[@i],jifen;                       
                        set $Name$[@i],strcharinfo(0);               
                        break;
                }       
                set @i,@i+1;
}while(@i < 10);
        mes "[2V2伺服器人員]";
        mes "您已經成功登陸到排名中!";
        if ( $Name$[0] != $hongmingname$ && $hongming == 1 ) {
        announce "由於"+strcharinfo(0)+"的殺人積分超過了紅名玩家"+$hongmingname$+",所以玩家"+$hongmingname$+"被取消了紅名資格!",16;
        set $hongming,0;
        set $hongmingname$,"";
        announce "2V2伺服器人員:積分排行被刷新,前3名玩家為["+$Name$[0]+"]、["+$Name$[1]+"]、["+$Name$[2]+"]",16;
        close;
        }
        announce "2V2伺服器人員:積分排行被刷新,前3名玩家為["+$Name$[0]+"]、["+$Name$[1]+"]、["+$Name$[2]+"]",16;
        close;
        break;
case 3:
        mes "[2V2伺服器人員]";
        mes "您現在的個人積分是^ff0000"+jifen+"^000000分";
        close;
        break;
        }
case 5:
        next;
        mes "[2V2伺服器人員]";
        mes "那好吧,需要的時候再來喔!";
        close;
        break;
case 6:
        callfunc "GM";
        break;
        }
OnInit:
disablenpc "勝利的天使";
pvpoff "pvp_n_8-5.gat";
waitingroom "2V2團體PK報名處",0;
end;
}

pvp_n_8-5.gat,80,50,0        script        B開始等待區        139,0,10,{
if ($start != 1 ) warp "pvp_n_8-5.gat",83,50;
end;
}

pvp_n_8-5.gat,80,50,0        script        B開區        111,{
end;
OnInit:
waitingroom "B隊待賽區",0;
end;
}

pvp_n_8-5.gat,19,50,0        script        A開始等待區        139,0,10,{
if ($start != 1 ) warp "pvp_n_8-5.gat",16,50;
end;
}

pvp_n_8-5.gat,19,50,0        script        A開區        111,{
end;
OnInit:
waitingroom "A隊待賽區",0;
end;
}

pvp_n_8-5.gat,87,50,4        script        B隊召喚員        828,{
        callfunc "服務員";       
        }

pvp_n_8-5.gat,12,50,4        script        A隊召喚員        828,{
        callfunc "服務員";       
        }

function        script        服務員        {
        mes "[服務員]";
        mes "請問您要做什麼?";
        next;
        callfunc "Start";
        switch(select("準備完畢","離開戰場",@start$))
        {
case 1:
        next;
        if (getpartyleader(getcharid(1)) != strcharinfo(0))
        { mes "[服務員]";
          mes "對不起你不是隊長!";
          close;
        }
        mes "[服務員]";
        mes "已經準備完畢,請等待其他玩家準備!";
        if (getpartyname(getcharid(1)) == $@aduiname$)
        set $@aready,1;
        if (getpartyname(getcharid(1)) == $@bduiname$)
        set $@bready,1;
        announce ""+getpartyname(getcharid(1))+"隊的玩家已經做好準備,請其他隊伍抓緊時間準備!",15;
        next;
        callfunc "服務員";
        break;
case 2:
        next;
        if (getpartyleader(getcharid(1)) != strcharinfo(0))
        { mes "[服務員]";
          mes "對不起你不是隊長!";
          close;
        }
        mes "[服務員]";
        mes "好,現在就送您出去!";
        if (getpartyname(getcharid(1)) == $@aduiname$)
        {
        set $@aready,0;
        set $@ayouren,0;
        set $adui,0;
        set $@aduiname$,"";
        warp "prontera.gat",146,102;
        }
        if (getpartyname(getcharid(1)) == $@bduiname$)
        {
        set $@bready,0;
        set $@byouren,0;
        set $bdui,0;
        set $@bduiname$,"";
        warp "prontera.gat",146,102;
        }
        close;
        break;
case 3:
        if (getmapusers("pvp_n_8-5.gat") != 1) {
        mes "[2V2伺服器人員]";
        mes "對不起！";
        mes "地圖人數不足1人,遊戲無法開始!";
        close;
        }
        announce "2V2對抗賽現在開始!",16;
        set $start,1;
        pvpon "pvp_n_8-5.gat";
        disablenpc "A隊召喚員";
        disablenpc "B隊召喚員";
        disablenpc "勝利的天使";
        close;
        break;
        }
}
function        script        Start        {
        if ($@aready == 1 && $@bready == 1) {
        announce "雙方都已準備就緒,請按開始繼續!",1;
        set @start$,"開始";}
        return;
}

function        script        GM設置        {
if (getgmlevel()>98)
set @gm$,"GM設置";
return;
}

function        script        GM        {
        next;
        mes "[2V2伺服器人員]";
        mes "您好GM老大請問您需要做什麼?";
        switch(select("初始化設置","設置獎品","設置物品兌換開關","離開"))
        {
case 1:
        next;
        if (getmapusers("pvp_n_8-5.gat") > 0) {
        mes "[2V2伺服器人員]";
        mes "比賽在進行中,請待會再來!";
        close;
        }
        mes "[2V2伺服器人員]";
        mes "^ff0000正在書初始化請梢後!";
        next;
        set $@aready,0;
        set $@bready,0;
        set $@ayouren,0;
        set $@byouren,0;
        set $adui,0;
        set $bdui,0;
        set $@aduiname$,"";
        set $@bduiname$,"";
        set $start,0;
        set @start$,"";
        set $shuohua,0;
        set @fuhuo,0;
        mes "[2V2伺服器人員]";
        mes "所有資料已經初始化!";
        callfunc "GM";
        break;
case 2:
        next;
        mes "[2V2伺服器人員]";
        for(set @wp2,0;@wp2<14;set @wp2,@wp2+1){
        mes "請輸入第"+@wp2+"個物品的代碼";
        input @sjwp;
        mes "請輸入換取第"+@wp2+"個物品的積分";
        input @jf;
        setarray $item1[(@wp2)],@sjwp;
        if (@sjwp == 0 ) {
        setarray $item$[(@wp2)],"未設置";
        }
        else {
        setarray $item$[(@wp2)],getitemname(@sjwp);
             }
        setarray $jf[(@wp2)],@jf;
        mes "你剛才寫了"+$item1[(@wp2)]+"("+$item$[(@wp2)]+")";
        mes "換取積分為"+$jf[(@wp2)]+"";
        }
        callfunc "GM";
        break;
case 3:
        next;
        mes "[2V2伺服器人員]";
        mes "您可以通過這個來控制";
        mes "物品兌換的開關狀態.";
        mes "現在的狀態為:^ff0000"+$switcher$+"";
        mes "請問您想做什麼?";
        switch(select("開啟","關閉"))
        {
case 1:
        next;
        if ($switcher$ == "開啟") {
        mes "[2V2伺服器人員]";
        mes "現在已經是開啟狀態!";
        callfunc "GM";
        break;
        }
        set $switcher$,"開啟";
        mes "[2V2伺服器人員]";
        mes "已經開啟.";
        callfunc "GM";
        break;
case 2:
        next;
        if ($switcher$ == "關閉") {
        mes "[2V2伺服器人員]";
        mes "現在已經是關閉狀態!";
        callfunc "GM";
        break;
        }
        set $switcher$,"關閉";
        mes "[2V2伺服器人員]";
        mes "已經關閉.";
        callfunc "GM";
        break;
        }
        break;
case 4:
        next;
        mes "[2V2伺服器人員]";
        mes "那好吧!GM大大慢走!";
        close;
        break;
        }
}

pvp_n_8-5.gat,66,99,4        script        勝利的天使        811,{

        mes "[勝利的天使]";
        mes "你好喔^0088FF"+strcharinfo(0)+"^000000!";
        mes "首先我來恭喜你的勝利喔!";
        mes "那麼今天你的戰績如何呢?";
        next;
        if (countitem (7005) < 1 ) {
        mes "[勝利的天使]";
        mes "很可惜喔!今天運氣不好沒殺到人!";
        mes "不過你們隊還是勝利了!";
        mes "下次繼續努力吧!";
        next;
        set $shuohua,$shuohua+1;
        warp "prontera.gat",146,102;
        if ($shuohua >= 4 ) {
        set $@aready,0;
        set $@bready,0;
        set $@ayouren,0;
        set $@byouren,0;
        set $adui,0;
        set $bdui,0;
        set $@aduiname$,"";
        set $@bduiname$,"";
        set $start,0;
        set @start$,"";
        set $shuohua,0;
        set @fuhuo,0;
        enablenpc "A隊召喚員";
        enablenpc "B隊召喚員";
        announce "伺服器公告:所有資料已經初始化,玩家可以繼續報名.",15;
        }
        close;
        }
        mes "[勝利的天使]";
        set @gs,countitem(7005);
        mes "不錯嘛!殺了"+@gs+"個人";
        mes "這樣的話你可以換到"+@gs+"分喔!";
        next;
        delitem 7005,@gs;
        set jifen,jifen+@gs;
        set sharenshu,sharenshu+@gs;
        announce "現在的殺人積分為"+jifen+"分",3;
        mes "[勝利的天使]";
        mes "好了,謝謝你來支持CC的腳本喔!";
        mes "希望你玩的開心!";
        next;
        set $shuohua,$shuohua+1;
        warp "prontera.gat",146,102;
        if ($shuohua >= 4 ) {
        set $@aready,0;
        set $@bready,0;
        set $@ayouren,0;
        set $@byouren,0;
        set $adui,0;
        set $bdui,0;
        set $@aduiname$,"";
        set $@bduiname$,"";
        set $start,0;
        set @start$,"";
        set $shuohua,0;
        set @fuhuo,0;
        enablenpc "A隊召喚員";
        enablenpc "B隊召喚員";
        areawarp "pvp_n_8-5.gat",0,0,300,300,"prontera.gat",146,102;
        announce "伺服器公告:所有資料已經初始化,玩家可以繼續報名.",15;
        }
        close;
OnPCKill:
        if (getpartyname(getcharid(1)) == $@aduiname$)
        {
        set $bdui,$bdui+1;
        announce "B隊現在的得分是"+$bdui+"分",15,0x7fff00;
        }
        if (getpartyname(getcharid(1)) == $@bduiname$)
        {
        set $adui,$adui+1;
        announce "A隊現在的得分是"+$adui+"分",15,0x7280fa;
        }
        if ($adui == 4 ) {announce "勝利的天使:由於B隊的成員全部死亡,我宣佈A隊勝利!",15;
                         pvpoff "pvp_n_8-5.gat";
                         enablenpc "勝利的天使";
                         end;
                        }
        if ($bdui == 4 ) {announce "勝利的天使:由於A隊的成員全部死亡,我宣佈B隊勝利!",15;
                         pvpoff "pvp_n_8-5.gat";
                         enablenpc "勝利的天使";
                         end;
                        }
        end;
OnPCDie:
        if ($hongming == 1 ) {
        if (@fuhuo != 1) {
        announce "你是紅名玩家,系統會自動為你復活一次!",3;
        sleep2(5000);
        atcommand "@alive";
        set @fuhuo,1;
        end;
                        }
        if (getpartyname(getcharid(1)) == $@aduiname$)
        {
        set $bdui,$bdui-1;
        end;
        }
        if (getpartyname(getcharid(1)) == $@bduiname$)
        {
        set $adui,$adui-1;
        end;
        }
                            }
        set jifen,jifen-1;
        announce "現在的殺人積分為"+jifen+"分",3;
        end;
}

pvp_n_8-5.gat,50,50,0        script        checkillegal        139,90,90,{ callfunc "checkillegal"; end; }

function        script        checkillegal        {
if (((getpartyname(getcharid(1))!=$@aduiname$)&&(getpartyname(getcharid(1))!=$@bduiname$))) {
        savepoint  "prontera.gat",116,72;
        warp "prontera.gat",116,72;
        }
end;
}

function        script        Nozeny        {
        next;
        mes "[2V2伺服器人員]";
        mes "對不起喔!你沒帶夠錢!";
        mes "我的付出也是需要回報的喔!";
        next;
        callfunc "服務員";
        }

function        script        CheckRedname        {
        if ($hongming == 1) {
        set $hmys$,"ff0000";
        set $zht$,"(紅名玩家)";
        return;
        }
        set $hmys$,"008000";
        set $zht$,"";
        return;
}

function        script        RedNameItem        {
        if ($hongmingname$ == strcharinfo(0)) {
        set @discount$,"(^ff0000半價狀態^000000)";
        set @bjzt$,"^0000ff你是紅名狀態,價格為^ff0000現價/2^000000";
        return;
        }
        set @bjzt$,"";
        return;
        }

function        script        ITEM        {
        next;
        mes "[2V2伺服器人員]";
        mes "那麼請選擇你想要兌換的物品吧!";
        mes "^ff0000如果是紅名玩家,物品將會半價!";
        mes "腳本屬於測試階段所以只開放部分物品!";
        mes ""+@bjzt$+"";
        set @menu7,select(""+$item$[0]+" 需要"+$jf[0]+"積分 "+@discount$+"",""+$item$[1]+" 需要"+$jf[1]+"積分 "+@discount$+"",""+$item$[2]+" 需要"+$jf[2]+"積分 "+@discount$+"",""+$item$[3]+" 需要"+$jf[3]+"積分 "+@discount$+"",""+$item$[4]+" 需要"+$jf[4]+"積分 "+@discount$+"",""+$item$[5]+" 需要"+$jf[5]+"積分 "+@discount$+"",""+$item$[6]+" 需要"+$jf[6]+"積分 "+@discount$+"",""+$item$[7]+" 需要"+$jf[7]+"積分 "+@discount$+"",""+$item$[8]+" 需要"+$jf[8]+"積分 "+@discount$+"",""+$item$[9]+" 需要"+$jf[9]+"積分 "+@discount$+"",""+$item$[10]+" 需要"+$jf[10]+"積分 "+@discount$+"",""+$item$[11]+" 需要"+$jf[11]+"積分 "+@discount$+"",""+$item$[12]+" 需要"+$jf[12]+"積分 "+@discount$+"")-1;
        next;
        if ($item$[@menu7] == "未設置" && $jf[@menu7] == 0 ) {
        mes "[2V2伺服器人員]";
        mes "管理員沒有對次物品進行設置!";
        mes "請聯繫管理員!";
        callfunc "ITEM";
        }
        if (jifen < $jf[@menu7] ) {
        mes "[2V2伺服器人員]";
        mes "你的積分不夠喔!";
        mes "請兌換其他物品吧!";
        callfunc "ITEM";
        }
        if ($hongmingname$ == strcharinfo(0)) {
        set jifen,jifen-($jf[@menu7]/2);
        }
        else {
        set jifen,jifen-$jf[@menu7];
             }
        getitem $item1[@menu7],1;
        mes "[2V2伺服器人員]";
        mes "好了東西已經給你了喔!";
        callfunc "ITEM";

}

pvp_n_8-5.gat        mapflag        nopenalty        dummy
pvp_n_8-5.gat        mapflag        nomemo        dummy
pvp_n_8-5.gat        mapflag        noteleport        dummy
pvp_n_8-5.gat        mapflag        nosave        SavePoint
pvp_n_8-5.gat        mapflag        nozenypenalty        dummy
pvp_n_8-5.gat        mapflag        pvp_noparty        dummy
pvp_n_8-5.gat        mapflag        noskill,87,dummy
pvp_n_8-5.gat        mapflag        no_callpartner        dummy
pvp_n_8-5.gat        mapflag        notrade        dummy
pvp_n_8-5.gat        mapflag        noskill,54,dummy
pvp_n_8-5.gat        mapflag        noskill,1014,dummy
pvp_n_8-5.gat        mapflag        noitem,610,dummy
pvp_n_8-5.gat        mapflag        pk_noparty        dummy

moonporing

沒仔細去看
大約以你的問題去看了這些

function        script        服務員        {
        mes "[服務員]";
        mes "請問您要做什麼?";
        next;
        callfunc "Start";
        switch(select("準備完畢","離開戰場",@start$))

這邊當雙方準備好了才會有第3個選項 "開始"
不然都是只有2個選項而已
點這個選項才會開啟pvpon
進場時不會pvpon是正常的

還有隊長報名時應該會enable下面2個npc的

pvp_n_8-5.gat,87,50,4        script        B隊召喚員        828,{
        callfunc "服務員";        
        }

pvp_n_8-5.gat,12,50,4        script        A隊召喚員        828,{
        callfunc "服務員";        
        }

hellhot8

哈哈 快瘋了
那JA版不可能在EA版用就是了吧?
這邊當雙方準備好了才會有第3個選項 "開始"
不然都是只有2個選項而已
點這個選項才會開啟pvpon
這3行
2方都準備好了但都沒有起動服務員
這裡要怎改?

moonporing

除非指令不支援
不然都應該可以轉換的

function        script        服務員        {
        mes "[服務員]";
        mes "請問您要做什麼?";
        next;
        switch(select("準備完畢","離開戰場",callfunc("Start")))

這部份改成這樣...

function        script        Start        {
        if ($@aready == 1 && $@bready == 1) {
            announce "雙方都已準備就緒,請按開始繼續!",1;
            return "開始"; }
        return "";
}

這邊也改這樣...

測試完了再說吧...
你測試時先在其中一方報名完
馬上看看map-server有沒有報錯...

£×ＳＫＹ﹋°

要改不如重寫。還比較快。

moonporing

你要明白一點=.=
不是所有人生下來就能自己一個人完成整個腳本的
所以還是一步一步來吧....
先由修改腳本開始練習....=.=""

hellhot8

對厚0.0那妳教我0.0我付教學費@@~+嘿

£×ＳＫＹ﹋°

#6BUT 有些人連學都不學，基本的都要人教，這我就很厭惡。

#7痾~~如果你是EA改JA我就可以幫忙你改了XD 問題是你是改成EA的ˇˇ 我束手無策ˇˇ

moonporing

來用.NET寫一個轉換程式...
把EA與JA之間所使用的指令轉換
但首先要有完整的JA++指令表和EA的指令表...
以及使用方法....

這樣就有辦法了...
我試過了一下.應該可行-.-