跟隨祭司會兼差放傳陣賺錢的巨集


為了讓你的祭司不會閒閒沒事做
只要旁邊有人要買中或買朱或要幫傳,他都會自己賺錢錢



##### 祭司會兼差放傳陣賺錢的巨集 ######
automacro 觸發兼差放傳陣 {
exclusive 1
pubm /幫傳|傳陣|有中ㄇ|有朱ㄇ|有中嗎|有朱嗎|收中|收朱/,8
aggressives < 1
timeout 30
        run-once 1
        call { 
if (@invamount(藍色魔力礦石) >= 6) goto ok
if (@invamount(藍色魔力礦石) <= 5) goto nok
:ok
                do c ++請自便,傳點要付費
                   pause @rand(1,2)
                do c 只有中3000 朱2500 其他沒有
                   pause 0.5
                do c "其他金額不會傳"
                goto end
:nok
  do c 沒藍石了...抱歉!
                   pause @rand(1,2)
                do c "請勿交易"
                   pause 1
                do chat leave
  goto end
:end
  release 觸發兼差放傳陣
        }
}
automacro 2千5百的傳送 {
exclusive 1
console "You gained 2,500 zeny."
aggressives < 1
run-once 1
        call { 
if (@invamount(藍色魔力礦石) >= 6) goto ok
if (@invamount(藍色魔力礦石) <= 5) goto no
:ok
  call 朱諾
                goto end
:no
  do c 藍石用完了...抱歉!
                goto end
:end
  release all
        }
}
automacro 3千的傳送 {
exclusive 1
        console "You gained 3,000 zeny."
aggressives < 1
        run-once 1
        call { 
if (@invamount(藍色魔力礦石) >= 6) goto ok
if (@invamount(藍色魔力礦石) <= 5) goto no
:ok
  call 普隆德拉
                goto end
:no
  do c 藍石用完了...抱歉!
                goto end
:end
  release all
        }
}
macro 朱諾 {
$aa123 = @invamount(藍色魔力礦石)
goto ok
:ok
  $x = @arg("$.pos", 1)
  $y = @arg("$.pos", 2)
  $x1 = @eval($x - @rand(1,3))
  $y1 = @eval($y + @rand(1,3))
  do sl 27 $x1 $y1
           pause 1
  do warp yuno_fild04
    pause 1
  $aa456 = @invamount(藍色魔力礦石)
   if ($aa123 == $aa456) goto ok2
  do c 現在的傳送點是「朱諾城外」
                goto end
:ok1
  $x = @arg("$.pos", 1)
  $y = @arg("$.pos", 2)
  $x1 = @eval($x + @rand(1,3))
  $y1 = @eval($y + @rand(1,3))
  do sl 27 $x1 $y1
           pause 1
  do warp yuno
    pause 1
  $aa456 = @invamount(藍色魔力礦石)
   if ($aa123 == $aa456) goto ok3
  do c 現在的傳送點是「朱諾」
                goto end
:ok2
                  pause @rand(1,2)
  do c 傳送失敗!勿亂罵!
    pause 1
  do c 重新開啟
                goto ok1
:ok3
                  pause @rand(1,2)
                do c 抱歉!傳陣失敗!或沒有"朱諾"存點
                goto end
:end
  release all
}
macro 普隆德拉 {
$bb123 = @invamount(藍色魔力礦石)
goto ok
:ok
  $x = @arg("$.pos", 1)
  $y = @arg("$.pos", 2)
  $x1 = @eval($x + @rand(1,3))
  $y1 = @eval($y + @rand(1,3))
  do sl 27 $x1 $y1
           pause 1
  do warp prontera
    pause 1
  $bb456 = @invamount(藍色魔力礦石)
   if ($bb123 == $bb456) goto ok2
  do c 現在的傳送點是「普隆德拉」
                goto end
:ok1
  $x = @arg("$.pos", 1)
  $y = @arg("$.pos", 2)
  $x1 = @eval($x - @rand(1,3))
  $y1 = @eval($y + @rand(1,3))
  do sl 27 $x1 $y1
           pause 1
  do warp prontera
    pause 1
  $bb456 = @invamount(藍色魔力礦石)
   if ($bb123 == $bb456) goto ok3
  do c 現在的傳送點是「普隆德拉」
                goto end
:ok2
                  pause @rand(1,2)
  do c 傳送失敗!勿亂罵!
    pause 1
  do c 重新開啟
                goto ok1
:ok3
                  pause @rand(1,2)
                do c 抱歉!傳陣失敗!或沒有"普隆德拉"存點
                goto end
:end
  release all
}


 



回4樓 此種傳陣機用法廣泛,可用於跟隨時(至少我都是這樣用)
可丟著自己賺錢(以前沒傳陣卡姐時代,現在用於米糕區一樣賺錢)
優點是 隱藏在人群中很難被發現是掛機,只有觸發字出現時才會報價(價格可以調,2步驟而已)如下


1   do c 只有中3000 朱2500 其他沒有   < 例如這裡改中10000 朱5000
2   console "You gained 3,000 zeny." < 原來的這裡是3000就要改成      
     console "You gained 10,000 zeny."


     console "You gained 2,500 zeny." < 原來的這裡是2500就要改成
     console "You gained 5,000 zeny."



 

arrow
arrow
    全站熱搜

    aaa1314 發表在 痞客邦 留言(0) 人氣()