logo elektroda
logo elektroda
X
logo elektroda
REKLAMA
REKLAMA
Adblock/uBlockOrigin/AdGuard mogą powodować znikanie niektórych postów z powodu nowej reguły.

Obsługa AD7843 (kontroler panelu dotykowego) [bascom]

Alchemik84 09 Mar 2008 12:58 1296 0
REKLAMA
  • #1 4889506
    Alchemik84
    Poziom 14  
    Posty: 100
    Pomógł: 8
    Ocena: 2
    Witam

    Próbuje uruchomić ten układ ale niestety z marnym skutkiem, przez cały czas odbieram z niego bajty o wartości '0'. Układ jest podpięty pod sprzętowy SPI. Programik, który napisałem wysyła do urządzenia rozkaz na który powinien dostać odpowiedz postaci "1000 0000 0000" -binarnie, a otrzymuje same zera.
    
    $regfile = "m8515.dat"
    $crystal = 16000000
    
    Config Lcdpin = Pin , Db4 = Portd.2 , Db5 = Portd.3 , Db6 = Portd.4 , Db7 = Portd.5 , E = Portd.1 , Rs = Portd.0
    Config Spi = Hard , Data Order = Msb , Master = Yes , Polarity = High , Phase = 0 , Clockrate = 64 , Noss = 0
    
    Ddrb.3 = 0                                                  'pin busy
    Spiinit
    Dim A As Byte , B As Byte
    A = &B11010110                                              'S;A2;A1;A0;MODE;SER/DFR;PD1;PD0
    Do
      Spiout A , 1                      'po wysłaniu takiej komendy powinienem otrzymac w odpowiedzi "1000 0000 0000"
       Do
       Loop Until Pinb.3 = 0                'czekanie az układ będzie gotowy
      Spiin B , 1
      Cls
      Lcd B
    Loop
    
    End
    
  • REKLAMA
REKLAMA