//---------------------------------------------------------------
// EXAMPLE EX9.C :  Demonstrate use of ARRAYS.
//
// C.P. Diduch, Dec 1999.
//---------------------------------------------------------------
#define	KEY_PA	0x138	  // 82C55A port addresses for PA,
#define KEY_PB	0x13A	  // PB,
#define KEY_PC	0x13C	  // PC and the
#define KEY_CON	0x13E	  // Control Register.

#include <conio.h> 	  // conio.h contains prototypes for 
			  // inportb() and outportb(). 
//---------------------------------------------------------------
void main()
{
unsigned char DATA[8];
int i;

outportb(KEY_CON, 0x82);  // Initialize 82C55A PPI with ports 
			  // KEY_PC and KEY_PA as OP ports and 
			  // port PB as an IP port.
i = 0;
while (i < 8) {
   DATA[i] = 0x3F & inportb(KEY_PB);
   i = i + 1;
   }

i = 7;
while (i >= 0) {
   outportb(KEY_PC, DATA[i]);
   i = i - 1;
   }
}