Anonymous user
Character codes: Difference between revisions
Added solution for Action!
Puppydrum64 (talk | contribs) m (→{{header|Z80 Assembly}}: corrected external link) |
(Added solution for Action!) |
||
Line 221:
<lang Lisp>(cw "~x0" (char-code #\a))
(cw "~x0" (code-char 97))</lang>
=={{header|Action!}}==
<lang Action!>PROC Main()
CHAR c=['a]
BYTE b=[97]
Put(c) Put('=) PrintBE(c)
PrintB(b) Put('=) Put(b)
RETURN</lang>
{{out}}
[https://gitlab.com/amarok8bit/action-rosetta-code/-/raw/master/images/Character_codes.png Screenshot from Atari 8-bit computer]
<pre>
a=97
97=a
</pre>
=={{header|ActionScript}}==
| |||