PIC ja RS232

ölaef

Ei liity suoraan Assemblyyn, mutta täältä löytynee osaamista.

Pöydällä lojuu PIC 16F690 joka olisi tarkoitus saada keskustelemaan tietokoneen kanssa sarjaportin kautta. Mistä kannattaisi lähteä liikkeelle? Käytössä on C-kääntäjä ja ja olen MAX232:sta ruuvannut kummajaisen, joka kuulemma asettaa jännitteet kohdalleen.

Onko jossaino olemassa jotain C-kirjastoja, joiden avulla pääsisin asiassa alkuun?

Myös assemblylla tehdyt koodinpätkät kiinnostavat, saanen ne ruuvattua C-koodin kylkeen.

2

1156

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • kuikka vaaglella

      Max232 on toimiva. Ite en ole vaivautunut enään vääntään asmia picille vaan kaikki koodi vaan c:llä, jos pelkästään niitä ledejä vilkuttelee eikä mennä resurssit tapissa on ihan turha vääntää asmia. mblabilla simuloi jos on aikakriittiset kohdat johon vois sitä inline asmia tarvittaessa laittaa.

      Kato onko c-kääntäjän sampleissa usart esimerkkejä. Hi-tech C:n mukana tulee tuollanen:

      main.c
      Code:

      #include
      #include
      #include "usart.h"

      /* A simple demonstration of serial communications which

      * incorporates the on-board hardware USART of the Microchip

      * PIC16Fxxx series of devices. */


      void main(void){

      unsigned char input;


      INTCON=0;// purpose of disabling the interrupts.


      init_comms();// set up the USART - settings defined in usart.h


      // Output a message to prompt the user for a keypress

      printf("Hello");



      while(1)

      {

      input = getstr();// read a response from the user

      printf("\rI detected [%c]",input);// echo it back

      }


      }




      usart.c
      Code:

      #include

      #include

      #include "usart.h"


      void

      putch(unsigned char byte)

      {

      /* output one byte */

      while(!TXIF)/* set when register is empty */

      continue;

      TXREG = byte;

      }


      unsigned char

      getch() {

      /* retrieve one byte */

      while(!RCIF)/* set when register is not empty */

      continue;

      return RCREG;

      }


      unsigned char

      getche(void)

      {

      unsigned char c;

      putch(c = getch());

      return c;

      }


      /*

      void getstr(const char *s)

      {

      while(!RCIF)

      continue;

      while (*s)

      getch();

      return str;

      }

      */



      usart.h
      Code:


      #ifndef _SERIAL_H_

      #define _SERIAL_H_


      #define BAUD 9600

      #define FOSC 7370000L

      #define NINE 0 /* Use 9bit communication? FALSE=8bit */


      #define DIVIDER ((int)(FOSC/(16UL * BAUD) -1))

      #define HIGH_SPEED 1


      #if NINE == 1

      #define NINE_BITS 0x40

      #else

      #define NINE_BITS 0

      #endif


      #if HIGH_SPEED == 1

      #define SPEED 0x4

      #else

      #define SPEED 0

      #endif


      #if defined(_16F87) || defined(_16F88)

      #define RX_PIN TRISB2

      #define TX_PIN TRISB5

      #else

      #define RX_PIN TRISC7

      #define TX_PIN TRISC6

      #endif


      /* Serial initialization */

      #define init_comms()\

      RX_PIN = 1;\

      TX_PIN = 1; \

      SPBRG = DIVIDER; \

      RCSTA = (NINE_BITS|0x90);\

      TXSTA = (SPEED|NINE_BITS|0x20)


      void putch(unsigned char);

      extern void getstr(const char *s);

      unsigned char getch(void);

      unsigned char getche(void);


      #endif

      //loppu usart.h

      • aapee.

        Enköhän tällä pääse alkuun. Ainakin sain ensimmäiset kötystyksen käännettyä ilman suurempia herjoja.


    Ketjusta on poistettu 0 sääntöjenvastaista viestiä.

    Luetuimmat keskustelut

    1. Muistatko kaivattusi

      Syntymäpäivän? Päivämäärä riittää. 🌹
      Ikävä
      130
      1896
    2. 121
      1375
    3. Postimerkki kirjeeseen ja kortiin maksaa jo 3 euroa!

      https://yle.fi/a/74-20229241 Kyllä tämä on järjetön hinta, Posti tuhoaa itsensä tällä hinnalla, täytyyhän Postin "Herro
      Maailman menoa
      140
      1150
    4. Keitä oli kunnanjohtajan erottajat?

      Kouluja ei ole varaa ylläpitää mutta johtajasopimukseen palaa 100000 euroa ja uuden johtajan hakuprosessi maksaa kymmeni
      Ilmajoki
      59
      1071
    5. Atte Harjanne usuttaa eläkeläisvihaan

      Karmeeta kuultavaa aamun uutislähetyksessä, kun Atte Harjanne, tunnettu eläkeläisvihaaja, suitsii sukupolvien välistä v
      Maailman menoa
      283
      1053
    6. Mulla on ikävä

      sua nainen ja niitä katseita ❤️ Lupaatko, että katseemme kohtaa taas?
      Ikävä
      49
      1049
    7. Miten pääsee ujon naisen pään sisään?

      Siis tosi tosi tosi ujon...
      Ikävä
      136
      1024
    8. Milloin bikineistä

      Tuli juhla tai esiintymis asu? Pikkasen harkintaa vois käyttää. Bikinit kuuluvat uimarannalle. No, mitä maailman tähdet
      Maailman menoa
      88
      862
    9. Mä oon tyytyväinen, että ei ole enää tunteita.

      Samalla tajusin, että sun kohdalla tykkäsin enemmän niistä tunteista kuin sinusta persoonana. Halusin väkisin nähdä sinu
      Ikävä
      58
      819
    10. Helsingin Mäntymäki muuttui Kultajuhlan jälkeen kaatopaikaksi.

      Mitä se kertoo jääkiokosta ja lätkäfaneista? Saikkua huomenna huusi fani yöllä?
      Maailman menoa
      77
      816
    Aihe