Show ASCII table: Difference between revisions

Add Quackery
m (→‎{{header|Haskell}}: Pruned out one unused import.)
(Add Quackery)
Line 3,228:
46 : . 62 : > 78 : N 94 : ^ 110 : n 126 : ~
47 : / 63 : ? 79 : O 95 : _ 111 : o 127 : Del</pre>
 
=={{header|Quackery}}==
<lang quackery>
[ dup 32 = iff
[ drop $ 'spc' echo$ ] done
dup 127 = iff
[ drop $ 'del' echo$ ] done
emit sp sp ] is echoascii ( n --> )
 
[ dup echo $ ': ' echo$
dup echoascii
84 < 3 + times sp ] is echoelt ( n --> )
 
[ sp 81 times
[ dup i^ + echoelt 16 step ]
drop cr ] is echorow ( n --> )
 
[ 16 times [ i^ 32 + echorow ] ] is echotable ( --> )
 
echotable
</lang>
{{out}}
<pre>
32: spc 48: 0 64: @ 80: P 96: ` 112: p
33: ! 49: 1 65: A 81: Q 97: a 113: q
34: " 50: 2 66: B 82: R 98: b 114: r
35: # 51: 3 67: C 83: S 99: c 115: s
36: $ 52: 4 68: D 84: T 100: d 116: t
37: % 53: 5 69: E 85: U 101: e 117: u
38: & 54: 6 70: F 86: V 102: f 118: v
39: ' 55: 7 71: G 87: W 103: g 119: w
40: ( 56: 8 72: H 88: X 104: h 120: x
41: ) 57: 9 73: I 89: Y 105: i 121: y
42: * 58: : 74: J 90: Z 106: j 122: z
43: + 59: ; 75: K 91: [ 107: k 123: {
44: , 60: < 76: L 92: \ 108: l 124: |
45: - 61: = 77: M 93: ] 109: m 125: }
46: . 62: > 78: N 94: ^ 110: n 126: ~
47: / 63: ? 79: O 95: _ 111: o 127: del
</pre>
 
=={{header|R}}==
1,827

edits