Friday Challenge - Christmas Style

Last year I did a few Christmas style friday challenges, so I'm a bit overdue. This one is rather simple. Given a query that contains an ID, which corresponds to a day, and a gift, print out the famous "12 Days of Christmas" song dynamically. Ie, day 1 you get gift 1. Day 2 you get 1 of gift 1, and 2 of gift 2. And so on.

Bonus points if you use festive green and red fonts in your display. (Once again, this is why they don't let me design.)

Double bonus points if you make a cfpresentation out it and record MP3s to go along with it.

Here is your query that you must use with the code. (Note, it uses CF8 Array shorthand style. If you aren't on CF8, you can rewrite that as a list and use listToArray.)

Comments

[Add Comment]

Hi Ray,

Here is my "solution". It's not elegant or pretty (thanks in part to the colors) but it works :). I loop through the query and through each loop I pass the query and the day a function which then loops through the function and outputs the song as its sung (in reverse).

<cffunction name="song2" output="true" >
 <cfargument name="x" type="numeric" required="true">
 <cfargument name="q" type="query" required="true">

 <cfloop from="#x#" to="1" index="i" step="-1">
 <cfoutput>red<cfelse>green</cfif>">#q.gift[i]#</cfoutput>
 </cfloop>
</cffunction>

<cfoutput query="song">
On the #id# day of christmas my true love gave to me:
 #song2(song.id,song)# 
</cfoutput>

# Posted By Gary Gilbert | 12/14/07 9:15 AM

dang forgot to add the output :) Please delete it if you don't want it

On the 1 day of christmas my true love gave to me:
 A partridge in a pear tree 

On the 2 day of christmas my true love gave to me:
 Two turtle doves A partridge in a pear tree 

On the 3 day of christmas my true love gave to me:
 Three French hens Two turtle doves A partridge in a pear tree 

On the 4 day of christmas my true love gave to me:
 Four calling birds Three French hens Two turtle doves A partridge in a pear tree 

On the 5 day of christmas my true love gave to me:
 Five golden rings Four calling birds Three French hens Two turtle doves A partridge in a pear tree 

On the 6 day of christmas my true love gave to me:
 Six geese a-laying Five golden rings Four calling birds Three French hens Two turtle doves A partridge in a pear tree 

On the 7 day of christmas my true love gave to me:
 Seven swans a-swimming Six geese a-laying Five golden rings Four calling birds Three French hens Two turtle doves A partridge in a pear tree 

On the 8 day of christmas my true love gave to me:
 Eight maids a-milking Seven swans a-swimming Six geese a-laying Five golden rings Four calling birds Three French hens Two turtle doves A partridge in a pear tree 

On the 9 day of christmas my true love gave to me:
 Nine ladies dancing Eight maids a-milking Seven swans a-swimming Six geese a-laying Five golden rings Four calling birds Three French hens Two turtle doves A partridge in a pear tree 

On the 10 day of christmas my true love gave to me:
 Ten lords a-leaping Nine ladies dancing Eight maids a-milking Seven swans a-swimming Six geese a-laying Five golden rings Four calling birds Three French hens Two turtle doves A partridge in a pear tree 

On the 11 day of christmas my true love gave to me:
 Eleven pipers piping Ten lords a-leaping Nine ladies dancing Eight maids a-milking Seven swans a-swimming Six geese a-laying Five golden rings Four calling birds Three French hens Two turtle doves A partridge in a pear tree 

On the 12 day of christmas my true love gave to me:
 Twelve drummers drumming Eleven pipers piping Ten lords a-leaping Nine ladies dancing Eight maids a-milking Seven swans a-swimming Six geese a-laying Five golden rings Four calling birds Three French hens Two turtle doves A partridge in a pear tree

# Posted By Gary Gilbert | 12/14/07 9:16 AM

<cfset song = querynew("id,gift","integer,varchar")>

<cfset gifts = ["A partridge in a pear tree","Two turtle doves","Three French hens","Four calling birds","Five golden rings","Six geese a-laying",
"Seven swans a-swimming","Eight maids a-milking","Nine ladies dancing","Ten lords a-leaping","Eleven pipers piping","Twelve drummers drumming"]>

<cfloop index="x" from="1" to="#arrayLen(gifts)#">
<cfset queryAddRow(song)>
<cfset querySetCell(song, "id", x)>
<cfset querySetCell(song, "gift", gifts[x])>
</cfloop>

<cfquery name="getSong" dbtype="query">
select *
from song
order by id desc
</cfquery>

<cfset title = "The 12 days of Christmas...">

<cfpresentation title="#title#">
<cfoutput query="getSong">
 <cfsavecontent variable="slideTitle">On the #id#<cfif id eq 1>st<cfelseif id eq 3>rd<cfelseif id eq 2>nd<cfelse>th</cfif> day of Christmas my true love gave to me....</cfsavecontent>
 <cfpresentationslide title="#slideTitle#">
 <div>
 <img src="christmas_lights.gif" /> 
 <h1>#title#</h1>
 <h2>#slideTitle#</h2>
 #getSong.gift#
 </div>
 </cfpresentationslide>
</cfoutput>
</cfpresentation>

http://cfsilence.com/blog/demos/12days/12days.cfm

# Posted By todd sharp | 12/14/07 9:22 AM

I couldn't find a suitable cheesy mp3 to go along...sorry...

# Posted By todd sharp | 12/14/07 9:23 AM

Todd, your code doesn't work right. It starts with day 12. It should start with day 1. And on days 2-12, it doesn't show the previous gifts. Ie, day 2 should show day 1's gift as well.

# Posted By Raymond Camden | 12/14/07 9:28 AM

you grinch...

how's this? http://cfsilence.com/blog/demos/12days/12daysnew.c...

# Posted By todd sharp | 12/14/07 9:42 AM

Here is my contribution. I wish I had time to do more with it. Maybe later today if I can find some free time.

<CFSET IMGRoot = "http://www.dkferguson.com/12days">;
<cfset song = querynew("id,gift","integer,varchar")>
<cfset gifts = ["A partridge in a pear tree","Two turtle doves","Three French hens","Four calling birds","Five golden rings","Six geese a-laying",
"Seven swans a-swimming","Eight maids a-milking","Nine ladies dancing","Ten lords a-leaping","Eleven pipers piping","Twelve drummers drumming"]>

<cfloop index="x" from="1" to="#arrayLen(gifts)#">
<cfset queryAddRow(song)>
<cfset querySetCell(song, "id", x)>
<cfset querySetCell(song, "gift", gifts[x])>
</cfloop>

<CFOUTPUT>
 <CFLOOP INDEX="d" FROM="1" TO="12">
 <DIV ID="day#d#" STYLE="width:100%; float:left;">
 <CFQUERY NAME="getGifts" DBTYPE="QUERY">
 select * from song where id <= #d#
 order by id desc
 </CFQUERY>
 
 ON DAY #d# of Christmas I got all this stuff: 
 <CFLOOP QUERY="getGifts">
 <DIV ID="gift#d##id#" STYLE="float:left;">
 <IMG SRC="#IMGRoot#/#id#.jpg">
 </DIV>
 </CFLOOP>
 </DIV>
 </CFLOOP>
</CFOUTPUT>

# Posted By Dave Ferguson | 12/14/07 10:02 AM

Guys, to save space, when you post code, don't duplicate the data stuff please.

# Posted By Raymond Camden | 12/14/07 10:04 AM

Just because I hadn't seen a QoQ solution yet, nor one that created grammatically correct sentences. ;-)

<cffunction name="Dayify" returntype="query">
 <cfargument name="Q" type="query" required="true">
 <cfset var Result="">
 <cfset var P=arguments.q>
 <cfset var R=arguments.q>
 <cfquery dbtype="query" name="Result">
 SELECT r.id AS daynum, p.id AS id, p.gift AS gift
 FROM r, p
 WHERE (r.id >= p.id)
 ORDER BY 1, 2 DESC, 3
 </cfquery>
 <cfreturn Result>
</cffunction>
<cffunction name="htmlFromSong" returntype="string">
 <cfargument name="Q" type="query" required="true">
 <cfset var Verses=Dayify(Q)>
 <cfset var Result="">
 <cfset var Colors=listToArray("red,green")>
 <cfset var Suffixes="st,nd,rd">
 <cfif Verses.recordCount gt 3>
 <cfset Suffixes=listAppend(Suffixes,repeatString("th,",Verses.recordCount-3))>
 </cfif>
 <cfset suffixes=listToArray(suffixes)>
 <cfsavecontent variable="Result">
 <cfoutput query="Verses" group="DayNum">
 On the #DayNum##Suffixes[DayNum]# day of Christmas, my true love gave to me: <cfoutput><cfif DayNum neq id>, <cfif id eq 1>and </cfif></cfif>#HTMLEditFormat(gift)#</cfoutput>.
 </cfoutput>
 </cfsavecontent>
 <cfreturn Result>
</cffunction>

<cfoutput>#htmlFromSong(Song)#</cfoutput>

# Posted By Rick O | 12/14/07 10:13 AM

Never did cfpresentation before, thamks Todd :)

