PROC eqbyt(VAL INT ch, count, addr)
  INT start, curcount:
  SEQ
    GUY
      LDL count
      STL curcount
      LDC 0
      STL start
      LDL count
      CJ  .endloop
      loop:
      
          LDL i
          LDL addr
          BSUB
          LB
          LDL ch
          DIFF
          EQC 0
          CJ .exit
            
          