Base58Check encoding: Difference between revisions
Content added Content deleted
(Added Quackery.) |
|||
Line 1,044: | Line 1,044: | ||
0xecac89cad93923c02321 -> EJDM8drfXA6uyA |
0xecac89cad93923c02321 -> EJDM8drfXA6uyA |
||
0x10c8511e -> Rt5zm</pre> |
0x10c8511e -> Rt5zm</pre> |
||
=={{header|Quackery}}== |
|||
<lang Quackery> [ table ] is base58char ( n --> n ) |
|||
$ "123456789ABCDEFGHJKLMNPQRSTUV" |
|||
$ "WXYZabcdefghijkmnopqrstuvwxyz" |
|||
join witheach |
|||
[ ' base58char put ] |
|||
[ [] swap |
|||
[ 58 /mod base58char |
|||
rot join swap |
|||
dup 0 = until ] |
|||
drop ] is base58$ ( n --> $ ) |
|||
' [ 25420294593250030202636073700053352635053786165627414518 |
|||
hex 61 |
|||
hex 626262 |
|||
hex 636363 |
|||
hex 73696d706c792061206c6f6e6720737472696e67 |
|||
hex 516b6fcd0f |
|||
hex bf4f89001e670274dd |
|||
hex 572e4794 |
|||
hex ecac89cad93923c02321 |
|||
hex 10c8511e ] |
|||
witheach [ base58$ echo$ cr ] |
|||
</lang> |
|||
{{out}} |
|||
<pre>6UwLL9Risc3QfPqBUvKofHmBQ7wMtjvM |
|||
2g |
|||
a3gV |
|||
aPEr |
|||
2cFupjhnEsSn59qHXstmK2ffpLv2 |
|||
ABnLTmg |
|||
3SEo3LWLoPntC |
|||
3EFU7m |
|||
EJDM8drfXA6uyA |
|||
Rt5zm |
|||
</pre> |
|||
=={{header|Racket}}== |
=={{header|Racket}}== |