Re: A86: VAR_GET
[Prev][Next][Index][Thread]
Re: A86: VAR_GET
thank you Clem.
>From owner-assembly-86-outgoing@towerguard.unix.edu.sollentuna.se Sun
Sep 6 09:01:43 1998
>Delivered-To: assembly-86-outgoing@towerguard.unix.edu.sollentuna.se
>Received: by towerguard.unix.edu.sollentuna.se (VMailer, from userid
507)
> id 441D41209C; Sun, 06 Sep 1998 18:01:28 +0200 (CEST)
>Message-ID: <35F2DBBD.6092F6C8@mygale.org>
>Date: Sun, 06 Sep 1998 20:00:12 +0100
>From: CLEM <clems@mygale.org>
>X-Mailer: Mozilla 4.03 [fr] (Macintosh; I; PPC)
>MIME-Version: 1.0
>To: assembly-86@lists.ticalc.org
>Subject: Re: A86: VAR_GET
>References: <19980906152353.24886.qmail@hotmail.com>
>Content-Type: text/plain; charset=us-ascii
>Content-Transfer-Encoding: 7bit
>Sender: owner-assembly-86@lists.ticalc.org
>Precedence: list
>Reply-To: assembly-86@lists.ticalc.org
>Errors-To: assembly-86-errors@lists.ticalc.org
>
>
>> Does anyone know an equivelent to this 85 routine, VAR_GET? Please
>> help. Thanks.
>
>Here it is (not tested !) :
>
>Input: HL = pointer to name of variable to be found
>Output: AHL = pointer to variable data (length of variable skipped)
> DE = pointer to VAT entry
> If CF, the variable was not found
>
>VAR_GET:
> rst rmov10toop1 ; equ 20h
> rst rfindsym ; equ 10h
> ret c
> push hl
> xor a
> ld hl,2
> add hl,de
> adc a,b
> pop de
> or a ; clear Carry Flag
> ret
>
>Example:
>
> ld hl,var_name-1
> call VAR_GET
> jp c,notFound
> ...
>
>var_name:
> .db 7,"varname" ; 7 is the name lenght
>
>Later,
>--
>+-----------------------------------------+
>| name : CLEM |
>| homepage : http://www.mygale.org/~clems |
>| e-mail : mailto:clems@mygale.org |
>+-----------------------------------------+
>
>
______________________________________________________
Get Your Private, Free Email at http://www.hotmail.com