Non-decimal radices/Convert: Difference between revisions

m
(Added Easylang)
Line 1,353:
=={{header|EasyLang}}==
<syntaxhighlight>
func$ n2snum2str n bbase .
if n = 0
return "0"
.
d = n mod bbase
if d > 9
d += 39
.
d$ = strchar (d + 48)
if n < bbase
return d$
.
return n2snum2str (n div bbase) bbase & d$
.
func s2nstr2num s$ bbase .
r = 0
for c$ in strchars s$
Line 1,374:
d -= 39
.
r = r * bbase + d
.
return r
.
print n2snum2str 253 16
print s2nstr2num "fd" 16
print n2snum2str 0 16
</syntaxhighlight>
 
2,053

edits