mirror of
https://github.com/irmen/prog8.git
synced 2024-11-27 03:50:27 +00:00
22 lines
403 B
Lua
22 lines
403 B
Lua
%import textio
|
|
%import string
|
|
%zeropage basicsafe
|
|
|
|
main {
|
|
sub start() {
|
|
str name = "irmen????????????"
|
|
name[5] = 0
|
|
|
|
txt.print(name)
|
|
txt.nl()
|
|
ubyte length = string.append(name, ".prg")
|
|
|
|
txt.print_ub(length)
|
|
txt.chrout('[')
|
|
for cx16.r0L in 0 to length-1 {
|
|
txt.chrout(name[cx16.r0L])
|
|
}
|
|
txt.chrout(']')
|
|
}
|
|
}
|