[A83] Re: Small Problem, Big Headache
[Prev][Next][Index][Thread]
[A83] Re: Small Problem, Big Headache
Well, I don't see any problem. You might want to try debugging with VTI.
----- Original Message -----
From: "Thomas Lutz" <caffeine43@netzero.net>
To: <assembly-83@lists.ticalc.org>
Sent: Monday, November 05, 2001 15:55
Subject: [A83] Re: Small Problem, Big Headache
>
> DeleteIt:
> B_CALL DelVar
> ret
>
>
>
> ----- Original Message -----
> From: "Tijl Coosemans" <tijl.coosemans@student.kuleuven.ac.be>
> To: <assembly-83@lists.ticalc.org>
> Sent: Monday, November 05, 2001 6:07 AM
> Subject: [A83] Re: Small Problem, Big Headache
>
>
> >
> > what does this refer to?
> >
> > call nc,DeleteIt
> >
> > ----- Original Message -----
> > From: "Thomas Lutz" <caffeine43@netzero.net>
> > To: <assembly-83@lists.ticalc.org>
> > Sent: Monday, November 05, 2001 07:23
> > Subject: [A83] Small Problem, Big Headache
> >
> >
> > >
> > > Hey everyone...I'm going nuts trying to figure out why the hell this
> isn't
> > > working....It's supposed to copy an AppVar to a string but it doesn't
> > work!!
> > > Are there any limitations on LDIR? Thanks in advance for any help! It
is
> > > much appreciated!
> > > -Tom
> > >
> > >
> > > RestoreBackUpData:
> > > ld hl,BUPDef
> > > rst rMOV9TOOP1
> > > B_CALL ChkFindSym
> > > jr c,DeleteStr9 ;If there is no backup data, delete String 9
> > >
> > > ld a,(de)
> > > inc de
> > > ld c,a
> > > ld a,(de)
> > > ld b,a ;bc holds length of BUP data
> > > inc de ;de is the source to copy from
> > >
> > > push de ;source of backup data
> > >
> > > push bc ;num of bytes to copy
> > >
> > > ld hl,Str9Def
> > > rst rMOV9TOOP1
> > > rst rFINDSYM
> > > call nc,DeleteIt
> > > pop hl ;get back number of bytes to copy
> > > push hl ;save it again
> > > B_CALL CreateStrng
> > > inc de
> > > inc de ;de points to target
> > >
> > > pop bc ;pop out number of bytes to copy
> > >
> > > pop hl ;pop out source of backup data
> > >
> > > ldir
> > >
> > > ret
> > >
> > > DeleteStr9:
> > > ld hl,Str9Def
> > > rst rMOV9TOOP1
> > > rst rFINDSYM
> > > ret c
> > > B_CALL DelVar
> > > ret
> > >
> > >
> > > BUPDef: db AppVarObj,"BUP",0
> > > Str9Def: db StrngObj,tVarStrng,tStr9,0
> > >
> > >
> > >
> >
> >
> >
> >
>
>
References: