TempleOSTS_140317.ISO

2018-09-08 21:46:02 +02:00
1 parent 2d2a65d572
commit 7ef616a20e
@@ -0,0 +1,15 @@
+OptOn(OPTf_WARN_PAREN);
+OptOn(OPTf_WARN_DUP_TYPES);
+
+SetTypeMatic(0);
+local_time_offset=-7*60*60*CDATE_FREQ; //Pacific
+
+//$AN,"",A="mouse_move_scale"$adjust these to set mouse move scale
+mxx_scale=0.5;
+myy_scale=0.5;
+mzz_scale=5.0; //wheel
+
+//don't change these
+mxx_prescale=mxx/mxx_scale;
+myy_prescale=myy/myy_scale;
+mzz_prescale=mzz/mzz_scale;
@@ -0,0 +1,199 @@
+<!DOCTYPE NETSCAPE-Bookmark-file-1>
+<!-- This is an automatically generated file.
+It will be read and overwritten.
+Do Not Edit! -->
+<TITLE>Bookmarks</TITLE>
+<H1>Bookmarks</H1>
+<DL><p>
+    <DT><H3 FOLDED ADD_DATE="1374957505">Accounts</H3>
+    <DL><p>
+        <DT><A HREF="https://www.annualcreditreport.com/cra/index.jsp" ADD_DATE="1374957505" LAST_VISIT="1386666616" LAST_MODIFIED="1386666616" >AnnualCreditReport</A>
+        <DT><A HREF="http://software.intel.com/partner/app/dashboard" ADD_DATE="1374957505" LAST_VISIT="1386666616" LAST_MODIFIED="1386666616" >Dashboard Intel® Developer Zone</A>
+        <DT><A HREF="http://www.dell.com/" ADD_DATE="1374957505" LAST_VISIT="1386666616" LAST_MODIFIED="1386666616" ICON_URI="http://i.dell.com/images/global/branding/dellecomicon.ico" >Dell Laptops, Desktop Computers, Monitors, Printers & PC Accessories</A>
+        <DT><A HREF="https://www.mymedicare.gov/" ADD_DATE="1374957505" LAST_VISIT="1386666616" LAST_MODIFIED="1386666616" >mymedicare.gov Portal of Personalized Medicare Information</A>
+        <DT><A HREF="https://www.paypal.com/" ADD_DATE="1374957505" LAST_VISIT="1386666616" LAST_MODIFIED="1386666616" >Send Money, Money Transfer - PayPal</A>
+        <DT><A HREF="http://www.socialsecurity.gov/onlineservices/" ADD_DATE="1374957505" LAST_VISIT="1386666616" LAST_MODIFIED="1386666616" ICON_URI="http://www.socialsecurity.gov/favicon.ico" >Social Security Online What You Can Do Online</A>
+        <DT><A HREF="http://www.wellsfargo.com/" ADD_DATE="1374957505" LAST_VISIT="1386666616" LAST_MODIFIED="1386666616" >Wells Fargo Home Page</A>
+    </DL><p>
+    <DT><H3 FOLDED ADD_DATE="1389105117">Commonly Quoted</H3>
+    <DL><p>
+        <DT><A HREF="http://www.youtube.com/watch?v=eB5VXJXxnNU" ADD_DATE="1381134432" LAST_VISIT="1386666617" LAST_MODIFIED="1389105618" ICON_URI="http://s.ytimg.com/yts/img/favicon_32-vflWoMFGx.png" >Ali G Homo Sapien</A>
+        <DT><A HREF="http://www.wired.com/magazine/2010/11/mf_ticketmaster/all/1" ADD_DATE="1374957505" LAST_VISIT="1386666617" LAST_MODIFIED="1386666617" >Everyone Hates Ticketmaster — But No One Can Take It Down Magazine</A>
+        <DT><A HREF="http://stevehanov.ca/blog/index.php?id=56" ADD_DATE="1374957505" LAST_VISIT="1386666617" LAST_MODIFIED="1386666617" >How a programmer reads your resume (comic) - Steve Hanov's Programming Blog</A>
+        <DT><A HREF="http://wayback.archive.org/web/*/www.losethos.com" ADD_DATE="1374957504" LAST_VISIT="1386666617" LAST_MODIFIED="1386666617" ICON_URI="http://wayback.archive.org/favicon.ico" >Internet Archive (LoseThos)</A>
+        <DT><A HREF="http://waybackmachine.org/*/http://www.simstructure.hare.com" ADD_DATE="1374957504" LAST_VISIT="1386666617" LAST_MODIFIED="1386666617" >Internet Archive (SimStructure)</A>
+        <DT><A HREF="http://www.youtube.com/watch?v=Dd7FixvoKBw" ADD_DATE="1379786905" LAST_VISIT="1386666617" LAST_MODIFIED="1389105613" ICON_URI="http://s.ytimg.com/yts/img/favicon_32-vflWoMFGx.png" >Key Peele #1</A>
+        <DT><A HREF="http://www.youtube.com/watch?v=VHG_Gv_zLY4" ADD_DATE="1384979305" LAST_VISIT="1386666617" LAST_MODIFIED="1389105621" ICON_URI="http://s.ytimg.com/yts/img/favicon_32-vflWoMFGx.png" >Key Peele #2</A>
+        <DT><A HREF="http://lmgtfy.com/" ADD_DATE="1374957505" LAST_VISIT="1386666617" LAST_MODIFIED="1386666617" ICON_URI="http://lmgtfy.com/favicon.ico" >Let me google that for you</A>
+        <DT><A HREF="http://unusedino.de/ec64/technical/project64/mapping_c64.html" ADD_DATE="1374957505" LAST_VISIT="1386666617" LAST_MODIFIED="1386666617" ICON_URI="http://unusedino.de/favicon.ico" >Mapping The C64</A>
+        <DT><A HREF="http://www.youtube.com/watch?feature=player_embedded&v=nj6DK_WX7Yc#!" ADD_DATE="1374957505" LAST_VISIT="1386666617" LAST_MODIFIED="1386666617" ICON_URI="http://s.ytimg.com/yt/favicon-refresh-vfldLzJxy.ico" >The Magic of CES - YouTube#!</A>
+        <DT><A HREF="http://www.noob.us/humor/the-office-dwight-faces-nerd-torture-of-the-highest-form/" ADD_DATE="1374957505" LAST_VISIT="1386666617" LAST_MODIFIED="1386666617" ICON_URI="http://www.noob.us/favicon.ico" >The Office - Dwight faces nerd torture of the highest form</A>
+        <DT><A HREF="http://www.youtube.com/watch?v=HRPDO63rI1E" ADD_DATE="1381122671" LAST_VISIT="1386666617" LAST_MODIFIED="1389105665" ICON_URI="http://s.ytimg.com/yts/img/favicon_32-vflWoMFGx.png" >The Prisoner</A>
+        <DT><A HREF="http://www.youtube.com/watch?v=o_eSwq1ewsU" ADD_DATE="1381122683" LAST_VISIT="1386666617" LAST_MODIFIED="1386666617" ICON_URI="http://s.ytimg.com/yts/img/favicon-vfldLzJxy.ico" >There... Are... Four... Lights! - YouTube</A>
+    </DL><p>
+    <DT><H3 FOLDED ADD_DATE="1374957505">Downloads</H3>
+    <DL><p>
+        <DT><A HREF="http://www.ccs64.com/" ADD_DATE="1374957505" LAST_VISIT="1386666616" LAST_MODIFIED="1386666616" >Commodore 64 Emulator</A>
+        <DT><A HREF="http://ffmpeg.zeranoe.com/builds/" ADD_DATE="1374957505" LAST_VISIT="1386666616" LAST_MODIFIED="1386666616" >FFmpeg</A>
+        <DT><A HREF="http://www.dandans.com/Full-Video-Audio-Mixer.htm" ADD_DATE="1375786853" LAST_VISIT="1386666616" LAST_MODIFIED="1386666616" ICON_URI="http://www.dandans.com/webico.ico" >Full Video Audio Mixer, Mix & Merge Audio and Video, Extract & Remove Audio from Video</A>
+        <DT><A HREF="http://www.winimage.com/" ADD_DATE="1374957505" LAST_VISIT="1386666616" LAST_MODIFIED="1386666616" >Gilles Vollant software</A>
+        <DT><A HREF="https://www.virtualbox.org/" ADD_DATE="1374957505" LAST_VISIT="1386666616" LAST_MODIFIED="1386666616" >Oracle VM VirtualBox</A>
+        <DT><A HREF="http://www.qb64.net/" ADD_DATE="1374957505" LAST_VISIT="1386666617" LAST_MODIFIED="1386666617" >QB64</A>
+        <DT><A HREF="http://www.phatcode.net/downloads.php?id=280" ADD_DATE="1374957505" LAST_VISIT="1386666616" LAST_MODIFIED="1386666616" >turbo assembler 5 (tasm)</A>
+        <DT><A HREF="http://www.vmware.com/" ADD_DATE="1374957505" LAST_VISIT="1386666616" LAST_MODIFIED="1386666616" >VMware Virtualization Software for Desktops, Servers & Virtual Machines for Public and Private Cloud Solutions</A>
+    </DL><p>
+    <DT><H3 FOLDED ADD_DATE="1374957505">Games</H3>
+    <DL><p>
+        <DT><A HREF="http://www.classicempire.com/" ADD_DATE="1374957505" LAST_VISIT="1386666616" LAST_MODIFIED="1386666616" >EMPIRE, Wargame of the Century (tm) index</A>
+        <DT><A HREF="http://www.freeciv.net/" ADD_DATE="1374957505" LAST_VISIT="1386666616" LAST_MODIFIED="1386666616" >Freeciv.net - online multiplayer strategy game</A>
+    </DL><p>
+    <DT><H3 FOLDED ADD_DATE="1389102772">Links</H3>
+    <DL><p>
+    </DL><p>
+    <DT><H3 FOLDED ADD_DATE="1374957505">Media Streams</H3>
+    <DL><p>
+        <DT><A HREF="http://www.bbc.co.uk/?ok" ADD_DATE="1374957505" LAST_VISIT="1386666617" LAST_MODIFIED="1386666617" >BBC - bbc.co.uk homepage - Home of the BBC on the Internet</A>
+        <DT><A HREF="http://www.bbc.co.uk/iplayer/console/bbc_world_service" ADD_DATE="1374957505" LAST_VISIT="1386666616" LAST_MODIFIED="1386666616" >BBC iPlayer - Listen live - BBC World Service</A>
+        <DT><A HREF="http://ocw.mit.edu/courses/electrical-engineering-and-computer-science/" ADD_DATE="1374957505" LAST_VISIT="1386666617" LAST_MODIFIED="1386666617" >Free Online Course Materials Electrical Engineering and Computer Science MIT OpenCourseWare</A>
+        <DT><A HREF="http://ocw.mit.edu/OcwWeb/web/home/home/index.htm" ADD_DATE="1374957505" LAST_VISIT="1386666617" LAST_MODIFIED="1386666617" >Free Online Course Materials MIT OpenCourseWare</A>
+        <DT><A HREF="http://www.gametrailers.com/news.php" ADD_DATE="1374957505" LAST_VISIT="1386666617" LAST_MODIFIED="1386666617" >Gametrailers.com - Video Games News, Game Trailers News</A>
+        <DT><A HREF="http://www.komp.com/" ADD_DATE="1389413520" LAST_VISIT="1389413520" LAST_MODIFIED="1389413520" >komp Homepage - LV Portal - Homepage</A>
+        <DT><A HREF="http://openclassroom.stanford.edu/MainFolder/HomePage.php" ADD_DATE="1374957505" LAST_VISIT="1386666617" LAST_MODIFIED="1386666617" >OpenClassroom</A>
+        <DT><A HREF="http://webcast.berkeley.edu/" ADD_DATE="1374957505" LAST_VISIT="1386666617" LAST_MODIFIED="1386666617" >webcast.berkeley UC Berkeley Video and Podcasts for Courses & Events</A>
+        <DT><A HREF="http://www.xtremeradio.com/" ADD_DATE="1374957505" LAST_VISIT="1386666617" LAST_MODIFIED="1386666617" >X107.5 X-treme Radio Las Vegas, NV - Homepage</A>
+    </DL><p>
+    <DT><H3 FOLDED ADD_DATE="1374957504">Misc</H3>
+    <DL><p>
+        <DT><A HREF="http://blog.seattleinterviewcoach.com/2009/02/140-google-interview-questions.html" ADD_DATE="1374957505" LAST_VISIT="1386666617" LAST_MODIFIED="1386666617" >140 Google Interview Questions Seattle Interview Coach</A>
+        <DT><A HREF="http://blog.smartbear.com/programming/7-silly-programming-challenges-to-do-for-fun/" ADD_DATE="1374957505" LAST_VISIT="1386666617" LAST_MODIFIED="1389105588" ICON_URI="http://blog.smartbear.com/wp-content/uploads/dynamik-gen/theme/images/favicon.png" >7 Silly Programming Challenges to Do for Fun</A>
+        <DT><A HREF="http://petr-mitrichev.blogspot.com/" ADD_DATE="1374957505" LAST_VISIT="1386666616" LAST_MODIFIED="1386666616" ICON_URI="http://petr-mitrichev.blogspot.com/favicon.ico" >Algorithm problems for dummies Petr Mitrichev's blog</A>
+        <DT><A HREF="http://www.youtube.com/watch?v=p-_RHRAzUHM" ADD_DATE="1374957505" LAST_VISIT="1386666617" LAST_MODIFIED="1386666617" >Flying with the fastest birds on the planet Peregrine Falcon & Gos Hawk - Animal Camera - BBC - YouTube</A>
+        <DT><A HREF="http://harkavagrant.com/index.php?id=296" ADD_DATE="1374957505" LAST_VISIT="1386666617" LAST_MODIFIED="1386666617" ICON_URI="http://harkavagrant.com/favicon.ico" >Hark, a vagrant 296</A>
+        <DT><A HREF="http://www.tldp.org/LDP/Linux-Filesystem-Hierarchy/html/" ADD_DATE="1374957505" LAST_VISIT="1386666617" LAST_MODIFIED="1389102608" ICON_URI="http://www.tldp.org/favicon.ico" >Linux Filesystem Hierarchy</A>
+    </DL><p>
+    <DT><H3 FOLDED ADD_DATE="1374957504">People</H3>
+    <DL><p>
+        <DT><A HREF="http://www.altdevblogaday.com/2012/04/26/functional-programming-in-c/" ADD_DATE="1377013922" LAST_VISIT="1386666616" LAST_MODIFIED="1389102919" ICON_URI="http://www.altdevblogaday.com/favicon.ico" >Carmack #AltDevBlog</A>
+        <DT><A HREF="http://scpd.stanford.edu/knuth/index.jsp" ADD_DATE="1374957504" LAST_VISIT="1386666617" LAST_MODIFIED="1386666617" >Computer Musings by Professor Donald E. Knuth Stanford University Online</A>
+        <DT><A HREF="http://www-cs-faculty.stanford.edu/~knuth/index.html" ADD_DATE="1374957504" LAST_VISIT="1386666617" LAST_MODIFIED="1386666617" >Don Knuth's Home Page</A>
+        <DT><A HREF="http://www.insight.org/site/PageServer" ADD_DATE="1374957504" LAST_VISIT="1386666617" LAST_MODIFIED="1386666617" >Insight For Living Chuck Swindoll's Bible-teaching via articles, books, audio, and devotionals</A>
+        <DT><A HREF="http://torvalds-family.blogspot.com/" ADD_DATE="1374957504" LAST_VISIT="1386666617" LAST_MODIFIED="1386666617" >Linus' blog</A>
+        <DT><A HREF="http://www.hawking.org.uk/" ADD_DATE="1374957504" LAST_VISIT="1386666617" LAST_MODIFIED="1386666617" >Stephen Hawking - Home</A>
+        <DT><A HREF="http://www.escapistmagazine.com/articles/view/editorials/zeropunctuation" ADD_DATE="1374957504" LAST_VISIT="1386666617" LAST_MODIFIED="1386666617" >The Escapist Zero Punctuation</A>
+        <DT><A HREF="http://www.thegatesnotes.com/" ADD_DATE="1374957504" LAST_VISIT="1386666617" LAST_MODIFIED="1386666617" >The Gates Notes</A>
+        <DT><A HREF="http://www.linuxfoundation.org/" ADD_DATE="1374957503" LAST_VISIT="1386666616" LAST_MODIFIED="1386666616" ICON_URI="http://www.linuxfoundation.org/sites/www.linuxfoundation.org/themes/opensourcery/favicon.ico" >The Linux Foundation</A>
+        <DT><A HREF="http://www.slingshotchannel.com/" ADD_DATE="1374957504" LAST_VISIT="1386666617" LAST_MODIFIED="1386666617" >The Slingshot Channel's Official Website</A>
+        <DT><A HREF="http://pdos.csail.mit.edu/6.828/2012/xv6.html" ADD_DATE="1388187282" LAST_VISIT="1388187282" LAST_MODIFIED="1388187282" >Xv6, a simple Unix-like teaching operating system</A>
+    </DL><p>
+    <DT><H3 FOLDED ADD_DATE="1374957504">Research</H3>
+    <DL><p>
+        <DT><H3 FOLDED ADD_DATE="1389105041">Operating Systems</H3>
+        <DL><p>
+            <DT><A HREF="http://stochastix.wordpress.com/2009/01/31/distance-between-two-words/" ADD_DATE="1374957504" LAST_VISIT="1386666617" LAST_MODIFIED="1389106385" ICON_URI="http://1.gravatar.com/blavatar/97f8320d71ee1387cf94dbb722633e25?s=16" >Distance between two words « Reasonable Deviations</A>
+            <DT><A HREF="http://misc.aspell.net/wiki/English_Dictionaries" ADD_DATE="1384796381" LAST_VISIT="1386666616" LAST_MODIFIED="1386666616" >English Dictionaries - AspellWiki</A>
+            <DT><A HREF="http://help.yahoo.com//l/us/yahoo/smallbusiness/webhosting/gftp/ftps-04.html#g" ADD_DATE="1374957505" LAST_VISIT="1386666616" LAST_MODIFIED="1386666616" ICON_URI="http://help.yahoo.com/favicon.ico" >How to setup FTPS tool - Yahoo! Small Business Help</A>
+            <DT><A HREF="http://msdn.microsoft.com/en-us/library/windows/hardware/ff559006(v=vs.85).aspx" ADD_DATE="1375962144" LAST_VISIT="1386666616" LAST_MODIFIED="1386666616" ICON_URI="http://msdn.microsoft.com/Areas/Epx/Themes/Windows/Content/Winlogo_favicon.ico" >IDENTIFY_DEVICE_DATA structure (Windows Drivers)</A>
+            <DT><A HREF="http://arstechnica.com/information-technology/2012/10/linux-foundation-to-offer-signed-solution-for-uefi-secure-boot-conundrum/" ADD_DATE="1374957505" LAST_VISIT="1386666616" LAST_MODIFIED="1386666616" >Linux Foundation to offer signed solution for UEFI Secure Boot conundrum Ars Technica</A>
+            <DT><A HREF="http://www.linuxfoundation.org/news-media/blogs/browse/2012/10/linux-foundation-uefi-secure-boot-system-open-source" ADD_DATE="1374957505" LAST_VISIT="1386666616" LAST_MODIFIED="1386666616" >Linux Foundation UEFI Secure Boot System for Open Source The Linux Foundation</A>
+            <DT><A HREF="http://www.pcworld.com/article/2011669/linux-foundation-unveils-a-new-solution-for-win-8-secure-boot.html" ADD_DATE="1374957505" LAST_VISIT="1386666616" LAST_MODIFIED="1386666616" >Linux Foundation unveils a workaround for Win 8 Secure Boot PCWorld</A>
+            <DT><A HREF="http://academicearth.org/courses/operating-systems-and-system-programming" ADD_DATE="1374957504" LAST_VISIT="1386666617" LAST_MODIFIED="1386666617" >Operating Systems and System Programming Berkeley Video Course</A>
+            <DT><A HREF="http://partedmagic.com/doku.php" ADD_DATE="1374957505" LAST_VISIT="1386666616" LAST_MODIFIED="1386666616" >start – Parted Magic</A>
+        </DL><p>
+        <DT><A HREF="http://www.hongkiat.com/blog/pixel-art-tutorials/" ADD_DATE="1374957503" LAST_VISIT="1386666616" LAST_MODIFIED="1386666616" ICON_URI="http://mediatemplestatic.hongkiat.netdna-cdn.com/logo/hkdc/favicon.ico" >30 Excellent Pixel Art Tutorials For Pixel Lovers</A>
+        <DT><A HREF="http://bigocheatsheet.com/" ADD_DATE="1374957504" LAST_VISIT="1386666617" LAST_MODIFIED="1386666617" >Big-O Algorithm Complexity Cheat Sheet</A>
+        <DT><A HREF="https://www.circuitlab.com/" ADD_DATE="1374957504" LAST_VISIT="1386666617" LAST_MODIFIED="1386666617" >CircuitLab sketch, simulate, and share your circuits</A>
+        <DT><A HREF="http://www.sparknotes.com/writing/style/" ADD_DATE="1374957504" LAST_VISIT="1386666617" LAST_MODIFIED="1386666617" >Grammar, Usage, and Style Guide SparkNotes Ultimate Style Ultimate Style</A>
+        <DT><A HREF="http://imgur.com/" ADD_DATE="1374957505" LAST_VISIT="1386666616" LAST_MODIFIED="1386666616" ICON_URI="http://imgur.com/favicon.ico" >imgur the simple image sharer</A>
+        <DT><A HREF="http://software.intel.com/en-us/" ADD_DATE="1386626088" LAST_VISIT="1386666616" LAST_MODIFIED="1386666616" ICON_URI="http://software.intel.com/sites/all/themes/isn3/favicon.ico" >Intel® Developer Zone</A>
+        <DT><A HREF="http://www.archive.org/" ADD_DATE="1374957504" LAST_VISIT="1386666617" LAST_MODIFIED="1386666617" >Internet Archive Digital Library of Free Books, Movies, Music & Wayback Machine</A>
+        <DT><A HREF="http://www.netlib.org/lapack/" ADD_DATE="1374957504" LAST_VISIT="1386666617" LAST_MODIFIED="1386666617" >LAPACK — Linear Algebra PACKage</A>
+        <DT><A HREF="http://www.gutenberg.org/wiki/Main_Page" ADD_DATE="1374957504" LAST_VISIT="1386666617" LAST_MODIFIED="1386666617" ICON_URI="http://www.gutenberg.org/favicon.ico" >Main Page - Gutenberg</A>
+        <DT><A HREF="http://www.moreofit.com/" ADD_DATE="1374957504" LAST_VISIT="1386666617" LAST_MODIFIED="1389102467" ICON_URI="http://www.moreofit.com/favicon.ico" >moreofit - Website Similarity Search Engine</A>
+        <DT><A HREF="http://www.peoplesmart.com/" ADD_DATE="1374957504" LAST_VISIT="1386666617" LAST_MODIFIED="1389105190" ICON_URI="http://www.peoplesmart.com/favicon.ico" >People Search & Background Checks by Name, Phone, Email or Address - PeopleSmart</A>
+        <DT><A HREF="http://promo.net/pg/" ADD_DATE="1374957504" LAST_VISIT="1386666617" LAST_MODIFIED="1386666617" >PROJECT GUTENBERG OFFICIAL HOME SITE - INDEX -- Free Books On-Line -</A>
+        <DT><A HREF="http://validator.w3.org/" ADD_DATE="1374957504" LAST_VISIT="1386666617" LAST_MODIFIED="1386666617" >The W3C Markup Validation Service</A>
+        <DT><A HREF="http://www.whorush.com/" ADD_DATE="1374957504" LAST_VISIT="1386666617" LAST_MODIFIED="1386666617" >WHORush.com, your source for information on domains</A>
+        <DT><A HREF="http://www.wolframalpha.com/" ADD_DATE="1374957504" LAST_VISIT="1386666617" LAST_MODIFIED="1386666617" >WolframAlpha Computational Knowledge Engine</A>
+        <DT><A HREF="http://youtubetime.com/" ADD_DATE="1374957505" LAST_VISIT="1386666617" LAST_MODIFIED="1386666617" >YouTube Time</A>
+        <DT><A HREF="http://www.metacrawler.com/info.metac/dog/index.htm" ADD_DATE="1374957504" LAST_VISIT="1386666617" LAST_MODIFIED="1386666617" >[ MetaCrawler® ]</A>
+        <DT><A HREF="http://validator.w3.org/check?uri=http%3A%2F%2Flynx.isc.org%2Findex.html" ADD_DATE="1374957504" LAST_VISIT="1386666617" LAST_MODIFIED="1386666617" >[Valid] Markup Validation of http--lynx.isc.org-index.html - W3C Markup Validator</A>
+    </DL><p>
+    <DT><H3 FOLDED ADD_DATE="1374957503">Spiritual</H3>
+    <DL><p>
+        <DT><A HREF="http://www.biblegateway.com/passage/?search=1+Corinthians+14&version=NIV" ADD_DATE="1374957504" LAST_VISIT="1386666617" LAST_MODIFIED="1389330204" ICON_URI="http://static5.bgcdn.com/favicon.ico?ca05b3df" >1 Corinthians 14 NIV - Intelligibility in Worship Follow the - Bible Gateway</A>
+        <DT><A HREF="http://qrng.anu.edu.au/NIST.php" ADD_DATE="1374957504" LAST_VISIT="1386666617" LAST_MODIFIED="1386666617" ICON_URI="http://qrng.anu.edu.au/favicon.ico" >ANU Quantum Random Number Server</A>
+        <DT><A HREF="http://www.generatedata.com/" ADD_DATE="1383350304" LAST_VISIT="1386666617" LAST_MODIFIED="1386666617" >generatedata.com</A>
+        <DT><A HREF="https://qrng.physik.hu-berlin.de/download" ADD_DATE="1374957505" LAST_VISIT="1386666617" LAST_MODIFIED="1386666617" >QRNG Service - Download</A>
+        <DT><A HREF="http://random.irb.hr/index.php" ADD_DATE="1374957504" LAST_VISIT="1386666617" LAST_MODIFIED="1386666617" ICON_URI="http://random.irb.hr/favicon.ico" >Quantum Random Bit Generator Service</A>
+        <DT><A HREF="http://www.randomnumbers.info/" ADD_DATE="1374957504" LAST_VISIT="1386666617" LAST_MODIFIED="1386666617" >Random Numbers Info</A>
+        <DT><A HREF="http://www.random.org/" ADD_DATE="1374957504" LAST_VISIT="1386666617" LAST_MODIFIED="1386666617" ICON_URI="http://www.random.org/favicon.ico" >RANDOM.ORG - True Random Number Service</A>
+        <DT><A HREF="https://www.fourmilab.ch/hotbits/secure_generate.html" ADD_DATE="1374957503" LAST_VISIT="1386666617" LAST_MODIFIED="1386666617" ICON_URI="https://www.fourmilab.ch/favicon.ico" >Request HotBits (Secure Server)</A>
+        <DT><A HREF="http://www.theyshootpictures.com/gf1000_all1000films.htm" ADD_DATE="1374957505" LAST_VISIT="1386666617" LAST_MODIFIED="1386666617" >TSPDT - The 1,000 Greatest Films (Full List)</A>
+        <DT><A HREF="http://www.usccb.org/" ADD_DATE="1374957503" LAST_VISIT="1386666617" LAST_MODIFIED="1386666617" ICON_URI="http://www.usccb.org/favicon.ico" >United States Conference of Catholic Bishops</A>
+        <DT><A HREF="http://virtual-notary.org/" ADD_DATE="1374957503" LAST_VISIT="1386666617" LAST_MODIFIED="1387238161" ICON_URI="http://virtual-notary.org/static/favicon.png" >Virtual-Notary</A>
+    </DL><p>
+    <DT><H3 FOLDED ADD_DATE="1374957503">TempleOS Business</H3>
+    <DL><p>
+        <DT><A HREF="http://betanews.com/" ADD_DATE="1374957503" LAST_VISIT="1386666617" LAST_MODIFIED="1386666617" ICON_URI="http://betanews.com/wp-content/themes/betanews/favicon.ico" >BetaNews</A>
+        <DT><A HREF="http://www.devmaster.net/forums/" ADD_DATE="1374957503" LAST_VISIT="1386666617" LAST_MODIFIED="1386666617" >DevMaster.net Forums - Powered by vBulletin</A>
+        <DT><A HREF="http://www.gamedev.net/" ADD_DATE="1374957503" LAST_VISIT="1386666617" LAST_MODIFIED="1386666617" >GameDev.net - all your game development needs</A>
+        <DT><A HREF="http://www.majorgeeks.com/" ADD_DATE="1374957503" LAST_VISIT="1386666617" LAST_MODIFIED="1386666617" ICON_URI="http://www.majorgeeks.com/favicon.ico" >MajorGeeks.com - Download Freeware and Shareware Computer Utilities</A>
+        <DT><A HREF="http://www.youtube.com/watch?v=6WgOWrT1yyI&feature=youtu.be&a" ADD_DATE="1381667845" LAST_VISIT="1386666617" LAST_MODIFIED="1387406101" ICON_URI="http://s.ytimg.com/yts/img/favicon_32-vflWoMFGx.png" >Mum Tries Out TempleOS 1.06 (2013) - YouTube</A>
+        <DT><A HREF="http://www.businessconsultingabc.com/Feedback.html" ADD_DATE="1374957503" LAST_VISIT="1386666617" LAST_MODIFIED="1386666617" ICON_URI="http://www.businessconsultingabc.com/wp-content/themes/business-consulting-abc/favicon.ico" >Send Us Feedback Email ABC Business Consulting ABC Business Consulting</A>
+        <DT><A HREF="http://www.sparrowos.com/" ADD_DATE="1375793135" LAST_VISIT="1386666617" LAST_MODIFIED="1386666617" ICON_URI="http://www.sparrowos.com/favicon.ico" >Sparrow Operating System</A>
+        <DT><A HREF="http://www.losethos.com/" ADD_DATE="1374957503" LAST_VISIT="1386666617" LAST_MODIFIED="1386666617" ICON_URI="http://www.losethos.com/favicon.ico" >The LoseThos Operating System</A>
+        <DT><A HREF="http://www.google.com/webmasters/" ADD_DATE="1374957503" LAST_VISIT="1386666616" LAST_MODIFIED="1386666616" ICON_URI="http://www.google.com/favicon.ico" >Webmasters – Google</A>
+    </DL><p>
+    <DT><H3 FOLDED ADD_DATE="1389105242">Uncommon</H3>
+    <DL><p>
+        <DT><A HREF="http://irc.netsplit.de/channels/details.php?room=%23%23programming&net=freenode" ADD_DATE="1374957505" LAST_VISIT="1386666616" LAST_MODIFIED="1389102778" ICON_URI="http://irc.netsplit.de/favicon.ico" >##programming freenode - Chat Room on IRC - irc.netsplit.de</A>
+        <DT><A HREF="http://politicalhumor.about.com/library/bl-political-cartoons.htm" ADD_DATE="1374957505" LAST_VISIT="1386666616" LAST_MODIFIED="1386666616" >2012 Political Cartoons - Best Political Cartoons of 2012</A>
+        <DT><A HREF="http://english.aljazeera.net/" ADD_DATE="1374957504" LAST_VISIT="1386666617" LAST_MODIFIED="1386666617" >AJE - Al Jazeera English</A>
+        <DT><A HREF="http://www.amazon.com/" ADD_DATE="1374957505" LAST_VISIT="1386666616" LAST_MODIFIED="1389106076" ICON_URI="http://www.amazon.com/favicon.ico" >amazon.com Online Shopping for Electronics, Apparel, Computers, Books, DVDs & more</A>
+        <DT><A HREF="http://www.huffingtonpost.com/" ADD_DATE="1386981098" LAST_VISIT="1386981098" LAST_MODIFIED="1386981098" ICON_URI="http://www.huffingtonpost.com/favicon.ico" >Breaking News and Opinion on The Huffington Post</A>
+        <DT><A HREF="http://www.dailyrotation.com/" ADD_DATE="1374957504" LAST_VISIT="1386666617" LAST_MODIFIED="1386666617" >DAILY ROTATION</A>
+        <DT><A HREF="http://www.dzone.com/links/index.html" ADD_DATE="1378720139" LAST_VISIT="1386666616" LAST_MODIFIED="1386666616" ICON_URI="http://www.dzone.com/favicon.ico" >dzone.com - fresh links for developers</A>
+        <DT><A HREF="http://www.hackforums.net/" ADD_DATE="1374957503" LAST_VISIT="1386666616" LAST_MODIFIED="1386666616" >Hack Forums</A>
+        <DT><A HREF="http://hckrnews.com/" ADD_DATE="1377987384" LAST_VISIT="1386666616" LAST_MODIFIED="1387840046" ICON_URI="http://hckrnews.com/img/touch/apple-touch-icon.png" >hckr news - Hacker News sorted by time</A>
+        <DT><A HREF="http://www.shellcity.net/" ADD_DATE="1374957504" LAST_VISIT="1386666617" LAST_MODIFIED="1389105474" ICON_URI="http://www.shellcity.net/favicon.ico" >http--www.shellcity.net-</A>
+        <DT><A HREF="http://chat.icq.com/icqchat/" ADD_DATE="1374957503" LAST_VISIT="1386666616" LAST_MODIFIED="1386666616" >ICQ Chat Rooms - ICQ.com</A>
+        <DT><A HREF="http://iopscience.iop.org/1367-2630" ADD_DATE="1374957505" LAST_VISIT="1386666617" LAST_MODIFIED="1389105799" ICON_URI="http://iopscience.iop.org/favicon.ico" >iopscience Journal of Physics</A>
+        <DT><A HREF="http://www.irc.org/links.html" ADD_DATE="1374957505" LAST_VISIT="1386666616" LAST_MODIFIED="1386666616" >IRC.org</A>
+        <DT><A HREF="http://www.haaretz.com/" ADD_DATE="1374957504" LAST_VISIT="1386666617" LAST_MODIFIED="1386666617" >Israel News - Haaretz Israeli News source</A>
+        <DT><A HREF="https://lobste.rs/" ADD_DATE="1374957505" LAST_VISIT="1386666616" LAST_MODIFIED="1389102792" ICON_URI="https://lobste.rs/favicon.ico" >Lobsters</A>
+        <DT><A HREF="http://www.microsoft.com/isapi/redir.dll?prd=ie&pver=6&ar=IStart" ADD_DATE="1374957504" LAST_VISIT="1386666617" LAST_MODIFIED="1386666617" >MSN.com</A>
+        <DT><A HREF="http://www.physorg.com/" ADD_DATE="1374957504" LAST_VISIT="1386666617" LAST_MODIFIED="1386666617" >PhysOrg.com - Science News, Technology, Physics, Nanotechnology, Space Science, Earth Science, Medicine</A>
+        <DT><A HREF="http://www.chess.com/" ADD_DATE="1374957505" LAST_VISIT="1386666616" LAST_MODIFIED="1386666616" >Play Chess Online - Free Chess Games at Chess.com</A>
+        <DT><A HREF="http://gogloom.com/DIR?cat=84126&catdesc=Programming" ADD_DATE="1374957505" LAST_VISIT="1386666616" LAST_MODIFIED="1386666616" >Programming CHAT ROOMS - Online CHAT!</A>
+        <DT><A HREF="http://royal.pingdom.com/" ADD_DATE="1374957504" LAST_VISIT="1386666617" LAST_MODIFIED="1386666617" >Royal Pingdom</A>
+        <DT><A HREF="http://www.infopackets.com/" ADD_DATE="1374957504" LAST_VISIT="1386666617" LAST_MODIFIED="1386666617" >Tech News Daily - Infopackets.com</A>
+        <DT><A HREF="http://www.techbeta.org/" ADD_DATE="1374957504" LAST_VISIT="1386666617" LAST_MODIFIED="1386666617" >TechBeta Free and open source software for Windows, Mac OS X, Linux, iPhone, and Mobile</A>
+        <DT><A HREF="http://www.techcrunch.com/" ADD_DATE="1374957503" LAST_VISIT="1386666617" LAST_MODIFIED="1386666617" >TechCrunch</A>
+        <DT><A HREF="http://www.tomshardware.com/" ADD_DATE="1374957503" LAST_VISIT="1386666616" LAST_MODIFIED="1386666616" >Tom's Hardware Hardware News, Tests and Reviews</A>
+        <DT><A HREF="http://news.yahoo.com/" ADD_DATE="1374957505" LAST_VISIT="1386666616" LAST_MODIFIED="1386666616" ICON_URI="http://news.yahoo.com/favicon.ico" >Yahoo! News - Latest News & Headlines</A>
+        <DT><A HREF="http://www.yahoo.com/" ADD_DATE="1374957504" LAST_VISIT="1386666617" LAST_MODIFIED="1389106215" ICON_URI="http://l.yimg.com/rz/l/favicon.ico" >Yahoo!</A>
+    </DL><p>
+    <DT><A HREF="http://www.4chan.org/" ADD_DATE="1375781470" LAST_VISIT="1386666616" LAST_MODIFIED="1386666616" ICON_URI="http://s.4cdn.org/image/favicon.ico" >4chan</A>
+    <DT><A HREF="http://arstechnica.com/index.ars" ADD_DATE="1374957503" LAST_VISIT="1386666616" LAST_MODIFIED="1386666616" >Ars Technica</A>
+    <DT><A HREF="http://dictionary.reference.com/" ADD_DATE="1374957503" LAST_VISIT="1386666616" LAST_MODIFIED="1386666616" ICON_URI="http://static.sfdict.com/dictcloud/favicon.ico" >Dictionary</A>
+    <DT><A HREF="http://www.drudgereport.com/" ADD_DATE="1374957503" LAST_VISIT="1386666616" LAST_MODIFIED="1386666616" >DRUDGE</A>
+    <DT><A HREF="http://www.facebook.com/home.php" ADD_DATE="1374957503" LAST_VISIT="1386666616" LAST_MODIFIED="1386666616" >Facebook</A>
+    <DT><A HREF="https://www.google.com/" ADD_DATE="1374957503" LAST_VISIT="1386666616" LAST_MODIFIED="1386666616" ICON_URI="https://www.google.com/favicon.ico" >Google</A>
+    <DT><A HREF="http://news.ycombinator.com/" ADD_DATE="1374957503" LAST_VISIT="1386666616" LAST_MODIFIED="1386666616" >Hacker News</A>
+    <DT><A HREF="http://www.knpr.org/" ADD_DATE="1374957503" LAST_VISIT="1386666616" LAST_MODIFIED="1386666616" ICON_URI="http://www.knpr.org/favicon.ico" >Nevada Public Radio</A>
+    <DT><A HREF="http://beacon.nist.gov/home" ADD_DATE="1383959013" LAST_VISIT="1386666616" LAST_MODIFIED="1386666616" >NIST Randomness Beacon (Prototype Implementation) - NIST</A>
+    <DT><A HREF="http://forum.osdev.org/" ADD_DATE="1374957503" LAST_VISIT="1386666616" LAST_MODIFIED="1386666616" ICON_URI="http://forum.osdev.org/favicon.ico" >OSDev.org • Index page</A>
+    <DT><A HREF="http://www.osnews.com/" ADD_DATE="1374957503" LAST_VISIT="1386666616" LAST_MODIFIED="1386666616" ICON_URI="http://www.osnews.com/favicon.ico" >OSNews is Exploring the Future of Computing</A>
+    <DT><A HREF="http://www.pixeljoint.com/forum/" ADD_DATE="1374957503" LAST_VISIT="1386666616" LAST_MODIFIED="1386666616" ICON_URI="http://www.pixeljoint.com/favicon.ico" >Pixel Joint Forum</A>
+    <DT><A HREF="http://popurls.com/" ADD_DATE="1378004893" LAST_VISIT="1386666616" LAST_MODIFIED="1386666616" ICON_URI="http://popurls.com/favicon.ico" >popurls  the genuine news aggregator for the latest web buzz</A>
+    <DT><A HREF="http://www.reddit.com/" ADD_DATE="1374957503" LAST_VISIT="1386666616" LAST_MODIFIED="1386666968" ICON_URI="http://www.redditstatic.com/icon.png" >reddit.com</A>
+    <DT><A HREF="http://slashdot.org/" ADD_DATE="1374957503" LAST_VISIT="1386666616" LAST_MODIFIED="1386666616" ICON_URI="http://slashdot.org/favicon.ico" >slashdot News for nerds, stuff that matters</A>
+    <DT><A HREF="http://stackoverflow.com/" ADD_DATE="1381508264" LAST_VISIT="1386666616" LAST_MODIFIED="1386666616" ICON_URI="http://cdn.sstatic.net/stackoverflow/img/favicon.ico" >Stack Overflow</A>
+    <DT><A HREF="http://www.templeos.org/logs/" ADD_DATE="1374957503" LAST_VISIT="1386666616" LAST_MODIFIED="1386666616" ICON_URI="http://www.templeos.org/favicon.ico" >TempleOS Index of -logs</A>
+    <DT><A HREF="http://www.templeos.org/Wb/Accts/TS/Wb2/Rants/TAD/TADRants.html" ADD_DATE="1389595518" LAST_VISIT="1389595518" LAST_MODIFIED="1389595518" ICON_URI="http://www.templeos.org/favicon.ico" >Terry Davis' Rants</A>
+    <DT><A HREF="http://www.templeos.org/" ADD_DATE="1375628480" LAST_VISIT="1386666616" LAST_MODIFIED="1386666616" ICON_URI="http://www.templeos.org/favicon.ico" >The Temple Operating System</A>
+    <DT><A HREF="https://twitter.com/" ADD_DATE="1378394318" LAST_VISIT="1386666616" LAST_MODIFIED="1386666616" ICON_URI="https://abs.twimg.com/favicons/favicon.ico" >Twitter</A>
+    <DT><A HREF="http://www.wikipedia.org/" ADD_DATE="1374957503" LAST_VISIT="1386666616" LAST_MODIFIED="1386666616" ICON_URI="http://bits.wikimedia.org/favicon/wikipedia.ico" >Wikipedia</A>
+    <DT><A HREF="http://smallbusiness.yahoo.com/services/index.php?crumb=eynoh/GoPXd" ADD_DATE="1374957503" LAST_VISIT="1386666616" LAST_MODIFIED="1386666616" >Yahoo! Small Business</A>
+    <DT><A HREF="http://www.youtube.com/" ADD_DATE="1374957503" LAST_VISIT="1386666616" LAST_MODIFIED="1386677085" ICON_URI="http://s.ytimg.com/yts/img/favicon_32-vflWoMFGx.png" >YouTube - Broadcast Yourself</A>
+</DL><p>
@@ -0,0 +1,115 @@
+//Be sure to Adam Include this.
+
+#help_index "Comm"
+
+#define COM1_BASE	0x3F8
+#define COM2_BASE	0x2F8
+#define COM3_BASE	0x3E8
+#define COM4_BASE	0x2E8
+
+#define UART_THR		0
+#define UART_RDR		0
+#define UART_BRDL		0
+#define UART_IER		1
+#define UART_BRDH		1
+#define UART_IIR		2
+#define UART_LCR		3
+#define UART_MCR		4
+#define UART_LSR		5
+#define UART_MSR		6
+
+
+I64 comm_base[5]={0,0x3F8,0x2F8,0x3E8,0x2E8};
+
+CFifoU8 *comm_fifos[5]={NULL,NULL,NULL,NULL,NULL};
+
+interrupt U0 CommInt3Handler()
+{
+  I64 base=comm_base[2];
+  if (comm_fifos[2] && (InU8(base+UART_IIR) & 0xFE)==8)   //RX IRQ
+    FifoU8Ins(comm_fifos[2],InU8(base+UART_RDR));
+
+  base=comm_base[4];
+  if (comm_fifos[4] && (InU8(base+UART_IIR) & 0xFE)==8)   //RX IRQ
+    FifoU8Ins(comm_fifos[4],InU8(base+UART_RDR));
+  OutU8(0x20,0x20);
+}
+
+interrupt U0 CommInt4Handler()
+{
+  I64 base=comm_base[1];
+  if (comm_fifos[1] && (InU8(base+UART_IIR) & 0xFE)==8)   //RX IRQ
+    FifoU8Ins(comm_fifos[1],InU8(base+UART_RDR));
+
+  base=comm_base[3];
+  if (comm_fifos[3] && (InU8(base+UART_IIR) & 0xFE)==8)   //RX IRQ
+    FifoU8Ins(comm_fifos[3],InU8(base+UART_RDR));
+  OutU8(0x20,0x20);
+}
+
+IntEntrySet(0x23,&CommInt3Handler);
+IntEntrySet(0x24,&CommInt4Handler);
+
+public U0 CommInit8n1(I64 port,I64 baud)
+{
+  I64 base=comm_base[port];
+
+  PUSHFD
+  CLI
+  if (comm_fifos[port])
+    FifoU8Del(comm_fifos[port]);
+  comm_fifos[port]=FifoU8New(256);
+  OutU8(base+UART_LCR,0);     //Set for IER
+  OutU8(base+UART_IER,0);     //DIsable all IRQ
+  OutU8(base+UART_LCR,0x80);  //Enable baud rate control
+  OutU8(base+UART_BRDL,(0x180/(baud/300)) & 0xFF); //LSB
+  OutU8(base+UART_BRDL,(0x180/(baud/300)) / 256);  //MSB
+  OutU8(base+UART_LCR,3);     // 8-none-1
+
+  InU8(base+UART_RDR);	//read garbage
+  InU8(base+UART_LSR);
+
+  OutU8(base+UART_MCR,4);
+  OutU8(base+UART_IER,0);     //DIsable all IRQ
+  OutU8(base+UART_MCR,0xA);	  //out2 and rts
+  OutU8(0x21,InU8(0x21) & (0xFF-0x18)); //Enable 8259 IRQ 3 & 4
+  OutU8(base+UART_IER,1);	  //Enable RX IRQ
+  POPFD
+}
+
+public U0 CommBusyPutChar(I64 port,U8 b)
+{
+  I64 base=comm_base[port];
+  while (!(InU8(base+UART_LSR) & 0x20))
+    Yield;
+  OutU8(base+UART_THR,b);
+  while (!(InU8(base+UART_LSR) & 0x20))
+    Yield;
+}
+
+public U0 CommBusyPutS(I64 port,U8 *st)
+{
+  I64 base=comm_base[port];
+  U8 b;
+  while (b=*(st++)) {
+    while (!(InU8(base+UART_LSR) & 0x20))
+      Yield;
+    OutU8(base+UART_THR,b);
+  }
+  while (!(InU8(base+UART_LSR) & 0x20))
+    Yield;
+}
+
+public U0 CommBusyWriteBlk(I64 port,U8 *buf,I64 count)
+{
+  I64 base=comm_base[port];
+  while (count--) {
+    while (!(InU8(base+UART_LSR) & 0x20))
+      Yield;
+    OutU8(base+UART_THR,*(buf++));
+  }
+  while (!(InU8(base+UART_LSR) & 0x20))
+    Yield;
+}
+
+#help_index ""
@@ -0,0 +1,73 @@
+//9 has graphics
+
+#define X	330
+#define Y	15
+
+#define NUM_BEAMS	256
+
+F64 beams_r[NUM_BEAMS],beams_é[NUM_BEAMS];
+
+U0 DrawIt(CTask *,CDC *dc)
+{
+  I64 i;
+  F64 r,x1,y1,x2,y2;
+  dc->color=YELLOW;
+  GrCircle(dc,X,Y,10);
+  GrFloodFill(dc,X,Y,10);
+  dc->color=BROWN;
+  GrCircle(dc,X,Y,10);
+  dc->color=YELLOW;
+  for (i=0;i<NUM_BEAMS;i++) {
+    r=125.0*((0.25*Beat+beams_r[i])%1.0);
+    P2R(&x1,&y1,r     ,beams_é[i]);
+    P2R(&x2,&y2,r+10.0,beams_é[i]);
+    GrLine(dc,x1+X,y1+Y,x2+X,y2+Y);
+  }
+}
+
+U0 Song()
+{
+  CTask *task;
+  I64 i;
+  SettingsPush; //See $LK,"SettingsPush",A="MN:SettingsPush"$
+  Fs->text_attr=LTCYAN<<4+BLACK;
+  Fs->draw_it=&DrawIt;
+  Fs->task_end_cb=&SndTaskEndCB;
+  MusicSettingsRst;
+  music_tempo= 2.480;
+  music_stacatto_factor= 0.902;
+  for (i=0;i<NUM_BEAMS;i++) {
+    beams_r[i]=Rand;
+    beams_é[i]=2*ã*Rand;
+  }
+  try {
+    task=PopUpViewStr(
+	  "$LK,"Numbers,6:25",A="BF:Numbers,6:25"$\n"
+	  "$LK,"Psalms,31:16",A="BF:Psalms,31:16"$\n"
+	  "$LK,"Psalms,67:1",A="BF:Psalms,67:1"$\n"
+	  "$LK,"Psalms,80:3",A="BF:Psalms,80:3"$\n"
+	  "$LK,"Psalms,80:19",A="BF:Psalms,80:19"$\n"
+	  "$LK,"Psalms,119:135",A="BF:Psalms,119:135"$\n"
+	  "$LK,"Daniel,9:17",A="BF:Daniel,9:17"$\n"
+	  );
+    TaskWait(task);
+    SetWinHorz(Fs->win_left,Fs->win_right,task);
+    SetWinVert(Fs->win_bottom+3,Fs->win_bottom+15,task);
+    "$$BG+H,LTCYAN$$$$FD+H,BLACK$$";
+    while (!ScanKey) {
+      "$$WHITE$$To God...\n$$FG$$";
+      Play("3etCFEsDDDDD2G3D2G3qC2eG3EqEetAAF2qG",
+	    "I \0am \0a\0biding \0 \0 \0 \0in \0 \0Your \0 \0presence.\n\0 \0 \0 \0 \0 \0 \0 \0");
+      Play("3etCFEsDDDDD2G3D2G3qC2eG3EqEetAAF2qG",
+	    "I \0am \0a\0biding \0 \0 \0 \0in \0 \0Your \0 \0presence.\n\0 \0 \0 \0 \0 \0 \0 \0");
+      Play("3DBsFGFG2eG3FRDqEGeBE",
+	    "What \0a \0joy!\n\0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0");
+      Play("qDBsFGFG2eG3FRDqEGeBE",
+	    "I'm \0so \0coy!\n\0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0");
+    }
+  } catch
+    PutExcept;
+  SettingsPop;
+}
+
+Song;
@@ -0,0 +1,41 @@
+//7 has words
+U0 Song()
+{
+  CTask *task;
+  Fs->task_end_cb=&SndTaskEndCB;
+  MusicSettingsRst;
+  music_tempo= 2.480;
+  music_stacatto_factor= 0.736;
+  try {
+    task=PopUpViewStr(
+	  "There are myths about the River\n"
+	  "Styx separating the land of the\n"
+	  "living from dead.  Jesus' told a story\n"
+	  "about the land of living separate from\n"
+	  "land of dead.  ($LK,"Luke,16:22",A="BF:Luke,16:22"$)  In the Old\n"
+	  "Testament, the River Jordan was a special\n"
+	  "barrier.  ($LK,"Deuteronomy,4:22",A="BF:Deuteronomy,4:22"$)\n"
+	  );
+    TaskWait(task);
+    SetWinHorz(Fs->win_left,Fs->win_right,task);
+    SetWinVert(Fs->win_bottom+3,Fs->win_bottom+15,task);
+    while (!ScanKey) {
+      Play("3sBBBBqCq.BeAqBh.A",
+	    "Can't \0 \0 \0 \0get \0there, \0from \0he\0re.\n\0");
+      Play("M2/4");
+      Play("eECqAM4/4");
+      Play("sBBBBqCq.BeAqBh.A",
+	    "Can't \0 \0 \0 \0get \0there, \0from \0he\0re.\n\0");
+      Play("M2/4");
+      Play("eDDqDM4/4");
+      Play("DeEDqGCeF2G3qGsFGFGeDC",
+	    "Oh, \0my \0 \0God, \0some\0thing's... \0 \0 \0ver\0 \0y \0 \0wrong!\n\0 \0");
+      Play("qDeEDqGCeF2G3qGsFGFGeDC",
+	    "Oh, \0my \0 \0God, \0some\0thing's... \0 \0 \0ver\0 \0y \0 \0wrong!\n\0 \0");
+    }
+  } catch
+    PutExcept;
+  Snd(0);
+}
+
+Song;
@@ -0,0 +1,20 @@
+//7 no nothing
+U0 Song()
+{
+  Fs->task_end_cb=&SndTaskEndCB;
+  MusicSettingsRst;
+  music_tempo= 2.480;
+  music_stacatto_factor= 0.902;
+  try {
+  while (!ScanKey) {
+	Play("3eCsAAeCsAAeDABRCqEsBBeEDFE");
+	Play("CAqCsDDAAeBRCDsCCBBeEAFsEE");
+	Play("G2G3G2G3qGeBBBFsD2G3eDsB2G3B2G3eBAsGF2eG");
+	Play("3sG2G3G2G3qGeBBBFsD2G3eDsB2G3B2G3eBAsGF2eG");
+  }
+  } catch
+    PutExcept;
+  Snd(0);
+}
+
+Song;
@@ -0,0 +1,22 @@
+//7 has words
+U0 Song()
+{
+  Fs->task_end_cb=&SndTaskEndCB;
+  music_tempo=2.5;
+  try {
+  while (!ScanKey) {
+	Play("2qG3etC2GG3qARR2etG3FBqEeFE",
+		"All \0righ\0 \0 \0ty.\n\0 \0 \0 \0 \0 \0 \0 \0 \0");
+	Play("2qG3etC2GG3qARR2etG3FBqEeFE",
+		"All \0migh\0 \0 \0ty.\n\0 \0 \0 \0 \0 \0 \0 \0 \0");
+	Play("qFFEEeEBqFCB",
+		"Al\0read\0y, \0 \0I've \0 \0seen \0en\0ough.\n\0");
+	Play("FFEEeEBqFCB",
+		"Oh \0bo\0y, \0 \0was \0 \0that \0rough.\n\0 \0");
+  }
+  } catch
+    PutExcept;
+  Snd(0);
+}
+
+Song;
@@ -0,0 +1,24 @@
+//7 has words
+U0 Song()
+{
+  Fs->task_end_cb=&SndTaskEndCB;
+  MusicSettingsRst;
+  music_tempo= 2.480;
+  music_stacatto_factor= 0.902;
+  try {
+  while (!ScanKey) {
+	Play("2q.GeGqG3sBBCB2q.GeGqG3sBBCB",
+		"I'm \0a\0lone.\n\0$$RED$$No, \0you're \0 \0not.\n$$FG$$\0I'm \0a\0lone.\n\0$$RED$$No, \0you're \0 \0not.\n\0");
+	Play("q.C2eG3CsDC2eGG3qC2G3eCsDC2eGG",
+		"You \0are \0not \0a\0lone.\n\0 \0 \0Def\0inately, \0not \0a\0lone.\n\0 \0 \0");
+	Play("3sEAEAeCsCReRsDAe.GsBFFFFeEsAGeCsGDeDG",
+		"If \0 \0you \0 \0on\0ly \0 \0 \0 \0 \0knew.\n\0 \0His \0 \0 \0 \0Spir\0it \0 \0 \0is \0 \0with \0you.\n\0");
+	Play("sEAEAeCsCReRsDAe.GsBFFFFeEsAGeCsGDeDG",
+		"If \0 \0you \0 \0on\0ly \0 \0 \0 \0 \0knew.\n\0 \0His \0 \0 \0 \0Spir\0it \0 \0 \0is \0 \0with \0you.\n$$FG$$\0");
+  }
+  } catch
+    PutExcept;
+  Snd(0);
+}
+
+Song;
@@ -0,0 +1,22 @@
+//7 has words
+U0 Song()
+{
+  Fs->task_end_cb=&SndTaskEndCB;
+  music_tempo=2.5;
+  try {
+  while (!ScanKey) {
+	Play("3etDGDqGeCGetAE2G3eEFsGBGBqEG",
+		"Thanks, \0 \0 \0God!  \0 \0 \0You \0 \0are \0might\0y \0 \0good \0 \0to \0me.\n\0 \0");
+	Play("etDGDqGeCGetAE2G3eEFsGBGBqEG",
+		"Thanks, \0 \0 \0God!  \0 \0 \0You \0 \0are \0might\0y \0 \0good \0 \0to \0me.\n\0 \0");
+	Play("EsBGBGeEC2G3AqF2G3sC2G3C2GqG",
+		" \0 \0 \0 \0 \0 \0 \0I \0won't \0tell.\n\0 \0 \0 \0 \0 \0 \0");
+	Play("3EsBGBGeEC2G3AqF2G3sC2G3C2GqG",
+		" \0 \0 \0 \0 \0 \0 \0I \0won't \0tell.\n\0 \0 \0 \0 \0 \0 \0");
+  }
+  } catch
+    PutExcept;
+  Snd(0);
+}
+
+Song;
@@ -0,0 +1,72 @@
+//8 has graphics
+
+#define R1	13
+#define R2	21
+
+U0 DrawIt(CTask *,CDC *dc)
+{
+  static F64 é=0;
+  I64 x1=200,y1=20,x2=x1,y2=y1+R2;
+  F64 tt=Beat%16.0,č;
+  é+=1/(tt*tt+1);
+  dc->color=BLACK;
+  dc->pen_width=4;
+  GrCircle3(dc,x2,y2,0,R2+10);
+  for (č=é;č<é+2*ă;č+=ă/3) {
+    dc->color=BLACK;
+    dc->pen_width=2;
+    GrCircle3(dc,x2+R2*Cos(č),y2-R2*Sin(č),0,8);
+    dc->color=WHITE;
+    dc->pen_width=2;
+    GrCircle3(dc,x2+(R2+15)*Cos(č+ă/6),y2-(R2+15)*Sin(č+ă/6),0,3);
+  }
+  dc->color=BROWN;
+  GrFloodFill(dc,x2+R2*Cos(č),y2-R2*Sin(č));
+  dc->color=DKGRAY;
+  GrFloodFill(dc,x2,y2);
+  dc->pen_width=6;
+  dc->color=RED;
+  GrCircle3(dc,x1,y1,0,R1-6);
+  dc->color=DKGRAY;
+  GrCircle3(dc,x1,y1,0,R1-2);
+  dc->color=LTGRAY;
+  GrRect(dc,x1-2,y1-R2-1,4,10);
+  GrCircle3(dc,x1,y1,0,R1);
+  dc->color=RED;
+  GrFloodFill(dc,x1,y1,TRUE);
+  dc->color=BLACK;
+  GrFloodFill(dc,x1,y1);
+}
+
+
+U0 Song()
+{
+  CTask *task;
+  SettingsPush; //See $LK,"SettingsPush",A="MN:SettingsPush"$
+  Fs->draw_it=&DrawIt;
+  Fs->task_end_cb=&SndTaskEndCB;
+  MusicSettingsRst;
+  music_tempo= 2.480;
+  music_stacatto_factor= 0.902;
+  try {
+    task=PopUpViewStr("$LK,"Mark,14:37",A="BF:Mark,14:37"$\n");
+    TaskWait(task);
+    SetWinHorz(Fs->win_left,Fs->win_right,task);
+    SetWinVert(Fs->win_bottom+3,Fs->win_bottom+15,task);
+    while (!ScanKey) {
+      "$$GREEN$$Jesus talking...$$FG$$\n";
+      Play("3eBCqB2sG3D2G3DetCGFsCBCBetCGBeBGsBCBC",
+	    "Stay \0a\0wake.\n\0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0");
+      Play("eBCqB2sG3D2G3DetCGFsCBCBetCGBeBGsBCBC",
+	    "Stay \0a\0wake.\n\0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0");
+      Play("qDsDBDBetA2G3GqB2G3sADADqDetGFD",
+	    " \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0I \0 \0am \0a \0dead \0 \0man.\n\0");
+      Play("qDsDBDBetA2G3GqB2G3sADADqDetGFD",
+	    " \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0I \0 \0am \0a \0dead \0 \0man.\n\0");
+    }
+  } catch
+    PutExcept;
+  SettingsPop;
+}
+
+Song;
@@ -0,0 +1,51 @@
+//7 has graphics
+
+U0 Song()
+{
+  SettingsPush; //See $LK,"SettingsPush",A="MN:SettingsPush"$
+  Fs->text_attr=BLACK<<4+WHITE;
+  Fs->task_end_cb=&SndTaskEndCB;
+  MusicSettingsRst;
+  music_tempo= 2.480;
+  music_stacatto_factor= 0.9;
+  try {
+    while (!ScanKey) {
+      DocClear;
+      "$$BG,BLACK$$$$WHITE$$\n\n\n\n\nWait for the end...";
+      NewLine(5);
+      Spaces(17);
+      Sprite($IB,"<1>",BI=1,BP="::/Demo/Graphics/SpritePut.CPP.Z,1"$);
+      Play("3e.GsGe.GsFe.EsG4e.CsDe.EsEe.EsDqCe.CsB");
+      NewLine;
+      Play("e.AsAe.AsBe.CsBe.CsA3e.G4sA3e.GsEqGe.GsG");
+      NewLine;
+      Play("e.GsGe.GsFe.EsG4e.CsDe.EsEe.EsDqCC");
+      NewLine;
+      Play("DDCBh.CqR");
+      NewLine;
+      Play("3(Ge.G");
+      NewLine;
+      Play("sFe.EsG4e.CsDhEq.CeR");
+      NewLine;
+      Play("q(Ae.A");
+      NewLine;
+      Play("sBe.CsBe.CsA3hGq.EeR");
+      NewLine;
+      Play("q(Ge.G");
+      NewLine;
+      Play("sFe.EsG4e.CsDhEqCC");
+      NewLine;
+      Play("DDCBh.CqR");
+      NewLine;
+      Play("etEEGqCsDCDCFCFCqAetCDBBD3G4FCF");
+      NewLine;
+      Play("EEGqCsDCDCFCFCqAetCDBBD3G4FCF");
+      NewLine;
+    }
+  } catch
+    PutExcept;
+  DocClear;
+  SettingsPop;
+}
+
+Song;
@@ -0,0 +1,45 @@
+//7 has words
+
+F64 t0=Beat;
+
+U0 DrawIt(CTask *task,CDC *dc)
+{
+  static I64 i=0;
+  F64 dt=Beat-t0;
+  if (dt>16.0 && i++&1) {
+    dc->color=WHITE;
+    GrRect(dc,0,0,task->pix_width,task->pix_height);
+  }
+}
+
+U0 Song()
+{
+  CTask *task;
+  SettingsPush; //See $LK,"SettingsPush",A="MN:SettingsPush"$
+  Fs->task_end_cb=&SndTaskEndCB;
+  music_tempo=2.5;
+  DocCursor;
+  DocClear;
+  Fs->draw_it=&DrawIt;
+  try {
+    task=PopUpViewStr("$LK,"BF:Acts,9:3"$\n");
+    TaskWait(task);
+    SetWinHorz(Fs->win_left,Fs->win_right,task);
+    SetWinVert(Fs->win_bottom+3,Fs->win_bottom+15,task);
+    while (!ScanKey) {
+      t0=Beat;
+      Play("3qEeACA2G3qCEC2G3E",
+	    "Now... \0 \0 \0 \0 \0I \0see \0the \0light.\n\0 \0");
+      Play("EeACA2G3qCEC2G3E",
+	    "Now... \0 \0 \0 \0 \0I \0see \0the \0light.\n\0 \0");
+      Play("GCGBEeDFCAqD",
+	    "It's \0 \0quite \0 \0bright.\n\0 \0 \0 \0 \0 \0");
+      Play("GCGBEeDFCAqD",
+	    "It's \0 \0quite \0 \0bright.\n\0 \0 \0 \0 \0 \0");
+    }
+  } catch
+    PutExcept;
+  SettingsPop;
+}
+
+Song;
@@ -0,0 +1,54 @@
+//9 has graphics
+
+F64 t0=Beat;
+#define HORIZON_Y	50
+#define LEFT_EDGE	200
+
+U0 DrawIt(CTask *task,CDC *dc)
+{
+  I64 i;
+  F64 dt=Beat-t0,d=Clamp(0.1*dt,0,2),d2;
+
+  dc->color=ROPF_PROBABILITY_DITHER+LTCYAN<<16+CYAN;
+  for (i=HORIZON_Y;i>=0;i--) {
+    d2=ToF64(HORIZON_Y-i)/HORIZON_Y;
+    dc->dither_probability_u16=1<<16*Clamp((4.0-d2)/4.0*d*d-0.15,0,1.0);
+    GrLine(dc,LEFT_EDGE,i,task->pix_width-1,i);
+  }
+
+  d=(task->pix_width-LEFT_EDGE)/2+LEFT_EDGE;
+  dc->color=YELLOW;
+  GrCircle(dc,d,HORIZON_Y+50-dt,40);
+  GrFloodFill(dc,d,HORIZON_Y+15-dt,TRUE);
+
+  dc->color=GREEN;
+  GrRect(dc,200,HORIZON_Y,task->pix_width-200,task->pix_height-HORIZON_Y);
+}
+
+U0 Song()
+{
+  SettingsPush; //See $LK,"SettingsPush",A="MN:SettingsPush"$
+  Fs->draw_it=&DrawIt;
+  Fs->task_end_cb=&SndTaskEndCB;
+
+  MusicSettingsRst;
+  music_tempo= 2.500;
+  music_stacatto_factor= 0.900;
+  try {
+    while (!ScanKey) {
+      t0=Beat;
+      Play("3qBeB2G3qAeFAsFAFAqC2sG3A2G3ARBRB",
+	  "New \0day \0is \0born.\n\0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0");
+      Play("qBeB2G3qAeFAsFAFAqC2sG3A2G3ARBRB",
+	  "Though \0it's \0the \0mourn',\n\0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0");
+      Play("eDDRCqG2eGR3qEetEAFqCsDGDG",
+	  "cheer-\0up \0 \0the \0heart\n\0 \0 \0 \0 \0 \0 \0 \0 \0as \0 \0you \0");
+      Play("eDDRCqG2eGR3qEetEAFqCsDGDG",
+	  "hitch-\0up \0 \0the \0cart.\n\0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0");
+    }
+  } catch
+    PutExcept;
+  SettingsPop;
+}
+
+Song;
@@ -0,0 +1,22 @@
+//8 has words
+U0 Song()
+{
+  Fs->task_end_cb=&SndTaskEndCB;
+  MusicSettingsRst;
+  music_tempo= 2.480;
+  music_stacatto_factor= 0.902;
+  try {
+  while (!ScanKey) {
+	Play("3qEsCDCDqCDeEGsEBEBeCBsDADA",
+		"Be \0like \0 \0a \0 \0child \0 \0 \0 \0some \0 \0re\0 \0spect.\n\0 \0 \0 \0 \0 \0");
+	Play("qEsCDCDqCDeEGsEBEBeCBsDADA",
+		"Ma\0tur\0 \0i\0 \0ty \0 \0 \0 \0don't \0 \0ne\0 \0glect.\n\0 \0 \0 \0 \0 \0");
+	Play("eBDqF2sG3A2G3AqAAAetDAAsDBDB");
+	Play("eBDqF2sG3A2G3AqAAAetDAAsDBDB");
+  }
+  } catch
+    PutExcept;
+  Snd(0);
+}
+
+Song;
@@ -0,0 +1,24 @@
+//8 has words
+U0 Song()
+{
+  Fs->task_end_cb=&SndTaskEndCB;
+  MusicSettingsRst;
+  music_tempo= 2.480;
+  music_stacatto_factor= 0.902;
+  try {
+  while (!ScanKey) {
+	Play("3qBAeEEqAeAEDB2qG3F",
+		"$$RED$$You \0need \0help!\n\0 \0 \0 \0Po\0-o\0-o\0r \0dear.\n\0");
+	Play("BAeEEqAeAEDB2qG3F",
+		"You \0need \0help!\n\0 \0 \0 \0Po\0-o\0-o\0r \0dear.\n$$FG$$\0");
+	Play("4eFGqDetFEDeDEetADEC3G4GqD3G",
+		"Pat\0ron\0ize?  \0No, \0 \0thank \0you!\n\0 \0Too \0 \0man\0y \0strings \0a\0ttach\0ed.\n\0");
+	Play("4eFGqDetFEDeDEetADEC3G4GqD3G",
+		"Pat\0ron\0ize?  \0No, \0 \0thank \0you!\n\0 \0Too \0 \0man\0y \0strings \0a\0ttach\0ed.\n\0");
+  }
+  } catch
+    PutExcept;
+  Snd(0);
+}
+
+Song;
@@ -0,0 +1,30 @@
+//8 has words
+U0 Song()
+{
+  Fs->task_end_cb=&SndTaskEndCB;
+  MusicSettingsRst;
+  music_tempo= 3.966;
+  music_stacatto_factor= 0.902;
+  try {
+  while (!ScanKey) {
+	Play("3qABeCCqABAAR",
+		"What \0makes \0You \0 \0 \0think \0You're \0God?\n\0 \0");
+	Play("ABeCCqABAAR",
+		"What \0makes \0You \0 \0 \0think \0You're \0God?\n\0 \0");
+	Play("DeCCCCqCDCCR",
+		"Do \0You \0 \0think \0 \0 \0I'll \0app\0laud?\n\0 \0");
+	Play("ABeCCqABAAR",
+		"What \0makes \0You \0 \0 \0think \0You're \0God?\n\0 \0");
+	Play("GDGeGA2G3FqFeDRqB",
+		"$$RED$$Be\0-e-\0cause \0 \0 \0 \0I \0 \0a\0 \0m.\n\0");
+	Play("GDGeGA2G3FqFeDRqB",
+		"Are \0 \0you \0 \0 \0 \0a \0 \0fan?\n$$FG$$\0 \0 \0");
+	"$$GREEN$$(If God talks, how can you be sure it's not Him?\n"
+	"You can't, so harden not your heart.)\n$$FG$$";
+  }
+  } catch
+    PutExcept;
+  Snd(0);
+}
+
+Song;
@@ -0,0 +1,27 @@
+//7 has words
+U0 Song()
+{
+  CTask *task;
+  Fs->task_end_cb=&SndTaskEndCB;
+  music_tempo=2.5;
+  try {
+    task=PopUpViewStr("$LK,"BF:Luke,12:16"$\n");
+    TaskWait(task);
+    SetWinHorz(Fs->win_left,Fs->win_right,task);
+    SetWinVert(Fs->win_bottom+3,Fs->win_bottom+15,task);
+    while (!ScanKey) {
+      Play("3etGREqDDBRGCB",
+	    "It \0 \0de\0pends \0 \0on \0 \0the \0wea\0ther.\n\0");
+      Play("etGREqDDBRGCB",
+	    "If \0 \0we \0reach \0 \0the \0 \0end \0ev\0er.\n\0");
+      Play("2sG3E2G3EqGsGBGBqDsFCFCqBRsCBCB",
+	    "Hand \0 \0of \0 \0God, \0 \0just \0 \0might, \0 \0in\0 \0ter\0 \0cedes.\n\0 \0 \0 \0 \0 \0");
+      Play("2G3E2G3EqGsGBGBqDsFCFCqBRsCBCB",
+	    "If \0 \0it's \0 \0not \0 \0deemed \0 \0right, \0 \0won't \0 \0suc\0 \0ceed.\n\0 \0 \0 \0 \0 \0");
+    }
+  } catch
+    PutExcept;
+  Snd(0);
+}
+
+Song;
@@ -0,0 +1,24 @@
+//8 has words
+U0 Song()
+{
+  Fs->task_end_cb=&SndTaskEndCB;
+  MusicSettingsRst;
+  music_tempo= 2.480;
+  music_stacatto_factor= 0.902;
+  try {
+  while (!ScanKey) {
+	Play("M9/8");
+	Play("3hDeFhDeFhDC");
+	Play("FeDhFeDhFE");
+	Play("M4/4");
+	Play("qD2G3AeBFFE2qG3DA",
+		"Hold \0 \0on!\n\0 \0It's \0gon\0na \0be \0fine.\n\0 \0");
+	Play("D2G3AeBFFE2qG3DA",
+		"Hold \0 \0on!\n\0 \0It's \0gon\0na \0be \0fine.\n\0 \0");
+  }
+  } catch
+    PutExcept;
+  Snd(0);
+}
+
+Song;
@@ -0,0 +1,20 @@
+//7 has words
+U0 Song()
+{
+  Fs->task_end_cb=&SndTaskEndCB;
+  music_tempo=2.5;
+  try {
+  while (!ScanKey) {
+    Play("3sEAEAeFFsA2G3A2G3FGFGqCCBA",
+	"All \0 \0 \0 \0hell \0 \0breaks \0 \0 \0 \0loose.\n\0 \0 \0 \0I \0will \0get \0through.\n\0");
+    Play("sEAEAeFFsA2G3A2G3FGFGqCCBA",
+	"All \0 \0 \0 \0hell \0 \0breaks \0 \0 \0 \0loose.\n\0 \0 \0 \0I \0will \0get \0through.\n\0");
+    Play("ACeCCsBBBBqEsCCCCqAE");
+    Play("ACeCCsBBBBqEsCCCCqAE");
+  }
+  } catch
+    PutExcept;
+  Snd(0);
+}
+
+Song;
@@ -0,0 +1,26 @@
+//7 has words
+U0 Song()
+{
+  Fs->task_end_cb=&SndTaskEndCB;
+  MusicSettingsRst;
+  music_tempo= 2.480;
+  music_stacatto_factor= 0.902;
+  try {
+  while (!ScanKey) {
+	Play("M3/4");
+	Play("3eECqAAeECqAA",
+		"I \0hate \0you.\n\0 \0I \0hate \0you.\n\0 \0");
+	Play("eDCqAAeECqAR",
+		" \0 \0 \0 \0I \0hate \0you.\n\0 \0");
+	Play("M6/8");
+	Play("etABGqCsGEGEetGBDqCsCDCD",
+		"$$RED$$Don't \0 \0 \0smile.\n\0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0");
+	Play("etABGqCsGEGEetGBDqCsCDCD",
+		"Don't \0 \0 \0smile.$$FG$$\n\0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0");
+  }
+  } catch
+    PutExcept;
+  Snd(0);
+}
+
+Song;
@@ -0,0 +1,16 @@
+//7 has words
+U0 Song()
+{
+  Fs->task_end_cb=&SndTaskEndCB;
+  music_tempo=2.5;
+  while (TRUE) {
+    Play("et2G32G3Gq2G3qCq2G3sFAFAq2G3etGDAqA",
+      "Don't \0 \0need \0 \0help.  \0 \0Got \0 \0it \0 \0all \0figured \0 \0 \0out.\n\0");
+    Play("et2G32G3Gq2G3qCq2G3sFAFAq2G3etGDAqA",
+      "Don't \0 \0need \0 \0help.  \0 \0Got \0 \0it \0 \0all \0figured \0 \0 \0out.\n\0");
+    Play("etCCCq2G3qDeDFetCF2G3qBeGFsAGAG");
+    Play("etCCCq2G3qDeDFetCF2G3qBeGFsAGAG");
+  }
+}
+
+Song;
@@ -0,0 +1,24 @@
+//8 has words
+U0 Song()
+{
+  Fs->task_end_cb=&SndTaskEndCB;
+  MusicSettingsRst;
+  music_tempo= 2.480;
+  music_stacatto_factor= 0.902;
+  try {
+  while (!ScanKey) {
+	Play("3qAsDGDGqAsCACAeCBsFDFDetCGAsADAD",
+		" \0I\0mag\0 \0ine.\n\0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0");
+	Play("qAsDGDGqAsCACAeCBsFDFDetCGAsADAD",
+		" \0 \0Fa\0 \0thom.\n\0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0");
+	Play("GFGFEBEBeCB2qG3sFAFAqCEA",
+		"Hi-\0 \0i-\0gh \0as \0 \0your \0 \0thoughts \0will \0go.\n\0 \0 \0 \0 \0 \0 \0 \0");
+	Play("sGFGFEBEBeCB2qG3sFAFAqCEA",
+		"Deep \0 \0 \0as \0 \0 \0we \0 \0ought \0to \0know.\n\0 \0 \0 \0 \0 \0 \0 \0");
+  }
+  } catch
+    PutExcept;
+  Snd(0);
+}
+
+Song;
@@ -0,0 +1,20 @@
+//7 has words
+U0 Song()
+{
+  Fs->task_end_cb=&SndTaskEndCB;
+  music_tempo=2.5;
+  try {
+  while (!ScanKey) {
+	Play("2qG3sDADAeF2G3etFDCBA2G3qAetGFC2eG3E",
+		" \0Let's \0 \0try.  \0 \0 \0 \0O\0oh\0 \0h.  \0 \0 \0 \0Didn't \0 \0 \0work.\n\0 \0");
+	Play("2qG3sDADAeF2G3etFDCBA2G3qAetGFC2eG3E",
+		" \0Let's \0 \0try.  \0 \0 \0 \0O\0oh\0 \0h.  \0 \0 \0 \0Didn't \0 \0 \0work.\n\0 \0");
+	Play("sA2G3A2G3eBCsE2G3E2G3qGsFEFEDBDBeAG2etG3B2G");
+	Play("3sA2G3A2G3eBCsE2G3E2G3qGsFEFEDBDBeAG2etG3B2G");
+  }
+  } catch
+    PutExcept;
+  Snd(0);
+}
+
+Song;
@@ -0,0 +1,22 @@
+//8 has words
+U0 Song()
+{
+  Fs->task_end_cb=&SndTaskEndCB;
+  MusicSettingsRst;
+  music_tempo= 2.480;
+  music_stacatto_factor= 0.902;
+  try {
+  while (!ScanKey) {
+	"$$GREEN$$To God...$$FG$$\n";
+	Play("M5/4");
+	Play("3eEqCeEFEDCqBeEqCeEFEDCqB",
+		"Fa\0ther, \0for\0give \0them \0if \0you \0must.\n\0I'd \0like \0to \0see \0them \0turn \0to \0dust.\n\0");
+	Play("M4/4");
+	Play("sGBGBetAF2G3eEFsEGEGqDsBDBDGFGF2etG3GB");
+  }
+  } catch
+    PutExcept;
+  Snd(0);
+}
+
+Song;
@@ -0,0 +1,40 @@
+//7 has words
+U0 Song()
+{
+  CTask *task;
+  Fs->task_end_cb=&SndTaskEndCB;
+  MusicSettingsRst;
+  music_tempo= 2.500;
+  music_stacatto_factor= 0.900;
+  try {
+    task=PopUpViewStr(
+	  "$$WW+H,1$$You get what you pray for.  "
+	  "Most people are fools like King Midas.  People have laughable notions of Heaven.  "
+	  "You'd be surprised -- I can't imagine things being much better than Earth "
+	  "because we need a sense of purpose.  "
+	  "Don't ask for stuff, let God pick, but He might get annoyed at that.  "
+	  "God wants us to be happy.  He tries hard.  If you do get what you pray for, you damn "
+	  "well better be happy, lil' sonfabitch!\n\n"
+	  "$LK,"Ecclesiastes,3:13",A="BF:Ecclesiastes,3:13"$\n"
+	  "$LK,"John,16:24",A="BF:John,16:24"$\n"
+	  );
+    TaskWait(task);
+    SetWinHorz(Fs->win_left,Fs->win_right,task);
+    SetWinVert(Fs->win_bottom+3,Fs->win_bottom+15,task);
+    DocRecalc(DocPut(task)); //Reformat word-wrap with new window size.
+    while (!ScanKey) {
+      Play("3qBeCDqCAetAACeECsF2G3F2GqG",
+	    "I'm \0on \0a \0mis\0sion \0from \0 \0 \0my \0 \0God.\n\0 \0 \0 \0 \0");
+      Play("3BeCDqCAetAACeECsF2G3F2GqG",
+	    "I'm \0on \0a \0mis\0sion \0from \0 \0 \0my \0 \0God.\n\0 \0 \0 \0 \0");
+      Play("3etEDDDGABG2GeG3E2G3GqF2G3etGCD",
+	    "He \0 \0 \0told \0 \0 \0me \0 \0 \0 \0to \0 \0be \0hap\0py.\n\0 \0 \0 \0");
+      Play("EDDDGABG2GeG3E2G3GqF2G3etGCD",
+	    "He \0 \0 \0said \0 \0 \0to \0 \0 \0 \0make \0 \0it \0snap\0py.\n\0 \0 \0 \0");
+    }
+  } catch
+    PutExcept;
+  Snd(0);
+}
+
+Song;
@@ -0,0 +1,40 @@
+//9 has graphics
+
+
+U0 DrawIt(CTask *task,CDC *dc)
+{
+  I64 i,cx=0.85*task->pix_width,cy=task->pix_height+10;
+  dc->pen_width=5;
+  for (i=2;i<=7;i++) {
+    dc->color=gr_rainbow_10[9-i];
+    GrCircle3(dc,cx,cy,0,(i+5)*5);
+  }
+}
+
+U0 Song()
+{
+  SettingsPush; //See $LK,"SettingsPush",A="MN:SettingsPush"$
+  Fs->text_attr=LTCYAN<<4+BLACK;
+  Fs->draw_it=&DrawIt;
+  Fs->task_end_cb=&SndTaskEndCB;
+
+  music_tempo=2.5;
+  try {
+    while (!ScanKey) {
+      DocClear;
+      "$$BG,LTCYAN$$$$BLACK$$";
+      Play("3eEDsBABA2qG3etGECFDBECFCBReBE",
+	  "Come \0and \0sing \0 \0a\0 \0long.  \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0\n\0 \0 \0 \0");
+      Play("EDsBABA2qG3etGECFDBECFCBReBE",
+	  "Of\0fer \0praise \0 \0to \0 \0God.  \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0\n\0 \0 \0 \0");
+      Play("qBeDF2qG3eFRqBetFFGeACDF",
+	  "Up \0in \0His \0hea\0ven \0 \0He \0is \0 \0 \0glor\0i\0ous.\n\0 \0");
+      Play("qBeDF2qG3eFRqBetFFGeACDF",
+	  "Break \0in\0to \0song.  \0 \0 \0Strike-\0up \0 \0 \0the \0chor\0us.\n\0 \0");
+    }
+  } catch
+    PutExcept;
+  SettingsPop;
+}
+
+Song;
@@ -0,0 +1,63 @@
+//8 has graphics
+
+U0 DrawIt(CTask *,CDC *dc)
+{
+  I64 i;
+  F64 dt=Beat%8.0,z,w,x1,y1,z1,x2,y2,z2;
+  Bool first=TRUE;
+  DCAllocDepthBuf(dc);
+  dc->flags|=DCF_TRANSFORMATION;
+  dc->x=30*dt+20.0*Sin(dt)+25;
+  dc->y=10*dt-15;
+  dc->z=GR_Z_ALL;
+  GrRotXEqu(dc->r,0.75*dt);
+  GrRotYEqu(dc->r,0.45*dt);
+  GrRotZEqu(dc->r,0.50*dt);
+  GrScaleEqu(dc->r,0.5);
+  for (i=-50;i<40;i+=2) {
+    if (i&2)
+      dc->color=LTGRAY;
+    else
+      dc->color=DKGRAY;
+    z=10*Cos(i/10.0*ã/8.0)*Cos(dt);
+    w=Tri(100+i,200);
+    x1=i-3;y1=0;z1=z;
+    if (-30<=i<=40) {
+      GrLine3(dc,i,-10*w,z,i-3,0,z);
+      GrLine3(dc,i,+10*w,z,i-3,0,z);
+    }
+    if (!first) {
+      dc->color=DKGRAY;
+      GrLine3(dc,x1,y1,z1,x2,y2,z2);
+    }
+    x2=x1;y2=y1;z2=z1;
+    first=FALSE;
+  }
+}
+
+U0 Song()
+{
+  SettingsPush; //See $LK,"SettingsPush",A="MN:SettingsPush"$
+  Fs->text_attr=LTCYAN<<4+BLACK;
+  Fs->draw_it=&DrawIt;
+  Fs->task_end_cb=&SndTaskEndCB;
+  MusicSettingsRst;
+  music_tempo= 2.480;
+  music_stacatto_factor= 0.902;
+  try {
+    "$$BG+H,LTCYAN$$";
+    while (!ScanKey) {
+	Play("3qEAAetF2G3GqDFetFED2eG3G",
+		"A\0dam... \0 \0no \0 \0 \0long\0er \0sees \0Your \0face.\n\0 \0 \0");
+	Play("qEAAetF2G3GqDFetFED2eG3G",
+		"Oh! \0 \0 \0What \0 \0a \0wretch\0ed \0bar\0ren \0waste!\n\0 \0 \0");
+	Play("qACFeBCB2GqG3ED",
+		" \0 \0 \0 \0 \0 \0 \0 \0Ex\0iled.\n\0");
+	Play("ACFeBCB2GqG3ED");
+    }
+  } catch
+    PutExcept;
+  SettingsPop;
+}
+
+Song;
@@ -0,0 +1,20 @@
+//7 no nothing
+U0 Song()
+{
+  Fs->task_end_cb=&SndTaskEndCB;
+  MusicSettingsRst;
+  music_tempo= 2.480;
+  music_stacatto_factor= 0.902;
+  try {
+  while (!ScanKey) {
+	Play("3e.C2sG3qEe.FsBeCCsFGeBAAetAREeEsCB");
+	Play("e.C2sG3qEe.FsBeCCsFGeBAAetAREeEsCB");
+	Play("eGE2qG3sCDCDe.EsGqCsDCDCe.AsReGE");
+	Play("GE2qG3sCDCDe.EsGqCsDCDCe.AsReGE");
+  }
+  } catch
+    PutExcept;
+  Snd(0);
+}
+
+Song;
@@ -0,0 +1,34 @@
+//7 has words
+U0 Song()
+{
+  CTask *task;
+  Fs->task_end_cb=&SndTaskEndCB;
+  music_tempo=2.5;
+  try {
+    task=PopUpViewStr(
+	  "$LK,"BF:Luke,7:42"$\n"
+	  "\n"
+	  "Prodigal Son\n"
+	  "$LK,"BF:Luke,15:21"$\n"
+	  );
+    TaskWait(task);
+    SetWinHorz(Fs->win_left,Fs->win_right,task);
+    SetWinVert(Fs->win_bottom+3,Fs->win_bottom+15,task);
+    "$$WW+H,1$$";
+    while (!ScanKey) {
+      Play("3qGGsEAEAqAsF2G3F2G3qCeEFqD",
+	    "Life, \0life, \0isn't \0 \0 \0 \0fair.  \0Isn't \0 \0 \0 \0fair.\n\0 \0 \0 \0");
+      Play("GGsEAEAqAsF2G3F2G3qCeEFqD",
+	    "Waaa, \0waaa, \0isn't \0 \0 \0 \0fair.  \0Isn't \0 \0 \0 \0fair.\n\0 \0 \0 \0");
+      Play("eFCqEBDBE2eG3EsFEFE",
+	    " \0 \0I \0 \0ne\0ver \0sin.\n\0 \0 \0 \0 \0 \0 \0");
+      Play("eFCqEBDBE2eG3EsFEFE",
+	    " \0 \0I \0 \0ne\0ver \0win.\n\0 \0 \0 \0 \0 \0 \0");
+      "$$GREEN$$(A warning on presumption. 'Who loves more man -- forgiven big debt or little?'  See prodigal son.)$$FG$$\n";
+    }
+  } catch
+    PutExcept;
+  Snd(0);
+}
+
+Song;
@@ -0,0 +1,25 @@
+//7 has words
+U0 Song()
+{
+  Fs->task_end_cb=&SndTaskEndCB;
+  MusicSettingsRst;
+  music_tempo= 2.480;
+  music_stacatto_factor= 0.857;
+  try {
+  while (!ScanKey) {
+	Play("3eEDEFqDDeEDEDqCC",
+		"$$CL$$Sit\0ting \0in \0a \0church\n\0 \0wond\0ering \0to \0my\0self,\n\0 \0");
+	Play("eD2G3BCqDsGGGGeD2G3BCqDsGGGG",
+		"\"Is \0 \0God \0 \0real?\"\n\0 \0 \0 \0 \0\"At \0 \0the \0 \0wheel?\"\n\0 \0 \0 \0 \0");
+	"$$GREEN$$God talking...\n$$FG$$";
+	Play("qFFFetREAqGsGFGFGEGEqC",
+		"$$RED$$Oh, \0Hell \0yes!\n\0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0");
+	Play("FFFetREAqGsGFGFGEGEqC",
+		"Pass \0the \0test.$$FG$$\n\0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0");
+  }
+  } catch
+    PutExcept;
+  Snd(0);
+}
+
+Song;
@@ -0,0 +1,20 @@
+//7 no nothing
+U0 Song()
+{
+  Fs->task_end_cb=&SndTaskEndCB;
+  MusicSettingsRst;
+  music_tempo= 2.480;
+  music_stacatto_factor= 0.758;
+  try {
+  while (!ScanKey) {
+	Play("3sDDeBCsAAeB2G3A2F3sCCeDsFFeEsFFEEeDE");
+	Play("sDDeBCsAAeB2G3A2F3sCCeDsFFeEsFFEEeDE");
+	Play("sGBGB2etG3EGqFED2G3eBADG");
+	Play("sGBGB2etG3EGqFED2G3eBADG");
+  }
+  } catch
+    PutExcept;
+  Snd(0);
+}
+
+Song;
@@ -0,0 +1,22 @@
+//7 has words
+U0 Song()
+{
+  Fs->task_end_cb=&SndTaskEndCB;
+  MusicSettingsRst;
+  music_tempo= 2.480;
+  music_stacatto_factor= 0.714;
+  try {
+  while (!ScanKey) {
+	Play("3sBBBBEBDBeEBqDeBBEDEBqD",
+		" \0 \0 \0 \0Had \0 \0a \0 \0pass\0ing \0thought.\n\0 \0 \0Not \0a \0thought \0I \0ought.\n\0");
+	Play("sFEFEeFEDBqDeEFEBABqD",
+		"Can't \0 \0 \0 \0clear \0my \0head \0of \0thought.\n\0In \0this \0trap \0my \0mind \0is \0caught.\n\0");
+	Play("eDGqEeBAABqFeBDqEA");
+	Play("eDGqEeBAABqFeBDqEA");
+  }
+  } catch
+    PutExcept;
+  Snd(0);
+}
+
+Song;
@@ -0,0 +1,24 @@
+//7 has words
+U0 Song()
+{
+  Fs->task_end_cb=&SndTaskEndCB;
+  MusicSettingsRst;
+  music_tempo= 1.930;
+  music_stacatto_factor= 0.604;
+  try {
+  while (!ScanKey) {
+	Play("3sEqAsDeCqAsEqAsDeCqAsDeEqEsE",
+		"Jes\0us \0kind \0of \0freaks,\n\0Jes\0us \0kind \0of \0freaks,\n\0are \0dif\0ferent \0 \0");
+	Play("eDqCsDeCqBsBeBqAetBEDqBeCB",
+		"from \0 \0oth\0er\n\0 \0 \0peo\0ple.\n\0 \0 \0 \0 \0They \0don't \0");
+	Play("2qGeG3FsCDCDqFetBACBEDqBeCB",
+		"care,\n\0for \0God \0 \0is \0their \0 \0joy!\n\0 \0 \0 \0 \0 \0 \0 \0They \0don't \0");
+	Play("2qGeG3FsCDCDqFetBAC",
+		"care,\n\0for \0God \0 \0is \0their \0 \0joy!\n\0 \0 \0 \0");
+  }
+  } catch
+    PutExcept;
+  Snd(0);
+}
+
+Song;
@@ -0,0 +1,167 @@
+//8 has graphics
+
+class CBubble
+{
+  CBubble *next,*last;
+  F64 x,y,dx,dy,radius,t0;
+} root;
+
+F64 t0,x,y;
+U64 flags;
+
+F64 Windé()
+{
+  F64 t=ã*(Beat-t0);
+  return Arg(Sin(t/8),1.0+Sin(t/4));
+}
+
+U0 DrawIt(CTask *,CDC *dc)
+{
+  CBubble *tempb;
+  F64 é;
+  I64 r,x1,y1,z1,x2,y2,z2;
+
+  if (LBts(&flags,0))
+    return;
+
+  dc->flags|=DCF_TRANSFORMATION;
+  GrRotXEqu(dc->r,ã/4);
+
+  é=Wrap(ã-Windé);
+  GrRotZEqu(dc->r,-ã/2+é/10);
+
+  dc->color=BLUE;
+  dc->x=x;
+  dc->y=y;
+  dc->pen_width=2;
+  GrCircle3(dc,0,0,0,10);
+  GrLine3(dc,-10,0,0,-30,0,0);
+
+  tempb=root.last;
+  if (tempb!=&root) {
+    dc->color=LTBLUE;
+    r=tempb->radius*Min(1.0,0.25+2*(Beat-tempb->t0));
+    for (é=0;é<2*ã;é+=ã/2) {
+      x1=10*Cos(é);y1=10*Sin(é);z1=0;
+      GrTransform(dc,&x1,&y1,&z1);
+
+      x2=r*Cos(é);y2=r*Sin(é);z2=0;
+      GrTransform(dc,&x2,&y2,&z2);
+
+      GrLine(dc,x1,y1,tempb->x-x+x2,tempb->y-y+y2);
+    }
+    GrCircle(dc,tempb->x,tempb->y,r);
+    tempb=tempb->last;
+  }
+  while (tempb!=&root) {
+    dc->color=LTBLUE;
+    GrCircle(dc,tempb->x,tempb->y,tempb->radius);
+    dc->color=LTGRAY;
+    GrCircle(dc,tempb->x+0.65*tempb->radius*Cos(5*ã/8),
+		tempb->y-0.65*tempb->radius*Sin(5*ã/8),1.0+0.2*tempb->radius);
+    tempb=tempb->last;
+  }
+  LBtr(&flags,0);
+}
+
+U0 AnimateTask(I64)
+{ //Preemption is off after Spawn
+  CTask *task=Fs->parent_task;
+  CBubble *tempb,*tempb1;
+  F64 t_last=Beat,dt,tSpawn=0,é;
+
+  while (TRUE) {
+    dt=Beat-t_last;
+    t_last=Beat;
+
+
+    x+=2*Sin(Beat/3)*dt;
+    y+=2*Sin(Beat/2)*dt;
+
+    while (LBts(&flags,0))
+      Yield;
+
+    tSpawn+=dt;
+    while (tSpawn>1.0) {
+      tempb=MAlloc(sizeof(CBubble));
+      tempb->x=x;
+      tempb->y=y;
+      tempb->dx=0;
+      tempb->dy=0;
+      tempb->radius=Rand*6+4;
+      tempb->t0=Beat;
+      QueIns(tempb,root.last);
+      tSpawn-=Rand;
+    }
+
+    é=Windé;
+    tempb=root.next;
+    while (tempb!=&root) {
+      tempb1=tempb->next;
+
+      tempb->dx+=25*dt*(Rand-0.5);
+      tempb->dy+=25*dt*(Rand-0.5);
+      tempb->x += dt*(20*Cos(é)+tempb->dx);
+      tempb->y +=-dt*(20*Sin(é)+tempb->dy);
+
+      if (!(0<=tempb->x<task->pix_width) ||
+	  !(0<=tempb->y<task->pix_height) ) {
+	QueRem(tempb);
+	Free(tempb);
+      }
+
+      tempb=tempb1;
+    }
+
+    LBtr(&flags,0);
+    Sleep(20);
+  }
+}
+
+U0 Init()
+{
+  flags=0;
+  QueInit(&root);
+  t0=Beat;
+  x=360; y=52;
+}
+
+U0 CleanUp()
+{
+  QueDel(&root);
+}
+
+U0 Song()
+{
+  CTask *task;
+  SettingsPush; //See $LK,"SettingsPush",A="MN:SettingsPush"$
+  Preempt(OFF);
+  Init;
+  Fs->animate_task=Spawn(&AnimateTask,NULL,"Animate",,Fs);
+  Fs->draw_it=&DrawIt;
+  Fs->task_end_cb=&SndTaskEndCB;
+  MusicSettingsRst;
+  music_tempo= 2.480;
+  music_stacatto_factor= 0.902;
+  try {
+    task=PopUpViewStr("$LK,"Romans,8:28",A="BF:Romans,8:28"$\n");
+    TaskWait(task);
+    SetWinHorz(Fs->win_left,Fs->win_right,task);
+    SetWinVert(Fs->win_bottom+3,Fs->win_bottom+15,task);
+    while (!ScanKey) {
+      Play("3qEEBeBDsBBBBqDsBFBFD2G3D2G",
+	    "Free \0will... \0 \0 \0 \0 \0 \0 \0 \0 \0I \0 \0 \0 \0fail.\n\0 \0 \0 \0");
+      Play("3qEEBeBDsBBBBqDsBFBFD2G3D2G",
+	    "God \0still... \0 \0 \0 \0 \0 \0 \0 \0 \0I \0 \0 \0 \0hail.\n\0 \0 \0 \0");
+      Play("3qD2G3eA2G3qCetECAqBsACACqA",
+	    "All \0things \0work \0for \0good... \0to \0the \0Lord.\n\0 \0 \0 \0 \0 \0 \0");
+      Play("D2G3eA2G3qCetECAqBsACACqA",
+	    "It's \0all \0good... \0 \0 \0as\0 \0sured.\n\0 \0 \0 \0 \0 \0 \0");
+    }
+  } catch
+    PutExcept;
+  SettingsPop;
+  CleanUp;
+}
+
+Song;
@@ -0,0 +1,24 @@
+//7 has words
+U0 Song()
+{
+  Fs->task_end_cb=&SndTaskEndCB;
+  MusicSettingsRst;
+  music_tempo= 2.480;
+  music_stacatto_factor= 0.902;
+  try {
+  while (!ScanKey) {
+	Play("3qAeCDqEAeCDECDECsCC",
+		"I \0don't \0 \0know.\n\0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0");
+	Play("qAeCDqEAeCDECDECsCC",
+		"Let's \0go \0 \0slow.\n\0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0");
+	Play("eDAGAqDsECECCBCBeAFsDCeGDE",
+		"You \0 \0say \0 \0that, \0God?\n\0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0");
+	Play("DAGAqDsECECCBCBeAFsDCeGDE",
+		"It \0 \0sounds \0 \0odd.\n\0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0");
+  }
+  } catch
+    PutExcept;
+  Snd(0);
+}
+
+Song;
@@ -0,0 +1,20 @@
+//7 no nothing
+U0 Song()
+{
+  Fs->task_end_cb=&SndTaskEndCB;
+  MusicSettingsRst;
+  music_tempo= 2.480;
+  music_stacatto_factor= 0.758;
+  try {
+  while (!ScanKey) {
+	Play("3qBeABqA2G3AB2hG");
+	Play("3sCCCCqBsAAAA2qG3sCCCCqE2GR");
+	Play("3sBDBDA2G3A2G3etAAEsGCGCetFFEqDFeE2G");
+	Play("3sBDBDA2G3A2G3etAAEsGCGCetFFEqDFeE2G");
+  }
+  } catch
+    PutExcept;
+  Snd(0);
+}
+
+Song;
@@ -0,0 +1,32 @@
+//7 has words
+U0 Song()
+{
+  CTask *task;
+  Fs->task_end_cb=&SndTaskEndCB;
+  music_tempo=2.5;
+  try {
+    task=PopUpViewStr(
+	  "Asking God for stuff is like knocking on the door\n"
+	  "of a neighbor in the middle of the night.\n"
+	  "It's annoying!  We're supposed to love God!\n"
+	  "$LK,"BF:Luke,11:5"$\n"
+	  );
+    TaskWait(task);
+    SetWinHorz(Fs->win_left,Fs->win_right,task);
+    SetWinVert(Fs->win_bottom+3,Fs->win_bottom+15,task);
+    while (!ScanKey) {
+      Play("3qBBE2GG3FFC",
+	    "We \0are \0in \0the \0image \0of \0God.\n\0 \0");
+      Play("BBE2GG3FFC",
+	    "Some \0people's \0prayer \0is \0ver\0y \0odd.\n\0 \0");
+      Play("eGDqCB2G3eGEqEC2G",
+	    "They \0don't \0love \0Him.\n\0 \0They \0love \0their \0neigh\0bor.\n\0");
+      Play("3eGDqCB2G3eGEqEC2G",
+	    "Pest\0er\0ing \0Him.\n\0 \0Ask\0ing \0for \0fav\0ors.\n\0");
+    }
+  } catch
+    PutExcept;
+  Snd(0);
+}
+
+Song;
@@ -0,0 +1,28 @@
+//8 has words
+U0 Song()
+{
+  CTask *task;
+  Fs->task_end_cb=&SndTaskEndCB;
+  try {
+    task=PopUpViewStr("$LK,"BF:Matthew,19:16"$\n");
+    TaskWait(task);
+    SetWinHorz(Fs->win_left,Fs->win_right,task);
+    SetWinVert(Fs->win_bottom+3,Fs->win_bottom+15,task);
+    "$$WW+H,1$$";
+    while (!ScanKey) {
+      Play("3eGAetCCCFFDqAeAAFAAFqG",
+	    "I \0 \0have \0 \0 \0kept \0 \0 \0 \0 \0 \0the \0 \0 \0com\0mands.\n\0");
+      Play("eGAetCCCFFDqAeAAFAAFqG",
+	    "I \0 \0have \0 \0 \0kept \0 \0 \0 \0 \0 \0the \0 \0 \0com\0mands.\n\0");
+      Play("EeEGqEeEEqDBetCCGqC",
+	    "What \0 \0 \0else \0 \0 \0must \0I \0do?\n\0 \0 \0 \0");
+      Play("EeEGqEeEEqDBetCCGqC",
+	    "What \0 \0 \0else \0 \0 \0must \0I \0do?\n\0 \0 \0 \0");
+      "$$GREEN$$(Christ said sell all and follow me.)\n$$FG$$";
+    }
+  } catch
+    PutExcept;
+  Snd(0);
+}
+
+Song;
@@ -0,0 +1,29 @@
+//7 has words
+U0 Song()
+{
+  Fs->task_end_cb=&SndTaskEndCB;
+  MusicSettingsRst;
+  music_tempo= 2.480;
+  music_stacatto_factor= 0.902;
+  try {
+  while (!ScanKey) {
+	Play("M4/4");
+	Play("3qBsEGeBDe.AsCeA2qF3sBBeACBBsBB",
+		"I \0could \0 \0 \0die.\n\0 \0 \0 \0 \0 \0 \0 \0Could \0I \0kill?\n\0 \0 \0");
+	Play("qBsEGeBDe.AsCeA2qF3sBBeACBBsBB",
+		"I'm \0not \0 \0 \0spry.\n\0 \0 \0 \0 \0 \0 \0 \0I \0best \0chill.\n\0 \0 \0");
+	Play("eDDsGFGFeEBqGM5/4",
+		"If \0 \0God \0 \0 \0 \0 \0 \0ask,\n\0");
+	Play("eBGF4A3e.FsEqAAM4/4",
+		" \0\"$$RED$$Can \0 \0 \0you \0 \0Kill?$$FG$$\"\n\0 \0");
+	Play("eDDsGFGFeEBqGM5/4",
+		"I \0 \0think, \0 \0 \0 \0 \0 \0\"Yeah.\"\n\0");
+	Play("eBGF4A3e.FsEqAA",
+		" \0\"Right \0 \0 \0my \0 \0will.\"\n\0 \0");
+  }
+  } catch
+    PutExcept;
+  Snd(0);
+}
+
+Song;
@@ -0,0 +1,20 @@
+//7 no nothing
+U0 Song()
+{
+  Fs->task_end_cb=&SndTaskEndCB;
+  MusicSettingsRst;
+  music_tempo= 2.480;
+  music_stacatto_factor= 0.902;
+  try {
+  while (!ScanKey) {
+	Play("3qCeBGqFD2G3eBsBGe.AsEeAG");
+	Play("qCeBGqFD2G3eBsBGe.AsEeAG");
+	Play("CCDqBsCRDBDB2eG3FCFqBsCCDD");
+	Play("qCeDqBsCRDBDB2eG3FCFqBsCCDD");
+  }
+  } catch
+    PutExcept;
+  Snd(0);
+}
+
+Song;
@@ -0,0 +1,59 @@
+//8 no nothing
+U0 Song()
+{
+  Fs->task_end_cb=&SndTaskEndCB;
+  MusicSettingsRst;
+  music_tempo= 2.976;
+  music_stacatto_factor= 0.538;
+  try {
+  while (!ScanKey) {
+	Play("3qEDCDeEEqEeDDqD");
+	Play("EDCDeEEqEeDDqD");
+	Play("eDAsFDFDqFsFBFB2qG3etBBBqFC");
+	Play("eDAsFDFDqFsFBFB2qG3etBBBqFC");
+  }
+  } catch
+    PutExcept;
+  Snd(0);
+}
+ 
+Song;
+ 
+ 
+ 
+ 
+ 
+ 
+ 
+ 
+ 
+ 
+ 
+ 
+ 
+ 
+ 
+ 
+ 
+ 
+ 
+ 
+ 
+ 
+ 
+ 
+ 
+ 
+ 
+ 
+ 
+ 
+ 
+ 
+ 
+ 
+ 
+ 
+ 
+ 
+ 
@@ -0,0 +1,52 @@
+//8 has graphics
+
+U0 DrawIt(CTask *task,CDC *dc)
+{
+  F64 x1,x2,y1,y2,x3,y3,radius,pedals,é,t=Beat,
+    cx=335,cy=task->pix_height>>1;
+  Bool first=TRUE;
+
+  radius=cy*(1.0+Sin(2*ã*t));
+  pedals=8;
+
+  dc->color=BLACK;
+  for (é=0;é<2*ã;é+=2*ã/100) {
+    P2R(&x2,&y2,radius*Abs(Sin(pedals/2*é))+5,é+t);
+    if (!first)
+      GrLine(dc,x1+cx,cy-y1,x2+cx,cy-y2);
+    else {
+      first=FALSE;
+      x3=x2; y3=y2;
+    }
+    x1=x2; y1=y2;
+  }
+  GrLine(dc,x1+cx,cy-y1,x3+cx,cy-y3);
+
+  dc->color=(2*t)%16;
+  GrFloodFill(dc,cx,cy);
+}
+
+U0 Song()
+{
+  SettingsPush; //See $LK,"SettingsPush",A="MN:SettingsPush"$
+  Fs->draw_it=&DrawIt;
+  Fs->task_end_cb=&SndTaskEndCB;
+
+  music_tempo=2.5;
+  try {
+    while (TRUE) {
+      Play("qBq2G3sGAGAetCBBqAq2G3sBBBBeFE",
+      "I \0am \0feeling \0 \0 \0 \0 \0 \0brave.\n\0");
+      Play("qBq2G3sGAGAetCBBqAq2G3sBBBBeFE",
+      "I \0am \0feeling \0 \0 \0 \0 \0 \0brave.\n\0");
+      Play("qCsDEDEq2G3qDqBqAqGq2G3",
+      "Test \0me \0 \0 \0 \0Lord. \0See \0if \0I'm \0wor\0thy.\n\0");
+      Play("qCsDEDEq2G3qDqBqAqGq2G3",
+      "Test \0me \0 \0 \0 \0Lord. \0See \0if \0I'm \0wor\0thy.\n\0");
+    }
+  } catch
+    PutExcept;
+  SettingsPop;
+}
+
+Song;
@@ -0,0 +1,23 @@
+//7 has words
+U0 Song()
+{
+  Fs->task_end_cb=&SndTaskEndCB;
+  music_tempo=2.5;
+  try {
+  "$$WW+H,1$$";
+  while (!ScanKey) {
+	Play("3qAAsG2G3G2G3qGF2eG3FqEetCBA",
+		"Let's \0ask \0Mike\0 \0 \0 \0y;  \0Hates \0 \0every\0thing.\n\0 \0 \0 \0");
+	Play("qAAsG2G3G2G3qGF2eG3FqEetCBA",
+		"Let's \0ask \0Mike\0 \0 \0 \0y;  \0Hates \0 \0every\0thing.\n\0 \0 \0 \0");
+	Play("2eG3GqE2eG3FqF2sG3G2G3GqAetGEBqD",
+		"What \0do \0YOU \0 \0 \0know.  \0 \0 \0 \0 \0 \0It's \0 \0kosh\0er!\n\0");
+	Play("2eG3GqE2eG3FqF2sG3G2G3GqAetGEBqD",
+		"What \0do \0YOU \0 \0 \0know.  \0 \0 \0 \0 \0 \0It's \0 \0kosh\0er!\n\0");
+  }
+  } catch
+    PutExcept;
+  Snd(0);
+}
+
+Song;
@@ -0,0 +1,20 @@
+//9 no nothing
+U0 Song()
+{
+  Fs->task_end_cb=&SndTaskEndCB;
+  MusicSettingsRst;
+  music_tempo= 2.480;
+  music_stacatto_factor= 0.902;
+  try {
+  while (!ScanKey) {
+	Play("3sCGCGetADD2sG3G2G3GFAFADDDDqGsB2G3B2G3qG");
+	Play("sCGCGetADD2sG3G2G3GFAFADDDDqGsB2G3B2G3qG");
+	Play("eG2G3qEeAsA2G3qAsEAEADEDEqFeA2G");
+	Play("3G2G3qEeAsA2G3qAsEAEADEDEqFeA2G");
+  }
+  } catch
+    PutExcept;
+  Snd(0);
+}
+
+Song;
@@ -0,0 +1,20 @@
+//8 has words
+U0 Song()
+{
+  Fs->task_end_cb=&SndTaskEndCB;
+  music_tempo=2.5;
+  try {
+  while (!ScanKey) {
+	Play("2eG3DGDqGetA2G3B2qG3GCE",
+	" \0 \0 \0 \0 \0 \0 \0 \0 \0It's \0ko\0sher.\n\0");
+	Play("2eG3DGDqGetA2G3B2qG3GCE",
+	" \0 \0 \0 \0 \0 \0 \0 \0 \0It's \0ko\0sher.\n\0");
+	Play("C2G3sGFGFDCDCetE2G3CGFAqDeFC");
+	Play("qC2G3sGFGFDCDCetE2G3CGFAqDeFC");
+  }
+  } catch
+    PutExcept;
+  Snd(0);
+}
+
+Song;
@@ -0,0 +1,22 @@
+//8 has words
+U0 Song()
+{
+  Fs->task_end_cb=&SndTaskEndCB;
+  music_tempo=2.5;
+  try {
+  while (!ScanKey) {
+	Play("qRsR2GRGeGR3qA2etG3EEqEeDCB2G",
+		" \0 \0He \0 \0is \0 \0 \0our \0 \0 \0 \0per\0son\0al \0sav\0ior.\n\0");
+	Play("qRsRGRGeGR3qA2etG3EEqEeDCB2G",
+		" \0 \0We \0 \0can \0ne\0 \0ver \0 \0 \0 \0re\0turn \0the \0fav\0or.\n\0");
+	Play("3CBBGsF2G3F2G3qBsBBBB2eG3AetBBGeBF",
+		" \0 \0 \0That's \0 \0O.\0 \0K. \0 \0 \0 \0 \0 \0 \0 \0works \0 \0 \0for \0me.\n\0");
+	Play("CBBGsF2G3F2G3qBsBBBB2eG3AetBBGeBF",
+		" \0 \0 \0That's \0 \0O.\0 \0K. \0 \0 \0 \0 \0 \0It's \0 \0works \0 \0 \0for \0me.\n\0");
+  }
+  } catch
+    PutExcept;
+  Snd(0);
+}
+
+Song;
@@ -0,0 +1,20 @@
+//7 no nothing
+U0 Song()
+{
+  Fs->task_end_cb=&SndTaskEndCB;
+  MusicSettingsRst;
+  music_tempo= 2.480;
+  music_stacatto_factor= 0.780;
+  try {
+  while (!ScanKey) {
+	Play("3eCDBCA2FFF3C2F3E2F3A2F3sEEeD");
+	Play("F2FFF3qCeF2F3F2FFF3qCeF2F");
+	Play("3qGsEAEAqBetDCF2qG3DsGDGDetCRC");
+	Play("qGsEAEAqBetDCF2qG3DsGDGDetCRC");
+  }
+  } catch
+    PutExcept;
+  Snd(0);
+}
+
+Song;
@@ -0,0 +1,24 @@
+//7 has words
+U0 Song()
+{
+  Fs->task_end_cb=&SndTaskEndCB;
+  MusicSettingsRst;
+  music_tempo= 2.480;
+  music_stacatto_factor= 0.902;
+  try {
+  while (!ScanKey) {
+	Play("3qGsARARCBCBeACACGCGBAsEA",
+		"I'm \0mak\0 \0ing \0 \0some\0 \0thing \0 \0 \0 \0 \0 \0for \0 \0God.\n\0 \0 \0 \0 \0");
+	Play("qGsARARCBCBeACACGCGBAsEA",
+		"I'm \0mak\0 \0ing \0 \0some\0 \0thing \0 \0 \0 \0 \0 \0for \0 \0God.\n\0 \0 \0 \0 \0");
+	Play("eAsCEqEsDECEqAsDACAeAGFsBDeCB",
+		" \0 \0 \0I \0hope \0 \0He \0 \0 \0likes \0 \0it.\n\0 \0 \0 \0 \0 \0 \0 \0 \0");
+	Play("AsCEqEsDECEqAsDACAeAGFsBDeCB",
+		" \0 \0 \0I \0hope \0 \0He \0 \0 \0likes \0 \0it.\n\0 \0 \0 \0 \0 \0 \0 \0 \0");
+  }
+  } catch
+    PutExcept;
+  Snd(0);
+}
+
+Song;
@@ -0,0 +1,16 @@
+//8 has words
+U0 Song()
+{
+  Fs->task_end_cb=&SndTaskEndCB;
+  music_tempo=2.5;
+  while (TRUE) {
+    Play("qCqAqAsEDEDqBqBetGGEs2G3C2G3C");
+    Play("qCqAqAsEDEDqBqBetGGEs2G3C2G3C");
+    Play("etCD2G3etEE2G3qFqFqAsACACsAFAFetECC",
+      "In \0my \0 \0corn\0 \0 \0er? \0 \0 \0 \0 \0 \0 \0Hope \0we're \0right.\n\0");
+    Play("etCD2G3etEE2G3qFqFqAsACACsAFAFetECC",
+      "In \0my \0 \0corn\0 \0 \0er? \0 \0 \0 \0 \0 \0 \0Hope \0we're \0right.\n\0");
+  }
+}
+
+Song;
@@ -0,0 +1,25 @@
+//8 has words
+U0 Song()
+{
+  Fs->task_end_cb=&SndTaskEndCB;
+  MusicSettingsRst;
+  music_tempo= 3.360;
+  music_stacatto_factor= 0.846;
+  try {
+  while (!ScanKey) {
+	Play("M5/4");
+	Play("2qGGG3qtCBA2qGGG3qtCetBBqtA",
+		"Hymn's \0not \0long.\n\0 \0 \0 \0Nor \0this \0song.\n\0 \0 \0 \0 \0");
+	Play("qEeCCqDqtCBAM4/4",
+		"For\0 \0 \0give!\n\0 \0 \0 \0");
+	Play("qDeA2G3DG2G3DFFAC2qG3eAE",
+		"That's \0 \0 \0all \0 \0I \0 \0say.\n\0 \0 \0 \0 \0 \0 \0");
+	Play("qDeA2G3DG2G3DFFAC2qG3eAE",
+		"This \0 \0 \0I \0 \0 \0 \0pray.\n\0 \0 \0 \0 \0 \0 \0");
+  }
+  } catch
+    PutExcept;
+  Snd(0);
+}
+
+Song;
@@ -0,0 +1,20 @@
+//9 no nothing
+U0 Song()
+{
+  Fs->task_end_cb=&SndTaskEndCB;
+  MusicSettingsRst;
+  music_tempo= 2.646;
+  music_stacatto_factor= 0.989;
+  try {
+  while (!ScanKey) {
+	Play("2q.G3sCCqAeBB2qG3CeAAqB");
+	Play("q.CsCCeCCCCBDDDDDqB");
+	Play("e.AsADCeAetDDDeAsEGeBFsFDFDeEsFACGeC");
+	Play("e.AsADCeAetDDDeAsEGeBFsFDFDeEsFACGeC");
+  }
+  } catch
+    PutExcept;
+  Snd(0);
+}
+
+Song;
@@ -0,0 +1,22 @@
+//7 has words
+U0 Song()
+{
+  Fs->task_end_cb=&SndTaskEndCB;
+  music_tempo=2.5;
+  try {
+  while (!ScanKey) {
+	Play("3sF2G3F2G3eGDA2GqG3eEDsAAAA2eG3FsFGFG",
+		"In \0 \0the \0 \0twi\0light \0zone,\n\0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0");
+	Play("F2G3F2G3eGDA2GqG3eEDsAAAA2eG3FsFGFG",
+		"keep \0 \0a \0 \0friend\0ly \0tone.\n\0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0");
+	Play("C2G3C2G3qFG2GG3sGDGDqGsDCDC",
+		"Mind \0 \0in \0 \0knots?  \0 \0 \0 \0Skip \0 \0de \0 \0bait.\n\0 \0 \0 \0 \0");
+	Play("C2G3C2G3qFG2GG3sGDGDqGsDCDC",
+		"Watch \0 \0those \0 \0thoughts.  \0 \0 \0 \0Head \0 \0on \0 \0straight.\n\0 \0 \0 \0 \0");
+  }
+  } catch
+    PutExcept;
+  Snd(0);
+}
+
+Song;
@@ -0,0 +1,37 @@
+//8 has words
+U0 Song()
+{
+  CTask *task;
+  Fs->task_end_cb=&SndTaskEndCB;
+  music_tempo=2.5;
+  try {
+    task=PopUpViewStr(
+	  "$$WW+H,1$$$LK,"BF:Matthew,6:11"$\n\n"
+	  "I find two things interesting.  Jesus asks for "
+	  "the bare minimum... can't ask for less than daily bread.  "
+	  "Also, He actually demands it.  I find that funny.\n\n"
+	  "$LK,"BF:Matthew,10:31"$\n\n"
+	  "I have a funny story.  I used to shoot birds with a BB-gun.  "
+	  "That passage didn't snd so comforting!!  How many sparrows "
+	  "am I worth?\n"
+	  );
+    TaskWait(task);
+    SetWinHorz(Fs->win_left,Fs->win_right,task);
+    SetWinVert(Fs->win_bottom+3,Fs->win_bottom+15,task);
+    DocRecalc(DocPut(task)); //Reformat word-wrap with new window size.
+    while (!ScanKey) {
+      Play("3qGsB2G3B2G3eF2G3sGGGGeRFC2G3qFC",
+	    "Where's \0my \0 \0 \0next \0 \0 \0meal!!\n\0 \0 \0 \0 \0 \0 \0 \0 \0 \0");
+      Play("GsB2G3B2G3eF2G3sGGGGeRFC2G3qFC",
+	    "God, \0we \0 \0 \0had \0 \0a \0deal!!\n\0 \0 \0 \0 \0 \0 \0 \0 \0 \0");
+      Play("B2GsG3A2G3AeCCsCECEqACsGFGF",
+	    "Day \0old \0bread?\n\0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0");
+      Play("qB2GsG3A2G3AeCCsCECEqACsGFGF",
+	    "'Dai\0ly' \0I \0 \0 \0 \0said.\n\0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0");
+    }
+  } catch
+    PutExcept;
+  Snd(0);
+}
+
+Song;
@@ -0,0 +1,24 @@
+//9 has words
+U0 Song()
+{
+  Fs->task_end_cb=&SndTaskEndCB;
+  MusicSettingsRst;
+  music_tempo= 1.820;
+  music_stacatto_factor= 0.902;
+  try {
+  while (!ScanKey) {
+	Play("3eC2G3DDEDqCeEEGFGFqE",
+		"Sit\0ting \0 \0 \0on \0the \0fence,\n\0is \0 \0 \0 \0no \0de\0fence.\n\0");
+	Play("sFFeGFEFEqDsCCeDCBqBB",
+		"Is \0this \0seat \0 \0 \0tak\0 \0en?\n\0An\0 \0y\0one \0op\0 \0pose?\n\0");
+	Play("etB2GG3qE2eG3FEEetFBAqFDetFCC",
+		"Take \0 \0a \0step.\n\0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0");
+	Play("B2GG3qE2eG3FEEetFBAqFDetFCC",
+		"Take \0 \0the \0step,\n\0 \0 \0 \0 \0 \0 \0 \0not \0back.\n\0 \0 \0 \0");
+  }
+  } catch
+    PutExcept;
+  Snd(0);
+}
+
+Song;
@@ -0,0 +1,27 @@
+//9 has words
+U0 Song()
+{
+  CTask *task;
+  Fs->task_end_cb=&SndTaskEndCB;
+  MusicSettingsRst;
+  music_tempo= 1.710;
+  music_stacatto_factor= 0.736;
+  try {
+    task=PopUpViewStr("$LK,"Ecclesiastes,5:12",A="BF:Ecclesiastes,5:12"$\n");
+    TaskWait(task);
+    SetWinHorz(Fs->win_left,Fs->win_right,task);
+    SetWinVert(Fs->win_bottom+3,Fs->win_bottom+15,task);
+    while (!ScanKey) {
+      Play("3sDDDACCADDACCAe.DsCCC2G3FD2G3FD2G3CCAe.D",
+	    "I \0 \0 \0 \0got \0 \0 \0paid, \0 \0 \0to\0 \0 \0day.\n\0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0");
+      Play("qD2sG3G2G3GetGDAeF2GqG3etFBAEACECE",
+	    " \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0I \0 \0 \0can't \0 \0 \0get \0 \0to \0");
+      Play("qD2sG3G2G3GetGDAeF2GqG3etFBAEACECE",
+	    "sleep.\n\0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0");
+    }
+  } catch
+    PutExcept;
+  Snd(0);
+}
+
+Song;
@@ -0,0 +1,90 @@
+//9 has graphics
+
+/*
+This is one of the oldest songs.  I picked
+the random name "risen" and said to God
+"Oh, you're ambitious," thinking it was
+an epic name.  He laughed and gave an
+epic song!
+*/
+
+F64 t0=Beat;
+
+#define WING	6
+#define BODY	2
+
+U0 Bird(CDC *dc,F64 wing_é)
+{
+  CD3I32 p[3];
+  dc->color=WHITE;
+
+  p[0].x=0; p[0].y=0; p[0].z=-BODY;
+  p[1].x=0; p[1].y=0; p[1].z=BODY;
+  p[2].x=-WING*Cos(wing_é); p[2].y=-WING*Sin(wing_é); p[2].z=0;
+  GrFillPoly3(dc,3,p);
+
+  p[0].x=0; p[0].y=0; p[0].z=-BODY;
+  p[1].x=0; p[1].y=0; p[1].z=BODY;
+  p[2].x=WING*Cos(wing_é); p[2].y=-WING*Sin(wing_é); p[2].z=0;
+  GrFillPoly3(dc,3,p);
+ 
+  dc->color=ROPF_DITHER+WHITE<<16+LTGRAY;
+  GrLine3(dc,0,0,-BODY,0,0,BODY);
+}
+
+#define NUM_BIRDS	7
+#define RANGE		5
+
+F64 bx[NUM_BIRDS],by[NUM_BIRDS];
+
+U0 DrawIt(CTask *,CDC *dc)
+{
+  I64 i;
+  F64 é,dt=Beat-t0;
+  DCAllocDepthBuf(dc);
+  dc->x=325;
+  dc->y=95;
+  dc->z=GR_Z_ALL;
+  dc->flags|=DCF_TRANSFORMATION;
+  for (i=0;i<NUM_BIRDS;i++) {
+    bx[i]=Clamp(bx[i]+0.25*SignI64(RandI16),-RANGE,RANGE);
+    by[i]=Clamp(by[i]+0.25*SignI64(RandI16),-RANGE,RANGE);
+    é=ã/2*i/NUM_BIRDS+0.2*ã*dt+ã/2;
+    GrIdentEqu(dc->r);
+    GrRotXEqu(dc->r,ã/2);
+    GrRotZEqu(dc->r,é);
+    GrSetTranslation(dc->r,50*Cos(é)+bx[i],50*Sin(é)+by[i],30*i/NUM_BIRDS+4*dt);
+    GrRotXEqu(dc->r,0.35*ã);
+    Bird(dc,Sin(2*ã*dt+i*2*ã/NUM_BIRDS));
+  }
+}
+
+U0 Song()
+{
+  I64 i;
+  SettingsPush; //See $LK,"SettingsPush",A="MN:SettingsPush"$
+  Fs->text_attr=LTCYAN<<4+BLACK;
+  Fs->draw_it=&DrawIt;
+  Fs->task_end_cb=&SndTaskEndCB;
+  MusicSettingsRst;
+  music_tempo= 2.480;
+  music_stacatto_factor= 0.902;
+  for (i=0;i<NUM_BIRDS;i++) {
+    bx[i]=RANGE*RandI16/RANGE;
+    by[i]=RANGE*RandI16/RANGE;
+  }
+  try {
+    "$$BG+H,LTCYAN$$";
+    while (!ScanKey) {
+	t0=Beat;
+	Play("3eDEqFFetEEFqDeCDDEetCGF");
+	Play("eDEqFFetEEFqDeCDDEetCGF");
+	Play("eDCqDEeAAetEEFEDGBDCqF");
+	Play("eDCqDEeAAetEEFEDGBDCqF");
+    }
+  } catch
+    PutExcept;
+  SettingsPop;
+}
+
+Song;
@@ -0,0 +1,32 @@
+//7 has words
+U0 Song()
+{
+  CTask *task;
+  Fs->task_end_cb=&SndTaskEndCB;
+  MusicSettingsRst;
+  music_tempo= 2.480;
+  music_stacatto_factor= 0.902;
+  try {
+    task=PopUpViewStr(
+	  "$LK,"Matthew,20:28",A="BF:Matthew,20:28"$\n"
+	  "$LK,"Mark,10:45",A="BF:Mark,10:45"$\n"
+	  "$LK,"John,13:14",A="BF:John,13:14"$\n"
+	  );
+    TaskWait(task);
+    SetWinHorz(Fs->win_left,Fs->win_right,task);
+    SetWinVert(Fs->win_bottom+3,Fs->win_bottom+15,task);
+    while (!ScanKey) {
+      "$$GREEN$$Jesus talking...\n$$FG$$";
+      Play("M6/8");
+      Play("3eAACADAADACAR",
+	    " \0 \0I \0 \0came \0 \0 \0to \0 \0serve.\n\0 \0 \0");
+      Play("AACADAADACAR",
+	    " \0 \0I \0 \0give \0 \0 \0my \0 \0word.\n\0 \0 \0");
+      Play("FGetFEGABCDAC2qG3sECEC");
+    }
+  } catch
+    PutExcept;
+  Snd(0);
+}
+
+Song;
@@ -0,0 +1,29 @@
+//8 has words
+U0 Song()
+{
+  CTask *task;
+  Fs->task_end_cb=&SndTaskEndCB;
+  MusicSettingsRst;
+  music_tempo= 2.480;
+  music_stacatto_factor= 0.902;
+  try {
+    task=PopUpViewStr("$LK,"Luke,12:12",A="BF:Luke,12:12"$\n");
+    TaskWait(task);
+    SetWinHorz(Fs->win_left,Fs->win_right,task);
+    SetWinVert(Fs->win_bottom+3,Fs->win_bottom+15,task);
+    while (!ScanKey) {
+      Play("3hDeDA2qG3hDeD2GqF",
+	    "It \0sig\0ni\0fies\n\0a \0big \0sur\0prise.\n\0");
+      Play("3hDeD2sFG3qAhDeDA2qG",
+	    "Why \0 \0im\0pro\0vise?\n\0$$RED$$\"Be\0cause,\"$$FG$$ \0re\0plies.\n\0");
+      Play("3eCEsACACeD2G3qAAFeE2G3etFCC",
+	    "If \0 \0you \0 \0 \0 \0love \0your \0god,\n\0 \0don't \0bore \0 \0Him!\n\0 \0 \0");
+      Play("eCEsACACeD2G3qAAFeE2G3etFCC",
+	    "If \0 \0you \0 \0 \0 \0love \0your \0god,\n\0 \0sur\0prise \0 \0Him!\n\0 \0 \0");
+    }
+  } catch
+    PutExcept;
+  Snd(0);
+}
+
+Song;
@@ -0,0 +1,25 @@
+//8 has words
+
+U0 Song()
+{
+  Fs->task_end_cb=&SndTaskEndCB;
+  MusicSettingsRst;
+  music_tempo= 2.480;
+  music_stacatto_factor= 0.902;
+  try {
+  while (!ScanKey) {
+	Play("3qF2GsGGGG3GFGFqAeD2G3etDBEsFCFC",
+		"Love \0 \0 \0 \0 \0 \0ev\0 \0ery \0 \0sec\0ond.\n\0 \0 \0 \0 \0 \0 \0 \0 \0");
+	Play("qF2GsGGGG3GFGFqAeD2G3etDBEsFCFC",
+		"World -- \0 \0 \0 \0 \0 \0all \0 \0that \0 \0beck\0ons.\n\0 \0 \0 \0 \0 \0 \0 \0 \0");
+	Play("qBGFsEAEAqEFGeFC",
+		" \0Life \0is \0too \0 \0 \0 \0prec\0i\0ous.\n\0 \0 \0");
+	Play("qBGFsEAEAqEFGeFC",
+		" \0Can \0be \0 \0 \0 \0 \0worr\0i\0ous.\n\0 \0 \0");
+  }
+  } catch
+    PutExcept;
+  Snd(0);
+}
+
+Song;
@@ -0,0 +1,25 @@
+//7 has words
+U0 Song()
+{
+  Fs->task_end_cb=&SndTaskEndCB;
+  MusicSettingsRst;
+  music_tempo= 2.480;
+  music_stacatto_factor= 0.902;
+  try {
+  while (!ScanKey) {
+	Play("3qB2e.G3sADCeDsGEeBqGe.DsGeE2G3GsBC",
+		"God \0spoke.\n\0 \0 \0 \0 \0 \0 \0 \0 \0 \0How \0 \0'bout \0that!\n\0 \0 \0");
+	Play("qB2e.G3sADCeDsGEeBqGe.DsGeE2G3GsBC",
+		"God \0spoke.\n\0 \0 \0 \0 \0 \0 \0 \0 \0 \0Where's \0 \0He \0at?\n\0 \0 \0");
+	"$$GREEN$$God talking...\n$$FG$$";
+	Play("eFBBsDAECeCqB2e.G3sAF2G3eFe.GsBeDD",
+		" \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0$$RED$$I'm \0 \0right \0here.\n\0 \0 \0 \0");
+	Play("FBBsDAECeCqB2e.G3sAF2G3eFe.GsBeDD",
+		" \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0You \0 \0can \0hear!$$FG$$\n\0 \0 \0 \0");
+  }
+  } catch
+    PutExcept;
+  Snd(0);
+}
+
+Song;
@@ -0,0 +1,29 @@
+//7 has words
+U0 Song()
+{
+  CTask *task;
+  Fs->task_end_cb=&SndTaskEndCB;
+  MusicSettingsRst;
+  music_tempo= 2.480;
+  music_stacatto_factor= 0.902;
+  try {
+    task=PopUpViewStr("$LK,"Proverbs,11:25",A="BF:Proverbs,11:25"$\n");
+    TaskWait(task);
+    SetWinHorz(Fs->win_left,Fs->win_right,task);
+    SetWinVert(Fs->win_bottom+3,Fs->win_bottom+15,task);
+    while (!ScanKey) {
+      Play("2eG3CDAqEsACACGEGEqDsAAAAetCDD",
+	    "Ple\0ase \0te\0ach \0me.\n\0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0");
+      Play("2eG3CDAqEsACACGEGEqDsAAAAetCDD",
+	    "Wa\0ter \0thi\0s \0tree.\n\0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0");
+      Play("2qGG3eEBqAGeFEsFGFGetDBD",
+	    " \0 \0$$RED$$I \0will \0teach \0thee.\n\0 \0 \0 \0 \0 \0 \0 \0 \0 \0");
+      Play("2qGG3eEBqAGeFEsFGFGetDBD",
+	    " \0 \0Wat\0er \0that \0tree.$$FG$$\n\0 \0 \0 \0 \0 \0 \0 \0 \0 \0");
+    }
+  } catch
+    PutExcept;
+  Snd(0);
+}
+
+Song;
@@ -0,0 +1,74 @@
+//7 has graphics
+
+#define X	330
+#define Y	15
+
+#define NUM_BEAMS	256
+
+F64 beams_r[NUM_BEAMS],beams_é[NUM_BEAMS];
+
+U0 DrawIt(CTask *,CDC *dc)
+{
+  I64 i;
+  F64 r,x1,y1,x2,y2;
+  dc->color=YELLOW;
+  GrCircle(dc,X,Y,10);
+  GrFloodFill(dc,X,Y,10);
+  dc->color=BROWN;
+  GrCircle(dc,X,Y,10);
+  dc->color=YELLOW;
+  for (i=0;i<NUM_BEAMS;i++) {
+    r=125.0*((0.25*Beat+beams_r[i])%1.0);
+    P2R(&x1,&y1,r     ,beams_é[i]);
+    P2R(&x2,&y2,r+10.0,beams_é[i]);
+    GrLine(dc,x1+X,y1+Y,x2+X,y2+Y);
+  }
+}
+
+U0 Song()
+{
+  I64 i;
+  CTask *task;
+  SettingsPush; //See $LK,"SettingsPush",A="MN:SettingsPush"$
+  Fs->text_attr=LTCYAN<<4+BLACK;
+  Fs->draw_it=&DrawIt;
+  Fs->task_end_cb=&SndTaskEndCB;
+  MusicSettingsRst;
+  music_tempo= 2.480;
+  music_stacatto_factor= 0.902;
+  for (i=0;i<NUM_BEAMS;i++) {
+    beams_r[i]=Rand;
+    beams_é[i]=2*ã*Rand;
+  }
+  try {
+    task=PopUpViewStr(
+	  "$LK,"Numbers,6:25",A="BF:Numbers,6:25"$\n"
+	  "$LK,"Psalms,31:16",A="BF:Psalms,31:16"$\n"
+	  "$LK,"Psalms,67:1",A="BF:Psalms,67:1"$\n"
+	  "$LK,"Psalms,80:3",A="BF:Psalms,80:3"$\n"
+	  "$LK,"Psalms,80:19",A="BF:Psalms,80:19"$\n"
+	  "$LK,"Psalms,119:135",A="BF:Psalms,119:135"$\n"
+	  "$LK,"Daniel,9:17",A="BF:Daniel,9:17"$\n"
+	  );
+    TaskWait(task);
+    SetWinHorz(Fs->win_left,Fs->win_right,task);
+    SetWinVert(Fs->win_bottom+3,Fs->win_bottom+15,task);
+    "$$BG+H,LTCYAN$$$$FG+H,BLACK$$";
+    while (!ScanKey) {
+      Play("2qG3eCB2hGqG3eCB2qG3A",
+	    "Umm... \0God?\n\0 \0 \0Let \0Your \0 \0 \0 \0");
+      Play("CeBA2G3DqEeDCBA2qG3A",
+	    "face \0shine \0on \0down\n\0on \0us, \0Your \0 \0luck\0y \0 \0peo\0");
+      Play("eBA2h.G3qECAF",
+	    " \0ple.\n\0 \0Fath\0e\0r \0a\0");
+      Play("FDAeEDqECAF",
+	    "bove,\n\0 \0 \0I \0 \0feel \0 \0 \0Your \0");
+      Play("FDAeED",
+	    "love.\n\0 \0 \0 \0 \0");
+    }
+  } catch
+    PutExcept;
+  SettingsPop;
+}
+
+Song;
@@ -0,0 +1,24 @@
+//7 has words
+U0 Song()
+{
+  Fs->task_end_cb=&SndTaskEndCB;
+  MusicSettingsRst;
+  music_tempo= 2.480;
+  music_stacatto_factor= 0.902;
+  try {
+  while (!ScanKey) {
+	Play("3sC#C#D#D#C#C#CCC#C#D#D#C#C#CCEEDDC#C#DDEEDDC#C#DD",
+		"Still \0 \0 \0 \0there.\n\0 \0 \0 \0Still \0 \0 \0 \0there.\n\0 \0 \0 \0Not \0 \0 \0 \0fair.\n\0 \0 \0 \0Not \0 \0 \0 \0fair.\n\0 \0 \0 \0");
+	Play("C#C#D#D#C#C#CCC#C#D#D#C#C#CCEEDDC#C#DDEEDDC#C#DD",
+		"Un\0 \0 \0 \0aware!\n\0 \0 \0 \0Un\0 \0 \0 \0aware!\n\0 \0 \0 \0Every\0 \0 \0 \0where!\n\0 \0 \0 \0Every\0 \0 \0 \0where!\n\0 \0 \0 \0");
+	Play("eBDetFGAeFEBEetEFEqCeFEDA",
+		"$$RED$$Running \0 \0 \0a\0way \0 \0 \0 \0 \0 \0from \0the \0Lord \0won't \0 \0work.\n\0 \0");
+	Play("BDetFGAeFEBEetEFEqCeFEDA",
+		"Running \0 \0 \0a\0way \0 \0 \0 \0 \0 \0from \0the \0Lord \0won't \0 \0work.$$FG$$\n\0 \0");
+  }
+  } catch
+    PutExcept;
+  Snd(0);
+}
+
+Song;
@@ -0,0 +1,29 @@
+//7 has words
+U0 Song()
+{
+  CTask *task;
+  Fs->task_end_cb=&SndTaskEndCB;
+  MusicSettingsRst;
+  music_tempo= 2.480;
+  music_stacatto_factor= 0.902;
+  try {
+    task=PopUpViewStr("$LK,"Luke,17:36",A="BF:Luke,17:36"$\n");
+    TaskWait(task);
+    SetWinHorz(Fs->win_left,Fs->win_right,task);
+    SetWinVert(Fs->win_bottom+3,Fs->win_bottom+15,task);
+    while (!ScanKey) {
+      Play("3qABeCq.AqCDeEq.A",
+	    "Pile \0of \0clo\0ths.\n\0Pile \0of \0clo\0ths.\n\0");
+      Play("qDeDq.CqBABAR",
+	    "Has \0the \0rap\0ture \0come \0and \0gone?\n\0 \0");
+      Play("EeD2sG3DeB2G3qFCeCsC2G3etGB2G3qE",
+	    "Dear \0God, \0 \0 \0am \0I \0here?\n\0 \0 \0 \0 \0 \0 \0 \0 \0");
+      Play("EeG2sG3EeCA2qG3CeCsC2G3EEAAeEE",
+	    "Dear \0God, \0 \0 \0am \0I \0here?\n\0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0");
+    }
+  } catch
+    PutExcept;
+  Snd(0);
+}
+
+Song;
@@ -0,0 +1,25 @@
+//7 has words
+U0 Song()
+{
+  Fs->task_end_cb=&SndTaskEndCB;
+  MusicSettingsRst;
+  music_tempo= 2.480;
+  music_stacatto_factor= 0.902;
+  try {
+  while (!ScanKey) {
+	Play("3eCBBCBCCEEAGGAAsEAAE",
+		"I'm \0 \0 \0in \0 \0trou\0ble.\n\0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0");
+	Play("eCBBCBCCEEAGGAAsEAAE",
+		"Bursted \0 \0 \0my \0 \0bub\0ble.\n\0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0");
+	"$$GREEN$$God talking...\n$$FG$$";
+	Play("2qG3eDDsCECE2qGG3eFAetEEEsCAAC",
+		" \0$$RED$$Yep, \0 \0you're \0 \0 \0 \0screwed.\n\0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0");
+	Play("2qG3eDDsCECE2qGG3eFAetEEEsCAAC",
+		" \0Re\0 \0pent, \0 \0 \0 \0dude.$$FG$$\n\0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0");
+  }
+  } catch
+    PutExcept;
+  Snd(0);
+}
+
+Song;
@@ -0,0 +1,25 @@
+//7 has words
+U0 Song()
+{
+  Fs->task_end_cb=&SndTaskEndCB;
+  MusicSettingsRst;
+  music_tempo= 2.260;
+  music_stacatto_factor= 0.902;
+  try {
+  while (!ScanKey) {
+	"$$GREEN$$As I look back on my sinful past...$$FG$$\n";
+	Play("3qCAABAeAECEqB",
+		"Who \0was \0that \0per\0son? \0 \0It \0wasn't \0 \0me?\n\0");
+	Play("CAABAeAECEqB",
+		"Who \0was \0that \0per\0son? \0 \0It \0wasn't \0 \0me?\n\0");
+	Play("etDEDqFetBEDeAFGEqFDE",
+		"Sad \0to \0say, \0 \0I \0guess \0 \0it \0 \0was \0 \0 \0me.\n\0 \0");
+	Play("etDEDqFetBEDeAFGEqFDE",
+		"Sad \0to \0say, \0 \0I \0guess \0 \0it \0 \0was \0 \0 \0me.\n\0 \0");
+  }
+  } catch
+    PutExcept;
+  Snd(0);
+}
+
+Song;
@@ -0,0 +1,34 @@
+//8 special
+
+U0 Song()
+{
+  CTask *task;
+  Fs->task_end_cb=&SndTaskEndCB;
+  music_tempo=2.5;
+  try {
+    task=PopUpViewStr(
+	  "$$WW,1$$This shows a random passage based on "
+	  "the time at the moment this song was run.  "
+	  "Talk to God as an offering, then run $MA-X+PU,"AfterEgypt",LM="Cd(\"::/Apps/AfterEgypt\");;#include \"Run\"\\n"$ if you "
+	  "want God to talk some more.  The $LK+PU,"Holy Spirit",A="FI:::/Adam/God/HSNotes.TXT"$ can "
+	  "puppet you.\n");
+    TaskWait(task);
+    SetWinHorz(Fs->win_left,Fs->win_right,task);
+    SetWinVert(Fs->win_bottom+3,Fs->win_bottom+15,task);
+    "$$WW+H,1$$";
+    DocRecalc(DocPut(task)); //Reformat word-wrap with new window size.
+    while (!ScanKey) {
+      FifoU8Flush(god_fifo);
+      GodBitsIns(GOD_GOOD_BITS,KbdMouseEvtTime>>GOD_BAD_BITS);
+      GodPassage(5);
+      Play("3qAeABCBqCetABBqCetAAREE2G");
+      Play("3qAeABCBqCetABBqCetAAREE2G");
+      Play("3eDRRRqGReRRGGGGqE");
+      Play("eDRRRqGReRRGGGGqE");
+    }
+  } catch
+    PutExcept;
+  Snd(0);
+}
+
+Song;