Create assembler_tms9900_ti99_4a.asm
Hello World for TI-99/4a computer with TMS9900 CPU
This commit is contained in:
44
assembler_tms9900_ti99_4a.asm
Normal file
44
assembler_tms9900_ti99_4a.asm
Normal file
@@ -0,0 +1,44 @@
|
|||||||
|
|
||||||
|
* Hello World for TI-99/4a computer with TMS9900 CPU
|
||||||
|
* by Frog ( http://frog.enlight.ru )
|
||||||
|
* 15 April 2016
|
||||||
|
*
|
||||||
|
****************************************************************************
|
||||||
|
|
||||||
|
DEF START
|
||||||
|
|
||||||
|
WRKSP EQU >8300
|
||||||
|
|
||||||
|
VDPWD EQU >8C00 * VDP RAM write data
|
||||||
|
VDPWA EQU >8C02 * VDP RAM read/write address
|
||||||
|
|
||||||
|
|
||||||
|
START LIMI 0 * disable interrupts
|
||||||
|
LWPI WRKSP * set default workspace
|
||||||
|
|
||||||
|
* set VDP RAM start address (low and high byte)
|
||||||
|
|
||||||
|
LI R0,>0000
|
||||||
|
ORI R0,>4000
|
||||||
|
SWPB R0
|
||||||
|
MOVB R0,@VDPWA
|
||||||
|
SWPB R0
|
||||||
|
MOVB R0,@VDPWA
|
||||||
|
|
||||||
|
LI R1,HELLOWORLD * ascii string address
|
||||||
|
LI R2,12 * total chars
|
||||||
|
|
||||||
|
NEXTCHAR
|
||||||
|
MOVB *R1+,@VDPWD * put next char on screen
|
||||||
|
DEC R2
|
||||||
|
JNE NEXTCHAR
|
||||||
|
|
||||||
|
LOOPBACK
|
||||||
|
JMP LOOPBACK * stop and do nothing
|
||||||
|
|
||||||
|
|
||||||
|
HELLOWORLD
|
||||||
|
TEXT 'HELLO WORLD!' * string data
|
||||||
|
BYTE 0
|
||||||
|
|
||||||
|
END
|
||||||
Reference in New Issue
Block a user