Execute HQ9+: Difference between revisions
Added Quackery.
Not a robot (talk | contribs) (Add 8080 assembly) |
(Added Quackery.) |
||
Line 1,940:
See [[RCHQ9+/Python]].
=={{header|Quackery}}==
<lang Quackery>$ "bottles.qky" loadfile ( if required, the source code for this can be found at
http://rosettacode.org/wiki/99_bottles_of_beer#Quackery )
[ stack ] is accumulator ( --> s )
[ stack ] is sourcecode ( --> s )
[ say "Hello, world!" cr ] is H.HQ9+ ( --> )
[ sourcecode share
echo$ cr ] is Q.HQ9+ ( --> )
[ 99 song echo$ ] is 9.HQ9+ ( --> )
[ 1 accumulator tally ] is +.HQ9+ ( --> )
[ dup sourcecode put
0 accumulator put
witheach
[ $ ".HQ9+" join
quackery ]
sourcecode release
cr say "Accumulator = "
accumulator take echo ] is HQ9+ ( $ --> )
$ "HH+QQQQ+" HQ9+</lang>
{{Out}}
<pre>Hello, world!
Hello, world!
HH+QQQQ+
HH+QQQQ+
HH+QQQQ+
HH+QQQQ+
Accumulator = 2</pre>
=={{header|Racket}}==
| |||