2021-02-13 19:37:03 -05:00
|
|
|
( comment )
|
2021-02-06 13:39:13 -05:00
|
|
|
|
2021-02-10 22:05:40 -05:00
|
|
|
:dev/w fff9 ( const write port )
|
2021-02-06 13:39:13 -05:00
|
|
|
|
2021-02-13 19:37:03 -05:00
|
|
|
|0100 @RESET
|
2021-02-06 13:39:13 -05:00
|
|
|
|
2021-02-13 22:19:13 -05:00
|
|
|
,string ( add string pointer to stack )
|
2021-02-10 22:05:40 -05:00
|
|
|
@loop
|
2021-02-13 19:37:03 -05:00
|
|
|
DUP2 LDR IOW ( write pointer value to console )
|
|
|
|
#0001 ADD2 ( increment string pointer )
|
|
|
|
DUP2 LDR #00 NEQ ,loop ROT JMP? POP2 ( while *ptr!=0 goto loop )
|
2021-02-06 13:39:13 -05:00
|
|
|
|
2021-02-10 22:05:40 -05:00
|
|
|
BRK
|
2021-02-06 13:39:13 -05:00
|
|
|
|
2021-02-13 22:19:13 -05:00
|
|
|
@string " Hello World " ( add string to memory )
|
2021-02-06 13:39:13 -05:00
|
|
|
|
2021-02-13 19:37:03 -05:00
|
|
|
|c000 @FRAME BRK
|
2021-02-06 13:39:13 -05:00
|
|
|
|d000 @ERROR BRK
|
2021-02-13 19:37:03 -05:00
|
|
|
|
2021-02-14 20:00:17 -05:00
|
|
|
|FFFA .RESET .FRAME .ERROR
|