A83: Code again...

A83: Code again...

• To: "Assembly 83 List" <assembly-83@lists.ticalc.org>
• Subject: A83: Code again...
• From: "James Matthews" <matthews@tkb.att.ne.jp>
• Date: Fri, 14 Aug 1998 02:12:55 +0900
• Delivered-To: assembly-83-outgoing@towerguard.unix.edu.sollentuna.se
• Reply-To: assembly-83@lists.ticalc.org

Ok guys...Harper helped me a lot...its a lot better, now, but still isn't
working!  Here's the updated version:

.NOLIST
#define equ .equ
#define EQU .equ
#define end .end
#include "ti83asm.inc"
#include "tokens.inc"
.LIST

PGMIO_EXEC         equ           50B2h
_formDisp          equ           4D0Eh

.org 9327h

        call    _clrLCDFull
        call    _homeup
        ld      hl,ScoreText
	call    _puts
        call    _newline
	ld      a,(highscore)
	ld	l,a
	ld      h,0
	call	_dispHL		; Display high score
        call    _newline

        ld      de,821ch
        ld      hl,prompt
        ld      bc,16
        ldir
        ld      a,1
        ld      (ASM_IND_CALL),a

        call    PGMIO_EXEC

	call    _convop1
	ld      a,e
	ld	(HighScore),a
	ret
	

prompt:         .db "Points: ",0
ScoreText:      .db "High Score: ",0
HighScore:	.db 0	
.end
.end

Thanks...

James.
____________________

James Matthews.
E-mail (family):    matthews@tkb.att.ne.jp
E-mail (private):  james_matthews@hotmail.com

Homepage:  http://home.att.ne.jp/gold/tomcat21/index.html
ICQ:  7413754
____________________________________

• Re: A83: Code again...
• From: benjamin99@juno.com (Alan C Johnson)

• Prev: A83: Re: Score storing problem...
• Next: Re: A83: Invisible
• Index(es):
  • Main
  • Thread