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

LARGE N92 10000

SMALL N92 1

#ACT

MOV N92

Messagebox \【错误提示】:\\\　　　　　　请输入1-9999数量！

Break

#IF

Large U40 0

#Act

Mov N$扣除精粹数量 0

Mov N$给于精粹数量 0

Mov N$扣除精粹数量 <$STR(N92)>

Mov N$给于精粹数量 <$STR(N92)>

Mul N$扣除精粹数量 1

Mul N$给于精粹数量 1

Give 精粹 <$STR(N92)>

Dec U40 <$STR(N92)>

Goto @打捆仓库

Messagebox \【成功操作】:\\\　　　　　　成功取出<$STR(N92)>精粹。！

Break

#ElseAct

MESSAGEBOX \【错误提示】:\\　　　　　　你没有<$STR(N92)>精粹，无法取出！

break

[@InPutinteger93]

#OR

LARGE N93 10000

SMALL N93 1

#ACT

MOV N93

Messagebox \【错误提示】:\\\　　　　　　请输入1-9999数量！

Break

#IF

CheckItem 精粹 <$STR(N93)>

#Act

Mov N$扣除背包精粹 0

Mov N$赋予精粹数量 0

Mov N$扣除背包精粹 <$STR(N93)>

Mov N$赋予精粹数量 <$STR(N93)>

Mul N$扣除背包精粹 1

Mul N$赋予精粹数量 1

Take 精粹 <$STR(N93)>

Inc U40 <$STR(N93)>

Goto @打捆仓库

Messagebox \【成功操作】:\\\　　　　　　成功存入<$STR(N93)>精粹。！

Break

#ElseAct

MESSAGEBOX \【错误提示】:\\　　　　　　你没有<$STR(N93)>精粹，无法存出！

Break

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

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

[@Main1]

#IF

#ACT

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

}