请选择 进入手机版 | 继续访问电脑版

传奇版本精炼元素脚本

[复制链接]
查看15 | 回复0 | 2021-11-13 18:26:23 | 显示全部楼层 |阅读模式
精炼元素脚本,由传奇一条龙制作,并提供给GM部落发布 希望对大家做版本的时候有所帮助

[@衣服_精炼]
{
;-----------------变量说明----------------------------------------------
;引擎内部使用的(P G M I A S N D)变量
;255衣服白色
;180衣服蓝色
;250衣服绿色
;70衣服橙色
;249衣服红色
;245衣服暗紫色
;253衣服紫色
;第1颗图片[I]
;第2颗图片[I]
;第3颗图片[I]
;第4颗图片[I]
;第5颗图片[I]
;第6颗图片[I]
;数字变量从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
MOV S78
MOV S79
MOV S80
MOV S81
MOV S82
#IF
CHECKLEVELEX > 0
#ACT
;设置精炼装备的部位
MOV M50 0
#IF
CHECKUSEITEM
#ACT
#ELSEACT
messagebox 请将你要精炼的装备:〖衣服〗带到身上!\
break
#IF
#ACT
;获得衣服名字
;格局: GetUserIteMNaMe 位置(0-12) S变量(0-99)
GetUserIteMNaMe  50
MOV M61 0
goto @衣服_检测图片信息
[@衣服_检测图片信息]
#IF
CHECKLEVELEX > 0
#ACT
GetListString .\QuestDiary\物品资料库\衣服图片库.txt  S60 M60
#IF
EQUAL S60
#ACT
MOV S53 [I]
INC S53 :1:1:-108>
MOV M61 0
goto @衣服_检测物品信息
BREAK
#IF
EQUAL S60 END
#ACT
messagebox 该装备【】为特殊装备,无法精炼!
BREAK
#IF
CHECKLEVELEX > 0
#ACT
INC M61 1
GOTO @衣服_检测图片信息
BREAK

[@衣服_检测物品信息]
#if
;假如已经是紫色发光装备
CheckItemNameColor  253
#ACT
CloseBigDialogBox
close
BREAK
#SAY
您的衣服已经紫色传说级装备!\
请好好珍惜!\

#IF
CHECKLEVELEX > 0
#ACT
MOV S51 白色
MOV M52 3
MOV M58 3
MOV M53 50
MOV M57 180
MOV S83 蓝色优良装备
MOV S54 成为蓝色的
INC S54
MOV S52
INC S52 /SCOLOR=255
INC S52 >
#IF
CheckItemNameColor  180
#ACT
MOV S51 蓝色
MOV M52 4
MOV M58 3
MOV M53 80
MOV M57 250
MOV S83 绿色精致装备
MOV S54 成为绿色的
INC S54
MOV S52
INC S52 /SCOLOR=180
INC S52 >
#IF
CheckItemNameColor  250
#ACT
MOV S51 绿色
MOV M52 5
MOV M58 4
MOV M53 144
MOV M57 70
MOV S83 橙色完美装备
MOV S54 成为橙色的
INC S54
MOV S52
INC S52 /SCOLOR=250
INC S52 >
#IF
CheckItemNameColor  70
#ACT
MOV S51 橙色
MOV M52 6
MOV M58 4
MOV M53 216
MOV M57 249
MOV S83 红色稀世装备
MOV S54 成为红色的
INC S54
MOV S52
INC S52 /SCOLOR=70
INC S52 >
#IF
CheckItemNameColor  249
#ACT
MOV S51 红色
MOV M52 8
MOV M58 5
MOV M53 300
MOV M57 245
MOV S83 紫色史诗装备
MOV S54 成为紫色的
INC S54
MOV S52
INC S52 /SCOLOR=249
INC S52 >

#IF
CheckItemNameColor  245
#ACT
MOV S51 紫色
MOV M52 10
MOV M58 6
MOV M53 420
MOV M57 253
MOV S83 发光的传说装备
MOV S54 成为发光的
INC S54
MOV S52
INC S52 /SCOLOR=245
INC S52 >
#IF
#ACT
goto @衣服_材料图片信息

[@衣服_材料图片信息]
#if
CHECKVAR HUMAN Stone1 > 0
CHECKVAR HUMAN StName1 = 玄天神石
#ACT
MOV S71
MOV S77
#if
CHECKVAR HUMAN Stone1 > 0
CHECKVAR HUMAN StName1 = 补天神石
#act
MOV S71
MOV S77
#if
CHECKVAR HUMAN Stone2 > 0
CHECKVAR HUMAN StName2 = 玄天神石
#act
MOV S72
MOV S78
#if
CHECKVAR HUMAN Stone2 > 0
CHECKVAR HUMAN StName2 = 补天神石
#act
MOV S72
MOV S78

#if
CHECKVAR HUMAN Stone3 > 0
CHECKVAR HUMAN StName3 = 玄天神石
#act
MOV S73
MOV S79
#if
CHECKVAR HUMAN Stone3 > 0
CHECKVAR HUMAN StName3 = 补天神石
#act
MOV S73
MOV S79
#if
CHECKVAR HUMAN Stone4 > 0
CHECKVAR HUMAN StName4 = 玄天神石
#act
MOV S74
MOV S80
#if
CHECKVAR HUMAN Stone4 > 0
CHECKVAR HUMAN StName4 = 补天神石
#act
MOV S74
MOV S80
#if
CHECKVAR HUMAN Stone5 > 0
CHECKVAR HUMAN StName5 = 玄天神石
#act
MOV S75
MOV S81
#if
CHECKVAR HUMAN Stone5 > 0
CHECKVAR HUMAN StName5 = 补天神石
#act
MOV S75
MOV S81
#if
CHECKVAR HUMAN Stone6 > 0
CHECKVAR HUMAN StName6 = 玄天神石
#act
MOV S76
MOV S82
#if
CHECKVAR HUMAN Stone6 > 0
CHECKVAR HUMAN StName6 = 补天神石
#act
MOV S76
MOV S82
#IF
#ACT
goto @衣服_成功率计算
;-------------------------------------------------------------------------------------
;-------------------------------------------------------------------------------------
[@衣服_精炼界面]
#IF
LARGE M51 0
#ACT
;SENDMSG 6 S55:
MOV M1
MUL M1  
INC M1 100
#IF
LARGE M1 0
SMALL M1 200
#ACT
MOV M1 1
#IF
LARGE M1 199
#ACT
DIV M1  200
#IF
CheckJob Warrior
LARGE M1 0
#ACT
MOV S1  物防+ 魔防+
INC S1 /SCOLOR=250
INC S1 >
#IF
CheckJob Wizard
LARGE M1 0
#ACT
MOV S1  物防+ 魔防+
INC S1 /SCOLOR=250
INC S1 >
#IF
CheckJob Taoist
LARGE M1 0
#ACT
MOV S1  物防+ 魔防+
INC S1 /SCOLOR=250
INC S1 >
#IF
LARGE M51 0
#ACT
;SENDMSG 6 S55:
MOV M2
MUL M2  
INC M2 50
#IF
LARGE M2 0
SMALL M2 100
#ACT
MOV M2 1
#IF
LARGE M2 99
#ACT
DIV M2  100
#IF
LARGE M2 0
#ACT
MOV S2
INC S2 %
INC S2 /SCOLOR=254
INC S2 >
#IF
LARGE M51 0
#ACT
CloseBigDialogBox
#SAY
        \
           : \
                      {/SCOLOR=58} \
                      \
                      \
           \
                      \
        \
                                  [I]\
[I]\
        \
         \
 \
                    \
 \
                    \
         \
    \
#ELSEACT
CloseBigDialogBox
#ELSESAY
        \
           : \
                      % \
                      \
                      装备属性不变\
         \
                      \
        \
                                  [I]\
[I]\
        \
         \
 \
                    \
 \
                    \
         \
    \
;--------------------------------------------------
;@衣服_材料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:
goto @衣服_材料数据
BREAK
#IF
EQUAL S0 补天神石
#ACT
goto @衣服_材料数据
BREAK
#ELSEact
ReclaimItem
;MOV M61
;DIV M61  1000
;Gmexecute GiveMine  1
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
#IF
EQUAL S0 补天神石
EQUAL S62 S71
#ACT
MOV S63 Img:1372:1:-3:-179
MOV S77

#IF
EQUAL S0 玄天神石
EQUAL S62 S72
#ACT
MOV S63 Img:1373:1:-17:-167
MOV S78
#IF
EQUAL S0 补天神石
EQUAL S62 S72
#ACT
MOV S63 Img:1372:1:-17:-167
MOV S78
#IF
EQUAL S0 玄天神石
EQUAL S62 S73
#ACT
MOV S63 Img:1373:1:-8:-182
MOV S79
#IF
EQUAL S0 补天神石
EQUAL S62 S73
#ACT
MOV S63 Img:1372:1:-8:-182
MOV 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
#IF
EQUAL S0 补天神石
EQUAL S62 S74
#ACT
MOV S63 Img:1372:1:-17:-138
MOV S80
#IF
EQUAL S0 玄天神石
EQUAL S62 S75
#ACT
MOV S63 Img:1373:1:-8:-154
MOV S81
#IF
EQUAL S0 补天神石
EQUAL S62 S75
#ACT
MOV S63 Img:1372:1:-8:-154
MOV S81

#IF
EQUAL S0 玄天神石
EQUAL S62 S76
#ACT
MOV S63 Img:1373:1:-3:-146
MOV S82
#IF
EQUAL S0 补天神石
EQUAL S62 S76
#ACT
MOV S63 Img:1372:1:-3:-146
MOV S82
;--------------------------------------------------------------------------
#if
CHECKLEVELEX > 0
#act
MOV S61 Stone
INC S61
MOV M60
DIV M60  1000
MOV S64 StName
INC S64
;S61对应矿石品质
;S64对应矿石名称
MOV HUMAN  
SAVEVAR HUMAN  ..\QuestDiary\变量数据\精炼矿石.txt
MOV HUMAN  
SAVEVAR HUMAN  ..\QuestDiary\变量数据\精炼矿石名.txt
SENDMSG 6 你放入了,品质为:
;S62 图片位置编号,S63对应图片坐标
MOV   
INC  >
close
goto @衣服_精炼
Break
;-------------------------------------------------------------------------
;-------------------------------------------------------------------------
;衣服_成功率计算
;-------------------------------------------------------------------------
;-------------------------------------------------------------------------
[@衣服_成功率计算]
#if
CHECKLEVELEX > 0
#act
MOV M62 1
#if
CHECKVAR HUMAN Stone1 > 0
CHECKVAR HUMAN StName1 = 玄天神石
#ACT
INC M62
#if
CHECKVAR HUMAN Stone1 > 0
CHECKVAR HUMAN StName1 = 补天神石
#act
INC M62
INC M62
INC M62

#if
CHECKVAR HUMAN Stone2 > 0
CHECKVAR HUMAN StName2 = 玄天神石
#act
INC M62
#if
CHECKVAR HUMAN Stone2 > 0
CHECKVAR HUMAN StName2 = 补天神石
#act
INC M62
INC M62
INC M62
#if
CHECKVAR HUMAN Stone3 > 0
CHECKVAR HUMAN StName3 = 玄天神石
#act
INC M62
#if
CHECKVAR HUMAN Stone3 > 0
CHECKVAR HUMAN StName3 = 补天神石
#act
INC M62
;相称于补天神石是玄天神石的3倍效果,所以再加2次
INC M62
INC M62
#if
CHECKVAR HUMAN Stone4 > 0
CHECKVAR HUMAN StName4 = 玄天神石
#act
INC M62
#if
CHECKVAR HUMAN Stone4 > 0
CHECKVAR HUMAN StName4 = 补天神石
#act
INC M62
;相称于补天神石是玄天神石的3倍效果,所以再加2次
INC M62
INC M62
#if
CHECKVAR HUMAN Stone5 > 0
CHECKVAR HUMAN StName5 = 玄天神石
#act
INC M62
#if
CHECKVAR HUMAN Stone5 > 0
CHECKVAR HUMAN StName5 = 补天神石
#act
INC M62
;相称于补天神石是玄天神石的3倍效果,所以再加2次
INC M62
INC M62

#if
CHECKVAR HUMAN Stone6 > 0
CHECKVAR HUMAN StName6 = 玄天神石
#act
INC M62
#if
CHECKVAR HUMAN Stone6 > 0
CHECKVAR HUMAN StName6 = 补天神石
#act
INC M62
;相称于补天神石是玄天神石的3倍效果,所以再加2次
INC M62
INC M62
#if
CHECKLEVELEX > 0
#act
DEC M62 1
#IF
#ACT
goto @衣服_确认成功率
;---------------------------------------------------------
;衣服_再次确认成功率
;---------------------------------------------------------
;检测衣服相关信息
;255衣服白色
;180衣服蓝色
;250衣服绿色
;70衣服橙色
;249衣服红色
;245衣服暗紫色
;253衣服紫色
[@衣服_确认成功率]
#if
CHECKLEVELEX > 0
#ACT
;材料总品质
MUL M62  100
DIV M51  
goto @衣服_确认成功率B
[@衣服_确认成功率B]
#IF
LARGE M51 100
#ACT
MOV M51 100
#IF
EQUAL M55 1
#ACT
;SENDMSG 6 M55:
GOTO @衣服_确定精炼A
BREAK
#if
;假如成功率>75,则附加元素属性!
LARGE M51 0
#ACT
MOV S55
goto @衣服_精炼界面
BREAK
#ELSEACT
MOV S55
goto @衣服_精炼界面
BREAK
;-------------------------------------------------------------------------
;-------------------------------------------------------------------------
;衣服_进级
;盔甲
;0 防备
;1 魔御
;2 攻击
;3 魔法
;4 道术
;5-13 无效果
;14 持久
;-------------------------------------------------------------------------
;-------------------------------------------------------------------------
[@衣服_确定精炼]
#if
CHECKLEVELEX > 0
#ACT
MOV M55 1
goto @衣服_精炼
BREAK
;-------------------------------------------------------------------------
;-------------------------------------------------------------------------
[@衣服_确定精炼A]
#IF
CHECKLEVELEX > 0
#ACT
;设置已经点击进级按钮
MOV M55 0
;配合M66,模拟成功率百分数
MOVR M66 0 100
GOTO @材料进级后清零
#IF
SMALL M51
#ACT
BREAK
#SAY
晃若一梦,一切归于平寂,耀眼的白光擦过\
您的衣服没有得到进一步的强化!\
  \[/url]

#IF
CHECKLEVELEX > 0
#ACT
;设置成功数=原始满点M52*成功率M51/2,由于还防
MUL M52  
INC M52 100
DIV M52  200
;设置元素附加点=原始满点M58*成功率M51
MUL M58  
INC M58 50
DIV M58  100

#IF
SMALL M58 1
#ACT
MOV M58 1

#IF
SMALL M52 1
#ACT
MOV M52 1
#IF
CHECKLEVELEX > 0
#ACT
;成功起始动画图片序号
MOV M68 699
GOTO @衣服_确定精炼AA
[@衣服_确定精炼AA]
#IF
CHECKLEVELEX > 0
#ACT
;调束装备颜色
ChangeItemNameColor  
GuildNoticeMsg 255 253 [精炼]:一道华光划过,恭喜%s将自己的【】进级为【】!!!
#IF
CheckItemNameColor  245
#ACT
;将装备颜调整为发光
SetItemsLight  2

#IF
CheckJob Warrior
#ACT
MOV M56 2
GOTO @衣服_确定精炼B
BREAK

#IF
CheckJob Wizard
#ACT
MOV M56 3
GOTO @衣服_确定精炼B
BREAK
#ELSEACT
MOV M56 4
GOTO @衣服_确定精炼B
BREAK
;-------------------------------------------------------------------------
[@衣服_确定精炼B]
#IF
CHECKLEVELEX > 0
#ACT
;加对应职业攻击或魔法或道术
UPGRADEITEMEX   0 1 0
;加物防魔防
UPGRADEITEMEX  0 0 1 0
UPGRADEITEMEX  1 0 1 0
INC M61 1

#IF
CHECKLEVELEX > 0
#ACT
GOTO @衣服_确定精炼BB
[@衣服_确定精炼BB]
#IF
LARGE M61 10
#ACT
GOTO @衣服_确定精炼C
GOTO @衣服_精炼成功动画
BREAK
#IF
EQUAL M61
#ACT
MOV M61 0
GOTO @衣服_确定精炼C
GOTO @衣服_精炼成功动画
BREAK
#ELSEACT
GOTO @衣服_确定精炼B
[@衣服_确定精炼C]
#if
;假如成功率>0,则附加元素属性!
LARGE M51 0
#ACT
GOTO @衣服_附加元素属性
BREAK

[@衣服_精炼成功动画]
#IF
SMALL M68 711
#ACT
INC M68 1
MOV S65 [I]
INC S65 :3:-370:-127>
;SENDMSG 6 S65:
DelayCall 200 @衣服_精炼成功动画
#SAY
        \
           : \
                      % \
                      \
                      装备属性不变\
         \
                      \
        \
                                  [I]\
[I] \
        \
         \
 \
                    \
 \
                    \
         \
    \
#ELSEACT
ClearDelayGoto 0
goto @衣服_精炼
BREAK
;-----------------------------------------------------------------------
;-----------------------------------------------------------------------
;衣服_取回材料
;-----------------------------------------------------------------------
;-----------------------------------------------------------------------
[@衣服_取回材料1]
#if
CHECKVAR HUMAN Stone1 > 0
#act
#SAY
确定要取回品质为{/SCOLOR=146}的{/SCOLOR=146}吗?\
 \
  \
[@衣服_确定取回1]
#if
CHECKLEVELEX > 0
#act
Gmexecute GiveMine  1
SENDMSG 6 你取回了品质为:的!
MOV HUMAN Stone1 0
SAVEVAR HUMAN Stone1 ..\QuestDiary\变量数据\精炼矿石.txt
MOV HUMAN StName1
SAVEVAR HUMAN StName1 ..\QuestDiary\变量数据\精炼矿石名.txt
goto @衣服_精炼
BREAK
[@衣服_取回材料2]
#if
CHECKVAR HUMAN Stone2 > 0
#act
#SAY
确定要取回品质为{/SCOLOR=146}的{/SCOLOR=146}吗?\
 \
  \
[@衣服_确定取回2]
#if
CHECKLEVELEX > 0
#act
Gmexecute GiveMine  1
SENDMSG 6 你取回了品质为:的!
MOV HUMAN Stone2 0
SAVEVAR HUMAN Stone2 ..\QuestDiary\变量数据\精炼矿石.txt
MOV HUMAN StName2
SAVEVAR HUMAN StName2 ..\QuestDiary\变量数据\精炼矿石名.txt
goto @衣服_精炼
BREAK
[@衣服_取回材料3]
#if
CHECKVAR HUMAN Stone3 > 0
#act
#SAY
确定要取回品质为{/SCOLOR=146}的{/SCOLOR=146}吗?\
 \
  \
[@衣服_确定取回3]
#if
CHECKLEVELEX > 0
#act
Gmexecute GiveMine  1
SENDMSG 6 你取回了品质为:的!
MOV HUMAN Stone3 0
SAVEVAR HUMAN Stone3 ..\QuestDiary\变量数据\精炼矿石.txt
MOV HUMAN StName3
SAVEVAR HUMAN StName3 ..\QuestDiary\变量数据\精炼矿石名.txt
goto @衣服_精炼
BREAK
[@衣服_取回材料4]
#if
CHECKVAR HUMAN Stone4 > 0
#act
#SAY
确定要取回品质为{/SCOLOR=146}的{/SCOLOR=146}吗?\
 \
  \

[@衣服_确定取回4]
#if
CHECKLEVELEX > 0
#act
Gmexecute GiveMine  1
SENDMSG 6 你取回了品质为:的!
MOV HUMAN Stone4 0
SAVEVAR HUMAN Stone4 ..\QuestDiary\变量数据\精炼矿石.txt
MOV HUMAN StName4
SAVEVAR HUMAN StName4 ..\QuestDiary\变量数据\精炼矿石名.txt
goto @衣服_精炼
BREAK
[@衣服_取回材料5]
#if
CHECKVAR HUMAN Stone5 > 0
#act
#SAY
确定要取回品质为{/SCOLOR=146}的{/SCOLOR=146}吗?\
 \
  \

[@衣服_确定取回5]
#if
CHECKLEVELEX > 0
#act
Gmexecute GiveMine  1
SENDMSG 6 你取回了品质为:的!
MOV HUMAN Stone5 0
SAVEVAR HUMAN Stone5 ..\QuestDiary\变量数据\精炼矿石.txt
MOV HUMAN StName5
SAVEVAR HUMAN StName5 ..\QuestDiary\变量数据\精炼矿石名.txt
goto @衣服_精炼
BREAK
[@衣服_取回材料6]
#if
CHECKVAR HUMAN Stone6 > 0
#act
#SAY
确定要取回品质为{/SCOLOR=146}的{/SCOLOR=146}吗?\
 \

[@衣服_确定取回6]
#if
CHECKLEVELEX > 0
#act
Gmexecute GiveMine  1
SENDMSG 6 你取回了品质为:的!
MOV HUMAN Stone6 0
SAVEVAR HUMAN Stone6 ..\QuestDiary\变量数据\精炼矿石.txt
MOV HUMAN StName6
SAVEVAR HUMAN StName6 ..\QuestDiary\变量数据\精炼矿石名.txt
goto @衣服_精炼
BREAK
;--------------------------------------------------------
;材料进级后清零
;--------------------------------------------------------
[@材料进级后清零]
#if
CHECKLEVELEX > 0
#act
MOV HUMAN Stone6 0
SAVEVAR HUMAN Stone6 ..\QuestDiary\变量数据\精炼矿石.txt
MOV HUMAN Stone5 0
SAVEVAR HUMAN Stone5 ..\QuestDiary\变量数据\精炼矿石.txt
MOV HUMAN Stone4 0
SAVEVAR HUMAN Stone4 ..\QuestDiary\变量数据\精炼矿石.txt
MOV HUMAN Stone3 0
SAVEVAR HUMAN Stone3 ..\QuestDiary\变量数据\精炼矿石.txt
MOV HUMAN Stone2 0
SAVEVAR HUMAN Stone2 ..\QuestDiary\变量数据\精炼矿石.txt
MOV HUMAN Stone1 0
SAVEVAR HUMAN Stone1 ..\QuestDiary\变量数据\精炼矿石.txt
MOV HUMAN StName6
SAVEVAR HUMAN StName6 ..\QuestDiary\变量数据\精炼矿石名.txt
MOV HUMAN StName5
SAVEVAR HUMAN StName5 ..\QuestDiary\变量数据\精炼矿石名.txt
MOV HUMAN StName4
SAVEVAR HUMAN StName4 ..\QuestDiary\变量数据\精炼矿石名.txt
MOV HUMAN StName3
SAVEVAR HUMAN StName3 ..\QuestDiary\变量数据\精炼矿石名.txt
MOV HUMAN StName2
SAVEVAR HUMAN StName2 ..\QuestDiary\变量数据\精炼矿石名.txt
MOV HUMAN StName1
SAVEVAR HUMAN StName1 ..\QuestDiary\变量数据\精炼矿石名.txt
;--------------------------------------------------------
;附加特殊元素属性
;--------------------------------------------------------
[@衣服_附加元素属性]
#IF
EQUAL M50 0
#ACT
MOV M59 2

#IF
EQUAL M50 1
#ACT
MOV M59 0
#IF
EQUAL M50 3
#ACT
MOV M59 4
#IF
EQUAL M50 4
#ACT
#IF
EQUAL M50 5
#ACT
MOV M59 3
#IF
EQUAL M50 6
#ACT
MOV M59 3
#IF
EQUAL M50 7
#ACT
MOV M59 1
#IF
EQUAL M50 8
#ACT
MOV M59 1
#IF
EQUAL M50 10
#ACT
MOV M59 5
#IF
EQUAL M50 11
#ACT
MOV M59 2

#IF
EQUAL M50 12
#ACT
MOV M59 0

#IF
CHECKLEVELEX > 0
#ACT
goto @衣服_附加元素属性A

;格局: SetNewItemValue 位置(0-12) 属性(0-5) 操纵符(+,-,=) 值(1-100)
[@衣服_附加元素属性A]
#IF
CHECKLEVELEX > 0
#ACT
SetNewIteMValue   +
SENDMSG 6 恭喜,此次进级,您的装备额外获得了%的元素属性!
BREAK
}

传奇服务端版本附件下载说明 1、传奇GM论坛(WWW.DIYGM.COM)提供大量传奇版本服务端免费下载。
2、本站发布的传奇版本服务端,补丁素材,工具教程,登录器等全部均测试通过。
3、本站传奇相关资源附件以研究交流为目的,商业用途造成的后果与本站无关。
4、《传奇版本库》部分优质资源需要使用论坛会员下载或者金币下载。
获取金币方法:1、金币充值  2、免费获得传奇GM论坛基地金币。
回复

使用道具 举报

本版积分规则

154

主题

154

帖子

327

积分

不屈白银

Rank: 2

积分
327