aparler/RosettaCodeData
1
0
Fork 0
Code Issues 12 Pull requests 3 Projects Releases Packages Wiki Activity Actions

Data update

Browse source
This commit is contained in:
Ingy döt Net 2025-08-11 18:05:26 -07:00
parent 4d5544505c
commit 4924dd0264
3073 changed files with 55820 additions and 4408 deletions
Download patch file Download diff file Expand all files Collapse all files

15
Task/Show-ASCII-table/ArkScript/show-ascii-table.ark Normal file
View file

@ -0,0 +1,15 @@
(mut i 0)
(while (< i 16) {
(mut j (+ 32 i))
(while (< j 128) {
(let k
(if (= 32 j)
"Spc"
(if (= 127 j)
"Del"
(string:chr j))))
(puts (string:format "{:3} : {:<3}" j k))
(set j (+ 16 j) )})
(print "")
(set i (+ 1 i)) })