|
|
现在是只放一个熔炼神铁材料(不叠加也能开孔!)
没想到怎样加个检测 自定义OK框3
CheckBoxItemCount 检测貌似跟没生效一样!
一脸懵逼!
[@打孔1]
#if
#act
mov S64 <$BOXITEM[2].STDMODE>
mov S68 <$BOXITEM[3].NAME>
SetUpgradeItem 2
#if
CheckTextList ..\\QuestDiary\\功能脚本\\熔炼神铁.txt <$STR(S68)>
#elseact
RECLAIMITEM
SENDMSG 5 请在第二个框里放上熔炼神铁!
break
#IF
CHECKGOLD 100000
#ACT
TAKE 金币 100000
MOVR N$开孔几率检测 100
#ELSEACT
MESSAGEBOX 金币不足!!
BREAK
#IF
CheckFluteCount boxitem2 = 0
CheckBoxItemCount 3 1
#ACT
DelBoxItem 3 1
MOV N$开孔成功率 5
MOV N$开孔个数 1
#IF
CheckFluteCount boxitem2 = 1
CheckBoxItemCount 3 2
#ACT
DelBoxItem 3 2
MOV N$开孔成功率 5
MOV N$开孔个数 2
#IF
CheckFluteCount boxitem2 = 2
CheckBoxItemCount 3 3
#ACT
DelBoxItem 3 3
MOV N$开孔成功率 5
MOV N$开孔个数 3
#IF
CheckFluteCount boxitem2 = 3
CheckBoxItemCount 3 4
#ACT
DelBoxItem 3 4
MOV N$开孔成功率 5
MOV N$开孔个数 4
#IF
CheckFluteCount boxitem2 = 4
CheckBoxItemCount 3 5
#ACT
DelBoxItem 3 5
MOV N$开孔成功率 5
MOV N$开孔个数 5
#IF
LARGE N$开孔成功率 <$STR(N$开孔几率检测)>
#ACT
SENDMSG 7 开孔成功:<$BOXITEM[2].NAME>获得第<$STR(N$开孔个数)>个镶嵌孔!!
SETFLUTECOUNT boxitem2 <$STR(N$开孔个数)>
goto @开孔222
ReturnBoxItem 2
ReturnBoxItem 3
#ELSEACT
SENDMSG 5 开孔失败!!
BREAK
#IF
CheckFluteCount boxitem2 > 4
#ACT
MESSAGEBOX [<$BOXITEM[2].NAME>]开孔已经达到最大值!!
ReturnBoxItem 2
BREAK
|
|