有画图这功夫，写都写好了
500金币太少，不想动手，留给需要的人。
爱我你就抱抱我 发表于 2022-4-28 18:38 有画图这功夫，写都写好了
你这是欺负新手，人家就是不会写才求助，又不是不想写。
czy7812 发表于 2022-4-28 23:16 你这是欺负新手，人家就是不会写才求助，又不是不想写。
那个复杂点的版本没有这样的脚本，自己抠出来改改就完成了
[@main]
#IF
CheckBoxItemCount 0
#ACT
#ELSEACT
ClearVar S1 4
#IF
#ACT
#SAY
<$STR(S3)>
#ACT
DelBoxItem 0
TAKE <$STR(S1)> <$STR(S2)>
GIVE <$STR(S4)>
GameGold - <$STR(S3)>
goto @main
#ELSEACT
MessageBox 材料不足
Break
[@ItemIntoBox0]
#IF
CheckContainsText ,生鸡,生鱼,生肉, ,<$BOXITEM.NAME>,
#ACT
#ELSEACT
UNALLOWITEMINTOBOX
MessageBox 禁止放入的物品
Break
#IF
EQUAL <$BOXITEM.NAME> 生鸡
#ACT
TextSplit , ,木材,5,10000,烤鸡 S1
goto @main
Break
#IF
EQUAL <$BOXITEM.NAME> 生鱼
#ACT
TextSplit , ,木材,6,20000,烤鱼 S1
goto @main
Break
#IF
EQUAL <$BOXITEM.NAME> 生肉
#ACT
TextSplit , ,木材,7,30000,烤肉 S1
goto @main
Break
没测试 自己试吧
[@MAIN]
#IF
#ACT
OPENMERCHANTBIGDLG 9 210 1 4 0 -80 0 0 0 1 最后必须是1
内容
[@显示重置]
#IF
#ACT
#SAY
OPENMERCHANTBIGDLG 9 210 1 4 0 -80 0 0 0 1 最后必须是1
\\