;;;QQ:67762207
[@声望石]
{
#ACT
SetItemEvent 61 2 @Event_Main10

[@Event_Main10]
#IF
!Equal A9 "声望石"
#ACT
break

#ELSEACT
return false
mov 声望石id %P9
delaygoto [local] 1 @声望石_2
break


[@声望石_2]
#IF
checkcmd CHECKITEMINFO %声望石id 2
#ELSEACT
sysmsg "物品不存在."
break

#IF
#ACT
actcmd TAKEITEMBYIDX %声望石id
mov 声望石id 0
actcmd setfame + 5
sysmsg "获得声望5点."
break

}
;;;QQ:67762207
