/* ********************************************************************** * File S1deb9.C - Rel. 1.1 con uC/51 V. 1.10.7 * * GRIFO(R) via Dell'Artigiano 8/6 40016 S. Giorgio di Piano (BO) * * Schede:GPC 324/D d.s. 140201 + ETI 324 d.s. 101297 e DEB01 o TIO16 * * Tel. +39 051 892052 Fax. +39 051 893661 * * http://www.grifo.com http://www.grifo.it * * sales@grifo.it tech@grifo.it grifo@grifo.it * * by Graziano Gaiba del 08.09.2003 * ********************************************************************** Rel. 1.1 - 08.09.2003 by Graziano Gaiba Con un flat 26+26 I/O si devono collegare il CN1 della GPC(r) 324/D con il CN1 della ETI 324. Con un flat da 20 vie si collega il CN3 della ETI 324 al CN15 della DEB01 o al CN1 della TIO16. Inoltre bisogna impostare tutti i Dip del Dip Switch DSW1 della ETI 324 ad ON, per selezionare l'indirizzo di base 0. Per ulteriori informazioni si consulti il manuale della ETI 324. Questo programma permette di gestire le linee digitali TTL per un totale di 24, della periferica PPI 82c55. */ #include #include #include // Frequenza di clock della CPU usata #define FCLOCK 22118400 // Indirizzi allocazione registri delle periferiche di bordo. // L'indirizzo dei vari dispositivi e' dato da: 0xFF00 + indbase + offset // Il valore di indbase viene impostato tramite il DSW1 della ETI 324, i // vari offset sono riportati sul manuale della ETI 324. static unsigned char PORTA @ 0xFF00, PORTB @ 0xFF01, PORTC @ 0xFF02, CNT @ 0xFF03, J1 @ 0xFFFF; #define FALSE 0x00 // Valori booleani #define TRUE 0xFF near unsigned char CKCON @ 0x8E; // SFR del DALLAS // Variabili usate dal programma unsigned char dallas; /********* Funzioni di utility generale e di gestione sezioni hw ***********/ void iniser(unsigned long baud) /* Inizializza la linea seriale con: Bit x chr = 8 Stop bit = 1 Parity = None Baud rate = baud usando come baud rate generator il timer 1. */ { SCON=0x052; // Modo 1, abilita ricevitore TMOD&=0x00F; // Timer 1 in modo auto-reload TMOD|=0x020; TR1=0; // Stop al TIMER 1 TH1=256-((2*FCLOCK)/(384*baud)); // baud a 14.7456 MHz PCON=PCON|0x080; // Setta SMOD=1 per baud rate alti TR1=1; // Start al TIMER 1 } // Attesa di assestamento dei segnali void setup(void) { unsigned int i; for(i=10000; i!=0; i--) ; } // Inizializza l'82c55 con il valore passato nel parametro void init8255(unsigned char c) { CNT=c; } // Imposta il valore del port A dell'82c55 void setPortA(unsigned char v) { PORTA=v; } // Imposta il valore del port B dell'82c55 void setPortB(unsigned char v) { PORTB=v; } // Imposta il valore del port C dell'82c55 void setPortC(unsigned char v) { PORTC=v; } // Legge il valore del port A dell'82c55 unsigned char getPortA(void) { return PORTA; } // Legge il valore del port B dell'82c55 unsigned char getPortB(void) { return PORTB; } // Legge il valore del port C dell'82c55 unsigned char getPortC(void) { return PORTC; } // Legge il valore del Jumper J1 della GPC(r) 324 unsigned char getJ1(void) { return J1; } void init_cpu(void) /* Verifica la CPU montata sulla scheda e lo salva in apposita variabile. Effettua inoltre le apposite inizializzazioni: seriale, wait, ecc. */ { unsigned char dr; dr=CKCON; // Legge registro del DALLAS 80C320 if (CKCON==0x01) { CKCON=0x01; // Setta accesso area dati a 3 cicli macchina dallas=TRUE; // E` un DALLAS 80C320 } else dallas=FALSE; // E` un 80C32 //endif } void ritardo(unsigned int rit) /* Effettua un ritardo software di rit millisecondi, calibrato su un Clock di CPU da 22.1184 MHz, a seconda della CPU montata. */ { unsigned int r,rit1ms; if (dallas==TRUE) rit1ms=380; // Valore sperimentale per ritardo di 1 msec. con 80c320 else rit1ms=150; // Valore sperimentale per ritardo di 1 msec. con 80c32 do { for (r=0 ; r0); } // ************************** Programma principale *************************** void main(void) { unsigned char c; setup(); // Attesa di assestamento dei segnali init_cpu(); // Verifica CPU installata iniser(19200); TI=0; RI=0; // Commentare se si usa la seriale in polling (SIOTYPE=p oppure k) ES=1; // Abilita interrupt porta seriale EA=1; // Abilitazione interrupt // Inizializzazione del PPI 8255. init8255(0x82); // PORT A e C in OUTPUT, PORT B in INPUT. puts("********************* Demo PPI **********************"); puts(""); puts("Il demo pilota l'accensione delle linee dei Port A e C presenti sul connettore"); puts("CN3 e mostra continuamente il valore del Port B, presente su CN4.\n"); puts(""); puts("Impostare tutti i Dip di DSW1 della ETI 324 ad ON."); for (;;) // Loop infinito. { // Scorrimento da LED rossi a LED verdi e gialli c=1; setPortC(0xff); // Pulisce Port C while(c) { setPortA(~c); c<<=1; // Ritardo per rendere visibile il movimento del LED ritardo(1000); printf("%X\r", getPortB()); } c=1; setPortA(0xff); // Pulisce Port A while(c) { setPortC(~c); c<<=1; // Ritardo per rendere visibile il movimento del LED ritardo(1000); printf("%X\r", getPortB()); } // Scorrimento da LED verdi e gialli a LED rossi c=0x80; setPortA(0xff); // Pulisce Port A while(c) { setPortC(~c); c>>=1; // Ritardo per rendere visibile il movimento del LED ritardo(1000); printf("%X\r", getPortB()); } c=0x80; setPortC(0xff); // Pulisce Port A while(c) { setPortA(~c); c>>=1; // Ritardo per rendere visibile il movimento del LED ritardo(1000); printf("%X\r", getPortB()); } } }