Gestion d'afficheurs à l'aide des PICBASIC 

Vous trouverez ci-dessous de très nombreuses notes d'applications mais aussi des exemples de programmes et des descriptions de réalisations conçues sur la base des modules PICBASIC, lesquelles vous permettront d'accélérer et de faciliter le développement de vos propres projets. Certains des programmes sources présentés dans ces notes d'applications sont téléchargeables via ce lien.
   


Gestion d'un afficheur LCd graphique via un bus I2C™ - 26/10/2006  -  Mr Ehretsmann Guy

   
 
Cette notre d'application (programme "EM6125.BAS" et schéma 'EM6125.jpg") vous permettra de piloter un afficheur LCD 102 x 80 (Réf. COG10280) via un bus I2C™ au moyen d'un "PICBASIC-3B". L'affichage du texte "LEXTRONIC" reprend l'ancien "style" de notre site Internet (avec un dégradé au bas du nom - il ne s'agit pas d'un bug d'affichage !).
  
   
    
  
      
  

Gestion d'un afficheur graphique 128 x 64 - 24/01/2005  -  BMS CONCEPT 
 
 
 
Une superbe réalisation qui vous permettra de piloter un afficheur LCD graphique 128 x 64 (à base de contrôleur KS0107) directement à l'aide d'un "PICBASIC-R5'. Retrouvez les sources dans le fichiers de nos notes d'applications: "docaff.pdf", "ks0107(v2).bas" et "jeu%20cailloux.bas") 
 
 

Gestion d'un afficheur LCD alphanumérique - Mr Arnaud GUIASTRENNEC


  
Ce programme permet d'afficher une icône type "état de batterie".   
      
    CONST DEVICE = R5 
'--------------------------------------------------- 
' Indicateur de niveau de batterie, comme sur les GSM
' pour tous LCD et tous les PICBASIC (sauf PB-1B)
http://arn.gui.free.fr/
'---------------------------------------------------
   
     SET PICBUS HIGH
     LCDINIT
     DIM A as INTEGER
     CLS
     CSROFF
     GOSUB CARACT
50  LOCATE 0,0
     PRINT " Controle visuel"
     LOCATE 0,1
     PRINT " niveau batterie"
     LOCATE 0,2
     PRINT " type GSM "
     LOCATE 0,3
     PRINT " 
WWW.LEXTRONIC.FR "
     A= ADIN(0)                                    'potentiométre de la PNP BOARD
     A=A/102
     LOCATE 19,0
     IF A=<1 THEN BUSOUT &HA2,&H01,&H00
     IF A=2 THEN BUSOUT &HA2,&H02,&H00
     IF A=3 THEN BUSOUT &HA2,&H03,&H00
     IF A=4 THEN BUSOUT &HA2,&H04,&H00
     IF A=5 THEN BUSOUT &HA2,&H05,&H00
     IF A=6 THEN BUSOUT &HA2,&H06,&H00
     IF A=7 THEN BUSOUT &HA2,&H07,&H00
     IF A=>8 THEN BUSOUT &HA2,&H08,&H00
     delay 50
     GOTO 50
 '================ CARACTERES SPECIAUX ================
CARACT: ' Caracteres menu principale
    BUSOUT &HA5,1,4,31,17,17,17,17,17,31 ' Niveau 0
    BUSOUT &HA5,2,4,31,17,17,17,17,19,31 ' Niveau 1
    BUSOUT &HA5,3,4,31,17,17,17,19,23,31 ' Niveau 2
    BUSOUT &HA5,4,4,31,17,17,19,23,31,31 ' Niveau 3
    BUSOUT &HA5,5,4,31,17,19,23,31,31,31 ' Niveau 4
    BUSOUT &HA5,6,4,31,19,23,31,31,31,31 ' Niveau 5
    BUSOUT &HA5,7,4,31,23,31,31,31,31,31 ' Niveau 6
    BUSOUT &HA5,8,4,31,31,31,31,31,31,31 ' Niveau 7
    RETURN

     

Exemple d'utilisation d'un afficheur LCD alphanumérique - Lextronic
Ce programme permet entre autre (à intervalles réguliers) d'activer et de désactiver le clignotement du curseur ou le rétro-éclairage (sur les afficheurs ALCD à commandes séries).
     
       DIM I AS BYTE
      SET PICBUS HIGH 
      LCDINIT
10  CLS ' Efface l'écran
      BUSOUT &HA3,&H0B 
      PRINT "CURSEUR CLIGNOTE" 
      GOSUB 20
      CLS
      PRINT "CURSEUR STOP" 
      BUSOUT &HA3,&H0A 
      GOSUB 20
      CLS
      PRINT "RETRO STOP" 
      BUSOUT &HA5,&H02 
      GOSUB 20
      CLS
      PRINT "RETRO ON" 
      BUSOUT &HA5,&H01
      GOSUB 20
      GOTO 10
20  FOR I = 1 TO 10
        DELAY 255
     NEXT I
     RETURN 
    
 

 

 

Ce programme affiche le message "Sigle euro:" à l'écran, puis il affiche vraiment le sigle "€" grâce à une redéfinition de caractères (celui de l'emplacement mémoire n° 8 - voir notice de l'afficheur pour plus d'infos).   
 

  SET PICBUS HIGH 
  LCDINIT
  CLS                     ' Efface l'écran
  CSROFF               ' Desactive l'affichage du curseur
  LOCATE 0,0
  PRINT "Sigle Euro:"
  BUSOUT &HA5,8,&H0E,&H19,&H10,&H1E,&H10,&H10,&H19,&H0E     ' redéfini le caractère 
  LOCATE 12,0 
  PRINT 8                                                                                 ' Affiche le caractère redéfini 
  
  
     
   

Gestion d'un afficheur LCD alphanumérique - 03/09/2002 - Mr Mathieu Roncheau



Ce programme permet d'afficher une barre de progression sur un afficheur LCD à commande série à partir de valeurs variant de 0 à 100 (programme "PROGRESS4.BAS"). 
 
  

Gestion d'un afficheur LCD alphanumérique - 03/07/2002 - Par Arnaud
    
         
  
Ces 2 programmes ("BARGRAPH.BAS" et "BARGRAPH3.BAS"  très intéressants vous permettrons de générer des bargraphs sur un afficheur LCD à commande série à l'aide d'un "PICBASIC-R5".

   
    

Gestion d'un afficheur 7 segment - 15/10/2003  -  Lextronic
Cette réalisation utilise un composant DS1620 (DALLAS) adressable par un protocole "SPI™". Le programme associé permet d'afficher la valeur de la température sur un écran LCD à commande série. Le résultat est transmis sous la forme un nombre sur 16 bits. Le tableau ci-contre donne une correspondance entre les températures et les valeurs retournées.
  
  

 
  
DIM I AS BYTE
       DIM J AS BYTE
       CONST BYTE CONV = (&B01000000,&B01111001,&B00100100,&B00110000,
                 &B00011001,&B00010010,&B00000010,&B01111000,&B00000000, &B00010000)
        I = 0
10    J = CONV(I)
       BYTEOUT O,J
       I = I + 1
       IF I = 10 THEN I = 0
       GOSUB DELAY1
       GOTO 10
DELAY1:
       FOR J = 0 TO 220
       NEXT J
       RETURN