tile init
set %x #charposx
set %y #charposy
tile cnt %x %y
msg #tilecnt $
halt