A89: Re: What more?


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

A89: Re: What more?




See inside.

 / Niklas Brunlid
Check out Prosit for the TI-89 / TI-92+ at http://prosit.ticalc.org
Random PQF Quote follows:

Smoke was coming out of the stricken piano. The Librarian's hands were
walking through the keys like Casanunda in a nunnery.
        -- (Terry Pratchett, Soul Music)

----- Original Message -----
From: Schony
To: assembly-89@lists.ticalc.org
Sent: Tuesday, November 30, 1999 11:32 PM
Subject: A89: What more?


    include "doorsos.h"
    include "userlib.h"
    include "graphlib.h"
    xdef _comment
    xdef _main
    xdef _ti89

WriteStr1 macro
    move.w \3,-(a7)
    pea \4(pc)
    move.w \2,-(a7)
    move.w \1,-(a7)
    jsr doorsos::DrawStrXY
    lea 10(a7),a7
    endm
;==============================================
_main:
    move.w d0,-(a7)
    pea exe(pc)
    pea info(pc)
    jsr doorsos::sprintf
    WriteStr1 #60,#10,#1,exe

//
// You have to restore the stack. It might also be a good idea to put in a loop
waiting for the user to press ESC or something if you want to see the text
you're printing on the screen... =P
//

;==========string info=================
exe dc.b "The Number is %d!",0
info dc.b 69

//
// ds.b, not dc.b. ds.b = Allocate x bytes here, dc.b = Allocate *1* byte here
and set it to the value.
//

_comment dc.b "String",0
    end

What more do i need i don't know hehe going nuts  :D

                      Ryan (Schony) Schonhoff



References: