;;;QQ:67762207
[@道狐书籍]
{
#ACT
SetItemEvent 61 2 @Event_Main12

[@Event_Main12]
#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
check [594] 0
chkmagiclevel 召唤神兽 5
#ACT
actcmd TAKEITEMBYIDX %召唤道狐（秘籍）id
mov 召唤道狐（秘籍）id 0
set [594] 1
sysmsg "解印道狐技能修炼成功!"
break

}
;;;QQ:67762207
