ranbing 发表于 2025-6-29 17:42:44

求大佬帮忙改个传奇NPC脚本

随即1-10星 还没保底 强化的我想哭 求大佬给改成一下10星 拜托了



[@main]
#IF
CHECKLEVELEX < 70
#ACT
MESSAGEBOX 为防止盗版此功能70级后查看！
BREAK

#IF
CHECKLEVELEX > 0
#ACT
OPENMERCHANTBIGDLG 3 65 1 0 4 4 0 433 4
#SAY
<IMGEX:5:148:148:149:435:-15/@EXIT> \

<> <PLAYIMG:2:53:10:100:66:-22:1/@Label>\

　　　< ---------------------------------------------------->\
< ------------------------------------------------------------------>\
<>   < 武器鉴定> : < 主要附加：强身：攻.魔.道：合击威力,10星神龙倚天>\
<>   < 衣服鉴定> : < 主要附加：强身：攻.魔.道：合击威力,10星传送神技>\
<>   < 四格鉴定> : < 主要附加：强身：攻.魔.道：10星触发合击威力，暴击威力>\
<>   < 首饰鉴定> : < 主要附加：强身：攻.魔.道：10星触发合击威力，暴击威力>\
< ------------------------------------------------------------------>

\<武器鉴定属性/@武器鉴定><衣服鉴定属性/@衣服鉴定><首饰鉴定属性/@首饰鉴定><四格鉴属性定/@四格鉴定><购买真言碎片/@购买>\\
< 鉴定需要10w元宝+真言碎片*1> < 碎片各大boss均有爆出;不愿出力可以适量购买> \ \
<>                     <我要开始装逼了，开始鉴定/@升星1>   

[@购买]

#if
CHECKLEVELEX > 0
#act
QUERYVALUE 43 1 7 @购买a 1个金刚石可以兑换1个真言碎片，请输入购买数量! NPC

[@购买a]

#if
small M43 1
#act
messagebox 请填写大于等于1以上的数量！！
break

#if
NOT CHECKGAMEDIAMOND ? <$STR(M43)>
#act
messagebox 金刚石不足<$STR(M43)>个！！
break

#if
CHECKGAMEDIAMOND ? <$STR(M43)>
#act
GAMEDIAMOND - <$STR(M43)>
give 真言碎片 <$STR(M43)>
messagebox 成功兑换真言碎片<$STR(M43)>个！！
break



[@升星1]
#if
#act
goto @升星

[@升星]
#if
#act
QUERYITEMDLG 放入要附魔的装备 @QUREY_UPGRADEDLGITEM 0

[@QUREY_UPGRADEDLGITEM]
#IF
CHECKLEVELEX > 1
#ACT
MOV M6 0
MOV M7 0
MOV M51 0
MOV M54 0
MOV M57 0
MOV M58 0
MOV M59 0
MOV M60 0
MOV M81 0
MOV M82 0
MOV M83 0
MOV M89 0
MOV M91 0
MOV M41 0
MOV M55 0

#IF
CHECKDLGITEMTYPE WEAPON
#ACT
GETDLGITEMVALUE M81 0
GETDLGITEMVALUE M82 1
GETDLGITEMVALUE M83 2
GETDLGITEMVALUE M54 5
GETDLGITEMVALUE M51 3
GETDLGITEMVALUE M57 17
GETDLGITEMVALUE M58 18
GETDLGITEMVALUE M59 20
GETDLGITEMVALUE M60 21
GETDLGITEMVALUE M55 8
DELAYCALL 10 @武器附摸


#IF
CHECKDLGITEMTYPE DRESS
#ACT
GETDLGITEMVALUE M81 2
GETDLGITEMVALUE M82 3
GETDLGITEMVALUE M83 4
GETDLGITEMVALUE M51 0
GETDLGITEMVALUE M54 1
GETDLGITEMVALUE M57 17
GETDLGITEMVALUE M58 18
GETDLGITEMVALUE M59 20
GETDLGITEMVALUE M60 21
GETDLGITEMVALUE M55 8
DELAYCALL 10 @衣服附摸

#IF
CHECKDLGITEMTYPE NECKLACE
#ACT
GETDLGITEMVALUE M81 2
GETDLGITEMVALUE M82 3
GETDLGITEMVALUE M83 4
GETDLGITEMVALUE M51 0
GETDLGITEMVALUE M54 1
GETDLGITEMVALUE M57 8
GETDLGITEMVALUE M58 19
GETDLGITEMVALUE M59 17
GETDLGITEMVALUE M60 18
DELAYCALL 10 @首饰附摸

#IF
CHECKDLGITEMTYPE HELMET
#ACT
GETDLGITEMVALUE M81 2
GETDLGITEMVALUE M82 3
GETDLGITEMVALUE M83 4
GETDLGITEMVALUE M51 0
GETDLGITEMVALUE M54 1
GETDLGITEMVALUE M57 9
GETDLGITEMVALUE M58 8
DELAYCALL 10 @首饰附摸

#IF
CHECKDLGITEMTYPE ARMRING
#ACT
GETDLGITEMVALUE M81 2
GETDLGITEMVALUE M82 3
GETDLGITEMVALUE M83 4
GETDLGITEMVALUE M57 9
GETDLGITEMVALUE M58 17
DELAYCALL 10 @首饰附摸

#IF
CHECKDLGITEMTYPE RING
#ACT
GETDLGITEMVALUE M81 2
GETDLGITEMVALUE M82 3
GETDLGITEMVALUE M83 4
GETDLGITEMVALUE M57 18
DELAYCALL 10 @首饰附摸

#IF
CHECKDLGITEMTYPE BELT
#ACT
GETDLGITEMVALUE M81 2
GETDLGITEMVALUE M82 3
GETDLGITEMVALUE M83 4
GETDLGITEMVALUE M51 0
GETDLGITEMVALUE M54 1
GETDLGITEMVALUE M57 20
DELAYCALL 10 @四格附摸

#IF
CHECKDLGITEMTYPE BOOTS
#ACT
GETDLGITEMVALUE M81 2
GETDLGITEMVALUE M82 3
GETDLGITEMVALUE M83 4
GETDLGITEMVALUE M51 0
GETDLGITEMVALUE M54 1
GETDLGITEMVALUE M57 21
DELAYCALL 10 @四格附摸


#IF
CHECKDLGITEMTYPE MEDAL
#ACT
GETDLGITEMVALUE M81 2
GETDLGITEMVALUE M82 3
GETDLGITEMVALUE M83 4
GETDLGITEMVALUE M51 0
GETDLGITEMVALUE M54 1
DELAYCALL 10 @四格附摸




#IF(1)
CHECKDLGITEMTYPE BUJUK
CHECKDLGITEMTYPE HELMETEX
#ACT
GETDLGITEMVALUE M51 0
GETDLGITEMVALUE M54 1
GETDLGITEMVALUE M81 2
GETDLGITEMVALUE M82 3
GETDLGITEMVALUE M83 4
DELAYCALL 10 @四格附摸
break


[@四格附摸]
#IF
CHECKGAMEGOLD < 100000
#ACT
MessageBox 对不起，你背包内没有100000元宝！
BREAK

#IF
NOT CHECKitem 真言碎片 1
#ACT
MessageBox 对不起，你背包内没有真言碎片！
BREAK




#IF(1)
CHECKDLGITEMTYPE BELT
CHECKDLGITEMTYPE BOOTS
CHECKDLGITEMTYPE MEDAL
CHECKDLGITEMTYPE HELMETEX
CHECKDLGITEMTYPE BUJUK
#ACT
GAMEGOLD - 100000
TAKE 真言碎片 1
MOV S10 <$DLGITEMNAME>
GOTO @附摸属性开始四格
GOTO @升星

[@首饰附摸]
#IF
CHECKGAMEGOLD < 100000
#ACT
MessageBox 对不起，你背包内没有100000元宝！
BREAK


#IF
NOT CHECKitem 真言碎片 1
#ACT
MessageBox 对不起，你背包内没有真言碎片！
BREAK


#IF(1)
CHECKDLGITEMTYPE NECKLACE
CHECKDLGITEMTYPE HELMET
CHECKDLGITEMTYPE ARMRING
CHECKDLGITEMTYPE RING
#ACT
GAMEGOLD - 100000
TAKE 真言碎片 1
MOV S10 <$DLGITEMNAME>
GOTO @附摸属性开始首饰
GOTO @升星


