----- 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.