//Scroll Down $BG,11$ $BG,14$ $SP,"<1>",BI=1$ $BG,11$ $BG,14$ $SP,"<2>",BI=2$ $SP,"<3>",BI=3$ $SP,"<4>",BI=4$ $SP,"<5>",BI=5$ $SP,"<6>",BI=6$ $BG$ U0 DrawIt(CTask *task,CDC *dc) { U8 *tmps; Sprite3(dc,100,task->pix_height-60,0,$IB,"<3>",BI=3$); Sprite3(dc,194,task->pix_height-140,0,$IB,"<4>",BI=4$); Sprite3(dc,400,task->pix_height-10,0,$IB,"<5>",BI=5$); Sprite3(dc,50,task->pix_height-160,0,$IB,"<6>",BI=6$); tmps=SpriteInterpolate(Tri(tS,2.0),$IB,"<1>",BI=1$,$IB,"<2>",BI=2$); Sprite3(dc,0,task->pix_height,0,tmps); Free(tmps); } U0 SongTask(I64) {//Randomly generate (by God :-) Fs->task_end_cb=&SndTaskEndCB; MusicSettingsRst; while (TRUE) { Play("2qG3eCGqEAFCeDFqB"); Play("2G3eCGqEAFCeDFqB"); Play("BDeF2G3etEBAqBAetAEDeE2G"); Play("3qBDeF2G3etEBAqBAetAEDeE2G"); } } U0 Main() { SettingsPush; //See $LK,"SettingsPush",A="MN:SettingsPush"$ Fs->draw_it=&DrawIt; Fs->song_task=Spawn(&SongTask,NULL,"Song",,Fs); AutoComplete; WinBorder; WinMax; DocClear; Fs->text_attr=YELLOW<<4+BLACK; "$$BG,LTCYAN$$%h31c",'\n'; View; SettingsPop; } Main;   2s s t t5 5 ! !2 6;7 ;7Jo JoX Xc cl l\] \]l% m%i j N N7 7 6 jB B  W W( (@ @& && &C C BH H>B 4D-v -v. .1 1: :> >; ;;j ;jCW   jp pu ux# x#{( {(2 24 4y+ w&y+ w&s s q qn ni :;]LO6:R ]e{+                                " $ $  "&       z z  v v` `   j j   h  ~n ~  j   2s s t t5 5 ! !2 6;7 ;7Jo JoX Xc cl l\] \]l% m%i j N N7 7 6 jB B  W W( (@ @& && &C C BH H>B 4D-v -v. .1 1: :> >; ;;j ;jCW   jp pt tv# v#y( y(}3 }3{5 {5w+ t&w+ t&q q p pn ni :;]LO6:R ^ey+