利用方法: Q-Function.txt中@BuyShopItem脚本段,
          购买的物品名字放在人物的S0变量中,物品价钱放在M0中.

[@BuyShopItem]
#IF
#ACT
SendMsg 5 %s经过商铺购买了<$STR(S0)>,价钱是:<$STR(M0)>