real language

Bookmarking Digg Diigo DZone Earthlink Google
Windows Live LookLater Ma.gnolia Reddit Rojo StumbleUpon Technorati

Language uBASIC(CHDK)

(uBASIC for Canon cameras)

Author:Maximilian Laiacker
Score: (2.30 in 10 votes)
rem uBASIC (CHDK) for Canon cameras version of 99 bottles of beer
rem author Maximilian Laiacker
rem tested on Ixus 40 with "allbest-ixus40_sd300-100k-51-fixSeries" firmware

rem after pressing the shoot button, the song text is printed on the lower left rem corner of the
camera display

@title 99 bottles of beer
@param a printing delay
@default a 500 

for x=99 to 1 step -1
  if x<>1 then print x,"bottles" else print "1 bottle"
  sleep a
  print " of beer on the wall,"
  if x<>1 then print x, "bottles of beer" else print "1 bottle of beer"
  print "Take one down and pass"
  if x<>2 then print " it around,", x-1,"bottles" else print " it around, 1 bottle"
  print " of beer on the wall"
  sleep a
next x

Download Source | Write Comment

Alternative Versions


>>  DurhamSHARLENE said on 03/20/10 01:33:25

DurhamSHARLENE Have no money to buy some real estate? Worry no more, just because that's possible to get the <a href="">credit loans</a> to resolve such kind of problems. Thus take a secured loan to buy everything you want.

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!




Security Code: