Re: A86: Re: example of graph 'hook'


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

Re: A86: Re: example of graph 'hook'




And, oh yeah, don't upload this program to ticalc.org:  it will cause the calc to crash whenever you silent link.

Dux Gregis wrote:

> It uses the [sqrt]EXPR program.  Pat checks for function mode and for an update (w/ the runindicator) and then draws his tangent
> line.  Since he needed to check for an update to save speed, I assume that it's called all the time while an expression is being
> traced (evaluated).
> Here's an example of a "hook" I just finished which disables DelVar( from the home screen.  This uses [sqrt]HOME.
>
> Stephen Hicks wrote:
>
> > ok, so what type of hook does this use?  i can't seem to figure out the source :-(
> >
> > Dux Gregis wrote:
> >
> > > Dux Gregis wrote:
> > >
> > > > Pat Milheron wrote:
> > > >
> > > > > Here's the source, have fun.
> > > > >
> > > > > Later,
> > > > > Pat
> > > >
> > > > Swank!  This is going to be helpful.  I don't suppose you can tell me what the unknown equates are...  I can't recompile it
> > > > like this.
> > >
> > > Alright, nevermind. :-)  I decided to do a little disassembly:
> > >
> > > _bitgrffuncm                  equ $402c          ; check for func mode, sets z flag
> > > _GEQNAMEA              equ $4e71          ; OP1=NAME OF CURRENT EQ
> > > _CPYTO1FPST          equ $4897          ; OP1=NAME OF EQ VAR WITH EXP
> > > _CPYO2TOFPST          equ $48d7          ; SAVE RESULT IN FPST INSTEAD
> > > _GFUDYDX              equ $4b9f          ; OP1=dy/dx
> > > _CKOP1REAL          equ $41cb          ; check if op1 real, sets z flag
> > > _CPYTO2FpS2          equ $48c3          ; OP2=y1
> > > _INVSUB                  equ $45e3            ; OP1=y1-(dy/dy) x1
> > > _INVOP1s              equ $5494
> > > _deallocfps1              equ $47db          ; clean fps
> > > plotloc                      equ 1                  ; display only
> > > _inco1exp                 equ $4527          ; delta x times 10
> > > _cpyto2fps1                 equ $48af          ; OP2= x
> > > _cpyto2fps2              equ $48c3          ; op2 = dy/dx
> > > _CPYTO2FPST          equ $4893          ; constant
> >
> > --
> > Stephen Hicks
> > mailto:shicks@mindspring.com
> > ICQ:5453914
> > IRC:Kupopo
>
>                                                   ------------------------------------------------------------------------
>
>                    Name: Exqq2.asm
>    Exqq2.asm       Type: Assembly Source File (application/x-unknown-content-type-Asmide86.Document)
>                Encoding: base64
>
>                    Name: Exqq2.86p
>    Exqq2.86p       Type: TI86 Program (application/x-unknown-content-type-TI86.Program)
>                Encoding: base64




References: