Re: A86: Long Text Routine
[Prev][Next][Index][Thread]
Re: A86: Long Text Routine
Kenneth Kassing wrote:
>
> I am just learning how to program in assembly (thanks mainly to Matt
> Johnson's Z80 Programming Tutorial) and I am wondering if there is an
> easier way to write a whole page of text. It seems to take an awful lot
> of source to write a page of text on the screen.
>
> #include "asm86.h"
> #include "ti86asm.inc"
> #include "ti86math.inc"
> #include "ti86ops.inc"
> #include "ti86abs.inc"
>
> .org _asm_exec_ram
>
> call _clrScrn
> call _runindicoff
>
> Text_test:
> ld hl, $0000 ;stores (0,0) to hl
> ld b, 30 ;# of chars. to display
> ld ($0C37C), hl ;stores hl to adress of
> _penCol
> ld hl, Open1 ;loads text string
> call _vputsn ;writes string to screen
> ld a, ($0C37D)
> ld hl, $0600
> ld b, 34
> ld ($0C37C), hl
> ld hl, Open2
> call _vputsn
> ld a, ($0C37D)
> ld hl, $0C00
> ld b, 32
> ld ($0C37C), hl
> ld hl, Open3
> call _vputsn
> ld a, ($0C37D)
> ld hl, $1200
> ld b, 29
> ld ($0C37C), hl
> ld hl, Open4
> call _vputsn
>
> ret
>
> Open1: .db "Im Wonderin if this is the"
> .db "only",0
> Open2: .db "way to write a long page of"
> .db "writing",0
> Open3: .db "like this, or if there is a"
> .db "short",0
> Open4: .db "cut, useing a shorter source.",0
>
> .end
take out all the names of the variables after Open1 and take off the 0s
except for the last one. then point hl to Open1 and use vputsn
Follow-Ups:
References: