Word wheel: Difference between revisions
Content deleted Content added
Antoni Gual (talk | contribs) |
Added Quackery. |
||
Line 2,356:
wok
woke</pre>
=={{header|Quackery}}==
<syntaxhighlight lang="Quackery"> [ over find swap found ] is has ( $ c --> b )
[ over find
split 1 split
swap drop join ] is remove ( $ c --> $ )
$ "rosetta/unixdict.txt" sharefile
drop nest$
[] swap
witheach
[ dup size 3 < iff drop done
dup size 9 > iff drop done
dup char k has not iff drop done
dup $ "ndeokgelw"
witheach remove
$ "" != iff drop done
nested join ]
30 wrap$</syntaxhighlight>
{{out}}
<pre>eke elk keel keen keg ken keno knee
kneel knew know knowledge kong leek week
wok woke
</pre>
=={{header|q}}==
|