關於釣魚的問題

liyune2

請問要怎麼設定才能釣魚   

hugel.gat,113,131,3    script     游動的魚群::shift1    139,1,1,{
    setarray $@FishItem01[0], 19055, 19056; // 此處新增獲得的獎品(魚類)
    setarray $@FishItem02[0], 668, 7034, 7606; // 此處新增獲得的獎品(垃圾道具類)
    setarray $@FishItem03[0], 21999; // 此處新增獲得的獎品(及低機率高級物品類)
    setarray $@FishEquip[0], 27005, 2220; // 輕巧型釣竿, 漁夫帽
    setarray $@FishMonster[0], 1933, 1931, 1992, 1956, 1956, 1990; // 飛馬, 輪迴, 墮落, 龍旗, 聖鬥, 硬石
    if ( ( countitem ( $@FishEquip[0] ) >= 1 ) && ( countitem ( $@FishEquip[1] ) >= 1 ) ) {
        dispbottom "這裡似乎有魚群流動的動靜...";
        set canfish, 2; // 為2時擁有釣魚的資格(可以使用釣竿)
    }
}


hugel.gat,113,137,3    duplicate(shift1)     游動的魚群#1    139,1,1,{
hugel.gat,113,144,3    duplicate(shift1)     游動的魚群#2    139,1,1,{
hugel.gat,119,146,3    duplicate(shift1)     游動的魚群#3    139,1,1,{
hugel.gat,123,141,3    duplicate(shift1)     游動的魚群#4    139,1,1,{
hugel.gat,135,140,3    duplicate(shift1)     游動的魚群#5    139,1,1,{
hugel.gat,122,115,3    duplicate(shift1)     游動的魚群#6    139,1,1,{
hugel.gat,129,107,3    duplicate(shift1)     游動的魚群#7    139,1,1,{
hugel.gat,138,99,3    duplicate(shift1)     游動的魚群#8    139,1,1,{
hugel.gat,165,93,3    duplicate(shift1)     游動的魚群#9    139,1,1,{
hugel.gat,209,107,3    duplicate(shift1)     游動的魚群#10    139,1,1,{
hugel.gat,181,123,3    duplicate(shift1)     游動的魚群#11    139,1,1,{
hugel.gat,169,124,3    duplicate(shift1)     游動的魚群#12    139,1,1,{



// 只要是在移動任何一點後, 取消能夠釣魚的資格(遠離魚群點)
hugel.gat,113,131,3    script     開始釣魚::shift    139,3,3,{
    set canfish, 0; // 為0時無釣魚的資格(無法使用釣竿)
}

hugel.gat,113,137,3    duplicate(shift)     開始釣魚#1    139,3,3,{
hugel.gat,113,144,3    duplicate(shift)     開始釣魚#2    139,3,3,{
hugel.gat,119,146,3    duplicate(shift)     開始釣魚#3    139,3,3,{
hugel.gat,123,141,3    duplicate(shift)     開始釣魚#4    139,3,3,{
hugel.gat,135,140,3    duplicate(shift)     開始釣魚#5    139,3,3,{
hugel.gat,122,115,3    duplicate(shift)     開始釣魚#6    139,3,3,{
hugel.gat,129,107,3    duplicate(shift)     開始釣魚#7    139,3,3,{
hugel.gat,138,99,3    duplicate(shift)     開始釣魚#8    139,3,3,{
hugel.gat,136,93,3    duplicate(shift)     開始釣魚#9    139,3,3,{
hugel.gat,209,107,3    duplicate(shift)     開始釣魚#10    139,3,3,{
hugel.gat,181,123,3    duplicate(shift)     開始釣魚#11    139,3,3,{
hugel.gat,169,124,3    duplicate(shift)     開始釣魚#12    139,3,3,{




function    script    Fishing    {
    if ( canfish == 2 ) { // 在NPC附近
        dispbottom "拋出魚線, 釣魚開始!";
        set canfish, canfish - 1; // 重置
        set FishReply_A, 0;
        set FishReply_B, 0;
        set ProcessLimit, rand(3, 8); // 必須與魚群搏鬥3~8回合(隨機)
        set ProcessTime, rand( 500, 3000 ); // 搏鬥每回合的時間, 單位: 毫秒
        goto Fish_Process;
    }
    else {
        dispbottom "好像沒有什麼效果...";
        end;
    }

Fish_Process:
    if ( ProcessTime < 750 ) dispbottom "天哪!! 這條魚的力道真是前所未見!!";
    else if ( ProcessTime <= 1000 ) dispbottom "這隻魚看起來不來好應付....";
    else if ( ProcessTime <= 2000 ) dispbottom "必須認真一點應對了!";
    else if ( ProcessTime <= 3000 ) dispbottom "似乎請請鬆鬆就能將這隻魚打撈起來。";
    for ( set ProcessNum, 0; ProcessNum <= ProcessLimit ; set ProcessNum, ProcessNum + 1 ) {
        if ( canfish == 0 ) {
            dispbottom "步伐太大嚇走魚群了。";
            end;
        }
        else if ( canfish != 0 ) {
            sleep2 ProcessTime;
            if ( FishReply_B != FishReply_A ) {
                dispbottom "一時的疏忽讓魚游走了。";
                misceffect 611;
                end;
        }

        else if ( ProcessNum == ProcessLimit ) goto Fish_Success;
            else {
                switch( rand( 1, 11 ) ) {
                case 1:
                    dispbottom "沉住氣...";
                    misceffect 11;
                    break;
                case 2:
                    dispbottom "集 中 精 神";
                    misceffect 745;
                    break;
                case 3:
                    dispbottom "被魚線被鉤傷了!! 好痛!!";
                    percentheal -5,-5;
                    misceffect 522;
                    break;
                case 4:
                    dispbottom "採到石塊上的青苔, 狠狠地滑了一跤!!";
                    percentheal -3,-3;
                    misceffect 310;
                    misceffect 414;
                    break;
                case 5:
                    dispbottom "濺起的水花弄濕全身...";
                    percentheal -3,-3;
                    misceffect 748;
                    break;
                case 6:
                    dispbottom "不好了, 身體開始失溫, 快點使用『安全火柴』取暖!!";
                    set FishReply_B, 6;
                    percentheal 0,-20;
                    misceffect 379;
                    break;
                case 7:
                    dispbottom "就是現在 使用『捲線器』, 趁魚有鬆懈的這瞬間!!";
                    set FishReply_B, 7;
                    break;
                case 8:
                    dispbottom "魚餌被吃掉了, 趕快換上新的『好吃的魚餌』!!";
                    set FishReply_B, 8;
                    break;
                case 9:
                    dispbottom "釣線竟然斷掉了, 趕快換上新的『耐用的釣線』!!";
                    set FishReply_B, 9;
                    break;
                case 10:
                    set FishBroken, rand( 0, 30 );
                    if ( FishBroken ) dispbottom "雖然這魚的力氣很大, 但魚竿還撐得住。";
                    else {
                        dispbottom "跟魚群搏鬥的力道過大, 魚竿壞掉了!!";
                        delitem  $@FishEquip[0], 1;
                        misceffect 611;
                    end;
                    }
                    break;
                case 11:
                    dispbottom "被魚群們耍得團團轉阿... 失敗了...";
                    misceffect 501;
                    misceffect 611;
                    end;
                }
            }
        }
    }
    end;

Fish_Success:
    misceffect 610;
    set IsFish, rand( 1, 100 );
    if ( ( getequipid(3) == $@FishEquip[0] ) && ( getequipid(1) == $@FishEquip[1] ) ) set FishRate, 125; // 機率漲幅倍率
    else {
        dispbottom "如果同時裝備 輕巧型釣竿 與 漁夫帽, 更能發揮釣魚的本領。";
        set FishRate, 100; // 原始倍率
    }

    if ( IsFish <= ( ( 1 * FishRate ) / 100 ) ) {
        dispbottom "釣到寶物了!! 真是太幸運了!!";
        getitem $@FishItem03[ rand( 0, getarraysize( $@FishItem03 ) -1 ) ], 1;
    }
    else if ( IsFish <= ( ( 50 * FishRate ) / 100 ) ) {
        dispbottom "釣到魚了!! 不錯哦!!";
        getitem $@FishItem01[ rand( 0, getarraysize( $@FishItem01 ) -1 ) ], 1;
    }
    else if ( IsFish <= ( ( 75 * FishRate ) / 100 ) ) {
        dispbottom "這是魚嗎...?";
        getitem $@FishItem02[ rand( 0, getarraysize( $@FishItem02 ) -1 ) ], 1;
    }
    else if ( IsFish <= ( ( 95 * FishRate ) / 100 ) ) {
        getmapxy $@fmap$, $@fmapx, $@fmapy, 0;
        set $@randmon, rand(0, getarraysize($@FishMonster) - 1);
        monster $@fmap$, $@fmapx, $@fmapy, getmonsterinfo($@FishMonster[$@randmon], 0), $@FishMonster[$@randmon], 1;
        dispbottom "魚群們瘋狂地衝了出來 !!! 是 "+ getmonsterinfo( $@FishMonster[$@randmon], 0 ) +"!!!";
    }
    else dispbottom "什麼也沒有...?";
    end;
}

