unicode of character:how to do ?

[TempodiBasic]

Hi boys and girls of QB64

please help me, how can I get the unicode value of a character taken from a string?

Thank you for feedbacks

[SMcNeill]

Are you wanting to print the character?  If so, take a look at QPrint: https://www.qb64.org/forum/index.php?topic=3676.msg130229#msg130229

[TempodiBasic]

Hi Steve
thanks for the help
I was searching a way to get the UNICODE value related a character. Moreover I dunno if  all character set used cover all UNICODE values.
In other words if I set a string like "thisisthetext"  can I get back the unicode value of each character?  Anymore can I set a string "qw314ìòràfì" that cover all the unicode values?

this 2 wikipages founded following your post have given me good help, but I'm still solving to cover all unicode values.
http://www.qb64.org/wiki/MAPUNICODE  http://www.qb64.org/wiki/Unicode

Thanks again

PS this is the cause of my search http://rosettacode.org/wiki/Palindrome_detection

For extra credit:

Support Unicode characters.
Write a second function (possibly as a wrapper to the first) which detects inexact palindromes, i.e. phrases that are palindromes if white-space and punctuation is ignored and case-insensitive comparison is used.

[moises1953]

Usually the character codes in Windows are 8 bits, and therefore 256 different characters, of which the first 128 correspond to the 7-bit ASCII used in telecommunications since the time of the teletype, however the last 128 may vary according to the adaptation to the language performed using code pages. In western countries the code page is 1252.
QB64 does a character code mapping to be compatible with the original MSDOS page, known as 437, but that mapping can be changed with the _MAPUNICODE instruction.
Additionally, the _MAPUNICODE function allows obtaining the unicode code of each character in UTF32 format, which is the internal Windows format.
With this simple program you can see all:

Code: QB64: [Select]

1. $NOPREFIX
2. DEFLNG H-P
3. CONST Apl = "Maped Unicodes"
4.  
5. SCREEN NEWIMAGE(800, 600, 256)
6. TITLE Apl
7. CONTROLCHR OFF
8. 'OPEN "MapedUnicodes.txt" FOR OUTPUT AS #1
9. line$ = ""
10. FOR i = 0 TO 255 STEP 16
11.   PRINT USING "###:"; i;
12.   FOR j = i TO i + 15
13.     map = MAPUNICODE(j)
14.     IF j = i THEN
15.       line$ = STR$(map)
16.     ELSE
17.       line$ = line$ + "," + STR$(map)
18.     END IF
19.     PRINT USING "#####"; map;
20.  
21.     READ kunicode
22.     IF kunicode - map THEN PRINT "*"; ELSE PRINT " ";
23.   NEXT j
24.   PRINT
25.   '  PRINT #1, line$
26. NEXT i
27. 'CLOSE #1
28. FOR i = 0 TO 255 STEP 16
29.   PRINT USING "###:"; i;
30.   FOR j = i TO i + 15
31.     PRINT CHR$(j);
32.   NEXT j
33.   PRINT
34. NEXT i
35. PRINT CHR$(128)
36. END
37.  
38. 'unicodes -> CP437
39. DATA 32,9786,9787,9829,9830,9827,9824,8226,9688,9675,9689,9794,9792,9834,9835,9788
40. DATA 9658,9668,8597,8252,182,167,9644,8616,8593,8595,8594,8592,8735,8596,9650,9660
41. DATA 32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47
42. DATA 48,49,50,51,52,53,54,55,56,57,58,59,60,61,62,63
43. DATA 64,65,66,67,68,69,70,71,72,73,74,75,76,77,78,79
44. DATA 80,81,82,83,84,85,86,87,88,89,90,91,92,93,94,95
45. DATA 96,97,98,99,100,101,102,103,104,105,106,107,108,109,110,111
46. DATA 112,113,114,115,116,117,118,119,120,121,122,123,124,125,126,8962
47. DATA 199,252,233,226,228,224,229,231,234,235,232,239,238,236,196,197
48. DATA 201,230,198,244,246,242,251,249,255,214,220,162,163,165,8359,402
49. DATA 225,237,243,250,241,209,170,186,191,8976,172,189,188,161,171,187
50. DATA 9617,9618,9619,9474,9508,9569,9570,9558,9557,9571,9553,9559,9565,9564,9563,9488
51. DATA 9492,9524,9516,9500,9472,9532,9566,9567,9562,9556,9577,9574,9568,9552,9580,9575
52. DATA 9576,9572,9573,9561,9560,9554,9555,9579,9578,9496,9484,9608,9604,9612,9616,9600
53. DATA 945,223,915,960,931,963,181,964,934,920,937,948,8734,966,949,8745
54. DATA 8801,177,8805,8804,8992,8993,247,8776,176,8729,183,8730,8319,178,9632,32
55.