<cfset song = querynew("id,gift","integer,varchar")>

<cfset gifts = ["A partridge in a pear tree","Two turtle doves","Three French hens","Four calling birds","Five golden rings","Six geese a-laying",
"Seven swans a-swimming","Eight maids a-milking","Nine ladies dancing","Ten lords a-leaping","Eleven pipers piping","Twelve drummers drumming"]>

<cfloop index="x" from="1" to="#arrayLen(gifts)#">
<cfset queryAddRow(song)>
<cfset querySetCell(song, "id", x)>
<cfset querySetCell(song, "gift", gifts[x])>
</cfloop>

<cffunction name="ord" access="public" returntype="string" output="false">
 <cfargument name="theNum" type="string" required="true" />
 <cfset theNewNum = "" />
 <cfswitch expression="#arguments.theNum#">
 <cfcase value="1">
 <cfset theNewNum = arguments.theNum &'st' />
 </cfcase>
 <cfcase value="2">
 <cfset theNewNum = arguments.theNum &'nd' />
 </cfcase>
 <cfcase value="3">
 <cfset theNewNum = arguments.theNum &'rd' />
 </cfcase>
 <cfdefaultcase>
 <cfset theNewNum = arguments.theNum &'th' />
 </cfdefaultcase>
 </cfswitch>
 <cfreturn theNewNum />
