re: A86: Re: Re: $44B3 and $44BB, help?


[Prev][Next][Index][Thread]

re: A86: Re: Re: $44B3 and $44BB, help?



;
;---------------------------------------------------------
;   CKOP1INT : CHECK OP1 = FP INTEGER			 |
;							 |
;   OUTPUT : Z = 0 IF NON INT, =1 IF INT		 |
;							 |
;@  USES: SAME AS CKINT 				 |
;---------------------------------------------------------
;
_CKOP1INT  equ 44B3h        
    
;
;---------------------------------------------------------
;   CKINT : CHECK 16 DIGIT FLOATING POINT		 |
;	    NUMBER TO BE AN INTEGER, NON DESTROYING.	 |
;							 |
;   INPUT:  (HL) = LSB OF EXP OF NUMBER TO CHECK		|
;   OUTPUT: Z=1 IF INTEGER, Z=0 IF NON INTEGER		 |
;							 |
;@  USES: A,BC,DE,HL, 0 BYTES STACK			 |
;---------------------------------------------------------
;
_CKINT   equ   44B7h

;
;---------------------------------------------------------
;   CKOP1ODD : CHECKS IF FLOATING POINT OP1 IS AN ODD #. |
;							 |
;   INPUT : NONE					 |
;							 |
;   OUTPUT : Z=1 IF EVEN ; ELSE RETURN Z=0 FOR ODD	 |
;@  USES: A,BC,DE,HL, 2 BYTES STACK			 |
;---------------------------------------------------------
;
_CKOP1ODD    equ  44BBh



Later,
Pat

------------------
Original text

From: "JBrett" <tbarwick@esn.net>, on 9/12/98 11:44 PM:

Oh, then I will let Pat handle you question.
--------------
Jbrett
tbarwick@esn.net
http://ww2.esn.net/~tbarwick
I just added a TI-86 page, Check it out!!!   
-----Original Message-----
From: Joshua J Seagoe <rabidcow@juno.com>
To: assembly-86@lists.ticalc.org <assembly-86@lists.ticalc.org>
Date: Saturday, September 12, 1998 11:43 PM
Subject: A86: Re: $44B3 and $44BB, help?


>
>
>On Sat, 12 Sep 1998 23:16:57 -0400 "JBrett" <tbarwick@esn.net> writes:
>>
>>On page $0d,
>>they both do: ld hl,OP1EXPM (call $1462 or $1469)
>>I hope that is what he means.  Is it, Josh???
>
>sorta.
>that's only the beginning, there's other instructions after that
>
>-josh
>
>>--------------
>>Jbrett
>>tbarwick@esn.net
>>http://ww2.esn.net/~tbarwick
>>I just added a TI-86 page, Check it out!!!   
>
>_____________________________________________________________________
>You don't need to buy Internet access to use free Internet e-mail.
>Get completely free e-mail from Juno at http://www.juno.com
>Or call Juno at (800) 654-JUNO [654-5866]
>


ATTRIBS.BND


Follow-Ups: References: