prog8/examples/test.p8

%import textio
%zeropage basicsafe

main {
    sub start() {
        basic_area.routine1()
    }
}

basic_area $a000 {
    sub routine1() {
        txt.print("hello from basic rom area ")
        txt.print_uwhex(&routine1, true)
        txt.nl()
    }
}

;hiram_area $c000 {
;    %option force_output
;    sub thing() {
;        cx16.r0++
;    }
;}