[Coco] bug in Basic09

[Robert Gault]

OK, I think this will correct the Basic09 code. I need to test it.

   bcs L4FEC
   lda ,x
   cmpa #100
   blo L5021
   ldb #'/
cnty suba #100
  bhs cnty
  bsr L5025
  lda #'/
  etc.