mirror of
https://github.com/irmen/prog8.git
synced 2024-09-28 17:54:58 +00:00
26 lines
462 B
Lua
26 lines
462 B
Lua
%import c64utils
|
|
%zeropage basicsafe
|
|
%import c64flt
|
|
|
|
|
|
~ main {
|
|
|
|
sub start() {
|
|
uword uw = $ab34
|
|
str name = "irmen de jong"
|
|
|
|
c64scr.print_ub(len(name))
|
|
c64.CHROUT('\n')
|
|
c64scr.print_ub(strlen(name))
|
|
c64.CHROUT('\n')
|
|
c64scr.print(name)
|
|
c64.CHROUT('\n')
|
|
name[6] = 0
|
|
c64scr.print_ub(strlen(name))
|
|
c64.CHROUT('\n')
|
|
c64scr.print(name)
|
|
c64.CHROUT('\n')
|
|
|
|
}
|
|
}
|