OK論壇

 找回密碼
 註冊
查看: 1113|回復: 5

請問為什麼這個腳本的NPC都沒出來?JA0.94

 關閉 [複製鏈接]
  • TA的每日心情
    開心
    2019-5-23 11:06 PM
  • 簽到天數: 37 天

    連續簽到: 1 天

    [LV.5]常住居民I

    發表於 2008-7-14 08:54:14 | 顯示全部樓層 |閱讀模式
    我的版本:JA0.94

    //
    // ---------------------------------------------------------------------
    //         說明
    // ---------------------------------------------------------------------
    //
    // 名稱:魔物賽跑
    // 類型:遊戲類型
    // 版本:JA/JA++
    // 修改者:大頭
    // 有問題找我回報
    // 要修改時間請在OnClock1925  自行修改
    // 請勿轉載
    // 繁體化:大頭
    // ---------------------------------------------------------------------
    //         遊戲說明
    // ---------------------------------------------------------------------
    //  遊戲時間為:7點25分開始報名 7點30分停止   7點35分開始比賽 公佈成績

    - script 競跑開啟 -1,{
    OnClock2025:
    announce "魔物競速場活動開啟,5分鐘後正式比賽進行,請到毀葛參加比賽!",0x00;
    set [email=$@mobrungame,1]$@mobrungame,1[/email];
    end;
    }
    - script 暫停買票 -1,{
    OnClock2030:
    announce "魔物競速場活動暫停買票,但是可以當觀眾,比賽過後再公佈比賽成績!",0x00;
    set [email=$@mobrungame,0]$@mobrungame,0[/email];
    end;
    }
    p_track02.gat,73,22,5 script 門票發放助手 60,{
    if(@mobwinner==$@rungame && [email=$@rungame!=0]$@rungame!=0[/email])
    mes "[門票發放助手]";
    mes "這是您的獎金5萬 ROZ請收好!";
    set zeny,zeny + 50000;
    set @mobwinner,0;
    close;
    end;
    }
    if(@mobwinner!=$@rungame && [email=$@rungame!=0]$@rungame!=0[/email] && @mobwinner!=0){
    mes "[門票發放助手]";
    mes "你沒有押正確";
    set @mobwinner,0;
    close;
    end;
    }
    mes "[門票發放助手]";
    mes "=====[伺服器目前的時間]=====";
    mes "【"+gettime(7)+"年"+gettime(6)+"月"+gettime(5)+"日 "+gettime(3)+ "點" +gettime(2)+ "分】";
    mes "============================";
    mes "^0088FF"+strcharinfo(0)+"^000000你好~";
    mes "我是專門管理魔物竟跑門票的管理員,在這裏你可以支援你想支援的魔物獲勝,如果支持的魔物獲勝則可以獲得獎勵!";
    next;
    if([email=$@mobrungame!=1]$@mobrungame!=1[/email]){
    mes "[門票發放助手]";
    mes "現在不是賣票時間,請在^0088FF7點25分活動開啟後^000000的^0088FF5分鐘內^000000購買!";
    close;
    }
    mes "[門票發放助手]";
    mes "請選擇你支持的魔物選手,並且繳納1萬元的贊助費用!";
    mes "比賽期間請不要離開本地圖否則支持無效!";
    next;
    if(zeny<10000){
    mes "[門票發放助手]";
    mes "贊助費不夠";
    close;
    }
    set zeny,zeny - 10000;
    menu "1號魔物",l1,"2號魔物",l2,"3號魔物",l3,"4號魔物",l4,"5號魔物",l5;
    l1:
    set @mobwinner,1;
    mes "您支援了1號選手!";
    close;
    l2:
    set @mobwinner,2;
    mes "您支援了2號選手!";
    close;
    l3:
    set @mobwinner,3;
    mes "您支援了3號選手!";
    close;
    l4:
    set @mobwinner,4;
    mes "您支援了4號選手!";
    close;
    l5:
    set @mobwinner,5;
    mes "您支援了5號選手!";
    close;
    }
    p_track01.gat,58,38,2 script 1號 909,{
    end;
    OnClock1935:
    set [email=$@s1,rand(500,1000]$@s1,rand(500,1000[/email]);
    npcspeed [email=$@s1]$@s1[/email];
    npcwalkto 30,38;
    end;
    }
    p_track01.gat,58,36,2 script 2號 909,{
    end;
    OnClock1935:
    set [email=$@s2,rand(500,1000]$@s2,rand(500,1000[/email]);
    npcspeed [email=$@s2]$@s2[/email];
    npcwalkto 30,36;
    end;
    }
    p_track01.gat,58,34,2 script 3號 909,{
    end;
    OnClock1935:
    set [email=$@s3,rand(500,1000]$@s3,rand(500,1000[/email]);
    npcspeed [email=$@s3]$@s3[/email];
    npcwalkto 30,34;
    end;
    }
    p_track01.gat,58,32,2 script 4號 909,{
    end;
    OnClock1935:
    set [email=$@s4,rand(500,1000]$@s4,rand(500,1000[/email]);
    npcspeed [email=$@s4]$@s4[/email];
    npcwalkto 30,32;
    end;
    }
    p_track01.gat,58,30,2 script 5號 909,{
    end;
    OnClock1935:
    set [email=$@s5,rand(500,1000]$@s5,rand(500,1000[/email]);
    npcspeed [email=$@s5]$@s5[/email];
    npcwalkto 30,30;
    end;
    }
    p_track01.gat,0,0,0 script 計算排名並且公佈結果 -1,{
    OnClock1935:
    //以下計算最小值===========================================================
    if([email=$@s1<$@s2]$@s1<$@s2[/email]) { set [email=$@min1,$@s1]$@min1,$@s1[/email]; set [email=$@max1,1]$@max1,1[/email]; } else { set [email=$@min1,$@s2]$@min1,$@s2[/email]; set [email=$@max1,2]$@max1,2[/email]; }
    if([email=$@s3<$@s4]$@s3<$@s4[/email]) { set [email=$@min2,$@s3]$@min2,$@s3[/email]; set [email=$@max2,3]$@max2,3[/email]; } else { set [email=$@min2,$@s4]$@min2,$@s4[/email]; set [email=$@max2,4]$@max2,4[/email]; }
    if([email=$@min1<$@min2]$@min1<$@min2[/email]) { set [email=$@max,$@max1]$@max,$@max1[/email]; } else { set [email=$@max,$@max2]$@max,$@max2[/email]; }
    //以上計算最小值===========================================================
    announce "本次魔物賽跑活動的優勝者:"[email=+$@max]+$@max[/email]+"號魔物,請勝出者到[門票發放助手]處領取獎勵!",0x00;
    set [email=$@rungame,$@max]$@rungame,$@max[/email];
    warpnpc "p_track01.gat",58,38,"1號";
    warpnpc "p_track01.gat",58,36,"2號";
    warpnpc "p_track01.gat",58,34,"3號";
    warpnpc "p_track01.gat",58,32,"4號";
    warpnpc "p_track01.gat",58,30,"5號";
    end;
    }
    p_track01.gat,0,0,0 script 過圖變數寄存 -1,{
    OnPCMoveMap:
    set @mobwinner,0;
    end;
    }
    prontera.gat,152,185,12 script "魔物競速場服務生" 48,{
    mes "[魔物競速場服務生]";
    mes "你想要去魔物競速場嗎??";
    next;
    menu
    "是",Ltrans,
    "否",Lcon;
    Ltrans: warp "p_track01.gat",73,28; end;
    Lcon:
    mes "[魔物競速場服務生]";
    mes "有需要在來。";
    close;
    OnInit:
            waitingroom " 魔物競速場",0;
            end;
    }

    p_track01.gat,76,32,4 script 回主城的服務人員 48,{
    mes "[回主城的服務人員員]";
    mes "你要到回主城嗎?";
    next;
    menu
    "是",Ltrans,
    "否",Lcon;
    Ltrans: warp "prontera.gat",158,184; end;
    Lcon:
    mes "[回主城的服務人員]";
    mes "有需要在來。";
    close;
    OnInit:
            waitingroom " 回主城的服務",0;
            end;
    }

    本帖子中包含更多資源

    您需要 登錄 才可以下載或查看,沒有帳號?註冊

    x
  • TA的每日心情
    開心
    2022-3-25 10:24 AM
  • 簽到天數: 259 天

    連續簽到: 1 天

    [LV.8]以壇為家I

    發表於 2008-7-14 15:55:25 | 顯示全部樓層
    注意NPC該用TAB的地方。
    [錯誤] if(@mobwinner==$@rungame && $@rungame!=0)
    [修正]if(@mobwinner==$@rungame && $@rungame!=0){

    另外建議直接上傳腳本。
    因為有@的地方會變成Email格式。

    [ 本帖最後由 reasapakisa 於 2008-7-14 03:57 PM 編輯 ]
    回復 支持 反對

    使用道具 舉報

    該用戶從未簽到

    發表於 2008-7-17 04:42:56 | 顯示全部樓層

    大大 這是我使用的腳本 可以使用

    不過沒有飛過去 還有回來的npc 需要自己增加....
    我有看見每一小時開一場次的賽跑...
    不過是ea版本...
    功力不足無法更改成ja腳本


    p_track01.gat,64,63,4  script  競賽開始  88,{
    OnClock0507:
    announce "波利競賽準備於五分鐘之後開始,請有興趣者準備參加。",0x00;
    set $@mobrungame,1;
    end;
    }
    ra_temple.gat,64,30,4  script  停止售票  88,{
    OnClock0508:
    announce "波利競賽活動停止售票,但是可以兌換現金,在一分鐘公佈成績。",0x00;
    set $@mobrungame,0;
    end;
    }

    p_track01.gat,73,22,5        script        門票發放助手        60,{
    if(@mobwinner==$@rungame && $@rungame!=0){
    mes "[門票發放助手]";
    mes "這是你的獎金,請點收!";
    set zeny,zeny + 50000;
    set @mobwinner,0;
    close;
    end;
    }
    if(@mobwinner!=$@rungame && $@rungame!=0 && @mobwinner!=0){
    mes "[門票發放助手]";
    mes "你沒有中講喔!!";
    set @mobwinner,0;
    close;
    end;
    }
    mes "[門票發放助手]";
    mes "你好!!我是管理魔物競賽門票的管理員,這邊你可以選擇你支持的波利,如果他獲勝你將可以得到獎勵。";
    next;
    if($@mobrungame!=1){
    mes "[門票發放助手]";
    mes "現在不是購買時間,請在活動開始後五分鐘之內購買!!";
    close;
    }
    mes "[門票發放助手]";
    mes "請選擇你所支持的選手,並且繳納一萬元的贊助費用。";
    mes "比賽期間不要離開此地圖,不然是同無效。";
    next;
    if(zeny<10000){
    mes "[門票發放助手]";
    mes "贊助費不夠";
    close;
    }
    set zeny,zeny - 10000;
    menu "1號波利",l1,"2號波利",l2,"3號波利",l3,"4號波利",l4,"5號波利",l5;
    l1:
            set @mobwinner,1;
            mes "你支持一號波利";
            close;
    l2:
            set @mobwinner,2;
            mes "你支持二號波利";
            close;
    l3:
            set @mobwinner,3;
            mes "你支持三號波利";
            close;
    l4:
            set @mobwinner,4;
            mes "你支持四號波利";
            close;
    l5:
            set @mobwinner,5;
            mes "你支持五號波利";
            close;
    }

    p_track01.gat,58,38,2        script        1號        909,{
    end;

    OnClock0508:
    set $@s1,rand(500,1000);
    npcspeed $@s1;
    npcwalkto 30,38;
    end;
    }

    p_track01.gat,58,36,2        script        2號        909,{
    end;

    OnClock0508:
    set $@s2,rand(500,1000);
    npcspeed $@s2;
    npcwalkto 30,36;
    end;
    }

    p_track01.gat,58,34,2        script        3號        909,{
    end;

    OnClock0508:
    set $@s3,rand(500,1000);
    npcspeed $@s3;
    npcwalkto 30,34;
    end;
    }

    p_track01.gat,58,32,2        script        4號        909,{
    end;

    OnClock0508:
    set $@s4,rand(500,1000);
    npcspeed $@s4;
    npcwalkto 30,32;
    end;
    }

    p_track01.gat,58,30,2        script        5號        909,{
    end;

    OnClock0508:
    set $@s5,rand(500,1000);
    npcspeed $@s5;
    npcwalkto 30,30;
    end;
    }

    ra_temple.gat,64,34,4  script  計算結果  88,{
    OnClock0509:
    //以下計算最小值===========================================================
    if($@s1<$@s2) { set $@min1,$@s1; set $@max1,1; } else { set $@min1,$@s2; set $@max1,2; }
    if($@s3<$@s4) { set $@min2,$@s3; set $@max2,3; } else { set $@min2,$@s4; set $@max2,4; }
    if($@min1<$@min2) { set $@max,$@max1; } else { set $@max,$@max2; }
    //以上計算最小值===========================================================
    announce "本次賽跑勝利者"+$@max+"號波利,選對波力者到[門票發放助手]領取獎勵",0x00;
    set $@rungame,$@max;
    warpnpc "p_track01.gat",58,38,"1號";
    warpnpc "p_track01.gat",58,36,"2號";
    warpnpc "p_track01.gat",58,34,"3號";
    warpnpc "p_track01.gat",58,32,"4號";
    warpnpc "p_track01.gat",58,30,"5號";
    end;
    }

    ra_temple.gat,64,38,4  script  過圖變數寄存  88,{
    OnPCMoveMap:
            set @mobwinner,0;
            end;
    }
    回復 支持 反對

    使用道具 舉報

  • TA的每日心情
    慵懶
    2011-10-25 10:15 PM
  • 簽到天數: 121 天

    連續簽到: 0 天

    [LV.7]常住居民III

    發表於 2008-7-26 16:08:06 | 顯示全部樓層
    你這一版的 是測試版  不完整  
    主要是 沒法啟動 funtion npc
    所以 會有問題

    你的map 顯示的 是 line 太多  指的是 腳本 第一條 //

    建議 換別的版本 我也試了幾款  現在正常運作了  可再試試
    回復 支持 反對

    使用道具 舉報

    該用戶從未簽到

    發表於 2008-7-26 17:11:28 | 顯示全部樓層
    樓上大大 可以提供一下 你的腳本嗎?
    因為 我的腳本 更改出來有點老舊
    回復 支持 反對

    使用道具 舉報

    該用戶從未簽到

    發表於 2008-7-27 14:40:10 | 顯示全部樓層
    你是不是空格都用空白鍵 ? 要用 tab :)
    回復 支持 反對

    使用道具 舉報

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

    本版積分規則

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

    GMT+8, 2025-7-1 01:27 PM , Processed in 0.127730 second(s), 21 queries , Gzip On.

    Powered by Discuz! X3.4

    Copyright © 2001-2020, Tencent Cloud.

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