            0100 ; CRC GENERATOR / CHECKER            0105 ; AS IN THE WD 2791 FDC            0110 ; RESET CRC REGISTER TO $FFFF            0115 ; CALL FOR EACH BYTE (IN A)            0120 ;0000        0125         *=  $B0            0130 ;00B0        0135 CRCTMP  *=  *+1          TEMPORARY CRC REGISTER00B1        0140 CRCL    *=  *+1          CRC SHIFT REGISTER (LOW)00B2        0145 CRCH    *=  *+1          CRC SHIFT REGISTER (HIGH)            0150 ;00B3        0155         *=  $600            0160 ;0600 85B0   0165 CRCGEN  STA CRCTMP       SAVE INPUT BYTE0602 A208   0170         LDX #8           LOOP COUNTER0604 A5B0   0175 CRCGE1  LDA CRCTMP       GET NEXT BIT0606 45B2   0180         EOR CRCH         MODUL0 ADD WITH CRC BIT 150608 0A     0185         ASL A            RESULT TO CARRY0609 900C   0190         BCC CRCGE2060B A5B1   0195         LDA CRCL         INVERT CRC BIT 4060D 4910   0200         EOR #$10060F 85B1   0205         STA CRCL0611 A5B2   0210         LDA CRCH         INVERT CRC BIT 110613 4908   0215         EOR #$080615 85B2   0220         STA CRCH0617 26B1   0225 CRCGE2  ROL CRCL         SHIFT CRC REGISTER0619 26B2   0230         ROL CRCH061B 06B0   0235         ASL CRCTMP       SHIFT TEMP REGISTER061D CA     0240         DEX061E D0E4   0245         BNE CRCGE1       LOOP AGAIN0620 60     0250         RTS