cwr8:

       subb    al,82h,72h

       cmpb    al,#27

       je      cwa8

       ljmp    cw00             

cw05:

       cmpb    72h,82h

       je      cw07

       jnc     cw06

       subb    al,72h,82h

       cmpb    al,#1

       je      cwa8

       ljmp    cw00

cw06:

       subb    al,82h,72h

       cmpb    al,#1

       je      zcw22

       ljmp    cw00     

zcw22:      

       subb    al,73h,83h

       cmpb    al,#23

       je      zcw32

       ljmp    cw00

cwa8:

       subb    al,83h,73h

       cmpb    al,#23

       je      cwa0

       ljmp    cw00      

cw07:

       cmpb    73h,83h

       je      cw09

       jnc     cw08

       subb    al,73h,83h

       cmpb    al,#1

       je      cwa0

       ljmp    cw00

cw08:

       subb    al,83h,73h

       cmpb    al,#1

       je      zcw32

       ljmp    cw00      

zcw32:      

       subb    al,74h,84h

       cmpb    al,#59

       je      zcw42

       ljmp    cw00

cwa0:

       subb    al,84h,74h

       cmpb    al,#59

       je      cwk0

       ljmp    cw00   

cw09:

       cmpb    74h,84h

       je      cw11

       jnc     cw10

       subb    al,74h,84h

       cmpb    al,#1

       je      cwk0

       ljmp    cw00

cw10:

       subb    al,84h,74h

       cmpb    al,#1

       je      zcw42

       ljmp    cw00      

zcw42:      

       addb    al,85h,#60

       subb    al,75h

       cmpb    al,#5

       jnc     cw90

       ljmp    cw00

cwk0:

       addb    al,75h,#60

       subb    al,85h

       cmpb    al,#5

       jnc     cw90

       ljmp    cw00             

cw11:

       cmpb    75h,85h

       jnc     cw91

       subb    al,75h,85h

       cmpb    al,#5

       jnc     cw90

       ljmp    cw00

cw91:      

       subb    al,85h,75h

       cmpb    al,#5

       jnc     cw90

cw00:

       ldb     hl,#1

cw90:

       ret