OK論壇

 找回密碼
 註冊
查看: 1193|回復: 2

關於道館腳本,我要開雙到管 可是都有問題

 關閉 [複製鏈接]
  • TA的每日心情

    2016-1-17 05:02 PM
  • 簽到天數: 43 天

    連續簽到: 1 天

    [LV.5]常住居民I

    發表於 2009-5-19 21:39:39 | 顯示全部樓層 |閱讀模式
    xmas.gat,171,81,5 script 道場管理員 734,{
    if (getcharid(1) == 0) {
    mes "[道場-管理員]";
    mes "您目前 殺怪點數:^FF0000" + kmob + "^000000";
    mes "目前殺怪點數的效用未公佈,預計以後達到某個階段";
    mes "可以取得特殊物品,所以現在可以先開始累積。";
    mes " ";
    mes "您沒有隊伍";
    mes "無法參賽";
    close;
    end;
    }
    set @da2,1;
    cada: if ( (@da2<3)||(@da2>6)) {
    if(getmapusers("guild_vs1-"[email=+@da2+]+@da2+".gat")==0[/email] ) set $party[@da2],0;
    set @da2,@da2+1;
    goto cada;
    }
    set @da2,1;
    cbda: if (@da2<4) {
    if (getcharid(1) == $party[@da2]){
    if(@talk==1){
      mes " 嚴禁怪物傭兵進入!!";
      mes " 請重新登入!!";
      close;
    }
    mes "[道場-管理員]";
    mes "您是^22DD22" +getpartyname(getcharid(1))+ "^000000的隊員吧";
    mes "你的隊員已報名挑戰,你要參與嗎?";
    next;
    menu "好的",cas1,"不用了",cas2;
    cas1:
      if([email=$@partywait[@da2]==0]$@partywait[@da2]==0[/email]) {
       mes "[道場-管理員]";
       mes "你的隊友已經先開始了";
       mes "請你等待或換個隊伍另外挑戰!";
       close;
       end;
      }
      if (zeny<[email=$@capartm2]$@capartm2[/email]) {
      mes "金錢不夠^22DD221萬^000000";
      close;
      end;
      }
      set zeny,zeny-$@capartm2;
      warp "guild_vs1-"[email=+@da2+]+@da2+".gat",49,47[/email];
      end;
    cas2:   
      mes "[道場-管理員]";
      mes "歡迎下次再來。";
      close;
      end;
    }
    set @da2,@da2+1;
    goto cbda;
    }
    if(@talk==1){
      mes " 嚴禁怪物傭兵進入!!";
      mes " 請重新登入!!";
      close;
    }
    mes "[道場-管理員]";
    mes "您和您的隊伍想參加嗎?";
    mes "須先繳納 ^22DD22200萬^000000 元的報名費";
    next;
    menu "報名",smit,"不了",nosmit;
    smit: if (zeny<2000000) {
      mes "金錢不夠^22DD22200萬^000000";
      close;
      end;
      }
      set @da2,1;
    ccda: if ( (@da2<3)||(@da2>6)) {
       if (getmapusers("guild_vs1-"[email=+@da2+]+@da2+".gat")==0[/email] ) {
       set zeny,zeny-2000000;
       killmonsterall "guild_vs1-"[email=+@da2+]+@da2+".gat[/email]";
       set [email=$@partywait[@da2],1]$@partywait[@da2],1[/email];
       set $stage[@da2],1;
       set $party[@da2],getcharid(1);
       set [email=$@charid[@da2],getcharid(0]$@charid[@da2],getcharid(0[/email]);
       announce "請 [" + getpartyname($party[@da2]) + "] 隊伍的隊員,要進入
    就在中央主城 找 [道場-管理員]",16;
       enablenpc "裁判"[email=+@da2]+@da2[/email];
       warp "guild_vs1-"[email=+@da2+]+@da2+".gat",49,47[/email];
       end;
       }
      set @da2,@da2+1;
      goto ccda;
      }
      mes "全部場地都有人在挑戰中~,請稍後再試";
      close;
      end;
    nosmit:
      mes "[道場-管理員]";
      mes "歡迎下次再來。";
      close;
      end;
    OnInit:
    waitingroom "道館挑戰賽",0;
    end;
    }
    guild_vs1-1.gat,50,50,0 script chal_1 -1,{ Onka: callfunc "daryan1",1; }
    guild_vs1-2.gat,50,50,0 script chal_2 -1,{ Onka: callfunc "daryan1",2; }

    function script daryan1 {
    set [email=$@db2[getarg(0)],0]$@db2[getarg(0)],0[/email];
    moda: if([email=$@db2[getarg(0)]<$@stagmo2[$stage[getarg(0]$@db2[getarg(0)]<$@stagmo2[$stage[getarg(0[/email])]]){
    set [email=$@mvp,rand(1,35]$@mvp,rand(1,35[/email]);
    monster "guild_vs1-"+getarg(0)+".gat",50,50,"--ja--",$@mvpary2
    [$@mvp2],1,"npcev"+getarg(1)+"::Onvs";
    set [email=$@db2[getarg(0)],$@db2[getarg(0)]+1]$@db2[getarg(0)],$@db2[getarg(0)]+1[/email];
    goto moda;
    }
    if($stage[getarg(0)]==10){
      announce "最後一關挑戰開始,請好好加油!",17;
    end;}
    announce "魔物放出!挑戰開始!",1;
    end;
    }
    guild_vs1-1.gat,50,55,0 script npcev1 -1,{ Onvs: callfunc "vsryan1",1; }
    guild_vs1-2.gat,50,55,0 script npcev2 -1,{ Onvs: callfunc "vsryan1",2; }

    function script vsryan1 {
    set [email=$@db2[getarg(0)],$@db2[getarg(0]$@db2[getarg(0)],$@db2[getarg(0[/email])] -1;
    if( [email=$@db2[getarg(0]$@db2[getarg(0[/email])] > 0 ) end;
    if($stage[getarg(0)]==10){announce "恭喜!!隊伍:"  +getpartyname($party[getarg(0)]) + ",
    成功闖過十關!!",15;}
    if($stage[getarg(0)]==10){
    areawarp "guild_vs1-"+getarg(0)+".gat",0,0,300,300,"new_zone02",28,175;
    end;
    }
    set $stage[getarg(0)],$stage[getarg(0)] +1;
    addtimer 4000,"chal_"+getarg(0)+"::Onka";
    end;
    }
    //####################################裁判####################################
    guild_vs1-1.gat,50,49,4 script 裁判1 758,{ callfunc "maker1",1; }
    guild_vs1-2.gat,50,49,4 script 裁判2 758,{ callfunc "maker1",2; }

    function script maker1 {
    if (getcharid(0) != [email=$@charid[getarg(0]$@charid[getarg(0[/email])]) {
      mes "[裁判]";
      mes "你不是報名的人";
      close;
      end;
    }
    mes "[裁判]";
    mes "您準備要開始挑戰了嗎?";
    next;
    menu "準備好!!",redyok,"等等~",noready;
    redyok: killmonsterall "guild_vs1-"+getarg(0)+".gat";
      set [email=$@partywait[getarg(0)],0]$@partywait[getarg(0)],0[/email];
      disablenpc "裁判"+getarg(0);
      doevent "chal_"+getarg(0)+"::Onka";
      close;
      end;
    noready: mes "[裁判]";
      mes "好的, 請盡速開始!!";
      close;
      end;
    }
    //---------------------地圖屬性設定----------------------
    guild_vs1-1.gat mapflag nomemo dummy
    guild_vs1-1.gat mapflag nosave ra_temsky.gat,93,60
    guild_vs1-2.gat mapflag nomemo dummy
    guild_vs1-2.gat mapflag nosave ra_temsky.gat,93,60  
    guild_room.gat mapflag nomemo dummy
    guild_room.gat mapflag noteleport dummy
    guild_room.gat mapflag nosave ra_temsky.gat,93,60  
    guild_room.gat mapflag nopenalty dummy
    guild_room.gat mapflag nobranch dummy

    //============================發放獎品NPC=======================
    new_zone02,38,182,4 script 天果發放員 736,{
      mes "[獎品發放員]";
      mes "你很厲害!能打到這裡,讓我給你一些獎勵吧!";
             percentheal 100,100;
      next;
      mes "[獎品發放員]";
      mes "我是負責發放獎品的";
      mes "你將會隨機獲得一種獎品";
      mes "你確定你要選擇獎品嗎?";
      next;
      menu "對,我要領獎品!",yessssss,"不了,讓我在考慮一下!",cancel;
      yessssss:
             set @gi,rand(6);
      if(@gi ==0)getitem 607,100;
      if(@gi ==1)getitem 607,300;
      if(@gi ==2)getitem 607,50;
      if(@gi ==3)getitem 607,70;
      if(@gi ==4)getitem 607,90;
      if(@gi ==5)getitem 607,110;
      set kmob,kmob+1;
      dispbottom "殺怪點數+1 目前次數為 : "+kmob;
      warp "amatsu.gat",113,146;
      close;
    cancel:
      close;

    OnInit:

    //------開道費用----
    set [email=$@camoney1,2000000]$@camoney1,2000000[/email];
    //------隊友進場費用---
    set [email=$@capartm2,500000]$@capartm2,500000[/email];
    //-------mvp--------
    setarray [email=$@mvpary2]$@mvpary2[/email]
    [1],1038,1039,1046,1059,1086,1087,1096,1112,1115,1120,1147,1150,1157,1159,1190,1251,1252,1
    272,1312,1373,1388,1389,1418,1492,1511,1582,1583,1623,1630,1658,1685,1688,1719,1649,1785;
    //-------放出mvp數量---
    setarray [email=$@stagmo2[1],2,2,2,2,2,2,2,2,2,3]$@stagmo2[1],2,2,2,2,2,2,2,2,2,3[/email];

    //-------可抽得的獎品id-----
    setarray [email=$@ken0609[1],501,502,503,504,505,506,507,508,509,510]$@ken0609[1],501,502,503,504,505,506,507,508,509,510[/email],
             511,512,513,514,515,516,517,518,1139,1146;
    //------1次領獎數目----
    //對應-可抽得的獎品id-設定
    setarray [email=$@ken[1],1,1,1,1,1,1,1,1,1,1]$@ken[1],1,1,1,1,1,1,1,1,1,1[/email],
         1,1,1,1,1,1,1,1,1,1;

    }
    我這是從我原先的腳本改出來的,可是他放怪每次都會放在guild_vs1.gat這地圖

    請問是我哪裡有漏掉嗎? 麻煩大大幫我解答一下

    評分

    參與人數 1積分 -30 現金 -30 積極性 -30 收起 理由
    lendlice0001 -30 -30 -30 發問無解決回應或修改標題,詳請看板規

    查看全部評分

    回復

    使用道具 舉報

    該用戶從未簽到

    發表於 2009-5-19 21:41:35 | 顯示全部樓層
    #1
    事件名稱、地圖名稱、NPC 名稱,這幾個都要改過、注意
    po 腳本 用code代碼
    回復 支持 反對

    使用道具 舉報

  • TA的每日心情

    2016-1-17 05:02 PM
  • 簽到天數: 43 天

    連續簽到: 1 天

    [LV.5]常住居民I

     樓主| 發表於 2009-5-20 12:06:12 | 顯示全部樓層
    CODE代碼是什麼意思 = = ??
    回復 支持 反對

    使用道具 舉報

    您需要登錄後才可以回帖 登錄 | 註冊

    本版積分規則

    Archiver|手機版|小黑屋|OK討論區

    GMT+8, 2025-6-29 11:56 AM , Processed in 0.058088 second(s), 20 queries , Gzip On.

    Powered by Discuz! X3.4

    Copyright © 2001-2020, Tencent Cloud.

    快速回復 返回頂部 返回列表