prog8/examples/test.p8
Irmen de Jong 870c6ea747 stuff
2019-01-14 23:48:18 +01:00

76 lines
1.8 KiB
Lua

%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
}
}