&& :******************************&K:***** THE COCO3 FUN-DEMO *****&p:**** BY Larry Greenfield ****&(:**** of LDG Free Software ****&2:******************************&<:******* August 1992 **********'F:******************************')P:** The Mysterious Violinist **'NZ:******************************'`d PA(16):PP0'onRR()'~x X0 15'PP65456X'PA(X)(PP)64''65497,0'32'0'RR1 2400:'"L255T255V31"'Ҟ(A$"********************************"((2 X1 (A$)(G@32,(A$,1,X);(S 200,1(Y(B$"LDG FREE SOFTWARE PRESENTS...":C$" THE COCO III FUN-DEMO!!"(" X1 (B$):@65X,(B$,X,1);: RR1 40:::RR1 1000:), X1 (A$):@128,(A$,1,X);:200,1:)d6RR1 1000::"O1;T4;L8;V31;C;P8;C;P140;C;P140;C;P8;D;P8;C;P8;D;P6;L5;T1;G")@ X1 (C$):@97X,(C$,X,1);: RR1 40::: RR1 1400:*J@384,"================================ (C)1992 LDG FREE SOFTWARE ================================";*>T@32,(32,"*");:@128,(32,"*");*^^E$((10)):R$((10))*h@(30)32," ";:@(30)128," ";*rEWEW1*| EW140 400* 340*80:4:3,3* Y1 7* Y1 A$"Hello!"+ Y2 A$"Let me introduce myself to you."+n Y3 A$"I am your Color Computer 3, and I'd like you to get to know me better!"+… Y4 A$"I hope this litte demo will help in that regard.",̅ Y5 A$"So just sit back, relax, and let me do the talking for a change...!",?օ Y6 A$"Don't worry... I know what I'm doing...!",` Y7 A$"...I think...!!",X1 (A$):(A$,X,1);: ((20)190),1::RR1 700:::, Y, RR1 2200:::-&A$"First, let me switch to that trusty green screen you know and love for my first trick..."-l X1 (A$):(A$,X,1);: ((20)190),1:: RR1 700:::-32:: RR1 2000:-&A$" I THINK THAT YOU'RE GOING TO flip OVER THIS DEMO!!! "-0 X1 (A$):(A$,X,1);: 200,1:. :RR12000:.D X1 20.)N &HFF98,222.9XEE1100:.Ib "T8;L8;4".Ol.Uv.d &HFF98,0.x RR1 2000:.A$"SEE?! ". X1 (A$):@4X,(A$,X,1);:200UU,1:UUUU3:: RR1 1600:.A$"I told YOU SO!!"/! X1 (A$):@12X,(A$,X,1);: (20)190,1:/4RR1 4000:/Aƒ65497,0/Q40:4:3,3/`ڒ 65428,38/l 200,2/" You know, every once in a while"/200,2/" I think I need a little more"/ 200,203,3,B:" attention";:3,3:". After all, I can get"0 200,20G*"lonely too. So that's why sometimes"0R4200,20>" I like to ";:3,3,B:"blink ";:3,3:"my display."0H0R RR1 9000:0\"L2"0fA$"Sometimes if I'm feeling sad, my blink will be a little SLOW..."1pTT651z X1 (A$)1+(A$,X,1);17TTTT11H "T"(TT)1Q"4"1W1g 65428,2551z RR1 4000:1 0,6:::::: 0,61A$"But then, when I start to feel happy, I start blinking very FAST..."1TT11 X1 (A$)2(A$,X,1);2TTTT12+ "T"(TT)24"4"2:2H$ 65428,12\. RR1 4000:2b82BA$"Sometimes though, I'll just FREAK OUT."2LX1 (A$):(A$,X,1);:"T45;4":2V RR1 1500::2`A$"Like this... "3jX1(A$):(A$,X,1);:"T45;4":3$t RR1 2400:3.~:***3>"T255L255"332::80:3:"T5L25": X1 10:"I'm Freaking Out! And I Can't Stop it!! Aaaugh!!!":3"O3": X1 130:R(3):R$(R): R$3 &HFF99,(255): &HFF98,(6)3440:4:3,34A$"Or like this... "4/"T255L255;V31"4Y؀ X1 (A$):(A$,X,1);:"T5;4":4m RR1 1000:4} X1 1704"9"4:4 480:4:1,34RR1 104(" Sometimes I feel like I'm nothing more than a Yo-Yo!"425< RR1 4000:5!F Y1 305/P X3 75=Z (X2),15Jd65432,X5Pn5Vx5\5A$" But I get over it soon ... "5 X1 (A$):(A$,X,1);: 200,1:5 RR1 3000:5A$"Sometimes... "6  X1 (A$):(A$,X,1);: 200,1:6 RR1 3000:61A$"Maybe!!! "6[Ҁ X1 (A$):(A$,X,1);: 200,1:6o܀ RR1 4000:6u665497,0640:4:3,36A$"I'm also quite artistic... "6 RR1 600:6 X1 (A$):(A$,X,1);: 200,1:7" RR1 2400:7,RR0:X07627/@"T255L255V31"77JY07FT TT1 57V^ RR0 157bhXX2.57kr RR7|(0X,Y)(320X,191Y),,B7YY1.1777:***7 RE1 407 XX0 157YYYY1: YY62 YY07 XX,YY7֋78:*RESTORE PALETTES8& X0 158? 65456X,(PA(X)64)8E8U40:4:3,38A$"But sometimes I start to feel *DIZZY* when I do a demo... "8& X1 (A$):(A$,X,1);: 200,1::RR1 2000:8018: 7,08D"O3;L255T255V31"9N3,09 X4:39b09l0,60:2:(0,20),"I t i s i n d e e d a m y s t e r y w h o m i g h t h a v e":(28,21),"d o n e t h i s ! !"9v0:(5,23),"(c)1991 Mysterious Violinist Productions Inc. All Rights Reserved."::(5,8),"T h e C o C o I I I . . . A G r e a t C o m p u t e r ! !":^ OO37 40:(OO,10),(127)::yA310:B90:C190:D134:1:(22,17),"Done by the Mysterious Violinist!": X130 1 4:(3):(310,30),X,,.40::1;(10,10)(50,40),,BF;!(560,10)(600,40),,BF;-GGGG1;@ GG34 2330;W C190 430 15;a:***;j J00;1:(A,B)(C,D),:3:(A,B)(C,D),; GG8 2110;* 1,(63);4"B":2120;> 2260;H;RGGGG1: C430 190 15<\:**<f GG23 J00: 2170<%pJ063 L YY3 A$"So be kind to your 6809-based friends. "> V YY4 A$" Thanks for lettingme talk...I feel much better now...... !!!"> ` X1 (A$):(A$,X,1);: 100,1: X> j RR1 2000:> t YY> ~ RR1 8000:>