/*                                                                   *
  *  use remaining r/w 'slot' time for cumulative bit level CRC calc  *
  *  using data in Carry status bit                                   *
  *                                                                   */
   //asm clrf   _wreg           // wreg already 0 (see above)
     asm rlf    _wreg,W         // save C in wreg (0x00 or 0x01)
     asm xorwf  _crc,F          // xor b0 bits, result in 'crc'
     asm rrf    _crc,F          // is xor result 0 (C=0)?
     asm skpnc                  // yes, skip, else
     asm iorlw  0x18            // wreg = x8+x5+x4+1 poly and b0 bit
     asm rrf    _wreg,W         // restore C (wreg = 0x8C or 0x00)
     asm xorwf  _crc,F          // apply the polynomial, or not

   //asm movlb  owtris          // bank 1 (inserted by compiler)
     asm bsf    owtris,owpin    // set owpin to hi-z '1' @ 61-usecs
   //intcon.GIE = 1;            // interrupts on
   }                            //

  /******************************************************************
   *  main loop                                                     *
   ******************************************************************/
     
     while(1)                   //
     { owreset();               // reset one-wire devices
       owrw(OwSkipRom);         // send "skip rom" command
       owrw(OwConvert);         // start temperature conversion
       delay_ms(2);             // wait for conversion to complete
       lastdiscrep = 0;         // start new search
  //   ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
       do                       // repeat for each sensor
       { u08 i = 0;             //
         owsearch();            // put first/next ROMID in owbuff[]
         owreset();             // reset one-wire devices
         owrw(OwMatchRom);      // send "match rom" command
         do                     // send & print 64-bit rom id
         { putHex(owrw(owbuff[i++]));
         } while(i < 8);        // 8 bytes
    /*                                                              *
     *  read temperature and 'count_remain' bytes from the DS18x20  *
     *  scratchpad memory (optionally print the CRC8 result).       *
     *                                                              */
         owrw(OwScratch);       // send "read scratchpad" command
       //crc = 0;               // reset 'crc' variable
         rawtemplo = owrd();    // read temperature lo byte
         rawtemphi = owrd();    // read temperature hi byte
         owrd(); owrd();        // dummy scratchpad reads
         owrd(); owrd();        // dummy scratchpad reads
         frac = 16 - owrd();    // frac = 16 - 'count_remain'
       //owrd(); owrd();        // last scratch byte & crc byte
       //put232(" CRC=");       // print scratchpad CRC8 result
       //putHex(crc);           // should be "00" (no error)
         put232(' ');           //

    /*                                                              *
     *  expand DS18S20 9-bit temperature value (1/2° resolution)    *
     *  to DS18B20 12-bit format (1/16th° resolution).              *
     *                                                              */
         if(familyid == 0x10)   // if DS1820 or DS18S20
         { rawtemp16.0 = 0;     // clear the 0.5° bit
           rawtemp16 <<= 3;     // make room for fraction bits
           rawtemp16 |= frac;   // frac = (16 - 'count_remain')
         //rawtemp16 -= 4;      // subtract 1/4° (per datasheet)
         }