Re: A86: Ticklish?
[Prev][Next][Index][Thread]
Re: A86: Ticklish?
sorry about all these posts, but what is that "user menu space" meant
for?
Dux Gregis wrote:
> Ahh. I found a new method that's not much of a hack at all. It
> still doesn't work with 1.3, though. ??
>
> Dux Gregis wrote:
>
>> Here's a program that puts something at the end of your conv menu.
>> It's an ugly hack, so I won't post the source unless you really want
>> me to.
>>
>> Note: it doesn't seem to work with 1.3 for reasons I am as yet
>> unable to decipher...
>
>
>
> ----------------------------------------------------------------
> #include "asm86.h"
> #include "Ti86abs.inc"
> #include "Ti86asm.inc"
>
> _user_menu equ $c274
>
> .org _asm_exec_ram
>
> ld hl,data_table ;move our data table to "user"
> ld de,_user_menu ; menu space
> call _mov10B
>
>
> ;a more efficient beginning
> ld hl,$5a92
> rst 20h
> rst 10h
> jr c,Install
> call _delvar
> Install:
> ld hl,$5a92
> rst 20h
> ld hl, code_end - code
> call _CREATEPROG
> ld a,b
> ex de,hl
> call $4c3f
> call _SET_ABS_DEST_ADDR
> xor a
> ld hl,code_end - code
> call _SET_MM_NUM_BYTES
> xor a
> ld hl,code
> call _SET_ABS_SRC_ADDR
> call _mm_ldir
> set 6,(iy+$24)
> ret
>
> code:
> .db $8e,$28
> call $479f ;pop op1
> ld hl,$56d8
> ld de,($c210)
> call _cphlde ;check for conversion menu
> jr nz,end
> ld hl,conv_menu ;make it point to our conv menu
> ld ($c210),hl
> end:
> ld a,($d625) ;get saved a register
> cp a ;set z flag
> ret
>
> conv_menu: ;patched conversion menu datatable
> .db 9,12 ; -added 1 entry
> .dw $679c, $67a4
> .dw $67ab, $67b1
> .dw $d7b8, $67bf
> .dw $67c6, $67ce
> .dw $67d6, $67de
> .dw $67e6, entry
>
> entry:
> .db 5
> .dw _data_tbl
> .db ";-)",0
> code_end:
>
> data_table:
> .db 8,1
> .dw _data_tbl + 4
> another_entry:
> .db 0
> .db "Hey!",0
>
>
> .end
> .end
>
--
Stephen Hicks
mailto:shicks@mindspring.com
ICQ:5453914
IRC:Kupopo
Follow-Ups:
References: