GOM传奇引擎打捆成叠加材料传奇脚本，传奇解包成灵魂盒子方法示例

[@打捆仓库]

{

#IF
#ACT
CloseBigDialogBox
#Say
\　\　\　\　\
　　　　　　　<灵魂盒子/FCOLOR=146>　　　→　　<[点击打捆]成叠加材料/@Ksdk01x>\　\　\
　　　　　　<灵魂盒子[捆]/FCOLOR=146>　　→　　<[点击解包]成灵魂盒子/@Ksdk02x>\　\　\
<Img:363:1:3:4>\
　　　　<[提炼精粹]|154#毁掉装备，去除杂质^154#保留需要的精粹/@Main1>　<┆/FCOLOR=10>　<当前精粹数量：<$STR(U40)>|154#点击刷新{SCOLOR=154}/@打捆仓库>　<┆/FCOLOR=10>　<[提取]|154#[身上精粹]提取到背包/@@InPutinteger92(当前身上[精粹]为：<$Str(U40)>　请输入提取[精粹]的数量！)>　<┆/FCOLOR=10>　<[存入]|154#[背包精粹]储存在身上/@@InPutinteger93(请输入存入[精粹]的数量！)>\

[@Ksdk01x]
#IF
CheckItem灵魂盒子1
#Act
Take灵魂盒子1
Give灵魂盒子[捆]1

[@Ksdk02x]
#IF
CheckItem灵魂盒子[捆]1
#Act
Take灵魂盒子[捆]1
Give灵魂盒子1

[@InPutinteger92]
#OR
LARGEN9210000
SMALLN921
#ACT
MOVN92
Messagebox\【错误提示】:\\\　　　　　　请输入1-9999数量！
Break

#IF
LargeU400
#Act
MovN$扣除精粹数量0
MovN$给于精粹数量0
MovN$扣除精粹数量<$STR(N92)>
MovN$给于精粹数量<$STR(N92)>
MulN$扣除精粹数量1
MulN$给于精粹数量1
Give精粹<$STR(N92)>
DecU40<$STR(N92)>
Goto@打捆仓库
Messagebox\【成功操作】:\\\　　　　　　成功取出<$STR(N92)>精粹。！
Break
#ElseAct
MESSAGEBOX\【错误提示】:\\　　　　　　你没有<$STR(N92)>精粹，无法取出！
break

[@InPutinteger93]
#OR
LARGEN9310000
SMALLN931
#ACT
MOVN93
Messagebox\【错误提示】:\\\　　　　　　请输入1-9999数量！
Break

#IF
CheckItem精粹<$STR(N93)>
#Act
MovN$扣除背包精粹0
MovN$赋予精粹数量0
MovN$扣除背包精粹<$STR(N93)>
MovN$赋予精粹数量<$STR(N93)>
MulN$扣除背包精粹1
MulN$赋予精粹数量1
Take精粹<$STR(N93)>
IncU40<$STR(N93)>
Goto@打捆仓库
Messagebox\【成功操作】:\\\　　　　　　成功存入<$STR(N93)>精粹。！
Break
#ElseAct
MESSAGEBOX\【错误提示】:\\　　　　　　你没有<$STR(N93)>精粹，无法存出！
Break

;====================================================================================================================================================
;====================================================================================================================================================

[@Main1]
#IF
#ACT
#CALL[\功能文件\提炼精粹.txt]@提炼精粹

}