星空資源網 - 打造中國最全的傳奇一條龍開區版本資源網。
登 錄注 冊網游資訊傳奇服務端傳奇版本下載網站地圖
當前位置:星空資源網網游資訊傳奇技術

四象之力腳本制作

減小字體 增大字體 作者:佚名  來源:本站整理  發布時間:2019-11-05 16:52:06

[@main]

#OR

NOT equal U8 <$STR(U9)>

NOT equal U8 <$STR(U10)>

NOT equal U8 <$STR(U11)>

#act

MOV U38 0

#if

#act

MOV P40 <$STR(U8)>

MOV P41 <$STR(U9)>

MOV P42 <$STR(U10)>

MOV P43 <$STR(U11)>

INC P40 740

INC P41 740

INC P42 740

INC P43 740

CLEARDELAYGOTO

OPENMERCHANTBIGDLG 0 733 1 4 1 -70 0 0 0 1

#say

 <ImgEx:7:3213:3214:3215:645:32/@exit>\

 <PlayImg:5:750:10:200:58:47:0:0|243#每次升級需要500榮譽點或者2金剛石!^243#優先消耗榮譽點,榮譽點不足時消耗金剛石!^-^243#提升時可以使用保底符抵御失敗不清零等級^-^250#點擊開始升級/@升級青龍aa><PlayImg:5:760:10:200:76:47:0:0|243#每次點擊需要500榮譽點!^243#優先消耗榮譽點,榮譽點不足時消耗金剛石!^-^243#提升時可以使用保底符抵御失敗不清零等級^-^250#點擊開始升級/@升級白虎aa>\

 <PlayImg:5:770:10:200:58:234:0:0|243#每次點擊需要500榮譽點!^243#優先消耗榮譽點,榮譽點不足時消耗金剛石!^-^243#提升時可以使用保底符抵御失敗不清零等級^-^250#點擊開始升級/@升級朱雀aa><PlayImg:5:780:10:200:76:234:0:0|243#每次點擊需要500榮譽點!^243#優先消耗榮譽點,榮譽點不足時消耗金剛石!^-^243#提升時可以使用保底符抵御失敗不清零等級^-^250#點擊開始升級/@升級玄武aa>\

 <Img:<$STR(P40)>:0:122:144/@><Img:<$STR(P41)>:0:272:144/@>\

 <Img:<$STR(P42)>:0:122:331/@><Img:<$STR(P43)>:0:272:331/@>\ \ \ \ \ \ \ \ \ \ \ 

                                      <購買1個保底符|254#需要1個RMB點/@購買a>\ \

                                     <購買10個保底符|254#需要10個RMB點/@購買b>\

[@購買a]

#if

CHECKGAMEGLORY > 0

#act

GAMEGLORY - 1

give 保底符 1

SENDMSG 提示:恭喜您成功購買了一個「保底符」!

#elseact

MessageBox 提示:您的RMB點不足!

break

[@購買b]

#if

CHECKGAMEGLORY > 9

#act

GAMEGLORY - 10

give 保底符 10

SENDMSG 提示:恭喜您成功購買了10個「保底符」!

#elseact

MessageBox 提示:您的RMB點不足!

break

;=====================================================================升級青龍

[@升級青龍aa]

#if

large U8 9

#act

MessageBox 你當前的青龍之力已經升到**了!!

break

#elseact

GetRandomText ..\QuestDiary\系統功能\四象\升級成功率.txt <$STR(S$四象成功率)> <$STR(U8)>

GetRandomText ..\QuestDiary\系統功能\四象\需要榮譽.txt <$STR(S$四象榮譽)> <$STR(U8)>

GetRandomText ..\QuestDiary\系統功能\四象\需要RMB.txt <$STR(S$四象RMB)> <$STR(U8)>

#if

CHECKGAMEDIAMOND < <$STR(S$四象RMB)>

CHECKGameGird < <$STR(S$四象榮譽)>

#act

MessageBox 升級四象之力需要RMB【<$STR(S$四象RMB)>點】或者【<$STR(S$四象榮譽)>榮譽點】\ \條件不足,無法升級!!

break

#elseact

MOVR N$成功基數 0 1001

MOV N$JJQQ 0

#if

NOT CHECKGameGird < <$STR(S$四象榮譽)>

#act

GameGird - <$STR(S$四象榮譽)>

MOV N$JJQQ 1

#if

EQUAL N$JJQQ 0

NOT CHECKGAMEDIAMOND < <$STR(S$四象RMB)>

#act

GAMEDIAMOND - <$STR(S$四象RMB)>

#if

checkitem 保底符 1

small N$成功基數 <$STR(S$四象成功率)>

#act

take 保底符 1

INC U8 1

SENDMSG 6 恭喜四象『青龍之力』升級成功,當前『青龍之力』等級:<$STR(U8)>

MOV S$升級成功率 

MOV S$需要榮譽 

MOV S$需要RMB 

goto @main1

break

#if

small N$成功基數 <$STR(S$四象成功率)>

#act

INC U8 1

SENDMSG 6 恭喜四象『青龍之力』升級成功,當前『青龍之力』等級:<$STR(U8)>

MOV S$升級成功率 

MOV S$需要榮譽 

MOV S$需要RMB 

goto @main1

#elseact

goto @檢測青龍保底

[@檢測青龍保底]

#if

checkitem 保底符 1

#act

take 保底符 1

SENDMSG 5 運氣不好,四象『青龍之力』升級失敗,當前『保底符抵御失敗不降等級』!

MOV S$升級成功率 

MOV S$需要榮譽 

MOV S$需要RMB 

goto @main1

#elseact

MOV U8 0

SENDMSG 5 運氣不好,四象『青龍之力』升級失敗,當前『青龍之力』等級重置為:0

MOV S$升級成功率 

MOV S$需要榮譽 

MOV S$需要RMB 

goto @main1

break

;=====================================================================升級白虎

[@升級白虎aa]

#if

large U9 9

#act

MessageBox 你當前的白虎之力已經升到**了!!

break

#elseact

GetRandomText ..\QuestDiary\系統功能\四象\升級成功率.txt <$STR(S$四象成功率)> <$STR(U9)>

GetRandomText ..\QuestDiary\系統功能\四象\需要榮譽.txt <$STR(S$四象榮譽)> <$STR(U9)>

GetRandomText ..\QuestDiary\系統功能\四象\需要RMB.txt <$STR(S$四象RMB)> <$STR(U9)>

#if

CHECKGAMEDIAMOND < <$STR(S$四象RMB)>

CHECKGameGird < <$STR(S$四象榮譽)>

#act

MessageBox 升級四象之力需要RMB【<$STR(S$四象RMB)>點】或者【<$STR(S$四象榮譽)>榮譽點】\ \條件不足,無法升級!!

break

#elseact

MOVR N$成功基數 0 1001

MOV N$JJQQ 0

#if

NOT CHECKGameGird < <$STR(S$四象榮譽)>

#act

GameGird - <$STR(S$四象榮譽)>

MOV N$JJQQ 1

#if

EQUAL N$JJQQ 0

NOT CHECKGAMEDIAMOND < <$STR(S$四象RMB)>

#act

GAMEDIAMOND - <$STR(S$四象RMB)>

#if

checkitem 保底符 1

small N$成功基數 <$STR(S$四象成功率)>

#act

take 保底符 1

INC U9 1

SENDMSG 6 恭喜四象『白虎之力』升級成功,當前『白虎之力』等級:<$STR(U9)>

MOV S$升級成功率 

MOV S$需要榮譽 

MOV S$需要RMB 

goto @main1

break

#if

small N$成功基數 <$STR(S$四象成功率)>

#act

GameGird - <$STR(S$四象榮譽)>

INC U9 1

SENDMSG 6 恭喜四象『白虎之力』升級成功,當前『白虎之力』等級:<$STR(U9)>

MOV S$升級成功率 

MOV S$需要榮譽 

MOV S$需要RMB 

goto @main1

#elseact

goto @檢測白虎保底

[@檢測白虎保底]

#if

checkitem 保底符 1

#act

take 保底符 1

SENDMSG 5 運氣不好,四象『白虎之力』升級失敗,當前『保底符抵御失敗不降等級』!

MOV S$升級成功率 

MOV S$需要榮譽 

MOV S$需要RMB 

goto @main1

#elseact

MOV U9 0

SENDMSG 5 運氣不好,四象『白虎之力』升級失敗,當前『白虎之力』等級重置為:0

MOV S$升級成功率 

MOV S$需要榮譽 

MOV S$需要RMB 

goto @main1

break

;=====================================================================升級朱雀

[@升級朱雀aa]

#if

large U10 9

#act

MessageBox 你當前的朱雀之力已經升到**了!!

break

#elseact

GetRandomText ..\QuestDiary\系統功能\四象\升級成功率.txt <$STR(S$四象成功率)> <$STR(U10)>

GetRandomText ..\QuestDiary\系統功能\四象\需要榮譽.txt <$STR(S$四象榮譽)> <$STR(U10)>

GetRandomText ..\QuestDiary\系統功能\四象\需要RMB.txt <$STR(S$四象RMB)> <$STR(U10)>

#if

CHECKGAMEDIAMOND < <$STR(S$四象RMB)>

CHECKGameGird < <$STR(S$四象榮譽)>

#act

MessageBox 升級四象之力需要RMB【<$STR(S$四象RMB)>點】或者【<$STR(S$四象榮譽)>榮譽點】\ \條件不足,無法升級!!

break

#elseact

MOVR N$成功基數 0 1001

MOV N$JJQQ 0

#if

NOT CHECKGameGird < <$STR(S$四象榮譽)>

#act

GameGird - <$STR(S$四象榮譽)>

MOV N$JJQQ 1

#if

EQUAL N$JJQQ 0

NOT CHECKGAMEDIAMOND < <$STR(S$四象RMB)>

#act

GAMEDIAMOND - <$STR(S$四象RMB)>

#if

checkitem 保底符 1

small N$成功基數 <$STR(S$四象成功率)>

#act

take 保底符 1

INC U10 1

SENDMSG 6 恭喜四象『朱雀之力』升級成功,當前『朱雀之力』等級:<$STR(U10)>

MOV S$升級成功率 

MOV S$需要榮譽 

MOV S$需要RMB 

goto @main1

break

#if

small N$成功基數 <$STR(S$四象成功率)>

#act

GameGird - <$STR(S$四象榮譽)>

INC U10 1

SENDMSG 6 恭喜四象『朱雀之力』升級成功,當前『朱雀之力』等級:<$STR(U10)>

MOV S$升級成功率 

MOV S$需要榮譽 

MOV S$需要RMB 

goto @main1

#elseact

goto @檢測朱雀保底

[@檢測朱雀保底]

#if

checkitem 保底符 1

#act

take 保底符 1

SENDMSG 5 運氣不好,四象『朱雀之力』升級失敗,當前『保底符抵御失敗不降等級』

MOV S$升級成功率 

MOV S$需要榮譽 

MOV S$需要RMB 

goto @main1

#elseact

MOV U10 0

SENDMSG 5 運氣不好,四象『朱雀之力』升級失敗,當前『朱雀之力』等級重置為:0

MOV S$升級成功率 

MOV S$需要榮譽 

MOV S$需要RMB 

goto @main1

break

;=====================================================================升級玄武

[@升級玄武aa]

#if

large U11 9

#act

MessageBox 你當前的玄武之力已經升到**了!!

break

#elseact

GetRandomText ..\QuestDiary\系統功能\四象\升級成功率.txt <$STR(S$四象成功率)> <$STR(U11)>

GetRandomText ..\QuestDiary\系統功能\四象\需要榮譽.txt <$STR(S$四象榮譽)> <$STR(U11)>

GetRandomText ..\QuestDiary\系統功能\四象\需要RMB.txt <$STR(S$四象RMB)> <$STR(U11)>

#if

CHECKGAMEDIAMOND < <$STR(S$四象RMB)>

CHECKGameGird < <$STR(S$四象榮譽)>

#act

MessageBox 升級四象之力需要RMB【<$STR(S$四象RMB)>點】或者【<$STR(S$四象榮譽)>榮譽點】\ \條件不足,無法升級!!

break

#elseact

MOVR N$成功基數 0 1001

MOV N$JJQQ 0

#if

NOT CHECKGameGird < <$STR(S$四象榮譽)>

#act

GameGird - <$STR(S$四象榮譽)>

MOV N$JJQQ 1

#if

EQUAL N$JJQQ 0

NOT CHECKGAMEDIAMOND < <$STR(S$四象RMB)>

#act

GAMEDIAMOND - <$STR(S$四象RMB)>

#if

checkitem 保底符 1

small N$成功基數 <$STR(S$四象成功率)>

#act

take 保底符 1

