if 0 ;!def(_charmap_inc_)
_charmap_inc_ equ 0

char: macro
    charmap \1, x
x = x + 1
endm

x = 0
    char " "
    char "0"
    char "1"
    char "2"
    char "3"
    char "4"
    char "5"
    char "6"
    char "7"
    char "8"
    char "9"
    char "A"
    char "B"
    char "C"
    char "D"
    char "E"
    char "F"
    char "G"
    char "H"
    char "I"
    char "J"
    char "K"
    char "L"
    char "M"
    char "N"
    char "O"
    char "P"
    char "Q"
    char "R"
    char "S"
    char "T"
    char "U"
    char "V"
    char "W"
    char "X"
    char "Y"
    char "Z"
    char "."
    char "-"

    charmap "$", $ff

dstr: macro
    db \1, "$"
endm

endc