----- Original Message ----- 
  
  
  Sent: Monday, November 22, 1999 6:55 
  PM
  Subject: A89: Storing numbers into 
  strings
  
  Is it possible to store numbers into 
  strings?  I tried to using the readfile and writefile routines in 
  filelib, but when I compared them, it didn't work.  Here's what I did, 
  maybe you could see what is wrong with it:
   
  Write_File:
      move.w #1,d0
      clr.w d1
      lea.l 
  number(pc),a1
      jsr 
  filelib::writefile
   
  Read_File:
      move.w #1,d0
      clr.w d1
      lea.l 
store(pc),a1
      jsr 
  filelib::readfile
   
      move.l #store,a0
      cmp.b #5,(a0)
      beq Equal
      WriteStr #1,#1,#2, 
  Not_Equal
      jsr 
  userlib::idle_loop
      rts
   
  Equal:
      WriteStr 
  #1,#1,#2,Equal
      jsr 
  userlib::idle_loop
      rts
   
  number    dc.b 5
   
   
  Every time I ran it, it always wrote the not 
  equal string.  Any help would be really appreciated.  
  Thanks.