Info monitorage pc tele info

OneWire, TéléInfo, logs et enregistrements
LOIC56
Actif
Actif
Messages : 13
Enregistré le : mer. oct. 17, 2012 9:31 am

Info monitorage pc tele info

Message par LOIC56 »

Bonjour une petite question bete faut il un pc qui tourne 24h/24 pour faire du monitorage de conso ?
Ou peut on brancher directement sur la freebox v6 avec le serveur nas ?
merci pour vos reponses et d eventuelles schemas ?
Cordialement
Loic
Avatar du membre
VincentN
Modérateur
Modérateur
Messages : 3922
Enregistré le : mar. févr. 12, 2008 12:25 am
Localisation : Yvelines

Message par VincentN »

Hello,
Un serveur NAS est un serveur de fichier qui ne peut pas faire tourner un programme.
Hors, pour faire du monitoring il faut installer un programme qui va collecter les données via des interfaces (téléinfo et/ou One-Wire).

Concernant le fonctionnement 24/24 de l'ordi, tout dépend de ce que tu veux faire.
Si il s'agit juste de relever la conso quotidienne, alors une programmation pourra mettre en fonction ledit PC que sur un laps de temps court suffisant à "relever le compteur" toutes les 24H.
Mais dans ce cas n'espère pas avoir les graphs de fonctionnement tels que l'on peut en voir par ici.
De plus, pour se genre de monitoring "light" il existe des boitier autonomes moins onéreux qu'un PC et, surtout, moins consommateur d'électricité eux-même.
hd31
Resp. Section
Resp. Section
Messages : 3353
Enregistré le : dim. mars 18, 2007 12:21 pm
Localisation : Toulouse
Contact :

Message par hd31 »

Les cartes que l'on a faites (PVBox et Régulation PAC) ne consomment que 1W. Mais c'est plus cher à l'achat, et pas encore compatible iTow.
On a aussi un enregistreur de Téléinfo en cours d'étude. Il fonctionne sur 2 piles (autonomie 1 an) et enregistre sur une carte SD toutes les minutes (ou moins). Mais le but est de relever la carte ou le boîtier au bout de quelques mois.
LOIC56
Actif
Actif
Messages : 13
Enregistré le : mer. oct. 17, 2012 9:31 am

Message par LOIC56 »

Bonjour,

merci pour vos reponses avez vous des schemats ou photos de vos montages ?

si je met un pc avec itow, il me faut quel interface entre le pc et itow ?

Cordialement

Loic
hd31
Resp. Section
Resp. Section
Messages : 3353
Enregistré le : dim. mars 18, 2007 12:21 pm
Localisation : Toulouse
Contact :

Message par hd31 »

J'ai diffusé il y a déjà pas mal de temps le schéma d'une interface téléinfo très simple, sur le forum et sur notre site (recherche plus facile). Pour le reste il faut passer par la case achat !
Avatar du membre
juju
Modérateur
Modérateur
Messages : 1713
Enregistré le : sam. mars 18, 2006 7:38 pm
Localisation : Vaucluse 84

Message par juju »

bonjour
petit portable avec écran 10 pouces
écran en veille
disque dur en veille
consommation moins de 10W
prix neuf 220 a 240 €

sinon un vieux PC genre Dell D510, D600 , D610 moins de 80€ sur le bon coin et 15W en veille, c'est ce que j'ai et c'est robuste, avant j'avais une tablette (10W) mais on n'en trouve plus d'occase
http://alain-solaire.pagesperso-orange.fr/
JUJU et Alain
LOIC56
Actif
Actif
Messages : 13
Enregistré le : mer. oct. 17, 2012 9:31 am

Message par LOIC56 »