[@武器附摸]
#IF
CHECKGAMEGOLD < 100000
#ACT
MessageBox 对不起，你背包内没有100000元宝！
BREAK

#IF
NOT CHECKitem 真言碎片 1
#ACT
MessageBox 对不起，你背包内没有真言碎片！
BREAK

#IF
CHECKDLGITEMTYPE WEAPON
#ACT
GAMEGOLD - 100000
TAKE 真言碎片 1
MOV S10 <$DLGITEMNAME>
GOTO @附摸属性开始武器
GOTO @升星


[@衣服附摸]
#IF
CHECKGAMEGOLD < 100000
#ACT
MessageBox 对不起，你背包内没有100000元宝！
BREAK

#IF
NOT CHECKitem 真言碎片 1
#ACT
MessageBox 对不起，你背包内没有真言碎片！
BREAK

#IF
CHECKDLGITEMTYPE DRESS
#ACT
GAMEGOLD - 100000
TAKE 真言碎片 1
MOV S10 <$DLGITEMNAME>
GOTO @附摸属性开始衣服
GOTO @升星



[@附摸属性开始武器]

#if
CHECKLEVELEX > 1
#act
#CALL [\极品附魔属性\附魔属性脚本武器.txt] @附魔属性脚本随即1
GOTO @通过所有附摸调整

[@附摸属性开始衣服]

#if
CHECKLEVELEX > 1
#act
#CALL [\极品附魔属性\附魔属性脚本衣服.txt] @附魔属性脚本随即2
GOTO @通过所有附摸调整

[@附摸属性开始首饰]

#if
CHECKLEVELEX > 1
#act
#CALL [\极品附魔属性\附魔属性脚本首饰.txt] @附魔属性脚本随即3
GOTO @通过所有附摸调整

[@附摸属性开始四格]

#if
CHECKLEVELEX > 1
#act
#CALL [\极品附魔属性\附魔属性脚本四格.txt] @附魔属性脚本随即4
GOTO @通过所有附摸调整


[@通过所有附摸调整]

#if
CHECKLEVELEX > 1
#act
MOV M16 <$STR(M41)>

#if
equal M16 10
#act
DEC M16 1





#IF
CHECKDLGITEMTYPE WEAPON
#ACT
GiveEx <$STR(S10)> 1 0=<$STR(M81)>,1=<$STR(M82)>,2=<$STR(M83)>,3=<$STR(M51)>,5=<$STR(M54)>,8=<$STR(M55)>,17=<$STR(M57)>,18=<$STR(M58)>,20=<$STR(M59)>,21=<$STR(M60)> |1=<$STR(M41)>,2=<$STR(M41)>,3=<$STR(M41)>,|24=<$STR(M41)>,26=<$STR(M41)>,|0|<$STR(M89)>|1
SENDMSG 0 恭喜【<$USERNAME>】成功将【<$STR(S10)>】升级到【<$STR(M41)>星】！
SetItemStar $GIVEITEM = <$STR(M16)>0
TAKEDLGITEM
MOV S21
MOV M51 0
MOV M81 0
MOV M82 0
MOV M83 0
MOV M51 0
MOV M54 0
MOV M57 0
MOV M58 0
MOV M59 0
MOV M60 0
MOV M91 0
MOV M6 0
MOV M7 0
MOV M89 0
MOV M41 0
MOV M55 0

