[@装备镶嵌]
#IF
NOT CheckBoxItemCount 0
#ACT
MESSAGEBOX 提示:请放入宝石!
BREAK
#IF
EQUAL S$打孔类型 武器
CheckFluteCount <$STR(N$装备位置)> > 1
CheckItemStoneCount <$STR(N$装备位置)> < 5
#ACT
MESSAGEBOX 提示:镶嵌<$BOXITEM[0].NAME>成功!
ItemFluteStoneEx <$STR(N$装备位置)> <$BOXITEM[0].NAME>
DelBoxItem 0
UpdateItem boxitem0
GOTO @武器开孔
RefreshBag
BREAK