mirror of
https://github.com/gbdev/rgbds.git
synced 2025-11-20 18:22:07 +00:00
38 lines
606 B
NASM
38 lines
606 B
NASM
opt Wno-unmapped-char
|
|
|
|
def hello equs "world"
|
|
def name equs "hello"
|
|
println "{name}"
|
|
println #name
|
|
assert !strcmp(strslice(#name, 0, 4), "hell")
|
|
assert strlen(#hello) == charlen(#hello)
|
|
assert strlen("{hello}") == 5
|
|
|
|
def multi equs """the quick
|
|
brown fox"""
|
|
println #multi
|
|
|
|
def char equs "A"
|
|
def n = #char
|
|
println n
|
|
def n = (#char)
|
|
println n
|
|
def n = 1 + #char
|
|
println n
|
|
assert #char == $41
|
|
|
|
def fmt equs "%s %s %d"
|
|
println strfmt(#fmt, #name, #hello, (#char))
|
|
|
|
purge #name
|
|
assert !def(name) && !def(#name) && def(hello)
|
|
|
|
section "test", rom0
|
|
|
|
db #hello
|
|
dw #hello
|
|
dl #hello
|
|
|
|
#label:
|
|
dw BANK(#label), #label
|