10195 【香港】【越南】【主干】【砍树】新增消耗记录（代币获得、消耗记录；后台扣除货币支持扣代币；）

hxp

2024-07-03 a9039a33299cc764fb4225a9d49b15d10414cfb8

 ServerPython/ZoneServerGroup/map1_8G/MapServer/MapServerData/Script/Player/PlayerCoin.py

@@ -294,7 +294,7 @@
    eventName = addDRDict.get("eventName", "ExchangePayCoin")

    playerID = curPlayer.GetPlayerID()

    befPayCoin = PlayerControl.GetPayCoin(curPlayer)

    drDict = {ChConfig.Def_Give_Reason_SonKey:orderInfo, "payOrderType":payOrderType}

    drDict = {ChConfig.Def_Give_Reason_SonKey:orderInfo, "payOrderType":payOrderType, "orderInfo":orderInfo}

    PlayerControl.GiveMoney(curPlayer, ShareDefine.TYPE_Price_PayCoin, orderCoin, eventName, drDict)

    aftPayCoin = PlayerControl.GetPayCoin(curPlayer)

    GameWorld.Log("充值转化为代币: orderInfo=%s,orderCoin=%s,payOrderType=%s,eventName=%s,befPayCoin=%s,aftPayCoin=%s,errorInfo=%s" 

@@ -427,7 +427,7 @@
                    GameWorld.ErrLog("代币可不用于支付代币充值!appID=%s,orderInfo=%s" % (appID, orderInfo), curPlayer.GetPlayerID())

                    return

        #直接扣，类似充值扣钱，这里是发放物品，可能会有发放失败的当做 CTGError 处理

        if not PlayerControl.PayMoney(curPlayer, ShareDefine.TYPE_Price_PayCoin, orderCoin, eventName, {ChConfig.Def_Cost_Reason_SonKey:orderInfo}):

        if not PlayerControl.PayMoney(curPlayer, ShareDefine.TYPE_Price_PayCoin, orderCoin, eventName, {ChConfig.Def_Cost_Reason_SonKey:orderInfo, "orderInfo":orderInfo}):

            GameWorld.ErrLog("代币不足! appID=%s,orderInfo=%s,orderCoin=%s,curPayCoin=%s" 

                             % (appID, orderInfo, orderCoin, PlayerControl.GetPayCoin(curPlayer)), curPlayer.GetPlayerID())

            return

@@ -591,7 +591,7 @@
        playerID = curPlayer.GetPlayerID()

        befPayCoin = PlayerControl.GetPayCoin(curPlayer)

        if addGold and moneyType == ShareDefine.TYPE_Price_PayCoin:

            drDict = {ChConfig.Def_Give_Reason_SonKey:orderInfo, "payOrderType":payOrderType}

            drDict = {ChConfig.Def_Give_Reason_SonKey:orderInfo, "payOrderType":payOrderType, "orderInfo":orderInfo}

            PlayerControl.GiveMoney(curPlayer, moneyType, addGold, eventName, drDict)

        aftPayCoin = PlayerControl.GetPayCoin(curPlayer)

        GameWorld.Log("充值代币: orderInfo=%s,orderCoin=%s,payOrderType=%s,eventName=%s,befPayCoin=%s,aftPayCoin=%s"