| 
 
| 传奇开单机传奇为了回报广大的GM和传奇爱好者.近期会在传奇GM基地免费传奇服务端下载站内更新大量的传奇脚本和传奇经验文章以及传奇制造经验.传奇架设经验与大家一起交流。 [@衣服_精炼]
 {
 ;-----------------变量说明----------------------------------------------
 ;引擎内部使用的(P G M I A S N D)变量
 ;255衣服白色
 ;180衣服蓝色
 ;250衣服绿色
 ;70衣服橙色
 ;249衣服红色
 ;245衣服暗紫色
 ;253衣服紫色
 ;第1颗图片<Img:1373:1:-3:-179>
 ;第2颗图片<Img:1373:1:-17:-167>
 ;第3颗图片<Img:1373:1:-8:-182>
 ;第4颗图片<Img:1373:1:-17:-138>
 ;第5颗图片<Img:1373:1:-8:-154>
 ;第6颗图片<Img:1373:1:-3:-146>
 ;数字变量从M50开始
 ;字符变量从S50开始
 ;@GetBoxItem从50开始
 ;M50 精炼装备的部位.
 ;M51 成功率
 ;M52 升级数点
 ;M53 100%的品质基值
 ;M54 添加精炼材料的位置序号
 ;M55 玩家是否点击了升级按钮
 ;M56 值:0 1 2 分别表示升级时升攻击,魔法,道术
 ;M57 精炼颜色值
 ;M58 元素属性附加数
 ;M59 附加元素属性的类别
 ;S50 精炼装备的名字.
 ;S51 装备当前颜色
 ;S52 带颜色的装备名字
 ;S53 精炼装备的外观图片
 ;S54 升级成功信息
 ;S55 成功率>75的相关信息
 ;S71 第1颗材料图片
 ;S72 第2颗材料图片
 ;S73 第3颗材料图片
 ;S74 第4颗材料图片
 ;S75 第5颗材料图片
 ;S76 第6颗材料图片
 ;S77 第1颗材料图片背景按钮
 ;S78 第2颗材料图片背景按钮
 ;S79 第3颗材料图片背景按钮
 ;S80 第4颗材料图片背景按钮
 ;S81 第5颗材料图片背景按钮
 ;S82 第6颗材料图片背景按钮
 ;S83 装备升级后的称谓:精致装备,史诗装备什么的
 ;M60,M61 S60 S61 S62临时值
 ;-----------------------------------------------------------------------
 ;初始数据
 #IF
 CHECKLEVELEX > 0
 #ACT
 MOV S50
 MOV S51
 MOV S52
 MOV S53
 MOV S54
 MOV S55
 MOV S60
 MOV S61
 MOV S62
 MOV S63
 MOV S71
 MOV S72
 MOV S73
 MOV S74
 MOV S75
 MOV S76
 MOV S77
 MOV S78
 MOV S79
 MOV S80
 MOV S81
 MOV S82
 MOV S83
 MOV M50 0
 MOV M51 0
 MOV M52 0
 MOV M53 0
 MOV M54 0
 MOV M56 0
 MOV M57 0
 MOV M60 0
 MOV M61 0
 MOV M62 0
 MOV M63 0
 MOV M64 0
 MOV M65 0
 MOV S77 <
 INC S77 Img:109:0:-1:-8/@衣服_材料1
 INC S77 >
 MOV S78 <
 INC S78 Img:109:0:-8:4/@衣服_材料2
 INC S78 >
 MOV S79 <
 INC S79 Img:109:0:-5:4/@衣服_材料3
 INC S79 >
 MOV S80 <
 INC S80 Img:109:0:-8:1/@衣服_材料4
 INC S80 >
 MOV S81 <
 INC S81 Img:109:0:-5:1/@衣服_材料5
 INC S81 >
 MOV S82 <
 INC S82 Img:109:0:-1:-7/@衣服_材料6
 INC S82 >
 
 #IF
 CHECKLEVELEX > 0
 #ACT
 ;设置精炼装备的部位
 MOV M50 0
 
 #IF
 CHECKUSEITEM <$STR(M50)>
 #ACT
 #ELSEACT
 messagebox 请将你要精炼的装备:〖衣服〗带到身上!\
 break
 
 #IF
 #ACT
 ;获得衣服名字
 ;格式: GetUserIteMNaMe 位置(0-12) S变量(0-99)
 GetUserIteMNaMe <$STR(M50)> 50
 MOV M61 0
 goto @衣服_检测图片信息
 
 [@衣服_检测图片信息]
 #IF
 CHECKLEVELEX > 0
 #ACT
 GetListString .\QuestDiary\www.uc955.com\衣服图片库.txt <$STR(M61)> S60 M60
 
 #IF
 EQUAL S60 <$STR(S50)>
 #ACT
 MOV S53 <Img:
 INC S53 <$STR(M60)>
 INC S53 :1:1:-108>
 MOV M61 0
 goto @衣服_检测物品信息
 BREAK
 
 #IF
 EQUAL S60 END
 #ACT
 messagebox 该装备【<$STR(S50)>】为特殊装备,无法精炼!
 BREAK
 
 #IF
 CHECKLEVELEX > 0
 #ACT
 INC M61 1
 GOTO @衣服_检测图片信息
 BREAK
 
 [@衣服_检测物品信息]
 #if
 ;如果已经是紫色发光装备
 CheckItemNameColor <$STR(M50)> 253
 #ACT
 CloseBigDialogBox
 close
 BREAK
 #SAY
 您的衣服已经紫色传说级装备!\
 请好好珍惜!\
 <确定/@EXIT>
 
 #IF
 CHECKLEVELEX > 0
 #ACT
 MOV S51 白色
 MOV M52 3
 MOV M58 3
 MOV M53 50
 MOV M57 180
 MOV S83 蓝色优良装备
 MOV S54 成为蓝色的
 INC S54 <优良装备
 INC S54 /SCOLOR=180
 INC S54 >
 MOV S52 <
 INC S52 <$STR(S50)>
 INC S52 /SCOLOR=255
 INC S52 >
 
 #IF
 CheckItemNameColor <$STR(M50)> 180
 #ACT
 MOV S51 蓝色
 MOV M52 4
 MOV M58 3
 MOV M53 80
 MOV M57 250
 MOV S83 绿色精致装备
 MOV S54 成为绿色的
 INC S54 <精致装备
 INC S54 /SCOLOR=250
 INC S54 >
 MOV S52 <
 INC S52 <$STR(S50)>
 INC S52 /SCOLOR=180
 INC S52 >
 
 #IF
 CheckItemNameColor <$STR(M50)> 250
 #ACT
 MOV S51 绿色
 MOV M52 5
 MOV M58 4
 MOV M53 144
 MOV M57 70
 MOV S83 橙色完美装备
 MOV S54 成为橙色的
 INC S54 <完美装备
 INC S54 /SCOLOR=70
 INC S54 >
 MOV S52 <
 INC S52 <$STR(S50)>
 INC S52 /SCOLOR=250
 INC S52 >
 
 #IF
 CheckItemNameColor <$STR(M50)> 70
 #ACT
 MOV S51 橙色
 MOV M52 6
 MOV M58 4
 MOV M53 216
 MOV M57 249
 MOV S83 红色稀世装备
 MOV S54 成为红色的
 INC S54 <稀世装备
 INC S54 /SCOLOR=249
 INC S54 >
 MOV S52 <
 INC S52 <$STR(S50)>
 INC S52 /SCOLOR=70
 INC S52 >
 
 #IF
 CheckItemNameColor <$STR(M50)> 249
 #ACT
 MOV S51 红色
 MOV M52 8
 MOV M58 5
 MOV M53 300
 MOV M57 245
 MOV S83 紫色史诗装备
 MOV S54 成为紫色的
 INC S54 <史诗装备
 INC S54 /SCOLOR=245
 INC S54 >
 MOV S52 <
 INC S52 <$STR(S50)>
 INC S52 /SCOLOR=249
 INC S52 >
 
 #IF
 CheckItemNameColor <$STR(M50)> 245
 #ACT
 MOV S51 紫色
 MOV M52 10
 MOV M58 6
 MOV M53 420
 MOV M57 253
 MOV S83 发光的传说装备
 MOV S54 成为发光的
 INC S54 <传说装备
 INC S54 /SCOLOR=253
 INC S54 >
 MOV S52 <
 INC S52 <$STR(S50)>
 INC S52 /SCOLOR=245
 INC S52 >
 
 #IF
 #ACT
 goto @衣服_材料图片信息
 
 [@衣服_材料图片信息]
 #if
 CHECKVAR HUMAN Stone1 > 0
 CHECKVAR HUMAN StName1 = 玄天神石
 #ACT
 MOV S71 <
 INC S71 Img:1373:1:-3:-179>
 MOV S77 <
 INC S77 Img:109:0:-1:-8/@衣服_取回材料1
 INC S77 >
 #if
 CHECKVAR HUMAN Stone1 > 0
 CHECKVAR HUMAN StName1 = 补天神石
 #act
 MOV S71 <
 INC S71 Img:1372:1:-3:-179>
 MOV S77 <
 INC S77 Img:109:0:-1:-8/@衣服_取回材料1
 INC S77 >
 
 #if
 CHECKVAR HUMAN Stone2 > 0
 CHECKVAR HUMAN StName2 = 玄天神石
 #act
 MOV S72 <
 INC S72 Img:1373:1:-17:-167>
 MOV S78 <
 INC S78 Img:109:0:-8:4/@衣服_取回材料2
 INC S78 >
 #if
 CHECKVAR HUMAN Stone2 > 0
 CHECKVAR HUMAN StName2 = 补天神石
 #act
 MOV S72 <
 INC S72 Img:1372:1:-17:-167>
 MOV S78 <
 INC S78 Img:109:0:-8:4/@衣服_取回材料2
 INC S78 >
 
 #if
 CHECKVAR HUMAN Stone3 > 0
 CHECKVAR HUMAN StName3 = 玄天神石
 #act
 MOV S73 <
 INC S73 Img:1373:1:-8:-182>
 MOV S79 <
 INC S79 Img:109:0:-5:4/@衣服_取回材料3
 INC S79 >
 #if
 CHECKVAR HUMAN Stone3 > 0
 CHECKVAR HUMAN StName3 = 补天神石
 #act
 MOV S73 <
 INC S73 Img:1372:1:-8:-182>
 MOV S79 <
 INC S79 Img:109:0:-5:4/@衣服_取回材料3
 INC S79 >
 
 #if
 CHECKVAR HUMAN Stone4 > 0
 CHECKVAR HUMAN StName4 = 玄天神石
 #act
 MOV S74 <
 INC S74 Img:1373:1:-17:-138>
 MOV S80 <
 INC S80 Img:109:0:-8:1/@衣服_取回材料4
 INC S80 >
 #if
 CHECKVAR HUMAN Stone4 > 0
 CHECKVAR HUMAN StName4 = 补天神石
 #act
 MOV S74 <
 INC S74 Img:1372:1:-17:-138>
 MOV S80 <
 INC S80 Img:109:0:-8:1/@衣服_取回材料4
 INC S80 >
 
 #if
 CHECKVAR HUMAN Stone5 > 0
 CHECKVAR HUMAN StName5 = 玄天神石
 #act
 MOV S75 <
 INC S75 Img:1373:1:-8:-154>
 MOV S81 <
 INC S81 Img:109:0:-5:1/@衣服_取回材料5
 INC S81 >
 #if
 CHECKVAR HUMAN Stone5 > 0
 CHECKVAR HUMAN StName5 = 补天神石
 #act
 MOV S75 <
 INC S75 Img:1372:1:-8:-154>
 MOV S81 <
 INC S81 Img:109:0:-5:1/@衣服_取回材料5
 INC S81 >
 
 #if
 CHECKVAR HUMAN Stone6 > 0
 CHECKVAR HUMAN StName6 = 玄天神石
 #act
 MOV S76 <
 INC S76 Img:1373:1:-3:-146>
 MOV S82 <
 INC S82 Img:109:0:-1:-7/@衣服_取回材料6
 INC S82 >
 #if
 CHECKVAR HUMAN Stone6 > 0
 CHECKVAR HUMAN StName6 = 补天神石
 #act
 MOV S76 <
 INC S76 Img:1372:1:-3:-146>
 MOV S82 <
 INC S82 Img:109:0:-1:-7/@衣服_取回材料6
 INC S82 >
 #IF
 #ACT
 goto @衣服_成功率计算
 
 ;-------------------------------------------------------------------------------------
 ;-------------------------------------------------------------------------------------
 [@衣服_精炼界面]
 #IF
 LARGE M51 0
 #ACT
 ;SENDMSG 6 S55:<$STR(S55)>
 MOV M1 <$STR(M51)>
 MUL M1 <$STR(M51)> <$STR(M52)>
 INC M1 100
 
 #IF
 LARGE M1 0
 SMALL M1 200
 #ACT
 MOV M1 1
 
 #IF
 LARGE M1 199
 #ACT
 DIV M1 <$STR(M1)> 200
 
 #IF
 CheckJob Warrior
 LARGE M1 0
 #ACT
 MOV S1 <攻击+
 INC S1 <$STR(M1)> 物防+<$STR(M1)> 魔防+<$STR(M1)>
 INC S1 /SCOLOR=250
 INC S1 >
 
 #IF
 CheckJob Wizard
 LARGE M1 0
 #ACT
 MOV S1 <魔法+
 INC S1 <$STR(M1)> 物防+<$STR(M1)> 魔防+<$STR(M1)>
 INC S1 /SCOLOR=250
 INC S1 >
 
 #IF
 CheckJob Taoist
 LARGE M1 0
 #ACT
 MOV S1 <道术+
 INC S1 <$STR(M1)> 物防+<$STR(M1)> 魔防+<$STR(M1)>
 INC S1 /SCOLOR=250
 INC S1 >
 
 #IF
 LARGE M51 0
 #ACT
 ;SENDMSG 6 S55:<$STR(S55)>
 MOV M2 <$STR(M51)>
 MUL M2 <$STR(M51)> <$STR(M58)>
 INC M2 50
 
 #IF
 LARGE M2 0
 SMALL M2 100
 #ACT
 MOV M2 1
 
 #IF
 LARGE M2 99
 #ACT
 DIV M2 <$STR(M2)> 100
 
 #IF
 LARGE M2 0
 #ACT
 MOV S2 <物理伤害减少+
 INC S2 <$STR(M2)>
 INC S2 %
 INC S2 /SCOLOR=254
 INC S2 >
 
 #IF
 LARGE M51 0
 #ACT
 CloseBigDialogBox
 #SAY
 <$STR(S77)>\
 <$STR(S78)>          <$STR(S79)>  <装备名称/SCOLOR=100>:<$STR(S52)> \
 <成功率:/SCOLOR=100>{<$STR(M51)>/SCOLOR=58}<%/SCOLOR=58> \
 <基础属性:/SCOLOR=100><$STR(S1)>\
 <元素属性:/SCOLOR=100><$STR(S2)>\
 <$STR(S80)>          <$STR(S81)>  <升级成功:/SCOLOR=100><$STR(S54)>\
 \
 <$STR(S82)>\
 <Img:108:0:-3:-7/@衣服_确定精炼>\
 <Img:107:0:-22:-156>\
 <$STR(S53)>\
 <$STR(S71)>\
 <$STR(S72)>\
 <$STR(S73)>\
 <$STR(S74)>\
 <$STR(S75)>\
 <$STR(S76)>\
 \
 #ELSEACT
 CloseBigDialogBox
 #ELSESAY
 <$STR(S77)>\
 <$STR(S78)>          <$STR(S79)>  <装备名称/SCOLOR=100>:<$STR(S52)> \
 <成功率:/SCOLOR=100><$STR(M51)>% \
 <升级成功:/SCOLOR=100><$STR(S54)>\
 <升级失败:/SCOLOR=100>装备属性不变\
 <$STR(S80)>          <$STR(S81)>\
 <$STR(S55)>\
 <$STR(S82)>\
 <Img:108:0:-3:-7/@衣服_确定精炼>\
 <Img:107:0:-22:-156>\
 <$STR(S53)>\
 <$STR(S71)>\
 <$STR(S72)>\
 <$STR(S73)>\
 <$STR(S74)>\
 <$STR(S75)>\
 <$STR(S76)>\
 \
 ;--------------------------------------------------
 ;@衣服_材料1
 ;--------------------------------------------------
 [@衣服_材料1]
 #IF
 CHECKLEVELEX > 0
 #ACT
 MOV M54 1
 MOV S62 S71
 OpenItemBoxEx 50 1 放入〖精炼材料〗
 
 ;--------------------------------------------------
 ;@衣服_材料2
 ;--------------------------------------------------
 [@衣服_材料2]
 #IF
 CHECKLEVELEX > 0
 #ACT
 MOV M54 2
 MOV S62 S72
 OpenItemBoxEx 50 1 放入〖精炼材料〗
 ;--------------------------------------------------
 ;@衣服_材料3
 ;--------------------------------------------------
 [@衣服_材料3]
 
 #IF
 CHECKLEVELEX > 0
 #ACT
 MOV M54 3
 MOV S62 S73
 OpenItemBoxEx 50 1 放入〖精炼材料〗
 ;--------------------------------------------------
 ;@衣服_材料4
 ;--------------------------------------------------
 [@衣服_材料4]
 #IF
 CHECKLEVELEX > 0
 #ACT
 MOV M54 4
 MOV S62 S74
 OpenItemBoxEx 50 1 放入〖精炼材料〗
 ;--------------------------------------------------
 ;@衣服_材料5
 ;--------------------------------------------------
 [@衣服_材料5]
 #IF
 CHECKLEVELEX > 0
 #ACT
 MOV M54 5
 MOV S62 S75
 OpenItemBoxEx 50 1 放入〖精炼材料〗
 ;--------------------------------------------------
 ;@衣服_材料6
 ;--------------------------------------------------
 [@衣服_材料6]
 #IF
 CHECKLEVELEX > 0
 #ACT
 MOV M54 6
 MOV S62 S76
 OpenItemBoxEx 50 1 放入〖精炼材料〗
 ;--------------------------------------------------------------------
 ;--------------------------------------------------------------------
 ;开启添加材料的界面:序号50
 ;--------------------------------------------------------------------
 ;--------------------------------------------------------------------
 [@GetBoxIteM50]
 #IF
 EQUAL S0 玄天神石
 #ACT
 sendmsg 6 S0:<$STR(S0)>
 goto @衣服_材料数据
 BREAK
 #IF
 EQUAL S0 补天神石
 #ACT
 goto @衣服_材料数据
 BREAK
 #ELSEact
 ReclaimItem
 ;MOV M61 <$STR(N0)>
 ;DIV M61 <$STR(M61)> 1000
 ;Gmexecute GiveMine <$STR(S0)> 1 <$STR(M61)>
 messagebox 精炼材料必需是【玄天神石】或【补天神石】!
 BREAK
 
 [@衣服_材料数据]
 #IF
 EQUAL M54 0
 #ACT
 ReclaimItem
 messagebox 精炼材料数据发生变化!
 goto @MAIN
 BREAK
 
 #IF
 EQUAL S0 玄天神石
 EQUAL S62 S71
 #ACT
 MOV S63 Img:1373:1:-3:-179
 MOV S77 <
 INC S77 Img:109:0:-1:-8/@衣服_取回材料1
 INC S77 >
 #IF
 EQUAL S0 补天神石
 EQUAL S62 S71
 #ACT
 MOV S63 Img:1372:1:-3:-179
 MOV S77 <
 INC S77 Img:109:0:-1:-8/@衣服_取回材料1
 INC S77 >
 
 #IF
 EQUAL S0 玄天神石
 EQUAL S62 S72
 #ACT
 MOV S63 Img:1373:1:-17:-167
 MOV S78 <
 INC S78 Img:109:0:-8:4/@衣服_取回材料2
 INC S78 >
 #IF
 EQUAL S0 补天神石
 EQUAL S62 S72
 #ACT
 MOV S63 Img:1372:1:-17:-167
 MOV S78 <
 INC S78 Img:109:0:-8:4/@衣服_取回材料2
 INC S78 >
 
 #IF
 EQUAL S0 玄天神石
 EQUAL S62 S73
 #ACT
 MOV S63 Img:1373:1:-8:-182
 MOV S79 <
 INC S79 Img:109:0:-5:4/@衣服_取回材料3
 INC S79 >
 #IF
 EQUAL S0 补天神石
 EQUAL S62 S73
 #ACT
 MOV S63 Img:1372:1:-8:-182
 MOV S79 <
 INC S79 Img:109:0:-5:4/@衣服_取回材料3
 INC S79 >
 
 #IF
 EQUAL S0 玄天神石
 EQUAL S62 S73
 #ACT
 MOV S63 Img:1373:1:-8:-182
 #IF
 EQUAL S0 补天神石
 EQUAL S62 S73
 #ACT
 MOV S63 Img:1372:1:-8:-182
 
 #IF
 EQUAL S0 玄天神石
 EQUAL S62 S74
 #ACT
 MOV S63 Img:1373:1:-17:-138
 MOV S80 <
 INC S80 Img:109:0:-8:1/@衣服_取回材料4
 INC S80 >
 #IF
 EQUAL S0 补天神石
 EQUAL S62 S74
 #ACT
 MOV S63 Img:1372:1:-17:-138
 MOV S80 <
 INC S80 Img:109:0:-8:1/@衣服_取回材料4
 INC S80 >
 
 #IF
 EQUAL S0 玄天神石
 EQUAL S62 S75
 #ACT
 MOV S63 Img:1373:1:-8:-154
 MOV S81 <
 INC S81 Img:109:0:-5:1/@衣服_取回材料5
 INC S81 >
 #IF
 EQUAL S0 补天神石
 EQUAL S62 S75
 #ACT
 MOV S63 Img:1372:1:-8:-154
 MOV S81 <
 INC S81 Img:109:0:-5:1/@衣服_取回材料5
 INC S81 >
 
 #IF
 EQUAL S0 玄天神石
 EQUAL S62 S76
 #ACT
 MOV S63 Img:1373:1:-3:-146
 MOV S82 <
 INC S82 Img:109:0:-1:-7/@衣服_取回材料6
 INC S82 >
 #IF
 EQUAL S0 补天神石
 EQUAL S62 S76
 #ACT
 MOV S63 Img:1372:1:-3:-146
 MOV S82 <
 INC S82 Img:109:0:-1:-7/@衣服_取回材料6
 INC S82 >
 ;--------------------------------------------------------------------------
 
 #if
 CHECKLEVELEX > 0
 #act
 MOV S61 Stone
 INC S61 <$STR(M54)>
 MOV M60 <$STR(N0)>
 DIV M60 <$STR(M60)> 1000
 MOV S64 StName
 INC S64 <$STR(M54)>
 ;S61对应矿石品质
 ;S64对应矿石名称
 MOV HUMAN <$STR(S61)> <$STR(M60)>
 SAVEVAR HUMAN <$STR(S61)> ..\QuestDiary\变量数据\精炼矿石.txt
 MOV HUMAN <$STR(S64)> <$STR(S0)>
 SAVEVAR HUMAN <$STR(S64)> ..\QuestDiary\变量数据\精炼矿石名.txt
 SENDMSG 6 你放入了<$STR(S0)>,品质为:<$STR(M60)>
 ;S62 图片位置编号,S63对应图片坐标
 MOV <$STR(S62)> <
 INC <$STR(S62)> <$STR(S63)>
 INC <$STR(S62)> >
 close
 goto @衣服_精炼
 Break
 
 ;-------------------------------------------------------------------------
 ;-------------------------------------------------------------------------
 ;衣服_成功率计算
 ;-------------------------------------------------------------------------
 ;-------------------------------------------------------------------------
 [@衣服_成功率计算]
 #if
 CHECKLEVELEX > 0
 #act
 MOV M62 1
 #if
 CHECKVAR HUMAN Stone1 > 0
 CHECKVAR HUMAN StName1 = 玄天神石
 #ACT
 INC M62 <$HUMAN(Stone1)>
 #if
 CHECKVAR HUMAN Stone1 > 0
 CHECKVAR HUMAN StName1 = 补天神石
 #act
 INC M62 <$HUMAN(Stone1)>
 INC M62 <$HUMAN(Stone1)>
 INC M62 <$HUMAN(Stone1)>
 
 #if
 CHECKVAR HUMAN Stone2 > 0
 CHECKVAR HUMAN StName2 = 玄天神石
 #act
 INC M62 <$HUMAN(Stone2)>
 #if
 CHECKVAR HUMAN Stone2 > 0
 CHECKVAR HUMAN StName2 = 补天神石
 #act
 INC M62 <$HUMAN(Stone2)>
 INC M62 <$HUMAN(Stone2)>
 INC M62 <$HUMAN(Stone2)>
 
 #if
 CHECKVAR HUMAN Stone3 > 0
 CHECKVAR HUMAN StName3 = 玄天神石
 #act
 INC M62 <$HUMAN(Stone3)>
 #if
 CHECKVAR HUMAN Stone3 > 0
 CHECKVAR HUMAN StName3 = 补天神石
 #act
 INC M62 <$HUMAN(Stone3)>
 ;相当于补天神石是玄天神石的3倍效果,所以再加2次
 INC M62 <$HUMAN(Stone3)>
 INC M62 <$HUMAN(Stone3)>
 
 #if
 CHECKVAR HUMAN Stone4 > 0
 CHECKVAR HUMAN StName4 = 玄天神石
 #act
 INC M62 <$HUMAN(Stone4)>
 #if
 CHECKVAR HUMAN Stone4 > 0
 CHECKVAR HUMAN StName4 = 补天神石
 #act
 INC M62 <$HUMAN(Stone4)>
 ;相当于补天神石是玄天神石的3倍效果,所以再加2次
 INC M62 <$HUMAN(Stone4)>
 INC M62 <$HUMAN(Stone4)>
 
 #if
 CHECKVAR HUMAN Stone5 > 0
 CHECKVAR HUMAN StName5 = 玄天神石
 #act
 INC M62 <$HUMAN(Stone5)>
 #if
 CHECKVAR HUMAN Stone5 > 0
 CHECKVAR HUMAN StName5 = 补天神石
 #act
 INC M62 <$HUMAN(Stone5)>
 ;相当于补天神石是玄天神石的3倍效果,所以再加2次
 INC M62 <$HUMAN(Stone5)>
 INC M62 <$HUMAN(Stone5)>
 
 #if
 CHECKVAR HUMAN Stone6 > 0
 CHECKVAR HUMAN StName6 = 玄天神石
 #act
 INC M62 <$HUMAN(Stone6)>
 #if
 CHECKVAR HUMAN Stone6 > 0
 CHECKVAR HUMAN StName6 = 补天神石
 #act
 INC M62 <$HUMAN(Stone6)>
 ;相当于补天神石是玄天神石的3倍效果,所以再加2次
 INC M62 <$HUMAN(Stone6)>
 INC M62 <$HUMAN(Stone6)>
 
 #if
 CHECKLEVELEX > 0
 #act
 DEC M62 1
 
 #IF
 #ACT
 goto @衣服_确认成功率
 | 
 |