// 當你遇到任何的情況, 要做出的臨場反應
function    script    Fishing_Reply6    {
    set FishReply_A, 6; // 安全火柴
}

function    script    Fishing_Reply7    {
    set FishReply_A, 7; // 捲線器
}

function    script    Fishing_Reply8    {
    set FishReply_A, 8; // 好吃的魚餌
}

function    script    Fishing_Reply9    {
    set FishReply_A, 9; // 耐用的釣線
}

// 如果要用下面的NPC, 請把雙斜線槓掉
hugel.gat,116,134,3    cashshop    太公望    963,27005:500,2220:100,27006:50,27007:10,27008:10,27009:10,27010:10

game1993

這是戰鬥釣魚系統

(1)購買物品
＊以商城ｐ點購買物品＊
輕巧型釣竿(可裝可不裝)
漁夫帽(可裝可不裝)
魚餌(啟動用)
好吃的魚餌
耐用的釣線
安全火柴
捲線器

(2)步驟
首先在河堤旁邊來回走動
接著對話視窗會出現【這裡似乎有魚群流動的動靜…】
出現這句話之後使用【魚餌】
接下來要注意對話視窗所出現的物品關鍵字
※就是現在使用【捲線器】，趁魚有鬆懈的這瞬間
※釣線竟然斷掉了，趕快換上新的【耐用的釣線】
成功之後就會隨機召喚自創王或釣取神材

(3)釣取物品說明
小從縮小藥水到破洞聖誕襪、破滅硬幣等
大從太陽神象徵箱子到隨機自創王
＊取得自創王卡不必到自創區和人搶怪＊

liyune2

game1993 發表於 2014-6-27 02:26 PM
這是戰鬥釣魚系統

(1)購買物品

我試過 可是一樣不能釣魚 我的對話欄沒出現這裡似乎有魚群流動的動靜…我有走河堤旁邊((我有來回走動  所有釣魚的用品我都買了 一樣沒出現這裡似乎有魚群流動的動靜…這幾個字

game1993

liyune2 發表於 2014-6-27 03:35 PM
我試過 可是一樣不能釣魚 我的對話欄沒出現這裡似乎有魚群流動的動靜…我有走河堤旁邊((我有來回走動  所 ...

確定您的對話藍可以接收到對話??

還有

hugel.gat,113,137,3    duplicate(shift1)     游動的魚群#1    139,1,1,{
hugel.gat,113,144,3    duplicate(shift1)     游動的魚群#2    139,1,1,{
hugel.gat,119,146,3    duplicate(shift1)     游動的魚群#3    139,1,1,{
hugel.gat,123,141,3    duplicate(shift1)     游動的魚群#4    139,1,1,{
hugel.gat,135,140,3    duplicate(shift1)     游動的魚群#5    139,1,1,{
hugel.gat,122,115,3    duplicate(shift1)     游動的魚群#6    139,1,1,{
hugel.gat,129,107,3    duplicate(shift1)     游動的魚群#7    139,1,1,{
hugel.gat,138,99,3    duplicate(shift1)     游動的魚群#8    139,1,1,{
hugel.gat,165,93,3    duplicate(shift1)     游動的魚群#9    139,1,1,{
hugel.gat,209,107,3    duplicate(shift1)     游動的魚群#10    139,1,1,{
hugel.gat,181,123,3    duplicate(shift1)     游動的魚群#11    139,1,1,{
hugel.gat,169,124,3    duplicate(shift1)     游動的魚群#12    139,1,1,{

要到以上幾個點才有用
並不是河堤旁都有

liyune2

我確定 對話欄可以接收到對話

輕巧型釣竿(可裝可不裝)
漁夫帽(可裝可不裝)
魚餌(啟動用)
好吃的魚餌
耐用的釣線
安全火柴
捲線器

這些我有有買

hugel.gat,113,137,3    duplicate(shift1)     游動的魚群#1    139,1,1,{

這個點我有走過 可是卻沒出現因該出現的對話