10 CLEAR ALL
20 READ m$:IF m$="-1" THEN END
30 TILEMAP 1 LOAD m$
40 SPRITE 1 BIND TILEMAP 1 SHOW FIT
50 GETKEY a$
60 GOTO 20
70 DATA "sample_fantasy.tmx"
80 DATA "sample_interior.tmx"
90 DATA "sample_platformer.tmx"
100 DATA "sample_urban.tmx"
110 DATA -1