</cffunction>

<cfoutput>
<cfset title="The 12 Days of Christmas" />
<cfpresentation title="The 12 Days of Christmas - stole this part from Todd thx">

 <cfloop from="1" to="12" index="i">
 <cfset slideTitle = "On the #ord(i)# day of christmas my true love brought to me" />
 <cfpresentationSlide title="#slideTitle#" duration="2">
 <div>
 #title# 
 #slideTitle#
 
 <cfloop from="12" to="1" index="j" step="-1">

 <cfif j LTE i>
 <cfif j MOD 2>
 <cfset fColor = 'green' />
 <cfelse>
 <cfset fColor = 'red' />
 </cfif>
 <cfif j EQ 5>
 #song.gift[j]# 
 <cfelse>
 #song.gift[j]# 
 </cfif>
 </cfif>
 </cfloop>
 </div>
 </cfpresentationSlide>
 
 </cfloop>

</cfpresentation>
</cfoutput>

# Posted By Ron Gowen | 12/14/07 10:13 AM

After seeing Todd playing around with the <cfpresentation> tag I am starting to like it more and more.

Looks like it can be very useful.

# Posted By Shane Zehnder | 12/14/07 10:22 AM

"nor one that created grammatically correct sentences"

Mine didn't do this?

# Posted By todd sharp | 12/14/07 10:28 AM

hehe i enjoyed that.. here's my code..

<cfscript>
function SingTheSong(level) {
 if(level < 13) {
 writeOutput('On the ' & level & ' day of christmas, my true love gave to me.. ');
 for(i = level; i neq 0; i=i-1){
 if(i mod 2 gt 0){colour='red';} else {colour='green';}
 writeOutput('  ' & song.gift[i] & ' ');
 }
 SingTheSong(level+1);
 }
}
</cfscript>

<cfoutput>
#SingTheSong(1)#
</cfoutput>

# Posted By Mat Evans | 12/14/07 10:53 AM

I modified mine slightly to include first, second, etc.

<cfcomponent output="true">
 <cfset this.gifts = ListToArray("A partridge in a pear tree,Two turtle doves and,Three French hens,Four calling birds,Five golden rings,Six geese a-laying,Seven swans a-swimming,Eight maids a-milking,Nine ladies dancing,Ten lords a-leaping,Eleven pipers piping,Twelve drummers drumming")>

 <cfset this.days = ListToArray("first,second,third,fourth,fifth,sixth,seventh,eight,ninth,tenth,eleventh,twelfth")>

 <cffunction name="down" access="remote" output="true" returntype="void">
 <cfargument name="arrayPosition" default="1" />

 #this.gifts[arguments.arrayPosition]#
 <cfif arguments.arrayPosition gt 1>
 , #down(arguments.arrayPosition-1)#
 </cfif>
 </cffunction>

 <cffunction name="daysOfXmas" access="remote" output="true" returntype="void">
 <cfloop from="1" to="12" index="eachDay">
 On the #this.days[eachDay]# day of xmas, my true love gave to me 
 #down(eachDay)# 
 </cfloop>
 </cffunction>
</cfcomponent>

# Posted By Gareth | 12/14/07 12:23 PM

I decided to do mine in Ruby which really makes it ineligible for any contest but it was fun anyway :)

http://blog.simb.net/2007/12/14/rays-christmas-cod...

Technically the part that outputs the song is 8 lines of code.

# Posted By Simeon | 12/14/07 12:48 PM

RUBY???? Lifetime ban!!!!!!!!!!!! :D

# Posted By todd sharp | 12/14/07 12:57 PM

Hey guys - check Ray's post about grabbing the img's from Yahoo.

I mashed that up with my stuff and randomized the results for each slide:

http://cfsilence.com/blog/demos/12days/yahoo/index...

(Oh and for the cfpresentation fans - rather then re-create the preso on the fly I took advantage of the directory attribute and wrote it to disk)

# Posted By todd sharp | 12/14/07 2:34 PM

Hope I'm not to late to get in on the fun!

<div style="width: 400px; font: .9em/1.8em Georgia, 'Times New Roman', Times, serif; padding: 30px;">
<cfoutput>
<cfloop from="1" to="#arrayLen(gifts)#" index="j">
<div style="padding: 20px 0; border-bottom: 1px solid ##ccc; color: green;">
On the #j# day of Christmas, my true love gave to me, 
<cfloop from="#j#" to="1" index="k" step="-1">
<cfif (j gte 2 and k eq 1)>
and
</cfif>
#song.gift[k]# 
</cfloop>
</div>
</cfloop>
</cfoutput>
</div>

# Posted By Fitz | 12/18/07 5:39 PM

[Add Comment]

coldfusionjedi

Sponsors

Links

Subscribe

Archives by Subject

Friday Challenge - Christmas Style

Comments