The Home User's Guide to Commodore Computing " n n " UNIQUE CREATIONS FOR COMMi Computerized Sundia Biorhythms Celestial Swami The Pros and Cons Of SIMONS' BASIC X \ U.SA $2.95 CANADA S3.50 A CWC/1 Publication April 1985 74470"? 2069" A Beginner's Guide to Assembly Language Circle 19 on Reader Service card. DIS TRIBUTORS: Hamburg Brothers/NB«B5-227-6239 Johnson Drug -CompltjwSE 813-872-6631 Southern Electronics Ditributors/SE 404-491 -89 Stokes 1 Brothers/Utah 801 -566-41 1 7 Frise6.ElecirorilCsn"X 512-657-7741 Ryan Distributing/Rocky Mt. 801-972-4721 First Source/SW 602-263-1950 Southern M icro Distributors/TX 214-258-6636 I Compare these specs before you buy... RITEMANC+ vs. COMMODORE PRINTERS FEATURES RITEMAN C + COMMODORE PRINTERS ACTUAL PRINT MPS 801 MPS 802 MPS 803 VIC1525 VIC1526 PRINT SPEED (CPS) BIDIRECTIONAL PRINT (COLUMN WIDTH) 40 CHARACTERS PER LINE 80 CHARACTERS PER LINE 66 CHARACTERS PER LINE 132 CHARACTERS PER LINE (PAPER HANDLING) FRONT LOADING FOR EASY PAPER SETTINGS BUILT-IN PRINTER STAND PRINT ON POST CARDS (WARRANTY) ONE-YEAR WARRANTY (SOFTWARE COMMANDS) DOUBLE STRIKE EMPHASIZED COMPRESSED UNDERLINE SUPER/SUBSCRIPTS ITALICS DOUBLE DENSITY BIT IMAGE (CHARACTERS) 9X9 FONT TRUE DISCENDERS ITALICS COMMODORE GRAPHICS (OTHER FEATURES) SINGLE DENSITY BIT IMAGE EXPANDED REVERSE 105 YES YES YES YES YES YES YES YES YES YES YES YES YES YES YES YES YES YES YES YES YES YES YES ^O CR-|_ 80 CPL 66 CPL 132 CPL DOUBLE STRIKE EMPHASIZED COMPRESSED UNDERLINE = t -"-=" esoB SCRIPTB ITALICS cr abcg jpqyabc ITALICS EXPANDED 50 NO YES YES 60 YES YES YES 60 YES YES YES 50 NO YES YES 60 YES YES YES iSSmS* YES YES YES YES YES NO YES YES YES YES YES YES YES YES YES YES YES NO YES YES RITEMAN R64 RITEMAN LQ 3ITSIWI Features RITEMAN R64 Same as above except: • 120 cps • 2 ports: Centronics Parallel & Commodore* • Portable • Standard top loading RITEMAN LQ • Letter Quality Print • Portable — Only 6Vi lbs. • Low price • Centronics Parallel "Coinm priori It I rag late red trademark of Commodore Bu linen Math In a, Inc. "Epion It 1 leglileied trademark of Epson America Corp. j INFORUNNER CORPORATION Airport Easiness Center 431 N. Oak St, Inglewood, CA 90302 (213) 672-484B (In Calif) (800) 824-3044 (Outside Calif) Fleet System 2. Word processing that spells V-A-L-U-E. 3 * Complete word processing with built-in 70,000 word spell checking- Only $79.95 Up till now, you'd have to spend a mini- mum of about $70 to get a good word processor for your Commodore 64™, And if you added a small, separate spell checking program, you'd DC out well over $100! Now there's Fleet System 2! It's two powerful programs in one, and it's per- fect for book reports, term papers or full office use. Fleet System 2 combines the EASIEST and most POWERFUL word processor available with a lightning-fast 70,000 word spelling dictionary — all in one refreshingly HASY TO USE integrated sys- tem. Finally, spell cheeking is now availa- ble at your fingertips. You can even add over 1 5,000 "custom" words to the built-in 70,000 word dictio- nary, And at a suggested retail price of $79.95, Fleet System 2 really spells V-A-L-U-E, and 70,000 other words too! Fleet System 2 helps people of all ages to learn to spell correctly and write better too. It's the ONLY full featured word processor that provides you with helpful writing and vocabulary feedback such as: the total number of words in your docu- ment, the number of times each word appears, and total number of "unique" words, just to name a few. Elect System 2 has every important fea- ture that will help you make child's play out of the most heavy duty typing tasks. There's Built-in 80 Column Display — so what you see is what you get, Horizontal Scrolling During Typing, Easy Correction and Movement of text, Page Numbering, Centering, Indenting, Headers and Foot- ers, Math Functions. Search and Replace, Mail Merge, BUILT IN 70,000 word SPELL CHECKING and much, much more! Ask for Fleet System 2. Exceptionally Fasy Packed with i'ouvr. Perfectly Priced. APSI Professional Software, Inc., 5 1 Fremont Street, Needham, MA 02 194 (617) 444-5224 Telex: 95 1 579 Hkrcl System 2 TN is » Indemjrknf rmfesslonil Soli win-. Inc. — Meet SyMt in - >,w ts js designed Jrul wrmen h* \ islnnironlis. Lid. — C.om!TiiHli»K'6r M is a iradcnwkof Commodore Elec- tronic! Lid. — Sumepnniets may not suppim lertiln Heel Syslem 1 fond kirn jml.'or rei|i]lri ! jn Interfile ftusr ilieik svitli viwr dciltr — Ocjler mil Dnlrihuuir Inquiries ire im iled Circle S3 on Reader Service card. All Airlines Depart From ThisTerminal. Presenting Travelshopper . . . new from CompuServe and TWA. Now you can save time and money by getting information and reservations on virtually any flight on any airline — worldwide — from one source. Ifs TWAls new Travelshopper, available now through CompuServe's Information Service. With Travelshopper, you can scan flight availabilities, discover airfare bar- gains and order tickets... on your own persona! computer... at home or in the office. You also receive automatic member- ship in TWA!s Frequent Flight Bonus sw program. And you can build bonus points by staying at Marriott and Hilton hotels and by using Hertz Rent-ACar. Besides Travelshopper, CompuServe offers an ever-growing list of other travel- oriented on-line services. The Official Airline Guide Electronic Edition lists direct and connecting flight schedules for over 700 airlines worldwide plus over 500,000 North American fares. Firstworld Travel offers worldwide travel advice and service. Discover Orlando provides complete prices, hours and features on all of Central Florida's attractions and accommodations. West Coast Travel offers travel infor- mation for the western states. Pan Am's Travel Guide contains up-to-date information on immigration and health requirements for most foreign countries. And TraveMsion* provides complete automotive information, including road maps and an expert, personalized routing service. Let your travel plans really take off- Use Travelshopper and lots, lots more from CompuServe. To buy a CompuServe Starter Kit, see your nearest computer dealer. To receive our informative brochure, or to order direct call or write: CompuServe PO Bo* 20252. 5000 Arlington Centre Blvd , Cohjmbus.Ot»o 43220 1-800-848-8199 in Otw>. Can 1-GH-457-OBC2 Tmrrtshupjxr iiK] f-'iHiDral HkgW Bnoul or Service iiurfc, at TWA CDCte 6* on Reader Service cart] An HSR Block Company April 1985 AAA FEATURES Vol. 2, No. 4 24 Commodore Sundial Learn how to make a sundial with the aid of your Commodore computer. By Howard Witt 30 Charting Your Future Biorhythms can tell you a lot about your state of being. This program lets you chart them. By Allen E. Wheeler 35 Celestial Swami Did you know that your C-64 can double as a fortune teller? By Jim Bernard 42 The Plus/4's File Manager A review of the Plus/4's built-in database program. By Margaret Morabito 46 Video Jukebox Relax with this program of kaleidoscopic color and sound patterns for your C-64. By Joe W, Rocke 50 Picking the Right Sounds Tune your guitar with this program. By Michael and Jeffrey Goller 54 Teacher's Pet This educational program generates worksheets to help students practice basic arithmetic skills. By Frank Colosimo 58 Easy Assembly Here's your chance to begin learning assembly language; the first installment of a new series. By William B. Sanders 86 Let It Scroll! Here's an easy-to-use subroutine that lets you scroll messages across your screen. By Bruee Jaeger 87 Programming Briefs A list of disk commands for easy reference. By Mary D. Brigito 4 / RUN APRIL 19H5 88 The Number Puzzle It looks easy, but don't be so easily fooled. By Zoltan Szepesi 93 A First Lesson in Programming for Kids The Basic Print and Goto statements can make a child's introduction to programming easy and enjoyable. By Amy and James Blodgett 94 Simon's Basic A hard look at a version of Basic that adds 100 commands to your C-64 system. By Robert W. Baker ' 100 Making Boxes Add a little punch to your programs — this short subroutine lets you box in your screen messages and menus with ease. By Richard iMvett 102 Sound Sampler Seventeen amusing, captivating and out-of- this-world sounds that you can add to your own programs. By Bruce BartUtt 110 Graph Maker 64 Create, save and prim colorful vertical bar graphs for use in your programs. By Doug Snwak 116 A User's Castle A blueprint for building your own convenient computer sanctuary. By Jim Stephens 120 Gateway to the World This continuing series examines how to connect your Commodore to the outside world and gives you a small project for controlling the user port. By Jim Gntbbs 124 Menu, Please Here are routines that will add easy menu- handling to your Basic programs. By Paul J. Motise DEPARTMENTS 6 RUNNING Ruminations 8 Magic Hints and tricks that will let you perform computing wizardry. 12 Software Gallery Gyruss NATO Commander Financial Cookbook Exodus: Ultima III Blue Moon Promal 20 Computer Tutor Educational software reviewed 93 Coming Attractions 126 Commodore Clinic A quest ionsandanswers column to help your ailing computer. 134 Book Gallery 136 New Products RUNdown 142 Mail RUN 143 How to Type In Listings 143 RUN Amok Cover photograph by Ed linker b -■ - . -■■ «-=*, -' ' • * > • - * Past K, Page 50 RtWiOMI- lUSty is .hi independent Journal not i- reeled Willi UoiniTiudure lliiiliieu Muclllltea, tne, SUN it pnblisbed mOnthl) by CW Communleuloini/Peierbwxiughi It"., hii Pine Si.. reierbomuub, N " IiS'iaw. U.S. irih*ctiE>iion rates Il£.y7, une year; $39.97, iwo yrars; |41,07, three yens. Canada Mini Mesrlio $LI2.U7, one year. U.S. burets drawn on U.S. bank. Foreign J3M.97. one year. U.S. 1'utnU drawn cm U.S. bant. Foreign air mill itibtertptjoni— plean Inquire. Application to mall at Snd < Ian pottage raies is pending at I'elerbnrnugdr. Mi rn-triH. .met .it iidiliiitin.il mailing oMres. (Canadian second class mall registration number yfiOfi.) lMione: IrWV'.liM-U-l?]. I'mire cntuents iopyrildtt 1'JHS by CW Conimuiur'jtionsle'cterborough, Inc. No part of this publication may be primed or otherwise reproduced without written permission bom [tie publisher. Postmaster: send addiess change! tt> HOT, Sutocripllon Sentkea, FO Boa 854, ParmlngtWe, NV 1 1737. (Send Canadian vh.m^cs of address to HUN. I'O »in KIM. Foil Kile, Otliarju, Canada I.1M 5NN.I Nationally distributed by International Circulation llistribulors. i;r\ rnakrs iui« elloii in assure Ibe inn oi .utu Irs. l=siin ( Ls .mil i if i i ins published in i lir mLr^a;iiie ftf.'.V assumes no responsibility lor damages due to etlor* or omissions. RUN APRIL 1985 / 5 .--■■■' RUNNING RUMINATIONS If Byting and Fighting Don't you just love price wars? If you've been around the computing scene for more than two years, you've probably witnessed more than your share of skirmishes in the low-end home computer arena. For example, Texas Instruments was soundly defeated when it pitted its contender, the TI 99/4 A, against the spunky Commodore VIC-20 in late 1982. And Atari emerged bloodied and battered when it went against the same Commodore foe with its Atari 400 computer. Now Commodore and Atari are at it again. They're squaring off with drastic price reductions for their re- spective machines, the C-64 and the 800XJL The C-64 is selling at a bargain price of around $150 (if you scout around, you may find it for less at some- dealers and distributors). Atari head, ex-Commodore boss Jack Tramiel, has countered by dropping the price of the Atari computer to $99. What this means is good news for the home computer shopper. Clearly, Commodore and Atari are selling off their inventories to make way for new entries into the market. And these new offerings are more powerful, more so- phisticated home computers. Commodore's C- 1 28 is expected to make its appearance sometime next month. For the first time. Commodore is introducing a computer that is compatible with the C-64 and its thousands of programs. In addition, Commodore's newest home computer features 128K and a CP/M mode. These capabilities, combined with a low price of around $300, make the CM 28 a purchase difficult to pass up. This poses a dilemma for Commodore enthusiasts: Should you wait for the release of the C-128 or take advantage of the bargain-priced C-64? Whatever, don't wait too long. You'll soon be faced with another buying decision. Commodore is scheduled to introduce an even more powerful home computer later this summer. Tentatively called the Amiga, this latest of the new machines will sell for 6 I RUN APRIL 1985 a little over SI 000 and feature graphics capability not found in computers costing two to three times as much. You'll be reading more about the Amiga in upcoming issues. RUN's GAMEPAK RUN has planned something very special for all Com- modore owners, particularly for those who enjoy playing quality games on the C-64. It's called RUN's GAMF.PAK and is our first RcRUX issue devoted entirely to one theme— games. This GAMF.PAK is packed with 19 super games to run on your C-64. It features the best of RUN's published games, as well as games that we have not yet published and may never have the chance to publish due to space limitations. Newcomers to RUN wilt be pleased at this opportunity to share in some of our games from previous issues and to get a feel for the quality of programs that we offer. This ReRL'N issue holds a wide appeal fur game players of all ages. You can choose from an impressive array of action- packed arcade games. If you want an intellectual challenge, we also have several brain teasers and educational games to exercise your brain muscles. Furthermore, we have included some old-time favor- ites— lag, Shuffle-board and the Shell game— that have been played by families and friends for years before the advent of the computer. Finally, we are pleased to present a superb adventure game — the best ever submitted to RUN— that's guaran- teed to keep you on the edge of your computer chair. Of course, all ReRL'N programs are fully tested and eliminate the tedious job of entering program listings. Just load ReRUN into your C-64 and enjoy the fun. RUN's GAMEPAK will be available in May. To order, simply call toll-free 1-800-258-5473 or contact Debbie Bourgault, ReRUN, 80 Pine Street, Peterborough, NH 03458. db Publisher Stephen Twombly EDITOR-lN-CmEF Dennis Briton MANAGING EDITOR/PRODUCTION Swain Pratl Managing EnrroiuEurroRJAi. Shawn Uiflamme COI'V EDITOR Marilyn Anmicci Review Editor Susan Tanona Editorial Assistant Harold Bjornsen Technical Manager Guy W right Technical Editor Margaret Morabiw Technical Assistant Tim Walsh Associate Editors Christine Adamec, Robert Baker, Louis f. Sander, Jim Strasma. Advertising Sales Manager Steve Robbing SA1J.S RKPRfcSKNTAI 1\ I Ken Blak eman Ad Coordinator Heather Paquetie 1 -800-44 M403 WEST Coast Sales Giorgio SaKiti, manager 1-415-328-3470 I "i. N Marsh Road Menlo Park, CA 94025 West Coast Bi'keao Editor lini Eorbes L4i&-S28-347Q Art Director Glenn Suokko Production Supervisor Rosalyn Scrthner Production Assistant Lynne Siinonson AbiGraphics Manages Jane Preston MANUFACTURING Manager Susan Gross Graphic Services Supervisor Dawn Matthews Typesetting Manager Dennis Christen sen Film Preparation manager Robert M. Villeiictivo Darkroom Manager Nathaniel 1 1 ay ties VlCE-PRESIDENTfGENERAL MANAGER Debra Welherbee VlCE-PRESIDENT/FlNANCE Roger Murphy Assistant General Manager Matt Smith Assistant to VP/Finance Dominique Smith Executive Creative Director Christine Destrempes Director of Circulation William P. Howard Assistant Circulation Manager Frank S, Smith Direct a Newsstand Sales Manager Raino Wireiu 800-34H0728 Director of Credit Sales fc Collections William M. Boyer Founder Wayne Green Circle 105 on Reader Setvica card. TWO MINUTES FLAT It takes two minutes flat for the PPI, using Doodle™, to print this picture... properly. Other interfaces take up to 43 minutes and cost as much as $149.95. Enough said. i ds $ i t y.yj. I ^^^ ' Xfl r " V \ A rl i $49 (Sugg. Retail) .95 PARALLEL PRINTER INTERFACE FOR USE WITH THE COMMODORE Vic 20 and C64 PRINTERS Fujitsu Citizen Epson BMC Radix Inforunner Riteman Panasonic KXP Olympia Compact NP Star Micronics Delta Smith Corona DP Series Star Micronics Gemini Mannesmann Tally MTI60 blue Chip Brother DX-5 Brother DM-40 Okldata (In "Ira n spa rent mode) FEATURES True Commodore Graphics. ! t|),nii i.l Kt'veisi' Alpha, Numeric, and Graphic Characters. Total Emulation of Commodore's Graphic, Character, and Command Set, Combining of Expanded And Condensed Print features. Combining of Emulation and Transparent Modes. No confusing DIP switches. 1 5 page easy to follow Users Manual. Fully Shielded from end to end. Distributor and dealer programs available. Call 316-264-6118 for immediate information. dsi DATA SHARE, INC. 717 South Emporia - Wichita, Ks. 67211-2307 316-264-6118 Telex: 650 193 4977 DSI is a major OEM and privale label manufacturer. Call for complete information and quotations Doodle Art by Wayne Schmidt courtesy of City Software. RUN AMI. I9B5/7 MAGIC Jl i- Compiled bj LOUIS F. SANDER MAGIC is tricks, MAGIC is Jim, MAGIC is doing what cannot be dmte. MAGIC is tricks, MAGIC is fun. MAGIC is doing what cannot be done. Every month. Magic brings you brief ami useful computer trieksfiom around the world— tricks to make computing raster, more enjoyable or more exciting. We numlier our tricks in hex, the counting system of sorcerers and computerists. Magic solicit', four \irnptc hardware idem, short programs, useful programming techniques, little-knou.ii computer facts and similar items of interest. We look for new or rcactett material that can be implemented with a minimum of time, effort or theoretical knowledge and that is of current value to Commodore computerists ll'lns/-! and Clti owners, too). We typically jmy S 10 for each trick accepted. Really super ones get $20 or more. Send your tricks to: MAGIC c/o Louis F. Sander POBox 101011 Pittsburgh, PA 15237 If yon enclose a selfaiblressed stamped envelope, we'll send you a Trick Writer's Guide. Til is month's Magic will be especially useful for typing in programs ami working with disk drives. But no matter what your interest, oiujttju bag surely has something you can use. $ I C 1 April Fool's program— When he's not looking, run this on a friend's VIC or C-64. Then get him to type a line or two, and watch the fun as he scrambles for his warranty. 10 POKE207 t (hPOKE204,0:WArT198,l:GETA$J'RINT "(CTRL RVS C)KK}"CHKS(ASC(A$)+ 1.1*RND(0));:GOTO 10 Don't forget the semicolon after the Print statement. Add to the fun by entering POKE808.225 (for the VIC, FOKE808.100) before you run the program. (It disables the Stop, Restore and List commands.) People have become famous by running this program at school or on machines displayed in stores. Larson £. Rapp Newington, CT 8 / RUN Aran. 1985 HUH^i^ii^ $ 1 C2 Linefeed fix— Commodore computers are subject to an occasional but maddening malady, where die cursor refuses to linefeed when the return key is pressed. It will jump to the end of the current line, but will refuse to go any further. The problem usually arises when hardcopy printing is aborted by the stop key or some other non-stan- dard means. Pressing the shift key along with the return key will move the cursor to the start of the next screen line. Then, typing a letter or two and pressing the return key will cause a Syntax error, which will end the linefeed problem. At this point, there is probably some garbage in your printer's buffer. Give it something unimportant to print, and the buffer will clear itself. Beldare Lecone Remulac, France S1C3 SX-64 printer interface— As most owners know, the SX-64 has no cassette port from which to pick up + 5 volts for the popular Cardco + G printer interface. Not so many people know that on most printers with a Centronics interface, pin 18 of the printer con- nector is a source of +5 volts. That is the case on my Panasonic KX-P1091 printer, and I took advantage of it by making an easy modification to my Cardco. I opened up the Cardco + G, cut the white 5-volt power wire that went to the cassette connector and resoldered it to pin 18 of the printer connector. This arrangement has worked for over six months without any sort of prob- lem. My Cardco warranty is probably void, but at least I'm able to use my printer. T.V. Dinsmore Knoxville, TN $ 1 C4 Magazine hacking— Whenever my magazines arrive, 1 go through each with a colored marker in hand, usually a translucent yellow one. I circle small YOUR COM MOD ORE 64 CAN NOW USE STANDARD APPLE ll+H ARDWARE AND SOFTWARE A.i PRACTICAL PERIPHERALS IUNDE ?ATEGIC SIMULATIONS AVALON HILL PEA< SOFTWARE PUBLISHING GAP SOFTWARE SORCJM APPARAT MICROPRO SOF 3ITAL RESEAR CH STON EWARE- A ^ROR MICROSOFT / DRVUS S UTEK t ^teTK.0, -Sraimin m 1 [ (AN •Sphrtiiii ITEF ARE PEACHTREE 1.E.C.C. B.P.I. VIDEX WITH THIS At Mimic we believe that you and your computer should dictate the choices of hardware and software you can use. The Spartan ,M was developed to allow you to choose the hardware and software that best suits your needs. Our goal in designing the Spartan'" was simple. To take what you already have and give you more. Mimic Systems is proud to give you the Spartan™ The Apple™ II -l emulator for the Commodore 64™ Spartan™ Suggested Retail Prices: The Spartan'" (includes BUSS, CPU, and DOS cards) $599.00 BUSS card $299.00 CPU card (requires BUSS card) $199.00 DOS card (requires BUSS and CPU card) SI 9900 (All prices In U.S. Funds. Freight no) included.) FOR INPORMAHON WRITE: MIMIC SYSTEMS INC. 1 T 1 2 FOIH ST., FL. 6A VICTORIA. B.C. CANADA V 8 V d V 2 American Eipress. Visa and MasterCard accepted Commodore 64 and Commodore loao are Ircdomarks eT Commodore Ffectionics Ltd ond ot Commodore Business Machines. Inc Apple 1 II + It a hadjemork of Apple Compuler, Inc Sporlan ' it a rradamarh of Mimic Systems Inc , and hoi no association with Commodore llflotronlei or Apple Compulor. Inc trio Spartan Is manulaclutod tly Mimic Systems the under license graniod by AlO Hoe Ironies Inc of Vic fori a. ETC. Canada. To Order Call: 1-800-MODULAR (663-8527) I^^^H %'RSA, i^- 1 .- ^^0^&- ".■'■" I H Magic items of special interest to me, such as interesting Magic- tricks. I scan each article briefly, and if it appears to be of interest, I circle its listing in the Table of Contents. For advertising, I circle items I'm interested in, then put a line through their listings on the advertiser's page in the back. I also circle the number on the page of the ad itself so it stands out when I flip through. Later, I make up a card file on articles and so on. When my disk drive operates properly, 1 will set up disk files to replace the cards. D.G. Munoz Dania, FL $ I C5 Bookwork— After working with my sys- tem for several months, I found myself returning again and again to the same few pages and tables in my com- puter's reference guide. To make things easier, I copied my most frequently used pages and glued them to dif- ferent-colored sheets of construction paper. Now I have a series of easy-to-fmd color-coded reference cards with all the sprite information, ASCII codes and other func- tional charts as needed. What a time saver it has been for me! Mrs. Ruth A. Hicks Oak Run, CA $1C6 Magazine work — Fvery computer mag- azine has its own system of listing programs, and there's little standardization in the symbols they use for cursor and other special characters. You can make your life easier by copying the "how to type in listings" sections from each of your favorite magazines, then pasting them all onto an 8 % A- x 1 1-inch card. If you keep the card close by, you can use it as a handy reference when typing in programs. Deb Sullivan Pittsfield, MA 91 vf Musical stitchery typing tip— As an aid in typing programs, my husband and I have combined equipment from two other hobbies, music and cross-stitch. A music stand allows us to easily adjust the height of our material. To keep our place while typing, we use the metal sheet and magnetized strips that are sold as place holders for cross-stitch patterns. With the metal sheet behind the page we're working on, we slide die magnetized strip un- der the lines being typed. One word of warning: The magnetized strips can be disastrous to disks and tapes, so keep them away from your magnetic media. Barbara Eberly Cullowhee, NC $ 1 Co Program placekeeping— when typ- ing in long programs, use a hi-liter marker to record your progress. These markers are available in transparent pas- tel colors in any stationery department. Kvcry five lines 1 ,0 I RUN APRIL 1985 or so, cross off the completed material with your marker. This is also a good method to use when checking for typing mistakes. Ellen Pekar Florence, MA $ 1 C9 Magazine magnifier— 1 went to a store where needlepoint and embroidery notions are sold, and I bought a line magnifier, made for use with sewing instructions. It works quite nicely in magnifying the pro- gram lines as 1 type in goodies from RUN. Mildred Carroll Rosedale, NY $ I C A Keyboard overlays— When using com- plex programs like Easy Script and Simons' Basic, the function keys, and usually others, have many hard-to- remember purposes. Cardboard overlays for your key- board can make it easier to use these programs. Get pieces of thin cardboard from a stationery store or shirt laundry, then measure the dimensions of your computer and its keyboard area. Cut the cardboard to fit your computer, then cut out places for the keyboard areas. When you put the overlay in place, your keys will be surrounded by cardboard on which you can write the instructions appropriate to your program. If you own several complex programs, it's easy to make an overlay for each. Mary D. Brigito Old Forge, NY $1CB Escape literature— Many printers re- quire the ASCII escape character, CHRS(27), to be sent as part of various control sequences. Commodore com- puters don't have an escape key, and there's nothing in the documentation to show how one can be rigged. For- tunately, the matter is easily resolved, since pressing {CTRL : } generates an escape character. If the computer is in Quote mode, a reverse-field left bracket will come up on the screen, and when that char- acter is printed, the escape code will be sent. If your printer is open to file #4, an escape can be sent to it by entering: PRINT *4,"{CTRL ; }" Of course, {CTRL :} means to hold down the control key, then hit the colon. Mrs. Deane Mad docks Glenwood, IA S1CC Easy GO testing— When testing a pro- gram that uses On, . .Go commands, or perhaps com- puted Goto's, it's useful to establish dummy lines as the targets for those commands, so you can get easy proof that the program is going where you want it to. Once you have that proof, you can replace the dummies with more inieresting sections of code. Continued on p. 106. ^e' yj Now You Can Add ARTIFICIAL INTELLIGENCE To Your Programs Using a Powerful Combination By Elliot Schneider & Jack Park Heres Your Chance to Profit by being on the Forefront, Write 5th Generation Software Learn How To: • Create Intelligent Programs • Build Expert Systems • Write Stand Alone License Free Programs Write Intelligent Programs • Home Use • • Robotics • • Medical Diagnosis • • Education • Intelligent CAI • • Scientific Analysis • • Data Acquisition • Extended Math Functions • Fast ML Floating Point & Integer Math • Double Precision 2E±38 with Auto. Sci Not. • n*ex Logx Loge Sin Cos Tan SQR 1/X... • Matrix and Multidimensional Lattice Math • Algebraic Expression Evaluator Construct Rule Bases Do Knowledge Engineering Use Inference Engines For: Data Analysis Business Real Time Process Control Fast Games Graphics Financial Decisions Easy Graphics & Sound Words SUPERFORTH 64+AI LiSP LOGO PASCAL BMC FORTRAN A^LMBLLft Olher 6x SF64I 1i Power 0! Languages Constructs SuperForth 64 is more powerful than most other computer languages Programming Time SuperForth 64 Saves You Time and Money • Hires Plotting • Windows • Split Screen • Printer/Plotter Ctrl • Sprite & Animation Editor Easy Control of all I/O... • RS232 Functions • Access all C-64 Peripherals Utilities • Interactive Interpreter • Forth Virtual Memory • Full Cursor Screen Editor • Full String Handling • Trace & Decompiler • Conditional Macro Assembler Great Documentation • Easy to Read 350 pg. Manual with Tutorials • Source Screen Provided • Meets all MVP Forth-79 Industrial Standards • Persona! User Support A Total Integrated Package for the Commodore 64 & C 128 1 Turtle Graphics Koala Pad Graphics Integrator Hires Circle, Line, Arc Music Editor Sound Control Interrupt Routines Interactive Compiler Romable Code Generator 40K User Memory All Commodore File Types Conversational User Defined Commands 1 ■yuMtiM' ''}■■}- ■■'■ ■ < SPECIAL INTRODUCTORY OFFER Disk & Manual $f\f\QQ «99' only 203°° Value Limited Time Offer ( £ 2. 50 Ship U.S.A. • s 2 00 C.O.D., U.S.A. • *15 Q0 Overseas) Commodore 64 TM ol Commodore ®Parsec Research See Your Local Computer Store or CALL for orders outside ol California (800)633-6335 for additional information (415) 651-3160 PARSEC RESEARCH Box 1 766 Fremont, CA 94538 Dealer Inquiries Invited Circle 209 on Reader Service card. SOFTWARE GALLERY Compiled by SHA WN LAFLAMME Gyruss This C-64 Conversion From Parker Brothers Rivals the Arcade Original You're 30 billion miles from Earth and two warps away from the planet Neptune. Your mission is to stop at each of the five worlds that separate yon from Earth and destroy any enemy aircraft that you encoun- ter. You must also beware of deadly meteors, run-away satellites and the hostile alien spacecraft that pursue you all the way to Earth. Gyruss is an exceptionally well- written conversion of the arcade game. The graphics of Gyruss include well-designed spacecraft, meteors and an interesting space warping ef- fect that rivals the graphics of the original. The planets are depicted with precision, with details such as the canals of Mars and the recently discovered rings of Uranus. An up- dated version of Bach's Toccata and Fugue in I) Minor plays throughout the program, adding an interesting element to the game. Gameplay consists of a series of warps and chance stages. During each warp, forty alien spacecraft dive and loop onto the screen in four squadrons. You must destroy as many airships as possible and avoid being hit by their return fire. When you succeed in reaching a planet, chance stages begin. These are bonus screens that award 100 ex- tra points for each ship that you de- 1 2 / RUN APRIL 1985 stroy and a super 10,000-poim bonus if you destroy ail 40 of the aliens. These screens offer alien ships that don't fire back, but you have only seconds to destroy them before they disappear into the vastness of space. There are two types of satellites in Gyruss. One resembles two blue molecules linked together by a con- nector. You must shoot the blue seg- ments of the satellite for bonus points and destroy the connecting piece for double ft re- power. The second type of satellite con- sists of two white spheres connected by a long electromagnetic wave. You must shoot the white spheres of the satellite for extra points, without being destroyed by the deadly elec- tromagnetic wave. Meteors offer a very special dial- Report Card Superb! An exceptional profrrnm that outshines Ml others. Very Good. One cif the better programs available in its category, A wor- thy addition to your software library. Good. Lives up to its billing. No has- sles, headaches or disappoint- ments here. Mediocre. There are some problems with this program. There are better on the market. Poor. Substandard, with many prob- lems. Should be dccpsixcdl lenge to the space pilot in Gyruss. These huge chunks of space rock can- not be destroyed, so you should avoid them as much as possible. The game- is over when all of your spacecraft have been destroyed. If you do man- age to complete your journey to Earth, your spaceship will reappear two warps from Neptune and the game will resume. Gyruss combines excellent graph- ics with numerous sound effects and fantastic background music. The ac- tual area that you control is quite small — only a one-inch circular band beginning an inch from the outside edge of the screen. Although it seems that you would have little control over your fate under these circumstances, this game actually plays quite well. I recommend Gyruss to anyone who ap- preciates an excellent version of a very successful arcade game. (Parker lirotfiers, 50 Dunham Road, Beverly, MA 01915. O64/$40 cartridge.) John Jermaine Taylorville, IL NATO Commander Command NATO Forces In a Confrontation With The Warsaw Pact You have recently been sworn in as commander of the NA'I'O forces deployed in West Germany. These troops consist of U.S., West PlayNET announces 19 exciting ways to bring people together. Now there's a Home Computer Network that lets you communicate with all kinds of people — all over the country! Make new friends, play exciting games, barter — shop — trade, all from the comfort of your home. The network operates 6PM -7AM every weeknight, and 24 hours on Saturday, Sun- day and Holidays. All you need to access PlayNET™ is a COMMODORE 64? DISK DRIVE and MODEM 1TALK By typing on-line you can talk to anyone, or everyone, on the sys- tem. Meet fascinating people and A friends from ziJK'Z.. ..... ■ coast to coast. 2 3 ELECTRONIC MAIL. You can send private messages to people on the system, and the message will be waiting when they sign on! 4 BULLETIN BOARDS. You can post announcements, or check the listings of other mem- bers. There are lots of boards for hobbies and spe- cial interests! If you don't find the one you're looking for — create your own! FILE TRANSFER. You can even transfer non-com- mercial programs to other mem- bers! There is a small extra fee for this service, FH UU ' l | .Vr. t •'- mniii Mittt 1 = L "M Mtfl T "lai"' 1 GAMES! GAMES! GAMES! PlayNET lets you play exciting games with real people, not just a computer. All our games have full color graphics, and they're all interactive. 1 • Plus the added feature of being able to talk with your opponent while you play. Discuss strategy. comment on moves, even try and psych your oppo- nent out! • New games are added all the time, and there are tournaments for every skill level CURRENT GAMES INCLUDE: • Backgammon • Boxes • Capture the Flag • Checkers • Chess • Chinese C hei kers • Contract Bridge • Four-Ill- A- Row • Go • Hangman • Quad 64 ™ • Reversi • Sea Strike™ Jk ft MORE! MORE! MORE! \9 There's on-line updating of | your PlayNET Software as 1 ^m games and services are added. You have access to PlayNET's Shopping Center and Information Center, and every month you'll get our Newsletter. WYOUR SATISFACTION IS GUARANTEED for 30 days (or your full subscription price will be refunded upon receipt or the package). 39.95 Suggested retail/Now 19.95 • S 19.95 for the PlayNET Software Package (3 disks and a User Man- ual). Monthly Newsletter, and 90 MINUTES ON-LINE TIME FREE! • $6 monthly service charge. • $2 an hour on- line time (the $2 includes the telecom- munication charges). Thats much less than a long distance phone call. Here's how you can become a member! Its easy to join, simply call PlayNET on the toll-free number, 1-800-PLAYNET, or send the coupon below and access all your Com- modore 64 has to offer The sooner you do, the sooner PlayNET can put the whole country at your fingertips! = PlayNET The Network that has people talking SEND TO PLAYNET, INC. P.O. BOX 596, WYNANTSKILL, N.Y. 12198 SPECIAL OFFER EXPIRES Postmark or call 1-800-PLAYNET by April 15. 1985 50 1 YES! I WANT PlayNET TO PUT THE WHOLE COUNTRY AT MY FINGERTIPS I UNDERSTAND THAT MY SATISFACTION IS GUARANTEED FOR 30 DAYS (or my lull subscription price will he refunded upon return of the package) ) may cancel my membership at any time by writing PlayNET Bill my charge card or checking account via CllliCKl RUU* (or Sly 95 and subsequent monthly fees. (Plus sales las (or New York Slate residents! Mnijsli ur intiun order >., in enird Please send me the I'l.tyNTn Sotne.iic. t.V: Manual, and *HJ inimues ol tree on-line time Please print Name Add rcss City Phone ( .State ) -Zip. Check one: □ MasterCard D VISA D Checking Account via CHECKFREE (please attach voided check) Card # Exp Date Signature- . 1 fMpUyN£T.Qu*dMjndSeaS[nliirjrc rriiirn:Li[fooU'U*iSI l.lrn 'i ijmmi-hlflTc M isj tijJfmailiolUtmrnndorc Rusineia MidriflcS toe ©IW5FkyNETjiW Circle 221 on Reader Service card. Software Gallery COMMAWfft .■.-'-' '. ® s^<\. German, Dutch, British and Belgian infantry, armor and air forces. If war breaks out, you must block Warsaw Pact armies from overrunning Ger- many and western Europe. As the days pass, you receive news reports of growing tension between the east and west; everyone is preparing for a new war. So begins NATO Commander, a strategy game played in simulated real time. You have a choice of four scenarios, which are minor variations of the main theme, and three diffi- culty levels. You always assume the role of NATO Commander and the computer plays the part of Warsaw Pact Commander. The game is played on a vertically scrolling map of Germany, with symbols for towns, roads, rivers, mountains and forests. Eastern and Western units are displayed in dif- ferent colors and each type of mili- tary unit is represented by a different symbol. As night falls, the screen turns dark and the units are highlighted in color. At midnight on each day of combat, you receive a coded commander re- port in text iT you correctly enter a supposedly secret code. (After the first day, the reports are automatic.) Throughout the battle, radio mes- sages flash across the screen to tell you which of your units have encountered the enemy or surrendered. NATO Commander uses colorful map displays, but almost no sound. Map and unit symbols take some get- 14 /RUN APRIL 1»K. EH VQOfl nFALEFI ton OtlAOS ib MACHWtS AND 1HM ItUtlNISS MACHINK INC. . FttSKCtH Software Gallery fall la ward your ship. Bell birds liaich from the eggs and attack yon with plasma bombs. There's little room to breathe in this cluttered screen, and you'll have to clear it completely be- fore you can move on toward home. Your final task is to land safely on the Blue Moon. As in the first screen, there's no margin for error as you maneuver to one of three possible landing sites. When you've landed safely, the Union Jack is raised trium- phantly over the Blue Moon. The pace is fast and furious on the easiest level; on the higher levels, it's an absolute frenzy. In fact. Blue Moon could probably be used as a quality control test for joysticks. The game is simple and straight- forward. There's no manual — every- thing you need to know is on the back of the package. However, Blue Moon lacks some of the features found in other C-64 games of this type: There's no two-player option and no way to save high scores or pause a game in progress. The scenario of Blue Moon as de- scribed in the game's introduction is rather misleading. There's no hostile planet and no sister ship to rescue. The game begins with your journey back to the Blue Moon; you're simply asked to imagine that a rescue has taken place. Also, in screens two through four, your spacecraft re- mains at the bottom of the screen, allowing for horizontal movement only. This technique, while effective in some game scenarios, fails to cre- ate the effect of traveling. Blue Moon is a good shoot-'em-up game, but it's a poor simulation of a journey through space. Blue Moon's fast action and simple concept could make it a popular game with younger players. The ar- cade-quality graphics arc appealing and colorful, and the action is com- plemented by entertaining sound ef- fects and music. If you're an arcade enthusiast, you won't find anything new or unusual in this game. But if fast-paced action is what you crave, then Blue Moon won't disappoint you. (3R Import and Export Corp., 731 James St., Suite 405, Syracuse, NY 13203. C-64/$19.95 disk or tape.) Shawn Laflammc RUN staff 18 /RUN APRIL 1985 Promal |j] A Fast and Efficient Programming Development System Promal is a new programming development system for the C-fi4. Version 1.0 of Promal comes with an executive that replaces Commo- dore's Basic interpreter. The execu- tive has 23 commands and facilities that allow you to load and execute programs, manage files and disks and display and modify memory. One powerful feature of Promal is its ability to redirect input and out- put. A program that normally out- puts data to the screen can have its output redirected to a file or device by using the > operator. In the same manner, input can be taken from a file or device instead of the keyboard by using the < operator. The Promal language is a struc- tured language similar in syntax to C or Pascal. It supports high-level constructs such as If. . .Then. . .Else and Repeat. . .Until. Procedures and functions are supported, and a li- brary of 43 machine language sub- routines is supplied. These library routines are used to handle I/O, man- age files, and perform string opera- tions, data conversions and other assorted tasks. Arguments can be passed to the main program as well as to procedures and functions. Promal supplies a full-screen text editor to assist you in creating source files. I found the Promal editor to be very powerful, with many useful fea- tures. The meaning of each function key is conveniently displayed on the bottom of the screen, along with the current line number and editor mode. The Promal compiler is a very fast, one-pass compiler. It takes a Promal source file as input and generates an object file as output. This object file- consists of a very compact pseudo- code (p-code) that averages six bytes per source statement. You can com- pile to or from disk or memory. If the compiler encounters a Syntax error, the process stops, the appropri- ate error message is displayed and you will have the option to edit the source file. After a successful compilation, a sign-off message appears, displaying the number of lines compiled and the number of bytes produced. To execute your compiled pro- gram, you simply type in the name of the program and the required ar- guments. The executive will search for the program in memory and ex- ecute it. If not found in memory, the executive will check for the program on disk, load it and begin execution, I have compared Promal with other languages and compilers and my results were consistent with the company's claim that Promal is 70% to 2000% faster than any other lan- guage available for the C-64. On the whole, I'm very impressed with the Promal package. The pro- gramming environment is friendly and a welcome change front Basic. The programs are compiled and ex- ecuted very quickly. The thorough documentation consists of a 200- page manual, which is divided into three parts: a tutorial, a user guide and a language manual. Promal does have some limita- tion s. The language does not support multi-dimensional arrays, nor does it allow you to define records or struc- tures. Also, a library of math func- tions should have been included. Taking all things into account, Promal would be a powerful enhance- ment to your programming capabili- ties. (Systems Management Associates, 3700 Computer Drive, Dept. MP- J, Ra- leigh, NC 27609. C-64/$4999 dish.) Edward Rowe Randolph, NJ ■15 & co>°* e FLASH! Gets the Gold at the Computer Olympics The Skyles Electric Works 1541 FLASH! dashed off with the gold at the Computer Olympics here. The 1541 FLASH! loaded programs and files three times faster than an unenhanced C ommodore 1541 disk drive could. Faster than any other disk '...faster than any Other disk drive with compatible drive..." disk format. Three times faster! The device delighted the home crowd, which watched the 1541 FLASH! set a meet record, and leave its competition in the dust. Once installed, the 1541 FLASH! is transparent. Computer operations all remain unaffected as it speeds up every disk-related function. The FLASH! is a permanent Installation with both a software (ROM) and a hardware component. Through key- board commands or a hardware switch, you can even return to the old, slow loading method — if you really want to. And there Is nothing new to learn for the FLASH! No special tricks or techniques. Once It's in, just watch it go. But if you're really serious about programming, the 1541 FLASH! Is a gold mine. The manual will show you how to write software allowing data transfer to and from the 1541 disk drive at speeds up to TO times the normal. For programs that usually load with a " '*',8,1 " command, just hit Shift/Run-Stop. A spreadsheet pro- gram like BUSICALC 3 then loads in about 25 seconds. The 1541 FLASH! even adds 21 ex- tra commands for the Commodore 64 user. Some of these include edit- ing, programming and loading com- mands, as well as "DOS Wedge" commands. You can ignore all these commands, though, and just enjoy the rapid disk operations. It wowed the crowd at the Com- puter Olympics. Once you see its sheer speed, you'll know why. Call its coach, Skyles Electric Works, to place your order or to get more info. 1541 FLASH!, an add-on assembly for the Commodore 64/1 541 , costs only $89.95.* "There is an additional $3.50 US and Canada. SiO.OO Europe and Asia, snipping charge aer order, California residents add sales tax. Skyles Electric Works Available from your local 231E J South WhismanRoad Sm^mS' 18 ' * Mountain View, CA 94041 caM 1-800-227-9998. 1 41 ^ V Qfi R - 1 7 "\ H 1541 FLASH! & a trademark ol Skyles Electric Works. y* i J ; aoj WJJ Commodore 64 and SX-64 are trademarks ot Circle 90 on Reader Service card. Commodore. COMPUTER TUTOR CHRISTINE ADAMEC This month, RUN's bimonth- ly column on educational soft- ware focuses on some programs for the unexpanded VIC-20. Before 1 describe several good educa- tional programs for the VIC-20, I'd like to share a concern expressed by a reader, Mason Caldwell, of Chesapeake, Virginia. Caldwell wishes that he could see a program run before buying it for his child, and says of a recent experience, "I could not try the programs for my son, and the sales people were largely unfamiliar with the software that they had on their shelves." He wonders if CompuServe or another computer ser- vice could offer short demos of pro- grams, and he compares such a service to music videos shown on TV. He adds, "The influence of music videos... on record sales would seem to indicate that a visual representation of a product would be a strong selling point." Your point is well taken, Caldwell. Apparently, several software manufac- turers agree, because they are beginning to include short demo programs with their software. It may be a while before we see this done on a large scale, but when it docs happen, computerists will have a chance to preview programs before buying them. Now, about the VIC's educational programs. There aren't many such pro- grams available, since most companies are concentrating heavily on the C-64, but here are a few enjoyable ones to consider. (All of them run on the unex- panded VIC.) Think Twice This program from Academy Soft- ware includes Memory Fun and Flash- 20 / RUN APRIL 1985 ■ i i7 I 1 '' I 1 1 • • 1 1' I i-i CD CD I' 1 [• i en GD © ! %*—(*-' i< i © CD I"l (HI & GD GD l-l i i i (•■I i D in 1 w:>\< MmtS) tester from Academy Software. Springboard's Draw program for preschoolers. card Quiz. Memory Fun is an entertain- ing game similar to the old television game, Concentration. Your child may play alone or with a friend. The com- puter directs your child to type in his or her name, and your child must choose either designs, pictures or words. (Words are three-letter ones, like cat and man.) A gameboard appears on the screen, composed of every letter of the alphabet and numbers 1-4. Under each "tile" is a picture and a word, and the child must find as many pairs as possible. Overall, Memory Fun is a game that encourages your child to concentrate and think, and my children enjoyed it. They were too young, however, to ap- preciate Flashcard Quiz. This is a pro- gram designed for drill and practice, and it includes a datafile of state capitals for all 50 states. Your child can drill himself on either states or capitals. The computer registers errors and you can work on those troublesome ones even we adults tend to forget. You can also input your own datafilcs using the manual instructions, f Academy Soft- ware, PO Box 9403, San Rafael, CA 94912; $16.95, cassette.) Early Games for Young Children This program from Springboard Software is composed of nine games for preschoolers. Begin with Draw, a good motivator. Your child uses the key- board to create colorful pictures (as- suming you've got a color monitor). To change colors, the child presses the space bar. Next is Numbers. A one-digit num- ber appears on your screen, and the child locates it on the keyboard and types it in. Letters is a similar game, in which your child finds the letter on the keyboard matching the one displayed on the screen. Count displays brightly colored blocks— Johnny finds the number on the keyboard corresponding to the number of shapes on the screen. The game Add reveals several blocks, the plus symbol and more blocks. How many? Count them up and type in the number. (The game Subtract is basically the same format.) One popular game is Names. You'll type in your child's name, then the com- puter will ask the child to type it in. When the child does, each letter is displayed one at a time, in huge graphics that cover the entire screen. A real ego-booster. : _J 7^ Commodore -64 Sawn Picture Voice Oommunicoiions coming i n (rocnotl (jiiKhons! ! 20 Ai tcra* m (tie pattern ana now you have an EM ERGE NCY ' i As "Kennedy Approach" YOU are m charge' ! ffs your job lo gel on these aircraft and passen^ on me ground or on the way saMyl i You'll real ly be giod when rhts shift is overt! ' 'Kennedy Approach" i s Iht first "Speaking Simulation' ' tnot al laws you riol on ly la conrrol the mating rjcMonm tie skies around some otout busiest airports bul also to near and comrnunicale wim the simulation ai rcrafl using computer generated speech Fast action . great oircrolt control simulation, and outstanding graphics and sound muko ' 'Kennedy Approach" a musl addition to your simu lotion sofNvare library i SEEYOURLOCAlHETAILERror "Kennedy Approach": Avai lable lor Commodore-64 ond Atari computers lor suggested reta il o! only S34 .95 For more I nlormation on all WicroProse products caN or wn'te. Experience the reality ot these other greot simulations tram MlcroProso: •■JViu MicroProse Software The Action is Simulated — the Excitement is REAL!! 1 20 Lakefronl Drive HuntValley, MD 2 1 030 301-667-1151 Chorieng Ing and ExcM ng AlrComooKromlhe Modem Election le Cockpit I Aldose lo me Reoi mnllot Frying OS You Can Honale!! Circle 58 on Reader Service card. YOU ore in Command - D- Day to me Baffle at rrw Bulge!! Commodore-64 ond Atari are registered trademarks at Commodore auwrwsi Machines, Inc. and Atari Inc respectively. Circle 179 on Reader Service card. I.M.M^.M.U J.T.T.IziHH.Hrei VOICE SYNTHESIZER FOR APPLE AND COMMODORE v Gre AU b-SSSii JE520CM ■ Over 250 word yocfltoutflry-iiffixfla allow the tofmaiion ol mora than 500 words -Buili-in ampiiliiu spanker, volume control, and audio jack ■ Rocrooloa a deaf, natural male voice - Plug- in user ready wilts documenlatlon and sample software • Case sue: 7'*1 x. 3VW x 1 HX Application*; ■ Svcunty Warning » Telecommunication • Teaching * Handicap Aid ■ Instrumentation - Qimw Part Mo- Oa-tcripUon Price JE520CM For Comm. S4 A VIC-2Q. Si 1 4.95 JE520AF For Apple II, ll+ and iTe $1 49.95 RS232 ADAPTER FOR VIC-20 AND COMMODORE 64 The JE232CM Allows connection 0( standard serial RS2J2 printers, modems, etc- to your V1C-I0 and C-64. A 4-psM switch allows the inversion of the 4 control feat. Complete installation and operation instructions included. * Plugs into User Port -Provides Standard R5232 stgnal levels - Uses 6 signals [Transmit, Receive. Clear Ic Send. Request to Send. Da1a Terminal Steady. Data Set Readvl JE232CM $39.95 Game Paddles JSP Atari Paddle.* $2-95 GSP Commodore Paddle*. $4.95 (Atari Peddles modified for VIC-20 a C-B4) PROTECT YOURSELF,. DATASHIELD Surge Protector Eliminates voltage spikes and EMI-flFI noise before it can damage your equip- ment or cause data loss. 6 -mo. warranty Power dissipation (100 mlcroseconrisl. 2,000,000 watts Description Price MODEL 75 MODEL 85 MODEL 100 MODEL 110AMS 4 Sockets, OiVOfl Switch $49.95 6 Sockets. Super Filters, On/Off Switch $59,95 6 Sockets, Super Filters, Low Voltage Alarm $69.95 6 Sockets, Super Filters, Auto. Master Switch S99.9S St O-OO Minimum Order - US. Fonda Only California Residents Add MM Seles Tn Shipping - Add S% plus SI -SO Insurance Send SJ.SC for Monthly Suit! Flyor! MasterCard Spec Shetii — 30c each Send £1 .00 Postage tor your FREE tB85 JAMECQ CATALOG Prices Subject to Change V/SA* 1355 SHOFIEWAY ROAD, BELMONT, CA 94002 *' K Phone Of d^^ejOTrr£j^15jj;92j-80_9^Telexjj™43_ Circle 69 on Reader Service car Required Reading for tout COMMODORE 64 TRICKS & TIPS Treasury of programming techniques Advanced graphics, easy input, enhanced BASIC CP/M . cha r ac i« sel S . mote 775 pages 119.95 GRAPHICS BOOK Basic lo advanced, besi reference available Spnle animation. Hues, Multicolor. Iighlpen. IRQ. 3D graphics 350 pages S19.9S SCIENCE & ENGINEERING Discuss variable types, compuiational accuracy, sort algorithms, mote Topics from chemistry, physics, biology, astronomy, electronics 250 pages S19.95 ANATOMY OF C-64 Insider 's guide to the 64 internals Graphics, sound. I/O. ketnal. more. Com- plete commented ROM listings 300 pages 119.95 PEEKS & POKES Programming quickies lhat will simply amaze you. This guide is packed full ol lecfim- ques tot Ihe BASIC programmer 1BD pages $14.95 ANATOMY OF 1 541 DISK DRIVE Bes (selling handbook on floppy disk Explains disk hies with examples and utilities Includes complete com- menied 1541 ROM listings 320 pages $19.95 Other titles available. Phone for name of nearest dealer Phone:(616) 332-4154 Posiage & handling $4.00 ($8.00 foreign). Money order, checks, VI SA, MC , AMEX. Michigan residents (Incl. 4% sales tax}. CANADA: Book Center, Montreal (514) 332-4154 Abacus Hli Software P.0, Box 7211 Grand Rapids. Ml 49510 - Teles 709-101 ■ Phone B16'241-5510 H Computer Tutor The last game is Compare Shapes. Four shapes are shown, three arc the same and one is different. Each shape has a number underneath, and your child's job is to find the different shape and type in that number. Early Games for Young Children may sound simplistic, but just remem- ber: What entertains and teaches a four- year-old is vastly different from what amuses or educates a 30-year-old adult. (Usually.) (Springboard Software, Inc., 7807 Creekridge Circle, Minneapolis, MN 55435, 800-328-1223, $29.95, cas- sette; unexpanded version with version for J6K memory expander on other side of tape.) Climb Time Climb Time from Integrity Software helps children learn or sharpen their ad- dition and subtraction skills. A problem is depicted, let's say it's 2 + 3. Two little blue men then run to stand next to the 2, and three little red men run to stand next to the 3 (with sound accompanying them as they run). As a result, your child receives both pictorial and numer- ical symbols of what 2 and 3 really mean. To change to subtraction, press the fl key. The men still run over to the prob- lem, but subtracted ones disappear. On the left-hand side of the screen is a ladder with a man at the bottom. If the child answers correctly, the man climbs up a rung. If the child answers incor- rectly, he or she will get the same prob- lem, complete with running men, until a correct answer is given. Once the man climbs to the top of his ladder, he'll jump up and down to display his joy, then move over to the top of the screen. The child then gets another little man and starts all over again. There's also a slow-moving turtle on the upper screen. You'll have until he reaches the right side to answer the problems that push your men up that ladder of success. (In- tegrity Software, PO Box 29, Bristol, VT 05443; $17.95, cassette.) In the Chips A far more complex program for your teenagers (and you, too!) is In the Chips by Creative Software. It's a chal- lenging business game in which you try to make money by selling software. You pick out five programs to sell, 22 / RUN AI'HIl. I9SS ft Ike black with Creative Software's h the Ckips. how many units of each to make, how much money to spend on advertising and what price to charge for your prod- uct. Then you go home and find out how much money you've made! (Or, alas, lost!) This program stimulates that gray matter, which controls logical deci- sion making. You'll begin the game by deciding whether to play against the computer or a human opponent. (I recommend you learn on another person.) Each of you begins with $100,000, which you'll see on your company's financial statement. (No, you don't need an MBA to under- stand it.) Next, you'll see your little man walk- ing down a sidewalk, and you'll move him with your joystick to the appropri- ate buildings. You select which pro- grams to sell, from Astro to Zork, by moving him to research and develop- ment. Manufacturing is next, so you'll scoot him on over to that building. (As you manufacture, you'll see a block dis- play of each product in your ware- house.) How much should you charge for each product (with a minimum of $10 each)? What about advertis- ing—how much should you spend? (I liked the hand that appeared as my man paid for his advertising.) At the top of your screen is displayed your remaining cash, and after each ex- penditure, you can watch your working capital decrease. Your basic goal: Make a profit. (No easy task.) After the second quarter, you can compare how you did at various prices— maybe when you dropped the price of Zork from $16 to $14, your sales skyrocketed. Watch out: Your competitor may suddenly build up his inventory and slash prices! In the Chips is an engrossing game that teaches you about profits and losses and how a business basically operates. You must find that optimal balance between inventory, prices and advertising to succeed and, thus, win this game. (Creative Software, 230 East Caribbean Drive, Sunnyvale, CA 94089; $29.95, cartridge.) H Christine Adamec (1921 Ohio St. NE, Palm Bay, Fl. 32907) is a professional writer, with art ides in McCall's, Gradu- ating Engineer, In Business and RUN to her credit. As the mother of two children, ages five and six— who frequently seme as her guinea pigs for testing — she has become particularly intrigued with the subject of children's software. She eagerly invites readers to send in their comments on this column's content. Circle 63 on Header Service caret HI Version 2.0 EVERYTHING YOU EVER WANTED IN A DISK UTILITY . . . AND MORE!! FOR THE COMMODORE 64* H • Fully automatic back-up of almost any protected disk. • Copy files [PRG, SEQ, RND] with full screen editing. • Three minute back-up of standard disks [even many protected disks]. • Format a disk in ten seconds. * View and alter sector headers. • Remove errors from any track/sector. • Edit sectors in HEX, ASCII — even assembler. • Create errors on any track/sector [20, 21 , 22, 23, 27, 29] instantly. • Drive/64 MON, even lets you write programs inside your 1541 . • All features are fully documented and easy to use. • None of our copy routines ever makes the drive head "kick." Yes, you get all of this on one disk for this low price! S39.95 Continuing Customer Support and Update Policy 'Commodore 64 is h regfeiered irademark ol Commodorei Business Mtichiims re . . . WRITE OR PHONE . . . STORPOINT SOFTWARE Star Route 10 Giselle, CA 96034 [91 6J 435-0371 All orders add S3.0O shipping/han- dling. California residents add 6"/. sales la*. COD orders add an add'l J-*, orj shipping. Check, Money Order, VISA, and Master- card nceoplod, RUN APRIL 1965/ 23 Commodore Sundial By Telling time by the sun is an unusual application, but one ideally suited for your Commodore, This article tells you how to make a sundial, and the accompanying program gives you the necessary data. One of my childhood memories is of a large sundial on my neigh- bor's lawn. The sundial, mounted on a pedestal, was made of brass, with a traditional, round clock- 1 ike face and a slender pointer. As the sun passed overhead, the shadow of the pointer moved across the face, indicating the time of day. While beautifully decorated and of fine workmanship, the sundial had one flaw. It kept very poor lime. It was not uncommon to find a differ- ence of 30 minutes between sundial time and clock time. I remember being disturbed by this. How could such a finely crafted instrument he so wrong? When I grew up, I eventually learned why the sundial performed the way it {lid. As the seasons change, the sun passes higher or lower in the sky, affecting the position of the pointer's shadow. Also, since the earth does not orbit the sun in a perfect circle, the length of a solar day varies throughout the year. To indicate time correctly, a sun- dial must accommodate these phe- nomena. In addition, it must be specifically prepared for the exact location where it is to be used. Would it be possible to design an improved sundial, one that would maintain the charm and simplicity of the traditional style and still keep good time? Theoretically, this was possible. The large number of cal- culations required, however, discour- aged pursuit of the idea. When I bought my VIC-20, my in- terest in the sundial rekindled. With its standard 5K memory and Basic in- terpreter, the VIC-20 proved equal to SUNDIAL FOR EASTERN STANDARD TIME Figure 1 . Sample sundial pattern, from data generated by the Solar program. contending with the two fundamental problems of sundial design: keeping track of the sun's apparent position throughout the year and computing the length and direction of the point- er's shadow. The Solar program was prepared to handle all the necessary calcula- tions and to serve as an aid to de- signing an improved sundial, which is, after all, a solar clock. The Solar program uses straightforward, stan- dard Basic and will run on the C-64, Plus/4 and C-16 as well as the VIC-20 with or without expansion. How It Works The program (see Listing 1) works in the following way. Your sundial is a flat surface placed horizontally on the ground, with a single pointer ex- tending straight up. You specify a time of day, a month and the sun- dial's exact geographic location, (The Solar program assumes north lati- tudes and west longitudes.) The computer then tells you whether the sun is above the horizon 26 / RUN APRIL 1985 and, if so, where on the flat surface the tip of the pointer's shadow will appear. By running the program for various combinations of times and months, then plotting the computed shadow locations on the flat surface, you can prepare an accurate sundial pattern. Following is a sample run of the Solar program. All input, which you must provide for the computer, is underlined. RUN LATITUDE (DEG.MIN) LONGITUDE (DEG.MIN) G.M.T. (HOUR.MIN) MONTH (1 TO 12) 41,30 73,00 14,30 8 SHADOW APPEARS, POSITION OF END IS: WEST .742973688 NORTH .348427809 The latitude and longitude indicate the location of the sundial. The above coordinates are for my home in Con- necticut. You can find the latitude and longitude of any location by re- ferring to an atlas or road map. "G.M.T." stands for Greenwich Mean Time, the international time standard. Twenty-four hour notation is used, hence 14:30 is 2:30 PM in Greenwich, England. Convening to local time, this is 9:30 AM Eastern Standard Time, or 10:30 am Eastern Daylight Time. When making a sundial, you must use the correct time zone and, for most parts of the country, select either Standard Time or Daylight Saving Time. Conversion from G.M.T. to local time is done as follows. Eastern Daylight Time— subtract 4 hours Eastern Standard Time — subtract 5 hours Central Daylight Time— subtract 5 hours Central Standard Time— subtract 6 hours Mountain Daylight Time— subtract G hours Mountain Standard Time — subtract 7 hours Pacific Daylight Time— subtract 7 hours Pacific Standard Time — subtract 8 hours The Solar program assumes that a year comprises 12 months of equal duration, which is sufficiently true for the intended purpose. Specifying month numberS means ihe program will use August 1, or thereabouts. RUN It Right C64;an)Y[C2Q;PluiM;C-l6 Disk or tape Listing 1. Vie Sohr prwam. 5 PRINT" [SUFT CLRH3 CRSR DNs}" 10 INPUT "LATITUDE (DEG,MIN){2 SPACEs)";D,M LET T=(D+M/60>*. 0174532 LET A=T INPUT "LONGITUDE (DEG,MIN> ";D,M LET P=(D+M/60)*. 0174532 LET B=P , (HOUR,MIN){3 SPACES}" ;H,M (1 TO 12) {5 SPACES J";M ,5235987 20 30 40 50 60 70 GOSUB 420 LET U=X LET V=Y I LET W=Z INPUT "G.M.T LET G=H+M/60 INPUT "MONTH LET M={M-1 }* 150 GOSUB 460 160 GOSUB 420 170 LET U=U-X 180 LET V=V-Y LET W=W-Z LET D=SQR{U*U+V*V+W*W)/2 IF D<1/SQR(2) THEN GOTO 250 220 PRINT 230 PRINT "NO SHADOW APPEARS" 240 GOTO 400 250 LET L=1/TAN( 1 . 5708-2*ATN( D/SQR< 1 -D*D) } ) 260 GOSUB 530 270 LET C=Z/SQR(Y*Y+Z*Z) 280 LET I=SGN(Y) 80 90 100 110 120 130 140 190 200 210 290 300 310 320 330 340 350 360 370 380 390 400 410 420 430 440 450 460 470 480 490 500 510 520 530 540 550 560 LET P=B GOSUB 420 GOSUB 530 LET C=Z*C/SQR(Y*Y+Z*Z) LET S=I*SQR(1-C*C) PRINT PRINT "SHADOW APPEARS, OF END IS:" THEN THEN :PRINT"POSITION S>0 S<0 PRINT PRINT EAST {3 SPACES }";L*S WEST {3 SPACES)"; -L* C>0 THEN PRINT C<0 THEN PRINT NORTH {2 SPACES) ";L* SOUTH {2 SPACES)" ;-L IF IF S IF C IF *C PRINT GOTO 1 [,[■;'[' x=cos(t)*cos(p) let y=cos(t)*sin(p) let z=sin(t) RETURN LET T=.0066 3 LET P=(G-121*. 2617993 LET T=T-.40003*COS(M)+.06929*SIN(M) LET P=P+ .00209*COS RETURN LET Z=Z*CQS(A)-(X*COS —Advanced pWfeciion for your own programs —Full size reference charts —How to design your own menus and more... -,_ __ 56.99 Bulletin Board Setup andonaratB your own bullBltn board withona or two tfrsJr drives. This one has all the features and you can customize it easily yourself 1-flUN MEGAS0FT-FJB5 2-CREATE MEGA FILES 3A0D TO SYSOP S CORNER 4-NEW SYSOP S CORNER 5- READ MESSAGES 6SCRATCH MESSAGE 7 -CYCLE MESSAGES $59.95 8 READ SYSOP MESSAGES 9 -WHITE OPENING MESSAGE 10-READ LOG 1 1 CYCLE LOG 12 READ DOWNLOAD FILE \ 3 SCRATCH DOWNLOAD FILE 14ADD TO OTHER SYSTEMS 15-CREATE OTHER SYSTEMS BBS Leveled Access • Expert Mode Private Message Base • Open Chalk Board for Up to 300 Passwords Highest Level Access Enclose Cashiers Check. Money Order, or Personal Check Alio* 1 .; days lor delivery. 2 10 7 day? lor phone orders Canada orders mus! be in U S Dollars VISA - MASTER CARD -COO Programs lor C.64 12 00 S 1 H on all orders s MegaSoft rv^ P.O. Box 1080. Battle Ground, Was Limited Software Sub million a Invited. P.O. Box 1080, Battle Ground, Washington 98604 Phone [206) 667-51 16 * BBS 687-5205 After Hours Cnmrwier to Comnuier 2ti t RUN AI'KII. ISBii Circle 189 on Reader Service cord. A Survival Guide to the 1541 Disk Drive This is a 40 + page book and comes complete with all commands and examples on how lo use them. A s 6.99 The Complete Book oh Telecommunications $6.99 A 40 + page book that will help you get started with your Modem. How to use it and how to access a BBS. Com- puServe, Dow Jones as well as up and down load. 1541 Super ROM $39.95 • Fast Save Load Verify • Fast Scratch and Validate • 10 Second Format with Verify • No more Drive Head rattling during Format or Error Reading * 1541 Super ROM is 100% Compatible • Easily installed in Minutes also Save with Replace is Improved • Two times faster, Eight times faster when used with Turbo 64 which is included APALLO COPIES IT ALL APALLO Does it AIL This program is the latest generation of copy programs, ft will do everything the $39.00 and $49.00 pro- grams will do and more. It Copies ALL drive errors, bad tracks and sectors, non-standard format, bad syncs, and half tracks. We feel this is the best program of its kind available... $29.95 MSD Sure Copy At last a complete utility package for the MSD Dual Drive. This is the first MSD utility program that does /( alt. The main menu options include: Copy Protected Disk Copy Files Format a Disk Change Disk Name Quit Copy Unprotected Disk Scratch a File Rename a File View Directory $39 95 Sure Copy will put all errors automatically on disk: 20, 21, 22, 23, 27 and 29s. D-C0DER Translates any machine language program into easy- to-read English descriptions with complete explana- tions of each command! Makes complete notations ol all important memory locations accessed by the program! (SI0. VIC, M0S, KERNAL, etc.) Gives you three ways of accessing programs: 1) Will read and list programs from DISK 2) WIN read and list programs Irom MEMORY! 3) Direct user Input (from magazines, etc.) Can be used to locate and examine any machine language program's protection routines! Can be used to easily break apart machine language programs tor study and examination! Printer option tor complete hard copy listings! You no longer need to be an EGGHEAD 10 read Machine Language. $19 95 N-CODER H9.95 the machine language manipulator... The perfect companion program to D-CODER! ?H H // °° l\ ■ » ' /<= Allows you to easily make changes in ma- chine language programs... right on the disk! « Rewrite ability allows code to be altered and then rewritten directly to the disk! • Features sector-by-sector scrolling assembly language display of machine language programs! • Notation of ASCII text equibalents tor easy spotting of embedded text strings! • Handy reference display ot alt assembly language commands and their ML numerical equivalents! • Byte splitter tor easy splitting of decimal addresses Into low byte-high byte format! Super Loader Super Loader is a Kartridge that plugs into your expansion port, that allows the computor, on power up start the disk drive and ioad the first preselected program on the disk. Change colors Load wedge Works with more drive Takes op no memory Reset switch included *W% Only $2995 Enclose Gasmen Chech Money Odor Q . r Pe'snnai Crrec* Alto* i* days Mm delivery 2 to 1 days to' phone orders Canada orders must be m U S Dollars VISA - MASTER CARD -COD Programs for 044 W 00 S i H on 4tl order) s MegaSoft KYA P O Box 1080 Rattle Rim.nrl Wa< Limited Sof1*ir8 Submlijloni IrWrttd P Box 1080, Battle Ground. Washington 98604 Phone (206) 667-51 16 • BBS 687-5205 ah*. H visCom M , , c m W « RUN APRIL 1935 I 29 Charting Your Future Biorhythms can tell you a lot about your state of being. This progi'am lets you chart them. Bj ALLAN E WHEELER Biorhythms are rhythmic fluctuations in a physical organism that are related to and indicative of various bi- ological processes. Biorhythms are based on 23-, 28- and 33-day cycles that start with at birth and initially proceed in a pos- itive direction. This pro- gram calculates your daily position on each of the biorhythm curves for any desired month and year. Vertical bar-graph rep- resentations of the phys- ical, emotional and in- tellectual levels for each day are printed to the screen. The lowest levels, consid- ered to be the ebbtide rest and re- covery phase, are indicated by purple bars projecting to the left of the screen. The high levels are the full- tide active phases of the biorhythms and are indicated by blue bars pro- jecting to the right. The high and low levels are also known as the recharge and discharge phases. Days when the transition between these periods occur are considered to be significant as critical periods 30 / RUN APRIL 1985 of instability and times of abnormal effects of the biorhythm. Those days are indicated by printing the day, or adjacent days if the event occurs close to the midpoint, in purple. Periods where two or three bio- rhythms are at very high levels during the same day are considered by some to be days of good fortune and luck. Such days arc flagged by a blue star for two high levels or a yellow star for three high levels occurring in RUN It Right the same day. The stars ap- pear in the day-of-thc- month column. Interesting periods to look at are your month and year of birth, 58 years, two months and approximately one week (21,252 days) from your birth and, of course, biorhythms for the present and future. No claim is made for the validity of biorhythms. There are those who claim that they are meaningless; others use them to direct their lives. I found them to be an interesting program- ming exercise. Using the Program The input screen will ask you to enter your birthdate, the year you are interested in and the starting month for that year. Entries are user friendly. You may enter the year as 1983 or simply 83. Months may be entered numerically or spelled out with at least the first three letters. Illogical days of the month, such as February 29th of a non-leap year, won't be accepted by the Input routine. 064, VIC-20 Datwette or disk drive TAKE BREAK! WITH NIGHTMISSION irnr You deserve the best. You've earned it. Now reward yourself with a session of Night Mission PIN BALL, th e most realist ic and challenging arcade simulation ever conceived! ■ Stunning graphics and dazzling . ,_ \ sound effects put Night Mission PINBALL in a class by itself. Game features: multi- ■"■ (ft nun ball and multi-player capabilities, ten different professionally designed levels of play, ' W * */ T 1 ■ a "d an editor that lets you create your own custom modes. ■ So take a break with , ' r "■' a Night Mission PINBALL from SubLOGIC. Winner of Electronic Games magazine's 1 983 Arcade Award for Best Computer Audio/Visual Effects. uk-l See your dealer or write or call tor more information. For direct orders please add $1 .50 lor shipping and specify UPS or tirst class mail delivery. Illinois residents add 5°/ sales tax. American Express, Diner's Club, MasterCard, and Visa accepted. Order Line: 800/637-4983 LOGIC 713 Edgebrook Drive Champaign IL 61820 (217) 359-8482 Telex: 206995 CJrcln 40 on He odor Service card. 10-110. Bar graph variable 490-570. Calculate biorhythms assignment and analyze 120-140. Initialization characteristics 150-320. Input routines 580-660. Print them without 330-390. Count days back to scrolling January of birth year 670-710. Proceed to the next 400-430. Find the number of month/year and do it days to January of again current year 720-740. Heading subroutine 440-470. Find number of days 750-790. Footing and Prompt from January current subroutine year to desired month 800-830. Error-checking 480. Go to Heading subroutine subroutine 840-860. Data Table 1. Program line descriptions. I tried to make the input routines as crash-proof as possible. An error- checking subroutine will check month and day entries against Data statements for correctness. Year en- tries are accepted only if they are numerical and if the current year entry is the year of your birth or later. If an unacceptable error is made in any of these entries, the Input statement will be repeated on the same line to avoid scrolling the input screen. The vertical bar graph has a reso> Union of 16 levels to the left and 16 to the right. The method I used could be applied to any program suitable for this type of graph. Scale your data from to 15 for full to minimum deflection to the left of the screen, and from 16 to 31 for right-hand deflection; then enter PRINT A$(N), where N is your scaled data. Include program lines 10-110 in your pro- gram initialization. You can experiment with these bars by temporarily adding the fol- lowing lines to the Biorhythm Chart program: 1 1 f. l'RINT"(CLR)":FORN = 0TO15: PR1NTSPC(7)AS(N):NF.XT: PRINT"(HOME)" 116 FORN = 16T031:PR1XTSPC(14)A$(N): NEXT:STOP To save memory and enable this program to run on an unex pa ruled VIC, REM statements were not in- cluded in the program. E Address all aulhor correspondence to Allan E. Wheeler, 1119 Niblick Road, Paso Robles, CA 93446. Listing 1 . Hiorhphm Chart program for the 064. 5 REM C64 BIORHYTHMS CHART BY A.E.WHEELER 1(J DIMA$(32):RV$=CHR$(18>:BKS=CHR$(157) :ROS =CHR$(146) 20 A$(13)=CHR$(182) : A$ ( 1 4 ) =CHR$<1 70 ) : A$< 1 5 ) =CHR$( 167) :A$(16)=CHR$(165) 30 A$(17>=CHR$(180}:A$(18)=CHR$(181 ) :A$(19) =CHR$(161 > 40 AS ( 8 ) =RVS+CHRS ( 1 60 ) : A$ ( 9 ) =RV$+A$ { 1 6 ) : AS ( 1 > =RV$+A$ ( 1 7 ) : A$ ( 1 1 ) =RV$+A$ (18) 50 A$ ( 1 2 ) =RV$+A$ { 1 9 ) : A$ ( ) =BK$+A$ ( 8 ) +A$ ( 8 > : A$(1 )=BK$+A$(9)+A$(8) 60 A$(2)=BK$+AS(10)+A$(8>:A$(3>=BK$+A$(11 ) + A$(8) :A$(4)=BK$+A$(12)+A$(8} 70 A$ ( 5 ) =BK$+A$ (13) +A$ ( 8 ) : A$ ( 6 ) =BK$+A$ (14)+ A$ ( 8 ) : A$ ( 7 ) =BK$+A$ (15) +A$ ( 8 ) 80 A$(20)=RVS+A$(13) :A$(21 ) =RV$+A$ ( 1 4 ) : A$< 2 2>=RV$+A${15):A${23)=A$<8) 90 A$(24)=A$(8)+RO$+A${16):A$(25)=A$(8)+RO$ +A$(17):A$(26)=A$(8)+RO$+A$(18) 100 A$(27)=A$(8)+RO$+A$(19):AS(28)=A$(8)+A$ <13):AS(29)=A$(8>+A$<14> 32 / RUN APRIL 1085 110 A$(30)=A$(8)+A$(15):A$(31 ) =A$ ( 8 ) +AS ( 8 ) : GC$=RV$+CHR$ ( 1 44 )+CHR$ ( 96 ) +CHR$( 1 46 ) 120 DEFFNA{X)=INT( ( (SIN( (X-INT(X) }*6.2832)+ 1 .05) 1*15.2) 130 TL$="(10 SPACES) (CTRL 9) {CTRL 1} DAY PH YS EMOT INTL (CTRL 0}" 135 BM$="{10 SPACES) (CTRL 9) {CTRL 1 } { 5 SPAC Es}-{2 SPACES }+ -{2 SPACES }+ -[2 SPACES }+ (CTRL 0)" 137 TD$ = "{SHFT CLRHCTRL 9} (CTRL 7) (4 SPACE s) BIORHYTHMS CHART {2 SPACES } {CTRL 0)(CT RL 1 }" 140 CB$="{2 SPACES) {CTRL 7}":CPS=" (CTRL 3) " : POKE53281 , 1 : POKE53280 , 6 145 PRINT" {SHFT CLRHCTRL 9} (CTRL 7) {12 SPA CEs) BIORHYTHMS CHART { 1 2 SPACES } {CTRL 1} {CTRL 0)" 150 INPUT" {COMD 4} (9 SPACES} YEAR OF BIRTH"; YB$:YB=VAL( YB$) 155 IFYB=0THENPRINT" (2 CRSR UPs } " ; : GOT01 50 160 IFYB<100THENYB=YB+1900 170 YR=YB:YB$=RIGHT$(STRS(YB),4) 180 INPUT" {CRSR DN)(9 SPACES} MONTH OF BIRTH ";MB$:B$=MB$:MO=VAL(MB$) : GOSUB800 : MB$=A $:MB=C *■ Livtitig I continued. 190 200 210 220 230 240 250 260 270 280 290 295 300 305 310 320 330 340 350 360 370 380 390 400 410 420 430 440 450 460 470 480 490 500 510 515 IFLB=1THEN180 INPUT" {CRSR DN}(9 SPACES} DAY OF BIRTH"; DB$:DB=VAL{DB$):BS=MB$:GOSUB810:DB$=DB$ N II + / IFDB<10THENSP$=" " IFDB=29ANDMB=2ANDINT( YB/4 } =YB/4THEN240 IFDB>BORDB=0THENPRINT"{2 CRSR UPs}";:GO TO200 INPUT" {CRSR DN)[9 SPACES) CURRENT YEAR"; YC$ : YC=VAL{ YC$ ) : IFYO0ANDYC< 1 00THENYC=Y C+1900 IFYC=0ORYC"{CRSR DN}{CTRL 9} {CTRL 3}{ 3 SPACES} {CTRL 0}{CTRL 5} = RECOVERY DA YS" PRINTTAB(5)"{CRSR DN)(CTRL 7JDBLE MAX{C TRL 5} = DOUBLE ACTIVE DAY" PRINTTAB(5)"(CTRL 8} {CRSR DN}TRIP MAX{C TRL 5} = TRIPLE ACTIVE DAY" PRINTTAB(5}"{CTRL 3} {CRSR DN)CRITICAL(C TRL 5} a UNSTABLE DAY" : PRINTTAB ( 1 4 ) " (CR SR DNHCOMD 4} HIT ANY KEY"; GETA$ : IFA$=""THEN31 PRINT" {CTRL 3} {CRSR UP} {31 SPACEsJWORKI NG{CTRL 1 ) {2 SPACES)"; DA=DA-DB MB=MB-1 :IFMB=0THEN400 ONMBGOTO390,360,390,380,390,380,390,390 ,380,390,380,390 DA=DA-28 : IFINT( YR/4 } =YR/4THENDA=DA-1 GOTO340 DA=DA-30:GOTO3 40 DA=DA-31 :GOTO340 IFYR=YCTHEN440 DA=DA+365:IFINT{ YR/4 ) =YR/4THENDA=DA+1 YR=YR+1 :IFYR=YCTHEN440 GOT041 READMO$ : READDC : READC IFMO$="FEB"ANDINT( YR/4 ) =YR/4THENDC=DC+1 IFMO$=LEFT$(MW$,3 )THEN480 DA=DA+DC:GOTO440 GOSUB720 FORN= 1 TODC : DA=DA+1 BP=FNA( DA/23 ) : BE=FNA( DA/28 ) : BI=FNA( DA/3 3) CDS = "" IFBP > 1 2 ANDBP < 1 90RBE > 1 2 ANDBE < 1 90RBI H 3 AN DBK18THENCD$ = " {CTRL 3} CRITICAL {CTRL 1 }" 520 PF$=CP$:IFBP>15THENPF$=CB$ 530 IFBP>29THENFL=1 540 PE$ = CP$:IFBE>15TI1ENPE$=( " 550 IFBE>29THENFL=FL+1 560 PIS=CPS:IFBI>15THENPI$=CB$ 570 IFBI>29THENFL=FL+1 580 FL$="{10 SPACES}" 585 IFFL=2THENFL$="(CTRL 7) DBLE MAX (CTRL l )" 590 IFFL=3THENFL$="(CTRL 8} TRIP MAX [CTRL 1J" 600 FL=0:NS=MID5(STR$(N},2):L=2-LEN(N$) 610 PRINTFLS;GCS;" ";SPC{L)"{COMD 4)"N$; 620 PRINTTAB! 1 4 ) GCS ; PF$ ; AS ( BP ) ;TAB ( 1 9 )GCS; 630 PRINTTAB (20 (PES; AS (BE) ;TAB(24>GCS; 640 PRINTTAB(25)PIS;AS(BI} ;TAB( 29 )GC$ ;CD$ 650 LC=LC+1 :IFLC=16THENPRINTBM$:GOSUB750:GO SUB720 660 NEXT 670 PRINTBM$:GOSUB750 660 READMOS 690 IFMO$="X"THENRESTORE:YR=YR+1 :GOTO680 700 READDC:READC:MW$=HO$ 710 GOTO450 720 PRINTTDS"{CTRL 9} (CTRL 7) (7 SPACEs}"MO$ ;YR"{CRSR LF}{3 SPACES) {CTRL 0)" 730 PRIMTTAB(9)"(COMD 4)BIRTHDATE: "SP$;MB$ " "DB$" ";YB$ 740 PRINTTAB(9)"DAYS ALIVE: "; INT( DA+ . 5 ) : PR INT" (CRSR DN) "TL$: RETURN 750 PRINT" { HOME } " : FORAW= 1 T022 : PRINT :NEXT : PR INTTAB(9)"(COMD 4) (CTRL 9)C(CTRL 0JONTI NUE{6 SPACES) (CTRL 9}N{CTRL } EW DATA"; 760 GETA$:IFA$=""THEN760 770 IFA$="C"THENLC=0:RETURN 780 IFA$="N"THENRUN 790 GOTO760 800 LB = 0:B$ = LEFTS(B$,3) *■ SCREEN DUMPER 64" COPYRIGHT 1984 BY MICRO-W DISTRIBUTING INC How would you like to have a copy of all of the text or graphics that appear on your monitor screen? Well SCREEN DUMPER 64" may be what you are looking for. This program will transfer to your printer* a copy of what you see on your monitor screen including hi-resolution graphics, text and multicolor sprite, etc. It even works with the KOALA PAD". You can load this program into your computer in a hidden location so that it shouldn't interfere with your programs. This means that you can use your Commo- dore 64 normally and then call up this routine to dump what is on the screen. Colors are repre- sented by 16 shades of gray for faithful reproductions. ALL THIS FOR ONLY $29.95 Call: (201 ) 838-9027 To Order Circle 1 72 on Reader Service card Micro** DISTRIBUTING INC 1 342 B Route 23 BLitlei. N J 07405 RUN APRIL J985 / 33 Listing I continued. 81 READA$ , B , C: IFA$=B$ORC=MOTHENRESTORE : RET URN " ' 820 IFC=-1TI1ENREST0RE:PRINT"{2 CRSR UPs}";: LB=1 : RETURN 830 GOTO810 840 DATA"JAN" ,31,1, "FEB" , 28 , 2 , "MAR" , 31 , 3 , "A PR", 30, 4, "MAY", 31 ,5 850 DATA"JUN",30,6,"JUL",31 ,7, "AUG", 31 ,8,"S EF", 30, 9, "OCT", 31 ,10 860 DATA"NOV",30,11 , "DEC" ,31 , 1 2 , "X" , , -1 Listing 2. l!iorh\)hm Chart program for the \'IC20. 10 20 30 40 50 70 80 90 100 1 10 120 130 140 150 160 170 180 190 200 210 220 230 240 250 260 270 280 290 :AS(15) DIMA$( 32}:RVS=CHR$(18):BKS=CHRS(157) :RO$ =CHR$(1 46) A5<13)=CHR$( 182) ; A$ ( 1 4 ) =CHR$ ( 1 70 ) =CHRS{167) :AS(16)=CHR$(16 5) AS( 17}=CHRS{180):AS<18)=CHR$( 181 ) :AS(19) =CHRS( 161 ) A$(8)=RV$+CHR$(160) :AS(9)=RV$+AS<16) :A$( 10)=RV$+A$( 17) :A$(11 )=RVS+A$<18) AS(12)=RV$+A$(19) :AS(0)=BK$+A${8)+A${8) : A$( 1 )=BK$+A$(9)+A$(8) A$ ( 2 > =BK$+A$ ( 1 ) +A$ ( 8 } : AS < 3 ) =BK$ + A$ ( 1 1 > + A$(6) :A$(4)=BK$+A$( 12)+A$(8) AS { 5 ) =BK$+A$ (13) +A$ ( 8 ) : AS ( 6 ) =BK$+A$ { 14) + A$ ( 8 ) : A$ ( 7 ) =BK$+A$ ( 1 5 } +A$ ( 8 ) A$(20)=RVS+A$(13) :A${21 )=RVS+A${14):AS(2 2)=RV$+A${ 15):A$(23)=A$(8) AS(24)=AS(8)+RQ$+A$(16) : A$ ( 25 ) =A$ ( 8 )+RO$ +AS ( 1 7 ) : A$ ( 26 ) =A$ ( 8 ) +ROS+AS { 1 8 ) I A${27)=A$(8>+ROS+A$(19):A${28)=AS{8)+AS < 13):A$<29)=A$(8)+A${14> AS(30)=A$<8)+A$(15) :A$(31 )=AS(8)+A$(8): GC$=RV$+CHRS( 1 44 >+CHR$( 96 }+CHR$( 1 46) DEFFNA{X)=INT( ( (SIN< BORDB=0THENPRINT"(2 CRSR UPs}";:GO TO200 INPUT" {CRSR DM} CURRENT YEAR" ; YCS: YC=VA U YCS ) : IFYO0ANDYC< 1 00THENYC = YC + 1 900 IFYC=0ORYC 510 CD$="(CTRL 1 )":IFBP>12ANDBP<190RBE>12AN DBE< 1 90RBI> 1 3ANDBI < 1 8THENCD$=" (CTRL 5} " 520 PFS=CP$:IFBP>1 5THENPFS=CB$ 530 IFBP>29THENFL=1 540 PE$=CP$:IFBE>15THENPE$=CB$ 550 IFB2>29THENFL=FL+1 560 PIS=CPS:IFBI>15THENPI$=CB$ 570 IFBI>29THENFL=FL+1 580 FL$=" ":IFFL=2THENFL$="(CTRL 7)* (CTRL 1 590 IFFL=3THENFL$="{CTRL 8} * (CTRL 1}" 600 FL=0:N$=MID$(STR$(N) , 2 ) : L= 2-LEN ( N$ } 610 PRINT" ";GCS;FL$;CDS;SPC(L)N$; 620 PRINTTAB { 5 ) GC$ ; PFS ; A$ ( BP ) ; TAB ( 1 ) GC$ ; 63 PRINTTAB! 11 )PE$ ; AS ( BE > ; TAB< 1 5 )GC$ ; 64 PRINTTAB! 16 )PIS; AS {BI) ;TAB{20)GCS 650 LC=LC+1 :IFLC=16THENPRINTBM$:GOSUB750:GO SUB720 660 NEXT 670 PRINTBM$:GOSUB750 680 READMOS 690 IFMO$="X"THENRESTORE:YR=YR+1 :GOTO680 700 READDC:READC:MW$=MOS 710 GOTO450 720 PRINTTDS;: PRINT" {CTRL 9) (CTRL 7) {7 SPAC Es)"MOS;YR"{CRSR LF}(7 SPACES ) (CTRL 0)" 730 PRINT"{CTRL 1JBIRTHDATE: "SP$;MB$" "DBS ;YBS; 740 PRINT" {2 SPACES) DAYS ALIVE: " ; INT{ DA+ . 5 ) :PRINTTLS: RETURN 750 PRINT" (HOME) ": PRINTTAB ( 255 }TAB(1 54 }"{CT RL 1}{2 SPACES) {CTRL 9 } C { CTRL 0)QNTINUE (2 SPACES}{CTRL 9}N{CTRL 0)EW DATA"; 760 GETAS:IFAS=""THEN760 770 IFAS="C"THENLC=0:RETURN 780 IFA$="N"THENRUN 790 GOTO760 800 LB=0:BS=LEFT$(B$,3) 810 READA$,B,C:IFAS=B$ORC=MOTHENRESTORE:RET URN 820 IFC=-1THENRESTORE: PRINT" (2 CRSR UPs)";: LB=1 3RETURN 830 GOTO810 840 DATA"JAN" ,31,1, "FEB" , 28 , 2 , "MAR" , 31 , 3 , "A PR", 30, 4, "MAY", 31, 5 850 DATA"JUN",30,6,"JUL",31 ,7, "AUG", 31 ,8,"S EP" r 30,9,"OCT",31 ,10 860 DATA"NOV",30,11 , "DEC", 31 ,12,"X",0,-1 34 /RUN AMI, l