patrick63730
Well-known member
Je vais essayer , mais j'ai a nouveau un défaut thermocouple,et qui bloque le système première photo avant reset, deuxième après reset. Troisième après coupure MST et reset .3 heure après c'est normal 4 emme photo
Agaçant ces alarmes.Je vais essayer , mais j'ai a nouveau un défaut thermocouple,et qui bloque le système première photo avant reset, deuxième après reset. Troisième après coupure MST et reset .3 heure après c'est normal 4 emme photo
;MESURE TMAX31855 RS232 23/06/25
;lecture thermocouple par MAX31855 MM 13/06/25
;La broche SO va prendre successivement la valeur de chaque bit du registre.
; scanné poids fort en tête
;moyenne sur 4 mesures
;transmission : temp, def, identifiant=123
#picaxe 08M2
#no_data
symbol CLK=C.1 ; pulse horloge
symbol CSB=C.2 ;demande lecture _____/
symbol SO=pinC.3 ;bit de donnée serial out
symbol def=bit0 ;bit défaut
symbol defT=bit1 ; bit défaut confirmé
symbol cpt=b1
symbol temp=b2
symbol cpt2=b3
symbol varw=w13 ;var temporaire
symbol cumul=w12
symbol temptherm=w11 ;tempé thermocouple
setfreq M4
symbol baud=T2400_4
symbol baudN=N2400_4
;*****************************
#macro spin(varw) ;macro SPIIN
varw = 0
for cpt = 1 to 16
varw=varw * 2 + SO ;décalage à gauche + SO (0 ou 1)
pulsout CLK,1 ;pulse horloge
next cpt
#endmacro
;************************************
pause 500
high CSB ;première conversion
Do
cumul=0
defT=1 ; ne sera confirmé que si les 4 def sont à 1
for cpt2 = 1 to 4
pause 200 ;200 ms
low CSB ;lecture registre
spin(temptherm) ;exécution macro 16 premiers bits (poid fort en tête
high CSB ;nouvelle conversion
;*****defaut **********************
def=temptherm//2 ;isol bit défaut
defT=defT and def ; ; il faut 4 def=1 pour transmettre un défaut
;**** temp thermocouple ******************************
temptherm=temptherm/4 ;suppression des 2 derniers bits
if temptherm>=$2000 then ;test 1er bit des 14 bits pour valeur négative
temptherm=0 ;fixé à 0 si négatif
endif
temptherm=temptherm/4 ;suppression des décimales-> val entière
temptherm=temptherm//256 ;valeur entière ; on garde les 8 derniers bits
temp=temptherm
cumul=cumul + temp
next cpt2
temp=cumul/4
;serout C.0, baudN,(254,148,#temp," ",#defT," ",#123) ;LCD pour simu
serout C.0, baud,(temp,defT,123) ;liaison RS232
loop
JLCPCB est sans doute le seul à comprendre ...enfin j'espèreoui chez jlcpcb la vue du pcb est complète je ne comprends pas pourquoi le pcb est différent de la vue , les autres pcb que j'ai commandé le pcb était identique à la vue
Hello,Bonjour j'ai apporté une modification au code ajout d'un hystérésis pour calmer les marches arrêts du circulateur , maintenant il démarre a +6 ,et s'arrête a +0
patrick
Peut être mais dans longtemps j'arrive a maîtriser certaines choses et ceci grâce a la patience d'un bon maître et je persévère, j'ai fait plein d'essais puis j'ai compris ce qui ne fonctionnait pas dans mes modifs et a force j'ai compris qu'il fallait faire bien plus simpleHello,
Tu vas devenir un pro du picaxe.
M
Bonjour,je viens de remettre le ";" devant
;if def=1 and ident=123 then erreur comme cela je supprime les erreur thermocouple
a suivre
patrick