黃易群俠傳M脫機外掛應用程式黃易神行
3973
2

[發問] 賭場腳本問題!!

yang1 發表於 2011-4-25 17:00:43 | 只看該作者 回帖獎勵 |倒序瀏覽 |
10論壇幣
我腳本已經到可以給錢->骰完->贏了可以點買家交易、輸了就說沒中,但是點交易卻不能成功給錢,會在交易時呆掉
a. 點交易卻不能成功給錢,會在交易時呆掉
b. "恭喜 $DealID 中獎! 請領取獎金~" 在BB中沒有出現ID,只有顯示 "恭喜  中獎! 請領取獎金~",不知有沒有關係?但是可以成功點買家交易!
以下是一個賭贏的BB內容


天使 魔心 (等級 107) 向您要求一個交易
請輸入'deal'以開始交易, 或'deal no'以拒絕本交易.
Config 'dealAuto' 設定為 2 (原為 0)

開始與 天使 魔心 進行交易
請輸入 deal add 背包物品編號 數量 來進行物品交易
或輸入 deal add z 金額 來進行金額交易
確認 或 交換 都是輸入 deal 來執行
一次完整的交易都要輸入3次"deal"

您完成了本交易
天使 魔心 加入 1,000,008 z 以交易
[macro] automacro Deal2 triggered.

Config 'dealAuto' 設定為 0 (原為 2)
天使 魔心 完成了本交易
Config 'dealAuto' 設定為 2 (原為 0)
交易完成
[macro] automacro DealMoney triggered.

您 獲得 1,000,008 zeny.
Config 'dealAuto' 設定為 0 (原為 2)
RuinKy : 押"中" 金額:1000008 Z
RuinKy : 開
RuinKy: *骰子4點*
[macro] automacro Emotions triggered.
RuinKy : 開出: "骰子4" (中)
Config 'dealAuto' 設定為 1 (原為 0)
'e' 功能語法錯誤 (表情符號)
使用方法: e <指令>

RuinKy : 恭喜  中獎! 請領取獎金~
Config 'dealAuto' 設定為 0 (原為 1)

'deal' 功能錯誤 (與玩家交易)
無傳過來的或正在交易的訊息可供取消

'deal' 功能錯誤 (與玩家交易)
無傳過來的或正在交易的訊息可供取消

試圖與 Player 天使 魔心 (0) 交易
開始與 天使 魔心 進行交易

請輸入 deal add 背包物品編號 數量 來進行物品交易
或輸入 deal add z 金額 來進行金額交易
確認 或 交換 都是輸入 deal 來執行
一次完整的交易都要輸入3次"deal"

天使 魔心 完成了本交易
Config 'dealAuto' 設定為 2 (原為 0)
您完成了本交易
'deal' 功能錯誤 (與玩家交易)
您接受了最終的交易
交易完成
'deal' 功能錯誤 (與玩家交易)
無交易訊息可供接受

'deal' 功能錯誤 (與玩家交易)
無傳過來的或正在交易的訊息可供取消

'deal' 功能錯誤 (與玩家交易)
無傳過來的或正在交易的訊息可供取消


automacro CreateChat {
  console /您的座標: (.*), (.*)/
call {
  pause 0.2
  release all
  pause 1
  lock WinDeal
  pause 2.5
  do look 5 0
  do sit
  pause 0.2
  do chat create "100~300W大中小1:2.5猜數字1:5" 20 1
  pause 0.2
  do conf dealAuto 2
}
}


automacro JoinChat {
  console /(.*) 已加入這個聊天室/
  run-once 1
call {
  lock JoinChat
  pause 0.1
  if ($.lastMatch1 == GM01) goto next
  pause 0.1
  if ($.lastMatch1 == GM02) goto next
  pause 0.1
  if ($.lastMatch1 == GM03) goto next
  pause 0.1
  if ($.lastMatch1 == GM[0-99]) goto next
  pause 0.5
  do c 押注方式: [押金] + [1~9z]玩法
  pause 1
  do c 可押注金額: 100萬 200萬 300萬
  pause 1
  do c 交易 1,000,007 押小 骰子開(1,2)
  pause 1
  do c 交易 1,000,008 押中 骰子開(3,4)
  pause 1
  do c 交易 1,000,009 押大 骰子開(5,6)
  pause 1
  do c 猜數字(1~6): 交易 1,000,001 猜數字1
  pause 1
  do c 猜數字(1~6): 交易 1,000,003 猜數字3
  pause 1
  do c 猜數字(1~6): 交易 1,000,006 猜數字6
:next
  release all
}
}

