mirror of
https://github.com/irmen/prog8.git
synced 2024-11-23 07:32:10 +00:00
32 lines
670 B
Lua
32 lines
670 B
Lua
%import textio
|
|
%import string
|
|
|
|
%zeropage basicsafe
|
|
%option no_sysinit
|
|
|
|
main {
|
|
sub start() {
|
|
foo("zzz")
|
|
}
|
|
|
|
sub foo (str sarg) {
|
|
str svar = "irmen"
|
|
txt.print_uwhex(svar, true)
|
|
txt.nl()
|
|
txt.print_uwhex(&svar, true)
|
|
txt.nl()
|
|
txt.print_uwhex(&svar[2], true)
|
|
txt.nl()
|
|
txt.nl()
|
|
txt.print_uwhex(sarg, true)
|
|
txt.nl()
|
|
txt.print_uwhex(&sarg, true)
|
|
txt.nl()
|
|
txt.print_uwhex(sarg+2, true)
|
|
txt.nl()
|
|
cx16.r0 = &sarg[2]
|
|
txt.print_uwhex(cx16.r0, true) ; TODO should be the same as the previous one sarg+2 (13)!
|
|
txt.nl()
|
|
}
|
|
}
|