Revision as of 23:45, 22 March 2016 (view source) Hout (talk \| contribs) m (→‎{{header\|AppleScript}}) ← Older edit		Revision as of 18:09, 6 July 2016 (view source) Franck (talk \| contribs) m (→‎{{header\|Oforth}}) Newer edit →
Line 2,207: =={{header\|Oforth}}== <lang Oforth>~~func~~: move(n, from, to, via) { n 0 > ifTrue: [ move(n 1 -, from, via, to) System.Out "Move disk from " << from << " to " << to << cr move(n 1 -, via, to, from) ] ; } ~~move(~~5, $left, $middle, $right) move </lang> =={{header\|Oz}}==

Towers of Hanoi (view source)