automacro DenyDeal {
  console /Engaged Deal with (.*)/
  run-once 1
call {
  lock JoinChat
  $DealID = $.lastMatch1
  do conf dealAuto 0
  pause 0.1
  lock WinDeal
  lock DealEnd
  lock DenyDeal
  pause 40
  do deal no
}
}


#如果對方放入的是物品,則取消交易
automacro DealItem {
  console /(.*) 加入物品以交易: (.*)/
call {
  do deal no
}
}


#對方放入(.*),(.*),(.*)賭金後,執行確認交易動作!
#(.*),(.*),(.*) z 是百萬的情況, (.*),(.*) z 是十萬的情況 ,
#十萬百萬都接受則要其他寫法, 在此不提供

automacro Deal2 {
  console /(.*) 加入 (.*),(.*),(.*) z 以交易/
  run-once 1
call {
  do conf dealAuto 0
  pause 0.1
  lock Deal2
  pause 0.1
  lock WinDeal
  pause 0.1
  lock DealEnd
  pause 0.1
  lock DenyDeal
  pause 0.1
  lock DealEnd
  pause 0.1
  $LabMoney = $.lastMatch2$.lastMatch3$.lastMatch4
  pause 0.5
  $AssignNumber = @eval($LabMoney % 10)
  pause 0.5
  if ($AssignNumber = 0) goto NO
  pause 0.2
  $SureDealZ = @eval($LabMoney - $AssignNumber)
  pause 1.5

#----------------------修 改 能 投 注 的 金 額 ---------------------------------------------------------
  if ($SureDealZ == 1000000) goto conn
  pause 0.2
  if ($SureDealZ == 2000000) goto conn
  pause 0.2
  if ($SureDealZ == 3000000) goto conn
  pause 0.2

:NO
  do c  $LabMoney Z << 放入金額,錯誤!
  do c 可押注金額: 100萬 200萬 300萬
  do c 交易 1,000,007 押小 骰子開(1,2)
  do c 交易 1,000,008 押中 骰子開(3,4)
  do c 交易 1,000,009 押大 骰子開(5,6)
  do c 猜數字2: 交易 1,000,002 猜數字 2
  do c 猜數字5: 交易 1,000,005 猜數字 5
  do deal no
  pause 0.2
  do deal no
  release all
  stop
:conn
  do conf dealAuto 2
  pause 50
  do deal no
}
}

automacro DealMoney {
  console /交易完成/
call {
  lock DealRe
  do conf dealAuto 0
  pause 0.2
  if ($AssignNumber == 7) goto SEVEN
  pause 0.2
  if ($AssignNumber == 8) goto EIGHT
  pause 0.2
  if ($AssignNumber == 9) goto NIGHT
  pause 0.2
:ONETOSIX
  do c $DealID 猜數字-"$AssignNumber"  金額: $LabMoney Z
  goto connnn
:SEVEN
  do c $DealID 押"小" 金額:$LabMoney Z
  goto connnn
:EIGHT
  do c $DealID 押"中" 金額:$LabMoney Z
  goto connnn
:NIGHT
  do c $DealID 押"大" 金額:$LabMoney Z
  goto connnn
:connnn
  lock DealMoney
  pause 0.5
  do c 開
  pause 0.2
  do e 骰子
}
}

