Anonymous user
99 bottles of beer: Difference between revisions
Added hexiscript
m (→{{header|V}}: removed <nowiki> tags inside <lang> block) |
(Added hexiscript) |
||
Line 3,741:
}</lang>
=={{header|hexiscript}}==
<lang hexiscript>fun bottles amount beverage location
let bottle " bottles of "
if amount = 0; let amount "No more"
elif amount = 1; let bottle " bottle of "; endif
return amount + bottle + beverage + " " + location
endfun
fun take amount location
return "Take " + amount + " " + location
endfun
fun pass entity destination
return ", pass " + entity + " " + destination
endfun
let amount 99
while amount > 0
println bottles amount "beer" "on the wall"
println bottles amount "beer" ""
println take "one" "down" + pass "it" "around"
println bottles (--amount) "beer" "on the wall\n"
endwhile</lang>
=={{header|HicEst}}==
|