99 Bottles of Beer

Voting

Bookmarking

Support Us

Language Obey

(Acorn RISC OS Command Line Script)

Date:	12/08/05
Author:	mrhill/icebird
URL:	n/a
Comments:	2
Info:	http://www.drobe.co.uk/show_manual.php?manual=/sh-cgi?manual=StarCmds%26page=SysVars
Score:	(3.16 in 112 votes)

| 99 bottles of beer, Acorn RISC OS obey file version by mrhill/icebird

if "<b>"="" then SetEval b 99
if <b><0 then SetEval b 99
	
Set x bottle
set l of beer
set w on the wall
set m Take one down and pass it around,

echo <b> <x>s <l> <w>, <b> <x>s <l>.
SetEval b b-1
echo <m> <b> <x>s <l> <w>.
echo <b> <x>s <l> <w>, <b> <x>s <l>.
SetEval b b-1
echo <m> <b> <x>s <l> <w>.
echo <b> <x>s <l> <w>, <b> <x>s <l>.
SetEval b b-1
echo <m> <b> <x>s <l> <w>.
echo <b> <x>s <l> <w>, <b> <x>s <l>.
SetEval b b-1
echo <m> <b> <x>s <l> <w>.
echo <b> <x>s <l> <w>, <b> <x>s <l>.
SetEval b b-1
echo <m> <b> <x>s <l> <w>.
echo <b> <x>s <l> <w>, <b> <x>s <l>.
SetEval b b-1
echo <m> <b> <x>s <l> <w>.
echo <b> <x>s <l> <w>, <b> <x>s <l>.
SetEval b b-1
echo <m> <b> <x>s <l> <w>.
echo <b> <x>s <l> <w>, <b> <x>s <l>.
SetEval b b-1
if <b>=1 then set s "" else set s s
echo <m> <b> <x><s> <l> <w>.
echo <b> <x><s> <l> <w>, <b> <x><s> <l>.
SetEval b b-1
if <b>=0 then set t "No more" else set t "<b>"
echo <m> <t> <x>s <l> <w>.
echo <t> <x>s <l> <w>, <t> <x>s <l>.
if <b>=0 then Set m Go to the store and buy some more,
if <b>=0 then SetEval b 99
echo <m> <b> <x>s <l> <w>.

if <b><99 then <Obey$Dir>.beer

Download Source | Write Comment

Alternative Versions

Comments

mrhill said on 12/08/05 14:54:16

You have to save the script under filename 'beer' and set the filetype to FEB (Obey) on RISC OS.

MICHELLE28Cherry said on 07/09/10 00:31:20

Do you understand that it's high time to get the <a href="http://bestfinance-blog.com/topics/credit-loans">credit loans</a>, which will realize your dreams.

Download Source | Write Comment

Add Comment

Please provide a value for the fields Name, Comment and Security Code.
This is a gravatar-friendly website.
E-mail addresses will never be shown.
Enter your e-mail address to use your gravatar.

Please don't post large portions of code here! Use the form to submit new examples or updates instead!

one program in 1440 variations