G& 32:& @75,"SURPRISE"&&n8&6M"NIBLOADR&i (&HCFC3)&H8D &HE76,&HCE: &HE77,&HE7&|F1$"SURPRISE"&L2&HE92& X0 (F1$)1& L2,((F1$,X1,1))&L2L21&ҋ X& &HE6E4,&HE6&" &HF00&,2&64')X&HFF00:Y&HFF7E:X1,52:X3,63:X35,60'ATX$:TX$"Z12"460'RT1(TX$)'g(Y)1280420'Y,((TX$,T,1)):T'(Y)1280440'’Y,13:400'̀TI1TM:TI'֢44539::(F HELLO,JAIN,I,AM,OME,I,MYSD,THA,PLANE,SO,HEAR,I,AM,DARLING,I,DID,NOT GO,2,THA,OFFUS,SO,HEAR,I,AM,SWEETEE,PII,WEAR,R,U,Z121(TX$)'g(Y)1280420'Y,((TX$,T,1)):T'(Y)1280440'’Y,13:400'̀TI1TM:TI'֢44539::(F HELLO,JAIN,I,AM,OME,I,MYSD,THA,PLANE,SO,HEAR,I,AM M k                 P`e6VPe`e6P`P`P`PeP`e`eV`cP5P`5P`P`Pee`0`P0eP0`c`eP`Pe`c`V`0P`cP`VP`V`6`0PVV`PVP0`PeVe`P`e`Pe`e0VP`eee0`PPe0P5`P`S0e`P`PeP`pxppppppp                            Ї P@DKh$" qwp@@ @`0 xw@ JDH"R   ځx7 !B!Ba0P@(@ h l ```$0p @Hf@6 0` ((l``)"D ac`7. n (7 f3`R\/t.8;9 "D kWcf1A\`tݮ`π`žJ@ ?0lDD@DKHp.]A( @a`@"` @9j@ ``. @7׽ BDD@ J&ay0 @!wf  UD-B!7:#t" :tP :D BUGP "  @0   P@$@H d@`讀nA Xp ÈP8@B@ x#H B (9@0$ ( q ;:H0 6l]x 6l @x`؀8;\@(H DKH@@]o8@x  @  @ `0 h @8@ | Jm[Qy Z  0@@JijD` @ @(`@"! {H D@(* j( %@pq.@A@ A@0`"$P@ A@" @C" f<(A@(x"$0A@I"  @A@R J"$p;A@  #;';`" p];R HA@"$A@D$ " A@"$A@3`Cdo`!|~ͽz;_p۸?^={`N=>@ =|00b@D@H @P@@|          x 0<0``n ߠ|0< 9ptcp|`pp\Ϟ`v |0w;x8`s~{808 뇈 ?-$=8;(  IT0iTHd*M뇈 M$;FD$;:"";WFq' WF0 59,10: C$q> IM$;FE$;:"";WGqXŅ WG0 59,11: C$qtTBW0WBWCWDWEWFWGqʇ FF$;: (28,32);D$: TI$;FG$;TBqρ 30qԂ: *** REFUND ***qޞ: 35);AA$;(13);4);FH$;45);F$r"Line 64 Total payments.": 68,2: U$;TBr? TBTX STBTX : STXTBrZ TBTX 6150 : 6140ru: TI$;FJ$;S: 6170r FK$: FL$: TI$;FM$;S:r FO$: TI$;FP$;Sr 35r" RP$"Y" 1500 : 6190r. 30sb8 10,10:"End of program---Micro hopes it has been useful to the human. Please come again."snX 70006170r FK$: FL$: TI$;FM$;S:r FO$: TI$;FP$;Sr 35r" RP$"Y" 1500 : 6190r. 30sb8 10,10:"End of program--- :"YOU MUST ADD A PCLEAR3 BEFORE THE PROGRAM IS LOADED TO INSURE ENOUGH SPACE. IN CASE YOU RECEIVE A 'OM' ERROR, INCREASE IT TO A PCLEAR2."!j"THIS PROGRAM WAS DEVELOPED TO AID IN YOUR SELF-CALCULATIONS FOR THE FORM 1040 WITH SCHEDULESA, B, AND D. FOR YEAR 1998. I RE-PROGRAM THIS EVERY YEAR SO THAT I DON'T MAKE ANY MATH ERRORS."!" STUART G. ROBERTS"CLEAR2."!j"THIS PROGRAM WAS DEVELOPED TO AID IN YOUR SELF-CALCULATIONS FOR THE FORM 1040 WITH SCHEDUaurant with my family, and we were trying to think of a company name. My mother (or father, I can't remember) said why don't you use a computer command. I said, come on, that's ridiculous. To emphasize my point, I said "Goto Software. See, computer commands sound terrible." My sister knew absolutely nothing about computers and especially about programming them. So I was amazed (and still am) when she said "How about Go- sub Software?" I liked it almost instantly. It was easy to say, and my mother drew a great logo to go with it. Go-sub could have been the name of a video game, so why not use it? Q: What is Graphics-25? A: It was a program that enhanced Basic. It added commands to load, save, manipulate and display up to 25 graphics pages. Q: You originally were to distribute your software with Game Point Software but that didn't eventuate. What happened there? A: Peter Ellison of Game Point Software convinced me that he could sell more than any one else if I signed an exclusive deal with him. I sent him 100 copies of Zenix that I never got paid for. Basically, he caused me to miss all those "after Christmas" sales. To add salt to the wound, Tom DiMarco (Gimmesoft) called me up and asked why he couldn't sell Zenix. When I realized what was happening with GP, I broke our contract and looked for other places to go. After that, I vowed to never sign another exclusive deal. Glen Dahlgren of Sundog called me up later and offered to sell Zenix through a Non-Exclusive deal. He also convinced me to finish Crystal City. I hope I don't sound too bitter about it. I'm not bitter about the CoCo but let's just say, I'm not quite as naive as I was then. Q: Are you still developing for the CoCo and why? A: No. I stopped when I realized, I couldn't make enough money to live on. In fact, I stopped half way through Crystal City, but Glen (from Sundog Systems) convinced me to finish it. I never would have stopped writing games for the CoCo, if I could have made a living from it. Q: What were your feelings of the CoCo3 when it was released? A: I was very happy. I bought one first thing and started writing software. I actually started Crystal City before Zenix. But the task was bigger than I was ready for, so I switched. Q: If you were asked by "Mr.Tandy" to create a CoCo4, what would you include? A: To have had it ready for market within two years after the CoCo 3 was introduced. It's too late now. Q: Have you any "words of wisdom" to pass on to any budding CoCo programmers? A: Good luck, and have fun. # --------------------------------------------------------------------------- Interview copyright by Nickolas Marentes - November 19, 1998. Q: Have you any "words of wisdom" to pass on to any budding CoCo programmers? re Zenix slowed down a bit, but there were no more cycles to be saved anywhere. To get the highest redraw rate possible, the icons were written in pure assembly language. I wrote a program that read the icon from a text file and generated assembly language that looked something like this: LDD Color1,Y STD Xoffset1+Yoffset1*256,X STD Xoffset2+Yoffset2*256,X STD Xoffset3+Yoffset3*256,X LDD Color2,Y STD Xoffset4+Yoffset4*256,X ETC... Mike Newell also did a lot of work on the graphics for Zenix and Crystal City. If you liked level four of Crystal City, you should thank Mike. Q: Can you tell us a bit about the sound routines that you used in your programs? A: Since they took a large chunk of CPU time, they had to be as fast as possible. To that end, I placed most of the routine in the direct page and used self-modifying code to get the best performance possible. The routine was called about 3600x per second from the timer interrupt. The music routines in Zenix used a table to generate four-part harmony background music, plus two channels for special effects. I would have done the same for the Crystal City, except there wasn't enough time to complete it before the deadline. The sound routine also doubled as a "raster avoidance system". In the early days, sometimes the icon would disappear because the VDG was drawing just as I was erasing. I used the sound routine to keep track of where the raster was. If the raster was too close to the icon, I queued it up to be drawn later. Q: Can you tell us any interesting "stories" of your past development days? A: I was writing attack routines for the Zenix bugs. At that point, all they did was group together and wait forever. In one programming swoop, I wrote the code for them to pick a track, and follow it down to kill you. After hours of work, I assembled the whole thing, thinking, "Oh, this'll crash in about a 60th of a second." To my sheer delight, I watched three little bugs group together, and swoop across the screen. Just as I shot at them, to my complete surprise the three of them turned tail and run UP off the screen. I yelled at the cowards to come back and fight like real bugs! I had accidentally reversed the Y offset sign, so they ran the track up instead of down. Half way through the development of Zenix, I found out the assembler I was using wouldn't cut it. So I had to write my own. When it could assemble itself and Zenix (in under a minute), I was satisfied that it worked fairly well. I gave a copy of it to my friend Mike Newell. Whenever anything Mike wrote crashed, he always jokingly blamed it on my assembler. He would say, "It's your fault my program is crashing, so help me find this bug!" I just pointed to the huge amount of code it assembled - by then I was using it for Crystal City as well. He would then accuse me of putting an "M" bit in it. Supposedly when he was using it, the "M" bit would magically get set, and the assembler would purposefully generate bad code. Finally, I would say "Prove it!" Of course, he always eventually managed to track down his bug and fix the program. The whole thing became a running gag. Except for this one-day. He came back and said "HERE IT IS!!! A BUG IN YOUR ASSEMBLER!!!" He was right, some obscure op-code I had never used generated the wrong value. I was already laughing because I knew exactly where the bug was. I opened the op-code data file, and asked him "Do you recognize this data file?" He said, "Yea, I typed it in." I paged down to the bad op-code. He said "UGH! I caused my own bug!" We both laughed, and I said, "So it's your own damn fault!" Q: What is your opinion on Software Piracy? A: When I first started, I was paranoid that people would pirate my hard work. What I didn't realize was that I could have sold more had I gotten the product to market earlier - even without the copy protection. In the end, I removed the copy protection for three reasons: 1) My system was so customized (my own PROMS, my own disk drive, etc, etc.) it would have been too difficult for [whoever owns the rights now] to generate master disks. 2) I didn't care if people copied it because I wouldn't get any more royalties. 3) I hoped people would copy it - at least more people could enjoy my hard work that way. I still have all the original registration forms that were sent back to me. When I read all the good comments, I feel like I accomplished something great! Q: Tell me about GOSUB SOFTWARE. A: I was sitting at a rest# CLASSIC COCO PROGRAMMER INTERVIEW: Jeremy Spiller # --------------------------------------------------------------------------- Jeremy Spiller, currently aged 27 and living in Ashby, MA USA, developed what many believe to be the most "arcade quality" games for the CoCo3. His game Zenix especially is considered to be the fastest and most spectacular arcade game ever developed for the CoCo3 and is a classic example of pushing the CoCo3 to it's limits. Jeremy knew before he started programming Zenix that the game had to be faster than anything ever created before and developed some of the most innovative graphic techniques ever tried on the CoCo3. Jeremy was one person I especially wanted to interview but locating him after all these years was a difficult excercise. Then Larry Greenfield came to the rescue and went to great lengths to locate him. Thank you Larry! # PROGRAMMING ACHIEVEMENTS Product Title Product Description Platform Distributor ------------------------------------------------------------------ Graphics 25 BASIC Enhancer CoCo3 Gimmesoft Zenix Arcade type game CoCo3 Sundog Systems Crystal City Arcade type game CoCo3 Sundog Systems # PUBLICATIONS 07/94 Dr. Dobbs Journal, "3-D Texture Mapping" 01/89 The Rainbow, "The Mandelbrot Bug", Collaborated with Dr. M. Spiller 12/88 The Rainbow, "What Disk Drive?" 10/88 The Rainbow, "Super Stamper: The Elastic Rubber Graphics Stamp" 07/88 The Rainbow, "Erase All Trace" 06/88 The Rainbow, "Synthesizer Sound-Off" 06/86 The Rainbow, "Keyboard Piano", Collaborated with Dr. M. Spiller 06/85 The Rainbow, "Analog to Digital and Back Again" # INTERVIEW Q: What companies did you work for? A: For the past five years, I was working at Sky-Skan, Inc. writing all kinds of cool software, ranging from high performance PC graphics programs to embedded operating systems and hardware control. I left Sky-Skan, inc. in September so I could do some travelling. Q: What sort of "cool software" were you developing? A: One of the devices is called a Tarragon. It is an embedded controller that controls everything from lights and slide projectors to laser disks and video projectors. I got to write its operating system and numerous device drivers. My CoCo experience prepared me for the tortures of interfacing with hardware and dealing with real time events. Q: How and when did you become interested in computers? A: My father was a CoCo hobbyist. When I was 10, my father bought a Timex Sinclair and learned Basic on that. After upgrading from 1K to 4K of RAM, it was obvious that the computer wasn't really very powerful. After consulting with some friends (who were CoCo nuts) he went to Radio Shack, and bought a CoCo with 16K of RAM. One of the first things he wrote for the CoCo was a checkbook balancing program. When he printed it, I was amazed at how long it was. I could stand on a stool and stretch the printout over my head. I remember thinking "WOW! This is huge. I'll never write a program that long!" Q: What computers have you owned and currently own? A: CoCo 1, CoCo3, and various PCs. Technically, I never owned the CoCo 1, I just permanently borrowed it from my parents. Q: What is your opinion of the CoCo2 and CoCo3 hardware platform? A: It was great for its time. Q: What was your favourite computer and why? A: For the fun of programming, it was always the CoCo. For CPU architecture, it was the 68000. The IBM PC compatible has had a long struggle to get to where it is now, but I believe it is now the best machine for the dollar. UGH, I know I'm going to regret saying that some day! Q: What are some of your favourite CoCo products of all time? A: Time Bandits. To me, it was one of the most professional games written for the CoCo. It could have easily challenged any "real" arcade game of its time. It was also one of the most fun games. By allowing you to choose where you wanted to go, you never got that tedious feeling you get with most other games. Q: Can you tell us a bit about the graphics routines you used in your programs? A: I knew that for my games to truly be of arcade quality, they had to run at 60 frames per second. Anything less was completely unacceptable to me. I decided early on that I would get 60 frames per second, or I wouldn't bother writing a so-called "arcade" game. And no gimmicks like shrinking the screen, or using fewer icons. In all honesty, there were a few places whe)H1/ 2630/ʁ 2580/!Ԑ/@: CHECK HANDS FOR WINNERS/HY0/_ Y4 YY1 : /hW1Y/pX1/ X10 XX1 : 1070/ P(Y,X)P(Y,X1) W1Y : W10: 1010/$ 1040/. W10 /8 1010/B: PRESENT WINNER0L X1 8: (255),3: X0,V X0 62: 0,X:X0@`SH(W1)SH(W1)10Lj 28700Vt 2,00d~ Y1 40s X1 100(Y4034,45X8),0,10K3((P(Y,X)))10((Y1)68K3,X5),P(Y,X)0 X0 Y0ā 27300 13,00 13,01 (5,21),"THE WINNER IS PLAYER"1+ (27,21),W11Y(5,22),"DO YOU WISH TO TRY AGAIN Y/N/C?"1e 29501q 13,621 I$"N" 3070112 I$"C" : 32: 1701< 1,01F(12,22),"PLEASE STANDBY"1P 3201Z: PLAYER 1 SELECTS2d I$"N" 14002n 295021x I$"0" I$"9" 13902= 11,622JI(I$)2P2f: COMPUTER PLAYS2 2580::SHOW WHOSE TURN2 2510::SHOW THE DISCARD2 2700::PAINT CARD TAKEN BOX2Ȁ X1 103҅ CHH(P2,X) CHH(P2,X1) C(P2,X)0 C(P2,X)1: 16503܋ X3,NCD(P1)3; X1 103d NCH(P2,X) NCH(P2,X1) 15603l X3r3 COMPUTER TOOK NEW CARD3"IX3, I10 I036H1CH3@CHD(P1)3JD(P1)H13TC(P2,X)13^ 26303h 16804r:TOOK DISCARD4 |IX4 I10 I04* 1700404M: FIX COMPUTER STRATEGY4\ X1 104 P(P2,X)H(P2,X) P(P2,X)H(P2,X1) C(P2,X)1:H(P2,X1)P(P2,X):H(P2,X)P(P2,X)4… C(P2,X)1 (P24034,45X8),2,1 : (P24034,45X8),3,15H(P2,1)615H(P2,11)15 X5%5J 61,55,49,43,37,31,25,19,13,7,15S P25i: DRAW THE RACKS5t 0,625~ 1,05& TM$"1" 14,36 : 14,250 15,185: TM$"1" 2,36 : 2,25D 3,185N X5 13: X,62: X5X 1,06b26 l14,06%v(0,0)(319,191),,B60 15,06I(1,1)(318,190),,B6T 14,06m(2,2)(317,189),,B6w 1,06 X41 231 486 Y47 126 86ƅ Y119 K320 : K386(X,Y)(X38,YK3),,B6ڋ Y6 X6Y17 X55 225 507 Y5,07. (X,40)(X10,45),,BF78YY17@ X7J* 1,07Y4 X1 107m>K3$((X),1)7~H(4,X5),K3$7R(10,X5),K3$7\(16,X5),K3$7f(22,X5),K3$7p X7z(62,142)(104,162),,BF7 3,08(63,143)(103,161),,BF8  1,08'(114,142)(156,162),,B8D(166,142)(208,162),,B8Y (8,19),"WACKO"8k (32,2),"by"8 (28,3),"RICK COOPER"8 (30,4),"C 1987"8ށ 25108聦 27308:DRAW RACKO TITLE9+ HDRAW"BM50,35;U30R14F2D8G3F2D2F2D2F2D2F2D3L4U2H2U2H2U2H2U2H2U1L4D17L4BU20BR4U8R6F2D4G2L6"9 "BM40,5;F2D4F2D4F2D4F2D4F2D2F2E2U2E2U4E2U4E2F2D4F2D4F2D2F2E2U2E2U4E2U4E2U4E2U4E2L6G2D4G2D4G2D4U4H6L4G6D4U4H2U4H2U4H2L5"9 (43,7),14,1:C "BM 83,35;E2U2E2U2E2U2E2U2E2U2E2U2E2U2E2F2D2F2D2F2D2F2D2F2D2F2D2F2D2F2L5H2U2H2U2H2U2H2L5G2D2G2D2G2D2G2L6E2U2E2U2E2U2E2U2E2BR4R5H3G3":U $(87,32),15,1: . "BM123,33;BU6U14E8R12F6L6H3L5G6D12F6R5E5R6G8L12H8": 8(125,24),14,1: B "BM163,34;U29R5D14E14R5G16F14L5H12D12L5": L(165,30),15,1;! V "BM200,35;BU6U18E6R8F6D18G6L8H6U3BR4U12E4R4F4D12G4L4H4";4 `(203,25),14,1; j 11,0:(8,21),"PRESS 1-0 TO PLACE ": 12,0:(8,22),"OR N FOR NEW CARD": 1,0; t; ~: DISPLAY CARDS; 2,0; X1 10; (P24034,45X8),0,1; K3((P(P2,X)))1< ((P21)68K3,X5),P(P2,X)< X< Đ<5 : SHOW THE DISCARD x 1,0=D =` : PAINT CARD TAKEN BOX=s (172,151),0,1=y = : PRINT SCOREBOARD= 0,0= (235,45)(310,138),,BF= 1,0= (32,6),"SCORE"= ܀ X1 4= (30,7(X2)),X>! (38((SC(X))),8(X2)),SC(X)>G (38((SH(X))),7(X2)),SH(X)>O  X>]  X1 4> (240,55(X16))(310,71(X16)),,B> " X> ,> 6: ADD UP POINTS> @ Y1 4> JSC(Y)SC(Y)5> T X9 1 1? ^ P(Y,X)P(Y,X1) SC(Y)SC(Y)5 : 2930? h X? r Y? |?4 : GET KEYBOARD?\ J$::ALLOW FOR KEYBOARD DEBOUNCE?f I$? T120 T1T11: 3050? TM$"1" RT1 15,36 : 15,2? RT1 14,18? … TM$"1" RT0 14,36 : 14,2@ ̅ RT0 15,18@ T10@$ RT1 RT0 : RT1@7 I$"" 2970@= @E @T  &HFFD8,0@\ 32@f  "M"@n & @} 0 &HFFD8,0@ :32@ D$"1" RT1 15,36 : 15,2? RT1 14,18? … TM$"1" RT0 14,36 : 14,2@ ̅ RT0 15,e w u d inv help look get open quit restart score"Y~և:"To get through locked doors, just make sure you have the right key."Yׇ:"To win, you must find the ";YO(6579):OO7697284Yم (O)0 ((O));:OO1: 217 : "."Yڇ: 68Z:QUIT/SAVE/LOAD/RESTARTZJܒ 282,0::"Are you sure";: YN$: 282,255Z^݅ YN$"y" 68Zޅ C$"quit" 282,255::"Thank you for playing "; : C$"restart" : 17Z߀ G6581 6655: ((G));: G::Z 235::Z 65496,0Z[ :WIN[:[4 G1 168:" You win! ";: G[b G255 1 8: G,1: G:: (79,"-")[ I9648 9727: ((I));: I[:[C$"quit": 222[:SCORE["Your score is";:202:SI100"out of a possible"(6580)100".":& WACKO&( PROGRAM FOR COCO III&= BY RICK COOPER&P( P.O. BOX 276&i2 LIBERTY, KY. 42539&< C 1989 ALL RIGHTS RESERVED&F&P 3110&Z 3110&d D(60),P(4,10),C(4,10),S(11),H(4,11),PL(4),SC(4),SH(4)&n' x @203,"W A C K O"'( @262,"1) RGB 2) CMP";'2 TM$'P TM$"1" TM$"2" 170'[ 120't: @203,"W A C K O"' @262,"HOW MANY PLAYERS";' K$'ȅ K$"1" K$"4" 110'K(K$)'܀ X1 4:PL(X)0:X( X1 4:SC(X)0:SH(X)0: X( X1 K((% "PLAYER "X(X "PLEASE ENTER WHICH RACK YOU WILLPLAY 1-4";(` J(v" J1 J4 250(, PL(J)0 PL(J)1 : "THAT RACK IS TAKEN, PLEASE CHOOSE AGAIN.": 260(6 X(@(J @203,"W A C K O") T @264,"PLEASE STANDBY")^(0))3h X1 11: S(X): X)`r Y1 4: X1 11:H(Y,X)S(X): X: Y)}| 690::GO SHUFFLE DECK)P11) 1800::DRAW THE BOARD) Y1 4: X1 10:C(Y,X)0: X: Y) P21 4) 770::GET A HAND*% PL(P2)0 1700::FIX COMPUTER STRATEGY*U… PL(P2)1 2430::DISPLAY PLAYERS HAND*^̋ P2*kCHD(P1)*wP1P11*P2(4)::WHO GOES FIRST?* 990:: CHECK FOR WINNER* W10 1090::A WINNER HAS BEEN FOUND* P24 P2P21 : P21+` PL(P2)1 840: 1370::SHOW DISCARD AND GET CHOICE - PLAYER 1 SELECTS SLOT TO REPLACE+ PL(P2)0 1440::COMPUTER PLAYS+& I0 I10+0H1P(P2,I)+:P(P2,I)CH+D PL(P2)0 H(P2,I1)CH1+N PL(P2)0 H(P2,I)CH1,XH(P2,11)1,bH(P2,1)61,lCHH1,>v P160 P1P11 : P142,W PL(P2)0 1700, PL(P2)1 2,0:(P24034,45I8),0,1:K3((P(P2,I)))1:((P21)68K3,I5),P(P2,I): 1,0::DISPLAY PLAYERS NEW CARD- PL(P2)0 (P24034,45I8),2,1::DISPLAY COMPUTERS NEW CARD-@ 2700::PAINT CARD TAKEN BOX-J500-^: SHUFFLE DECK-w X1 60:D(X)0:X-ƀ X1 60-R(60)-څ D(R)0 720-D(R)X- X--: GET A HAND- X1 10-P(P2,X)D(P1)- D(P1)0. *P1P11.4 X.>.<H: SHOW DISCARD AND GET CHOICE.ZR 2580::SHOW WHOSE TURN.y\ 2510::SHOW THE DISCARD.f 11,0: 12,0.p 2950.z 12,62. I$"0" I$"9" 970. I$"N" 930. 870.H1CH.CHD(P1)/D(P1"DB$(D)" leading down."G*?:"You see: ";GA@:WHAT YOU CAN SEEG_A SL0 "nothing": 67GB Q1 SL: SL$(Q)", ";: Q: (8);(8);:GC:GD: PARSERGE 282,0GF:(16,"-"):"Command:";: C$: 282,255:GGQ(1,C$,(32))HH Q0 74H,ID$(C$,Q1,255):C$(C$,Q1)H<J Q0 123HRK: SINGLE COMMANDHrL C$"score" 234: 68HM C$"help" 212HN C$"quit" C$"restart" 219HO C$"look" 29HP C$"inv" 117: 68IQ C$"n" N19 YYYY1: 100I,R C$"n" N10 AN: 108: 68IeS C$"n" N20 FN1: 109: F1 YYYY1: 100IT C$"s" S19 YYYY1: 100IU C$"s" S10 AS: 108: 68IV C$"s" S20 FS1: 109: F1 YYYY1: 100JW C$"e" E19 YXYX1: 100J6X C$"e" E10 AE: 108: 68JoY C$"e" E20 FE1: 109: F1 YXYX1: 100JZ C$"w" W19 YXYX1: 100J[ C$"w" W10 AW: 108: 68J\ C$"w" W20 FW1: 109: F1 YXYX1: 100K] C$"u" U19 YLYL1: 100K?^ C$"u" U0 AU: 108: 68Kx_ C$"u" U20 FU1: 109: F1 YLYL1: 100K` C$"d" D19 YLYL1: 100Ka C$"d" D0 AD: 108: 68Kb C$"d" D20 FD1: 109: F1 YLYL1: 100Lc"Sorry, you cannot":68L6d:POSITION SECOND CHECKLNe YL0 YL0: 99Lff YL1 YL1: 99L~g YY0 YY0: 99Lh YY16 YY16: 99Li XX0 XX0: 99Lj XX15 XX15: 99LkSL0: 29M l"You cannot go that way. There "DB$(A)".":MSm:CHECK IF YOU HAVE THE KEY TO THE DOOR:F=1 MEANS YES, F=0 MEANS NOMjn SI0 OF:114MoOF:F0: I1 SIMp SI(I)O F1:ISI1: I : IMq F0 114 : 116Mr"You do not have the ";:OO7697284Ns (O)0 ((O));:OO1: 115 : NtN.u:INVENTORYNGv"You are carrying:"Naw SI0 "Nothing":Nx I1 SI: SI$(I)", ";: INy(8)(8);:NzN{: MULTIPLE WORDSN| C$"get" 176N} C$"open" 128N~ C$"look" 159N 99O:OPEN A CONTAINERO;:FIRST CHECK IF CONTAINER IS THEREOL SL0 157OF0: I1 SL: SL$(I)D$ F1:OSL(I):ISL1: I : IO F0 157OJ9728O76: (J3)&HFE "You can't open that!": 68O (J3)&HFE 155P:OPEN CLOSED CONTAINERP-:CHECK IF YOU NEED A KEYPJKJ75: (K)255 145P:YOU NEED A KEY. PEEK(K) IS THE OBJECT NUMBER YOU NEEDP SI0 143PF0: I1 SI: SI(I)(K) "Here goes...":F1:ISI1: I : IP F0 143P 148Q*"You don't have the ";:O(K)7697284Q^ (O)0 ((O));:OO1: 144 : :68Qy:YOU DON'T NEED A KEYQ"It opens....."Q J3,&HFEQ (K1)0 "...it's empty!": 68R (K1)1 "...as you open it, something falls out!":151RK (K1)1 "...as you open it,"(K1)"things fall out!"RYJ(K1)R I1 J:F(K1I)76:FF97283R (F)1 F,(F)2R I: 190: 68R:ALREADY OPENR"It's already open.": 68S"I don't see that here."S 68S7:LOOK AT OBJECT (CARRIED OR IN ROOM)SN:CHECK IF CARRIEDSWO1Sh SI0 166SF0: I1 SI: SI$(I)D$ F1:OSI(I):ISI1: I : IS F0 166S 170S:CHECK IF IN ROOMS SL0 173T)F0: I1 SL: SL$(I)D$ F1:OSL(I):ISL1: I : IT9 F0 173TKJ9728O764Tq (J)0 JJ1: 171 : JJ1T (J)0 ((J));:JJ1: 172 : 174T"That object is not here, nor do you carry it."T O(6579) 227 : T 68U:GET AN OBJECT (IF POSSIBLE)U<:CHECK FIRST IF IN ROOMUM SL0 187UF0: I1 SL: SL$(I)D$ F1:OSL(I):ISL1: I : IU F0 187U:UJ9728O76U (J3)0 "It's too heavy to lift.": 188V (J3)1 "Okay": J,&HFF: 202: 191: 188VW (J3)&HFE "You cannot pick that up": 188Vf"ERROR":V"I don't see that here."V 68VV: SHORT LIST OF OBJECTS IN ROOMVSL0: I0 79:J9728I76V (J)&H7F I80: 200W (J)YL 200W&… (J1)YX 200W>Å (J2)YY 200WTą (J3)3 200WjŅ (J3)2 200WSLSL1:SL(SL)I:SL$(SL)"":KJ4WDž (K)0 SL$(SL)SL$(SL)((K)):KK1: 199Wȋ IWɐW: SHORT INVENTORYX: CALL WHEN YOU PICK SOMETHING UPXSI0X7̀ I0 79:J9728I76XV΅ (J)&H7F I80: 210Xnυ (J)&HFF 210XSISI1:SI(SI)I:SI$(SI)"":KJ4Xх (K)0 SI$(SI)SI$(SI)((K)):KK1: 209Xҋ IXӐX:HELPY1Շ:"Commands are: n s ?????????????????p;?߽????????;8?x?0?p/?C?ǀ <?{x|???ߏ??n?>??p?>?=7^? 880000p?6.&8"( ? J0jO\U% 880000p>  6000> 282,255>*: PLAYZARK>I 80: 0,0: 8,63: 0,0:1>a 8: 4,1:: 4,5:> DE$(11),DB$(31),SL$(20),SI$(80),SI(80),SL(80)> DE0 11: DE$(DE): DE?K in scrubland,in a grassy area,in a forest,on a beach,on a riverbank,in a desert,in a swamp,in a garden,in a room,in a maze,in a cave,unvisitable?j DB0 31: DB$(DB): DB@ is no way through,is a wall,are trees,are thorns,is an iron fence,is water,is a cliff,is a hedge,8,9,is a door,is a trapdoor,is an elevator,is a teleporter@ is an escalator,is a gate,16,17,18,19,open,is a ladder,are stairs,is an elevator,is a rope,is a trapdoor,is a teleporter,is an escalator,is a door,is a path,is a gate,is a wayA "Welcome to ZARK 1.0, written by Stuart Wyss-Gallifent (c) 1998"::A 65496,0AE"Name of adventure file (DIR=DIR)";F$A^ F$"DIR" : 14AdA 65496,0:M""F$".ZAK"A 65497,0A"Your adventure today: ":A G6581 6655: ((G));: GA:B"To win, you must locate the ";BO(6579):OO7697284BO (O)0 ((O));:OO1: 24 : "."Br:"Which is described:":OO1B (O)0 ((O));:OO1: 26 : BYL(6576):YX(6577):YY(6578)::"The top score is"(6580)100C-:: (32,"-"):"Press any key to start": 44539::SL0:SI0CA:ENTER AN AREACU SL0 191C{O3587(YL3072)(YY176)(YX11)C :C!N(O):S(O1):E(O2):W(O3):U(O4):D(O5)C"DE(O6)C#OO7D$ N9 N20 N1(O):OO1 : N10D-% S9 S20 S1(O):OO1 : S10DW& E9 E20 E1(O):OO1 : E10D' W9 W20 W1(O):OO1 : W10D( U9 U20 U1(O):OO1 : U10D) D9 D20 D1(O):OO1 : D10D*"You are "DE$(DE)"."D+F0: 45E,"You can go ";:F1E7- N20 47 : F0 44EG."north, ";Ei/ S20 49 : F0 44Ey0"south, ";E1 E20 51 : F0 44E2"east, ";E3 W20 53 : F0 44E4"west, ";E5 (8)(8)F6 N9 N20 FN: 59:"north."F<7 S9 S20 FS: 59:"south."Fc8 E9 E20 FE: 59:"east."F9 W9 W20 FW: 59:"west."F: 60F;"There "DB$(F)" leading ";:F<:U/DF= U9 "There "DB$(U)" leading up."G> D9 "There H U%ppppppppppppppppppxpppxxpppppppppxppppppxpppxppxppxxppppxpxpxppppppppppppppppppppxpxpxpxppppppppppppppppppppppppppppppppppppppppppppxpppppppppppxpppppppppppppxppxppxppppppppppppppxppppxppppppppxxpppppxppppppppxxppxpppppppppxpppppp  q   -@Ht:B@%>@D @P(`````< EQD "($(0$I$0)"P$HxD0eQI  (0 ) @0ـ0R@@Dd@"((P @PX@@"(4     c !Ā(f $0n2@Q  BH (Ij $P0X@ D`4(@`(F$ 8P@Hv-C (p6Ͷ(,5H)` <q 89t@34x6aD?)uiJ"AŁH0 <S@D0Rh4 @҉RI< 6P`DQd%H@`$H’ P @BI :M$".(  ?` p(a` p$PP e@Ǡ T0ŀ |P )8(A)&C ` A @A ` ր P ;@>`0`$E ߀`0a c`P0 f`6P 6 x`xf`T`(00 ` )pd@`Q|g|03z\w1;;Kp/pPJ$PmH_~8 (0$Hc|c4a@<@ (@f1H *s 0&Z[À@@b[! U;A bI: F+ xi?ր OI!eAc No.0+_<\;+ᜥc0 ]O ?X ` @ f3Mh Ā  6L+I$@ Ch% HB {- G0 C@5lbqHH 4SGBi`QQ%@0 {1tGgG=_!(­! = nVP @A `OMSw3ml $/ KH`-`D78P@P BP08   CJE$@pp CmH>~  p ^ @  @8 G@  aڨ x` 0O8 p@I*̠0 $L0f\| 0@Hf0fHU m@ H0 @a1@@ _?C0MF0O@ @@@@  @|_ < @?D @d8DG DAp IJ(@' %E^  $E @ ((`(0oP0 /R/dQP @  `%R` HJC2`H@ (PP ( @ `oXhw`p3=Ow'?Z=~׀`6s~ vN=CǾŀ;{|Y3c)ŏx{}w[0u_e;8̓cpwp};:ޟ8K m0ah<(0R.?c;;"v~ooHA!` AAc ???760?0~`???8?8???;????`3PBV`Xb 0bw3@3"RD̉dH@UUUJUUUUPPTUBE`T P: @PPPPUUUUUUUUUUUkUm+hmow|ttW-߿nJ/l8 ` =8ppp88 ?=83 83`3݆݆``pp?7y}x3p3Ⴠ   8p8pp8=`` ` ` p ` 0p 0``x|<p 00000 0p  p p p ` p p p p p`p`` `` 0`0p000p`?18'; %"8|4` `<` qcl 8<@ <3”(  3( 0 0,pB@]ݿ0 1`X`\ l\ v0`@pxx ] DÀ|xG(m80m^ R8@l%|8 |<cې`f> Y x00>!=\ ¿qQb?P(Pxng|`P@c~>x e0`a/ s88~w;?@< Tpc8t?? 8"R 6$78 `>< 8 ϣ|7{88ppx8xtp`px`ĀLXs Tspzrp0px88<<x p`@a!``80 00 ((P((0`0`04 0tK0`dɁXzV3Zp ``ds`s plqc90`H@x+@{ PpxR@#0q0 L)J@R q8P * U0P 2 e( L%R@J”[@#Ue(U$ s2ls`ﾠ?qpX+?<{=O}߻`x 8c@0 }o~o8ps| |> 8> >>8x xnx|pp|x 88xxxxx}}|>>>߃??7?757?8`?0pxx`=|>8|40123=>0$\ 405"9$\ ݝ9"SCREEN /NIB" !5%9o 1?@% o1?0 0@%9' &䆀1! ܎1?@$09o1?0 ~5@ˌ%9'5Öͧ٦'5Ö̪ &ֆ1! 'XXXX  TTTT 9@@%9 )&n8&M"NIBLOADR&K (&HCFC3)&H8D &HE76,&HCE: &HE77,&HE7&]F1$"PICTURE"&jL2&HE92& X0 (F1$)1& L2,((F1$,X1,1))&L2L21&ҋ X& &HE6E4,&HE6&" &HF00&,2&64' X&HFF00:Y&HFF7E:X1,52:X3,63:X35,60'"TX$:TX$"Z12"460'3T1(TX$)'H(Y)1280420'bY,((TX$,T,1)):T'w(Y)1280440'’Y,13:400'̀TI1TM:TI'֢44539::(( I,SAAY,GORGE,WHO,MADE,UP,THIS CLOE NING,BUSINESS,ANYWAY,U,NO,I,CANT,MAKE,UP,MI,MIND, DOES,MISTER STAU R,NO,ABOUT THIS,Z12(TX$)'H(Y)1280420'bY,((TX$,T,1)):T'w(Y)1280440'’Y,13:400'̀TI1TM:TI'֢44539::(( I,SAAY,GORGE,WHO,MADE,UP,THIS CLOE NING,BUSINESS,ANYWAY,U,NO,I,CANT,MAKE,UP,MI,M%& 1000::R()&# 440&?= 6);"SAFARI IN INDIA"&a>S$"SA FAUREE IN INDIA":470&? 1);"IT WAS A DARK AND GLOOMY DAY AS WE DEPARTED FOR THE JUNGLE"&@S$"IT WAS A DARK AND GLOOMY DAY AS WE DE PARTED 4 THA JUNGLE":470'OA 1);"WE LOADED ALL OF THE FOOD AND GUNS ON THE ELEPHANTS AS IT WOULD BE A LONG JOURNEY"'BS$"WE LOADED AWL UV THA FOOD AND GUNS ON THA ELAPHANTS AS IT WOOD B A LONG JURE NEE":470(C 1);"THE PEOPLE IN THE VILLAGE WERE HAPPY TO SEE US GOING FOR THE BEAST WAS KILLING SOME OF THEM"(DS$"THA PEEPLE INN THA VILLAGE WERE HAPPY 2 SEE USS GOWING 4 THA BEAST WAS KILLING SUMM UV THEM":470(E 1);"WILD ANIMALS ARE NOT KILLED FOR SPORT HERE BUT ARE HUNTED DOWN WHEN THEY KILL PEOPLE")DFS$"WILD ANNIMALS R NOT KILLDD 4 SPORT HEAR BUT R HUN TED DOWN WHENN THEY KILL PEEPLE":470)G 1);"IT HAS BEEN A LONG JOURNEY AND IT TIRES EVERYONE OUT BEATING THE UNDERBRUSH TO FLUSH OUT THE BEAST"*%HS$"IT HAS BEEN A LONG JURE NEE AND IT TIRES EVERY 1 OUT BEATING THA UNDER BRUSH 2 FLUSH OUT THA BEAST":470*I 1);"AFTER MANY MANY HOURS WE HEAR SOMETHING AND WAIT BREATHLESSLY --- WHAT IS IT?"*JS$"AFTER MANY MANY OURS WE HEAR SOME THING AND WAITT BRETHLESLEE WHAT IS IT":470*K"BEAST/BAS"*X1 (A$)+@225,(A$,X,30);+#P1 30:P+*X+10+9:+OA&HFF00:B&HFF7E+o’ A1,52: A3,63: A35,60+u̐+րX1 (S$)+ (B) 1280 480+ (S$,X,1)" " B,(",")+ B,((S$,X,1))+X+ B,13,  ( (B) 64)0 530,P1 250:P,$&X+10+9:+OA&HFF00:B&HFF7E+o’ A1,52: A3,63: A35,60+u̐+րX1 (S$)+ (B) 1280 480+ (S$,X,1)" " B,(",")+ B,((S$,X,1))+X+ B,13,  ( (B) 6`){V 2@A0 0@ ̀ @>@@ p%0@V8 p0J@f #"Q "$"1 "J1@ ƀ%Em00m E6(ƀ %({080pPP H@ p@~TP%{@@@ƀ"PE"P ){T2@Gb$0@$*@̘$2@e0>@h$b%0&@"O1V25T25L5DDDDDDDDDDDDDD;O1T250ECECECECECECECECECECECEC"&g4:200,&H66FF: X&H7F00 &H7F91& H$: X,("&H"H$):& 9E,33,30,6,10,8E,67,0,86,8,A7,8C,3A,86,6,A7,8C,34& A6,80,80,30,48,48,48,59,6A,8C,29,27,E,6A,8C,25,26'. F4,E7,A0,C6,8,E7,8C,1C,20,EB,86,6,A7,8C,14,A6,80,26,A'e A6,4,81,22,26,C,30,5,A6,80,80,30,48,48,20,D9,0,0' 8E,67,0,10,8E,E,0,A6,80,A7,8C,3E,6F,8C,3C,A6,80,A1,8C,36' 26,D,E6,80,A6,80,8D,C,26,9,5A,26,F9,20,EC,8D,3,27,E8,39( A7,A4,10,8C,25,E0,24,5,31,A8,20,20,4,31,A9,E8,21,6D,8C(M F,26,B,10,8C,25,FF,26,3,6C,8C,4,1A,4,39(l (&HC000)68 DK1: 13( &H7F4D,6:&H7F74,&H1D:&H7F88,&H1D( 4,1:1:1,1:Z:&H7F00:I15000:(14(DK M F$,&HE00,&H25FF,&HA027:) M F$,&H600,&H1DFF,&HA027:)1)Sd"jn\MoocljhWooOolOcoo7lOCcOOloOc[9ol?j`T0j`S0j`S`j`SljeSoOco)e"oOcoOcmo?glgOcmo=glogaoe5=4dagc5e4l`Allagc=?=gn\Ro`o[:030`<)f"71`<70`?3al_Cal?3`o?cmo?C`d?3@d<30`=00`000d134a00@d0C4`100d*g"030`000`L3ad@34a<3`l?gao?clooolj`WooOolmO?GcoM?glLoDcm?7dlo*Wh"GcmO7g\K013[1@0@043[1@10000@j`@0@43[10*j"01`<3``?30l<34lO30l?3ll?gll?30l<3al?cll??cggO4m4c`7\600\:00@0400010010N\+m"401404140@04<331`M?73ala<74`<33`lO3bllo3lloc[9Ool?0023000`0+n"@840010D94j`@00@G[2`020N\700C[2@08j`d03o3[1P0Oh>\5004666200,o"``@H80000<<462000000@84210P@8000010j`P0@400@00000C[1@3@`<00,_p"0031`0?30`?3`l?;ao???llo?n\Noochl<0Pd0108>\60084130@8010P43,q"[1`010@4020@42000D00@0000X43[1010020@j`d0o`00n0l01oR0j`@07f,r"23300Oh>\400LHh0400@800aeWS0PA8@7[2`011PS[1P01300<303[1330`-"s"\4`\Gookjn>3P083[10020PP8020P0020j`H0-ct"0@010P00010P4420@>\50041j`@00@0410P8413[200H1n\700P0o`000N0-u"oo`0110@0oi1oT0CoTD@@DakaDAE57fNO?]7UQ1E7ERC0@4400001004333-v"50P>\:013[1@0``<3000<30`l<33dl??c=cC?g=cOomn\Aooc`n>0PP>\50.&w"0X88200P>\:01<8020Pj`P00@4010@44410j`X01>\500800P000@0100;`.gx"31<0T0I894;o05@0OoC@h3Q7@?o@A?P0AOlACgkT@@D31cgPl80000LNnHi.y"HHL94254GCV58PD40043[1`010104000`?@ABCBEAST BAS!BLOSSOMSNIB&~CLONE BAS,EMERALD ZAK/ FM104098BAS;rHICK 102NIBRHICK 103NIB,VK-SCOPE BAS9LOOK OUTBAS<LOOK OUTNIB*/MICKEY NIB6dNIBLOADRBIN`NIBSHOW BAS#NONSENS2NIB>PICTURE NIBvREAD ME BASSAFARI BAS (SPILLER BAS5ASPILLER TXT SURPRISEBASJSURPRISENIBWACKO BASZARK BAS@0100400@D;010P410@001@<>\600@2008@2@`3R550/k|"f3=<34LQl1l01?`O0000P73o0n\40?Lo`01C77Oll00D44@G?]UUPaaUQ`h/}"hHH845A@@41@440000P4004444@140@0400@04=30d<3001000=00cmo?lm/~"o?oO?mOccomn\:oo;080[[10028800000P20;[200@1`40007[102Cj`D080."80S00`030<<0`00P600310Pj`D0200@44<00`P@P2100400800P`020PP000o"080`c3l10LEo1AD51Ol1`@00Oh3l?l0?KH000@03?o303C;<6FK846B0Q050"5@440290P458PB00`01000003ja80`>\5ooLocco4dOOcj`Sol8X0P>\>080"0PT0`B0n\4070<@140<00003040C30<<00`>\600410Q`0P0000@000P0`P12"0:80PP0000@221900084PTP1P0PR01@@40@l1m0DD3A@D5hP7i@EgjD11ol1s"3`<40D41@=4F66fO=hHL4210@41@0@B014@004P00D0040@PB400B08000;1"[403lommoogdlMa=?\8083P8?0P22`62`1"8<0PC[1@0P000443PS@W20P00000880BB088400@20P`DD0i<=4d@A0100P26"0P007A2w"50@004100410@@0004004408P@08T0086208PT@2@0B0200Qj`@00^\80?o2"oogoooooMmmmoj`Oo<`002044X001P20046:04X3[1P02100H207[1P20`82"0P\20`@>\40800P080208PP@PRP0J32`PCO1=\60400@>\60401j`@0P`@0@P450`0300411`400040`>\Boc<3"XZ0ZP:0X8PX808@B2X0S[1@2:@:H00R20j`L00PHH8046210P0001WR\VR13"0000<6NdbcS3?7?l``00\4062HP0:0h;S><`Tb04>"83P^6d2VR<0R2<8<8<0A04@040CA1=45A5LEde3AAEG4A@E5Ade?N\7?al?4"3`M70a40d0A0=114d43@`I=3Td3@M11db=``CdlW`OCao>\>ocl?0:XZ0P14"4YP0HP1W[1020000202HP4>\6008ZP006:>:200000R[kK<688X@02bjhhP5"002k;<000olOcl??`c?3o=coeggEAL50D100002>:800:8;P4Rf3:<>l`325B"232X>`c3<<<>Mekg`i`a>\Bokn_;b^:ZPX6"2R4@R00A208802>\60220Z8006j380010V?RHZNF30@20h;006808@8SP267 ":SPP\\\\SPPR088XPPB140283RR00R00S0K9\TRb@;;8\RR7J"2>;8lcc7Olg08S^^fJI8XPRj`H00`01j`D0omi9j`@020880PPR0PZ2:0ZZ7"8^\50080gIW[100P0SM<\Gocn_ZR:8ZX88P20022K[1P022`07"L6jRZI`000P[;ZZJ000022P\400008RPh:SPZ60Q:R0H60Q0P10W2PB0PP28 "4HQ1R08XPP00RD0R>>4;0RP`hjb:k8[9>``_02d1?<<<= &b700,30720:8:F$(20):80:SL1:HN2:E424064:282,255:59078,33:E,0:63:52: 2: 2&SS0:0:0,0:0,0:8,63:1,11:11,11:1:33,0:3,0:"NIBSHOW 3.0";:0,0:60,1:"Border: ";:60,0:"Hscreen:";:0,0:"Drive:"DR;:61'0,22:"Arrows"14)"D:directory C:change drive S:slide show X:exit";:0,23:"Space/Enter:load B:border swap H:HSCREEN swap T:comments P:palette";' K09:0,0:A1K'HS(A1)(((A1)4)4):VS((A1)4):HS203,VS4((F$(A),8)"."(F$(A),3);:A(SOLSL:HS(SL1)(((SL1)4)4):VS((SL1)4):HS203,VS4(0,1:(F$(SL),8)"."(F$(SL),3);:0,0:135,0( A$:A$""9:A$"D"56:2( A$"C"28:2( A$(10)SLSL4:SLK SLSL4) A$"^"SLSL4:SL1SLSL4). A$(8)SLSL1:SL1SLSL1)SA$(9)SLSL1:SLK SLSL1)A$"X"0,0:1:(&HCFC3)141282,0: :)K0A$" " A$(13) NLSL:30:2)A$"B" BC0 BC63:61:9)A$"B" BC63 BC0:61:9*A$"H" HN4 HN2:61:9*7A$"H" HN2 HN4:61:9*vA$"T"(E)670,17: COE7E246:((CO));:CO:9*K04*A$"S"SS1:68*A$"P"A015:A46,17:A;:A46,18:(61465A);:A*SLOL 9+HS(OL1)(((OL1)4)4):VS((OL1)4):HS203,VS4+L0,0:(F$(OL),8)"."(F$(OL),3);:7+`7,0:0,0:"?";+A$:A$""29: A(A$): A0 A3: DRA:6,0:DR;:56+F$(F$(NL),8):(F$(NL),1)"B" I1: I2+ I1(&HE10)24633 :52:33, (&HE3C)18954,4! I1 FS&HE92 : FS&HEAE,b"X07: FSX,((F$,X1,1)):X:HN:DR,#65496,0: I13840 :3644,$65497,0:0:135,0:(E)6738,%(424311),&65434,BC-#'CM03:CM(CM)(65467CM)64:CM:A0:CM6146561480:CM,(65456A)64:AA1:CM:0->(A$:A$""135,0:-R)SS0TD -g*(423943)051-}+(423943)4249-,(423943)4551--TT(423944)48: TT1 TT947-.T12(TT)2:T:T0(0):51.#/I(423944):I8364: I8265: I7166: I6667:51.Z0T015: T,((A$,1(T2),2)):T:423943,0:51.1DCM(3):CM(3)CM(2):CM(2)CM(1):CM(1)CM(0):CM(0)D.2CM03:11CM,CM(CM):CM.340/465496,0:M"NIBLOADR":65497,0:(&HCFC3)&H8D &HE76,&HCE:&HE77,&HE7/ 5/0665496,0:M"SQZLOADR":65497,0/67/865496,0:E,0:35,15:0,0:"Reading";:J1:S311: DR,17,S,A$,B$:A11283209(A$,A8,3)"NIB"((A$,A,1))0 F$(J)(A$,A,11):JJ1 : (A$,A8,3)"SQZ" ((A$,A,1))0 F$(J)(A$,A,11):JJ10!:A:A1128320;(B$,A8,3)"NIB"((B$,A,1))0 F$(J)(B$,A,11):JJ1 : (B$,A8,3)"SQZ" ((B$,A,1))0 F$(J)(B$,A,11):JJ1068,0:HN;:1?A$(&H7C)(&HFF):PP115:B$B$A$((&HB0)PP)(&H12):PP:A160:1024A,((B$,A,1)):A:1024A,57:01025:1@A$"00010203040506070809101112131415":1AA$"00043236374433383552535455603534":2BA$"00022016182219232630585150172106":2ECA$"00010809111025312724141513292812":2D32,15:"Delay (3-30): ";A$:TD(((A$))): TD3 TD302: TDTD602EA015:A,0:A:NLSS:30:SSSS1:SSK1 SS1:69:694433383552535455603534":2BA$"000220161>2bjii910P02008N"`jkX40RR00RR00>72Qi7ALJ2P:2Pb831HC28hX32X<^^0<888a[__9"RP0bhhhXRP`X\\>N>6XcJ33\Mm0f0`K9QP202h7P4QR0l3T109"H?3\f71`873`l<0b338o=S1bd480@08000\Yokm_;`<00@<6Q0P288`VBS8?0P40P>3j3S<<:"0`b0c2?HmSlo3`\400800T0P00P08B;"00@0P0P0@200800T0P00P08N\A0<3[9?omo_Chd]3X8XTZ:6PTZ2Bh;3PQlTaS79lLk`nc`;031llolM1020PHLL=400288P;"080R20:09907V>:k;8\\Rb`;>>c`a8?<2a4miCc@@4`a0L`GDGA?081R60@;"60`P0008P04080891B08Q22;1@0200Q3[2`0100001>\500<00>\Noocgd?<"100PP8P240PP@84AH_?70?_7RS00000n0S;92Sk3[>Kc<<0`0@0\@0P46`N<^"62LfSS48P40@=13040801PT262080000B:88P20I0\oo80<@`a3@@L<=M=<<"@4A`@103<`D:0H11608H00`ol`2N???7455U6AMmbcE@@oa1DE07Oo`50003`3l0h3P<6="`O3\500P@5000440@4<3[1010401000100010j`@0@11="00100jaoo_gl_3al_2bL;9`]?;el_?glO;kmo_n\9o`o[3030P<20X40P80>%"P029008PCB6<08a302<0`3<@<<<<0???30000376207o?l0o0?0?`?003oP>f"oSo0@0000?R70N1a>0l3PL1`33l@b@@B0@20B3[903`jcko?n\R00<"3o3084000cc0200?o3l0o`?`0I3o04PPo`3lhc@>1@48PPSCoUh38P3Ql2d>"C0400@010jb40j`H3jd3o0n\O03c0004?l>\500Oh0000o0?oP70\50?00l0h0003P>000081P60H10<0P?"6<@b3@n300<3j`@?Sflc?cc[13o[9?o`moOgl?Ogjc3ooOolj`[o0`0000??"3<0`<0o??`o<`?3`l3`l?cl?3 8'"O, @!<  \p 0J[m 8$dAA0^5pE8N!wI@GC5@083`P@ 3cj0bhG ~J9  P2 @O 3P0 px@I@(T0C@@W`D\8@ Pjs1f (@@` (H](H   ݂no0  ;\0@5P`` $ , X)|HP ~00eG`4P &\0(Fɀb0`V "DAHDP DV(PA P<= @" v0@ 0xB0  PP$tz@:P@ P@E@ `,P `ALP֜@:0 р K 72 `@~ 1|@+ |0p0@@9| ( P ( 1Zf`h(`0 ( f`:(P88 ( 6cl0 H@ b$ fH @D0 (b#  D` ` 3 tT P"@0@vvT#@P(6`<{) AH$v@j ` p0~ K0P'P `!00D|p>| _f@3RH9GfS `Pɀ $@ > Myd Wep ` @sa__06 V c<Zwg> (뀦w(u\P.wύ~0YR{P Y7w><(`† р a| z  d@&v^(B`o[e-06V0Ӏ>$Q` Ān0a@ k#` }83d0@+ ?+ p`<e0) pl  `0)E{( 8,.l o9@ /t1EȜ' 0҇]{_^~ޘʡ?GC 6ab| 7zآ.>"{{Bx_/|{|ɪ49>A+)qvHtp~Ll@pv `i Da  G@.@D@p# A<O8p8@@S X@^~  x??888w8x8888xx`0?0?Á8?8?~{1133ysss<9y9o?{ߟogoggwcnfscc3??g??c:\~o@ ￏϞ`ǞǀǟGǿۃ{{ǟss0;_? ~=?9~q~  0?8" =/???Q0qX7^Qǟss0;_? ~=?9~q~% Ph`h`h`h`h`h`h`hh`h`h`h``gh`gpx`g`x`g`ll p` xp pnp `n`x` `n`o `o`o `n`op  `g gopx` `o`` h``o`oo`o```` `h` `` ``j `o` ``j  `jn ` ` h``n`h`   n`onి `n`n ` `n `  ` `   𠫠n  `o   `j ``o  l ` j``   `j ` o `o`j`o`o ok ` ``h`h `ih `h``h`h`h`*`*`o`po`P0obn%G%G%G%G%G%G%G%G%G%G/{TdT5E0COMENTTdT5E0COMENTD@@  3 ` 6'@(D )6v\߻@`.("< @sv698D&$@bDIp   9  DH87@p= o ݷX9&)hD @88p!HpcP1L1@ 8 `f * p@38 `B ΂ p8S8p;p ,̀ lqhw8 p1$6 p tA\K% 30`q$`VP >:pÀ[}0WeCt8% LB= F u`,U *N @``)aՅp }#` $(@.8 8%cdpC8x  a22P `(Ps* bH@ 8( a0 ^0l  0 Fty>8  x p 3p( T1 @ 8EF*pXy@ _` M@J0P@ |L ~@p8 H@p4pp(Bapx, (`8 P60 4x` gXI`W 8zS`c8@;@ r(W.88`.:$6el8% pjh 0j l.p"@'H ` 009\pA $8<Y"QAaj$@5:$@0:PV  0PpC 9` C >p`(8f&$ `?> < 0690O w|f<B € (‡`(v;(!(A ( (. (4@"(( 88 0 a 0?J}oߋ?5x?L&}W~}|}ޏ{W{{w߬fr?׺w<߿z?n{=?| p`ppp 0?>8~ ~ owp[q9yqy?< ~>;{{{q<xp`0088`?6<&8(?8F0fK1P0088L S)ppppppppppppppppppppxpppppppxppxpppppppppxpppppppppxppxpppxpppppppppxpxxppppppppxppppppppppppppxpppppxpppppxppppppppppppppppppppppppppppppxpppxxxxxpxppppppxpxxppxpxxppppxxppppppxxpppppppxpppppppppppxpppxpF@0&  2 ,( @  "@@P (`FfPE$€PH`P(0)&IDP $ (  H RDPH)J%1)@M@)ԊzAEj!  $I{"H@( HDL H("(aLe`%(xH!N$xF @ aL ̀a(^ D (!$@$H  I(LH$ +0V  C;Q@$ {@J @C@ @ @ @6e0@XP @($R@DD H $DD (H(dy6P" jD$  QDhF @J( A`I p$@@x 0 H0  !Ix,8  y @ @.X@h!0{~P@ @, Μ 0D@8 gƢyDpN|h)ג {9ʢi@x $$ lE1,($$@F |HA࠸I%= HA0HIla|? %{K )  %+ :*\X\>< @"u@=0TA@0!5@/#!8  lC:@`}ix PQO)JIA~@`8 EH `h>06#$l @AHQ4!"lfLH (,(  }> @$ < AD#p (,>|<3) (`@$y"#p0:A H8,  `M(@P `(zh3Z|U`%99S?W>&_LjKk;<` b,B 91/:k?s{ߍ'o>Ans? ճ0p??<f`f`0~``18p<p<<?@  9????==???8>>sp>y>0}wx |xx>x>??>>0|?????l| < ? ? ??_o`?<`?pxt8|?~??o7{8x|w?=< 0  p` ` ` ` `  ` ` ` `` ` ` ` `  ` `  ?6.&8"(  I*0i*N%S)w?=< 0  p` ` ` ` `  ` ` ` `` ` ` ` `  ` `  0                                                                                                                              The Hunt for the Emerald by Stuart Wyss (c) 1998Excellent work! You are handsomely rewarded for your find.emeraldIts multifaceted design sparkles in the light. It's beautiful keyIt is small and made of silver strongboxBanded with iron, it cannot be opened without a big keykeyIt is a very big iron key, possibly for a strongbox passcardIt is plastic with small holes, probably dropped by accident keyThis key is brass, about 4 inches long, and very plain-lookingkeyThis small key has "STRONG-KEY" stamped on itcoffinThe lid is nailed shut, and would need prying off screwdriverIt is from Sears, and comes with a lifetime warrantycandleThese new candles are self-lighting. Ouch!!!runestoneOn it are written mystic words, perhaps a password...milkcrateThis wooden crate has no lock statueA tiny label reads "WAA Champions 2043-2044"mugIt reads "Don't Ask Me, I'm New Here" on itbagIt is dark brown, made of burlap, and too heavy to liftmagic featherIt flashes every color of the rainbox and you gaze at itdiamondIt must be over 300 carats! It's fantastic in its beautybraceletIt is made of gold and silver, and decorated with rubiesnecklaceOn a platinum chain, this topaz necklace is truly stunningcrownIt is covered with precious stones and lined with red velvetscepterIt's about 3 feet long, gold, and topped with sapphiresgold brickThere must be over 200 pounds of gold in the brickcoffinThe coffin is nailed shut...maybe a crowbar would... crowbarIt would be useful to open up things like nailed coffins... rockIt has blunted many scissors in its time paperIt is very crumpled, and had lot of cuts and missing pieces scissorsThey are blunt, but might just cut paper statueIt towers to the ceiling, and resembles a half-man half-goat>&Rd:--------------------------------------------------------------------------&Yn:&x: INTERVIEW VIEWER by Nickolas Marentes&:&:--------------------------------------------------------------------------' 0,8: 11,63: 12,54: 13,27'% 80: 3,0:1'@ "I",#1,"SPILLER/TXT"'p &HFFD8,1: #1,T$: &HFFD9,1:A$(T$,2)'ȅ A$"# " 4,0:((T$,(T$)2)): 3,0: 250'҅ A$"Q:" 5,0'܅ A$"A:" 3,0' T$( (T$,5)"1998." &HFFD8,1: #1:(CC1: C23 190(= "" 260 : C0: 190'p &HFFD8,1: #1,T$: &HFFD9,1:A$(T$,2)'ȅ A$"# " 4,0:((T$,(T$)2)): 3,0: 250'҅ A$"Q:" 5,0'܅ A$"A:" 3,0' T$( (T$,5)"1998." &HFFD8,1Z W7  @   @   @ @  @@J@@@@@@@     @@ @J ՍР@J Р@@Հ     XЍPՍ J  X Р@@ XЅР@ @]PJ    XX @@@@@]ՍP @ @ @ XP@ՀX  P`X @] `P`PX  i`P @X PPi XЅ PЅ  P@@P  P  @@X P @XPՀ@PՀNXP@Р@X] ]XР@Р] P@@PP @  ՀP  X ]PX X     PՍР @Ս]  @ @@]Р@J  Ѝ]   Р@@@XР@ ]@@@X@J   NР@@@  J    @@@@ @ @               Ʀ lj  n  ` `   Ʀ`Ƭ `` `    `Р怠` `j ` `j ` `lƠ l`   n `ސ pj Р РjРРj`Рj`Р ЎhjРn lj`Р ll `Рh ljl hࠎh  Р`Рj РРj n  nРj`j`hРj ІРj Р`j `n  Ц  j ކn j ގ`nh ``ގ`h`lh`l  nކ h掆  n` ohn Ўn` 萆h  搆Рh 搆 n h nhРi nnhРn hnІ  i 掆nh 搎 nhh掀i h 怠hР怠i nh掍 怠 Іi nކh nh掍`n`i掆h` n`Ўn`hІ 掍  n`hp`hh   ``y   ІЎn`hРРh  Рh  怠Рn0Р0Рh0Р D@  (P` 4  `) P  =U ` "{ (@{{V ڐ}7PbR0ׇbaÎ `@â @Ȇs) ` `0, {`0`&? R w>0 ;> 8  04`0 |  @ #`c G R!HL<  `X4}F.;p~P` aZ(ŀ?0`_G``j@o߆ 0==p6U=@=xS` #`{#0 ՀzVU  0R(2P% A(   0 0 `  00 `&F Pb*(10x<` 0x0pp 0 ``ü@`@`@ D`~ L`@N@D@@sD@BH@ @@`?H 00$@ 0$`  IHp@ xI`<TH0P@ 8@R<P4@ x<TP >{ @@  O?8,|  phpp` x@>?<@?appl1x00Fс08`0Ap0ಁ8 0{h:bpO0:Fy0= @ 0x@DNpOD xp   @ `|40` @O0@x@d9  8p Xx :?<@v ?v /pp|@  70@ r8.(` P:|?</x@p p< 9xv8<<  p(=(7pP`` r  p@ ph y 8*v@  @t ``DL=pD \0"xp"@>R<   !?@ ! p?|0L#"H> @@|y.nbgOg'|wI&?)JE߯y߻{ǟ?~xwq;ߏÿ; >?xx ?ߌ?~}߀߀p߸p```ssww3w3;>>lpllll|=>? ] l}{ ??>?8p ;<;>;>;3>73q7qq11S<<o<88~8@8x7p<` p p ;p ?0 p ` p  w ><`>>~8~;`f8`f{f{f{`<|<~|~}f?a?{s??Ss>s>{>{<<<?<?8?88ǜ0  ~<0`?6>%85 (  J@0j@QHW7}f?a?{s??Ss>s>{>{<<<?<?8?88ǜ0  ~<&d: PROGRAM WRITTEN BY BILL BAKER & TERRY LARAWAY, SMALL GRAFX ETC. 9/98 ENJOY.&&HFFD8,0:40:&HE03E,26:&HFFB0,1:&HFFB8,26'% :K-SCOPE, A "SMALL GRAFX ETC." TAKE-OFF ON AN OLD RAINBOW PROGRAM, ILLUST- RATES THE EYE'S ABILITY TO CREATE PATTERNS OUT OF CHAOS.':ASIDE FORM BEING AN INTERESTING SCREEN SAVER, THE "EFFECT" IS REMINISCENT OF A TOY KALEIDOSCOPE.(x:AFTER A PALETTE IS SELECTED AT RANDOM (LINES 160 TO 180), AN IMAGE IS BUILT ON THE COCO'S HIGH-RESOLUTION GRAPHICS SCREEN (HSCREEN2-TO MAX THE PALETTE SIZE), THAT IS, THE KALEIDOSCOPE IS "SHOOK" (SUBROUTINE 10000).) (:AND THEN THE KALEIDOSCOPE'S "TUMBLER" BEGINS TO TURN. (SUBROUTINE 20000 WORKING THROUGH LOOPED "PALETTE ROLLS").)2:REMEMBER "SMALL GRAFX ETC." FOR UNUSUAL AND CUSTOM SOFTWARE. WRITE US OR CONTACT US THROUGH OUR E-MAIL ADDRESS (TKCOCO @ SILVERLINK.NET) AND LET US KNOW YOUR DEVELOPMENTAL INTERESTS.")d 280: B(15),C(15)*n40:::::::*ws" KALEIDOSCOPE": T1 1500: T:::: ::::" BY SMALL GRAFX ETC.":::: *x" HIT ANY KEY TO START!":::" TAKES 2 MINUTE TO BUILD":::" USE [BRK] TO EXIT!"+A$: A$"" 130 : 140+A(1)+2+/K0:M&HFFB0+IL(4)1:LLK: M,L+qMM1:KK4: M&HFFBF 190 : 170+&HFF9A,(&HFFB0)63:10000+Ȁ I1 15:C(I)(&HFFB0I)63: I+Ҁ G1 15:20000: G+܏::160, 01,02,03,04,05,06,07,08,09,10,11,12,13,14,15, 11,15,01,13,10,02,09,05,14,03,04,08,06,12,07, 15,14,13,12,11,10,09,08,07,06,05,04,03,02,01- 07,06,05,04,03,02,01,15,14,13,12,11,10,09,08, 03,02,01,06,05,04,09,08,07,12,11,10,15,14,13, 05,04,03,02,01,10,09,08,07,06,15,14,13,12,11.] 04,03,02,01,08,07,06,05,12,11,10,09,15,14,13, 13,07,09,05,12,08,02,11,03,15,01,06,04,10,14, 06,11,15,07,02,14,12,01,13,05,09,03,08,04,10/0 09,12,04,13,15,11,10,03,06,01,14,02,05,08,07, 10,01,07,09,04,15,03,02,08,14,13,05,12,11,06, 02,13,10,03,14,09,11,06,01,04,07,15,08,05,120 08,05,14,15,06,01,04,02,11,07,03,13,09,10,12, 12,08,06,10,01,03,15,13,02,04,14,07,11,09,05, 14,09,11,08,02,05,13,12,15,06,01,10,03,07,040"&HFFD8,0:0:::::::0F"&HFFB0,1:&HFFB8,26:&HE03E,260e," END PROGRAM--Y OR N?"0}6A$: A$"" 3100@ A$(78) 3400J A$(89) 350 : 2800T:1400^:&HE047,26:113,0: :END0'&HFFD9,0:ZQ(10):ZR(3)1 ' I1 5121'$300001:'.C(14)1:Y(96):X(96)1S'8 XY1.596 100301a'B&HFE0A,C1'L(160X,96Y)(160XS,96YS),,BF1'V(160X,96Y)(160XS,96YS),,BF1'`(160X,96Y)(160XS,96YS),,BF2'j(160X,96Y)(160XS,96YS),,BF2)'t(160Y,96X)(160YS,96XS),,BF2Q'~(160Y,96X)(160YS,96XS),,BF2y'(160Y,96X)(160YS,96XS),,BF2'(160Y,96X)(160YS,96XS),,BF2' I2'&HFFD8,0:3_N I1 15: F:B(I)C(F): I: T1 15: I1 15: &HFFB0I,B(I): I: Z1 300: Z: I1 14:JI1: PB(J):B(J)B(I):B(I)P: I: T3eN*3zu0 I12 SZR103u: I11 I23 SZR93uD I22 I34 SZR83uN I33 I45 SZR73uX I44 I56 SZR64ub I55 I67 SZR54ul I66 I111 SZR44:uv I110 I155 SZR34Wu I154 I199 SZR24lu I198 SZR14~u I224 S14u I23 SZR93uD I22 I34 SZR83uN I33 I45 SZR73uX I44 I56 SZR64ub I55 I67 SZRSo !: *** FORM 1040 *** 6: FOR YEAR 1998 M 80:8,63:0,0: 9 :" This program completes Form 1040 and Schedules A, B and D."!u: 5);"Enter the appropriate numbers when prompted. Prompts will ask for one or more inputs. If you have only one input, enter 0's for the others. Hit ENTER after each input. If no entry just Hit ENTER.":! 600: 40! 22,22: A$;:"";RP$:!# 25,22: B$;:"";RP$: 60,22:"(A$"PRESS to continue, please ":B$"Do you wish a hardcopy (Y/N) ":C$"0.00":D$"----------":E$"Name":F$"*****.** *****.**":G$"SCHEDULE B":H$"Interest Income":J$"Part I Interest Income":K$"INTEREST INCOME":L$"Dividend Income"# -M$"Part II Ordinary Dividends":V$" $##,###.##":U$"$##,###.##"#2AA$"FORM 1040":AB$"SCHEDULE A":AC$"Itemized Deductions":AD$"Medical and Dental Expenses":AE$"Line 1 Medical and dental expenses.":AF$"Line 2 Enter amount from":AG$" Form 1040, line 34."$7AH$"Line 3 Multiply line 2 above by 7.5% .":AJ$"Line 4 Subtract line 3 from line 1.":AK$" If line 3 is more than line 1, enter -0-":AL$"Taxes You Paid":AM$"Line 5 State and local income taxes."%h#2,E$;": ";L8$;(13);50);L$;" ";:#2, U$;I8FH#2,E$;": ";L9$;(13);50);L$;" ";:#2, U$;I9F8R#2,E4;": ";LA$;(13);50);L$;" ";:#2, U$;IAFIW#2,68);D$Ff\#2,TI$;FW$;D1:#2,""F{f#2,TI$;FX$;D1FpF: *** INCOME ***F#2,37);CG$;(13)F#2,TI$;CH$;A1F#2,TI$;CJ$;A5F#2,CI$;CK$;E2G #2,TI$;CL$;D1G*$#2,CM$:#2,TI$;CN$;A8G?.#2,TI$;CO$;A9GT8#2,TI$;CP$;AAGiB#2,TI$;CQ$;ABG~L#2,TI$;CR$;ACGV#2,CI$;CS$;BD;:#2," 15b ";:#2,U$;ADG`#2,CI$;CT$;BE;:#2," 16b ";:#2,U$;AEGj#2,CU$:#2,TI$;CV$;AFHt#2,TI$;CW$;AGH&~#2,TI$;CX$;AHHV#2,CI$;CY$;BJ;:#2," 20b ";:#2,U$;AJHy#2,CI$;CZ$;AK;:#2,68);D$H#2,TI$;DA$;A:#2,"":#2,""HH: *** ADJUSTED GROSS INCOME ***H#2,28);DB$;(13)H(#2,CI$;DC$;W1I2#2,CI$;DD$;W2I(<#2,CI$;DE$;W3I=F#2,CI$;DF$;W4IRP#2,CI$;DG$;W5IgZ#2,CI$;DH$;W6Id#2,DJ$:#2,CI$;DK$;W7In#2,CI$;DL$;W8Ix#2,CI$;DM$;W9;:#2,68);D$I#2,TI$;DN$;WI#2,DO$;68);D$I#2,TI$;DP$;WAJ 30J J2܂: *** TAX AND CREDITS ***JJ#2,5);DQ$;(13)J_#2,TI$;DR$;WAJ TD0 #2,TI$;DS$;TD : #2,TI$;DT$;JJ#2,68);D$J#2,TI$;DU$;LJ#2,TI$;DV$;MJ#2,68);D$J#2,TI$;DW$;NK"#2,TI$;DX$;TK ,#2,DY$:#2,CI$;DZ$;C1K56#2,CI$;EA$;C2KJ@#2,CI$;EB$;C3K_J#2,CI$;EC$;C4KtT#2,CI$;ED$;C5K^#2,CI$;EE$;C6Kh#2,CI$;EF$;C7Kr#2,TI$;EG$;C8:#2,68);D$K|#2,TI$;EH$;C9K#2,"":#2,5);EJ$;(13)L #2,TI$;EK$;T2L#2,TI$;EL$;T3L=‡#2,EM$:#2,TI$;EN$;T4L[̇#2,EO$:#2,TI$;EP$;T5Lyև#2,EQ$:#2,TI$;ER$;T6L#2,TI$;ES$;T7:#2,68);D$L#2,TI$;ET$;TXL#2,"":#2,5);EU$;(13)L#2,EV$:#2,CI$;EW$;W0M #2,EX$:#2,CI$;EY$;WBM!,CI$;EZ$;WCM60#2,CI$;FA$;WDMK:#2,CI$;FB$;WEMiD#2,FC$:#2,CI$;FD$;WFM~N#2,CI$;FE$;WGMX#2,FF$;68);D$Mb#2,TI$;FG$;TBMl#2,"":#2,5);FH$;(13)Mv TBTX 1930 : 1920M#2,TI$;FJ$;SN%#2,FK$:#2,FL$:#2,TI$;FM$;S:#2,""NB#2,FO$:#2,TI$;FP$;SNo#2,"":#2,"":#2,34)"END OF REPORT"NuNЂ: *** CAPITOL GAIN AND LOSSES ***Nڞ: 35);AA$;(13);(13);35);FY$;(13);(13);2);FZ$;13);GL$O IM$;GA$;:"";G0: G00 59,5: C$O= 68,5:"";G1: G10 74,5: C$Oi IM$;GB$;:"";L0: L00 59,6: C$O 68,6:"";L1: L10 74,6: C$OCLG1L1O TI$;GC$;CLO NCG0L0O GD$: CI$;GE$;NC:T0SGNC:ABT0O 2,10:"Part III"P GF$: GG$: GH$P6% T00 68,13: U$;Z: 2095PT* 68,13: U$;AB: 2100Pk/GJ$: TI$;GK$;ABPu4 35P> RP$"Y" 2200 : 2120PH 30PR: 35);AA$;(13);4);CG$;45);F$PW TI$;CH$;A1P\ TI$;CJ$;A5Pa CI$;CK$;E2Qf TI$;CL$;D1Q'k CM$: TI$;CN$;A8Q9p TI$;CO$;A9QKu TI$;CP$;AAQQzQ: *** CAPITOL GAIN AND LOSSES *** (Hardcopy)Q#2,35);AA$;(13);(13);35);FY$;(13)(13);2);FZ$;59);GL$Q#2,CI$;GA$;G0;:#2,V$;G1R#2,CI$;GB$;L0;:#2,V$;L1R-#2,TI$;GC$;CLRKʇ#2,GD$:#2,CI$;GE$;NCRԇ#2,"":#2," Part III Summary of Parts I and II"Rއ#2,GF$:#2,GG$R T00 #2,TI$;GH$;Z: 2285R#2,TI$;GH$;T0: 2290R#2,GJ$:#2,TI$;GK$;T0SS  2300S< Ğ:: **** ITEMIZED DEDUCTIONS ****S · 35);AA$;(13);(13);35);AB$;(13);(13);4);AC$;(13);2);AD$;26);F$S IM$;AE$;:"";MD: MD0 59,6: C$S AF$: LI$;AG$;WAS MEWA(0.075): CI$;AH$;MET EXMEMD:MDME EX0 : EXEX(1)T4 AJ$: TI$;AK$;EXT\ ( (13);2);AL$: IM$;AM$;:"";LTTv - LT0 59,14: C$T 2 IM$;AN$;:"";RTT 7 RT0 59,15: C$T < IM$;AO$;:"";PTT A PT0 59,16: C$T F IM$;AP$;:"";OTU K OT0 59,17: C$U PTZLTRTPTOTU. Z TI$;AQ$;TZU8 d 30U : 35);(13);(13);35);AB$;(13);(13);4);AC$;(13);2);AR$;36);F$U AT$: IM$;AU$;:"";MIU MI0 59,7: C$U AV$: IM$;AW$;:"";NMU NM0 59,9: C$V AX$: IM$;AY$;:"";PNV, PN0 59,11: C$V> AZ$;:"";IIVX II0 59,12: C$Vk IPMINMPNIIV} TI$;BA$;IPV (13);2);BB$V IM$;BC$;:"";GCV GC0 59,16: C$V  IM$;BD$;:"";GKV GK0 59,17: C$W  IM$;BE$;:"";COW%  CO0 59,18: C$W5 CGGCGKCOWG  TI$;BF$;CGWQ " 30W T: 35);AA$;(13);(13);35);AB$;(13);(13);4);AC$;(13);2);BG$;28);F$W ^ IN$;BH$;:"";TLW c TL0 74,6: C$W h (13);2);BJ$;(13);2);BK$X r BL$: IM$;BM$;:"";UXX2 w UX0 59,11: C$XI | IM$;BN$;:"";TPXc TP0 59,12: C$X BO$: IM$;BP$;:"";OEX OE0 59,14: C$X CCUXTPOEX CI$;BQ$;CCX BR$: LI$;BS$;WAX MLWA(.02): CI$;BT$;MLY MXMLCC: CCML MX0 : MXMX(1)Y4 BU$: TI$;BV$;MXY> 30Y : 35);AA$;(13);(13);35);AB$;(13);(13);4);AC$;(13);2);BW$;48);F$;(13);2);BX$;(13);2);BY$Y ‡ IN$;BZ$;:"";OMY Dž OM0 74,8: C$Y TDEXTZIPCGTLMXOMZ ̇: 2);: CF$:ZL և CA$: CB$: CC$: IN$;CD$;: D$: TI$;CE$;TD:JTDZV 35Zv RP$"Y" 3300 : 3050Z ꁦ 30Z : 35);AA$;(13);4);DQ$;36);F$Z TI$;DR$;WAZ [ #2,35);AA$;(13);(13);35);AB$;(13);(13);4);AC$;(13);2);AD$[# #2,CI$;AE$;MD[B #2, AF$:#2,LI$;AG$;WA[W #2,CI$;AH$;ME[v #2, AJ$:#2,TI$;AK$;EX[ #2,"":#2,2);:#2,IN$;AL$[ #2,CI$;AM$;LT[ *#2,CI$;AN$;RT[ 4#2,CI$;AO$;PT[ >#2,CI$;AP$;OT\ H#2,TI$;AQ$;TZ\' R#2,"":#2,2);:#2,IM$;AR$\F \#2, AT$:#2,CI$;AU$;MI\e f#2, AV$:#2,CI$;AW$;NM\ p#2, AX$:#2,CI$;AY$;PN\ z#2,CI$;AZ$;II\ #2,TI$;BA$;IP\ #2,"":#2,2);:#2,IM$;BB$\ #2, BC$;GC:#2,CI$;BD$;GK] #2, BE$;CO:#2,TI$;BF$;CG]: #2,"":#2,2);:#2,IM$;BG$]O #2,TI$;BH$;TL]s #2,"":#2,2);:#2,IM$;BJ$] Ň#2,2);:#2,IM$;BK$] ʇ#2, BL$:#2,CI$;BM$;UX] ԇ#2,CI$;BN$;TP] އ#2, BO$:#2,CI$;BP$;OE] #2,CI$;BQ$;CC^ #2, BR$:#2,LI$;BS$;WA^+ #2,CI$;BT$;ML^J#2, BU$:#2,TI$;BV$;MX^q#2,"":#2,2);:#2,BW$;BX$;BY$^#2,TI$;BZ$;OM^$#2,"":#2,2);CF$^.#2,CA$:#2,CB$:#2,CC$:#2,IN$;CD$;:#2,D$: #2,TI$;CE$;TD^8_ : *** FORM 1040 ***_3 35);AA$;(13);4);CG$;45);F$_kLI$"$##,###.##": PR0 LI$"%"(38,32)"%"LI$_CI$"$##,###.##": PR0 CI$"%"(51,32)"%"CI$_TI$"$##,###.##": PR0 TI$"%"(66,32)"%"TI$_IM$"%"(51,32)"%"`IN$"%"(66,32)"%"`& IN$;CH$;:"";A1`? A10 74,2: C$`zĉ" Do you have any TAXABLE interest income. (Y/N)";RP$`Ʌ RP$"Y" 5070 : 5100`Ή" Is it over $400.00";RP$`Ӆ RP$"Y" 200 : 5100a:LOCATE 0,3:PRINT STRING$(160,32):LOCATE 0,3a! TI$;CJ$;A5: 5120a: A50 74,3: C$aW 0,3: (160,32): 0,3an IN$;CJ$;:"";A5a A50 74,3: C$a IM$;CK$;:"";E2a E20 59,4: C$a " Do you have any dividend income (Y/N) ";RP$b  RP$"Y" 5140 : 5170b)" Is it over $400.00 ";RP$bH RP$"Y" 600 : 5170bz:LOCATE 0,5:PRINT STRING$(160,32):LOCATE 0,5b( TI$;CL$;D1: 5190b2 0,5: (160,32): 0,5b< IN$;CL$;:"";D1bA D10 74,5: C$bF CM$: IN$;CN$;:"";A8cK A80 74,7: C$c.P IN$;CO$;:"";A9cGU A90 74,8: C$c^Z IN$;CP$;:"";AAcw_ AA0 74,9: C$cd" Do you have any capitol gains or (loss) (Y/N) ";RP$ci RP$"Y" 2000 : 5250dn:LOCATE 0,10:PRINT STRING$(80,32):LOCATE 0,10d!x TI$;CQ$;AB: 5270d? 0,10: (80,32): 0,10dV IN$;CQ$;:"";ABdp AB0 74,10: C$d IN$;CR$;:"";ACd AC0 74,11: C$d IM$;CS$;:"";BDd BD0 59,12: C$d 64,12:"15b ";:"";ADe AD0 74,12: C$e IM$;CT$;:"";BEe9 BE0 59,13: C$eU 64,13:"16b ";:"";AEeoÅ AE0 74,13: C$eȇ CU$: IN$;CV$;:"";AFeͅ AF0 74,15: C$e҇ IN$;CW$;:"";AGeׅ AG0 74,16: C$e܇ IN$;CX$;:"";AHf AH0 74,17: C$f IM$;CY$;:"";BJf9 BJ0 59,18: C$fU 64,18:"20b ";:"";AJfo AJ0 74,18: C$f IN$;CZ$;:"";AKf AK0 74,19: C$f (68,32);D$f AA1A5D1A8A9AAABACADAEAFAGAHAJAKf TI$;DA$;A:WAAg 35g& RP$"Y" 1000 : 5500gG|: *** FORM 1040 ***gh: ADJUSTED GROSS INCOMEg: 35);AA$;(13);4);DB$;30);F$g 4):"Do you have any? (Y/N) ";RP$g RP$"Y" 5530 : 5680g 0,2: (80,32): 0,2h  IM$;DC$;:"";W1h$ W10 59,2: C$h; IM$;DD$;:"";W2hT W20 59,3: C$hk IM$;DE$;:"";W3h W30 59,4: C$h‡ IM$;DF$;:"";W4hDž W40 59,5: C$ḣ IM$;DG$;:"";W5hх W50 59,6: C$hև IM$;DH$;:"";W6iۅ W60 59,7: C$i1 DJ$: IM$;DK$;:"";W7iJ W70 59,9: C$ia IM$;DL$;:"";W8i{ W80 59,10: C$i IM$;DM$;:"";W9i W90 59,11: C$iWW1W2W3W4W5W6W7W8W9i (68,32);D$iWAAW: TI$;DN$;Wj  (68,32);D$j#& DO$: TI$;DP$;WAj-0 35jM5 RP$"Y" 1300 : 5700jnD: *** FORM 1040 ***jI: TAX AND CREDITSjN: 35);AA$;(13);4);DQ$;36);F$jX TI$;DR$;WAkb 4):"Do you wish to itemize your deductions (Y/N) ";RP$k'g RP$"Y" 2500 : 5750kZl:LOCATE O,3:PRINT STRING$(1200,32):LOCATE 0,3ksq TI$;DS$;J: 5758kv 0,3: (80,32): 0,3k{ IN$;DT$;:"";Jk~LWAJ: (68,32);D$k TI$;DU$;Lk IN$;DV$;:"";MkNLM: (68,32);D$l TI$;DW$;Nl& IN$;DX$;:"";TlBDY$: IM$;DZ$;:"";C1l\ C10 59,11: C$ls IM$;EA$;:"";C2l C20 59,12: C$l IM$;EB$;:"";C3l C30 59,13: C$lƇ IM$;EC$;:"";C4l˅ C40 59,14: C$mЇ IM$;ED$;:"";C5m Յ C50 59,15: C$m7ڇ IM$;EE$;:"";C6mQ߅ C60 59,16: C$mh IM$;EF$;:"";C7m C70 59,17: C$mC8C1C2C3C4C5C6C7:C9TC8m TI$;EG$;C8m (68,32);D$m TI$;EH$;C9m 30n  : *** OTHER TAXES ***n2: 35);AA$;(13);4);EJ$;40);F$nI IN$;EK$;:"";T2nb% T20 74,2: C$ny* IN$;EL$;:"";T3n/ T30 74,3: C$n4 EM$: IN$;EN$;:"";T4n9 T40 74,5: C$n> EO$: IN$;EP$;:"";T5nC T50 74,7: C$oH EQ$: IN$;ER$;:"";T6o4M T60 74,9: C$oKR IN$;ES$;:"";T7oeW T70 74,10: C$o\ (68,32);D$:TXC9T2T3T4T5T6T7of TI$;ET$;TXok 30op: *** PAYMENTS ***oz: 35);AA$;(13);4);EU$;43);F$p EV$: IM$;EW$;:"";W0p* W00 59,3: C$pG EX$: IM$;EY$;:"";WBp` WB0 59,5: C$pw IM$;EZ$;:"";WCp WC0 59,6: C$p IM$;FA$;:"";WDp WD0 59,7: C$p IM$;FB$;:"";WEp WE0 59,8: C$q  FC$: I