<script>on mouseUpglobal instrument,speedpush cardvisual dissolve slowlygo next cardput the short name of me into card field 1wait 60play instrument tempo speed+100 "DQ BQ AQ GQ DH. DE DE DQ BQ AQ GQ EW EQ C5Q B4Q AQ F#H. F#Q D5Q DQ CQ A4Q BH. DQ DQ BQ AQ GQ DH. DQ DQ BQ AQ GQ EH. EQ EQ C5Q B4Q AQ D5Q DQ DQ DQ EQ DQ C5Q A4Q GH D5H"play instrument tempo speed+100 "BQ BQ BH BQ BQ BH BQ D5Q G4Q. AE BW C5Q CQ CQ. CE CQ B4Q BQ BE BE BQ AQ AQ BQ AH D5H B4Q BQ BH BQ BQ BH BQ D5Q G4Q. AE BW C5Q CQ CQ. CE CQ B4Q BQ BE BE D5Q DQ CQ A4Q GW"wait until the sound is "done" or the mouse is downplay stopvisual dissolve slowlypop cardend mouseup</script>
</part>
<part>
<id>5</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>70</left>
<top>274</top>
<right>237</right>
<bottom>317</bottom>
</rect>
<style>roundrect</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>London</font>
<textSize>18</textSize>
<textStyle>plain</textStyle>
<name>Joy to the World</name>
<script>on mouseUpglobal instrument,speedpush cardvisual dissolve slowlygo next cardput the short name of me into card field 1wait 60play instrument tempo speed "D5Q C#E. B4S AQ. GE F#Q EQ DQ. AE BQ. BE C5#Q. C#E DW DE DE C#E B4E AE AE. GS F#E D5E DE C#E B4E AE AE. GS F#E F#E F#E F#E F#E F#S GS AQ. GS F#S EE EE EE ES F#S GQ. F#S ES DE D5Q B4E AE. GS F#E GE F#Q EQ DH"wait until the sound is "done" or the mouse is downplay stopvisual dissolve slowlypop cardend mouseUp</script>
</part>
<part>
<id>14</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>128</left>
<top>225</top>
<right>266</right>
<bottom>268</bottom>
</rect>
<style>roundrect</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>London</font>
<textSize>18</textSize>
<textStyle>plain</textStyle>
<name>Deck the Halls</name>
<script>on mouseUpglobal instrument,speedpush cardvisual dissolve slowlygo next cardput the short name of me into card field 1wait 60play instrument tempo speed+100 "AQ. GE F#Q EQ DQ EQ F#Q DQ EE F#E GE EE F#Q. EE DQ C#Q DH AQ. GE F#Q EQ DQ EQ F#Q DQ EE F#E GE EE F#Q. EE DQ C#Q DH EQ. F#E GQ EQ F#Q. GE AQ EQ F#E G#E AQ BE C5#E DQ C#Q B4Q AH AQ. GE F#Q EQ DQ EQ F#Q DQ BE BE BE BE AQ. GE F#Q EQ DH"wait until the sound is "done" or the mouse is downplay stopvisual dissolve slowlypop cardend mouseUp</script>
</part>
<part>
<id>23</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>270</left>
<top>225</top>
<right>511</right>
<bottom>268</bottom>
</rect>
<style>roundrect</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>London</font>
<textSize>18</textSize>
<textStyle>plain</textStyle>
<name>O Come, All Ye Faithful</name>
<script>on mouseUpglobal instrument,speedpush cardvisual dissolve slowlygo next cardput the short name of me into card field 1wait 60play instrument tempo speed+50 "AQ AH EQ AQ BH EH C#5Q B4Q C#5Q DQ C#H B4Q AQ AH G#Q F#Q G#Q AQ BQ C#5Q G#4H F#Q. EE EW "play instrument tempo speed+50 "E5H DQ C#Q DH C#H B4Q C#5Q A4Q BQ G#Q. F#E EQ AQ AQ G#Q AQ BQ AH EQ C#5Q C#Q B4Q C#5Q DQ C#H B4Q C#5Q DQ C#Q B4Q AQ G#H AQ D5Q C#H B4Q. AE AH."wait until the sound is "done" or the mouse is downplay stopvisual dissolve slowlypop cardend mouseUp</script>
</part>
<part>
<id>17</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>213</left>
<top>127</top>
<right>511</right>
<bottom>170</bottom>
</rect>
<style>roundrect</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>London</font>
<textSize>18</textSize>
<textStyle>plain</textStyle>
<name>Angels We Have Heard on High</name>
<script>on mouseUpglobal instrument,speedpush cardvisual dissolve slowlygo next cardput the short name of me into card field 1wait 60play instrument tempo speed+50 "AQ AQ AQ C5Q CQ. B4BE AH AQ GQ AQ C5Q A4Q. GE FH AQ AQ AQ C5Q CQ. B4BE AH AQ GQ AQ C5Q A4Q. "play instrument tempo speed+50 "GE FH C5H DE CE B4BE AE BBH C5E B4BE AE GE AH BBE AE GE FE GQ. CE CH FQ GQ AQ BBQ AH GH C5H DE CE B4BE AE BBH C5E B4BE AE GE AH BBE AE GE FE GQ. CE CH FQ GQ AQ BBQ AH GH FW"wait until the sound is "done" or the mouse is downplay stopvisual dissolve slowlypop cardend mouseUp</script>
</part>
<part>
<id>13</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>318</left>
<top>175</top>
<right>511</right>
<bottom>218</bottom>
</rect>
<style>roundrect</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>London</font>
<textSize>18</textSize>
<textStyle>plain</textStyle>
<name>O Little Town</name>
<script>on mouseUpglobal instrument,speedpush cardvisual dissolve slowlygo next cardput the short name of me into card field 1wait 60play instrument tempo speed "BQ BQ BQ A#Q BQ D5Q CQ E4Q AQ GQ F#E GE AQ DQ BH. BQ BQ BQ E5Q DQ DQ CQ E4Q AQ GQ F#E GE BQ. AE GH. BQ BQ BQ AQ GQ F#H F#Q F#Q EQ F#Q GQ AQ BH. BQ BQ BQ A#Q BQ D5Q CQ E4Q E5Q DQ G4Q BQ. AE GH."wait until the sound is "done" or the mouse is downplay stopvisual dissolve slowlypop cardend mouseUp</script>
</part>
<part>
<id>22</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>1</left>
<top>80</top>
<right>289</right>
<bottom>123</bottom>
</rect>
<style>roundrect</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>London</font>
<textSize>18</textSize>
<textStyle>plain</textStyle>
<name>God Rest Ye Merry Gentlemen</name>
<script>on mouseUpglobal instrument,speedpush cardvisual dissolve slowlygo next cardput the short name of me into card field 1wait 60play instrument tempo speed+100 "EQ EQ BQ BQ AQ GQ F#Q EQ DQ EQ F#Q GQ AQ BH. EQ EQ BQ BQ AQ GQ F#Q EQ DQ EQ F#Q GQ AQ BH. BQ C5Q A4Q BQ C5Q DQ EQ B4Q AQ GQ EQ F#Q GQ AH GQ AQ BH C5Q B4Q BQ AQ GQ F#Q EH GE F#E EQ AH GQ AQ BQ C5Q DQ EQ B4Q AQ GQ F#Q EH."wait until the sound is "done" or the mouse is downplay stopvisual dissolve slowlypop cardend mouseUp</script>
</part>
<part>
<id>15</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>255</left>
<top>274</top>
<right>394</right>
<bottom>317</bottom>
</rect>
<style>roundrect</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>London</font>
<textSize>18</textSize>
<textStyle>plain</textStyle>
<name>Silent Night</name>
<script>on mouseUpglobal instrument,speedpush cardvisual dissolve slowlygo next cardput the short name of me into card field 1wait 60play instrument tempo speed "EBQ. FE EBQ CH. EBQ. FE EBQ CH. BBH BBQ GH. ABH ABQ EBH. FH FQ ABQ. GE FQ EBQ. FE EBQ CH. FH FQ ABQ. GE FQ EBQ. FE EBQ CH. BBH BBQ D5BQ. B4BE GQ ABH. C5H. A4BQ EBQ CQ EBQ. DBE B3BQ A3BH."wait until the sound is "done" or the mouse is downplay stopvisual dissolve slowlypop cardend mouseUp</script>
</part>
<part>
<id>26</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>198</left>
<top>31</top>
<right>511</right>
<bottom>74</bottom>
</rect>
<style>roundrect</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>London</font>
<textSize>18</textSize>
<textStyle>plain</textStyle>
<name>We Wish You a Merry Christmas</name>
<script>on mouseUpglobal instrument,speedpush cardvisual dissolve slowlygo next cardput the short name of me into card field 1wait 60play instrument tempo speed+100 "GQ C5Q CE DE CE B4E AQ AQ AQ D5Q DE EE DE CE B4Q GQ GQ E5Q EE FE EE DE CQ A4Q GE GE AQ D5Q B4Q C5H "play instrument tempo speed+100 "G4Q C5Q CQ CQ B4H BQ C5Q B4Q AQ GH D5Q EQ DQ CQ G5Q G4Q GE GE AQ D5Q B4Q C5H G4Q C5Q CE DE CE B4E AQ AQ AQ D5Q DE EE DE CE B4Q GQ GQ E5Q EE FE EE DE CQ A4Q GE GE AQ D5Q B4Q C5H."wait until the sound is "done" or the mouse is downplay stopvisual dissolve slowlypop cardend mouseUp</script>
</part>
<part>
<id>27</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>294</left>
<top>80</top>
<right>511</right>
<bottom>123</bottom>
</rect>
<style>roundrect</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>London</font>
<textSize>18</textSize>
<textStyle>plain</textStyle>
<name>Good King Wenceslaus</name>
<script>on mouseUpglobal instrument,speedpush cardvisual dissolve slowlygo next cardput the short name of me into card field 1wait 60play instrument tempo speed+100 "ABQ ABQ ABQ BBQ ABQ ABQ EBH FQ EBQ FQ GQ ABH ABH ABQ ABQ ABQ BBQ ABQ ABQ EBH FQ EBQ FQ GQ ABH ABH E5BQ DBQ CQ B4BQ C5Q B4BQ ABH FQ EBQ FQ GQ ABH ABH EBQ EBQ FQ GQ ABQ ABQ BBH E5BQ DBQ CQ B4BQ ABH D5BH A4BW"wait until the sound is "done" or the mouse is downplay stopvisual dissolve slowlypop cardend mouseUp</script>
</part>
<part>
<id>28</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>1</left>
<top>31</top>
<right>196</right>
<bottom>74</bottom>
</rect>
<style>roundrect</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>London</font>
<textSize>18</textSize>
<textStyle>plain</textStyle>
<name>The First Noel</name>
<script>on mouseUpglobal instrument,speedpush cardvisual dissolve slowlygo next cardput the short name of me into card field 1wait 60play instrument tempo speed "F#E EE DQ. EE F#E GE AH BE C5#E DQ C#Q B4Q AH BE C5#E DQ C#Q B4Q AQ BQ C5#Q DQ A4Q GQ F#H F#E EE DQ. EE F#E GE AH BE C5E# DQ C#Q B4Q AH"play instrument tempo speed "BE C5#E DQ C#Q B4Q AQ BQ C5#Q DQ A4Q GQ F#H F#E EE DQ. EE F#E GE AH D5E C#E B4Q. C5#E DE EE F#H. DQ C#Q B4Q AQ BQ C5#Q DQ A4Q GQ F#H."wait until the sound is "done" or the mouse is downplay stopvisual dissolve slowlypop cardend mouseUp</script>
</part>
<part>
<id>29</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>1</left>
<top>175</top>
<right>305</right>
<bottom>218</bottom>
</rect>
<style>roundrect</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>London</font>
<textSize>18</textSize>
<textStyle>plain</textStyle>
<name>Hark, The Herald Angels Sing</name>
<script>on mouseUpglobal instrument,speedpush cardvisual dissolve slowlygo next cardput the short name of me into card field 1wait 60play instrument tempo speed "DQ GQ GQ. F#E GQ BQ BQ AQ D5Q DQ DQ. CE B4Q AQ BH DQ GQ GQ. F#E GQ BQ BQ AQ D5Q A4Q AQ. F#E F#Q EQ DH D5Q DQ DQ G4q C5Q B4Q BE C5S B4S AQ D5Q DQ DQ G4q C5Q B4Q BE C5S B4S AQ E5Q EQ EQ. "play instrument tempo speed "D5E CQ B4Q C5H A4Q BE C5E Dq. G4E GQ AQ AS C5S DS ES EQ EQ EQ. DE CQ B4Q C5H A4Q BE C5E DQ. G4E GQ AQ GH"wait until the sound is "done" or the mouse is downplay stoppop cardvisual dissolve slowlyend mouseUp</script>
</part>
<part>
<id>30</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>3</left>
<top>126</top>
<right>193</right>
<bottom>169</bottom>
</rect>
<style>roundrect</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>London</font>
<textSize>18</textSize>
<textStyle>plain</textStyle>
<name>O Christmas Tree</name>
<script>on mouseUpglobal instrument,speedpush cardvisual dissolve slowlygo next cardput the short name of me into card field 1wait 60play instrument tempo speed "DQ GE. GS GQ AQ BE. BS BQ. BE AE BE C5Q F4#Q AQ GQ. D5E DE B4E E5Q. DE DE C#E CQ. CE CE A4E D5Q. CE CE B4E BQ DQ GE. GS GQ. AE BE. BS BQ. BE AE BE C5Q F4#Q AQ GH"wait until the sound is "done" or the mouse is downplay stopvisual dissolve slowlypop cardend mouseUp</script>
<script>on mouseDownglobal instrument, choices-- find out what number the button isrepeat with lastItem = 1 to number of lines in choicesif line lastItem of choices is the short name of me then exit repeatend repeatput line lastItem of choices into instrumentget HPopUpMenu(choices, -lastItem, top of me, left of me)if the result is not empty then put the resultif item 1 of it is not empty thenput item 1 of it into lastItemput item 1 of it into instrumentset the name of the target to lastItemend ifend mouseDown</script>
</part>
<part>
<id>35</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>14</left>
<top>289</top>
<right>27</right>
<bottom>304</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>3584</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>hVolume</name>
<script>on mouseUp-- make sure it snaps to certain locations-- change these to change the control's locationput 14 into toffput 6 into tsteprepeat with i = 0 to 7put toff+i*tstep into item i+1 of stopsend repeatget loc of meget item 1 of itput 1000 into mput 0 into hrepeat with i = 1 to 8if abs(it-item i of stops) < m thenput i into hput abs(it-item i of stops) into mend ifend repeatset loc of me to item h of stops,296play stopSetVolume(h-1)beepend mouseUpon mouseDownput 14 into toffput 6 into tstepput toff+tstep*7 into tmaxrepeat while the mouse is downget item 1 of the mouseLocget max(it,toff)get min(it,tmax)set loc of me to it,296end repeatend mouseDownon setMeget getVolume()put 14 into toffput 6 into tstepset loc of me to toff+it*tstep,296end setMe</script>
</part>
<part>
<id>37</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>400</left>
<top>298</top>
<right>462</right>
<bottom>319</bottom>
</rect>
<style>shadow</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>Normal</name>
<script>on mouseDownglobal instrument, speedput "Fastest,Fast,Normal,Slow,Slowest" into speedsput "170,130,100,70,50" into realSpeeds-- find out what number the button isrepeat with lastItem = 1 to number of items in speedsif item lastItem of speeds is the short name of me then exit repeatend repeatput item lastItem of realSpeeds into speed-- lastItem is negative so that there is no check markget HPopUpMenu(speeds, -lastItem, top of me, left of me)if the result is not empty then put the resultif item 1 of it is not empty thenput item 1 of it into lastItemput item item 3 of it of RealSpeeds into speedset the name of the target to lastItemend ifend mouseDown</script>
</part>
<content>
<layer>card</layer>
<id>31</id>
<text>What would you like to hear?</text>
</content>
<name></name>
<script>on openCardglobal instrument,speed, choicessend SetMe to button "hVolume"put resList() into rput "" into choicesput 1 into crepeat with i = 1 to number of lines of rif char 1 to 4 of line i of r = "snd " thenput item 2 of line i of r into line c of choicesadd 1 to cend ifend repeatsort choicessend mouseDown to btn id 34send mouseDown to btn id 37pass openCardend openCardon playAllhide msgrepeat with i = 1 to the number of buttonsif the short name of button i is not "Home" then ¬send mouseUp to button iif the mouse is down then exit repeatend repeatend playAllon playForeverrepeatPlayAllif the mouse is down then exit repeatend repeatend playForever</script>