automacro Emotions {
  console /RuinKy: \*骰子(.*)點\*/
call {
  pause 0.2
  $emotion = $.lastMatch1
  pause 0.5
  if ($AssignNumber < 7) goto OneToSix
  pause 0.2
  #賭大中小,開出點數為 1,2
  if ($emotion < 3) goto Seven
  pause 0.2
  #賭大中小,開出點數為 5,6
  if ($emotion > 4) goto Nine
  pause 0.2
  #賭大中小,開出點數為 3,4
  goto Eight

#------------------[ 開數字 ]---------------------#
:OneToSix
  pause 1
  do c 開出: 數字-$emotion
  pause 0.1
  if ($emotion == $AssignNumber) goto OneToSixWin
  goto loss

#------------------[ 開大中小 ]---------------------#
:Seven
  pause 1
  do c 開出: "骰子$emotion" (小)
  pause 0.1
  if ($AssignNumber == 7) goto SevenToNineWin
  goto loss
:Eight
  pause 1
  do c 開出: "骰子$emotion" (中)
  pause 0.1
  if ($AssignNumber == 8) goto SevenToNineWin
  goto loss
:Nine
  pause 1
  do c 開出: "骰子$emotion" (大)
  pause 0.1
  if ($AssignNumber == 9) goto SevenToNineWin
  goto loss

#-------------------- [1 ~ 6] ----------------------------------------------
:OneToSixWin
  lock DealRe
  pause 0.2
  $WinSum = @eval ($LabMoney * 5.3)
  pause 0.5
  do conf dealAuto 1
  pause 0.3
  do e pea
  pause 0.1
  release WinDeal
  do c 恭喜 $DealID 中獎! 請領取獎金~
  pause 0.2
  do conf dealAuto 0
  do deal no
  pause 0.3
  do deal no
  do deal @player($DealID)
  lock JoinChat
  pause 60
  do conf dealAuto 2
  do deal no
  do deal no
  release all
  goto end

#--------------------------[大 --- 中 --- 小 ]------------------------------
:SevenToNineWin
  lock DealRe
  pause 0.2
  $WinSum = @eval ($LabMoney * 2.8)
  pause 0.5
  do conf dealAuto 1
  pause 0.3
  do e pea
  pause 0.2
  release WinDeal
  do c 恭喜 $DealID 中獎! 請領取獎金~
  pause 0.2
  do conf dealAuto 0
  do deal no
  pause 0.3
  do deal no
  do deal @player($DealID)
  lock JoinChat
  pause 5
  do conf dealAuto 2
  do deal no
  do deal no
  release all
  goto end

#-------------------------------[loss]-------------------------------------
:loss
  pause 0.5
  do e 流冷汗
  pause 0.2
  do c 沒中~ 祝您下次中獎~
  do deal no
  do conf dealAuto 2
  release all
:end
}
}


automacro WinDeal {
console /開始與 (.*) 進行交易/
run-once 1
call {
  $DealIDA = $.lastMatch1
  if ( $DealID == $DealIDA ) goto Deal

  lock DealRe
  do conf dealAuto 1
  pause 0.3
  do c $DealID 讀取不到座標,請移動一格!
  pause 0.1
  release WinDeal
  pause 0.1
  release payagen
  pause 0.1
  release IngRE
  pause 0.1
  do conf dealAuto 0
  do deal no
  pause 0.3
  do deal no
  do deal @player($DealID)
  goto end
:Deal
  pause 0.2
  release DealEnd
  pause 2.5
  do deal add z $WinSum
  pause 0.5
  do deal add z $WinSum
  pause 0.5
  do conf dealAuto 2
:end
}
}


automacro DealEnd {
console /交易完成/
run-once 1
call {
  do conf dealAuto 2
  pause 0.2
  do e omg
  pause 0.2
  do c 恭喜 $DealID 獲得:$WinSum z
  pause 0.2
  do deal no
  release all
  stop
}
}


automacro DealRe {
console /交易已取消/
run-once 1
call {
  do conf dealAuto 2
  pause 0.1
  lock WinDeal
  pause 0.1
  release all
  stop
}
}


automacro IngRE {
console /您必須先取消傳過來的交易訊息|對方正在進行另一個交易中./
run-once 1
call {
  lock DealRe
  do c 交易未結束,勿點交易!
  pause 0.2
  do conf dealAuto 1
  pause 0.3
  release IngRE
  pause 0.1
  release payagen
  pause 0.1
  release WinDeal
  pause 0.1
  do conf dealAuto 0
  do deal no
  pause 0.3
  do deal no
  do deal @player($DealID)
  pause 60
  do conf dealAuto 2
  do deal no
  release all
}
}


automacro payagen {
console /對方距離您太遠以致於無法交易./
run-once 1
call {
  lock DealRe
  do deal no
  do c $DealID 讀取不到座標,請移動一格!
  pause 0.1
  do conf dealAuto 1
  pause 0.3
  release payagen
  pause 0.1
  release WinDeal
  pause 0.1
  do conf dealAuto 0
  do deal no
  pause 0.3
  do deal no
  do deal @player($DealID)
  pause 60
  do conf dealAuto 2
  do deal no
  do deal no
  release all
}
}

