99 Bottles of Beer

Voting

Bookmarking

Language Babble-On

Date:	08/10/05
Author:	Kevlar
URL:	http://www.sindome.org
Comments:	1
Info:	http://www.sindome.org
Score:	(2.33 in 6 votes)

Simple version:

uses $npc_centric_script
// For more information, see 'help scripting'.
env "jump_limit" 120
set "%bottles" 99

label "top"
if equals %bottles 0
  stop
endif
start "verse"
pause 5 "minutes"
jump "top"

label "verse"
  say %bottles " bottles of beer on the wall ..."
  say %bottles " bottles of beer!"
  say "Yaaah take one down, pass it around!"
  decrement "%bottles"
  if equals %bottles 1
    say %bottles " bottle of beer on the wall!"
  elseif equals %bottles 0
    say "No more bottles of beer on ... the ... wall."
    social "sigh"
  else
    say %bottles " bottles of beer on the wall!"
  endif
finish

Randomized version:

uses $npc_centric_script
// For more information, see 'help scripting'.
env "jump_limit" 120
set "%bottles" 99

label "top"
if equals %bottles 0
  stop
endif
start "verse"
pause 1 "minute"
jump "top"

label "verse"
  start "verse_a"
  start "verse_b"
  start "verse_c"
  decrement "%bottles"
  if equals %bottles 1
    say %bottles " bottle of beer on the wall!"
  elseif equals %bottles 0
    say "No more bottles of beer on ... the ... wall."
    social "sigh"
  else
    say %bottles " bottles of beer on the wall!"
  endif
finish

label "verse_a"
  random "type" 4
  if equals %type 4
    say "Weeee .... got " %bottles " bottles of beeeer on the wall!"
  elseif equals %type 3
    say %bottles " bottles of beer on the wall ..."
  elseif equals %type 2
    do %npc ".drop to my knees and .sing out, \"" %bottles " bottles of beeeer on the wallllll!\""
  else
    say "Ooooh, theres " %bottles " bottles of beer on the wall!"
  endif
finish

label "verse_b"
  random "type" 4
  if equals %type 4
    say %bottles " bottles of beeeeer!"
  elseif equals %type 3
    say "Oh- " %bottles " bottles of beer!"
  elseif equals %type 2
    say %bottles " bottles of beer!"
  else
    say "Yeah, " %bottles " bottles of beer!"
  endif
finish

label "verse_c"
  random "type" 4
  if equals %type 4
    say "Yaaah take one down, pass it around!"
  elseif equals %type 3
    say "Yaaah twist the cap off, slam one down!"
  elseif equals %type 2
    say "Pour me a round, I'll drink it right down!"
  else
    say "Pass it around and drink it all down!"
  endif
finish

Download Source | Write Comment

Alternative Versions

Comments

TerrieTillman said on 09/16/10 17:09:23

I had got a desire to begin my firm, nevertheless I didn't have enough of cash to do that. Thank goodness my close mate said to take the <a href="http://bestfinance-blog.com/topics/mortgage-loans">mortgage loans</a>. So I used the sba loan and realized my dream.

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