■^— ., r- T^ ri i, ■: ^ c-^^^ Timekeeping For The VIC-20 Creating A Simple The Resource Magazine For CBM/PET • Apple • Atari • OSI Word Processor COMPUTB The Journal For Progressive Computing $2.50 February, 1982 Issue 20 Vol, 4, No. 2 63379 Programming Your Home Insurance Inventory Named GOSUB With Variable Passing: Apple Atari Player- Missile Graphics Made Easy A User Defined '74470"63379" 0 2 Character Editor l^Jpriilg ^^"^ ^^ ^^ ForPET/CBM vt*^« wi" Compatible with Apple® Language Card 16K RAM Provided Additional 16K RAM Chips Available, utilized by user-generated software. No Chip to Pull No Cables to Attach Works in our Expansion Chassis See your Apple® dealer or contact us for information. ^ Apple II is a traderngfeat Apple Computer lne?»' -» — *=•» - Photo— An^rafffflrfimals Enterprises'^ Marty Stouffer Product ons "fountain PtiOto^Avery E. Dee Kmnm&mwi^^m^^t^ \ ij^ iii,.wH,i|i i IF YOU'RE WAITING FOR THE PRICE OF WORD PROCESSORS TO FALL WITHIN REASON. Everyone expected it would happen sooner or later, , .with it already has! Now all the marvelous benefits of expensive and advanced word processing systems are available on Commodore computers, America's largest selling computer line. WordPro PLUS, when combined with the new 80 column CBM 8032, creates a word pro- cessing system comparable to virtually any other top quality word processor available— but at savings of thousands of dollars! TM WordPro is a Registered Trademark of Prolessionai Software, New, low cost computer technology is now available at a fraction of what you would expect to pay. This technology allowed Commodore to introduce the new and revolutionary CBM 8032 Computer. WordPro PLUS turns this new CBM 8032 Computer into a sophisticated, time saving word processing tool. With WordPro PLUS, documents are dis- played on the computer's screen. Edit- ing and last minute revisions are simple and easy. No more lengthy re-typing sessions. Letters and documents are easily re-called from memory storage for editing or printing with final drafts printed perfectly at over five hundred words per minute! Inc. WordPro was wrttten By Ste«e Punter, Our nationwide team of professional dealers will show you how your office will benefit by using WordPro PLUS. At a price far less than you realize. Invest in your office's future. . . invest in Call us today for the name of the WordPro PLUS dealer nearest you. Professional Software Inc. 166 Crescent Road Needham, MA 02194 (617)444-5224 TELEX: 95 1579 (pMS Sof twa Geiieral Accou For the Commodore 8000 Mow there is an interactive General Accounting System designed especially for the first time user, The user is led through each function by highlighted prompts explain- ing the required input at each point. And all input requests are prompted with complete verification. Plus, a step-by- step instruction manual guides the user through the General Ledger Cash Disbursements and Cash Receipts Journal as wel as a General Journal. Main- tains account balances for Present Month, Quarter to Date and Year to Date. Accepts postings from program. The user prompts and the detailed manual make it virtually impossible for the first time user to get lost or to accidentally crash. Accounts Receivable, Accounts Payable, Payroll and other programs. Also provides user customized financial statements. Up to 1000 accounts and up to 99 departments. re Systems nting System II Series Computer System Accounts Receivable Invoices and Monthly State- ments as well as Credit and Debit Memos. Accomodates full or partial payments. Gser sets finance charge rate and period. User also sets invoice aging reports and aging breaks, invoices may be dis- tributed among nine different General Ledger accounts with Accounts Payable Accounts Payable checks with full voucher detail. Detailed check register. Auto- matic application of Credit Memos. Gser sets invoice aging reports and aging breaks. Invoices may be dis- Payroll Payroll checks with full deductions and pay detail. Pays regular, overtime, holiday and piece work hours. Accommodates Weekly, Bi-Weekly, Semi-Monthly and Monthly employees. Gp to eight miscellaneous deduc- tions or payments per automatic updating to the General Ledger. During invoice data entry the invoice is displayed on the screen and typed exactly as if in a typewriter. File capacity is 2000 minus number of customers multiplied by 1.4. Five hundred customers allows room for 2100 invoices. tributed among nine different General Ledger accounts with automatic updating to the General Ledger. File capacity is 2000 minus the number of vendors multiplied by two. employee. Prints Payroll Journal, Payroll Check Register and an Absentee Report as well as 941 infor- mation and W2 forms. Main- tains Monthly, Quarterly and Yearly totals for up to 350 employees. Automatic General Ledger updating. See your nearest Commodore dealer for a demonstration. CMS Soft:ware Systems 2204 Camp David Mesquite, TX, 75149 214 285-3581 TASC: The Applesoft Compiler. It turns your Apple into a power tool. Step up to speed. TASC, the Applesoft Compiler, converts a standard Applesoft BASIC program into super-fast machine code. By increasing program execution speed up to 20 times, Microsoft gives you a power tool for Applesoft BASIC programming. Highest capacity available. TASC will compile and run larger programs than any other Applesoft Compiler. As a disk-based system, it doesn't require the simultaneous pres- ence of compiler and program in memory. The memory you save allows you to compile significantly bigger programs. Power without bulk. Code expansion of up to 100% severely restricts other compilers. TASC's special code compression schemes typically limit code expansion to only 25%. You'll really appreciate that with complex programs or programs that utilize Apple's hi-res graphic pages. More BASIC power. TASC's powerful new commands increase Applesoft BASIC programming capability. Chain with COMMON allows compiled programs to share variables, so a main menu 'Applesoft is a trademark of Apple Computer. Inc. supports several programs in a single runtimie environment. ' TASC's True Integer Arithmetic and Integer FOR... NEXT capabilities maximize the execu- tion speed of compiled programs. TASC's near total compatibility with Applesoft speeds compil- ation of existing programs with little or no modification. What about mistakes? You perfect your programs inter- actively with Applesoft. If some- thing does slip by, TASC recovers from errors discovered in compilation and traps all runtime errors. It even permits graceful interruptions during compilation. See for yourself. Ask for a demonstration of , TASC at your Microsoft dealer. Discover the software package that turns your Apple into a power tool. /HICRpSOfT V consumer! products f ; A Division of Microsoft Inc ! 10700 North up Way • Bellevue. WA 98004 FebruofV, 1981. Issue 21 COMPUTEI Table of Contents February 1982, Vol. 4, No. 2 The Editor's Notes Robert Lock, 8 Ask The Readers Robert Lock, Richard N/lansfield and Readers. 12 Computers And Society David D. Thornburg, 16 The Beginner's Page: Translating Equotions i^ichard Mansfield, 19 Guest CommentorY: Hidden Costs of Computer Technology Craig Brod, 22 Applications 28 Insurance Inventory RobertW. Baker, 28 Creating A Simple Word Processor Steve Grodijan, 36 Transposition Janet Whitehead, 44 Telecommunications: Why 300 Baud? Michael E. Day, 48 Reading The Status Register Bob Sullivaa 50 Book Review: Some Common BASIC Programs Jim Butterfield, 52 Multitask: A Realtime, Multitasking Operating System Emulator Hal Bredbenner, 54 The Apple Gazette 62 Plotting Polor Graphs With The Apple II Marvin L. DeJong, 62 Disassembling Machine Language Programs Without Leaving BASIC John R.Vokeyond H.Cem Kaner,68 Named GOSUB With Voriable Passing Mike Smith, 69 Ttie Atari Gazette 77 INSIGHT: Atari Bit! Wilkinson, 77 P/M Graphics Made Easy T, Sak and S. Meier, 90 Review: Eastern Front Edward P,McMahon,94 Odds And Ends: Clearing Memory Charles Brannon, 95 OVERVIEW: Textwizard 96 Put Graphics Modes 1 And 2 At The Bottom Of Your Screen R. Alan Beike, 100 Atari PILOT At The Helm. Patricio Tubbs, 104 Atari Listing Conventions 107 Moire Magic Leo Cerruti, 112 PutARoinbowlnYourAtari Fred and Doug Tedsen, 114 The OSI Gazette ^-jg A Smoll Operating System: OS65D, The Disk Routines T. R. Berger, 118 The PET Gazette ^28 A User-defined Character Editor P. j. Rovero, 128 Marquee Mark Bernstein, 135 Disk Disassembler George H. Watson, Jr., 145 Line Input For The PET Robert Lando, 154 Measure Time Intervals With The PET Porollel User Port . , . Robert MacNoughton, 160 PET Listing Conventions 165 Review: Screen Pro Edward K. Crossman, 166 VlC-20 Update 168 Extended VIC-20 Input Devices: Paddles And The Keyboard Mike Bassmon and Salomon Lederman, 168 Timekeeping Keith Schleiffer, 173 An Easy Way To Relocate VIC Programs On Other Commodore Computers Greg Sherwood and Ross Sherwood, 176 Review: UMI Amok For VIC Harvey B. Herman, 177 Review: UMI3K VIC Memory Expansion Harvey B. Herman, 178 Alphobetizer Jim Wilcox, 179 VIC Listing Conventions 179 CAPUTE 181 New Products 183 Advertisers Index 208 • •! •• •••• L. 6CP COMPUTE! The Journal for Progressive Computing (USPS: 5372M) i.s published 12 times e^ch year bv Small System Services, Inc.. P.O. Box 54L16, GreeiisboR., NC 27403 USA. I^lione: (919) 275-9809. Editorial Offices are located at 625 Fulton Street. Greensboro, NC 27403. iliimestic Siibsi I iplions: 12 issues, $20. (HI. Scml miI)m lipiiiiti nrcleisor chriiiKi' (il^itklressd'.O, F .•\1>ImiII Diivr. KroniiKill, l'.\ liKHLS. Coriltolli-il unuliilicm ixjsl^if^f [inid liI (ircctvsbord. N'C 274IK! and iiddiiioiial iiKiiliiiH olfucs, Kiiiire cllMl^■lU^ ui|iyriglit (S, 19H2 bv Small .Svsieiii Services, hit- ,MI Ri(flils i fserved. ISSN IH94-;i."»7X. TOLL FREE Subscription Order Line 800-345-8112 In PA 800-662-2444 COMPUTE ;12.95 COMPUTEi's :|RST bOOK PET/CBM t^^kS^j Available Now At Your Computer Retailer $12,95 f;'f?5^-5j?'^ Only $12.95 plus S2.00 shipping and handling* Direct orders in Ific US call TOLL FREE 800-345-81 12. In Pennsylvania call 800-662-2444. MasterCard, VISA, check or money order payable in LIS dollars accepted. Send to COMPUTE! Books, 5 1 5 Abbott Drive, Broomall, PA 1 9008 USA. 'Ouiside US ,«lf1 iA 00 .iirni.dl. S.'^OO Mirf.u:r ni.iii /<:"-^ Ai.tn \s .MfYjivtfvnl Mderitdrtt 0* At. ( J CHM .trc tMflHnidcs of ComrMcxId.re BuM^p^^ M-k runt- y rrir COMPUTE! Februory, 1981. Issue 21 Robert C Lock Publisher/Editor A Major Format Change Now that we've complclcd the merger of Honif inid Eduailiiinal COMPUTING! and RiTreatioiuil (Umi- piilmg im<> COMPUTE!, we're eoiu'eiKraling on revamping llic orsfani/ation ol (lie inaga/inr lo better seiAC you. Beginning in March, COMPUTE! will have two clistinei .sections I'atlier than (he .six ii has now . The first section will he called "Home and Educational C'()\[Pl"iT\'(il."" containing applica- tions, inlorials. columns, and reviews. The- sf( oiul section of the magazine will become "The journal." carrvinga mix of articles for intermediate and achanced users. We'll continue "New Prodiicis," rt»f/ continue lo provide the same excellent lesourw.- and appli- cations articles. .\s we mo\e into the new year \\\\U conlimiing explosive growth, we're sure you "old timers" will find the new format easier to use, and \()ii begiimers to the world of personal computing will find it much more convenient. Remcmbei , this starts in March and, as alwavs. we'd appreciate vour feedback and comments. The Hardware Wars: Late- breaking and Major News Atari, Inc. has just slashed the suggested retail price of the .Atari 800 system from Si, 080. 00 to S899.00. Commodore is currently introducing two new machines that promise to be quite competitive in the personal markel. Shown at the Consinner Electronics Show in Las \ egas the Inst week in January: a "game" computer with plug-in cartridges and a flat kevboard for around SI 50.00. And you can add a B.\SIC cartridge to learn progranmiing. On the "high " end, as it were, and also from Com- modore: a 64 K color, graphics computer (also for TV connection) said to retail lor less than $(i()0.00. And that's with the 64K of memory. Look's like 1982 will surelv be an interesting year!. And As The Industry Grows In recent editorials, we've commented on software protection, copvrights, the right ol' back-up, and more. We welcome vour diouglits on these and other areas of inleresl to the personal couijHiter consumer. A letter Irom a subscriber laised another question that we haven't considered and will put on the 1982 "connnenis coming" list. I'll raise some of his points here and solicit vour input. ...I just resisted purchasing an expensive piece of computer software for which the warrant V reads in part; .\ll...((Hn])uter pi'ograms are clistrii)tited on an "as is" basis without warranty of any kind. The entire risk as to the qualitv and performance ol such pro- grams is with the purcha.ser. Should the ]5rogranis prove de- fective...the |jiirchaser and not the manufactiner..,assimies the entire cost of all necessar\ ser\icing or re[jair. (I he company) shall have no iial)ilit\ or responsibility to a purchaser. This is not mere legal jargon. It's the embodiment of a business philosophy which seriousK harms all of us... 'fo soft- ware lompanies I sa\ : .A.ccepi responsl- bilitv for \<)ur products, (iet the bugs out Injiirr \()U sell them. Don't try to sell a pro- gram debugged b\ vour customers as a "revised" or "improvetl" product ai additional tost. To software t:onsumers f say: If possible, avoid jModucts for which there is no warrantv. Don't buy on faith, (-omplain loudly to software companies which provide no warranty... Oiu' reader makes a series of interesting points. While I'm no lawvef. I would wonder if the portions ol tlie w;uratU)' shown abo\e ate realistic in enlorce- ability. Would .some of ytni lawyer/readers ( at f to join this discussion with the rest of us.' I'll look forward lo vour comments. © Professional Software Introduces POWER by Brad Tcmpleton -fT ADD FOWL TO YOUR ^so.®^ COJVIMODORE COMPU1IR POWER produces a dramatic improvement in the ease of editing BASIC on Commodore's computers. POWER is a programmer's utility package (in a 4K ROM) that contains a series of new commands and utilities which are added to the Screen Editor and the BASIC Interpreter. Designed for the CBM BASIC user, POWER contains special editing, programming, and software debugging tools not found in any other microcomputer BASIC. POWER is easy to use and is sold complete with a full operator's manual written by Jim Butterfield. power's special keyboard 'instant action' features and additional commands make up for, and go beyond the limitations of CBM BASIC, The added features include auto line numbering, tracing, single stepping through programs, line renumbering, and definition of keys as BASIC keywords. POWER even includes TM POWER ts a fiegistered Trademaht of Prolassjonal Software. Inc. new "stick-on" keycap labels. The cursor movement keys are enhanced by the addition of auto-repeat and text searching functions are added to help ease pro- gram modification. Cursor UP and cursor DOWN produce previous and next lines of source code. COMPLETE BASIC program listings in memory can be displayed on the screen and scrolled in either direc- tion. POWER is a must for every serious CBM user. Call us today, for the name of the Professional Software dealer nearest you. Professional Software Inc. 166 Crescent Road Needham, MA 02194 Tel: (617) 444-5224 Telex #951579 10 COMPUTEI February, 1932. Issue 21 Staff of COMPUTi! Robert C. Lock, Publisher/Editor Kathleen Martlnek Managing Editor Ricliard Mansfield, Assistant Editor Alice S. Wolfe, Publisher's Assistant Georgia Papadopoulos, Art Director/ Production Manager Horry Bloir, Director, Advertising Sales/ Promotion Terry Cash, Typesetting/Production Assistant De Potter, Production Assistant Dai Rees, Production Assistant Kote Toyior, Production Assistant Charles Brannon, Editorial Assistont Sonja Whitesell, Dealer Coordinator Bonnie Valentino, Accounting Coordinotor Fran Lyons, Circulation Coordinator Associate Editors Jim Butterfield, Toronto, Canada Harvey Herman, Greensboro, NC Contributing Editors Marvin DeJong, Dept of Mathematics -Physics, The School of the Ozarks Pt. Lookout, MD 65726 Eric Rehnke, 1067 Jadestone Lane, Corona, CA 91720 David Thronburg, P,0, Box 1317, Los Altos, CA 94022 Bill Wilkinson, Optimized Systems Software, 10379-C Lonsdale, Ave. Cupertino, CA 95014 Gene Zumchok, 1700 Niagara St., Buffalo, NY 14207 Subscrfption Infomrialion [12 Issue Year): COMPUTE! Circulation Dept. 515 Abbott Drive Broomall, PA 19008 USA U.S. $20.00 Canada S25.00 (U.S. funds) Europe: Surface Subscription, $25,00 (U.S. funds] TOLL FREE Subscription Order Line 800-345-8112 lnPAe00-6«2-2444 Canadian Retail Dealers should contact: Micron Distributing 409 Queen Street West Toronto, Ontario M5V 2A5 416-361-0690 Advertising Sales if you're in Ofclahoma, Texas or the Western Stales, we're now represented by Phoebe Thompson and Associates. Give them a call for space reservations, contract/insertion information or ques- tions. You can reach them through the following offices: Northern Colifornia, Pacific Northwest Rocky Mountain States, Texas, Oklahoma Phoebe Thompson and Associates 101 Church Street, Suite 13 Los Gates, CA 95030 408-354-5553 PHOEBE THOMPSON Southern California, Arizona, New Mexico, Nevada Phoet>e Thompson and Associates P,0, Box 700-462 Redondo Beach. CA 90277 JOANN SULLIVAN 213-378-0143 If you're in the Ecst, we're now repre- sented by The GIttelman Company. You can reach them through the following offices: New England, New York State: The Gittelman Company Statler Office BuHding Suite 518 20 Providence Street Boston, MA 02116 617-451-0822 JOAN DONAHUE 'The Gittelman Company Summit Office Centre 7622 Summit Avenue Fort Washington, PA 19034 215-646-5700 DOUG JOHNSON New York City Metro Area, Mid-Atlantic and Southeastern States: Local Numbers: New York 212-567-6717 Atlanta 404-523-1252 If you're in the Midwest, we're now represented by GB & Associates. You can reach them through the office of: GB & Associates P,0, Box 335 Libertyville, IL 60048 312-362-1821 GORDON BENSON COMPUTI! Home Office Contacts Advertising Sales Manager, Horry Blair Advertising/Production Coordinator, Alices. Wolfe Auttiors of manuscripts warrant thot all moterials submitted to COMPUTEI ore original nnateriols with full ownerstiip rigtifs resident in said oufliors, By subrnitting articles to COMPUTE!, authors acknowledge that such materials, upon acceptance for publication, become the exciusive property of Small System Services, Inc. No portion of this mogozine may be reproduced in any form without written pefnission from the publisher. Entire contents copyright c 1982. Smoll System Services. Inc. Rights to programs developed ond submitted by outhors are explained in our author controct. Unsolicited materials not accepted for publication in COMPUrEI will be returned it author provides a sell-addressed, stornped envelope. Program listings should be provided in printed form {new ribbon) as well os machine readable form, Arlicles should be furnished as typed copy (upper and lower case, pleose] with double spacing Each page of >our article should bear the title of the article, date and name of the outhor COMPUTEi assumes no liabtiity to- errors in articles or advertisements. Opinions expressed by authors are not necessarily those of COMPUTEI PET is a trademarl< of Commodore Business Machines, Inc. Appie is a trademark of Apple Computer Compony. ATARI Is a trademork of Atori. Inc. I Address ail advertising materials to: 625 Fulton Street Greensl3oro, NC 27403 USA Mailing address: COMPUTE! Post Office Box 5406 Greensboro, NC 27403 LJSA Telephone: 919-275-9809 Small System Services, Inc. publishes: COMPUTET The JourrtJ fa Proqre»»J*B Can^Klttifi COMPUTE! Books Robert C. Lock, President W, Jerry Day, Corporate Comptroller Kathleen Martiriek, Assistant To The President Ellen Day, Accounting Manager Carol Holmquist Lock, Research Assistant Corporate offices are located at 625 Fulton Street Greensboro, NC 27403 USA COMPUTE! Subscription Rates us $20 (one yr,] $36 (Kwoyrs.) $54 (three yrs.) Canada and Foreign Surtace Mail $25 Air Europe, US Possessions $38 Middle East, Central America and North Africa $48 South America, South Africa, Far East and Australia $88 Coming In The IMarch Issue of COMPUTE!: Honne Energy Workbook- Third In The Series Atari Disk Data Structure PET/CBM Disk Checkout And Much, Much More... M time Yottr C(Mnputer stopped just pl^i^ games and started doing some work around the house! f Let Creative Software's home programs turn your ATARI® or VIC® into a really useful household appliance^the results may well amaze you! TITLE ATARI 400/800 VIC (cassette only) • Household Finance 34.95 cassette 39.95 disk 34.95 • Home Inventory 19-95 cassette 24.95 disk 14.95 • Car Costs 19.95 cassette 24.95 disk 14.95 CREATIVE SOFTWARE 201 San Antonio Circle, /e70 Mountain View, CA 94040 (415) 948-9595 Ask about our many other recreational and home applications! TO ORDER; VISA. MasterCard, check or money order accepted. II" charge, plea.se include expiration date of card. Add $1.50 lor shipping and handling. CaliT. residents add sales ta.x. l^^iilHSIl pppkz The Most Exciting Video Games Available Today At The Lowest Prices 5'/4" Floppy Disks ATARIA' David's Midnight Magic Track Atta Retail S34.95 Now $29.50 Retail S29.95 Now $24 This pinbiill 9iinie by Broderbund . |4K Inn Mratnig .joid (n.m .1 s is being oKered (or Ihe lirst Simt. „,„„ ^^,„|, ,|,|s a.inie liy BriKif Genetic Drift Retail $29.95 Apple Panic Retail $2S Now $23.50 One ol Applf's most Now $23.50 A number on. popular games by Bnxterbund. You selltr by Broderbund. turn unfriendly lite forms .nit> friendly . R„ss|,i Duck Retail $34,95 Firebird Retail $29,95 JVp^,, $29.50 firsl 1m,e released Now $24.50 All new by Nasir. far any machine - lectiuer the MX PiS9a, the fuiitless firefighter, batiles Missile tilans hidden liy foreign agents the incredilile Pirebird. y. r> . -i fnn n Horizon V Retail $34.95 Now $29.50 Iniercept an alie Gorgon Retail $39.95 Now $33.50 This Number I seller just re released by Sitius The earth has just , , ... .i._ 1 . just re reieasca Dy airius ! ne eann nas usi (orce before Jhev destroy the planet. ^ ,. ' jul... i^-t. Nasir-s lates, grapte mno.atlon. ""'^"^ ^ '™'=™^^ ^"'^ '^' ^-'"^ ^^^ '"'' ^^ Sneakers Retail $29,95 Space Eggs Retail $29,95 Now $24.50 Endless excitement Now $24.50 This numlier 1 seller by Sirius stomping Sneakers and i* ^ f<-'ilily jgjiinsi yuur racc'far (ippoiictli in a sh(jwHt>wn uf raciiiy skill. Andromeda 2 Retail $34,95 Now $27.50 First lime ever for any machtne by Gebellf&ihwdre- Trapped i inside a giganlic fiuing organism you must find your way out 1 before the anlilxxlies aef you. The Software Conneclion — 5133 Vista Del Oro Way Fair Oaks, CA 95628 Now $29.50 Battle in an seller from Sinus where your secrj asteroid field in this brand weapon is the fourth dimension, new game by Sirius. Red Alerl Retail $29.95 Now $24.50 Newest Broderbund release MAIL ORDERS: Stiid clii,.k or nmney r.rder Inr ttilal [iiircfuse pm plus Sl-StJ lor pitel.1*!*' .Hid firtj>dling C.iltfomio residents add h .Sak-^T.. diiirge card orders m^iy call 19161 9!H-,1174. Siiliiecl to sunk on hand. Prices sutviect lo ch.iTiae. 12 COMPUTil FebruarvW82, Issue 21 Ask The Readers Robert Lock Richard Mansfield, And Reoders Please address an\ queslions or answers to: Ask The Readers, COMPtlTEl Magazine, P.O. Box 5406, Greensboro, NC 27403. Answers "This is in response to Jerry Stem's question in the August 1 981 issue, concerning the iLse of a keypad controller with the Atari 800. All oj Atari's controllers are usable with all of their computers, video game included. And the keypad controller works quite well for repetetive numerical data. However, it is not limited to use with numbers. The computers response to the keypad controller is defined by the progiam you write or load into it. Therefore you can use it to output any one of twelve .sytnbols or execute any of twelve commands or any combination of both the above. There is a program on page H-14 of ike Ataii Basic Reference Manual that will get you started with using the controller. The Operating System Manual goes into detail on how il works. Point of Interest: In [COMPUTE! # 1 4] his excellent article, 'Atari Tape Techniques,' Richard Kru.se mentions that the u.se of LIST "C"/E\'TER "C" can reduce the .size of your BASIC program, but that the reason for this is undocumented. The documentation is on pages 2 and 3 of the Basic Reference Manual, under the section titled 'Variable Name Limit.' " Roberta L. Mevis "/ enjoyed the article by William Taylor in COMPUTE! #17. Apparently, the Stringy Floppy was interfaced using the regular cassette SAVE and LOAD routines. Your reculers might be interested to know that a full ROM-based operating .system and plug- in hardware board exist for mating the Stringy Floppy with the OSI CI P. It operates at 7200 BA UD, is available at poioer-up, and resides in the otheru>ise-unused memoty locations from $E800-$EFFF. Information on the availability of this device may he obtained by ivriting: MSB Electronics, Barre-Montpelier Road, Bane, Vermont 05641 . " Philip K. Hooper [On PETICBM disks] "The ID contained in a track and sector is written once only - luhen the disk is NEW/ HEADER-ed or created with a BACKUP/DUPLICATE. It can never be written again; disk writes don't touch this special area. If you wanted to write a non-standard ID into a track-sector header, you'd have to do il by generating your own NEW formatting routine. This is not an easy trick, since it involves downloading a program into the inner processor of the disk. It would ahfio.st certainly involve destroying all information written on at least one track of the disk." Jim Butterfield "In response to Mr. Keplinger's commentaiy on Computer Assisted Instruction - Worth The Effort?, / say a big positive yes. Going on four years without a promotion in the Air Force, I purchased the Atari 400 computer. I programmed all of my study material multiple choice questions and answers that I could find and had the computer drill me day after day. When it came to test for promotion, it seemed that I knew all the answers. A month later, I was notified of my promotion . Computer assisted instruction really works." Bob Holsti "Re: Question from J ohn Fry about files in OS65D 3.0 COMPUTE! #18. It seems that although the program example is com- plete, there was no mention of the creation of a buffer. The program on my C4P MF was completely erased as I knew it would be when I typed it in to confirm my suspi- cions. Since OSI uses the beginning oj the workspace j or file buffers, the file is brought on top of the program or portions thereof when the open occurs. There are many inordinate constructions in OS65D, one of which is the placement of the buffers. I have suc- cessfully edited the DOS to place the buffers at the top of memory. The advantage is that I can mm> ea.sily write programs with sequential and/or random files and need not use the awkward CHANCE utility to create the buffers before I write the program. (This was an enormous help to me as virtually 80% to 90% of the programs I write use random files.)" Ross C. Votaw Questions / was delighted with the idea of 'The Unwedgc - Tape Append and Renumber' by David Hook in the Sept. '81 issue, p. 103, but ran into problems when I tried il out: 1 . The formula in line 26: Q\'S = MIDS (STR(4 + 2* (QV=1)),2). (What can the QV = 1 mean?] 2. [What about the DATA statement in line 116?]..." Joim Sweeney Thanks tor the kind words, John. The program was completely rechecked and, indeed, the final number in that DATA line should be H259, not -^., PATHFINDER Never before released, a super arcade-adventure game for Atari . . . alone in a vast transparent maze inhabited by radtooctive monsters and nucleof waste, you must blast ttie waste and free ttve maze of mutont monsters, By Soiitaife Group, requires 24K Atari with disk drive. ^3 ^mE^z. ^ / - MATCH RACER Brand new for the Atori, this one | or two player game tests your driving sitills on a race track filled with treacherous obstocles. See how far you can get before your luck and skill run | out! By Solitaire Group, requires 16K Atari wtth disk drive. :.,iW^.:: ANDROMEDA Introducing a spectacular. ofiginal arcade-adventure fori the Atari ... a battle in inner/ space , . . you must invodei^ a living organism and destroy its tissues before j its antibodies destroy you. By Solitaire Group, requires 16K Atari with disk , drive. nfe rj^isiL, ,_ t m i 'I'?! COMPUTII February 1982. Issue 21 H25. We make every effort to assure that typos do not get into COMPUTE!, and we feel that we have succeeded in eliminating most of the causes. How- ever, publishing 20 to 30 programs each month results in an occasional error. We attempt to an- nounce any corrections (or useful, <:tptional pro- gram modifications) the following month in our CAPUTE section in the back of the magazine. As to the meaning of QV= 1, programmers sometimes choose to use relational expressions. Try this in immediate mode: ? 5 = 5. Then try: ? 5 = 2. As you will see, if the proposed equality is true, the "value" of the equality is -1. If false, it's zero. 10 INPUT X,Q 20 Y = Y-(X = Q) 30 ?Y:GOTO10 Since subtracting a negative from a positive is, in fact, "addition" - the program above will increase the value of Y wlienever X and Q are e(|ual. Y(5u could achieve the same result with: 20 IF X = Q THEN Y = Y + 1. Strings can also be used as expressions and evaluated in this way. Likewise, such statements as: IF NOT X THEN PRINT "-I" or IF X THEN PRINT "0" will trigger the THEN action on -1 and zero, respectively. "/ know that there are screendump programs which exist for Atari which will allow the contents of the screen to be put on a printer. What I need is something similar to this but allowing (he screen to he saved to tape (or in DATA statements written by the program itself) .so that that screen could later be recreated easily. ! am currently trying to write a graphics type of Adventure game which ■uses a redefined character set and recjuires numerous POSITION and PRINT commands to u.se those special characters to draw some fairly complicated floor plans. I am nearly at the tearing-out-my-hair point from trying to code these floorplans. It would be much simpler if I could draw the room, using the edit and cursor control functions, and then .mve screen to be used in the playing of the game itself. Does such a pair of utilities exi.Kt or is anyone cur- retitly working on one?" Michael A. Ivins "/ am an electronics instructor at a technical .school and I am interested in programming my own PROMs. We have the KIM-I at our school and I understand that they can be adapted for this purpose. [Please advise where I can obtain] a schematic and/or iiistructioru." Mark Iskovitz "In COMPUTE! # 1 6 you had an article for Applesoft on loading tape. Well, we have an Atari 800, and my husband IS having trouble loading and unloading tape, he keeps losing his prograin... Could you publish something in rega rds to it?" M rs , W . P h i p ps Here are some suggestions and precautions: I. Use the more expensive, better quality tapes. 2. Re- member to issue an LPRINT before any C.SAVE. 3. Ahvays have two copies (in case one goes bad). 4. Make sure that llles arc saved with the airl of the digital counter. Don't overlap, 5. When loading, try several times with the tape positioned slightly differently each time (via FFwrd). 6. C'lean ihc tape heads and the rubber wheel that pulls the tape through with cleaning solution and demagnetize the heads with a demagnetizer (both items available at electronics stores). 7. Don't leave the Plav (jr Play and Record buttons down for any long periods. 8. Experiment with alternative wavs to SAVE pro- grams: CSAVE/CLOAD, SAVE"C"/LOAD"C:'. or LIST"C"/ENTER"C;". 9. If. after all this, you're still experiencing problems — chances are your heads are misaligned or something else is electron- ically wrong. Take the recorder in for professional adjustment. "As owner of a CBM 8032, ivith 4040 disk drive ami an Epson MX-80, 1 have been reading current and bach issues (^/COMPUTE! ever since my computer dealer introduced me to the magazine several months ago. While I hax'e found much in the magazine of interest, that interest has bordered at times on desperation arising out of statements such as 'This program ivill not work with the new ROM or with the 80 column screen.' How about a program that will reu is "Feed Your PET Some Applesoft." Going in the other direction, in COMPUTE! #8 is "Load I'ET Programs Into The Apple II. " An extraordinary program which snaps the 80 column CBM screen into 40 colimins appears in COMPUTE! #12: "Run- ning 40 C;olumn Programs On A CBM 8032." Also, for hand-translations, sec COMPUTE! #l(i, "PET, Apple, Atari: On Speaking Terms." lime permitting, we translate individual programs, often presenting multiple versions of programs appearing in (he PE T Gazette. In addition, we print several programs each month (in the Appli- cations section at the front of the magazine) wiili versions for both Atari and Microsoft B.XSICs. © I Imagine being able to print the letter "A" and get a multi-color space ship. Using THE NEXT STEP and a minimum of programming effort, you can do it in no time at all. THE NEXT STEP contains well-wrillen. easy-to-use documen- tation with simple BASIC programming examples that show you how THE NEXT STEP can help develop colorful graphic displays. Graphics you never thought possible until now, THE NEXT STEP is a user friendly, menu driven graphics tool kit that allows you to create new character sets or redefine characters to n:iake shapes for use with your basic or machine language programs. THE NEXT STEP allows you to save these "new" characters on disk ior future use. THE NEXT STEP is perfect for use on sftapes for animation and features a joystick controlled color menu to make your graphics come alive. THE NEXT STEP even generates its own code to help you incorporate new characters and shapes into your programs. THE NEXT STEP allows you to see your shapes as you make them. Now you can deierrnine ahead of time how characters will interact with one another when cr€ating shapes for Charac- ter Set or Player Missile Graphics. 1 I i i THE NEXT STEP helps you to mix any of ATARI'S 14 graphics modes in the same display, THE NEXT STEP is a perfect graphics utility for the BASIC or machine language programmer- novice and professional alike. THE NEXT STEP leatures full joystick control for ease-of-use and quick editing. THE NEXT STEP runs on any 32K ATARI 400/800 with a disk drive and is available ior $39.95 at your local computer store or order direct from .... I VISA, MASTERCARD, CHECK, C.O.D. Add $1.00 for Shipping || 3G57S MUDGE RANCH RDHD • CDilRSEGDLD, CR 33614 • 209-583-6853 ^ M'UME'y*'""' Visa. MasterCard. Checks. COD r 7~ fs3S&ami!iin~:&- Add one dollar for shipping. 16 COMPUTil February. 1982. Issue 21 Computers And Society David D. Thornburg Innovision P.O. Box 1317, Los Altos, CA 94022 On Piracy ... As the mist cleared we could see our goal before us. High in the foothills overlooking the San Fran- cisco Bay, the opening to the cave was unmarked - except for the power lines which snaked their way into the cavern through a crack in the rock. "You are on yoiu' own now," my guide said as he scurried down the hill. At last I had found the home of the famed software pirate, Long John Silicon. As I entered the cave, I asked myself why an editor of a prestigious magazine would risk his life in pursuit of a story, but the recent lawsuit preventing Long John Silicon from selling his home video copy of Tooth Fairy was too exciting to ignore. With a great heave, I opened the door and found Long John sitting at a keyboard, ready for our interview. DT: Long John, you have a reputation as a vicious software pirate. Tell us — is it deserved? LJS: Aye matey! I am the meanest software pirate to ply the 57 keys. Once I see a game I like, it is only a matter of time (usually months) before the game is up and running on the computer of your choice. DT: Wait a minute. I'm not sure I understand what you mean. I thought soflwaie pirates just made carbon copies of other people's software. LJS; Copy existing programs? Ha Ha! Oh matey, you must be kidding! My parrot wouldn't do some- thing that easy. No, what I do is the true pirate's craft. I slink aroiuid the arcades looking for new games. When I first saw Tooth Fairy I knew that riches were at hand. DT: Once you thid a game you like, how do you go about copying it? LJS: First. I s[)enl manv pieces of eight playing Tooih Fairy, gaining mastery in every aspect of the game. In the space of a few weeks I was playing the game in my sleep. Next I created a story board for the game. DT: Excu.se me. Long John, I'm not too versed in the pirate's craft. Would you tell our readers what a story board is? LJS: Of course. A story board is a visual map showing the play of the game. It includes pictures of the screen and so on. DT: That sounds like a lot of work to go through before writing any of the program. LJS: Of course it is. Who .said piracy is easy work? In any event, once the story board is finished the real work begins. One just doesn't sit down and copy a game without worrying about display reso- lution, color, machine speed, game controller options - ah, the stones I could tell... D'F: Yes, well I am sure our readers would be fascinated, but tell us more about the game. Is it an exact copy of the arcade version? LJS: The same? How insulting! I've half a mind to slit you from your index register to your stack! No pirate would miss the chance to improve on a game. To start with, I spent about as much time copying Tooth Fairy as its creator's spent designing it in the first place. Why shouldn't I improve the game. DT: Oh, I agree with that; but why is this piracy then. After all, people whtj write love stories aren't being sued by Shakespeare's estate. From what I can see, you might have created a new game. LJS: No! A thousand times, no. If my version of Tooth Fairy was new, I wouldn't have been sued for infringement by Ajax Computer Company would I? DT: I guess not. Say, yoin- copy of Tooth Fairy runs on the Ajax computer doesn't it? LJS: Yes, in fact it has helped sell their computers. Most of the local computer stores used to use my game to show oil the Ajax's power. DT: Then why are they suing you? They didn't write the original software. LJS: Yes, that's true; but they did buy the home video rights to the game, so I guess I infringed on their copytight, even though they didn't write any of the original program. DT: Well, I'll bet that their version of Tooth Fairy is a real knockout. Now that your program is illegal, I assume I can buy theirs. LJS: Oh no! First of all, they have to go through all the work I did to get the game to run on their com- puter. Their version is at least six months awav. DT: What a shame! Why didn't they just license your copy? LJS: License me! A pirate! Shiver me disks. Why would they do that? Of course I asked for a licen,se, but they insisted on having the job done over. Micro-Ed is EXPANDING! Send for free educational catalogs f^ Specify: Pet • Vic • TI • Apple • TRS-80 color computer you can telephone us at Micro-Ed, Inc. 612-926-2292 PO Box 24156 Minneapolis, MN 55424 DT: I'm not trying to downplay the devious im- morality of yoLir crime, but I am still having a hard time thinking of your work as piracy. Tell me, are you countersuing? LJS: Aye, a countersuit is in progress, but I don't have the legal resources of a company like Giant Toys, Inc. DT: Oh yes. Giant Toys sells a hand-held version of Tooth Fairy. Is Ajax suing them too? LJS: Not yet. Ajax only has a few attorneys, and they can't sue everyone at once. I'm flattered that they picked me first, even if I have to give up the battle when my money rtms out. After all, even pirates live in fear of their lawyers, DT: What a shame. You mean that you might lose because you can't afford the fight? LJS: Yes. After all, if Giant was sued, the case might drag on for years. My suit will probably be mercifully short. My days as a pirate are nearing an end. DT: So you have given up on piracy forever then? LJS: Not exactly. Just last night, for example, I used my video cassette recorder to make a copy of a movie that was broadcast past my bedtime. DISK DRIVE WOES? PRINTER INTERACTION? MEMORY LOSS? ERRATIC OPERATION? Don't wvv ^^ so Blame The Software! Power Line Spikes. Surges & p , ^^ ^sa 705 ^^^^^ '^°'^ Hash could be the culprit! Floppies, printers, memory & processor often interact! Our patented ISOLATORS eliminate equipment interaction AND curb damaging Power Line Spikes, Surges and Hash. • ISOLATOR (ISO-I) 3 filter isolated 3-prong sockets; integral Surge/Spike Suppression; 1875 W Maximum load. 1 KW load any socket ■ ■■ ■ • ^ ■ • ■ «62.95 • ISOLATOR (ISO-2) Z filler Isolated 3-prong socket banks; (6 sockets total); integral Spike/Surge Suppression; 1875 W Max load, 1 KW either bank S62,95 • SUPER ISOLATOR (ISO-3), similar to ISO-1 except double filtering & Suppression $94.95 • ISOLATOR (ISO-4), similar to ISO-1 except unit has 6 Indlvidualiy filtered sockets $106.95 . SUPER ISOLATOR (ISO-1 1) Similar to lSO-2 except double filtering & Suppression .:.jf^?-?5 • CIRCUrT BREAKER, any model (add-CB) Add $ 8.00 . CKT BRKWSWITCH/PILOT (CBS) Add S16.00 AT YOUR Master-Card, Visa, American Express DEALERS Order Toll Free 1-800-225-4876 (except AK, HI, PR & Canada) /^^ Electronic Specialists, Inc. irt South Main Street. Nallct. Mass. 0)760 Technical & Non-800: 1-617-655-1532 ANNOUNCING TWO NEW TERMINALS Smart* Fast • Graphics • Matching Modem and $295 Printer Neironics announces a stale ot trie sri breaKlhrouflh In lerminais. now «l pr'c** you Can afford, you can qo on-tine with daia-bink at^ci compuler phone-lii^d services H's all yours, "eiectionjc newspapers," educaiiorial seivtces. Dow Jof^es slocK reporia. o^n^e*. recipes, personal cornpuling with any ipvel language. proQ^ann eKChanges. eieclronic bul- letin boards . and more every tJayUt Neuonics ofler» two n^w terminaia. both Feature a full &6 key/128 characiar iyp«wrltar- style keyt^aerd. baud titles \o 19.3 kilobaud, a rugo^d steel cabinet and power supply. The simplest One. FABTEHM-&4, is a 16 Nne by 64 or 32 characlBr per line unit, witti B serial printer porl for making hard ccpy of all Jncaming data, and optional provlslonf lor block and Special charecTer graphics The "amart ' varsicr, SMARTERM-60. features elthi^r 24 line Cy BQ characters' per imeor 15 by 40 cna TERMINAL (includes FASTVID-64 video board ASCti-3 keyboard, steel cabinet arid power supply) ... kit S199.95 plus S3 P&l . . . wired & iBsied $249.95 plus S3 P&l . . . graphics option: add 119.95 to aach ot above _ .,^.„„„ .^ T- COMPLETE SMARTERM-eO TERMINAL (includes SMARTViO.80 video board, ASCIi-3 keyboard, steel cabinet and power supply) ... kit SZ99.95 plus J3 P&l . . . wired and tested $369.95 plus S3 P&l □ FASTVlD-64 VIDEO BOARD (requires +5 & -12^ DC) . . . kit $99.95 plus $3 P«,l . . . graptiics option add $19.95 , . . wired & tested $129.95 plus $3 P&l . . . Qfaphlcs option add $19.95 a SMARTVID.80 VIDEO BOARD (requires +5 & +/-12V DC) , . , kit $199,95 plus S3 P&l . . . wired & tested $249.95 olus S3 P&l □ DELUXE STEEL TERMINAL CABINET . . . $19.95 plus $3 P&l D ASCII.3 KEYBOARD (requires +5& -12V0C) . - . kil $69.95 plus $3 P&l . . . wired and tested $89.95 plus S3 P41 D POWER SUPPLY (powers ASClt-3 keyboard & video boards) , - - kil only $19.95 plus $2 P&l D ZENITH VIDEO MONITOR (higt) resolution gteen phosphor) . . wired & tested $149.95 plus $6 P&l □ TELEPHONE MODEM MODEL 103 O/A . . . wired & tested $1B9.95 plus S3 P&l C DOT MATRIX PRINTER Comet 1 . . . wired & tested $299.95 plus $10 P&l r RF MODULATOR MOD HF-I ... kit only $8.95 plus $1 P&l L 3FT.25 LEAD MODEMfTERMiNAL OR PRINTER/TERMINAL CONNECTOR CABLE . . . $14.95 ea plus $2 P&l For Canadian orders, double the postage . Conn. res. add sales tax. Total Enclosed S_ D Personal Check n VISA Acct. No. n Cashier's Check/Money Order n MasterCard (Bank No. _ ) Exp. Date. Signature Print Name. Address City State Zip February. 1982. Issue 21 COMPUTE! 19 The Beginner's Page Translating Equations Richard Mansfield Assistant Editor Computers are excellent teachers. They have infi- nite patience; provide instant pass-fail corrections of your efforts; permit you to work at your own speed on topics of your choice; and they don't (as yet) become sarcastic when you blunder. Many people, myself included, decided long ago that math was not their forte. This decision is usually made at age fifteen or thereabout and follows a series of mishaps in the educational system. Algebra is often the final blow. Computers cine this math phobia rather quickly. The machine does ail of the tiresome calculations for you. You are free to float above and observe relationships, discover patterns, even construct visual analogs where you can watch the numbers transform on the screen. Algebraic Equations, BASIC Assignments After you get over the initial surprise that, in BASIC, A = A -I- 1 makes perfect .sense - you will find that the meaning of variable becomes quite clear. A variai)le is simply a "name" written on a "box." You might have a box in your house marked "BILLS." Each month you pay all the bills and the box is empty (BILLS = 0). Then, when each bill comes in, you put it in the box (BILLS = BILLS -t- 1). This is not an algebraic equation, it is an assifrm/ienl of a certain number (BILLS -I- 1) to the variable BILLS. In algebra, an equation is expected to balance: whatever is on the left side of the equals sign is presumed to be equal to the right side. In BASIC, the variable on the left side is being defined by what- ever is on the right side. In earlier versions of BASIC, you had to type: LET BILLS = BILLS + 1 to show that you were assigning a new value to BILLS, not staling an equality. One other thing: computers allow you to use meaningful, easily recognized variable names such as BILLS, or INTEREST, or DOLLARS. This, too, can be an advantage over the traditional single-letter variable names of algebra. In any case, much useful math becomes clear after you work a while on your computer. For example, let's put this on our computer (to see how easy it really is): F = D(1+I/C)'^*^ or FINALAMOUNT = DOLLARS( 1 + INTEREST/ This formula will let you know how^ much money you'll end up with after making an invest- ment. It can also tell you how much your house will be worth if it is going up in value a certain amount each year or show the effects of inflation. It's a handy formula, but to the "non-mathematical" it looks forbidding. On the computer, it's a snap. Just use INPUT statements to ask for each of the vari- ables and then, (in line 100), duplicate the formula using BASIC symbols: 10 PRINT "WHAT IS THE ORIGINAL AMOUNT IN VESTED"; 20 INPUT DOLLARS 30 PBIMT "HOW MANY YEARS BEFORE YOU CASH IN THE INVESTMENT"; 40 INPUT YEARS 5 0 PRINT "WHAT IS THE ANNUAL INTEREST RA TE"; 60 INPUT ITEREST 70 PRINT "HOW MANY TIMES PER YEAR IS IT " COMPOUNDED"; 80 INPUT COMPOUNDING 90 ITEREST = ITEREST/COMPOUNDING/100:RE« MAKE ITEREST INTO A DECIMAL FRA CTION 100 FINALAMOUNT = DOLLARS * (1 + ITEREST) t (COMPOUNDING * YEARS) 110 PRINT "AT THE END OF "; YEARS; "YEARS YOU WILL HAVE S"; FINALAMOUNT Notice that we spell it iteresi to avoid using one of BASIC'S special, reserved words INT. It is also necessary to enclcjse compounding multiplied by years in parentheses to show that this is to be calculated before the other part is raised to a power. The order in which calculations are performed is, of course, quite iinportant and you should familiarize yourself with what your computer's manual in- structs on this subject. When in doubt, use paren- theses — they will always cause whatever is within them to be figured first. The Universal Rounding Engine Programs can often be refined, customized, and made to perform new functions with surprisingly little effort. This same program could include a function to round oiT the finalamouut to the nearest penny by adding this line: 105 FINALAMOUNT = INT(FINALAMOUNT* 100 + .5)/100 What would this Universal Rounding Engine do if you changed the two I CD's to IOOO's...or lO's? We can also easily adjust the program to predict how much your house will be worth in ten years, given a rise in value of, say, six percent per year. The math stays the same, all we need to do is change xhc prompts (the questions the computer asks). Line 10 should read: "HOW MUCH IS YOUR HOUSE 20 COMPUTE! Februofy, 1982 Issue 21 WORTH NOW?" Line 30: "HOW MANY YEARS DO YOU WANT TO PROJECT?" Line 50: "HOW MUCH IS IT INCREASING IN VALUE EACH YEAR?" Line 70: COMPOUNDING = L In line 1 10, change "YOU WILL HAVE ' to "YOUR HOUSE WILL BE W^ORTH." To work with inflation projections, make the following replacements: 10 "WHATISTHE COST OF THE ITEM TODAY"; 50 "WHAT IS THE ANNUAL INFLATION RATE"; 70 COMPOUNDING^ I 110 [change YOU WILL HAVE to: IT WILL COST] When creating such useful variations to simple programs, you are, at the same time, learning new things about mathematical relationships. It's fini and therefore painless. As an experiment with the Inflation version of this program, try adding: 5 THISYEAR = 1982 so the computer will know what year it is. Then, using the information gathered in line 30, have the computer give its answer (in line 1 10) in the form: BY THE YEAR 1985 IT WILL COST $(whatever). All of this is worlds away from that algebra class where some of us mistakenly decided tliat mathematics, when it wasn't impossibly obscure, was tedious. By pushing and shaping programs, you can see and feel numbers, their interactions, their bcaiuy. © r^^r Having trouble <>^ learning to use your computer? 'Reference manuals don't teach. Most BASIC texts don't cover specific personal computers. TIS solves these problems with step-by-step books tailored for your machine. For PET/CBM Understanding Your PET/CBM $16.95 Vol 1: Basic Programming PET Graphics $ 6.95 For OSI CIP/C4P Understanding Your CI P/C4P $ 9.95 A Workbooit of BASIC Exercises For VIC Understanding Your VIC $13.95 Vol. 1: Basic Programming Money fiach Guarantee. VISA/MC accepted- All prices Include UPS or ist Class postage TIS INC ■ / Pi g Total Information Services, Inc. ( f ^mg: ' Box 921, Dept. C \ ^-31^ ' Los Alamos, NM 87544 7 1] LETTER QUALITY WORD PROCESSOR PRINTER/TYPEWRITER FOR APPLE, ATARI, COMMODORE, NEC, OSBORNE 1. TRS 80 and others OLYMP1AES100/101 ■ 92 character electronic keyboard • 8 character buffer memory ■ Dual pitch. 10 and 12 ■ 17.5C.P.S. • All settings from keyboard • Auto, correction • Daisy iype print mectianism • Cartridge ribbons • 14 1/8 inches writing line • t400 dealers nationwide REN TEC ES ' Installation in 15 minutes using existing ES100/101 cables • Ct^OS logic for minimal drain on ES100 power supply > Hi or low true status bits • Accepts RS232 serial with 7 crystal controlled Baud rates ■ Accepts Centronics parallel interface • Selectable auto, line feed RE^ffllSSflNEE TEGtiNQLQGY GQRPORnTIQN 3347 VINCENT ROAD PLEASANT HILL, CALIFORNIA 94523 (415)930-7707 §1 495. 00*ES100 TYPEWRITER & INTERFACE ***** NEC Dot Matrix Printer 100 CPS Bidirectional printing Friction and tractor teed Parallel Interface Single ribbon cartridge S295.00 INTERFACE Sug. Retail 795.00 NEC Monitors 12" Green Screen 12" RGB Color 12" Composite Video ATARI 10-Key Accounting Pad DEALER INQUIRIES WELCOME 285.00 1095.00 430.00 1 24.95 r ~ TAKE ADVANTAGE OF " •■ " YOUR PERSONAL COMPUTER'S " 17 FOR ■^ FUN AND PROnT! Check this list of LATEST, EXCITING COMPUTER PUBLICATIONS & Order Now! These FIRST Editions are in Lim- ited Supply . . . Enjoy the convenience of ARM-CHAIR SHOPPING BY MAIL! All Handling and Postage included in prices. D PLAY THE STOCK & BOND MARKETS WITH YOUR PERSONAL COMPUTEHINewOne-of-a-kind 3QS page Illustrated Source Book can teach vou tiow tousecompuiers m the Investment Fieli) Suri|«cti witn rtcn ord«t OR &#nd 3 lUmps. nam*, idd'm io' rOur FREE Copy' D HEBE'S MOBE! TESTED "BEADY-TO-RUN" 34 FUN GAME PROGRAMS IN BASIC! Discover Ihe Furside" q( your computers personality! A com- plele collection of Games. Gags, Brgin Teasers & some "Non-Games" that make learning Fun for ihe whole family. EASY-TO-READ-AND-UNDERSTAND Format wtlh 41 Illustrations, 224 pages ot instruc- tions that will have you writing poetry, composing songs, and a LOT MORE! Order ttT^22B @ S9-75 Delivered DTHIS IS IT! THE NEW GIANT BOOK OF COMPU- TER SOFTWARE! JUST OFF THE PRESS with Hun- dreds ot Practical. Proven Programming Ideas for the Home Compuierist who wants MORE frorir\ his machine than Commercially, Pre-Packaged Software Can Otfer! The Perfect Computer Companion for every beginning or advanced hobbyist A Big 504 pages plus 262 illustrations of "How-To"s" forcreat- ing every kind of program you might want & to do exactly what you want them lo do! Order #T1J&9 @ S15.75 Delivered, Money-Bactc Guarante« * Handling^ Poilage included A .Vifl _^ Cnech Hems - Clip Ad - Qfl eT Order by NUMBER Enclose Check. M.O. or Charge D Visa D MasterCard # Send To: Address City Slata_ . Zip_ SEND ORDERS TO CoHsultors Infl. Box 6589-TC -234 Columbine St. I Mi ■ Denver, CO 80206 h h MICROGEAMS EDUCATIONAL SOFTWARE THE HEART OF YOUR CLASSROOM COMPUTER Expect more from your PET". . . PET is a registered trademark of Commodore Business Mactiines. MICROGRAMS INCORPORATED P.O. BOX 21 46. LOVES PARK, IL 61 130 PHONE 81 5/965-2464 \~\ Pfease send me a free K-8 catalog. NAME [~] Please send me a sample program and a free K-8 catalog. I have enclosed $2.00 for postage and handling. ADDRESS CITY STATE ZIP 25 COMPUTEI February. 1982, Issue 21 Guest Commentary Hidden Costs Of Computer Technology Croig Brod President, Technostress International, Inc During the I970's most banks compuierized their operations. Ai one C.alifornia bank, a team was assigned to develop a program lo pay savers their interest automatically on the first of each month. The task was completed to everyone's apparent satisfaction and most members of" the team were reassigned to new projects. The day before the first aulomalic payments were to be disbursed, due to a fluke - a favored customer being handed bis computerized check a day early — il was discovered tliat the liank had o\erpaid everybody as much as double the interest due them. At 6:00 P.M. the team's remaining analyst was called in. The project manager came. His manager came. The vice presi- dent came. An esliniaied eight to ten million dollars in bank funds were on the line, to be disbursed when the doors opened For business the next morning. Could the analysi find the Haw in iiis team's program? C>outd he develop an algorithm to withdraw the appro))riatc amount ol'overpavmenl from each of the savers? I'liis analyst was a prime candidate for, if not the victim of, technoslresi. Exactitude, Repeatability, Detail tJomputer iecbnolog\ has become a fact of organi- zational life and lias brought with it new values and new costs for those within the organization. Exacti- tude, repeatahilitv, and close attention to detail are the hallmarks of everyday o]jeralions. Ciomputer technology promotes formal relations between people, their machines, and their einiroinnent. The new tecluujlogy is qualitatively different frtMii the old. Compared to a computer information syslem, a telephone or xerox machine were simple communication devices whose use recjuired a min- imum of quiet and concentration and whose users had a great deal of latitude. The computer, on the other hand, requires a specific response lime from the user (turned operator). The recoifling of information anfl the retrieval of data within the language of the [jrogram both place constraints on the operator, who has become machine-dependent and works in a captive envir- onment. Control over sound, lighting, and work flow is important for maximum concentration and 'Computer technology often reverses the relationship between age, experience, and competence at work." effective management of data. While assembly-line work, or even typing, are sometimes grueling types of work requiring attention to detail, the demands on the computer operator are unlike those hereto- fore know'n in the workplace. Claptivc enviroimicnis and machine-dependent people are indications of iiew forms of Organiza- tional life, and one result is technostress: the condi- tion resulting from the inability of a person or organization to cope with the demands created by the tjperation and maintenance of computer tech- nology. It occurs where necessary technological stress (such as response to work changes) is trans- lated into utuiece.s.sarv human strain. There are examples of technostress at all levels. Age, Experience And Competence: A Reversed Relationship Computer technology often reverses the relation- ship between age. experience, and competence at work. Unlike managers of the past who passed tips on to new emplovees on how to "kick the ditto machine" to make it work, their \ears of experience have often merely accumulated outdated knowl- edge in today's managers. And they are usually at a disadvantage to \oung recruits who command a great deal of recent technical knowhow. I'odav's project manager has no reliable wav to measure productivity, f he manager functions as a go-between, taiking to the system user - say the department of a bank that wishes interest payments computerized — and then schedules it, deciding whether il should take six people three months, four peo])le a vear, or whatever. lo most programmers, such schedules are a joke: "You could throw darts at a board and do as well," is often heard. One told recently of a project' scheduled for three months and which came in at two and a half, earning the group praise; yet it couki have been done in three weeks and. that the gr(jiqj dallied, constituted a mini-revolt. \o matter; as long as the projects come in ahead of arbitrary schedules, managers are happy. Able to measure only results and not understanding the work well enough to gauge productivity, many of today's managers who have not come up through the ^^nUiy^^B Rocket Raiders Our High Quality Software Is More Than A Stroke Of Genius... It's A Work Of Art. DPI* EDITOR: by Denris Zander (Atari, 16K) Create your own fast action graphics game (or the Atari 4CiO or 800 using its player missile graphics fea- tures. By using player data stored as strings, players can be moved or changed (lor animation) at machine Ian guage speed- All this is done with string variables [P0$(Y)=SHIP4). This program is designed to permit creation ot up to 4 players on the screen, store them as string data and then immediately try them out in the demo game included in the program Instructions tor use in your own game are included PM EDITOR was used to create the animated characters inAttTWORX RINGS OF THE EMPIRE andENCOUNTER AT OUESTAH IV. PRICE $29.95 cassette $33.95 diskette □ ROCKET RAIDERS bv Richara Petersen (Atari 24K) Defend your asteroid base against pulsar bombs, roc kets, lasers, and the dreaded 'stealth saucer" as aliens attempt to penetrate your protective force field Precise target sighting allows you to fire at tfie enemy using mag netic impulse missiles to help protect your colony and Its vital structures PRICE , $19.95 cassette $23.95 diskette 0 INTRUDER ALERT! by Dennis Zander (Atari. 16K) This is a fast paced action game in which you must escape from the "'Dreadstar' with the secret plans- The droids are after you and you must find and enter your ship in order to escape If you fail, the rebellion IS doomed PRICE. $16.95casserte $2a.95diskette O THE RINGS OF THE EMPIRE: by Dennis Zander (Atari 16Kj The Empire has developed a series of battle stations protected by one or more rings of energy You must des troy these weapons by attacking them in your Ywing fighter armed with Zydon torpedoes. Each lime you blast through the rings and destroy the station, the Empire develops a new station with more protective rings PRICE $16.9Scassette$2<}.95diske(te 1:1 FOREST FIREI: by Richard Petersen (Atari,24K) Using ejcelleni color graphics, your Atari is turned in to a fire scanner to help you direct operations to contain a forest fire. Vou must compensate for changes in wind, weather and terrain. Not protecting valuable property can result in startling penalties. Life-like variables make FOREST FIRE a verv suspenseful and challenging simu lation. PRICE . tl6.95cassette $20.95distiette a PILOT: by l^ichael Piro (Atari. 16K) Pilot your small airplane to 3 successful landing using both joysticks to control throttle and attack angle. PILOT produces a true perspective rendition of the runway, which IS constantly changing. Select from two levels of pilot proficiency PRICE $16.95cassette $20.95tliskette □ ALPHA FIGHTER: by Douglas McFarland (Atari, I5K) Consisting of t*o different programs, ALPHA FIGHTER requires you to destroy the ahen starships As you become more successful, the games gel harder and and harder PRICE. . . . tl4.95cassette $18.95 diskette □ GIANT SLALOM: by Dennis Zander (Atari, 16K) BringtheWinterOlympicsto your computer anytime of the year' Use the joystici^ to guide your skier's path down a giant slalom course consisting of open and closed gates. Choose from three levels of difficulty Take practice runs or compete against from [vro to eight additional skiers, PRICE $15.95 cassette $19.95 diskette D HODGE POEXSE: by Marsha Meredith {Apple 4BK, Applesoft or Integer BASIC) This captivatingprogram is a marvelous teaming device for children from 18 months to 6 years HODGE PODGE consists of many cartoons, animations and songs which appear when any key on the computer is depressed. A must for any family containing young children and an Apple, PWCE $19,95diskette □ STUD POKER: by Jerry White (Atari, 16K) This is the classic gambler's card game. You will find the computer to be a worthy opponent who occasionally bluffs but never cheats! STUD POKER employs all of the Atari'ssound. color and graohicscaoabilities. PRICE $14.95CassetteS18,95diskette -TYPE.'N.TALK* ■ ARTWORX IS offering the fantastic TYPE-'N-TALK'" from Vortraj(' This easy-to-use unit connects to your computer's serial port Text is automatically translated into electronic speech enabling the TYP£-'N -TALK'" hobbyist to use a nd enioy it immediately. PRICE , $329,00 The following ARTWORX programs are available for TYPE'N-TALK STUD POKER (Aiari,24K) $16.95 cassette $20.95diskette TEACHER'SPET(Atari.24K:NorthStar) $16.95/ $20.95 BRIDGE 2.0 (Alan, 24K: North Star) $19.95 / $23.95 NOMINOES JIGSAW (Atari. 24K). $17.95 / $21.95 Please specify 'TNT" version when ordering programs D CRANSTON MANOR ADVENTURE: by Larry Ledden (Atari, North Star and CP/ri(l) You mu St enter mysterious Cranston lienor and attempt to collect its many treasures This exlemely challenging program will provide you with many hours (days') of adventure. The program may be interrupted at will and you r status saved onto the diskette PRICE $21.95diskelte n BLOCKADE: by Edward Schneider (Atari, leK) Every games library needs Blockade program, and this IS one 01 the best Choose from three levels of diffr cully and play against another person or by yourself against the clock. PRICE $14.95 cassette $ia,95diskette n TEACHER'S PET: by Arthur Walsh (Atan, Apple, TRS-80,PET, North Star and CP/M (MBASIC) systems] This IS an introduction to computers as well as a learn- ing tool for the young computenst (ages 3-7) The pro- gram provides counting practice, letter-word recognition and three levels of math skills PRICE . . $14.95casse4 THEN 160 180 Z=R :0N R GOTO 400,190,39 0,390 190 GOSUB 1310 :IF Z>2 THEN T=2 :T$="2" : GOTO 220 200 PRINT :INPUT"OUTPUT TO TAPE DRIVE* (1 OR 2) 2{03 LEFT}",-T$ 210 T=VAL(T$) :IF T< 1 OR T>2 THEN 80 220 PRINT :PRINT"PUT OUTPUT TAPE IN DRIVE #";T$ iGOSUB 1390 230 IF F$<>"^" THEN 260 240 F$="INVENTORY DATA" :IF Z>2 THEN F$=X $ 250 PRINT ;PRINT"DEFAULT FILENAME = " ; F$ LETTER PERFECT ATARI 400/800 APPLE II & 11+ EASY TO USE — Letter Perfect is a single load easv to use program. It is a menu driven, character orientated processor with the user in mind. FAST machine language operation, ability to send control codes within the body of the program, mnemonics that make sense, and a full printed page of buffer space for text editing are but a few features. Screen Format allows you to preview printed text. Indented margins are allowed. Data Base Merge with DATA PERFECT by LJK, form letters, accounting files and mailing labels only with MAIL MERGE/UTILITY by LJK. FEATURES - Proportional/ Incremental spacing * Right Justification ' File Merging " Block movement " Headers * Footers * Print Multiple Copies ' Auto Page Numbering * Scroll forward/backward ' Search and Replaces ' Full cursor control ' Underlining " Boldface * Superscripts * Subscripts * Auto page numbering * Insert character/line * Delete character/line * Centering * Horizontal tabs/changeable * Multifunction format line (line spacing — left margin - page width - lines/page — change fonts — top/ bot margin adjust) MUCH MORE! $149.95 ATARI VERSION 2.0 #2001 Compatible with Atari DOS. Uses proportional font right Justified with Atari 825/Centronics' 737, 739 printers. Uses EPSON MX ' Series + Graftrax/italici^ed font. Can mix type fonts on same page: mix boldface and enhanced font in same line with Justification. Can be used with I6K Atari/400. "Compared to the price of many other word processors, this package is a steal. It does everything the advertisement claims and more. On top of this the software is very easy to use." A.N.A.L.O.G. MAGAZINE APPLE VERSION 5.0 #1001 DOS 3.3 compatible - Use 40 or 80 column interchangeably (Smarterm - ALS; Videoterm-Videx; Full View 80 — Bit 3 Inc.; Vision 80 — Vista: Sup-R-Term - M&R Ent.) Reconfigurable at any time for different video, printer, or interface. USE HAYES MICRDMODEM ll"LCA necessary if no 80 column board, need at least 24 K of memory. Files saved as either Text or Binary. Shift key modification allowed- Data Base Merge compatible with DATA PERFECT* by LJK. "For $150, Letter Perfect offers the type of software that can provide quality word processing on inexpensive micro- computer systems at a competitive price." INFOWORLD DATA PERFECT APPLE & ATARI DATA BASE MANAGEMENT $99.95 Complete Data Base System. User orientated for easy and fast operation. 100% Assembly language, Easy to use. You may create your own screen mask for your needs. Searches and Sorts allowed. Configurable to use with any of the 80 column boards of Letter Perfect word processing, or use 40 column Apple video. Lower case supported in 40 column video. Utility enables user to convert standard files to Data Perfect format. Complete report generation capability. Much More! T.M.LJK $29.95 APPLE & ATARI EDIT 6502 This is a coresident ■- two pass ASSEMBLER, DIS- ASSEMBLER, TEXT EDITOR, and MACHINE LANGU- AGE MONITOR. Editing is both character and line oriented. Disassemblies create editable source files with ability to use predefined labels. Complete control with 41 commands, 5 disassembly modes, 24 monitor commands including step, trace, and read/write disk. Twenty pseudo opcodes, allows linked assemblies, software stacking (single and multiple page] plus complete printer control, i.e. paganation, titles and tab setting. User can move source, object and symbol table anywhere in memory. Feel as if you never left the environment of BASIC. Use any of the 80 column boards as supported by LETTER PERFECT, Lower Case optional with LCG. LJK DISK UTILITY APPLE S29.95 This menu driven program allows the user to manipulate a variety of different file types. Binary, Text, and Source files may be easily converted into each other. The pro- gram may be used with APPLESOFT*, VISCALC", and other programs. These program files may be readily adapted for multiple use mcluding editing with LETTER PERFECT word processings. MAIL MERGE/UTILITY This menu driven program combined with LETTER PERFECT allows user to generate form letters and print mailing labels. With the Atari, you may CONVERT ATARI DOS FILES, or Visicalc files compatible for editing with LETTER PERFECT. Utility creates Data Base files for Letter Perfect. LOWER CASE CHARACTER GENERATOR $34.95 >«tStUVHXUZC I >^ Lower Case Character Generator for the Rev, 7, Apple II or 11+ computers. When installed, this Eprom will generate lower case characters to the video screen. Lower case characters set has two dot true descenders. Installation instruction included. Manual includes listing of software for full support and complete instructions (or shift key modification. Compatible with LETTER PERFECT. 1 ENIERPRISES LJK ENTERPRISES INC. P.O. Box 10827 St. Louis, MO 63129 (314)846-6124 DEALER INQUIRES INVITED s of; Apple Computer - Atari CompuTer Epson America - Hayes Nflicrocomputers — Personal Software — Vide>t - Bit 3 Inc. - M&R Eni. - Advanced Logic Svstems — V>sta Computers 30 COMPUTEI February, 19S2. Issue 21 260 270 280 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 570 580 590 600 610 620 630 640 650 660 670 680 PRINT : D"; :G 340 PRINT : j;^{03 1 THEN GOSUB 1 OUTPUT OPEN 2, GOSUB 1 CLOSE 2 R=R-1 : PRINT : I ON ED" OPEN 2, IF Z=4 GOSUB 9 TO 360 CLOSE 2 E #2{0 E GOSUB 1 GOSUB 1 PRINT" { DATA F PRINT"IS OUTPUT TAPE POSITIONE OSUB 1360 :IF R$="Y" THEN ~ INPUT"NUMBER OF FILES TO SKIP ' LEFT}",-R$:R=VAL(R$) :IF R< 80 310 :PRINT :PRINT"POSITIONING " TAPE T,0 290 ;IF C=0 THEN 300 :IP C=2 THEN 580 IF R>0 THEN 290 PRINT"OUTPUT TAPE IS NOW POSIT :GOSUB 1400 :PRINT T,1,F$ :IF Z=3 THEN 600 THEN 650 40 :IF C>0 THEN GOSUB 1180 :G0 :PRINT" {CLEAR} {REV}END OF MOD FF} DONE WRITING DATA FIL 340 :GOTO 590 310 :T=1 :T$="1" :GOTO 430 CLEAR} {REV}MODE #1{0FF} READ " ILE FROM TAPE" :G0SUB 1340 PRINT 1 OR T$) IF T<1 PRINT" ";T$ IF F$ = ADING OPEN 1 IF Z>2 GOSUB GOSUB GOSUB GOSUB GOSUB GOSUB GOSUB GOSUB PRINT" DON ;PRINT"RE :INPUT"INPUT FROM TAPE DRIVE# ( 2) 1{03 LEFT}";T$ :T=VAL( OR T>2 THEN 80 {DOWN}PUT INPUT TAPE IN DRIVE # :GOSUB 1390 ..^.1 .pfjgjj F$ = "" : PRINT NEXT FILE ON TAPE ,T,0,F$ :X$="" THEN 190 1220 :IF Ol C>0 Ol C>0 Ol C>0 1140 1220 1150 1220 1150 1350 1460 ;IF :IF :IF ;IF :IF THEN THEN THEN THEN THEN THEN 550 560 560 560 560 560 IF 470 R$<>"D" THEN {CLEAR} {REV}END OF MODE flfOFF} E READING DATA FILE" : PRINT CLOSE 1 IF C=l IF Ol TATUS GOSUB 1 19$="'" WAIT{ FILE! GOSUB 1 IF Z=4 THEN GOSUB 1 IF Z=3 GOSUB 1 GOSUB 1 RINT"D PRINT" PRINT" GOSUB 1350 THEN PRINT"END OF DATA FILE! THEN PRINT"TAPE READ ERROR ( S ="ST") 400 :GOTO 80 :GOSUB 1310 rPRINT" {REV}PLEASE OFF} ****** COPYING DATA 220 :IF Ol THEN 860 THEN IF LEFTS (IS, LEN{I9S) )=I9$ GOSUB 1310 :GOTO 660 180 :IF C=l THEN 860 OR I9$<>"" THEN 610 220 :IF Ol THEN 860 310 :GOSUB 1150 :GOSUB 1340 :P ESIRED ACTION:" :PRINT 1 = COPY THIS ITEM, NO CHANGE 2 = DELETE THIS ITEM 6 90 700 710 720 730 740 750 760 770 780 790 800 810 820 830 840 850 860 870 880 890 900 910 920 930 940 950 960 970 980 990 PRINT" ONE PRINT" OUND" PRINT" GOSUB THEN PRINT PRINT" 770,8 IF C=l GOTO 6 I9S=I5 $ :V9 GOSUB TO 78 I$=I9$ $ :V$ GOSUB COPI PRINT PRINT" OR: INPUT" IF 19? DOWN} PRINT" IF Z=3 GOSUB PRINT" PRINT NTRIE PRINT GOSUB GOSUB TO 92 GOSUB C=0 :P I ON : " PRINT" PRINT" PRINT THIN PRINT FTER GOSUB 04 LE 3 = INSERT ITEMS BEFORE THIS " 4 = SEARCH & COPY TILL ITEM F rPRINT ACTION ? "; 1440 :R=VAL(R$) :IF R<1 OR R>4 " 720 R$ OK" :I9$="" :0N R GOTO 630,750, 00 THEN 860 50 :W9$=W5 :M9$=M$ :S9$=S$ :D9$=D $=V$ :C9=C 940 :IF C>0 THEN GOSUB 1180 :G0 0 :WS=W9$ :M$=M9$ :S$=S9$ :D$=D9 =V9$ :C=C9 :GOTO 660 1310 :PRINT"ALL ENTRIES WILL BE ED UNTILL :PRINT"DESIRED ITEM IS FOUND; (02 DOWN}ENTER ITEM TO SEARCH F _;;^{03 LEFT}"; 19$ = ..^., .pj^gjj 19$ = "" :PRINT"{03 DOW SEARCH ABORTED" :GOTO 660 |03 DOWN} SEARCHING" :GOTO 620 THEN 570 1310 :IF Ol THEN 580 END OF INPUT FILE! :PRINT"DO YOU WANT TO ADD ANY E S TO THE :PRINT"END OF THE DATA FILE"; 1360 :IF R$="N" THEN 590 940 :IF C>0 THEN GOSUB 1180 :G0 0 1310 :GOTO 590 RINT" {CLEAR} ENTER ITEM INFORMAT :PRINT D = DONE ENTERING DATA E = ERROR, RESTART ENTIRE ITEM :PRINT"DO NOT USE ',' OR ':' WI THE DATA :PRINT"PRESS { REV} RETURN {OFF} A EACH ENTRY 1340 :INPUT"{REV}ITEM{0FF} ?{ FT}";I$ :IF I$="E" THEN 940 1000 IF I$="D" THEN RETURN 1010 INPUT" {REV}MAKE{OFF} ?{03 LEFT}";W$ : IF W$="E" THEN 94 0 1020 IF W$="D" THEN RETURN 1030 INPUT" {REV}MODEL{OFF} ?{03 LEFT}";M $ :IF M$="E" THEN 940 1040 IF M$="D" THEN RETURN 1050 INPUT" {REV}SERIAL#/ID{0FF} ?{03 LEF LEFT}";S$ :IF S$="E" THEN 940 1060 IF S$="D THEN RETURN 1070 INPUT" {REV}DATE ACQ'D{0FF} (MONTH/DAY /YEAR) ?{03 LEFT}";D$ :IF D$=" E" THEN 940 1080 D$=LEFT$ (D$,8) :IF D$="D" THEN RETURN 1090 INPUT" {REV}$VALUE{0FF} V$ :IF VS="E" THEN 940 1100 IF V$="D" THEN RETURN ?{03 LEFT} /^t^H, PROGRAM STORE ^V^'^k Crush,Crumble and Chomp ! From Epyx It's a monster movie, and you are the mon- ster! You can be The Clob, Kraken, Mantra, Mechi5mo, Arschnis, or Goshilla -- or even design your own "custom" monster [disk ver- sion only). This hilarious action game is loaded with graphics and sound as you prac- tice your villany. With 6 monsters. 4 cities, and 5 game objectives, you get a choice of more than 100 possible scenarios. A monster's life is not alt carnivorous crunching, though: The combined resources of the police^ sci- ence, and armed forces are bent on your destructton. 32K disk. .,S29.95 THRU MARCH 15 ONLY : Pay Just S25. 45! Save $$ on Popular Programs for Atari LliMITED TIME OFFER Now shrough March 15, take advantage of our price reduction on these popoiar programs FILE MANAGER 800 From Synapse Software An extremeiy powerful and versatile database manager for use in both professional and per- sonal applications. You define the format of the records to be filed and FILE MANAGER BOO gives you full control over sorting, searches, and retrieval. You can store up to 1000 records on each disk and the program will allow up to four drives. Access to any record takes less than T.5 seconds, and most commands can be entered with self prompting single keystrokes. Atari (IIOK disk). , .5911.95 THRU MARCH 15 ONLY: Pay Just $80. 70! GHOST HUP MJ«U UNTER Progi-amB for Aatari 400/ BOO Q Unless Otherwise Noted PERSONAL FINANCE From Computari A comprehensive personal /small business budget organizer that's more than just a checkbook balancer. Works for both check and cash and will allow up to 100 transactions per month. One check can be divided into several categories to avoid the problem usually assoc iated with charge card and department store checks. The report printer works with most popular printers and wilt give printouts of Tabulations, Check Search, and Check Re- conciliation categories. Get a grasp on your finances, order PERSONAL FINANCE now. THRU MARCH 15 ONLY: Pay Just S42. 45! ^^ fl S LTU nn H SAMMY the Sea Serpent From PDl A great way to introduce young children (ages it and up) to your Atari computer. Speech, music,, motion and color hold youngsters attention. As the story is read, the chiEd is asked to use the joystick to move Sammy about , As Sammy's tasks are com- pleted, the storytefler goes on to new ones. Side two has additional games for the child to play with Sammy. 16K tape...S16.95 The exciting haunted house /maze game vthere ^J^^ | LiP%Wf II^^WI I ^LClC you must get the ghosts before they gel you^ When you eat the pulsating "energjzers, " the ghosts start pulsating and become vulnerable to your attack. 51 different game variations keep things interesting. Play alone or in the "head-to-head" mode. 16K tape S29.95 16K disk $34.95 n By John Harris from On-Line If you like arcade games with action, you'll [ove JAWBREAKER. Guide your chompers through a , candystore maze, eating "wi- fesavers" as you go. You are pursued by var- iously colored "smilies," determined to knock your teeth out. Eat a jawbreaker and the "smilies" turn to blue "frownies ," and you can eat them! It's one of the best examples of Atari graphics and sound we've seen - you'll love it! 16K disk..,S29.95 Visit our other stores: Seven Corners ' the SMI Assembler ASSEMBLER BOOK From Atari Prog. Exchange Two super arcade games in one program! OUTLAW transports you to the old west, where you are engaged in a shootout on the open plains. You can hide behind the cacti that are scattered about, but If you get shot 10 limes it's a one-way ticket to Boot Hill, Pardner. You command a tank in HOWITZER. You're facing an opposing tank across a river and must fire 10 hits to win, Both games can be played against the computer or a friend, and Ihere BrQ several handicap options available. 1CK tape.. .514. 95 2yK disk. . . $17, 95 Sof tPorn Adventure By Charles Benton from On Line You're in a sleazy bar in the notorious town of "Las Vagueness." With SIODO in your pocket, you set out to fulfill your erotic fantasy of seducing 3 women before you leave town. The casino, with its blackjack £ slot machines, is the only source of money. The women and other bizarre pleasures might be found any- where, NOTE: R-RATED PROGRAM, NOT FOR MINORS. 40K disk...S29.95 Center* Falls Church, VA & W.B«II Plaza ATARI ASSEMBLER BOOK By Don 5 Kurt Inman While the ATARI ASSEMBLER CARTRIDGE comes with an operating manual, it assumes that you already know assembly language. !f you're new to the Atari or its 6502 processor, this book is a must. The Inmans guide you through the rudiments of this fascinating type of programing in clear, easy steps. In- cludes full listing and description of 6502 mnemonics and addressing modes. 312.95 Some Common BASIC Programs Atarl^ Edition By Poole, Borchers I Cook from Osborne From "Alphabetizing" to "Withholding Taxes" -- this book contains 75 program listings for solutions to common (and notso-commonj problems. Finance, math, statistics, projec- tions, and household utilities are included. With complete listings, sample runs^ and des- criptions, you needn't be a programmer to benefit from this book. 200 pages... S14. 95 6600 Security Blvd*- Baftlmoro, MD TO ORDER CALL TOLL FREE 800 424-2738 For information Call (202) 363-9797 MAIL ORDERS: Send check or M.O. for total purchase price, plus SI. 00 postage & handling. D.C. residents, add 6% tax. Charge card customers: include ail embossed information on card. THE PROGRAM STORE 4200 Wisconsin Avenue NW, Dept.U02 Box 9609 Washington, D.C. 20016 32 COMPUTE! Febfuorv. 1982. Issue 21 1110 GOSUB 1140 :GOSUB 1340 1120 PRINT"IS THIS ENTRY CORRECT"; :GOSUB * 1360 :IF R$="N" THEN 940 1130 C=l :RETURN 1140 PRINT" {CLEAR} "; 1150 PRINT"{REV}ITEM: {OFF} ";I$ :PRINT"{RE REV}MAKE:{OFF} " ; W$ 1160 PRINT" {REV}MODEL: {OFF} " ; M$ :PRINT"{R REV}SERIAL#/ID: {OFF} ";SS 1170 PRINT" {REV}DATE ACQ'D:{OFF} "D$;TAB(2 2) ,-"{REV3VALUE:{0FF} $";V$ :PRIN T : RETURN 1180 X$=I$ :GOSUB 1200 :X$=W$ :GOSUB 1200 " :X$=M$ :GOSUB 1200 1190 X$=S$ :GOSUB 1200 :X$=D$ :GOSUB 1200 ' :X$=VS 1200 PRINT#2,X$ 1210 RETURN 1220 GOSUB 1290 :I$=X$ :IF C>0 THEN RETURN 1230 GOSUB 1290 :W$=X$ :IF C>0 THEN RETURN 1240 GOSUB 1290 :M$=X$ :IF C>0 THEN RETURN 1250 GOSUB 1290 :S$=X$ :IF C>0 THEN RETURN 1260 GOSUB 1290 :DS=X$ :IF C>0 THEN RETURN 1270 GOSUB 1290 :VS=X$ :IF C=2 THEN C=l 1280 RETURN 1290 C=0 :INPUT#1,X$ :IF ST>0 THEN C=3 :IF ST=64 THEN C=2 1300 RETURN 1310 IF Z=2 THEN PRINT" {CLEAR} { REV} MODE #2 {OFF} WRITE NEW DATA FILE ON TA PE 1320 IF Z=3 THEN PRINT" {CLEAR} { REV} MODE #3 {OFF} COPY DATA FILE, REQ'S 2 T APES 1330 IF Z=4 THEN PRINT"{CLEAR} {REV}MODE #4 {OFF} EDIT DATA FILE, REQ'S 2 T APES 1340 PRINT 1350 PRINT" CCCCCCCCCCCCCCCCCCCCCCCCCCCCCCC CCCCCCCC" : PRINT : RETURN 1360 PRINT" (Y/N) ? "; 1370 GOSUB 1440 :IF R5<>"Y" AND R$<>"N" TH EN 1370 1380 PRINT RS. :RETURN 1390 INPUT" {DOWN}FILENAME < { REV} RETURN { OF OFF} > ^{03 LEFT}";F$ :RETURN 1400 CLOSE 1 :CLOSE 2 1410 IF Z>2 THEN PRINT : PRINT"DEPRESS {REV REV}STOP{OFF} ON BOTH TAPE DRIVE S" :GOTO 1430 1420 PRINT :PRINT"DEPRESS {REV} STOP{ OFF} 0 N TAPE #"T$ 1430 PRINT" {DOWN} HIT ANY KEY WHEN READY TO CONTINUE"; :GOTO 1470 1440 GET R5 :IF R$="" THEN 1440 1450 RETURN 1460 PRINT :PRINT''HIT ANY KEY TO CONTINUE, D=DONE"; 1470 GOSUB 1440 :PRINT :PRINT"OK" iRETURN Program 2: Atari Version 10 REM IH-5URAHCE IHIEHTORY m REM ROBERT W. Bh)<;ER rTCO,. HJ 30 REM ATfiRI LJERSIOH (C) I'^fU 40 F£M SrtALL SYSTEMS SERUICES. I^C. 50 REM 60 ifm #2.-4..y.."K^" 70 DI H T$( 1 > . X'l-C 80 ) , I $( 80 > j \>i$<. 80 ) , n$<. 89 ) ..S$<8k!;'.D$(3)..U$(20) 88 GRAPHICS id-l " IHSURftNCE IHJEHTORY PR0GF,#1 " 96 PRINT ''Ctesired Pr-osr-dm mode^" 100 ? =? "0 = Dons" 110 ? "1 = Read D-dta" 120 ? "2 = H-ite New Data Fils" 150 GCtSUB 1340^? ^? "Mode? "; 160 GieUB 1440= IF R=48 THEN Effi 170 R::R-4t-IF R<1 OR R>2 THEH 1G0 18*0 2==F: = 0N R ODTO 480.. 1 '58 190 ? "-tCLEAR}! rtJDE #2 I l^PJTE t€U EwTft FILE" 200 TFftP 2m- 7 "(DOH-ONufiiber of Files to 5i<;ip"; = UPUT R^TRAP 40006 = IF R<1 THEN 3 40 210 ? " ■LKWDF'ijt. tire in drius; press Ft nr 220 ? "then Pi-?iS5 1 RETURN! ," 230 IF PEEK(764>=255 THEH 230 270 Y "-CCLEAF::!-! HiDDE n 1 l.f;ITE HEW DATA FILE' 2"50 ? "•CDOWN'iPositioriins output tape..." 290 TRAP 310 = OPEN #1.4.-0,. "C:" 300 GiiSUB 1290 = IF C=0 THEH 300 310 CLOSE #1 = IF C=2 THEH 580 320 R-R-MF R>0 THEN 2-90 330 ? =? "uutpi.jt tape is now positioned. IDUWN>"= GOSUB 1400=? 340 ■■■• "Press PLAY i. RECORD. f>ri '=''=• I RETLIR Hi . " 350 OPEN «i.3.0;"C:" 355 FOF: 1=1 TO 128; = PUT ttl;32 = NEXT I 360 GOSUB 940 = IF OS THEH QMM lie^i = GOT 0 360 370 CLOSE ii = ? "{CLEAR:!- iEHD iJF MCCE #21 fone wit ins data file" 380 GffiUB 1340 = GOTO 598 400 ? "•CCLEARJinODE #1! READ DATA FILE FROM TftF-E''=QJSUB 1340 430 ? "■CDOWrOFi.jt. input tape in dt-'iye.- pr- ess iPLAVL. then press I RETURN I." 450 TfAP 568 = 0FEH #L4.,0,,"C = "=>:;$="": FOR 1=1 TO 123 = GET #LR = ^EXT I=TRAP 40806 460 ? "CDOWNJ-Readins next file on tape." 470 GOSUB 1220= IF Oi THEH 550 Febtuory, 1982. Issue 21 COMPUTEI 33 486 GOSUB 1148^ IF OQ THEH 596 490 GOSUB 1229 : IF Ol THEN 5£8 500 GOSUB 1150: IF C>ti THEN 5S0 51F1 GOSUB 1220 ^F oi THEN 569 528 L-OSUB il:j9:IF C>8 THEN 556 530 GOSUB 1359 540 GOSUB 1466 ^F ROASCC "D'= > THEH 479 559 ? "iCL£RR>iE^JD OF MODE #1! DONE READ ING DATh FILE":" 569 CLOSE #iH3uSUB 1359 579 IF C=2 THEN ? "End of daU file!":C= 1 586 IF Oi THEN ? "TAPE READ ERROR-"; FEE K(195> 598 bOSUS 1499^ GOTO 89 949 C=0:? "CCLEftRlEntsr- itsim intoriin'itiori 950 ? "p = Done enterins dita" 96.9 '~: '■£ = E-frorj restart entire Iteni" 989 ? ^t ''r'r^ss 1 RETURN! after each srtr 1238 GOSUB 1290=M*=K*:IF 1248 GOSUB 1299^m=X*aF 1259 GOSUB 1290:S*=Xf:IF 1260 GaSUB 1290--D-|=X$:IF 1279 GOSUB 1298:U$=X$:IF OF' 12-39 RETURN 12-90 TRAP 1300M:=0aNPl!T 0: RETURN 1300 C=3:IF PEEK 195 >=i36 H 1348 ? 1350 ? "G8 R}"=F£TURN 1360 ? " (Y/N> ? "; 1370 GftSUB 1440 aF ROASC CC'H") T^€H 1370 1380 ? CHR*(R) = RETURN 1400 CLOSE #1=? "Depress driMe." 1418 ? :? "Press any key C>0 THEH RETURN C>3 THEH RETURN C>9 THEN F£TURH OS THEH RETURN C=2 im\ C=1=ST #1.X$:TRAP 4000 THEH C=2 = R£T1JR <"Y"> Am ROAS ISTOPl on tape to continue. . ." 999 liOSUB 1349 ^ ? " 1 ITtM 1 " .- INPUT 1$ ^ li- I $="£■' THEN 940 1890 I- I$=''D'' THEN RETURN 1019 ■^- " i HAKE r' ; aNPUT l'i*=IF m="E" THEH 949 ;'"lrf'UT"n$:IF []$=''£'■ THE 1939 ':' " iriOuhi 19c9 l!^ i'i$= h'948 1949 ] 1359 ? "!SEP:ALs■^lDi'■-I^4PUT s*:IF Sf="E " T^H 949 1869 IF S$="lI'' THhH RE ! URN 1979 ^" "iOATE rCQ'DI ( MONTH '^iHY--VEHR:i "■■> aHPUT_D^IF D*="E" THEN 348 1989 Ih Uf="D"_THEN RETURN 1998 ? ■MIUALUt: ''; ar-FUT UiaF U-t="E" T 1199 IF U$="D'' THEH RETURN i 1 4 ~j |~ ."■"■! 1~ 1 I .i l" . "i-u-'i i.-, 4-7 .< Tj lliU buZ-*JD 1 i'4->J ■ 'jsjD'jb i-i'tt 1129 ? "Is this entry correrf^" 1 rGOSilB 1 369 : IF R=ASC<"N=\) THEH 949 1130 C=i: RETURN 1149 ■': "{CLEAR;"; 1159 ■"■ ^'ilTEni ■■ M$-? "irlAKEh ";Uf 1160 Y MMODELi: ";I1*^? 'MSERIALii^-IOP " ;S^ 1179 ? "iDATA ACQ' Op ^0$.. "lUALUEi ^ ";U $:? : RETURN 1188 X$=I$:ijOSUb 1289 : K$=W$ : GOSUB 1290 ^K i-\-i-$ : GOSUB 1286 1199 X$=S$: GOSUB 1299 0-^i=D* : GOSUB 1280 ^X i=U$ 1289 PRINT #1;X$ 1219 RETURN 1229 GOSUB 129S:I$=X$:IF OS THEH RETURN 1448 GET #2.-R:F£TURH 1460 ? :? "HIT mi KEf TO CWTIUJE.- D=DO \E" 1479 GOSUB 1440:? "OK": RETURN W/ngrr ^mm^/Ajs * Easy la lejfn *ilPi 60 po*erfu! cammanCs ViC * OOuDiA d«nsi|y gtapriics la'ge nunlDer a'5[ii4)'- SOu"iJ' • gcomplHH prc^r*mi hT-Ciud-Jia BiMkom Sp3C8W»r, Anii. U F O Mazt » P£HC6M »Bfli5n lO' OLD.'NEWM0 flOMs and BK o' memorr w VliC "e'lion hii coloi *nd cnnartctO SOijidl'fq 3K memor-j eipandflr} # CompFBheiKvtM wgaminuJl US4CAN*0* FOHEIGN VI&lLloF PE1l^vlCw'3o4Pne9on caiiane(di^SNGii6add 13 00) Mb HO ViaiL. Us«r » Manual iialundablcr wiin SOHvrare Qf^eO HO 1^? VIGIL Inigrprjlai Lialing i6M2 AastJnbLet UriQuagg) PET/CBM Tiny babic compiler - PET A Ifue comptler inal tuins yeu' BASIC pogfam inio lasi machine code * Subset oF PET BAStC complies lo 5502 machine code Reg only BK (rtemoty n Has TuM flcaiin.g ooini capabilities ana lunclions * Compiitr iismngi available Mith IGK ve'i'a^ Imciude^ll * Can load CompiF*a i^achme code anyrtne'e in memofv * Ofl £i*aaite ladd S3 00 tor flisiietie> USB CANADA FOfElCN TIN'V B*sic Compilei OLD^NEWMO POMS-SOii wnw 8K memoiy JJS S30 TIKV Basic Us*r S Manu*' [rtlunMDit -riin *oic*ar*. ofden I 5 % J PET A APPLE tl USEAS TiNY PaSCAL Siruciurad iii^guage anefnaiiiit to basic ta; pet a' APPLE ii mciudti * LINE EOnOFt creates moOities and manii.ni soufce ijnguige * COMPILED con*erl5 jour tource to an eiecutdDle P ccrfle icuma; * IKTERPBETEB ciecuies complied FcDfle Featurps Cum ir TRACE «F CASEOF WHILE DO, IF-TMEN ELSE REPEAT UNTIL, FOR TDOOWNTO. PBOC. FUNC * G(»ch"CJ »«i»JOn has mare GHaPHiCS, PLOT POiNT TEXT INKEV AB5 SQH APPLE II his ICire« & fiiresCOLOfl HGRAPHtCS. t^COLDR HPLOT. PQL and TONE LJ£ 4 CANADA FOFtEIGN TiNy Pascal PLUS GRAPHICS PET 32K NEwa 0 fiOMS'SOJi'a-shiUlt IM *55 Tir^V Pascal PIUS GRAPHICS PET^ZK NEWJ4 0 FlDM5'B033fc:BStoltB SS5 UC TIK^f Pascal PLUS GRAPH ICS APPLE ii " (Larry Colvin, Micro Computer Systems). It is a "grandfather" in this voiing field. JINSAM EXECUTIVE will be the third generation in development. AllJINSAM systems arc sophisticated and flexible yet easy to use. JINSAM is saving its users valuable time and money in government, educational and research institutions, business and industry- worldwide. JINSAM is a Commodore approved product. Sec your local dealer for a demonstration. JINSAM ii a oidcmark of JINI MJCRO-SYSTEMS, Inc. WordPro IB a trademark of FTT}f««xioiul Software, Inc. VisiCaic is a tiademark of Professional Software, lac. CBM in a IradrmaHc of Commodore Business \fachines, lac. JINSAM Data Manager . Additional Information and nearest dealer .'. Newsletter Subscriptiat ($5 US/$8 Woridwide) .. JINSAM Demo Disk($I5,plusshiRjing&tax) . . User's Guide (S40.00, plus shipping & tax) Please send to: Name Position _ Company Address _ City, State, Zip _^_ Phone ( ) Computer. Disk .^plication JINI MICRO-SYSTEMS, Inc. Box 274C • Kingsbridge Station Riverdaie, New York 10463 (212) 796-6200 Dealer Inquiry Welcome 3B COMPUTE! Februa[V,W82. Issue 21 "L) 1ST LINE(S) "M)ENU DISPLAY "P)RINT LINES(S) "Q)UIT LINE EDITOR "R) EPLACE LINE "S)ET MARGINS ENTER SELECTION 40 SP§=" ":DL$=CHR$(20) 45 M=79:REM DEFAULT TEXT STRING LE NGTH 50 EE=0:REM DISKERRROR CHANNEL CLO SED 60 PR=0 90 REM POKE144 ,49:REM DISABLE STOP KEY 100 PRINT" [CLEAR} {REVJABACUS S OFTWARE LINE EDITOR" 110 PRINT" {02 DOWN} FUNCTIONS:" 130 PRINT 140 PRINTTAB(8) ; "A) PPEND-TO END OF " TEXT" 145 PRINTTAB{10) ;"@ = 5 SPACE TAB" 145 PRINTTAB(10) ; " @+ { REV } RETURN { OFF OFF} = SKIP LINE 150 PRINTTAB(8) ;"C) HANGE-STRING 160 PRINTTAB(8) ; "D) ELETE LINE(S) 170 PRINTTAB(8) ; "F) ILER COMMANDS 180 PRINTTAB{8) ; "I) NSERT BEFORE LIN E 190 PRINTTAB(8) 200 PRINTTAB(8) 210 PRINTTAB{B) 220 PRINTTAB(8) 230 PRINTTAB(8) 235 PRINTTAB(8) 240 PRINT:PRINT' -> "; 250 GOTO510 500 PRINT:PRINT"{REV}ENTER{OFF} A,C ,D,F,I,L,P,Q,R,S,M)ENU->"f 510 GETA$:IFA5=""THEN510 520 J=0:FORI=1TO11 5 30 IFA$=MID$ ("ACDFILRMQPS" ,1,1) THE NJ=I:I=11 540 NEXTI 550 PRINTA$ 560 IFJ=0 THEN500 570 ONJGOTO10 00,20 00,3000,4 000,5000 ,6000,7000,100,8000,900 0,2 1000 1000 PRINT 1005 PRINT" (REV}APPEND{OFF} TO END 0 F TEXT" 1010 PRINT:PRINT LL">"; 1020 GOSUB10000 1030 IFLEN(L5)=0THEN500 1040 T$ (LL)=L$ 1050 LL=LL+1 1060 GOTO1010 2000 REM CHANGE STRING 2010 PRINT:PRINT" ( REV} CHANGE { OFF} " ; : GOSUB16000 2020 IFHI=0THEN500 2025 PRINT" {REV}CHANGE{OFF} STRING-> "; :GOSUB10000 2030 L=LEN(L$) 2040 IFL=0THEN500 2050 IFL<4THEN2000 2060 DM$=LEFT$ {L$,l) :REM DELIMITER 2070 IFRIGHT$(L$,1) <>DM$THEN2000 2080 J=0:FORI=2TOL-1 2090 IFMID$(L$,I,1)=DM$THENJ=I 2100 NEXTI 2110 I?J=0THEN2000 2120 IFJ=2THEN200 0 2130 FR$=MIDS (L$,2,J-2) 214 0 IFJ+1=LTHENTS$="" :GOTO216 0 2150 T:;$=MID$ (L$,J + 1,L-J-1) 2160 F=LEN(FR$) 2170 F0RI=L0T0HI 2180 T=LEN(T$ (I) ) :S=1:NLS="" 2190 F0RJ=1T0T-F+1 2200 I?MID$ (T$ (I) ,J,F) <>FR$THEN2230 2210 NL$=NL$+MID$ (T$ (I) ,S,J-S)+TS5 2220 S^=J+F:J = S-1 2230 NEXTJ 2240 IFS<>1THENNL$=NL5+RIGHT$ (T$ (I) , T-S+1) :T$ (I)=NL$ 2250 NEXTI 2260 GOTO500 3000 REM DELETE LINES 3005 PIUNT:PRINT" {REV}DELETE{OFF} "; :GOSUB16000 :REM GET RANGE 3010 IFNOTDFTHEN3015:REM NOT DEFAULT ON ENTIRE FILE 3011 PRINT"{REV}DELETE{OFF} ENTIRE F ILE? "; 3012 GETA$:IFA$=""THEN3012 3013 PRINTA$:IFA$="N"THEN500 3014 I?A$<>"Y"THEN3011 3015 IFHI>LL-1THEN500 3020 I?HI=LL-1THENLL=LO:GOTO500 3030 J==HI-L0+1 3040 F0RI=L0T0LL-J-1 3050 T$ (I)=T$ {I+J) 3060 NiXTI 3070 LL=LL-(HI-L0) -1 3080 GOTO500 4000 R3M FILLER 4010 PRINT" {DOWN} {REV}FILER{0FF} ENT ER L)0AD OR S)AVE-> ; 4020 GETA$:IFA$=""THEN4020 4 030 I.?A$<>"L"ANDA$<>"S"THENPRINT:G0 TO4000 4040 PRINTA$:M$=A$ 4050 PRINT" {REV}ENTER{0FF} FILENAME- > "; 4070 G3SUB10000 4075 IFLEN(L$)=0THEN500 4076 IFLEN(L$) >12THEN4050 4080 FI$=L$ 4090 PRINT" [REV}ENTER{0FF} D)ISK OR ~ T)APE-> "; 4100 GETA$:IFA$=""THEN4100 4110 PRINTA$ 4120 IFA$<>"D"ANDA$<>"T"THEN409 0 4130 IFA$="D"THEN4160 4140 IFM$="L"THEN4400 4150 GOTO4200 4160 DRS="":IFLEFT$ (FI$,2) <>"0:"ANDL EFFT$ (FI$,2) <>"! : "THENDR$= " 0 : " 4170 GOTO4600 4200 REM TAPE SAVE 4210 IFLL=1THENPRINT"N0 FILE TO SAVE ":GOTO500 4220 CPEN2,1, 2, FI$+". SOURCE" February. 1'?e2. Issue 21 COMPUTE! 30THENGOSUB20000:GOTO500 4890 IFA$=CHR$ (255)THEN4850:REM END ~ OF LINE 4900 T$ (LL) =T5 (LL) +A$ 4910 GOTO4860 4920 CL0SE2 4 9 30 PRINTSPC(6) ; FI$; " LOADED" 4940 LL=LL+1 4950 GOTO500 5000 REM INSERT LINE 5010 PRINT:PRINT" {REV} INSERT{OFF} BE FORE "; :GOSUB17000:REM GET LINE # 5015 IFLO>LLORLO<1THEN5000 5020 PRINT:PRINTLO; ">"; 5030 GOSUB10000:REM READ LINE 5040 IFLEN(L$)=0THEN500 5050 LL=LL+1 5060 F0RI=LLT0L0STEP-1 5070 TS(I)=T$ (I-l) 5080 NEXTI 5090 T$(LO)=L$ 5100 L0=L0+1 5110 GOTO5020 6000 REM LIST LINES 6010 PRINT:PRINT"{REV}LIST{OFF} ";:G OSUB16000:REM GET RANGE 6020 IFHI=0THEN500 6030 SS$="N":PRINTtFORI=LOTOHI:REM P ERFORM LIST 6040 PRINTI;">";T$ (I) 6050 GETA$:IFA$=CHR$ ( 18 ) THENF0RJ=1T0 1024:NEXTJ 6060 IFA$<>CHR$(3)THEN6110 6070 SS$="Y" 6080 GETA$ : IFA$=CHR$ ( 13) THENSS$="N" : GOTO6110 6090 IFASOCHRS (32)THEN6070 6100 GOTO6120 6110 IFSS$="Y"THEN6070 6120 NEXTI 6130 GOTO500 7000 REM REPLACELINE 7010 PRINT:PRINT" EREV}REPLACE{0FF} " ; :GOSUB17000:REM GET LINE* 7020 IFLO>=LLORLO<1THEN7000 7030 PRINT:PRINTL0,">"; 7040 GOSUB10000:REM RED LINE 7050 IFLEN(L$)=0THEN500 7060 T${LO)=L$ 7070 GOTO500 8000 REM QUIT 8010 PRINT:PRINT" {REV}LEAVE EDI TOR-ARE YOU SURE?{0FF} "; 8020 GETA$:IFA$=""THEN8020 8030 PRINTA$ 8040 IFA$<>"y" ANDA$ <> "N " T HENS 0 0 0 8050 IFA$="N"THEN500 8060 PRINT:PRINT" {REV}** END L INE EDITOR **{OFF}" 8070 POKE144,46:REM ENABLE STOP KEY 8075 POKE59468,12:REM ENABLE UPPERCA SE AND GRAPHICS 8080 END 9000 REM PRINT LINE 9010 IFPR=0THENPR=4:OPENPR,PR 9020 PRINT:PRINT" {REV}PRINT{OFF} ";: GOSUB16000:REM GET RANGE 9025 INPUT"NUMBER OF SPACES BETWEEN ~ LINES(l-2) ";S1 9030 IF HI=0THEN500 9040 F0RI=L0T0HI :REM PERFORM PRINT 9 050 PRINT#PR,SPC(SP) "{DOWN}"+T${I) 9055 IFS1=2THENPRINT#PR:REM DOUBLE S PACE 9060 NEXTI 9065 GOTO9100:REM *** TO GET RID 0 F JUNK *** 9070 PRINT#PR 9080 PRINT#PR, "***"; LL-1;"LINES IN B DYNACOMP Quality software for. *. ATARI PET APPLE II Plus TRS-80 {Level II)** NORTH STAR CP/M Disks/Diskettes (sc« AvBilnbUity box) CARD GAMES uriitdfihf MiinuCarld jti iti litu|ini *r4 play BACCARAT *i yout kiiuic <; in I6K. Rcquuci i>m jajmick rrkf ; »1I.M Cwhih/SU.'M DUnir iiuiKll ii ihcX"'iii It lilt £iiiopciinc4ii] fjunt titiKh ii ihcfi lo r^^' ^^^ a^ Ciotijtinffr Ip jrE34|i rif^t Lf4ri lit»n k,{ik>r IdphKi ind nuicl)J9| HMnd Rlhi GIN RUMMV lApfk Hl>t Tho n ih'T bcM DU£ra fotnpuicT inplnnniuui HIil£S |rkpti£i ve luptfb Wt^i «iu cu b« POKE! PARTY (AniaM for M rvapatml INUn^ SirHCwtiH''n].H Dkkior POKiR PARTY i|.«ilfi>pokrr ».fruUih>n t>4H4«nibc book. POKER, b; Chvald JMoti^ Thtiii the RiDiKompfthcsttvr • cruun i.'kiili'biE Tor ir,icrtKnn|hdt[fi. Thr p«n> nrauttiof ymtnctl ind ui olhrr |cw>Pi><*I'^ lyov viLl C#[ Ifr kOOB theiA* h*\ t didtffrtt {VfuMlillTlr la Ittt totra at ■ valrtni [iraiifnul; la klult pi |a4 iindlT VttHun PiMiKf <■ri^ POKEJI PAHrV bt'v* t^i"! 1° <><*l ripaai>r fVK icMfhi ! Apptc tannK tni diUnic vmioni require « 12 K lor l«r|fl} Apcilc 11 Prk4: St<.W tiMitt/lll.tS Dtiknu ib j,nd iiKmb.';) liircuJic rouUnei provtdr U^IciMcrCriiwiue CRI8BAC;E i.O (TIUhH only} T>iiiJi iLrnpl> the bciE ^rjbtufc (Utic ir rcni II vicJJ 111 lor [h< DoaKe wuhjii ic THOUGHT PROVOKERS MANACMI^NT SlMUl^TOR {Awl. N«nh Slu«44 CP/M ait^j rvtn; lt*t}t'M*titt KU.M Dtak^iu Th4 protTtm I) b^Kan Hnllrni ttwhini loulit v(dti |ttdji.ir bimikcu icEkkiIi. cacti piMjtt at uwn (MilroLi icwnpu} »HKh numjIuiuEtii ittihen the imuUuor mdi. FUGHT SIMULATOR (Avdtbh fof ki t«npilKnt Prkt; Sl7'HCuMnH''Sll.M Ihtmr A mliitiCiU>dicii[miivemi.lhnnitk'il umulnnmoEiakc-olf. (ll|^t ind lindini The p[i>|r«in kiiilim KrodysitrkeqiiiEJOiit ■nd ih( chuicUfiiiJci ar« rul utfoi! Voki ]f inphici, ii b% ricinniand «n> *ddKU>e SKiBiiiuI^nirtfCkx* m COMPLiTROMCS Ruiiiin I6K Atan VALDEZ lAnlkbk tar dl ciHap«lni» Prtn: (IS.M CMtHifllt.H Eltakttw VALDEZria Lampn^Efi tiniuUiiortat uiip«fu«iltt uvi^auaiiift iMPfidt* Vkiaura^oLnd VaJdfj NiincmtirnjpDpl Al«»h4 Ifttludrd « Ihii umulilKwi ii ■ rnlnlK aail laEniHi* Jl* n UAdanrnl rwp- pofiiom tif ^f^h m*f M •wacd unSf Xht ihip'i iIphinuinnK r4dij dupb)-. Iht moiitm el e)k ihip iiuelf ti ■crun.trlr mwtdkd mithnuEKiitt) The iimulittoa tbo fOEtuRt t model Iw th< tidal pitterai >4i Ih* irfioci. ai. •«11 tt orhef utrTic fotiii'Cribi LiAkrfi Mii dnftini izrbnii; Chui royi courct fiwn ibc Gulfdf ALaiU Eti VbImi Huboi! Iht ibr loftwurrfMC^-i in |q^f|i>iur C'rrtigiKjpd PcnotuJCwfi- BAOKGAMMOM l.BCAuri. North SuraMl CP/M onlrl n*!«i H*.»SC»*»r»*-SLI.MI}«ik«fi Ihii pcpfram tr-ui >pL(r Mckf^mnqn liilk fid ■"Jl »|uj i.rnp{9i-c >our (afr>t A hurnin can< ronpnc ifjiBii i cDnipiitci £ir a(ai<^u iitDihrr hurun Th< computrr Ltr titnpiMy iiiinu iiuliT Eithrr iht tiuETLan or iHt fompurei (tn dnubk ot irnrti'ir ■difCoUl BoildpCktili^riiraiibt^rttll^dDt itiiJ l^i t«plif. BaCKCAMMO^J J Opla^i n aj:co|da;Tit with |}k officiil rukt □ I t>4(:k ■•»)»>(! n 4«td ti tu'c ID pE^Mdr nanv (iKntlmf tnitortt ol buhfimiuDn pli^ CHi^CKER-S y.(f tPtT D4bl rrht: tU.H L>HTtl4/'IH.MIXikctv Thn II anc !!r iFir epoV cJHaJksitini v^nlcti pioffimi iiiiiUbk li hi ID lotta at pUr and alloti^ ihi: iiwf lo fhuif'' >l'>ll Ifvrl) 11 ■nr tim'T A!tlvau|h piooMint'i'kti)' [{luth. lame ai level 1 4, CHECKERS ] Otip^fhjiKiJiji iiiiMi.iiftkM Iptlif wid 10 CHESS MASTER (Nonb Sur Mid Tm4« ««lr> rrM«;in.t5CMKtH--Sl).H DbbtK Thn ^onpLp:; jrd ven w^nFul piap'*'^ CQiidn ntck'^tbO'f ^^. Iiinchida uHlini. en piiuni cipuimasidihepioiiia^ iNia olpi^Qi AJl^tanalt)', the board nu) b,p«frni[iiin|;ihinkffiiuiioa □! "baak"piar> To flUiLtuR ncEuEKia ipwd. HirpiDiim ii .nESrii ib ■ucrnh'f bii^jair Iby 50FT*A"t SPfCJAI ISTS MCablomul FuO liapt^i^'t vc crpplQcni in \fK JKiK rtrti^r. fwi i^c vidshi of ■}phinunifrK dnpUf air pro'idrd id KcommaJjiEe Norih Stai JHTL S« roie*' ic anCwnpuiLiii LEM LANDER (S2M, Ap9b pU hI}) t^DiroLii l-tM LANDEfc In ■ «fr landiniun tnr ricrrB< ii«>(Kmanbri frem w paddin »rt iiKd i» >cr«iitil crift iiiiiud* and ihrvu 1hli is a r>t«i-iittic hifh m cluJ)cn|.f' FOREST FIRFI 4Atir1 oihr) mm: i».»f t'MMiti/iiio.ts Dunu Uiini CKclltni jr^tiki and icuiii nuliiaiiHrtliiiB?FnalE>n. Ult-iUt "tr^bln air prqiidcijiUimtke' FOREST FIRET>n)< luipcnvcfjIudchaJkngmi. No E%D lamei have [J]«' tame xcitig irtd i^trc ire ! kxli of diincuh). SPACE EVACUATIONS lAppk. Auriai Can TCM s-E^toEiiie ilir tiki} and t'aojjJr ih 1^1 fkrn^ii of stauK- ipart finvei ■ 1 TRS« batj) rtM: IIS.MCMMicte/tlf .H DtakfiH Fanti beloir ilvt wa tiplodn? f-oui tompuut brfutmihr ^tp'ipijnipijur ai or propk Tfcii umvlalwn. n pactK-ulaili miCTniin) it n iiVRbmn mviy cifthe i!w m»trt thiUeriif ot ADVEJiflUllfc MONARCH (Atutoaltl Pnn; II I. HCuirHi/IISKDtaknw kjiOSARCH It 1 laKmiEiflf nocKiraK iimulauofl requtfinj foti lOMinitiui t-ttv Ecnriai >Ehtriiai>oii'il(*din' Voki deui nisf Lhe lUiuLuit sr tenatt devoied to induiitiiJ aitd atrifuluiial uu, how aiuctt toad to diitribuE* u> Eh* popuUcr and hp* niLuriifaouId bci{iciiiE»i poD^tiqii lonupl VovaMI Ind IT4 aVAcoKm ■nidvea-corapfanKir 4>td ihai ii unoEeuyECRuie cvrrycrc happy. Ruu in ilK Aiari CHOMPELO (Aorl oiity> Prtrt: 11 1.H Cawmr'IIJ.K Dkkntc CHOM?ELO a irtlly e»o ctialkn|in| t^itn ir ochf One ii lunilai id MM: ycu mjii bite otr purl of iiUitDUi luJuU i^iock ("^eiui^L hin:tia,tJCi«Mnt/II4.tSINiihfni \cocajHtci| i;onif«!Jiiiimiu''aruM:'Pil Tb* joaJ n to mmait eaain o^ ■±m1 4.-qrapani iDff)tE1< W'ikk T-^kM >ca>lll| (TOw' AVAILABILITY DVNAIOMP wTivire ii. lupplwd oiih Lompkie dwumcniiiHin <:o4iiunin| cleir eiplanaiKint and eiiunpki Unkii oibet*iu ■.[iCkidftl.jlJ proifamiHiL run •'iiiiin I6K rroiiim.rriKndri' ipactf ATARI icijuim i*.K\ ttLcpi lahrrr nui|i»]ni. nn be abuncd on lUJidu-d lIRM )7M iirt|le Jentiiy/d^bk itfiwir .i3inp«tibler(xrnauil"CP'M nopp) d»ki lo! ).yi.irmt nirutini ut^ikr MBaSICUut MampSf, aIedi. Xrfai 120 Prktilll.'HCHttlit'SLf.HHiktllt Th^i t3i ihr claub: Sunrek iiTnuLm-orL. bji. viih ie>cirxl nc» fcaturef, Fw «i.ajnp>H i-'tf Klinjaivf now tliMvi at lhe Enurpnie wl V'U'IlLnj vhikalM) ■ll*Cklli| tiafhai«i nlDtbrl quadraati Tlif Kilinaqnii a4.Ki Blta^k Htlb bpth lifht andhcKvy (ruiVTI iAdnttnr wMMinot at' th( uiuaiian LLhftii^ irhen the EpirrEimc ti bnwisd bf ihrtt heavy cnriKii Mid « watbaic S O S i> rntvrd? TTk Kluifoni |ct rrtnf Str ihi Hrt^ire rrrirwi m A N A I..O C. HScfi««it01i4be indOune MerrluAdiimi ■I^CL HOL£(Ap^ eiaH}) rttrt: IH.»Cawnt*'IM,M DliktMt Thii It •TVtountfi'aphiCBliunuiMKWof Ettcprcb)rniitE*othufisekrKl» »Mr>rfi| i bUfk hok •'VihaipAfepiobt Ihcob Kn A Eocoicr and mainEatn. }cy a pirtcrtbolhfiK. anwMclMe eo * laiaH bUtl h^ Thu » lit bt aACi: TILT (Appk ud AiMii oab I L«c ihrxunr pwWki tq ijj !►* pliw o( ihs IV wieeu lo '■rofl'' > baUlD tiok (cu tma3ki ukI intillcr' A bjili'ir iimrr tlls»i f-Mi va n>t*iuit ^i ESCAftl^bOM VOLANTlUMIAI&rlfiBllJ frinitimc*-Hir/tM.t$UalriU Si>ii| Eh« acnon anil r.tiErnimi oF an *t(iO< intg ywr honif *nh ESCAHt PROM VOLAMTIUMl To eivape >txi muiE fflanru»ri rnjiiT »pacc ihip iruLiad obiiacJri ud iivr bUu the draioii >i>ithoui betnj rairni II he it killed >kiib a direti itoi (ftcH^uu i ki tapptdolO. * dswr 0[>mi,iiDihi: Duiiidf H^wrTCf.ihrdqprd^r^nqt itiy opm indcfWiith 1^ iw Mioncapc in iiinc. the thwr«ip>n tpd a p*" drmfisappnri SoriKiintci j-ou can uiuih itiniufh EheiJDDrbyrepciEcdIjrchippuiiiikiylE II. OEhrr ymn ie ii imperbnui Ai ih* hither k»tlearpl>)imofeQbiUi;kiartddta|orrtip{teM, iddtfii lu tneeictceirienE L'ui h^h ftioluiion trif^ifi *iui -wuBti Kuai m ibt). ALPHA FtGHTEHfAttrloatTl 1^f!tM.HC>Bfiir/fit.«9PWvtif Twc FifFlkfli ftzpluu iiu; adipa ptofrvm » iporl ALPHA FKIHTER eeqiurci yra lo dauor ibe abni iiinbipi paiuof ihrpixfa ygur K«or or [he (akXT ALPHA BASE u ID Uir p]4.t9CMKiH."IM.HDIikjM icli ttmrrou Wax ihrauihthenii^artd )^Li. nnlini |.ifvtv lufii on fbl^ i^irrm^. THE RINGS OF THE EMPIRIC lAurtsslyJ Thi Tiopie liai i}rit^rkf9 iii plioi. The^dmidi ha>f bftnakncda»dacf djreciedEodeiiroir tDniiiallcoiU yo4iEnutEfiiidani!emi>ui ihipgciMfafc «Lih ibr pLuu Fiv? kveL. ol difriculty are provided tM'RLDER ALERT ioiuiId tja^HKt ami *ill run on I6K tyite^a MIDWAY (AtHlDBlj) MIDWAY A ID exaitflt I ^An. lir anall^r hiamxc. or r EM iaoM Df Fuiilnhip II D1IIC1 Color frapAici and wund ai n or Urircf) and naiKe. Tmr cppcreni huKlwkd Hidiiin UK TRlPU. BLOCKADE lAtail oiItI Piin: IM.HCMncf ^tll.tS DhkHU fKirnLE SLOCXADE It a i>o lo l^rtc ptaftr jinptiKi and uxind icii«n nurtt. li n b«Hd mi the cUiu; mko arcMk tarw ■ ttvi auuont hate enjotiTd Uunf.ihe Aixrt loyiiicki. throbjcciii !o direct yOur binckadtfii IiCie aiDand itici£i«nllt>. Ahhouiti \ht MMtcepI It tkeiplr. U>f combuard jrcphifi «Bd v\*^ eUlTt k«d 11 "1ti|h CAMEi PAClti(Av>ltabkloe>UcoBp«Un) rrkt^lli-VJCMKtM'tM.HDUtitt GAMES PACK I Hint.ini ihr (lame iprnxwDei i*JTn^ (''■ 'air in laa^iiiEvc IIiev air tnijividiitlly ic- i:eu*J by i coaveEti*nt msrL Thii toikrtiftn n .deeji ilic prte jutiatn aAd nr ^lallrd \\dra a irncnu. Ycmi mQ p^'iKuUilr m,|py DYSACOMP'i .mion nt CRA^V tlGHIi UhT parIT4SMn r p*f ^IDiram obtn (uu .an b«> * DYNACOMP COUkuOH Foi |U1I JiO BJI MOON .*RQBE(ArHriud NoftiiSlarMl;) MnitllWC^arik si}>s[>ttkriM Thtt t aDettrenMlj chalkfiBBii "luna/iiadfr" jirotTun Tbe-utnmutfdiopCrviiM&ii lo kisd aia prcdct'erTniricdujfciaa the nina'i BirlaiDe- Yoj HMirrol [h< itirvti and oncnunou oT icji cnf: ptui direct the rate of drueni lAdapfMoach aoflc RuPiiin KK Aian. SPACE TRAP lAttrl mI^. IfrlL) rike:SN.HC.wMie'SL(.«SDUMk Thii .laianic "iho«*ein up" arcade iintE placci >o« nemr I black hok Ydv c»flii4>l)ter ipMniilt uu?i| ihcjoniick *ni:^'- temp in Wait ai mtn) ol the ilMft iihi[it ai ^mtiblc brfmc ihr bia^ii Tra)r ^kqct 'lb■>^fl !9U CHIRP LN VADERS (PET/CBM onlyl C'IIII:P INVADERS It an addiui-raaniru (ciu|idn lAe Earth. Slitrnnaiy obvlaclrt. i journi)' CfMhI luck. hVf^fM.«9CMwnf/|l(.«niAHte ilKiinnirtphkt. A Fedetitiun ipaee uaiion mutt bt icarhedbclort the Chirpi .iMni, meicwi. ind ihf Jiudini C'hiriii mju. ail hf ai«kded iM t iiificnirul ADVENTURE CRANSTON MANOR ADVE-VTCRE (Nonh Mtf ud CP/M iU anirrujn Apd >pboii ■he. mi\ not |nr Lp lhe Eieuurn itiEhoLt ■ fiitit Tlwt ounibet ol ic««>i n iintat and ti^e aiiipoiird dfKtiPi^ontaremurhnwreelaboTiii ihi.m HHCLiicnt pcfvUi wriMof Ad>c^tufc progiafni. makmi Umune thcipp m ili tiau. PU|f can be ttoppcd ii any iirh* jrJ tn* hxIli iEoibI on dukrtir Moi acaJabk in 1 ' ■ " CPM loimju. GUMBALL RAIXV ADVl>i"n;il£ (North Stu aBl>, 4IK> Prkttlll.H Dbknu Tikt pan * thit ouiliw ric# Irom ibe ciu CQut lo ihc onicoul. Thr joal » la Hiid youi »aj lu itir rinl*h line *hik mtiji iairun{iiiFi^igiin>poiti^]et(l and r.iJite. Remember \c Lake ipart pini utA dpr'i let eiufht ig>mlii)|1 UNCLE HARRY'S WILLfNunh SUranb. MK) Prkt:S34.M mUrtk Uncle H*ny hudjcdand hu kfl lou eiennlima Ho^rviT. he haj ne|ktttd to meniion 'wiMie r.enthi:a(ii' Inilead. hu ^ilt cumjitiafapncinwhKtKtnilaiiixlvn ^ou «iL ^a^c lo irB TYPE'S-lALKi" rri-rnipwh umlieiiiei ffcwi V«rti. Siapl) :. cnuT icxE from the l(.e)'b«did and hear ifw ■(>rd) ip<^i:n TNT it ihc ^im-iQ- M ih^leaiE aciauni of mrpiprv irid?raridn EtitmoTi Ik'xibkii>:«bularyA'iaiubk retPS DVNA<.i)MP-?ipriEeUW95 Pkaie idd JS OC for *hl,ppiri| ipj fi.jidii^, TALK TO ME IT'N'T ACuH onlr. i*l() Thu r'BVJ'ti prnenii a lupcrji luianal a% illuttr.iEC ElfoertM] Hi^id fg^ralmn \\ vrll j I Flie dccumrnlal 'I iflt'Iul [nr>ti>"i'° MISCELLANEOUS CRVSTALSIAlMtfldlyl A ijnu.iiir ^ifnriihm Tandonily piitdum I built I'loKtopiiiefn) irethtuMC, and IT lifd III hKal iliilH lo detnunilpale Ihr V. Kiniiini inphict d^ivlayt icfompariMd ■ tronitiinr^rfFnlorthc lourvdandfTiphKi irx! irtJ cvlor leitLrei ol the .i^ta.n. Runt Prtrtil l.'M<^aarilr/||J.»SDMTtiW iih tonti. •hi(h la-'i *i lhe paEtecni ure ■rrmrimrru'liii CRY.^TAI.StiM be«^ NORTH ^TAH SGFTAARE EXCHANGE t.NSSEl LIBRARY HYS'tOMPnen dulEibuiei th>c 13 YOJumc KSSF lihiiry' TVw dokriiTS e*Ofn[ ita&dHif Ttlue [or Ibe purctiaw price ThiOuU be part gj every Nortl Star uwr for de'iili fc«aidiiii Uw (xntrnit o( *^ NSSE cotkctKin TV S4 9) cw;h'J7 « «eh I* Of morel empkte cE>UccEi[)n may be putfUaMd for ti'* 41 BUSINESS and UTILITIES MAILMASTER (Alut dbkriie Ml;) MAILMA5TEIIuj>en itiuiiitiolv Wtia: Ult.ti Itakm puk«t< r« rrui^4bl t^ nisj^lilni dui! Liii» ui^ iiuiu lUii bu«. Eb^ doi ^ fDnUiniag ii^Bic. t4dm», thiR !-lciin Vtj vordi iitd a p-bonc (dumber. The dapUy a h uiltdiud taiAMM. Titc iuui gt j., ditk ip*c« tcniiilc In iti ca^bibiKt tor SORTtT (Norlh !]tulHLl;^ SORTIT I] A i^«i wDfuUiv Im* (Hit &* numtnc e 50ltT(T u evrlr um) ■■ih (ik*(en«ike6y^ D¥^ACOMP•l MAJL 1 1ST ptofi J.II Dihfr BASIC du Tir Kmint PEKkONALF]NANCESVSTCK lAUll isd NwU Sliroobl Frkr U1.T3 Dliktar PFS 11 ■ iibiEt diiktiiF. Bimii-Qiicnln] Hi^trin cvmpoicO of i«n ^JfctrM pmiruBi Bcinlci rrcordini yokii cxpcnm ind lui dcduciibleittmi. Pf'Saitl ion uidiuinaurUE Eipcowiby payct, tnddkipU)' lBr»iruiI«Di«n|iuni| raucuiKoidcAtcUpluicMEiHiKniciiD thtl you nn firdly m vheic ycmc mcney («i ltd cbmuittt lUHiwod'k. ind i«daut hind taicuUuoiai CanuirLi hLth i^Mtd muMdi't l>JSfLitt« tdri FAMltV BUDCETfAppIt >Dd AUrtanlr) Mo: M4.*) bura. FAMILY 3UD0ET li * vtrr convntnl ruvuKiil lecaidAKptni pfOfTun. Y-ou ^dl be ibk w knp itark ofcuh ind credii ttpcndiiurti u •>(£ i» inconK on ■ dulf buii Yog cui iKord i»i diuJtKiiibk itcimt ind clunubk donuiou FAMILY B^UDCET iIm IKOIndn t CMHiauOuiie^dorallitlcail lluiLKCioni. Vol. can mikrdulr(»|handi:riV|cnitrH:t lau) d!ll diirrfiTfii ripnu ■icaufitt u wcO u i{i J ptyiQl] ♦»! U» KciMnit Om itt mmIt itirKTH] j.i>ii]f ih* uKT CMTiplTK conlT^i ptfT t^ pihcTw^K- c9nip!K«i>n] (u) Prin: Hf.M DtaktOt Tbii torin'irt' pKkijr nmiAau ■ [oaiu-dRvciL coUcrbm of pcDfli«nu Is Taaliuuni rrficxni t%o-*i!' foremmikauoM ihrrajth « fuO dupfci modan [required Tv uicl. In one nude cif opcftiioii fOa au^ CMbiRi lo ■ daii inrKr Ir j.. The SOL'KCE. 01 MeidNcii ana quKtir IubJ iiati ii^is u ^wt Qu^uWni ^nii} jffuf d'Unic («■ l»it» viruoif Thi iitM^i rt- dv^ "ii/tirv^ tiqif" iFnJ tliU) ihc KTv>» cKvp Yoti niit ibo rrtord ihc CMSplrtt conimii of ■ canuauoiciMini vciatn. AdditKiniJtii. prDfiuoL ■'nitm in BASIC. FORTRAN, Dtiun Ki up ;«ii HquciKE &I tiBH-tktjy mmmifld) Jisd pi^iau, j.od itM Alwi biU iitbund il»c:«i » taolMn B*ti;h ^fiictuiAl AtL ihrt *ddl u^ Id UVrt| beUi i.'6liiMi:i liav lAd rOur luni TEXTEDITORII (CP/M> Prt»i IM.Kl I>ikriirrtU.4iDkk Thii ii tht untad rrlou- .««Ki of DV.saCOmPi pppuUi TtXT EDITOR I iricMlMii many mem Ja^um. Whij TEXT EDnORirjouDurbuiklEcuriksiaciiu^iudLuisnbk'LhcmforJiuidaplf.y.SkKkioridUmtibcippeDdedHmierudai deieted. Fiki nuT beuved od diik/ditluiic lO riftij^uiiirMd'CMUrfd (imiiui id k Uiti pmtfi} br pl^rTEXT EDtTOK 11 or iA«CP>M £D fKiEtiy. Fiiiiha. ASCII CP/M fiki (iiKladini BASIC ind ukkMt Un^uitE pccfrana) mtytKiEtdbr Vk editor utd cik«k4. In Ftci. mi niei on b« buitt UHPf EDtnd Uiif r«auitd uim| TEXT EDITOR, II All di kll. TEXT EDITOR II ti an impcnuic, ru} id uie. bui vny fictjbic cdning, tfutm DFILE f Auft uMt N«nk Sur dUtiin «fl]}> Prkc: sii.n Thit hirtdr pcoirira lUoBri "^ffi^h Sur ind Ann duk umi id eniinum a iptvubicd d»u btu i>r ill Tiln ind projirtmi in ilK MKk at ditki ntiicb miuitb^r tccumuUid. DFILE 11 tuj m mi up iaJ uu Ii vill M|knue ymji diiit ic pi^iblt trficrii^i liKBllni oi ih^ dfiLrrd Fk9r of pfo^ram F1^DIT <,Sata sur oal;) rrw«;1ll.'H Thii ii M. linTT-iimla piii%imnl wtiiiii miinuiTii illlafin^lii^n *l:i«1U^I(: tij kcr»("di "I 'hin typn Pn|.aiuU (ci^ Uil niiHF). CcwimTtiil itf, plcunbtiSi) md RrrnnKf {e(: irvafuuM trt«lti. mord ilbumi. cie). En uld;i»a tu kcfirord KitEhti. ihcrt iir bi/ihdiy, inn^vcTMry *r^ Appotniniciii Kaichn Tor the pcnau] tKocis tad ■.ppoin.tneniuArchi'i loi the :iHniiMfcLi] re- mrdl. llrtririKT lezorAs sir itccssnl bf a iiAflr itywOSd dt by j;ri:at-tr(rtrn(m|. Ia»> at UtE^f Icrwpri^i. SHOPPING LIST (Atari anli't Piki:IiI.KCAMa>/tU.«DkkMi* SHOPFir^O LIST ilo'ifi mform^tior. on iian^yoi. pMrctuK-f-t Ih* HipvnnAPkrl. BctoiciDinf, itwpipmf . 11 ■■JJ rcniiH] jouor ill [Iif [limf I jnj miihi nttd. ind then dupli^ In opbnull)' prinil foui ibspfMii Uu i^Bd ihi laul ccn. Addcii. dckunf. ('luiliril, kAd iioiiri di,ik II itty ttiy. Ruai. vi^h 16K TAX OPTIMIUJl (SofUi SUroBlr) PtWeUI.HDUmi The Tax Ol^lMlZf.1 A an Eai) td-uu, tiirftii oiinilcd HiflBUt pa^kafr Bhkh [i(oi>dc> a ccwivrniml mfani Tipii aaatr^iDi htJn«k>i hn(9rrK t^ ilTiiex>r( The prQi,nra n drf4iaci| 'q pru>idc « Q>^ick 4nd nty d«M cnir* . Inc^nf lit u f^nn^td by ill UL mtthodt |rc|uJu, ukodc itEfkimj. muiinua uid iticriutc (Qko.tmuci bul Th< uwc jtii; JiuntdiiiAly 'a'bKr>t Iht lu «[Ia:i r>rbKb 4lk ytx NKLY.IoAdibrprcfTL-ndiiikiticl'abcisDdjricid,! a»d iREhjiln anaUci pi^trxm. MENU MEhU In riVfltlf.VSDUfttl 14 iinic i.L>icb«ol'4kf:Dnn du4iitiDOS2.D I Ih; i,-dnifn!4 qf fpvr dnttilf tlphabflKiRr. *nd pcrmiii Itt rupninsaf h ihr iBility to nm iii> STOCXAID (Aliri oa^) rrtct^sn.H Dtakctu STOCKAID pmiidn 11 pMiR-fui uL fiC l^aii Ccf ilttck ftialkcl aaklria With STOCKAIP ypu fan dn^pU) poir| «rKl Tifurr cbiili.DHrllw b»! (hwt**iiti5«epii«ioi|.. You cwiaiwfiHninrioai term tro>iBi«T(rtfn«ndei>i-b>ikfK?vQ|0nffn[urn STOCK AID illavi jrou id inpui duly diu wAli 1 iin|k duiciig iiotifc cipibiliiy c( iil diyi - lb vocki. [included trt »aek diiHh'rid. tnd i^plii tiijitmtta cipibiliiiin A ^ei)' ptoFttiikHul ptiikkgEl EDUCATION KOPCe PODGE. (ApplE aa)T^4aiL Appbofl cr lilet" BASIC) Prict! llf.MC*MitwrtU.« DUmi* L«i HODGL PODGE bt yoj; chikl't tetthfr Pfoi>n|. my Hf> on ysai Appk inH mult lo « dirftr-rei 4Pi4 tfiiniMinx "h*F rcninj" FrU^cd ID ihr k(l[«f or numbrr at ihr rhciun k^r Thr ptDfiiin'i jiiiptua, color iiul u)i>nd tit ■ dclijlll (or ^hildrm liLHTi ifn i ■■■> [O ''. HODCt rODCE 1^ ■ iwrin^iridtKni. icKhmi, drvKf m^K\ bringi ■ nr* duntninn 10 ilti jk t>I niT' ruitrt in (i!u<4.ti'?n S« rivitih in lDtD'>«ld Ti^ACHtA'SAlDElAtarioBljll rm: l1J.KCHM««/>1T.«jDWHlt TEACHER'S A[D£ cocitiu al three buic nnlLilc! [Dattuwd m oot pcDfrtai TbM FuM mcdiita pirovida iddnion ind lub- liKlHm cinvim n! ia«o«du(e Se»wilir«tl»C'fcpinpk'»iST utipr^iHird tmc ti *cll The ilurd =iaduk «>iijm:i DfdikiuiiE prabkxu: oot ps;i.k;u.lu1i oxc fecturt cftlw iJ]>tufK nuKjck illhaL IM k)n| tuhd diraiati iltptCdli b< di^>lared llani «eh [n« rrllUlAdM laotOrt ICrCleul; doliMulralc ihc (n^OnduJc by vhKh the TtmuEidn 11 den>n] U'vnf TEACHEIC^ AIDE ii -nw RKitly n dnD, bui itthrr ■ inm:«| nnenem ORDERING INFORMATION Sk4ff4i( Hd Mii>4l>^ Ch>rtt* WKhin Nutili Acncrict: Add SZ 00 Ouimde MdFEti AfTitricn Add l}*^i (An Mill) AJI iHdfri (tKhidsni booki) m I" LP'M DWu Add 1: SO to the Itucd d»kcttc 9rwc Tor cub I" rkupp)^ diik IIBM K>ri Micmafi MBASiC Di UA^IC-K :ioifrf t'P'M fewmii) Pcognmi n ■■ CP'-M dbfci o sBo . II ifil! kKjU wft»ai »jjt,Weo ■■ dt>k>. Norlh 5I»T iQfin thCK tnd olhft proti»wii 1 DVNACOMP, Inc. (otpi. E) 1427 Monroe Avenue Rochester, New York 14618 24 hour order phone: (716)442-8731 recording Office phone (9AM-3PM EST): (716)442 8960 Nc* Yqi^ StiK rnHnn fittM »44^^ ^¥» uln lai STATISTICS and ENGINEERING DIGrrALnLTEll(A«aa>MtE«rBll«»p«l(nf Prtn: U).«!C*««>n' M Hiikfcnbero!p9tni4UKd tn ifitMicuia'tKiB.rhc»fiiicnma.jiif*.Dft*Jlj' iU«bc tinoothtd wilh I Humnj TuiKtion In addbiioo. mtihi iui< ButKrvonh filim diy be lehcirf. I^ciiurti of PICITAL FILTEK jiK}ud«pk)iiij)ialin«diu btloie «nd iftrr rJlenrtLii^^fU tidupiiy nf ihi ihoim Tilirr luhciiom AlMimludU icr (onvrnxni dl4 )tO'«e. ieir«ial and rdiliri procnhirr^ DATA SMOOTHES (Not KTklibb lor AUrl) Prki: llt.«CMM4U/IU,H DUUti Tfaiv IPf^knl dtU iri'WEbiBi pmiram may b* uvd Id rapid-ty dcriit umIjL in-focmilJMI lEOm noit)' Biiuneu ind m^inwruil diEi «hKh lie equiUy tpierf The K>l!i««ie T*iEor«i ^finite m dnire and linjr of ru, ii .tU ii maaihed Tliii i«1 iccorvd drri'LUvc ciilculiLioii. Alu included a luiDmiiic p9ciim| of ilie- inpul diu ind impoihrd rciulii reici: SL9.KCa^HU/SU.H DUktlU 1 duiaiLOD ugnak. The ptfttruTi feiturei luionuiL: icalirf uid ■Ktufle Ihr aiu^iii of fonipli;»lcd paiiemiln uth fitUt u *k*- FOURIEit AKALVZERU* AlUbk Tm •■ tanipmrn) Uk ihii ptotnun lo cxkmirx Ehe Iiniuericy ipnti* sT Umi plotlinj of ibe input -diu ind rcuhi Pncii'Cil ippliciiicn: iTDnuii, canunuHiel'lidhi Ual tnJiihrn TFA 1^14 ipvtkil Ki(l*»* [atkagf vhith Mi|r bt liwd lotvdiiiic the ETU)i[c« FLLTKtiOM at lyurmi lucti II hi'FiwnpEirieri wid rtlim by ciuninintlheii inponie tc puIicd inpuU, Tl-Ali i raij&f modiFitiuoftoEFOJmER ANALYZER indcontimi is rri|iimrjilirfMni(ddt>Mdn>|uil ■■ vn] u dill uid ipmiura pVotUDf, k ipliac mierpoliijcin n ntcd louEair i>H'datifik iniwKI by tyie FFT aiiPnUun FpUKlEX AT^ALV2£fc, TfA mni HaHhOniC aSaLYZER bu) b« purchved Eapthei loi i cwtibii>rf pnet of W 9J libm cuaciieii md 1!9 f! [ihrnc dtkcin) REGRESSION 1 1 A*d«Wt far a f oap-unt Mfcer J W.M CM^tM.IU.tl DMem REGRESSION I ii i unique md ncev<''»^Ktliul)iu |ci lUndu-ddftuiJiCn.EoniLiiMMtofffv CHOJ. fK.I And caiKb EHMc In iddMion. r>e« fin may bt tr>rd >iLhpMi ii^nimBj ifar d^ta REGKESSION I ii ceni4«li Ehe CMridnuorie ptogiim ui u) dm lAAtyiii tolEnu'e Hbttn REGRESSIOMnPARAITT)1A'Bl>btarorU»mfiBlrn} rhn:SL«.HCM«ni>e'«D-»9aMfn« PARAf rT il d«MfDCJ to Mndk ((hjk twei ip ihkh I'm piaiarartErt irt iccb«Ll«d (jxmibl) luiilinurltk tn ihe rutiui [ii«- EJDD.. The HUT limply isjcru the fuocttonil form. cnchidiEi Lhc pinmeien (All). AQ]. ?ti;,)uQDcaEiBorr9AS]:Ciu.ieflwcl Eion. Dati. rctdti ud miduih mir be muiiEruliied ind pleiEed u ■nth RECKEiSION 1. Uit REGRESSION I toe palynevDal ntiLni, and PAJlAFtT for ibMe cDOipLciied (uiKuerru. MULTILINEAR REGRESSION (MLR) lAfilkbh fof all n>mp«un) Pr«r*: W.MC^imch/UI.H l)iib*iw MLRkiipra(»uion«ti{i[Ewiiep*i:ku(ri:>i jin«}|jDE|{liUKU4:OMimLn|{;i'>0OTtnoreLnritlyiriirpmdmlfir^iblei Bn'in prffumimi itir baiiE rOM<* ■^c iciiutior bj iu(riiL;ifi(.>iEu.ei tat Ehe ndependent liinibin The nucrber n( ii'uublei and dm lur li limlied only by iFw iciikblr nveiTwry KEGRESSION g. It ind HUl.TILINEAR REGRESSION wiiy be rnjrta oa AUrinMKde »r tttt PET/CBM) prtw: «• Wt-a.n./t4J.MI>iak.na In ihr pail Uk ANDVa {analyui i! vtJiMSict\ p[(K«duie hAi been limiicd !□ ihE lirie miinfruQc Emipiiieti No> DYNACOMF hu biwj|M the PO*er p1 tlifi method K jt*U ijUrm* Fpj iho« iMmeruini *Jih ANOVA, lhc RYNACOMP loftthut pkcLiic iDcludci lhc I wiy. J* ly ijid N way grocedum. Alio provided *'t the V«cci i'^'" fidonil dei.ij,r.L Fm i>Hne uii(feniiJut Biih aNOVa, da iiwi *aiiji Tht titoiajmnr'at iocumtautiop. nai wiiiicn in i lutciiul faihnn (by ■ pto- lenoE ui the i.ub;ectl ind ttnn ii «n n^Utnl mtuMiucl^n ip Efie iMbin:! Aftompanriii ANOVa h k iLppon ^rotrim Ih buildmi lb( d«Ei b«ie Incliidtd m le'vrjil focifeiiKnE feAiutn includini, diu ed;tiii|.. deleitni tnd ippen^ini ftASIC SClEhTinc .SUBROUtlNES. VuIkhi I and 1 iNol ■■ili«*r To* Aurt} DY.SACOMP II ihe nrlui»r diitribuisi [or ihe lofi^'ur keyed la the p:fpu\u lent BASIC SC/E-'i Tlt/C SlUtHOniMS. yohimn /anJjh) E Rijikdn^rwi [tec adierikienittiii iii BYTE mifa&nd TheKi-jbccitfiuiIuve Ehcd AiiHinblcd KaHdin|. Eo chiptci Included ■■iih e»th coUeciion •\ i Fwru pcojriin •ha;* wiceii aaC doBoaitiAEH v^ib. lubiouiiae VplBM t E!:oUrfliaa fl: Chaptrii ! uul ] - flat* aod (uBclian plOlli&tH 'Hl*ap4ex vudbleiwtd tiOtaXBi. CoUettMa n: Chipwi < ' Eticnded mitiu iffd I'^nor opcribom, CoUeaioa fl: Chipteii S ud b - lUndoia number icnenicin (PcHuera. GaLaiiu. cu.t tens ipptrat^Mmnt F'iKr pa cOlktt^ih JII.V) Cuidtt/tll «i [MkMIt AQ Ltute ooUtnioB^ m nutoek for iit.n {ihm niwIEn] and t49 «} lihm daikeftn) CoUettiM fl Chipei I ■ Lilaeer, polynoeniil, muHuliiKiuKiiu]. puinietnc icMi iqium C^AettKm »5 Chwfei J - Serwi (ppioiutiatiDn iicftoi^un 4(co(irtaLLt.tiian, MKiiieia, it^tv CoJiennn 1: Chaptei 1 ■ Funcii«atl ipp<()<:iinii'Caii by igeiii^^ «n4 nnw»pn CoOiHtati H Chipei * CORDIC ipcitmniijoni En irkiavKiKtrjc. hyperb^ili:. exponential ind tofaruhimc Ih ihttimt, VIC, I CoUeetian li: ChapEei S - Tible i/iierpclaiian. di! feres tiatton and inicijiuon (Triton. LiCFinte-. tpbnn CollcElian H: Chap-Eci ft - Mrttlodi fnc Finduit ihr ml Ififill Ol luMIiOnt, CvOettton 1: Chiptei f ■ Mnbodi for rinduif she C't^Frpki ti»() o! fuactains. C'^Jecihon t%\ Chapter I ' Opiuntutien by iieepciE docenE Prarr piti noUnLAri U* M >Cxwcl[t/}il 4i I>uLctlE All rijht coJleci»ni we «viiiabk lor IW «J (e^fit t*iwitilpanof thedonjmun KIlOaAUUxndDr Dobbi liOOTS{AimU]dih furdl conpKUnl In I rkiuraJ. ROOTSimuluneoutly deieniiLaei iJ the uio«ioj ilrrdetirKof ihepolnvoniAl.and beciuM ih< pioi;edjie» itetati> icquiicd u input, and ihc cakulattd i-aotM are lubniiuiid back i ACTIVE aRCUIT ANALVStS (ACAPF44llt Apph vmh) rhn: n5.H CMtfle/Uf .ts DMetn ACAPiiihea&AkiicucuiideiitMt'liniAM Id LOGIC SIMULATOn Wnb aCaP fju my xnal^ie ihe rcipcnM nlanak le^ror paiirrcomponenlcircuri If | , i ItuiiiKoramplirieT, t«nd paw Filte;, rU ) Ttw^icui^iniy b* pctsbrdxi equal ii»^in IiequoHr. i"^ lbeiniflla|[CHnplei(l r . rral and un«f nafyrt s OtUfn 11 eac^ i:bm|)iM [lleilin| Ehf EnafiiiiMie cf iheM-^olUfn. ihcfiequmey rtiiponK 9f i Tiltei or unpinn oiav he evmpkirly deirrained *edi™ioi;»»»ctteordiiirHcio^retaiinlaiaiiier(iBw fnieiBcu IK>Q OI ediiinf ACAP ihouU be put of everr eucuii dessner'i profram bbtan LOCICSIMULATOR(AppkffBli:4aKRAM) rrtm^UJ,HCMPfa*/»(.*9DWkfP« V^itta LOGIC SJMULATOX. y-cu my eudy teii you etmfltCMUd di^ut kifK ^sp wiEb mpect lo fi'-a. kt of in^uti te drieiniuAr llfn wed ibr cJtua >ill olWtate. TPie riemai^ll vhiCh BiMj bt tifftullted iSCJilde muJ»pk tflpul AND, OR, NOl. E.\OR. EX>a/f in| chxk ^dc kccJki.' dupiicemenu ukI dekp auy be udo- d^Ked to probe for |i4eehn4iHjiacTfPHtiiNinL Ai theuKi'm^iga. a Eunut dugmn loi uiy jncMM afnodeinuy be ptoi- leit uuTit HIRti^ iiipAjcn Sax yaw brtHlboarduii umil ihe cirtuH ii ctietked by LOC^C SIMULATOR NUMBERUlUNCHERaRS<»6ltl^) pr«r«:M*.>$OuPiii>'f1).t4t)|ak.ii. T^iiproftam ii the ruhi ^cmpleir numciKaJ analyui lyiiea iiii^ble (rr iJic TR540. M itn ^iiindk jpi4 19}daii tea, each iri haiLhs a »■ (i^twtEi ruune It includei conipkir diu ediiio], ficiliEtM and conienienE diu inpui/suipjE capabtlti> The aulyteii avaiUbk xre mukipk linear irtintion 4.itd enrreUlpon deftrmcn^ti-on 'ipE rnidii^. i]«e» trang^^orin^tiEiDi *nd ntenHM ITipbKi itneriUianH incl^mi ui» namini.. and marc The lupporiuij documautinia a Eiuemc't)' wf» ihe u»tl niei. I>ni«hm{] wii thetnon any Held, trvd numericilly aiMil)'ir{inajiinK'ni, Eitiulatcd dm. SIATM^nT ii •rdl dncumenitil and taty to uk The uikmc Itt* ■huh (in. be lead b, EU fClJta ViKk Ad*Xlu4d SiaEilIidl Patkl|« S~TATTE.ST (TRS-W onl} I PMce: ILVK Cbmih/SU-H D(ik«ni Ttiitii aiixiiiLi.-aJ mfittnvt itatik^r Bhith htlpi. fuu rnUi viM dcciiajr.ii in the Fact oi iin:lw fiudei jrou ih^ciuf h the vanoui teiii ABOUT DYNACOMF OYNACOMP 1% a Ifidinc diurLbuior of unall lyiiten ladviut with uln apucint the moM IcuirrcnEl)' ii\ti;£tll of JO countries! Dunnj ihe pui Ihf W JCtft •■« has* trcaiLy enls.-|ed: the DYNACO.MP prixlucl line. h\;l fiii-e mamlaiDrcd and unproved our hifh level of qtiaiily and cuJioni« juppon The acSueirement n qualiity a ippueni Irom otif tnmy ttpui ctiUomRS «nd the wjft^ifc revicwi in sucfi pubbctUoni U COMPUTHOSiCS. M Sofi- *ir? Criiiqui!, A.N. A LOG.. Creaiive Cornpuimj and KilcbAud. Our ctislatncr luppofl is ti cloke U )*«[ phone It li aJvayS, Iticndt) Tht SUrf II hi(hl> irincd tnd 4E«iyi n-illing to iacara produjli tir lit; iilvice: 42 COMPUTEI Fabruorv, 1982- Issue 21 UFFER ***" 9090 PRINTfPR 9100 GOTO500 10000 REM INPUT A LINE OF TEXT L$ = "" PRINT"$_{LEFT) "; GETA$:IFA$=""THEN1003 0 IFA$=CHR$ (13)THENPRINT" " 10010 10020 10030 10040 N 10045 10050 10055 ;RETUR IFA$="§"THENA$=" " : REM TAB IFLEN {L$) = (M-5)THENGOSUB22000 IFLEN(L$) >MTHENGOTO15000:REM SP ECIFIES MAX LENGTH OF STRI NG 10060 IFA$>=SP5ANDA$<=CHR$(95)THEN101 00 10065 IFA$>=CHR$ (161)ANDA$<=CHR$ (223) THEN10100 1'0070 IFA$<>DL$THENGOTO10030 10080 IFLEN(L$) >0THENPRINTA$; :L$=LBF T$ (L$,LENCL$)-1) 10090 GOTO10020 10100 L$=L$+A5:PRINTA$; :GOTO10020 15000 REM LINE INPUT ERROR 15010 PRINT:PRINT"{REV}ERROR{0FF} LIN E TRUNCATED" 15020 RETURN 16000 PRINT"RANGE(LOW,HIGH)-> "; 16010 GOSUB10000:REM INPUT RANGE 16020 L0=1:HI=LL-1:REM DEFAULT LIST A LL 16025 L=LEN(L$) DF=0:IFL=0THENDF=-1 :GOTO16150 J=0:FORI=1TOL A$=MID$ CL$,I,1) IFA$>="0"ANDA$<="9"THEN1609 0 IFA$="-"THENJ=I :GOTO16090 J=99:I=99 NEXTI IFJ=99THEN16000 IFJ=0THENLO=VAL(L$) :HI=LO:RETUR 16030 16040 16050 16060 15070 16080 16090 16100 16110 N 16120 16130 15140 16150 17000 17010 17020 17030 17040 17050 170 6 0 17070 17080 17090 17100 17110 17120 20000 20010 20020 20030 20040 20050 20060 IFJ>1THENL0=VAL(LEFT$ (L$,J-1) ) I FJHITHENl600e RETURN PRINT"-LINE#->"; GOSUB10000:REM INPUT LIME# L=LEN(L?) IFL=0THEN17000 J = 0 F0RI=1T0L A$=MID$ (L$,I,1) IFA5>="0"ANDA$<="9"THEN17 09 0 J=99:I=L NEXTI IFJ=99THEN17000 LO=VAL(L$) RETURN IFEE=0THENEE=15:OPENEE,S ,EE INPUTS E E,E1,E2S,E 3, E4 IFE1=0THENRETURN PRINTEl ; " , " ; E2$ ; " , " ; E ; " , " ; E4 PRINT"*** DISK ERROR ***" CL0SE2 RETURN 21000 REM SET MARGINS 21010 PRINT:PRINT"{REV}SET MARGIN{OFF OFF}" 21020 PRINTTAB{7) "MARGIN SIZE:{D0WN}N )ONE 21025 PRINTTAB(19) "S)MALL (1/2INCH) " M)ED lUM {1,0INCH) 21027 PRINTTAB(19) "L) LARGE (1 . 5INCH) 21030 PRINTTABC19) "0)WN DESIGN" 21035 GETMSS:IFMS$=""THEN21035 210 50 IFMS$="N"THENM=79:SP=0:GOTO50 0 21060 IFMS$="S"THENM=74:SP=5:GOTO500 2107 0 IFMSS="M"THENM=69:SP=10:GQTO50 0 2107 5 IFMS$="L"THENM=64:SP=15:GOTO500 21080 IFMSS="0"THENPRINT:PRINT 21085 INPUT" INCHES FOR LEFT MARGIN ~ (10 CHARAC TERS/INCH) = ";SP 21090 INPUT" INCHES FOR RIGHT MARGIN (10 CHARAC TEHS/INCH)=";RM 21100 3P=INT(LM*100)/10:M=INT(79-RM*1 0) :GOTO500 22000 REM BELL 22020 FORII=1TO 5 : P0KE59467 , 16 : P0KE59 46'5,85:POKE59464,115:NEXTI I 2 2030 P0KE59467 , 0 :POKE59466 , 255 : P0KE5 9464,254 22040 RETURN CompuVDic, Inc. P,0 Box 997 ■ TROY, Ml 48099 (313) 540-2838 VOTRAX TYPE N' TALK (TNT) Speech Synthesizer S359.35 Fof APPLE. ATARI, PET. VIC 20 — LEAriN ON YOUR OWN— SPELLING (requires VolraK TNT| $13.95 For VIC20. APPLE OrSK UTILITY PAC (Disc Monilor/Recoveryl $29.35 For PET (I6/32K 30/4 0 ROM wilh 2040 or 4040 disk crrvo) BSD 3.0/4.0+ (Basic Simulated Disk-PLUS) S29.35 For 32K PET (2001. 4032) Fill 32K wrth hasic iiroyranis Burlt in direclorv wrii allow Jinnrediate exectitron ot entire direclory Entire library i:an be saved lo tape or disk SALE prices on selected PRINTERS. ROOKS, CHIPS. PET COMPUTERS & PERIPHERALS Send or call tor Soltware/Hardware Catalog aod ordering mlorrnalion ?coBr Diskettes Rely on Scotcti* diskettes to keep your valu- able data safe. Dependable Scotch diskettes a re tested and g uaranteed error- tree. The low abrasivity saves your read/write heads. They're compatible wilh most d iskette drives. (800)235-4137 Tgr aavjtcxi ILTO F^-T*"!* a%d I>aief Inquiries Invited iHOf>iSW WH w single Board Computers Bare Board Kit Assm. 80-153 Ik RAM 2k EPROM $19.95 $ 89.95 S110.95 80-280 Ik RAM 2k EPROM $19.95 $119.95 $129.95 B1-260 2kRAM4kEPROM $39.95 $149.95 S199.95 81-030 4k RAM 16k EPROM $89.95 "$249.95 $349.95 8085 3 chip system $24.95 8088 Schipsystem *29,95 Apple 11 boards Bare Board Kit Assm, 79-295 Parallel I/O $19,95 $59.95 $ 69,95 81-132 A-D 16 Channel $29.95 $69.95 $ 89.95 80-085 12k EPROM (2716) $39.95 $49,95 $ 59.95 80-244 EPROM PROGRAMMER $24.95 $39.95 S 49.95 80-1 44 Display add h- data $25.95 $42.95 $ 49.95 80-297 Parallel Printer interface S69.95 $ 79,95 Extender Board S12.95 81-088 Speech Synthesizer (Votrax SC-01( $139,90 Other Products Bars Board Kit Assm. CRTControlier $39.95 7.9-287 A-D and D- A $19.95 $59.95 $ 79.95 79-282 SS Switch ich. $ 6.95 $10.95 S 13.95 79-282SSSwitch4ch. $24.95 $39.95 S 49.95 80-160 -H 5 Volt 500 Ma. $8.95 $16.95 S 20.95 80-161 ±12Voil120Ma. $ 8.95 $18.95 $ 22.95 81-120 Parallel Input Speach Synthesizer $149.90 Send for complete Catalog and OEM pricing. "Partially Populated price. ^ .John Bki.i, Enoink KiilXt. , iNi;. ALL PFIODUCTS ARE AVAILABLE FROM JOHN BELL ENGINEERING |-— -| P.O. BOX 338 •REDWOOD CITY, C ' ' ADD SALES TAX IN CALIFOR ;A S'(064 L^ NIA ADO 5% SHIPPING S, HANDLING • 3% FOR ORDERS OVER $100 | 10% OUTSIDE U.SA. SEND FOR CATALOG (415) 367-1137 Mathematics, Basic Shills Paper Exercises in Arithmetic For use iiitb ■PHT/CHM Compuler & Primer plus Compatible Disk System The Teacher's Aide Computer programs designed/or use by the classroom teacher as a prirmnry source of exercises in malhenuitics, basic skiils. nruugh simple question and answer, and iiitb the use of only :>m- computer system, a teacher may satisfy all indiiidmilized. in- class and hometinyrk requirements for drill in arithmetic. Students ufirii directly up 70 T=T+1 80 HEXT I 90 END VAK-7 S" FLOPPY DISK SYSTEM FOR AIM-65, SYM-1 The VAK-7 Disk System was specif ically designed for use with AllVl-65 and SYM-1 Microcomputer Systems. The VAK-7 is a complete full size {8") Floppy Disk System. This system will Read, Write and Format IBM Single and Dual Density diskettes. The VAK-7 is available with both Single and Dual Sided Disk Drives. Each Disk Drive comes with its own cabinet and Power Supply. The VAK-7 can handle up to 4 disk drives, totaling more than 4.98 Megabytes of storage. The VAK-7 Disk System incorporates both ad- vanced hardware and Innovative software de- signs. The addition of the VAK-7 produces a very powerful and useful computer system. Unlike most other disk systems, there is no require- ment for the user to provide RAM to hold the Disk Operating System software. No valuable time is wasted loading in the DOS from cassette tape, because the VAK-7 DOS software Is In onboard ROM. The VAK-7 is located above the 32K boundary (8000 HEX), leaving the user with a full 32K bytes of contiguous address space for his own use. AIM-65— Allows the user to save and load object code thru the AIM Monitor; to load, save, and append Text thru the AIM Editor; to load, save, and append Basic Programs thru the BASIC INTERPRETER; to assemble directly from disk single or multiple file programs. SYM-1— Allows the user to save and load Files for use with the SYM Monitor, SYM Basic, and RAE-1. ADDITIONAL COMMANDS: ACTIVATE A DELETED FILE COMPRESS A DISK RENAME A DISK FILE COPY A DISK FORMAT A DISK DELETE A DISK FILE INITIALIZE A DISK LIST CATALOG SPECIFICATIONS: • Completely assembled, tested, and burned in. • Occupies address 8000-8FFF for AIM-65, S9000-9FFF for SYM-1, or $EOOO-EFFF for KIM-1. • IBM Format; Single Density {128 bytes/sector); Dual Den- sity (256,512, or 1024 bytes/sector}. • All ICs are In sockets. • Fully buffered address and data bus, • Standard KIM-4* BUS (both electrical pin-out and card size). • Designed for use with a regulated power supply, but has provisions for adding regulators for use with an unregulated power supply. • Dimensions: Board— 10" wide x 7" high (including card- edge). Cabinet— 9.25" wide x 10" high x 16" deep. • Power Requirements: -f 5v DC @ 2 Amps. 117 AC60HZ ® 2 Amps. • Shipping Weight: 25 lbs. 'KIM-4 is a product of MOS Technology/C.B.M. 1 PRICING: VAK-7 $1,299.00 Controller and One Single-Sided Drive VAK-7A $599.00 Additional Single-Sided Drive with Cabinet and Power Supply VAK-7B $1,599.00 Controller and One Dual-Sided Drive VAK-7C $899.00 Additional Dual-Sided Drive with Cabinet and Power Supply CALL OR WRITE FOR FREIGHT CHARGES RNB> ENTERPRISES INCORPORATED 4030 N. 27th Avenue, Suite D Phoenix, AZ 85017 (602) 265-7564 Program 2: Atari Version 100 U=0 1=10 1=10 110 M=2'<1/12) 120 T1=0 130 ■■' ■■' "HAPPY EIRTHDhV" 140 f1l=l1'Tl 150 FOR X=l TO 2b^REHD H.B^A=IHT(A/ril+0 5:-30UHD U.A.T.L lee FOR 1=1 TO B^t-€XT I:S;OUHD U.-y.eAi^C '/(\ y. i?0"ti=ti+i 180 IF TK12 THEN RE'lTDRE 130 GOTO 140 185 END 190 DATA 122. e4. 122-64, 109. 128. 122.128.9 2.128/37.256 200 DATA 122..b4. 122.64.109,128.. 122.128.8 2.128.92.25b 210 DATA 122.64.122.64.61.123.73.128 220 DATA 92.64.92.64,97.. 128.109.. 128 230 CiATh 69 . 64 . 69 €4. 72 ■ 1 28 .92-1 23 . 82 . 1 2 8.92.256 Program 3: CBM Version 100 POKE594 67,16:POKE59466,15:POKE5 9464,0:5=59464 110 M=2'' (1/12) 120 T1=0 130 PRINT"HAPPY BIRTHDAY 140 M1=M"T1 150 F0RX=1T026:READA,B:A=IMT(A/M1+. 5) :POKES,A 160 FORI=1TOB+B/2:NEXTI:POKES,0:NEX TX 165 REM VALUE OF B IS INCREASED HER E TO EQUALIZE THE DIFFEREN CES IN SPEED 168 REM BETWEEN THE CBM/PET AND THE ATARI 170 T1=T1+1 180 IFT1<12THENRESTORE:GOTO140 185 POKE59467,0: END 19 0 DATAl 2 2, 6 4, 12 2, 6 4, 10 9, 128, 12 2,1 28,92,128,97,256 2 00 DATAl 22, 6 4, 12 2, 6 4, 109, 12 8, 12 2,1 28,82,128,92,256 210 DATAl 22, 6 4, 122, 6 4, 6 1,1 28, 7 3, 128 2 20 DATA9 2,64 ,92,64,97,128,109,128 2 30 DATA69,6 4,69,6 4,7 3,128,9 2,128,B 2,128,92,256 ' © ATARI® , PET® or APPLE® OWNERS BUSINESS OPPORTUNITY DEALER REPRESENTATIVES WANTED PART OR FULL TIME NO ROYALTIES, NO FRANCHISE FEE SERVICE COIN-OPERATED MICRO COMPUTERS IN PUBLIC LIBRARIES Exceptionally lucrative ground-floor op- portunity to participate in the explosive MicroConnputer Market. The Computer Bus offers Community minded micro computer owners the chance to develop their own successful business within a relatively short period of time with this in- novative Microcomputer concept. The prognosis for success has never been better. If you are accepted as a Computer Bus "Learning Center" Dealer you will operate your own sales and rental business from your home or office, featuring a product line of uncompromising quality and out- standing company support. Investment required $3,000, secured by extensive computer software and hard- ware. Protected territory, leads, national and regional advertising, technical support and full back-up service. For additional information call toll free 1-800-321-3670 Ohio Residents Call Collect 1-216-255-1617 the COMPUTER BUS personals, business - computer systems the COMPUTER BUS. 101 River St., Grand River, Ohio 44045 Authorized f