#IF
CHECKDLGITEMTYPE DRESS
#ACT
GiveEx <$STR(S10)> 1 0=<$STR(M51)>,1=<$STR(M54)>,2=<$STR(M81)>,3=<$STR(M82)>,4=<$STR(M83)>,8=<$STR(M55)>,17=<$STR(M57)>,18=<$STR(M58)>,20=<$STR(M59)>,21=<$STR(M60)> |1=<$STR(M41)>,2=<$STR(M41)>,3=<$STR(M41)>,|24=<$STR(M41)>,26=<$STR(M41)>,|<$STR(M91)>|0|3
SENDMSG 0 恭喜【<$USERNAME>】成功将【<$STR(S10)>】升级到【<$STR(M41)>星】！
SetItemStar $GIVEITEM = <$STR(M16)>0
TAKEDLGITEM
MOV S21
MOV M51 0
MOV M81 0
MOV M82 0
MOV M83 0
MOV M51 0
MOV M54 0
MOV M57 0
MOV M58 0
MOV M59 0
MOV M60 0
MOV M91 0
MOV M6 0
MOV M7 0
MOV M89 0
MOV M41 0
MOV M55 0
#IF
CHECKDLGITEMTYPE NECKLACE
#ACT
GiveEx <$STR(S10)> 1 0=<$STR(M51)>,1=<$STR(M54)>,2=<$STR(M81)>,3=<$STR(M82)>,4=<$STR(M83)>,8=<$STR(M57)>,17=<$STR(M59)>,18=<$STR(M60)>,19=<$STR(M58)> |1=<$STR(M41)>,2=<$STR(M41)>,3=<$STR(M41)>,26=<$STR(M41)>|23=<$STR(M6)>,24=<$STR(M7)>,|0|0|3
SENDMSG 0 恭喜【<$USERNAME>】成功将【<$STR(S10)>】升级到【<$STR(M41)>星】！
SetItemStar $GIVEITEM = <$STR(M16)>
TAKEDLGITEM
MOV S21
MOV M51 0
MOV M81 0
MOV M82 0
MOV M83 0
MOV M51 0
MOV M54 0
MOV M57 0
MOV M58 0
MOV M59 0
MOV M60 0
MOV M6 0
MOV M7 0
MOV M89 0
MOV M91 0
MOV M41 0
MOV M55 0
#IF
CHECKDLGITEMTYPE HELMET
#ACT
GiveEx <$STR(S10)> 1 0=<$STR(M51)>,1=<$STR(M54)>,2=<$STR(M81)>,3=<$STR(M82)>,4=<$STR(M83)>,8=<$STR(M58)>,9=<$STR(M57)> |1=<$STR(M41)>,2=<$STR(M41)>,3=<$STR(M41)>,26=<$STR(M41)>|23=<$STR(M6)>,24=<$STR(M7)>,|0|0|3
SENDMSG 0 恭喜【<$USERNAME>】成功将【<$STR(S10)>】升级到【<$STR(M41)>星】！
SetItemStar $GIVEITEM = <$STR(M16)>
TAKEDLGITEM
MOV S21
MOV M51 0
MOV M81 0
MOV M82 0
MOV M83 0
MOV M51 0
MOV M54 0
MOV M57 0
MOV M58 0
MOV M59 0
MOV M60 0
MOV M6 0
MOV M7 0
MOV M89 0
MOV M91 0
MOV M41 0
MOV M55 0
#IF
CHECKDLGITEMTYPE ARMRING
#ACT
GiveEx <$STR(S10)> 1 2=<$STR(M81)>,3=<$STR(M82)>,4=<$STR(M83)>,17=<$STR(M58)>,9=<$STR(M57)> |1=<$STR(M41)>,2=<$STR(M41)>,3=<$STR(M41)>,26=<$STR(M41)>|23=<$STR(M6)>,24=<$STR(M7)>,|0|0|3
SENDMSG 0 恭喜【<$USERNAME>】成功将【<$STR(S10)>】升级到【<$STR(M41)>星】！
SetItemStar $GIVEITEM = <$STR(M16)>
TAKEDLGITEM
MOV S21
MOV M51 0
MOV M81 0
MOV M82 0
MOV M83 0
MOV M51 0
MOV M54 0
MOV M57 0
MOV M58 0
MOV M59 0
MOV M60 0
MOV M6 0
MOV M7 0
MOV M89 0
MOV M91 0
MOV M41 0
MOV M55 0
#IF
CHECKDLGITEMTYPE RING
#ACT
GiveEx <$STR(S10)> 1 2=<$STR(M81)>,3=<$STR(M82)>,4=<$STR(M83)>,18=<$STR(M57)>,9=0 |1=<$STR(M41)>,2=<$STR(M41)>,3=<$STR(M41)>,26=<$STR(M41)>|23=<$STR(M6)>,24=<$STR(M7)>,|0|0|3
SENDMSG 0 恭喜【<$USERNAME>】成功将【<$STR(S10)>】升级到【<$STR(M41)>星】！
SetItemStar $GIVEITEM = <$STR(M16)>
TAKEDLGITEM
MOV S21
MOV M51 0
MOV M81 0
MOV M82 0
MOV M83 0
MOV M51 0
MOV M54 0
MOV M57 0
MOV M58 0
MOV M59 0
MOV M60 0
MOV M6 0
MOV M7 0
MOV M89 0
MOV M91 0
MOV M41 0
MOV M55 0
#IF
CHECKDLGITEMTYPE BELT
#ACT
GiveEx <$STR(S10)> 1 0=<$STR(M51)>,1=<$STR(M54)>,2=<$STR(M81)>,3=<$STR(M82)>,4=<$STR(M83)>,20=<$STR(M57)>,9=0 |1=<$STR(M41)>,2=<$STR(M41)>,3=<$STR(M41)>,26=<$STR(M41)>|23=<$STR(M6)>,24=<$STR(M7)>,|0|0|3
SENDMSG 0 恭喜【<$USERNAME>】成功将【<$STR(S10)>】升级到【<$STR(M41)>星】！
SetItemStar $GIVEITEM = <$STR(M16)>
TAKEDLGITEM
MOV S21
MOV M51 0
MOV M81 0
MOV M82 0
MOV M83 0
MOV M51 0
MOV M54 0
MOV M57 0
MOV M58 0
MOV M59 0
MOV M60 0
MOV M6 0
MOV M7 0
MOV M89 0
MOV M91 0
MOV M41 0
MOV M55 0
#IF
CHECKDLGITEMTYPE BOOTS
#ACT
GiveEx <$STR(S10)> 1 0=<$STR(M51)>,1=<$STR(M54)>,2=<$STR(M81)>,3=<$STR(M82)>,4=<$STR(M83)>,21=<$STR(M57)>,9=0 |1=<$STR(M41)>,2=<$STR(M41)>,3=<$STR(M41)>,26=<$STR(M41)>|23=<$STR(M6)>,24=<$STR(M7)>,|0|0|3
SENDMSG 0 恭喜【<$USERNAME>】成功将【<$STR(S10)>】升级到【<$STR(M41)>星】！
SetItemStar $GIVEITEM = <$STR(M16)>
TAKEDLGITEM
MOV S21
MOV M51 0
MOV M81 0
MOV M82 0
MOV M83 0
MOV M51 0
MOV M54 0
MOV M57 0
MOV M58 0
MOV M59 0
MOV M60 0
MOV M6 0
MOV M7 0
MOV M89 0
MOV M91 0
MOV M41 0
MOV M55 0


