Looks like your HSEROUT is where the problem is... flush the Transmit Buffer with a CR/LF... tell us what happens...

either...
Code:
loop:
     for i = 0 to 23
       I2CREAD SDA,SCL,$A0,i,[B1] ' Read 2 locations in a row
       hserout ["Read=",#B1,13,10]        
     next i
or this...

Code:
loop:
     for i = 0 to 23
       I2CREAD SDA,SCL,$A0,i,[B1] ' Read 2 locations in a row
       hserout ["Read=",#B1,"|"]        
     next i
     hserout [13,10]