Subversion Repositories svnkaklik

Rev

Rev 410 | Blame | Compare with Previous | Last modification | View Log | Download

////////////////////////////////////////////////////////////////////////////////
//                   KNIHOVNA PRO OVLADANI POSUVNEHO REGISTRU
//
////////////////////////////////////////////////////////////////////////////////
// definice
//#define DATA   PIN_A1
//#define CP     PIN_A0
//#define STROBE PIN_A2

void putreg(unsigned int8 out)   // zapise do registru 8bitovou promenou.
{
int8 i;
   output_low(STROBE);
   
   for(i=0;i<=7;i++)
   {
      output_bit(DATA,bit_test(out,7-i));
      output_low(CP);
      output_high(CP);
   }
   output_high(STROBE);
}