; non-breaking hyphen
(define s (string-append "1000136650" (string #\x7db) "1"))
(display s) (newline)
(define (asciistr s)
(map char->integer (string->list s)))
(display (asciistr s)) (newline)
OyBub24tYnJlYWtpbmcgaHlwaGVuCgooZGVmaW5lIHMgKHN0cmluZy1hcHBlbmQgIjEwMDAxMzY2NTAiIChzdHJpbmcgI1x4N2RiKSAiMSIpKQoKKGRpc3BsYXkgcykgKG5ld2xpbmUpCgooZGVmaW5lIChhc2NpaXN0ciBzKQogIChtYXAgY2hhci0+aW50ZWdlciAoc3RyaW5nLT5saXN0IHMpKSkKCihkaXNwbGF5IChhc2NpaXN0ciBzKSkgKG5ld2xpbmUp