#IF
CHECKDLGITEMTYPE MEDAL
#ACT
GiveEx <$STR(S10)> 1 0=<$STR(M51)>,1=<$STR(M54)>,2=<$STR(M81)>,3=<$STR(M82)>,4=<$STR(M83)>,9=0 |1=<$STR(M41)>,2=<$STR(M41)>,3=<$STR(M41)>,26=<$STR(M41)>|23=<$STR(M6)>,24=<$STR(M7)>,|0|0|3
SENDMSG 0 恭喜【<$USERNAME>】成功将【<$STR(S10)>】升级到【<$STR(M41)>星】！
SetItemStar $GIVEITEM = <$STR(M16)>
TAKEDLGITEM
MOV S21
MOV M51 0
MOV M81 0
MOV M82 0
MOV M83 0
MOV M51 0
MOV M54 0
MOV M57 0
MOV M58 0
MOV M59 0
MOV M60 0
MOV M6 0
MOV M7 0
MOV M89 0
MOV M91 0
MOV M41 0
MOV M55 0


#IF(1)
CHECKDLGITEMTYPE HELMETEX
CHECKDLGITEMTYPE BUJUK
#ACT
GiveEx <$STR(S10)> 1 0=<$STR(M51)>,1=<$STR(M54)>,2=<$STR(M81)>,3=<$STR(M82)>,4=<$STR(M83)>,9=0 |1=<$STR(M41)>,2=<$STR(M41)>,3=<$STR(M41)>,26=<$STR(M41)>|23=<$STR(M6)>,24=<$STR(M7)>,|0|0|3
SENDMSG 0 恭喜【<$USERNAME>】成功将【<$STR(S10)>】升级到【<$STR(M41)>星】！
SetItemStar $GIVEITEM = <$STR(M16)>
TAKEDLGITEM
MOV S21
MOV M51 0
MOV M81 0
MOV M82 0
MOV M83 0
MOV M51 0
MOV M54 0
MOV M57 0
MOV M58 0
MOV M59 0
MOV M60 0
MOV M6 0
MOV M7 0
MOV M89 0
MOV M91 0
MOV M41 0
MOV M55 0
[@武器鉴定]
#IF
CHECKLEVELEX > 0
#ACT