automacro DealE {
console /您已經在交易中了/
run-once 1
call {
  lock DealRe
  release DealE
  pause 0.1
  do c $DealID 讀取不到您的座標,請移動一格!
  do conf dealAuto 1
  pause 0.3
  release WinDeal
  pause 0.1
  release payagen
  pause 0.1
  release IngRE
  pause 0.1
  do conf dealAuto 0
  do deal no
  pause 0.3
  do deal no
  do deal @player($DealID)
}
}

最佳答案

[X] 查看完整內容

看腳本你的外掛應該是中文顯示 但是自動巨集DenyDeal的觸發句卻是英文 所以導致$DealID沒辦法被定義 把觸發句改成以下試試 console /(.*) \((.*)\) 向您要求一個交易/
收藏收藏 分享分享 讚 幹 分享分享 FB分享
回覆

使用道具 舉報


[X] 當前離線
UID
1561059
熱心
2263 值
嘉獎
0 次
違規
0 次
在線時間
354 小時
經驗
2176 點
積分
49895
精華
0
最後登錄
2013-4-1
閱讀權限
60
註冊時間
2010-10-8
論壇幣
45088 幣
聯合幣
0 枚
幸運鑽
0 顆
招待卷
0 點
查看詳細資料
Rank: 7Rank: 7Rank: 7
[X] 2011-4-25 17:00:44
看腳本你的外掛應該是中文顯示
但是自動巨集DenyDeal的觸發句卻是英文
所以導致$DealID沒辦法被定義
把觸發句改成以下試試
console /(.*) \((.*)\) 向您要求一個交易/
回覆

使用道具 舉報

z03215963 當前離線
UID
1608973
熱心
24 值
嘉獎
0 次
違規
0 次
在線時間
4 小時
經驗
11 點
積分
11
精華
0
最後登錄
2013-8-8
閱讀權限
10
註冊時間
2010-12-21
論壇幣
13 幣
聯合幣
0 枚
幸運鑽
0 顆
招待卷
0 點
查看詳細資料
Rank: 1
z03215963 2013-8-8 09:00:36
[X] 發表於 2011-4-25 17:00
看腳本你的外掛應該是中文顯示
但是自動巨集DenyDeal的觸發句卻是英文
所以導致$DealID沒辦法被定義

請問可以問一下嗎
automacro WinDeal {
console /開始與 (.*) 進行交易/
run-once 1
call {
  $DealIDA = $.lastMatch1
  if ( $DealID == $DealIDA ) goto Deal
  lock DealRe
  do conf dealAuto 1
  pause 0.3
  do c $DealID 讀取不到座標,請移動一格!
  pause 0.1
  release WinDeal
  pause 0.1
  release payagen
  pause 0.1
  release IngRE
  pause 0.1
  do conf dealAuto 0
  do deal no
  pause 0.3
  do deal no
  do deal @player($DealID)
  goto end
:Deal
  pause 0.2
  release DealEnd
  pause 2.5
  do deal add z $WinSum
  pause 0.5
  do deal add z $WinSum
  pause 0.5
  do conf dealAuto 2
:end
}
}

如果贏了
dealid == dealida
裡面這行 請問為什麼她獨取不到..
會直接說 do c 請移動座標那邊
請問要怎麼改 才能正確交易贏錢人物名子
目前只是過 可以交易 但兩人以上就無法交易正確贏錢人的名子
請問可以幫解答嗎?
回覆

使用道具 舉報

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


手機版 | Archiver | 外掛聯合國

GMT+8, 2024-11-25 07:44 , Processed in 0.060041 second(s), 18 queries , Memcache On.

版權說明:
  本站不會製作、經銷、代理外掛程式。僅免費提供外掛程式下載前之掃毒及掃木馬等安全檢測驗證,協助會員遠離盜號危險程式。本站所有資料均來自網際網路收集整理,說明文字暨下載連結轉載自原程 式開發站。站上出現之公司名稱、遊戲名稱、程式等,商標及著作權,均歸各公司及程式原創所有,本站程式所有權歸外掛聯合國所有。本程式所有權歸外掛聯合國所有.......

回頂部
第二步?
第三步?