hswd 发表于 2024-7-16 13:27:05

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

[@打捆仓库]

{

#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] @提炼精粹

}
页: [1]
查看完整版本: GOM引擎打捆成叠加材料脚本,传奇SF解包成灵魂盒子方法示例