ec2-52-90-142-26.compute-1.amazonaws.com | ToothyWiki | M-A | RecentChanges | Login | Webcomic
BNF: M-A/WorshipLeaderGenerator
This is a truly evil invention. There will be no further need for worship leaders. They may all be dismissed from their jobs and inflicted upon the world. AR
- I was rather pleased with how it came out. :) --M-A
Hmm. I'm not convinced with the changes. There were some proper long things yesterday - now they're all too short. In particular, I just had
Thank You For Saving Me
Chorus
Chorus
We Want To See Jesus Lifted High
Verse
Verse
which is not really ideal... --Angoel
- Little bit of messing with the probabilities. How's that?
Erk, I just got this! More tweaking needed... --M-A
Before The Throne Of God Above
Chorus
Chorus
Chorus
Change up a key
Change up a key
Change up a key
Change up a key
Change up a key
"Last verse, one more time!"
Nah, that's fine. You never had to squeak the last line in the fashion of a chipmonk, or similar?
# Have at least two songs.
bnf ::= song songs
#option ::= debug = 1
songs ::= song | song songs
song ::= "<h2> " songtitle " </h2>" songcontent | "<h2> " songtitle " </h2>" songcontent | "<h2> " songtitle " </h2>" songcontent | "<h2> " songtitle " </h2>" songcontent | "<i>Play music while people pray</i><br><br>" | "<h2> " songtitle " </h2>" songcontent | "<h2> " songtitle " </h2>" songcontent | "<h2> " songtitle " </h2>" songcontent
# Some song titles.
songtitle ::= "All heaven declares" | "Before The Throne Of God Above" | "Blessed be the name of the Lord" | "Come On And Celebrate" | "Father God I Wonder" | "He Is Exalted" | "I Believe In Jesus" | "I Will Offer Up My Life" | "Jesus Christ" | "Jesus We Celebrate Your Victory" | "Lord I Lift Your Name On High" | "Majesty" | "Shine Jesus Shine" | "Thank You For Saving Me" | "There Is A Redeemer" | "We Want To See Jesus Lifted High" | "You Laid Aside Your Majesty" | "We shall stand"
# Song structure
songcontent ::= versechorus moresong end
versechorus ::= verse | verse | verse | chorus | chorus
moresong::= versechorus moresong | versechorus moresong | versechorus moresong | versechorus moresong | changekey versechorus moresong | instrumental moresong | getfaster moresong | endsong | endsong | endsong | changekey endsong
endsong ::= versechorus repeattofade | versechorus | versechorus | verse lastverse | cheesysegue "<h2> " songtitle " </h2>" versechorus moresong
lastverse::= oncemore | oncemore | oncemore lastverse
# Actual text.
verse ::= "Verse<br>"
chorus ::= "Chorus<br>"
instrumental ::= "Instrumental<br>"
changekey ::= "Change up a key<br>"
getfaster ::= "Get faster<br>"
repeattofade ::= "Repeat to fade<br>"
oncemore ::= ""Last verse, one more time!"<br>"
cheesysegue ::= "Cheesy segue into:<br><br>"
end ::= "<br>"
CategoryGenerator