Automate Programmable avec un PB-3B
|
Énergie Électricité Électronique |
Cette platine basée sur un picbasic PB-3B, microcontróleur, fabriqué par COMFILE et distribué par la société, Lextronic, qui peut être remplacé par un pic du type PIC16F876, est un véritable automate programmable, elle permet l´exécution de multiples taches. Dans ces pages je vais vous présenter, quelques applications, basés sur cette platine, si vous l´avez utilisé pour un usage personnel, ne hésitez pas à me contacter, je publierait votre travail avec la mention de votre nom. Merci de votre participation. Son Moyen frère réalisé à partir d´un processeur CB320 n´a rien à envier aux grands. Son grand frère réalisé à partir d´un processeur pbm-r5 n´a rien à envier aux grands. |
Retrouvez ces articles en boutique |
Ce petit programme qui me permet de tester la platine. ' =========================================================== ' 29/08/2009 pereira joao. ' =========================================================== CONST DEVICE = 3B dim val_volt_can_0 as integer '2 dim val_volt_can_1 as integer '4 dim adresse_eeprom as integer '6 dim consigne_couplage as integer '8 dim consigne_desacouplage as integer '10 dim tension_bat_trop_haute as integer '12 dim tension_bat_cam_basse as integer '14 dim tension_bat_aux1_basse as integer '16 dim prot_bat_aux_haute as integer '18 dim prot_bat_aux_basse as integer '20 dim valeur_temp as integer '22 dim tempo as integer '24 dim entier as BYTE dim reste as BYTE dim val_%_can_0 as BYTE dim val_%_can_1 as BYTE dim compteur_sp as BYTE dim I as BYTE CONST buzzer = 16 CONST relais_couplage = 5 CONST touche_init = 15 'libre CONST SCL = 6 CONST SDA = 7 CONST relais_prot_bat_basse = 17 CONST add_couplage = &HFFE 'F CONST add_desacouplage = &HFFC 'D CONST add_tension_haute = &HFFA 'B CONST add_bat_cam_faible = &HFF8 '9 CONST add_bat_aux1_faible = &HFF6 '7 CONST add_prot_bat_basse = &HFF4 '5 CONST add_prot_bat_haute = &HFF2 '3 '----------------------------------------- ' gosub initialisation '----------------------------------------- initialisation: '----------------------------------------- SET PICBUS HIGH LCDINIT CSROFF CLS '----------------------------------------- locate 3,0 : print "INITIALISATION" locate 20,0 : print "http://f1lzr.free.fr" out relais_couplage,0 out relais_prot_bat_basse,1 boucle: SOUND buzzer, 239, 10 val_volt_can_0 = ADIN(0) toggle relais_couplage delay val_volt_can_0 val_volt_can_1 = ADIN(1) toggle relais_prot_bat_basse delay val_volt_can_0 locate 0,1 print dec(val_volt_can_0) goto boucle
Cette page à été vue | 6586 | fois depuis sa création par | 3633 | visiteurs. |
Aujourd'hui cette page à été vue | 0 | fois par | 0 | visiteurs. |