prog8/examples/test.p8

%import c64utils
%import c64flt

~ main {

    sub start()  {


        ubyte b1=42
        ubyte b2=42
        ubyte b3=99
        ubyte b4=42
        word  w1=42
        word  w2=42
        word  w3=99
        word  w4=42
        uword  uw1=42
        uword  uw2=42
        uword  uw3=99
        uword  uw4=42
        float f1 = 3.14
        float f2 = 3.14
        float f3 = 99.0
        float f4 = 3.14
        str  string1="hoi"
        str  string2="hoi"
        str  string3="hoi222"
        str  string4="hoi"



;
;        c64scr.print_ub(c64utils.str2ubyte("1"))
;        c64.CHROUT('\n')
;        c64scr.print_ub(c64utils.str2ubyte("12"))
;        c64.CHROUT('\n')
;        c64scr.print_ub(c64utils.str2ubyte("123"))
;        c64.CHROUT('\n')
;        c64scr.print_ub(c64utils.str2ubyte("1234"))
;        c64.CHROUT('\n')
;        c64scr.print_ub(c64utils.str2ubyte("12xyz"))
;        c64.CHROUT('\n')
;        c64.CHROUT('\n')
;
;        c64scr.print_ub(c64utils.str2byte("1"))
;        c64.CHROUT('\n')
;        c64scr.print_ub(c64utils.str2byte("12"))
;        c64.CHROUT('\n')
;        c64scr.print_ub(c64utils.str2byte("123"))
;        c64.CHROUT('\n')
;        c64scr.print_ub(c64utils.str2byte("1234"))
;        c64.CHROUT('\n')
;        c64scr.print_ub(c64utils.str2ubyte("12xyz"))
;        c64.CHROUT('\n')
;        c64.CHROUT('\n')
;
;        c64scr.print_b(c64utils.str2byte("-1"))
;        c64.CHROUT('\n')
;        c64scr.print_b(c64utils.str2byte("-12"))
;        c64.CHROUT('\n')
;        c64scr.print_b(c64utils.str2byte("-123"))
;        c64.CHROUT('\n')
;        c64scr.print_b(c64utils.str2byte("-1111"))
;        c64.CHROUT('\n')
;        c64scr.print_b(c64utils.str2byte("-12xyz"))
;        c64.CHROUT('\n')

    }

    sub foo(ubyte param1, ubyte param2) {
        ubyte local1
    }

}