blob: f33120de81479aad891c7e7eaf7c05a9664da0dc (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
|
@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
cursor_to_line RA 1
put_string RA RB " HELLO CORECAMP"
cursor_to_line RA 2
put_string RA RB " BY JAN"
; set graphics mode to sprite mode
; set_graphics_mode gr_sprite_mode
set_graphics_mode gr_text_mode
@label loop
jpi loop
|
