Select Code to Download

   @data = read_data($infile);            # @data is global
   $data[0x6FFE] = 0;                     # zero CRC
...
   $data[0x6FFE] = $crc >> 8;                 # save
   $data[0x6FFF] = $crc & 0xFF;               # CRC
   write_data($outfile); # or write_data_blocks($outfile);

sub crc16 ($$$)
{
...
   }
   return $crc;
}

void VerifyFlashBlock(UINT8  len, UINT16 address)
{
...
      buffer++;
   }
}