[LUA] Repartition Consommation HC / HP...

[Seb13]

Hello à tous,

Des news sur la conso Global ?

Je ne l'ai plus, je suis seul dans ce cas ?

Merci d'avance de votre aide.

[Starnight]

Moi ca fonctionne. J'avais des problemes avec les graphiques sur les applis android mais c'est rentré dans l'ordre tout seul.

[Seb13]

Merci pour ton retour, cependant, j'ai toujours le problème

Chez moi, j'avais cette image ci-dessous avec le Status et Aujourd'hui en HC et HP.



Aujourd'hui, je ne vois que Aujourd'hui, plus de Status !!! je n'ai pas modifié le script.

Suis-je le seul dans ce cas ?

Merci de vos retours.

[jccourtoy]

Hello.

J'ai adapté ce script http://tisseurdetoile.net/blog/2016/201 ... oticz.html pour avoir le coût EDF:

Code : Tout sélectionner

------------------------------------------------------------------------------
--
-- Copyright © 2016 Le TisseurDeToile <webmaster@tisseurdetoile.net> and released under
-- the GNU General Public License, v2 or later.
-- NOTA : don't forget to create variable
--
-- Installation :
-- Créer les variables Utilisateurs suivantes : EDF_LAST, EDF_LAST_HC, EDF_LAST_HP
-- Créer deux capteur virtuel : Capteur electrique ent noter leur index
------------------------------------------------------------------------------
--
-- Tarif EDF 2016 TTC 9kVA
local prix_abonnement = 126.52
local prix_hc = 0.1150
local prix_hp = 0.1636
--
local capteurGlobal = 'EDF Total'
local debug = 'OUI'                 -- mode debug
local meter_base = 'EDF_LAST'
local flagHC = 'Heures creuses'
local delta = 0
local inc = 0 
local idxCptHP = '219' 
local idxCptHC = '220' 
local idxFacture   = '221' 
------------------------------------------------------------------------------
function round(x, n)
    n = math.pow(10, n or 0) 
    x = x * n 
    if x >= 0 then x = math.floor(x + 0.5) else x = math.ceil(x - 0.5) end
    return x / n
end


-- Fonction de mise à jour
function update(id, power, energy) 
    commandArray[inc]= {['UpdateDevice'] = id .. "|0|" .. power .. ";" .. energy} 
    inc = inc + 1 
    return  
end

commandArray = {}

if (devicechanged[capteurGlobal]) then
    
    conso_last = tonumber(uservariables['EDF_LAST'])
    
    if not conso_last then 
        conso_last = 0
    end
    
    -- Recuperation des valeurs du compteur global
    local consoCumule
    local consoInstant
    consoInstant, consoCumule = otherdevices_svalues[capteurGlobal]:match("([^;]+);([^;]+)")
    consoInstant = tonumber(consoInstant)
    consoCumule = tonumber(consoCumule)
    
    delta = consoCumule - conso_last
    
    commandArray['Variable:EDF_LAST'] = tostring(consoCumule)
    
        local conso_hc = tonumber(uservariables['EDF_LAST_HC'])
    local conso_hp = tonumber(uservariables['EDF_LAST_HP'])

    local factureHP = round(conso_hp * prix_hp / 1000, 2)
    local factureHC = round(conso_hc * prix_hc / 1000, 2)
    local factureAn = prix_abonnement + factureHP + factureHC

    if (debug == 'OUI') then
--      print('EDF>>> conso_last = '..tostring(conso_last))
--      print('EDF>>> delta   = '..tostring(delta))
        print('EDF>>> Instant = '..tostring(consoInstant) .. 'Wh')
--      print('EDF>>> Cumul   = '..tostring(consoCumule))
--      print('EDF>>> Prix abo = '..tostring(prix_abonnement))
        print('EDF>>> Conso HP TTC = ' .. tostring(round(conso_hp/1000),0) .. 'kWh / ' ..tostring(factureHP) .. '€')
        print('EDF>>> Conso HC TTC = ' .. tostring(round(conso_hc/1000),0) .. 'kWh / ' ..tostring(factureHC) .. '€')
        print('EDF>>> Facture  TTC = '..tostring(factureAn) .. '€')

--      if (otherdevices[flagHC] == 'On') then
--          print('EDF>>> Période : Heure Creuse')
--      else
--          print('EDF>>> Période : Heure Pleine')
--      end
    end

    if (otherdevices[flagHC] == 'On') then
        -- Periode heures creuse
        commandArray['Variable:EDF_LAST_HC'] = tostring(conso_hc + delta)
        update(idxCptHC, consoInstant, conso_hc)
        update(idxCptHP, 0, conso_hp)
    else
        commandArray['Variable:EDF_LAST_HP'] = tostring(conso_hp + delta)
        update(idxCptHP, consoInstant, conso_hp)
        update(idxCptHC, 0, conso_hc)
    end

    update(idxFacture, factureAn, factureAn)

end

return commandArray

    
    

Bonjour,

J'ai copier votre script pour calculer le prix consommer, juste j'ai une erreur sur le HP
ci apres mon soucis

2018-11-13 15:26:09.456 Status: LUA: EDF>>> conso_last = 12196490
2018-11-13 15:26:09.456 Status: LUA: EDF>>> delta = 0
2018-11-13 15:26:09.456 Status: LUA: EDF>>> Instant = 3943Wh
2018-11-13 15:26:09.456 Status: LUA: EDF>>> Cumul = 12196490
2018-11-13 15:26:09.456 Status: LUA: EDF>>> Prix abo = 43.67
2018-11-13 15:26:09.456 Status: LUA: EDF>>> Conso HP TTC = 12189kWh / 1579.84€
2018-11-13 15:26:09.456 Status: LUA: EDF>>> Conso HC TTC = 7kWh / 0.76€
2018-11-13 15:26:09.456 Status: LUA: EDF>>> Facture TTC = 1624.27€
2018-11-13 15:26:09.456 Status: LUA: EDF>>> Période : Heure Creuse
2018-11-13 15:26:09.458 Status: EventSystem: Script event triggered: Prix EDF

Comme vous le voyer les kwh du HP sont les meme que le cumul.

Le script utilisé

Code : Tout sélectionner

------------------------------------------------------------------------------
--
-- Copyright © 2016 Le TisseurDeToile <webmaster@tisseurdetoile.net> and released under
-- the GNU General Public License, v2 or later.
-- NOTA : don't forget to create variable
--
-- Installation :
-- Créer les variables Utilisateurs suivantes : EDF_LAST, EDF_LAST_HC, EDF_LAST_HP
-- Créer deux capteur virtuel : Capteur electrique ent noter leur index
------------------------------------------------------------------------------
--
-- Tarif EDF 2018 TTC 12kVA
local prix_abonnement = 43.67
local prix_hc = 0.10461
local prix_hp = 0.12961
--
local capteurGlobal = 'Compteur EDF'
local debug = 'OUI'   				-- mode debug
local meter_base = 'CONSO_LAST'
local flagHC = 'HP/HC'
local delta = 0
local inc = 0
local idxCptHP = '585'
local idxCptHC = '586'
local idxFacture   = '590' 
------------------------------------------------------------------------------
function round(x, n)
    n = math.pow(10, n or 0) 
    x = x * n 
    if x >= 0 then x = math.floor(x + 0.5) else x = math.ceil(x - 0.5) end
    return x / n
end


-- Fonction de mise à jour
function update(id, power, energy) 
    commandArray[inc]= {['UpdateDevice'] = id .. "|0|" .. power .. ";" .. energy} 
    inc = inc + 1 
    return  
end

commandArray = {}

if (devicechanged[capteurGlobal]) then
    
    conso_last = tonumber(uservariables['CONSO_LAST'])
    
    if not conso_last then 
        conso_last = 0
    end
    
    -- Recuperation des valeurs du compteur global
    local consoCumule
    local consoInstant
    consoInstant, consoCumule = otherdevices_svalues[capteurGlobal]:match("([^;]+);([^;]+)")
    consoInstant = tonumber(consoInstant)
    consoCumule = tonumber(consoCumule)
    
    delta = consoCumule - conso_last
    
    commandArray['Variable:CONSO_LAST'] = tostring(consoCumule)
    
        local conso_hc = tonumber(uservariables['CONSO_LAST_HC'])
        local conso_hp = tonumber(uservariables['CONSO_LAST_HP'])

    local factureHP = round(conso_hp * prix_hp / 1000, 2)
    local factureHC = round(conso_hc * prix_hc / 1000, 2)
    local factureAn = prix_abonnement + factureHP + factureHC

    if (debug == 'OUI') then
        print('EDF>>> conso_last = '..tostring(conso_last))
        print('EDF>>> delta   = '..tostring(delta))
        print('EDF>>> Instant = '..tostring(consoInstant) .. 'Wh')
        print('EDF>>> Cumul   = '..tostring(consoCumule))
        print('EDF>>> Prix abo = '..tostring(prix_abonnement))
        print('EDF>>> Conso HP TTC = ' .. tostring(round(conso_hp/1000),0) .. 'kWh / ' ..tostring(factureHP) .. '€')
        print('EDF>>> Conso HC TTC = ' .. tostring(round(conso_hc/1000),0) .. 'kWh / ' ..tostring(factureHC) .. '€')
        print('EDF>>> Facture  TTC = '..tostring(factureAn) .. '€')

      if (otherdevices[flagHC] == 'On') then
          print('EDF>>> Période : Heure Creuse')
      else
          print('EDF>>> Période : Heure Pleine')
      end
    end

    if (otherdevices[flagHC] == 'On') then
        -- Periode heures creuse
        commandArray['Variable:CONSO_LAST_HC'] = tostring(conso_hc + delta)
        update(idxCptHC, consoInstant, conso_hc)
        update(idxCptHP, 0, conso_hp)
    else
        commandArray['Variable:CONSO_LAST_HP'] = tostring(conso_hp + delta)
        update(idxCptHP, consoInstant, conso_hp)
        update(idxCptHC, 0, conso_hc)
    end

    update(idxFacture, factureAn, factureAn)

end

return commandArray

    
    

[laurentxo1]

bonjour a tous
j'avais installer le script en 2017 et il fonctionné très bien, suite a un déménagement j'avais laissé tomber le Raspberry et bien évidement j'avais pris la carte SD du Raspberry pour une autre utilisation et comme toujours j'ai formater la carte SD sans faire de sauvegarde, aujourd'hui j'ai réinstallé un Raspberry et voudrais réinstaller le script mais les images pour l'installation ne sont plus visible sur le site et pour moi c'est un peu difficile sans image je voudrais savoir si quelqu'un utilise encore le script et si il pouvait m'aider a le réinstaller depuis le début merci a vous

[Seb13]

Hello,

Que veux-tu dire par "l'image n'est plus disponible sur le site" ?

[laurentxo1]

bonjour,
dans le premier message de chandler45 impossible de voir les images nommées Cpt.JPG, SwitchHCHP.JPG, blocky.JPG, etc...........

[Seb13]

Hello,

Tu as essayé de lui envoyer un email pour lui demander de remettre les images ?

Tu ne penses pas y arriver sans les images ?

a+

[laurentxo1]

bonjour, bon je pense avoir réinstaller le script en re lisant les 23 pages

[Seb13]

Eh ben bravo !

Tu as pris le temps de refaire les screenshots pendant l'installation pour mettre à jour ce post ?