Re: A85: Re: Variable types

To: assembly-85@lists.ticalc.org
Subject: Re: A85: Re: Variable types
From: Jon R Johnson <jrjinfinity@juno.com>
Date: Sun, 26 Mar 2000 00:55:33 -0700
Reply-To: assembly-85@lists.ticalc.org

Dines, I don't think you mean something like this? But it appears to
work...

	push    BC
	call    &MoveGetProgram
	call	VAR_GET	;Thanks
	ld a, $0C		; to
	ld (de),a			; Kouri here
	jr	z, Move1
MoveGetProgram:
	ld      H, 9
	ld      L, C
	call    MUL_HL
	ld      DE, TEXT_MEM2
	add     HL, DE
	ret
Move1:
	im      2
	pop     BC
	call    GET_KEY
	ld      HL, USG_BITS
	bit     1, (HL)
	call    nz, OTH_EXIT
	ld      A, 4
	out     (5), A
MoveJump:
	ret

If mem30 reads the actual VAT entries for variable types, then this will
actually change the variables type in the VAT (I think anyways).
-Jon Johnson


On Sat, 25 Mar 2000 23:31:04 +0100 "Dines Justesen" <dines@aub.dk>
writes:
> 
> IF you are using it in a shell it might be useful to modify the 
> routine
> which stores the pointers to the program so that it stores pointers 
> to the
> VAT entry too. Doing this will make it very easy to add a key which 
> can be
> used to move the currently selected program to another folder. Just 
> store
> the pointers to the VAT in a table like the one you are using for 
> program
> addrs, and use these addrs instead of calling VAR_GET.
> 
> Dines
> ----------------------------------------------------------------------
>  Dines Justesen
>  "ua mau ke ea o ka ai·na i ka po·no"
>  dines@aub.dk
>  www.student.dtu.dk/~c958362
> ----------------------------------------------------------------------
> 
> ----- Original Message -----
> From: "Jon R Johnson" <jrjinfinity@juno.com>
> To: <assembly-85@lists.ticalc.org>
> Sent: Saturday, March 25, 2000 8:01 AM
> Subject: Re: A85: Re: Variable types
> 
> 
> >
> > Thanks, Kouri I just tested that exact sequence of code out, and it
> > worked with moving a program from my games folder to my utils 
> folder. I
> > will implement this to work with all folders immediately, and add 
> your
> > name to the credits as well.
> >
> > Once again Thanks,
> > -Jon Johnson
> >
> > On Fri, 24 Mar 2000 13:04:19 -0800 "Kouri" <kouri@hotbot.com> 
> writes:
> > >
> > > Assuming you have HL pointing to the variable's name, I think you
> > > can just do this:
> > >
> > > call VAR_GET ; Returns pointer to VAT entry in DE? Someone 
> correct
> > > me if I'm wrong.
> > > ld a,$2C
> > > ld (de),a
> > >
> > > I'm not sure if that will work though.
> > >
> > > -Kouri
> > > http://kouri.cjb.net
> > > http://void.calc.org
> > >
> > >
> > > On Fri, 24 Mar 2000 08:55:19   Jon R Johnson wrote:
> > > >
> > > >What I'm trying to do is change the VAT type so that it will 
> show
> > > up in a
> > > >different folder the current types I'm using are $0C, $2C, $4C,
> > > $6C, $14
> > > > because the shell searches for programs of type $xx which I
> > > already have
> > > >programmed to change to view programs of different types, I just
> > > cannot
> > > >for the life of me figure out how to change the actual VAT type 
> of
> > > the
> > > >programs so they can be moved by the shell to a different 
> folder.
> > > I've
> > > >tested the capability of the shell by manually retyping 
> variables
> > > through
> > > >mem30 and it works for displaying different types.
> > > >
> > > >Hopefullly I explained this clear enough for you to understand 
> what
> > > I'm
> > > >trying to do. Please Please help me out with this, it should be
> > > possible
> > > >since PhatOS used a similar technique.
> > > >
> > > >If you would like to see the current version of this shell you 
> can
> > > >download it from here:
> > > >http://www.ticalc.org/pub/85/asm/programs/usgard/future.zip
> > > >
> > > >Thanks,
> > > >Jon Johnson
> > > <snip>
> > >
> > >
> > > HotBot - Search smarter.
> > > http://www.hotbot.com
> > >
> >
> > ________________________________________________________________
> > YOU'RE PAYING TOO MUCH FOR THE INTERNET!
> > Juno now offers FREE Internet Access!
> > Try it today - there's no risk!  For your FREE software, visit:
> > http://dl.www.juno.com/get/tagj.
> >
> 
> 

________________________________________________________________
YOU'RE PAYING TOO MUCH FOR THE INTERNET!
Juno now offers FREE Internet Access!
Try it today - there's no risk!  For your FREE software, visit:
http://dl.www.juno.com/get/tagj.