- 打卡等级：传奇老炮
- 打卡总天数：572
- 打卡总奖励：7000
注册会员
- 元宝
- 1 个
- 金币
- 2156 枚
|
88金币
铭文洗练终极提示没终极提示????哪位大神帮忙看看是怎么回事???谢谢
[@武器铭文]
{
#if
#ACT
MOV <$STR(S$铭文1)> <img:571:16
MOV <$STR(S$铭文2)> <img:571:16
MOV <$STR(S$铭文3)> <img:571:16
set [153] 1
set [4] 0
set [5] 0
ClearVar s100 20
GOTO @武器准备开始
[@武器准备开始]
#say
\
<>[铭文属性]<TEXT:附上铭文的武器会使技能更强大，从而极大提升战斗力:60:5:{FCOLOR=254}>\
<text:每次洗炼需要:240:17:{FCOLOR=243}><text:[13W金币]:245:17:{FCOLOR=103}> <text:+:248:17:{fcolor=243}> <text:[本职业铭文石*1]:251:17:{FCOLOR=103}>
<text:双铭文武器洗炼过程中可以选择:1:33:{FCOLOR=243}><text:锁定:5:33:{FCOLOR=250}><text:其中一条:10:33:{FCOLOR=243}>\
<> ╔═════════════╗\
<> │ │\
<> │ │<$STR(S$铭文1)>:-160:-14> \
<> │ │\
<> │─────────────│<TEXT:开放武器三铭文|点击查看开放规则:13:0:/@武器开放三铭文> \
<> │ │\
<> │ │<$STR(S$铭文2)>:-160:-14>\
<> │ │\
<> │─────────────│\
<> │ │\
<> │ │<$STR(S$铭文3)>:-160:-14>\
<> │ │<TEXT:武器铭文传承|点击查看传承规则:13:-70:/@武器铭文传承><TEXT:清洗铭文|点击查看清洗规则:73:-70:/@武器清洗铭文> \
<> ╚═════════════╝\
<TEXT:铭文洗炼|251#单铭文武器有几率洗出双铭文^251#三铭文武器只能洗炼第三铭文:400:-15/@武器洗炼>\
<ITEMBOX:0:26:1549:260:230:1:1:5,6:251#放入洗炼铭文的武器><ITEMBOX:1:26:1549:340:230:1:1:*:251#放入本职业铭文石>
[@武器准备开始1]
#IF
check [4] 1
check [5] 0
#SAY
\
<>[铭文属性]<TEXT:附上铭文的武器会使技能更强大，从而极大提升战斗力:60:5:{FCOLOR=254}>\
<text:每次洗炼需要:240:17:{FCOLOR=243}><text:[13W金币]:245:17:{FCOLOR=103}> <text:+:248:17:{fcolor=243}> <text:[本职业铭文石*1]:251:17:{FCOLOR=103}>
<text:双铭文武器洗炼过程中可以选择:1:33:{FCOLOR=243}><text:锁定:5:33:{FCOLOR=250}><text:其中一条:10:33:{FCOLOR=243}>\
<> ╔═════════════╗\
<> │ │<$STR(S$铭文1)>:-160:-2> \
<> │ │\
<> │ │<text:锁●|249#锁定后继续洗炼^249#不改变右边的铭文^249#每次额外收费7W金币:-220:-13/@锁1>\
<> │─────────────│<TEXT:开放武器三铭文|点击查看开放规则:13:0:/@武器开放三铭文> \
<> │ │<$STR(S$铭文2)>:-160:-2>\
<> │ │<text:锁○|249#锁定后继续洗炼^249#不改变右边的铭文^249#每次额外收费7W金币:-220:-13/@锁2> \
<> │ │\
<> │─────────────│\
<> │ │<$STR(S$铭文3)>:-160:-2>\
<> │ │\
<> │ │<TEXT:武器铭文传承|点击查看传承规则:13:-70:/@武器铭文传承><TEXT:清洗铭文|点击查看清洗规则:73:-70:/@武器清洗铭文> \
<> ╚═════════════╝\
<TEXT:铭文洗炼|251#单铭文武器有几率洗出双铭文^251#三铭文武器只能洗炼第三铭文:400:-15/@武器洗炼>\
<ITEMBOX:0:26:1549:260:230:1:1:5,6:251#放入洗炼铭文的武器><ITEMBOX:1:26:1549:340:230:1:1:*:251#放入本职业铭文石>
#IF
check [4] 0
check [5] 1
#SAY
\
<>[铭文属性]<TEXT:附上铭文的武器会使技能更强大，从而极大提升战斗力:60:5:{FCOLOR=254}>\
<text:每次洗炼需要:240:17:{FCOLOR=243}><text:[13W金币]:245:17:{FCOLOR=103}> <text:+:248:17:{fcolor=243}> <text:[本职业铭文石*1]:251:17:{FCOLOR=103}>
<text:双铭文武器洗炼过程中可以选择:1:33:{FCOLOR=243}><text:锁定:5:33:{FCOLOR=250}><text:其中一条:10:33:{FCOLOR=243}>\
<> ╔═════════════╗\
<> │ │<$STR(S$铭文1)>:-160:-2> \
<> │ │\
<> │ │<text:锁○|249#锁定后继续洗炼^249#不改变右边的铭文^249#每次额外收费7W金币:-220:-13/@锁1>\
<> │─────────────│<TEXT:开放武器三铭文|点击查看开放规则:13:0:/@武器开放三铭文> \
<> │ │<$STR(S$铭文2)>:-160:-2>\
<> │ │<text:锁●|249#锁定后继续洗炼^249#不改变右边的铭文^249#每次额外收费7W金币:-220:-13/@锁2> \
<> │ │\
<> │─────────────│\
<> │ │<$STR(S$铭文3)>:-160:-2>\
<> │ │\
<> │ │<TEXT:武器铭文传承|点击查看传承规则:13:-70:/@武器铭文传承><TEXT:清洗铭文|点击查看清洗规则:73:-70:/@武器清洗铭文> \
<> ╚═════════════╝\
<TEXT:铭文洗炼|251#单铭文武器有几率洗出双铭文^251#三铭文武器只能洗炼第三铭文:400:-15/@武器洗炼>\
<ITEMBOX:0:26:1549:260:230:1:1:5,6:251#放入洗炼铭文的武器><ITEMBOX:1:26:1549:340:230:1:1:*:251#放入本职业铭文石>
#IF
check [4] 0
check [5] 0
#SAY
\
<>[铭文属性]<TEXT:附上铭文的武器会使技能更强大，从而极大提升战斗力:60:5:{FCOLOR=254}>\
<text:每次洗炼需要:240:17:{FCOLOR=243}><text:[13W金币]:245:17:{FCOLOR=103}> <text:+:248:17:{fcolor=243}> <text:[本职业铭文石*1]:251:17:{FCOLOR=103}>
<text:双铭文武器洗炼过程中可以选择:1:33:{FCOLOR=243}><text:锁定:5:33:{FCOLOR=250}><text:其中一条:10:33:{FCOLOR=243}>\
<> ╔═════════════╗\
<> │ │<$STR(S$铭文1)>:-160:-2> \
<> │ │\
<> │ │<text:锁○|249#锁定后继续洗炼^249#不改变右边的铭文^249#每次额外收费7W金币:-220:-13/@锁1>\
<> │─────────────│<TEXT:开放武器三铭文|点击查看开放规则:13:0:/@武器开放三铭文> \
<> │ │<$STR(S$铭文2)>:-160:-2>\
<> │ │<text:锁○|249#锁定后继续洗炼^249#不改变右边的铭文^249#每次额外收费7W金币:-220:-13/@锁2> \
<> │ │\
<> │─────────────│\
<> │ │<$STR(S$铭文3)>:-160:-2>\
<> │ │\
<> │ │<TEXT:武器铭文传承|点击查看传承规则:13:-70:/@武器铭文传承><TEXT:清洗铭文|点击查看清洗规则:73:-70:/@武器清洗铭文> \
<> ╚═════════════╝\
<TEXT:铭文洗炼|251#单铭文武器有几率洗出双铭文^251#三铭文武器只能洗炼第三铭文:400:-15/@武器洗炼>\
<ITEMBOX:0:26:1549:260:230:1:1:5,6:251#放入洗炼铭文的武器><ITEMBOX:1:26:1549:340:230:1:1:*:251#放入本职业铭文石>
[@武器准备开始2]
#say
\
<>[铭文属性]<TEXT:附上铭文的武器会使技能更强大，从而极大提升战斗力:60:5:{FCOLOR=254}>\
<text:每次洗炼需要:240:17:{FCOLOR=243}><text:[13W金币]:245:17:{FCOLOR=103}> <text:+:248:17:{fcolor=243}> <text:[本职业铭文石*1]:251:17:{FCOLOR=103}>
<text:双铭文武器洗炼过程中可以选择:1:33:{FCOLOR=243}><text:锁定:5:33:{FCOLOR=250}><text:其中一条:10:33:{FCOLOR=243}>\
<> ╔═════════════╗\
<> │ │<$STR(S$铭文1)>:-160:-2> \
<> │ │\
<> │ │<text:锁●|249#锁定后继续洗炼^249#不改变右边的铭文^249#每次额外收费7W金币:-220:-13/@锁1>\
<> │─────────────│<TEXT:开放武器三铭文|点击查看开放规则:13:0:/@武器开放三铭文> \
<> │ │<$STR(S$铭文2)>:-160:-2>\
<> │ │<text:锁●|249#锁定后继续洗炼^249#不改变右边的铭文^249#每次额外收费7W金币:-220:0/@锁2>\
<> │ │\
<> │─────────────│\
<> │ │<$STR(S$铭文3)>:-160:-2>\
<> │ │\
<> │ │<TEXT:武器铭文传承|点击查看传承规则:13:-70:/@武器铭文传承><TEXT:清洗铭文|点击查看清洗规则:73:-70:/@武器清洗铭文> \
<> ╚═════════════╝\
<TEXT:铭文洗炼|251#单铭文武器有几率洗出双铭文^251#三铭文武器只能洗炼第三铭文:400:-15/@武器洗炼>\
<ITEMBOX:0:26:1549:260:230:1:1:5,6:251#放入洗炼铭文的武器><ITEMBOX:1:26:1549:340:230:1:1:*:251#放入本职业铭文石>
[@ItemIntoBox0]
#IF
#ACT
GetCustomItemText boxitem0 S$武器上的铭文
; sendmsg 7 <$STR(S$武器上的铭文)>
#IF
NOT EQUAL S$武器上的铭文
#ACT
TextSplit \ <$STR(S$武器上的铭文)> s100
; SENDMSG 7 S100<$STR(S100)>-S101<$STR(S101)>-S102<$STR(S102)>-S103<$STR(S103)>
; SENDMSG 7 <$STR(S$铭文1)>-<$STR(S$铭文2)>-<$STR(S$铭文3)>
TextSplit : <$STR(S101)> S110
; SENDMSG 7 <$STR(S110)>-<$STR(S111)>-<$STR(S112)>-<$STR(S113)>-<$STR(S114)>
MOV S$铭文1 <$STR(S110)>:<$STR(S111)>:<$STR(S112)>
#IF
NOT EQUAL S102
#ACT
TextSplit : <$STR(S102)> S110
MOV S$铭文2 <$STR(S110)>:<$STR(S111)>:<$STR(S112)>
#IF
NOT EQUAL S103
#ACT
TextSplit : <$STR(S103)> S110
MOV S$铭文3 <$STR(S110)>:<$STR(S111)>:<$STR(S112)>
#IF
NOT EQUAL S103
#ACT
GOTO @武器准备开始2
BREAK
#IF
NOT EQUAL S102
#ACT
GOTO @武器准备开始1
BREAK
#IF
#ACT
GOTO @武器准备开始
[@ItemOutBox0]
#if
#ACT
set [4] 0
set [5] 0
MOV S$铭文1 <img:571:16
MOV S$铭文2 <img:571:16
MOV S$铭文3 <img:571:16
ClearVar s100 20
; goto @武器准备开始
[@ItemIntoBox7]
#IF
#ACT
GetCustomItemText boxitem7 S$武器上的铭文
; sendmsg 7 <$STR(S$武器上的铭文)>
#IF
NOT EQUAL S$武器上的铭文
#ACT
TextSplit \ <$STR(S$武器上的铭文)> s100
; SENDMSG 7 S100<$STR(S100)>-S101<$STR(S101)>-S102<$STR(S102)>-S103<$STR(S103)>
; SENDMSG 7 <$STR(S$铭文1)>-<$STR(S$铭文2)>-<$STR(S$铭文3)>
TextSplit : <$STR(S101)> S110
; SENDMSG 7 <$STR(S110)>-<$STR(S111)>-<$STR(S112)>-<$STR(S113)>-<$STR(S114)>
MOV S$铭文1 <$STR(S110)>:<$STR(S111)>:<$STR(S112)>
#IF
NOT EQUAL S102
#ACT
TextSplit : <$STR(S102)> S110
MOV S$铭文2 <$STR(S110)>:<$STR(S111)>:<$STR(S112)>
#IF
NOT EQUAL S103
#ACT
TextSplit : <$STR(S103)> S110
MOV S$铭文3 <$STR(S110)>:<$STR(S111)>:<$STR(S112)>
[@ItemOutBox7]
#if
#ACT
set [4] 0
set [5] 0
MOV S$铭文1 <img:571:16
MOV S$铭文2 <img:571:16
MOV S$铭文3 <img:571:16
ClearVar s100 20
[@武器清洗铭文]
#act
returnboxitem 0
returnboxitem 1
closebigdialogbox
#SAY
清理武器铭文会将武器上所有铭文清空，即可重新洗炼铭文。\ \ \
<> <清理武器铭文/@武器清洗铭文1> （需要本职业<铭文石1个>）\ \ \ \
<> <返 回/@武器铭文>
<ITEMBOX:7:26:1549:35:68:1:1:5,6:255#放入武器>
[@武器清洗铭文1]
#if
NOT CheckBoxItemCount 7
#act
MessageBox 请放入清洗的武器
break
#IF
NOT CHECKITEM 圣战铭文石 1
checkjob warrior
#ACT
MessageBox 你的铭文石不足
break
#IF
NOT CHECKITEM 法神铭文石 1
checkjob wizard
#ACT
MessageBox 你的铭文石不足
break
#IF
NOT CHECKITEM 天尊铭文石 1
checkjob taoist
#ACT
MessageBox 你的铭文石不足
break
#IF
checkjob warrior
#ACT
TAKE 圣战铭文石 1
SetUpgradeItem 7
SetCustomItemText boxitem7
updateitem boxitem7
MessageBox 已清洗武器铭文！
break
#IF
checkjob wizard
#ACT
TAKE 法神铭文石 1
SetUpgradeItem 7
SetCustomItemText boxitem7
updateitem boxitem7
MessageBox 已清洗武器铭文！
break
#IF
checkjob taoist
#ACT
TAKE 天尊铭文石 1
SetUpgradeItem 7
SetCustomItemText boxitem7
updateitem boxitem7
MessageBox 已清洗武器铭文！
break
[@武器铭文传承]
#act
returnboxitem 0
returnboxitem 1
closebigdialogbox
#SAY
左边放入原武器(转出铭文)，右边放入需要传承的武器(转入铭文)\ \
【单铭文传承<50元宝>】【双铭文传承<100元宝>】【三铭文传承<200元宝>】\ \ \
<> → <铭文传承/@武器铭文传承1> \ \ \ \
<> <返 回/@武器铭文>
<ITEMBOX:7:26:1549:35:97:1:1:5,6:255#放入原武器^249#成功传承后铭文消失><ITEMBOX:1:26:1549:135:97:1:1:5,6:255#放入需要传承的武器^250#成功传承后获得左侧武器
的所有铭文>
[@武器铭文传承1]
#if
NOT CheckBoxItemCount 7
#act
MessageBox 请放入原武器
break
#if
NOT CheckBoxItemCount 1
#act
MessageBox 请放入需要传承的武器
break
#IF
NOT equal S103
#ACT
MOV N$传承花费元宝 200
; sendmsg 7 <$str(N$传承花费元宝)>
#IF
equal S103
not equal s102
#ACT
MOV N$传承花费元宝 100
; sendmsg 7 <$str(N$传承花费元宝)>
#if
equal s103
equal s102
not equal s101
#act
MOV N$传承花费元宝 50
; sendmsg 7 <$str(N$传承花费元宝)>
#IF
EQUAL S103
EQUAL S102
EQUAL S101
#ACT
MESSAGEBOX 这件装备上面没有铭文。
break
#IF
EQUAL N$传承花费元宝 200
not CheckTextList ..\QuestDiary\铭文相关\三铭文武器.txt <$BOXITEM[1].NAME>
#ACT
MESSAGEBOX 你的装备没有办法继承三铭文
break
#IF
EQUAL N$传承花费元宝 100
NOT CheckTextList ..\QuestDiary\铭文相关\高级武器.txt <$BOXITEM[1].NAME>
#ACT
MESSAGEBOX 你的装备没有办法继承双铭文
break
#IF
CHECKGAMEGOLD < <$str(N$传承花费元宝)>
#ACT
MESSAGEBOX 你的元宝不足
BREAK
#ELSEACT
SetUpgradeItem 7
SetUpgradeItem 1
GAMEGOLD - <$str(N$传承花费元宝)>
SetCustomItemText boxitem7
;SetNewItemValue boxitem2 0 = 0
SetCustomItemText boxitem1 <$STR(S$武器上的铭文)>
SetCustomItemTextCOLOR boxitem1 255
;SetNewItemValue boxitem3 0 = 1
updateitem boxitem7
updateitem boxitem1
MessageBox 已成功传承！
break
[@武器开放三铭文]
#act
returnboxitem 0
returnboxitem 1
closebigdialogbox
#SAY
已拥有双铭文的武器才可以开放第三个铭文。\ \
<注意:/fcolor=254>\
开放第三个铭文后，武器的前2个铭文将被锁定，<只能洗炼第三铭文>。\ \ \
<> <开放第三铭文/@武器开放三铭文1> (需要本职业<铭文石10个> + <40元宝>)\ \ \ \
<> <返 回/@武器铭文>
<ITEMBOX:7:26:1549:35:115:1:1:5,16:255#放入双铭文武器>
[@武器开放三铭文1]
#if
NOT CheckBoxItemCount 7
#act
MessageBox 请放入需要洗炼的武器
break
#IF
CHECKGAMEGOLD < 40
#ACT
MessageBox 你的元宝不足
break
#IF
NOT CHECKITEM 圣战铭文石 10
checkjob warrior
#ACT
MessageBox 你的铭文石不足
break
#IF
NOT CHECKITEM 法神铭文石 10
checkjob wizard
#ACT
MessageBox 你的铭文石不足
break
#IF
NOT CHECKITEM 天尊铭文石 10
checkjob taoist
#ACT
MessageBox 你的铭文石不足
break
#IF
not CheckTextList ..\QuestDiary\铭文相关\三铭文武器.txt <$BOXITEM[7].NAME>
#ACT
ReturnBoxItem 0
ReturnBoxItem 1
MessageBox 这个武器无法开放三铭文
break
#IF
NOT EQUAL S101
NOT EQUAL S102
NOT EQUAL S103
#ACT
MessageBox 你已经开放了三铭文，可以直接洗炼
break
#OR
EQUAL S101
EQUAL S102
#act
MessageBox 你要先有双铭文才能开启
break
#if
CHECKJOB taoist
#act
take 天尊铭文石 10
gamegold - 40
GetRandomText ..\QuestDiary\铭文相关\道士铭文石.txt S$铭文3
INC S$铭文3 :54
SetUpgradeItem 0
SetCustomItemText boxitem7 [铭文属性]\<$STR(S$铭文1)>:0:0>\<$STR(S$铭文2)>:0:0>\<$STR(S$铭文3)>:0:0>
SetCustomItemTextCOLOR boxitem7 255
UpdateItem boxitem7
GOTO @ItemIntoBox0
GOTO @终极提示
MessageBox 恭喜你，武器已经成功解封了第三铭文！
BREAK
#if
CHECKJOB wizard
#act
take 法神铭文石 10
gamegold - 40
GetRandomText ..\QuestDiary\铭文相关\法神铭文石.txt S$铭文3
INC S$铭文3 :54
SetUpgradeItem 0
SetCustomItemText boxitem7 [铭文属性]\<$STR(S$铭文1)>:0:0>\<$STR(S$铭文2)>:0:0>\<$STR(S$铭文3)>:0:0>
SetCustomItemTextCOLOR boxitem7 255
UpdateItem boxitem7
GOTO @ItemIntoBox0
GOTO @终极提示
MessageBox 恭喜你，武器已经成功解封了第三铭文！
BREAK
#if
CHECKJOB warrior
#act
take 圣战铭文石 10
gamegold - 40
GetRandomText ..\QuestDiary\铭文相关\战士铭文石.txt S$铭文3
INC S$铭文3 :54
SetUpgradeItem 0
SetCustomItemText boxitem7 [铭文属性]\<$STR(S$铭文1)>:0:0>\<$STR(S$铭文2)>:0:0>\<$STR(S$铭文3)>:0:0>
SetCustomItemTextCOLOR boxitem7 255
UpdateItem boxitem7
GOTO @ItemIntoBox0
GOTO @终极提示
MessageBox 恭喜你，武器已经成功解封了第三铭文！
BREAK
[@锁1]
#if
CHECKGOLD 70000
#ACT
set [4] 1
set [5] 0
goto @ItemIntoBox0
#ELSEACT
MessageBox 锁定失败，金币不足7W！
[@锁2]
#if
CHECKGOLD 70000
#ACT
set [4] 0
set [5] 1
goto @ItemIntoBox0
#ELSEACT
MessageBox 锁定失败，金币不足7W！
[@武器洗炼]
#if
NOT CheckBoxItemCount 0
#act
MessageBox 请放入需要洗炼的武器
break
#IF
CHECK [4] 1
CHECK [5] 0
NOT Checkgold 200000
#act
ReturnBoxItem 0
ReturnBoxItem 1
MessageBox 你身上金币不足20W
break
#IF
CHECK [4] 0
CHECK [5] 1
NOT Checkgold 200000
#act
ReturnBoxItem 0
ReturnBoxItem 1
MessageBox 你身上金币不足20W
break
#if
NOT Checkgold 130000
#act
ReturnBoxItem 0
ReturnBoxItem 1
MessageBox 你身上金币不足13W
break
#if
NOT CheckBoxItemCount 1 1
#act
MessageBox 请放入本职业铭文石！
break
#if
CHECKJOB taoist
NOT EQUAL <$BOXITEM[1].NAME> 天尊铭文石
#act
ReturnBoxItem 1
MessageBox 请放入[天尊铭文石]
break
#if
CHECKJOB wizard
NOT EQUAL <$BOXITEM[1].NAME> 法神铭文石
#act
ReturnBoxItem 1
MessageBox 请放入[法神铭文石]
break
#if
CHECKJOB warrior
NOT EQUAL <$BOXITEM[1].NAME> 圣战铭文石
#act
ReturnBoxItem 1
MessageBox 请放入[圣战铭文石]
break
#IF
NOT EQUAL S$铭文3 <img:571:16
#ACT
DelayCall 200 @武器三铭文
BREAK
#if
check [4] 1
check [5] 0
#act
DelayCall 200 @双铭文洗下留上
; sendmsg 7 双铭文洗下留上
break
#if
check [4] 0
check [5] 1
#act
DelayCall 200 @双铭文洗上留下
; sendmsg 7 双铭文洗上留下
break
#IF
NOT EQUAL <$STR(S$铭文1)> <img:571:16
NOT EQUAL <$STR(S$铭文2)> <img:571:16
#ACT
DelayCall 200 @武器双铭文
; sendmsg 7 S$铭文1,S$铭文2
break
#IF
CheckTextList ..\QuestDiary\铭文相关\高级武器.txt <$BOXITEM[0].NAME>
#ACT
DelayCall 200 @武器双铭文
; sendmsg 7 骨火
break
#if
CheckContainsText <$STR(S$武器上的铭文)> 新手铭文
#act
messagebox 新手铭文洗炼会失去双铭文或三铭文，你确定要洗炼吗？ @洗炼新手铭文 @取消
break
#IF
CheckTextList ..\QuestDiary\铭文相关\武器类型.txt <$BOXITEM[0].NAME>
#act
; sendmsg 7 武器单铭文
DelayCall 200 @武器单铭文
break
[@洗炼新手铭文]
#IF
#act
; sendmsg 7 武器单铭文
DelayCall 200 @武器单铭文
break
[@双铭文洗下留上]
#if
CHECKJOB taoist
Checkgold 130000
EQUAL <$BOXITEM[1].NAME> 天尊铭文石
#act
GetRandomText ..\QuestDiary\铭文相关\道士铭文石.txt S$铭文2
INC S$铭文2 :54
GOTO @道士重名检测
BREAK
#if
checkjob wizard
Checkgold 130000
EQUAL <$BOXITEM[1].NAME> 法神铭文石
#act
GetRandomText ..\QuestDiary\铭文相关\法神铭文石.txt S$铭文2
INC S$铭文2 :54
GOTO @法师重名检测
BREAK
#if
checkjob warrior
Checkgold 130000
EQUAL <$BOXITEM[1].NAME> 圣战铭文石
#act
GetRandomText ..\QuestDiary\铭文相关\战士铭文石.txt S$铭文2
INC S$铭文2 :54
GOTO @战士重名检测
BREAK
[@战士重名检测]
#IF
EQUAL S$铭文1 <$STR(S$铭文2)>
#ACT
GetRandomText ..\QuestDiary\铭文相关\战士铭文石.txt S$铭文2
INC S$铭文2 :54
GOTO @战士重名检测
#ELSEACT
goto @武器双铭文1
break
[@法师重名检测]
#IF
EQUAL S$铭文1 <$STR(S$铭文2)>
#ACT
GetRandomText ..\QuestDiary\铭文相关\法神铭文石.txt S$铭文2
INC S$铭文2 :54
GOTO @法师重名检测
#ELSEACT
goto @武器双铭文1
break
[@道士重名检测]
#IF
EQUAL S$铭文1 <$STR(S$铭文2)>
#ACT
GetRandomText ..\QuestDiary\铭文相关\道士铭文石.txt S$铭文2
INC S$铭文2 :54
GOTO @道士重名检测
#ELSEACT
goto @武器双铭文1
break
[@双铭文洗上留下]
#if
CHECKJOB taoist
Checkgold 130000
EQUAL <$BOXITEM[1].NAME> 天尊铭文石
#act
GetRandomText ..\QuestDiary\铭文相关\道士铭文石.txt S$铭文1
INC S$铭文1 :54
GOTO @道士重名检测1
BREAK
#if
checkjob wizard
Checkgold 130000
EQUAL <$BOXITEM[1].NAME> 法神铭文石
#act
GetRandomText ..\QuestDiary\铭文相关\法神铭文石.txt S$铭文1
INC S$铭文1 :54
GOTO @法师重名检测1
BREAK
#if
checkjob warrior
Checkgold 130000
EQUAL <$BOXITEM[1].NAME> 圣战铭文石
#act
GetRandomText ..\QuestDiary\铭文相关\战士铭文石.txt S$铭文1
INC S$铭文1 :54
GOTO @战士重名检测1
BREAK
[@战士重名检测1]
#IF
EQUAL S$铭文2 <$STR(S$铭文1)>
#ACT
GetRandomText ..\QuestDiary\铭文相关\战士铭文石.txt S$铭文1
INC S$铭文1 :54
GOTO @战士重名检测1
#ELSEACT
goto @武器双铭文1
break
[@法师重名检测1]
#IF
EQUAL S$铭文2 <$STR(S$铭文1)>
#ACT
GetRandomText ..\QuestDiary\铭文相关\法神铭文石.txt S$铭文1
INC S$铭文1 :54
GOTO @法师重名检测1
#ELSEACT
goto @武器双铭文1
break
[@道士重名检测1]
#IF
EQUAL S$铭文2 <$STR(S$铭文1)>
#ACT
GetRandomText ..\QuestDiary\铭文相关\道士铭文石.txt S$铭文1
INC S$铭文1 :54
GOTO @道士重名检测1
#ELSEACT
goto @武器双铭文1
break
[@武器三铭文]
; #IF
; #ACT
; SENDMSG 6 铭文1<$STR(S$铭文1)>
; SENDMSG 6 铭文2<$STR(S$铭文2)>
; SENDMSG 6 铭文3<$STR(S$铭文3)>
; break
#if
CHECKJOB taoist
Checkgold 130000
EQUAL <$BOXITEM[1].NAME> 天尊铭文石
#ACT
GetRandomText ..\QuestDiary\铭文相关\道士铭文石.txt S$铭文3
DelBoxItem 1 1
take 金币 130000
GIVE 结晶 1
INC S$铭文3 :54
SetUpgradeItem 0
SetCustomItemText boxitem0 [铭文属性]\<$STR(S$铭文1)>:0:0>\<$STR(S$铭文2)>:0:0>\<$STR(S$铭文3)>:0:0>
SetCustomItemTextCOLOR boxitem0 255
UpdateItem boxitem0
GOTO @ItemIntoBox0
GOTO @终极提示
BREAK
#if
checkjob wizard
Checkgold 130000
EQUAL <$BOXITEM[1].NAME> 法神铭文石
#ACT
GetRandomText ..\QuestDiary\铭文相关\法神铭文石.txt S$铭文3
DelBoxItem 1 1
take 金币 130000
GIVE 结晶 1
INC S$铭文3 :54
SetUpgradeItem 0
SetCustomItemText boxitem0 [铭文属性]\<$STR(S$铭文1)>:0:0>\<$STR(S$铭文2)>:0:0>\<$STR(S$铭文3)>:0:0>
SetCustomItemTextCOLOR boxitem0 255
UpdateItem boxitem0
GOTO @ItemIntoBox0
GOTO @终极提示
BREAK
#if
checkjob warrior
Checkgold 130000
EQUAL <$BOXITEM[1].NAME> 圣战铭文石
#ACT
GetRandomText ..\QuestDiary\铭文相关\战士铭文石.txt S$铭文3
DelBoxItem 1 1
take 金币 130000
GIVE 结晶 1
INC S$铭文3 :54
SetUpgradeItem 0
SetCustomItemText boxitem0 [铭文属性]\<$STR(S$铭文1)>:0:0>\<$STR(S$铭文2)>:0:0>\<$STR(S$铭文3)>:0:0>
SetCustomItemTextCOLOR boxitem0 255
UpdateItem boxitem0
GOTO @ItemIntoBox0
GOTO @终极提示
BREAK
[@武器双铭文]
#IF
RANDOMEX 70 100
#ACT
GOTO @武器单铭文
BREAK
#if
CHECKJOB taoist
Checkgold 130000
EQUAL <$BOXITEM[1].NAME> 天尊铭文石
#act
; sendmsg 7 taoist
GetMultiRandomText ..\QuestDiary\铭文相关\道士铭文石.txt 2 S1 N1
MOV S$铭文1 <$str(s1)>
MOV S$铭文2 <$str(s2)>
INC S$铭文1 :54
INC S$铭文2 :54
GOTO @武器双铭文1
BREAK
#if
checkjob wizard
Checkgold 130000
EQUAL <$BOXITEM[1].NAME> 法神铭文石
#act
; sendmsg 7 wizard
GetMultiRandomText ..\QuestDiary\铭文相关\法神铭文石.txt 2 S1 N1
MOV S$铭文1 <$str(s1)>
MOV S$铭文2 <$str(s2)>
INC S$铭文1 :54
INC S$铭文2 :54
GOTO @武器双铭文1
BREAK
#if
checkjob warrior
Checkgold 130000
EQUAL <$BOXITEM[1].NAME> 圣战铭文石
#act
; sendmsg 7 warrior
GetMultiRandomText ..\QuestDiary\铭文相关\战士铭文石.txt 2 S1 N1
MOV S$铭文1 <$str(s1)>
MOV S$铭文2 <$str(s2)>
INC S$铭文1 :54
INC S$铭文2 :54
GOTO @武器双铭文1
BREAK
[@武器双铭文1]
#or
check [4] 1
check [5] 1
#act
goldcount - 70000
#if
Checkgold 130000
#ACT
DelBoxItem 1 1
take 金币 130000
GIVE 结晶 1
SetUpgradeItem 0
SetCustomItemText boxitem0 [铭文属性]\<$STR(S$铭文1)>:0:0>\<$STR(S$铭文2)>:0:0>
SetCustomItemTextCOLOR boxitem0 255
UpdateItem boxitem0
GOTO @ItemIntoBox0
GOTO @终极提示
BREAK
[@武器单铭文]
#if
CHECKJOB taoist
Checkgold 130000
EQUAL <$BOXITEM[1].NAME> 天尊铭文石
#ACT
GetRandomText ..\QuestDiary\铭文相关\道士铭文石.txt S$道士1
DelBoxItem 1 1
take 金币 130000
GIVE 结晶 1
MOV <$STR(S$铭文1)> <$STR(S$道士1)>
INC S$铭文1 :54
SetUpgradeItem 0
SetCustomItemText boxitem0 [铭文属性]\<$STR(S$铭文1)>:0:0>
SetCustomItemTextCOLOR boxitem0 255
UpdateItem boxitem0
GOTO @ItemIntoBox0
GOTO @终极提示
BREAK
#if
checkjob wizard
Checkgold 130000
EQUAL <$BOXITEM[1].NAME> 法神铭文石
#ACT
GetRandomText ..\QuestDiary\铭文相关\法神铭文石.txt S$法师1
DelBoxItem 1 1
take 金币 130000
GIVE 结晶 1
MOV <$STR(S$铭文1)> <$STR(S$法师1)>
INC S$铭文1 :54
SetUpgradeItem 0
SetCustomItemText boxitem0 [铭文属性]\<$STR(S$铭文1)>:0:0>
SetCustomItemTextCOLOR boxitem0 255
UpdateItem boxitem0
GOTO @ItemIntoBox0
GOTO @终极提示
BREAK
#if
checkjob warrior
Checkgold 130000
EQUAL <$BOXITEM[1].NAME> 圣战铭文石
#ACT
GetRandomText ..\QuestDiary\铭文相关\战士铭文石.txt S$战士1
DelBoxItem 1 1
take 金币 130000
GIVE 结晶 1
MOV <$STR(S$铭文1)> <$STR(S$战士1)>
INC S$铭文1 :54
SetUpgradeItem 0
SetCustomItemText boxitem0 [铭文属性]\<$STR(S$铭文1)>:0:0>
SetCustomItemTextCOLOR boxitem0 255
UpdateItem boxitem0
GOTO @ItemIntoBox0
GOTO @终极提示
BREAK
[@终极提示]
#OR
EQUAL <$STR(S$铭文1)> <img:52
EQUAL <$STR(S$铭文2)> <img:52
#ACT
SendNewLineMsg 0 251 0 12 30 10 1 恭喜玩家[<$USERNAME>]洗炼铭文获得[攻沙剑术(煌龙印)]！
break
#OR
EQUAL <$STR(S$铭文1)> <img:60
EQUAL <$STR(S$铭文2)> <img:60
#ACT
SendNewLineMsg 0 251 0 12 30 10 1 恭喜玩家[<$USERNAME>]洗炼铭文获得[刺杀剑术(耀光印)]！
break
#OR
EQUAL <$STR(S$铭文1)> <img:63
EQUAL <$STR(S$铭文2)> <img:63
#ACT
SendNewLineMsg 0 251 0 12 30 10 1 恭喜玩家[<$USERNAME>]洗炼铭文获得[烈火剑法(斩月印)]！
break
#OR
EQUAL <$STR(S$铭文1)> <img:51
EQUAL <$STR(S$铭文2)> <img:51
#ACT
SendNewLineMsg 0 251 0 12 30 10 1 恭喜玩家[<$USERNAME>]洗炼铭文获得[烈火剑法(夺火印)]！
break
#OR
EQUAL <$STR(S$铭文1)> <img:345
EQUAL <$STR(S$铭文2)> <img:345
#ACT
SendNewLineMsg 0 251 0 12 30 10 1 恭喜玩家[<$USERNAME>]洗炼铭文获得[狮子吼(决意印)]！
break
#OR
EQUAL <$STR(S$铭文1)> <img:351
EQUAL <$STR(S$铭文2)> <img:351
#ACT
SendNewLineMsg 0 251 0 12 30 10 1 恭喜玩家[<$USERNAME>]洗炼铭文获得[逐日剑法(升龙印)]！
break
#OR
EQUAL <$STR(S$铭文1)> <img:346
EQUAL <$STR(S$铭文2)> <img:346
#ACT
SendNewLineMsg 0 251 0 12 30 10 1 恭喜玩家[<$USERNAME>]洗炼铭文获得[逐日剑法(开僵印)]！
break
#OR
EQUAL <$STR(S$铭文1)> <img:350
EQUAL <$STR(S$铭文2)> <img:350
#ACT
SendNewLineMsg 0 251 0 12 30 10 1 恭喜玩家[<$USERNAME>]洗炼铭文获得[逐日剑法(神驱印)]！
break
#OR
EQUAL <$STR(S$铭文1)> <img:74
EQUAL <$STR(S$铭文2)> <img:74
#ACT
SendNewLineMsg 0 251 0 12 30 10 1 恭喜玩家[<$USERNAME>]洗炼铭文获得[疾光电影(雷咒印)]！
break
#OR
EQUAL <$STR(S$铭文1)> <img:78
EQUAL <$STR(S$铭文2)> <img:78
#ACT
SendNewLineMsg 0 251 0 12 30 10 1 恭喜玩家[<$USERNAME>]洗炼铭文获得[魔法盾(霜骨印)]！
break
#OR
EQUAL <$STR(S$铭文1)> <img:85
EQUAL <$STR(S$铭文2)> <img:85
#ACT
SendNewLineMsg 0 251 0 12 30 10 1 恭喜玩家[<$USERNAME>]洗炼铭文获得[冰咆哮(龙行印)]！
break
#OR
EQUAL <$STR(S$铭文1)> <img:75
EQUAL <$STR(S$铭文2)> <img:75
#ACT
SendNewLineMsg 0 251 0 12 30 10 1 恭喜玩家[<$USERNAME>]洗炼铭文获得[冰咆哮(龙魂印)]！
break
#OR
EQUAL <$STR(S$铭文1)> <img:354
EQUAL <$STR(S$铭文2)> <img:354
#ACT
SendNewLineMsg 0 251 0 12 30 10 1 恭喜玩家[<$USERNAME>]洗炼铭文获得[寒冰掌(霜冻印)]！
break
#OR
EQUAL <$STR(S$铭文1)> <img:342
EQUAL <$STR(S$铭文2)> <img:342
#ACT
SendNewLineMsg 0 251 0 12 30 10 1 恭喜玩家[<$USERNAME>]洗炼铭文获得[灭天火(夺气印)]！
break
#OR
EQUAL <$STR(S$铭文1)> <img:340
EQUAL <$STR(S$铭文2)> <img:340
#ACT
SendNewLineMsg 0 251 0 12 30 10 1 恭喜玩家[<$USERNAME>]洗炼铭文获得[流星火雨(冰雨印)]！
break
#OR
EQUAL <$STR(S$铭文1)> <img:349
EQUAL <$STR(S$铭文2)> <img:349
#ACT
SendNewLineMsg 0 251 0 12 30 10 1 恭喜玩家[<$USERNAME>]洗炼铭文获得[流星火雨(群雷印)]！
break
#OR
EQUAL <$STR(S$铭文1)> <img:93
EQUAL <$STR(S$铭文2)> <img:93
#ACT
SendNewLineMsg 0 251 0 12 30 10 1 恭喜玩家[<$USERNAME>]洗炼铭文获得[施毒术(凌波印)]！
break
#OR
EQUAL <$STR(S$铭文1)> <img:100
EQUAL <$STR(S$铭文2)> <img:100
#ACT
SendNewLineMsg 0 251 0 12 30 10 1 恭喜玩家[<$USERNAME>]洗炼铭文获得[召唤骷髅(偷天印)]！
break
#OR
EQUAL <$STR(S$铭文1)> <img:101
EQUAL <$STR(S$铭文2)> <img:101
#ACT
SendNewLineMsg 0 251 0 12 30 10 1 恭喜玩家[<$USERNAME>]洗炼铭文获得[群体治愈术(瑶光印)]！
break
#OR
EQUAL <$STR(S$铭文1)> <img:181
EQUAL <$STR(S$铭文2)> <img:181
#ACT
SendNewLineMsg 0 251 0 12 30 10 1 恭喜玩家[<$USERNAME>]洗炼铭文获得[召唤神兽(血兽印)]！
break
#OR
EQUAL <$STR(S$铭文1)> <img:98
EQUAL <$STR(S$铭文2)> <img:98
#ACT
SendNewLineMsg 0 251 0 12 30 10 1 恭喜玩家[<$USERNAME>]洗炼铭文获得[召唤神兽(圣兽印)]！
break
#OR
EQUAL <$STR(S$铭文1)> <img:96
EQUAL <$STR(S$铭文2)> <img:96
#ACT
SendNewLineMsg 0 251 0 12 30 10 1 恭喜玩家[<$USERNAME>]洗炼铭文获得[召唤神兽(灵兽印)]！
break
#OR
EQUAL <$STR(S$铭文1)> <img:355
EQUAL <$STR(S$铭文2)> <img:355
#ACT
SendNewLineMsg 0 251 0 12 30 10 1 恭喜玩家[<$USERNAME>]洗炼铭文获得[无极真气(天罡印)]！
break
#OR
EQUAL <$STR(S$铭文1)> <img:353
EQUAL <$STR(S$铭文2)> <img:353
#ACT
SendNewLineMsg 0 251 0 12 30 10 1 恭喜玩家[<$USERNAME>]洗炼铭文获得[噬血术(噬心印)]！
break
#OR
EQUAL <$STR(S$铭文1)> <img:341
EQUAL <$STR(S$铭文2)> <img:341
#ACT
SendNewLineMsg 0 251 0 12 30 10 1 恭喜玩家[<$USERNAME>]洗炼铭文获得[噬血术(夺魂印)]！
break
#OR
EQUAL <$STR(S$铭文1)> <img:352
EQUAL <$STR(S$铭文2)> <img:352
#ACT
SendNewLineMsg 0 251 0 12 30 10 1 恭喜玩家[<$USERNAME>]洗炼铭文获得[噬血术(失魂印)]！
break
}
|
|
发表于 2023-4-4 18:34:50
