99 Bottles of Beer

Voting

Bookmarking

Language SMX

Date:	04/17/09
Author:	Roberto Bazzano
URL:	http://www.z80ne.com
Comments:	1
Info:	http://www.smxlang.org/index.html
Score:	(3.67 in 3 votes)

%expand%
%null(
	*** PSX version - formerly SMX ***
	
	%define(bottles,'%if(%equ(%par%,'0),'no more,'%par%) bottle%if(%gt(%par%,1),'s) of beer,par)

	%set(out,%null%)
	%set(iCnt,99)
	%while('%gt(%icnt%,0),
		 '%let(out,%out%%bottles(%iCnt%) on the wall\, %bottles(%iCnt%).%crlf%)
		  %let(iCnt,%isub(%iCnt%,'1))
		  %let(out,%out%Take one down and pass it around\, %bottles(%iCnt%) on the wall.%crlf%%crlf%)
	)
	%let(out,%out%No more bottles of beer on the wall\, no more bottles of beer.%crlf%)
	%let(out,%out%Go to the store and buy some more\, 99 bottles of beer on the wall.%crlf%)
)%out%

Download Source | Write Comment

Alternative Versions

Comments

Kelli26Miller said on 09/16/10 11:42:55

It's cool that people can take the <a href="http://bestfinance-blog.com/topics/personal-loans">personal loans</a> and this opens up new opportunities.

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 1500 variations