prog8/examples/test.p8

%import textio
%import math
%zeropage basicsafe
%option no_sysinit

main {
    sub start() {
        ubyte @shared pointer
        const uword value = 255

        if pointer>value {
            cx16.r0L++
        }
;        if pointer>50000 {
;            cx16.r0L++
;        }

        txt.bell()
    }
}


/*main222 {
    sub start() {

        str name1 = "name1"
        str name2 = "name2"
        uword[] @split names = [name1, name2, "name3"]
        uword[] addresses = [0,1,2]
        names = [1111,2222,3333]

        for cx16.r0 in names {
            txt.print_uw(cx16.r0)
            txt.spc()
        }
        txt.nl()

        addresses = names

        for cx16.r0 in addresses {
            txt.print_uw(cx16.r0)
            txt.spc()
        }
        txt.nl()

        names = [9999,8888,7777]
        names = addresses
        for cx16.r0 in names {
            txt.print_uw(cx16.r0)
            txt.spc()
        }
        txt.nl()
    }
}*/