傳奇版本精煉元素腳本

精煉元素腳本，由傳奇一條龍制作，并提供給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
}