#SAY
;<IMGEX:5:148:148:149:418:-11/@EXIT> \
<> <PLAYIMG:2:53:10:100:40:-15:1>\
\      < 鉴定属性> < 【攻魔道增加1-10】>\
\      < 鉴定属性> < 【合击威力增加1%-10%】>\
\      < 鉴定属性> < 【强身等级增加1-10】>\
\      < 鉴定属性> < 【10星最高给予倚天辟地.神龙附体】>\ \ \

<COLOR=$00FFAADD 合击威力 + 暴击威力效果强大,鉴定后所向披靡> <开始鉴定装备/@升星1>   <返回上页/@main>



[@四格鉴定]
#IF
CHECKLEVELEX > 0
#ACT

#SAY
;<IMGEX:5:148:148:149:418:-11/@EXIT> \
<> <PLAYIMG:2:53:10:100:40:-15:1>\

\      < 鉴定属性> < 【攻魔道增加1-10】>\
\      < 鉴定属性> < 【强身等级增加1-10】>\
\      < 鉴定属性> < 【10星最高给予合击威力.暴击威力】>\ \ \


<COLOR=$00FFAADD 合击威力 + 暴击威力效果强大,鉴定后所向披靡> <开始鉴定装备/@升星1>   <返回上页/@main>





[@首饰鉴定]
#IF
CHECKLEVELEX > 0
#ACT

#SAY
;<IMGEX:5:148:148:149:418:-11/@EXIT> \
<> <PLAYIMG:2:53:10:100:40:-15:1>\
\      < 鉴定属性> < 【攻魔道增加1-10】>\
\      < 鉴定属性> < 【强身等级增加1-10】>\
\      < 鉴定属性> < 【10星最高给予合击威力.暴击威力】>\ \ \

<COLOR=$00FFAADD 合击威力 + 暴击威力效果强大,鉴定后所向披靡> <开始鉴定装备/@升星1>   <返回上页/@main>

[@衣服鉴定]
#IF
CHECKLEVELEX > 0
#ACT

#SAY
;<IMGEX:5:148:148:149:418:-11/@EXIT> \
<> <PLAYIMG:2:53:10:100:40:-15:1>\
\      < 鉴定属性> < 【攻魔道增加1-10】>\
\      < 鉴定属性> < 【合击威力增加1%-10%】>\
\      < 鉴定属性> < 【强身等级增加1-10】>\
\      < 鉴定条件> < 【10星最高给予传送神技】>\ \ \

<COLOR=$00FFAADD 合击威力 + 暴击威力效果强大,鉴定后所向披靡> <开始鉴定装备/@升星1>   <返回上页/@main>

ranbing 发表于 2025-6-29 17:52:18

还有道士宝宝只能召1个 M2里改没用不知道怎么回事 哪位大佬知道怎么弄

outtoutt 发表于 2025-6-29 17:57:47

发这里不好

绝对疯子 发表于 2025-6-29 18:01:30

免费的我们不会改~！！:

ntdino 发表于 2025-6-29 18:10:28

你这个得看调用的随机那个脚本了。
#CALL [\极品附魔属性\附魔属性脚本四格.txt] @附魔属性脚本随即4
这里是啥样的，应该从这下手。

asd2724 发表于 2025-6-29 19:10:58

楼上说的对

liyicheng556 发表于 2025-6-29 20:08:33

没怎么玩儿，没研究

420502434 发表于 2025-6-29 20:25:28

::::
页: [1]
查看完整版本: 求大佬帮忙改个传奇NPC脚本

本站内容如若侵犯到您的权益，请来电来函告知，我们会尽快处理！
联系QQ：1953150286，2251387361，123784736，免责申明