A89: Re: A simple? Question
[Prev][Next][Index][Thread]
A89: Re: A simple? Question
>
>Hello, can someone tell me what is wrong with this :( It doesn't want to
>compile :( I am doing it with PlusShell stuff.
>Also, why do you load 4 on the stack at first?
It's the color, here are the possibilities:
0 - White on black
1 - Black on black
2 - XOR mode
3 - Gray on white
4 - Black on white
also, <pea string(pc)> (pusg effective address) can be used in place of <lea
string(pc),a0 / move.l a0,-(a7) ;-)
>
>-Ahmed
>
> include "tios.h"
> include "util.h"
>
> xdef _main
> xdef _comment
> xdef _ti89
>
>_main:
> jsr util::clr_scr
> move.w #4,-(a7)
> lea string(pc),a0
> move.l a0,-(a7)
> move.w #0,-(a7)
> move.w #0,-(a7)
> jsr tios::DrawStrXY
> add.l #10,(a7)
> jrs util::idle_loop ;this line doesn't compile
>
> rts
>
>_string:
> dc.b "Ahmed El-Helw",0
>
>_comment:
> dc.b "Ahmed's First Program in 68k",0
>
> end
>Ahmed El-Helw <ahmed@ticalc.org>
>Program Ideas, Upcoming Programs
>the ticalc.org project - http://www.ticalc.org/
>_____________________________
>http://hail.icestorm.net/asm
>ICQ : 3350394