diff options
| author | Jan Tuomi <jans.tuomi@gmail.com> | 2023-11-03 19:55:52 +0200 |
|---|---|---|
| committer | Jan Tuomi <jans.tuomi@gmail.com> | 2023-11-03 19:55:52 +0200 |
| commit | abf6cbdecc8eb006a859205dee7500c2b70c0998 (patch) | |
| tree | 4938cfaf270b6c83a77767de968845f704049205 /asm/text_mode.atk16 | |
| parent | a3b677bac00060393cc66f1bb3b350413282a4ae (diff) | |
Fix macros, add string I/O helpers
Diffstat (limited to 'asm/text_mode.atk16')
| -rw-r--r-- | asm/text_mode.atk16 | 59 |
1 files changed, 7 insertions, 52 deletions
diff --git a/asm/text_mode.atk16 b/asm/text_mode.atk16 index ff84156..f4d84ae 100644 --- a/asm/text_mode.atk16 +++ b/asm/text_mode.atk16 @@ -1,61 +1,19 @@ @opt stack_pointer RF @opt csr_scratch RH @use ext_std:* +@use ext_string_io:* ; bootstrap code (must be called to set up mandatory data) ; will jump to label main @include bootstrap @label main - ldi vt_text_mem RA - ldr RA RA - ldi 8 RB ; letter H - str RB RA - addi RA 1 RA - ldi 5 RB ; letter E - str RB RA - addi RA 1 RA - ldi 12 RB ; letter L - str RB RA - addi RA 1 RA - ldi 12 RB ; letter L - str RB RA - addi RA 1 RA - ldi 15 RB ; letter O - str RB RA - addi RA 1 RA - ldi 0 RB ; space - str RB RA - addi RA 1 RA - ldi 3 RB ; letter C - str RB RA - addi RA 1 RA - ldi 15 RB ; letter O - str RB RA - addi RA 1 RA - ldi 18 RB ; letter R - str RB RA - addi RA 1 RA - ldi 5 RB ; letter E - str RB RA - addi RA 1 RA - ldi 3 RB ; letter C - str RB RA - addi RA 1 RA - ldi 1 RB ; letter A - str RB RA - addi RA 1 RA - ldi 13 RB ; letter M - str RB RA - addi RA 1 RA - ldi 16 RB ; letter P - str RB RA - ldi offset RC - ldr RC RC - add RA RC RA - ; ldi 20 RB ; letter A - ; str RB RA - ; addi RA 1 RA + cursor_to_line RA 1 + put_char RA RB %SPACE + put_string RA RB HELLO CORECAMP + cursor_to_line RA 3 + put_char RA RB %SPACE + put_string RA RB BY JAN ; set graphics mode to sprite mode ; set_graphics_mode gr_sprite_mode @@ -63,6 +21,3 @@ @label loop jpi loop - -@label offset - 51 |