Bonjour je cherche un logiciel gratuit pour l'adaptateur d'ADTEK, car je ne souhaites pas utiliser Itow (abonnement trop cher à l'année)...

Cordialement

Loïc
Avatar du membre
dbercy
Modérateur
Modérateur
Messages : 4947
Enregistré le : mar. déc. 25, 2007 11:08 am
Localisation : Yvelines

Message par dbercy »

LOIC56 a écrit :Bonjour je cherche un logiciel gratuit pour l'adaptateur d'ADTEK, car je ne souhaites pas utiliser Itow (abonnement trop cher à l'année)...

Cordialement

Loïc
1,5€ /mois !!

y a tout de même du boulot derrière et des évolutions indiscutables avec une maintenance tip top! ça se paye tout ça! :wink:
Avatar du membre
juju
Modérateur
Modérateur
Messages : 1713
Enregistré le : sam. mars 18, 2006 7:38 pm
Localisation : Vaucluse 84

Message par juju »

bonjour
LOIC56 a écrit:
Bonjour je cherche un logiciel gratuit pour l'adaptateur d'ADTEK, car je ne souhaites pas utiliser Itow (abonnement trop cher à l'année)...

Cordialement

Loïc

1,5€ /mois !!

y a tout de même du boulot derrière et des évolutions indiscutables avec une maintenance tip top! ça se paye tout ça! Wink
ben en plus il faut payer l'hébergeur
sinon si tu as seulement besoin du local oui il existe des logiciels gratuit, mais limité a des courbes pour le 1 wire
pour la telinfo j'en connais pas.
attend avec le Linky (le nouveau compteur EDF que tu paie en ce moment sans le savoir ( environ 400 euros) tu pourra créer un compte et voir ta conso journalière, en fait le client pour 400 euro ne risquera plus d'attraper un rhume en allant relever son compteur dehors dans son boitier encastré dans le mur de sa clôture.
des économie pour la sécurité sociale, il y a de l'idée chez EDF

je crois que Dauguet a suspendu son site, je me souvient avoir vu trainer une feuille exel avec une macro pour lire les trames, mais de mémoire il faut modifier la macro selon son tarif. il faut un peu de notion de VB

si tu comprend ça, alors pour toi ce sera simple
tu peut te faire un truc comme ça:
http://alain-solaire.pagesperso-orange.fr/


source:http://www.vbfrance.com



'-----------------------------------------------
' décodage de la trame de téléinformation
' et stockage dans la base
'-----------------------------------------------
Private Sub TraiteTampon()
Dim r As Boolean, tr As Boolean
Dim a As Byte
If Asc(Right(Pile, 1)) <> 3 Then
GoTo Exote
End If
If Asc(Left(Pile, 1)) <> 2 Then
GoTo Exote
End If
DList = "": tr = False: message = ""
IndexDec = 1
Do While IndexDec < Len(Pile) + 1
a = Asc(Mid(Pile, IndexDec, 1))
IndexDec = IndexDec + 1
If a < 32 Then
Select Case a
Case 2 'Début trame
edf.AddNew
edf("Date") = Now
DList = DList + "---- Début trame --" + Format(Now, "dd-mm-yy hh:mm:ss") + "-----" + vbCrLf
Case 3 'Fin trame
DList = DList + "---- Fin trame ------"
edf.Update
Exit Do
Case 10 ' Début message
message = ""
Case 13 'Fin message
i = InStr(message, " ")
If i > 0 Then
étiquette = Left(message, i - 1)
d$ = Right(message, Len(message) - i)
Select Case étiquette
Case "ADCO" 'Identification compteur 12 car.
idc$ = Left(d$, 12)
edf("n° compteur") = idc$
DList = DList + "Identification compteur : " + idc$ + vbCrLf
Case "OPTARIF" 'option tarifaire 4 car.
idc$ = Left(d$, 4)
edf("tarif") = idc$
DList = DList + "Option tarifaire : " + idc$ + vbCrLf
Case "ISOUSC" 'intensité souscrite 2 car.
idc$ = Left(d$, 2)
DList = DList + "Intensité souscrite : " + idc$ + vbCrLf
edf("Intensité souscrite") = CInt(idc$)
Case "HCHC" 'Heures creuses 9 car.
idc$ = Left(d$, 9)
edf("Heures creuses") = CLng(idc$)
DList = DList + "Compteur heures creuses : " + idc$ + vbCrLf
Case "HCHP" 'Heures pleines 9 car.
idc$ = Left(d$, 9)
edf("Heures pleines") = CLng(idc$)
DList = DList + "Compteur heures pleines : " + idc$ + vbCrLf
Case "PTEC" 'Tarif en cours 4 car.
idc$ = Left(d$, 4)
edf("Tarif en cours") = idc$
DList = DList + "Tarif en cours : " + idc$ + vbCrLf
Case "IINST" 'Intensité instantanée 3 car.
idc$ = Left(d$, 3)
edf("Intensité instantanée") = CInt(idc$)
DList = DList + "Intensité instantanée : " + idc$ + vbCrLf
Case "IMAX" 'Intensité maximale 3 car.
idc$ = Left(d$, 3)
DList = DList + "Intensité maximale : " + idc$ + vbCrLf
Case "PAPP" 'Puissance apparente 5 car.
idc$ = Left(d$, 5)
edf("Puissance apparente") = CInt(idc$)
DList = DList + "Puissance apparente : " + idc$ + vbCrLf
Case "HHPHC" 'Groupe horaire 1 car.
idc$ = Left(d$, 1)
DList = DList + "Groupe horaire: " + idc$ + vbCrLf
Case "MOTDETAT" 'Mot d'état autocontrôle 6 car.
Case Else
End Select
End If
Case Else
End Select
Else
message = message + Chr(a)
End If
TrouveDébutTrame:
DoEvents
Loop
Exote:
Timer1.Enabled = True
End Sub
Modifié en dernier par juju le ven. oct. 26, 2012 9:33 pm, modifié 2 fois.
JUJU et Alain
Avatar du membre
juju
Modérateur
Modérateur
Messages : 1713
Enregistré le : sam. mars 18, 2006 7:38 pm
Localisation : Vaucluse 84

Message par juju »

j'oubliais

il te faut cette routine pour lire le port

VB6 est disponible gratuitement chez Crosoft
Private Static Sub LiaisonTI_OnComm()
Select Case LiaisonTI.CommEvent
'liste des erreurs possibles
Case comEventBreak ' On a reçu un signal d’interruption (Break)
Case comEventCDTO ' Timeout de la porteuse
Case comEventCTSTO ' Timeout du signal CTS (Clear To Send)
Case comEventDSRTO ' Timeout du signal de réception
Case comEventFrame ' Erreur de trame
Case comEventOverrun ' Des données ont été perdues
Case comEventRxOver ' Tampon de réception saturé
Case comEventRxParity ' Erreur de parité
Case comEventTxFull ' Tampon d’envoi saturé
Case comEventDCB ' Erreur de réception DCB (jamais vu)

' liste des événements possibles qui sont, eux, normaux

Case comEvCD ' Changement dans la broche CD (porteuse)
Case comEvCTS ' Changement dans broche CTS
Case comEvDSR ' Changement dans broche DSR (réception)
Case comEvRing ' Changement dans broche RING (sonnerie)
Case comEvReceive ' Si on reçoit des données
Tampon = LiaisonTI.Input
Pile = Pile + Tampon
i = InStr(Pile, Chr(2))
If i > 0 Then
j = InStr(i + 1, Pile, Chr(3))
If j > 0 Then
LiaisonTI.PortOpen = False
Timer1.Enabled = False
Pile = Mid(Pile, i, j - i + 1)
Call TraiteTampon
Pile = ""
End If
End If

Case comEvSend ' Il y a des caractères à envoyer
Case comEvEOF ' On a reçu le caractère EOF
End Select
End Sub
JUJU et Alain
ctout
Accro
Accro
Messages : 381
Enregistré le : dim. sept. 28, 2008 5:23 pm
Localisation : Yvelines Nord (78) Parc Naturel Régional du Vexin Français
Contact :

Message par ctout »

ou encore, demander du tout fait gratuit à Normal 1er, sait-on jamais :lol: :lol:
Chercher et comprendre, c'est passionnant.
L'installation Dimplex http://www.chaleurterre.com/forum/viewtopic.php?t=10213
Le suivi temps réel iTow http://itow.fr/itow/index.php?r=tabDeBord&u=1268924229
Avatar du membre
dbercy
Modérateur
Modérateur
Messages : 4947
Enregistré le : mar. déc. 25, 2007 11:08 am
Localisation : Yvelines

Message par dbercy »

:lol: :lol: :lol: :lol:
LOIC56
Actif
Actif
Messages : 13
Enregistré le : mer. oct. 17, 2012 9:31 am

Message par LOIC56 »

Bon les gas, je pense que les logiciels gratuits ne sont pas aussi performent que itow :D

Bref comme j'ai arreté de fumer je pense me prendre un abonnement à Itow, c'est moins cher et au moins on risque pas de ce chopper un cancer !!!

Seul probleme c'est que j'ai recuperé un pc portable où il faud réinstaller windows mais il n'y a pas de lecteur cd rom ! c'est pas gagné !

@ bientot les mecs d'Itow !
Avatar du membre
dbercy
Modérateur
Modérateur
Messages : 4947
Enregistré le : mar. déc. 25, 2007 11:08 am
Localisation : Yvelines

Message par dbercy »

LOIC56 a écrit : Bref comme j'ai arreté de fumer je pense me prendre un abonnement à Itow, c'est moins cher et au moins on risque pas de ce chopper un cancer !!!
bonne conclusion! 3 paquets de clops = abonnement itow/an
et en plus c'est bon pour la santé de la planète! :P
Avatar du membre
juju
Modérateur
Modérateur
Messages : 1713
Enregistré le : sam. mars 18, 2006 7:38 pm
Localisation : Vaucluse 84

Message par juju »

bonjour
tu veut installer XP ou win7

win7 s'installe directement depuis un clé USB

XP aussi, mais pas de façon native il faut bricoler un peu la clé
J'ai installé XP SP3 depuis une clé USB sur un portable qui n'avait pas de lecteur CD sans soucis, je peut te donner la marche a suivre
JUJU et Alain
Répondre

Retourner vers « Monitoring des consos et des performances »