//8 has graphics $SP,"<1>",1$ $SP,"<2>",2$ F64 t0=tMBeat; U0 DrawIt(CTask *,CDC *dc) { F64 é,dt=tMBeat-t0; if (dt>12) dt=12; é=0.2*FullTri(dt,4); CSpritePlotRotZ3b(dc,140+30*Sin(dt),40,0,$IB,"<1>",1$,é); CSpritePlot3(dc,170,15,0,$IB,"<2>",2$); } U0 Song() { CTask *task; task=PopUpViewStr( "$LK,"Revelation,22:18","BF:Revelation,22:18"$\n" ); TaskWait(task); task->win_right=Fs->win_right; task->win_left=Fs->win_left; task->win_top=Fs->win_bottom+3; task->win_bottom=task->win_top+12; TaskDerivedValsUpdate(task); Fs->task_end_cb=&SndTaskEndCB; Fs->draw_it=&DrawIt; MusicSettingsRst; music_tempo= 2.500; music_stacatto_factor= 0.900; "$$WW+H,1$$"; try { while (!ScanKey) { t0=tMBeat; Play("!3qBRE2sG3C!2G!3CeCF!qEeG!!AsR2GR!G", "The \0 \0quill\n\0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0"); Play("!3qBRE2sG3C!2G!3CeCF!qEeG!!AsR2GR!G", "is \0 \0still\n\0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0"); Play("3qER!!etA!!C!GqF2G3etD2G3F!BF!2G3DRF", " \0 \0God's \0 \0 \0word \0for \0all \0 \0his \0 \0hap\0 \0py \0 \0peo\0"); Play("qER!!etA!!C!G!qF2G3etD2G3F!BF!2G3DRF", "ple.\n\0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0 \0"); "$$FG,GREEN$$Gutenberg invented the printing press and made Bibles. Until then, " "I wonder how many man-hours for one word in the Bible!\n$$FG$$"; } } catch CatchAll; Snd(0); } Song; 2 "ýÿÿÿßÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿÿb ýÿÿÿøÿÿÿÿÿÿÿÿ