GameGird - <$STR(S$四象榮譽)>

INC U11 1

SENDMSG 6 恭喜四象『玄武之力』升級成功,當前『玄武之力』等級:<$STR(U11)>

MOV S$升級成功率 

MOV S$需要榮譽 

MOV S$需要RMB 

goto @main1

break

#if

small N$成功基數 <$STR(S$四象成功率)>

#act

INC U11 1

SENDMSG 6 恭喜四象『玄武之力』升級成功,當前『玄武之力』等級:<$STR(U11)>

MOV S$升級成功率 

MOV S$需要榮譽 

MOV S$需要RMB 

goto @main1

#elseact

goto @檢測玄武保底

[@檢測玄武保底]

#if

checkitem 保底符 1

#act

take 保底符 1

SENDMSG 5 運氣不好,四象『玄武之力』升級失敗,當前『保底符抵御失敗不降等級』!

MOV S$升級成功率 

MOV S$需要榮譽 

MOV S$需要RMB 

goto @main1

#elseact

MOV U11 0

SENDMSG 5 運氣不好,四象『玄武之力』升級失敗,當前『玄武之力』等級重置為:0

MOV S$升級成功率 

MOV S$需要榮譽 

MOV S$需要RMB 

goto @main1

break

[@main1]

#if

equal U8 1

equal U9 1

equal U10 1

equal U11 1

#act

MOV U38 1

SENDMSG 0 恭喜玩家<$USERNAME>成功將『四象之力』全部升級為一重,人物額外獲得0.1倍攻擊!

#if

equal U8 2

equal U9 2

equal U10 2

equal U11 2

#act

MOV U38 2

SENDMSG 0 恭喜玩家<$USERNAME>成功將『四象之力』全部升級為二重,人物額外獲得0.2倍攻擊!

#if

equal U8 3

equal U9 3

equal U10 3

equal U11 3

#act

MOV U38 3

SENDMSG 0 恭喜玩家<$USERNAME>成功將『四象之力』全部升級為三重,人物額外獲得0.3倍攻擊!

#if

equal U8 4

equal U9 4

equal U10 4

equal U11 4

#act

MOV U38 4

SENDMSG 0 恭喜玩家<$USERNAME>成功將『四象之力』全部升級為四重,人物額外獲得0.4倍攻擊!

#if

equal U8 5

equal U9 5

equal U10 5

equal U11 5

#act

MOV U38 5

SENDMSG 0 恭喜玩家<$USERNAME>成功將『四象之力』全部升級為五重,人物額外獲得0.5倍攻擊!

#if

equal U8 6

equal U9 6

equal U10 6

equal U11 6

#act

MOV U38 6

SENDMSG 0 恭喜玩家<$USERNAME>成功將『四象之力』全部升級為六重,人物額外獲得0.6倍攻擊!

#if

equal U8 7

equal U9 7

equal U10 7

equal U11 7

#act

MOV U38 7

SENDMSG 0 恭喜玩家<$USERNAME>成功將『四象之力』全部升級為七重,人物額外獲得0.7倍攻擊!

#if

equal U8 8

equal U9 8

equal U10 8

equal U11 8

#act

MOV U38 8

SENDMSG 0 恭喜玩家<$USERNAME>成功將『四象之力』全部升級為八重,人物額外獲得0.8倍攻擊!

#if

equal U8 9

equal U9 9

equal U10 9

equal U11 9

#act

MOV U38 9

SENDMSG 0 恭喜玩家<$USERNAME>成功將『四象之力』全部升級為九重,人物額外獲得0.9倍攻擊!

#if

equal U8 10

equal U9 10

equal U10 10

equal U11 10

#act

MOV U38 10

SENDMSG 0 恭喜玩家<$USERNAME>成功將『四象之力』全部升級為十重,人物額外獲得1.0倍攻擊!

#if

#act

#CALL [\登陸讀取\攻擊力讀取.txt] @攻擊力讀取

GOTO @MAIN

 

Tags:

作者:佚名

文章評論評論內容只代表網友觀點,與本站立場無關!

   評論摘要(共 0 條,得分 0 分,平均 0 分) 查看完整評論

相關文章

星空資源網第一時間提供最新的傳奇服務端,熱門網頁傳奇服務端免費下載。
頁面執行時間:937.50000 毫秒
快乐12任选5技巧