Compute_Gazette_Issue_16_1984_Oct

Page 1

New Approaches In Educational Software

COMPUTERS

$2.95 October 1984 e Issue 16 Vol.2, No. 10 02220

$3.75 Canada

For Owners And Users Of Commodore VIC-20 And 64" Personal Computers

BASIC Magic A new column for begin ners that explores BASIC with a fresh start—from former Commodore com puter designer Michael Tomczyk.

Quiz Master An easy-to-use multiplechoice quiz generator for parents and teachers. For

the Commodore 64. ( 1 ICOff

my

..

;'V(: ■■•rui'"k

L

Trek

Look out for drones, craggy mountain peaks, and the deadly plasma cannon in this sci-fi action game for the 64. 1 0

7K86 022i>0

Turtle Graphics Interpreter Full turtle graphics capabilities without LOGO? Try this three-program package for the Commodore 64.

How GAZETTE Readers Are Using Their Computers You may get some new ideas for using your VIC or 64 after seeing what other

GAZETTE readers are doing with their computers at home, in school, and in business.

Also In This Issue: Vocab Builder For The VIC And 64 Inside View:

Tom Snyder, Educational Software Developer

VIC Music Tutor

Plus Reviews, Games, And New Products


INTRODUdNGACTMSION

SEE YOURSELF IN A

B/1

You leave the sun behind asyou loweryourself

down into the unexplored caverns beneath the Peruvianjungle. Deeper and deeper you go. Past Amazon frogs, condors, and attacking

You have heard the elder speak of one central

You strap on your helicopter prop-pack, check

source and a maze ofunconnected grey paths. As you connect each grey path to the central source, what was grey becomes the green of

your laser helmet and dynamite.There's no

bats. Across eel-infesled underground rivers. From cavern to cavern,level lo level. Swim

Hfe.When all are connected, then you have

ming, running, dodging, stumbling,you search for the gold, the Raj dia mond and the thing you really treasure... adven

ture. Head for it. Designed I by David Crane.

;

achieved "Zenji!' But beware the flames and sparks ofdistraction that move along the paths. You must go beyond strat-p" egy, speed, logic .Trust your in lui lion .The ancient I puzzle awaits. Designed by Matthew Hubbard.

predicting what you'll have to go through to get to the trapped miners. Blocked shafts, molten iava,animals,insects,who knows what lies below. But you'll go, you're in charge of the Helicopter Emergency Rescue Operation. The miners have only one 1

chance .You .The opening I

shaft is cleared now, it's time to go. Designed by John Van Ryzin.

I What Tf you were silting in fiont of your Com mod ore 64" programming your own Pitfall Harry "'adven(iire?It can happen wilh a link help from The creator of Pilfall Harrys David Crane.Jusi write your name and address

on a piece ofpa per. Iiipe25i: toil for postajjc and handling and mail lo;Thc AclivisionC-64 Club, PO. Box 7287. Mountain View. CA 94039 Well send you Davids Booklet." Programming Pitfall Hairy:1 It Includes a written program that helps you create your own iidvenlure.Co for it.


As you auil up you see the webbed forcefield surrounding your plane (.Holding it.Trapped with no escape. No hope. Except you: The Beamrider.The freedom of millions depends

on you. Alone you speed along the grid of beams (hat strangle your planet.You must de

stroy the grid sector by sector.Your skills and your reflexes alone will determine the lulu re of your people.Take their future in your hands.

Designed by Dave Rolfe.

You can almost hear Ihe quiet. And it's your job to keep it (hat way.A toy factory at midnight.

Did you hear something? Guess not.Wrong! Suddenly balloon vafves open, conveyor belts move and a whole factory fill! of loys goes

wild. Even the robot, their latest development, is on the loose and after you. Capture the runaway toys. Restore

You made it .The Olympics .You hear languages you've never heard. And the universal roar

of the crowd.Vouwill run. Hurl .Vault. Jump. Ten events. One chance.You will push yourself this time. Further than ever. Harder than ever.

But then.. .so will everyone.The competition increases, now two can compete at the same time.The crowd quiets.

order. Restore peace. Restore quiet. Do some

The starting gun sounds.

thing! Hurry! Designed

Let the games begin.

by Mark Turmell.

Commodoie 64!" is a trademark ofCommodoie Electronics. Lid. Š lOEM.ActMsion, Inc.

A blur of adrenalin.

,

Designed by David Crane BL-

I AdiVlsioN We put you in the game.


Me oureducat home. Andbe a The publishers of America's num ber one educational program make you this unusual offer: Take any of our educational programs home and be a hero once, because kids love the fun we bring to learning. As a bonus we'll send the program of your choice to your school, free**, including a gift card in your name. You'll help meet the acute need for superior software in our schools. You'll be a hero twice! The Scarborough System has a complete

range of programs to stimulate, challenge and help you or your children be more produc tive—including Your Personal Net Worth, that makes handling home finances fast and easy,

Make Millions, an adult business simulation

America's schools need your help!

f f%*

game, and PictureWriter,* a program that makes drawing on the computer fun. At your dealer's now.

Scarborough Systems, Inc., 25 N. Broadway, Tarrytown, New York 10591

U


iond software hero twkei MasterType™' Sharpen typ

Run for the Money™ Learn

Phi Beta Filer™* New

world by escaping from an

nizes lists of addresses, dates,

ing skills and increase com

to pursue profits in the real

the nation's best-selling edu cational program. It's an entertaining game thai

alien planet. Here's an excit ingly different, action-packed

puter facility. MasterType is

teaches typing as it increases the keyboard skills needed to bo at home with a computer. And there's a bonus on top of this bonus: when we send a copy to your local school, at your request, your child will

become even more proficient with a computer.

game of business strategy for two players. Your children will have fun as they learn a lot about business.

will love making music at the

insurance and medical rec ords, hobbies and collec tions—even school work— structures quizzes on any subject, quickly and easily.

ten, press a key to record, and you've started your own compo sition. It's a fun way to learn about music. And Songwriter

{Not available for Atari.)

computer. Just press a key to lis

can be played through your stereo or computer.

• -^J 11..... ■ - . ■ -■ i.

„,,. a t _, yyifli Phi Beta Filer -■——■ software program. It's geom etry. It's art. It's great fun. Kids can build dazzling patterns and learn a lot. PatternMakor builds a foundation that can be applied to many profes sions and crafts. It challenges

creativity and effectively teaches symmetry, color and design, and it's just as much fun for grown-ups, too.

Our programs are available for: IBM-PC/ PCjr, Apple II family. Commodore 64, Atari.

in. t- Association

Teacher Certified Software

MasterType

Pattern Maker.™ An amazing

Cf

Songwriter™* Kids and adulis

for children and adults. Orga

Yes! I want to software a school! 'Enclosed is the completed warranty card

and sales receipt (or trie purchase of a Scarborough product. I am enclosing my check for S3,50 to cover handling, ship

ping and postage required to send a free

copy of a Scarborough program to the school listed below. A gift card with my name will be enclosed.

Your Name |for gift card) Name of Principal Name of School

Address (school address only). City

State

.Zip.

Software will be sent only to verifiable school addresses. Offer Expires Dec. 15. 1985

You'll grow with us.

Check computer used in school:

ncomm. 64

D Atari

D Apple II family

D IBM

Check product to be sent to school: D MasterType i 1 Songwriter [~l Phi Beta Filer □ PatternMaker fl PictureWritert □ Run for the Money * Apple only.

Make check payable and mail to:

Scarborough Systems, 25 N. Broadway, Tarrytown, N.Y. 10591


THE FIRST FAMILY OF PRODUCTIVITY FROM CREATIVE SOFTWARE CREATIVE

WRITER

■ Preview entire document

•Help screens

■ Search and replace

' Move text

IN

• Headers and toolers

Creative Writer!" Creative Filer™ and Creative Calc'"-three

[ow-COSt, yet powerful pro grams designed to give you the most for your software dollar. All three programs are inte grated for more computing power.

C

R

E

ft

T

I

V

E

> Unrestricted formal

A SPREADSHEET

FILER

PROGRAM THAT

• Report wriler included

• Automatic alphabetizing

C

ft

E

A

T

I

• Adjustable column width • 12 digit accuracy • Menu of commands

V

E

C

A

L

C

• Mix text and numeric data > Within ceil ediling

> Flexibility ol design

EACH PROGRAM IS FULL-FEATURED WITH INTEGRATED CAPABILITIES. COMMODOHE 64'". IBM PC: PC|r'".

HASSLE-FREE

ANOAPPLE ■ VERSIONS AVAILABLE.

WORD PROCESSING. Creative Writer is a word processor you can start using in just 15 minutes. Now anything

you do with your typewriter,

PUT YOUR FILING CABINET ON DISK. Store your collection of

you'l! do better and faster with

index cards and faded notes in

Creative Writer. It lets you con

the attic where they belong.

centrate on the words, not the

Now there's Creative Filer—the

processing.

simplest way to organize and access all your files.

Arrange and rearrange

You ean set up and maintain

words or paragraphs at the

touch of a key. Compose, edit,

virtually any file with Creative

save, retrieve and print docu

Filer—names and addresses,

ments almost effortlessly.

home and autO records, club memberships, and inventories, all on a computer disk and automatically filed in alpha

REALLY ADDS UP. Creative Cale automates any mathematical process.

It lets you ask the "what if" questions of financial analysis more easily than any other spreadsheet program in its

class.

ALL THREE PROGRAMS ARE INTEGRATED FOR MORE COMPUTING POWER. Creative Filer and Creative

Calc work together with Creative Writer, allowing you to customize documents combin ing text, data, and numeric

tables. Ask for the first family of

productivity software for your writing, filing and calculating. New from Creative Software.

i

betical order for instant access.

T 230

East

Caribbean

Drive,

Sunnyvale, CA 94089

W

A

©1984 Creative

R

E

Software


October 1984

Vol. 2, No. 10

FEATURES New Directions In Educational Software Selby Bateman & Sharon Darling Inside View: Tom Snyder, Educational Software Developer Kathy Yakal How GAZETTE Readers Are Using Their Computers Bernie Ghiselin

22 32 44

REVIEW Software Disk Alignment For The 1541 George Miller Two Flight Simulators For The 64 David Florence Calc Result: A Spreadsheet For The 64 Emily Herman

96 100 106

64 64 64

Write Now.' For The VIC-20

108

V

Trek

Harvey B. Herman

Andrew Beery

The Tomb Cabby

Mike Scharland

Ken Jones

54

64

58

V/64

60

V/64

EDUCATION/HOME APPLICATION Computing For Families: A Journey Through The Land Of The Buddy-Bots

Fred D'lgnazio

Quiz Master For The 64 George Miller Vocab Builder William J. Treanor

VIC Music Tutor

Howard Fames

Turtle Graphics Interpreter First Aid Scott M. Huse

Irwin Tillman

BASIC Magic: Getting Comfortable With The PRINT Statement Michael S. Tomczyk Machine Language For Beginners: Loops And Branches Richard Mansfield Teaching Your Computer English Michael A. Long Power BASIC: Hi-Res Screen Dump Gregg Peele Hints & Tips: Recovering Scratched Programs Daryl Biberdorf

Editor's Notes

Robert Lock

GAZETTE Feedback

Editors & Readers

Home Telecommunications: All The Fun That's Fit To Print Simple Answers To Common Questions Horizons: 64 Charles Brannon

Tom R. Halfhill

VICreations: Simulating Hi-Res Animation, Part 2

News & Products

Robert Sims'

Dan Carmichael

64

*

80 84

64 V/64

86

V

90 95

64 64

72 120 126 128 144

* V/64 V/64 V/64 V/64

6

*

131

*

10

134 137 141

145

*

* 64 V

*

LISTING A Beginner's Guide To Typing In Programs

147

How To Type In COMPUTERS GAZETTE Programs The Automatic Proofreader Bug-Swatter: Modifications And Corrections

148 149 150

* V/64 V/64

Product Mart

182

Program Listings

Advertisers Index

151

192

V/64 *

•=General, V=VIC-20. 64=Commodore 64. COMPUTE!* GAZETTE is published monlhiy by COMPUTI! Publications. Inc., Posl Office Box 5J06, Greensboro, NC 27403 USA. Phone (Ml 9)2 75-9809. Editorial offices art located a 1324 West Wi-ndover Avenue, Greensboro, NC 27408. Domestic subscriptions: tissues, $241 Send subscription orders or change of address

(P.O. Form 3579) to Circulation Depl,, COMPlTTE!'s GAZETTE, P.O. Box Wl, FarcninKifale, NY 11737. Second class appllation pending 11 Greensboro, NC 27403 and additional mailing offices. Entlie contents copyright O 1184 by COMPUTI' ['ubliGitioni, Inc. All rights reserveJ. ISSN 07.17-3716 SXJrfc. COMPUT1I Publication), Inc., On* of Iht ABC PubliihinR Compinin: ABC PubliihlnR. Prtiidrnt, Robert G. Burton; U3U Avrnut-of thr Amends, Nvw York. N*WY«t 10019


THE EDITOR'S

GAZETTE Editor Lance Elko contrib utes a guest editorial this month on current events at Commodore mid welcomes a new GAZETTE columnist.

dore 16s should be on the market as you read this. The manuals

Robert Lock, Editor hi Chief

orders, especially for the Plus/4.

One can wonder where Commo dore is now headed. After selling

its Santa Clara manufacturing center and closing its Dallas re

search and development plant (speech technology, robotics, and sound), there's been more than a little speculation about Commodore selling out to a larger firm. Amid rumblings that RCA, GE, ITT, and AT & T could be prospective buyers, only the AT & T rumor appears to have any substance. But, no immediate

cause for alarm, says one Com modore source—although Com modore and AT & T have been

talking, nothing significant has developed and probably won't over the next few months. If this isn't enough to keep things buzzing at Commodore, there's also Jack Trameil's pur chase of Atari. Although Trameil hired away Commodore's na tional accounts representative and vice-president of operations, among others, Commodore

claims it doesn't feel threatened by its founder and former chair man. In response, several key Commodore staff persons have said they welcome the competi tion ("Jack is unpredictable") and the incentive. The Plus/4s and Commo6

COMPUTE! s Gazoiia

October 19&4

have been completed, and Com modore reports a lot of dealer Currently available is the Educator 64, which is a 64 and a monochrome (green screen) monitor housed in a PET case.

It's available only through Com modore Education dealers. Although Commodore an

nounced that the MCS-801 dotmatrix printer was cancelled, they are moving ahead on the DPS-1101, a letter-quality printer which will sell in the $200-$300 range.

A New Column For Beginners Since the GAZETTE'S premier in July 1983, we've grown consid erably in magazine size, reader ship, and in our reader-shared knowledge of computing. Our

evolution has been a kind of mutual cause-and-effect re lationship with our readers and will continue to be so. But what about our newer readers? We've heard from several who have just brought their first computer home and are understandably befuddled. Beginning this month, we have a new column, BASIC Magic, for beginners. Michael S. Tomczyk, a former Commodore product designer and writer,

will be teaching BASIC from scratch and will offer a lot of simple one- and two-line pro grams so you can see what's

going on inside your computer almost immediately. If you're new to computing, you'll find this column very helpful. It as sumes you know only how to switch your computer on. BASIC Magic will replace C. (Cheryl) Regena's Beginner's

Corner. Cheryl will continue her association and work with the GAZETTE and all other COM

PUTE! Publications. Until next month, enjoy your Gazette.

Lance Elko Editor


Tee off with

Tournament QOLF Loaded with excitement from the amateur to pro

rriament

•LF•&

4

levels. Tournament Golf features two coriplet£3J8 hole courses plus all the challenges-and frustrajiSns^stf the sport of golf.

From the wind factors on the fairwaysirrrcHh/ break

of the greens to the woods, roughs, and \/aterJia\ards,

■>/.

Tournament Golf is a game that combir skill, and a little luck.

Playing alone or with up to three otnerogpBnents

you'll choose from 14 different clubs aofually^&Titrolling your drives, hooks and slices - or whiffs and. flubs. You'll master putting technique and jjHcmp^dtjrficult

shots from the fringe of the green. No matter rain or shine, you'll

Golf realistic and competitive. RrfquiringsHj/hand-eye coordination and skill of an advpnco*! j^iicnocomputer

game combined with the straLegyaTrtlrteoaon of golf. Tournament Golf will scoce a hole-impne with you and

continue to entertain and cliaHenge^lonb after you

graduate from amateur io Pro

Features include: I Two graphic displays 1 Choice of 14 different clubs Computer-updated Scorecard

VA1RWAV DISPLAY

Driving Range

Putting Green

2 18-Hole Golf Courses Additional Courses

jPebble Beach & the Masters) available ® $20 each Tournament Golf is ready to run on your Apple IIs (48K) or Commodore 64* computer with disk drive and joystick. Available for $30 at leading computer and game stores

everywhere, or call toll-free 1 (800) 638-9292 for more information. Ask for Operator G. r^. Iiil .imlE CiH

TM.

k i>i Time IlK,

microcomputer games A Division of The Avalon Hill Game Company 4517 Harford Road • Baltimore. Maryland 21214 • {301)254-9200


COMPUTE! PublicationsJnc ÂŁ

One o> Tie ABC FUKnng Cfmparnei

Jules E. Thompson, inc.

National and Canadian Sales Representatives 1290 Howard Avenue, Suite 303

Burlingame, CA 94010

Publisher Gary K Ingersoll Editor in Chief Robert C. Lock

Director of Administration Alice S. Wolfe Senior Editor Richard Mansfield Managing Editor Kathleen Martinek Editor Lance Elko Assistant Editor Todd Heimarcfc

Production Director Tony Roberts Editors

Tom R. Halfhill, PC and PCjr Editor; Stephen Levy, Editor, COMPUTE! Books Division; Gail Walker, Production Editor; Otlis R. Cowper, Technical Editor; Charles Brannon, Program Editor; Selby

Address all advertising materials to: Patti Williams, COMPUTED GAZETTE 324 West Wendover Ave., Suite 200, Greensboro, NC 27408 Sales Offices, The Thompson Company New England 617-720-1888 Mid-Atlantic 212-772-0933

Southeast

919-275-9809

Northern CA

415-348-8222 or 408-354-5553

Midwest Texas Northwest

312-726-6047 713-731-2605 408-354-5553

Southern CA

619-941-2313 or 213-378-8361

Nevada, Arizona

619-941-2313

New Mexico Colorado

213-378-8361 303-595-9299

Bate man, Features Editor

COMPUTE! Publications, Inc., publishes

Assistant Editors

COMPUTEI

Dan Carmichael (Submissions); Gregg Keizer, Steve Hudson (Books);

John Krause, George Miller (Technical); J, Blake Lambert, Robert Alonso (Publications); Kathy Yakal, Editorial Assistant, Sharon Darling, Research Assistant (Features), Randall Fosner, Assistant Managing Editor (Books)

COMPUTE! Books

COMPUTE'* QA2ETTE

COMPUTB'sPCtPCirMagtntna

Corporate Office:

324 West Wendover Ave., Suite 200, Greensboro, NC 27408 Mailing Address;

Post Office Box 5406, Greensboro, NC 27403

Editorial Programmers

Patrick Parrish (Supervisor), Grege Peele (Assistant), Gary Black, Tim

Distribution Center 505 Edwardia Drive, Greensboro, NC 27409

Programming Assistants Mark Tuttle, David Florance Copy Editors Juanita Lewis, Joan Rouleau, Ann Davics Proofreaders Ethel Silver, Dwight Smith, Karen Uhlendorf, Marty Selby Administrative Staff Vicki Jennings, Laura MacFadden, Julia Fleming, Susan Young, Iris Brooks, Jan Kretlow

Telephone; 919-275-9809

Victor, Kevin Martin, Chris PoerrKovin Mykylyn

Production Irma Swain, Production Manager; Janice Fary, Art it Design Director,

Lee Noel, Assistant Editor, Art & Design; De Potter, Mechanical Art Supervisor; Terry Cash, Carole Dunton, Typesetting Artists Leslie Jessup, Larry Sullivan, (Publications), Debbie Bray (Books); Harry Blair, Illustrator

Office Hours: 8:30 AM to 4;30 PM Monday-Friday Chief Executive Officer Robert C. Lock President Gary !;

ingersoll

Vice President, Finance & Planning Paul J. Meglioia Executive Assistant Debi Nash Assistant Cassandra Robinson

Subscription Information COMPUTED GAZETTE Circulation DepL P.O. Box 5406, Greensboro, NC 27403

TOLL FREE

Subscription Order Line

800-334-0868 In NC 01D-275-3UO0

Associate Editors

Jim Butterfk'ld (Toronto), Harvey Herman (Greensboro), Fred D'Ignazio (Roanoke) Operations/Customer Service

Patty Jones, Subscriber Services Supervisor; Assistants; Chris Patty, Sharon Sebastian, Rosemarie Davis; Fran Lyons, Dealer Sales Super visor; Assistants: Gail Jones, Sharon Minor, Rhonda Savage Customer Service Staff

Dorothy Bogan, Supervisor; Judy Taylor, Anita Roop, Dcbi Goforth, Jenna Nash, Elizabeth White, Mary Hunt, Gayle Bonbow, Betty Atkins, Chris Gordon; Jim Coward (Warehouse Manager), Larry

O'Connor, Dai Rees, jack McConnell, Eric Staley, Eddie Rice, Sam

Parker, David Hensley, John Archibald; Mary Sprague, Mail Room Coordinator

Data Processing Leon Stokes, Manager; Chris Cain, Assistant Accounting

Paul J. Megliola, VP, Finance tc Planning; R. Steven Vctter, Director, Finance & [Manning; Robert Bean, General Accountant; Karen K, Rogalski, Financial Analyst; Staff: Sybil Agee, Susan Booth, Anne Ferguson, Pat Fuller, Doris Hall, Anna Harris, Tracey Hutchins, [ill Pope, Shannon Roesler

Credit Barry L. Beck, Credit Manager; Linda Miller, Credit Analyst Purchasing Gregory L. Smith, Purchasing Manager Promotion Mindy K. Kutchei, Promotion Manager Advertising Sales

Ken Woodard, Director of Advertising Sales; Bonnie Valentino, Assis tant Advertising Manager; Patti Williams, Production Coordinator; Joyce Margo, Production Assistant; Kathleen Hanlon, Sales Assistant Sales Representatives Jerry Thompson 415-348-8222

COMPUTERS GAZETTE Subscription Rates

(12 Issue Year): US (one year) $24. Canada, Mexico and Foreign Surface Mail $30. Foreign Air Mail $45. The compute!* gazette subscriber list is made available screened organizations with a product or service which interest to our readers. If you prefer not to receive such please send an exact copy of your subscription label to:

to carefully may be of mailings, COMPUTEt'i

CAZiiTTi;, P.O. Box 961, Farmingdale, NY 11737. include a note in dicating your preference to receive only your subscription.

Authors of manuscripts warrant that all materials submitted to computevs gazette are original materials with full ownership rights

resident in said authors. By submitting articles to compute!'* gazette,

authors acknowledge that such materials, upon acceptance for publication, become the exclusive property of COMPUTE) Publications, Inc. No portion of this magazine may be reproduced in any form

without written permission from the publisher. Entire contents copy

right Š 1984, COMPUTE! Publications, Inc. Rights to programs devel oped and submitted by authors are explained in our author contract.

Unsolicited materials not accepted for publication will be returned if

author provides a self-addressed, stamped envelope. Where programs are included in an article submission, a tape or disk must accompany the submission. Printed listings are optional, but helpful. Articles should be furnished as typea copy (upper and lowercase, please)

with double spacing. Each article page should bear the title of the

article, date, and name of the author. COMPUTH Publications, Inc.,

assumes no liability for errors in articles or advertisements. Opinions expressed by authors are not necessarily those of COMPUTE Publica tions, Inc. COMPUTE Publications assumes no responsibility for dam

ages, delays, or failure of shipment in connection wilh authors' offer to make tape or disk copies of programs published herein. PET, CBM, VIC-20, and Commodore 64 are trademarks of Commo

dore Business Machines, Inc., and/or Commodore Electronics Limited.

Phoebe Thompson

408-354-5553

Other than as an independent supplier of quality information and services to owners and users of Commodore products, COMPUTE]

Ed Winchel!

619-941-2313

213-378-8361

Publications, Inc., is in no way associated with Commodore Business

919-275-9809

Machines, Inc., or any of its subsidiaries.

[oAnn Sullivan Harry Blair


WordPro 3 Plus/64

The #1 Selling Word Processor for the Commodore 64

WordPro 3 Plus"764 and SpellRight Plus7" provide a total word processing solution for the Commodore 64" which gives you: + * * *

Sophisticated Word Processing Built-in Mail Merging for Form Letters Math Functions for Column Totals Fast and Complete Spell Checking via SpellRight Plus

* A Super Value (two programs) for Only $99.95!

WordPro and SpellRight are both specifically designed for the novice user with no computer or word processing experience whatsoever. And with over 40,000 WordPro versions sold, you can be sure that WordPro is a very sophisticated word

processor loaded with powerful features including: Transfer, Insert, Delete, and Rearrange Text, Auto Page Numbering, Math

SpellRight Plus locates and highlights misspelled words and then allows you to quickly correct the misspellings — improving the quality of your letters and reports.

And, best of all, WordPro and SpellRight's powerful arsenal

of features can be put to use almost immediately — by even the novice user. So whether you're a student, professional writer, in business, education or a hobbyist, you'll quickly become a WordPro Pro!

Both WordPro and SpellRight Plus are also available separately at popular computer outlets nationwide.

Invest in (he best.. .WordPro Plus. In a class by itself.

Functions, Headers, Footers, Global Search and Replace, the

Ability to Create Multiple Personalized Letters and Documents,

and much more. WordPro can create documents of virtually any length and will print up to 165 columns wide. You get all of

this PLUS fast and complete spell checking using SpellRight Plus!

Professional Software Inc. 51 Fremont Street Needham, MA 02194

{617)444-5224 Telex: 951579

Dealer and Distributor inquiries are invited. WordPro 3 Plua™/64 and SpeNRIght Plus'" are trademarks ol Professional Software Inc.

The WordPro Plus Series was designed and written by Steve Punter of Pro-Micro Software Ltd. SpeNRIght Plus was designed and written by Dwight Huff and Joe Spatafora ol SpellMaater Systems, Inc. Some printers may not support certain WordPro 3 Plus (uncllons and/or require an Interlace. Please check with your dealer. Commodore 64" Is a trademark of Commodore Electronics Ltd.


GAZETTE FEEDBACK Editors And Readers

Do you have a question or a problem? Have you discovered something that could help other VIC-20 and Commodore 64 users? Do you have a comment about something you've read in COMPUTEl's GAZETTE? We want to hear from you.

Write to Gazette Feedback, computers gazette, P.O. Box 5406, Greensboro, NC 27403.

Note To Readers

erase a diskette?

Tricks" does not work as expected. The article cor rectly described the difficulties caused by duplicate

IDs. However, when a disk is newly formatted, using the NEWO: command, the ID is written to every track and sector. The Change Disk ID pro gram changes only the header, which does not solve the problems of duplicate IDs. For more infor mation, see this month's Bug-Swatter.

Incompatible Disk Drives Members of our user group are experiencing problems when trading diskettes. Some disks will not run, save, etc. on different disk drives. I believe this is caused by different disk drive speeds. Is there a program that will continuously

display the disk drive speeds while it is running? E2C ComCats

All 1541 disk drives should run at the same speed: 300 rpm. It's possible that a drive or two in your users' group is experiencing a hardware problem, but speed is probably not the cause of your in compatibility problem.

More than likely, the problem stems from dif ferences between the drives in the READ/WRITE head's alignment. Earlier models of the 1541 had problems with the step-motor mechanism (which po sitions the READ/WRITE head) slipping out of adjustment.

A quick way to tell if your drive might be out of alignment is by watching the red light on the front of the drive. A good rule of thumb is that when loading a program, the red light should stay

on without any blinking. If it starts to blink (other than the steady blinking caused by a DOS error), it could be having trouble reading the diskette. When COMPUTEfs Gazotto

October 1934

Quick Diskette Erasing I wish to erase a diskette with a bulk demagnetizer. Is it harmful to use this method to

Program 2("Change Disk ID") of last month's "Disk

10

you run this test, be sure to use a good quality commercial diskette. If your drive is out of align ment, take it to your local Commodore dealer for re pairs. (Also see the review of CSM's 1541 disk drive alignment software elsewhere in this issue.)

Also, what is the formula for figuring out how many bytes a program uses {in the com puter) by the blocks used on the disk directory? Michael Montgomery

According to a representative from a major diskette manufacturing company, using bulk erasers won't

harm the diskette. He noted that each box of diskettes majiufactured at this company is bulk erased (by exposure to a strong magnetic field) as it leaves the assembly line.

Theoretically, a diskette can be erased an in finite number of times. Wear is caused by the disk

drive's READ/WRITE head making contact with the diskette, not by the changes in the magnetic

fields.

To get an estimate of the amount of memory used by a program, divide the number of blocks used (to the left of the program name) by 4 to get

the number of K used, or multiply by 254 to get the number of bytes. Each sector on a 1540 or 1541 diskette has 256 bytes. Two of the bytes are used by the computer, and the other 254 are used to store the program. This is

why you divide by 4 to give you the amount of

memory in IK blocks, or multiply by 254 to get the total number of bytes used. For example, a program

that uses 50 blocks on a diskette is approximately 12.5K (50 + 4) or 12,700 bytes long (254 X 50).

Dirty Cartridges I have a few cartridges on which the gold con tacts have turned black after a few uses. Is it safe to periodically clean the contacts? Would it be

better to just let them get black? I've been told that this is harmful to the cartridge. Terry Kulchyski

It's a good idea to keep the contacts clean, and this


To teach your child to spell, we had to design software that talks. Cave of the Word Wizard."A unique way to develop spelling skills using human speech and arcade action. Software that tries to teach spelling by jumbled tetters isn't a very good teacher. The software has to talk. Now it does. Only on Cave of the Word Wizard from Timeworks, The Wizard talks like a human being, not like a robot.This fascinating character thrusts you into an intriguing adventure as he teaches spelling in the most effective way possible on a computer.

You have wandered into a mys terious cave, and the entrance has been sealed behind you. Suddenly the Word Wizard appears and informs you that in order to leave his cave you must find four

word correctly, but each time you are wrong he will draw energy from your light. When your flashlight runs out of energy you

will be

doomed to roam through

the cave in darkness forever.

*-

Y

11

.1"

During your search

you will be confronted with spiders, rocks, snakes, and other dangerous obstacles that will make your quest for freedom even more challenging. This state-of-the-art educa

tional program includes 500 spoken words in 10 spell ing skill levels and

magic crys tals which have the

makes full use of the

sound capabilities of your com puter. The Wizard will

power

needed to open the cave entrance.

You have only a flashlight to help you find your way through the cave, and

talk to you in clear human

speech. No additional hard

your batteries are run ning low.

The Wizard is a funny old fellow who causes lots of mischief for anyone who enters his cave, He will appear often and ask you to spell a word-you will actually hear the old Wizard's voice!—and you cannot continue your search until you spell the word correctly. The Wizard will use his magic powers to replenish the energy in your flashlight if you spell the

ware is needed for your computer system.

Only Timeworks offers Cave of the Word Wizard. Now at your favorite dealer. Or contact Timeworks, Inc., 405 Lake Cook Road, Deerfield, IL 60015. Phone:312-948-9200.

Available for Commodore 64* Timeworks Programs:

B/elyn Wood Dynamic Reader ■ Dungeons of Algebra

Dragons ■ Spellbound ■ Computer Education Kits ■ Robbers of the Lost Tomb ■ Wall Street ■ Star Battle ■ Presidential Campaign m Money Manager k Electronic Checkbook .. Data Manager:. Word Writer O19W Tlmowwlts. Inc. Wl rights tvsenrx). Soltware Spooch By Eledronlc Spooch SySems C19M. ■ Regbtorad iraOeniBrti ot Commodoe Comtxrtor Sysleras


can be done a number of ways. You can use a cotton swab lightly moistened with a mild solvent such as alcohol. But be sure to use a solvent that won't damage the plastic. You could also use a pencil eraser. Lightly rub the eraser across the metal contacts, then brush and blow any residual particles away before using the cartridge.

cursor movements, delete characters, or even clear the screen (using a reversed heart) when a user tries to list the program.

PEEKing Function Keys I have a 64 and have read many articles on how to program the function keys. Most of these use the GET statement. Is there another way to de

tect when a function key is pressed? Is there a location I can PEEK?

Colorful LISTlngs I have a commercial game written in BASIC which LISTs parts of the program in various colors. How is this done?

Lyle H. Shaw

Producing colorful listings is done with a REM statement followed by a quotation mark and color tokens. To see this in action, follow these steps: 1. Find out which token represents the color you want in your listing. Do this by typing a quote then holding down the CTRL key and typing the color key you want. The character printed is the token for the color. For example, typing "CTRL-WHITE will print a reverse E. This is the token for the color white. 2. Enter the following line: 10 PRINT "HELLO"

3. Type the following line but do not press RETURN: 20 REM ""

After typing the second quote, press the DEL key once to delete it. This makes sure you're not in quote mode. Now hold down CTRL and press the RVS ON key (since you're not in quote mode, you should not see a reversed R). This turns on the reverse charac

ter mode. Press SHIFT/M. The reverse graphics character that is printed is the token for RETURN. Now press the key to get the token for the color you want. If you wanted the listing color to change to white, for example, you would press E white in the reverse mode. Now press RETURN to enter the line. This REM line will force the color change when the program is listed. Type and enter: 30 PRINT'HELLO"

Press RUN/STOP-RESTORE and LIST the

program. Lines 10 and 20, when listed, will be blue. Line 30, which is after the color change, will be

white. (VIC users have to change the screen color from white to see line 30.) Any of the 16 colors (8 if you have a VIC) can be used.

This technique can also serve as a form of pro gram protection. If you change the character color

to match the background color, the program will ap pear to be LIST proof. And this technique is not limited to color changes; you can insert tokens for 12

COMPUTE'S Gazette

Oclober 1984

Steve Stepleman

Yes, memory location 197 in both the VIC and 64 indicates the current key pressed. Enter and RUN this one-line program: 10 PRINT PEEK(197):GOTO 10

While the program is running, press the function keys. As you can see, each time a key is pressed, the value in memory location 197 changes. When no key

is pressed, the value is 64. Here are the values for each of the function keys: KEY PRESSED

VIC

64

ÂŁ1 f3 f5

39 47 55

4 5 6

f7

63

3

A drawback to this method is that the values displayed are the same whether the keys are SHIFTed or not. This means you receive values for only four function keys. However, this can be circumvented by PEEKing another memory location, 653, which indicates whether the SHIFT, CTRL, or Commodore keys have been pressed. When the SHIFT key is pressed, bit 0

will be on, the Commodore key will set bit 1, and the CTRL key bit 2.

A PEEK at locations 197 and 653 can give you more than the usual eight function keys. You can

distinguish between unshifted-fl, shifted-fl, Commodore-fl, and CTRL-fl.

Unwonted Files Is there any way to scratch an unwanted file from one of my diskettes? The filename is ",". I have tried erasing it by using the SCRATCH

command, but to no avail. Can you help? Andrew Hansen

Sorry, but that file is going to be tough to get rid of. The computer processes a comma as a delimiter—a character used to separate two parts of a command. For example, when you want to read a sequential disk file, you have to open it first: OPEN 2,8,2,

"filename,S,R" (note how the commas separate the filename from the S for Sequential and R for Read). As the disk drive sees it, the commas are not

characters in the filename. They perform a special function. Your disk drive sees your file "," as


mmodore 64™ wners, Relax... with Mirage Concepts software Mirage Concepts has mastered the art of uncomplicau. software. Before you buy—we help you determine which Mirage Concepts package will meet your need. No guesswork! With your purchase comes a menu-driven program ranked by independent evaluators nationwide as among the finest available. Relax as you learn how to operate your program

with clear, concise tutorials written by professional writers... not programmers. For consultation on your special questions, technical support personnel are standing by on a toll-free basis. DATABASE MANAGER, S89.95

1 lOO'i- Michlna Language* Free Form Design • Sort On Any Field • Calculated Fields

For Brochure*, Support and Information Cull.

(800) 641-1441 In California. Call...

(800) 641-1442.

- Inli-rKifi's lo W.I'. * Record Si/e " 2,000 Ch.ir.ulors

ADVANCED REPORT GENERATOR, 549.95 • Companion to tXitjbjst! • Toiah jiu! Subtotal! • Field M.itchmi; • Expanded Roporls

• Sorting lllji & Down) • Calculated Fields

WORD PROCESSOR, Professional Version S89.95 • 80 Col W/o Addl'l HdWT ■ 100'" Machine I BngUBge • Spelling Checker (30.000 Words) • Over 70 Slnale KeystrokB Commands • Printer Command Pile * IntwfBcM lo Database

WORD PROCESSOR, Personal Version S39.95

I • 100'"' Machine Language • True Word Wr.ip • Printed p.iuf'linc- character counters • Righl lustily. Center • Printer Command Filr • Interiaces ti> ll.ii.ibasc

hir/Xge concEPex inc. 251" W. Shaw Ave.. *106 • Fresno, CA 93711 TM—ConimiHloirM is a KtitNtntl Trade Mjrt ol Cinnmiili'rr Elrtlmnio. lid.


rns YOUR TIME BOTTOAA COMMODORE OWNERS now have an alternative to the frustrating LOAD ... wait ... UNLOAD ... wait... RELOAD ... wait pro

cedure. The NEW MSD DUAL DISK DRIVE ... SUPER DISK II will eliminate those hours

wasted during task performance and time lags that inflate expensive labor costs and deflate your bottom line. One SUPER DISK II will copy, format, and

verify in less than two minutes ... a pro cedure that normally takes 30 to 40 minutes using 2 single drives. Yes, SUPER DISK II is TWENTY TIMES FASTER!

MSD provides quality craftsmanship that is

backed by an exceptional six month warranty. The SUPER DISK II workhorse drive never overheats, so why be aggravated by the loss of time and money? Invest today in SUPER DISK II, the SMART

disk drive which contains its own micro

processor and memory enabling the com puter to command the drive and then con tinue. SUPER DISK II does the work quickly so

that you can get on with your program. As for the money you will save in unpro

ductive labor costs ... perhaps you will invest it in a daisvchain of SUPER DISKS. These

workhorse drives will allow you to connect up to four drives for maximum speed and reliable, continued performance.

SUPER DISK II DESIGN ASSETS

Sturdy sheet metal casing and heat sink Vertical load for ergonomic space efficiency Key latch secures disk position Smart disk contains microprocessor and memory in each drive Status lights to display which drive is in use Three steel bands for repeated accuracy of alignment Flexible use of serial or parallel communication Access flexibility configured as drive 0 or drive 1

SYSTEMS, INC. Dealer and distributor inquiries invited.


PARALLEL BUS

YES, for enhanced speed, IEEE for Commodore compatibility.

COMPATIBILITY

Commodore 64," VIC-20," PET" CBM

DAISYCHAIN .... Up to 4 drives OPERATIONAL

SUPPORT

BUFFER MEMORY

CAPACITY COMPLETE DUPLICATION

TIME: Format, Copy

proper disk drive operation. * LED status lights display where error is occurring.

•Easy to understand instruction manual.

Less than 2 minutes. (Compare

to 30-40 minutes with two 1541s).

& Verify a Full Disk.

TIME TO

• Power-on diagnostics to ensure

OVERHEAT TIME . NONE. Tested for weeks of con tinual operation.

17 seconds. (Compare to 1

FORMAT

min/20 sec. with 1541).

SERIAL BUS

YES, 2 connectors.

WARRANTY

WHEN YOU ARE READY TO GET DOWN TO COMPUTING RELIABLE SINGLE DRIVE READILY AVAILABLE MSD Systems also offers COMMODORE OWNERS the reliable and efficient SUPER DISK I, a single disk drive which is compati ble with the COMMODORE 64, VIC-20, and PET computers. Like the dual drive, MSD's SUPER DISK I never overheats ... its internal state-of-the-art design provides exceptional durability and longer life even in continuous run cycles, with more speed and power for internal operations.

-6 MONTHS. (Compare to 3

months for 1541). • 48 hour factory repair service. • Local service centers.

MSD SUPER DISK DRIVE TECHNICAL SPECIFICATIONS STORAGE" Total Capacity

Sequential Relative

174848 bytes per diskette

168656 bytes per diskette 167132 bytes per diskette

65535 records per file Directory Entries ... 144 per diskette Blocks 683 total per diskette 664 available per diskette Tracks 35 per diskette Sectors 17 to 21 per track Bytes

Diskettes

256 per sector

Standard 5W', single sided single density

•NOTE: The SD-2 contains two disk drive mech

anisms and can therefore handle two times the above capacities (one for each diskette).

SOFTWARE

16K Bytes Operating System 4K RAM buffer area (6K for the SD-2)

Microprocessor based disk controller (6511O) Commodore Compatible Serial Bus Interface Commodore Compatible IEEE Parallel Bus Interface PHYSICAL DIMENSIONS

A greater 4K double capacity buffer memory allows users to

open more files at any one time. The drive accomplishes many internal operations in less time than other single disk drives re

quire. The SUPER DISK I can format disks in 17 seconds, and execute utility commands in a minimum amount of time.

The SUPER DISK I has both serial and parallel buses. Up to

adding the MSD IEEE 488 interface (CIE) and IEEE/PET cable. The unique vertical load architecture of MSD's SUPER DISKS

reduces desktop space normally required. The durable sheet metal casing minimizes heat retention and contributes to the re liability and long life of the SUPER DISKS. MSD confidently offers an exceptional 6 month warranty to support SUPER DISK users.

SD-2 Height Width

6.2" (157 mm) 4.2" (107 mm)

Depth 13.3" (338 mm)

6.2" (157 mm) 5.9" (150 mm)

13.3" (338 mm)

INTERFACE

Dual Commodore compatible Serial Bus Jumpers for selecting device number 8,9,10 or 11.

ELECTRICAL REQUIREMENTS Voltage

Frequency Power

110 or optiona 220 VAC

50 or 60 Herti

50 Watts

1OO31 Monroe Drive, Suite 206 • Dallas, Texas 75229 • 214-357-4434 • Outside Texas 800-527-5285


"[delimiter/end of filename]". This renders the SCRATCH and RENAME commands useless. In general, when you're naming a disk file, stick to letters and numbers. Avoid punctuation

marks like commas, colons, and asterisks (although certain characters—periods, slashes, and dashes—

'are OK). One particularly troublesome character is

the SHIFT-SPACE, which is used by disk drives to pad out names of less than 16 characters and marks the end of the filename.

However, there is a solution to your problem. If you have a disk editor (a program that can change a

byte directly on the diskette), you can change the "," on the directory to, say, an "a", then scratch the program using the new filename. The other alternative is to copy any files or programs you wish to save to another diskette, then simply reformat the diskette with the bad file.

INPUTing The TI$ Chris McDonough

Yes, and it's easily done. Use this BASIC line in your program:

10 INPUT TI$

When the program runs and the INPUT prompt i$ displayed, enter your response in this format: HHMMSS, where HH=hours, MM=minutes, and

SS=seconds. For example, inputting "123456" will

set TJ$ to read 12:34:56. If you try to enter a time with more than 23 hours, 59 minutes, or 59 seconds, your computer will figure out what the time should

have been. Input "123499" and the 99 seconds will be changed to 1 minute 39 seconds, resulting in 12:35:39.

I have a few machine language subroutines I

would like to save as a BASIC program with the BASIC line: 10 SYS 2061. I have tried saving it with Supermon using: .S 7ite«flHie",08,0800,0900

But when I load this program back in, it looks like a mess. Can you explain why? Also, could you list the Commodore 64 BASIC ROM routines ($A000~$BFFF) and all of

the Kernal routines ($E000-$FFFF)? Leonard Spasiano Jr.

Your machine language program looks funny (and probably won't run) because you have it shifted Although the start of BASIC in the 64 is listed as address 2048, programs are actually loaded into memory starting at location 2049. Byte 2048 is al ways a 0, and signals the start of BASIC. If you want your programs to load correctly

using the LOAD "filename",8 (disk) or LOAD "filename" (tape) format, start your SAVEs at ad dress $0801, not $0800 ($1001 on an unexpanded VIC, or $1201 for a VIC with 8K or more expansion

memory). When using this method on a 64, the first twelve bytes should be (in decimal) 11, 8, 10, 0, 158, 50, 48, 54, 49, 0, 0, 0 (the equivalent of SYS 2061,

the beginning of your ML program). The first two

bytes are the line link, the next two the line number (10). 158 is the BASIC token for SYS, followed by

four ASCII numbers that spell out 2061. The three zeros are crucial because they mark the end of the

short BASIC program. When you use a relocatable

Non-Relocatable Tape Loads When using tape, why do you have to LOAD

"filename",1,1 when just typing LOAD "filename"

will work just as well? Ian Ball

Although both commands will successfully load a program into memory, they are significantly dif

ferent. LOAD "filename" will load a program into memory at the start of BASIC wherever the start of BASIC may be. It is called a relocatable LOAD.

LOAD "filename",1,1 is a non-relocatable tape load, sometimes called an absolute load (the equiva lent disk command is LOAD "filename",8,1). This

means that the program will load itself into memory

at the same address from where it was saved. This is used mainly for machine language programs that

must load somewhere other than the start of BASIC.

For example, in the Commodore 64 you can

place machine language programs in a 4K block of COMPUTEI'S Gazelle

ML SAVES With BASIC?

down in memory by one byte.

Is there a way to set the TI$ variable with the use of an INPUT command within a program?

16

memory starting at address 49152. If you loaded this program with the LOAD "filename" format, it would load into memory at 2049, the start of BASIC.

October 19B4

LOAD (see above), BASIC automatically relinks all

the lines until it reaches the end of the program. If you omit the zeros, your ML routines will be treated as program lines, with potentially disastrous results. The advantage to this method (used in "SpeedScript," "Campaign Manager," and "Screen-80") is that the user does not have to remember the SYS number—it is built into the program. You simply load the program and type RUN. BASIC and Kernal ROMs are each 8K for a to

tal of 16,000 bytes—much too lengthy to be listed

here. However, for a good explanation of both the VIC and 64 ROMs, try Mapping The VIC or Map ping The 64, both published by COMPUTE! Publications.

Out Of Memory Errors

When loading a program from disk or tape, I occasionally get an OUT OF MEMORY error.

This happens even when I type NEW before the


is. mat

r

Ifgetting the whole family together is a real challenge, maybeyou need games that really challenge the whole family. Introducinganew generation of computer games, family learning Games from Spinnaker. Ever notice how a little fun with the family can be a little hard to arrange? Well, now there's a solution-Spinnaker's

What makes our Family Learning Games so special? Well, for one thing they're designed to challenge and excite everyone in the family, from grade schoolers to grownups. Their unique combination of

quite a bit more than they'd learn from a

typical board game (if you could even get

them to play a typical board game).

So next time ycu want to get every

body together, don't get discouraged - get

chance and strategy makes them perfect

Spinnaker's Family Learning Games.

Family Learning Games. A whole family of

that everyone will want to play them again

fun won't be on the refrigerator. It'll be

What's more, they'll even help your kids

But what makes our Family Learning Games even more unique is how they help kids learn- about problem solving, strategiz-

for young players, yet challenging enough

great games that make getting the family together seem like child's play. And make "family fun" really seem like fun again.

and again.

develop some very important skills.

ing, spelling, even Greek mythology. That's

Its New!

AEGEAN VOYAGE." wnere do monsters lurk? And

.. J

You'll find the biggest challenge In family

on the computer. SpmwkergamesareavailableforColecoVision'and

for Coleco Sdam." Commodore 64'" and Atari* home computers.

UP FOR GRABS.""

adventure

It's a wildly exciting crossword

creator:"

game where everyone has to think fast. Mare words will help you win- but den't get caught with leftover ler-ers! Ages 6 - Adult.

Design a challenging adventure

whith islands rave treasures

game that everyone can play ■

worte.for only his clues can

for you. It's extmng.treative-

to behold? Heed Uie oracle s

or let the computer design one

lead you touches and a safe return. AgesB-Adult.

and utterly addictive! Ages 1Z-Adult.

mM^

rU

We make learning fun. IJrK.riso<nK^.Col«oMjmji<ICammooi™«ffl«tra(imjfi3«r^^

Cartridges for: CoiecoVislon.Coieco Adam. Atari

anacommodorew.


LOAD or turn the computer off then on. Lyle Shoemaker

You may actually have programs too large to be loaded into memory, but this is unlikely unless you're trying to load a program for an expanded VIC into an unexpanded VIC. There are four possibilities. First, when there is a hardware error while loading a program from tape, an OUT OF MEM ORY error will often be displayed. This isn't ac

tually a memory error, but a hardware or tape (cassette) error. In this case, try cleaning your cas sette tape head or moving your cassette drive away from your television, and reload the program. The second possibility is that on a 64, an ab solute load (LOAD "filename",8,l) changes the BASIC pointers, causing false OUT OF MEMORY

errors. After loading an ML program, it's a good idea to type NEW, to set the pointers back to normal.

Third, most programs which put custom characters in BASIC RAM change the pointers to the top (or bottom) of BASIC, to protect the re defined characters. In this case, typing NEW does not free up the reserved memory. If you turn the computer off and then on, or SYS to the warm start vector (64738 on a 64, 64802 on a VIC), the memory will be available for loading other programs.

Finally, some cartridges (Simons' BASIC is one) use part of BASIC memory, which may cause

problems when loading very long programs. If this is the case, your only option is to unplug the inter

fering cartridge.

chines or tie in to automatic answering services.

A New SpeedScript Character

Set From Ultrafont+

I am a foreign language instructor, and have en joyed using SpeedScript to print in foreign lan guages with my Gemini 10-X printer. Is there

any way I can use Ultrafont+ to create a new character set for SpeedScriptl Amir Findling

Yes and no. The VIC versions of SpeedScript and the original 64 version published in January use the ROM character set, which is inaccessible. But the May GAZETTE DISK version for the 64 uses a custom

character set (beginning at hexadecimal $2000, deci mal 8192) which can be changed to fit your

preference. If you have the 64 disk version, you can create a new SpeedScript character set without too much effort. First you need to know what changes to make for your needs. For example, once you access the Gemini 10-X's Spanish character set, these charac ters are redefined in the printout:

[from the keyboard becomes inverted exclama tion point,

] from the keyboard becomes inverted question mark, and

ÂŁ from the keyboard becomes capita! N with Consult your Gemini manual to see how the

characters are defined for other languages. The

Here's a tip for all you modem users. When using a modem, outside sound must not invade the phone line during transmissions. If sound in trudes, the modem can "hang-up" and data might be lost.

Unfortunately, the Call Waiting option avail able in some areas causes just this problem. The tone which signals that a call is waiting causes

the terminal program to crash. However, there is a way around this. To prevent the crashes, you can use Call Forwarding, which turns off the tone produced by call waiting.

One drawback is that people who are calling

you will not get a busy signal. If you forward

your calls to an automated service such as Time

of Day, at least callers will know your phone is tied up.

D. Martin

Thanks for the tip. It's a good idea. However, we don't advocate using an automated public service like Time of Day. Perhaps users could forward calls to a phone they know won't be tied up, such as the office COMPUTEIS Gazette

that some phones are equipped with answering ma

tilde.

Modem Interrupts

18

or school during nonbusiness hours. Also consider

October 1984

character code for the English pound sign (ÂŁ) on the Commodore keyboard is 92. This means that the Gemini will print whatever character is currently ASCII 92 for the activated character set. In the Spanish set, that is the capital N with tilde. In the

French set, it is the lower case C with cedilla. In

the USA set, it is a backslash. For Spanish, then, you would want to draw the

capital N with tilde in the character block that con tains the English pound sign. After you have used Ultrafont+ to create the character set you want,

use the S command of Ultrafont+ to save the new character set. The next step is tricky. After the set is saved, turn the computer off and on, then type: POKE44,32:POKE32* 256,0

followed by RETURN. Now WAD the new charac ter set you created with Ultrafont+: LOAD"CHRSETNAME",8

Now, to create a relocated character set, SAVE"NEWSETNAME",8


Thanks To CompuServe's CB Simulator, "Digital Fox"Accessed"Data Hari"And Proceeded To An "Altared" State. The CB Simulator, where CompuServe Subscribers can

Access Friends and Influence People on 72 Different Channels.

Just pick your handle and get on line. From math to matrimony,

That'll fool the "lurkers;1 those CB "see it alls" who get their kicks by watching. Or you can always use

the private talk mode for guaranteed word processor. To receive your illustrated

one-to-one conversation.

The CB Simulator is just one

of CompuServe's many electronic

communications options that include a National Bulletin Board, Professional Forums and Electronic who speaks your language. Friends from all over the U.S. and Canada are Mail. Plus, there's a world of on-line at it 24 hours a day. Talking tech or information and entertainment all for the price of a local phone call just having fun. And if you've got a secret, just use the CB Scrambler. plus connect time. there's always someone out there

You can access CompuServe

with almost any computer and modem, tenninal or communicating

guide to the CompuServe Information Service and learn how to subscribe, call or contact:

CompuServe Consume' rnformatiOfiServtce. PO Boa 2 5000 Arhi-iglan Centre Blvd . Columbus. OH 43220

800-848-8199

in Ohio call 614-457-080! An HSH BIOCK Company


This will make the set with a new loading address compatible with SpeedScript. Turn the computer off

Diskette Dangers I am going to be traveling overseas and I'll be taking my software (on diskette) along with me. What precautions should I take to protect the diskettes against the likes of x-ray machines, air

and on, LOAD but don't RUN SpeedScript, and LOAD"NEWSETNAME",8,1

plane altitude, etc? r

Create the new version of SpeedScript with the following (use any name you like): SAVE"NEWSPEEDSCRIPT",8

Refer to the discussion in the "SpeedScript Cus-

tomizer" article in last month's issue for more infor mation on printing foreign languages. Some

characters are not available from the keyboard. If

you want a lowercase n with tilde, for example, you have to redefine a reverse video number in SpeedScript, like this:[6] = 124 ([6] is obtained by pressing CTRL-2. then a 6). In this case you want to

redefine the reverse video 6 character as an N with tilde using Ultrafont-K This way pressing CTRL-£ 6 prints the correct character on the screen. Don't forget that you still must access the foreign character set before the Gemini will print what you

want. You could set up a Cyrillic, Greek, or Hebrew

alphabet for SpeedScript with Ultrafont + , but it would only be good for "video notes," since the printout would still use English letters.

Tim Farrell

We contacted a representative of a diskette manu facturing company who stated that x-ray machines pose no real dangers to floppy diskettes. However, there are precautions to be taken. Watch out for magnetic fields. Don't pack those diskettes in such a way that they will be exposed to electric motors, magnets, etc. Also, be aware of tem peratures. Most manufacturers recommend that floppy diskettes not be exposed to temperatures be

low 50 degrees or above 125 degrees Fahrenheit (10 to 52 degrees centigrade). Because the cargo holds of airplanes could exceed these limits, it might be advisable to pack your diskettes with your carry-on luggage. The most obvious danger is the possibility of physical damage while handling. Pack the floppies

so that they will not be subjected to bending or crushing loads.

Pack them in a dust free container (plastic ziplock bags, for example) if possible. According to the representative, far more disks are lost to dust contamination than to magnetic fields, (ffl

ur Vic 20™ or Commodore 64 This exciting, new weather package allows you to learn, monitor, and predict

the weather using the same equipment as the pros. /our Own Weatherman

Thei new HAWS (Home Automalic Weather Station] com

bines a quality weather sensor with software to let you track

Learn/Teach Meteorology

i

p-.

■ •.-.• WWSiUA ■KM

weather conditions inside or outside your home. HAWS moni point, temperature, humidity, and atmospheric pressure; plots historical data and graphically displays weather trends; deter

software program and a com plete user's manual that teaches meteorological terms and equa

mines the comfort and chill fac tors to help you dress; HAWS even forecasts the weather and

employed by weather services in

tions to allow anyone to quickly

grasp weather concepts either at home or in the classroom. Sim

Ordering Information

60 countries worldwide. The HAWS package costs only $199.95 and includes the sensor, cassette or floppy disc program, 15-foot cable with connector for the computer, and a complete

Send 5199.95 in check or money order payable to

Send today or call toll free to

1-800-227-3800 ext haws

user's manual,

order your HAWS package.

Vaisala. Inc. Include name, address, telephone num ber, your computer model (VIC 20 or Commodore 64], and program preference (tape cassette or floppy disc]. Or call toll free to place your order Major credit cards accepted. Dealer inquiries invited.

VlC 20 rmd CommorJore 54 arn iradenwka of CamrnocJure Electronics Lid-

20

COMPUTE'.s Gazelfo

October 1984

tunity to use your computer as a data sampler and data analysis system for meteorology, allow

ing the user to interact with incoming data to monitor and forecast weather conditions. HAWS includes an instructive

tors weather data including dew

compares your predictions to the local weatherman's. HAWS uses the same sensor

More than a toy or game, HAWS provides the first oppor

ple plug-in components and easy hookup also means you can free up your computer at any time for other duties. HAWS is a great educational tool for

anyone. Order today.

® VAISALA VAISALA INC. 2 TOWER OFFICE PARK WOBURN, MA 01(101


TM

Your Personal Its only business is managing your home finances. No program does it more quickly, more easily, more directly. Your Personal Net Worth systematizes the management of your household income, expenses, credit cards and check books — using methods tested for accuracy by Touche

Ross, one of the nation's leading accounting firms. Your Personal Net Worth puts your com puter to work, keeps your records straight, in cluding your personal inventory of valuables and stock portfolio, tells you where and how you're spending your money or if you're mak ing a shambles of your budget, And does it all

in less time than it takes you to balance your check book.

Nothing else — no other program at twice

the price — makes handling your personal

money matters simpler, faster and more direct than Your Personal Net Worth. You'll find it at your favorite software retailer in the silver box with the real silver dollar on the front. It could be the single most valuable purchase you'll ever make.

Record all banking and

Record stock, bond and

any credit card trans actions, reconcile bank

other investment trans

to 10 separate bank ac

collectibles and important papers for insurance and other

statements instantly (up counts can be handled), — print checks, too.

actions. Inventory

household valuables,

purposes.

Set up a budget (as many

as 350 categories) —and then compare your actual income and expenses to the budget.

Your Personal Net Worth works fast because it's in machine language. Docu mentation in plain English

is referenced for easy

use. "Help" functions on forget a tax-deduc-

e item. Today or at tax return time.

screen at all times.

Available for: tBM-PC'X77PCjr(128K)

Display or print every

Apple ll + /lle/tlc(64K)

ever need.

Atari (48K) The Program comes

financial report you'll

Commodore 64

with two disks, one of which has accounts al ready set up for entry. However, only one disk drive is necessary.

Tfc/i O#ffrf«^ffiAiff#ffi IIIU ^1UI WVI V*

&> 1984, Scarborough Systems, Inc., 25 N. Broadway, Tarrytown, NY 10591

You II grow with ut.


New Approaches In

Educational Software Selby Bateman, Features Editor

Sharon Darling, Research Assistant

Construction sets, simulation programs, and other software innovations are bringing a new sense of interactivity and excitement to computer-based education. For Com modore owners, there's a new land of opportunity in learning software.

and, thus, highly educational. Cell Defense, produced by ChildWare for Human Engineered Software (HES), for example, is an interactive human biology program which

simulates the way the body defends itself. Chil

dren as young as ten years can take control of different parts of the body's immune system and defend cells against viral attacks.

Trends in educational software often seem as volatile as the trends in the fashion or automotive industries. The field is cer tainly every bit as competitive and as potentially lucrative. Hundreds of competing companies are exploring ways to take advantage of the educa tional software market. Educators debate the merits of a dozen different approaches to com puter-based learning. And while everyone agrees there's room for improvement, some of the latest packages are showing the skeptics that the com puter can be a stimulating, educationally valid learning tool.

That's very important, says Spinnaker Soft ware Chairman William Bowman, whose com pany has been designing educational programs

since 1980. "Children oftentimes don't want to learn the way you or I may want them to learn. Some kids learn visually, other kids learn in an auditory way, some learn tactilely. "Good software should provide for as many

In HES's Cell Defense, players learn about the body's biological defenses through a simulation game in which invading viruses arc repelled from a variety of cells.

of these different ways to learn as possible by providing the child an opportunity to choose

The game has multiple levels and offers a brief, if simplified, introduction to human physiological mechanisms. Skin, inner tissue, and

multiple paths for learning."

nerve cells must be defended. Interferon, macro-

Computer simulations offer one of the most fruitful means for this sort of heightened interactivity. Giving a computer user the ability

phages, antibodies, and B- and T-cells are used throughout the game to fight the viral attacks. Youngsters learn how aging, stress, drugs,

to carry out everything from the dissection of a

and alcohol affect the body as the players scan

frog to the buiiding of a space station, these simulated environments are thought provoking

and then defend various layers of cells.

22

computers Gaiefffl

October 1984

"While other biological software programs


mm Dallas. TX^^™773-a7i7



Sight &. Sound Music Software can do more than turn your Commodore 64 into a music synthesizer.

No one else offers our exciting animated graphics. Or the music of the famous

recording artists we offer.

Every Sight & Sound Music Software

Deep within every Commodore 64

lurks the unexpected. A versatile

music synthesizer. A music video machine. Even a three-track recorder.

All waiting for you to control. All you need is Sight & Sound Music Software to make and record sounds that rival those of a real synthesizer. Including brass, strings, piano, guitar, electric bass, drums, funky clav, space wah and other sounds.

program features eye popping graphics that explode across the screen. And you can generate your own

colorful graphics. Then, synchronize them to your own music... or to

melodies made famous by Michael Jackson, Lionel Richie, Billy Joel and others.

A dozen different ways

play and even compose your own

musical arrangements.

From learning programs to the songs of your favorite artists...we've got it all.

A keyboard that makes easy-to-play even easier. An easy way to get started making music is to begin with our Incredible Musical Keyboard. It fits over your computer keyboard and allows easy

note-by-note play. Included with this

optional keyboard is an introductory music software program and two music

to have fun with

It's so easy that anyone

can create and record music. If you can press a few computer keys, you have all the skill it takes to create and play music. They're that music friendly. Oureasy-to-follow, fully

computer music, r Sight& Sound Music Software offers music for everyone's musical interest. Like the Kawasaki Synthesizer

through every program.

that instantly puts a synthesizer's sound and flexibility at your

soar. Creating and recording your

fingertips.

the beginner, the

Rhythm Rocker that creates space sounds

more advanced musician.

documented instructions guide you And you can let your imagination

own sounds. Your own songs. Your own music. Using the polyphonic

keyboard. Playing across a full 8-

With one-finger, you can control

wave form, vibrato, sweep and other special effects.

rhythms of electronic sound. Or, even our Music Processor

that allows you to create, edit, record,

5I(jMT< cri iridimirK oi Commodore

So, see your local computer soft

ware dealer for all the exciting Sight &

Sound Music Software. And unleash the music in you.

50UMD

I Music Software, Inc

We unleash the music in you. Commotion &4 I* n repl Bu?IipÂŤ Machine*, Inc

other for the

Or, the Kawasaki

and graphics to the pre-recorded

octave range.

books. One for


are drill-and-practice-based, this is the first biology package that actually simulates the spread of a virus through the human body," says

Dr. Sueann Ambron, director of educational soft ware at HES. "With Celt Defense, children have to make their own decisions and draw conclu

sions from available data to successfully ward off the spread of disease."

Cell Defense is only one program in a new science simulation series from HES (all available for Commodore 64 on disk). Among the new titles is Life Force, in which students learn the basic cell processes by simulating the splitting of DNA and producing complete, animated organisms.

Other programs in the series include Reflec tions, which teaches the physics of light reflec tion, refraction, and absorption with mirrors and

light beams; Ocean Quest, in which players search the world's oceans while aboard simulated research submarines; and Project: Space Station, which lets a player simulate the design and production of an orbiting, manned space station.

Project: Space Station is a simulation, but it is

Alphabet Construction Set (Futurehouse) offers young sters a chance to see, hear, and actually form letters of the alphabet.

ages nine and above leam the basics of building

computers by playing any of 40 different games using simulated computer logic circuits. Still another builder is used in Mindscape's

also a construction set, or builder. This type of software represents yet another trend in com puter education and offers one of the most inter active learning environments.

Tonk In The Land Of Buddy-Bots, five multilevel games in one package for children from four to eight years. Players help Tonk, an electronic character, find the missing parts of a Buddy-Bot robot by performing well in different learning

Builders are being used in a variety of ways,

games. (See Computing For Families elsewhere in

and for all ages, as educational tools.

HES's space station simulation/construction

this issue,)

set, for instance, is based on designs provided by

Building creativity, fun, and interaction into

NASA. It includes such real-life constraints as

educational software is crucial to the success of a program, says software developer Frieda

budgeting problems, unfavorable media cover age, and bad weather. Players create a budget, schedule a launch date and place, choose equip ment, modify and add parts, determine the focus of the mission, select a crew, and maneuver

Lekkerkerker, author of the popular typing pro gram, Kids On Keys (Spinnaker Software), and of Linking Logic, Memory Manor, and Logic Levels

construction parts with a shuttle's remote

Software).

manipulator arm or with rocket pods. Other construction sets, all of which received

(all from Spinnaker's Fisher-Price Learning

their creative impetus from Bill Budge's Pinball Construction Set (Electronic Arts), are becoming easier to find.

Alphabet Construction Set, from Futurehouse's Playground Software Series, uses Robo

the Alphabet Builder to help young children

learn the alphabet. Youngsters not only hear a voice, which is generated by the program, say the letters and offer instructions, but also they construct the letters on the screen using the company's Edumate Light Pen. The program also analyzes the letters that the child draws, pointing out mistakes and suggesting corrections.

BOOT

One of the most successful builders [pre viously available for Apple computers and now

converted for the Commodore 64], is Rocky's Boots, an electronic erector set in which players 26

COMPUTEIS GazBHe

October 1984

Kids On Keys (Spinnaker), a popular typing program for young children, created by Frieda Lekkerkerker.


ONE TOU

ELLER

\

Time was, Billy would do almost anything to duck his spelling

homework. But since Dad brought home Spellicopter**

by DesignWare™ Billy has become a spell ing ace. As well as an ace chopper pilot. Each week, in addition to the words aiready in the game, Billy types new spell ing words and new sentences into the game. Then he takes command of his chopper and

flies a mission through crowded skies and mountainous terrain to recover the

words, letter by letter, And always In the

right order. So by the time Billy gets back to the base, he's one proud pilot. And one tough speller. DESIGNWARE MAKES

LEARNING COME ALIVE.

All DesignWare spelling programs

Ltimi)n>Jwe ftj \\ a U&iJrihMk <A Cnriuii<nJmr Efittnm"* \M\. ]RM PC Hhd HIM j'CJrju-trHkH'TpiliiKJ

A

i

combine computer game fun with sound

educational principles to help improve your

youngster's spelling skills. That's why SpeUicopter, for example, is consistently on the nation's best seller lists. You'll also want to keep an eye out for new matli and science games. All DesignWare programs run on these computers with disk drive: Apple? Atari* Commodore 64™ IBM PC and IBM PCjr. See your local software retailer or call DesignWare at (800) 572-7767 (in California 415-546-18661 for our free software catalog. You'll be delighted with the way your kids will learn with DesignWare.

DeskpiWcife LEARNING COMES ALIVE.


Her programs are not as curriculum-oriented,

but rather "they involve more thinking, more logic concepts—they let kids make plans ahead of time," she says.

In Linking Logic, for children from four to eight years old, the player must plan a path

through a building so that he or she picks up the greatest number of matching tiles missing from the bottom floor of the building, This learning game, like her others, is an attempt "to make the software transparent, to

give children the feeling they are in control," she says.

Lekkerkerker, a teacher who came to the

U.S. from Holland, is currently working on sev

eral construction sets in which the concept of control is part of the overall game play. What she hopes to impart to these builders is a similar sense of interaction which children receive from non-computerized erector sets—Lincoln Logs and the like. "Basically, my games are pragmatic. They come more out of watching kids play games," she says. "The frustration level, I feel, is very low [in her games]." Lekkerkerker once completely redesigned

one of her programs after observing children

User-software interaction is a feature of several new educational software products from

Commodore as well. Just Imagine, for children from 4 to 14 years old, lets youngsters create their own animated

stories. A variety of different background screens—a jungle, a farm, outer space, and other

scenes—combine with animated objects and written stories to build a filmlike sequence. The child types the story, and the program provides graphics, music, and special effects. Up to three characters can be chosen to move around the scene as the story's plot is developed by the child,

"That's probably our latest and greatest as far as language arts is concerned," says a spokes person for Commodore's educational software di vision. "A program shouldn't try to fit a child into one particular way of thinking. It should let

them think divergently, and expand on what they know."

Another program from Commodore, Number

Builder, for children from 8 to 13 years old, uses

an arcade-style format with varying levels of diffi culty to teach children mathematical operations. There is a self-testing mode in the game as well. A similar concept is used in another Com

playing with it. "With the original concept of the game, children would have been penalized

modore mathematics program, Fish-Metic (for

points for the method they devised, so I modified

learn the concepts of greater than, less than, and

ages 7-13), in which children play a game to

it," she says. Flexibility and long-term interest are compo

equal to. Those concepts are then applied to pos itive and negative whole numbers, fractions, and

nents of the best educational software, says Lekkerkerker. "A game, or any kind of product, should be very easy to understand at first. But it

decimals. One of the newest programs from Com

should be able to be expanded on in ways the creator doesn't even know," she adds.

gram which presents sky maps from ten

modore is Sky Travel, a home planetarium pro thousand years in the past to ten thousand years in the future as users learn facts about astron omy. The maps can show the sky from anywhere on earth.

Players simulate flying a plane across a map

of the world as the program automatically deter mines longitude and latitude. "What we like to do with educational soft ware is encourage the thinking process and the

questioning that goes along with learning," says the Commodore spokesperson. While no single article can mention the many new educational programs taking advan tage of some of the newest computer-based learning concepts, even a cursory look at the field indicates that many programs are targeted at the Commodore 64. The 64's graphics and sound capabilities are

too good for programmers and software compa Just Imagine (Commodore) is a new interactive educa tional program which lets youngsters write their own animated stories. 28

COMPUTED Gazorts

October 1984

nies to ignore, according to Spinnaker's William Bowman.

"Our software engineers and our software developers will spend an enormous amount of


Wfe'll teach your children to spell4000 words by the time they're 14 years ok.

s

grammar, vocabulary, elementary science, Spanish vocabulary skills and more. The Easyreader-

PELLING could be the most important skill your children learn in (<

school. And proper spell ing means better grades. Not just on spelling tests,

Series, for grades

ports, essay tests-in

K-8, includes phonics, word

fact, all school work that requires writing.

reading compre

but also on written re

structure, and

The wayAEC teaches spelling

AEC Spelling.

is very important.

The newest educational

AEC uses the "test-teach-test" approach, one of the best ways

software from AEC.

AEC Spelling, for grades 2-8,

to teach spelling.

commonly used in writing by chil dren and adults. This word list is the result of over 25 years of educational research and includes

steps teaches the correct spellings.

teaches the 4,000 words most

97% of the words most people use every day in writing.

With AEC Spelling, by

the time your children are 14 years

old, they'll know how to spell the 4,000 words most often needed for written communication. Lookforout display m

hension. AEC software is known for clarity of presentation, ease of use, and success in the teaching/

First, a pre-test determines which words the student needs to study. Next, a learning session based on eight sequenced study Then the student has the option of using four other learning activ ities to master the correct spell ings. A post-test verifies spelling mastery.

And you can easily "custom

ize" your child's spelling lessons

by adding words, using the unique authoring system built into the program.

AEC knows good grades

are important.

AEC publishes a complete library

of curriculum-based software, to help your child get better grades.

The AEC MatchmakerSERIES, for grades 2-8, covers

learning process. As a major pub lisher of educational software, AEC fully guarantees the quality of its product. For more informa tion about any AEC programs, visit your favorite educa tional software store. All AECpixltictsareamipatiblewith Apple II," Apple 11 + .'Apple lie.' Cnmmndnre 64,"Atari S00.' Atari HOOXL.'Ataril200XLMBM PC: andlBMPCjr.'TM sijiniiits manufacturer's

trademark, di> signifies

nunuffictrmrt tvta trademark.

American Educational Computers 2450 Embarcadero Way, Palo Alto, CA 94303


larget

Hunber

Total Hunber

j jS !.'.v.v.v.vai B Wtvjg.vja.vwi

Number Builder and Fish-Metic (both from Commodore) use colorful arcade-style screens and action to help chil dren learn mathematical concepts.

time working on challenging the sound chip [in the 64], or pushing the sprite graphics just as far as they possibly can be pushed," he says. And the results for Spinnaker's 64 software, he believes, are educational programs which are "very visually deep, and have a musical dimen

tive, and, very importantly, engage the child for

a long period of time." Putting these characteristics into educational

programs is a challenge many software compa

sion and game play that takes advantage of the

nies are eager to face. And with the huge in stalled base of 64s in the home and in schools, almost all of these companies are aiming their

machine, are consistent with the learning objec

efforts squarely at Commodore owners.

Cross-Pollination: The Home-School Migration There's a two-way migration going on among producers of educational software. While some companies are broadening their school-based software lines into the home, those program developers who have concentrated on the home market are now promoting their products in school systems as

well. There are now two complementary mar kets for software companies to engage. Those businesses that have strength both in the school and in the home will survive, says Karen McGraw, software project editor for

DLM Teaching Resources. DLM, based in Allen, Texas, is an example of a company whose software was originally aimed at the school market, but which is now designing and selling educational software to the home market as well.

Much the same process is going on at Scholastic, Inc., long associated with schools, but now aggressively in the home educational

computer market. And home sales for Scholas tic are taking off, says President Richard Khaleel. When American Educational Computer

(AEC) began selling its line of educational 30

COMPUTEIs Gazetta

October 1984

computer software into homes, it related its programs almost totally to curriculum support by grade level and subject.

Says AEC President Thomas B. Garsh,

"The subject is there; we know that. It's been tested and tried [in the schools]." A good example of how a software com pany can promote its own products while at the same time offering a genuinely helpful ser vice to schools interested in microcomputers is demonstrated by Scarborough Systems, Inc. The company has begun a software dona

tion program to schools. It runs from Septem

ber 15 to December 15. When you purchase a piece of educational software from Scar borough, you also get a coupon that lets you donate a program of your choice to a des

ignated school and teacher. As microcomputers grow more prevalent in the home and in schools, educational soft ware companies will continue to have two markets in which to compete. The result of

this cross-pollination between home and school may ultimately mean higher quality and more diversity among computer-based learning products. 9


OLOFL

SIM

REAL LIFE CHALLENGES FOB THE AIR FORCE MAJOR GREAT FUN AND LEARNING-/FOR HIS 10 YEAR OLD SON!!!

McjorBill

has over 3000 ( hours ol flying He loves the sophistication ot the

SOLO FLIGHT simulation and ils real I lie challenges oldeterioralmgwealtier. tailing instruments, and ovetheoting engines! i He knows Ihe reality of flight

-with SOLO FLIGHT he can bring il home!! Bill Jr. has no real Hying hours, but just moments after he plugs in his joystick, he's airborne, experiencing Hie tun andleamingolBight Helovesthegreat3-Dgrophics.tt>e lokeoffs.lfietouch and go's, andttie NEW'INSTRUCTOR

PILOT" option which enables Ihe computer to give him flight instruction just liko his fighter pilol Dad would!! Bill Jr loves the tun ol (lying - with SOLO FLIGHT

all thectiallengesolSOLO FLIGHT Bulbecaretul, because that may take many more flying hours than aMajoihosM

SOLO FLIGHT is available tor Commodore-6d, APPLE, IBM, and ATARI computers Suggested retail price isonly S34 95

Find SOLO FLIGHT at your local retailer, or call or write tor MC/VISA, Money Order, or CODorders. Add S2.50 for postage and handling (Inn, add S4.00 USD) MD residents add 5% sales tax

Experience the reality of

these other great simulations from MicroProsE:

hehasitM

SOLO FLIGHT iso real flight simulaior that includes VOR's. ILS, 21 different airports, VFR, and IFR (lying SOLO FLIGHT iseasy to get started with. Out you wilt get hooked on Ms Fun and Excitement!! Try to master Comirodo re 64 Screen F*c[uri

MicroProse Software

The Action is Simulated— the Excitement is REAL!! (301)667-1151 CornmoOOre-64 ATARi iPPiE ardl0HojeregiiiBie'Jna<]eiTiorV?iDlC<)riirrKX]QreBLr!jnK$Macriini?ifric.ATAHl!ric.APPLECompure*Inc.anairiefnoTionalBLi$lriei$Mo<JilfiHinc.


Tom Snyder: Educational Software Developer Kathy Yakal, Editorial Assistant

Software developer Tom Snyder

Education is changing: Instead of looking at books, teachers' faces, and phrases scrawled on the blackboard, students are looking at computer monitors and keyboards. But soft ware developer Tom Snyder is trying to get students to look at each other, too.

32

COMPUTE!1* Gazotto

October 19B4


OUR STORIES LACK IMAGINATION. Because Infocom's inter-

active fiction is designed to run on your imagination. That's precisely why

there's nothing more interesting,

challenging or interactive than an

Infocom disk—but only after you've put it in your computer.

,

,

.

Once it's in, you experience something akin to waking up inside a novel. You find yourself at the center of an exciting plot that continually

challenges you with surprising twists, unique char

acters (many

1 of whom pos sess extraor

dinarily developed personalities) and original, logical, often hilarious puz zles. Communication is car

ried on in the same way as it is in a novel—in prose. And

interaction is easy—you type

in full English sentences. But there is this key difference between our tales and conventional novels: Infocom's interactive fiction is active, never pas sive. The course of events is shaped by what you choose to do. And you enjoy enormous free

dom in your choice of actions

—you have hundreds, even thousands of alternatives at every step. In fact, an Infocom

interactive story is roughly the length of a short novel in content, but because you're actively engaged in the plot, your adventure can last for weeks and months. Find out what it's like to

get inside a story. Get one

from Infocom. Because with I Infocom's interactive fiction, «

there's room for you on every disk.

inFOCOIK KilT wur: Appk" II. Macintosh, Alaii. Comrn<jd''rc"l>1. CP'MS7

DRCmate. DEC Rainlx™, [IEC RT-11. HP1M&110. IBM PC'

& PCjr.- KAVPROII, MS-DOS S.0: M:C AiW NEC PC-8000, OlTII1flTI99/4ATl2(J(»ITKSsnCl

Computer, tks.sii Model! 1.1 III. ■IV ii»- IBM PC mini int your Comma jnJlk MS-DOS 2.0

vviiiofl for jour Mhfig, MijvSci, r3^uGirnT4l>>^u-nilti. iikip


ENTER: THE BRADYADVENTURE If you're bored with the ordinary, dreary functions you've been perform ing day-by-day and even games have lost their luster, Brady brings back

the adventure! You and your

Commodore 64 can enter a whole

new colorful world of excitement — if you're in command. Brady Communications, Inc.,

puts you in control of the fun with a complete line of amazingly easy-to-

read books, published especially for

you and your Commodore64. Whether you're a beginner, an advanced user, a whiz kid, a parent, a teacher or a hacker, Brady publishes the books to

teach you how to make the most of yourcomputer. From BASIC to games, from graphics to sound, from software to debugging, these books will let you key into your imagination in microtime and bring it up on screen. Enter

The Brady Adventure —the excite ment is all yours.


BLAST OFF WITH BASIC GAMES FOR YOUR COMMODORE 64

David Busch

This is the first really fun approach to BASIC ever devised. The book containing time-tested, highly visual games makes it easy to leam

BASIC programming on the Com

modore 64 computer. It includes 25

games that take advantage of the Commodore's special features

including graphics, sound and joy

sticks. The programs are even suitable for customizing for further fun.

ADVANCED BASIC PROGRAMMING FOR THE COMMODORE 64 AND OTHER COMMODORE COMPUTERS Michael Richter

This is the next step for the

Commodore user who has mastered the basics and wants to move on to more advanced software. In this book, the reader will learn how good

programs are written, how to read and use them, how to know a good

one when they see it, and how to gain knowledge through the experience of

writing advanced software.

1984/2ftlpp/paper/I5BNO-89303-302-2/S14.95

BLAST OFF WITH BASIC GAMES FOR YOUR VIC 20

David Busch

Twenty-five games make it simple to learn BASIC for your Vic 20. With twenty-five, time-tested, highly visual games, this book lets you take full advantage of the fun available on your Vic 20.

1984/12H/paj>er 0-89303-334-0/S12.95

COMMODORE 64: AN INTRODUCTION1 TO BASIC PROGRAMMING AND APPLICATIONS Larry Joel Goldstein & Fred Mosher

In this volume the master teacher

has taken a hands-on approach to

BASIC language and practical reallife applications. The book gives a complete and up-to-date account of what the Commodore 64 is and how it works. Page by page, the reader is

introduced to DOS and BASIC. It shows how to program for personal

and professional needs and includes

programs for mailing lists, word pro

COMMODORE 61: GETTING THE MOST FROM IT Tim Onosko Written for users with little or no

previous programming experience,

John Slephenson

This is the volume especially for your Vic 20. Containing more than 40 challenging games, the book teaches programming and some basic math ematical concepts simply in the doing. Be sure and have this b<X)k to make your Vic 20 more fun. l954/160pp/papmv'ISBNO-89303-347-2/S12.93

HANDBOOK OF BASIC FOR THE COMMODORE 64 Fred Mosher & David Schneider

book to buy with your Commodore 64. It is simply organized by BASIC

programming statements so while programming, the user can go directly

to the information he needs without

confusion or delay. This one-of-a-kind

this handy guide is the only source

guide contains the same information

of the Commodore 64. It includes

supplied with your Commodore, re written especially for the new user. It

with information on all three versions material on both the classroom model

and the portable version. It offers a thorough and understandable intro duction to the computer—including a solid approach to BASIC program

ming. It covers word processing,

color graphics, and sound.

1983/320pp/paper/[SEJNO-89303-:i80.4/S14.95

BRAIN GAMES FOR KIDS AND ADULTS USING THE

COMMODORE 64 John Stephenson

Between the front and back covers, this volume contains more than 40 exciting and challenging games. Designed to entertain and

educate the reader, it teaches pro gramming and the application of some very important mathematical concepts

and debugging programs.

and precise and are targeted toward

1984/288pp/pa per/ISBN 0-89303 -381-2/S14.9S

ADULTS USING THE VIC 20

For the beginner, here is the

cessing, telephone lists, graphics,

sound, and file handling—plus exten sive coverage on structuring, planning,

BRAIN GAMES FOR KIDS AND

without the pain. The games are short whose who leam best by doing. They

can be played and enjoyed without an understanding of the mathematics

involved. This is one volume you'll want to have for fun—for kids of all ages!

1984/16Opp/paper/ISBN0-89303-349-9/$12.95

as the BASIC reference manual

presumes no knowledge of BASIC

and explains the materials supplied in the manual.

19847256pp/paper/[SBN0 89303-505-X/S14.95

These and other Brady Books

written specifically for your Com

modore 64 and Vic 20 are available at B. Dalton Booksellers, Walden Books,

and other fine bookstores and com

puter dealers nationwide. Or, call 800-638-0220 for information. Brady

Communications, Inc. is a PrenticeHall Company, located in Bowie, Maryland 20715.


teaching job. Ever since that

first day when I went in as a novice and saw 25 fifth graders looking at me, I've done exactly what I'm supposed to do." In spite of the encourage

ment from IBM, Snyder's tem porary fascination with Hop in the Snoopmobile parked next to Snoop Headquarters...

...and drive around the streets of Costa Villa, questioning suspects at their homes and over the phone lo find out who fishnapped Lily the dolphin from the Tabasco Aquarium. Snooper Troops detective games help children learn to take notes, draw maps, classify and organize information, and develop vocabulary and reasoning skills. (All photos courtesy Larry Lawfer.) You can be a diver, or a detective, or a govern

ment agent. You'll

travel on trains to dif

frustration and self-doubt.

Teachers told him, "Here, learn this set of facts. Write this paper. This is what you must

ferent cities, on ships across the ocean, or in the "Snoopmobile,"

know. This is what's important."

trying to find out who fish-

they couldn't answer, he de cided to learn what he thought was important, which didn't win him any points with teach ers. "I was extremely active in projects, but I could not figure

napped Lily the dolphin. Tom Snyder's educational software.creates worlds for kids to play and learn in. His many programs are held in high re gard by parents and educators for just that reason: Children are drawn to the software because it's fun, but they come away having learned new concepts. And that's a difficult mar

riage. Educational software de signers and publishers struggle constantly to find the right mix so kids like using the software, and parents and teachers are

satisfied with its educational value.

He asked them why. When

out how to do well in school," he says. "I began to think I was not a capable person." He made films. He wrote songs. He played around with computers, and sent one of his designs to IBM. Shortly afterward, he says, "I came home from school and found a couple thousand dollars worth of hardware parts on the lawn, with a note from IBM that said something to the effect of, 'That was a good idea you had.

Mess around with this stuff and "I'm a bit distinctive, proba

bly, in that I was such a bad

remember us when you design anything else.'"

computers faded for a while. After finishing high school ("definitely in the bottom half of my class"), he spent a few years playing keyboards in a rock and roll band, with a re cording contract at Capitol Records, He returned to school, studying French and music at Swarthmore College ("I was on probation most of the time"), then got a master's degree in

education from Lesley College in Cambridge, Massachusetts.

His first day of work at Shady Hill School in Cambridge

confirmed what he had believed as a student. "All I needed was a non-arbitrary responsibility," says Snyder. "If I didn't teach those kids, they were missing

something. However, if I didn't write a paper on value-added tax for my economics professor who wouldn't read it anyway, nobody was worse for the wear

except me, and I was already taking care of me."

"The group of people in the world which is least capable of learning for abstract reasons is the very group that is forced to learn for abstract reasons at! of the time: kids."

student." "If you ask second-graders Snyder's own education, as

he describes it, was filled with 36

COMPUTE'S Gaietle

October 1984

"All it took for me to come into my own was getting a

why they're studying math, it's

surprising and depressing, but


HITTING & FIELDING.

B

Real baseball is more than just hit-

ting, pitching and fielding. It's also your favorite major league teams, the

Two modes let you choose between managing and controlling your team or managing only. The World's Greatest

Baseball Game—everything you

great stars of today and the Allstars of yesteryear. It's statistics and

could ever want except the hot dogs

coaching, and it's managing your

and peanuts.

own game strategy. With the World's

One or tivo players; joystick controlled.

Greatest Baseball Game, you have it all. Pick your major league line-up

using the actual player and team stats. Then watch the action unfold against an opponent or the computer.

Strategy Games for CheAction-Game Player


they'll actually

out a micro,

say because it's

there were always certain people left behind or group

good for them," says Snyder. Or because they

dynamics prob

have to or they're supposed

lems," he says. To combat

to. "These are very arbitrary

that, he devel

reasons.

oped programs

"When I teach, I try to make sure the kids know

exactly what they're doing, why they're

that divided In Agent U.S.A., it's up to you to save the nation from the dreaded FuzzBomb. On your way across the country by train, you must gather

the screen into

strength by growing crystals and keeping them away from the FuzzBodies. Make sure to read the schedule correctly at each stop, or you'll miss your train. Agent U.S.A. helps children learn to read maps, learn more about U.S. geography, and improve critical thinking and math skills.

areas, each of

learning. If I can't come up

with a good reason, if I can't get the kids involved in the community or helping people or creating value in a real way, I create a game, which is the next

best option to get them excited about what they're doing." For Snyder's class of fifth -

graders, these games were dataintensive simulations. If they were studying geography, they

became the crew of a ship cross-

ing the ocean. The kids loved it,

ate an expertise in each child. Each child has a piece of infor

"The next step was to turn the

computer around and let the

who had rarely spoken or been spoken to by classmates sud

kids push the buttons. And as I dared to turn the computer

denly become an important part

around, I had to come up with

of the group. They were learn ing, they were having fun, and

easy ways for the kids to enter

they were talking to each other,

information and get infor-

ment problem just trying to keep track of all the needed

mation back."

pencil.

which the students were respon-

Though he had no notion of

using it as an educational tool, Snyder had bought a Radio Shack computer in 1979, and was using it to organize notes,

help write reports, and keep track of grades.

The management problem

he was running into with his simulations sparked an idea. "It became obvious to me that I could use the computer to man age these simulations," he says. 38

COMPUTE'S Gazette

OcloOef 1984

which contained information that was essential. "Suddenly you can sort of cre

"The computer could keep track of where the kids were in the game, make random choices, and have an overview of what the world looked like."

but Snyder faced a real manage-

information, using paper and

several different

By designing simulations in sible for keeping track of the

information, Snyder discovered an unexpected bonus. "I re member walking.home the first few nights I did that and think ing, gee, maybe a computer

could solve some of the prob lems my simulations have al ways had," he says. One of those problems that

mation and no one bright stu dent can get it all because it

only lasts a few seconds on the screen." Snyder watched children

"Teachers across the country say this sofhvare is important,

this is a way to use the com puter. Not one kid on one pro gram, but having the computer

actually promote group dy

namics, which is just the oppo

site of what people thought the computer would do." Buoyed by his break through, Snyder hired a New

disturbed him was how to get

York consultant for $500 a day

everyone in the group involved. "Having run the simulation with-

his discovery was as important

(on a teacher's salary) to see if


SILICON WARRIOR. PROGRAMMED TO BLOW YOU AWAY.

The year is 2084, and the Silicon Valley is enveloped in a conflict of the fiercest magni tude. Warriors from the House

of Peanut, the House of Apple, the House of Adam, and the House of Pong are competing

for a computer program which wil! unravel the mysteries

laser fire. Or, you might even be swallowed up

by a black hole "bug" in the program that appears when you least expect it. Using your joystick, you teleport from one chip to another as the battle

intensifies through seven levels of play. With the proper strategy and a dash of speed, you can be Master of the Silicon Valley. One to four players; joystick controlled.

of the Universe and lead to eventual domination.

You are one of the Silicon Warriors, your mission is to program five of the chips in a row before any of your opponents can do the same. They will try to beat

you to the task and steal the program or destroy you with

Strategy Games for theAction-Game Player


as he thought it was. Yes, said the consultant, you have some thing extremely special. I can get you a contract.

And ho did. With McGraw-

Hill, who saw Snyder's simula tions and bought all five packages immediately. Snyder's

About the same time Sny

With Snyder, they began build

der was writing simulations for

ing a corporate structure to

his classroom, the personal computer industry started to

channel Snyder's dreams into the burgeoning home computer market.

pick up speed, and Snyder had a new market for his learning

discoveries: home educational software. "I met a couple of

Over the last two and a half years, Tom Snyder Productions has grown from a staff of two

experiments with computerassisted group learning became

the Search Series, a group of classroom simulations for gradeschool children, which still sells well four years later.

"The best software requires teachers." Snyder recalls one time when a student, after participat

ing in Energy Search, went home and told his parents, "The neat thing about it was that we got to make decisions about things

that really mattered." But weren't 1981 to der was

some of the grown-ups so sure. On the road in promote his series, Sny asked the same ques

tion over and over: Isn't this kind of software dependent on exquisite teaching? No, he said for a long time. Anyone can use this approach. It's good for everybody. "What I've learned now is

that this stuff requires a good teacher, and good teachers come

in a lot of forms," he says. "If someone comes up with teacher-proof software, that's

just the beginning of the end. As soon as we start making soft ware that runs itself, we're all losing control."

Software development group Tom Snyder Productions.

guys named Bill and Dave who were thinking of starting an and converted one of my school programs for home use. That

Square with a staff of 17 soft ware artists, writers, and other support people. Their profits

was the first program they

grew from less than $50,000 in

published." That program was Snooper Troops, the company was Spin

1981 to more than $500,000 in

educational software company,

naker, and "Bill and Dave"

were William Bowman and David Seuss, now Chairman of the Board and President at Spin naker. Snooper Troops became the first educational game to make a software industry

"You don't work by committee

bestseller list. In January 1982, Rick

either."

sultant, entered the picture.

in art. You don't in software 40

COMPUTE'S GaietlO

October 1984

operating out of a third-floor apartment to offices in Harvard

Abrams, a young financial con

1983.

But not without stumbling a few times. "I had a few disas ters just hiring programmers and having them program my

dreams," says Snyder. "That undervalues programming as an art, as a personal passion." So what he had to do was to "...go through the laborious approach of finding dreamers who wanted to get excited about some approach, then let them


I FEEL LIKE DANCIN

■ il i] M

SOFTWARE AT A PRICE THAT WILL MAKE YOU DANCE December Premier Issue

Introducing the Gold Disk

Includes:.

A whole spectrum ol quality software lor

your Commodore Won one disk.

A complete data base system Feature article on dala base systems

Issued once a month, the GOLD DISK contains software to meet your every need. Programs that

Home Finance program & tutorial

Learning Basic - Part 1 - tutorial

will educate, entertain and assist you.

2 Arcade Action Games with full

GOLD DISK Is committed to providing you with the best In high quality arcade style games, powerful and easy-to-use applications (word processing, data bases elc.) and enlightening

3D Graphics !

Music of the month Puzzles of tin: month Programmer's corner

tutorials.

and MUCH MORE !!

SUBSCRIBE NOW and you can take advantage of this introductory offer

All this for much less than the price of one game

TO START RECEIVING THE GOLD DISK SERIES, MAIL THIS COUPON (OR FACSIMILE) TODAY!

2179 Dunwin Drive. #6

GOLD DISK

Mississauga, Ontario

L5L 1X3

Canada Name

D 6 months®$54.95 D 12 months®$99.95

Address State/ Province

Ctty

D Check or money order enclosed

D VISA Exp Date

AcctW

Zip/Area

Add SI 00 i"j| MUG 'o» mailing and handling Onttr*. out (ft Mi" III America add S3 00 (Hn IlKIJ Ne*ss1,tnri pflU pffi istue ia $' t 95 U.S

„ Code _

ONTARIO RESIDENTS ADO TO SALES THX

D Mastercharge

Signature of Cardholder

Prices in U.S. Funds Do no! forward cash by mail. Allow 4-6 weeks lor subscription start

Payment must accompany all orders. ■ t RAQEMAHK PENDINd

* COMMODORE MI5* HEOlSIERCO IBADEMARK Of COMltinOFlE BUSINESS MACHINES INC


work and design on their own/' he says.

Snyder discovered some thing interesting along the way. A female visitor to the office one day had criticized a pro gram for being sexist because all the characters looked like men, but loved another program for some reason.

The lights are seldom out at 123 Mt. Auburn Street in Cambridge. The staff of Tom Snyder Productions is encour

aged to reach their speed, get into their own pace, however strange those hours are.

"Like most software devel opment teams, we try to keep corporate culture out," says

and Run For The Money and Making Millions by Scarborough Systems, Inc.

"It's one thins to d° y°ur

dream; it's another thing to

hire a lot of people and then have to lay them off because you haven't made ends meet."

Treating software develop ment as a creative art raises a fundamental question: Do you

design programs that satisfy you artistically, or things that you know will sell?

It's not so impossible to do a little of each, believes Snyder. "There are restrictions in a com

mercial market, but that doesn't TSP's latest program, Rock 'rt Rhythm, turns your computer into a recording studio.

The reason, believes Sny

der, is that it was programmed by a woman. "The trick is not just to have women designing the software, but programming

it," he says. "It became so obvi ous to me that we had a lot of women designers, but they were handing them to men to program,

"The 1.5 million judgment calls that Gabrielle Savage made [when she programmed Spelldiver] were a women's deci

sions, choices of shape, color, position, pacing, plot. "If women are just using tools that men build, they're not finding out what the computer is capable of, given your par ticular fantasy. A graphics per son who is not willing to find her own tools is like a cabinet maker who has no say over what tools he uses." 42

COMPUTEIS GazoltB

October 198J

Snyder. Art, recording, and technical studios, as well as pri vate offices ("no cubicles here") help sustain that, as do frequent weekend trips together. Snyder's analogy for that team's relationship to the rest of

the industry is a television pro

duction crew. "Something like a group that is trying to have sev eral hit series on the air at once," he says. "There's a lot of separate creative production, but they all share production

have to be the end of the world," he says. "It's like a sonnet. That has some pretty explicit rules to it, but there are an infinite number of ways you

can write one." And that thought satisfies him for life. "I love working within tight restrictions. Any

thing has restrictions except for jazz," he says. "Take the pop song, the two-minute-fortyeight-second song—there's so

much you can do. The world has realized that that's just limitless. Symphonies had to go

through lots of transitions, but the pop song continues to

facilities."

amaze people with what can be

And his "hit series" have been picked up by some of the top educational software pub

done."

lishers: The Search Series by McGraw-Hill; Snooper Troops, In Search Of The Most Amazing

"When we successfully elimi

Rhythm by Spinnaker; Agent

glish but we might have done a

U.S.A., Spelldiver, and

bad thing overall for kids' in

Bannercatch by Scholastic, Inc.;

vestment in learning."

nated Nancy Drew from our book list, we may have done Thing, Fraction Fever, and Rock 'n something good for proper En


As Snyder's software devel

opment team continues to chip away at the boundaries of home education, Snyder is turning his attention back to where every thing started for him: the

schools. "I've stayed away from the school market for a few years, but now I'm looking back and

seeing that the kind of stuff done for schools is still the oneon-one stuff: one kid, one com puter," he says. Further, he's concerned

about the struggle that schools are going through trying to in corporate microcomputers into

their teaching process. "There is an erroneous promise, an impli cation that you're going to be able to do quantifiable things with computers. Therefore, it's excited educators and educa

tional consultants who say, fi nally, we can start pinning

down this educational beast. "Whereas good software designers come along and say,

sorry, this is no more quantifi able than a good book or a bad

book. It's an extremely flexible medium and we're going to

have to learn to use it just as slowly as we learned how to use good fiction and good art." So he's back to designing group simulations. "I'm so excited to be doing it again. I feel very morally clear every day when I'm walking to work," says Snyder. "It's cool to think of the computer handling groups of kids well."d

Why be someone who |ust plays computer games when you can be the one who writes their own Impressive machine language programs? LEARN How to Use Assemblers

• Commodore 64 Macro Assembler Development System

Merlin 64 Assembler

Kids' Assembler {INCLUDED In book) Most Others How to Write Assembly Language Programs Designed for Beginners Step-by-Step Instructions Lots of Example Programs

Specifically for Commodore-64 Pick up your copy today at computer stores and book

stores everywhere, or order direct: Send check or

money order for $14.95 (California residents add 6% sales tax).

microcomscribe 8982 Stlmson Court, San Diego, California 92129 (619) 464-3884 or (619) 578-4580


How GAZETTE Readers Are Using Their Computers Bernie Ghiselin

I am totally and ut terly infatuated," says Bruce Kobrin about his Commo dore 64. A San Francisco minis ter, Kobrin keeps track of infor mation about his many parishioners by using his computer.

"It's just kind of fun to play with," Roger Brensinger says

about his VIC-20. Brensinger, an air traffic controller in Waco, Texas, admits he also computes

loan amortization figures and is interested in a biorhythm pro

gram for the machine as well. But the biggest reward for Brensinger is in watching his five-year-old son—"It's helping

him -to learn to count and recog nize numbers"—and his twoyear-old daughter—"She just turns it on and listens to the sound. She doesn't know what she's doing yet, but she enjoys just sitting by it."

From educating children and playing games to helping

with home productivity chores and learning to program, COMPUTED GAZETTE readers are

using their Commodore comput

ers for a multitude of purposes. 44

COMPUTEl's Gazetlo

October 19B4

How do you use your Com modore 64 or VIC-20? COMPUTED GAZETTE put that question to readers in 34 states. The variety of an

dren dominate the machine: "It's hard for me to get near the

thing." And Stephen Gaudet of Rumford, Maine, insists: "I'm

swers we received from this

telling you, it's on all day long. When somebody's at home, it's on."

owners—can be.

Commodore owners may talk about their interests in computer-based learning soft

informal survey reveals just how versatile these computers—and their

Some homes have too many fingers chasing too few keyboards. "We fight over it," says Natalie Adams, a resident of Avon, Colorado, whose 15-yearold son, Tim, usually beats her to their computer. "Whenever I'm not at it," says Ron Long, "they [his wife and children] get a chance occa sionally. The grass is about a foot high out there right now." Long, a school teacher in Ada, Oklahoma, has had both a VIC20 and a Commodore 64. He spends up to five hours a day on the computer. The situation is reversed for John Norton, an editor in Pueblo, Colorado, whose chil

ware, programming, or simply getting familiar with computers for themselves and their chil

dren, but the use most often mentioned in our reader survey was—not surprisingly— education. "The original purpose was

education for me and the chil dren," says Jack Adkins of Bethany, Oklahoma. "But it pro

gressed into a hobby." "Primarily for the kids to

hack with," offers E.F. Gormel of Cape Canaveral, Florida, in response to a question about why he purchased a computer. "To get them familiar with the

keyboard." Even if a parent buys the computer for personal use, there is often a son or daughter some where in the background, learn-


BASIC, A TUTORIAL is a great way to get started on

your Commodore 64. It

helps you to better unders tand your Commodore so

that you can use it with

ease 'and effectiveness.

BASIC, A TUTORIAL is a MIST for both recent Com modore purchasers and

dedicated Commodore

owners. It is a program thai not only teaches vou about

the functions of the 64, but also how to use them to design your own programs.

Complete with two disks

and a comprehensive lessonby-lesson text manual, BASIC,

A TUTORIAL takes you from turning on the machine,

through lessons on all the I1.A.S.I.C. keywords and commands, to finally com pleting your own telephone/name and address database.

Here are some of the

topics vou will cover

through actual hands-on ex

perience: the Commodore 64

keyboard; B.A.S.I.C.

keywords, punctuation, and program modes; on-screen editing and printing;

mathematical operations; subroutines: string handling; system utilities; disk files; and using a printer.

Easy to use and fun to

learn,'no previous program

ming experience is required. BASIC, A TUTORIAL is a program that can be used

by anyone—of any age. Even experienced programmers will find it to be ;t handy

reference guide! It's the first

step to your Commodore 64. BASIC, A TUTORIAL is

only one of 56 new educa tional programs in the Challengeware series.

u

SOFTWARE

P.O. Box 948, Waierbury. CT 06*08 1-800-253-2600 . CT:2(>3-62I-9J&1 1 <Knni-li>fr h i lrjiJ.-m.uk


MiCn»Fun.MicraIjhFThf Hei^l.Oi no &^s. Death m the Cahblx^niCirac Mountain. Shurt Circuit and Marion 5 -■<!': i!.->:»- UT'i! Trddemjrks of MicroLab. Inc Mihit 201^-r and 5crji>vrCaiT|tr r11" ■ i<-r r.-d irad^TnarV-t of Hig Frvc

wijh LompuViJ Bnijldi;: I'ish i-^ r>ni^uynl i:-iHf mirli ^fami ii licenced from

I n r 5l«r Software, Inc Apple, HIM CoJeco. ComEnodorr frl and Aun .irr rfaisirrfJ (tadfniarliiol Ap^ii* Cntnputff, Inc, '■• ■ 'i L mIii i, [ruiiittn«, Int. , Ctimmndorf Elociionic:* \.\d arnl A[jn. tmr. rrtpfriivflf. y


\w

Explosive entertainment If jumping out of the frying pan into the fire is your idea of fun, MicroFun* has some of the

hottest challenges to your skill. These games are dynamite. And we've got the awards to prove that they give you the biggest bang for your buck: The Heist™ won the 1984 Outstanding

Software award from Creative Computing. Boulder Dash™ won the Showcase Award at the 1984 Consumer Electronic Show. Miner 2049er™ won the 1983 Game of the Year award

from Electronic Games. And

now Bounty Bob is back for more heart-pounding adventures

inMiner2049erII™.

You need nerves of steel. A steady hand. And fast responses. Or they'll

blow you away.

That's the MicroFun* trademark: more fun than you can shake a joy stick at. Find out whether you are one of the chosen few who can make it to the highest levels of success. Challenge one of the popular new MicroFun® games — today. You'll really have a blast. All games are available for all Apple II's. Most are also for Commodore 64 • Coleco • IBM • Atari

the fun goes on forever

THE COMPUTER ENTERTAINMENT DIVISION OF MICROLAB, INC

2699 Skokie Valley Road. Highland I'ark, II. 60035 • i:!12) 433-7550


ing BASIC, playing games, or writing school papers on the computer. And the frequently

Shirley Watson carried her new-found interest to the PTA and a fourth-grade class at a

be satisfied."

unspoken reason—although al most always a factor—seems to be the thought that those chil dren need to be exposed to computers as soon as possible. For example, when Frank Graham bought his Commodore computer, he didn't think his children, ages 5, 7, and 13, would become wizards of the keyboard. But Graham, a news director for WTAE-TV in Pitts burgh, didn't want them to face

local elementary school. "I brought a little math program, and I took about ten minutes with each child and asked them if they'd worked with a com puter before," she says. "They picked up on it right away. It seemed complicated until we sat down and ran a little routine through."

his four-year-old son, Robbie, into the world of computers.

the silicon society in fear or ig norance of computers. "All

money for the purchase of a Commodore 64, disk drive, color monitor, and software.

three know what it is and are

not afraid to sit down and work with it," he says.

Watson's presentation was so convincing that the PTA and

the school principal authorized

people into buying one at

A,

lthough computer

gaming remains

At last count, Adkins' software

educational programs

for the computer came together for Shirley Watson of Fort Worth, Texas—but not without some initial convincing that a computer wasn't just a fancy game machine. "I thought, '1 don't need

popular among

are drawing an

increasing amount of attention.

The family's VIC-20 has helped her son, David, now 11, to learn his multiplication tables. And between Shirley's and the children's use of the VIC-20, her husband George was forced to buy a Commo dore 64 just to keep peace in the home and get an opportu

nity to use it as well. 48

COMPUTE!'* Gazsrts

October 1984

"He's learning some of the commands, and he loves to erase. I type in something, and

he hits 'delete.' He thinks that's great. Sometimes we play Avenger, but that's frustrating for him," he adds.

wants to use his VIC-20 to co ordinate. Another reader, 16year-old Eric Jordan of Hiram, Georgia, uses the VIC he

bought mainly to help with his math classes: plotting graphs and trigonometric and exponen tial functions. "The computer is so much

faster. I don't have to work it out the long way," he says. "I

had to learn it all myself." In Brooklyn, New York, Suzanne Bennett, 17, is using her computer in an accounting

Not long after that, five other teachers bought their own com puters to keep in the classroom.

this. If you can show me there's something else we can do, then OK,'" she says. "After about three or four months I was amazed'at all the things I could do."

Arnes, a high school science teacher in Philadelphia.

plants is something Bruce Hartigan of Ferrisburg, Vermont,

readers, it's clear that

An interest in educational computing and an enthusiasm

last four or five months," says

Sequencing grow-lights for

work," he says. "I'm loaded down with just about every game for the Commodore 64." collection contained about 150 disks and was still growing.

"He sits in my lap and we have a sound demonstration tape. We play Pac-Man. And he's picked up his sight vocabulary in the

The list of uses for Commo dore computers is a long one.

The enthusiasm of Commo dore owners we contacted is

typified by Jack Adkins, an effi ciency expert for Oklahoma City Schools: "I've talked 15 or 20

Another concerned parent, Barry Ames, is gently guiding

The cautious first approach and later conversion to com puting have been typical for

many of the GAZETTE readers contacted. "I felt intimidated by it," says Sara Miller, a teacher in Sterling Heights, Michigan. "I felt it was smarter than I was. I wanted to learn it and get my

kids through that kind of feel ing. I hope my kids will be comfortable when it comes to learning BASIC in junior high school. If that's all I get, I'll

course and for word processing in her English classes. Across town in Queens, Mark Peress, also 17, is writing his own data base and filing programs. He

has learned BASIC and is now working on COBOL and Pascal. Among his creations so far is a

space shuttle simulator. "You have to figure out the speed of the launch," he says. "If it's not enough, you crash. It

does orbits, lines up with the runway, reentry, everything." A few teenaged readers are not only using their Commo dore computers for their own school work; they're helping

others manage their affairs. In


COMPOTE!'s GAZETTE DISK COMPUTED GAZETTE is now available on disk. Each month you can receive a fully tested 5Y4 inch floppy disk which will run on either your Commodore 64 or VIC-20 personal computer. Each issue of COMPUTED GAZETTE DISK

will contain all the programs which appear in the corresponding issue of COMPUTEi's GAZETTE magazine. You'll save hours of

typing time and gain hours of enjoyment with all the quality programs found each month in COMPUTEi's GAZETTE.

Here are just a few of the quality programs

which appeared in the September 1984 issue: • 80 Columns For The 64—A two-program package

disk name, change a disk ID, unscratch, and

including "Screen-80," which converts the 64

scratch disk files. For the VIC and 64.

into an 80-column machine, and "Custom-80," which lets you create your own 80-column

• Mystery At Marple Manor—Can you discover

character set with a joystick.

who did it, to whom, how, and where? A mystery text-adventure for one to six sleuths. For the VIC

• SpeedScript Customizer—Tailor the output of

and 64.

your VIC or 64 version of SpeedScript with this easy-to-use menu-driven program.

• Power BASIC: Screen Headliner—Make your own headlines on your VIC or 64 with this routine

• Disk Tricks—For 1540/1541 disk drive owners,

that expands characters to four times their nor

this package of four programs lets you change a

mal size.

Ordering Information To Subscribe: Return the attached postpaid

Individual Issues:

Subscription Rates:

Individual issues of the GAZETTE

One year (12 disks) subscription

DISK can be ordered for $12.95.

$69.95

(In the US and Canada add $1

(add $36 shipping and handling

per issue for shipping and

outside the US and Canada)

card or call COMPUTED GAZETTE TOLL FREE 800-334-0868 (in North Carolina 919-275-9809). All orders must be prepaid—

handling. Outside the US and

send check or money order or

Canada add $3 per issue). In

charge to Visa, MasterCard, or

dividual issues can be ordered

American Express.

by calling TOLL FREE 800-3340868 (in North Carolina call 919-275-9809), or by sending your prepaid order to GAZETTE DISK, P.O. Box 5406, Greens boro, NC 27403.

Two year (24 disks) subscription

$129.95 (add $72 shipping and handling outside the US and Canada)


Deerwalk, West Virginia, Andy Hall, 15, is writing a data base program for a nearby sports shop—"an inventory list for sports equipment, so they don't

have to write it down each time," he says.

Among Andy's more chal lenging programs was a science project that graphically illus trated the triple conjunction of

the Earth, Jupiter, and Saturn— a phenomenon which took place in 1981. "It's not going to

happen again for 270 years or something," he says. If he had turned the project in on time, he

would have had an "A," Andy admits. But he did win first place in an after-school science

fair with his program. Marvin Winston is proving invaluable to his mother and his karate instructor because of his computer. The 17-year-old Conway, Arkansas youth is using a data base program to help his mother, a nurse, keep

track of about 1200 employee accident records. And he's or

ganizing lessons and listing ka rate movements for his karate instructor.

To dazzle his English teacher, Marvin created a graph ics program which simulated the death scene with Brutus from

Shakespeare's Julius Caesar. Using sprites, the program in cludes text, swords, and music.

"She really liked it," he says. Many GAZETTE readers get their biggest enjoyment

from the sense of accomplish ment that comes with mastering

a programming technique or a computer function: "The feeling that I did it all by myself!" one high school student says. Adds a teacher, "Just having the com

puter perform something I want it to do."

Although computer gaming remains popular among readers,

it is clear that educational pro grams are drawing an increasing

amount of attention. And there are those who find that educa50

COMPUTED Gazette

October 1984

tion and entertainment have a common ground.

A favorite game for Bertram Rhoads, Jr., a 70-year-old semiretired insurance salesman in Philadelphia, is a complex

blackjack game which he wrote himself. With the help of his son, a systems analyst in

Chicago, he's now writing what he feels will be an improvement over the blackjack games cur rently on the software market. The new program includes a random factor which simulates the gambling odds at Atlantic City card tables, he says. "The computer is the dealer," says

At the younger levels,

William Arnold is a GAZETTE reader who teaches computing in Cape May, New Jersey, ele mentary schools. "I'm just try ing to get them familiar a little

bit, so they won't be intimidated by the keyboard," he says.

"They love it. They want to know everything about it" Among the programs that he's written is a letter recognition game for youngsters.

At the Oklahoma School

for the Deaf, the students have warmed up to computers in a big way, say Ron and Elaine Long. The Longs teach at the

Rhoads. "It still has to play the rest of the hands around the table. When it finishes with the last player, the computer reveals

a picture or something of identi

what his down card is and

fication," says Ron. "It's more

whether he hits or stays. Then the computer goes around and tells you whether you won or lost." One of the most enthusias tic groups of GAZETTE readers is composed of teachers who are

finding a variety of ways to use their machines. Los Angeles high school teacher Jerry Woodrome has written what he calls a sublimi nal reading program for his own

children, ages four and six. The program simply uses a counter and a loop, flashing a word on the screen 1500 times before skipping to the next word. The program helped his daughter's reading comprehension in two days. "It about blew my mind," he says. "I didn't realize it was that efficient."

The first teacher to suggest using a computer at Indian River Junior High School in Chesapeake, Virginia, was GAZETTE reader Kathy Dulaney, an eighth-grade teacher. She brought her own VIC-20 to school and began using simple vocabulary exercises. "We can change vocabulary from week to week," she says, "erase their data and then put in our words."

school and have used the ma chines extensively. "Most of the programs have

fun. The deaf have a lower reading level. They don't get the input a hearing person does." Before the arrival of the computers, few of his students could pass the driver's license test. Then they put together a computer-based tutorial. The

result? "Everybody who's used it has gotten 100 percent," says Long.

Despite the heavy emphasis on educational uses and gaming, gazette readers are in volved with many more areas of interest as well. There are ham radio operators using their com puters to read Morse Code. Real estate, commodity, and stock brokers are running programs that organize their trading activ

ities. Whether they are college professors, hospital managers,

business executives, or any of a hundred other occupations,

readers are using spreadsheets, data bases, word processors, and other applications.

In Houston, Luther Barnhill keeps track of monographs for his academic papers. A retired mycologist with the U.S. De partment of Agriculture, Barnhill may need to list 150 abstracts for a single paper on which he


The Fast BASIC Compiler A stunning show delighted the crowd at the Whisman Theater in Mountain View last night. Called BLITZ!, loaded and performed by Robert Skyles in a one-man virtuoso programming display, the show fea tures the spectacular compiler for

"...BASIC pro grams running up to 20 times faster"

the COMMODORE 64. The BLITZ! com piler is faster than

PET SPEED, and faster than any

other Commodore

compiler that has appeared to date. Shortly after Skyles took his seat and inserted BLITZ!, he had normal

BASIC programs running up to 20 times faster after he BLITZed them. The performer explained that BLITZ! translates the slow BASIC

language into a much faster code, thus improving the performance of the BASIC routines. BLITZ! reads the entire BASIC program, decides which operations only have to run once, and compiles the operations. It then re-writes the program into

its special P-code. Skyles also showed how BLITZ! adds security to your programs, because once a program has been compiled, it is not readable. That means protection is an automatic

part of the re-writing. The highlight of the show was, for this reviewer, when BLITZ! compiled

a string of BASIC programs such that one loaded the next. An im pressed audience looked on as

Skyles effortlessly passed informa

tion from one program to another.

BLITZ! on disk for the Commodore 64 costs only $99.00.

(You can also get one for the older PET CBMs on a special-order basis. It puts on quite a show!)

Flertrir Works SouthWhismanRoad

Mountain View, CA 94041 i7iic

-I I JO

Available from your local Commodore 64 dealer or

caM ^-Âť00-227-9998.

BLITZ! is a trademarWof Skyles Eleciric Works.

ComitiodoreisatfademarkolCommodoro.


is working. Denise Van Dosen of Marine City, Michigan, keeps

track of Girl Scout activities

cessfully interfaced his VIC-20 with a home burglar alarm, al though the initial efforts pro

country pastor for 33 years, is getting plenty of use out of his

duced some overheating. "But it

ernacle of the Pentecostal Church of God [M46 is a high

Commodore 64 at the M46 Tab

with her computer. Policeman

did work," he says.

Dan Mathena of North Granby,

Among the programs McDonald has created which his

Connecticut, records arrests, cars stopped, mileage, and other fig ures. "It helps me to see things I couldn't see before," he says. "Now we can know the per centage of drunk drivers [as compared to] motor vehicles stopped." When she can wrestle her children away from the com puter keyboard, Natalie Adams of Avon, Colorado, uses her Commodore to keep track of condominiums for a local man agement company and for mass mailings to the homeowners' association.

In Seneca, South Carolina, lab technician John McDonald has reached the point where he can send out his own programs for possible publication in com puter magazines. He even suc

family finds useful is a grocery shopping list data base that in cludes about one hundred items. "We buy basically the same things, but not the same thing

each time," he says. "We pick out certain items before we go, and it gives us a subtotal of the grocery bill before we go there. I know we save ourselves money. We know when we go what we want and don't let our

selves spend more." Dale Bishop sells ads for a telephone directory publisher, and he takes his VIC-20 along on the road trips. The Vandalia, Illinois, salesman plugs the computer into his motel room's television set for a few quick games.

way] in central Michigan. He has started a Bible school on Saturday mornings,

and uses word processing for his notes and quizzes. A data base program helps him keep track of about one hundred fam ilies. And he uses his printer for mass mailings. Skirvin is even writing his own data base pro gram now. "I would like to in

clude more information for each family," he says. Skirvin says he's probably one of a minority of ministers around the country using a

computer the way he does. "There are not too many of them that have a similar inter est." But when it comes to com

puter use, he admits he knows the shape of the future. "1 see it mostly among the young people

The Rev. Jack Skirvin, a

of the church." V

Your Commodore Just Got Two Times Better INTRODUCING SPRINT PRINT AND COPY Q Sprint Print: The primer buffer (or the Commodore 64. Sprint Prim gives you control of your computer while printing, remembers everything, and enhances printer speed. Sprint Print

Wii'f?

gives the 1525 and 301 printers true descenders and underlining

$45.95!

CopyQ: The High-Speed Disk Back Up Program (or the Commodore 64 thai backs up your copyprotected

software. Copy Q recovers remaining data and files that have been lost to disk errors. No other C-64 copy program works better. Copy 0 is fast, more reliable and easier to use S45.95!

TO ORDER CALL (612)831-1088

DISTRIBUTED BY RADIX MARKETING

5223 W. 73"D ST

MINNEAPOLIS, MN 55435


fiDULT FUN! COMPU

COMPUTRIVIA WILL CHALLENGE THE FRIENDS YOU CARE TO ENTERTAIN 6 players or teams can play in a comfortable, party aimosphere. NO CROWDING THE KEYBOARD

sit back and enjoy! QUESTIONS, HINTS AND ANSWERS FROM 8 GREAT CATEGORIES Over 1300 contemporary non-repeating questions about interesting people, places and events.

Time running out? Need a hint? No problem . . . Want your favorite category? Choose it... if you can. A PERSONABLE GAME WITH PLENTY UP ITS SLEEVE Computrivia knows your name, watches your score, provokes and jokes as you play. With spontaneity and wit, it tells you who's ahead and who to watch out forll Bonus situations tooll ALL AT THE PUSH OF A SINGLE BUTTON For questions, hints, answers and scores. NO MORE KEYBOARD BLUESI â– FUNFORMATION' Facts to discover. Fun you'll enjoy.

err

EX I I.K cc-npuier aided products Inc. by

The FUNFORMATION People p

0

Oakvi||B

Om>rio

For the Apple II b lie. Cornmodore-64, IBM-PC. PCjr and their respective compatibles, sen your dealer or cornet Eutok computer aided products Inc. Apple is a Registered Trademark of Apple Computer. Inc. Commodore-64 is a Registered Trademark of Commodore Electronic* Ltd, IBM In a Registered Trademark of International Business Machines Corp.

COMPUTRIVIA is a Trademark of Eatak Computer Aided Products Inc.


Race through the galaxy in a dilithium-

cannon on the surface against which the ship's shields are totally ineffective.

mountains, and the dreaded plasma cannon.

Upon arriving at the planetoid, a mining team is beamed down to the larger of two moun tain ranges. While avoiding the drones you must beam up the mined dilithium crystals. Fortu

You are the captain of a starship en route to Delta Minor on a mission of mercy. The research outpost is battling a mutant virus of their own making. Your ship has been ordered to assist in decontaminating the outpost and saving the personnel. Due to the nature of the emergency, you proceed at maximum warp. Unknown to you, however, a defective cou pling in the main power housing is unable to support the added strain. When it fails, you tem

nately, phasors are operational. You are reluctant

powered starship. But watch out for drones, For the 64.

porarily lose warp drive. In the process, the

ship's dilithium crystals are destroyed. The ship must proceed on auxiliary power until new

dilithium crystals can be acquired. Long range sensors indicate a nearby plan etoid that contains the needed crystals. Unfortu nately, the planetoid is guarded by numerous

drones, normally not much of a threat. However, with shield energy so depleted, they can become a deadly menace. In addition, there is a plasma

to use them, however, because of the associated energy drain.

Avoiding The Drones When the program is run, the screen clears and a

wait message appears. At this point, the program is moving the character set to $3800(14336). This is done to reduce sparkle, which interferes with the sprite collision registers. Then the program asks you at what level (1-4) you would like to

play. This determines two things: how fast the drones adjust their orbit to collide with the starship, and how active the plasma cannon will be. Once fired, you must avoid the plasma ball from this cannon at all costs. It will destroy your ship on contact. Fortunately, the drones do not affect your

shield energy while the plasma cannon is firing. The plasma ball has enough fuel for about two


UICKSILVj All Titles available from:-

. 426 West Nakoma San AntonioTexas78216. (512) 3' AQUAPLANE

ULTISYNTH

PURPLE TURTLES

ANT ATTACK

FRED

BUGABOO

IQS)

Available on the COMMODORE 64"'. Disc or Cassette


full orbits. In normal mode (no plasma ball), the drones cost about 15 energy units per hit. If

accompanying table along with a brief descrip tion of their individual functions. These com

shield energy is depleted, the starship will crash

mands serve as extensions of BASIC. They are

and the game is over. Phasors will destroy the drones, but no points are awarded since your

independent of one another and thus are avail

mission is peaceful, and weapons are defensive.

able individually for use in programs other than "Trek." These modules are grouped together via

It should be noted that phasors do cost energy, If used sparingly they can help; but, generally, avoid using them.

BASIC in lines 100-200, which form the main loop of the program. In addition, lines 8000-8035 form the plasma cannon loop.

When the game ends (either by completing two orbits or by being destroyed), you will be asked to play again (P) or end the game (E).

■//mm,

Machine Language Modules ML

Memory

BAM

49407-49459 Checks sprite collision registers to see ii

Routine

f

asm mm mm* jj

Si score

' LErTHErf

1

*

drones hit starship (sprites 1, 2, 0 against 3) and moves eliminated drones off

MOVE

49232-49275 Checks to see if sprite 3 is above or

PHAS

49472-49531 Checks to see if space bar is depressed and rapidly scrolls sprite 6 (phasor) across screen if so; also checks for col

below the drones and moves sprites 0, 1, 2 up or down if so.

:rsr-oh=

DOM

Function

screen.

it

Location

CRSR-RT=

UP

.

lisions between sprite 6 and sprites 0, 1,

U=BEflrl-UP

arid 2.

SPACEBAR^

Main loop 828-886

FIRE

After being called by the hardware inter rupt, this routine scrolls sprites 2, 4, 5 one pixel to the left. It scrolls sprite 1 two

pixels and sprite 0 three pixels.

L

J

Your mission is to find energy crystals while avoiding the irksome drone ships.

Ship Operation The ship's controls are: the cursor keys, which

provide positive and negative orbital thrust; the space bar which engages phasors; and the T key, which controls the operation of the transporter. This can only be used directly over the large mountain and while in a low orbit. The moun tain will flash yellow and the shield energy will increase as new dilithium crystals are beamed aboard.

The score is based on the time that has elapsed since the start of the most recent game

minus the number of direct hits on the starship. The high score of the last successful game is compared to that of the present game and the result is logged under high score.

Machine Language Routines For Special Effects The action in "Trek" is controlled almost exclu sively from machine language (ML). The ML routines are in modular form accessed from BASIC via SYS commands. The various memory locations are assigned variable names, such as "SYS THRST" (thrust) and "SYS MOVE".

A list of these ML modules is included in the 56

COMPUTE! s Gazette

October 1984

Hardware 989-1002 Interrupt reset

THRST

890-951

This must be called before the main loop machine language above can operate. It tolls the IRQ to look at 828. Checks keyboard to see if either cursor key is depressed and scrolls sprite 3 up or down if so.

Another area where ML is used is in the

scrolling of the background. This is a routine in serted into the interrupt routine performed 60 times a second. This inserted routine allows the mountains and drones to be scrolled across the screen without taking time out from the main loop. This also makes the play much smoother. Lines 600-899 contain the DATA statements that comprise the ML discussed above. Lines 500-598 contain the sprite DATA statements. Lines 900-998 set up the playfield. Lines 1100-1379 contain the introduction screen.

The lines at 3000 control the game restart and associated variable resets. Finally, the lines at

4000 control the victory screen received after the successful completion of this phase of the mis sion. The other lines are for the most part self-

explanatory. Sound in Trek has been embedded as much as possible to maintain smooth action.

If you would like a copy of Trek (tape only) send a self-addressed stamped envelope, a blank tape, and $3 to: Andrew Beery 2020 East Park, #202 Milwaukee, W 53211

See program listing on page 172.0


WlTl-l NIGHT A/USSIOIM

You deserve the best. You've earned it. Now reward yourself with a session of Night Mission PINBALL, the most realistic and challenging arcade simulation ever conceived! ■ Stunning graphics and dazzling

—\ soundeffectsputNightMisslonPINBALLinaclassby(tself.Gamefeatures:multi-

uTtuli'.;

)' • *j —«M

1 ball and multi-player capabilities, ten different professionally designed levels of play,

and an editor that lets you create your own custom modes. ■ So take a break with

* I I 1983 Arcade Award for Best Computer Audio/Visual Effects.

See your dealer...

or write or call for mote information. For direct orders please add $1.50 lor

shipping and specify UPS or first class mail delivery. Illinois residents add 5% sales tax. American Express, Diner's Club, MasterCard, and Visa accepted.

Corporation

Order Line: 800/637-4983

Champaign IL 61820 (217) 359-8482 Telex: 206995

713 Edgebrook Drive


.-*

MikeScharland You're in the labyrinth of an ancient Egyptian

There was ho need for a vertical wraparound fea ture to prevent you from appearing on the other

the maze to the treasure while evading the tomb's guardians is the challenge. For the VIC and 64, a joystick is required.

side of the guardians by going off the screen. The

tomb, searching for treasure. Getting through

You are a brave Egyptologist, seeking relics and treasure in the pharaoh's tomb. Using a joystick to maneuver your character, you must evade the three guardians of the tomb to retrieve the treasure from its resting place in the wall. Inside the treasure room, many columns and walls form a labyrinth to hinder your progress. You cannot pass through these walls, but neither

can the guardians. The amount of treasure you find depends on how quickly you travel through the labyrinth. This program consists of one very short main loop and a large number of subroutines. The main program loop, lines 18-91, is designed for speed.

screen border is made of the same character which

is used for the walls. The regular program loop checks for and does not allow a move into one of these characters, so you cannot move off the screen.

The subroutine at line 2000 creates the random screen. The subroutine beginning at line 3000

creates the custom characters. The subroutines

beginning at lines 4000 and 5000 are used when you either meet your end or grab the treasure. If you don't want to type this program, send me a blank cassette, SASE, and $3. I'll return your tape with two verified copies of the program (VIC version only). Mike Scharland 3640 Halsled Blvd.

Steger, 1L 60475

See program listings on page 151.

YOU GRAB

T

I'?11. :•'■■■■;.>,.:

• ■ i M/.V ».'■ •■ i' iw Two guardians are about to capture the player in the VIC version of "The Tomb." 58

COMPUTE!'* Gazette

October 1984

The intrepid explorer has made it through the labyrinth (64

version).

'


hy settle for hen you can have —.

■ h. ..,..7'r-"*"

In ho during Mltey Mo, the ready-to-go modem

thai turns your Commodore 64s

Into a telecommunications giant. Mitey Mo is the complete—and affordable—telecommunications

USI umvo

couuodobx

YES YES NO

Smooth Screen Scrolling

YES YES YES YES

Both Cassette and Diskette Software Included

YES

NO NO NO

MODEM FEATURES

Auto Dial Auto Answer

Auto Redial

system for your Commodore 64. It will open up a world ol practical and exciting uses for your computer, and

Menu Driven 24K Software Bufler

it will take you online faster and

Function Key Template

easierthan anything else you can buy Now you'll be able to send and

receive electronic mail, link up with community bulletin boards, play

computer games with people in dis tant places, do electronic banking, and tap into library resources to find the material you need for your reports. All at your convenience. Until Mitey Mo, Commodore's

1650 Automodem was the obvious choice when you went looking for a

Bell 103 Compatible

YES YES YES YES YES YES

Multiple Baud Rates

YES

Printing Capability Easy-to-Use Manual

Dual Cables Included Single Swllch Operation Warranty

YES YES 3 years

AUTOMODEM

NO

NO NO NO YES YES NO NO 90 days

Some mighty Interesting features—

ours and theirs. Yours to decide.

modem lor the C-64. Like Mitey

and you find that it's busy Mitey Mo has

Mo. it has "auto-answer"— it

"auto redial"- it hangs up and redials immediately until it gets through. With the other modem you have to redial each time—and somebody with auto redialing can slip in ahead ot you.

receives data while unattended. And both modems

are "auto dialers", —you dial right on the compu ter's key board. But that's about where theirj similarity ends.

Suppose! you dial a number.

easy to use. With the other modem you'll have to remember to check three switches, otherwise you may

be answering when you mean to be originating.

Mitey Mo gives you access to twelve pages of memory (24.000 bytes), so you can store data and review or print it later. The other modem doesn't let you store or print anything, Mitey Mo is half the size of

the other modem. The very latest technology allows miniaturization

and increased reliability, as well, Mitey Mo is so reliable, we gave It a three-year warranty The other modem gives 90 days, then you're on your own.

Not only will you find Mitey Mo

mtghty useful, you'll find it mighty rea sonably priced. When you consider how much more you get for the money there's really no other choice.

Mitey Mo is menu-driven. It lists the things you can do on the screen. Select a number

and you're on your way Since Automodem isn't menu-

driven, you'll be hunting through the manual a lot, Mitey Mo has only one switch, the customized soft

ware does the rest. Every family member will find it

USI

71FarkLane

Brisbane, CA 94005 (415)468-4900


Cabby Ken Jones

Deliver customers to their _

depends on the distance from pick up to drop off

the vicious trolley cars, and try not to run out of gas. For the VIC (with at least 3K

the fare collected.

destinations in your taxi, but watcfi out for expansion) and 64. A joystick is required.

point. You also get a random tip proportional to

Trolley Cars And Traffic Lights Trolley cars hate cabbies and will crunch you any

The object of "Cabby" is to drive your cab around the city picking up passengers and dropping them off at their desired destinations. If you earn $200 and get all the money back to the depot before

wrecking your hack, you get to buy your cab and

chance they get. You can pass a traffic light only if it is green. A red or yellow light stops you in your tracks. To make things even more sticky, you have to watch your gas consumption. Pushing the fire

win the game.

button on the joystick gives you a gas gauge read out on the lower portion of the screen. If your

Using The Radio

tank is near empty, head for the gas pump near the bottom right of the screen. You'll hear a pump sound when filling up.

Messages sent from the dispatcher are flashed on

the bottom lines of the screen. The messages tell you to go to the airport, go to the zoo, etc. Head for the appropriate letter on the map (the first let ter of the name of the location). You cannot pick up passengers at any destination except the one to which you have been dispatched. The one excep tion to this rule is the street man, who appears randomly from time to time hailing your cab. You can pick him up anytime your cab is empty. After picking up a passenger, you must take him or her to the required destination, which ap

pears at the bottom of the screen, Your cab fare 60

COMPUTE'S Gazette

October 1984

Don't get caught heading for a red or yellow traffic light with a trolley car close behind. Chances are it will not change in time to save you

from your fate. The trolley movement appears to be random and no threat to you until you move into its line of sight. But they bear down on you when they see you.

Don't wait too long to gas up. If you run out of gas, the trolleys get nine turns (the time it takes you to walk to the gas station and back with half a tank of gas) to close in. Head for the pump when it's clear of trolleys. Most of the time there


As the hero In this

In GEOPOLmQUE 1990* you play the President of the United States while the computer assumes the role of the Soviet

fantasy ad

Politburo. Your objective: the economic, political and

venture role-

military dominance of the world. On 64K disk. S39.95.

playing game,

As the

pilot of eWorld War II e-17

bomber in this

you must battle

role-playing

hordes of deadly

game, can you

monsters as you

survive 50 danger ous but exciting raids over France and Ger

seek out to destroy

the evil wizard, Man tor. Use your strength,

many to eam the crushed cap of a

dexterity, intelligence and charisma to

true veteran?

Find out as you travel back to

the Fullest in your treacherous journey to

1942 as part

save the

of IheBth Air Force Bomber

Questron

Empire. On64K

Group.

On64K

disk.

S39.95,

disk.

S39.95.

BALTIC

1985', third in

This lightning-

series "When Superpowers

fast space

Collide," starts with an uprising ii

game not

only lets you

Poland, which has

command a

siphoned off some

starfleet In com

Soviet troops In East

bat, but It allows

Germany. NATO decides to attempt a rescue or Its forces under selge In Benin. It must strike with utmost speed

you to deilgn your

own ships. Variable

ship parameters In clude engine power and drive, weapon

and ferocity — before the Russians return I

CARRIER FORCE' is the WWII simulation of the major flat top battles fought \n the Pacific when the U.S. and Japan

On64K disk.

were still evenly matched in naval power. It Is so detailed,

every shfp and plane Is taken Into account It Is one monster of a game in scale, yet Ifs so easy to play! On 64K disk. $59.95.

$34.95.

1 OUT COMMODO l( there are no convenient stores nearyou, VtSAA M/C holders can order direct by calling 800-227-1617, art. 335 (toll free). In California, call

800-775-3545, x335. To orderbymail, send your Check tO: SSI, 883 StferCOMMODOM 64* Ii â– tndcnrk of Commodore Ekctrenlo, ltd.

and defense systems, number of transporters and space

marines. OnMK

disk.

S39.95.

Is color ca VI t.*( R lln Road, BUg. A-200, Mountain View, CA94043. Please include Se.OO u Shipping & handling. [California residents, add 6.5% sales tax.) All SSI game* carry a 14-day "utbfactlon or your money back" guarantee.


Deposit money in the depot to keep it safe (VIC version).

The dispatcher's messages appear at the bottom of the screen. A customer is waiting at the office (64 version).

is one guarding the pump, making it difficult to get gas when you need it most.

Line 50 copies the first 64 characters from the ROM character set at 32768 down to RAM. Line 55 copies the special characters, 13 in all, into locations in protected memory. Line 60 sets the joystick variables. Line 65 dimensions the array variables.

Some letters are found on the city map more often than others, for example school, theater, and restaurant. Remember, the farther ones will return you more money, You get more for north-south movement than for east-west.

Line 66 reads place names into the string

Finally, you can drop off your money on hand at the depot anytime. Your final score is the cash you have cached at the depot, not the

variable F$(I).

amount you are carrying.

frequently throughout the program. FNA(X) = INT(RND(1)*X)+1 gets a random

In the VIC version there are four levels of

Line 150 initializes screen variables.

Line 160 defines two major functions used

difficulty: 1, the easiest, to 4, the hardest. At level

number from the 1 to X by simply using FNA(X),

1, one trolley car moves for every move your cab

where X is the highest number we want a chance

makes. At level 4, all four trolley cars move for every move your cab makes. It's best to start at level one before trying higher levels.

to generate. For example. X=FNA(20) makes X a random number from 1 to 20. This saves mem ory if you are doing lots of random number

Adjusting For VIC Memory

generation. The second function is FNL(Q) = H + 22*Y + X, which lets you plot any

Program 1 was written for the VIC with 3K mem ory expansion. If you only have an expander that provides 8K or more of additional memory, you must delete line 5 from Program 1, Then, each time you load Cabby you must first enter the following lines: POKE 43,Is POKE 44,32iPOKE BI92,0:NEW POKE36869,240iPOKE 36U66,150:POKE 648,30:

PRINT

"[CLR]"

Tracing The Program (VIC Version) Line 5 protects memory for special characters: multicolored cabs, depot, traffic lights, the street

man, and trolley cars. These are protected by lowering the top of BASIC memory in the 3K ex panded VIC to 7168 instead of 7679. Lines 10 and 20 alert the user that special

graphics are being generated. 62

COMPUWs GanHlo

October 1984

thing on the screen at a particular spot by giving the X and Y coordinates of the spot you want.

Both X and Y must be set before the function is called. In this case, Q is a dummy variable, and its value is not important. It is required by the syntax of the DEFine function statement. Y is the line or row number from 0 to 22. X is the column or character position from 0 to 21. For example, if we found the following line in our program X=10:Y=10:POKE FNL(Q),0

the computer would put the street man character zero 10 lines down and 10 columns across on ogr screen.

Line 170 initializes the traffic lights.

Lines 180-190 determine the level of difficulty. Line 195 changes the character register to point to the protected RAM area rather than the ROM area 32768.


Line 200 calls the subroutine to draw the city map.

Lines 210 & 220 initialize a few more variables. Lines 300-390 control the program.

The main program is set up as a series of subroutine calls. This makes adding new ideas much easier. All you have to do is write the subroutine and then add the calling line to the main loop. The subroutines called by the main loop are as follows: Lines

Subroutine

500-630 joystick and cabby movement 1000-1020 traffic lights 200O-Z020 dispatcher call to cabby 3000-3300 draw city map 4000-4700 passenger pick up or drop off 5000-5240 trolley car control 6000-6095 game over (crunched by a trolley car) 7000-7040 draw street man 8000-8040 depot (deposit money)

The 64 Version The Commodore 64 version of "Cabby" has different trolley movements, and only two difficulty levels. In this version, the trolleys run on predetermined routes. If your cabby happens to be on the same route as one of the trolleys, that trolley will chase the cab until it hits it, or reaches the end of its route.

Difficulty levels, in the 64 version are based on the number of destinations avail able to the cabby. For instance, in both ver sions, the computer prompts you to go to a

specified location—say a school. In the easy level, there are several different schools on the screen, in the hard level, the computer

randomly picks one particular school as your destination. To move the cab, use a joystick in port 2. You can move the cab in four direc

9000-9150 fill up at gas pump 9600-9660 gas gauge readout routine if fire button

tions—left, right, up, and down. Diagonal

pushed 9700-9770 out of gas routine

destination, or to pick up the street man. He can get into your cab only when there is no

See program listings on page 153.

movement is allowed only to enter a

destination message flashing on the screen. flj

We know. You've been looking everywhere for 64 software, INSTA's interactive line of software is just a phone call away.

ISN'T IT TIME

you cooled off your 1540/41 disk drive? Compu-Cool is a filtered cooling system that will eliminate those problems associated with heat in your disk drive, like head

Imagine, specially designed software that "talks" to one another. Your home budget created with CALC instantly becomes a GRAPH. And your club membership list with addresses and

monthly dues quickly becomes a form letter, printed over and over again,

alignment Compu-Cool mounts

automatically, for each member.

directly on your disk drive without

So, no more lookin around. INSTA is

any hardware!

here now!

Send $39.95 (plus $2 shipping) to:

SOUTHWEST MICRO SYSTEMS Inc. 2556 Royal bits Dallas. Texas 75229

Or Call Toll Fm 1-800-527-7S73 In Texas Call (214) 484-7836 Free Catalog Upon Request We accept:

VISA, Mastercharge & A.E.

COMPUTED Gazette

October 1984

63


for families

A Journey Through The Land Of The Buddy-Bots Fred D'lgnazio, Associate Editor

Software Fairy Tales Software developers looking for new approaches to early-learning software could spend a profit able afternoon visiting and browsing through a good children's bookstore. If they wander through a bookstore, they'll

(Madeline), Maurice Sendak (Where the Wild Things Are and In the Night Kitchen), and Mercer Mayer (One Monster After Another and There's a

Nightmare in My Closet).

My children weren't the only ones who loved these books. So did their parents. The

notice that most paper-and-print materials for young children are centered on stories. Even the youngest children are fascinated by stories about other children, animals, and creatures—both realistic stories and make-believe stories. Often these stories carry significant educational mes

characters, the stories, and the pictures charmed all of us. So we read the books over and over again—as much for our entertainment as for our

sages, but the messages are artistically hidden within a strong plot, and expressed through the medium of lovable, realistic characters.

The most important ingredient missing from

I'd like to see more programs designed along these same lines. We've had enough programs for young children with weak, poorly developed story lines and insipid characters. What we need

now are software fairy tales—stories and charac

children's.

Programs With Personality most early-learning software now on the market is personality. There are no interesting characters for children and parents to care about. The world in which the software action takes place is usu ally so artificial and sketchy that we have no de

sire to go back to it. And the story line is usually

Most families with little children have at least a

nonexistent. This is why when 1 saw an announcement for a new line of software by Mercer Mayer, one of my family's favorite authors, 1 got very ex cited. Perhaps Mayer's programs would have strong characters, stories, and personality, just

small collection of children's books. And some of

like his books.

ters that "come alive" when the child turns on the computer.

Not For Children Only those books are well-worn, well-read, and

special. When my children, Catie and Eric, were

younger, they had several favorite books and several favorite authors (and. illustrators). Among their favorites were Judith Viorst (Alexander and the Terrible, Horrible, No Good, Very Bad Day), H. A. Rey (Curious George), Ludwig Bemelmans 64

COMPUTED Garene

On the other hand, I was worried that the

programs might be as shallow as the other

October 1984

"celebrity" programs I had seen. Celebrities in sports, the movies, books, and records have been making software for the last year and a half, lending their famous names to rather mediocre programs. I was afraid Mercer Mayer's software might not be as wonderful as his books.


Get more out of your Commodore with

COMPUTED For Owners And Users Of Commodore VIC-20'And 64"' Personal Computers

More fun

More programs Programs lo help you balance your

checkbook, store your addresses, keep tax records, manage your personal business. You con create your own pro

grams and games, improve your wordprocessing, spreadsheets and data base management, load and run faster with 64 Searcher, VIC/64 Program Lifesaver, Ouickfmd, Word Hunt, Disk Menu,

VIC Timepiece, Automatic Proofreader and more.

Martian Prisoner, The Viper, Skydiver, Snake Escape, Demon Star, Cyclon Zap and Oil Tycoon are just a few of the ready-to-run gomes you'll find exclusive ly in COMPUTERS Gazetteecch month. Just type in the programs and watch your screen explode with colorful new

More savings You can save up to 40% off the news stand price of COMPUTER'S Gazelle by subscribing now, All you do is mail the coupon below or the postpaid cord bound into this issue. But don't delay!

Subscribe now to start receiving every

issue of COMPUTE! s Gazelle.

SAVEtM0%

computer game excitement.

ON COMPUTE'S Yes! Start my subscription to COMPUTE! s Gazelle at big

savings off the newsstand price:

More challenge

D 1 year $24—Save $10

D 2 years $4 5—Save $24

Ready to tackle more advanced projects?

O 3 years $65—Save $36

In COMPUTEI's Gazette you'll learn How to Use Tape and Disk Files. How to Pro

Name

gram the Function Keys. Writing Trans

portable Basic. How to Make Custom Graphics Characters. New Ways to

Enliven Programs with Sound. One Touch Commands for the 64. How to use

Machine Language. Speeding up the VIC 20—and much more! Children will learn and develop new skills with Stales & Capitals Tutor, Wordmatch, Munchmalh, WordspeJI, Connect the Dots, Aardvark Attack and Alfabug. Computing for Kids, a regular monthly feature, will uncover new ways lo involve your children in computing.

Address .

More buying guidance

City.

Stale

You'll profit from comprehensive reviews

Charge my

of everything from data-quality cassette

D Visa D MasterCard D Am. Ex.

tapes to soflware lo graphics plotters and modems. Virtually anything that's compat

Account No.

ible with your Commodore is reported

COMPUTE'S

on in COMPUTE'S Gazette. With this

kind of expert help, every computer pur chase you make can be the right one!

Zip.

□ Payment enclosed O Bill me

I

Exp. Date

CAILTOLL FREE 800-334-0B6B

P.O. Box 961, Farmingdalo, N,Y. 11737

J


A Journey Inside The Computer MY

The manual to Tonk in the Land of the Buddy-Bots is excellent. It is short, clear, and full of cartoons and screen photos. And it begins by leaping right into the story:

PIECES

ARE

LOST

BUDDY-BOT LAND. YOU

MILL

COME

FIND

□ a a

in in

nan

itim

THEM?

PRESS:

Y/N

Meet the TinkTonks! Imagi?ie that you have become a beam of light and are magically swept along in side your computer. Below you is a deep

blue sea crisscrossed by a glowing grid. Above you is a peach-colored sky. On the Horizon, little disk-shaped islands float in

the air above the CrissCross Sea. You fly down for a closer look. On the islands are mountains and valleys, lakes and rivers,

Tonk And The Buddy-Bots Mercer Mayer's first program, Tonk in the Land of

the Buddy-Bots ($39.95 for the Commodore 64), is part of a future line of eight Sprout programs for children ages 4 to 12. Mayer's software develop ment company, Angelsoft, is publishing the pro grams through Mindscape. For more information contact:

Mindscape, Inc.

3444 Dundee Road Northbrook, 11 60062 (312) 480-7667

Solid Packaging When I got Tonk in the Land of the Buddy-Bots in the mail, the first thing 1 noticed was the un

usually nice packaging. The program materials come inside a red

hard-plastic case the size of a trade paperback book. Like a paperback, the case has a spine label so the software can be placed on a book shelf—in a bookstore, a library, or home—along with other children's materials. On the front side of the case is a nice car toon featuring Tonk, with some of his Buddy-Bot

friends in the background. Tonk and the BuddyBots are honestly portrayed on the cover and elsewhere in block-graphics form, instead of as smoothly drawn cartoon characters. This representation does not detract from their charm or humor.

On the back of the case are two screen photos of the program and lots of information about the contents of the package (handbook,

warranty, disk), the machine requirements to make the software work (Commodore 64, disk drive, color monitor or TV, joystick optional), the age group the software is targeted for (ages 4 to 8), and the educational benefits. (Among other

things the programs help children improve their concentration, their memory, and their visual discrimination skills.) 66

COMPUTEfs Gazatts

October 1984

forests and fields. One island even has a little town with houses and streets. You have found TinkTonk Land, the home of the TinkTonks. The reader is introduced to the TinkTonks, including their trusty leader Tink; Zoomer, the speediest TinkTonk; Boomer, the biggest

TinkTonk; Teep and Beep, the little twin TinkTonks; and Tinka, the best Tonkerball player in the land, In addition, the reader meets Tonk, who is Tink's best friend, and the TinkTonk who usually gets in the most trouble. When the program begins, the first thing we see is Tonk and four Buddy-Bots on the screen dancing. The Buddy-Bots are hilarious. There is a dancing creature with rotating eyeballs, a

wheeled "bot" with crossed eyes and shimmy arms, and a jogging creature with bug eyes. The music makes the dancing, gyrating crea tures seem part of a musical play. The creatures, Tonk, and the music whet your appetite for more story and more adventure.

The next thing you see is a simple menu. If

you press 1, you go directly into an adventure. If you press 2, you get to play Buddy-Bot games. My advice is to go on the adventure. The games are good, but the charm of this program is

in having your child play the part of Tonk and helping out the Buddy-Bots. The games are much

more effective when they are played as chal lenges faced during the course of the adventure.

Find The Buddy-Bot Parts When you and your children choose "Adven ture" on the menu, Tonk and a Buddy-Bot appear on the screen along with this message: "Emergency! Emergency! Trouble in BuddyBot Land! A Buddy-Bot's parts are scattered everywhere. The Buddy-Bot needs Tonk to col lect his parts and put him back together again." If the child presses Y at this point, he'll look for scattered parts of the Buddy-Bot shown on


"Now Your Commodore 64 Can Print Like a Prol"

s

":'■"

Grappler C5 Printer Interface

The Revolutionary Printer Interface for the Commodore 64 TM A New Era in Commodore Printing Power.

• Prints Screen Graphics Without Software

Grappler CD offers the first complete answer to

• Graphics Screen Dump Routines Include

your printer interfacing requirements, with many

powerful capabilities unique in the Commodore marketplace. Complete signal translation allows many popular name brand printers to operate

perfectly with the Commodore 64, or to imitate Commodore's own printer. Even Commodore's graphic character set can be reproduced on Epson, Okidata, Star, ProWriter and other popular printers. Exclusive Grappler CD features provide a variely of graphic screen dumps, text screen dumps and formatting. No other Commodore interface can offer this.

If you own a Commodore 64... If you're serious about quality, trouble free

printing... You need the Grappler CD. Contact your nearest Commodore dealer or call Orange Micro for a dealer near you. Commnaoro fi« and Cammoda'fl 1525 are iradernarMOl Commodore Eloclron-cfl limned Epson 19 > roojstnrgo trademark or Epson America Inc

A Uniquely Intelligent Interface:

Rotated, Inversed, Enhanced and Double Sized Graphics. • Full Code Translation From Commodore's PET ASCII to Standard ASCII, the Language of Most Printers. • Complete Emulation of the Commodore 1525

Printer for printing of Commodore's Special Characters. • Dip Switch Printer Selection for Epson, Star, Okidata, ProWriter and other popular printers. • Conversion Mode for Easy Reading of Special

Commodore Codes. • Text Screen Dump and Formatting Commands • 22 Unique Text and Graphics Commands

Orange M 1400 N. LAKEVIEW AVE.. ANAHEIM. CA 92807 U.S.A. (714)779-2772 TELEX: I83511CSMA <c Oraioa Micro inc. 'flea


Hole, he is carried back to his treehouse. He loses all his Buddy-Bot parts and must start the adventure all over again. Buddy-Bot Land is complex enough to be in teresting, varied, and challenging. Along with the

pitfalls and villains, there are cable cars and rafts to ride, there is a river to ford, a Buddy-Bot fac tory to visit, and caves to enter.

Educational Games There are two ways for Tonk to collect BuddyBot parts. He can search Buddy-Bot Land for

the screen. If the child presses N, he gets to

choose from 128 different Buddy-Bots. A moment later the child sees Tonk leave his treehouse, climb into a little flying saucer, and fly to the land of the Buddy-Bots. Then the computer transfers control to the child. From now until the end of the adventure, the child controls Tonk and guides him on his quest for the missing Buddy-Bot parts. The child uses the joystick or the keys I, J, K, and M to move Tonk around Buddy-Bot Land. The land is divided into 65 screens (pictured to gether in a map on pages 12 and 13 of the handbook).

The child has many different options as he explores Buddy-Bot Land. If he is tired of his adventure, he can press the RUN/STOP key to stop an adventure or the fl key to go back to the main menu. He can call up a HELP screen to re view the rules. He can press the B key, and the computer will show him the Buddy-Bot parts he has found and what they look like when they are assembled into a complete Buddy-Bot.

Watch Out For The Great Gorki No story is complete without danger and villains.

The stories that appeal most to small children are miniature morality plays pitting the forces of evil

against the forces of good. In a computer game the "good guys" should

be under a child's direct control. In Mercer

Mayer's first adventure, there is only one good guy—Tonk. But there are plenty of bad guys and dangers, including the Great Gork, Gork's Sol diers, Black Holes, and Sky Holes.

If the child bumps into Gork, he is sent

parts, or he can enter the caves and play a game. A child can go on the adventure or play the in dividual games at any of four levels of difficulty. The games are standard educational games you see in computer programs for young chil

dren, but they are enhanced significantly by

being embedded in the adventure. A child can play them with the story and Tonk's quest for

Buddy-Bot parts as a backdrop that galvanizes

his imagination and engages his emotions. He

isn't just matching shapes in the games, he is try ing to rescue a Buddy-Bot. This provides a strong

incentive to concentrate, learn, and do well. There are six games:

1. Different/Alike—The child has to pick the minibot (Buddy-Bot) on the screen that is

different from the rest. As in all the games, there are four levels of difficulty. At the highest level, the child has to pick out the two minibots that are exactly alike,

2. Match the Shadow—The child moves a large cross-shaped cursor around on the screen until it falls on the shadow of the

minibot pictured on the lefthand side of the screen. There are six minibot shadows to

choose from in the easiest level, and ten shadows in the hardest level. 3. Minibot Shuffle—This is my favorite. It resembles the old "shell" game in which someone hides a pea inside a walnut shell,

then shuffles the shells around on a table trying to confuse you so you don't know

which shell hides the pea. In Minibot Shuf fle, the shell is replaced by a colored box, and the pea is replaced by a minibot. The speed of the shuffling minibot boxes in

creases along with the level of difficulty. This is a challenging, fun, and different kind

of computer game. And it is an excellent de

away from Buddy-Bot Land. If the child meets the soldiers, they will steal one of his Buddy-Bot parts and capture him and send him to Gork's castle. If a child falls through a Black Hole, he

vice for strengthening a child's sequencing

lands inside Gork's castle. If he falls into a Sky

Then the minibot disappears, and the child

68

COMPUTETs Gazette

October 1984

ability, eye-tracking ability, and understand ing of spatial relationships. 4. Remember Me—This is another nice game. First the child sees a minibot on the screen.


Look at these Features

• Fully screen-oriented •

Horizontal and vertical scrolling

Terminal mode — never seen before on a wordprocessor •

Supports Commodore disk and cassette handling

BLIZTEXT Is ■ btdrmark of ELCOMP

PUBLISHING.

INC.

Imbedded commands

NEW

BLIZTEXT WORDPROCESSOR ■|dk ■&

|hh

"I j ! 1 | I I

Commodore-64

j ' I j I

;';'■;

I

■ ■■■

;

%Jt I

■ ,

NEW NEW NEW

and

VIC-20 are tradnn>*s

NEW

CnmmodOfe

Business Machinci.

NEW

of

|| Ik

NEW

NEW

COMMODORE 64

NEW

NEW

BLIZTEXT - SUPER WORDPROCESSOR

THE GREAT BOOK OF GAMES. VOL.1,

Hardware AddOns:

lor the Commodore-64

by Fvanz Ende

Parallel orinter interface KIT

Order S4990 E 19.95

46 programs for The Commodore 64

Universal Experimenter Board

Order # 4970 £

Introduction to graphics and sound. How to program

Expansion Board, space for four ex-

scrolling - Upper and lower caso

your

PPrim erne rboards I boa id only)

More than 70 command I Full I/O compatibility wild Commodore peripherals

re$olulion graphics, programming tips and tricks, hints

• •> •

ON SALE NOWI-

Fully screen-orienied, up/down, loft and right

Upper and lower case • Work! with practically every printer on the market, INCLUDE command

allows

handling

large

files

on up to 4 diskettes or on cassette. •

games. Walking

pictures, animation, high

and useful subroutines for ihn beginner and advancod programmer. This book is a MUST for awry C-64 owner.

user definable printer control commands •

own

Build in terminal software for electronic mail and

Come and gat it - It'! yours for only

E 9.95

Order*1B2

£9.95

128pagn

Order #4988

by H.C. Wagner

download, uve on disk or caiietto

How to get tho most out ot your powerful Commodore

Dynamic formatting. Imbedded commands

Single kayiiroke for dilk directory and error channel

64, Very

Program comei on disk or ca!»tte

Order#4965 Manual only

(62 pages)

SALE

AVAILABLE

(more

£19.95

NEW PRODUCTS

than

70

Order-=184

How to expand and customize your C'64,

Mac hi no language Monitor

Ord>r/f1B6

Assembly can bo started from ttio editor. Translates in

3 passes. More than 1,000 lables, screen orlented/no lino numbers, scrolling, Includes disk f In. serious

machine

langutgi

programmer needs everyday' Manual only

£19.95

Order =4963

£8900

Suparinvflntorv (O)

Order-No. 4961 S49,BUSIPACK 1 id: Oidsr-No. 4963 £99,SixtyFORTH (D)

£12.95

FigFOHTH for C-64

Small Business Programs (or the Cam mod ore-64

Oiil™ N», 4960 £39,-

by S, noBerts How

to

make

money using your

C-64. Mailing

lilt.

invoice writing, inventory, simple wordprocessing and much more.

Order = 1B6

S12.95

Dealer and Distributorinnuiries are invited.

hofj

Order No. 4962 E49,-

CommodorB-64 Tune-up, Vol. I, byS. Roberis

Very fast assembler with macro capability

the

C-64

SUPERMAILING (D)

S12.95

3.)

Book No.IB2 63,95 NEW Product! for ths

How to program in 6502 Machine Language on your C-64 , by S. Roberts (Introduction!

2.1

everything

£12.95

come soon. ON SALE NOWI --ORDER TODAYI

command!)

Practically

Book No. 1B4

Watch out for our new books, software and add-ons to

NOW

Editor

K9.95

Order =49S9

IMMEDIATELY

screen-or Ten ted

In

and networking. Dig Into I/O for cassette and disk.

£29.35

combined into one efficient program!

Futly

hints

design your own terminal program for communication

Programs from the book on disk

One outstanding tool, consisting ot 3 powerful element!

1.1

and

How to connect a parallel and serial printer. How lo

EB9.00

MACROFIRE Editor/Assembler for The Commodore-64 ON

imporiam subroutines, tricki

machine language for your C-64, How to modify DOS,

Order # 1S3

AVAILABLE NOW

S9.95

Universal Experimenter board for VIC8955

S19.95

MORE ON THE SIXTYFOUfi,

one '■-:••■:■ from a good wordprocessor.

Order tf499Z S 29.95

Tricks for VICs. No, )76

Programs from ihabook on disk.

networking. Telecommunication! mode, upload and

• Double I ine spacing, left and ritjht margin justification, centering, page numbering, and practically everything

9.95

■featBook NQ.1S3 £9.95

PAYMENT: qhack. money order, VISA, MASTER CARD, Eurocheck, ACCESS. Interbank

Prepaid ordnri add S3.50 for shipping (USA) £5.00 handling lor C.O.D.

All orders outiide USA: add 15 % ihipDing, Califor nia residents add 6.5% sales tax,

For your VIC'20 TrlcklforVICt Ordar-No. 176 £9.95 Univflrsal ExpefimentBf board Order-No. 4844S9.95

ELCOMP PUBLISHING, INC 53 Hedrock Lane

Pomona, CA 91766 Phone: (7141623 8314 Telex: 29 81 91


Bots, I found my five-year-old son Eric, and we played together.

Eric liked the adventure and the games as much as I did. Together we had only one serious criticism: the way right and wrong answers were handled.

For example, in playing Same or Different, when Eric picked the wrong minibot, the com puter responded with: YOU'RE WRONG!

This answer was a real shocker. Most earlylearning software developers these days adhere

to the philosophy that software for little children TUX

HANTS

CHOOSE TO SEE

TO

GO

TO

TMHH.

MOM TO TRAVEL.. EIGHT CHOICES.

HELP

PRESS

.

SPACED!)

has to reassemble it from an assortment of body parts. The task is divided into three

steps related to parts of the body. The child has four heads to choose from, then four trunks, followed by four sets of legs and

feet. At the highest level, a child has only two seconds to look at the assembled

minibot at the beginning of the game before it disappears.

5. Buddy-Bot Puzzle—This time the pieces of the Buddy-Bot and the entire, assembled

Buddy-Bot are on the screen at the same time. On the right side of the screen is a puzzle box where the child assembles the Buddy-Bot. A flashing cursor points to one

of 12 sections inside the box that corre sponds to one of 12 puzzle pieces on the

center of the screen. At the highest level, the cursor jumps randomly around the puz

zle box, the Buddy-Bot parts are randomly arranged (from A to L), and when a child

makes a choice, he cannot change his mind. 6. Minibot Factory—After the other challeng

ing games, this game is a relief. It's just for fun. The child pilots Tonk inside a Minibot Factory and watches minibot parts roll by across the top of the screen on a conveyor belt. A large, hollow, block-shaped cursor

frames the parts momentarily as they roll by. The child selects a part when he presses the space bar. The fun of this game is to make silly Buddy-Bots—with heads under neath legs underneath bodies; or with three

heads, or three bodies, or three sets of legs. Once the child has built the minibot, the computer animates it, and the jaws open and close, the eyes rotate, the arms wave, and the legs jump up and down.

What Eric Thought After I previewed Tonk in the Land of the Buddy70

COMPUTE'S Gazette

October 1984

should not be judgmental, or that, at least, the

judgments should be gentle. This is not gentle.

Eric and I thought that software that yells at us (with exclamation points) is very unfriendly and not very nice.

We also had other problems with the mes sages. For example, they were not accompanied by any sound. This seemed to be a great over sight—both in terms of entertainment and educa

tional value. The Commodore 64 has such good sound (used so well in other parts of the pro gram) that it's a shame when it's missing. The contrast with the other parts of the game in which sound accompanies the action was very noticeable and unpleasant. Finally, after Eric and I got zero out of six answers correct on one game, the Great Gork ap peared on the screen to tell us that we didn't get

all the answers right, and to try again. Later, after we got four out of five answers correct on

another game, Gork reappeared with the same message.

I found this a great let-down. When we got

all the answers wrong, we thought Gork was being nice to us, but when we got almost all the answers correct, we were proud of our efforts. We expected Gork to come on the screen and congratulate us. Instead he told us we weren't perfect ("You did not get all answers right."), and he ignored our achievement

Later, when we were playing the Remember Me game, we had a similar experience. We remembered two out of three of the minibot parts, but the minibot still told us, "You forgot me!" I would have preferred to have had the minibot congratulate us for remembering two out

of three parts, and then call our attention to the part we missed.

Encore! These are serious grievances, but they are still minor compared to the pleasure Eric and I had playing with the programs.

The games are innovative, and Tonk and the

minibots are delightful. There are lots of nice

little touches, too, which show careful design.


with the letters and the respective directions. If you plan to use a joystick anyway, you

might consider one of the new Wico joysticks. After experimenting with several joysticks, my

son Eric and 1 have decided that the Wico sticks are the easiest to control.

Wico Analog Joysticks have the softest touch

and are the best for small children. Another good Wico joystick for the Commodore 64 is the Wico Command Control. You can learn more about these joysticks and others by going to your dealer or by contacting: Wico Corporation, Con

sumer Division, 6400 West Gross Point Road, Niles, IL 60648, (800-323-4014). <Sf

For example, when Tonk bumps into a wall, he

To receive additional information from advertisers in this issue, use the handy reader service cards in the back of the magazine.

falls back, gently, on his bottom. Mercer Mayer's first "software fairy tales" are not as good as his books, but they are still superior to most of the programs now on the market for young children.

Eric and I hope that in future programs the computer's responses to our answers will be im

proved, and we hope to go on new adventures with Tonk and the other TinkTonks really soon.

Run, Tonk, Run! Tonk in the Land of the Buddy-Bots allows your

child to play using the I, J, K, and M keys on the keyboard or using a joystick.

Your natural tendency might be to have your child abandon the complicated keyboard in

favor of the joystick. But you might want to reconsider.

CHECK & STATIONERY VINYL CARRIERS

First, joysticks are notoriously hard for small children to control. They are stiff and hard for little children to move. They are awkward for

FOR ADJUSTABLE

TRACTOR-TYPE

little children to hold in their small hands or in

their laps. And young children frequently get the joystick turned upside down so that the joystick action is reversed from what the child expects

(left is right and up is down). All in all, this adds up to a very frustrating experience for a small

PRINTERS ■ Allows quick ctinisurti.rprocBr.'.inn of

conventional checks, stationery, Index

cards. Invoices, purchase orders etc.

• Also use on friction-type printers or reflulflr typewriters.

• Check Carrier comes with BASIC prog ram

child.

Second, keyboards are not as frightening to small children as they are to adults. Also, chil dren find that once they learn the direction keys on a program, they have more control over the motion of the computer character on the screen than they do with a joystick.

Teachers and parents can help small children

recognize the I, J, K, and M keys on the keyboard

by putting small colored dot stickers on each of the keys. For example, a red dot could go on I, a

blue dot on M, a yellow dot on J, and a green dot on K. This helps children associate the dots

Indicate carrieryou wlah toordnr:

S-1W Hold! E i; 1: [ Pononal Slio S-iOO Holds Sli Builness Slis

1—1

S-;07Holda rii11<« r-iii ■■ 111-

a

S-306Kuldi Five 3-7/1" it 1-7/1"

L—' Enrelopes (requires 10-1/2" iraciorj

a I—'

|—|

Ctiecki |—l

S-W9 JiolJ-, FhfftM/4" . 9-1/2"

Chocki Ira dor)

1—1

Laneniuda

s-mi Hoim ftn J-S/l-1 t-t/2Envfllopai

3»Mia Hohlt threo 1-1/2" x T-S/A-

1—' I 1

I ..■'. Purchate Ordon, ale

S-MSHolBiFhroai/J" JtH/2"

1—' rndoir Po*11:. ni.

s

Canlon elio aval labla fur flthar

An .95 eaA SHS THE CHF COMPANY I SB.' j :. :3RS i!.M. f;'*-. ir::; • OBERUN.OH.44074 \

ft llJlfl tiling

/

KlUtHlIlirCUri

216/775-7338

DEALER INQUIRIES INVITED! COMPUTEl's Gazette

October 1984

71


Magic

Getting Comfortable With The PRINT Statement We're pleased to welcome Michael S. Tomczyk and his new column, BASIC Magic, to COMPUTED GAZETTE. Michael's background includes four years at Commodore, where he served in key marketing, design, and publishing capacities. He was also co-author of the VIC-20 User's Guide and the VIC and 64 Programmer's Reference Guides. His column will focus on BASIC for beginners.

I'm happy to be writing a new column for COM PUTED GAZETTE. I've always felt COMPUTERS

magazines to be the best in the industry. BASIC Magic will be written for beginners, but I'll try to include a lot of information that will apply to most programming interests.

Our discussions will apply to the VIC-20 and Commodore 64, as well as the Plus/4 and the 16, expected out this fall.

We'll look at as many examples, tips, tricks, and secrets as we can pack into each column, so

you'll have a lot of material to experiment with between columns. This month we'll start with a quick overview of the PRINT command. We're

this lesson, we'll give you a very quick tour of the PRINT statement and see what it can do,

then show you how to "mix and match" dif ferent types of PRINT commands in your own BASIC programs.

Before you begin, here's a helpful hint to save wear and tear on your fingers. You don't have

to type out the whale word PRINT. You can abbre

viate it by typing a question mark (?) instead. In other words, ?"MAGIC" is the same as PRINT'MAGIC". To use this shortcut, hold down the SHIFT key and type the key with the question mark on it.

Displaying Information On The Screen The PRINT command is mostly used to display

or "print" information on the screen of your TV or monitor. You can do this directly just by typing the command like this (remember, you have to hold down the SHIFT key to type the quotation marks):

going to move fast, because we know you want

PRINT"MAGIC"

to learn fast—but we'll proceed in very small steps so nobody gets lost. Your job is to study the lessons we cover, then experiment with the techniques and use them in your own BASIC

Now press the RETURN key, and you'll see that the computer PRINTed the word MAGIC. Try

programs. Are you with me? OK. Let's jump right in.

The Most Popular BASIC Command The PRINT statement is the most popular BASIC command. It has more uses than any other com mand and you can have a lot of fun with it. In 72

COMPUTES Gazoffe

OcloOer 1984

PRINTing your name. You can PRINT all the characters on your computer keyboard, including letters, numbers, graphic symbols, punctuation marks, blank spaces, and even sentences, like this: PRINT"I

LIKE

BASIC

PROGRAMMING."

PRINTing Graphic Symbols When you look at your keyboard, you'll see that most of the keys have two graphics symbols on


COMPUTE! Books Illc

-

-

-

Second Book Machine Language Ptisffi.il ccnpuier Madwo UHir^uiifje PnujMrnmno lor ins Cocranatoo W. VKMQ, Alan,

AWc. M*1 PET/CBM CaVffJtm

1

. ■"■! lott

1!

Sl< 05

SECOND BOOK OF MACHINE LANGUAGE Richard Mansfield

The follow-up to the best-selling Machine Language for Beginners, this book leads the programmer

deeper into the most powerful and efficient program ming techniques available for personal computers.

Fully tutorial, with easy step-by-step explanations, the book shows how to construct significant, effective ma chine language programs. Included Is a high-speed,

professional-quality, label-based assembler. Every thing that's needed for optimized programming on the Commodore 64, Atari, VIC-20, PET/CBM, and Apple computers.

$14.95 ISBN #0-942386-53-1 Coming in October

COMPUTE! Publicationsjnc© One of the ABC Pubiuning Companies ^^^F 321 W. WanOover Avenue, Suite 200 Greensboro NC 27406. 919-275-9809

To order your copy, call 1-800-334-0868.

,


the front, one on the left and one on the right. You can PRINT these symbols just like you would words or sentences. They're handy for

making interesting designs, pictures, or even business charts.

Let's draw a horizontal line across the screen

using the left graphics symbol on the T key, like this: print "

«

To make this line, hold down the Commodore key and press the T key 22 times if you have a VIC, or 40 times if you have a 64, Plus/4, or 16.

•Ml To type a left side graphics symbol, hold

down the Commodore key and press the graphics key. To type a right side graphics symbol, hold down the SHIFT key while pressing the graphics key. Now try a right side graphics symbol, the heart

The {5 RIGHT} means to press the cursor right

key five times, and the {5 DOWN} means to press the cursor down key five times. Notice that pressing the cursor down key inside quotation

marks makes a reverse Q appear. Cursor right is

shown as a reverse bracket. Cursor up is shown as a reverse ball, and cursor left is a reverse vertical line. These reverse graphics (like the re verse heart for the CLR/HOME command) help you see where cursor controls and other editing commands appear inside your BASIC programs.

PRINTing Numbers, Values, And Calculations Let's take a moment to look at how the computer tells the difference between a number which is

PRINTed inside a message, and a numeric value which is used for calculation. If you include a number inside quotation marks, your computer treats that number just like a letter or graphics

{found on the S key). Remember to hold down the SHIFT key to type the heart.

symbol, simply a displayed character. If the num ber is outside quotation marks, the computer treats the number as a value which can be used

CLEARlng The Screen With The PRINT Command

for calculation. Try these examples:

Find the CLR/HOME key on your keyboard. When you hold down SHIFT and press this key, the screen is completely erased and the cursor moves to the top lefthand corner of the screen, which is called the home position. You can use the PRINT command in a program to clear the screen and home the cursor like this: PRINT"[CLR]"

The CLR in braces indicates that you should hold down the SHIFT key and press CLR/HOME at the same time. A reverse heart will appear. This symbol represents the CLR/HOME command in

side quotation marks. You can put the CLR/HOME command in

side quotation marks at the beginning of a mes sage, like this: PRINT"{CLRjYOUR MESSAGE HERE"

By including the CLR/HOME command in front of the message, you automatically erase the

screen and your message appears at the top left corner of the screen.

The PRINT command is so versatile you can even print cursor movements. For example, if you want to tell the computer to clear the screen,

move the cursor five spaces down, move the cursor five spaces to the right, then PRINT "HELLO", you can use a one-line command:

74

COMPUTE! a Gazetio

RIGHT)[5 October 1984

PLUS

3

EQUALS

8"

In this example, the numbers have no value

because they're printed as part of a message— inside quotation marks. Numbers used as values are always PRINTed outside quotation marks like this: PRINT

35

You can use the PRINT command to calculate

the result of a mathematical operation, like the examples shown below. (When you press RE TURN, the computer automatically displays the answer.) Addition:

PRINT 2+2

Subtraction: PRINT 100- 40 Multiplication: PRINT 5*4 Division: PRINT 288/12 Combined: PRINT (288/12)+(100-40)+(5*4)

To combine a message with a mathematical op

eration you have to put the message inside quotation marks, and the calculation outside quotation marks. Notice in this example, even the dollar sign which goes with the answer is still part of the message because a dollar sign is

PRINTing Editing Commands

PRIHT"[CLR}15

PRINT"5

DOWNjHELLO"

not a number (value) and is not really part of the calculation. PRINT"155.00

DIVIDED

BY

2.4

EQUALSi

5"

155/2.4

PRINTing Commodore Colors Commodore's special color keys make it easy to program in color. The VIC-20 has eight color keys—just hold down the CTRL key and press


y

/-PALM \

The fastest and easiest to use

A—SPELLPRO 64 y

\

A-WP64

Is an easy to use spelling checker

^ f This brand new offering from the

/^^ assembler for the Commodore 64.

fr^ with 3 standard dictionary expandable

/■^S orlginaiorjoftheWordProSeries*

standard MOS mnemonics.

adapts itself to your personal vocabulary and business jargon allowing you to add and delete words to/from the dictionary, edit

Commodore 64 for the first time. Two

Pal 64 enables the user to perform assembly language programming using the

$49.95

OWER 64 »n absolutely IndispenslWe aid to the programmer using Commodore 64 BASIC. Power 64 turbo-charges resident BASIC with dozens of new super

useful commands like MERGE, UNDO,

TEST and DISK as well as all the old standby such as RENUM and SEARCH &

REPLACE.Includes MorePower 64. $49.95

to 25.000 words. SpellPro 64 quickly

documents to correct unrecognized words

and output lists of unrecognized words to printer or screen. SpellPro 64 was designed

'* ^e ultimate programmer's utility r package. Includes Pal 64 assembler and Power 64 BASIC soup-up kit all together in one full/ integrated and $89.95 economical package.

years under development, WP64 features

100% proportional printing capability as well as 40/80 column display, automatic word wrap, two column priming, alternate

to work with the WordPro Series 'and

paging for headers & footers, four wiy scrolling, extra text area and a brand new

WordPro file format.

text deleted in error. All you ever dreamed

other word processing programs using the

S49.95

'OOPS' buffer that magically brings back

of in a wordprocessor program, WP64 sets a new high standard for the software

NOW SHIPPING!!!

industry to moot.

TOLL FREE ORDER PHONE

BOX 64

brings professional word processing to the

$49.95

MAILPRO M

1-800-387-3208

^

A new generation of data

organiier and list manager, MailPro

64 is the easiest of all to leam and use. Handles up to4,000 records on one disk, prints multiple labels across, does minor text editing ie: setting up invoices. Best of

all, MailPro 64 resides entirely within tCommodore 64and Commodore ire Trademarks of Commodore Buunen Machtnci Inc.

•prwmlr marketed br PrflfeHfonal Software Int PAL

spellp.ro

memory so you don't have to constantly juggle disks like you must with other data base managers (or the Commodore 64.

bpctiJifanomiubiett id clunje without notice-.,

S49.95

PRO-LINE

MlllltSOFTWARE

MAIf.PRO 64

POWEftM

TOOLB

(416)273-6350

75$ THE QUEENSWAY EAST, UNIT B.

MISSISSAUGA, ONTARIO. CANADA. L4Y 4CS


one of the color keys to PRINT messages or graphics in that color. The Commodore 64 has 16 colors but only 8 are shown on the keyboard (the rest are obtained by using the Commodore key instead of CTRL). The new Commodore 16 and Plus/4 have 16 colors controlled by the CTRL and Commodore keys, with the added fea

ture of luminance, which regulates the intensity. To set a color inside a PRINT statement,

hold down CTRL and press the appropriate color

key—a reverse graphics character will appear— and everything after the color command will PRINT in that color until you change colors with a new color command. This short example prints 4 different colored balls (SHIFT-Q) on the screen:

A=liB=2:P5="PLUS":ES="EQUALS"sPRINTA;PS;B ;E?;A+B

This is a more complex example, so let's look at the line closely. A and B are numeric variables used to stand for numbers 1 and 2. P$ and E$ ($ is pronounced "string") stand for the words

PLUS and EQUALS, (String variables work like numeric variables—they represent something

else. The dollar sign tells the computer that the variable is alphabetic, not numeric.) The PRINT command displays the numbers and words de fined by the variables. A + B is a calculation, so the answer is PRINTed. The colons (:) allow you to put more than one command on one line (more on this later), and the semicolons (;) make

PRINT"(BLK]Q{RED}QlGRN}Q{PURlQ"

the words and numbers print next to each other.

The underline (as in Q) is the gazette's way of showing that you should hold down the SHIFT

How BASIC Programs Work

key while typing the character. Notice that the computer stays set in the last color that was set—in this case, purple. If you want to go back

to the standard color, or to another color after the command, add the color command you want at the end of the line. For example: PRINT"(BLK JQE RED}QE GRN}q(PUR}Q{BLU}"

will return the VIC to it's normal blue PRINT

color. For the 64, replace the {BLU}—CTRL-7—

with the proper key combination to get light

blue, the 64's standard character color. That's done by pressing the Commodore key and 7 key simultaneously.

PRINTlng Reverse Characters You can PRINT any of the Commodore symbols

in reverse by using the RVS ON and RVS OFF keys. (These keys are enabled by pressing the CTRL key first.) Here's a quick example: PRINT"(RVS JNEGATIVE[OFF)POSITIVE"

PRINTing Variables We'll cover variables much more thoroughly in a future column, but for now here's a quick in troduction. A variable is like a code you can use to stand for something else. For example, let's

say variable A stands for the value of the num ber 1, and variable B stands for the value of the number 2. Let's PRINT A + B and see what happens: A=liB=2:PRINTA+B

The computer displays the answer (3) because PRINT A + B is the same as PRINT 1+2, and we defined the variable A as 1 and the variable B as 2. Now, here's a real teaser for you. Can you fig ure out how this program works? 76

COMPUTED Gazette

October 1984

Try it without the semicolons.

So far, we've typed all of our examples directly into the computer—now we're going to see how

we can use these commands in a BASIC pro

gram. Actually, any of the PRINT commands we used so far can be turned into a BASIC program simply by adding a line number. The way to tell the computer that you're giving it a BASIC program is to type a line num

ber first, then your command. A BASIC program can range from one line to several thousand lines. Here's an example of a one-line BASIC program using the PRINT statement: 10

PRINT"THIS

IS

A

VERY

BASIC

PROGRAM."

When you press RETURN, your computer reads

the line number (10) and realizes this is a BASIC program. Your computer then stores the program

in its temporary memory and keeps it there until you tell it what to do next. From here you have several choices.

First, you can LIST the program by typing the word LIST and pressing the RETURN key. Try it. After you LIST the program, you can correct or edit it by "cursoring" {moving the cursor with

the cursor keys) to the place you want to change, and then use the INSERT/DELETE key {INST/ DEL) to insert where you want to add infor mation, or delete characters you want to elimi nate. After editing, remember to press RETURN. Page 8 in your VIC user's manual and page 34 in the Commodore 64 manual show you how to edit BASIC programs. Second, you can RUN the program. This tells the computer to perform all the commands or execute the program. Type RUN and press RE TURN and the computer will follow the com mand and PRINT "THIS IS A VERY BASIC PROGRAM." If you've made a mistake, the com puter displays an error message.


If you've been having a hard time teaching your newly-adopted computer

there's more to life than fun and games, you're not alone. Now, you can introduce your Commodore 64™ to the Work Force: affordable, easy-touse software and hardware that will unleash the power you always expected from your Commodore 64'", but thought you might never see.

PaperCMp'"

is simply the best word processing program of its kind—loaded with advanced features, yet so easy to use even a novice can get professional results. With

!s a magic box that lets you transform your humble home computer into a powerful business machine. It

gives you the added power of BASIC 4.0, and lets you add IEEE disk drives, hard disk, virtually any parallel printer, and other peripherals without extra

SpcllPack ", it even corrects your spelling! Once you've

tried it, you'll never use a typewriter again.

interfaces. Completely software invisible.

The Consultant"

B.tt-80" ColuiiinAd&Dtor

(formerly Delphi's Oracle)

Is iike a computerized filing cabinet with a brain. Organize files for recipes, albums, or the membership of your service club. Then search, sort, arrange and analyze your information with speed and flexibility that's simply astounding.

gives you crystal clear 80 column display. Using the highest quality

hardware, we've eliminated the problems

of snow, fuzzinessand Interference. Basic 4.0 commands greatly simplify disk drive access. Switches easily from 40 to 80 column display.

SpellPack

teaches your 64 to spell. It checks an entire document in Z to 4 minutes against a

Discover the true power of your Commodore 64 ™. Ask your dealer about

dictionary of over 20.000 words. And you can add up to 5,000 of your own specialized terms. Type letter perfect every

the Commodore 64'" Work Force, from

Batteries Included—the company that doesn't leave anything out when it comes to making things simple for you.

time!

BATTERIES^

INCLUDED

"Excellence in Software' These products have been developed specifically for Commoitoje computers by Batteries Included and Jrttoially compatible with cichoihcr. For .1 full color brochure write (o:

186 Queen Street West, Toronto, Canada M5V 1Z1 (416) 596-1405 / 3303 Harbor Blvd., Cosla Mesa, CA. 92626 (714) 979-0920 M AND COMMODORE 64 ARE REGISTERED TRADE HARKS OF COMMODORE BUSINESS MACHINES


You can also SAVE your program on tape or disk, or print the program on paper if you have a printer.

Finally, you can erase the program from memory by using the NEW command, which tells the computer to erase its memory to get

Type the word RUN and press RETURN. The words are all on top of each other. We can add more space by inserting blank rows between the words, but you don't have to retype the program. Just type two new lines numbered 15 and 25 and they'll automatically be inserted in your program.

Now LIST your program and lines 15 and 25 are automatically included. Now RUN the program. Here's another way you could have done the

gone. If you try to LIST the program, you'll see it isn't there any more.

15 25

ready for a new program. But be careful if you use this command because everything in your computer's memory will be lost. To erase the program you just entered, type the word NEW

and press RETURN. The program is immediately

BASIC Programs With More Than One Line Now let's type a longer BASIC program with PRINT statements on several different program

Try this:

PRINT PRINT

same thing. You could have put the PRINT com

mand on lines 10 and 20 by adding a colon and then the PRINT command, like this: 10 PRINT"(CLRlONCE":PRINT PRINT"A

30

PRINT"UPON"sPRINT

20

TIME"

lines. Type NEW and press RETURN, then type this: PRINT"IS" PRINT"FUN 1"

20 30

PRINT"{CLRlBASIC"

10

PRINTing Long Messages: Beyond 80 Characters 88 characters on a VIC and up to 80 characters on the 64, Plus/4, and 16. But what if your mes sage is too long for one program line? You then have to use several PRINT messages on different

appear as heart shapes. For the 64, you'll need to

Each line of a BASIC program can contain up to

40 PRINT"[RED}S5SSSSS{BLU} "

The SHIFTed-S characters in line 40 should change the final {BLU}—CTRL-7—to Com

modore key-7. When you run this program, your computer will display this on the screen: BASIC

lines, and tie them all together with semicolons. Here's an example:

ONE PRINT STATEMENT AND PUTTING"; PRINT"SEMICOLONS AT THE END SO ALL

40

PRINT"ON

30

PRINT"THIS HARACTERS,

20

FUN

PRINT"[CLR)";

10

is

Seems like a lot of typing to get this simple mes sage, doesn't it? There's an easier way. You can put all these PRINT messages on one line if you separate each command with a colon (:). For example, our entire example can fit on one pro gram line. To try this, type NEW and press RE TURN, then enter this new line 10: 10

PRINT"(CLR}":PRINT"BASIC":PRINT"IS":PR

INT"FUN 1":PRIHT"(RED JSSSSSSSJBLU)"

Type LIST and press RETURN, then type RUN and press RETURN to see the program in action. The result is the same as our first example, but only required one program line.

PRINT

50

MESSAGE IS LONGER THAN 80 SO WE HAVE TO CONTINUE";

ANOTHER

LINES

LINE,

LOOK

LIKE

USING

ONE

MORE

LONG

C

THAN

THE

";

PRINT"SENTENCE."

Notice how we begin each program line with a PRINT command, but continue the message uninterrupted in quotation marks. If there's a natural space between words at the end of a line, you have to include a space in your program, either at the end of the previous line or the

beginning of the next line; otherwise the words run together. The semicolon at the end of each PRINT message program line is used like "programming glue" to make all the messages display right next to each other. Make sure the We'll continue our discussion of the PRINT statement with some more advanced examples next month. In the meantime, as you learn more about BASIC you'll discover there are usually many different ways to program a BASIC action. As we continue, we'll try to show you some of

TURN to erase any previous programs from your computer's memory, then enter this short

semicolon is outside the quotation marks.

PRINTing Blank Rows You can insert a blank row by using the PRINT

command all by itself. Type NEW and press RE

program:

PRINT"UPON" PRINT"A TIME"

20 30

PRINT"{CLRlONCE"

10

78

COMPUTED Gazette

these techniques so you can perform some BASIC magic. <Sf

Octobef 1984


.-:

Presenting PRONTO® the home banking and information system from Chemical Bank.

A state-of-the-art system that lets you bank on your own home computer in the privacy of your own home. And on your own hours, instead of the bank's. Twenty-four-hour access to your bank accounts means you can check your daily balance nightly. Or check which checks and deposits

have cleared. You can even transfer

funds on the PRONTO system, and pay bills to over 1,000 different mer

chants and services.

Then there's PRONTO's elec tronic mail service which lots you send messages to the bank and to other PRONTO users. And with PRONTO's information services, you can even get an up-tothe-minute list of the latest lending and interest rates at Chemical Bank. You can even

screen the current

■=• ■=■

— .

C Hem Chemical Bank,

business and economic news, check out the monthly consumer reports, or keep up with the latest changes in tax laws. And you can do all

this banking on almost any home computer (Applef Atari® Commo dore* Compaq? or IBM*). For further information and/or a brochure, call our toll-free hotline

at 1-800-782-1100. And learn more about the ultimate use of your personal home computer—your —.

—■» personal bank. Mrmln-r Flllf

THE HOME INFORMATION SYSTEM FROM CHEMICAL BANK.


Quiz Master For The 64

George Miller, Assistant Technical Editor

This two-program package for disk users offers an effective and uncomplicated way to set up and administer multiple-choice quizzes. It's menu-driven for ease of use, and ideal for school or home study. "Quiz Master" for the 64 is a package of two programs, "Quiz Generator" and "Student

Quiz." Together, they can be used to create and

administer quizzes. The first program allows parents or teachers to create multiple choice tests.

The second program gives the test to the student. The only input required from the student is to type the answers for the quiz.

Menu Options Quiz Generator begins with a display of the main menu: Enter New Questions, Review Questions, Change A Question, Load Previous Data, Add To Test In File, Initialize Disk, or End. Type 1 to enter new questions and create a quiz. Each quiz can hold up to 100 questions. You'll then be asked if a file of quiz names exists". If this is the first time you've used the program, or if you're starting a new group of tests on a new disk, answer N. You'll then be asked to pro vide a name for your quiz. Type in the name, ex

of the 40-column line. Just type each sentence using spaces where they normally occur, and

standard punctuation, including commas and colons. Quiz Generator will look at your sen tences and find the proper place to break each line. Each question can contain up to 80 charac ters, counting spaces. Type in the four answer choices to the ques tion, and give the correct letter choice when prompted. To store the quiz, type the British pound

symbol (ÂŁ). The program will open a file with the quiz name you specified and store your infor mation. A file to store the student's grades will also be created. When you return to the menu, type 2 to re view the questions. The screen formatting section of the program will now right-justify your ques tions, and the screen display will have each line

ending with the last word that will fit on a 40column line without breaking the word.

Follow the screen prompts to review each question. You'll be shown the questions, answer

choices, and the letter of the correct answer to

make sure that no typing errors were made when you entered the quiz. If you notice any mistakes, jot down the number of the question so you can

actly as you want it to appear. The quiz name will be stored in a SEQuential file called TEST

change it later. If you want to change any questions, enter 3, and answer the prompts from the computer.

TITLES. Quiz Generator will accept up to 15 quiz files for each disk because of the screen format ting of the menu. (If you're covering more than one subject, you may want to have a separate disk for each one. For instance, a disk for history quizzes, another disk for math quizzes, and so

You'll have to enter the number of the question you want to change, so this is where you'll need the numbers you jotted down when you re

viewed the quiz (option 2). The computer will display the question and answer choices, and then you may enter the correct question and

on.)

answer choices.

Now follow the screen prompts to enter

your quiz. You have full use of all screen editing functions, including the cursor control keys and the DELete/INSerT key. Be careful to make changes only where you intend to and don't move the cursor to areas where other text appears.

You shouldn't be concerned about word wraparound, the breaking of words at the end 80

COMPUTE!* Gezono

Octoter 1984

Option 4, Load Previous Data, loads a quiz

previously stored. You can then review this quiz. Select option 5 if you want to add questions to a quiz already stored on your disk. You'll start entering questions at the first unused question number in the file.

The Initialize Disk routine, option 6, will for mat, or NEW, a disk, and give you several chances to abort the routine prior to formatting


Learn robotics and industrial control as you build thi New NRI home training prepares you for a rewording career in Americas

newest high-technology field.

The wave of (he future is litre. Already, advanced robotic systems are producing everything from precision electronic circuits to automobiles and giant locomotives. By 1990. over 100.000 "smart" robots will be in use.

over a set course,

avoid obstacles using its sonar ranging capability. Program In

Over 25,000 New Jobs

complex arm and body move ments using Its special teaching pendant. Build a wireless remote control device demonstrating independent robot control In hazardous environments. You'll even learn to synthesize speech using the lop-

Keeping this robot army running calls tor well-trained technicians... people who understand advanced systems and controls. By the end of the decade, conscrvallve esti mates tall for more than 25.000 new Lechnicaljobs. These are the kind of careers that pay $25,000 lo S35.OOO a year right now. And as demand continues to grow, salaries have no place to go but up! Build Your Own Robot As You Train at Home

mounted hexadecimal keyboard.

Now. you can train for an exciting, rewarding career In robotics and Industrial control right at home In your spare lime. NRI, with 70 years of experience In technology (raining, offcrsa new world of opportunity la one of Ihc most fascinating

Training to Build a Career On NRI training uniquely Incorporates

growth fields since the computer,

hands-on building experience to rein force your learning on a real-world basis.

You need no experience, no special education. NRI starts you at the beginning, takes you in easy-to-follow. bite-size lessons from basic electronics right on through key subjects like instrumentation, digital and computer

You gel professional instruments, incl lid ing a digital multimeter you'll use in exper

s'

controls, servomotors and feedback systems, fluidics. lasers, and optoelectronics. And It's all reinforced with practical, hands-on experience to give you a priceless confidence as you build a programmable, mobile robot.

iments and demonstrations, use later in your work. And you get the exclusive NRI Discovery

Lab*, where you examini'and prove out theory from basic electrical concepts to the most ad vanced solid-stale digital electronics and micro processor technology. Devised by an experienced

Program Arm and Body Movement, Even Speech

Designed ex[icckilly for training, your robot duplicates SO thekey elements of Industrial rolxillcs. Yon learn tDOpoate, program, service, and troubicstioot us

team of engineers and educators, your experiments,

ing the same techniques you'll ikc In Ihe Held. It's on-Illc-Job training at home! Building this exciting robol will lake you beyond the stale of the art into the next generation of industrial robotics.

demons Ira i Ions, and equipment are carefully Integrated

with 51 clear and concise lessons to give you complete

confidence as you progress. Step-by step. N'RI takes you from the beginning, through today, and Into an amazing tomorroiv.

You'll Icam how your completely self-powered robot Interacts with its environment to sense light, sound, and motion. You program it to travel

Send for Free Catalog Now Send for NKI'shlg free catalog describing Robotics and

I ndustrial Control plus ovTr a dozen other hljih -1 ech nology courses. You'll see all the equipment you get In detail, get complete

descriptions of every lesson, find out more about career opportunities

for trained technicians. There's no cost or obligation, so send today. Kcoupon has been removed, write: NR1.3939 Wisconsin Avc. Washington. D.C. 20016

r:

NRI SCHOOLS

All Ciretr Murws

McGraw-Hill Continuing

JpprwrO wW G I

Education Center

3939 Wisconsin Avo.

Washington, DC 20016

CHECK ONE FREE CATALOG ONLY

G Robotics and Industrlar Control You gel and keep Hero 1 robot with Hrippcr arm and

P Microcomputers and

speech synthesizer. NRI Discovery Lab for electronic

Mlcropfccessors

expprimcnUEIon. professional multimeter wkh 3^-

digit LCD readout. 51 Just-track training Ibmuj.

0 CommunlcaiionsElectronics" FCC

License • Mobile • Aircraft ■ Marlfto

D Basic Eleclronics

D TV/Vidw/Audio Servicing

□ Srnali Engine Swvicina

p Digital Eiecironics

[_ Appliance Servicing

LJ ErKlronics Des4gn

□ AuEomolJve Sowdng

□ (nduatrlal Electronics

D Air CondiHOrlng^ H Refrigeration & Solar T

["I Data Communications

D

(Pimm Pnni)

'-■-..

C\\j

Slito

A^Wi'fHi by ihoA^;ixl.i^|Ciji^-\^'jnclLhr]N^rDr^HjFTcStu(^ Council

Zip

153-104


Student Quiz Entsr

number of function:

i.

Enter Hew Questions

2.

Review Questions

3.

Change a Question

4,

Load Previous Data

5.

fldd to Test in File

6.

IfflTIflLIZE Dish

T-. EMD

Hunter?

When a student loads and runs Student Quiz,

RUN/STOP-RESTORE and LIST are disabled, as are all cursor controls. The student can only answer the prompts from the computer. The stu

dent will be asked which quiz has been assigned,

and that quiz will be loaded and run. With the checks built into the program, all the student can do is enter A, B, C, or D for answer choices.

If you want to guard Student Quiz from pry i

ing eyes, enter the following sequence of characters: 1, 0, R, E, M, ", ", DEL, RVS ON, SHIFT-M, SHIFT-S,

q, q, o, q< a a a a a a rvs off, space,

SPACE, SPACE, SPACE, D, O, N, ',T , SPACE , D, O,

the disk. Make certain the disk in the drive is the one you want formatted, as all information on

that disk will be destroyed by the routine. You

can't enter this routine by accident, because you are actually taken out of the program before you can run the routine.

Abbreviations Required Type in Quiz Generator and save it on a new disk. You'l! be using Quiz Generator to generate sequential files, which can use up disk space rather quickly, so it's best to start with a fresh disk. You'll find that a few program lines extend beyond the 80-character limit of the 64, so it will be necessary to use keyword abbreviations. These can be found in Appendix D of the User's Guide or Appendix A of the Programmer's Ref erence Guide. Some of the abbreviations you'll find most useful in entering Quiz Master are ? for PRINT, P SH1FT-R for PRINT* (?# is not correct), GO SHIFT-S for GOSUB, I SHIFT-N for INPUT*, P SHIFT-0 for POKE, and P SHIFT-E for PEEK. To make entering and reading the text easier, hold

down SHIFT and press the Commodore logo key to shift to upper- and lowercase text. You'll find this easier to read than the graphics characters the SHIFTed keys will normally print to the screen. You must use keyword abbreviations for lines 140, 790, and 1940 of Quiz Generator, and

lines 40, 120, and 520 of Student Quiz, If it's necessary to edit these lines after entering and

listing the lines, you'll have to reenter the entire line, with the keyword abbreviations. Next, type in Student Quiz and save it. (Be

sure to save this program before typing RUN as mistakes in typing will cause a return of a scram bled, tokenized BASIC listing.) If you plan to use Quiz Generator to give tests to groups of stu dents, save Student Quiz on a second disk for use by the students. This will safeguard Quiz Generator from accidental erasure. 62

COMPUJBrs Gazottfl

October 1984

SPACE, T, H, A, T, !, RVS ON, S, ", SHIFT-L

These keystrokes must be made in this order

for the line to work correctly, Don't type the commas, just the indicated characters. Check your typing carefully before you press RETURN

to enter the line; after you enter the line, you won't be able to edit it. (If you can LIST line 10, you've done something wrong.) DEL is the unSHIFTed position of the INST/DEL key at the

upper right of the keyboard. RVS ON is CTRL-9, and RVS OFF is CTRL-0; these keys will not print any character on the screen, but all charac ters in between will appear in reverse video. The strange combination of characters in this REM statement will cause any printing on the screen to be deleted, move the cursor down ten rows and over four spaces, and print DON'T DO THAT! on the screen. The listing will then end

with a SYNTAX ERROR, leaving the cursor in the upper left corner of the screen. This technique will also work on any other program you might like to protect. It's not fool proof, but it will prevent most students from list ing the program. Of course, deleting line 10 will allow the program to be listed normally, as will listing from line 11 on (LIST 11). A random number routine is used to scram ble the order of the questions, so the quiz will be different each time. Quiz Generator also uses one question less than you have placed in memory.

In effect, each student will be taking a different quiz, and each time anyone takes the same quiz it will be slightly different. The more questions you store in the file, the more variations Quiz

Generator has to work with. Since the random number generator searches

for new numbers every time, it can take several minutes to generate a quiz, especially if you have many questions in the file. The screen will be

blank during this process, and all keys will be disabled. Everything will return to normal when the quiz is ready.

Sec program listings on page 163. 41


MAKE YOUR COMMODORE 64 WORK LIKE CRAZY, WHILE YOU KEEP IT FROM DRIVING YOU NUTS. 64 DOCTOR PCVBOPITT > Wllak

CHHIWIH

«0»>

A DiAgneuic Pregrjm for the Cohmio4*r44

PractiCalc64" Only $54.95*

PractiFile" Only $54.95*

One way to make your Commodore work like crazy is to give it a shot in the arm with PractiCalc 64. It's the most potent electronic spreadsheet you can buy at the

64 Doctor" Only $29.95*

of filing, and do plenty more-all at the touch of a key and the blink of an eye. And all at a price to make your eyes light up. And, il integrates with PractiCalc.

least cost. You can track expenses, inventories, invest ments. Make charts and graphs. Keep mailing lists.

The way to keep you from going crazy when some

thing in your computer system goes haywire is to treat it with 64 Doctor. You know that maddening feeling you get when something's wrong but you don't know exactly what? Well, kiss it goodbye with this powerful medicine. It's an inexpensive and versatile diagnostic program

Project profits. Sort alphabetically or numerically, instant ly and easily, of course. And at the price, it can pay for itself the first time you use it. Another way to make your computer system work like crazy is to boost it with PractiFile. It's like having a library full of information you can call on for jus! about

that takes the guesswork out of troubleshooting your computer system. With simple, plain-English instruc

everything while you pay practically nothing. A fully pro fessional data base for your Commodore, it can handle

RS-232 port, keyboard, video, audio, joystick, printer,

mailing list entries by the thousands. You can change records, numbers, methods

tions. Use it to test your Commodore's RAM memory,

PRACTICORP

data set and disk drive. Think of it as low-cost health insurance for your computer.

No-Nonsense Software

The Silk Mill, 44 Oak St.. Newton Upper Falls, MA 02164 ■ (617) 965-9870 'Prices are suggested retail lor disk vorsions ol Ihese programs. Actual prices can vary.Tape versions are slightly lower, tCommodore 64 is a trademark ol Commodore Business Machines Inc.

(01984 Praclicorp International. Inc.


Vocab Builder William J. Treanor

This program not only helps increase vocabulary, but also assists students who

must memorize words for spelling, biology,

history, or other classes. Up to 100 words and definitions can be entered and saved to tape or disk. For the 64 and expanded (any

amount) VIC.

the same day. For example, if you create a quiz named 11-21-84, use 11-21-84.1.) The program then returns to the main menu. The second option from the menu allows you to study words which were previously en

tered. First, you enter the date of the test and the file is loaded from tape or disk (depending on your response, T or D, to the prompt).

The list is put into random order. A defi

My son's sixth grade teacher regularly distributes

lists of words and their definitions to the stu dents. The children then take a spelling test at the end of the week.

"Vocab Builder" was originally written to help my son prepare for these tests. But it was

soon obvious that it could be used for other sub

jects—a history drill, say, with facts and dates in place of vocabulary words. Vocab Builder has even been used by college students learning medical terminology. The program flow is fairly straightforward; modifications (using a printer,

for example) should be easy to make.

Four Menu Options Enter the program, save it, and type RUN. First, you are asked to input your name, which is printed at the top of the screen.

Next, you'll see the main menu, which gives you four options: Enter new words, Study, Test, or End.

If you choose to enter new words, you are asked how many words will be in this particular file. You must then type in the words and their definitions. If you make a mistake, don't worry,

you'll have a chance to correct it later. When all words and definitions are entered, they are printed on the screen. You can fix mistakes at this point.

The program then saves the word list as a sequential file on tape or disk. You are prompted

for the date, which becomes part of the filename.

(Note: Since the date is part of the filename, and

the filename must be unique, be sure to use a different filename if you create a second quiz on 64

COMPUTE'S Gazette

October 19B4

nition appears on the screen and the student is

given three chances to enter the corresponding word. Spelling is important. If the word is cor rect, the student is congratulated. If the first two letters are correct but the word is misspelled, the

message YOU'RE CLOSE appears. When all words have been covered, the score (number of answers right and wrong) is displayed. Any word which was answered wrong

on the first attempt is counted as incorrect. The student is then given a list of which words were incorrect and need further study. The test option is similar to the studying option, but the student has only one chance to supply the correct word. The final option, End, allows you to exit the program.

A Tireless Teacher For young children, Vocab Builder may help de velop a sense of responsibility. They can choose

when to study and how long. They don't have to wait until a parent or sibling has some free time to help them with schoolwork. The child is addressed by name, so it be comes his or her computer program. A computer

doesn't tire of helping the child, or lose its pa tience. And it does not chastise the child for answering incorrectly. Words are randomized automatically (so the student actually has to learn the words rather than memorize them in order). Memorizing can be a chore. Vocab Builder

can help relieve some of the tedium. See program listing on page 178. Q


BIG OH FEATURES. r

TMU

i»i M-i

HUBH

t* I LiHT

i

»o(i

1411

TRhVEL I I- .i COMF-HH I LIT* ■ ■*-

l-l »»- 1 HMLE

.vj

l '«•■ I r i I I A

-.

»

n

I

I i »l?

*_'.: ■**•??■■

i-i' .

i •>-■

T . .1 VOUff

■■■■

1

*>t+ IHH.P

i ji,i

i ■#-■. i i i

r i

v

,

nlfi '('L ip hi ■

.

i

h -i i ■

'

i -,

i ' '1 - -• .

.

"

■ mi

> <r if i

«

IJKLnNOPOBSTUVWKV2««

■intuvw-vil

1*1 LKHt

i f hi

h ■• il-il

>—■

•_—_i

1

POH TABLE PHNieF

$139" /

SMALL ON PRICE. You read that right. A full 80

including the Commodore 64, the

Ask your local computer store or

column, 80 characler-per-second,

VIC 20. and the new Commodore 264.

dealer for the HUSH 80 CD today.

Commodore-compatible dot matrix

And you'll find the HUSH 80 CD printer is big on lots of small things

And if he doesn't carry it. call us at 415/322-ERGO. And find out where to get the little printer that does the big jobs.

thermal printer, complete (with a 90 ft. paper roll, interface cable

too. It weighs about one-half the

and power pack), ready-to-run— at 800 words per minute — for only

amount of it's nearest competitor

HUSH 8O CD

only thing the HUSH80 CD is

(it's compact size fits conveniently into a briefcase). And it's extremely quiet, with fewer working parts,

compatible with. It's compatible

which means less noise and less

with all Commodore models;

to go wrong.

LESS PRICE, LESS NOISE, LESS SIZE.

$139.99. But your wallet isn't the

'/Y/T£m/.mC 1360 Willow Road, Menlo Park, CA 94025


CDEFGABCDEFGABCDEFGABCDEFGAB

CD

EFG

VIC Music Tutor Howard Parnes

Your VIC-20 becomes a melody-editing ma

chine in this useful program. You can cre ate, play back, and edit songs, and save them to tape or disk. Requires 8K or more memory expansion.

note. So a C-sharp one octave higher than the lowest octave is entered as CS1, an E one octave

up as El, etc. Add a 2 for notes two octaves up: C2, FS2, etc.

If you have difficulty figuring in which oc tave a note falls, the diagram above may be

helpful. This music aid for .the VIC can help overcome

certain problems faced by new musicians. It al lows you to enter a tune from written music, or

to compose your own, to play all or part of the music back at varying tempos, and to save it on tape or disk for later use. Insert at least 8K mem ory expansion, turn on your VIC, and enter and save the program.

After typing RUN, you encounter the first option in the program: to enter a new tune or load and play back an old one. Once you've en tered and saved a tune, you can play back an old

one, but the first time you use the program you'll be entering a new one. Give the song a number and type in the name. Then start entering the song note by note.

The Note Names Each individual note in a music score provides two kinds of information: the pitch of the note, and its duration or time played. For simplicity, let's refer to the pitch as "note" and duration as "value." First you enter the note. Since each of the three music voices on the VIC is limited to three octaves, we have a three-octave limit on the range of the notes we enter. Each octave starts with a C note. First determine which octave you want. If the note falls in the lowest octave, just enter the note itself—C or F or G, for example. If it is a sharp or flat, add either an S or F after the letter. An E-flat in the lowest octave would be entered as EF, an F sharp as FS, and so on. To

move up to the next octave, add a 1 after the 86

COMPUTE'S Ga/arto

October 1984

Press RETURN after you've entered the data

for the note. Now you enter the value for the note. Referring to "Time Values," you can readily see how to enter standard whole, half, quarter, eighth, sixteenth, and thirty-second notes. If you encounter a dotted note, simply add a D after the letter for the note value. For in stance, HD is a dotted half note. You may enter triplets and grace notes as

well. Note in "Time Values" that there are di visions listed for each note—16 for the whole

note, 8 for the half, etc. You may also enter note values in numerical form. Triplets, for instance, may take the form of three notes of equal dura tion played in the space of one quarter note. Thus each note in the triplet has a value of 1.33. Add the 3 triplets together and you get a value of 4—our quarter note value. Grace notes are

played very quickly in front of a note of normal value. To place a grace note in front of a quarter note, for example, assign a short value to it like .2 and subtract it from the value of the quarter

note. The grace note has a value of .2 and instead of entering a Q for the quarter note, enter 3.8. To enter a rest simply enter R for the note followed by the value for the duration of the

rest. After you enter each note and its value you will have a final check before the information is preserved in memory. The note and its value are displayed and you type either Y or N. Typing N

lets you re-enter the note and value, while Y moves you on to the next note and value entry. To stop entering notes simply enter the English pound sign (E) instead of a note. This moves you to the next part of the program.


GET THE MOST OUT OF YOU

E-64

WITH ABACUS SOFTWARE CADPAK-64

VIDEO BASIC-64 disk $59.95

This advanced design package has outstan ding features-two Hires screens; draw LINEs. RAYs, CIRCLES. BOXEs; Ireehand

This superb graphics and sound develop ment package lets you wrile software for

distribution without royalties. Has hires, multicolor, sprite and turtle graphics; audio commands for simple or complex music and sound effects; two sizes of hardcopy to most

DHAW; FILL with patterns; COPY areas;

SAVE/RECALL pictures; define and use in tricate OBJECTS; insert text on screen; UNDO last function. Requires high quality lightpen. We recommend McPen. Includes

dot matrix printers; gama features such as

sprite collision detection, lightpen, game paddle; memory management (or multiple graphics screens, screen copy, etc.

manual with tutorial. DISK S49.95

McPen lightpen $49.95

MASTER 64

SYNTHY-64

This professional application development package adds 100 powerful commands to BASIC including fast ISAM indexed files; simplified yet sophisticated screen and printer management:. programmer's aid; BASIC 4.0 commands; 22-digit arithmetic; machine language monitor. Runtime

This is renowned as the finest music syn thesizers available at any price. Others may have a lot of onscreen frills, but SYNTHY-64

makes music better than them all. Nothing comes close to the performance of this package.

Includes

manual with tutorial,

sample music.

package for royalty-free distribution of your programs. Includes 150 pp. manual

DISK S27.95

DISK SS4.95

CHARTPAK-64

disk $42.95

ULTRABASIC 64

This finest charting package draws pie, bar and line charts and graphs from your data or DIF, Mulitplan and Busicalc files. Charts

This package adds SO powerful commands

(many found in VIDEO BASIC, above) ■

HIRES. MULTI, DOT, DRAW, CIRCLE, BOX, FILL, JOY, TURTLE, WOVE, TURN, HARD, SOUND, SPRITE, ROTATE, more.

are drawn in any ol 8 formats. Change for mat and build another chart immediately.

Hardcopy

to

MPS801,

Epson, Okidata,

All commands are easy to use. Includes manual with two-part tutorial and demo.

Prowriter. Includes manual and tutorial.

CHARTPLOT-64

disk $S4.95

Same as CHARTPAK-64 lor highest quality

DISK S27.95

ouput to most popular pen plotters.

TAS-64 Tectvirai A/iaysis System

io-r stock Marltft Evaluation

TAS-64 FOR SERIOUS

XREF-64

BASIC CROSS-REFERENCE

This sophisticated charting and technical

This tool allows you to locate those hard-tofind variables in your programs. Crossreferences all tokens (keywords), variables

than 15 technical indicators on a split screen (price vs. volume); moving averages; oscillators; trading bands; least squares; trend lines; superimpose graphs; five volume indicators; relative strength, volumes, etc. Includes 100 page manual.

and constants in sorted order. You can even

DISK $84.95

DEALER INQUIRIES INVITED

FREE CATALOG Ask for a listing of other Abacus Software for Commodore-64or Vic-20 DISTRIBUTORS

Great Britain:

706-524304

Bilgulm:

DATA BECKER

Merowkiflarstr 30 *000 DuSSlWort

0211/312065

Franco:

Irnsr Servos MICRO APPLICATION AVGuilaume 30 147 Avenue Paul-Doumer Brussel 1160. Belgium RueUI Malrnaison. France 2-660-1447 1732-9254

Watt Germany: Swadsn: HAL TRADING PO5IB 3*300 Almhuli W6.1J.KM

TAPE $24.95

INVESTORS

analysis system is easy to use. Plot more

ADAMSOFT IS Norwich Ave. Rochdal«, Lines.

TAPE $24.95

Australia: CW ELECTRONICS 416 Login Road Brisbane. Queens 07-397-08O8

Canada KING MICR0WARE I. Til 5950 Cots des Nelges Montreal. Quebec H3S1Z6 514)7379335

add your own tokens so that you can crossreference tokens from other software such as ULTRABASIC or VICTREE. Listings to

screen or all ASCII printers. DISK $17.95

AVAILABLE AT COMPUTER STORES, OR WRITE:

Abacus Bffl Software P.O. BOX 7211

GRAND RAPIDS, MICH. 49510

How Zealand:

For postage & handling, add $4,00 (U.S, and Canada), add $6.00

306-308 Church Streel Palmerslon North

or charge card. (Michigan Residents add 4% sales tax)

VISCOUNT ELECTRONICS

Commodore 64 is a reg. T.M. ol Commodore Business Machines

lor foreign. Make payment in U.S. dollars by chock, money order

FOR QUICK SERVICE PHONE 616-241-5510


How Does It Sound?

Editing The Music

After typing the pound sign, you are asked if you

When you no longer want to hear the song, you then pass on to the next option. In this instance you can choose to single step through the song. Pressing ft will play the notes one by one. When

want to hear the song. Type N and you skip to the editing phase. If you want to hear the song, type Y and select a tempo from 0 to 10. Most

songs play best at a speed between 3 and 7 but

each note is played, the number, note, and value

you can slow them down or speed them up as you like. Next select the playback pitch, either 1 for low, 2 for medium, or 3 for high. There is an

appear on the screen. If you want to change a

octave difference between each of these.

After you've made your selection, press RE

note or its value, press 17. You then enter the replacement note and value and continue to single step through the tune. To add a note, press f2, enter the new note and value then continue to

TURN again and the song will play. At the end

single step through the song. If at any time you want to stop the single step mode, press f5.

TURN again and the song will replay exactly as

If you choose not to go into the single step mode, your next choice is whether to add more notes to the song. You are sent back to the

of the song you have two options. Press RE

before. This is an important and useful feature

we'll look at more closely later on. If you do not hit RETURN, pressing any other key takes you to

record mode where once again you enter notes

the next option.

and values. These notes are added to the end of

Here you are asked if you want to hear the song again. The first time you listen to your song you may select the tempo and pitch but you must listen to the entire song (or all you've en tered up to that point). This time, however, you may choose to listen to only a part of the song. If you respond with a Y to "Do you want to hear it again?" you are then asked if you want to hear just part or the whole song. If you respond with "just part," you'll be told the total number of notes in the song and asked to select the starting and ending note of the part you want to hear. Then you may re-enter the tempo and pitch. Press RETURN and it will play according to your

the tune already in memory.

selected parameters. After it ends you'll return to the same series of options. The choices may seem to be confusing and unnecessary at first, but they actually make the program flexible and easier to use. For example,

most musicians, when learning a new piece of music, leam it in sections. They break the piece into smaller sections, practice these until they are smooth, then go on to the next section, until they've mastered the whole piece. "Music Tutor"

is ideally suited for this. You can select any sec tion to work on. You can then play the tune at a very slow tempo at first, and speed it up later, Sitting near the computer with your instrument you can listen to a section, then practice playing it. To hear the same section again at the same tempo, press RETURN once and it will repeat. As you get familiar with the section, speed up the tempo. Since values have already been assigned to all the variables from the previous playback, merely pressing RETURN for any option will leave that variable unchanged. If all you want to change is the tempo, simply press RETURN for the other options. But when the tempo selection comes up enter the new speed and then press RETURN. 88

COMPUTE'S Gazette

October 1984

In this manner you can enter a song piece-

by-piece instead of all at once. Enter one section, then listen to it. Make any corrections via the single step process. You may then save this sec tion. RUN the program again, load the song back, then add more notes. Check the song by listening again. Save it, and continue. This is an

especially effective way to work when entering longer works.

The last option in the program asks if you want to save the tune. If you respond Yes, save to tape or disk. A negative response ends the program.

The program requires at least 8K expansion. It allows songs of up to 371 notes to be entered.

With 16K expansion, you can have a maximum of 883 notes, and with 24K a whopping 1395 notes. For those of you who would rather not type in the program, I'll make a copy (tape only) if you send a prepaid mailer, a cassette tape, and $3 to: Howard Parties 115 Chestnut Street Frostburg, MD 21532

See program listing on page 176.

Time Values VALUE OF NOTE

Whole Half Quarter Eighth

Sixteenth Thirty-second Whole Dotted Half Dotted Quarter Dotted Eighth Dotted Sixteenth Dotted

Thirty-second Dotted

CODE

NO. OF DIVISIONS

W H

16 8

Q

4

E

2

S T

1

WD HD QD ED SD TD

.5

24 12 6

3 1.5

.75

m


COMMODORE-64 HACKERS ONLY! The ultimate source

for Commodore-64 Computer information

GRAPHICS BOOK FOR THE COMMODORE 64

THE ANATOMY OF THE COMMODORE 64

takes you from the fundamentals of graphic to advanced topics such as computer aid ed design. Shows you how to program new

is the insider's guido lo the lesser known features of the Commodore 64. Includes chapters on graphics, sound synthesis, in put/output control, sample programs using the kernal routines, more. For ihose who need to know, it includes the complete disassembled

and

documented

character sets, move sprites, draw in HIRES

and MULTICOLOR, use a lightpen, handle IRQs, do 3D graphics, projections, curves

Graph! or

Commodore

and animation. Includes dozens of samples.

ROM

64

listings. ISBN-0-916439-00-3

$19.95

THE ANATOMY OF THE 1541 DISK DRIVE unravels the mysteries of using the misunderstood disk drive. Details the use of program, sequential, relative and direct access files. Include many sample pro grams-RLE PROJECT, DIRECTORY, DISK MONITOR, BACKUP, MERGE, COPY, others. Describes internals of DOS with completely disassembled and com mented listings ol the 1541 ROMS, iSBN-0-916439-01-1

ISBN-0-916439-05-4

THE ANATOMY OF THE 1541

DISK DRIVE

lime clock, parallel and serial I/O, extending

BASIC and tips and tricks from machine language, more. ISBN-0-916439-06-2

$19.95

beyond BASIC. Write (aster, more memory efficient programs in machine language. Test is specificall geared to Commodore 64. Learns all 6510 instructions. Includes listings for 3 full length programs:

MACHINE LANGUAGE BOOK FOR THE

COMMODORE

ASSEMBLER. DISASSEMBLER and amaz

COMMODORE 64 is a collection of easy-to-use programming techniques for the '64. A perfect companion for those who have run up against those hard to solve programming problems. Covers advanced graphics, easy data input, BASIC enhancements, CP/M cartridge on the '64, POKEs, user defined character sets, joystick/mouse simulation, transferring data

calculator, recipe file, stock lists, construc

tion cost estimator, personal health record, dial planner, store windo advertising, com

ISSN-0-916439-07-0

$14.95

TRICKS & TIPS FOR THE

is (or those who wonder what you can do with your '64. It is written for the novice and presents dozens of program listings the many, many uses for you computer. Themes include: auto expenses, electronic

puter poetry, party invitations and more.

ing 6510 SIMULATOR so you can "see" the operation of the '64.

$12.95

C-64 SCIENCE ENGINEER

TRICKS &TIPS

in science. Describes variable types, com putational accuracy, computers in science. Describes variable types, computational ac curacy, various sort alogrithms. Topics in square distribution, Fourier analysis, matrix

calculations, more. Programs from chemistry, physics, biology, astronomy and electronics. Includes many program listings.

$19.95

INQUIRIES ARE

is an introduction to the world of computers

clude linear and nonlinear regression, CHI-

between comuters, more. A treausre chest.

ISBN-0-91 G439-09-7

INVITED

If any of the titles featured above are not available at your local bookstore or computer outlet, ask them to order direct from Abacus Software.

IN CANADA CONTACT: The Book

$19.95

THE C-64 IDEA BOOK

is aimed at those who want to progress

DEALER

COMMODORE 64 gives you an intensive treatment of the powerful '64 features. Author Lothar

Englisch delves into areas such as Inter

LANGUAGE BOOK

ISBN-0-916439-03-B

ADVANCED MACHINE LANGUAGE FOR THE

rupts, the video controller, the timer, the real

THE C-64 MACHINE

ISBN-0-916439-02-X

$19.95

Centre, 1140 Beaulac Street

Montreal, Quebec H4R1R8 Phone: (514) 322-4154

S19.95

COMMODORE

M

SCIENCE AND

ENGIN EERING

AVAILABLE AT COMPUTER STORES, OR WRITE:

Abacus Bm Software Exclusive U.S. DATA-BECKER Publishers

P.O. BOX 7211 GRAND RAPIDS. MICH. 49510 For postage & handling, add $4.00 (U.S. and Canada), add $6.00 (or foreign. Make payment in U.S. dollars by check, money order

Commodore 64 is a tog T.M. of Commodore Business Machir>es

or charge card. (Michigan Residents add 4% sales tax).

OTHER NEW BOOKS ARE COMING SOON!

FOR QUICK SERVICE PHONE 616-241-5510


Turtle Graphics Interpreter For The 64 Irwin Tillman

This comprehensive three-program package

gives your 64 full turtle graphics capabili ties. It's an excellent learning tool for chil dren, and it offers a new graphics capacity for all ages. For disk or tape users.

Turtle geometry is fast becoming the first expo

sure to computers for many children. Instead of printing their names on the screen, they are more likely drawing squares and triangles. While such

Boot" (Program 3) runs the whole thing. It is very important that you type the DATA in Program 2 correctly; otherwise the machine language routines may crash the machine when the Interpreter is run. Also, you should leave out the CHR${31) in line 140 of Program 3 until you're sure everything is working right. This will make the operation of the Boot program visible. When you are sure that the Boot is loading and running Turtle Data and Interpreter, reinsert the CHR$(31). Then, to run the whole package, just

facilities are generally found with specific lan guages (such as PILOT and Logo), the concept of turtle geometry is not unique to any single lan

load and run the Boot program.

guage. One of the reasons for its popularity is that it's not only a natural introduction to computing, but also an excellent tool to teach thinking (see Seymour Papert's Mindslorms). If you're not familiar with turtle graphics, the basic concept involves moving a turtle around the screen, leaving a trail as it goes. This is accom plished through a series of English commands, such as FORWARD and RIGHT. Other commands

The Interpreter recognizes 30 commands, some of which can be abbreviated. In addition, the CLR/HOME key will clear the text portion of the screen and home the cursor (regardless of whether the SHIFT key is pressed), Pressing the

control the color scheme, define loops, and allow you to assemble a series of commands into procedures.

Coordinating The Turtle Programs "Turtle Graphics Interpreter" consists of three

Turtle Commands

fl function key will change the border color; f3 handles the text-background color. In addition, trying to move from the text window into the hi res screen will be treated as a CLR/HOME. The commands are as follows:

FORWARD x (can be abbreviated as FD)—moves the turtle a distance of x in the direction it is pointing. The value of x must be greater than zero. The turtle will normally leave a trail as it moves (see PENUP, PENDOWN, PENDRAW, and PENERASE). You cannot leave the screen.

programs designed originally for use with a disk

RIGHT x <RT), LEFT x (LT)—turns the turtle

drive; if you are using a tape drive, be sure to read the appropriate section elsewhere in this article. The first program, "Interpreter," does most of

grees (x is at least zero). Because there are only eight turtle sprites, the turtle will not always seem

right (clockwise) or left (counterclockwise) x de

to be pointing in exactly the direction it should,

the work. It accepts and executes the commands

but it will still draw and move properly.

you enter. Program 2, "Turtle Data," POKEs in the shape tables for the turtle sprites and a num

SETHEADING x (SETH), PRINTHEADING—

ber of machine language routines. Finally, "Turtle

out changing its position. Headings range from 0

90

COMPUTE'S Gazette

October 1984

Setting the heading to x will turn the turtle with


SERIOUS 64 SOFTWARE

INDISPENSIBLE TOOLS FOR YOUR COMMODORE 64

OTHER NEW SOFTWARE COMING SOON!

DATA BECKER Is

The ultimata source" for Commodore 64 Information

PASCAL 64

TEXTOMAT 64

This full compiler produces fast 6502 machine code. Supports major data Types: REAL, INTEGER, BOOLEAN, CHAR, multiple dimension arrays, RECORD, RLE, SET and pointer. Offers easy string handl ing, procedures for sequential and relative

This complete word processor displays 80

data management and ability to write IN

TERRUPT routines In Pascal! Extensions Included for high resolution and sprite

graphics. Link to ASSEM/MON machine language.

DISK 939.95

DATAMAT 64 This powerful data base manager handles

up to 2000 records per disk. You select the screen format using up to 50 fields per record. DATAMAT 64 can sort on multiple fields In any combination. Complete report

writing capabilities to all COMMODORE or ASCII printers.

Available November DISK 939.95

columns using

horizontal scrolling.

In

memory editing up to 24,000 characters plus chaining of longer documents. Com

plete text formating, block operations, form letters, on-screen prompting. Available November

DISK I3B.9B

ASSEMBLER/

MONITOR 64

This complete language development package features a macro assembler and extended monitor. The macro assembler offers freetorm Input, complete assembler

listings with symbol table (label), condi tional assembly. The extended monitor has

all the standard commands plus single step, quick trace breakpoint, bank swltching «nd more.

DEALER

INQUIRIES

INVITED

All DATA BECKER software books have inside disk storage pockets, and heavy vinyl ring-binder covers for maximum durability and easy reference access. AVAILABLE AT COMPUTER STORES, OR WHITE:

Abacus tm Software

P.O. BOX 7211 GRAND RAPIDS, Ml 49510 ExehrtJv* U.S. DATA BECKER PuMWmcs For pottago & handling, add S4.00 (U.S. and

CanMfa), Md S6.00 tor fweign. MaM paymanl in U.S. dollar* by check, money ordar of charga card. (Michigan Rntdanti add 4% aal»» lax.)

FOR QUICK SERVICE PHONE (616) 341-5510 Commode™ 64 niiig IM ol Connnodoii BuitntM UithkiM


to 360. Straight up is 0 degrees, and the values increase clockwise. PRINTHEADING returns the

FORWARD 100 RIGHT 90 FORWARD 100 RIGHT 90 FORWARD 100 RIGHT 90 FORWARD 100

current value of the turtle's heading.

These commands cause the turtle to draw a

SETPOSITION x y (SETP), PRINTPOSITION— Setting the position to (x,y) moves the turtle without changing its heading. The value of x should be between —159 and 160, and y values

square. Because the Interpreter is in BASIC, the

range from —106 to 106. Note that the range of y will change if you change the "crunch factor"

turtle won't move at breakneck speed. (If you are extremely ambitious, you could convert the plot ting routine to machine language.)

If you are willing to give up a little more time in interpretive overhead, you can use the power

(see "Crunching the Screen"). The turtle starts at

ful REPEAT (RP) command. We can rewrite the

(0,0), the center of the screen. PRINTPOSITION

commands to draw a square as:

returns (x,y).

REPEAT 4 [FORWARD 100 RIGHT 90)

PENERASE (PE), PENDRAW (PW)—These commands control whether the turtle will leave a

trail or erase one. The program starts in draw

mode. PENDOWN (PD), PENUP (PU)—Normally the turtle's pen is down. Penup raises it so the turtle cannot leave or erase a trail. You may still set

draw or erase modes, but you will not see any effect until after you have lowered the pen and moved forward. PENCOLOR x (PC), BACKGROUNDCOLOR x

(BC), TURTLECOLOR x (TO—Each of these

The statements you want to be repeated should be enclosed in square brackets and pre ceded by REPEAT x, where x is the number of times they should be repeated. REPEATS may be nested to a depth of 255 (although procedure calls will decrease this, as detailed below). For example, try the following commands: CS REPEAT 8 [REPEAT 4 [FORWARD 100 RIGHT 90] RIGHT 45]

Using Procedures

changes the color to x, where x is between 0 and

The full power of turtle graphics is realized with

15. The first two will also perform a CLR/HOME. (It's not a bug, it's a feature.) There can only be

procedures. A procedure is like a program; it's just

one pen color on the screen at any time, so executing the PENCOLOR command will recolor all the lines that have already been drawn on the screen. Try a number of combinations of back ground and pen colors, because of the hardware problems in displaying isolated pixels on the screen, the same pen color will appear as dif ferent hues at different points on the screen. Experiment—you may like the effect, which is known as "artifacting."

SHOWTURTLE (ST), HIDETURTLE (HT)— Hiding the turtle is useful when you want to view a finished design. These commands have no effect on the turtle's color, movement, po sition, etc.

HOME—moves the turtle to (0,0) and sets the heading to 0 degrees. CLEAN—erases the hi-res screen. Note that pressing CLR/HOME will not disturb the hi-res drawings.

CLEARSCREEN (CS)—performs a CLEAN and HOME.

Combining Commands The Interpreter will accept lines of up to 78

a series of commands given a specific name. That name is added to the commands that the inter

preter will recognize. To make up a new procedure, use the DE FINE command. For example, type DEFINE BOX. You will be prompted with BOX?, after which you should type REPEAT 4 [FORWARD 100 RIGHT 90]. The interpreter will respond with BOX

DEFINED. From now on, whenever you type BOX (either from the keyboard or from within another procedure) the commands REPEAT 4 [FORWARD 100 RIGHT 90] will be executed. We could define the design above as 8BOXES: CS REPEAT 8 [BOX RIGHT 45].

Each time you call a procedure counts as a level of nesting (just as a repeat loop does). One very important warning: Don't allow a procedure

to call itself (or to call another procedure that may eventually call the first). This will result in a

loop that you will have to break by pressing the STOP key. When you restart the program by typing RUN, you will lose your procedure defi nitions and any designs on the screen.

There are a number of commands which facilitate working with procedures. NAMES will

print the names of all the current procedures (limit of 255). PRINTPROCEDURE x (PPROC)

characters, and you may include numerous com mands on each line—just be sure to use spaces between commands (no commas or colons). Here's a simple demonstration to animate the

will print the commands associated with the procedure named x. ERASE x will erase the

turtle:

all the current procedure definitions.

92

COMPUTE'S Gazette

October 1964

procedure x, and RENAME x y will change the

name of procedure x to y. ERASEALL will erase


:RETURN

Saving And Loading Procedures Procedures may also be saved to and loaded from disk or tape. SAVE x will save al! the current procedures (a "workspace") to a file named "x.turtle"; LOAD x will copy the procedures in

"x.rurtle" into memory. These will be added to those already defined, so you can merge workspaces. Files may be erased from the disk with SCRATCH x, which will erase "x.turtle." While these commands are operating, the screen will seem to go awry; ignore this as it will be re stored when the operations are complete. QUIT will exit the program, but leave the

machine in an unusual state. The screen will still be split, but this may be corrected with RUN/

STOP-RESTORE. Since memory is reconfigured, you'll want to return it to its normal state. If you don't want to power off and back on again, type POKE 204B,0: POKE 44,8: NEW

has a different vertical aspect ratio, you may no tice that your squares aren't square, circles look like eggs, etc. If so, type REPEAT 180 [FORWARD 2 RIGHT 2]

If your design isn't a circle, take a centimeter ruler and measure the diameter along the x and y axes. (These should be easy to identify; just slide the ruler along the screen until you get the maxi mum measurements in the horizontal and vertical directions.) Divide the x value by the y value.

This is the "crunch factor." Change line 50 of Program 1 to set CR to this value. If you are using a Commodore color monitor, the value I've sup plied in the program (.74) is appropriate. Note that changing this value changes the scaling on the y axis. The new limits will be ± 79/CR.

For Tape Users You can modify the package to use a tape drive with the following changes: • Change the device numbers in lines 150

and 170 of Program 3 from 8 to 1. • Change the word DISK to TAPE in line 80. • Delete lines 7000-7100, 25000-25060, and line 1280 in Program 1.

ER=-liPRINT"YOU MOST

23018

5000:IF WD$<>""THEN23018 SUPPLY

CLOSE2:RETURN

Program 3 should be saved first on the tape, followed by Program 2, and then Program 1. When Program 3 is loaded and run, it will then load and run the other two programs. For this

autoload feature to work properly, you must save the programs with the names shown in lines 150 and 170—TURTLE GRAPHIC 2 for Program 2 and TURTLE GRAPHIC 1 for Program 1. Alter nately, you could change the names in those lines to match the names under which you saved the programs.

There is one additional requirement for the autoload feature to operate properly. You must

leave the PLAY button depressed after Program 3 finishes loading. If you release the button, the PRESS PLAY message will be printed to the screen when Program 2 is loaded, which will pre vent the loading of Program 1.

A

guage, there are still a number of modifications you may wish to make to customize the program. I've included these details to briefly give you an idea of how the package functions.

Program 3 reconfigures memory to start load ing programs at $4000, leaving $0800-$03FF free for turtle sprite data. Only the last 512 locations are used, so you could put additional sprites be low them. The LOADs and RUNs are accom plished by printing the appropriate commands on the screen and filling the keyboard buffer with RETURNS.

Program 2 POKEs in the 512 bytes of sprite data below $0400, and then puts a number of ma chine language routines in memory beginning at SCOOO. The first routine is an interrupt-driven split screen routine. It also takes care of checking for fl, f2, CLR/HOME, and keeps text from scrolling onto the hi-res screen. This routine is ini tialed with SYS 49322. To clean the hi-res screen, use SYS 49295. SYS 49235 will clean under the hi-res screen (1024-1823) and erase the text screen (1824-2023). The hi-res bitmap is stored beginning at 8192.

Here are the important sections of the Inter preter (Program 1): 10-170: Initialization. Frequently used variables

and constants are created first to improve speed. Here are most of the variables' functions:

• Change these lines in Program 1: GOSUB

24040

Short of rewriting the Interpreter in machine lan

Because each brand of TV and computer monitor

23014

0PEN2,1,1,WD$+".TURTLE"

How It Works

Crunching The Screen

23010

24018

NAME"

PE

— 1 = penup, 0 = pendown

iRETURN

DR

— 1 = pendraw, 0 = penerase

OPEN2,1,0,WDS-*-".TURTLE"

C SC BL BB

conversion from degrees to radians screen base bytes per hi-res screen line bytes per hi-res screen block

23060

CLOSE2iRETURN

24010

GOSUB

24014

ER=-liPRINT"YOU MUST

5000:IF WD$<>""THEN24018

SUPPLY A NAME"

COMPUTE'S Gazette

Oclobef 1934

93


MX

MSB of sprite x location

PX PV

LSB of sprite 0 x location sprite 0 y location

BG

used for sprite x seam

CR MA BA C1-C7

screen crunch factor mask base in computer constants used in determining sprite position

SP

sprite image number (0-7)

H

heading

CI XH, XL YH, YL IX, IY

degrees in circle x-hi, lo values y-hi, lo values initial x,y coordinates in FORWARD command

X,Y

current coordinates

SS

sprite spacing (45°)

HA

one-half

FF

used as a mask

PC

procedure counter

DH K, QQ, ZZ T$, ZZ$ SE PT D ER BY

delta heading temporary numeric storage temporary string storage sprite enable sprite 0 pointer distance traveled -1 = error, 0 = ok byte to be POKEd

BI

bit to be POKEd

Whenever a repeat command is found, the nesting level is incremented, the repetition factor

then executes ST$(NE) as already described.

where we left off in the previous command line.

row, column for upper-left comer of sprite

coordinates for turtle sprite

WD$ NU PN MD$ NP

current word numeric input value procedure number temp disk read/write mode number of procedures in disk file

Advanced programmers may recognize this as a stack used to simulate recursion. Procedures are implemented in the same way. Whenever a procedure name is encountered, we drop down a nesting level, and treat the procedure's commands as the contents of a repeat loop with a repetition factor of 1.

1000-1300: Identifies and executes commands. If you choose to permanently change the name (or abbreviation) of a command, do it here. This sec

LOW COST SOFTWARE Ate you tired ol paying high prices for your software? Let John Henry Software save you money! We distribute public domain software for your VIC 20" or CommodnrB 64". We've tested and documented each guarantee you hours of fun and useful

learning experiences. We specialize in prompt delivery ol your software, even if you order tapes, and we

tion also clears the error flag to 0 (false) before each command. Any command that fails will set the error flag to —1 (true). The parser keeps track of the flag, and aborts all pending commands when the flag is set true. The individual com mands all have good diagnostics, and you may assume that your commands have been success fully executed if no message to the contrary is printed.

guarantee our product.

2000-8000: These subroutines are used by the

You'll also receive our free program reference book when you place your order.

Interpreter in executing various commands.

Group VG Group VP

Group VE

VIC 20

62 Games for Everyone 54 Programming. Demo, Business and Home

S7.95

COMMODORE 64

Group CG Group C?

26 Games for Everyone 30 Programming, Demo, Business

Group CE

16 Educational Programs

Group CA

S7.95 ,. S7.95

5 Adventure Games idisk oniyi

S7.95

S7 95

S7.95

When ordering, specify group and tape or disk.

Send check or money order payable to: John Henry Software P.O. Box 39021

Cincinnati. Ohio 45239 Don't wait! Order your software today! Or write for your free program reference book. You'll be glad you did! To keep our sallware prices low. our ad will only appear In Ihe June. August, Octobar and December issues ol lhns magazine

COMPUTERS Gazatto

October 1984

9000-22000: Each of these subroutines corre sponds to a single command; consulting the vari able list should help clarify them.

S7.95

35 Educational Programs

and Home

94

and executed in 1000-1300; IN and ST(0) are con stantly updated.

When we reach the end of a command line, we "pop" up by decrementing NE and continuing

XS, YS

lo

read off (and removed) from the left end of IN$

is put in RP(NE), and the contents of the loop are put in a new command line, ST$(NE). The parser

RO, CO

program

200-620: The parser routine is the most com plicated part of the program. NE keeps track of the nesting level. The command line typed at the keyboard is assigned to ST$(0). This serves as a permanent copy of the command line. ST(0) is an index into this string (how much has been pro cessed). These are copied into IN$ and IN, which is what we actually work from. Commands are

Sample Designs Here are some simple designs to get you started: RECTANGLE: RP 2 [FD 80 RT 90 FD 30 RT 90)

HEXAGON: RP 6 [FD 100 RT 60] PENTAGON: RP 5 [FD 100 LT 72] PENTAGRAM: RP 5 [FD 161.8 LT 144] TWOPENTAS: SETP -60 -80 SETH 90 PENTAGON LT 36 PENTAGRAM

ARROW: RECTANGLE LT 90 FD 15 LT 135 RP 2 [FD 42.4 LT 90] LT 45 FD 15 PE FD 28 PW HONEYCOMB: SETP -30 30 SETH 330 RP 6 [RP 6 [FD 25

RT 60] RT 120 PU FD 25 LT 60 PD]

See program listings on page 167. <Bf


First Aid Scott M. Huse

1541 DISK DRIVE ALIGNMENT PROGRAM Finally, a complete disk drive alignment program! No special equip ment needed! A two disk (program and calibration) program allows anyone with average mechanical skills to properly align the 1541 dish drive. Complete instruction manual. 139.95 plm 12.50 shipping (U.S.)

PROGRAM PROTECTION MANUAL FOR THE C - G4 2ND EDITION This Is the book you've been waiting for'. All the latest tips and secrets. A complete reference guide to software protection on the C - 64.

Covers the disk drive, bad tracks and sectors, modified directories, cartridges to disk and much, much more, A complete and up to date guide to program protection of all types. Covers both basic and machine language protection schemes. A complete memory map US)

CHEMICAL)

and a disk with many helpful programs Is included. Over 100 pages of valuable Information 129.95 plu* 12.50 thlpplng (U.S.)

PROGRAM PROTECTION NEWSLETTER A monthly newsletter covering the latest advances in program pro

C SHOCK E TO COLD

E TO HEAT

tection. Each Issue will examine 3 to 5 specific programs and their

protection schemes. This will be a complete 'HOW and "WHY" ap proach to individual program protection schemes. A full explanation of each protection scheme will be Included.

135.00 per year port paid In the U.S.

C. S. M.

SOFTWARE

What do you do for an earache? For faint

P.O. Box 563 Crown Polni, IN 46307 (219) 663-4335

ing? For a sunburn? This program can be helpful for babysitters, students learning first aid, or parents who want to know how to react to common medical problems. For

VISA AND MASTER CAHD5 ACCEPTED DEALER INQUIRIES INVITED

the Commodore 64.

"First Aid" is a practical, menu-driven program for the Commodore 64. It provides a useful tu torial on suggested first aid treatment steps for thirty-three major and minor medical emer gencies, as well as space for critical emergency phone numbers. This program is not designed to be com prehensive and is certainly not intended to re place formal first aid training or professional medical treatment. Rather, it should be consid ered a valuable educational tool to teach and drill basic first aid steps for a variety of medical situations.

8 GAMES PLUS... The ''PREMIER COLLECTION" A disk packed full of games and other interesting programs for the

Commodore 64. For all ages and interests. ALL for $34.95. BULLRIDE. How long can you ride ttie wild bull in this fast animated compute! simulation' DARTS. Use a joystick to deflect darts toward the targel. Scores like English Darls. 1-2 players

multi-color graphic

pits you against tlie computer.

Rod Baron and you'll win thisonu

recognized first aid training courses, the pub lisher and author must disclaim any and all liability in the use of this program for medical

-MAXWELL'S DEMON. In this

menu, push the corresponding letter or number. Any key will return the user to the main menu. In order to.customize the emergency phone num bers to your specific area, simply substitute your local numbers in lines 550-600. See program listing on page 159. (0

using ihe

mode.

the lasl paced trump card game

To use this program, simply type it in and RUN. To select a specific category from the main

SLIDE SHOW. Animated se quence of ouler space scenes

EUCHRE. This solitaire version of

Although the medical advice presented in this program is based upon sound, nationally

treatment.

REVERSI. 7 level machine language version of this familiar game We bet you cant beat it on level 5'

unique action game you must try

to break Ihe Second Thermodynamics1 PHONE

DIALER.

A

Law of

SOPWITH CAMEL. Outfly the SQUABBLE. You have 3 minutes to find more words than the com puter can find in the random 4x4 letter gnd. The computer knows over 4.700 words

personal

phone directory with automalic

tone dialing. Stores 364 entries and 2 access codes per file.

Do you'

WORDTIME. if Squabble's too tame for you. try shooting missiles at letters to form words 2 Players.

Commodoru G4 is a registered Irademark ol Commodore Electronics Ltd

(Works with most 1541 format Serial Drives) Phone or Send S34.95 {OH. Res. add S1.93 tax) to:

THE /

SOFTWARE

SECTOR,

Flflllbrook, OK 45305

_i

(S13) 848-2(188

J


REVIEWS

Software Disk Alignment For 1 O^ 1

George Miller, Assistant Technical Editor

Sooner or later it happens: You try to load that exciting new software, but after your disk

whirs and clatters for several minutes, you get a READ

ERROR. That's not possible, you say. This is a brand new disk. Surely the disk must be defec tive. So it's back to the dealer, who successfully loads the pro gram into his computer on the first try and then says, "Sorry, your disk drive must be out of alignment," Can that be true? Of course not. Last night you formatted a disk and saved a program that loads and runs perfectly. But all that tells you is that your drive

can read disks it has formatted itself. It reveals nothing about the alignment since those disks

have been formatted with the tracks misaligned, Head misalignment is a common problem with heavily used 1541 disk drives. Almost

all of the dozen or so 1541 drives in daily use here at COMPUTED offices have ex perienced the problem at some point in their service lives.

The symptoms include the

inability to load programs from commercial disks and frequent READ ERRORS when using disks formatted when the drive was comparatively new. Such errors are generally caused by the inability of the disk drive to access track 1 or track 35 of the disk.

Commodore 1541 align ment problems are often related

erating System) can cause the

end stop to be hit by the cam. Until now, the only remedy was to visit a service center (if you could find one), wait until the service technician finds the time to squeeze you in, and then pay the going rate. The

price could range from $40 to $85, and repairs could take two weeks to a month or more.

This is done by bumping a cam

so and the program will pay for

attached to a stepper motor

itself the first time you use it.

against a fixed stop mounted on the frame of the drive; from there the drive searches for information to indicate that it has found track one. Unfortunately, Commodore has used a pressure fitting method to secure the cam to the

Besides allowing you to bring

shaft of the stepper motor. Repeated bumping against the end stop will eventually begin to bump the drive out of align

might well find that the disks you wrote most recently are un readable on your newly aligned

Many of the drives seem to be

about through ordinary use. In

ment problems six months to a

addition, commercial software using bad tracks and sectors for

year after being put into service {unfortunately, beyond the ex piration date of Commodore's

copy protection may contribute

warranty).

lem. Every attempt to read a October 19B4

be noted that many normal functions of the DOS (Disk Op

A Quick And Easy Fix

gin to experience head align

COMPUTEts Gazane

the end stop, eventually causing slippage of the cam. It should

to the fact that the drive's head is logic seeking. In other words, it looks for data on the disk and aligns itself to read the data.

ment, and that's when your problem begins. Misalignment can come

96

bad track forces the cam to hit

to an eventual alignment prob

But with 1541 Disk Drive Align

ment from CSM Software, you can fix it yourself in an hour or

wayward drives up to specs, it also provides a ready reference to let you determine when your drive is beginning to slip before the problem becomes critical. In fact, if you wait too long to cor rect alignment problems, you

drive. Previously, most disk align ment procedures required at

least a calibration disk, a dual trace oscilloscope, and precision alignment tools. This program, however, requires only a 64, a disk drive able to read the pro gram disk, a screwdriver to dis assemble the plastic disk drive


80 Column Smart Terminal For Your C64 Without Any Hardware Change! —

VIP Terminal roafly

II 15 2B

VIP TERMINAL™ They're right! To start wilh the best you've got to have the VIP Terminal!

Dear Pepper, You're nghl This VIP Terminal is ihe only lerrrsmal 'or (Me C64 worlh

■ ■ ■ ■ ■

owning Thai freebie soltware that came wilh my modem just didn't work, especially wilh my new smarlmodem

The 80 column display alone was well worth

Ihe SS9.95 — much less Ihe 40 64 and 106 character displays - and it doesn'l need any hnrdware changes. Imagine 106 characlers an 25 lines. Hock, there's

more lexl on my scroen Itian on my uncle's Apnlu or my dad's IBM-PC1 I pjl aulo-difll lo work right away I aulo-dialed CompuServe, but couldn't ge[ through, so I had VIP Terminal redral Ltil il got through — il

■ 16 entry phone book/20 message keys ■ Word wrap for a formatted display

dialed live minutes straight1 Then I auto-logged on wilh one ol my 20 program med keys, and downloaded some graphics screens, and stock quotes lor flad. I

■ Auto dial, redial, up/download, log-on

printed it and saved it to disk as it came on The screen Wow1 And now I can send you my programs automatically. I go! yours and they worked right oft

Those icons — you know, like Ihe Apple Lisa — are a lot ol tun I also like Ihe menus, lunclion keys, highlights, hslp tables — great for a newcomer like me And wilh Ihe many oplions Ihere isn't a computer I cant mlk to What's really neat is lhat Soltlaw has a whole VIP Library of interactive programs, including a word processor, spreadsheet and database

which will be out soon Sis promised me the whole sel tor my birthday I see by the built-in

old clock' on Ihe screen that long-distance rales

are down Gol lo call that L A BBS Yep. there goes Ihe alarm Laler

Built-in 40, 64, 80 and 106 columns Talk to any computer Flawless 1200 baud operation Use any modem and printer Written in fast machine code

& answer with your 1650 or Hayes ■ Protocol: CBM-Punter, ASCII, Xon/Xoff, G4 Graphics & VT52 ■ Full screen editor ■ Simultaneous on line printing and saving of files to disk ■ Use and save files as big as your disk! ■ E Mail & [-COM Compatible

Get yours NOW! $59.95

Introducing The VIP Library The Library Concept

Icons Make Learning Easy

Professional Displays

The VIP Terminal is only the first in a whole lories of elegant software for your Commodore 64 called the VIP Library. This romplele collection of easy-lo-use. serious, high quality, loially interactive productivity software

Hi-re* technology and sprites allow VIP Library programs to bring you task

The 40-characters-per-line display of the Commodore 64 is inadequate for

includes VIP Writer. VIP Speller, VIP

Calc, VIP Database, VIP DkW AP, VIP Accountant and VIP Tax. All are equal in quality to much more expensive software for the IBM PC. and all are

very affordable!

Icons, made famous hy the Apple Lisa'" and the Xerox Star™. With these advanced sprite representations of the

task options open to the user, even the total novice can, at a glance, perform every task wilh ease. Jusl look at the icon and press a key! No programs are easier or more fun to learn and use!

Total Compatibility All VIP Library programs are compatible with each other and oiher computers for easy file transfer. Each uses ASCII, the universal language of

computer communications so that files

can he sent lo and received from other computers without modification! The Library also gives you the benefit of a consistent icon and command structure. Once you have learned one program, the others will come easily.

For Orders ONLY — Call Toll Free — Virtual Memory VIP Library programs are not limited by the size of your computer's memory. All programs use virtual memory techniques to allow creation and use of files larger than your

computer's available work area. You're

only limited by the space on your disk! - I'lii I In 'mlil.li-, ( iit|inr.iliiiii

serious computing. An 80-column

display is the industry slandard. VIP Library programs Ining this Standard (o

your Commodore 64 with slate-of-thean graphics, without need for cosily

hardware modifications. Wilh VIP Library programs you can freely choose from four displays: the standard 40

column display, plus a 64, 80 and even

a 106 column by 25 line display. Wilh ihese programs you can have more lexl on your screen than on an IBM PC or an Apple Me with an 80-column board! Welcome to the professional world!

Who Is So.tl.iw? Softlaw Corporation has years of soft

ware experience in micros. Wo currently

offer the fufl-linc VIP Library for other micros in the U.S. and in Europe. Now we are bringing this experience to the Com modore 64 so you get ultra-high quality

software at very affordable prices.

1-800-328-2737 Order Status and Software Questions call (612) 881-2777

Available at Dealers everywhere. If your

Dealer is out of stock ORDER DIRECT! MAIL ORDERS: $3,00 U.S. Shipping ($5.00 CANADA; $10.00 OVERSEAS. Personal checks allow 3 weeks.

9072 Lyndale Avenue South Minneapolis, Minnesota 55420


case, a small screwdriver for an internal adjustment, and a feeler

ments are necessary. No

simply load it into your 64 and

technical expertise is required to

follow the instructions in the

gauge to set the end stop. In practice, after completing

accomplish the alignment proce

manual. If your drive is very far

dures, and the manual accompa nying the program thoroughly describes the procedures. To use the CSM program,

out of alignment, the program

the other adjustments, the end stop is usually well within toler ance, and no further adjust

may need to be loaded from a working drive, although it

worked fine with each of the misaligned drives we tested it on at COMPUTE!. The program includes checks for proper operating speed, a program to set the

stepper motor correctly, and a

THE ALL NEW STAHFIGHTER IS HERE I The Best Blasted Spacewar Game I ever saw! Multiple screens, fantastic graphics, fast action - including one o( the best first person battle scenes ever clone. This will put you right in the turret.

Available On Commodoie 64 Only TAPE 12495

DISK $2935 IH

VIDEO ADVENTURES -DARR.J gB"iB

Id

ability, but it may give your old drive new life. It certainly beats the price of a new one.

o/o»- iio™

5*1"*

i"tl

badly worn and simply will not hold an alignment, the Fix is in cluded. This is a method of se

curing the cam to the stepper motor shaft. It requires some ad ditional tools, as well as a bit more technical and mechanical

DUNGEONS*

rnifirjnii i"Bt

test program for proper align

ment, which allows you to ad just for the best possible alignment of your drive. For disk drives that are

I'f

'•Hdu"DK>" h* I" IB'BI Bi«'

Included in the CSM pack age are 1541 Disk Drive Align ment, 2541 Disk Drive Alignment SJtlT

.PftD^i'C li aymil

' O.«^ffn| k.nQ o<

Ad-aMuf* -I <■ :<" p rj"iptiHr

KILt

f«(

"if" ^Ao!&Iul-iV"'A61oA»

I

rtund ind lwn

'"■'''

lnr°Ufln

5 noun to QiAy And ..

TliliiH

Calibration, and the instruction

»C1.OO

BH.ir^ln>n IpH^'inn. Cf'iH, ■ coid IiIHb pmau<i. *piO it

•'"''"I- IBWHdiJ -m* *"1L if*?

MART

ClULlT

manual. Anyone with average

"•»• li"O*m#pp . h* IB itffl

mechanical ability, patience, and a little caution (you're working with an exposed circuit board

HIIIIB

and power supply plugged into

a potentially dangerous 117

■1Q - lour tJuD crimM O« '-

;*- -

■•OBi' JB1

-

-

.r

you' tNp

r.-,.-♦

■ II

■ Arm

1

volts) can do his own align

. ,-]•«!

'- ■

•«

«orrr,»lP, fUi< fr^n So lO 10

■aniruiu

,

Iruovg" 1"* p,rBHTii[] .«

5O n

TO

•■•

hbvK

*ar|o

Ciw>*

ment, or at least run a reliable. test to judge the alignment.

FULL u aHAPMIC

The program is compatible with the 1541 and with the

aoventu1e

HHHIIR

NEWI

built-in disk drive on the SX-64. Due to the difference in speeds

GRAPHIC ADVENTURES Ion

Uoliflr

Fill

H'Ujn

bW4kty

between the 1540 and the 1541

disk drives, the speed check and adjust program included with

1-313-669-3110 AARDVARK

■■

CN1064

/

IHSBQC

'

IBMPC

/

VICZO

the program will not work prop

I OPtDiM »CC

/

TI99

-lit:-

erly on the faster 1540s. 1541 ■••

Disk Drive Alignment should surely be part of every user's

group library, and is a wise addi-


New Age Dawns***

As you read this, programming on the Commodore enters a new age. If you've been frustrated by

programming in BASIC, now, there's

relief...PROMAL. The first truly structured programming languageand compiler with operating system and full-screen editor is now available for the Commodore world. No longer do you have to accept slow

execution. Or large memory demands.

Or slow development time. Or limited and awkward editing. Or the lack of operating

system support. Or working with an unstructured lansuage. Or difficulty

interfacing to machine-level functions.

Now, you have PROMAL, a "real" programming language and development system on a 64K machine. Now, you have another

language to choose. One that's simple to learn. And one that's powerful, too...like Pascal orC but withouttheir complexity New, you can realize higher performance from your Commodore. In fact, you can practically have machine language

performance...fcr music, fa graphics, for text processing...without ever writing the first line in machine language.

See for yourself how good PROMAL is. See for yourself howanewage dawns. If PROMAL sounds too good to be true, order

your copy and try it out. If, after 30 days, you

don't find yourself ina new age of

programming, we'll refund your money Or you can get a glimpse of this new

age of programming with a demo disk.

And, of course, you can read about the new

age by using the Reader Service Card to

request more information. Call us at (919) 7877703, today, to order your copy of

PROMALora demo diskette.

D I'm ready to sec the dawnins of a new

age. Please send me my copy of PROMAL at$49.95 plus S5.00 for shippingand

handling at a total cost of (54.95.

D I'm ready to seea glimpse of the new age.

Please send me a demo diskette at $10 for

the diskette and $2.50 for postage and handling for a total cost of J12.50.

Q My check is enclosed. D Please charge my purchase to my... D Visa

â–Ą MasterCard

SYSTEMS MANAGEMENT ASSOCIATES

City, Suit, Up

FSOMAL ni n5 on Com moda e W s %Mtti diik dnves

3700 Computer Drive, Dept. CG-1 Raleigh, North Carolina 27609


REVIEWS

tion to your home disk library. You should note that if

your disk drive is still covered

authorized service center adjust ing or modifying the drive.

warranty as soon as you open

1541 Disk Drive Alignment C.SM. Software P.O. Box 563

the case. Commodore takes a

Crown Point, IN 46307

by warranty, you will void your

dim view of anyone except an

$39.95

9

Two Flight Simulators For The 64 David Fiorance,

Programming Assistant

C-64: COMPUTER SHOW

Commercial flight simulators were developed for one very good reason: Airplanes cost a

Expo 64 M

fact COAST rnAQT EDITION FninnM EAST

First Computer Show for the Commodore 64' November 2-3-4, 1984

Fri. 7-10 PM - Sat. 10 AM-5 PM Sun. 10 AM-4 PM HOLIDAY INN (NORTH) (Convention Center) Exit 14 — NJ Turnpike — Near Newark, NJ Int'l. Airport (Special room rates — call (201) 589-1000 for reservations)

□ Over 50 Commercial Exhibit Booths & Dealers D Seminars, Speakers and Workshops

□ Show specials and discounts on many items! D Hardware, Software, Supplies & Accessories ADMISSION: S7.00 Adult, $4.00 Child (5-12) (Tickets sold at door!)

DIRECTIONS New Jersey Turnpike to Exit 14 — Newark Airport, second right turn

(after toll) at Service Road. Or, Garden Stale Parkway to Route 22 East, to Route 1-9 North (Local Lanes), exit at Service Road opposite Newark Airport North Passenger Terminal.

a Ken Gordon Production call (201) 297-2526 for exhibitor Information (Our 6th. Year Promoting Computer Shows!)

'Co;nmud

ij.i and VIC-20 are Regialered Trademarks of Commodore Corporation.

C-64 COMPUTER SHOW

good deal of money. When a student learning to fly makes a mistake, it's better for the mis take to happen in a simulation of an airplane safe on the ground than to lose an entire aircraft. Some software companies have recently adapted flight simulators to personal comput ers. You can't expect to use

these programs to qualify for a pilot's license, but they're both fun and educational.

A flight simulator combines strategy (how much fuel is left, what the airspeed and altitude

are, etc.) with action (split-sec ond decisions to climb or dive). Often you can choose the level of difficulty. You may want to go for a joy ride, swooping up

and down among the clouds. Or you can make it into a game,

where you have a specific goal—delivering the mail on time or shooting down enemy

planes, for example. Since flying a plane is more complex than driving a car,

there must be some tradeoffs. If you want realism, the program must be fairly detailed. If you want payability (and fun), some

aspects of "real

flight must be

sacrificed. Two flight simulators from two different companies well il

lustrate the tradeoffs. Flight Sim ulator II from subLOGIC is


10 FOR I- 10 TO 20

STEP 2

20 J=2-|

128.80.1 128.6CM 128.12S.1 1J8.'S6,1

30 NEXT I

1!3.?'j'j.1 IJHIItl

134.60,97 142,14,111 142.14.113

CURRENT VALUES

13J.0.33 131.8.33

I<XIIXII1XXX11<X<XIX«

128.8.1 128.0.1

2SS.255.255

flflR TO

[6=R0W=21 COL=21 DATA * RETURN-Refresh II-Mild 13-Currenl I5.NM CLEAR HOME

DEMONSTRATE EXECUTION I

Fl-MtIN F3-CJRRENT F5-NEXT

MUS!C GENERATOR

CodePiD-fi4

MUSIC Otinonllttloi

J q | w [ E | flJTJvTu | iToTp

NOTE NUMBER.. MAX NOTE .

DURATION. LOOP UPLAI& SHOW MUSIC FS-PUW ONLY F1-MAIN F3CURHENT FS-NEXT

1: 1

CO 4

B hote B

Pi l

or i.i i .'. 12 Id ■ ■' ■- Itrx or 1; lar ■ ■:n.|

^^^■1 Pfpri n luf ftirrrnl Utnii HM

H S^M OCT DM5 1 M 5 0 M 5 8 M 5 8 M 2 IMS

1 13 f'ti

Simply Incredible* Incredibly Simple* CodePro-64 for Your Commodore.

Instructional Software That Will Amaze You With What You Learn.

CodePro-64 is the easy way to learn.

CodePro-64 astonishes you with how much

yaii can learn. And how easy learning can be. With CodePro-64, you'll learn to writeyour own

programs. You'll develop advanced

programming skillswith graphics, sprites and

music. And best of all, you'll learn visually CodePro-64 is a complete package.

Firstand foremost, it'sa comprehensive BASIC language tutorial. With it, you learn by seeing as well as by doing. You watch variables change

value. You see statement branching occur. You can even see "For-Next" statements executed,

There's graphics Instruction, too. CodePro-Malsohasa SPRITE Demonstrator

you want Exactly. And in seconds. You'll use it to compose simple tunes on the screen and ttien save the tune toa diskette file.

and Generator. With it, you'll master the concepts and techniques of graphics programming with

Discover howgood CodePro-64 realty is. We ship CodePro-64 as a package of 16 integrated programs, distributed on two

your own sprites for use in your programs.

unlimited use. it is supported by a 140-page

sprites-Andyou'llbeabjetocreateandsave

And we don't forget the music.

You'll use the MUSIC Demonstrator and

Generator to learn how to get the musical effect

diskettes, and containing sample programs for manual and is packaged inan attractive threering binder. CodePro-64. Incredible. And simple.

HOW TO ORDER

Send personal check, money order or

^tasterCard/VISA credit card information. Please add$3.00 for shipping and handling per order; foreign orders must add $15.00 perunit (except Canada). US fundsonly Sorry but no COD's, NC

residents add 4M>% sales tax. Corporate quantity discounts available. Dealer inquiries invited. And for faster service on credit card orders

call Toll Free 1-800-762-7874. In North Carolina call 919-787-7703.

SYSTEMS MANAGEMENT ASSOCIATES

3700 Computer Drive, Dept. CPG Raleigh, North Carolina 27609

CodePro-64isatrademart<ofSystemsMana3ementAsscciales.s)SMA1984 -Our Guarantee. Use CodeftoM fa 10days. If vou are not completely satisfied return it to us (undamaged) for a full refund.


REVIEWS

likely the most realistic in its approach; but its complexity may be daunting to a beginner. Solo Flight by MicroProse is per haps easier to learn, but less re

alistic as a simulator.

With the Editor, you can re

provides a good overview of a flight instruction class. Once you've learned a little about flight physics, you should become familiar with Figure 1 in the handbook. It explains the various instruments you'll be

subLOGIC's Flight Simulator II

working with. These instru ments should be constantly monitored during flight because

If you know nothing about fly

they indicate your airspeed, atti tude, altitude, heading, and throttle at a glance. Practice makes perfect. When using the keyboard, re move the flight reference card

ing, Flight Simulator U, by Bruce Artwick, may overwhelm you. This is not a simple simulation. Your first step should be to read the manuals which are included

in the package. The main hand book explains the keyboard and joystick operation of the aircraft. The FS2 is designed to simulate the performance characteristics of a Piper Cherokee Archer II.

Before you begin, perhaps you should read Flight Physics, the manual that explains how an aircraft operates. Once you know a bit about flying, you'll be better prepared to enjoy (and understand) the simulation.

Even if you've done some fly ing, you'll benefit by reading the flight physics manual. It

included in the package and have it in a strategic location for

easy reference. Play around a bit to become familiar with the

F, H, G, B, V, R, C, M, and T keys, and their uses. As you im

prove your flying skills, you'll learn how to use navigational

radios. You can use the 3-D dis play window to look around you from nine different perspec tives. Finally, there is the radar view, which is indispensable when taxiing on the runways.

ATTENTION COMMODORE 64 OWNERS

The User Mode Library gives you ten preset modes and op tions to save and load player-

defined modes. You can use the Editor to set cloud layers, wind factors, seasons, and even the

time of day. Say, for instance, you want to work on landing skills. You would call the Editor, set the flight parameters for just prior to a landing, save it in the

Library, and reenter the flight mode. Without a working knowl

edge of the instruments, you'll have trouble making successful flights, You won't fly far if you haven't practiced banks and yaws, or the use of the eleva tors. You'll sometimes crash, but don't be discouraged when it happens.

aids such as the VOR, the ADF, the NAV 1, NAV 2, and COM

WE'LL BACK YOU UP!

define current flight parameters.

Four Regions And A War You can choose to fly from Chi cago, New York, Los Angeles, or Seattle. Numerous airports

are available, and not all are

HIS MASTERS DISKS

If you own a disk drive then you'll need "The Clone Machine". Take control of your 1541 drive. NEW IMPROVED WITH UNGUARD.* Packaga lacfadn

1.} 2.) 3.) 4.)

Complete and thorough users manual Copy with one or two drives Investigate and back-up many "PROTECTED" disks Copy all file types including relative typos

5.) Edit and view track/block In Hex or ASCII

E.) Display lull contents of directory and print

7.) Change program names, add delete files with single keystroke 8.) Easy disk Initialisation

9.) Supports up to lour drive*

â– UNGUARD Now allows you to read, write and verity bad sectors and errors on your disk making It easy to back-up most

protected software.

Dealers & Distributors

Inquiries Invited

1342 jj Rt> 5,3

CALL (201) 838-9027 102

COMPUTE! s Gaietre

October 1984

umrE Butier, nj. 07405

"Should've made a back-up with the Clone Machine."


COMMODORE 64-

PRINTERS Al oh acorn dOCrtnt Alprtacom BOCflnt

99.95 189.95

Epson Gemini tOX Okidata Silver Reed Prowrltor B5!0

Call 1B9.00 Call Call Call

Concorde Third Parly

Dlik Drlva for Commodore 64

parallel & serial models available

MODEMS Call

Mark XIII1200 Baud

.. Call

C

O

,

WIC0 Joystick Flip'n-Flie-n

Fhs'n'FilH Carl

(BoxullO) WIC0 Trakbaii

KRAFT Joysllck

. .. .

,'J '■', 23.91 13 95 V 95

Baillozono-Cart. .. .31.91 Cenllpede-Carl ' 31 95 Oafonclor-Carl .. 31.95 Og Duo-Carl . .. 31.95 Oonkey Kong-Cart . 34 95 .31.91

Joust-Carl

Jungle Hunt-Can. Moon Patrol-Carl Ms. Pac-Man-Cart

Pac-Man-Can .

34 95 .

Robotron. /1181 l',.v;

Care key Caswtle Recorder.

.

.

Arnos Expedition-0

.19.95

24 95

Call 23.95

Rectpi-D . Auou/V«m CatO MaHList-D . Stamps -Q .

23.95 23 95 23 95 23 95

.

Somes Book

Compute's Machine

Lang/BeJ Compute1! 1st ok/64 .

12 95 1195 12 95

Com. 64 Proa ran Del GuMb 19 91 Guide to Vour Com. 6< 14 95 Elementary Com

64

11.91

Power off Multiplan .. 14 95 Comoule's 1st Bk/64 Sou nO/Grajj hits .. 12.95 Compute's 61 Re! Gultft 12 95

Compute's lsl Book olCom, 64

12.95

AF-D Bank Sireel Wrlier-0 ChophNer-D Drol-D

LWerunner-D.,, ... ...

Midnigni Maglc-D.

23.95 .4995 23.95 23.95

23.95 20.95

..73.95

64 Grat-Can

Ioqo-0 . The Manager -D Genual LMger-D

57 95 39 95 39 95

CFC The Diary-Cart

Trie Tool-Can

HESWARE

39 95 39 95 52.95

Zortl. II or III -0

32 95

SuipenflM-D

32.95

StarcrosS'O

32.95

Deadiine-D

32 91

Soccer-Carl

29.95

CYBERIA Farm Mor

Vol I

GeoralD .

.

.37 95

FarmMgr Vol II Bed-D 37 95 Firm Mgf. VW III Pork-D 37,95

CYMBAL Accounts Payable-D .

5! 95

Invoice Wiilei-D

52.91

Accounts Recalva&le-D 52.91 Invantory Conlicl-D . . 52.95 Trlwi-D

WFonri-Cart. .. .41.95 6502 Prates Dc Sys-T.. 20.95 Coco-O/T 27.95 Faclory-0 23.95 Finance Maniger-D 19.95 GhOSl MjTCr/SDiW Pk-D IS 95

19 95

Accll Rec 0 Accts Pay [i Magic Dssk-D

29 95 22 95 23.95 34.95 6995 23.95 29 95

Can FHiutl Easy-Cart

39 95

" 95

27 95

.

Etat64-Cart

Easy Fiunal.il,IILIV-D 19.95 >::, Cj: n 6195 Easy Man D 19 95

FarmMgr Vol Il/Graln-D37.95

BRODEHBUNO

Grapnics Bait-Cart

MESCal-0

.

34 95

.

HESFonl-Can "ES Games 'M-D HES Xit-Can HES Mon-Cart (HES Writer-Cart. . Microsoft Muitiplan-O. MiniBBota Fas'Pml-Cait Missing Links-D. Mr TNT-Can QwJtei

.

19.95

16 95 27 95 34.95 27 95 3D.95 69.95 20 95 2D 95

.20.95

Omnlspetl-D.. B Hool n'' Tootm-Cart. TC Synihesound-O.

49.95 . .23.95 16.95 7he Pii-Can 20.95 lime Money Manager- D 19 95 Turtle Graphics Il-Cari . 41.95 Turtle ToyaiM Jr.-D/T 23 95 Typen1 Write'-D.

27.95

D-D!sk

.. 20.95

T-Cassgtte

Operation Whirlwind-D. 27.95 Sea Fox-Carl

Serpentine-Can .. Spire CMnoe-0 . Mask oimeSim-D

27 95

27.95 .23 95 .27.95

charges on Primer Pack-

No additional shipping ages in Cantlnenlal USA

89.00 Call

MONITORS US! AUDEK

SOFT

4 .

inliflel-0 ninellall-D

Sea Stilker-D

34 95

Miner 2019e(-Can

34 95

Oskey-D . Hodgg Podg>'0/T Einp PoVer-D.

3195 34.95

.

Sorctrif-0 Wiln«ss-D

31.91 3495

INSTMCIMMARDH) Insla-vVnler-Cart.. insia-Mail-O.. Insta-File-D . ..

.

Management ComM

39.95 24.95 49 95

64 95

'nsta-Calc-CanVD.. 3195 Insla-Grapli-D . ... 24.95 lnsta-Veslor-0 31.95 insla-Swed-D .. . .99.95 Insta-Muslc-Carl/O.. 79.95 Invesl CcmM. 71.95

MICROFUN Ceain in the CaribDsan 0 27 95 Dino li.-r. I) .27.95

tnglish

SATI. II. or Ill-D. Globe Gracber-D .. Highnse-0

..

20.95

. 20.95

20.91

34 95

Malh SAT I, II, or III'O

20 95 34.95 23 95 20 95

Penorsjl Banker-D Ing hbsI-0

U.S Conslitulion-D MICHOPROSE Poyd/Junjie-D Hellcat Ace-D/1 NATO Coromander-D Sow Fliohi-D/T Spitfire lce-D/T

.

23 95 23 95 23.95 23 95 23 95

MISCELLANEOUS Ken Usiwi'5

B!ackBck-D anckBmmfoiD'Can

Uilimi Ill-D

.

.

Flight Smuiialor II-u Night Mission/

Pmoali-D/T Prsticaic PS-D M-File-D

.

Home Accounlant-D

Step By Stet-D/T

Barion's Sal.-D Brlslles-D/T

...

Teleslar C4-Cart

Star League EutUli-D/T

49 95 34 95

4195 37 95

20 95 59 95 64 95 74.95 52 95

"95 67.95 .20 95 37,95

..

2D95 Caslle WoltBnslsin-D . 20.95 Masiertype-D/Cart 27.95 Vic Switch 124.95 First Glass Mail-D ... . 31.95 Aitec-D

27.95

Cart-Cariridga

27.95 !3 95

Sea Oragon-D/T,

Mr

31 95

... 19.91 23 95 23.95 34 95 20.95 .. . 20.95

RoMl-D

Paml Magic-0 Pooyan-D'T

Astro Chase-D/T

Flip Flop-O/T. . ,

.,,

20 95

Basic Building Blks-D . 54.95 Critical Mass-D 27 95 Hescue Sauafl-D 20 95 Super Texl Word Prt> -D 69 95 Beyond Woltenslein-D 23.95 Sam-I)

Challaibee-O.

41 95

..

. 27.95

PARKER BRDTHEHS Frogjer-Cart. ,, .,, Gyruss-Cart James Bond-Can .. Popeye-Can . ,. ., O'Ben-Can ,. ... Star Wars-Cart. ..

34 95 34.95 . 34.95 34.95 34.95

34.95

SIERRA ON-LINE Apple Cider Ssider-O. Aquauon-D O Oiapoyp Bo DirkCrystal-D Frogger-D/T Hornenord SpetMr-D l+omevrord-D Leamug iwi Lnpe<-D

Lunar LMper-0

Mission Asteroid ■□

27.95

23.95

Delia Draumg-Cait .. 27.95 23 95 Facemaker-Can' ., Fraction Fever-Cart .. 23.95 Grandma's House-D 23.95 Jukeboi'Can 27.95 Kids on Keys-Cart ,, 23.95 Kldwnler-D 23.9i Kindeicomt-Cart.. 20.95

800-558-0003

414-351-2007

T-omputrfi6ititg / ©^ V.

27.91 30.95

27 95

50 Million Cmsn-0... 27.95 Battla/ Normandy -D/T 27 95 Conwal Leader-D'T.. 27.95 CuiriQulei Baseball-D 27 95 Cosmic flalance-D 27.95

27.95

EaglBs-D.

Fortross-D Germany 1985-D Knlohl/Desen-D/T..

23.95

RDF 1985-D Ringside Seat-D

23.95 27.95

41 95

2?.95

Professional Golt-O... 27.95 Tigers in lhe Sntw-D

27.95

SYNAPSE BlueMai-D'T.

Drelbs-D/T

.

..

23 95

23 95

For] Apocalypse -O/T

23 95 23 95

Ntcromanctr-D/T .. New Yoik City-D/T Pharoan's Cursa-O/T

23 95

23.95 23.95 23 91 23.95

Piolactor II-D/T

Beduclion Sys

Shamus-D/T

Surnvor-D/T

Zuuou-0/T

Zepplin-D/T

.

64.95

23.95 23.95

.

.. 23 91

.

.

23.95

27.95 23 95

TIMEWORKS Accounts Payable/ Cneckunler-D Accounts Receivable/ Inmio-D Cash Flow Managemeni-D Cave/Word Wuaros-0/T Dala Manager 2-D

Data Manager-D/T.

Diilron-D/1

Dungeon Algebra

41 95

41.95 41.95 19.95

31.95 .. 19.95 19 95

Drajon-D/T Elecl ionic ChecMwok-D/T.... General Leitger-D ... inventory Mjnajemenl-0

41.95 41.95

Payn* Managonent-D..

41.95

Money ManatfBr-D/T

19 95 19 95

19 95

Hundreds of items

For Technical Info, Order Inqulrlos, or for Wise. Orders -

27.95 2D.95

SSI

Siam-Bail-0/T

Mvenure &e3O-Can 27 95 A«obics-D 30 95 Aegean Voyage-Can 1! 95 AflmtheCoorCavts-C. .27.95 AlphaMi Zoo-Can . . 23.95 Bubble Burst-Can . .. 27.95 ..

Up For Grabs-Can ...

Trams-D

23 95 27.95 74 95

SPINNAKER

Cosmic Life-Can

30.95 27 95

Shamus Case n-D/T

23.95 27.95 22 95 23 95

)

SPINNAKER (coiifd Ranch-Can . Rhymes/ Riddles -0 Search/ Amaimg Thing-0. Snooperft-D . Snooper »2-D Slory Machine Can

23 95

41 95

Ultimil-D. Ulysssj-O . Wizard ^P-mcessD WillvpiO

A

Quasimodo-D/T Fiambo* Waiker-D/T Reui Siress

23 95

Uilima li-D

Call Call

20.95 20.95 20.95 V.95 23.95 34 95 19 95 20 95 20 95 20.95

Oirsweii-D Piisonir-0 Quest for Tires -D Tnreshoid-D . Time Zoni-D

To Order Call Toll Free

GO® g^0»M

W

MISC. (cont'O.)

INFOCOM Encrianter-D

-0mB»ritar'O.

64Fonn-Can

19.95

Easy Scrmi-D

27.95

27.95

HANDIC

COMMODORE isiiiit'c-j

27.95

Temple ol *jKnal-D/1

Wabiler WorOGjma-D 2195

Easy Speii-D

BOOKS

19.95

19.95

Program Rat Guide

23.95

Gateway lo Apshai-Csit. . 27.95 Jumpman Jr.-Cart.. 27 95 Jurnpman-D/T. .. 27.95 Lunar Outposl-D/T .. 23 95 Mission lmpossiDle-0 23.91 Oil Barons-D . 37 95 Pii5iop-Cart . . 27.91 Pu2iiemania-0 23.95 Robots ot Dawn-D . 27 95 Summer Games-D .. 27.95

Psar.ul Bui tor Pamc-0 . 24 95 Sea Horse Hma'n Seek-D 21 95

(Mult/Oiv)-0/T.

27.95

Fun Wlih Words-Can

24.95 23 95

Timeoound-n

23 95

20 95

Fire!-D Fun Wilh Art-Cart .. Fun With Music-Can .

Masleilnt me SAT-D.101.95

Success Fractions

. 49.91

Dragons/Pern-D/T . Faj-D

CocoNdIbs-D 24.95 Ducks Ahoy-0 . 24 95 Ernie's Magic Shapes -0 .21.95

(Add/Sutit)-O/T.

..

Con 51 ruction Crew-D .

Crate Owen's Bndne-D 54 95

Success Decimals

69 95 37.95 . 37.95

EPYX

. .29.95

Moyib Musical Madnesi-D Mu roar by Iha Do/an -D

37.95

HomeFilB Writer-&

19.91 31.95 29 95

19.95

Super (jjsscjro ii Home Inventory-!)

Com nun'$ Basn

39.91

47 95

(Atfd/SuBII-B/T.. Success Fradians

BAnERIES INCLUDED

CMewruer-D OiaiDO-n .. EH Syslem-D

59.95

34 95

34.95

Adventure Wrilof-0 .

£9.95

Success Decimals (Mult/Oiv|-0/T....

Consulunl-D 69 95 Paperclip w/Sptllpm-0B4 95

Matchboies-D

Circco • G Card MM roV 5

31.95 31 95 34.95

34.95

Polt Posil Ion-Carl

47 95

CBS SOFTWARE

15.95

.

Caroprlnl/B

24 95

ATAfllSOFT

Galaiun-Cart

6 DYNATECH

Call .20.95

.. 20.00 . 37.95

...

Call

Prowriter and Cardco + G ... 419.00

66.00

1650 AD/AA Modem R5 232 Interface

D

M

Printer Ulllily-D/T Mils Now-Cal MaiiNow-D . .

20 95

Cardco + G ... 349.00

Call for Special Package 64 System Price

CAHDCO

ACCESSORIES

Joysensor Elephant Disks

M

Gemini 10X and

Call Call Call 279.00

1702 Monitor

Koala Touch Tab lei-Can 74.95

Call

ACCESS Nmilriiiciw-D/r SpciltmjsiBr-O/T BejcnheaOD/T Masm Compouf-D

1530 Datasette

Koala Touch Tablet- □ . 69 95

Mark VIIJAulo Anil Aulo Dial

Gsrrfi .

Call

TOUCH TABLETS

Hayes Smart Modem 300. Call

Novation

CBM64 SX-64 1S41 Disk Drive 1526 Printer

SUPER PRINTER PACKAGES

available for the CHiri 64 . please call

=J COMPUTABILITY PO Box 17862

ORDERING INFORMATION. PleasB spwlty system Foi Isst Oellvery send cashier's check, money order or Direct bonk transtsrs. Personal

and company cnecks allow 2 weeks to clear. Charges lor COD are 13.00. School Purchase Orders welcome. In CONTINENTAL USA, in

clude £3 00 stiippmrj per soltware order. Include 3% shipping on all Hardware orders, minimum 13 00 Mastercard & Visa please Jnciude

MitaauKee. Wl 53217

card t and expiration date. Wl residents please afld 5Va sales tax. HI, AK. FPO. APO. Canadian orders — add 5% shipping, minimum $5.00.

All othar (orsi(jn orders, please add 15*/. snippinfl. minimum 110.00. All goods are new and include taclory warranty. Due 10 our low pJices. all sales are llnal. All detective returns must have a return aulhorlzalion number. Please call 414-351-2007 lo obtain an RA« or your return will NOT Be accepted lor replacement or repair. Prices and availability are subject lo change withoul notice.

ORDER LINES OPEN

MOn-Fn

Sal

COMPUTE'S Gaiotfe

tl AM- 7 PM CST

12 PM ■ 5 PM CST

October 1984

T03


REVIEWS

identically equipped. Larger fa cilities will make use of more sophisticated equipment. There are hours of exploration within each region. Flying from one region to another is possible, too, but it may take four or five hours.

sharp graphics and realistic con trols. It allows the player to learn quickly, and to advance

The Instruments

quickly into more difficult levels

you become familiar with the dials on your instrument panel. Get a feel for these and before

Slewing, or exponential travel, is an alternative to realtime fly

lot about flying to get going. Simply load the program and choose your options. There are three states in which to fly: Kansas, Washington, and Colo

ing. It allows you to rapidly travel great distances in little time.

In addition to the four re

gions available for civilian flight, there is a fifth, the World War 1 game in which you are placed in Europe in 1917.

One Of The Best Flight Simulator H is interesting,

challenging, graphically superb, diverse, rewarding, and just plain fun. And the documenta tion is great. In terms of realism,

it sets the standards. There are two slight draw backs. The instruments are more

delicate than on aircraft like the Piper Cherokee. There are legiti mate arguments that this is the way a flight simulator should respond. On a computer simula

tion, some would prefer to see more realistic controls which give a response exactly like the real thing. The other drawback is the obvious one that applies to all computer flight simulators. The absence of rudder pedals and the controlling of the air craft using keys or a joystick

may befuddle pilots who are used to real controls. These drawbacks, however, are out weighed by the sheer delight this program brings.

Solo Flight By MicroProse An exciting realtime simulation, Solo Flight, by MicroProse, offers 104

COMPUTEI's Gazelle

October 1984

of play. This is a flight simulator

that everyone can enjoy the first few times it is played. You don't have to know a

rado. After choosing one of them (with or without the Mail

Run) you can choose a difficulty level. It's probably best to start out on the student level. Send your throttle up to at least 6 or 7, and pull back on the joystick as soon as your air

speed indicator (the dial on the right of the display panel) reaches 60. You're on your way! You'll immediately notice the striking view displayed on the top half of your screen. You are inside the aircraft, but what you see is the rear of your

plane, as if you were in another aircraft tailing the one you're flying. This gives you more time for making decisions while in

flight. You see more of your surroundings, and at low alti tudes there is even a shadow of the aircraft. Because of this view from behind, you'll not crash as

much with Solo Flight as with other simulators. If you've seen and tried other flight simulators, this one will seem easier to handle, par ticularly on the student and pri

vate levels. If you've flown a bit before, you'll find a challenge on the senior and command levels. Use the arrow keys to get

additional views of your sur roundings. Look left, right,

down, or behind to see exactly where you are.

Learning to fly well in Solo Flight depends on how soon

long you'll be soaring, While the two large dials (altimeter

and airspeed) and the one small one (attitude or artificial hori zon) are important, don't over look the four digital displays on the lower left. They give your

pitch (position of the nose rela tive to the ground), flaps exten sion, directional compass

reading, and climb. These be come increasingly important as

you move up in levels of play. The instruments also in clude two VOR (very high fre quency omnidirectional range) readouts. Use these as naviga tional aids. The ILS (instrument landing system) gives you an

idea of what kind of approach you are making.

Learning To Land As always, the most intricate

part of flying is getting back on the ground. A combination of the Commodore 64's hi-res

capabilities and the effective graphics designed by Sid Meier

make landing this plane visually exciting.

The aircraft has landing gear, so don't forget to lower the wheels before you touch down. You will find landing more involved than taking off, but after a few tries you'll improve.

Delivering The Mail Also included in this software package is a game in which you deliver mail to different cities. You choose the state, and the computer tells you what cities to deliver to. Points are received


favorite; ^

store1 or send

money order to; MMQ M^o Software

P.O. Box 131 Marlboro, NJ 07746

Pieascatfd 53.00 for postage dntfttwdNlj,^ or calf: Use your Visa, MasterCard or order cod.;

NJ. residents pfeaseadd 6% sates &a^,;;:.;;

(201) 431-3472 ",...".. :;:,v/.;...,

'

;

r. . ''-â– ...;..


Flying For Fun The word that best describes Solo Flight is fun. You are re

warded quickly for good flying techniques. The game is easy to

Approaching New York's Kennedy International in Flight Simulator II.

by choosing more difficult routes and levels, using little time, and delivering as much mail as possible.

The interesting part of the game comes when the weather, which starts out fair, gets worse. Don't be surprised if your air plane turns, banks, or slips

Note \he shadow of the aircraft about to land in Solo Flight. when you didn't want it to. If you deliver enough mail, you may even see clouds form on the screen. To make the sce nario even more challenging, your instruments sometimes

lose their reliability. When this happens, you must land at the nearest airport for repair.

use, visually pleasing, and fast moving. And it's appropriate for those who don't wish to spend a lot of time reading, but would rather be flying, Flight Simulator II

subLOGIC 713 Edgebrook Drive

Champaign, IL 61820 $49.95 (disk) $39.95 (tape) Solo Flight

MicroProse Software

10616 Beaver Dam Road Hunt Valley, MD 21030

$34.95 (disk)

fflj

New dimensions in Bible study. Calc Result: A Spreadsheet For The 64 ORD tcessor

leKJV Bible on

$199.95* OPICS ; to over 200 Scripture

149.95*

.or information contact: Requires APPLE 11 + and compatibles, TRS

CP/M 2.2 (Z-80), KAYPRO,

OSBORNE, COMMODORE 64,

Z-100.

106

COMPUTER'S Gozotlo

OclobeM9B4

die Research Systems

9415 Burnet, Suite 208 Austin, TX 78758 (512)835-7981

'Software for personal Bible study."

Emily Herman If you don't know how a spreadsheet program works,

Calc Result, from Handic Soft ware is a nice way to get ac quainted. Two versions are

available: Calc Result Easy and Calc Result Advanced. The advanced version is not any more difficult to learn. In fact, the manuals are identical when covering features common to both versions. The most sig

nificant difference is that Calc Result Advanced can store twice as much information as Calc Re sult Easy. It also costs $70 more.


WE'D BEAT IT OR EAT IT!

In lia natt ihf (Tim iniMi In ■ Inn |. ill turn Hal •■ Bl Hllwacr mi ftiifknittttniKut Mm. ml ton ■ kf ii Itm hi Ul> ii in III •ftafctt Hi Kt ituii la Mil flu* j<iii> 1U> ail a loa. <• fnaii •*«

Tussey Mt.Software-To order call: (814) 234-2236 w. tccapi Mimrtue mi Vnt

—12 00 Ciadil ':■ phm [j I on pnont ndtfi I —Ot> howi Ha tit ran m II i i,n fSI —Wiua v call Iv ■ hia tualog

■'•i acctpl COO cidari on rrarfUiiD aicagl prinmi aid monitor! —Nan in ill Ke-i on m ilock r!«ni

Built-in Functions Both versions have a matrix of 63 columns and 254 rows, but, in fact, it's not possible to have a sheet that uses all these posi tions. Calc Result Easy can store about 1000 positions, and Calc

Result Advanced about 2000. At each position on the sheet you can input labels (alpha, numeric, and special characters), or val ues (numeric data or formulas). A good selection of built-in functions is available and may be incorporated in the formulas. Functions available are: COUNT, MAX, MIN, MEAN, STDDEV, SUM, NPV (net present value), ABS, FRAC,

INT, LN, LOG10, SQRT, RND, IF-THEN-ELSE, OR, AND, and NOT. For example, at the end of a column of numbers, a position

could contain the formula

"MEAN(Bl:B10)". This would

calculate the average of the numbers in positions Bl to B10. The average (not the formula) would then be displayed on the

sheet. If any of the numbers were subsequently changed, the

average would automatically be recalculated. Calc Result Ad vanced also has trigonometric functions. The cursor keys or a GOTO command are used to move around the sheet. You then type information into each position. Position contents can easily be blanked out or edited. At any point, rows or columns can be added, deleted, or moved. Val

ues or labels can be replicated across or down the sheet, Num

bers can be displayed in maxi mum precision, integer, or

dollar and cents (two decimal

places) format. If a value is displayed in integer format, the decimal value is still stored in memory

150 00.

1KCUII ■

C<—- 101 iiajH. 1ZD if.

IZ6JH

C»—■ 10H I—.. ■< fXnt/l Itt

IWiDO

Guniftr 1W ... Dana 10. lEOcpl. ft Oblfir

Oalla 1) P»tnraa

OlUBASiS

WP64 Lf| ProlnlO SciipE 64 H^uiitcnp»d|d] VfUdg-o 3-Z64

. tZBJOO :. . 131100 H30 00

I i cei

411

about print in to/nt wiiTi i

**.

.

IFia ConluHani (lormtitt

5500 5900

Sopfibui 6*141

1 65 DO

Bl Timr*ort* PmM.li h Maid)

i J1 00 1 JJOO

0>l«-t Oxlllldl

□mni Wr iitr/Scalar Id f

I 69 00

Miig* Daiafeait Uamg«4d|

. 1 6200

On a Managn II (d I

JJOO iJ JU 1900 45 00

V-t;t sfi:njl V. P rj,

IBOdai

aitucn *e hdnDV mill

IS0O 55 00

hoc

o Wrid hton/E4 (fan)

1310 00

Iimii qualiir

'i

MM ..,.C+

W0H3 FHCCJ55DBS

PMNHFIS Gironp 1Q(

Sir* Mw'uiItcWa^ MSD Dak Drim

unuWS Ihi Llll Ontldj a gain

rtpl*tun#m of lailfd unil

program gmnaw

I 64 00

[, Piol.nt|dl

I «3 00

PAL 6a .r.u

-

:■

'.';■, icss BMC 12" Ambtr

BMC 12MCrtBi ELMC 13" tomp toior (irwli 12" Ambii

. I 89 00 1 79 00

Calc feiull fttf. Id.cirlf

I 97 00

(rnilli 11" Euan

I

92 00

1 I 1 I ! I

(7 00 44 00 J5 00 35 00 59 00 3100

67 00 3100 65 00 55 00

Calc Htiull Eati |un! PS

iPioop

SprraOihrtlllSl .

PwiiutcMUl

Tool B01 G4 bolli Pal f and PDhTtr G4[dl

Pimiar i^reilaca /EL

JOUB

34 00

light pen

Numpnt tarpad ■,, ■ aip miertaia:. ■:

Mail No»/G4

In rl Ollor — Olitp ;■ 'r p4M*hM lha loloovg

CommoflwE 1600

56 00

Heimofltm I

at 011 43 00

Hes^nedtm II

65 00

[:.--.:;:■ p 16^0 a

I n i ri i i

I I I >

!S 29 29 29

00 00 00 00

MI5CLIHHE0US Koilapad w/puma.|t| Uailpip p B*(JJ br frelmi S Sptltpio 64d tf Piolim.. 64ldl Pl

1 {500 1 1300 > 1300

Camplali Ptiunal tcuuMMIdl .■-..■

15(1 E

ara not.,w& m»nn

11/1)9 .■■■■. 1101 >I6 00 i br me 1 law

i" IrpDVWiirat nmn. X mniTKivai 1 pi4a

1 loviftatd 1 thu nagwii. 1-1 iiua na ifcin Icr cu nparnon: III "iag«rf mth. Ufmonlh Dl unit, 431 boWii* *di kjav pica. ji| cam id diji 42

lor ovtonal ehaiki id dan.

*i

-

'■■ rn:<. r B4 6t Blui Slf(dl SupiiBaiic 64 by Blua »i[dl Addon !'-!■ bf Bluf S>r{tf| . .

UROCO /

I 13 00

(T Prolintldl

4dd 12 '■iJr"^^rr 'or lAfping loliwira. JUd Ifi OQpvr srdar IVCOD Add - il:' |n

' ■ i ■ '"i I ft 00 u •' •.

-

-i : '..i, ■• ',' i

atcHlidEnpi.i^in vidmviiiafl-'v«vnoidaiiraqiii'aadotiiDnalaKD>iMitafihipping.WaptTirwppriigonluEiiid«i Ordviihppad UPSunlm nfladofhtr will. Allpriumlllll ulhAlcQvffl Vili. WiilnEard add 3VM«nk,1*thirar I■*.!*■., ■ ..-, 1".i ■. ■ai

Pfitai l

. ...-.i.r- Ji..j .npinOy"^ l'Arii.J«..ri *io I.X^ip

n la Liianat

Tussey Mt. Software

Box 1006 • Slate Collage, PA 16804

Supercharge Ybur Programmn Add far greater speed and versatility to your C641 or VIC-20* with Micol Systems' extraordinary new macro assembler package - System M2000 Since machine language programs usually run 40-60 limes faster than their IWSIC counterparts, tnis inexpensive package is like buying a more powerful computer at a fraction of the cost. A professional system thai even the novice will find easy lo use, it assembles kilobyte tiles in seconds and is one of the most powerful macro assemblers available. But it's more than just an assembler. Your programming will

be simplified with such well designed programming tools as an Editor which has all the handy features allowing you to create your programs easily and a machine language Monitor a sophisticated debugging tool and complete man to machine language interface.

The package is 100% machine code and fully copyabte for your convenience. Available on disk or cassette. Available al finer computer outlets. For the dealer nearssl you call Toll Free 1-BD0-225-2774 (Capri Int'l) in the U.S. and (416] 736-W02 (Access) or I-000-387-9758 (Sofffiom) in Canada.

Micol Systems, 100 Graydon Hall Dr., Suite 2301, Don Mills. Ont, Canada M3A 3A9

micoL


REVIEWS

and will be used for calcula

tions. Labels are left justified and values are right justified, but this can be altered. Columns can be between 5 and 18 char

acters wide. The columns dis

at the same time. DIF allows data to be stored so it can be used in programs other than Calc Result Advanced, Files saved with this command save only the values derived by the

played on the screen are the

formulas used in the spread

same width, but they can be

sheet, not the original formulas. Formatting information is not saved either. (In fact, I saved a spreadsheet with Calc Result Ad vanced and was able to load it

printed out in varying widths. A label that is longer than the col umn width is stored intact even though it is not displayed com pletely on the screen. Titles can be fixed so that they will be vis ible as you scroll across (but not down) the sheet. Formulas are calculated by columns, from left to right, but this can be changed

to calculate vertically by rows.

Saving And Recalling Spreadsheets can be stored and later recalled. Templates (a re port form set up with headings and formulas) can be made, saved, and later called up and

filled in. The filled-in form is then saved using a different name so that the template can be used again the next time it's needed. For example, you might want a template for a monthly sales report. The formulas and

in Visicalc on a CBM 8096.) DIF files are also very handy if you want to save part of a sheet and

like several steps later, The manual was also a little sketchy in places where I would have preferred more detailed information. At the very beginning, a lit

tle discussion about the differ ence between SHIFT SPACE and SPACE (unshifted) would have been helpful for the com puter novice. SHIFT SPACE is a toggle that indicates whether or not a position contains a label or a value. For the first example you are instructed to type in

then incorporate it into another

GROSS INCOME as a label. If

Calc Result Advanced sheet. Calc Result Advanced also has help screens, and these are available in several languages.

you have SHIFT LOCK down when you type, your entry will

The Manual: Not For Beginners

and INCOME.

The manual does not have an

to beginners or, perhaps, firsttime users. The manual is well organized and the program itself

index, an annoying omission for beginners. One must search

through the table of contents and the manual itself to find information. The novice will also be con

fused by some of the pictures of the screen in the tutorial. In several instances, the displays show what the screen will look

change from a label to a value when you press the space bar for the space between GROSS Overall, these omissions are

minor in context, only annoying

offers many good features, and is easy to learn and use. Cak Result

Handic Software, Inc. Fellowship Rd. 8-206 Mt. Laurel, Nj 08054 Easy, 579.95 (disk)

Advanced, $149.95 (disk)

column headings would stay the same from month to month, but you would use different num bers within the form. Templates can save time when used for regular reports. Entire spreadsheets or sec tions of spreadsheets can be printed out, even in bar chart

form if you prefer. Two features available only in Calc Result Advanced are

paging and DIF (Data Inter change Format) files. With paging, multiple pages of the same form can be created and include a summary page. It's possible to load different pages 108

COMPUTED Gazetto

October 1984

Write Now! For The VIC-20 Harvey B. Herman, Associate Editor

Not everyone likes computers. Many people secretly—or not so secretly—detest them and feel that certain applications ought to be done by real people, not by impersonal machines. Even so, these same computerphobes grudgingly concede that if we must have them, then their most appropriate use is word processing.

A Bewildering Choice Whether you're a true computer

lover or one who merely con cedes that word processing is, after all, a worthwhile applica tion, you face a bewildering choice. There are tape, disk, and cartridge versions—which is

best? They come in several price


IF YOU OWN SOFTWARE, A 64, & A 1541 DtSK DRIVE THEN YOU NEED

■k THE COMPLETELY AUTOMATIC DISK BACKUP-COPY SYSTEM! • Easiest to use-TOTALLY automatic copy utility

• Transforms your 1541 into a SUPER-FAST copy drive!

UNLOCKS protected disks for backup copying

• 3 mln. copier AUTOMATICALLY puts "errors" on copy

• Actually copies a FULL disk in only 3 MINUTES!

• Writes errors 20, 21, 22, 23, 27, & 29 WHILE COPYING!

• Breaks through LATEST protection schemes

• DOESN'T cause damaging drive knock during errors

• Interprets DOS manipulation & disk protection

• State of the "ARTS" COPY CAPABILITY! • 100% machine code for fast, RELIABLE operation • HALF-TRACKING capability, up to & including

track 40!

or formal

• Detects & reproduces NON-STANDARD formats & I.D. mismatch • PRODUCT SUPPORT includes tel. ", revision, A

upgrades

FASTEST & MOST ADVANCED BACKUP-COPY PRODUCT YOU CAN BUY!

$49.95

To order call 805-687-1541 ext. 64 Technical line 805-682-4000 ext. 99

for entire system For rush service call 24 hr. order line orsend cashier's check/money order. Visa, MasterCard, S American Express include card W and exp. date, CAresidents add 6%tax. A1low2 weeks lorclearance of personal & co. checks. Add S3.50 shipping 8 handling lor continental U.S. / $5.50 (or UPS air. AK. HI, APO, FPO, CANADA, other foreign orders add $7.50 All APO, FPO, 8 orders outside 48 states must be paid by certified U.S. funds. Sorry, no CO D 's School orders welcome.

DON'T BE LEFT WITHOUT A BACK-UP COPY OF YOUR VALUABLE SOFTWARE!

3463 Smti! Street • Suit* 1941 A ■ Santa Barbara • CA 93105


REVIEWS

categories; you could easily pay half the cost of a VIC for a word processor. Each company touts

"dot" commands on separate lines. For example, use ",1s 1" if

Special Keys

single spacing of printed text is

particular features which it

Print

desired. Change the 1 to a 2 next

Save/Load

claims will make your choice ob

time and you get double spacing

vious. But which features are

without having to reload the whole document. No wonder everyone is smitten by word

Free space

processors.

Delete word Search/Rep lace

really important?

First, to begin your selection process, talk to your friends who have and use word processors.

See if a demonstration can be ar

To better illustrate the dot commands, here's the way my

ranged, and read reviews in

screen appeared as I wrote this

magazines. And make certain it

review:

will work with your equipment.

This last point is crucial and might be worth getting in writ ing. I can imagine the sinking

feeling of 40/80 column board owners who read in their Write Now! manual, too late, that the program won't work with one.

Write Now! for the VIC (a 64 ver

to the view, held by some, that it can be used without a manual. Nevertheless, it is one of the easiest to learn of the word pro cessors I've tried. Here's why: It comes with an audio cassette tape which gives elementary lessons on pro gram operations. It has keyboard overlays so you won't forget the meaning of special keys. And it has a professionally written, easy to follow, instruction manual. A novice should find Write Now! unintimidating because it's so simple. When writing a para graph, you keep on typing (never hitting RETURN) until

the paragraph is finished. The program will format the lines properly on the final printout—

a point first-time users find con fusing on any word processor. Formatting is controlled by 110

COMPUTEIs Guietta

October 1984

Exit

Set/Go to mark

Options Block - mark start mark end

-Im5,rm 75-

.he 1 Write Now!.bm 3-

Tab

go to end copy /delete write

- key/set/clear/display

Up/Down page File position

.lsl.pl 66-

Directory

.pn 1-

.pc 15-

Review

VIC-20

Cart 3/10/84-

Reviewed by Harvey B. HermanNot everyone...

sion is available also) is, in a

word, friendly. I don't subscribe

Bottom of text

go to start

ridge

Simple And Easy To Use

Dump/Clear buffer

Plenty Of Features Write Now! has many of the fea tures of more expensive word processors, including search and replace, and a deleted character buffer. Search and replace allows you to change the spelling of one word appearing throughout a file. The delete character buffer is made for people whose fingers move faster than their minds. When characters are deleted, they are stuffed into a 256character reserved area (buffer).

If desired, the deleted characters can be recalled with one key

Dot Commands .Im

left margin

.bm bottom margin

.Is

line space

.cj

center justify

,pp

page pause

jn .re .sp

Roman numerals redefine char printer code

.bb .tw .pi .i j .pa

building block (for printing long text files) text width page length fill justify page advance

.wa .ru

wait Roman upper

.df

default

.pc .tin .pn ,lj .cp jic .he

prefix character top margin page number left justify conditional page number column header sequence

.es

escape sequence

press.

Space limits a full discussion of the many operations included with this word processor. At the end of this review is a brief sum mary of the operation of the spe cial keys, whereby text is manipulated, loaded, and saved

(disk or tape), etc., and the dot commands which control the for matting of the printout. You should keep a list of the dot commands nearby until you learn them. This is not neces

sary for the special keys because


The Doctor is In! Mm Emm, ir»F tompurer [ivy.:, :'-*rLip^

of the overlay previously

FANTASTIC!

VIC-20 & C64 PRODUCTS CASSETTE

& dupucator

X KMT jj-t 1966 EO run on S

Uw »n, poiltblt CHitlla

large marnfrflJT*. Etna nas

rtcwdtf io load wo savo proi

wrap and it may be awkward to interact with all printers. It bothers some people to see words broken up on the screen. For example, on the one I'm using now, "manuscr" appears on one line and "ipt" on the next. This doesn't happen with a word wrap feature. However, the alternative may not be prac tical on the 22-column VIC.

The other flaw, if you can call it that, is a consequence of the requirement that dot com

mands appear on separate lines. Some printers must receive elaborate character sequences to

s you Eo conned two C*i-

inttUtgtnce

ecoifle'i icsjei^Er io rnakt

Unlike Pte ttnppM down

vtrkxii you may have

PARALLEL PRINTER

vxn. our Erua ftai Ml pewrr W otiq"wt\ m.i\t\trjmt

and r*nge of rifYFUicn of

INTERFACE

program

Be« of <rir. Eir» comei wnri trie complete Source

SQQ95

Program {wrrTTrn in BA5JC} io anyone/, tvtn a bttjfnrwr, tan eai>Jy cusotnar Elira's rp*pons« The ne« lime pffaple a« you wTiai your compute*

Cornecfs io m«

«n da txing oui Eni3 an

pan

ENJOYMENT GUARANTEED

Allavii

you

la

UK VTr CtfllrDOl ilmdvd pirilltJ prlnitr witn iC64

□ r VlC-20 Tim^Od 13 CO for inipping ^nd rund

lain PET to »lm-

d.irO ASCII

SevflT

riling mocloi

iMdw you c

canuoJ ovff' prtnier Print

ONLY S45 Cherts. MaiterCard. dnil VISA accepted

i^ any pMfii*r *itn b'lniap graphic Ability can prinl griph^ci chHicivi. Emuladon ai moal all CfiM printer

funcdonj So'lvrare aOdi a PLIST command lor BASIC program, list ing Pun tor Onvei toFiware consumes no nor' mal user memory space, and is campanula witn mo$r. am

popular sotfware Dufc include soli ware lot CM and ViC20

ntelllgence

RESEARCH GROUP Ij JallJ Avc. Dfpt. G, Lot Argcti. CA WO46

RS232 INTERFACE $3995

|2!3J 4S6-736B

Connect) lo Irio LBor port And p'uvidei TljII RS^32

control operations, and dot com mands would be used for this. Your text on the screen, conse quently, is not continuous and is difficult to read and correct. This problem is not unique to

signals tot mod*mt and

prtnivtt.

2

wiiri male necior

root cable DB25 con-

Supporit

CDmplflmonl ngnali

lull

ol RS232

including Ring

iin * iypo-<n BASIC terind p'mivr hoo« up m-

COMPLETE SERIAL PRINTER DRIVER 95

Write Now!, however.

Write Now! is an excellent

For uw wiin *frr ftrifll printtr. Givb you all trie Saturn a' iri*

program for anyone who in tends to do word processing on the VIC. It has features which

29

Parallel Prmier arrver progi*m described aCove

Prints data »d-

Oreiied io bo[n o*vice ?ind 4 aiiownnayo use pragranjs ^mchrJoii normally mow

i

make it very attractive, it's inex pensive, and it even works on an unexpanded VIC.

-■ .i

i r ■■'■■■

101 up for Q

r

'Hi-^ir,iK.■■:'■■ i'.

li prinlkng on *ny c-nil prkilw -^ -■. r i

map capability

VOLKSMODEM

INTERFACE CABLE

SOO95 '

Write Now!

Cardco, Inc.

This brand new S29.95 arcade/ adven ture game (or the C64 is yours tree

313 Malhewson Wichita, KS 67214

a

when you join the 64 CLUB. In fact, this

is just one ot [he 1st month's programs you receive when you join the 64 CLUB. Each month's diskette contains 10 pro grams in the areas ot business, educa tion, and recreation. Plus you also receive free consulting and software

COMPUTERS Gazette

C&ntio» CHHlre motor

Io sitrt md nop me Eape

celebrated arrrfiajl

There appear to be two mi nor flaws. There is no word

SO/195

1D-101

Citset:

bnome iric world's man

mentioned.

S39.95

INTERFACE

discounts, All this for only S40/year. If yoj would like further proof ol the quality of our software, send S5 for a trial month which includes Quest for Power

1260 Oliver Ave. San Diego, CA 92109

zz

U a volht-

IO ■ C&4 Or

V N-

C*rjit hauling hauling VIC.20 Ciplfl

comai"3 minlalurt drculiry to nandit Ml signal* Ho Dine* mterrace needed inciui»s

Type-in BASIC terminal program Vfllktmottrm not included

C64 ft viC-20" Cammodoro VoihsmodenV" Anchor AutOfri

TO ORDER: See your local Dealer o' cau 120*) 2W-M#3 or maiUolhe address »low One year uncondiliontlguifanteo

it not delighted, relum it wiihm 30 rjfly* Iqi a lull

refund (ie=s shipping .]■ i ■-'.

. w; ■-■ ■..!.!'

Phona ordtri nunilan ihlt td sitd ■ ,■

■ ippmg

Si 65 en Ira

Tor C Q D VISA A MHitrcvd wticom*.

M you like These products, and want to ro see more, mark Utc reader's sorwico card or send io get our FREE CATALOG COHlaining dozens of oiher exciting pfotkicls.

rOmnitronix) P.O. BOX«3 -MERCER IS,. WA MMO


FANTASTIC COMPUTER PRINTER SALE!!

COM-STAR T/F Tractor

Friction Printer

i

H

COM-STAR

HIIINIIIININinilll

• Lowest Priced, Best Quality, Tractor-Friction Printers in the U.S.A.

• Fast 80-120-160 Characters Per Second

• Word Processing

• Print Out Data from Modem Services *° DELUXE COMSTAR T/F COMSTAR

T/F

(Tractor

15%"COM-STAR PLUS+

Friction)

• List Your Programs

• "The Most Important Accessory for Your Computer"

Premium Quality 120-140 CPS

80 CPS Printer — $169.00 This

• 40, 46,66,80,96,132 Characters Per Line Spacing

• Print Labels, Letters, Graphs and Tables

Business Printer $379.00

Superior Quality 160-180 CPS 10" COM-STAR PLUS + Business Printer $399.00

II

Has all the features ot the 10" COM STAR

This

prints BW x 11" standard size single sheet stationary or continuous feed computer

PLUS+ PRINTER plus 15j." carriage and

PLUS+PRINTER 160180 CPS has a 10"

more powerful electronics components to

carnage with all the COM STAR PLUS+

paper

handle large ledger business forms! (Better than Epson FX 100). List $599

with more powerful electronics to handle

SALE $379.00.

larger ledger business forms!

PRINTER

80

is exceptionally versatile

Bidirectional, impact clot matrix.

CPS.

224

characters

(Centronics

Parallel Interfact).

Premium Quality 120-140 CPS 10" COM-STAR PLUS+ Printer $269.00 The COM-STAH PLUS+gives you all the

features of the COMSTAR T/F PRINTER plusa 10" carriage. 120-140 CPS, 9 x9dot matrix witli double strike capability for 18* 18 dot matrix (near letter quality), high resolution

special

symbols

and

true

decenders.

'eplact'mi'iit

warranty.

SALE £399

151/?" Printer List $799

SALE S499.

OOlympia Executive Letter Quality

DAISY WHEEL PRINTER $399.00 This is the worlds finest daisy wheel printer

A RED HOT IBM personal business printer

special characters

at an unbelieveable low price of $389.00

Fantastic Letter Quality, up to 20 CPS bidirectional, will handle 14.4" forms

plus one

width!

features

costing

twice

Parallel

Interlace)

FX80)

as

gives

you punt

found on printers

much!!

List $199 00

subscripts,

List $699

vertical and horizontal tabs.

It

and

lower

Exclusive

(Centronics" parallel

prints standard, italic, block graphics and quality and

super

true

feed!

immediate

for all IBM personal computers! 140160 cycle, 2K buffer, diverse character fonts,

settings,

144

COMSTAR

Personal/Business Computers!1 One year

PLUS+ PRINTER! It is especially designed

matrix), underlining, back spacing, left with

x

Has all the features of the 10" COM-STAR

and

margin

(120

SPEED

Interface) also compatable with all IBM

Superior Quality 140-160 CPS 10" COM-STAR PLUS + IBM Pers/Bus Printer $389.00

CPS HIGH SPEED PRINTING 100::. duty

decenders

image

HIGH

features built in! It is especially designed

bottom

dot

right

bit

SUPER

(Centronics

(Better than

Epson

warranty List $699

year

immediate

(Centronics

replacement

parallel interface)

SALE $389.00

special

Has a 256 character print buffer, print

tractor-feed

enhancements, (Centronics

RS232C Interface) List $699

SALE $269.00

built

Parallel

in and

SALE $399.

PARALLEL INTERFACES For VIC 20andCOM-64 - $49 00

For Apple computers - $79 00

Atari 850 Interface - $79.00

For ALL IBM Computers - $89 00

15 Day Free Trial-180 Day Immediate Replacement Warranty Add |14 BO lor trapping, handling and iniuronca. Illinois rttldtnli plaaivoddbV. Ian. Add 529 00 lor CANADA. PUERTO RICO. HAWAII. ALASKA. APO-FCO ordari, Canadian ordci muil ba in u '.

dollar!

Wl 00 NOT (XPORT TO OTHEJI COUNTRIES. In, I 1.1 Caihlart Chtch, Monay Ord*r or pBrftonol Chack. Allow 14 dayi lor .ImIi.ih-, 7 to 7 dayt for phona ordari. 1 day avpratt moll!

VISA - WASTEF! CARD - Wr> Ship CO D loUS Addresses Only

T

ENTERPRIZES

BOX 550, BARRINOTON, ILLINOIS 80010 Phono 312/342-5244 to ordor

COM-STAR PLUS-

ABCDEFGHIJKLMNOPaRSTUVMXYZ

Pnnt Example:

flBCDEFGHIJKLMNOPQRSTUVWXYZ 1234S67B9O


BIG FOUR NEW 128K —MEGA BYTE DUAL DISK DRIVE-80 COLUMN

COMPUTER SYSTEM SALE HOME • BUSINESS • WORD PROCESSING

List Price

$3717.95

LOOK AT ALL YOU GET FOR ONLY $ 835. LIST PRICE

® B128 COMMODORE 128K 80 COLUMN COMPUTER © 8050 DUAL DISK DRIVE (ovei 1 million bytes) (3) 4023 (4)

12

100 CPS

$ 995 00 1 /95 00

SO COLUMN BIDIRECTIONAL PRINTER

499 00

HI RESOLUTION 80 COLUMN GREEN OR AMBER MONITOR 249 00

BOX OF 10 I.ORAN LIFETIME GUARANTEED DISKS

lion SHEETS FANFOLD PAPER

AIL CABLES NEEDED FOR INTERFACING

49 95 19 95 102 05

3TALUST PRICE

S 3717.95

Printer replacement options (replace the 4023 with the following at these sale prices)

SALE

LIST

• Olympic Executive Letter Quality Serial Printer

• Comstar Hi-Speed 160 CPS lii

Serial Business Printer

• Telecommunications Deluxe Modern Package

i 699 00 I 779 00

$ 499.00

$ 199 00

S 139.00

$ 399.00

Plus You Can Order These Business Programs Att Sale Prices LIST

SALE

(US95

199 00

liL.Fillllly

I4B9!l

99 00

1*9 ')[>

99 00

Ginrrii Lerfiiei

115 95

99 00

. i Hunts Rpciuvdble

1-W V.i

99 00

F

14999

99 00

li mints PavaWe

1 *»'»'.

99 00

PrcHirdni Gen^rdtOf

149 9!i

99 00

I'Mlf.o.Mllll.ll Ml) [j

P.I > mil

dl SurtdO SMtfel

LIST

SALE

tlJ99b

19900

15 DAY FREE TRIAL Wi'give you 15 ri«ys to try (ml this SUPER SYSTEM PACKAGE" If it doesnt meet your

tations |uil send >! back lo us prepaid anil we will refund your purchase price" 90 DAY IMMEDIATE REPLACEMENT WARRANTY II any ol trie SUPER SYSTEM PACKAGE eauipmenl or pro tail Cue 10 faulty workmanship ar nulerMl tve will replace I IMMEDIATELY al no charge"

Write or Call For Free Catalog and Spec Sheets!! • Add $50.00 for shipping and handling!!

| S100.00 (or Canada, Puerto Rico, Hawaii orders. WE DO NOT EXPORT TO OTHER COUNTRIES

j Enclose Cashiers Check, Money Order or Personal Check Allow I 14 days for delivery, 2 to 7 days for phone orders, 1 day e>press

1 mail! Canada orders must be rn U.S. dollars We accept Visaand I MasterCard. We ship C.O.D to U.S addresses only

ENTERPRIZES

( LOVE 0^'

■•'

BOX 550, BARRINOTON, ILLINOIS 60010 Phom 3127382-524* lo ordir

■'-• "'.


COMMODORE 64

Computer Learning Pad

39

Sale!

95

List $79.95 Hi-Resolution!

Makes other graphic tablets

NEW FROM

Obsolete

TECH SKETCH

Includes Special Printer Feature.

... .

r

«

'■

Now you get thisFanlasticTech Sketch Computer

Learning Pad Program with a Professional Light ,Pen Free! (39.95 value) plus the Micro Illustrated

[Graphics Pad Program that allows youtodrawon your T.V. or monitor screen (better than Gibsons

$99 tight pen). screen

you

Whatever you can draw on the

can

print on your printer (a Tech

»»=

Sketch Exclusive.)

join rut -newBKteD-or noioAfi'ftit'

Light Pens for your

Commodore 64 & VIC-20

=$16.95=

Coupon Price| $14.95

Economy Model with 3 programs $16.95 Add $3 00 far shipping

rtandhrig and

insurance

llhrton lasidenK

pl*a» odd 6"< tax Add 16 00 for CANADA PU£RTO «KO HAWAII ALASKA APOFPO orders Canodion order* mull b« in U.S dollars WE DO NOT EXPORT 10 OTHER COUNTRIES Enclose Ca^riiers Check. Money Order or Personal Check

dayi rar delivery

Allow 14

2 'o 7 days For phone ordert 1 day vnprosi moil1 VISA — MASTER CAftD — CO D. NoCOO

lo Canada APO-fPO

IE

ENTERPRIZES

E lOVE OllOCUSTOUEHSI

BOX 550, BARRINGTON, ILLINOIS 60010

Phone 312/382-5244 to order


©SANYO MONITOR SALE!! 80 Columns x 24 lines Green text display

Easy to read - no eye strain Up front brightness control High resolution graphics Quick start

no preheating

Regulated power supply Attractive metal cabinet UL and FCC approved

9" Data Monitor

12" Screen Amber or Green Text Display$99 1

15 Day Free Trial - 90 Day Immediate Replacement Warranty

12" Hi-Resolution Amber or Green Screen Monitor $119.00 this is a 1000 Line, 80 Column, High Resolution Monitor with crisp clear text that is easy to read! A must for Word Processing! Includes special Software Discount coupon. List $249.00 SALE $119.00 14" Hi-Resolution Color Monitor $229.00 This 14" color monitor has the sharpest and clearest resolution of any color monitor we have tested! Beautiful color contrast! Also compatible with video recorders. Includes special Software Discount coupon. List $399.00 SALE $229.00 (IBM Compatable) • LOWEST PRICES* 15 DAY FREE TRIAL- 90 DAY FREE REPLACEMENT WARRANTY • BEST SERVICE IN U.S.A. • ONE DAY EXPRESS MAIL • OVER 500 PROGRAMS • FREE CATALOGS

Add 1(000 lor ihipplng

handling and iniuranc*

IINnon rutidtnlt

plioi«dd6I. IO« Add (30 00 (or CANADA PUERTO "ICO HAWAII ALASKA APOfPO oid»n Canod.o" ortj.il mull b« i" U S WtOONOTEIPORT rOOIHEHCOUNTHISS

Entloi* Coihlvri ■ :.- -

Montr

■ Penonol ■.!.*-

day* lor delivery 7To7dovl'arPn°naord°'1 VISA - MASI(«CA»0

■'-' * ■

COD

dollar!

Allow 14

L1' f"01'1

ENTERPRIZES-°" BOX S50. BARRINQTON, ILLINOIS S0010 Phon* 312/112-5344 to Ofdtr


THE ARCADE WINNERS

Arcade Classics Come To The Commodore 64 • Now

you

• Official arcade version • 3-D graphics • Two screen displays • One or two players.

Official arcade version.

can

control

the

Starship Enterprise as you fight

The

Klingons before they destroy your boses. Full 3-D view as well as overhead radar lets you know what's going on around

you.

Use

control

power,

your

warp

joystick

drive,

gorilla.

to

monkeys,

reproduction machine destroy

hippos,

of

the

challenges the

gorillas

arcade you lair.

to List

539.95- Sale 529.95 (cartridge].

ond sound make this a must for

S39.95.

gome

to the Commodore 64. Superb

impulse

phasers. But watch your shields, photon supply ond warp power. Fantastic graphics List

arcade

sharks and rhinos now comes

photon torpedoes and

everyone.

famous

featuring fhe coconut throwing

Sale

S29.95 (cartridge).

• Official

arcade

version

scrolling graphics •

Now

the

famous

• Stunning

3-D

Multiple screen displays.

invasion

Just like the arcade version. Steer your ship through deadly

of ^.

robot Zaxxon's lair con be done ^l

electron posts as you fight off

enemy space soucers and hoppers. Finally you meet the enemy source ship. If you get

in your own home. Invade the fortress,

get

Then

through

and

finally

himself.

Just

past the

fighters

Zaxxon's destroy like

the

• Official arcade version • 3-D color graphics • Four Galactic screen displays.

home

through all this you stort again

Zaxxon

only this lime the enemies have more powers and surprises. Fantastic grophics and sound.

arcade

game. This one's fantastic. List

List S39.95. (cartridge).

S39.95. Sale S29.95 (cartridge).

Sale

S29.95

Add S3 00 for shipping handling and insurance Illinoil rendenli pl.a« add 6',. lox Add to 00 (o/ CANADA PUEHTO RICO HAWAII ALASKA

APO-FPO ordar»

Canodian o<d»ri mult be in U S

dollan

WE DO NOT EXPORT TO OTHER COUNTRIES

Enclose Casniors Check. Monoy Order Of Pariono! Check

Allow U

days for delivery. 3 To 7 days for phone orders. I day evpresi moil)

VISA — MASTER CARD — C O.D NoCOO lo Canada, APO-FPO

ENTERPRIZES «

0u=CuS'0MtBSi

BOX 550. BARIilNC.TON, ILLINOIS 60010

Phone 312/382-5244 lo order


K-TEL SUPER PRODUCTIVITY/ACTION Educational

Red

Learning Aid

Razz berry

Fantastic

educational gome that teaches spelling and good sentence structure. First you must pick the missing letter for the word (correct spelling) then you musl pick the

two missing letters for the word.

Finally you must pick the correct word for the grammatically correct sentence. Great for students and adults. List S24.99. Sale $16.95.

Robin Hood — You os Robin must fight your way through Sherwood Forest, Nottingham Castle, past the Duke, rescue Maid Marion, ond finally steal the gold, Fanlastic grophics with 5 different screens of

challenges. List S14.99 (Disk)

519.99.

Sale

(Disk).

Ice Palace -- You as the Penguin

full Plantin Pal Finally a onolysis and advisor for all your gardening needs. Plantin Pal asks you what you want to plant (gives suggestions, too!). Then tells you where to plant them! (garden loyout) How to take care of Ihem! Plus what to do when something

musl moke your way through the automated Ice Block Factory on your way to your true love. 3 screens

worth

blocks,

deadly

Freddies

Fire

of

melting

snowballs,

Demons

Iry

ice

ond

to stop

you. Plus you must eat the fruit to keep your strength up and build an

goes wrong! (Insects, pests, and plant diseases) Fantastic for all

ice ladder before your love can be yours again. Fantastic grophics and

your gardening needs. List S29.99.

action.

Sale S19.99 (Disk).

List

$24.95.

Sale

$19.95.

(Disk) Speed Reading Coach — Teaches

vocabulary, comprehension, and speed to help you read better. Eye training and vocabulary come first, then

the

screen

flashes

word

by

word or sentence by sentence through paragraphs and asks you questions when you're done. Fantastic Reading Aid. List S29.99.

Sale $19.99 (Disk).

Sir

Lancelot

Fight

your

way

through the castle, kill the dragons,

and save the maiden. But this is jus)

the beginning! 8 more quests with 8 more challenging screens await your rise to be knighted king of the realm. Fantastic graphics and sound .

List

S 1 9 .95.

Sale

S14.95.(Disk)

Add S3.00 lor shipping, hondling ond insurance. Illinois leiidents

please add i% lax. Add S6.00 lor CANADA PUERTO RICO. HAWAII. ALASKA, APO-FPO orders. Canadian ciders musl be in U.S. dollars. WE DO NOT EXPORT TO OTHER COUNTRIES.

Enclose Cashiers Chock, Money Ordar or Personal Check. Allow 14 doys for delivery. 2 lo 7 days for phone orders. I day express mail!

VISA — MASTER CARD — C O.O. No COD. lo Canodo. APO-FPO

ENTERPRIZES

IrtE LOVE OUH CUSTOMERS!

BOX 550, BARRINGTON, ILLINOIS 60010 Phon» 312/382-5244 to ord«f


Sexier dunes fir mutarHUnrfOrv

Buy 1 (at Sale Price!)

Get One

Commodore 64

(Expires 10/1/84)

A ward Winning Games * Buy any Epyx game from Protecto and get CRUSH, CRUMBLE & CHOMP Program FREE!

World's Greatest Baseball— Finally a great sports game. Realistic right down to the playing field. Control all the actions - even the outfielders. Play realistic baseball all year round. (Fantastic graphics, action, and sound!)

(Disk) List 534.95. Sale $24.95.

Fax — Stop wasting quarters! Now you can play Exidy's Fax at home. Play against the computer or an opponent to get the answer first, over 3,700 questions dealing with sports, television, movies, histories, and many more

subjects will keep you playing for hours (a must for trivia buffs). List $34.95. Sale $24.95. (disk only).

Summer Olympic Games — Now you can compete in the Olympics right along with the real competitors. Compete in track, skeet shooting, pole vaulting, diving and more. This Olympic game is so realistic it even includes a beautiful opening ceremony and an awards presentation after each event. (Highly recommended, by far the best Olympics game we've seen). List S39.95. Sale $28.00. (disk only).

Dragon Riders of Pern - - Based on the best selling book series by Anne McCaffey (over 10 million sold). This program forces you to make an alliance with the Lord holders, then mount your dragon (stunning graphics) and battle the dreaded thread. (Super fast action with a great theme) List S39.95. Sale $24.00. (tape/disk).

Jumpman — If you like Donkey Kong,

you'll love Jumpman. Over 30

different screens with 8 speeds and 5 skill levels make this the fastest action game in the country. You must leap girders, climb ropes, and scale ladders to reach and diffuse bombs while avoiding robots, birds, bullets, explosives, crumbling walls, vanishing escape routes, and many other obstacles. (Truly a fantastic game!) List $39.95. Sale $24.95 (Disk/Tape).

Temple of Apshai — (computer game of the year). This is the standard by which other adventure games are judged. Full color graphics portray the temple and all its contents — magic, monsters, doomed cities and damsels in distress. Do battle in real time with over 20 monsters, expansion modules will keep your adventure alive in the future. List $39.95. Sale $24.95. (tape/disk). (Also Available For VW-W) Add S3.00 lor shipping, handling and insurance. Illinois lesidenls please add 6% tax. Add 16.00 (or CANADA. PUERTO RICO HAWAII ALASKA APO-FPO ciders. Canadian orders musl be m U.S. dollor<. WE DO NOT EXPORT TO OTHER COUNTRIES.

Enclose Cashiers Check. Money Ordor or Personal Check. Allow U

doys For delivery. 2ro7doysiof phone orders VISA

MASTER CARD

I day express mail!

C.O.D.

NoCOO

lo Canada APO-FPO

ENTERPRIZES

-

BOX 550, BAHRINGTON. ILLINOIS 60010 Phono 31 ZI3D2-S244 lo ord»r


Super Action Software! J

Commodore 64

PROCR€//IV€ P€RIPH€ROL/ 6 /OfTWRR*

Disk Programs

(World's Greatest Adventure Game) CYBERWORLD

sale$34.95

This five-screen orcode odvenlure packs the computer with intense graphics and sound! You are a special Cyberleague agent in a universe full of hostile aliens and vicious robots. Joystick ond keyboard transport you through 3D rooms, space

barriers, fleets of invaders, and warship-ridden quadrants of spoce. Over 100 sprites, 8 new choroder sets, ond dozens of mind-boggling sound effecls make up

this multi-layered adventure. Animation, action, and strategy all combined into a game so extensive thot two disk sides are jommed with gome programs and dato! Reach the ultimate conk of admiral and you moy carve a niche in the permanent high-score list. A full-site book quality monuol with full-color covers is included to guide you through your most exciting gome experience.

Perplexian Challenger

Wizard ListS49.95

Sale $24.95

List S34.95

tlsree-dimension! I. mi mil tit view ol spice.

You. as i pilot, must utilize lightning fast refines to destroy inviding ships, and avoid their re I on lire. Simultintously, you bus! maneuver jour ship to capture space debris tint reiuins Irom the explosions.

Outstanding graphics Iel lures include smooth 3-D roll lions, split

screens,

ind

the

most

incredible

high resolution

nyperspace sequence ever produced. Programmed entirely in machine language,

this action

strategy gime is guaranteed to blow you awiy. All the professional features you expect are included: automatic

self-demo,

high

scc-ie

retention,

piuse,

Sale $34.95

lump fton ropes to ladders, dodge plummdinj boulders and

Ihe incredihly responsive three »is .(.(slick control ol a space lifhit is in four hinds. Spjil screen graphics provide a :: y....: :i- .ir ol (Our ship's '!i■ . -lalion. as well is a

and

provisions tor 1 to 4 players. Add to this, futures you don't eipett like eisy-luding. and music during the load. Psipleiian Challenfcir is a game that brines Ihe arcade

Gothmog's Lair List 544.95

Sale $34.95

Real-time adventure eicilemeil it its best. Solve countless

duck under deadly arrows in you quest lor sparkling diamonds,

puzles ind slay over a dozen aoosleis by using the huge

gleaming bars ol geld, and glisleniig pearls. With joystick in Hind you mast explore lorty tailing screens, each a km and exciting adventure. Take Ihe key to unlock the doorway to your

Old English script.

Kit spine-tingling level. Eich kev restores your ugical powers,

allowing you to cast over ten dilferenl spells. With these magic spells you have ihe power to overcome vicious creatures, terrifying traps. iod perilous plunges. tour Wizard is realistically animated in every possible direction. Dtzens of movements ire possible - jump over burning

tires, shimmy up or down ropes ind ladders, even slip down

Ireacheious sliding staircases! Migic portals move your Wizard through midair and protect you Irom a myriad of filly-animated liendish monsters. Catch in elevator to the lop of the screen and dart through sliding gates in your quest tor magic and treasure.

Wizard's fascinating variety of screens are sure to please and entertain, and ol course you can build an unlimited number ol your own levels using the construction set provided with your game,

vocibulirr ol over TOO words. Two ctullesging ditficilty levels i you with over 80 areas, each fully described ii Menacing monsters. Xniving villains, tattered code boots ind treacherous terrain are just i few of the situations you nusl overcome in your quest for the thirteen priceless

I leisures. More thin seventy cbjecls are invaluable to yoi in )ji;r search lor glory and wealth! * lull-sue, thoroughly illustrated manual is included, [enuring color front and back, book quality, ml a fold-out nap. this "extra" firther extends the professionalism o! this

game. Ihe following are quotes from unsolicited testimonials sent to us by adventurers in Golhmog's Lair... "I hive extremely enjoyed Eoltimog's Lair, and plan to any more adventure games..." Scott lulman. Memphis, IN

"Golhmog's- Lair is Ihe best adventure I've ever clayed..."

experience to you' home.

Dennis Manochio, Ir,, Saratoga. CA

PROFESSOR

List $39.95

Sale $29.95

An in-depth self-lulorial for Ihe Commodore 64 on □ two-sided disk. This menudriven tutorial covers every aspect of your C-64 —BASIC, keyboard, sound, music, simple and advanced graphics. Quizzes test your comprehension ot the end of

many lessons! On-screen illustrations, sound effecls and full-color interactive graphics make learning easy and interesting. The PROFESSOR is your ONLY choice for an all-in-one, thorough tutorial obout the Commodore 64!

Tft

flVjJff

Add S3 00 tor shipping, handling ond msuronce. Illinois resident!

pleaieodd 4^. lux

Add 16.00 to' CANADA. PUERTO RICO HAWAII

ALASKA. APO-PPO orders. Canadian orders musT be m U.S. dollar). WE OO NOT EXPORT TO OTHER COUNTRIES

Enclose Cashiers Check. Money Order or Persanal Chech. Allow Id doys tor delivery. 2 to 1 days tor phone orders 1 day evpreis moil1 VISA — MASTER CARD — C.O.D. No COD. lo Canada

APO-FPO.

ENTERPRIZES

BOX 550, BARRINGTON. ILLINOIS 60010 Phone 312/302-5244 to order


MACHINE LANGUAGE FOR BEGINNERS Richard Mansfield, Senior Editor

Loops And Branches Branching, looping, and printing messages— these are among the most common computer

tells the assembler that you want a printout of

the results of the assembly. (A real op-code, like

activities. As you become familiar with machine language, you'll discover how to accomplish everything you can now do in BASIC (and a

LDA or JSR, is an instruction which your assem

want to know is how to print messages to the screen and to a printer. This month let's explore looping and branching as a method of printing.

ming, but will not show up as actual, assembled

good deal more). But one of the first things you'll

In BASIC, it's quite common to set up a loop

and then branch out of the loop after a job is done. Here's one such structure which prints DATA statements: 10 20

READ XS IF XS="END"THEN

30

PRINT

40

GOTO

50

DATA SEND,THIS,MESSAGE,END

END

X$

30

-S

40 50

.0 ;

60

;

70

LDY

B0

;

90

LOOP

object code.)

The .S pseudo-op in line 30 causes those assembly results to be listed on the screen during assembly and line 40 causes the object program to be stored in RAM memory.

The semicolons are like BASIC REM state ments—anything after a semicolon on a line will be ignored. The first actual ML instruction ap pears in line 70 and sets up the Y register as a message table in turn. In line 90 we start the loop, using Y as an

END and thus RTS (ReTurn from Subroutine) READ #0;

DATA

FROM

INITIALIZE

TABLE AND THEN

BRANCH

INDEX

LDA TABLE,Y

100

BEQ

END

110

JSB

5FFD2

120

INY

130

JMP

140

;

150

END

160

;

"SEND THIS MESSAGE":.BYTE 0

There are several things to notice here. We're using an assembler program which accepts

BASIC-like programming. The general name for the program above is source code which, when an assembler assembles it, becomes a runnable, exe cutable ML program (called object code). It's like

BASIC because you can use line numbers, make

remarks, even have multiple statements on a line separated by colons. The first line must contain

the starting address, in this case 864.

Pseudo-Ops And Semicolons Line 20 is a pseudo-op (a false op-code) which COMPUTE'S Gazette

branching to a specific address, rather to the label END. The assembler will calculate the

proper address of the label and replace the word

properly.

RTS

.BYTE

back to BASIC. Notice that this kind of assembler doesn't rely very much on numbers. We're not

END with the correct number so that the BEQ (Branch if EQual) instruction will operate

LOOP

170 TABLE

120

form some task which assists you in program

index to load the Accumulator with a character. If it's equal to 0, that's our signal to branch to

864 .P

contrast, is a command to the assembler to per

counter so we can take each character out of our

10

Here's the same thing in machine language: 10 20

bler can turn into ML code. A pseudo-op, by

October 19B4

Anyway, if we're not through with the mes sage, we JSR $FFD2, which is the routine in the VIC and 64 ROM BASIC which prints whatever character is in the Accumulator at the next avail able location on screen. Then we raise our index (INcrement Y) to point us to the next character in

the table and JMP (jump) back up to the start of the loop. JMP is an unconditional branch. It al

ways branches. The several 6502 ML instructions

beginning with the letter B (BNE, BEQ, BCC,

BPL, etc.) are all conditional branches. Sometimes they send you somewhere and sometimes they don't. They are little tests. In this program, the BEQ (equal to zero?) test will fail repeatedly as we step through the message. Finally, we'll LDA

(LoaD the Accumulator) with that 0 on line 170


VIC-20/C-64

MODEM MFJ-1237

49

Tiny 2y.<2y.>1 In.

300 baud Direct Connect Originate/Answer • Duplex •

Project Space Station. Cell Defense. Full

Carrier detect LED

Worid'iloweitcoilmocHm. High performance Texas Instrument single chip modem design.

Worts for bath VIC-20 and Commodore 64. Plugs into user's port. Use with single or multi

line phones. Plugs Into telephone base.

300 baud. Direct connect. Originate/answer.

Full duplex. Carrier detect LED. Crystal controlled. Powared by computer. Aluminum enclosure. Includet u.isic lilting ol rermin.il Program.

Terminal Program available on tape, M.96 and cartridge, $19.95. Specify VIC-20 of C-M.

Save VIC-20 Cartridge Programs on tape

Adapter board

lets you save VIC-20 cart ridge programs on cassette tape and run them using BK RAM board. Provides cartridge backup,

eliminates plugging and unplugging cartridges and turning VIC-20 on and off. Includes adapter board that plugs Into expan

sion port and software 10 save and run cartridge programs on cassette tape. Requires 8K RAM board (not Included).

RS-232 Interface for VIC-20/C-64 MFJ-1238

*39F*i Provldet RS-232 voltage conversion for VIC-20/C-M serial port. Use RS-232 printers, modems, speech synthesizers and other RS-232 peripherals. Switch reverses transmit/receive lines for DTEor DCE operation.

Use as null modem. Standard 25 pin RS-232 con nector.Plugs into user's port.Powered by com puter. 2'/<x2W inches.

VIC-20 Capacitance Meter Measure 100 pf to 100 Mfd.

Includes calibration capacitor.

software on tape and hardware Interface.

MFJ ..„

.1.,

* ^H

fcw

Order from MFJ and try It. If not delighted, return within 30 days (or relund (less shipping). One year unconditional guarantee. Order yours today. Call toll Una BOO-647-1800. Charge VISA, MC. Or mail check, money order. Add $4.00 each tor shipping and handling.

CALL TOLL FREE ...

WHY LEONARD NEWEST SCIENCE SERIES WILL NEVER BE SEEN ON T.V.

BO0-647-1B00

Call 601-323-5869 in MS, outside continental USA.

ENTERPRISES INCORPORATED 921 Louisville Road, Starkvlllo, MS 39759

And Calmpute are Leonard Nimoy's

favorite computer science programs from HesWare. And unless you have a computer, you may never see them. First there's Project Space Station, A program that will put you and your children into deep space for days. It's based on the actual

procedures NASA uses in

4^*

-■'■■■:

the design and operation of a real space station. Not only will it expand your mind, it will challenge, stimulate, and fascinate you for hours. Then there's Cell Defense. A science program that pits you against a host of deadly viruses that invade your bloodstream. You must use scientific strategies and basic concepts in biology to protect the cells from invaders. Or in a matter of seconds you'll be dead. Finally, there's Calmpute. A biofeedback program that accurately monitors your level of stress. And suggests proper exercises to reduce ten sion. Or increase it, if need be. It's the only medical award winning program that uses a Galvanic Skin Response biosensor that you hold in your hand. Pick up Calmpute to day. It's available over the counter. Without a prescription. HesWare Science Series. They may never be seen on television but the ex perts give them ex tremely high ratings.

PROIECT SPACE STATU CELL DEFENSE. AND CALMPUTE BY HESWARE


which signals the end of the message. Then the

BEQ test will send us down to END. We'll get to the pseudo-op .BYTE momentarily.

The .P pseudo-op in the program above causes the following information to be printed during the assembly of the source code: REVIEWERS SAY:

READ

50

"This is Ihe best typing lulor we have seen yet;* **■*+"

DATA

FROM

TABLE

AND

THEN

BRANCf I

60

INFO-64

70

"Computer aided instruction a! its best." Commander

0360 A0

LDY

00

»0

INITIALI!

INDEX

80 90 0362 B9 6F 03 100 0365 F0 07

"This is an excellent program that makes typing practice an enjoyable pastime instead of boring drudgery."

110

0367

120

036A C8 036B 4C 62

130

OILITHIUU PRESS

20

D2

LOOP

FF

LDA TABLE,Y BEQ

END

JSR

5FFD2

INY

03

JMP

LOOP

140

Rated the-BEST educational program (or the VIC 20

150

036E

60

END

RTS

160

Creative Computing

CUSTOMERS SAY: ". . . delighted with my son's

progress ... he is the only one in his second grade class who touch types at the computer." "Your Typing Tutor is an excellent program ... our 4 children literally wait in line to use it."

"Thoroughly satisfied, can't believe how fast I've learned to type. I've never typed before." In daily use by schools across the USA.

TYPING TUTOR + WORD INVADERS Commodore 64

Tape $21.95

Commodore 64 VIC 20 (unexpanded)

Disk $24.95 Tape $21.95

170

036F TABLE

170

0380

.BYTE

.BYTE

"SEND

THIS

MESSAGE

0

It's similar to the source code, but some

thing's been added. Look at line 70. Now, in addition to the mnemonic LDY and its argument #0, there's also the result of assembling that

mnemonic/argument pair: A0 00. The number A0 is hexadecimal (called hex, it's a more convenient number system for working in ML). It's the same as 160 decimal. That's a number the 6502 chip understands to mean LDY #. The 00 is hex for 0, the value we want to load into the Y

register. So, A0 00 is what will appear, after

REALISTIC AIRCRAFT RESPONSE

assembly, in addresses 864-865 in RAM memory

"Has a quality of realism which sets it apart Irom others, oven those I've tested in flight school."

(0360 is hex for 864, 0361 is hex for 865). In other words, this is a printout which includes the object code, the runnable ML program.

Compule's Gazelle

"Great program!"

INFO-64

Automatic Assembly

"It is tremendous tun." Compute's Gazette

See how in line 130 the address 0362 (in re verse order, as our microprocessor chip wants it) has now replaced the label LOOP? If all this is a

"Flight tested by an air traffic controller, two skilled pilots and an elementary school class. Highly recommended by all."

bit confusing to you at first, get hold of a good

Midnlte Gazette

"This is an unbelievably realistic simulation of the difficulties

facing a pilot in instrument fly ing. I'm a 747 pilot and I think that this simulation could do a lot to improve the reactions and instrument scan habits ol even very experienced pilots." 747 pilot

IFR (FLIGHT SIMULATOR) Commodore 64

Tape or Disk $29.95

VIC 20 (unexpanded)

Cartridge $39.95

JOYSTICK REQUIREO

^£F Shipping and handling S1 00 per /tHHD^,

^■Ih order CA

residents add 6% tax

"•*■*

ACADEIilV

SOFW/1RE

P.O. Box 6277

San Rafael. CA 94903

(415)499-0850

Programmers: Write to our New Program Manager concerning any exceptional Com mo dor a 64 program you have developed.

assembler and start playing around with it. Much of what we're discussing will be automatically performed for you by the assembler itself. Also notice the pseudo-op .BYTE in line 170.

It allows you to enter literal ASCII code letters (using a quote the way BASIC defines strings) or literal numbers (no quote). This is the fastest way to set up data tables or messages in ML program ming. You just give the line a name (TABLE in

this example), announce a .BYTE series, and then write in whatever data you want, The printout loop technique we're using here signals the endof-message with the number 0. So, .BYTE 0 sticks in a zero into RAM memory following the

letter e in the word message. (The zero has to be outside of the quotation marks in a separate

.BYTE statement since we're after the numeric 0, not the character 0.)


Before showing how to redirect messages to a printer, let's first explain what all these labels are doing. How can words substitute for num bers? After all, we want to JMP to address 0362 (866 decimal). Why not just write JMP 0362 and be done with it? One significant advantage of using labels is that you can then freely modify your program without having to change all of the specific ref erences. For example, suppose you write the following: 664

LDA

866

BEQ 869

IS

868

INY

869

RTS

This would work fine because that branch to 869 is correct. But what if you later modified this program by inserting another INY? Or what if you deleted something between the branch and its target? The branch would still be to address

869 but that would be wrong. If, instead, you give the RTS a label: 864

LDA

15

866

BEQ

FINISH

868

INY

869

FINISH

the address of the RTS.

Other Advantages With labels you can quickly modify programs in other ways, too. Let's imagine that you write a large game program and you frequently reset the background color. You have used #6 as your

color in many places within the program. You've got LDA #6 later change stead of #6, place where

sprinkled all over the place. If you your mind and want to use #5 in you would have to locate every #6 appeared and change it to #5. If

you had simply assigned a label at the start of the program: COLOR1 = 6 and then always used LDA #COLOR1, you could just change that first label assignment to COLOR1 — 5. All ref erences to COLOR1 throughout the program would then automatically change as well.

These and other advantages of labels all contribute to a BASIC-like environment which can make sophisticated ML programming ef ficient and comfortable for the programmer. But

let's now turn to the way you can communicate with your printer in ML. There are two things to

RTS

you can change the other parts of this program as much as you want and the assembler will al

do. Open a file (OPEN 4,4 is the BASIC equiva lent) and then print a character to file #4

(PRINT#4,A$ in BASIC).

ways make sure that the BEQ is correctly sent to

To open the channel of communication to

OGRAM YOUR COMMODORE TO

HUNDREDS OF THINGS IT COULD

NEVER DO BEFORE. UKESNI BASIC has never been as elaborate as Graphics Basic. Sure you've had good graphic capabilities before, but never could you create the kind of superlative sprites, complex animation, and sensational sound that you can now. Graphics Basic gives you demo programs, and lets you extend the BASIC language so you can write hundreds of programs and games in no time at all. Automatically move,animate and edit sprites. Add music or sounds that range from laser zaps to sneezes. Or, make half the

screen graphics, and half text. And programmers' aides make it simpler and easier to program. So whether you're a beginner or an expert, the possibilities are endless. Get Graphics Basic. And find out what all the noise is about.

f'"^

GRAPHICS BASIC BY HESWARE Com mo dn re

I md


the printer, you use the following protocol: #4;

FILE

NUMBER

10 20

OPEN4 LDA LDX #4;

30

LDY

#0;

40

JSR

$FPBA;

SECONDARY ADDRESS KERNAL SETLFSfSET

50

LDA

*0;

LENGTH

OF

60

JSR

$FFBD;

KERNAL

SETNAM

70

JSR $FFC0;

KERNAL

OPEN

JSR

SFFCC;

NUMBER

UP

LOG

(SET

NAME)

(OPEN A

LOGI

(CLEAR I/O

RTS

This is a subroutine called OPEN4 which can be invoked in your ML program by a JSR OPEN4. It uses the Commodore Kernal routines, which are common to the VIC and 64 (these

same locations, with different device numbers, are used to open communications to a disk drive or tape drive). When it returns, it will have reset normal I/O (input/output) conditions for you in line 80. Normal I/O specifies that the screen is the output target and the keyboard is the input

source. These conditions prevail unless the com puter is notified otherwise. That's where the "chkout" and "chkin" routines come in. They are like PRINT# and INPUT* in BASIC, redirecting the output or input of a given character or

symbol from the defaults to other, previously opened, files. Now, whenever you want to send a charac ter to the printer, you can invoke a PRINT# by

LDX #4; JSR 65481, thus opening a channel of communication to the printer (file number four).

It's similar to BASIC'S CMD. Then, JSR 65490 is the general purpose print routine which sends

the character in the accumulator to whatever de vice lies at the end of the currently open chan nel. Finally, you close the channel to the printer by JSR 65484 which restores normal I/O con ditions. Once the chkout routine is called, you can use the print routine (65490) to send individual bytes to the printer, one after another. But to be

safe, we're going to clear the channel after each byte we send. BeJow is a subroutine called

PRINTER which prints the character in the accu mulator to the printer. You must call this sub routine for each character you want to print. Note that you must save the character in the accumulator until you need it. Those ROM routines we JSR to will not preserve the value in the accumulator for you. To accomplish this, we've previously defined a variable called A which can temporarily hold the value of the accumulator until we need it. Here's the entire PRINTER subroutine: 10

PRINTER STA A;

SAVE ACCUMULATOR VALUE

20

JSR

CLEAR

65484;

NORMAL 124

I/O)

COMPUTE'S Gazelle

PREPARE DEVICE

65481;

BY OPENING

(PREVIOUSLY OPENED)

LDA Af TO

BE

A

#4

CHANNEL

TO

FILE

RECOVER ACCUMULATOR VALUE PRINTED

60 70

JSR 65490; JSR 65484;

PRINT CLEAR CHANNELS

80

RTS;

RETURN

AGAIN

Take another look at the first example above which prints PRINT THIS MESSAGE to the screen. To make it print to the printer instead,

just replace the JSR $FFD2 in line 110 with a JSR

CHANNELS) 90

Âť4;

JSR

50

NAME

KERNAL CLRCHN

LDX

THAT

ICAL FILE)

CAL FILE) 80

DEVICE

30 40

October 19B4

CHANNELS

(RESTORE

PRINTER (our new subroutine). To have it print on screen and printer simultaneously, leave in the JSR $FFD2 and just add a new line right below it: U5

JSR

PRINTER

Whenever you JSR to routines in ROM, it's a good idea to first save the numbers in the Accu mulator and the X and Y registers if you will be wanting to work with these numbers further. ML programmers make heavy use of the registers, and the ROM routines like to use them as well. You cannot be sure that, after a JSR to ROM, you'll get back the same numbers in the reg

isters. Luckily, the general print routine at 65490 ($FFD2) is non-destructive. It preserves the A, X, and Y registers. However, some other ROM routines will not offer this courtesy. Notice that we're using the Y register (in the first example above) to index our printed mes

sage. To be on the safe side, set up a variable, called Y or something, and STY Y just as you

STA A upon entry to the PRINTER subroutine. If you make a habit of saving important registers before ROM JSRs, you'll avoid one major source of ML program bugs. To pull it all together, here are the steps you take to print a character to the printer. First you

would JSR OPEN4 (to open a file to the printer), then load the character you want printed into the Accumulator, and finally JSR PRINTER to print

the character. This seems like a struggle to print only one character, but once you've set up the subroutine, you simply put any character into the Accumulator and JSR.

At the end of an ML program, you'll want to close files and shut down communications to

peripherals. Here's the way to close down our file to the printer: 500

JSR 65484;

SHUT DOWN

PRINTER,

GRACEFULLY.

510

LDX

520 5 30

JSR 65481; LDA #13;

#4 OPEN PRINTER CHANNEL LOAD

A

CARRIAGE

RETURN

CHARACTER

540 JSR

5FFD2;

PRINT

IT

550

JSR

65484;

CLEAR

ALL

560

LDA

#4

(RESTORE NORMAL I/O)

570 JSR 5FFC3;

CHANNELS

CLOSE THE FILE

AGAIN

i


COMMODORE 64 GETS AWAY FROM BASICS

wtth

Canwoaat H rs I frjasiur* cl Canmoaas twcfronts. ins •KJSHCO j! J I'Wenur* W Orfora Co-"KJ-rE' Swrsm! tSc'wire). no

SOME OF THIS YEAR'S BEST HIGH-DIVE PERFORMANCESWIli TAKE PUCE ON A KITCHEN TABLE Perform a double sumersault dive. Lift 600 pounds. Run

the 500 yard dash. Shoot a bow and arrow. All on your |\

kitchen table. All with HesGames™ With HesGames' six ' action packed sports games on one disk you can break all sorts of records without ever really breaking a sweat. With very colorful, realistic characters, cheering crowds, a judged performance, quick instant replay capabiiity,and even a way to save all your best performances, you can experience the thrill of victory or the agony of defeat. All on your kitchen table. Try HesGames now, and we'll give you your very own

HesGame

h HESGAMES BY HESW

For the Commodore 64. Coming soon for the Apple


Teaching Your Computer English Michael A. Long

The basic idea of an adventure game like Zork is that you play a character in a story. The com

puter describes the surround ings, and you decide what to do—search the room, listen at the door, fight the dragon, drink a magic potion, and so on. Your choices determine the direction of the story, which is why ad venture games are sometimes

called interactive fiction. The heart of such a game is

the parser routine, which splits apart the sentences you type and matches the words against

a vocabulary list. Parsing is a computer's way of diagramming sentences.

Some adventure games in

clude lists of acceptable but hard-to-understand commands. For instance, you may have to

use G for get, + for up, and — for down. However, these should not be your only options when operating text adventures or other interactive programs. There are several techniques which allow the user to type in English commands such as go

north or open door. One of the most useful of these techniques

looks only at the first few letters of each word. Let's study the program for a simple six-room adventure game to demonstrate how it works. Although the program will run on any VIC or 64, it will al most completely fill an unexpanded VIC, so type the program in carefully and with out extra spaces if you're using a VIC without expansion.

If you have the inclination (and enough memory), you

might want to add new com126

COMPUTE!* Gazette

October 1964

Would you like to talk to your computer? With the string handling techniques described in this article, it may seem like you are. For the VIC and 64.

mands, new treasure, and new rooms to this mini-adventure game.

Normal English Commands This program demonstrates a technique used by many adven ture programmers. It allows the user to input a command in nor

mal English sentences. The only restriction is that the user must type in the verb first and the

object (noun or compass direc tion) last. Only a few of the let ters in the first and last word are actually read by the computer.

Lines 12-27 take care of screen printing and the input prompt. The user types in a sen tence, and the computer stores it in variable A$. Lines 18 and 19

read through A$ using a FORNEXT loop and the MID$ func tion, looking for the space between the first and second words. Then the computer puts the two letters following that space into B$. At that point it is finished with the last part of the sentence and can discard it, a

variable V$, established in line 21, holds the first two letters of all the verbs you may use in the program, and line 24 does the actual numeric conversion. It

sets up a FOR-NEXT loop in which the variable X increments from one to the length of V$.

The computer uses the MID$ function to look at the two let ters following X until it finds a

match for the value in A$. When it finds a match, it then

sets V equal to the number of the count, plus one, and then divides V by two. At that point you have the number of the verb you typed in. Line 24 does the same thing, except that it is looking for a match in N$ (contained in line 22) for the B$ string. Lines

71-75 contain a list of all the nouns (N$). You now have V equal to the number of the verb and N equal to the number of the noun. Suddenly, we're working with numbers, which are easier for your computer to manipulate. Line 25 uses an ON-GOTO

statement to send the program to different sections of the list ing depending on which verb

was used. For example, if you used the verb GO, the program

would be sent to line 26. From there all you have to do is set up the logic needed to execute the command you want. Line 69 is a DATA state

feat accomplished in line 20 by setting A$ equal to the first two letters of the first word in the

ment which holds the infor mation for array M, the movement map for moving

sentence.

from room to room in the ad

But the computer still can't use the values because they're letters rather than numbers. The

venture. Lines 80-81 contain

the information for R$, which holds the room names in the


program. Lines 77-78 are DATA

Program Variables

statements for array L, the loca tions of all the objects in the

A$

B$

adventure.

v$

One more note. If you have

PULL), you can do one of two things to ensure proper selection

L

L5

of the verb you want. You can

read more than the first two let

Z V

N

more memory).

way, you only have to store the

first two letters in V$ one time, and you don't have to use an other GOTO command with your ON statement either. You can use a similar method to handle two verbs

= The room you are currently in ■" Holds screen and border memory location for VIC; used to change screen colors when changing rooms.

R$0 ■= Room names

ters of the verb, but you'll sacri fice some speed (and use a lot

put in for that situation. That

inputed sentence, and first two letters of verb First two letters of noun Holds firsi two letters of all the verbs allowed Holds first two letters of all nouns used

N$ NSO = Holds list of all the nouns for use by the program MO = Two-dimensional array for use as movement map LO = Location for all objects (nouns)

two verbs with the same begin ning letters (like PUT and

A better alternative is to di rect both commands to the same location in the program. When those verbs are used, the com puter searches through the ap propriate program lines and reads only the commands you

= = = *=

— Used for Get statements

= Numeric value of the verb - Numeric value of the noun

that mean the same thing but are spelled differently. For example, both get and take could send you to the same part

of the program if you repeat the GOTO number in the ON statement.

Here's a list of verbs used in our example program: GO

- Go

GE PU

- Get = Pul and Pull

TA

= Take

HI

= Hit

IN LO

= Inventory = Look

If you'd rather not type in

this program, send $3, a blank cassette (no disks, please), and a self-addressed stamped mailer, and I'll be glad to make you a copy.

Michael A. Long 6640-B 105th St. Ewa Beach, HI 96706

See program listing on page 111. Q

LOOKING FOR EXPERIENCED OFFICE HEIP7INQUIRE WITHIN. You'll never hire a more flexible word processor and spreadsheet program than the OmniWriter/OmniSpell and Multipian programs. OmniWriter/OmniSpell is smart enough to check your spelling on over 30,000 words. Multipian is smart enoughto crunch your office sales numbers. And smart enough to handle your personal office budget faster and much more effectively than most programs on the market today. So put OmniWriter/OmniSpell and Multipian to work for you, at half the price you'd pay for the same help on an Apple or an IBM. Get OmniWriter/OmniSpell and Microsoft' Multipian™ today. And see how fast they straighten

HfiS*

out your office tomorrow.

OMNIWRITER /OMNISPELL AND MULTIPLAN BY HESWARE

Commodore 64

Multipian1" is licensed for Microsoft *


WER BASH

Hi-Res Screen Dump Gregg Peele, Assistant Programming Supervisor

Have you ever created a hi-res picture or graph and then tried to reproduce it on your printer? This program allows you to

do just that. The VIC version requires a Super Expander cartridge. Both VIC and 64 versions are compatible with the Com modore 1525 or MPS-801 printers (but not the 1526).

corner of the screen. After seven bits, the pro

gram moves to the leftmost bit of the next row up and prints seven more bits, continuing up the screen. After the leftmost seven-bit column has been printed, the program starts at the eighth bit over from the bottom left corner and continues cycling from bottom to top until the entire screen has been read. Each seven bits are combined to form the byte to be sent out to the printer. Since

the program reads from the left bottom side of the screen to the right top side, the printout is a Both the VIC-20 and Commodore 64 allow you to create high-resolution graphics images on the video screen. With the VIC or 64 Super Expander cartridge or another hi-res program, it's easy to

produce detailed artistic creations. However,

most of these programs don't provide a method of printing out these artistic endeavors once you've finished them. Unless you leave your computer turned on indefinitely, your creation is short-lived. Both versions of "Hi-Res Screen Dump"

work with a Commodore 1525 or compatible printer. (Note that the new 1526 printer from Commodore is not compatible with the 1525, and will not work with this program.)

Bit Transfer Hi-Res Screen Dump is designed to transfer the bit information from screen memory to the printer. Since the 1525 printer can only accept

seven bits of data at a time in graphics mode (the high bit must always be set), the eight-bit bytes in screen memory must be split into odd units

before they are sent to the printer. Transferring the information from screen to printer is further complicated since the location of screen memory bytes must also be calculated, and hi-res screens

90-degree-turned reproduction of the screen image.

Both versions of Hi-Res Screen Dump are

written in machine language. A BASIC loader (the first several lines of the program) puts the machine language (in the form of DATA state ments) into the appropriate locations in memory. The BASIC loader also prompts you for the width of the printout, and the VIC version pro

tects the machine language at the top of free

memory. To operate the program correctly, you

must load and run Hi-Res Screen Dump before you load the program which creates the hi-res image.

Selecting A Width And Making A Printout In both versions, you can select either a singlewidth or double-width printout by POKEing a 1 (for single width) or a 2 (for double width) into

location 2 (i.e., POKE 2,1 or POKE 2,2). This location is changed by your selection of width

when you are prompted in the BASIC program, but can be changed at any time. A SYS to loca

tion 3584 (for the VIC) or 52224 (for the 64) will

initiate a printout of the hi-res screen. You can issue this SYS in direct mode if you have a de sign on the screen, or add it to a hi-res drawing

for the 64 can be moved to several different

program if you make sure the machine language

areas of memory. This program reads data from the screen one

is loaded into memory before the SYS is en

countered. Also, be sure that the printer is turned

bit at a time starting from the lower leftmost

on before giving the SYS.

128

COMPUTEra Gazelle

October 1984


SX-64 PORTABLE J

Qcommodore Mflol DM Matrix Parallel

Call for CBM 4 plus

1816.00

Commodoro 64.

,

1BS0 Color Print

lter

-..,.

1530 Dfttftsette

JB9 BH

1B41 Dink Ortve 1600 Vio Motiiun...!

i

S109

VIC »0

CAIL GOMREX

g249 00

'*5H Bn

CnmWpltei' n Latter (juatity

(440 00

EPSON

tSIO Vnh Tprm 4U

MONITORS

nx-no HX-SOJT. nx 100. rxao. fx-ioo call

liHJO Auui Modem

AMDEK

JUKI

170B dolor Monitor DPS ItaiEvwlirwl Printer 1311 Joystick..

leoi...

1313 Paddles.. mi vie las

dpiv«

Sli ;;

|li;,K

iJi iv

(CAM.

B3. 83. B4. 93. 93. 3350. 3410

MCD rjmk

$389 00

OKIDATA

1~1 [ Super Expander i

laoi na" dream..

SEC

8027 Dot MMrt*

IEEE US 333 Interface

.in

CAJ.L

Spirit 80

I1J0 VIC3K

OLYMPIA

sar>n oo

BMC

■■-

Tl*01 T*V:£ f*2" ^Ttt*"! H!T^M

9191

lee.90

!"^ nrT

Plus Coloi

GORILLA

133

Uraen

12"

Anibef

a nn

aSV&,...

Lignt Phti Slot VIO Expansion Interface

$33.00

S Slot Expansion Inw.-faoo

trBSB $49.99

r'nrjil]al Irusrracp w'Graphi

SB9.99

MOA G' IT°H

FJO-BG

B610P

WT9.00

laaop

.jeoo.oo

,

.,

■,

:...*44fl.OO

5ILVEF, REED

800 Letter Quality

PRINTERS i l ilia

I1-14H.0O

SMITH CORONA .

TP-1000

..S39.no Pnr^]|pl Printer luterfa-Ce. .

,

(449 00

....

550 Lftttsr quality.,,,....

SS49 00

770

$800 00

l.ittflp Quality

TOSHIBA

IM°'

j^-*

-■.~S!fi8»,«-.V:

COHTIWSNTAL SOFTWARE {64) H4.»if

Tlie Hotna Aocoimlant

(34.00

, .O4.PB

(40,OB

CSA (64)

Pr.intiOaJc

*39 B9

SM "!' S31 93

Centipede

834 0»

crjto Club

tii9 on

(3-! Slil

Tl-Fill-ft Zold

J39 9!)

.

DESIGWWARS (64)

YiJATiiCiL la?, on

D«u ld'6

Dank '

COMMODORE (64)

c-84 Referent* OuHa

11B99

S1D90

Easy Script

830 90

ia on

.], n,, 6c Subtraction. . . Linear

Equation

....

Multiplication & Division

SIB.00 S18.B9 $10.80

Amber

IS9.99

Hal Macl(

(7B M

Cl]l * PmM ..; Hard

(jnP3

EPYX (6-64,'VIC)

Temple of Apsliai

8E9 09 (10 fly

rr' tafvth

The Pft,»i:

■27 90

iWe.W

PI 3. IS" Amber. ..

ms*??

ZEHITH fas (99

INFOCOM (041

zorfc t, ii. m...:-..,.:

Hus

Writer

tar.oo

Dudllne

PROFESSIONAL 30FTWAKK (84) SEGA (64)

BUT Trek Congo Bongo

439 03 . . .S30 99

SPINNAKER (64!

■ Kids on Keys

_,„

-.i

SCRBEHPLAY (64)

J

Pogo Joe

83D.99

..IE0.BO

^^ ■

$30 90

SUB LOGIC (64)

Flight Simulator II

....

$40 9il

Plufi Max

1 ■■ ■ ■■■ ■■timsworkrW" Blreot Miiiid.Rbt-..

wora wmtor

Mon

S1SE00

I!" Grwn..

f»i; ?".*""«'■

Wnll

Hes

..lEBB.OO S13SI 00 Si3e oo

11 I H 00

JMtUUniwliift. -

li Cooatruouuii

SBS 00

Easy Hail

TAXAN

1211 Oraan

10!. IB

..tlGB.Bfl .JEOO.OO

Knmpor ttooph i or B....

ELECTRONIC ARTS (34)

S1B9B

Easy Finance J. II. III. IV

100

KVM123 Urcnn

P»oMan nonkoy Kong Stlirtfule

si! :ouo Orsan SO-IOOO Amber

ZVM133 Amber

ATARISOFT (C-64/VJC)

DefeiKlei-

°A.^AJ.^..

PI 1. 8" Qftoti

SOFTWARE' Vie. Bug

=;akata

g^.^y CoiDr

¥\ 2.

$1340 00

PnntmEisLer

JB 12111 Colof.

Data

SlDi")

iss.ea

Manngnr

,tlB 99

Onadratic Equations

VISA_

wast

800-G48-3311

In NV call (702)588-5651.Depl

Canada

east

Other Prouinces800-2G8-4559

800-233-8950

Ontario/Quebec 800-268-3974 115

In Toronlo call

(416)828-0366.Depl. 115

In PA call |717]3S7-95VG, Dept

1 IS

f;ustaitisr Service Number 337-1480

, Ontario. Canada LBMTi .

imini I tiRuii nil uraui's. Ldi-Ber sfiipiiiBiiW may ivijuiro aflilltlonal Oharget

..

7 B

3pti St.\ WliliamspOTt^pA 1770V

'

„.■*. AOd^W [laiaJiA^.tb) shipping ixnrt

and I1 A [■HsldnntH add MttlUii tax. All Hems subject, toiivallaljillly


Configuring The VIC

ULTRACOPY 64

The V!C version of Hi-Res Screen Dump {Pro gram 1) is designed to be used with the Super

Disk Duplication System for Commodore 64

Expander cartridge. The GRAPHIC 2 command

plus

shipping.

S 3

Visa or

Mastercard,

Add $2

loi Foreign

or

COD

screen beginning at location 7680 ($lE00). With

beginner makes perfect copies

the 3K of additional RAM provided by the Super Expander, BASIC program storage begins at loca tion 1024 ($0400). Line 5 of the loader prograrh

Analyze disk tracks tor data

reserves two pages (512 bytes) of memory for the

Simple

to use. Menu-driven. Even a

& errors

Skip empty tracks to speed copying

Copy everything incl. DOS flag & false ID Put errors 20,21,22,23,27 & 29 on copy as required by latest protection schemes Fast, reliable copying with 1 or 2 drives

98% OF SOFTWARE CAN BE ULTRACOPYED BEST COPY PROGRAM YOU CAN BUY ULTRABYTE

Call (313) 562-9855

23400 Michigan. Suite 502. Dearborn. Ml 48] 24

Satisfaction guaranteed. 10 day return privilege Dealer inquiries invited Seeking software aultiors ■ please wrlle

COMMODORE OWNERS WE'LL CHECK YOU OUT Mr Tester TM

Ii your Commodore 64 TM

loyi tick, Monitor and Sound Ton may never know

hMtU 1.) Full Joys tick operation In all *Tf* ■

be sure to remove line 5 before you attempt to run Program 1 in this configuration; otherwise you will get an ?OUT OF MEMORY message.

The hi-res screen set up by the GRAPHIC 2 command is still 3200 bytes beginning at location 4096 ($1000), but BASIC programs will now start at location 8192 ($2000) and continue to the end

print the hi-res screen that is currently visible. If

3.} Commodore™ SID chip tail (or ioand analysis.

4.) Scroon alignment and color tost. 5.) Complete read/write Dbk Track and Block Tost. 6.} Dbkette format analysis to

October 1984

Expander, and SYS 3584 will still initiate the dump. This area is now untouched by BASIC, so

area of memory. The program is designed to

MM.

COMPUTE! s Gazelle

programs. The machine language will still load into the 3K RAM area provided in the Super

but also means that it cannot be used with the 64 DOS wedge program, as both occupy the same

2.) Continuous or standard comprehensive memory

*2995

However, using the VIC Super Expander alone leaves only 2-1/2K free for your BASIC programs. If you have an expander or mother board that will allow you to add 8K or more of extra RAM in addition to the Super Expander, then you'll have much more room for BASIC

gram 2) resides at the top of the 64's free block of RAM above location 49152 ($C000). This makes it compatible with the Super Expander 64,

complete diagnostic that

All this for only

programs.

The machine language for the 64 version (Pro

lor inn. Mr. Toiler It m

9.) Cauette road/write telL

starts at location 3584 ($OEO0), and locations 1024-3583 ($0400-$0DFF) are available to BASIC

The 64 Version

CUp operating conrecliy ?

check Floppy*.. 7.) Complete printer teit. 8.} Complete keyboard toil.

machine language, just below the area to be used

by the hi-res screen. Thus, the machine language

of installed memory.

Disk Drive, Printer, Memory,

130

provided by the Super Expander sets up a 3200byte high-resolution screen beginning at location 4096 ($1000), while maintaining the normal text

order from

M-W Dial. Inc. 1342B Route 23

Butler, N.1.07405 201-838-9027

you want a screen dump when you are not in hi res mode, POKE location 900 with the high byte of the starting address of the hi-res screen and SYS to location 52224 + 32. This alternate SYS bypasses the routine which determines the loca tion of the hi-res screen. For example, if your hi res screen starts at location 57344 ($E000)—as in "Screen-80" from the September issue—you

would initiate the screen dump with: POKE 900,(57344/256): SYS 52256

See program listings on page 180.

©


HOME TELECOMMUNICATIONS Robert Sims, Assistant Editor

All The Fun That's Fit To Print For even the most dedicated computer owner, there comes a time in the serious and browfurrowing process of learning to telecommunicate when what is needed most is a good, hearty

founded the magazine along with the Egyptian and Incan civilizations), to the apologia for its editorial stance ("If you think our editorial page

laugh.

is offensive, send $20 and some suggestions"), The Modem Times is dedicated to the proposition

Most of the bulletin boards and services on the communications networks do not focus on

politic.

that there is not a serious bone in the entire body

humor (the Artsig on CompuServe and almost

any special interest group on Delphi excepted). It is often the local bulletin board which is the repository of fun and of the absurd.

A Perpetual Party Experienced modem owners use their local bul letin boards as a kind of perpetual party of the mind, a conversational free-for-all with every body dropping in and out willy-nilly. Occa

sionally, a sysop will see the sense in all this nonsense and try to bring a touch of order into the chaos. A good example of this organized

hilarity is The Modem Times, an electronic maga zine originating in Colorado Springs. The maga

zine, brainchild of editors Jennifer Petkus and James Bates, is one of a kind in electronic publishing.

The editors don't seem to be sure of exactly what they've wrought—a bulletin board, a lit

erary magazine, or a no-holds-barred forum of opinion for their subscribers. If they ever adopt a slogan for their masthead, it might well be "All the fun that's fit to print."

The Jocular Vein

A Comic's Dream The Modem Times and its electronic kin add a new dimension—participatory zaniness. For the

first time in the history of the funnybone, audi ence and performer are essentially indistin guishable. Any subscriber can rise from the ranks to be come an instant type-in comedian, uploading a

joke and leaving before the audience begins to

laugh or throw overripe vegetation. It's the best of all possible worlds for a comedian: You get your chance in the spotlight, but you're never there when you bomb.

The Motion Times is not all jocularity, of course. It provides a creative outlet for writers of short fiction and poetry. The magazine even has a section, "The Modem Times Won't Be Bought," set aside just for soap-box speeches and tirades on any subject. Here subscribers are encouraged to engage in polemic to their hearts' content.

The Laugh Stops Here Unfortunately, navigating the magazine is not as much fun as its contents. The software that runs

print newspaper or magazine, with a table of

the magazine is adapted from an ordinary bul letin board, with a long list of commands to memorize, and a main menu containing 24

contents, editorial comments, letters to the editor,

options.

features, and fiction from very obscure authors.

A help file and explanation of commands and options are readily available on-line, and the

The Times is structured much like a conventional

There the similarity ends. From the ersatz history of the publication (in which it is revealed that ancient astronauts

commands will be familiar to experienced bul

letin board users. But the beginner will do well COMPUTE'S Gazelle

OctotW 1984

131


to first download and print out the help file (Page 13) before venturing further. It's difficult to

But as electronic publishing matures, we can ex pect to find fewer technical distractions.

maintain a literary frame of mind if you have to keep jumping to the instructions between pages.

Forgettable Software The reader is after entertainment, not program

A Common Problem

ming tips or technical information. The software serves no purpose but to connect the reader and

This navigation problem is not unique to The Modem Times, of course. Whenever a program is written to allow a specific computer to commu nicate with a variety of terminal programs on dif ferent computer models, it is necessary to use the ASCII control codes and character set so the computers will have a common language. Two of the ASCII control codes are standard in almost all telecommunications situations. CTRL-S, a CHR${19), and CTRL-Q, a CHR$(17), are recognized by most terminal software to

the magazine, and it should be transparent. In

addition, it should be comprehensive. Instead of targeting the lowest common denominator, ASCII, electronic publishing software needs to be sophisticated enough to exploit the best sound

and graphics features of each computer model by exchanging codes with the terminal program to discover the caller's computer type and automati

cally set transmission rate, display width, and other parameters.

mean "stop transmitting" and "resume transmit

In this ideal world of the possible future, each subscriber will receive a dedicated terminal program which will require no more technical

ting," respectively. Such standard codes can be transmitted automatically. But the meanings of other com mands and control codes vary widely among bul

expertise than the ability to connect the modem and load and run the program.

letin boards and terminal programs. Conse quently, the user must learn the necessary commands or codes and transmit them manually. More than any other aspect of home tele communications, electronic publishing points out

But until that millenium arrives, we'll have

to be content to log onto The Modem Times and deliver a tirade on the subject. The Modem Times 25 N. 14th Street

the need for integrated software. In its infancy,

Colorado Springs, CO 80904

(303)471-2226

we expect to make the best of what's available.

& in ohio

Srndeer

1309 BOARDMAN-POLAND ROAD, POLAND. OHIO 44514 WORD PROCESSING:

$ 65.00 59.00

with speller

SAKATASC100 BMDEKC0LOB1 + bmc 12

79.00

MIRAGE CONCEPTS EASY SCRIPT

35.00

PRINTERS

EASY SPELL

17.00

GEMINI 10X/ CflRDCO INTERFACE GEMINI 15X

S 69.00 35.00 69.00

-.

DAISYWHEEL 18 CDS oxidata,in moaeis RITEMAN COMMODORE 1526 MPS-801 CARDCO ■ C TYMOC CONNECTION DISK DRIVES: COMMODORE 1541 M5D SUPER DRIVE

DELPHI S ORACLE

$ 89.00

SUPER BASE 63

79.00

THE MANAGER CODEWRITER MIRAGE CONCEPTS

35.00 65.00 79.00

CONCORDE

PRINTERS:

GEMINI 10X Cardco interface GEMINI 15X OKIDATA

COMMODORE 1530 MAX IRON

COMMODORE 1650 COMPUSERVE Starter Kit smttn

October 1984

269 3B9 208

69 85 CALL

CHALKBOARD selection atSis

(Leo1* Links, music Maestro, Leos Paint Brusn, Bear Jam, Logic Master, Science pro gramming Kit),

INFOCOM:

ENCHANTER

28

PLANETFALL

28

SECA:

BUCK ROGERS

SIERRA-ON-LINE:

as 19

69 5

T

1702 MONITOR

B

t&W'ot inmirna on mDiitnri Onio cunomer^ *aa B Sis

19 19

$ 39

STORAGE:

FLIPNFILE25

$ 14

DATA DEFENDER 70

17

ELEPHANT DISKS:

SS/SD

$ 17

SS/DD

19

■,pM, I'M. WITHIN OB KOUVSt All pMXS intrude t«n outturn

NO C 0 □ OSDEW for Sun kcsi del ue"

...

H0MEW0RD

VttA'MC

yicndojnktneckor

mcnrv prapr Pfrtana a'CO' lrjjnv cnecki delay crde;. '103V1 All ^ ■iie^irerinji— uc'ec .ifi(joa PDr ojme ptoduct Only 5i nOJiriQ ^iin in- fi2 ^o mmmiumi

r OR

$ 19

S E5

GEM 10-K

iivfl mwcrnnpiw ""^

$ 28

INFIDEL

CALL

6

115 ■

$ 39

with purchase of one software

CONGO BONGO STARTREK , .

CALL

COVERS C6a

MOST O"DI«

• SAT., 10 A.M. to 5 P.M.

369 CALL

(with surge oroteclon

89.00 25.00

HOURS: MON.-FRI., 10 A.M. to 10 P.M.

IS 9

COMCOOL PIUS

$ 47.DO 79.00 59.00 .

$319

COMCQOLiaisK Cl

MODEMS:

HE5 MODEM AUTOMODEM » Wi-u-.tfc COMMODORE 1600

CALL

ACCESSORIES:

CALL

White Supply Lasts

B5

DATBS6TTES:

$319.00 389.00

SPECIALS

IE 9

POWERTYPE

DATA BASE MANAGERS:

COMPUTE!'? GhzoHq

1(800)638-2617

$229

109-119

COMMODORE 1707

SPREADSHEETS:

132

Green inewi

79.00

CALC RESULT ADV CALC RESULT EASY MULTIPLAN

1 (216)758-0009

MONITORS:

WORD PRO 3- with speller PAPERCLIP

©

iff^4 .]vail,lDili|V*UD'

CHECK OUR LOW PRICES BECOUSE OF CONST* Nil I CHANCING PRICES PLiASE CAIL 1 CHECK OUP CUKUEM PRICING


COMMODORE G4 MB IK PI

nan ■'SKI '■ " r lit! Ml*

nut tbjUK

HI

FlflHH

MW SIB

SI* JIM

u

HOW ONLY 89-W

in

NOW ONLY 79.96

OIL

!!■•;

■ulElftlin TfplMa T4JM4 III

CN.L

51*

.MM

H BUI'

[lorn M

-KM

IBW . MM S«

IIP Tirnlul

.

■H

ii«

na

JOYSTICKS 5 ACCESSOR1S ■»

ii/M

IWID 3191/11

,<: '111"

11/» DS'W

ID OS/10 !!«/IO

n tlltia

**» MH

q|

Th* Dnngt ThaPltth

. .

(HKipliElti I [Did l-r;* UrilHH

'■>:«» '

u-£*.gi'i^jU'^

UOB

BBW

EtNH L

II'H

■ ■: "■

:-

Jmif

.

.

.

.

an HIM

II'M Dl'DO

ma

ii a'ii 14 BOH

REPLACEMENT PAHTS

KB'It (M US. P.rl'iu 10 u r if I Mill« CHtkl jodum i ^' M:.^-1

MONITORS

S-y!."BULKD[SKETTES

9D

Bid Mft

»T ll . s i:a -

SB::::::::

III

ua > MM >»/■ IKt'lK ... 79M

.

- -

tVH

1!» ii '■ -

SURGE PROTECTORS

-'I

M -

KltN

fBIHUil f r«f Fm A Insti|d» J([lillllUMM

SS/DD

ns/oe

'/ti-W/M

'1300O..1QO

loan

inn ntn

LV.fi

T4JH MN

.ma 'JIM

.mm "ami MO hS?H

A monthly disk publication for Commodore 64

IMC ID

I'DD

II/DQ

awa

.

fivi mi

11.. "i |.l» rtEE Illn

IIM/a

rill I IT "

HATH

««lll

ll'M

KM

Pritn *mi I BlNr tntl C* I*

MODEMS

■iiiDiiiiiiggi LD1T1L1FII

.III

DW

mm

VEIliTIM

.MB

IBM COM. FDfflUA

1S41EXPRESS

StMiKtMsiMtniiiaanin

UN

.

CnelM ■*»«!« I FtmIi Vria * Sdtwf t

SPECiM-OFTptEKOSTH

KM SIB tli mum

ALIEN VOICEBOX

DISK RIOT

inn

it JfC". Amft-ir

ng IrJji tW-lllj If

Dm I ^ If JU . FLIP IIhH'U. Ill

bin-r&ui^ciHnjn

^ll lof Hr hil Mm. in CivpL'ari Pil-rtn Mtr.ir -i v kcihihii in !&■ lu rl trl V ;.r FUE L'U^

l- l* Di[i»( i an i-i"i in if A eivinm ram

PRINTER INTERFACES ins

BROADWAY

CALL OUR ORDER DESK TOLL-FREE

COMPUTER CORPORATION

"right stuff" to Oe an astionaut7 HOPPER Bet you can't leave just one |peg, that is...] COWS* BULLS

Not an agricultural

program; It helps to be

a MASTERMIND

I -

423 Broadway, New York, NY 10013

= In this Issuel = LUNAR LANDER

For InlormiUon or to ordtr from NY, Al»Ka, Hawaii caII 212-219-2333

COLOR LISTER Puts an end to

monochrome listings. DISK SCANNER

SECTOR CORRECTOR FILE SCANNER

These three useful

programs let you save the Oaywhen your diskette goes bad. FRENCH MILITARY GAME

fllDFl fpi jByl

ECONO-ASSEMBLER

• Eaiy to learn (take? about S hours) • save up to 15D0 typical records on a 1541 tfi5kc"rrve • 5orT on multiple

ktyt 4 select records 9 ways. • Print information on labels or in report format

CindU 114 9!

paTlble wltfi many popuFar word processors to cr«[r

Assembled and III Hi

Ing; right and left juslification. Use with Gemini 10 or 10X, Epson MX with Graftrax, or the WX or FX Com

iJi-i' Organlicr NffJ Eo make a t>acl<L/p of your word

CIRCUIT BQARD ALLOWS

IDU TO DOWNLOAD

ssirnjiri mi mill 139 95

Prim a library listing'or reference

Che ij mm H Analyze your own games, master games, book games, and openings. Save, print, and waich your games jn a unique "cness mo^ie " M*mon« any board position and recall It after you have played through variations Disk 599-95. i-'.i if U\--*-\:— Teflcfiers—itore grades for 6 classes, up to 40 students each, 680 grades per student Print interim and final reports, class roster), and morel Disk $39.95

-4

Cardinal SoFtwora 13M6 Jtff Davli Hwy. Woodbrldje, VA BB191

CataFost available. Specify. Bull nest /LJll fillet, Gamei,

EOucoiionoi. CP/M Public Domain, Info. Call (7031 49I-4KU

Dllltlll

>!)!5

you still musttake

responsibility for your actions. BUPtlTHEBLAP OF BLEEP A random aphorism generalof.

HOW SMART ARE VOU7 This program will not answer the question.

As If all these programs weren't enough... This issue O( LOADSTAR also contains graphics, music, programming hints S tips, plus

subscriber bulletins and reviews.

LOADSTAR is a bonanza LEARN - programming techniques USE - useful programs ENJOY - games and novelties

P.O. Box 30007

Shreveport, LA 7II3&O007 |3J8|868-7247

PRINTER INTERFACE r

SCHEMATICS AND fIRMWARE LISTING Complin hi Dl plm

ORDER TOLL FREE 10 ft MON-SAT

800-762-5645

124.95

memorytodislt. DECISION MAKER ThlswiJI help. Out

send to: LOADSTAR

*- 0R1W. EDIT. UK! PRINT HI RE S I10WMMIS

CBHlU

Forthose that want to save "RAW"

Commodore-64 owners

CAD FLOWCHART

Disk 52*95

and what is not?

SHARE - experiences with other

grams on me disk directory in alphabetical order, duk»

question: Wh2t is used BINARY SAVE

of unprotected programs.

!S9 Si

AND illHI*! CAFITBIOGI fFPHWtH!

maintain a library of the directories on all of your

have only one arm].

Answers Shakespeare's

LOADSTAR comes on a double-sided diskette.

CAN OPENER

modore 15B5E or MPSSOl-and (he Banana. Four ex'ra

processing files7 No need to copy entire disks Make a bKkup copy of a single flit, copy a Me, put the pro

>19 ti

PflOGTMM THE PHPUIAR HDD Si HI! I EPROMS

W" to fl" high. Proportbnal ^padn^; automiiilc Center-

fonts available (S19 95 each) Tope or duk S49.95

Oiiltlli

bandits (even if ttiey

ROM BDMB

form lelTtrs or reports 15*1 •40*0-?Q31 Dlik559.M.

THE IAH NCR MACHINE™

Produces farge signs up to 13" tail by any length. Mak? borders o' widths up to W\ Eight sues of letters from

SLOT MACHINE Everyone hates

ii usrinES mm debugeinc

■ Calculate report columns

■ flexible structure, change record Hit, field numbrrH way» the file can be otdttttf, etc with eeie ■ Com-

A "board" strategy game [the 64 gets onarterasyouplayl.

BAM MAP 64

■!< SI

Enclosed is S9.95 for number J as shown above.

!E"H!- Wi ttctpt VISA. M'C. CHECK. MO, ,,i CDD Arid

Add

HM

lar iliippino ini hlodFing

II.DO inn In CDD

B&B MICROLABS isti) t*5-mst

; vsaAtuiEiCAiDi.


SIMPLE ANSWERS TO COMMON QUESTIONS Tom R. Halfhill Staff Editor

Each month, COMPUTED GAZETTE tackles some questions commonly asked by new Commodore 64/VIC-20 users and by people shopping for their first home computer.

contend for the computer's attention at once.) Interestingly, about a year ago Commodore is

sued a technical bulletin to dealers recommend ing the proper way to switch on various Commodore 64 systems. The bulletin stated the

exact opposite of what the VlC-1541 User's ■■ I'm confused! Your instructions concern ing powering up the 1541 disk drive indicate that the computer should be turned on first ["Simple Answers To Common Questions," August 1984], My VIC-1541 User's Manual

(published 1982) at the top of page six says the following: "it is important that you turn

on the devices in the correct order. The com puter should always be turned on last. As long as the computer is the last one to be turned on, everything will be OK." Which is

Manual says—the computer should be turned on first, not last. Here are the power-on se quences that the bulletin recommended for

various systems with 1541 disk drives and Commodore printers: 1) 64, 1541, 1525E. 2) 64, 1541, 1541.

3) 64,1541, 1541 or 1525E (only one or the other may be on). 4) 64, 1541, 1541, 1526.

fX. We've received a couple of similar letters

But again, let us repeat: With one-drive systems, in our experience it really makes no difference which device is turned on first. Why? Partly because of the unique way Commodore handles its Disk Operating System

quoting from that paragraph in the Commodore manual. However, there should be no cause for confusion. In practice, the order in which the

a computer to interact with a disk drive. With out DOS, a computer and disk drive couldn't

correct?

computer and disk drive are switched on al most never matters.

This is particularly true of one-drive sys tems without a printer. Occasionally we've heard of problems when certain printers are

part of the daisy chain (the chain of peripherals plugged into each other). Sometimes the com puter locks up when such a system is turned on in the wrong order. The Commodore 1526

printer had this problem, but it was temporarily recalled by Commodore because of internal bugs. Most printers cause no difficulties when

hooked into the daisy chain. We've also heard that multi-drive Com

modore 64 systems can be sensitive to the power-on sequence. (Of course, keep in mind

that any multi-drive system will lock up if the device numbers of the additional disk drives aren't changed; otherwise all the drives will 34

COMPUTEi's Gazette

October-19B4

(DOS). Briefly, DOS is a program which allows

communicate. Therefore, all computers hooked up to disk drives require some type of DOS.

Commodore's DOS is permanently stored inside the disk drive on a Read Only Memory (ROM) chip—which is why the 1541 is some times called an intelligent drive. But with Ap ple, Atari, IBM, and almost all other systems, DOS is stored as a program file on a floppy disk. DOS must be loaded from this disk into the computer's memory each time the system is turned on. This process is called booting up, be

cause in a sense the computer is pulling itself up by its own bootstraps. For example, with Atari computers you must turn on the disk drive before the com

puter and wait a few seconds for the drive to initialize, just like a 1541. But next you must

insert a disk that contains the DOS program— called a DOS disk or system disk—and only then


Complacency or curiosity? Move your children away from the passive nature of TV and turn them

on to the excitement and fun of in teractive learning with Dow Jones News/Retrieval1?

You probably thought Dow Jones News/Retrieval only provided busi ness and financial information.

Wrong. We've got something of

value for the whole family. With our 20-volume, 30,000 ar ticle Academic American Encyclo

pedia, Dow Jones News/Retrieval will pique your children's curiosity about the world and help them de velop new skills. The information they need for school is easy to ac

cess, always up-to-date, always ready. And kids love to use it!

There are timely news reports

from Washington, our nation and the world. You also get current schedules and rates from the Official Airline Guide™ Comp-U-Store, a convenient shop-at-home service; Cineman Movie Reviews; sporta highlights; weather reports and MCI

Mail—the new electronic mail ser vice that lets you send letters to

anyone, anywhere, even if he or she doesn't own a terminal.

Overall, you'll find a wide variety of high-quality data bases accessible quickly and easily with most per

sonal computers, To get your children involved, excited and turned on to the fun of learning, turn them on to Dow Jones News/Retrieval.

DQWJONES Copyright © 19S4 Dow Junes & Company^ Inc. All Rights Reserved. Dow Jcnra N'F^s/Ketiieval5 is a registered UBitemork of Do* Jones & Company, Inc.

FOR FULL DETAILS, CALL 800 345 8500, EXT.5 Alaska, Hawaii and foreign, call 1-215-789-7008, Ext. 5


Bought expensive software lately? Brace yourself.

computer does when it "wakes up" is load the

The Intelligent Software package for C-64™, VIC™, and PET/CBM™. $35 for everything. No 3-color ads, no shiny packaging, and [sorry] no games; just fifteen powerful, usefii programs that will put your Commodore to work right now, in your home or office; all on one risk at b near-unbelievable price. Includes: □n*6*»: A ccrnploa mii**eyed fneoVBctntJengUi data Base manager. Sen a- select [usne si rotstionei operators: =. >, <, AND, OR, NOT, wid card] on any field, perform computaudrfi en numeric fields. Any operation cer Eh performed on bII. or only selected rocorfte. Al fields completefy iBer-oafinEtts. Screen edfUig lor recordsCan be used for any number o' tasks, deluding occountB-receivrtjIa. rna*nfl lists, r>-

vontory control, axponsi* Bccount mantenerce. or os on electronic rolodan. Even if you use yoir Coimiodora tor not/wig eteo. ths proyom aioro mujht fusufy its expense. Word Pmwgri

A fijl'leaured menu-dnven word processor, deluding1 very

faat fte commands [nduJnao oak cstetog], screen ecftjnQ, tc*t bcauig, and fiJ cen tral over marore. spang, pegifl. udentauon. end (ustitaitoi [el conmands ntedded ntexej. " . . . we! done and ri£/ty functional . . provides an sxcelent alternative EC The rufi prcEd v^ni processors . . . tfts £ an exxfent buy HtftyrBcunmertied-"

— i\**iie Sortiwe GaMtta. "Provides good base fEaures." — Qnipote's Gazeae. Copycalc: flu electro™; spreadsheet. Tuts you" Commodore hid b visible belsncs sheet: ncludna screen editng "EncellertprogramforbuJgeting. esunsuiQ, or any matA-onentad use . . . wel worth the money. HiQhfy recommended " — MtctHte Software Gasotto.

Also» iiA.V-i I DaporcOan (irnorfocos VWP wiUi Qitobuao 111 create form letters, nvoces. maJno labels, other reports]: Bmbill BtKlutclan \nn.:>

-• I 1:1, i

statistics lor a baeeboil or Softball togue of up to 350 ployara, and generates reports

on a player, team, or the antre league, ndudtng standings], several W/P utilities. ■> ckilmg Indu (rdeies W/P'a text fJes). se.crol Database uUUes, ncLdng DHmsro* [fsc*tBtes mufa-fVe aaabaie wfAcaccns]. etso Otmckboek. Inventory. Paper rout*. Loan Analyst; Labeler, mere. Versions of the package are evariable for any and avary Commodore cciputer having a mmmnn of 13h RAM; al proo-ams w* tJtf suppcrt tape, ifc.r-k anJpmLer.

Price ndudos tlmn" , ■■■;)

switch on the computer. The first thing the

USA and Canada |encbso £5 fee For C.D.D.), CeM

rosidentsa*! St. Any iwoprogrDms HicBssctto. 530 Thm ud is the catatoa. you

may ordir docummtauon for ory one progrom ecpo'-otoly for S3 po31floid (deductiulc from later order). AvaileWti txily Iran:

Intelligent Software Box 3745-G, San Rafael, CA S4912

DOS program into memory. Then it's ready. The procedure for booting up an Apple or IBM system is very similar, except you don't have to switch on the disk drive first because it's powered by the computer.

There are three main advantages to Com modore's method of storing DOS on a ROM

chip inside the disk drive instead of loading it off disk. First, you don't have to wait around for the system to boot up. You just switch it on

and it's ready to go. Second, you don't have to fool around with system disks. Because DOS can take up a fair amount of space on a disk, many people leave it off most of their disks to make more room for other files. But then they have to shuffle through piles of disks to find a system disk whenever they have to boot up. And third, loading DOS into the computer con

sumes valuable Random Access Memory (RAM). This can amount to about 10K on an Apple, 5-11K on an Atari, and 24K on an IBM PC/PCjr.

Naturally, this leaves less room for your other programs.

As usual, though, there are tradeoffs. Perma nently storing DOS on a ROM chip has some disadvantages. The main drawback is that the

manufacturer can't revise DOS without making a new ROM chip. Let's say a serious bug is discov ered in Commodore DOS. To fix it, Commodore would have to halt production on the old ROM chips, modify the DOS program, burn a new

The Ultimate in Commodore' Computer Protection

master chip, start production on the revised ROMs, and finally substitute them for the old

The Griffinworks Fabric Dust Covers

could also trigger a supply shortage while the

• Anti-Stat

ROMs on the assembly line. Not only would this take weeks and cost thousands of dollars, it

• Dust and Water Repellent

• Won't trap heat or turn brittle like plastic • Security beige color will not attract attention Your Griffinwoiks computer cover will repel all liquids and allow

your components to breathe, (hereby eliminating trapped heat and moisture problems possible with vinyl or plastic covers. They are Uee from harmM static electricity and will not discolor over time like plastic or vinyl covera. When you are not using the cover just roll

It up and set it aside. No bulky hard covers 10 take up valuable work

space. And best ot all, The Grllflnworhs dust covers are more effi cient and less expensive than most other brands on Ihe market. CHECK SELECTION:

Qty. CMD-64 or ViC-20

S6.00

DBtasetta

S4.S0

1S41 DlBkDrlva

SS.00

1701 or 1702 Monitor

S9.95

Make check payable to:

P. 0. Box ■10(1 Lanett, al 36863

Please allow 3 weeks lor delivery.

Name

Address

City Slate _ Zip Code

people who already bought a disk drive would still be stuck with the faulty version of DOS. To fix it, they'd have to get the revised ROM chip, take apart the disk drive, pry out the old ROM,

and replace it with the new one. Consequently,

bugs which crop up in Commodore DOS usually go uncorrected—at least until the next model disk drive is introduced. When DOS is stored on disk, the process is a little easier. The manufacturer simply revises the DOS program, prepares a fresh master disk, and

saves the new DOS onto all system disks dupli Total

Ths Grif tin works

Amt.

drives were out of production, resulting in lost revenue and unhappy customers. Besides that,

cated from that day onward. Updates and improvements to DOS can be made just as easily. To avoid confusion, the revision number of DOS is advanced a notch. W


Charles Brannon Program Editor

HORIZONS: 64

Following my review of Simon's BASIC in this column, several readers responded. Not all agreed with some of my points. I stated that some of the commands are a little unnecessary, such as CENTRE A$ instead of PRINT TAB(19-

LEN(A$)/2);A$. Many readers are glad to have these extra commands. For example, LEFT and RIGHT, which scroll the screen left and right, seem pretty specialized, useful only for screen scrolling, but some readers have used these com

mands in new, ingenious ways. Some folks even convert BASIC programs from the GAZETTE into

Simon's BASIC for speed and special effects. However, some readers also lament that they cannot share their Simon's BASIC programs

with friends who lack the cartridge. Unfortu nately, it's unavoidable. With enough machine language, though, you can convert a Simon's BASIC program into a BASIC program everyone can use. We prefer this approach, since it makes

the program available to the widest possible audience. There is still no indication that there are enough owners of Simon's BASIC to justify the publishing of programs in Simon's BASIC— programs that would be useless to the majority of our readers. This may change, though, so we'll keep you posted. It turns out that some versions of Simon's

BASIC do not work on some models of the 64. Reader John Walker bought Simon's BASIC and

found that it would not run on his machine, but worked fine on a friend's. He went to a local computer store and was told to PRINT PEEK(65408). This returns a number that you can use to distinguish between the various 64

Kernal ROM versions. He was told if PEEK(65408) returns a 0 or a 3, then Simon's BASIC will work on your machine, but a 170 is

bad news for Simon's BASIC enthusiasts. Mr.

Kernal Knowledge We called Commodore and found that there are at least three versions of the Commodore operat ing system, a.k.a. the Kernal. The third and latest version has been around since the beginning of 1984. The SX-64 has a fourth, somewhat more radically changed, Kernal ROM. The genealogy of the 64 Kernal ROM is covered in detail in

"Commodore 64 ROM Generations," by Jim Butterfield, in the July 1984 issue of COMPUTE!.

We'll paraphrase some of it here for those of you who missed that issue. The differences between ROM versions are minor. In revision one, color

memory is always filled with white when you clear the screen. Revision two fills color memory with the current background color. What this means is that if you POKE to screen memory

without also POKEing a color byte (for example, press RUN/STOP-RESTORE and then POKE 1024,1), you will see a white character on re vision one, but on version two the character is invisible. This was an attempt to cosmeticatly eliminate the sparkle problem, which plagued the earlier machines. On the SX-64 portable, when the screen is

cleared, color memory is filled to the current cursor color, found at location 646. Programs which do not explicitly set color memory, or take advantage of the effect upon screen memory when you clear the screen, can give strange ef fects when running on a different version of ROM. It doesn't make sense to count on certain

undocumented side effects resulting from Kernal calls, since there is no guarantee that these side effects will be preserved on future ROM generations.

The other significant change is that when you load a program from tape on a revision one

Walker wrote Commodore and received a new Simon's BASIC cartridge that works fine on his computer. Commodore itself said that the prob

The screen blanks, then the load proceeds. On

lem is in the cartridge, not which version of the 64 you own. And Commodore seems to have

revision two, the 64 waits a few seconds for you to read what it has found, then it goes ahead and

fixed the problem.

64, the computer waits forever after displaying

"FOUND program name" until you press a key.

loads the program. COMPUT&'s Gazette

October 1984

137


When Commodore first marketed the 64, there were separate ROMs for the U.S. and Euro pean markets. In the United States, the NTSC standard is used for television broadcasts. Since

the RF modulator in your 64 is essentially a tiny television station, the 64 has to conform to the

local television standard.

A Universal Operating System The European television standard, called PAL, has 625 television scan lines, versus 525 for

NTSC. This results in a better quality picture. A NTSC screen has a 60 Hz rate (60 frames a sec ond), while PAL uses a 50 Hz rate. Since the computer has to synchronize itself with the tele vision display, the clock crystal runs at a dif ferent speed on European 64s than it does on U.S. models. The ROMs must also synchronize themselves with the proper speed, so that the software-supported RS-232 interface will run at the proper baud rate.

Instead of producing separate ROM sets, Commodore programmed a "universal" Kernal that determines which TV standard the hardware conforms to. A raster scan is set to interrupt on scan line 622. Since there is no scan line 622 on U.S. televisions, the interrupt doesn't happen, and the 64 assumes the NTSC standard. The

ROMs then make the necessary software adjust ments. Jim Butterfield warns that you can't count on the raster register to hold a zero value, since

on this ROM it has already'been used.

The various Kernal ROMs can cause some

programs to be incompatible with other 64s, but it is easy to write a program that is ROM in dependent. To paraphrase the Commodore repre sentative we talked to, "We don't like to

emphasize the differences between Kernal ROMs. You get users who can't format a disk and then blame it on which Kernal they have." The point is well taken. As a programmer, many times I've

wanted to blame the hardware for a bug in my program, but sooner or later, I find my mistake. Blaming the hardware should always be the last

resort. Too many people have returned portable radios for repair when the batteries have been in stalled incorrectly.

Problems With CP/M, Too With that in mind, there does seem to be a hard ware-related problem with both Simon's BASIC and the Commodore CP/M cartridge. A large New York users group, which has "undertaken

the mammoth project" of converting the best public-domain CP/M software to 1541 format, has suggested that CP/M will not work on some

newer model 64s. They are requesting feedback from CP/M owners to help identify the problem. 13B

COMPUTEI'S Gazette

Octobei 1984

If you want to aid them, they need to know: Do you have a working 64 CP/M system? If not, de scribe the problem. What number does PEEK(65408) return? What is your 64's serial number? Are the back slots silver or copper? If you want further information on their CP/M project, or wish to aid them in identifying the CP/M problem, write to: NYC VIC-20/C64 User Group (CP/M S1G) c/o NYACC P.O. Box 106

Church Street Station New York, NY 10008

Reader/contributor Art Hunkins has re

ported that the sound quality in the most recent 64s is much improved. For example, the release part of the sound envelope now cuts off cleanly, without an annoying sound residue. Volume

changes are smoother. Commodore explains it in terms of manufacturing, The SID chip, a Very Large Scale Integrated Chip (VLSI), has a much

higher circuit density than LSI chips such as the 6502. After a SID chip is produced, it is tested

and graded for quality. When the SID chip was

high in demand and low in availability, the tol erance for error was raised, letting more marginal chips squeak through. Now that the SID chip is cheap and plentiful, Commodore can afford to be more picky, and only the cream of the crop get

into production 64s. Naturally, the sound quality is better.

Commodore 64 video quality is also at an all-time high. Sparkle is just a bad memory. Sprites are clean and sharp, and colors are bright. There is still RF interference on some televisions,

but color smearing on ordinary TVs is much less of a problem.

Pascal For The 64 From the people who developed the PETSpeed BASIC compiler comes Oxford Pascal. PETSpeed was (and is) extremely impressive. It can compile any BASIC program, and fully supports integer

math. PETSpeed is truly fast, one of the few optimizing compilers available on 6502 systems. We haven't seen the 64 version of PETSpeed, but

have worked with the PET version. As might be expected, Oxford Pascal is an equally professional product.

It's not easy to implement a powerful Pascal system on a microcomputer, but Oxford Pascal is a good, usable language. When I first en countered Pascal, I was suspicious. Pascal, with its indented statements and mandatory semi

colons, smacked of rigidity. It seemed to be a

language that was not intended for program ming, but for teaching programming. But Pascal does not enforce "pretty printing"


or flowcharting. In fact, Pascal is very similar to BASIC in many ways. It has excellent control structures, which give a programmer more, not

language. This machine language program can

then be loaded and run just like any machine language program. The difference in speed can

less, flexibility when programming. I've always agreed that GOTO 100 was fairly meaningless

be phenomenal.

unless you looked at line 100. Witn Pascal, you never need to use GOTO. It's not so much that GOTO is illegal—it's available even in a struc

pile, unlike BASIC, there are some concessions

tured language like Pascal, but with so many luxurious features like IF..THEN..ELSE, REPEAT..UNTIL, WHILE, and CASE, you truly never want to use GOTO again. Pascal programs are inherently easy to read, thanks in part to these control structures. Which one of these examples do you preier? BASIC: FOR 1=100 TO 1 STEP-1:PRINT I:NEXT Pascal: FOR I:=100 DOWNTO 1 DO WR1TELN (I);

Since Pascal is designed to be easy to com you must make for the sake of fast, efficient compilation. Every time you want to use a vanable, you must declare its name and type (e.g., integer, floating point, character). The end of a line is not a statement terminator, since you can carry some statements across many program

lines. So even if you only have one statement on

a line, you must separate it from the next line by putting a semicolon at the end of the statement. Semicolons are the most confusing part of Pascal.

I wish someone would write a compiler clever enough to obviate them.

Modulation Another powerful feature of Pascal is that you can write programs in modules. (By the way, modular programming and structured program

ming are not necessarily the same thing.) Each module is a procedure, which you call by name, rather than the cryptic GOSUB 5128. You can

pass values as parameters to these procedures, rather than using variables. Variables within a

procedure can be local. A local variable within a procedure can have the same name as a variable

in the main program, or in another procedure, but there is no debugging nightmare of renaming variables used in two different parts of the program.

Procedures also make designing a large pro gram easier. Instead of trying to write and debug a huge, continuous program, Pascal lets you write and test modules separately, then bring

them together to form a program.

Compiling Vs. Interpreting Unlike BASIC, which is interpreted line-by-line as it is executed, a Pascal program must be com piled into machine language or pseudo-code (a high speed interpreted "virtual" machine lan guage) before you can run it. When BASIC is running a program, it looks at each character or command, interpreting, checking lor errors, and making decisions all along the way. With a com piler, some of these decisions (such as how much

memory to reserve for an array, oi the actual ad dress where a GOTO should jump to) are solved during the compilation process. A compiler also translates the program into a faster, simpler, more efficient language (called P-i.ode in most versions of Pascal), which is then executed by a

high-speed interpreter. A native code compiler translates your program directly into machine

BASIC was designed to be easy to learn and accessible to the masses (that's me and you). Pas

cal seems to have been designed by programmers for programmers. Because it lends itself to struc tured programming, it has become ideal for teaching programming. A teacher can find it hard to grade dozens of wildly different BASIC pro grams. Pascal is sometimes blamed for encourag ing conformity, but this is really a product of the educational programming environment. As it turns out, large companies which hire Pascal pro grammers out of college also prefer programmers

who write neat, well-documented, structured programs.

But we aren't programming for IBM, are we? Why would you want to program with Pascal on a microcomputer? One good reason is if you are taking Pascal in school. If you have a powerful

microcomputer Pascal, you can write and debug your programs at home, instead of having to wait for a terminal on the university's huge timesharing system. But most persuasive of all is that the microcomputer environment lets Pascal be more interactive than it is on these behemoth machines.

For example, it always seemed cumbersome to write a Pascal program with a line editor, suve it, compile it, link it, then run it. BASIC is so much easier—just type RUN. Well, Oxford Pascal lets you do the same thing. No more writecompile-link-execute. Just type RUN, and your program in memory is quickly compiled and run.

Oxford Pascal makes Pascal as "friendly" as BASIC in this regard. Another bonus from compiling, aside from the higher speed you get from an interpreter, is that some programming errors will be detected before the program is exe

cuted, saving you hours of debugging a flawed program.

In this interactive mode, Oxford Pascal does COMPUTE!! Gazelle

OctoOe. 19*4

138


not have the memory to fully support all the ad

Oxford Coinputer Systems (Software) Ltd. Hensington Road, Woodstock Oxford

vanced features of Pascal, but it has a separate disk-based compiler that supports every Pascal

0X7 1 JR England

feature you could ask for. Only the speed and memory of a microcomputer limit what Oxford

Distributed in the U.S by: Limbic Systems, Inc.

Pascal can do.

560 San Antonio Road

Since Pascal is compiled, I expected it to run

Suite 202

Palo Alto, CA 94306

extremely fast. However, although Oxford Pascal is zippy, it's not as fast as some BASIC compilers I've used. Pascal is a higher level language than BASIC, though, so you sacrifice some speed for programming power. The Oxford Pascal manual is short and tu torial. It isn't sufficient to learn Pascal with, but

is a good place to start, and serves as a reference

$49.95 (disk)

At press time, we learned that Commodore announced a discontinuation of the MCS-801

color dot-matrix printer, which was covered in this column last month. It appears that dealers never received it. •

while you're learning. There are some errors in the text and example programs, but not enough

to invalidate the manual. An errata sheet clears things up. BASIC is not the end-all of program ming languages, and if programming turns you

COMPUTETs Gazette Toil Free Subscription Order Line

on, you owe it to yourself to find a language you really feel comfortable with. I still prefer machine

800-334-0868 In NC 919-275-9809

language for the kind of programming 1 do, but there's a valid need for Pascal on microcomputers.

A Great Body

MUSICAL

CARTRIDGE CRACKER"

CHRISTMAS

ECA BACKUP™ and SUPER SAVER™

% DISC J^-

5EHD YOUR rR!EMD5THE LATEST I Pi COMPUTERIZED GREETINGS cxro.'

For The Commodore-64 Fully Personalized For Your Family Or Business Use • Ten Christmas Carols, Each With Its Own Full-Color

Bit-Mapped Graphic Scene. ... iin'l bom—it takes Iroinlngl

And mmputer (willed Trailing mum ikl eieiy minute ol work

yttldi tnoilmwn results1 Itwi Inutdiblf tfiicient ond Uglily penwioliiid IiIiuk programs sting Ik iateit in U.S. ami Sontl Mini's WtogtMi on now avail able iot jour tome computer. BSGINNES OR HUINED ATHLETE-10UU BENEFIT! • CohidnWS on optima! in&ridualiltd timril piojum f« gp to I5S asm • Cokulotti bwJt lot pernntoj!

• Hi dmly >ork«it tepeolid in o 90 iht ryils \il dtffntnl ettrnsei-u/'ii siHdii equlpi. • Grophi crogiti! fix eodi ukt for mors doliili oboul (hit homo romputer brwl-throujh oik joui iuli*nre deolar or send Im biothure

Jv.roi.it C«p.. 541 Sojth FouMh W»l, f',i.: -,!■:. i.17 SftOl

1*0

COMPUTE'S Gazette

OctoOw 1964

Master Disc -

$24.95

Ten Blank Discs (With Mailers) -

$29.95

WITH

PACKAGE INCLUDES EXPANSION BOARD

CARTRIDGE CRACKER™ SOFTWARE TO BACKUP MOST CARTRIDGES

3 ECA BACKUP™ SOFTWARE TO BACKUP

ELECTRONIC ARTS™ DISKS 4 SUPER SAVER1" SOFTWARE FOR FILE COPYING AND DISK TO TAPE COPYING 5 USERS MANUAL FOR ARCHIVAL USE ONLY IT IS ILLEGAL TO SELL OR DISTRIBUTE COPYRIGHTED SOFTWARE

for COMMODORE 64 $44.95 * SHIPPING

(California residents add 6% for sales tax.)

Be sure to include all needed personalization information, such as family member's names.

ORION ENTERPRISES 10221 Slater Ave., Suite # 103 fountain Valley, CA 92708

VISA AND MASTERCARD

ACCEPTED

3417 ROGER B. CHAFFEE BLVD. GRAND RAPIDS, Ml 49508 (616) 245-5061

ADD $3.00 SHIPPING + HANDLING

Ml RESIDENTS ADD 4% SALES TAX


VICreations Dan Carmichael, Assistant Editor

Simulating Hi-Res Animation Part 2 Last month we reviewed the basics of creat ing custom characters. This month we'll

63090

When using custom characters to animate in the

how much smoother the animation is. 5 PRINT"(CLRj

: rem 10

PLEASE WAIT...":A=7168:B=76 117

X,6:NEXT

:rem

READB:IFB=999THEN50

:rem

30

POKEA,B:A=A+1:GOTO20

:rem

107

50

POKE36869.255

:rem

108

PRINT"{HOME}(11

SPACES}"

89 71

;rem 118

210

FORA=STOSE:FORB=0TO7:POKEA,B:FORT=1TO 10:NEXTT:NEXTI3:POKEA, 32 :NEXTA POKE36869,240

FORX=ATOB t POKEX,0!NEXT s FORX-CTOCE:POKE

rem

172

rem

150

X,6:NEXT

:rem

89

500

READBiIFB=999THEN50

:rem

71

1000

DATA128,128,128,128,128,128, 128,128

2000

DATA64,64,064,064,064,064,064, 064

2010

;rem 128 DATA32,32,032,032,032,032,032,032

2030

DATA16,16,016,016,016,016,016,016

30

POKEA,B:A=A+1:GOTO20

:rem

107

50

POKE36869.255

:rein

108

70

POKES,0:FORA=STOSE:POKEA,0:POKEA-1,32s FORT=1TO50:NEXTT:NEXTA

100

117

FORX=ATOB:POKEX,0:NEXTjFORX=CTOCE:POKE

20

200

79:S=7680:C=38400;CE=38911iSE=8191

20

PLEASE WAIT...":A=7168:B=76

79:S=7680:C=38400:CE=38911:SE=8191

enter and RUN the program below. You'll see a vertical bar (a custom character) move across the screen. {Note: All programming examples in this article should be used with an unexpanded VIC.)

:rem

199

screen, but with one pixel increments. Notice

position, eight pixels, at a time. To illustrate this,

10

jrem

how this is done, enter and RUN this program, which moves the same vertical bar across the

normal fashion, action can be jumpy. This is be cause characters are usually moved one screen

PRINTn[CLR}

999

The secret of smooth animation is to move the character one row of pixels at a time. To see

show you how to simulate high-resolution animation using them.

5

DATA

POKE36869,240

63010

:rem

131

: rem

146

:rem

:rem

DATA128,128,128,128,128,128,128,128 :rem

Figure 1

231

32

:rem

Figure 2

89

107

Figure 3

•-

:

The vertical bar has been shifted to the right in each character. Shaded areas indicate pixels that are turned on. COMPUTE'S Gazette

October 19B4

141


Figure 4

Figure 5 In Figure 4, Ihe arrow starts the animation cycle.

In Figure 5, the arrow has been

shifted one row of pixels to the right.

2040

DATA8,008,008,008,008,008,008,008 :rem

116

2050

DATA4,004,004,004,004,004,004,004

2060

DATA2,002,002,002,002,002,002,002 srera DATA1,001,001,001,001,001,001,001

70

2070

:rem

63

:rera 85

2080

DATA 999

:rem

143

same screen position in succession. As each character is POKEd to the screen, it appears that the vertical bar is shifting one row of pixels to the right. To move the vertical bar to the next

screen position, a repeat of the first custom character is POKEd to the next successive space on the screen, and a blank space is POKEd to the previous one. This process is repeated, moving

Shifting Custom Characters

the vertical bar across the screen.

To simulate smooth animation, you need to de

Animating Large Custom Characters

sign more than one custom character. Each one will have to be shifted one row of pixels within its 8 X 8 grid. As an example, take a look at Fig

ures 1-3. These are three of the eight custom characters necessary to smoothly animate the

vertical bar. Notice how the vertical bar has been shifted one row of pixels to the right in each successive character. This shifting continues through all eight characters, with the eighth character having the vertical bar all the way to the right. In the case of the vertical bar, animation is

done by POKEing the first eight characters to the

Figure 6

Animating the vertical bar is easy because of the size (width) of the character. One complete cycle (eight POKEs) of animation could be done within the confines of one screen position. Only eight custom characters had to be designed to perform the animation.

But what do you do if the characters are

bigger and can't be moved a complete animation cycle within one screen position? Two screen po sitions must be used, and as many as 16 custom

characters have to be designed for the animation

Figure 7

The arrow has been shifted one more row to (he right and onto the next grid.

1ÂŤ

COMPUTES Gazette

October 1984


Figure 8

Figure 9

The animation cycle continues as the

arrow moves even further inio the adjacent grid.

the arrow from one custom character grid to the next. See Figures 4-9.

effect. Enter and RUN this program, which will move an arrow smoothly across the screen. 10

PRINT"jCLR}

PLEASE WAIT..."iB=7168:S=7

12

C=38400:CE=38911

15

FORA=MTON:POKEA,0:NEXT:FORX=CTOCE:POKE

680:SE=8191:Z=999:M=7168:N=7679

:rem

6

:rem 231

X,6:NEXT

:rem

20

READX:IFX=ZTHEN50

:rem

30

FOKEB,X:B=B+1:GOTO20

s rem

72 34

132

50 POKE36869,255:PRINT"(HOME}(12 SPACESj" ;rem

60 70

138

POKES,0:POKES,1 :rem 93 FORA=2TO13STEP2:POKES,A:POKES+1,A+1:NE XT

:rem

246

80

POKES,32:S=S+1:IFS=>8191THENPOKE36869,

90

GOTO60

240:END

63000

jrem 159 jrem

8

DATA0,008,012,254,254,012,008,000 :rem

147

63001

DATA0,004,006,127,127,006,004,000

63002

DATA0,002,003,063,063,003,002,000

:rem

:rem

144

133

63003

DATA0,000,000,128,128,000,000,000

63004

DATA0,001,001,031,031,001,001,000

:rem

:rem

128

119

63005

DATA0,000,128,192,192,128,000,000

63006

DATA0,000,000,015,015,000,000,000

63007

DATA0,128,192,2 24,224,192,128,000

63008

:rem 172 DATA0,000,000,007,007,000,000,000

:rem :rem

:rem

154 121

125

63009

DATA0,064,096,240,240,096,064,000

63010

srem 174 DATA0,000,000,003,003,000,000,000 :rem

110

63011

DATA0,032,048,248,248,048,032,000 :rem 167

63012

DATA0,000,000,001,001,000,000, 000 :rem

108

63013

DATA0,016,024,252,252,024,016,000

63020

DATA

999

:rem

151

:rem

192

The arrow is seven pixels wide. Because of this width, animation is accomplished by moving

In Figure 4, the arrow is contained within one custom character grid. In Figure 5, it's still

within one grid, but, as with the vertical bar, it's been shifted one row to the right. Figures 6 and 7 depict two different custom characters side-byside. As you can see, the arrow is again shifted one pixel row to the right. However, to do this we've moved it onto the next custom character grid. Figures 8 and 9 continue the process, with

the arrow being shifted one more row to the right, further onto the next grid. This process continues until the arrow is completely within the grid on the right, and the cycle begins again. As you can see, moving the arrow one pixel at a time necessitates moving part of it into the next screen position. In some cases, as many as

two custom characters may be needed to create one arrow. Your custom characters will have to be designed with this in mind, and in some cases

one character will have to be designed using two grids simultaneously. And if you want to move a character smoothly up, down, left, and right, you may need to combine four different custom characters.

Speed and Fine Animation One drawback to simulating hi-res animation is speed. Because so many custom characters are in

volved, animation is sometimes sluggish. There are ways, however, to speed up the movement. One thing you can do is PRINT the custom

characters, rather than POKEing them to screen memory. Printing is usually faster (you'll have to

remember which characters you redefined if you use this method). Or try moving the characters two rows of pixels at a time instead of one. This will not only increase the speed, but will also re

duce the number of custom characters needed,

and the amount of memory used. QV COMPUTE!'* Gazalta

October 19B4

143


HINTS&TIPS Recovering

Scratched Programs Daryl Biberdorf

If you've discovered a clever timesaving technique or a brief but effective programming shortcut, send it to "Hints & Tips," c/o computed gazette. If we use it,

filename or incorrectly opened the command channel, your program may still be there. But chances are, you did not make a mistake. The

we'll pay you $35. Due to the volume of items submitted, we regret that we cannot always reply in dividually to submissions.

should see the program you thought you just

file is gone. Now type LOAD '"",8 and LIST. You

scratched. Before you do anything else, save the program.

Perhaps you loaded a program you've been working on, made a few changes, and decided to save it. But first you got the disk directory (LOAD "$",8) and scratched the old version

(OPEN 15,8,15, "S0:oldname": CLOSE15). Then it hits you. The newest version of the program has been destroyed, overwritten by the directory. And you don't have the older version, you just scratched it.

What do you do when you've scratched the only copy of a program you were working on? There are utility programs which allow you to go in and restore or unscratch a scratched pro

gram. Even if you have such a program, you might want to try something faster and easier.

Loading A Scratched Program When you scratch an important program, don't rum off your computer or disk drive. Try this technique for rescuing your program.

First, check the directory: LOAD "$",8 followed by LIST. If you used the wrong 1M

COMPUTE'S Gazette

October 198*

This trick may not always work, depending

on what you did before and after scratching the file. Your disk drive has a built-in microprocessor which performs the usual functions of loading, saving, and updating the directory. But it also

remembers which program was the last to be

accessed. When you enter LOAD "*",8 the com puter looks for the previous program. It can even

find a program which was just scratched, if it was the last program to be saved or loaded. Scratching a file does not really erase it. It simply removes the program name from the

directory and frees up some space on the disk for future SAVEs, If you scratch a file you just saved or loaded, it's still there and can be rescued with the asterisk. But if you've done something with another file, it becomes the previous program and this method will not work. If you accidentally scratch a machine lan guage file you were working on, you can recover

it with LOAD "*",8,1 but to save it requires an

ML monitor (and you have to know the starting and ending addresses). <Bf


NEWS

PRODUCTS Dot Matrix Thermal Printer The HUSH 80, an 80-column, 80 cps dot matrix thermal

printer that retails for $159.99, has been introduced by Ergo Systems, Inc. The HUSH 80 comes with interface and cable, and features bidirectional printing. Graphics are printed at 4,800 dots per square inch. Three models are available, each of which can be equipped with a built-in rechargeable bat tery pack. The HUSH 80P ver sion has a Centronics parallel interface, while the HUSH 80S provides a serial RS-232

interface. The printer weighs 28 ounces, and measures 1.63 X 5.5 X 2,8 inches. The unit was manufactured to fit within a standard briefcase. The print line can be set for double size characters at 40 per line, or halfsize characters at 160 per line. Line spacing can be pro grammed to 4.5, 6, or 9 lines to the inch. All HUSH 80 models typi cally include the interface, inter face cable, 100-foot roll of

thermal paper, and a nine-volt AC wall transformer with power cable. Ergo Systems, Inc.

1360 Willow Road Menlo Park, CA 94025 (415)322-3746

The HUSH 80, a bidirectional dot matrix thermal printer from Ergo Sys tems, Inc., retails for $159.99.

VIC, 64 Graphics Tablet Personal Peripherals, Inc. has introduced Super Sketch, a graphics tablet for use with the VIC-20 and Commodore 64. Software that expands the ca pabilities of the tablets is also available.

Sketch-Master, the VIC ver sion, allows the user to create simple line art with a number of computer automated graphics capabilities. Graphics-Master,

for the 64, provides all SketchMaster features, plus a number of advanced capabilities and more sophisticated menu selections. Included with each version

of Super Sketch is a software cartridge and a starter kit of

drawings that can be traced from the pad. Suggested retail price for each version is $59.95. Personal Peripherals, Inc. Merrick Park 930 North Beltline Road Suite 120 Irving, TX 75061 (214) 790-1440 COMPUTE'S Sazette

October 1984

145


NEWS&PRODUCTS

Terminal Software For 64 Madison Computer has intro

duced McTerm 64, a terminal program for the Commodore 64. Features include an on screen clock, word wrap, greater than 24K buffer, and auto linefeed options. Baud rate can be set at either 300 or 1,200. The program can be preset to

send files at a later time.

Depending on the type of modem used, McTerm 64 can

store and dial up to ten phone numbers, and can automatically answer the phone. McTerm 64, available on disk, retails for $49.95. Madison Computer 1825 Monroe

Under educational titles, PandaSoft offers USA Math Star ($19.95), which teaches addi tion, subtraction, multiplication, and division; History 1 & 2 and

Authors ($12.95 each), two quiz games; Weights 2 in 1 ($9.98), which teaches both metric and

English weights; and Missing Letter ($9.98), a word and letter quiz.

Kilowatt Miser ($9.98), an energy saving utility program,

The Budgeter ($19.95), a budget program, and M.D.B. ($39.95), a master data base, are also offered. Many of the programs are

also available for the VIC-20, including Kilowatt Miser ($9.95

disk, $5.95 cassette). General Catalog ($9.95 disk, $5.95 cas sette), a data base, is also avail able for the VIC. PandaSoft Computer Software

Madison, Wl 537U

2732 Rozzelle Ferry Road

(608) 255-5552

P.O. Box 7647

Games, Education, Home Applications Software For C-64, VIC-20 PandaSoft has announced a number of game, educational,

and home applications software for the Commodore 64 and

VIC-20. Disk games for the 64 in

clude: Pro Golf Challenge ($25.95), a golf graphics game; Legend of Starship Terra ($14.95),

a futuristic adventure; and Re

Charlotte, NC 28227 (704) 394-8796

64 Printer Interface Turboprint/GT, a graphic and text serial-to-parallel printer interface for the 64 has been in troduced by Telesys. The interface prints en hanced Commodore graphics,

including reverse characters, and has a line buffer which doubles text printing speed on printers without on-board memory.

An optional Turboprint/ B16 or B32 plug-in printer buffer is also available.

Retail price for the interface is $99.95. The 16K buffer retails

($19.95), a graphics arcade and logic program.

for $99.95, the 32K buffer for

COMPUTE! s Gazette

October 1984

(415) 651-2970 (800) 252-4733

VIC, 64 Weather Forecasting Viasala Inc. has introduced HAWS, a software package that

helps VIC-20 and Commodore 64 owners forecast the weather.

The HAWS {Home Automatic Weather Station) package in cludes weather sensors, plus a software program on either cas sette or disk. The weather sensor comes

with a cable which plugs into the user port of the VIC or 64. HAWS can collect data, graphically display weather trends, and output collected data to standard printers. The

data gathered by the HAWS sen sor can also be used within user-written programs.

HAWS retails for $199.95.

venge of the Phoenix/Time Storm

146

Telesys

43334 Bryant Strcei Fremont, CA 94539

$129.95.

Viasala Inc. 2 Tower Office Park Wobum, ma oisoi (617)933-4500 COMPUTERS GAZETTE welcomes

announcements of new products for VIC-20 and Commodore 64 computers, especially products aimed at beginning to intermediate users. Please send press releases and photos well in advance to: Tony Roberts, Assistant Managing

Editor, COMPUTERS GAZETTE, P.O. Box5406, Greensboro, NC274O3.

New product releases are selected from submissions for reasons of timeliness, available space, and general interest to

our readers. WeregTCt that we are unable to select all neiv product submissions for publication.

Readers should be aware

thai we present here some edited version of material submitted by vendors and are unable lo vouch for Us accuracy at time of publication. 9


What Is A Program A computer cannot perform any task by itself. Like a car without gas, a computer has potential, but without a program, it isn't going anywhere.

Most of the programs published in COMPUTED GAZETTE for Commodore are written in a computer language called BASIC. BASIC is easy to learn and is built into all VIC-20s and Commodore 64s.

BASIC Programs Each month, COMPUTEI's GAZETTE for Commodore ublishes programs for both the VIC and 64. To start out, type in only programs written for your machine, e.g., "VIC Version" if you have a VIC-20. Later, when you gain experience with your com puter's BASIC, you can try typing in and converting

certain programs from another computer to yours. Computers can be picky. Unlike the English nguage, which is full of ambiguities, BASIC usu

ally has only one "right way" of stating something. Even' letter, character, or number is significant. A common mistake is substituting a letter such as

O for the numeral 0, a lowercase I for the numeral 1, or an uppercase B for the numeral 8. Also, you must enter all punctuation such as colons and commas just as they appear in the magazine. Spacing can be important. To be safe, type in the listings exactly as they appear.

Braces And Special Characters The exception to this typing rule is when you see

the braces, such as "{DOWN}". Anything within

to turn off your computer, then turn it back < This will erase whatever program was in memory, so alxvays SAVE a copy of your program before you RUN

it. If your computer crashes, you can LOAD the program and look for your mistake. Sometimes a mistyped DATA statement will

cause an error message when the program is RUN. The error message may refer to the program line

that READs the data. The error is still in the DATA statements, though.

Get To Know Your Machine You should familiarize yourself with your com

puter before attempting to type in a program. Learn the statements you use to store and retrieve programs from tape or disk. You'll want to save a copy of your program, so that you won't have to type it in every time you want to use it. Learn to use your machine's editing functions. How do you change a line if you made a mistake? always retype the line, but you at least need

know how to backspace. Do you know how enter inverse video, lowercase, and control i

acters? It's all explained in your computer' manuals.

A Quick Review 1. Type in the program a line at a time, in Press RETURN at the end of each line. Use space or the back arrow to correct mistakes

2. Check the line you've typed against the line in the magazine. You can check the entire program

a set of braces is a special character or characters that cannot easily be listed on a printer. When

again if you get an error when you RUN the

you come across such a special statement, refer

3. Make sure you've entered statements in braces as the appropriate control key (see "How To Type COMPUTEI's GAZETTE Programs" elsewhere in the magazine).

to "How To Type In COMPUTEVs GAZETTE

Programs/',^

About DATA Statements Some programs contain a section or sections of DATA statements. These lines provide information needed by the program. Some DATA statements contain actual programs (called machine language);

others contain graphics codes. These lines are espe cially sensitive to errors. If a single number in any one DATA statement is mistyped, your machine could "lock up," or 'crash." The keyboard and STOP key may seem "dead," and the screen may go blank. Don't panic no damage is done. To regain control, vou have

program.

We regret that we are not able to respond to individual inquiries about programs, products, or services appear ing in COMPUTE!^ GAZETTE for Commodore due to increasing publication activity. On those infrequent occasions when a published program contains a typo,

the correction will appear in the magazine, usually within eight weeks. If you have specific questions about items or programs which you've seen in COMPUTEf's GAZETTE for Commodore, please send them to Gazette Feedback, P.O. Box5406, Greensboro, NC27403.


•#.-

W/WMfc Many of the programs which are listed in COM PUTE!'s GAZETTE contain special control characters (cursor control, color keys, inverse video, etc.).

w/MM

the CTRL key.while typing the letter in the braces. For example, {A} would indicate that you should press CTRL-A. You should never have to enter

To make it easy to know exactly what to type when entering one of these programs into your com

such a character on the VIC-20, but if you do, you

puter, we have established the following listing

TURN and cursor back up to the position where the control character should go), press CTRL-9 (RVS ON), the letter in braces, and then CTRL-0

conventions.

Generally, any VIC-20 or Commodore 64 program listings will contain words within braces

which spell out any special characters: {DOWN} would mean to press the cursor down key. {5

SPACES \ would mean to press the space bar five times.

To indicate that a key should be shifted (hold

down the SHIFT key while pressing the other key), the key would be underlined in our listings. For example, S would mean to type the S key while holding the shift key. This would appear on your screen as a "heart" symbol. If you tind an underlined key enclosed in braces (e.g., {10 N }), you should type the key as manv times as

indicated (in our example, you would enter ten shifted N's). If a key is enclosed in special brackets, fc^, you should hold down the Commochre key while pressing the key inside the special brackets. (The Commodore key is the key in the lower left corner

of the keyboard.) Again, if the key is preceded by a number, you should press the key as many times as necessary.

Rarely, you'll see a solitary letter of the al phabet enclosed in braces. These characters can

be entered on the Commodore 64 by holding down

148

COMPUTED Gazaito

October 1984

would have lo leave the quote mode (press RE

(RVS OFF).

About the quote mode: You know that you can move the cursor around the screen with the CRSR

keys. Sometimes a programmer will want to move

the cursor under program control. That's why youseeallthe{LEFT}'s, {HOME}'s, and

{BLUJ's in our programs. The only way the com puter ca'n tell the difference between direct and programmed cursor control is the quote mode.

Once you press the quote (the double quote, SHIFT-2), you are in the quote mode. If you type something and then try to change it by moving

the cursor left, you'll only get a bunch of reverse-

video lines. These are the symbols for cursor left. The only editing key that isn't programmable is

the DEL key; you can still use DEL to back up and

edit the line. Once you type another quote, you are out of quote mode.

You also go into quote mode when you INSerT spaces into a line. In any case, the easiest way to gel out of quote mode is to just press RE TURN. You'll then be out of quote mode and you

can cursor up to the mistyped line and fix it. Use the following table when entering cursor

and color control keys:


: Proofreader from memory, so you'll have to LOAD and RUN it again if you want to type is a short error-checking program that hides itself in memory.

When activated, it lets you know immediately after typing a line from a program listing if you have made a mistake,

lease rend these instructions carefully before typing any programs in COMPUTERS Ca7.ette.'.:;

Preparing The Proofreader

another listing. SAVE to disk does not erase the Proofreader. Since the Proofreader is a machine language program stored in the cassette buffer, it will be erased during a tape SAVE or LOAD. If you intend to type in a program in more than one sitting or wish to make a safety SAVE, follow this

procedure: 1. LOAD and RUN the Proofreader. 2. Disable it by pressing RUN/STOP-RESTORE. 3. Type the following three lines in direct mode

1. Using the listing below, type in the Proofreader. The same program works nn both the VIC-20 and Commodore Be very careful when entering Hie DATA slate men is don't type an ! instead of a 1, an O inslead of a 0, ex commas, etc.

2. SAVE the Proofreader on tape or disk at least twice before running it for the first time. This is very important because the Proofreader erases this part of itsetf when you first type RUN. 3. After the Proofreader is SAVEd, type RUN. Il will

check itself for typing errors in Ihe DATA statements and

(without line numbers):

ASa"PROOFREADER.T":B$=*(10 SPACES]"jFO RX=1TO4:AS=AS+B¥:NEXTX

FORX=886 TO 1016tA5=A$+CHRS(PEEK(X)):S EXTX

OPEK1,1,1,AS;CLOSE1

After you type the last line, you will be asked to press RECORD and PLAY. We recommend you start at the begin

warn you if there's a mistake. Correct any errors and SAVE

ning of a new tape.

the corrected version. Keep a copy in a safe place — you'll need it again and again, every time you enter a program from COMPUTEI's Gazette. 4. When a correct version of the Proofreader is RUN, it

You now have a new version of the Proofreader (PROOFREADER.T, as renamed in the above code). Turn

activates itself. You are now ready hi enter a program listing. Py_ -If you press RUN/STOP-RESTORE, Ihe Proofreader is dis abled. To reactivate it, just type the command SYS 886 and press RETURN.

Using The Proofreader AH VIC and 64 listings in COMPUTE!^ Gazette now have a checksum number appended to (he end of each line, forexample ":rern 123". Don't enter this statement when typing in a program. It is just for your information. The rem makes the number

harmless if someone does type it in. It will, however, use up memory if you enter il, andit wil! confuse the Proofreader/ even if you entered the rent of the line correctly. When you type in a line from a program listing and

your computer off and on, then LOAD the program you were working on. Put the cassette containing PROOFREADER.T into the tape unit and type: OPENhCLOSEl

You can now get into the Proofreader by typing SYS 866. To test this, PRINT PEEK (886) should return the num ber 173. If it does Hot, repeat the steps above, making sure that AS (PROOFREADER.T) contains 13 characters and that B$ contains 10 spaces. The new version of Automatic Proofreader will load itself into the cassette buffer whenever you type OPEN1:CLOSE1 and PROOFREADER.T is the next program on your tape. It will not disturb the contents of BASIC memory.

press RETURN, the Proofreader displays a number at the

Automatic Proofreader For VIC And 64

top of your screen. This checksum number must maldi the.

100 PRINT"[CLR}PLEASE WAIT...":FORI=886TO

you typed fhe line differently than (he way it is listed. Im

110

checksum number intheprinted listing. If it doesn't, it means mediately recheck your typing. Remember, don't type the rem statement with the checksum number; it is published only so you can check ii against the number which appears on your screen.

The Proofreader is not picky with spaces. It will not notice extra spaces or missing ones. This is for your conven ience, since spacing is generally not important. But occasion ally proper spacing is important, so be extra careful with spaces, since the Proofreader wil! catch practically everything Jelse th.it can go wrong.

There's another thing to watch out for: if you enter the line by using abbreviations for commands, the checksum will not match up. But there is a way to make the Proofreader

1018:READA:CK=CK+A:POKEI,A:NEXT IF CKO17539 THEN PRINT" (doWN)yOU MAD .B AN ERROR":PRINT"IK DATA STATEMENTS. " l END

120 SYSS86:PRINT"tCLRj[2 DOWN}PROOFREADER ACTIVATED.":NEW

886 DATA 173,036,003,201,150,208 892 DATA 001,096,141,151,003,173 898 DATA 037,003,141,152,003,169

904 DATA 150,141,036,003,169,003 910 DATA 141,037,003,169,000,133 916 922

DATA 254,096,032,087,241,133 DATA 251,134,252,132,253,008

928 DATA 201,013,240,017,201,032 934 DATA 240,005,024,101,254,133 940 DATA 254,165,251,166,252,164

check it. After entering the line, LIST it. This eliminates the

946 DATA 253,040,096,169,013,032

abbreviations. Then move the cursor up tn the line and press "ETURN. It should now match the checksum. You cart check

958

hole groups of lines this way.

pectal Tape SAVE Instructions When you're done typing a listing, you must disable the Proofreader before SAVEing the program on tape. Disable the Proofreader by pressing RUN/5TOP-RE5TORE (ho!d

down the RUN/STOP key and sharply hit the RESTORE key). This procedure is not necessary for disk SAVEs, but you must disable the Proofreader this ivay before a tape SAVE.

$7

952

DATA 210,255,165,214,141,251

DATA 003,206,251,003,169,000

964 DATA 133,216,169,019,032,210 970 DATA 255,169,018,032,210,255 976 DATA 169,058,032,210,255,166

982

DATA 254,169,000,133,254,172

988 DATA 151,003,192,087,208,006 994 DATA 032,205,189,076,235,003 1000

DATA 032,205,221,169,032,032

1006 1012

DATA 210,255,032,210,255,173 DATA 251,003,133,214,076,173

1018

DATA 003

1


655

POKETL,32iPOKETL+Q,32iPOKECL,46iPOKEC

L+Q,47iPOKECL+CM,4 j POKECL+CM+Q,4

Bug-Swatter:

Modifications And Corrections

■rem

836 PRINT-APPROACH.131

SPACES}";

81

:rem 41

• "Screen-80" (September) works as listed, but the information about using sprites contains an error. Screen memory (normally at 10242023) is followed by the eight sprite pointers

(normally at 2040-2047, or beginning of screen memory plus 1016). Screen-80 uses a high-

• Program 2, "Change Disk ID," from "Disk Tricks" (September) changes the disk ID in the directory header, but does not actually change the ID on individual disk tracks and sectors. This program was intended to solve the problem of duplicate disk IDs, as explained in the article. It

resolution screen and moves the equivalent of screen memory to 53248, which means the sprite pointers move to 53248 + 1016, not 53248 + 2040 as stated in the article. Line 60 of the sprite pro

gram on page 50 should be changed accordingly: 60

POKE

53248+1016,0

:rem 234

does not solve this problem. When a disk is formatted with the NO: (new)

• Readers Joseph Maniscalco and Amir

command, the disk ID is written on every sector

Findling have informed us that although the 64

of every track. In addition, a directory header with the disk name and ID is created. When a file is accessed, the disk operating system (DOS) gets its information from the individual sectors, not from the header. The Change Disk ID pro gram changes only the header. Writing to in dividual tracks and sectors (to actually change the ID) would require reprogramming the disk drive. If you have disks with duplicate IDs, you can eliminate the problems by either 1) copying all important files to a separate disk and then reformatting the problem disk with a unique ID, or 2) initializing the disk, with the 10: command,

every time you swap disks. Since the program makes a cosmetic change

to the directory, it does not destroy any data on the disk, and subsequent READ/WRITE opera

tions should work without problems. Readers who have used the Change Disk ID program can discover the original ID with this short program: 10

T=*18iS=0iREM

20 30 40 50

OPEN2,6,2,"#"iOPEN15,8,l5 PRINT#15,"I0" PRIHT#15,"U1";2;0;T;S FORJ-22TO23:PRINT#15,MM-R";CHB$(J);CHR

TRACK

AND

SECTOR

§(0)iGET#15,ZSiADS=AD$+Z?iNEXT 60

CLOSE15tCLOSE2

70

PRINT"ID=";AD$

This program reads the true ID from track 18, sector 0. After discovering the true ID, you can use the Change Disk ID program to change the ID back to what it should be. • When the program listing for "Treasure Hunt/64" (September) was made, line 655 was garbled. In addition, line 836 was accidentally

omitted. Here are the corrections: 150

COMPUTE'S Gazette

OctoOer 1964

version of "Balloon Blitz" (August) runs without

errors, it has a slight glitch in the joystick reading routine. Pushing the joystick to the southeast

(down and right) will cause a bomb to be dropped. Changing line 14 to 14 IF A>-117 THEN GO TO 3

will fix the problem. • The VIC version of "3-D Tic-Tac-Toe" 0une) contains some color codes accessible on

the 64 but not on the VIC. This happened when the game was translated and does not adversely affect the program, although the Automatic

Proofreader checksums will be incorrect, In lines 300, 320, and 590, rather than pressing the Com modore key and one of the numbered (color)

keys, VIC users should press CTRL and the in dicated color key. • "Props" (May) runs as listed, but some readers have encountered an error message for lines 49000 to 49308. This is due to line 49151 where variable CJ is set to zero and then a dif

ferent variable (CK) is used as a checksum. If line 49151 is entered as listed, the error message should not occur. • Levitating in the VIC version of "Castle Dungeon" requires pressing the L key. Reader Michael Bank thinks it is more convenient to use

the joystick button and suggests the following modification: 26 BN= PEEK(37137)AND32: IF BN=0 THEN LS-ls GOSUB82

SpeedScript Update: • The VIC version of SpeedScript included on the May GAZETTE DISK scrambles the first five


characters of all files. Reader Jon Harmon has discovered that text memory and a few bytes at the end of program memory overlap. To fix this, follow these steps: First, foad (but do not run)

VICSPEEDSCRIPT from the May GAZETTE DISK. Next, POKE 4627,16: POKE 4989,21 and save the new version to disk. The problem should be solved.

you have the May GAZETTE DISK Version, POKE 4789,239), and then save the new version to disk. Readers should note this modification applies only to the portable SX-64, not the Commodore 64.

• "SpeedScript Revisited" (May) included a modification to allow printing to an RS-232 printer. The modification applied only to the VIC

• The July "Bug-Swatter" reported on hard ware incompatibilities between the VIC-20, Datassette, and the Commodore 1526 printer. The solution (SYS 64490 after cassette opera tions) has been incorporated into the original

0anuary) VIC version of SpeedScript by Reader Brian Mason. First, load (but do not run) the

original VIC version. Next, POKE 8560,234: POKE 8561, 215: POKE 8562,96 and save the new version. This replaces the disk access com mand (Control/up arrow) with the appropriate SYS. VIC tape users should hold down the CTRL key and press the up arrow key, after VIC SpeedScript tape saves or loads. The serial bus

will become available for use with a 1526. The

version of SpeedScript. Readers Clifford Jensen, Lee Folgedalen, and Robert Latham have adapted

the 64 version for use with such printers. First, load (but don't run) SpeedScript. Then, if you have the January version, POKE 5262,2 (for the May GAZETTE DISK version, POKE 5337,2) and save the new program to tape or disk.

Before running SpeedScript, POKE 660,0 and POKE 659,6 (Baud rate of 300) or POKE 659,3 (Baud rate of 110). Put an [a] (press CTRL-£ then "a" and you'll see a reverse "a") at the top of the file, and to print, press SHIFT-CTRL-P followed by a 2 (device 2) then another 2 (secondary ad dress 2).

equivalent POKEs for the May GAZETTE DISK ver sion are 8572-8574, although the problem with 1526 printers does not occur with disk drives.

• Several readers have inquired about a Spelling Checker program for SpeedScript. Such a program is not feasible, because it would require

• Several readers who own a portable SX-64 have indicated that SpeedScript disk access—

words from a dictionary. However, Robert Murray has found that the commercial program SpellRight Plus for the 64 from Professional Software, designed for use with WordPro3 + /64, also works

LOADs, SAVEs, and directories—can cause the computer to lock up. Because SpeedScript uses a

raster interrupt to form the window at the top of the screen, the interrupt registers have to be reset before disk or printer operations.

Rodney L. Barnes disassembled the program and discovered that before disk operations,

users to type in hundreds, if not thousands, of

with SpeedScript. He suggests removing all

formatting commands (reverse-video characters)— header, footer, spacing, and others—before run ning the program.

SpeedScript stores a 255 ($FF), the usual value on

We appreciate receiving both corrections and

a Commodore 64, in the CIA interrupt register at 56333 ($DC0D). Bit 4 of this register enables tape

them to:

suggested modifications from readers. Address Bug-Swatter

operations. Because the SX-64 has no Datassette port and no provisions for tape use, storing this value in the CIA register can cause extraneous

c/o COMPUTED GAZETTE P.O. Box 5406 Greensboro, JVC 27403

interrupts, interfering with the serial I/O. To fix this, load (but don't run) the January version of SpeedScript into your SX-64, POKE 4714, 239 (if

Please indicate the type of error you have found,

The Tomb

Program 1: The Tomb (VIC Version)

(Article on page 58.)

0

PRINT"tCLR}":POKE36879,10:GOTO3000:PH=0

1

GOSUB2000:S=7680:C=38400!DX=1:DY=1:EX(1

2

Q=22:EY(1)=H:EY(2)=10:EY{3)=17:POKE816

3

POKES+Q*DY+DX,33:POKEC+Q*DY+DX,4

4

FORZ=1TO3iPOKES+Q*EY(Z)+EX(Z),36:POKEC+ Q*EY(Z)+EX(Z),5iNEXT :rem 84

as well as the line number. (Si

iSC=0:S=7680

BEFORE TYPING... Before typing in programs, please refer to "How To Type COMPUTERS Gazette Programs," "A Beginner's Guide To Typing In Programs," and "The Automatic Proofreader" that appear before the Program Listings.

trem

H10iEX(2)=13iEX(3)-2 2,32:POKE8139,32!POKE7726,32

irem :rem irem

COMPUTE'S Gazette

236

16 129 103

October 1984

151


5

POKE8185,37:POKE38905,7

trem

165

:rem

218

11

TR=500

12

POKE36878,15

18

POKE36875,140:FOR

19

POKE36875.0

20

POKE37154,127:P=PEEK(37152)AND128:J0=-

21

(P=0):POKE37154,255 :rem 105 P=PEEK(37151)iJl=-((PANDS)=0)sJ2=-((PA

:rem 52 S=1TO25sNEXTsrem

2

:rem 48

22 CX=J0-J2:CY=J1-J3 :rem 151 23 IFCX=0ANDCY=0THEN80 irem 111 24 IFPEEK(S+Q*(DY+CY)+(DX+CX))=35THEN80 srem 25

51

POKES+Q*DY+DX,32:DX=DX-t-CX:DY=DY+CY:IFP

EEK(S+Q*DY+DX)=36THEN4000

4001

:rem

166

POKE

36878,15sPOKE36876,200sFORL1=25

0

150STEP-17

TO

:retn 70

POKE36875,LlsFORL2=150TO190sPOKE3687

210

irem

ND16)=0)sJ3=-((PAND4)=0)

4000

4002

4003

6,L2sNEXTL2,Ll

srem 26

POKE36875,0sPOKE36876,0

:rem

49

PRINT"(HOME){WHT){DOWN}(2 SPACES}THE GUARDIAN HAS(9 SPACESjCAUGHT YOU." srem

176

4004 PRINTTAB{8)"{2 DOWN}[YEL}GOLD={BLU}" SC

4005

4006

srem 209

PRINT"{DOWN}[CYN}HIT THE TRIGGER IF [SPACEJYOUJ2 SPACESjDARE TO TRY AGAI S," :rem 252 PRINT"[DOWN}(CYN}TYPE (Q) IF YOU WIS :rem 10 Ht9 SPACES}TO QUIT."

28

POKEC+Q*DY+DX,4)POKES+Q*DY+DX,33 :rem 158

4007

E251,0sSYS251

irem 117

29

IFS+Q*DY+DX=8185THEN5000

trem 94

4008

IF-((PAND32)=0)<>1THEN4007

srem

79 80

IFINT{RND(1)*3)=1THEN18 srem 4 B=INT(RND(l)*3)+a:CX(B)=0tCY(B)=0:W=0 :rem 235

4009 4010

IF SOPH THEN PH=SC PRINT"(CLR)":SC=0:GOTO3011

srem 98 irem 158

81

POKES+Q*EY(B)+EX(B),32:CX(B)=((EX(B)>D

5001

RE" :rera 19 FORZ=lTO100sPOKE36876,INT(RND(l)*128

B2 85 86

X)-(EX(B)<DX)) :rem 133 EX(B)=EX(B)+CX(B) :rem 96 CY(B)=((EY(B)>DY}-(EY(B)<DY>) :rem 15 IFPEEK(S+Q*EY(B)+EX{B)+Q*CY{B))=35THEN CY(B)=0:EX{B)=EX{B)-CX{B) :rem ill

5002

FORHG=1TO10:NEXTtNEXT:POKE36876,0

87

EY(B)=EY(B)+CY(B)

;rem

88

IFPEEK(S+Q*EY{B)+EX(B))=33THEN4000

:rem

89

POKES+Q*EY(B)+EX(B),36:POKEC+Q*EY(B)+E X(B),5:TR=TR-ltGOTO18 srem 246

91

GOTO18

irem

299 CX(B)=0:CY(B)=0 1999 END 2000 FORM=7702TO8163 2001 IFINT(RND(1)*3)=1

ANDPEEK(M-

12

:rem 3 :rem 165

2004

POKEM+30720,2sPOKEM,35:NEXT

:rem 138

2999

RETURN

trem 189

DOWN}(RVS}";:PRINTTAB(6

3001

)"REDEFINING" :rem 30 CS=256*PEEK(52)+PEEK(51):FORI=CSTOCS +511tPOKEI,PEEK(I+32768-CS)sNEXT

3002

FORI=7432TO7439:READJ:POKEI,J:NEXT

3003

DATA60,60,24,255,60,60,102,102

3004

FORI=7448TO7455:READJsPOKEI,JtNEXT

3005

srem 196 DATA255,255,255,255, 255, 255, 255, 255

3006

F0RI=7456TO7463:READJ:POKEI,J:NEXT

3007

DATA129,153,102,60,255,60,66,66

3008

F0RI=7464TO7471:READJ:POKEI,JsNEXT:P

:rem

136

:rem 189 :rem 212

srem :rem

246 196

srem

RINT"{CLR)"

32

:rem 98

3009

DATA0.0,126,126,126,126,0,0

3010

CLRsPOKE36869,255

3011

FORC=7680TO7701iPOKEC+307 20,2jPOKEC,

:rem

62

srem 230

35sPOKEC+31204,2:POKEC+484,35:NEXT

5120

■■ trem 23 FORL=lTOTRsSC=SC+lsPRINT"{UP} {12 RIGHT}"SCsNEXT trem 183 PRINT"{2 DOWNHRED] MOST TREASURE RE COV-{2 SPACES}ERED FROM TOMB YET"sPR INTTAB(B)"{YEL}"PH irem 74 PRINT"[DOWN}(PUR} PRESS Q TO QUIT NO W"

5123

RIGHT}

SPACES}GOLD={YEL}"SC;:PRINT"

srem 255

PRINT:PRINT{2 SPACES}"(3 SPACES]HIT [SPACElTHE TRIGGER(9 SPACESjTO CONTI NUE" P=PEEK{37137)sIF

srem 68 -({PAND32)=0)=1THEN

PRINT"(CLR]"sGOTO 3011

5124

IF 1

PEEK{197)=48

5125

GOTO

THEN

srem 153

POKE251,0:SYS25 :rem 62

5123

trem 209

Program 2: The Tomb (64 Version) 0

POKE56,28sCLR:PRINT"{CLR)":POKE53280,2t

1

POKE532Sl,0sGOTO3000;PH=0tSC=0 s rern 92 GOSUB2000:C=55296:DX=lsDY=l:EX(l)=5sEX( 2)=20sEX(3)=35 srem 133

2

Q=40sEY(l)=12:EY(2)=6tEY(3)=22sPOKE1982 ,32 srem 183

3

POKE1024+Q*DY+DX,33iPOKEC+Q*DY+DX,4

4

FORZ=lTO3:POKE1024+Q*EY(Z)-t-EX(Z),36sPOK

5

EC+Q*EY(Z)+EX(Z),5:NEXT POKE2023,37:POKE56295,7:S=1024

6

CL=54272:VL=CL+24 tFORI=CLTOCL+24s POKEI,

trem

0tNEXT 11 TR=500 18

219

trem 200 srem 41

trem 191 srem 218

POKEVL,15:POKECL+5,15iPOKECL+6,129 s FOR

2=lTO25sNEXTsPOKEVL,0

srem 170

20 X1=PEEK(56320)sCY=-(({X1AND1)=!)+((X1A

ND2)=2)*-1)

srem 30

POKEC,35:POKEC+30741,2sPOKEC+21,35;N

21 23 24

CX=((XlAND8)=8)+((XIAND4)=4)*-l:rem 60 IFCX=0ANDCY=0THEN80 srem 111 IFPEEK(S+Q*(DY+CY)+(DX+CX))=35THEN80

EXT GOTO

25

POKES+Q»DY+DX,32|DX=DX+CXsDY=DY+CY:IFP

srem

152

5101

P0KE56,28:POKE52,28:POKE51,PEEK{55):

CLR:PR1NT"[3

3111

{BLUJ{2

5122

:rem 138

3012

irem 116

)<>35TH

NEXT RETURN

trem 121

5100 PRINT"{CLR}(5 D0WN}":PRINT"{5

5121

EN2004

3000

)+128

:rem 21 :rem 179 :rem 120

2002 2003

196

5000 PRINT"{HOME}{WHT}YOU GRAB THE TREASU

104 144

GETAS:P=PEEK(37137):IF A$="Q"THENPOK

151

FORC=7680TOai64STEP22:POKEC+30720,2s

:rem 4 :rem 48

1

COMPUTEfs Gazatto

October 19B4

:rem

51


28

EBK(S+Q*DY+DX)=36THEN4000 : rem 166 POKEC+Q* DY+DX,4:POKES+Q*DY+DX,33 srem

:rem

235

POKES+Q*EY(B)+EX(B),32:CX(B)=((EX(B)>D

X)-(EX{B)<DX)) 82 EX(B)=EX(B)+CX(B) 85 CY(B)={(EY(B)>DY)-(EY(B)<DY))

srem 133 :rem 96 :rem 15

86 IFPEEK{S+Q*EY(B}+EX(B)+Q*CY(B))=35THEN 87

CY(B)=0:EX(B)=EX(B)-CX(B) EY(B)=EY(B)+CY(B)

:rern ill jrem 104

88

IFPEEK(S+Q*EY{B)+EX(B))=33THEN4000 :retn

89

irem 12 srem 21 jrem 179

2000

FORM=1064TO1983

:rem 118

2001

IF

2002

EN 2004 NEXT

srem 138 ,rem 3

2003

RETURN

:rem

165

2004

POKEM+54272,2tPOKEM,35:NEXT

;rem

146

2999 30S0

RETURN :rem 189 POKE56334,PEEK(56334)AND254:POKEI,PE

INT(RND(1)*3)=1ANDPEEK(M-1)<>35TH

3001

DOWN}(RVS}"j :rem

IFX1O0THEN

4010

IF

4011

PRINT"{CLR}"iSC=0!GOTO

5000

PRINTsPRINTTAB{10)"{WHT}YOU

5001

POKEVL,15tPOKECL+5,71sPOKECL+6,241:F

SCOPH

irem 95 irem 137

4007

THEN

PH=SC

3011

TREASURE"

PRINTTAB(15)"REDEFININGEoFF)"iFORI=0

150

trem

159

GRAB

THE 80

:rem

55

POKECL+1,INT(RND{1)*128)+64:FORHG=1T O10:NEXT:NEXT:POKECL+4,32 irem 5

PRINT"(CLR}f5 DOWN}":PRINTTAB{14)"

{BLU)(2 SPACES}GOLD=(YEL}"SC;iPRINT" srem

5101

19

FORL=1TOTR:SC=SC+1:PRINTTAB{21)"{UP] "SCiNEXT

5120 PRINT"{2 EASURE

5122 5123

:rem

230

DOWN}{RED}{2 SPACESjMOST TR

RECOVERED

BEFORE=";:PRINTTABf

32)"(YEL}"PH PRINTTAB(10)"{DOWN}{PUR) [SPACE}QUIT NOW" PRINTsPRINTTAB(7)"HIT CONTINUE"

:rem 29 PRESS Q TO :rem 137

THE TRIGGER TO irem 164

5124 GETA$:X1=PEEK(56320)AND16:IFX1=0

N PSINT"{CLR)":GOTO3011

5125

IF A$="Q"THEH

5126

GOTO

THE

:rem 75

POKE53272,21iPRINT"

{CLR)":END 111

:rem

:rem

ORZ=lTO100:POKECL+4,33

5002

5100

91 GOTO18 299 CX{B)=0sCY(B)=0 1999 END

EK{1)AND251:PRINT"{3

4009

ENPOKE53272,21jPRINT"[CLRj"tEND

144

POKES+Q*EY(B)+EX{B),36iPOKEC+Q*EY(B)+E X(B),5:TR=TR-1:GOTO18 :rem 246

:rem 58

GETA$sXl=PEEK(56320)AND16sIFA$="Q"TH

158

29 IFS+Q*DY+DX=2023THEN5000 irem 79 80 B=INT(RND(1)* 3)+1s CX(B)=0 s CY{B)=0:H=0 81

OU WISH{2 SPACBSjTO QUIT" 4007

srem 50

5124

:rem

211

TO511sPOKEI+12288,PEEK(1+53248):NEXT 3002

1 :rem 97 FORI=12552TO12559tREADJiPOKEI,J:NEXT srem 27

3003 DATA60,60,24,255,60,60,102,102

:rem

Cabby (Article on page 60.)

212

3004

FORI=12568TO12575!READJ:POKEI,J:NEXT

3005

DATA2 55,255,2 55,255,255,255,255, 255

3006

FORI=12576TO12583sREADJsPOKEI,JsNEXT

3007

:rem 34 DATA129,153,102,60,255,60, 66,66

3008

FORI=12584TO12591:KEADJ:POKEI,J:NEXT

3009

DATA0,0,126,126,126,126,0,0

3010

POKE1,PEEK(1)OR4:POKE563 34,PEEK(563 3

:ren

BEFORE TYPING...

34

Before typing in programs, please refer to "How

To Type COMPUTEl's Gazette Programs," "A

:rem 246

:rera

3011

3012

sPRINT"(CLR}"

NEXT

3111

GOTO

trem 1

4004

4005

5

POKE56,28iPOKE55,0 s POKE52,28 t POKE51,0 :rera 37

10 PRINT"{CLR}":POKE36879,104 irem 0 20 PRINT"(7 DOWN}l4 RIGHTJ{CYN}SETTING UP "tPRINT"{DOWN} [4 RIGHTjPLEASE WAITUll irem

POKE

:rem 204

CL+1,L1iPOKECL+4,33:NEXTL1eNEXT irem

70

PRINTTAB{6)"(WHTHDOWN}THE GUARDIAN

{SPACE}HAS CAUGHT YOU"

PRINTTAB(17)"[2

:rem 205

DOWN}{YEL}GOLD={BLU}

"SC

:rem

PRINT"{DOWN}{CYNjHIT THE TRIGGER IF

1

{SPACEJYOU DARE TO TRY AGAIN"

:rem 206

4006 PRINTTAB{6)"{DOWNj{CYN}TYPE

(Q)

IF Y

131

50 FORI-7168TO7679tPOKEI,PEEK(1+25600)tNE XTI

55

trem

175

FORI-1TO13iREADZ tFORJ-ZTOZ+7:READKj POK EJ,K:NEXTJ,I

:rem

35

60 POKE37139,0:DD=37154:PA=37137sPB=37152

FORL2=1TO5:POKEVL,9 s POKECL+5,72:POKE

L2iPOKECL+4,32

4003

Program 11 Cabby (VIC Version)

6

:rem 48

CL+6,241:FORL1=50TO25STEP-1 4001

62

4)OR1:POKE53272,PEEK(53272)AND240OR1 2 jrem 49 FORC=1024TO1063:POKEC+54272,2:POKEC, 35:POKEC+5 52 32,2:POKEC+960,35:NEXT irem 146 FORC=1024TO1984STEP40:POKEC+54272,2: POKEC,35:POKEC+54311,2:POKEC+39,35 :rem 144

3013 4000

32

!rem 192 srem

Beginner's Guide To Typing In Programs," and "The Automatic Proofreader" that appear before the Program Listings.

:rem

65 DIM F${26),T%(4),B%(4) 66 FORI=J.TO26iREADFS(I) :NEXTI

19

irem 170 j rem 49

150

H=7680tC-30720iCH"28iB%(l)=B055iB%(2)

160

-7914jB%(3Ha051iB%(4)=7730 srem 222 DEFFNA(X) =INT {RND (i. ) *X) +1 s DEFFNL (Q) =H +22*Y+X

srem

70

170 Y=7sX=6:T%(l)=FNL{Q) sY=18iT% (2 )=>FNL(Q )jY=8sX=16:T%{3)=FNL{Q);Y=15:T%(4)=FN

L(Q) trem 237 180 PRINT"{CLR}{11 DOl«JHWHT]LEVEL 1-EASY TO

4-HARD"

trem COMPUTE'S Gazette

232

October 1984

153


GETZ$tLV=VAL(ZS)iIFZ$=""THEN190

190

193 195

IFLV<1ORLV>4THEN190

irem

POKE36869,255iPOKE36879,107

srem 228

185

200

PRINT"[CLR}":GOSUB3000

:rem 115

210

P%=H+45:POKEP%,CH:POKEP%+C,7

trem 101

220

XF%=0iCF%=0iGS=1400:RU=1

300

GOSUB1000

310

IFXF%=0ANDRND(1)>.6THENGOSUB2000

jrem 62

trem 212

rem

IFRND(1)>.98THENGOSUB7000

:rem 222 ;rem 237

350

GOSUB5000

:rem

221

360

GOSUB500:SG=0

:rem

239

390

GOTO300

jrem

104

POKEDD,127iS3=-((PEEKtPB)AND128)=0):P jrem

122

510

P=PEEK(PA)tSl=-((PAND8)=0)tS2=({PANDl 6)=0):S0=((PAND4)=0) irem 177

520

FR=-({PAND32)=0):DX=S2+S3;DY=S0+S1

525

IFFRTHENGOSUB9600

530 535

CH=28

:rem 65 :rem 202

IFDX=-1THSNCH=29

irem

:rem

191

197

trem 207 irem 195 trem 98 =41THEN8000 :rem 166 trem 97

540

IFDY<>0THENCH=27

550

Z=P%+22*DY+DX

560

IFPEEK(Z)=32THEN610

570

IFPEEK{Z)=40ORPEEK(Z

580

IFPEEK(z)=31THEN500

590

IFPEEK(Z)=30THENIFPEEK(Z+C)<>13THEN50 0

trem :rem

80

605

IFPEEK(Z)>=36ANDPEEK(Z)<=39THEN6000

606 610

IFPEEK{Z)=42THEN9000 POKEP%,32

:rem 91 :rem 150 irem 204

620

P0KEZ,CH:P0KEZ+C,15:P%=Z

irem

625

GS=GS-21IFGS=<0THENSG=1:GOSUB9700

225

147

3100

trem 203

PRINT"W [3 RIGHT) {5 RIGHT} {RIGHT} {4 SPACES}P[RIGHT} " trem 102 PRINT"[RIGHT]{3 SPACES)G(7 SPACES] {RIGHT] [2 RIGHT] [2 RIGHT] U" jrem 223

3110 PRINT"{RIGHT} {3 RIGHT) [RIGHTjM [5 RIGHT] H{RIGHT){4 SPACES]"

trem

106

3120 PRINT"{RIGHT] D[RIGHT]J {2 RIGHT]T [2 RIGHT){3 SPACES]{RIGHT}B [2 RIGHT} " irem 192 3130 PRINT"B {2 RIGHTjK {2 RIGHT) [2 RIGHTjRlRIGHT} {2 RIGHT} E[RIGHT) R"

irem

48

3140 PRINT"{RIGHT} {3 RIGHT}{12 SPACES] [2 RIGHT} " irem 71 3150 PRINT"{RIGHT}{5 SPACES}[3 RIGHT] {6 RIGHT} {RIGHTJO " irem 40 3160 PRINT"G {R1GHT}X{RIGHT} {2 RIGHTjS {riGHT]t(8 SPACES}" irem 114

3170 PRINT"[RIGHT) {3 RIGHT) [3 RIGHT] {2 RIGHT) G[2 RIGHT} {2 RIGHT) "

irem

92

3180

PRINT"{RIGHT){12

SPACES}[2 RIGHT]

3190

PRINT"{RIGHT)C{2

RIGHT}N[2

3200

POKEH+46,40:POKEH+47,41:POKEH+46+C, 5 iPOKEH+47+C,5 trem 100

{2 SPACES}M[RIGHT} P" {4 RIGHT]B"

srem 164

RIGHT)R

trem 200

3250 X=15tY=19tPOKEFNL(0),42tPOKEFNL{0)+C ,7

irem

246

RETURN

irem

166

121

4000

IFCF%<>0THEN4500

irem

163

L1%=FHA(3)+liL1%=L1%*2-1:IFL1%=3THEN

4005

IFPEEK(Z)=0THENXF%=991GOTO4200

4010

IFPEEK(Z)<>XF%THEN500

4200

CF%=FNA(26)iSP=ZiPOKEZ,CHtPOKEZ+C,15 :POKEP%,32 irem 95

trem

Ll%=2

irem

229

1010

L2%=FNA(4):POKET%(L2%),30tPOKET%{L2% )+C,Ll%+8 trem 214

1020

RETURN

2000

irem

SPACES}[RIGHT}Q irem 79

3300

RETURN

1000

180

58

irem

630

3070 PRINT"[WHT}A{13 {4 SPACES]"

trem

{2 RIGHT}

11

59

IFPEEK(Z)>=0ANDPEEK(Z)<=26THENGOTO400 0

{RIGHT}

V"

3090

GOSUB500tSG=0

600

[RIGHT}l[4 RIGHT}

{2 RIGHT}

[RIGHTjL

{2 RIGHT)

187

340

OKEDD,255

3060 PRINT"{RIGHT]

[2 RIGHT]

3080 PRINT"{RIGHT} {3 RIGHT} N[2 RIGHTjS {RIGHT} [RIGHT} [2 RIGHT} (RIGHTjO "

330

500

{6 RIGHT]

{RIGHT}

159 GOSUB500:IFSG=1THENSG=0:GOTO340

320

3050 PRINT"{RIGHT} 84

:rem

:rem 163

RU=0tXF%=FNA{26):A5 = "{HOMEH20 ":B?="[21

SPACES}"

DOWN}

:rem 70

trem

4260 PRIHTA5;B$iPRINTS?iPRINTA?;"{WHT]TAK E

2005 PRINTA$;B$ t PRINTB?:PRINTA$;"tWHT}CAB BY,

GO

TO

THE"tPRINTF${XF%);

:rem

94

111

trem 37

ME

TO

THE"tPRINTF?(CF%):F0RT=lTO99

iNEXT

trem 24

4280

POKEP%,CHiPOKEP%+C,15tPOKEZ,XF%tPOKE

2020

RETURN

jrem 164

2500

ZT=PEEK(Z+C)

:rem 240

Z+C,ltIFXF%=99THEN4290

trem

128

4285

GOTO

trem

211

2505 2510 3000 3005

XFZT=2ORZT=7THEN350 irem 2 RETURN irem 168 REM MAP trem 133 R$="(BLK] **++-**m++**++44-*++4+" :PRIN

4290 4300

POKEZ,31tPOKEZ+C,0 GOTO630

trem trem

117 153

T" [HOME] (BLK}-*-«-*-«-*-*-*-«tWHT!CABBYEBLK} ■*■*■*■*■*■*■*■*"

:rem

157

3010

FORI=1TO20

irem

103

3015

PRINTA$:NEXTI

trem 125

3020

PRINT"(HOMEl{DOWN}[11 RIGHT}[WHT}G {3 RIGHT}B"iPRINT"{RIGHT]{3 SPACES} [2

RIGHT){14 SPACESjZ"

irem 154

3030 PRINT"{RIGHT} [4 RIGHT}D{RIGHT] {7 RIGHT} {RIGHTjS " :rem 196 3040 PRINT"{RIGHTj {2 RIGHT]M{4 SPACES) [RIGHT}S£3 SPACES}Y{RIGHT} {2 RIGHT} irem 154

COMPUTE!'? Gazette

October 1984

92

4300

4500

IFPEEK(Z)<>CF%THEN630

4510

POKEZ,CHiPOKEZ+C,15iPOKEP%,32trera 60

4550 M1=ABS{SP-Z)/10-H 4560 M2=INT(FNA(100*M1)/10)/100

trem 24

trera 198 trem 118

45 70 FORI=1TO3 t PRINTA5;B$ t PRINTS? t PRINTA5

4575 4580 4600

:"YOU COLLECT";MliPRINT"PLUS TIP OF" ;M2 irem 48 FORT=1TO500:NEXTT,I irem 248 M3=INT(M1+M2+M3):M1=0:M2=0 trem 232 PRINTA$rB$:PRINTB$iPRINTA5;"ON YOU"; M3tFORT=lTO650:NEXTT srem 120

4650

POKEP%,CHiPOKEP%+C,151 POKEZ,CF%iPOKE

4700

Z+C,ltCF%=0tXF%=0 GOTO630

irem 242 irem 157


I=FNA(4)sQl=l srem 5005 Y=INT((P%-H)/22)iX= (P%-H)-22*Y

207

8450

POKE36879,15:FORT=1TO50:NEXTT,I

srem

136

9000

POKEZ,CHiPOKEZ+C,15sPOKEP%,32:rem 59

5000

5010

Yl=INT((B%(l)-H)/22):Xl=(B%(I)-H)-22 *Y1

srem 47

5015

BX=0sBY=0

5020

BX={X1>X)-(X>X1)

srem 171

5050

BY={Y1>Y)-(Y>Y1)

trem

5100

NC=B% (I )+BX+BY*22 i IFNO8097THENRETUR N

5110

irem

20 179

:rem 45

IFPEEK(NC)=31THEN5200 IFPEEK(NC)<=26THEN5200

irem 244 irem 57

5117

IFPEEK(NC)=30THEN5200

:rem 250

5120 5150

IFNC=P%THEN6000

irem

POKEB%{I),32

srem 140

5155 5156 5157

TY=37:IFBX<0THENTY-36 IFBY<0THENTY=3S IFBY>0THENTY=39

srem 117 srem 235 srem 239

5160

POKENC,TYsP0KENC+C,4:B%(I)=NCirem 54

5115

5170

5175 5180 5200 5240

6000

I=I-t-liIFI=>4THENI=>l Ql=Ql+liIFQK=LVTHEN5005 RETURN BX=FNA(2)-lsBY=FNA(2)-l GOTO5100

trem 159 srem 206 trem 174 trem 28 irem 202

irem 67

PRINT"{4 DOWN}{2 SPACESjYOUR CAB HAS BEEN"

stem 235

6060

PRINT"{DOWN)CRUNCHED BY A TROLLEY"

6070

PRINT"{3 DOWN}(6 RIGHTjGAME OVER1"

6075

PRINT"[2 DOWNjYOU MADE(RVS}";M4;"DOL

i rem srem

6077

LARS"

1

246

srem 55

PRINT"{2 DOWN]t3 SPACESjPLAY AGAIN (

GS=1400

208

srem 106

9020 FORI=lTO10!pOKE36878,15sFORT=230TO28 9025 9100

0STEP10iPOKE36876,100+T/3 irem 174 NEXTTs POKE36876,0 s POKE36878,0 sFORT=l TO55sNEXTT,I srem 61 POKE P%,CHsPOKEP%+C,lsPOKEZ,42:POKEZ +C,7 srem 183

9150

GOTO630

:rem

9600

IFRU=1THENRETURN

:rem 130

9603

PRINTAS;B$:PRINTB$

:rem

161 146

9605 PRINTA$;"[WHT]-«E{5 SPACES 3f-«" sPRINT" ■•17 SPACES}-*";

: rem 151

9610 Al=INT{GS/200) srem 22 9620 PRINTA5;TAB{A1);"[RED}ViPRINTTAB(Al

);"lRED)V

:rem 237

9630

FORT=1TO1000:NEXTT

:rem

9640

IFCF% < > 0THENPRINTA5;BS:PRINTB? s PRINT

9660

172

A?;"[WHT3TAKE ME TO THE"sPRINTF?(CF% )iGOTO9660

9650

PRINT"ECLR}"iPOKE36879,8sPOKE36869,2 40

6050

143

9005

:rem

irem 12

IFXF% O0THENPRINTA?;BS:PRINTBS s PRINT

A$;"(WHT}CABBY GO TO":PRINTF$(XF%)

srem 78 :rem 181

RETURN

9700 FORII=lTO9sPRINTAS;BS:PRINTBS trem

141

9750 PRINTA$;"ECYN}(RVSJOUT OF GAS":GOSUB 5000iNEXTIIsGS=700

9760

9770

irem 145

PRINTA$;B$sPRINTB$:PRINTA$;"BACK WIT

H 1/2 TANKFUL";:FORDL=1TO2500:NEXT XF%=0iCF%=0sRETURN

irem

114

srem

118

10001

GETZ$iIFZ$=""OR(Z$o"Y"ANDZ$<>"N")TH

DATA 40

7384,40,105,125,60,60,125,105, irem 50

EN6080

srem 213

10002

6090

IFZ$="N"THENEND

trem 177

DATA 68

7392,68,68,190,190,190,190,68, srem 98

6095

Ml=0:M2=0iM3=0tM4=*0sGOTO150

10003 DATA7400,17,17,190,190,190,190,17,1 7 DATA

7408,0,8,42,42,42,8,4,4

Y/N)" 6080

:rem 132

irem 61

7000

X-FNA(20)iY»FNA(19) 7010 IFPEEK{FNL(0))<>31THEN7040

irem 68 irem 6

10004

7030 POKEFNL(0),0iPOKEFNL(0)+C,3 7040 RETURN 8000 IFRU=1THENRETURN 8005 M4-M4+M3

sram 77

10005

irem 171 irem 123 irem 183

10006

:rem 65

:rem

124

DATA 7416,255,255,255,255,255,255,2 55,255 srem 34 DATA 7168,60,60,25,127,124,124,24,6

0

:rem 14

8010

POKE214,19tPRINTsPOKE211,liPRINT"

10007

8015

POKE214,20iPRINTiPOKE211,1iPRINT"

10008

DATA 108 DATA

10009

DATA 7472,30,24,23,23,64,87,151,30

10010

DATA 7480,30,151,87,64,23,23,24,30

10011

DATA 7488,0,255,170,255,136,136,136 ,136 irem 176 DATA 7496,0,255,171,255,143,143,141 ,141 :rem 165

{LEFT}{16 SPACES]"

irem 238

IWHT}tLEFTjSAFE IN DEPOT";M4;trem 25

8020

M3=>0 s POKEP%, CHi POKEP%+C, 151 POKEZ, 40 s POKEZ+C.5 trem 15 8025 IFM4>200THEN8300 irem 169 8030 FORJ-1TO5:FORI=15TO0STEP-1IPOKE3687B ,IiPOKE36876,230

irem

226

8035

FORT=*1TO10iNEXTT,IiPOKE36876,0iNEXTJ

8040

IFCF%»0THENPRINTA5;B?IPRINTB$ s PRINTA

srem

8400

srem

174

irem

165

DATA

IFCF%O0THENPRINTA?; B? t PRINTB? : PRINT

10015

DATAAIRPORT,BANK,"CURLING RINK","DO

irem 13

CTORS

A$;"(WHT}TAKE ME TO THE"iPRINTF$(CF% irem

{5 DOWN}tWHT}YOU HAVE SAVED ENOUGH"

10016

PRINT"[DOWN}{3 SPACES}TO BUY YOUR CA B"

:rem 86

1 " i FORI = 1TO6 s POKE36879 , 107 s FORT=>1TO5 srem

158

srem

214

DATAGROCERY STORE,HOSPITAL,INN,JEWE LER,KENNEL,LIBRARY,MOTEL,"NIGHT

CLU

10017

B",OFFICE irem 84 DATA "POST OFFICE",QUARRY,RESTAURAN

10018

T,SCHOOL,THEATER,UNIVERSITY,"VETS" irem 187 DATA"WEATHER OFFICE","XRAY OFFICE",

PRINT"[3 DOWNj(6 RIGHT}(WHTjYOU WIN1

0iNEXTTiGOTO6077

124

OFFICE","EMPLOYMENT OFFICE",F

ACTORY

202

POKE36869,240iPRINT"{CLR}"tPRINT"

7504,15,25,41,47,47,47,31,15 :rem

irem 41

8301

190

10013

)tGOTO630 8300

10012

irem

S;"tWHTjCABBY, GO TO THE"tPRINTF?(XF %)SGOTO630

3050

85

7456,64,32,15,255,131,253,253, -rem 123 7464,2,4,8,255,193,191,191,54

YMCA,ZOO

:rem COMPUTED Gazette

238

October 1984

155


Program 2: Cabby (64 Version) POKE53281,lltPOKE53280,ll:PRINTCHR$(142

410

IFTR(T)=ED{T)THENVR(T)={-l)*VR(T)fGOS

420

UB700:GOTO440 :rem 21 IFPEEK(TR(T))>=36ANDPEEK(TR{T))<=39TH ENTR(T)=TR(T)-VR(T):GOTO450

:rem

203

):POKE52,56:POKE56,56:CLR

t rem

139

430

,T1%(12),LC%(70),CM%(26)

.rem

168

440

POKEA,32jPOKETR(T),TY(T):POKETR(T)+C, 15:GOSUB9810iIFN4=lTHEN450

:rem

140

445

GOSUB500:IFEN=1THENT=5

trem

113

450

NEXTtRETURN

tiem

242

500

JV=PEEK(56320)tJV=15-(JVAND15)iFR=PEE

505 510

K(56320)AND16 :rem 123 IFFR=0ANDSH=0THENGOSUB9600 irem 135 DY=(JV=1)+(JV=5)+(JV=9)-(JV=6)-(JV=10

520

)-(JV=2) trem 201 DX=(JV=4)+(JV=5)+(JV=6)-(JV=9)-(JV=10

525

IF(DX=0ANDDY=0)ORGS=0THENRETURN

PRINT"{CLR}":DIM A%(26),F$(26),TL%(12)

10

POKE214,12tPRINT:POKE211,5:PRINT"(WHT}

15

SETTING

UP

PLEASE WAIT" t rBUl

18

FORI = 1TO26:READF$(I)-.NEXTI :rem 39 POKE56334,PEEK(56334)AND254tPOKE1, PEEK (1)AND251 :rem 134 FORI=0TO511:POKEI+14336,PEEK(1+53248):

20 50

51

POKEI+15360,PEEK(1+54272):NEXT:rem

166

POKE1,PEEK(1)OR4:POKE56334,PEEK(563 34)

52

OR1

trem

86

IFPEEK(TR(T))=27ORPEEK(TR(T))=28THENE N=liT=5:GOTO450

FORI = 1TO12:READZ:FORJ=ZTOZ+7:READK;POK

55

EJ,K:NEXTJ,I

:rem

34

)-(JV=8)

irem

210

trem

210

100

FORI=1TO26:READA%{I)iNEXT:FORI=lTO8:R

535

CH=28:IFDXO0THENCH=28

110

EADV(I)sNEXT irem 123 FORI=1TO26 jIFI=1THENCM%(I )=A%(I):GOTO 150

540

550

557

IFDY<>0THENCH=27 :rem 207 ZZ=40*DY+DXtZ=P%+ZZ:PK=PEEK(Z) :rem 132 IFFND(ZZ)=>1AND(PK=32ORPK=1C0)THEN625 trem 182 IFSH=1THEN800 trem 0

560

CP=(PK=30)+(PK=32)*2+(PK=40)*3+(PK=41

:rem 127

120 CM%(l)-CM%(I-l)+A%(l) 150

trem 247

NEXTiH=1024tC»54272iS«CtCH-28tFORI-lT

O5:READB%(I),E%(I)iNEXT

555

trem 66

trem

25

trem

63

165

FORI=1TO12iREADT1%(I)jNEXT srem 78 DEFFNA(X)=INT(RND(1)*X)+1iDEFFNL(Q)=H

167

+40*Y+X trem 75 DEFFND(ZZ)=>ABS((ZZ=39) + (ZZ = -39) + (Z 570

170

1)+(ZZ=-41)) jrem 51 FORI=lTO5:A=FNA(2)iD%(I) = (A=-l)-(A- ) t 63

580

IFPEEK(Z)>=129ANDPEEK{Z)<=*154THEN4000

FORI=1TO5:TR(I)=(D%(I)=-l)•(-E%(I))-( D*(I)=1)*(B%(I)) :rem 208 176 VR(I)=(TR(I)=E%(I))-(TR(I)=B%(I))IIFI

590

trem 188 IFPEEK(Z)>=36ANDPEEK(Z)<=39THENEN=ltR

160

NEXT

irem

)*4+(PK=42)*5+(PK=160)*6+(PK=0)*7 srem

25,3300

175

>2THENVR(I)=VR(I)*40 trem 235 TY=(VR(I)=1)*36+(VR(I)=-1)«37+(VR(I)=

177

40>*39+(VR(I)=-40)*38iTY(I)=(-l)*TY irem

185

13:PRINT"fWHTjSELECT A LEVEL"

:rem 67

trem 30

605

ETURN IF(PEEK(Z+C)AND15)=5THEN620 GOTO625

620

GOSUB98201POKEP%,32:POKEZ,CH:POKEZ+C,

625

GS=GS-2tIFGS=-<0THENGS-0iGOSUB9700

630 700

RETURN

600

100

ED(I)=(TR(I)=B%(I))*(-E%(I))+(TR(I)-E %(I))*(-B%{I)):NEXT irem 147 PRINT"ICLR}"!POKE214,8iPRINT:POKE211,

180

129

ONABS(CP)GOTO600,620,8000,8000,9000,6

7:P%=Z

:rem 179 :rem 38 irem 113

irera 174 trem irem

57 121

TY=(VR(T)=1)*36+(VR(T)=-1)*37+(VR(T)=

187

POKE214,10:PRINT:POKE211,16:PRINT"1) {SPACEjEASY" :rem 225

189

POKE214,12:PRINTjPOKE211,16:PRINT"2)

rem

181

GETZ$iLV=VAL(Z$)iRD=RND(l)tIFZ$='""THE N190 :rem 199 IFLV<1ORLV>2THEN190 !rem 181

})*t-B%(T))tED(T)=ED

190

720

RETURN

rem

121

800

IFPEEK(Z)=30AND(PEEK(Z+C)AND15)=5THEN

PRINT"{CLR)"!POKE53272,(PEEK(53272)AN

810

620 IFPEEK(Z)<>32THEN625

D240)OR14

820

GOTO620

{SPACEjHARD"

191 195 197

40)*39+(VR(T)=-40)*38:TY{T)=(-l)*TY trera 147 710 ED=(ED(T)=B%(T))*(-E%(T))+(ED(T)=E%(T

:rem 211

:rera

212

FORMC=STOS+24:POKEMC,0

NEXT:POKES+24,

15:POKES+5,120:POKES+6

240:HF=S+1:LF=

S

irem 166

1000 1005

trem

107

rem

163

rem

107

FORLL=1TO12:PK=PEEK(TL%(LL)+C)AND15 rem 145 IFPEEK(TL%(LL))=32THENPOKETL%(LL),30 |POKETL%{LL)+C,PK irem 2 POKETLS(LL)+C,PK:TL=(PK=2)*1+(PK=5)• 2+(PK=7)*3 :rem 110

200

PRINT"(CLR)"jGOSUB3005:FORI

210

1%(I) iGOSUB3200tNEXT :P0KEP%,CH:P0KEP%-*-C,7

220

Ml=0:M2=0:M3='0iM4=0:XF%=0iCF%=0:GS=14

300

00 GOSUB1000:IFEN=1THEN6000

:rem :rem

137 147

1015

GOSUB400IIFEN=lTHENLL=12tGOTO 1030

320

IFXF%=0THENGOSUB2000 GOSUB400:IFEN=1THEN6000

irem trem

196 104

1020

OOSUB5000tIFEN-lTHE»LL<-12tGOTO1030

330

GOSUB7000 : GOSUB500 : IFEii '1THEN6000 : rem

235

1025 ONABS(TL)GOSUB1040,1050,1060 1030 1040

310

1TO12iA=T

irem : rem

74

GOSUB1000:IFEN=1THEN6000

trem

151

350

GOSUB5000tIFEN=lTHEN6000

:rem

156

360

GOSUB500:IFEN=1THEN6000

:rem 109

390

GOTO300

trem

104

400 F0RT=lT05tA=TR(T)iTR(T)=TR(T)+VR(T) :rem 157 COMPUTE! s Gazette

October 1984

1012 GOSUB500iIFEN-lTHEHLL-12:OOTOL030 i rent 65 irem 67 irem

340

156

1010

101

112

irem 86

NEXTiRETURN irem 29 A-FNA{3)iIPA-1THENPOKETL%(LL)+C,5iPO KETL%(LL),30 irem 149

1045 RETURN irem 170 1050 A-FNA(3)iIFA=2THENPOKETL%(LL)+C,7:PO KETL%(LL),30 trem 153


171

4010

IFPEEK(Z)<>XF%THEN630

1060 A-FNA(3)tIFA=3THENPOKETL%(LL)+C,2iPO

4030

IFLV=2ANDZ<>DZTHEN630 PC=FNA{26)sCF%=PC+128

1055

RETURN

irem

KETL%{LL),30 1065 RETURN

tram 150 irem 172

1500

jrem

FORI=>22TO23:FORJ=1TO37

32);iNEXTJ,IiRETURN

2000 PX-FNA(26)tXF%-PX+128

irem 71

irem 221

2005

GOSUB1500IPOKE214,22iPRINTtPOKE211,l

2010

PRINT"tWHT}CABBY GO TO THE

:rem 190

:rem S3

2020

GOSUB500:RETURN

3005

I=49152:IF PEEK(49154)=216THENSYS491

irem

60tGOTO3030 A:IF

A=*256

trem 218

READ

3020 3030

0 irem 112 POKE I,A:1=1+1:GOTO 3010 irem 70 POKE1064,40iPOKE1065,41:POKE1066,40i 11

t rem 62

3040 NEXTtPOKE1104+C,ltPOKE1104,40:FORI=l 105TO1107iPOKEI,32!pQKEI+40,32:NEXT trem 39 3050

POKE1144,40tPOKE1144+C,ltFORI=1265TO

3055 3060

FORI=1545TO1581:POKEI,32:NEXT:rem 55 FORI=1114TO1754STEP40:POKEI,32tPOKEI +10,32:POKEI+20,32:NEXT irem 108

3065

FORI=1TO5

1301:POKEI,32:NEXT

:rem 232

:rem 68

3067 X=FNA(38):Y=FNA(19)iL=FNL{Q)trem 155 3070 IFPEEK(L)=32ORPEEK(L)<>160THEN3067 :rem 48 3075 POKEL,42:POKEL+C,7iNEXT :rem 219 3080 K=0tFORI=lTO26;FORJ=lTOA%(I):rem 226 3090 X=FNA{40):Y=FNA(19):L=FNL(Q):rem 144 3100 IP PEEK(L) = 32ORPEEK(L)O160THEN3090 :rem 38

3110 IFPEEK(L+1)=160ANDPEEK(L-1)=160ANDPE EK(L+40)=160ANDPEEK(L-40)=160THEN309 0

:rem 250

3120

K=K+l:LC%(K)=LtPOKEL,1+128:NEXT:NEXT

3200

IFPEEK(A)<>32THENGOSUB3220

sRETURN

:rem

3210 TL%(I)=AiPOKEA,30:POKEA+C,5tRETURN :rem

3230

FORJ=1TO8

PRINT"[WHT}TAKE ME TO THE ";F$(CF%-1

4280

POKEP%,CH:POKEP%+C,7!GOSUB9820iPOKEZ ,XFS1POKEZ+C,1

:rem

165

4285

IFCF%-XF%THENPOKEZ+C,0

irem

146

:rem

4290

28);:PT=PC:CL=0:X=2:GOSUB5155

4510

irem

:rem

20

trem

4573

irem

TIP OF";

M2;

irem 154

4580 M3=M1+M2+M3iM1-0iM2=0 irem 172 4600 POKE214,23iPRINTiPOKE211,1iPRINT"YOU 4650 4655

HAVE";M3;

trem 100

POKEP%,CHtPOKEPft+C,7:GOSUB9820iPOKEZ ,CF%iPOKEZ+C,l ,rem 145 IFLV«lTHENPT=PCtCL=liGOSUB5155 trem

5010 GOSUB5005tCT-ABS((HY=6)*1+(MY=13)*2) 5015

GOSUB5005:CT=ABS( (MX=10 )*3+(^a=■20 ) *4 +(MX=30)*5)iT=CTtIFCT>0THENGOSUB5050

iT=>CTiIFCT>0THENGOSUB5050

irem 210

5020

RETURN

irem 34 irem 167

IFP%>TR(CT}ANDVR(CT)>0THEN5080 irem

103

irem

100

VR(CT)=(-1)*VR(CT)IGOSUB700

POKEP%,32:POKEZ,CH:POKEZ+C,7:GOSUB20 00 :rem 134 POKEP%,CH:POKEP%+C,7:POKEZ,1601POKEZ

215

4660 CF%-0iXF%=0iGOTO630 irem 97 5000 MX=0iMY=0:GOTO5010 :rem 93 5005 MY-INT((P%-H)/40)iMX=(P%-H)-40*MY r RE TURN ,rem 137

5070

3310

199

PRINT-YOU COLLECT";Ml;"PLUS

:rem 208

34

154

irem 198 4550 M1-ABS(SP-Z)/10+1 .rem 118 4560 M2-INT(FNA(100*H1)/10)/100 4570 GOSUB1500iPOKE214,22iPRINTiPOKE211,1

IFP%<TR(CT)ANDVR(CT)<0THEN5080

jrem

24 100

POKEZ,CHiPOKEZ+C,7 j POKEP%,321GOSUB98

5060

irem

153

irem

trem 65

IFXF%<>0THENRETURN

248

IFLV»lANDXF%<>CF%THENPT=PXiCL=l!GOSU B5155 trem 165

4300 GOTO630 4500 IFPEEK(Z)<>CF%THEN630 4505 IFLV=2ANDZ<>DCTHEN630

5050

3300

195

irera

111

IFPEEK{A+V(J))=32THENA=A+V(J):K=8

3240 NEXT:RETURN

3320

4265

4

:rem 96

10

trem 202 GOSUB1500iPOKE214,22iPRINT:POKE211,l

THENSYS49160:GOTO303

POKE1067,41:FORI=1064TO1067:POKEI+C,

:rem

IFLV=lTHENPT=PCiCL=liGOSUB5155

4260

243

3010

3220

SUB9820

4210

";F$(XF%-

12B);:PT=PXiCL=0:X=1:GOSUB5155

116

165 4050 4200 SP=Z1POKEZ,CH!POKEZ+C,7iPOKEP%,32iGO

133

1510 POKE214,IiPRINT:POKE211,JiPRINTCHR$(

irem 41 irem irem

5080

209

5100

irem 83

B=FNA(2)iDN=(B = l)*{-P%)-(B=.2)*(ED{CT )) trem 230

POKETR(CT),32:FORMV=TR(CT)TODNSTEPVR (CT)iPK=PEEK(MV)

:rem 207

5110

IFPK>=36ANDPK<=39THENTR{CT)=MV-VR(CT

3330 Ml=ABS(SP-Z)/10+ltPOKEP%,32iPOKEZ,CH

5115

IFPK=27ORPK=28THENMV=DN:NEXTiEN=l:RE

3340 M2=INT(FNA(100*Ml)/l0)/l00

5120

TURN irem 238 POKEMV,TY(CT)1POKEMV+C,15:SH=1

194

5125

TIP OF"; irem 147

GOSUB9810iGOSUB500tSH=0:POKEMV,32

5126

IFEN=1THENMV=DN

+C,liMN=l:RETURN iPOKEZ+C,7:GOSUB9820

3350

:rem 67 ,rem

GOSUB1500:POKE214,22:PRINT!POKE211,1 :rem

3360

203

:rem 113

PRINT"YOU M2;

COLLECT";M1;"PLUS

3370 M3=Ml+M2+M3:Ml=0iM2=0:POKEP%,GH:POKE P%+C,7:POKEZ,XF%:POKEZ+C,1

1rem 44

3375 3380

PT=PX:CL=1:X=1:GOSUB5155 :rem 28 POKE214,23tPRINTiPOKE211,1jPRINT"YOU

):MV=DN:NEXT:GOSUB5150iRETURN:rem 70

trem

5130 NEXTiIFEN^lTHENRETURN 5135

jrem

irem

170 77

255

irem 225

IFDN=ED(CT)THENTR(CT)=ED(CT)-VR(CT);

5140 5150

4000

HAVE";M3;:MN=0:XF%=0:CF%=0:RETURN :rem 131 IFMN=1THEN3330 ;rem 84

POKEED(CT),TY(CT}1 RETURN trem 122 TR(CT)=DN:POKETR(CT),TY(CT):RETURN POKETR(CT),TY(CT):GOSUB500:RETURN

4005

IFCF%<>0THEi;4500

5155

IFLV=2THENONXGOTO5160,5170

:rem

168

COMPUTED Gazette

irem

249

:rem :rem

178 146

October 1984

157


5156 FORLC=CM%(PT-1)+1TOCM%(PT) sram 53 5157 POKELC%{LC)+C,CL:NEXT:RETURN trem 81 5160

R=FNA(A%(PT)):DZ=LC%(CM%(PT-1)+R)i PO KEDZ+C,0iRETURN

5170

:rem

102

R=FNA(A%(PT) ) : DC=LC% (CM% (PT-1 )+-R) : PO KEDC+C,0:RETURN

jrem

9645 IFXP%=0THENRETURN trem 166 9650 GOSUB1500iPOKE214,22iPRINTiPOKE211,1

57

6000 PRINT"[CLR)":EN=0iGOSUB9830:POKE5327

irem

9655

9700

203

PRINT"{HHTjCABBY GO TO THE ";F$(XF%128); ttl4=liGOSUB400tN4=0iRETURN :rem 161 GOSUB1500IPOKE214,22iPRINTiPOKE211,1

6050

2,21 trem 237 POKE214,8iPRlNTtPOKE211,6:PRINT"

6070

:rem 49 POKE214,10iPRINT:POKE211,15iPRINT"GA

9755

GOSUB1500sPOKE214,22tPRINTiPOKE211.1

HE

9760

PRINT"BACK WITH 1/2 TANKFUL{WHTJ";iN

9765

4=1tGOSUB400 tN4=0iIFEN-1THENRETURN irem 85 GOSUB50001IFEN-1THENRETURN :rem 249

9770

GS=700;GOSUB1500iPOKE214,22:PRINTiPO

6075

[WHT]YOUR CAB LOST TO THE TROLLEY"

OVERl"

:rem

tN4=-0iIFEN=lTHENRETURN

248

POKE214,12tPRINTtPOKE211,8iPRINT"YOU

MADE

{RVS}";M4;"lOFFlDOLLARS"

s rem 94

6080

PRINT"f2 Y/N)"

6085

GETZ$tRD=RND(l):IFZ$=""OR(ZS<>"Y"AND Z$<>"N")THEN60S5 :rem 82

9780

6090

IFZ$="N"THENEND

irem 177

9790

7000 7010 7030

X=*FNA{40)iY=FNA(19) IFPEEK(FNL(Q)) O160THEN7040 POKEFNL(Q),0iPOKEFNL(Q)+C,3

irem 70 :rem 90 :rem 143

7040

RETURN

:rem

8000

M4=M4+M3:GOSUB9820

8010

GOSUB1500iPOKE214,22:PRINTiPOKE211,l

6095

DOWN){12

RIGHTjPLAY AGAIN ( :rem 218

PRINT"{CLR}"iRESTOREiGOTO165trem 165

:PRINT"[WHT}SAFE

:rem 63

IN DEPOT";H4 :rem

8020

171

OKEZ+C,1:FORDL=1TO500iNEXT

:rem

172

B025 8040

IFM4>200THEN8300 IFCF%<>0THEN8050

srem :rem

169 175

8041

IFXF%=0THEN630

8043

GOSUB1500:POKE214,22IPRINTj POKE211,1

8045

PRINT"(WHTjCABBY GO TO THE

8046 8050

128);tN4=liGOSUB400:N4=0 :rem 127 RETURN :rem 178 GOSUB1500iPOKE214,22:PRINT:POKE211,1 trem 196

:rem :rem

84 198

";F$(XF%-

8060

PRINT"{WHT}TAKE HE TO THE

8070

28);:N4=1:GOSUB400;N4=0 RETURN

8300

PRINT"{CLR}"iPOKE214,B;PRINTSPOKE211

,9iPRINT"tWHT)YOU 8310

8400

";F$(CF%-1 :rem 39 :rem 175

E CAB

IS YOURS"

PRINT"(2

jrem 97

DOWN'1(16 RIGHTjYOU WIN":GOS

UB9840

:rem 9

8450 9000

POKE53272,21:GOTO6080 :rem 211 POKEZ,CH:POKEZ+C,15tPOKEP%,32iGS=140 0 trem 17

9100

POKE

9150

+C,7 RETURN

9600

GOSUB1500iPOKE214,22iPRINT:P0KE211,1

P%,CHiPOKEP%+C,1iPOKEZ,42iPOKEZ

trem irem

9605 PRINT" [WHTHrVS} tRVS} (OFF}"

KE211.1

183 175

irem 198

(OFF]El5 SPACESjF irem 125

9610 Al-INT(GS/200)iPOKE214,23iPRINTiPOKE 211,Al+liPRINT"fCYNl"CHR$(95);

irem

141 209

irem

118

IFXF%O0THENPRINT"{WHT}CABBY GO TO T HE

";F$(XF%-128),sRETURN

irem 42

IFCF%O0THENPRINT" tWHT)TAKE ME TO TH

E

";F$(CF%-128);iRETURN

irem

193

:rem

177

9800

RETURN

9810

POKES+4,17iPOKEHF,40:POKELF,250:POKE

S+4,16tRETURN 9820

trem

84

POKES+4,33:POKEHF,50iPOKELF,100tPOKE

S+4,32jRETURN

9830

irem 76

POKES+4,33 t FORI=200TO70STEP-5 t POKEHF

,ItPOKELF,INT(1/2):NEXTtPOKES+4,32 irem

198

9835

POKES+24,0iRETURN

9840

POKES+4,17iPOKEHF,40:POKELF,200:FORI

:rem

98

-1TO10:FORJ = 70TO200STEP51POKEHF, J

srem 136 POKELF,90iNEXT:G=G+11IFG<5THEN9840 irem 139 POKES+4,16;POKES+24,0:RETURN :rem 14

9850 9860 9900

DATAAIRPORT,BANK,"CURLING RINK","DOC TORS OFFICE","EMPLOYMENT OFFICE" :rem 109

9910

DATAFACTORY,"GROCERY

STORE",HOSPITAL

,INN

srem

9915

DATA"JEWELRY

9920

OTEL DATA"NIGHT

190

STORE",KENNEL,LIBRARY,M

:rem 188 CLUB",OFFICE,"POST OFFICE

",QUARRY,RESTAURANT,SCHOOL,THEATER

HAVE SAVED ENOUGH"

irem 38 POKE214,10tPRINTiPOKE211,lliPRINT"TH

199

irem

190

M3=0tPOKEP%,CHtPOKEP%+C,7iPOKEZ,40tP

irem

9750 PRINT" tWHT}OUT OF GAS" iN4=>l iGOSUB400

irem 9930

DATA

UNIVERSITY,"VETS","WEATHER

CE","XRAY 10001

OFFICE",YMCA,ZOO

126 OFFI

trem

201

10008

14552,24,255,255,24,24,255,255 :rem 117 14560,0,102,126,255,255,126,10 trem 93 14576,0,8,42,42,42,8,4,4 irem 176 DATA 14584,8,28,62,28,28,28,28,28 :rem 146 DATA 14336,60,60,25,127,124,124,24, 60 irem 57 DATA 14624,64,32,15,255,131,253,253 ,108 irem 166 DATA 14632,2,4,8,255,193,191,191,54

10002 10004 10005 10006 10007

DATA ,24 DATA 2,0 DATA

irem 233

irem 10 9630 FORDL-1TO500iNEXTtIPCF%-0THEN9645 irem 83 9635 GOSUB1500IPOKE214,22iPRINTtPOKE211,l

10009

DATA

14640,30,24,23,23,64,87,151,30

10010

DATA

14648,30,151,87,64,23,23,24,30

irem 206

10011

DATA 14656,0,255,170,255,136,136,13 6,136 irem 219

10012

DATA

9640 PRINT"{WHTJTAKE ME TO THE ";F$(CF%-1 28)!iH4-1,GOSU3400iN4-01 RETURN irem 158

COMPUTE!* Gazslfo

October 1984

70

trem

217

trem 217

1,141

14664,0,255,171,255,143,143,14

:rem

208


10013

DATA 14672,15,25,41,47,47,47,31,15 srera

176

20 PRINT"{CLR}"iPOKE53280,0iPOKB53281,0iP OKE646,3

irem

189

10014 DATA 1,5,2,3,1.2,5,1,2,4,1,1,6,7,5,

25 PRINT"{5 DOWN}[10 SPACES 1PLEASE STAND

10015

DATAl,-l,40,-40,-39, 39,-41,41

30

DIMM$(50),A5(5O,100)

10016

DATA1265,1301,1545,1581,1114,1754,1 124,1764,1134,1774 : rem 157

40

A=l

10260

DATA1151,1159,1X69,1179,1429,1439,1 449,1459,1669,1679,1689,1699

2,1,6,3,5,1,2,1,1,1,1

;rem 130 irem

197

:rem

10270 10280

DATA DATA

214

1,0,216,255,255,255,40 :rem 0,169,81,133,251,169,40

78

irem 137

10290 10300

DATA DATA

133,253,169,4,133,252,133 irem 234

254,169,147,32,210,255,162

:rem

10310

DATA

26

0,160,0,169,160,145,253 :rem

10320

DATA

121

200,192,39,208,249,24,165 :rem

10330

DATA

253,105,40,133,253,144,2

10340

DATA

230,254,232,224,19,208,229

237

:rem

169

irem

10350

DATA 160,0,169,4,145,251,169

10360

DATA 255,141,15,212,169,128,141

26

:rem 136 iram 26

10370 DATA 18,212,173,27,212,41,3 irera 76 10380 DATA 133,173,170,10,168,24,1B5 tram 236

10390 10400

DATA 0,192,101,251,133,170,185 DATA

irem 226 1,192,101,252,133,171,24 irem

165

■ ram

221

10410 DATA 185,0,192,101,170,133,253 10420 DATA

185,1,192,101,171,133,254 irem 225

10430 DATA 160,0,177,253,201,160,208 10440

irem 222

DATA 18,138,145,253,169,32,145

trem 243

10450 DATA 170,165,253,133,251,165,254

irem 80

10460

DATA

133,252,76,62,192,232,138 irem 241

10470

DATA 41,3,197,173,208,189,177

10480

DATA 251,170,169,32,145,251,224

10490

DATA 4,240,26,138,10,168,162

10500 10510

DATA DATA

irera 135 2,56,165,251,249,0,192 irem B4 133,251,165,252,249,1,192

10520

DATA

133,252,202,208,238,76,62

10530 10540

DATA 192,169,1,160,0,153,0 irem 24 DATA 216,153,0,217,153,0,218

trem 205 irem 30

iram 233 irem 234

irem

10550

DATA

124

153,0,219,200,208,241,96,256 irem 125

***FIRST AID***

irem

50 READMS(A)tlFMS(A)-""THEN70 60

19

,rem 103

A«A+liGOTO50

jrem 89

70 A-liB=l

irem

0

80 READA$(A,B) 90 IFA$£A,B)-"9"THENGOTO120 100

trem 233 trem 18

IFA$(A,B)=""THENA-A+ltB=liGOTOB0

110

B-B+liGOTO80

irem

138

trem

212

130

Q-ltS=0tRR=l

irem

153

140

FORA=»lTO34iG=A

irem

120 print"{clr}"iprint"eup}(10 right} {rvsJfirst aid selectionIdown}"

trem

21

52

150 IFA>20THENIFQTHENQ=0iPRINT"fHOME} 160

{DOWN}"iS=24

irem 97

IFA>26THENG=-16+A-26

irem

85

170 PRINT"(YEL}"TAB(S)CHR$(G+64)"{CYnJ"SP C(1)M$(A)

irem 254

180 NEXT 190 POKE198.0

iren irem

216 199

200 PRINT"(HOME)[23 DOWN}ESVS}{YELJENTER [ SPACE} LETT"ER OR NUMBERttCYN}"trem 62 210 GETA5iIFA$-""THEN210

irem 73

220 A=ASC(A$)-64 irem 54 225 IFASC(AS)<49ORASC(A?)>90THEN210 trem

230

IFA<lTHENA»91+(A+15)-64

245

irem 206

240

IFA>34ORA<0THEN210

250

PRINT"{CLR}"

irera

260

FORB=1TO100

270

IFB>10ANDA-14ANDRR=1THENPRINT"

27

jrem 251 irem

99

(2 DOWN} {YELlPRESS ANY KEY TO CONTIN UElCYN}":GOSUB370 irem 189 280 PRINT"(DOWN}"A$(A,B) irem 225 290

IFA$(A,B)-""THEN310

irem 211

300

NEXT

trem 210

310 PRINT"[RVS}HIT ANY KEY TO RETURN TO M AIN MENU"

irem

320 330

POKE19B.0 GETA$iIFA$=""THEN330

irem 194 [ram 79

340

GOTO120

350

GETAStIFAS«""THEN350

173

irem 99

irem 83

360 C-VAL(A$)

trem 178

370 POKE198,0 380 GETA$!lFA$=""THEN380

trem 199 irem 89

390 PRINT"[CLR}"iRR=0iRETURN

irem 101

400 DATA" IRVSHYEL}EMERGENCY NUMBERS(CYN} trem

410 420

DATA"APPENDICITIS" DATA"ARTIF. RESPIRATION"

252

irem 112 : rr;m 232

430 DATA"BITES (ANIMAL)","BITES "BITES (SNAKE)"

(INSECT)" irem 23

440 DATA "BLEEDING (SEVERE)" irem 75 450 DATA"BONE B. JOINT INJURIES", "BRUISES" irem

460

470

DATA"BURNS

DATA"BURNS

OUS)"

(MINOR)"

(SERIOUS)","BURNS

PSY"

(Article on page 95.) REM

irem 92

irera 104

187

irem 88

(V.

SERI

irem 247

480 DATA"BURNS (CHEMICAL)","CHOKING","DRU GS" irem 115 490 DATAnEARACHE","ELECTRIC SHOCK","EPILE

First Aid 10

{SPACEjBY"

irem

151

irem 242

500 DATA"EXPOSURE TO COLD","EXPOSURE TO H EAT" irem 227 COMPUTE!! Gazelle

October 1984

159


510 520 530

DATA"FAINTING","FEVER","HEART ATTACK" ,"HERNIAS","NOSE BLEED" DATA"POISON (GAS)","POISON

HOCK","SPRAINS","STRAINS" DATA

:rem 67 (ORAL)","S

trem 204

"STROKE","SUNBURN","SUNSTROKE","

TOOTHACHE",""

irem

40

540 DATA"{RVS}lYELl{8 RIGHT}***EMERGENCY {SPACE}NUMBERS**McYN}" trem 229 550 DATA"{DOWN]POISON CONTROL CENTERt

{2 SPACES}798-6200"iDATA"DOCTORi

{2 SPACESJ823-4796"

trem 219

560 DATA"AMBULANCEs{2 SPACES}429-5111"

jrem

570 DATA"DOCTOR;(2

SPACESJ823-4796" irem

580

79

DATA"HOSPITAL:[2

DATA"POLICEi{2

SPACES)823-1000" 36

SPACESJ429-8231" irem

140

600 DATA"FIREt{2 SPACESJ823-2233" ,""

trem

610

data"(rvs3!i2

DATA"(RVS}4){oFF} N

840 850

IF ALLERGIC

:rem

DATA"(UP){3

DATA"{RVS}{13

irem 5

RIGHTjSNAKE BITES"

860 DATA"EDOWN){RVSiDlOFFl HOSPITAL."

DATA"{RVS)2)EOFF} F

VICTIM."

PART

:rem

111

irem

236

jrem

102

GET VICTIM TO

RESTRICT MOVEMENT O

880 DATA"{RVS]3){OFF] 890

7B

RIGHTjGET MEDICAL ATTENTI

ON.",""

870

REACTIO

-"

IMMOBOLIZE AFFECTED

BELOW"

trem 215

DATA"{UPj{3 RIGHTlLEVEL OF HEART." irem

163

irem

590

830

88

rightJappendicitis","

{down)[rvs]i)(off) call your doctor." irem

195

150

900 DATA"ERVS]4){oFF] APPLY CONSTRICTING [SPACEjBAND

2-4

910 DATA"[UP){3 920

N BITE

6,

INCHES"

HEART."

DATA"{RVS}5){OFF] MAKE H-WISE(NOT DEEP)"

930 DATA"EUP}E3 940

irem 119

RIGHT}ABOVE BITE f> BETWEE trem 141

INCISION LENGT trem 252

RIGHTjAT FANG MARKS."

irem

DATA"ERVS]6)EOFF! ND S. SPIT OUT."

63

FROM WOU irem 6

620 DATA"{rVS}2){OFFJ NEVER GIVE ANYTHING

950

630 DATA"{RVS}3){OFFj ICE BAG MAY REDUCE {SPACEJDISCOMFORT.","" irem 201 640 DATA"{RVS}{6 RIGHTJARTIFICIAL RESPIRA

960 DATA"{RVS]7){OFF] TREAT FOR SHOCK.","

BY MOUTH."

650

irem 88

TION"

irem 224

K."

trem

DATA"{DOWN){RVSjl)[OFF} TILT HEAD BAC

660 DATA"{RVS)2)tOFF} OW AIR

PINCH NOSE SHUT. BL

INTO{10 SPACESjVICTIM'S MOOTH.

"

i rein 93

670 DATA"ErVS}3){OFF} 680

150

40

:rem 200

DATA"{RVSj4)(OFF]

REPEAT BLOWING CYCL

E."

trem

110

690 DATA"{DOWN]{RVS}ADULT[OFF} - BREATHE [SPACE]DEEPLY EVERY 5

SECONDS."

irem

20

DATA"{RVS]CHILD{OFF] - BREATHE GENTLY EVERY 3 SECONDS.","" trem 99 710 DATA"{RVS]{13 RIGHTJANIMAL BITES"," 215

720 DATA"EdOWN](RVS}2)[OFF]

WASH WOUND WI

730 DATA"{DOWN}(RVS]3){OFF}

RESTRICT MOVE

TH

SOAP

S. WATER."

MENT OF AFFECTED

PART."

740 DATAn{DOWN}{RVS}4){OFF3

ISOLATE ANIMA

L FOR RABIES TEST.","" 750 DATAHUVSHl3 RIQHTllNSECT

ERVSjMINOR:","(RVS}1){OFF]"

trem 73 BITES11,"

trem 113

760 DATA"l2 UP}{3 RIGHT}APPLY COLD SOOTHI NG LOTIONS(CALAMINE)" irem 58

770 DATA"tRVS}SEVERE REACTIONSi","{RVSJ1) {OFF]

GIVE ARTIFICIAL RESPIRATION"

POSITION."

APPLYING

RIGHT]lF NECESSARY."

:rem

790 DATA"{RVS}2}{OFF}

ISPACEjBAND"

800 DATA"[UP]E3 ING."

irem 47

INCHES ABOVE ST irem

DATA"{RVS}3){OFF}

820

DATA"{UP}{3

ESPACEJDOWN"

75

KEEP AFFECTED PART

irera 189

RIGHTjAND APPLY ICE PACK.

irem 87 160

COMPUTE'S Gazetta

October 1984

178

trem 205

CONTROL BLEEDING BY SPACES]PRESSURE TO

,

trem 236

1000 DATA" ERVS}4) {'OFF] IF BLEEDING CONTIN 1010 1020

UES

APPLY

DIGITAL"

DATA"!UP](3 RE

RIGHT}PRESSURE AT

POINT."

irem

37

trem

71

PRESSU

DATA"{RVS}5)EOFF} ELEVATE BLEEDING P

ART OF BODYtll

SPACESlABOVE LEVEL OF

HEART."

trem 121

1030 DATA"ERVS)6)[OFF] MAINTAIN OPEN AIRW AY & GIVE VICTIM(6

1040

(SPACEJFRESH AIR."

SPACES}PLENTY OF

irem 133

DATA"{RVS]7){OFF) PREVENT LOSS OF HE AT WITH BLANKETS{6 SPACESjOVER & UND ER VICTIM.",""

1050 DATA"{9

irem 29

RIGHT} E RVS } BONE £. JOINT

RIES"

INJU

irem

114

1060 DATAMDOWN] ERVSll) {OFF} KEEP BONE EN DS &

ADJACENT JOINTS{8 SPACES}STILL. irem

1070

DATA"ERVS}2)[OFF]

1080

UNLESS ABSOLUTELYU SPACES JNECESSAR trem

DATA"(RVS]4)[OFF) (SPACE)PROTRUDING

irem

118

IF BROKEN BONE IS CONTROL{3 SPACES}

BLEEDING."

1100

101

DATA"{RVS}3){OFF} APPLY WELL PADDED ESPACEjSPLINT TO INJURED(5 SPACESlPA RT."

1090

148

DO NOT MOVE VICTIM

Y."

APPLY CONSTRICTING

RIGHT]2-4

810

79

DIRECT{5

WOUND."

irem 123

780 DATA"EUP}{3

irem

990 DATA"{RVS}3){OFF}

irem 13

trem 16

trem 126

DATA"{10 RIGHT}{RVS}SEVERE BLEEDING", "[RVS]1){OFF) CALL FOR MEDICAL ASSIST ANCE."

stop bleeding." :rem

irem 81

980 DATA"{RVS!2) [OFF] LAY VICTIM DOWN £> E LEVATE LEGS IN A{5 SPACES)SEMI-FLEXED

700

{down}(hvsJiHoff)

RIGHTlREPEAT FOR AT LEAST

MINUTES."

"

970

REMOVE MOUTH;L0OK F

OR EXHALATION."

DATA"{UP}(3

SUCK VENOM

trem

252

DATA"{2 UP}{13 RIGHT)COVER WITH CLEA N DRESSING{5 SPACESjBEFORE SPLINTING ."

irem

209

1110 DATA"{RVS}5){OFF} TREAT FOR SHOCK.", 1120 DATA"{15 RIGHT){RVS]BRUISES"

irem

160

irem 4


1130 DATA"{DOWN}(RVSjl){OPF} APPLY COLD C LOTH OR ICE PACK TOt9 SPACES}RELIEVE PAIN

AND"

trem 143

1140 DATA"{2 UP}{19 RIGHT} G.",""

REDUCE SWELLIN irent 40

1150 DATA"£7 RIGHT)(RVSjMINOR BURNS(1ST D EGREE)"

irem 230

1160 data"{downHrvs}i){off} DENED SKIN

IN

submerge red

COLD WATER."

:rem 105

1170 DATA"ERVS}2)lOFF} APPLY DRY DRESSING IF NECESSARY.",""

irem 212

1180 DATA"{6 RIGHT]{RVSlSERIOUS BURNS(2ND DEGREE)" :rero 93 1190 DATA"{DOWN}(RVSjl)(OFF} SUBMERGE BLI STERED SKIN IN COLDf9 SPACES)(NOT IC E)

1200

WATER."

irem 226

DATA"{RVS}2){OFF} APPLY CLEAN CLOTHS SOAKED IN

ICE{8 SPACESJWATER."

:rem 166

1210 DATA"[RVS}3)fOFF]

APPLY PROTECTIVE B

ANDAGE."

irem 189

1220 DATA"{RVS}4)(OFF}

ELEVATE AFFECTED P

ARTS.",""

:rern 132

S{3RD DEGREE)"

irem 135

1230 DATA"(5

RIGHT){RVSjVEHY SERIOUS BURN

1240 data"{down}Ervs)1){off} do not remov e adhered particles of{6 spacesjclot

RIGHTJDISLODGED" irem

84

1430 DATA"fUP}{3 SPACES}ADMINISTER ARTIFI CIAL

RESPIRATION."

:rem 253

1440 DATA"{UP](3 SPACESjGET PROMPT MEDICA L ATTENTION.",""

trem 189

1450 DATA"{6 SPACES!{ll

RIGHTj{RVS}DRUGS" irem

254

1460 DATA"{DOWN}(RVSll){OFF} KEEP AIRWAY ESPACElOPEN; GIVE ARTIFICIAL" irem

154

1470 DATA"{UP}{3 RIGHTWENTILATION OR CPR IF

NEEDED."

irem

71

1480 DATA"{RVS)2){OFF) TREAT FOR SHOCK." irem

1490 DATA"(RVS}3){OFF}

55

PLACE UNCONSCIOUS

(SPACE)VICTIM IN A 3"

irem 193

1491 DATA"EUP}(3 SPACES}QUARTERS PRONE PO SITION."

1500 data"{rvs!4)[off} M

1510

1520

trem

92

irem

85

protect victim fro

INJURY."

DATA"{RVS)5)EOFF) HALLUCINOGENIC VIC TIMS MAY NEED{9 SPACESJCAREFUL ATTEN TION."

DATA"{RVS}6){OFF}

irem

ITAL.",""

1530 DATA"{16

52

GET VICTIM TO HOSP trem

122

RIGHT}{RVS}EARACHE"trem 242

:rem 52

1540 data"(down]{rvs!D{off} call your do

DATA"{RVS]2){OFF} ELEVATE AFFECTED P ARTS ABOVE VICTIM'S{3 SPACES(HEART."

1550 DATA"{RVS}2){0FF} APPLY ICE BAG OR H OT WATER BOTTLE;{6 SPACESJWHICHEVER {SPACE}GIVES RELIEF." irem 101 1560 DATA"","{9 SPACES}(RVS](2 RIGHT)ELEC

HING

FROM CHARRED"

1250 DATA"{2 UP}{25 RIGHTJSKIN."

1260

1420 DATA"{2 UP)(22

:rem 128

:rem 61

1270 DATA"{RVS)3)(OFF} COVER BURNS WITH C

LEAN THICK{12 SPACES}DRESSINGS-NO 01 NTMENTS."

",""

1580 DATA"(RVS!2){0FF} REMOVE ELECTRIC CO NTACT FROM VICTIM{5 SPACESjwiTH DRY {SPACElWOOD OR DRY" trem 68 1590 DATA"{2 UP}(24 RIGHTjCLOTH.","[RVS}3

T

irem 181

L BURNS"

trem 83

CTRICITY

R MORE MINUTES WITH LARGE[3 SPACES}A

MOUNTS OF WATER."

!rem 141

NG;

irem 252

1310 DATA"{RVS}2)(OFF} APPLY CLEAN DRESSI HOSPITAL",""

1320 data"(8 right}{7 spaces}{rvsjchoking

","[rvs}i){off!

if victim can cough,

BREATHE,OR TALK,"

1330 DATA"|2 UP}{3

,

GIVE

4

"{rvs}5)Eoff} call your doctor.","" irem

1620 DATA"(DOWN)[RVS}1)EOFF} PREVENT VICT

IM FROM INJURING HIMSELFE4 SPACES)BU

T

73

IF VICTIM STILL CA

BREATHEf3 SPACESjOR TALK :rem 65

BLADES,"

IS

DISLODGED."

1400 DATA"(RVSJ4)(OFF! LD.HOLD UPSIDE

BE"

trem

190

R;

KEEP

VICTIM

WARM",""

D)"

irem 9

(TO COL

irem 12

1660 DATA"(DOWN){RVS)l){OFF} COVER FROZEN PART.","(RVS}2){OFF}

PROVIDE EXTRA

{SPACEjCLOTHING BLANKETS."

:rem 216

1680 DATA"ErVS)4){OFF}

IMMERSE FROZEN PAR

25

SPACESJ& SLAP

trem 106

IF BREATHING HAS S

TOPPED & FOREIGN{5 SPACES^MATERIAL C ANNOT

205

:rem 216

IF VICTIM IS A CHI

(SPACE)SHARPLY ON BACK."

1410 DATA"{RVS}5}{0FF}

irem

BRING INDOORS."

!rem

DOWN(3

RESTRAIN."

1670 DATA"{RVS}3){0FF}

1390 DATA"(UP}{3 SPACES)REPEAT UNTIL OBJE CT

NOT

trem 136

1380 DATA"{UPH3 SPACES iFOLLOWED BY 4 ABD OMINAL THRUSTS."

DO

1650 DATA"(11 RIGHT){RVS}EXPOSURE

1370 DATA"[UP}{3 SPACESJBLOWS BETWEEN SHO ULDER

194

1610 DATA"[14 RIGHT}{RVS)EPILEPSY"trem 57

1640 DATA"{RVS}3){0FFl LOOSEN TIGHT COLLA

irem

SHARP"

160

irem 210

1350 DATA"{2 UP}(22 RIGHTjCOUGHING." NNOT COUGH,

trem

1630 DATA"ERVS)2)JOFF} INSERT CLOTH BETWE EN TEETH TO PR0TECTE3 SPACESJTONGUE.

1340 DATA"(RVS}2){0FF} IF VICTIM IS CLUTC HING THROAT,{10 SPACES 3ENCOURAGE VIG

1360 DATA"{RVS}3){0FF}

189

118

irem

OROUS"

srem

1600 data"ervs}4)eoff) keep victim warm."

trem 126

RIGHTjDO NOTHING."

IF POSSIBLE."

){OFF} GIVE ARTIFICIAL RESPIRATION."

1300 DATA"{DOWNHRVS}lJfOFFj WASH FOR 5 0

TO

trem 169

SHOCK"

SPACES}HOSPITAL.

1290 DATA"{3 RIGHT}(9 SPACES}(RVS)CHEMICA

GET

TRIC

1570 data"{down} (rvs}i){off) turn off ele

TREAT FOR SHOCK,

HEN GET VICTIM TO{5

:rem 155

174

rrem

1280 DATA"{RVS}4)(OFF}

CTOR."

irem 13

1681

T

IN WARM

WATER"

DATA"{UP}{3 GENTLY"

irem

234

trem

156

SPACES}(102-105F)OR WRAP ,rem

90

1690 DATA"{UP!{3 RIGHTjlN WARM BLANKETS.

{SPACE}DO NOT RUB."

trem 1

1700 DATA"{RVS}5)E0FF} DO NOT APPLY HEAT, HEAT LAMPS, OR HOT{3 SPACES)WATER B OTTLES."

irem

COMPUTE'S Gazette

October 1984

165

161


1710

1720 1730

DATA"[RVSJ6)EOFF}

ELEVATE AFFECTED P

2000

DATA"lRVS)5)[OFF} COVER WITH BLANKET & TAKE TO HOSPITAL[3 SPACESjlN THIS

irem 10

2010

DATA"Jl6

SPACESjTO irem 47

2020

DATA" (DOWN) [RVSlDEOFFj TIP HEAD FOR WARD, BLOW NOSE TO REMOVE{3 SPACESlA

NDITIONING TO{9 SPACES}PROMOTE COOLI

2030

ART.",""

irem 55

)"

DATA"{11- RIGHT}(RVS}EXPOSURE(TO HEAT DATA"[DOWN)ERVSll){OFF} APPLY COLD W

ATER OR RUBBING ALCOHOL(5 (SPACE]BARE SKIN." 1740

DATA"(RVSl2)[OFF)

trem

IS

X780

THAN BODY."

DATA"[RVS]2){OFFJ

data"[down) (rvsHHoff}

place

irem 143

LOOSEN CLOTHING &

191

& UPON REVIVAL!(6 SPACES}COFFEE,

1810

1820

AIR.",""

DATA"{16 RIGHT){RVSJfEVER"

data"[down)(rvs}i)(off}

irem 130

increase flu

id intake.' 1830

irem

data"(rvs)2)(off)

DO

NOT

COVER

SIVELY." 1840

data"(rvs}3)[off}

GIVE

data"[rvs}4)(off}

AC

SPONGES irem

WI

DATA"lRVS}5)[OFF}

1910

1920

1930 1940

irem 95

RIGHTjNAUSEATED."

2130

data"{rvs}2)[off} get medical help ■'■ call poison{10 spaces)control cente

irem

r"

SPACESJCOMFORTAB

2170

DATA"lRVS}4)[OFF}

132

STOPPED."

irem 140

data"[rvs)4)Eoff] give cpr if there [space)is no pulse(11 spaces)(if tra

23

irem

110

do not induce vomi

TING UNLESS SO[8 SPACESJaDVISED BY P

trem 190 RIGHTjCONTROL CENTER. irem

DO

186

NOT NEUTRALIZE.

DO NOT GIVE OLIVE[4 SPACESlOIL OR O

THER 2180

23

:rem

OISON" DATA"[2 UP}(21

OILS."

:rem 120

DATA"(RVS)5)[OFF} KEEP AIRWAY OPEN. [SPACE)ADMINISTER(12 SPACES}ARTIFICI AL

RESPIRATION"

irem 149

2190

DATA"[2 UP)(26 RIGHTjlF NEEDED."

trem

160

INED)."

data"Ervs}5)[off} check victim for e mergency medical[6 spaces 3informatio

irem 24

2200

DATA"(RVS}6)[OFF}

TREAT FOR SHOCK."

N

irem

55

2210

DATA"[RVS}7)[OFF}

SAVE

195

2220

DATA"[17

2230

data"ErvsJi)(off} [SPACEjDOWN."

&"

DATA"E2

UP}[17

RIGHTlPRESCRIPTION FO

r"

irem

DATA"[UP}[3 SPACESjMEDICINE.

ADMINIS

TER IF PATIENT IS(6 SPACES]CONSCIOUS irem

173

DATA"t8 RIGHT}{8 SPACES!tRVS}HERNIAS DATA" [DOWNHrVSJI) [OFF}- LAY VICTIM O

N BACK WITH KNEES til SPACES}WELL DRA

2240

DAGE AROUNDtll

place a cravat ban

SPACES1THIGHS AND TIE

."

ITY."

COMPUTE!* Gazette

trem

October 1964

53

trem 251

RIGHT}[RVS)SHOCKEdOWN}"

DATA"ERVS}2)(OFF} ST INJURY,

172

keep victim lying irem 253

IF HEAD AND/OR CHE

RAISE(6 SPACESjHEAD & SHO

DATA"{RVS)3)[OFF}

irem 128

IF IT WILL NOT AGG

RAVATE ANY INJURY,{4 SPACES)RAISE FE DATA"(RVS}4)(OFF}

trem 201

KEEP PATIENT WARM,

PREVENT LOSS OF[6 SPACES}BODY HEAT. trem

DATA"ERVS}5)[OFF)

TREAT

data"(rvs}6)[off)

get

TOPPAGE,

62

FOR BREATH

BLEEDING,[4 SPACESjPAIN," irem

2280

50

CONTAI

trem

H 2270

LABEL,

NER OR VOMITUS.",""

ET." 2260

irem 234

DATA"[RVS}3)(OFF) PUT BLANKET UNDER [SPACE]KNEES." irem 76 1990 DATA"(RVS}4)[OFF} DO NOT TRY TO FORC E PROTRUSION[l0 SPACESjBACK INTO CAV

trem

ULDERS." 2250

(rem 210

data"Ervs}2)Eoff}

1980

162

IF"

DATA"{2 UP)[18

2160

trem

WN UP." 1970

n with water or milk.[7 spaces)disco NTINUS

irem 49 1960

trem 80

dilute poiso

28

POSITION."

.H,"" 1950

data"{down){rvsJi)[off}

data"Ervs}3)[off}

DATA"[RVS}3){OFF} ADMINISTER ARTIFIC IAL RESPIRATION IF[4 SPACESJBREATHIN

59

RIGHT}[RVS)POISONING BY MOU

2150

DATA"[RVS)2)tOFF) KEEP VICTIM LYING

G HAS

WARM.

31

(SPE

RE

171

:rem

DATA"[2 UP}[18 RIGHT}IMMEDIATLY."

DATA"(RVSjl)(OFF) CALL HOSPITAL

LE

PATIENT

2140

:rem

1900

KEEP

F

231

ARTIFICIAL

3

DATA"{15 RIGHT}[RVS}HEART ATTACK"

[SPACElDOWN IN A[13

198

2120

CIFY NEED(13 SPACESlFOR OXYGEN)." 1890

GIVE

TH"

134

irem

1880

irem

VICTIM TO

irem

DATA"{11

CALL YOUR DOCTOR." : rem

1870

DATA"[RVS}5)[OFF}

2100 2110

152

irem

DATA"(RVS}6)[OFFj

174

OR

REMOVE

AIR."

2090

trem 247 COOLING

data"[rvs}4)[off}

SPIRATION."

EXCES

ASPIRIN

th water only." 1860

224

trem

etaminophen." 1850

FR

irem 119

2080

irem

DATA"IRVS!) 3)(OFF) SHUT OFF GAS OR ST

RESH

DATA"[RVS}3)[OFF) USE SHELLING SALTS ESH

ctor.","[rvs}2)[offj open or break w OP MOTOR."

2070

[shift-spaceJapply cold cloths."

trem 161

call your do

INDOWS, 2060

F

RIGHT}{RVS)POISONING BY GAS

"

in lyi

irem 215

NOSTRILS

irem 2

2050

irem 1800

ES.",""

irem 203

DATAH(l5 RIGHT}(RVSjFAINTING"irem 66

148

IRMLY TOGETHER FOR{4 SPACES)10 MINUT

DATA"(11

ng position with head(7 spaces}lower 1790

SQUEEZE

2040

DATA"(RVS}4)EOFF} GUARD AGAINST OVER data"(down}(rvs}i)(off}

DATA"{RVS)2)(OFF)

irem 2

REDUCED"

CHILLING.",""

1770

LL CLOTS."

DATA"{RVS}3)(OFF) CONTINUE UNTIL TEM PERATURE

1760

66

:rem 18

RIGHT}(RVS}NOSE BLEED"

irem

USE FANS OR AIR CO

NG." 1750

POSITION.",""

prompt

S

147

medical


ASSISTANCE.",""

irem 106

2290 DATA"[8 RIGHT}{7 SPACES}{RVS}SPRAINS :rem

69

2300 DATA"{dOWN}(RVS)l)(OFF} ELEVATE INJU RED AREA;

E

REST."

PLACE AT 110 SPACES}COMPLET trem 92

2310 DATA"!rVS}2)[OFF} APPLY ICE BAG, COL D CLOTH, OR(11 SPACESJCHEMICAL COLD {SPACEjPACK." irem 126 2320 DATA"{RVS}3)(OFF} IF SWELLING & PAIN CONTINUE SEE{9 SPACES}DOCTOR.","" trem

18

2330

DATA"[7 RIGHT}{7 SPACES}(RVSJSTRAINS

2340

data"{down}{rvs}i

2350

omfortable."

2370

DATA"{RVS}3){OFF} (SPACEjAT REST."

t rem

62

WET TOW trem 109

data"{rvs}4){off} get medical attent trem 222 trem 43

DATA"fl6 RIGHT}ERVS}STROKE" irem 231 data"{rvs)D(off} cold cloth on fore

HEAD." 2390

39

KEEP INJURED AREA trem 121

ION." 2380 DATA""

2382 2385

irem

(Article on page 80.)

Program 1: fcuiz Generator 10

irem 211

data"£rvs}2){off) turn head op'vomit

2400

100),E$(100),M$(15)

AND NOTHING BY{7 SPACESImoUTH."

:rem

64

2410

DATA"{RVS}4){OFF) CALL YOUR DOCTOR."

2420

DATA""

irem

2430

13B

GOTO50

{DOWN}1)[OFF} APPLY BURN CREAM OR PE

TROLEUM

JELLY.

i rem

201

2440 DATA"{RVS}2){OFF] CALL DOCTOR IF FEV ER,

CHILLS,

CUR."

OM FURTHER SUN."

2470

2480

50

POKE53272,23tGOTO970

trem

irem

80 GOSUB1830:GOSUB1360:GOSUB2070 90

PRINT"ENTER

NUMBER OF TEST

TO

NPUTN

100

LOAD:"tI ;rem

IFN<0ORN>XTHENPRINT"INVALID TO90

99

:rem 187 235

RANGE"iGO irem 175

110 NS=M$(N);PRINTSPC(12)"[CLR}{RVS}

{6 D0WN}{9 RIGHTj{3 SPACES}LOADING

(SHIFT-SPACE}DATA{3 SHIFT-SPACEj"

:rem

120

ILE,S,R":X=0

:rem

1*30 X=X+1

140

30

GOSUB1830:GOSUB2150:OPEN2,8,2,+N$+"

:rem

F 21

221

INPUT#2,Q$(X)tINPUT#2,A$(X):INPUT#2,B $(X}iINPUT#2,C$(X):INPUT#2,D${X)IINPU

150

T#2,E$(X) IFST AND64THEN170

:rem 139 :rem 208

160 170

GOTO130 CLOSE2:POKE198,0tL=X:N=X:T=0

trem 100 trem 218

IFR=1THEN240 :rem GOSUB2150:GOSUB2070iGOSUB1670:rem IFH=0THEN970 :rem IFH=1THEN240 trem

173 237 165 157 211

70

220

REM

230

PRINT"(CLR}[DOWNJENTER NAME FOR QUIZ"

240

K=N+1tPRINT"{CLR}":PRINTSPC(13)"{RVS} QUIZ MASTER {OFF}" trem 200

,rem

DATA"{13 RIGHT}(RVS}TOOTHACHEK, (DOWN}{RVS}1)(OFF} NO TREATMENT."

143

irem 77

DATA"{RVS}2)(OFF} APPLY COLD COMPRES

INPUT

QUESTIONS

trem

tINPUTN$:GOSUB1460:N=0

250

irem 252

DATA"{RVS}4){OFF) DO NOT GIVE STIMUL ANTS.",

2500

59

60 PRINT"{CLR)"iCLR :rem 229 70 DIMQ$(100),AS(100),B$(100),C$<100),D${ 100),E?(100),MS<15),SN$(400),G(400)

trem

data"{rvs}3){off} sponge entire body WATER."

110

trem

12

" item 160 DATA"{RVS}2){OFF} MOVE PATIENT TO A (SPACE}COOL, SHADY SPOT." irem 160 COLD

3,34:POKE634,20:POKE635,5:RETURN

irem

DATA"{15 RIGHT}{RVS}SUNSTROKE", {RVS}{DOWN}1){OFF} CALL YOUR DOCTOR.

WITH

2490

,

217

180 190 200 210

AND(7 SPACESJSICKNESS OC

2450 DATA"(RVS}3)[OFF} PROTECT REDNESS FR 2460

;rem

POKE198,6:POKE631,30:POKE632,34tPOKE63

irem 38

DATA"{15 RIGHT}{RVS}SUNBURN","(RVS}

irem 48

40

147

data"{rvs}3){off} give no stimulants

MASTER GENERATOR

30 PRINT"{WHT}"tPOKE53280,13:POKE53281,5:

ing patient to(8 spaces}side."

trem

REM QUIZ

20 DIMQ$(100),A$(100),B$(100),C$(100),D$(

get victim c

DATA"{RVS}2){OFF} APPLY HOT, EL."

2360

{off}

Quiz Master

PRINT:PRINT"{RVS}

trem

15

WARMING 1{2 SPACESjD

O NOT EXCEED 80 CHARACTERS {2 SPACES j""" :rem

114

260

PRINT:PRINT"(RVS}(7 SPACESjENTER £ T O EXIT ROUTINE[10 SPACES}" " trem 159 270 IFN>=100THENPRINT"{CLR}{5 DOWN]

{14 SPACES j FILE{SHIFT-SPACE}FULL"i FOR

T=lTO2000iNEXTtGOTO980

irem

GOSUB40

290

H=0

300

PRINT"ENTER QUESTION

310 320

INPUTQ$(N) IFQ$(N)=""THEN310

330

IFQ$(N)=CHR${92)THENN=N-1tGOTO770 :rem

170

340

IFLEN(Q$(N))>B0THENGOSUB1290

rem

139

Before typing in programs, please refer to "How

350 360

IFH=1THEN240 PRINT"ENTER FIRST

rem

162

Beginner's Guide To Typing In Programs," and

370

INPUT"A.

the Program Listings.

380

IFASC{A$(N))=92THENN=N-1:GOTO770

SES UNTIL YOU GET{5 SPACESjTO THE DE

HTIST.","" 2520 DATA"9"

trem 119 ,rem 96

BEFORE TYPING... To Type COMPUTERS Gazette Programs," "A

"The Automatic Proofreader" that appear before

trem

50

280

2510

126

t rem

80

#";N:PRINT irem

205

:rem rem

56 124

ANSWER:":PRINTtGOSU

B40tH=0

;rem

206

";A?(N!:IFA?(N)=""THEW370 irem

:rem COMPUTE'S Gazette

51 117

October 19S4

163


390

A?(N)="A.

400

IFLEN(A$(N))>S0THENGOSUB1290

"+A${N)

:rem 191

410

420

IFH=1THENGOTO360 PRINT"ENTER SECOND

430

UB40:H=0 INPUT"B.

440

IFASC(BS(N))=92THENN=N-1:GOTO770

: rein

:rem 219 ANSWER:":PRINTsGOS

:rem 255 ";BS(N)sIFB$(N)=""THEN430 :rem

450

B$(N)="B.

"+BS(N)

48

irem

153

N$:GOSUB

:rem 17 irem

201

irem

197

191

920

S$=STR$(N)+".

930 940

REM ANSWER CHOICES srem 78 S$=A$(N)sGOSUB1190:S$=B$(N)iGOSUB1190

127

:rem

222

480

PRINT"ENTER THIRD B40:H=0

490

INPUT"C.

ANSWER:":PRINT:GOSU :rem 196

";CS(N)sIFCS(N)=""THEN490

113

960

IFASC(CS(N))=92THENN=N-1:GOTO770

510 520

C$(N)="C. "+C$(N) IFLEN(C$(N))>S0THENGOSUB1290

:rem 191 :rem 125

530

IFH=1THENGOTO480

:rem 225

540

PRINT"ENTER

=rem

51

:S$=C?(N):GOSUB1190iSS=D$(N);GOSUB119 0

950

500

"+Q$(N):PRINT:GOSUB1190 :rem

63

:rem

t rem

PRINTiPRINT"CORRECT ANSWER TTAB(7)E$(N)SGOSUB2070 GOSUB1670:NEXT:RETURN

69

IS:

"tPRIN irem 31 :rem 128

970 REM PROGRAM MENU 980 H=0

irem 209 :rem 86

990

PRINT"tCLR}":POKE53280,13:POKE53281,5

jrem ";D$(N):IFD?(N)=""THEN550

30

1000 GOSUB2070

irem 206 :rem 10

1010

:rem 127

60

1020

P=0

:rem

120

1030

PRINT:PRINTSPC(5)"ENTER

1040

NCTIONi" PRINT:PRINTSPC{8)"1.

ENTER

10.50

PRINT:PRINTSPC(8)"2

REVIEW

QUESTION

CHANGE

A QUESTI

FOURTH

ANSWER:"sPRINT:GOS

IFASC(D$(N))=92THENN=N-1:GOTO770 :rem

"+D$(N)

:rem 200

590

IFLEN{D$(N))>80THENGOSUB1290 IFH=1THENGOTO540

600

PRINT"ENTER

610

":PRINTsH=0 :rem 28 INPUTES(N):IFE$(N)=""THEN610 :rem 71 IFASC(E5(N)>=92THENN=N-1:GOSUB770:GOT

620

123

880 GOSUB2070:Y=1:PRINT"tCLR}(DOWN}" 890 PRINTiPRINTTAB(20-LEN(N$)/2 1670;PRINT"(2 DOWN}" 900 FORTJ=lTOLiPRINT" tCLR}"

40

irem

:rem

:rem

D$(N)="D.

ROUTINE

IFQS(N)=>""THENGOTO960

IFH=1THENGOTO420

580

:rem

REVIEW

910

IFLEN(B$(N))>80THENGOSUB1290

570

REM

115

460

560

URN

870

:rem

470

UB40:H=0 550 INPUT"D.

860 GOSUB1670:N=W-1iGOSUB240 tGOSUB770:RET

120

LETTER

OF

:rem :rem

CORRECT

132 228

ANSWER:

1060

PRINTSPC(13)"{D0WNj(RVSl QUIZ

tSHIFT-SPACE]MASTER "

IONS"

" :rem 7

NUMBER OF FU

"

srem 196 NEW QUEST

:rem 222 ;rem

S"

PRINT:PRINTSPC(8)"3

trem

ON"

1070

202

PRINT:PRINTSPC(8)"4

142

LOAD £REVIOUS

D

0990

rem

210

IFLEN{E$(N))< >1THENG0SUB1290 IFE$(N)="A"THEN690 IFE$(N)="B"THEN690

rem

134

rem

193

rem

19 5

IFE$(N)="C"THEN690 IFES(N)="D"THEN690

rem

197

670 680

PRINT"tRVS}

690

IFH=1THEN600

:rem 17 rem 169

1110 PRINT:PRINTSPC(5)"NUMBER?" 1120 GETG$:IFG$=""THEN1120

700

IFP=1THENRETURN

rem

243

1130

G=ASC(G?)-48:IFG<1ORG>8THEN1120

710

L=N:GOSUB2070:IFN=100THEN730

rem

160

720

GOTO240

rem

104

1140

ONGGOSUB230,880,820,60,1640,1730,117

730

PRINT:PRINTSPC(7)"FILE

630 640 650 660

ERROR;

rem 199 RE-ENTER":GOTO610

CONTAINS

NTRIES."

TO

TEST

IN

srem 22 INITIALIZE

DISK 210

irem

1100

PRINT:PRINTSPC(8)"7.

END"

:rem 133 irem 79 irem 183 -. rem

67

0

irem

198

1150

GOTO990

:rem

162

OPEN

1160

GOSUB2070

E

srem 17

PRINT:PRINT"DATA

140

1170

POKE198,0:SYS198

srem

209

750

GOSUB1720:GOSUB770:GOTO990

:rem 83

1180

REM

:rem

105

760

REM

:rem

40

1190

88

770

GOSUB2070:PRINTSPC(10)"{RVS]

ST

1200

:rem PRINT IFLEN(S$)<40THENPRINTSS:GOTO1280 irem

10

780

GOSUB1830:OPEN2,8,2,"@0i"+N$+"

790

FORX=1TOL:PRINT#2,Q$(X):PRINT#2,A$(X) :PRINT#2,BS(X):PRINT#2,C$(X):PRINT*2,

TEXT STORE

ORING

FILE"

rem

DATA

DATA

WAIT,

":GOSUB2150

,W"

:rem

147

:rem 211

CLOSE2:POKE198,0:GOSUB2150:GOSUB2070: GOSUB1670:RETURN CHANGE

ANSWER

:rem

78

810

REM

820

GOSUB2070:P=l:PRINT"fCLR}(3 DOWN} tRVS} ENTER NUMBER OF QUESTION":INPUT W

830

PRINT"JCLR}(2

:rem

:rem

243

90sS$=A$(W):GOSUB1190sS$=BS(W):GOSUB1 :rem

178

840

S$=C$(W)sGOSUB1190:S$=D${W):GOSUBU90

850

PRINT"CORRECT

:rem

ANSWER

164

COMPUTE'S GazBtle

October 1984

103

IS:"tPRINTE$(W) irem

JUSTIFY

1210 X=40:Y=1 1220 X=X-1 1230

:rem 190 srem 16

TF*SC(MID$(S5,X,Y)+CHRS(0))<>32THEH1

220

:rem 204

1240 1250 1260 1270

PRINTLEFT$(S$,X) Z=LEN(S$) Z-Z-X PRINTRIGHT${S$,Z)

irem 239 iram 6 t rein 63

1280

RETURN

1290

PRINT"ENTRY

1300

H=liFORT=1TO2000iNEXTiRETURN

TOO

LONGi

irem irem

126

1310

1320

71 171

RE-PHRASE"

179

DOWN}"sSS=QS(W):GOSUB11

190

PRINT

63

FILE.S

:rem

D$(X):PRINT#2,E$(X)sNEXT 800

STORED.

ADD

740

NEW

BE

irem 104

248

100

rem WILL

ATA" 1080 PRINT:PRINTSPC{8)"5 [SPACE}FILE" 1090 PRINTiPRINTSPC(8)"6

trem

18

irem

85

REM TEST TITLE FILE trem 139 PRINT:PRINT"HAS TEST TITLE FILE BEEN INITIATED?(Y/N)":GOSUB2070 :rem 186

1330 GETG?!lFG$»""THEN1330

srem 189

1340

IF G$="N"THEN1460

srem

1350

IFG$o"Y"THEN1330

srem 208

139


1360

PRINTtPRINTSPC(17)"{RVS}

WAIT

1370

srem 72 GOSUB2150:GOSUB1830:OPEN3,8,3,"TEST

1860 PRINT"{2 D0WN1U5 SPACES}{RVSJ WARN I

{SPACE)TITLES,S,R"

rem

125

1380 1390

X=0

rem

145

1870 PRINT"{2 SPACES]{RVS]

rem

124

1400

IFST

1410

GOTO1390

1420

CLOSE3:POKE198,0:GOSUB2150

:rem 89

1430

IFS1O0THEN2110

rem

120

1440

PRINT"tCLR}":PRINTSPC(14)"TEST TITLE rem

176

X=X+liINPUT#3,M${X) AND64THEN1420

PORA=1TOX:PRINTA;".

";M$(A)sNEXT:RET

URN

1460

REM

INITIATE

TEST

FILE

1470

IFX=15THENGOSUB1710

1480 1490

IF X=15THENX=1 IFX=1THEN1600

1500

:rem

225

:rem

102

:rem

206

:rem :rem

76 25

PRINT"(CLR)HAS FILE OF TEST

NAMES

BE

1510

EN STARTED?" GETG?:IFG$=""THEN1510

:rem 95 :rem 189

1520 1530

IF G$="N"THEN1600 IFGS="Y"THENGOSUB1370

irem 135 :rem 23

1550

PRINT"_IS YOUR

1540 PRINTX+1".

(RVS)"N$

TITLE

irem 1

ORIGINAL?" srem

GETG$sIFGS=""THEN1560 IF G$="Y"THEN1600 PRINT"ENTER NEW TITLE

1590

INPUTNS

:rem :rem

106 209

1600

M5(X+1)=NS:GOSUB2070

• rem

111

1610

PRINT:PRINTSPC{13)"[RVS}

1620

E " GOSUB1830:OPEN3,8,3,"^0!TEST

:rem 199 :rem 151 TEST:"

FOR

S,W"

{7 SPACES][SHIFT-SPACE}ARE

[SHIFT-SPACE jYOU{SHIFT-SPACE)SURE?

Y/N) (9 SPACEST"

1890 GETG$:IFG$=""THEN1890 IFG$="Y"THEN1930 IFG$="N"THEN990

:rem 211

1920

GOTO1890

;rem 215

1940

INPUTDN$ " IFLEN(DN$)>15THENPRINT"{2

1930

CLR R=1:GOSUB70:R=0:GOTO990

EXTtGOTO1930

1670

PRINT:PRINTTAB(5)"{RVS}

PRESS

POKE53281,2:POKE53280,2:PRINT"[CLR]

[5 DOWN}[10 SPACES}LASTJSHIFT-SPACE]

1970

1690

RETURN

:rem

0

176

1700 PRINT"(CLRi" :rem 44 1710 PRINTSPC{10)"(CLR}{10 DOWNjFILE FULL 1720

FORT=1TO2000:NEXT:RETURN

1730

PRINT"(CLR]{2 YOU

WANT

TO

DOWNjtRVS3{2

INITIALIZE

A

srem

194

:rem

107

"

{Y/N)

(SHIFT-SPACE jANY(SHIFT-SPACE}KEY

"

:rem

18

2010

MATTED—WAIT" irem 171 OPEN15,8,15sPRINT*15,"N0:"+DNS+" , "+I

IS{SHIFT-SPACE)BEINgTsHIFT-SPACE}F0R

2020

S 33 INPUT#15,S1,S$,S2,S3:CLOSE15:IFS1<>0 THEN2110:GOSUB2050 :rem 20

PRINT"{CLR]E10 DOWN}[9 SPACES}DISK

[SHIFT-SPACE}FORMATTED[SHIFT-SPACE}" bFORT=1TO2000sNEXT

:rem

37

2040

POKE53280,13:POKE53281I5:GOTO990

2050

FORT=lTO1000!NEXT:POKE53 280,13iPOKE5

2060

REM SOUND

2070

S=54272

2080

POKES, 100iPOKES+1, 125 sPOKES-t-5 ,0:POKE

:rem

3281,5:RETURN

105

:rem 47

ROUTINE

srem

91

srem 93

S+6,240 s POKES+24,15:POKES+4,17

2100

171

irem 90 srem 224

PRINT"{CLR]{4 DOWN}DISK{SHIFT-SPACE]

2090

: rem

srem 30

PRINT!PRINT"[9 SPACES)PRESS

2000

SPACESjDO

NEW DISK?

[SPACE)"iPRINTTAB(17)"{RVSJ

OP111"

(SHIFT-SPACE)TOE SHIFT-SPACE)STOP 111"

1680 GETG$sIFASC(GS+CHRS(0})<>32THEN1680 : rem

CHARACTER DISK :rem 142

CHANCE{SHIFT-SPACE jTOfSHIFT-SPACE J^T

(SHIFT-SPACE)TOjSHIFT-SPACE)CONTINUE jrem 61

55

1960

2030

{SHIFT-SPACE jSPACES SHIFT-SPACE}BAR

;rem

PRINT"[2 DOWNjENTER 2 I.D.":INPUTID^

97

srem 173 :rem 188

(OFF]"

{SHIFT-SPACE}TOO[SHIFT-SPACE]LONG, T

1950

168

1650 1660

:rem 88 DOWN]NAME

RY{SHIFT-SPACEJAGAIN";FORT=1TO1000sN

NEXT

:rem

srem 154 ;rem 101

PRINT"[CLR}[2 DOWNjENTER DISKNAME";;

1990

REM

(

:7ii~174

1900 1910

srem 87 TITLES,

1640

ROUTINE

1880 PRINT"(2 SPACES][RVS}(SHIFT-SPACE]

jFORT=1TO1000 GETG5:IFG$o""THEN990

:rem

:rem 205

DISK

(SHI FT-SPACE }]Ji[ SHIFT-SPACE} ABOUT 1 SHIFT-SPACE}TO[SHIFT-SPACE]BE jSHIFT-SPACE}ERASED!" :rem 101

1980

FORA=1TOX+1:PRINT#3,M$(A):NEXT:CLOSE 3:POKE198,0:GOSUB2150:RETURN :rem 98

:rem 72

{SHIFT-SPACE}IN{SHIFT-SPACE]DRIVE

TITL

SAVING

1630

ADDITION

NGI1 I"

29

1560 1570 1580

TEST

{17 RIGHT){RVS) WAIT1730

:rem 46 rem 204

S"sPRINT

1450

"

srem

FORT=0TO100:NEXT POKES+4,0:RETURN

202

srem 32 srem 26

2110

PRINT"DISK{SHIFT-SPACE]ERROR ";S1,S5

2120

PRINTsPRINT"CORRECT

1740

GETGS:IFG$=""THEN1740

:rem

199

1750

IFG$="Y"THENPRINT"TYPE GOTO

1790

AND

1760

IFG5<>"N''THEN1740

:rem 207

2130

1770

IFG$="N"THENRETURN

:rem 167

2140

1780

GOSUB1670 GOTO980

END

:rem

2150

OPEN15,8,15:INPUT#15,S1,S$,S2,S3:CLO

PRESS

1790 1800

RETURN":END

srem 62

167

PRINT"[CLR}(5 DOWN}(6 SPACES )HJSERT [SPACElNEW DISK INTO DRIVE :rem 6 PRINT"{4 DOWNH2 SPACES]PRESS ANY KE Y

WHEN

READY

TO

PROCEED"

,S2,S3

trem

:rem 20 :rem 161

SE15:IFSK>0THEN2110 2160 2170

PRINT"DISK RETURN

irem 210

STATUS:

"S$

: rem

95

srem 90 irem 170

Program 2: student &uiz

GOSUB1820:GOTO1850

1820

GETGS:IFG$=""THEN1820

1830

OPEN15,8,15:PRINT#15,"I0:":CLOSE15:R

10

ETURN

:rem

25 3

END

:rem

164

20 PRIIJT"[CLR) {WHT}"iCLR:POKES3280,16iPOK

1850

: rem

REM(2 SPACES)PRINT"[CLR}(5 DOWN}

86

(SPACEjAND TRY AGAINlr

47

CONDITION

1H10

1840

:rem

8

j rem ERROR

197

REM

STUDENT

QUIZ

E53281,16sPOKE808,225:POKE649,0sS=5472 7

irem 236

COMPUTE'S Gsiefte

October 1984

165


30

tCLR}(WHT}"sRETURN

:rem 139

DIMQ$(100),A${100),85(100),C?(100),D$( 100),E$(100),M$(15),A(100) irem 128

450

{RVS]{2

460 X=40:Y=1

irem 148

A[ 3 SHIFT-SPACE}"' : PRINT" {BLK} " r GOSUB39

470

X=X-1

:rem

:rem 252

480

IFASC(MIDS(S$,X,Y)+CHR$(0))<>32THEN47

50 60

FORX=lTOAtPRINTX". "MS(X)sNEXT :rem 26 PRINT"{DOWN}E_NTER NUMBER OF TEST":POKE

490

0 PRINTLEFT$(S$,X)

649,10!lNPUTX IFX<1ORX>ATHENPRINT"INVALID

500

Z=LEN{SS):Z=Z-X:PRINTRIGHT5(S$,Z)

70 80

060 NS=M$(X):POKE649

0iOPEN15,8,15:PRINT"

510 520

RETURN PRINT:PRINTSPC(14)"TEST

tCLR)":OPEN2,8,2

+N$+"

530 540

URN REM DISABLE CURSOR CONTROLS IFPEEK(830)=133THEN560

550

FORI=828TO977:READA:POKEI,A:NEXT

:rem

34

560 570

SYS828:RETURN DATA169,000,133,252,169,080

srem :rem

86 42

580

DATA133,251,169,164,133,002

:rem

38

590 600 610

DATA169,083,141,036,003,169 DATA003,141,037,003,096,152 DATA072,138,072,165,252,208

srem irem :rem

49 25 42

620 630 640 650

DATA007,032,116,003,169,000 DATA133,253,166,253,189,000 DATA002,133,254,198,252,230 DATA253,104,170,104,168,165

srem 21 :rem 41 :rem 36 irem 40

660

DATA254,096,160,000,132,252

:rem

34

670 680 690 700 710

DATA165,002,032,210,255,169 DATA157,032,210,255,032,228 DATA255,240,251,164,252,133 DATA254,169,032,032,210,255 DATA169,157,032,210,255,165

:rem irem :rem :rem irem

37 38 42 33 43

720 730

DATA254,201,013,240,043,201 DATA020,208,013,192,000,240

irem :rem

17 18

188

740

DATA211,136,169.,157,032,210

trem

36

MOST CORR :rem 160 :rem 144

750

DATA255,076,118,003,041,127

irem

39

760

DATA201.032,144,196,196,251

:rem

44

770

DATA240,192,165,254,153,000

srem

38

780 790 800 810

DATA002,032,210,255,169,000 DATA133,212,200,076,118,003 DATA230,252,153,000,002,169 DATA032,032,210,255,096,013

irem 27 srem 30 srem 23 :rem 27

40 GOSUB840:PRINT"{CLR}(N}":PRINTSPC(12)"

SPACES}LOADINGlSHIFT-SPACE)DAT

F:PRINT"{WHT}"

trem

159

D0WN}{5

irem

128

SPACES)LOADING

:rem

:rem

1

100

X=0

110 120

X=X+1 irem 219 INPUT#2,Q${X):INPUT#2,A$(X):INPUT#2,B

86

$(X):INPUT#2,C$(X):INPUT*2,D$(X):INPU T#2,E$(X) :rem 137 130 IFST AND64THEN150 :rem 204 140

GOTO110

150

CLOSE2iPOKE198,0iL=XsCLOSE15iGOSUB920

:rem 96

:PRINT"{CLR}{wHT}"

:rem 206

160 REM TEST ROUTINE 170 Y=l:POKE649,10sGOSUB540

:rem 225 :rem 75

AB(20-LEN(N$)/2);N$ 190 S$=STRS(N)+". "+QS(A(N)

!rem 102

180 FORN=1TOL-1:PRINT"ECLR}EDOWN}":PRINTT sPRINT:G0SUB4 :rem

50

210 220

ANSWER

CHOICES

:rem

230 240 250

PRINT" (down}E_NTER LETTER OF ECT ANSWER;":POKE198,0 INPUTFS

IFLEN(F$)<'1THENPRINT"ENTER

ONE

R ONLY":GOTO240 260

146

: rem 68 SS=A${A(N)):GOSUB450:SS=BS(A(N)):GOSU B450sS$=C$(A(N))SGOSUB450 :rem 225 S$=D$(A(N)):GOSUB450:S$=E${A(N)) REM

LETTE

irem 102

IFASC(F$)<65ORASC{F$)>68THENPRINT"ANS WER

MUST

BE

A,EJ,C,

OR

D" :GOTO240

:rem :rem

270

IFASC(F$)=ASC(S$)THENP=P+1

280

IFASC(F$) = ASC(S$ )THENPRINTSPC(9)"

{RVS}(2

SPACES}ANSWER

151 254

IS CORRECT I I

"s

GOSUB1030 :rem 215 290 IFASC (F$)OASC(S$) THEN :GOSUB1060 :GOSU B820 :rem 217 :rem 149 300 FORT=1TO4000:NEXT:NEXT :rem 203 310 N=N-1

320 S=INT(P/N*100+.5):PRINT"(CLR}(DOWN JYO U 330

SCORED

";S;"

%"

IFS>80ANDS<:90THENPRINT"STUDY

350

STUDY WOULD HELP"

SPACES)PERFECT

SCORE 1J"

FORT=lTO3000sNEXT

PRINT"[4 DOWNjENTER

TO

45

";S$:R

rem 92

ETURN

840

PRINT"{CLR}{5 DOWN)"IPRINTSPC(13}" iRVS) QUIZ MASTER "sP0KE53272,23

850

PRINT"[DOWN}E4

860

MULTIPLE CHOICE." PRINT"ENTER THE BEST

:rem

31

SPACES}THESE TESTS ARE

ESPACETCHOICES"

ANSWER

irem 40 FROM THE

irem 95

PRINT"EDOWN) {4 SPACES ]E_NTER THE NUMBE

GOOD,

s rem

B

214

:rem 245 33

RE-START

P

:rem

58

TITLES ,s.

R":PRINT"{BLK}"

: rem

169

X=X+1

i rem

221

INPUT#3,M$(X)

; rem

193

IFSTATUSAND64THEN440

ISi

880

JUSTIFY

GOTO400

CHOICE

:rem 175

OPEN15,8,15:OPEN3,8, 3, "TEST

PRINT

PRINT"[DOWN}CORRECT

PRINT"GIVEN."

17

REM

IS WR rem

"

870

s rem

ROGRAM"iPOKE808,237: END

SORRY ANSWER

248 194 215

149

■ rem

RUN

trem irem trem

SEC

IFS=100THENPRINT"EXCELLENTl1

{2

830

PRINTSPC(10)"ERVS) ONG

"rM$(A):NEXT:RET

irem

IFS>=90ANDS<100THENPRINT"VERY

UT MORE

820

58

irem 118 TITLES":PRINT

THIS

TION AGAIN" 340

trem 120 :rem 197

:FORA=lTOX:PRINTAj".

180

230

:rem

FILE,S,R"

(SHIFT-SPACE3";N$;" QUIZ"!PRINT"[BLK)"

200

:rem 171

RANGE"iGOT

:rem

90 PRINT"f9

IFLEN(S$)<40THENPRINTS$sGOTO510

13

: rem

i rem

100

CL0SE3!P0KE198,0:A=X:CL0SE15:PRINT"

R OF THE 890

TEST YOU

PRINT"HAVE GRAM

srem 23

BEEN

"

ASSIGNED

"

WHEN

srem

221

THE

PRO

srem

PRINT"CALLS FOR

910

FORT=lTO6000sNEXTiRETURN

srem

63

920

REM

:rem

72

930

PRINT"jCLR)[DOWN)WAIT—

RANDOM

IT."

GEN.

Z":PRINT"EBLK]"

940 FORX=1TOL 950 A(X)=INT(RND{.)*L)+1 960 IFX=1THEN1000 970 FORY=1TOX-1 980 IFA(Y)=A(X)THEN950 990 NEXTY 1000 NEXTX

srem

41

900

139

PREPARING QUI

irem 44 srem 57 srem 54

irem 228 srem 167 irem 15 irem 58 irem 88


1010

PRINT"(WHT}":RETURN

1020

REM

1030

S=54272:POKES,150sPOKES+l ,100:POKES+

CORRECT

ANSWER

irem SOUND

178

srem

18

5,0:POKES+6,240:POKES+24, 15jPOKES+4, 17

:rem

FORT=0TO200:NEXT:POKES+4, 0!RETURN

1050

REM

1060

ANSWER

SOUND

OMMAND

(NESTING

:rem

172

:rem

144

S=54272 :POKES,150:POKES+1 ,5:POKES+5,

250

REM

260

LEVEL

= NE)

INS

IN$=RIGHT$(ST$(NE),

T WORD

280 IP WD$<>"" 290 REM IN$ IS

175

L COMMANDS

FORT=0TO200:NEXT:POKES+4, 0:RETURN

Turtle Graphics

TO

FROM

55

:rem :rem

INTO

BE

66

LEN(ST$(NE))-ST(N

IN?

srem

IF NESTING

300

IF NE=0

THEN

310

REM WE HAVE

106

IS

0

irem

140

srem

227

COMPLETED A REPETITION OF COMMAND

320

REM

(Article on page 90.)

330

RP(NE)=RP(NE)-1: NE)=-0: GOTO 240

340

NE=NE-ls

350

IF 0

POP

LEVEL

200

Interpreter

Before typing in programs, please refer to "How

37

srem

THEN 350 :rem 109 EMPTY; WE ARE DONE WITH AL

THE CURRENT

BEFORE TYPING...

srem

PROCESSED

E))i IN=0 :rem 51 270 GOSUB 5000(2 SPACES}FILL WD$ WITH NEX

0iPOKES+6,240:POKES+24,15 :POKES+4,17 1070

STRING

144

1040

WRONG

220 NE=0: ST(0)=0: RP(0)=0: ER=0 :rem 107 230 IF ST$(0)="" THEN 210 :rem 179 240 REM COPY UNEXECUTED PART OF CURRENT C

IF NEEDED, NESTING

STRING

ST$(NE) :rem

LEVEL

GOTO

55

REPEAT.(2 SPACESJELSE, :rem

156

IF RP(NE)>0 THEN ST( srem 42

240

srem

97

(WD?="REPEAT")OR(WD$="RP") THEN 44 :rem 20

To Type COMPUTERS Gazette Programs," "A

360

"The Automatic Proofreader" that appear before

370

REM CHECK IF COMMAND IS A PROCEDURE N AME :rem 16 GOSUB 6000: IF PN=0 THEN 410 :rem 120

380

REM STUFF

Beginner's Guide To Typing In Programs," and

the Program Listings.

1: The Interpreter 10

REM TURTLE GRAPHICS

IF 0)

40

X=0s

INTERPRETER 202

PEEK(49152)<>173 THEN PRINT CHR$(15 "TURTLE DATA DID NOT LOAD"! END irem

Y=0j

BI=0t

IX=0:

IY=0i

D=0:

XH=160i XL=-159t

NU=0:

C=_t/180 121

CR=.74i YH=INT(79/CR) : YL=-YH: BA=2: B=8: BL=320: SC=8192: PE=0s DR=-l :rem

60

MA=7: 8192:

70

PY=53249s =0: SP=0i

80 C1=12j 3:

B

195

H=0t PX=53248: BB=8: BL=320: SC= PE=0i DR=-ls MA=7: H=0: PX=53248 :rem 33 BG=256: RO=0: CO=0: XS=0: YS PT=2040: SE=53269: HA=.5 :rem

90

87

BY=0:

:rem

50

C2=40:

C7=5:

FF=255:

C3=50:

CI=360: SS=45:

C4=28:

MX=53264:

SB=56:

C5=24:

189

C6=

PC=0:rem

10

:rera

88

YM=79

410

0

REM

IDENTIFY

GOSUB

IN):

460 IF

480 490

500

TOO DEEP"s

RP(NE)=NU: REM FILL EAT

ST$(NE)

IP T$="]H

120

REM

INITIALIZE

130

GOSUB

srem

(SPACE)0:

POKE

53271,

0:

POKE

220

53277,

53287,0 irem

140

SYS

49295:

SE,

1:

SYS

POKE

49235:

53280,2:

SYS

49322:

14G

:rem

150

PRINT CHR$(129) RPRETER"

170 PRINT 200

REM S

210

LOOP

PROCESS

ST$(0)="n:

srem -

GET

A

LINE

IT

INPUT

ST$(0)

OF

590

193

:rem

118

T

WITH

jrem

K=0

QQ=0i

CONTENTS

K=0

ST(NE),

191

:rem 45 OF

REP

:rem

158

:rem 1 1)

:rem

THEN K=K-1

106

:rem 221

PRINT

"MISMATCHED

BRACKETS

IN

REPEAT"

620

GOTO

COMMAND :rem

229

610

600

218

:rem

1 IN5=""s GOTO 200 irem 112 IF (K<0) OR ((K=0)AND(NOTQQ)) THEN 59 0 irem 172 ST(NE-1)=ST(NE)+ST(NE-1): ST(NE)=0

63

GRAPHICS INTE :rem 218

CHR$(30)

MAIN

AND

"TURTLE

214

540 IF K>0 THEN ST$(NE)=ST$(NE)+T$:rem 78 550 IF T$="[" THEN K=K+1: QQ=-1 :rem 82 560 IF K<=0 THEN 600 srem 227 570 ST(NE)=ST(NE)+1 :rem 75 580 IP ST(NE)<=LEN(IN?) THEN 520 :rem 225

POKE

POKE53281,11

200

BRACKETS

T$=MID$(IN$,

POKE

GOTO

ST(NE)=1:

530

110:

:rem

PRINT "I CAN'T REPEAT SOMETHING " WD$ " TIMES" :IN$=M": GOTO 200 :rem 113 REM PUSH THE COMMAND STRING STACK (IN CREMENT NESTING LEVEL) trem 115 NE=NE+1: IF NE=256 THEN PRINT "NESTIN G

495

480

520

2,

78

LEN(IN$)-

IN=0

FNR(X)=INT( (X+.005)*100)/100 123

AS A COM

(NOT ER)AND(NU>0)AND(INT{NU)=NU)

HEN

470

IN$=RIGHT?(IN$,

DEP

:rem

srem 103

EXECUTE WD$

srem 0

4000:

H0

TURTLE

AND

[SPACE}LOOP 450

ST$(NE)=""s

POKE

IF

srem

510

3000:

STRING AS

MAND

DIM STS(255),ST(255),RP(255),PR$(255) ,PN$(255) :rem 88

AND

PROC

420 GOSUB 1000s IF ER THEN 200 :rem 248 430 GOTO 270: REM WE ARE DONE CURRENT COM MAND :rem 67 440 REM GET REPETITION FACTOR FOR REPEAT

100

SCREEN

WITH

400 ST(NE)=ST(NE)-LEN(PR${PN))-2: GOTO 48 :rem

30

IN?

(SPACE)IT WERE A REPEAT LOOP :rem 56 390 IN$= "[■' + PRS(PN) + "]" + RIGHT?(IN? , LEN(IN$)-IN): IN=0: NU=l srem 28

240:

REM EXECUTE

THE NEW

STRING 1000

REM

jrem 142 COMMAND ;rem

IDENTIFY AND

EXECUTE

57

COMMAND

srem COMPUTE!* Gazette

230

October 1984

167


£„ 601

iNIHd

N3HJ,

{,,M,, = SaW}CINV(£9=00}

u»ji

aniaa

N3H1

51 N

=i-=aa

i.'Tina

si

usia,.

JTD+OD=SX N3HJ,

iNiad

(9C=a)aNV{.1M,.=gaw)aNV(i.9=00)

31

! i-=aa

iNIHd N3H1

N3H1

0L

sfiaw

noA.,

31 +

0S0£

iNiad

BHSOD

MSIQ

xaaNi

020^

W3a

waa

j,,noq

86

31

ZX

aa

000Z.

0S0S

'as anod

IHIHd

JI

0T0E 000E

0E2S 0TZZ

1,,

saow

j.Niad

waa

0T0S 0002

=Sa

ti-=aa

,,J,inO,,

00ET

062T 0921

Na

,,3WVNaa,,^saH 51

0521

saanaaooad

,,3sva3,,=5a»

ansoo

ansoo nsho.

(,,30 51

0221

Nani

,,3Nijaa,,=$aM zi „'„

(x)aN5

ansoo

0021

„ 06IT 08TT

NaH

HOiooaiiLani,,=SaH)

51

{

=00051

091T

ansoa

(11od,,=Sa«)ao(,.aoiooHad1.=SaM)

31

KHniaa

0STT

0ETI

:i-=aa{3DVdS)

=000*1

51

0211

t0=aa

ansoo

11

01TT

N3HJ.

51

0011

060T

uis^' sas

=00021

ansoo

NaH

31

i"3^s

0801

N

:S626t'

SAS

N3H1

,,NV31D,, = SaM 31 sa

uraj:

Nam

Nanxaa Naniaa

51

:000iT

Naniaa

01-01

an

(,,n,, = SaH)aO{,,133T,, = $aM)

uiaj!

090T

it-"

(,,nd,,=$aM)ao(,,dnNad,,=$aM)

uraj:

SOD N3H1 et2

OD N3H1 NaHi

0E02

=s626t

(,,S3., = SaM)aO(,,N33aDSaV37D.. = SaH)

6i

uisa:

niaa =00021 ansoo H3Hi ,,awoH,,=gaM 31 81 ura^! Nanisa J0=ad{aovds) N3HJ, (,,ad,,=$aM)ao(,,NMoaNad,,=$aM) 31 68i

3d 9gx

0022 090Z

oj,o

31

=00001

ans

(,,lH,, = SaM}HO(,,,LHOia,, = SaM)

69 uiaas

51

:QD=SX

Nanxaa

(,,ad,,=SaM)ao(,,asvaaK3d,,=SaM) i"3j: WSJ!

812

Naniay

1 0E0E

aniaa

W3a

OS>SX 51

51

,,avcn,,=SaH 51 092T Hani

onsoD Nam :,,aasvaa

=0=Dd

S000T2

: 00002

Nan

S0006T ansoo Nanx ,,s3wvN.,=SaM 51 uiaj: ujsa:

(A)aN5

,,NOIlISOdiLNIHd,, = SaM 51

-00011

1

Naniaa

N3HJ.

NanX3a

(,.Md,,=$aH)ao(,.MvaaNad,,=SaM)

0C01-

N3HJ, xxi

(,.dias,,=SaM)ao(,,NoiJ,isodj13S,,=SaM) EE2

'as aaod

0>H

E2I

XO=<H 51

N3HJ.

9D<dS

* (h)

,,0NICIV3tUNIHd,, = SClM 51 Naniaa

0X2

(u 51

'00091 ansoo NaHi 06X Da,,=SaM)ao(,,aoioDaNnoao>!DV8,,=SaM) uiaj:

N3 51

92 i«3J: NHni3a '0 'as 3MOd Hi (,,iH,,=SaM)ao[1.anxanj,3aiH,,=SaM)

ZL uiw:

Na

onsoo

0Z.0E

NHnxaa J000EI ansoo NaHi(aoydS) (,,Hias,,=SaM)ao(,,DNiav3Hj,as.,=gaM) 51

=ds+

■(as)M33d=oo 0S0E

N3H1

N3HJ.

'Xd 3M0d

N3HJ,

,,3Avs,,=§aM 51 NH

=000E2 ansoa Hani

'00022 ma-i:

Namaa „

j.aa

Kanj.aa

add,,=$aM)ao(,,aanaaDoadi,Niad.,=SaM) majs

iaa 5S2

50008T ensoD HaHi

8X2

«,,(■ INIHd

0t>0g

000S

N3HJ.

uis-ii

=000^2 ansoo N3HJ. uisj:

ui3Ji:

88T

0S09

0209 0109

0009

090S

aa

'$HI)$aiW + $

' SHI

INIHd

S000S2 ansoo nam ,,HDi,yaDs,.=$aH 51

gEX BXT

niaa

'0=33

N3dO

=0=M

-'Som h

SNanxaa

a

riiaa

:uawvN

»i-=aa 0E

=0005 3115

(Hd)

waa

AdiiNaai

uibj:

:.,3AB,,

'2'8'2 Nado bvbl ST'8'SI N3dO 0E0£

Naniaa

isnw

ullO$aM 31

ih=n<3

[V

0E09

jo

'NI

'HI

!

(SN

't-=aa

'000s

waa

traniaa

!0

:iD+H°H

tlo-H-H

HQ+H=H

:SX

EO+Oa=SA 0022

(£D=dS)aO(9D=dS)

gD+SX=SX

51 020Z

i (aD»A) -WJL=OH

a^LLanJ,

*

(,,M,, = $aH)aNV(92=OO) 'sitfindtn

+ SaM + u:0,,

uiaj:

Anddns

uiajs uiaj:

0fr

Naniaa N3H1

awvmoad v j,on .ai 0

hi a x t

:(T

,,<>(!

0100

Nanxaa

* T+ (3N)J.S=(3N)lLS 0E0S

s (HI-(SHl)Han 'SNI)SJ,HDla=SNI atag N3Hi ■■■Shi 51 :»,,=saM 0105

nanj,aa

it

«B=aa

DiaawnN

B9J'

'id ayod

O1OD

OiOD

3DNVH3

Naniaa

BIT

U!3.Ii

'XW 3H0d uiSJt:

Efre

>frD+Oa=SA N3Hi i"^!

991 0022

(Va/<JS)iHI = {VO/dS) TX-X=OD

090£

Naniaa nholsh

MH

LIZ ^^ zz'n'Si'oo

's'aiiam-,. 88 "i"1 2

v SET

uiaj:

xx

0E09

0=Nd g

aanaaDOUd

202

(11H<>SNl)aNV(..., = SaM)

0Z0S

0£0g O1OD

K3HJ. „

0£0S

N3Hi

=HI ui8.li

0=HI 9 iraii

$ni wob5 aaoH ixaN hum Som nu waa «»ii

S02

(B 'H<> ((-6H<SJ,)ao(H0H>si.)j

I-=H3 N3HJ,

9L <"3j: traniaa =i 'as 3iiod Na hj, (,,3aianiM0HS,,=SaM)H0(,,xs..=$aM} 51

(X oj. Naniaa

mait

:

aoaaa ao^ sHDaHotsaovdS ej*(nN) aaa won v sv $ni Hoa^ aaoM j,x3R siao waa 010* Si. 0/.X

00

66

ensoD

as

((VH+SS/H)1NI }=dS

09X

0E0E

0Z0E ZL

DNI0V3H

X9

SA 'Ad 3>!Od 'XW 3»0d S08-SX 'Xd 3M0d 0ZS2 OiOD !0[3DVdS]

X £9

maj:

22Z

0

661

31

Naniaa =0006 ensoofaovds}

(,,a5,,=SaM)HO(..aayMao3,,=$aM)

51

0201 0101

202


ILENAME

7080

IF O

7090

USED":

ER=-1!

(QQ=62)AND(MD$="R") SUCH

FILE

ON

DISK":

RETURN

8000

REM GET

8010

GOSUB

8020

IF

VALID

4000

RETURN

9000

REM

INT

"I

N IX=X:

THEN

59

PRINT

ER=-1j

"N

COLOR

NUMERIC

NUMBER

224

168

:rem 68

INPUT

:rem

THEN

:rem

139

:rem

193

40001

IF ER OR

(NU<=0)

CAN'T GO FORWARD

IY=Y:

FOR

SIN(H*C)+IX):

D=

0

THEN PR

" WDS:

TO

171

RETUR

irem 198 X=FNR(D*

NU!

X=XH

232

:rem

245

9030

IF X>XH THEN

9040

IF X<XL THEN

X=XL

:rem 252

9050

IF

Y=YH

:rem

9060 9070

IF Y<YL THEN Y=YL IF PE THEN 9120

9080

BY=SC + BL*INT({YM-(Y*CR))/BB)

Y>YH

THEN

NT((X-XL)/BB)

+

251

irem 2 :rem 239

((YM-(Y«CR))

+BB*I

AND MA) :rem

9090

BI=MA

9100

IF DR THEN POKE BY, I:

-

((X-XL)

GOTO

AND

MA)

:rem

PEEK(BY)

POKE BY,

9120

GOSUB

129

:rem

PEEK(BY)

AND

74

OR BAfB

9120

9110

10000

REM

10010

GOSUB

10020

RN DH=NU:

RIGHT

INT

NEXT:

IF

ER OR

CAN'T TURN GOSUB

(NU<0)

RIGHT

3000:

"

11000

REM

GOSUB 4000! IF ER OR INT "I CAN'T GO LEFT

11020

DH=-NUi REM

12010

X=0:

GOSUB

HOME

3000:

REM

13010

GOSUB

H=0;

DH=0:

13020

ER=-1:

SETHEADING

4000:

(NOT

(SPACE)THEN 13030 OF

13030

"

WD$i

H=NUi

GOSUB

"I

REM

14010

GOSUB 4000:

SETPOSITION

ND(NU<=XH) 14020

ER=-1i

E 14030

14040

OF

PRINT

"WDS:

QQ=NU:

IF HEN

IF

THEN "I

114

:rem

179

irem 127

SET A

HEADING irem

3000:

COMMAND

(NOT

233

rrem

57

ER)AND(NU>=XL)A

14030 CAN'T

Irem SET

AN

4000

201

X-VALU

irem

181

:rem

248

Y=NUi

GOSUB

2000:

14050

ER—ll PRINT "I CAN'T OF "WD$i RETURN

15000

REM

15010

GOSUB

PENCOLOR

80001

SET

IF

ER THEN

PRINT

WDS

59

RETURN

(PEEK(2)AND15)+16*NU:

RETURN

152

:rem

:rem

9235i

T

A Y-VALUE :rem 107

COMMAND

[SPACEjlS NOT A PENCOLOR":

POKE 2,

18030

18040

"

168

SYS 4

:rem 112

RETURN

18060 19000

19010

28

irem

27

NEW PROCEDURE

18030

RETURN

RN

irem

176

:rem

194

ER

irem 105

GOSUB

6000:

IF

PNO0

" ALREADY EXISTS": 18050

;rem

IF PC=FF THEN PRINT"I CAN'T REMEMBE R ANY MORE PROCEDURES11! ER=-1 i RETU THEN

PRINT WDS

"

IS

NOW

PRINT

ER=-1i

WD$

RETURN irem

PC=PC+li PN$(PC)=WD$i NPUT PR$(PC)

123

PRINT WD$ji I :rem 206

DEFINED"i

RETURN

j rem 40 REM PRINTNAMES COMMAND irem 222 PRINT "NUMBER OF PROCEDURES:" PC irem

19020

IF PC=0 THEN RETURN FOR K= 1 TO PC: PRINT RETURN PRINTPROCEDURE

5000:

COMMAND

IF WDS<>""

ME":

PRINT

:rem

THEN

NEED A

(PN):

IF

PN<>0

THEN

PRINT

RETURN

PR$

irem 215

PRINT

WD$ i

162

trem 187

6000!

ER=-li

U

20030

PROCEDURE NA

RETURN

GOSUB

"

"I

243

:rem 154 PNS(K)i NEXT: ,rem 139

irem

"THERE

IS

NO

PROCEDURE

RETURN

:rem

102

21000

REM

21010

GOSUB

21020

ER=-1: PRINT ME": RETURN

21030

GOSUB6000:

21040

ER=-1:

21050

PR$(PN)=PR$(PC):

PN$(PN)=PN$(PC):

C=PC-liPRINT WD?

"

ERASE

COMMAND

5000:

irem

IF WD$<>""

THEN

"I

IF

NEED A

PNO0

164

PROCEDURE NA :rem 188

THEN

21050 :rem

"

PRINT

WDSt

"THERE

RETURN

IS

NO

REM

22010

GOSUB

22020

ER=-li

RENAME

:rem 103

IS

ERASED":

GOSUB

22040

IF

"

IF

PRINT

D NAME"! 22030

COMMAND

5000:

WD$<>' "

"I

NEED

THEN

RETURN

DOESN'T

:rem

145

irem

143

22030

trem 11/ :rem

THEN

PRINT

EXIST"!

"PROCEDURE

ER=-1:

"

61 WD$

RETURN irem

22050

QQ=PN

22060

GOSUB

5000:

22070

PRINT

"I

22080

GOSUB

22090

IF

i

:rem

ER=-li

IF

NEED

WD$<>"" TO

KNOW

irem 176 NEW NAME"

THE

RETURN

DY USED

THEN

THAT

69

118

THEN22080

;rem

6000

PN<>0

P

RETU

i rem 166 KNOW THE OL

TO

6000

PN=0

116

PROCEDURE

RN

22000

70

21030 :rem

RETURN :rem

15020

84

(NOT ER)AND(NU>=YL)AND(NU<=YH) X=QQ:

"I NEED A PROCEDURE NAME"I

RETURN

RETURN

GOSUB

RE

:rem

trem 14000

36 255

ER)AND(H<=360)

CAN'T

GOSUB

200

3000:

RETURN

DH=0i

PRINT

20040

:rem

COMMAND

IF

PRINT

18020

irem

:rem

TURN 13000

50001IP WDSo"" THEN

20030

RETURN

COMMAND

Y=0i

GOSUB

ER=-li

0

168

18010

NUi

"

irem

REH DEFINE

—li

58

RETUR

18000

53287,

20020

THEN PR RETURN

irem

IF ER THEN PRINT WD$

POKE

:rem 205 :rem 246

(NU<0) " WD$:

irem 16

COMMAND

N

REM

RETU

166

SYS 492

17030

GOSUB

82

"

,rem

{SPACE]IS NOT A TURLTECOLOR"i

20010

PR

:rem 12000

17020 GOSUB 80001

20000

:rem

COMMAND

TURTLECOLOR

27 161

irem 57

PRINT WD$

(PEEK(2)AHD240)+NUi

RETURN

REM

19030

THEN

WDS:

RETURN

11010

LEFT

irem

COMMAND

4000s

"I

RETURN

35(

17000

113

(FF-BATBI) :rem

2000:

ETURN

16020 POKE 2,

Y=FNR(D*COS(H«C)+IY) :rem

IF ER THEN

(SPACEjlS NOT A BACKGROUNDCOLOR"t R

176

ER=-1

srem COMMAND

16000 REM BACKGROUNDCOLOR COMMAND

16010 GOSUB 80001

RETURN

"I'M HAVING TROU ER=-1 : rem 244

(NU>15)OR(NU<0)

FORWARD

9010 GOSUB

:rem

:rem

ER OR

8030

RETURN

irem

IF QQ>19 THEN PRINT BLE WITH THE DISK":

7100

9020

IS

133

irem PRINT

NAME":

"YOU

ER=-1:

RETURN : rem

COMPUTED Gazelle

66

HAVE ALREA

Oclobfli 1984

0 169


22100

PN?(QQ)=WD$:

2 3000

ETURN REM LOAD

COMMAND

23010

MD$="R":

GOSUB

23020

60 INPUT#2, NP IF (NP+PC)>FF

23030

PRINT

"RENAMING

7000s

THEM

IF

:rem 166 "TOO MANY

PRINT

{SPACE)PROCEDURES": FOR K= 1 TO PR$(PC+K):

ER=-1:

GOTO

230

:rem

251

NPi INPUT#2, PN$(PC+K). NEXT: PC=PC+NP :rem 108

23050

PRINT

NP

"PROCEDURES

23060

CLOSE

2:

CLOSE

24000

REM

24010

MDS="W":

SAVE

15:

LOADED":rem

RETURN

:rem

IF

PRINTI2,

2,

PC:

PN$(K):

FOR

K="

1

PRINT#2,

PRINT

PC

"PROCEDURES

24040

CLOSE

2;

CLOSE

25000

REM

25010

ER=0:

GOSUB

25020

5030 PRINT

"YOU

15i

SCRATCHFILE

ER=-1:

OPEN

25040

PRINT#15,

25060

IF

204

Irem

2

THEN

2

:rem :rem

TROUBLE

CLOSE

RETURN

+

5

136

THEN PRINT

WITH

THE

"I

DISK":ER :rem 25 :rem

REM

TURTLE

DATA,

110

LE BOOT REM TO LOAD.

120

FOR

[SPACElGRAPHICS

K=

3584

TO

FOR

USE

INTERPRETER.

4095:

READ

220

J:

TURTLE

450

DATA

460

55,0,3,255,0,1,255,0,0,127,0,0,63,0 : rem 90 DATA 0,31,0,0,7,0,0,3,0,0,0,0,0,0,0,0 ,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 :rem 252 DATA 0,0,0,0,0 :rem 83 REM HEADING 90 :rem 215 DATA 0,0,0,0,0,0,224,0,0,240,0,0,248, 0,0, 254, 0,0, 255,0,0, 255,128', 0,255,192

:rem

DATA REM

330

DATA

HEADING

135

78

1rem 2

0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,

COMPUTEVa Gazette

October 1984

trem 128 254,0,15,254,0,7,254,0,3,254,0,1 :rem

159

irem 105 : rem 9

490

DATA 255,252,0,255,248,0,255,240,0,25 5,224,0,255,192,0,25 5,128,0,254,0,0

500

DATA

510 600

0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 :rem 82 DATA 0,0,0,0,0,0,0,0,0,0,0,0 :rem 212 REM SPLITSCREEN ROUTINE :rem 236

:rem

134

252,0,0,248,0,0,224,0,0,192,0,0,

TO

49349:

READ

Jt POKE K :rem 254

173,25,208,141,25,208,41,1,20B,3

,76,188,254,173,18,208,16,18,169,21 :rem DATA

166

141,24,208,169,27,141,17,208,169

,1,141,18,208,76,188,254,169,25,141

:rem DATA

178

24,208,169,59,141,17,208,169,209

,141,18,208,24,165,214,105,236,16

:rem 650

DATA

75

3,32,83,192,165,197,201,4,208,3,

238,32,208,201,5,208,3,238,33,208,32

;rem

200

660

DATA 132,192,76,49,234,165,2,162,0,15 7,0,4,232,208,250,157,0,5,232,208,250

670

DATA

:rem

245

157,0,6,232,208,250,162,31,157,0

,7,202,16,250,169,32,162,201,157,31,7 :rem 680

DATA

238

202,208,250,24,160,0,162,20,32,2

40,255,96,162,39,165,2,157,248,6,202

:rem 690

DATA

199

16,250,96,24,169,32,133,252,169,

0,133,251,168,145,251,200,208,251,230

i rem 700

DATA

2

252,165,252,201,64,208,1,96,152,

240,239,120,169,127,141,13,220,169,1

199

0,0,224,0,0,0,0,0,0,0,0,0,0,0,0 :rem

320

DATA

470 DATA 0,0,0,0,0,0,0,0 480- REM HEADING 315

163

DATA 0,255,224,0,255,224,0,255,192,0,

5

,254,0,0,254,0,0,62,0,0, 30,0,0,14,0,,0

640

0,63,255,0,31,255,0,15,255,0,7,2

20

:rem

,0,0,254,0,1,254,0,3,254,0,7,254,0,15

DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,24,0,0 :rem 239 DATA 60,0,0,126,0,0,255,0,1,255,128,3

:rem 209 :rem 211

270

199

:rem

0,0,0,0,0,0,0,0,14,0,0,30,0,0,62

DATA

255,128,0,255,0,0,254,0,0,248,0,0,240

170

REM HEADING

620

:rem

310

440

:rem

630

DATA

300

DATA 0,255,248,0,255,252,0,0

142 150

250

270 280 290

430

FOR K= 49152 , J: NEXT

171

203

DATA 224,0,0,248,0,0,252,0,0,254,0,0, 255,128,0,255,192,0,255,224,0,255,240

:rem :rem

DATA 248,0,0,0,0,0,0,0 REM HEADING 45

0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,

420

K,

230 240

DATA

0,0,0,0,0,0,0,0,0,0,0,0,0,0,192,0,0

610

:rem

260

0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 :rem 58 DATA 0,0,0,0,0,0,0,0,0 :rem 198 REM HEADING 235 :rem 2

TURT

,255,192,7,255,224,15,255,240,31,255

128

126,0,0,60,0,0,24,0,0,0,0,0,0,0,

:rem 95 Irem 103

USE

6

0,0,0,31,255,246,15,255,240,7,25 :rem

POKE

{SPACEjJt NEXT 200 REM HEADING 0 210

WITH

63

:rem

DATA

24J

Program 2: Turtle Data 100

180

76

irem

380

".TURTLE"i

QQ,T$,ZZ,ZS:rem 42

(QQ>19)AND(QQ<>62)

'M HAVING =-1 15:

:rem 210

:rem 234 SUPPLY A FILENAME":

tSPACE}lNPUT#15, 25050

SAVED":rem

WD$

HEADING

irem

:rem 114

15,8,X5

63,255,0

NEXT :rem

27

7,0,0,31,0,0,63,0,0,127,0,1,255,

5,224,3,255,192,1,255,128,0,255,0,0

PRINT*

IF WD$<>""

"S0:"

DATA

410

RETURN

25030

370

142

PC:

COMMAND

MUST

REM

:rem TO

RETURN

5000:

360

390 400

PR?(K):

24030

DATA

240

40

24020

350

14 8

DATA

0,3,255,0,7,255,0,15,255,0,31,255,0

211

:rem

7000:

:rem 340

ER THEN

COMMAND

GOSUB

0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,3,0,0

R

182 248

ER THEN 230 :rem 13/

60 23040

OK":

:rem :rem

irem 710

DATA

198

141,26,208,169,192,141,21,3,169,

0,141,20,3,169,1,141,18,208,88,96 :rem

58


Program 3: Turtle Boot 10

REM

20 30

POKE 53281, 6 PRINT CHR$(147);

TURTLE

RTLE

NT"YOU ARE

BOOT

GRAPHICS

:rem

:rem TAB(10)

CHR$(15-t)

BOOT":

PRINT:

PRINT :rem

40

PRINT

"THIS

PROGRAM WILL

LOAD AND

[SPACE}THE" 50

PRINT

60

PRINT EN

DATA AND

"WHILE

THEY

PRINT

"BLANK."i

PRINT E" PRINT

"DO

ARE

NOT

IF

C 160

2"

D$;

QS

PRINT

170

PRINT

C 180

1"

A$=""

PRINT

THEN

149

120

:rem

D$

CHR$(31}; D$; D$; POKE 44, 64: NEW"

D$

:rem

74

"LOAD"

Q$

"TURTLE GRAPHI

D$;

D$

D$;

D$;

"LOAD"

DS

Q$

"RUN":rem

'TURTLE

",B"

FOR

GRAPHI

:rem

D$;

DS;

D$;

D$

81

"RUN"

:rem 15 K=

1

TO

[SPACEJPOKE

7s

POKE

198,

630+K,

13:

NEXTs

7

:rem

3

225

FORX=1TO29:IFL(X)=LTHENPRINTN${X)

15

NEXT

16

PRINT"EEEEEEEEEEEEEEEEEEEEEE":GOTO66

17

PRINT"WHAT

IS

FORX=1TOLEN(A$):IFMID$(A$,X,1)="

19

NEXT

:rem :rem

62 165

:rem

IS

EN(AS)>X+1THENB$=MIDS{A$,X+I,2):rem :rem

75 169

20

IFLEN{A$)>1THENA$=LEFT$(AS,2)

21 22

V$="GOGEPUTAHIINLO" :rem 125 N$="NOSOEAWEUPDOBECHTAPITHSEGRMUBUARSW SHMASPOIDRTRLEBONECARISP"

23 24

:rem

srem

41

138

FORY=1TOLEN(VS):IFMID$(V$,Y,2)=A$THENV =Y+l:V=V/2 :rem 114 NEXTiFORX=lTOLEN(N$):IFMID$(N$,X,2)=B$

THENN=X+lsN=N/2

:rem 194

25

NEXT:ONVGOTO26,29,39,29,46,53,55,39

26

IFN>6THENPRINT"YOU

27

FORX=1TO6:IFN=XANDM(L,N)>0THENL=M(L,N)

28

NEXTtGOTO5

29

IFN=7ORN=9ORN=IITHENPR1NT"YOU CAN'T":P RINT"EEEEEEEEEEEEEEEESEEEEE":GOTO17

30

IFN=14ORN=15ORN=22ORN=23THENPRINT"YOU

:rem

222

:rem

92

:rem

81

:rem

205

[SPACE)CAN'T"tPRINT"EEEEEEEEEEEEEEEEEE

EEEE" 31 32 33

146

CAN'T"jGOTO17 :rem

:rem 216

IFN=14ORN=15ORN=22ORN=23THEN17 :rem 45 IFB$="AR"THENL(16)=0 :rem 14 IFN=24THENPRINT"Y0U CAN'T":PRINT"EEEEE EEEEEEEEEEEEEEEEE":GOTO17

IFN=26THENPR1NT"CAN'T,

srem

IT

:rem

232

trem

129

35

IFN=26THEN17

36

IFN=27THENPRINT"TOO HOT":PRINT"EEEEEEE trem

.

FORX=7TO29:IFN=XANDL(X)=LTHENL(X}=0

38

NEXTsGOTOS

39

IFN=24ANDL=5ANDL(23)=10THENPRINT"{CLR}

40

To Type COMPUTERS Gazette Programs," "A

Beginner's Guide To Typing In Programs," and

YOU

MADE

ITI!":END

srem

82 135

IFL=5ANDL(23)=LANDN=24THENPRINT"{CLR)

(3 DOWN]TROLL PUTS YOU":PRINT"IN THE D ;rem

41

IFL=5ANDL(23)=LANDN=24THENPRINT" {2 DOWN](3 SPACES]GAME OVER":END

42

FORX=1TO29:IFN=XANDL(N)<>0THENNEXT

43

IFL{N)<>0THENPRINT"DON'T

the Program Listings.

185

srem

UNGEON."

"The Automatic Proofreader" that appear before

157

37

:rem

Before typing in programs, pleasu refer to "How

48

:rem

trem

34

2 DIML(35),M(6,6),N$(35),R$(6):FORX=lTO6s 3

FORY=1TO6:READM(X,Y):NEXT\,X :rem 155 FORX=1TO29:READN$(X):NEXT:FORX=1TO29:RE

ADL(X)jNEXT:FORX=1TO6:READRS(X):NEXT

:rem

4 L=2 5 L5=36879:IFAA=40THENL5=532B1

6 IFL=.1THENPOKEL5,104:PRINT 7 IFL=2THENPOKEL5,125:PRINT

63

:rem 239 jrem 224

{WHT}":rem 47 {BLK)m :rem

191

8 IFL=3THENPOKEL5,62:PRINT"iBLK}":rem 145 9 IFL=4THENPOKEL5,47:PRINT"iBLK}"irem 150 10 IFL=5THENPOKEL5,11:PRINT [WHT]":rem 43 11

IFL=6THENPOKELS,94:PRINT

(BLR}"

trem

4

RAN AWAY"sPR

EEEEEEEEEEEEEEE":GOTO17

(Article on page 126.)

SYS65517:AA=PEEK(781):GOTO62

5

"ANDL

INT"EEEEEEEEEEEEEEEEEEEEEE"iL(26)=10

Teaching Your Computer English

1

5

YOUR":INPUT"COMMAND";A? :rem

34

BEFORE TYPING

231

srem

14

121

CHRS(1

SEE"

jrem

PRINT"YOU CAN

srem 120

DS;

9) 190

73

:rem 152

",8"

D?;

:rem

"SPACE" CHR${ :rem 51

DS=CHRS(17)

D$;

Q$

153

:rem 132

PRINT CHR$(147); "POKE 16384, 0: PRINT

SCRE

:rem

srem 126 PRINT: POKE

PRINT:

PRINT "PRESS " CHRS(18) 146) " WHEN READY" GETA$:

THE

DISK UNTIL TH irem 4 PROMPTS YOU FOR YOU

0

130 Q$=CHR$(34):

150

LOADING

PRINT

"INTERPRETER

!SPACE}198,

140

183

REMOVE THE

R FIRST" 100 PRINT "COMMAND.":

120

PRO

:rem

WILL"

80

110

RUN

INTERPRETER

PRINT

70

90

197

:rem 134

"TURTLE

GRAMS.":

89

246 "TU

IN THE":PRINTR$(L)

13

195

12 PRINT"{CLRjEEEEEEEEEEEEEEEEEEEEEE":PRI

:rem

HAVE

93 163

IT":PRIN

T"EEEEEEEEEEEEEEEEEEEEEE":GOTO17 :rem

124

44

FORX=1TO29:IFN=XANDL(X)=0THENL(X)=L

45

NEXT:PRINT"EEEEEEESEEEEEEEEEEEEEE":GOT

46

IFL<>5ORN<>23THENPRINT"{DOWNjHURT YOUR

:rem

017

:rem

HAND(D0WN}":G0T017

177

124

:rem 108

47 IFL=5ANDN=23ANDL{17)<>0THENPRINT" 48

49

{DOWNjHURT YOUR HANDEdowN}"

:rem 204

RINT"tDOWNjYOU CAN'TtDOWNj"

:rem 177

IFL=5ANDN=23ANDL(17)=0ANDL(28)O0THENP

IFL=5ANDN=23ANDL(17)=0ANDL(28)=0ANDL(2 5)<>0THENPRINT"EDOWN}YOU CAN'T" :rem COMPUTEIS Gazette

229

October 1984

171


50

51

IFL=5ANDN=23ANDL(17)=0ANDL{28)=0ANDL{2

10

{DOWN}"

11 PRINT"{CLRj[17 SPACES}{10 DOWHjTREK"

5)=0THENPRINT"fDOWN]THE TROLL FLEES

trem 68

IFL=5ANDN=23ANDL(17)=0ANDL{28)=0ANDL{2

5)=0THENL(23)=10 52

:rem

GOTO17

21

:rem

8

POKE53280,6tPOKE53281,0:PRINT"{GRN)" irem

12 PRINT"{9

53 PRINT"(CLR){DOWNlYOU ARE CARRYING f DOWN}"s FORX=1TO29:IFL(X)=0THENPRINTN$ (X)"(DOWN}" :rem 110

13

54

NEXT:FORI=lTO1500:NEXTtGOTO6

55

IFN=9ANDL=1THENL(28)=L:GOTO12

:rem

223

18 GETFQ$iIF

56

IFN<>14THEN59

:rem

196

:rem 11

57 PRINT"iDOWNjTHE KEY TO WHAT YOU":PRINT "SEEK

58

IS

HIDDEN WHERE"

PRINT"THE KING

:rem 226

SLEEPS I DOWN!":GOTO17 :rem 0

59 PRINT" [DOWN] YOU CAN SEEl DOWN] ". :FORX=UT 60

O29tIFN=XANDL(X)=L THEN61 FORX=1TO29:IFN=XANDL(X)=L

:rem 149 THEN61 :rem

61

NEXT:FORI=1TO1000:NEXT:GOTO12

62 PRINT" {CLRHbLKJYOU ARE RINT"GUARDED BY

63

:rem

180

AN EVIL"

PRINT"TROLL.":PRINT"(DOWNjCAN YOU GET [SPACE}OUT?":PRINT"(2 DOWN}HIT ANY KEY

64

GETZ$:IFZ$=""THEN64

65

GOTO2

:rem 214

66 PRINT"EXITS ARE:":FORY=1TO6:IFH(L,Y)>0 THENPRINTN$(Y)

:rem 27

NEXT;PRINT"EEEEEEEEEEEEEEEEEEEEEE":GOT

017

trem

68 REM M(X) 69

DATA0,,,3,,2,4,5,6,,1,,,,1,,,6,,2,,,,,

2,0,,,,,,,,2,3,0 70 REM N$(X) 71 72

128

trem 72 :rem 130 :rem 102 irem 97

DATA"BED","CHAIR","TABLE","PILLOW","TH

RONE","SCEPTER","GRAIL","MURAL":rem 30 73

DATA"BUNK","ARMOR","SWORD","SHIELD","M

74

DATA"TROLL","DRAWBRIDGE

116

LEVER","SPELL

lSPACE}BOOK","EYE OF NEWT","CAULDRON" irem 40

75

:rem

119

:rem

123

35

GOSUB

40

V=53248:POKE723,10:V1=2040iSS=0iEX=B0i TIS="140000"tPOKE53275,48:BSC=0trem 67

DATA"DRAWBRIDGE "

POKE V+21,63

P0KEV1,215:POKEV1+1,215:P0KEV1+2,215 s P OKEV1+3,211:POKEV1+4,212:POKEV1+5,213

70

POKEV+39,6 s POKEV+40,10 tPOKEV+41,5 i POKE V+42,15tPOKEV+43,9:POKEV+44,9 :rem 191 POKE V+9,202tPOKEV+ll,202

90

GOSUB

95

QI=.01:POKEV+6,80 t E=100:POKEV+5,145iPO

900

:rem

trem

BEFORE TYPING... To Type COMPUTEPs Gazette Programs," "A Beginner's Guide To Typing In Programs," and "The Automatic Proofreader" that appear before the Program Listings. 172

COMPUTE'S Gazette

October 1984

29

130

KEV+29,8:POKE53280,0 sIFFQ> 2THENQI=.06 irem 164 96 POKE 2046,214iPOKE53293,10tPOKEV+30,0 :rem 210 97 POKE V+l,150:POKEV+3,155tPOKEV+5,160tP OKEV+7,180 t EP=180:POKE650,128:HIT=0 irem 187 99 SS=.1s EX=80:S=54272 s POKE54296,9:POKES+

5,9:POKES+6,01 POKES,240:POKES+1,33 :rem 248

100 SYS 989:POKE53277,PEEK(53277)OR{2t4); POKE53277,PEEK(53277)OR(2T5) :rem 221 110

SYS THRST:POKE53280,0:POKEV+7,PEEK(V+ 7)+ltIF

PEEK(V+7)>185THEN

POKEV+7,185 trem

119

112

SYS THRSTsPOKE49402,PEEK(V+30):SYS PH AS:SYS THRST :rem 77 114 SYS THRSTsSYS BAMtSYS THRSTtIF(PEEK(4 9402)AND15)>8THENPOKE53280,2tHIT=HIT+

1 irem 158 SYS THRST:SYS MOVEiPOKE54273,0:SYS PH ASjIF PEEK(197)=60 THEN HIT=HIT+1 :rem 224 SYSTHRSTiPOKE54277,15:POKE54276,17tSY

S THRSTtSYSTHRST:POKE54278,129trem 13

118

SYS890iPOKE54296,4jPRINT"IHOME) {2 D0WN]{GRN}"SPC(31)"SC0RE{H0ME}"iPR INT"(DOWN}hSPC{25),(TI-Tl)-HIT

119

SYS THRST:POKE53280,0iSYS

irem PHAStIP

113 PEE

POKEV+1,(PEEK{V+7))

irem

73

120 SYS THRSTsSYS PHAStPOKE54273,201 IF PE

EK(V+2)<20 THEN POKEV+3,{FEEK(V+7)) irem

Before typing in programs, please refer to "How

49

80

K(V)<20 THEN

(Article on page 54.)

:rem 13

irem

ROOM","SORCERER1S ROOM :rem 107

Trek

136

50

117

81

trem

60

:rem 72 :rem 115 :rem 16

880

45 XX$={2 SPACES!"(HOME}{23 DOWN}H!rem 88

5,6,6,6,10,10 79 REM R$(X)

ROOM","KNI

227

500

DATA1,1,1,1,2,2,2,2,3,3,3,3,4,4,4,5,5,

BEDROOM","THRONE

18

800

116

QUARTERS","ARMORY"

:rem 50

THEN

GOSUB

=rem 70 iren 170

DATA"KINGS

FQ$<"1"OR FQ?>"4"

30 GOSUB

76 REM L(X) 77 DATA10,10,10,10,10,10

GHTS

169

20

irem 234

80

188

:rem

; rem 203

DATA"RING","SPELL"

78

irem

FQ=VAHFQ$) :PRINT"{CLR}"

ACE","SPEARS","OIL","DRAWBRIDGE" :rem

5000

19

DATA"NORTH","SOUTH","EAST","WEST","UP"

,"DOWN"

166

:rem

49

:rem 38

trem

D0WN)[14 SPACES}PLEASE WAIT"

14 PRINT"{11 SPACES}{2 DOWN}SKILL {2 SPACESjLEVEL (1-4) "

IN A CASTLE" :P

irem 218 :rem 41

67

GOSUS

229

213

121

SYS THRSTjSYS PHASiIF PEEK(V+4)<20 TH EN POKEV+5,(PEEK(V+7)) trem 222

123

SYS

THRSTiSYS

BAM:SYS

PHASiSYS

THRST

trem

102

124

SYS890ISYS PHAS:POKE54276,16fPOKE5427 6,17iSYS THRST irem 115

125

SYS 126

THRSTtON FQ

GOTO

130,129,128,127, irem 129


126 127 128

SYS

THRSTiSYS

SYS

MOVE:SYS

SYS

THRST:SYS

SYS

PHAS

SYS

THRSTiSYS

MOVEiSYS MOVEiSYS

MOVEiSYS PHAS

MOVEi

:rem

MOVEiSYS

MOVEiSYS

MOVEiSYS

MOVEiSYS

194

MOVE:

irem 227 MOVEt

irem

500

FOR N=13440TO13502iREADA:POKEN,AtNEXT irem

213

510 FOR N=13504TO13566iREADA:POKEN,A:NEXT 515

srem 225 FOR N=13568TO13630iREADAiPOKEN,A:NEXT

SYS

PHAS

129

SYS

THRSTiSYS

MOVE:SYS

MOVEiSYS PHAS irem 117

228

520

FOR N=13632TO13694tREADA:POKEN,A:NEXT

130

SYS

THRSTiSYS

MOVEiSYS

MOVEiSYS

525

FOR N-13760TO13822tREADAiPOKEN,AtNEXT

131

SYS

THRSTsSYS

MOVE;SYS

THRUST ISYS

527

FOR N=13696TO13759tREADAiPOKEN,AtNEXT

528

FOR N=13824TO13886iREADAiPOKEN,AiNEXT

184

530

DATA

SYS890:IFA5=22ANDABS(PEEK(V+6)-PEEK(V +10))<25ANDPEEK(V+7)>175THENGOSUB6000

535

DATA 48,0,0,48,0,0,48,0,0,48,0,0,48,0

540

DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,

PHAS

:rem 109

132

EiIF RND(.)<QI THEN8000

MOV

irem 37

SYS THRSTiA5=PEEK{197)iPOKEV+7,PEEK(V +7)+1tIFPEEK{V+7)>185THENPOKEV+7,185 irem

133

irem

135 XY$=STR${100-(HIT*15.1))+"[2

irem

140

SYS890iPRINTXX$;"ENERGY

145

XYS SYS

THRSTiSYS

PHASiSYS

TO

SYS

190

SYS

iLOLC+ltlF

LC>1

THRSTiSYS

EXiSYS

THEN

MOVEiSYS

4000

:rem

195

SYS

PRINTXX$;"SHIELDS

THRSTiSYS

PHASiGOTO110

irem

205

:rem

N=190-PEEK(V+7):FOR CRASH=1

TO

215

irem POKES+l,UliPOKES+4,17:Ul=Ul-l:rem

550

225

IF

POKEV+7,Cl:POKEV+6,C2tNEXT

231

GOSUB

234

POKEV+21,PEEK(V+21)AND(255-8)

235

POKES+24,15iPOKES+1,15:POKES+4,128 irem 203

240

POKES+5,9iPOKES+1,20:POKES+4,128

250

FORDL-1TO700INEXT

C2>225

THENCRASH=N

260

POKES+4,1291GOTO3000

300

irem irem

159

:rem 87

irem :rem :rem

301

POKE 53271,PEEK(53271)AND(255-2f3)

305

POKE 2043,216:POKEV+42,7iFOR O20iNEXTiPOKES+4,129

47 119

0,0,0,0,0,0,224,0,1,248,0,3,252,0,3 ;rem 247

560

DATA 254,224,7,255,16,15,255,8,31,255 ,132,127,255,254,255,255,255,255,255

565

DATA

trem

DATA 63,240,7,127,248,15,191,248,15,2

575

DATA 254,63,255,6,127,255,248,255,255

580

DATA

162

315 POKE 53277,PEEK(53277)OR(2t3)iFOR DEL AY=1TO60:NEXT irom 175 POKES+24,7|FORD=1TO40 tNEXTiPOKES+24,8 i PORD=>1TO20 i NEXT: POKES+24,13 i rem 66

320 POKE 53271,PEEK(53271)AND(255-2t3)

REM

SPRITE SUBSECTION

165

,254,255,255,255,255,25 5,255,0,0,0,0, 0 irem 64 0,0,0,0,0,0,0,0,0,0,0,0,0,0,3,24

8,3,255,240,15,255,248,63,255,248,0,1 5 irem 222 585

DATA

192,1,255,240,1,255,224,0,0,0,0, :rem

590 592

DATA DATA

irem 593

DATA

30

255,0,0,0,0,0,0,0,0,0,0,0,0,0,0,

0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 irem

215

595

DATA 0,0,0,0,112,0,3,252,0,15,255,128

596

,23,255,64,59,254,240,61,253,248,118 :rem 185 DATA 171,252,251,255,60,255,254,220,1

23,253,232,119,251,248,47,255,240,15 trem

597

DATA

220

223,224,7,223,224,3,223,192,3,21

9,192,3,219,192,7,219,224,15,219,240 irem

598 600

DATA 0,0,0 KI=49152:FOR

N=KI

TO

215

irem 168 49204iREADA:POKE

N,A:NEXT

:rem

134

610

DATA 162,210,173,30,208,141,62,192,41

620

DATA 96,173,62,192,41,66,201,66,208,7

,68,201,68,208,7,142,208,2,142,5,208

151

irem 96

16

0,0 trem 68 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,

0,0,0,0,0,0,0,0,0,0,0,0,255,0,0

26

POKEV+42,1:FORD=13TO1STEP-.5:POKES+24 ,DiNEXTiPOKES+4,128 tPOKES+24,91RETURN irem

23,248,31,231,252,31,251,252,63,248 irem

POKES+24,7:FORD=1TO20iNEXT:POKES+24,8 iFORD=lTO40tNEXT:POKES+24,13 trem 62

irem

80

570

53271)OR{2T3)iFOR DELAY=1TO10:NEXT

499

:rem 231 255,0,0,0,0,0,0,0,0,0,0,0,0,0,0,

0,0,7,0,0,15,128,0,31,192,0,31,192,2

36

irem 25 DELAY=1T irem 103

irem

70

0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,

101

310 POKEV+7,PEEK(V+7)-10iPOKE 53271,PEEK{

325

DATA

0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0

300 POKE 53277,PEEK(53277)AND(255-2t3)

316

irem 206 7,255,0,3,255,0,0,0,0,0,0,0,0,0, :rem

555

86

:rem 169

trem

312

DATA

0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0

230

230

224

,3,159,0,15,255,0,15,255,0,7,255,128

NSTEP4

FOR DL=lTO10:NEXT:Cl=(PEEK(V+7)+4)iC2 -(PEEK(V+6)+4) :rem 136

107

trem

117

116 184

trem

74

545 DATA 127,223,255,15,135,192,7,143,128

S-54272:POKES+24,15iPOKES+5,192iPOKES

210

trem

0,0,0,0,0,0,96,0,1,248,255,223,255

157

+6,129iUl=255:POKES+2,75iPOKE53280,2

220

,0,0,0,0,0,0,0,0,0,0,0,0,0

COLLAPSED, irem

249

irem 244 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,

0,0,0,48,0,0,48,0,0,48,0,0

140

SPACESJSTARSHIP DESTROYED!HOME!"

230

irem

V+6,

irem 186

230

irem

142

EX=40

PHASsPOKE

THRST

200

(2

EX>150THEN

232

irem

";

:rem 216 THRST:IF HIT*1 irem

THRSTiEX=EX+liIF

107

SHIELDS

5.1>100THEN200

180

183

SPACES}"

irem

irem COMPUTE! s Gazette

OdoOer 1984

193 173


,142,198,2,142,3,208,96,173,62,192,41 :rem 630

DATA

65,201,65,208,246,142,188,2,142,

1,208,96 640

:rem 113

BAM=49407:FOR

N=BAM

TO

49459:READA:PO

KEN.AiNEXT 641

19

DATA

:rem

175

:rem 643

DATA

9,201,9,208,246,142,188,2,142,1,

20B.96 650 660 665

:rem 17

DATA

76,97,192,238,1,208,205,3,208,17 trera

DATA

PHAS=49472;FOR POKE N,A:NEXT

691

DATA

71

:rem 78 N=PHAS

TO

49531:READAs :rem 199

165,197,201,60,240,1,96,169,129,

141,4,212,173,7,208,174,6,208,142,12 DATA

12

srera 75

(15 SPACES]"; trem 171 PRINT"{9 SPACES}E+3(2 SPACES}£+3 l+l [2 SPACES}g+3{4 SPACES}g+3 g+3

DATA

DATA 76,93,193 RETURN REM MAIN

800

FOR

N=828

LOOP TO

MACHINE

"^em 147

gJ3"sNEXT

irem 146

965 FOR SV=1TO12:PRINTSPC(30)"[WHT}{RVS}

970 PRINTSPC(31)"19 U3IHOME3" :rem 151 971 PRINT"{4 DOWN}"SPC(31)"£CYN}CONTROLS [DOWN}"

:rem 185

972 973

PRINTSPC(31)"lYEL}CRSR-DN=" PRINTSPC(33)"DOWNfDOWN}"

irem 226 srem 90

:rem 142

980

:rem 119 LANGUAGEsrem 37

FOR SF=1TO 20:K=(RND(X)*25+RND(Y)*400 JiPOKE 1250-l-K,46!NEXT irem 242

990

FOR

irem

209

992

FOR CF=55556TO55B55iPOKECF,1bNEXT :rem

210

994

FOR

998

RETURN

977

41

srem

979

PRINTSPC(32}" 0

:rera 232 142,213,2,142,8,208,174,211,2,20

850

RETURN REM

RESET

HARDWARE

INTERUPT

161

1110

PRINT"tCLRr'iM=liGOSUB980 50TO3 STEP-3 M=M+3:POKE V+6,M NEXT

1200

171

1210 1220

885

DATA

890

,3,88,96,32 REM THRUSTERS

891

THRST=890sFORN=890TO951:READA:POKEN,A

892

DATA

120,169,60,141,20,3,169,3,141,21

srem 2 :rem 63 216

165,197,201,2,240,13,165,197,201

,7,240,19,165,197,197,60,240,25,96 :rem 136 DATA 174,7,208,202,224,95,240,247,142 ,7,208,96,174,7,208,232,224,190,240 irem 179 247,142,7,208,96,173,7,208,74,74

1230

895 899

DATA 240,255,96,32 RETURN

:rem 93 srem 74 :rem 138

900

POKE53280,0jPOKE532B1,0

:rem

238

irem

59

119

POKE53277,PEEK(53277)OR(2t3)sFOR X=2

PRIKT"(HOME}{7

s

POKEV+7,X

DOWNjlWHT}";

1240 PRINT"(10 SPACES1E3 +3 E+3

%2

+3"

£3 +3

:rem 24 :rem 55 srem 4

irem 97

E3 +3

irem 96

1250 PRINT"{11 SPACES}E+3[2 SPACES}§+3 E+3 §+3[3 SPACESH + 3 E+3" irem 125 1260

PRIST"[11 SPACES}g+3{2 [SPACE}§3 +1 E3 +3"

SPACES}g3 +3 :rem 22

1270 PRINT"(11 SPACES}g+3[2 SHIFT-SPACEj E+§{SHIFT-SPACE}I-HSHIFT-SPACE}1+3 £3 SHIFT-SPACE}E+3(SHIFT-SPACE}g+3" irem

1280

,74,24,105,25,168,174,6,208,24,32

October 1984

trem

REM TITLE :rem 57 FORN=1TO30SPRINT"[DOWN}";sNEXT

125

srem

irem 138

RETURN

1099 1100

:rem VECTOR

FOR N=989TO1002:READAsPOKEN,AsNEXT :rem 86

:NEXT

1000

236

880

(THRST)

CF=55856TO56295jPOKECF,7sNEXT

srem 220

:rem

:rem

COMPUTED Gazette

CF=55296TO55555:POKECF,4:NEXT

irem

2,142,211,2,142,10,208,76,49,234

879

47

FIRE"iGOSUB9000:GOTO100 trem 243

146

8,2,142,4,208,174,18B,2,174,213,2,202

90

:rem

886iREADA:POKEN,A:NEXT

2,142,2,208,174,208,2,202,142,20

DATA

srem

PRINTSPC(31)"{RVS}TlOFF}=BEAM-UP"

174,188,2,202,202,142,IBS,2,142,

DATA

212

PRINT"E40 03";

srem 205

0,208,174,198,2,202,202,202,142,198

DATA

:rem

960

PRINTSPC(31)"SPACEBAR=";

:rem DATA

srem 148

978

105

:rem 59 700 799

SPACES)";

srem 202

128,141,4,212,169,63,141,21,208,

697

(15

PRINTSPC(34)"UP[DOWN}"

76,0,192,160,70,136,192,0,208,251

174

+3(4 SPACES)"BSC

954 PRINT"(2 SPACES}"FQ"[4 SPACES)E+3 {2 SPACES)E4 +3 g3 +3(2 SPACES}&3 +3

PBINTSPC(31)"CRSB-RT="

irem

894

SPACES}&+3(2 SPACES}

£+3£2 SPACESH+3 E+3t4 SPACESlg+3

974

215

208,141,13,208,160,127,140,21,20

8,238,12,208,173,12,208,208,13,169

893

PRINT" LEVEL[3

975

:rem

d20

{2 SHIFT-SPACE}g+3t5 SPACESjHI SCORE [SPACE}"j irem 80

42

6,206,3,208,76,111,192,238,3,208

690

815

{SHIFT-SPACEJE4 +M SHIFT-SPACE} g+3

958 PRINT"{9 SPACES]i+3l2 SPACES]E+3 12 +3 14 +3 i+3 12 +3(14 SPACES}";

:rem 115

DATA 5,208,96

810

irem 202

g4 +3

208

680

695

PRINT"{WHT)[7 SPACESJE4 +3

956

,205,5,208,176,4,206,5,208,96,238 :rem

693

950

952

I3{HOME)";

MOVE=49232iFORN=MOVETO49275:READA:POK EN,A:NEXT srem 216 DATA 173,7,208,205,1,208,176,6,206,1,

6 670

1

irem 220 srem 90

PRINT"{20 DOWN5E2I835

: rein 17

DATA 96,173,62,192,41,10,201,10,208,7 ,142,198,2,142,3,208,96,173,62,192,41

980

930

162,210,173,30,208,141,62,192,41

,12,201,12,208,7,142,208,2,142,5,208

642

910 GOSUB 1100 920 PRINT"fCLR]"tGOSUB

181

PRINT"[11 SPACES}§-*-3[2 SPACES}g + 3

{SHIFT-SPACE}g+3{SHIFT-SPACE}U +3 (SHIFT-SPACE}§+3(SHIFT-SPACE)E2 +3" trem

242

1285 M-l

=rem 139

1300 POKEV+6,MtPOKEV+7,X

:rem 200

1290

FOR X=3TO250STEP3iM=M+3

:rem 147


1310

NEXT

irem

1320 PRINT"[2 DOWN}";

4

221

4020 PRINT"Ell SPACES}CONTINUING ON MISSI

:rem 98 irem 114 irem 53

4030

PRINT"[U

4035

4036

M=l

rem

135

FOR X=3TO250STEP3:M=M+3

rem

148

POKEV+6,MiPOKEV+7,X

rem 210

1371

PRINT"[DOWN}[8 SPACESJMISSION TO DEL

1375 1379

TA MINOR" FOR DELAY=1TO2000:NEXT GOSUB7000SRETURN

1380

S=54272iFORL»STOS+24iPOKEL,0iNEXTiPO

1391

trem

irem 244

KES+5,9:POKES+6,01POKES+24,151rem

71

POKES+1,28:POKES,49tPOKES+4,17

irem 70 trem 116 irem 68

1392 1393

FORN=lTO125iNEXTN POKES+4,16

1394

FORN=1TO70:NEXTN

1395

POKES+1,28:POKES,49iPOKES+4,17

irem

69

trem

4037

srem

rem 180

4038

NEXT

irem

4045 4046 4047

H=>1

rem

136

FOR X=250TO3STEP-3:H=M+3 POKEV+6,MsPOKEV+7,X

rem

194

rem

211

4048

NEXT

trem

15

4050

FORI=lTO1000:NEXTI:GOSUa

920:GOTO

30

74

00

srem

14

120

4999

1397

POKES+4,16iFORL=STOS+241 POKED,0INEXT

5000

POKE56334,0iPOKEl,51

tRETURK

irem 112

5020

FOR

:rem 38

5030

POKE ADD,PEEK(ADD+38912):NEXT ADD

24

FORN=1T0125:NEXTN

POKE2041,215iPOKEV+21,0

3100 PRINTn[HOME][ll DOWN)[OFF}[BLK}

irem 105 irem 251

3105

POKE54296,0:LC=0:POKE198,0

3110

PRINTXX?"EWHT}TYPE (E) TO END, TYPE [SPACE)(P) TO PLAY AGAIN" trem 9

3200

GETAStIF

A$="E"THEN

POKE198,0:SYS198 trem

3205 3210

3211

7150

TI

87

7200

102

7210

irem

DOWN![27 SPACES)"

PRINTXX$"{39

3213

PRINTXX5;:PRINT"

3215

GETFQ?tIF

3216

3217 3218

SPACES}" LEVEL

4007

4008

4010

129

irem

94 159

irem 224

THRSTiHIT=HIT-2

irem

175 44

:rem

sNEXT

irem

121

irem

139

PRINT"E63E5 SPACESJCAPTAINS LOG":PRI SPACES}STARDATE

"TI$

PRINT"(5 SPACESJE15 Y3" PRINT"[6

SPACESjTHE PEGASUS

TO"

PRINT"[5 SION:"

IS

87

EN

RO

irem 244 OUR

MIS

:rem

10

7230

PRINT"E5

5

irem

167

FQ=VAL(FQ$)

trem

143

7250

PRINT"[5 SPACESjMUTANT VIRUS THAT IS

SPACES).

irem 104 B2={TI-Tl)-HITiIFB2>BSCTHENBSC=B2

srem 50 PRINT"(CLR}[YEL]"j sPOKEV+21,8IPOKE53

280,0iFORL=STOS+24sPOKEL,0sNEXT:M=1e

N=2

trem 116

POKE54272,40:POKE54296,15 :rem 144 POKE54273,30+N:POKES+4,17:PRINT TAB{

N)"M(4 SPACES]N B OEYjj EYE0^y3 OP [SHIFT-SPACE}0P M{2 SPACESTn"

PRINT"[5

SPACES)DELTA MINOR

irem

321

EARCH"

A"

7270 PRINT"[5 INUED"

7280 PRINT"[5

SPACES)AID A FEDERATION RES trem 217

SPACESjOUTPOST IN COMBATING irem 71

irem

222

irem

100

SPACES}THREATENING THE CONT SPACESjEXISTENCE OF THE OUT

POST.":PRINT

;rem

ESPACEJSHIP"

irem 119

7300 PRINT"[6 SPACES}WHILE EN ROUTE, 7310

PRINT"(5 HE"

243

THE

SPACES)SUFFERED DAMAGE TO T trem 19

7320 PRINT"[5

SPACES]MAIN POWER HOUSINGS.

7330 PRINT"[5

SPACES}RESULT,

AS

A"

D TO"

7340

PRINT"E5

7360

trem

115

irem

208

irem

238

SPACES]MINE NEW DILITHIUM C SPACESiON A NEARBY PLANETOI

THE"

PRINT"(5

srem 194

WE ARE FORCE

RYSTALS"

7350 PRINT"[5 D.

206

PRINT TAB(N)" M{SHIFT-SPACE) N

SPACESjPLANETOID,

[SPACEjlS"

HOWEVER, trem

85

:rem

14

[2 SHIFT-SPACETbJSHIFT-SPACE}&H3

7370 PRINT"[5 SPACES}GUARDED BY NUMEROUS

(2 SPACES}MN[3

7380 PRINT"[5 SPACES)DRONES...

PRINT TAB(NT"!2

SPACES}"

SPACES]MN(3

LBP3E2 SPACES)EH3[2

[SHIFT-SPACE]gH§M(3 (3 SPACES} [HOME)lr;

N=N+MsIF N>7

OR N<1

=N1+1:IFN1>4THEN

4009

irem

THEN

FQ$<"1"OR FQ$>"4"

irem

4006

139

7220

{3 SPACES}";tTl=TI:GOSUB920;GOTO95

4004 4005

srem

1-4" irem 249

{5 SPACES].[GRN].[3

4001

POKEV+44,7iSYS

UTE

PRINTXX$"[39 SPACES}11 irem 114 PRINT"(HOME}[2 DOWN)[GRN)"SPC(31)"SC ORE{HOME]":PRINT"[DOWN}"SPC(25)," [7 SPACES]" srem 138 3220 PRINT"[HOME)[11 DOWN}[10 RIGHT]

4000

ADD=14336TO16384

NT"[5

irem 109

SKILL

SET

6010 SYS THRST>P0KEV+44,9iRETURN 7000 FOR CD=1TO30:PRINT"(DOWN]";

IFA$<>"P"THEN3200 trem 192 RESTOREt POKE2043,211:POKEV+21,63:T1=

3212

CHARACTER

EK{53272)AND240)OR14iRETURN

6000

7100

srem

RELOCATE

5040 POKEl,55iPOKE56334,129:POKE53272,(PE

53

PRINT"[HOME][11

REM

trem

[10 SPACES}[YEL)G[RED}A[WHT]M[PUR]E (SPACE}{GRN]O[RED)VlCYN}E[aLU}R";

84

SPACESJTO DELTA MINOR..."

1396

3000

irem

ON"

[SPACEJLIFELESS"

:rem 213

SPACES }J3

SPACES}L3

SPACES 3EHf : rem 71

THEN M=M*{-l)tNl

4010

:rem

99

FORD=1TO10:NEXT:POKES+4,16:GOTO 4005 irem 205

POKES+4,16iPRINT"[5 DOWNJfYEL] [11

SPACES I PEGASUS

REFUELED 11"

PRINT irem

7390

191

PRINT"[WHT}[5 SPACESjHIT ANY KEY TO

(SPACEJCONTINUE"

7400 POKE198,0iGOSUB1380 7500

GETA?:IFA$»""THEN7500

7501

T1=TI1 RETURN

irem 103

:rem irem

irem

126 187 70

8000 POKE53269,PEEK(53269)AND250 :rem 21 8005 A1-PEEK(53278)tJ1=0tPOKEV+3,200tPOKE 2041,214tPOKE710,l:POKE5328a,7 COMPUTE!1* Gazette

trem

31

October 191M

176


8010

FOR N-1TO60:SYS THRSTsSYS MOVE:SYS

M

THRST

250 260

IFN$="D1"THENN=201 irem IFN$="DSl"ORN$="EFl"THENN=203!rem

219 129

:rem 141

270

IFN$="E1"THENN=207

228

SYSTHRSTiIF(PEEK(53278)AND10)=10THEN

290

POKE53288,10iPOKE2041,215iGOTO200

OVE:SYS

8015

B020

THRSTiSYS

THRSTiSYS

POKE2041,210iPOKES+4,129

:rem 102

:rem 232

IFN$="FSl"ORN$="GFl"THENN=212trem IFHS="G1"THENN=215 :rem IFNS="GSl"ORN$="AFl"THENN=217:rem

136 223 129

:rem

183

300 310

trem

136

320

IFN$="A1"THENN=219

SYSMOVE:SYSTHRST:SYSMOVE:SYSTHRST!NE

330

IFNS="ASl"ORN$="BFl"THENN=221trem

121

340

IFN$="B1"THENN=223

:rem

221

350 360 370 380

IFN?="C2"THENN=225 :rem IFN$="CS2"ORN$="DF2"THENN=-227irem IFNS="D2"THENN=228 :rem IFNS = "DS2"ORN$=*"EF2"THENN=229:rem

226 136 232 142

B025

POKE2041.214

8030

XTiPOKE2041,215iPOKE532B8,10:rem 8035

:rem

280 IFNS="F1"THSNN=209

122

POKES+4,128iPOKE53269,63iGOTO132 irem

136

9000 PRINTXXS"(6 UP}"iPRINTSPC(35)"{WHT] g5

U|";

:rem 86

9010

POKE

646,9

:rem

9020

PRINTSPC(35)"{RVS}(5

254

SPACES)"; irem 136

9030

PRINTSPC(35)"fRVSj{5

SPACES}";

9035

PRINTSPC(35)"(RVS!{5

SPACES}";

9040

RETURN

:rem

137

irem

142

:rem

173

irem 223

390

IFN5="E2"THENN=231

:rem 229

400

IFN$="F2"THENN=232

trem

410

IFN5="FS2"ORN$="GF2"THENN=233:rem

135

420

IFN$="G2"THENN=235

229

irem

430

IFN$="GS2"ORN$="AF2"THENN=236:rem

135

440

IFN$="A2"THENN=237

•rem

227

450

IFN$="AS2"ORN5="BF2"THENN=238irem

134

460

IFNS="B2"THENN=239

trem

232

470

IFN$="C3"THENN=-240

trem

227

480 PRINTMNOTE VALUE"

VIC Music Tutor

223

490

trem 32

INPUTV5

irem

500 V$(C)=V$

167

:rem

90

Requires minimum of 8K memory expansion.

510

IFRIGHTS{V$,1)="D"THEND=1iVS=LEFTS(V$

(Article on page 86.)

,1)

:rem

520

IFV$="W"THENV=16

irem

161

530

IFV$="H"THENV=8

irem

100

540

IFV$="Q"THENV=4

trem

106

550

IFVS="S"THENV=1

:rem 106

BEFORE TYPING...

Before typing in programs, please refer to "How To Type COMPUTED Gazette Programs," "A

560 570

Beginner's Guide To Typing In Programs," and

IFV?="E"THENV='2 IFV5="T"THENV=.5

irem 94 :rem 159

580 VS(C)=V$

"The Automatic Proofreader" that appear before the Program Listings.

srem 98

590 IFV$="W"ORV$="H"ORV$="Q"ORVS="E"ORV$= "S"ORV5="T"THEN610

!rem

600 V=VAL(V$) 10

DI=INT(FRE(8)/16)iDIMNN%(DI),NV{DI),N$ (DI),V$(DI)

20

srem

196

PRINT"ECLR}E3 DOWN}"SPC(159)"MUSIC TUT OR"

:rem

30 FORI=1TO 2000:NEXT 40

50

:rem 223

print"Eclr}[down}do you want toh,"

ldown)l-playback an old tune2-record

NEW ONE"

a

irem 65

50

INPUTAiONAGOTO760,60tGOTO40

60

INPUT"[DOWNJSONG NUMBER";XiPRINT" (DOWN)NAME OF SONG":INPUTX$:C=1:rem 24

trera 141

70 XX=liPRINT"[CLR}YOU HAVE A MAXIMUM OF {SPACE}"DI"NOTES"

80 XX=XX+liIFXX<=3THEN85 83 85

GOTO70 PRINT"{DOWN1nOTE

90

IFN$="£"THENC=C-liGOTO700

#"CiINPUTN$

:rem 146

:rem 34 :rem 11 trem 39

trem 161

100

IFN$="R"THENN=0

110

IFN$="C"THENN=135

:rem

120 130 140 150 160

IFU$="CS"ORN$="DF"THENN=143 IFN$="D"THENN=147 IFN$="DS"0RN?="EF"THENN=151 IFN$="E"THENN=159 IFN$="F"THENN=163

irem 27 :rem 176 :rem 30 :rem 182 trem 179

170

:rem

IFN$="FS"ORNS="GF"THENN=167

irem

79 170

44

610

183

irem 630 GETT$tIFT$<>"N"ANDT$<>"Y"THEN630 irem

137

640

R AGAIN"iGOTO70

660

680 690

700

IFN$="A"THENN=183

:rem

171

727

220 230

IFN$="B"THENN=191 IFN9="C1"THENN=195

:rem 173 :rem 228

729

240

IFN$="CS1"ORN$="DF1"THENN-I99trem COMPUTERS Gaiene

October 19B4

58

trem 80

NN%(C)=N:NV{C)=V!lFSS=lTHEKRETURN

109

E NOTES BEFOREMEMORY IS FULL" irem 71 IFC=DITHENPRINTh{RVS}LAST NOTE"iC=C-1 tGOTO700 trem 27 GOTO80 :rem 64

PRINT"tCLR!{DOWN)DO YOU WANT TO HEAR

{SPACESitY/S" irem 12 710 GETT?iIFT$=""THEN710 irem 121 715 IF T$<>"Y"ANDT$o"N"THEN 710 trem 217 trem 70 720 IFT$="Y"THEN850 721 GOTO1130 irem 152 725 INPUT"DISK OR TAPE";Q$ :rem 24 726 IF LEFT$(Q$,l)<>"D"ANDLEFT$(Q$,l)o"T "THEN762 irem 199

IFN5="GS"ORN$="AF"THENN=179

176

!rem

trem

200

31

139

104

SPACESjENTE

670 C=C+1jIFC=DI-5THENPRINT"tRVSlFIVE MOR

190

:rem

IFT$="N"THENPRINT"[RVS]{5

650 N5(C)=N$

185

IFN$="AS"ORN$="BFHTHENN=187

IFD=lTHENV$=V$+"D"iV=V*1.5tD=0

trem

trem

:rem 44

214

trem 215

620 PRINT"[RVSJNOTE #"C"{2 SPACES}(RVSlVA LUE"tPRINTN5,V$tPRINT"[RVS)[PURj {6 SPACES}CORRECT Y/H{5 SPACESHBLU}"

180 IFN$="G"THENN=175

210

253

IF LEFT$(Q$,1)="D"THENQW=8:GOTO729 :rem 199

728 QW=1 INPUT

:rem "FILENAME";X$:IF

183

X$=""THEN729

irem

5


730

OPENl,QW,l,X$sPRINT#l,XiPRINT#l,X$sPR INT#1,C

jrem

194

740

FORI=lTOCsPRINT#l,NN%(l):PRINT#l,NV(l )tNEXT:CLOSEl jrem 160

745

IF

QW=8

THEN OPEN15.8,L5sINPUT#15,ZsC

L0SE15

746

:rem

248

IF Z<>0 THEM PRINT"[CLR}DISK ERRORU" [GOTO725

PRINT"[down)SONG SAVED":STOP 760 INPUT"[CLrJnAME OF SONG";X$ 750

"DISK

OR TAPE";Q$

irem

207

:rem 168 trem 168

762 763

INPUT

:rem 25

764

IF LEFT$(Q$,1)="D"THENQW=8:GOTO770

IF LEFT$(Q$,1)<>"D"ANDLEFT$(Q$,1)<>"T "THEN762

:rem 200 :rem

196

765

QW=1

:rem

184

770

OPEN1,QW,0,X$

srem

217

780

INPUT#1,X,X$,C

srem

30

790

PRINT"(CLR)SONG #";X:PRINTX$

800

FORI=1TOC

810

INPUT#l,NN%(l),NV(l)

:rem

110

820

NEXTtCLOSEl

:rem

186

825

IF

QW=B

:rem 52 :rem

28

THEN OPEN15,8,15:INPUT#15,%:C

LOSE15:rF Z<>0 THEN PRINT"(CLRjDISK E RRORIl"iSTOP

:rem

206

trem

231

830

GOSUB1380

840

PRINT"(RVSjSONG LOADED"

844

850

FORIJ=1 GOTO700 Q=lsY=C

860

PRINT"£CLR]t3 DOWNjCHOOSE TEMPO"

870

PRINT"(DOWNJ0 THRU 10":PRINT"0=FASTES

845

TO1500:NEXT

T. . .10=SLOWEST" 880

INPUTM

890

DU=(M+3)*10

900

910 920

PRINT"tDOWNjSELECT PITCH",,, "2=MEDIUM",,"3=HIGH"sINPUTW SP=36873+WjL=36878

srem

95

srem

106

:rem irem

113 111

:rem

123

:rem

64

:rem

125

trem

254

1=LOW",,

srem 244 srem

218

PRINT"{CLRjWHEN YOU ARE READY TO HEAR THE SONG PRESSE3 SPACES}fRVSJRETURN"

930 940 950 960

GETG5tIFGS<>CHR$(13)THEN930 POKEL,15

FORI=QTOY

OKESP,0 IFSS=1THENGOSUB1280 980 NEXT 990 POKEL,0:POKESP,0

, rem 84 trem 189 trem 224 trem 225

1080

1090

1100 1110

IFW$="N"THEN1130

rem

203

rem

136

rem

220

jrem 242 ■rem 38 :rem

148

irem 147 trem 125

PRINT"[DOWNJTHERE ARE";C;"NOTES."sPR

INT"ENTER THE START AND":PRINT"ENDIN G NOTES." -rem 242 INPUT"START";Q

INPUT"ENDING NOTE";Y

trem

192

IFC$="N"THENPRINT"(DOWN)DO YOU WANT

1190

NOTE PRESS F7." PRINT"THEN ENTER

(space)to save{3 spaces]the tune [2 SPACES}Y/N?":GOTO1250 :rem 168 1180 PRINT"{CLRjPRESS Fl TO PLAY NOTE"sPR int"{down)if you want to change that •rem 11 REPLACEMENTNOTE AND

VALUE":SS=1

-rem

trem 176

srem 22

77

1200 PRINT"{DOWNlPRESS F2 TO ADD A NEW NO TE IN"

srem 14

1210 PRINT"(DOWNlPRESS F5 TO STOP THE

(2 SPACESjSINGLE NOTE MODE"

:rem 149

1220 PRINT"ERVSj(DOWN} HIT ANY KEY TO CON T. " 1230 GETI5tIFIS=""THEN1230

trem 116 srem 191

1240 1250 1260 1270 12S0

GOTO 1070 GOSUB1360 IFC$="Y"THEN725 END print"NOTE #"I

-rem 200 .rem IS jrem 102 trem 161 trem 62

1300

PR1NTN$(I),V$(I)

srem 157

1290 PRINT"{RVS}{RED3t2 SPACESjNOTE (2 SPACES}[OFF)","[RVS) VALUE (OFF) (BLUl" ,rem 67

1310 GETU$:IFU$<>CHR$(133)ANDU$<>CHR5(135

)ANDU?<>CHRS(136)ANDU$<>CHRS(137)THE

1320 1330 1340

N1310

IFU$=CHR$(133)THENRETURN IFU$=CHR$(137)THENGOTO1900 IFU$=CHR$(135)THEN1000

srem

205

irem 3 srem 43 srem 232

1350 CT=CiC=IsPRINT"tRVSlENTER REPLACEMEN T":GOSUB80:C=CTsRETURN

1390

jrem 59

INPUTC? :IFC$<>"Y"ANDC$o"N"THEN1360 srem

71

-rem 171 .rem 80

IFNN%(I)=135THENN$(I)="C"sGOTO1760 srem

205

1400 IFNNS(I)=143THENNS(I)="CS{DF)":GOTO1 760

.rem 242

1410 IFNN%{I)=147THENN$<I)="D"sGOTO1760 srem

202

srem

245

trem

208

irem

205

1420 IFNN%(I)=151THENN$(I)="EF(DS)"tGOTOl 760

1440 IFNN%{l)=163THENN$(l)="F"sGOTO1760

PRINT"ECLR}EdoWN)1-JUST PART","2-THE

WHOLE SONG"iINPUTK ONKGOTO1090,850

IFC$="Y"THENC=C+lsGOTO70

1170

trem 62

PRINT"[CLRjDO YOU WANT TO HEAR ITAGA

1060

1160

1430 IFNN%(I)=159THENN$(I)="E":GOTO1760

SS=0

1070

143

-rem 75

1040

IN?" INPUT"Y/N";W$

IFC5="N"THENPRINT"(CLR)DO YOU WANT T 0 ADD ANYNOTES y/n"jGOSUB1360:rem 32

FORI=1TOC

1035

1050

1150

1380

88

print"{down]press any other key toma

KE CHANGES" 1020 GETR?iIFRS=""THEN1020 1030 IFR$=CHR$(13)THEN940

107

srem

RETURN

s (rvs} (pur}returnEoffHbluJ to repl

1010

:rem

1370

srem

155

IFC?="Y"THEN1180

1140

srem 170

:rem 22

trem

P THROUGH THE TUNE7Y/N":GOSUB1360

1360

PRINT"(CLR](3 DOWN)EPUR)(RVSjEND OF E SPACE}SONG(BLU}":PRINT"[2 DOWN)PRES

AYEXACTLY"

GOTO860

1130 PRINT"(CLR)DO YOU WANT TO SINGLE STE

213

POKESP,NN%(I)tFORH=lTODU*NV(l)iNEXTsP

970

1000

:rem

1120

1450 IFNN%(I)=167THENNS(I)="FS(GF)"iGOTO1 760

;rem 3

1460 IFNN%(l)=175THENNS(l)="G"sGOTO1760 trem

211

1470 IFNN%(I)=179THENNS(I)="AF{GS)":GOTO1 760

.rem

3

1480 IFNN%(l)=183THENN$(I)="A"tGOTO1760 :rem

206

.rem

255

1490 IFNN%{l)=187THENN$(l)="BF(AS)"sGOTOl 760

1500 IFNN%(l)=191THENN$(I)="B"sGOTO1760 trem

199

trem

254

1510 IPNN%(I)=195THENN$(l)="Cl"tGOTO1760 COMPUTED Gazette

October 19B4

177


1520

IFNN%(I) = 199THENN$(I)="CS1(DF1)H:GOT

O1760 :rem 98 1530 IFNH%(I)=201THENN$(I)="D1":GOTO1760 trera 245

1540

1550

IFNN%(I)=203THENN$(I)="EF1(DS1)":GOT 01760

IFNK%{l)=207THENN$(l)="El"iGOTO1760 trem

254

IFNN%(I)=209THENN$(I)="F1":GOTO1760

1570

IFNH%(l)=212THENN$(l)="FSl(GFl)":GOT

jrem 01760

srem

95

IFNN%(l)=215THENN${l)="Gl":GOTO1760

1590

IFNN%(I)=217THENN$(I)="AF1(GS1)"sGOT

irem

01760

srem

1620

2

irem 01760

252

IFNH%(l)=228THENN$(l)="D2"sGOTO1760

1660

IFNN%(I)=229THENN$(I)="EF2(DS2)":GOT

:reni :rem

2

101

1670

IFNN%(I)=231THENN$(I)»"E2"tGOTO1760

1680

irem 255 IFNN%(l)="232THENN$(l) = "F2"sGOTO1760 :rem 2

1690

IFNN%(I)=233THENN$(I)="FS2(GF2)":GOT 01760

srem

To Type COMPUTEl's Gazette Programs," "A Beginner's Guide To Typing In Programs," and "The Automatic Proofreader" that appear before the Program Listings. 5 SYS65517:IFPEEK(781)=40THENPRINT"(WHTl" 1GOTO10

IFNN%(I)=235THENNS(I)="G2":GOTO1760

1710

jrem 255 IFNN%(I)=236THEKK$(l)="AF2(GS2)"iGOT 01760

srem

94

IFNN%(I)=237THENN$(I)="A2"sGOTO1760

:rem

01760

:rem 93

1740

IFNN%(l)=239THENN$(I)="B2":GOTO1760 jrem 2

1750

IFNN%(I)=240THENN$(I)="C3"

1760

IFNV(I)=16THENV$(I)="W":GOTO1890

:rem irem

1770

IFNV(I)=8THENV$(U = "H":GOTO1890

1780

IFNV(I)=4THENVS(I)="Q":GOTO1890

E(OFF}":INPUTSM$!lFLEN(NM$)=0THEN30 :rem 144

35

IFLEN(NM$)>13THENNM$=LEFT$(NMS,13)

trem

188 159

jrem

98

srem 104 IFRV(I)=2THENV$(I)="E"!GOTO1890 !rem

91

IFNV(l)=*lTHENV$(l) = "S":GOTO1890

s rem 96 IFNV(I)=.5THENV$(I)="T":GOTO1890 :rem 148 IFNVfl)=24THENV$(I)="WD":GOTO1890 :rem 223

IFNV(I)=12THENV?{I)="HD"sGOTO1890 irem

206

IFHV(I)=6THENV$(I)="QD":GOTO1890

j rem

171

162

50 PRINT"(CLRj{RVS3"TAB(INT{{22-LEN(NM$))

/2)-l)NM$;"'SEOFF}"sPRINTTAB(3)"(RVSjV

55

OCABULARY TEST{OFF}"

:rem 91

N$=""lA$=""sB5=""!DA$=""sX%=0sI=0:J=0s

FORQ=lTO100:A%(Q)=0sW$(Q)=""sD$(Q)="" :rem

103

60 Vffi$(Q)=""iNEXTsPRINTSPC(9);"(2 DOWNjME NXJ" :PRINTSPC(2);"(2

253

1730 IFNN%(I)=23BTHENN$(I)="BF2(AS2)":GOT

srem 149

6 PRINT"{BLK}" srem 151 10 PRINTCHR$(14):DIMA%(100),W$(100),D$(10 0),WR$(100):D=0 =rem 198 30 PRINT"[CLR](7 DOWN](RVS3ENTER YOUR NAM

103

1700

1840

Before typing in programs, please refer to "How

247

1650

1830

(Article on page 84.)

:rem 95

01760

246

srem 31

Vocab Builder

IFNN%(l)=223THENN$(l)="Bl":GOTO1760

IFKN%(l)=227THEKN5tl)="CS2{DF2)"iGOT

1820

srem

BEFORE TYPING...

1640

1810

TE"

1920 GOSUB80sC=CTsRETURN

srein 80

1rem

1B00

C:C=I:PRINT"{RVS}ENTER ADDITIONAL NO

249

IFNN%(I)=225THENN$(I)-"C2"iGOTO1760

1790

NS(J)=N$(J-1)!V$(J)=V$(J-1)jNEXT!CT=

97

1630

1720

1910

IFNN%(l)=221THENN$(l)="BFl(ASl)"tGOT O1760

:rem 43

1900 C=C+1:FORJ=CTOI+1STEP-1:NN%(J)=NN%(J -1)sNV(J)=NV(J-1) trem 150

IFNN%(I)=219THENN$(I)="A1":GCTC1760 srein

srem 206

NEXTsRETURN

2

1580

1610

1890

:rem 88

1560

1600

1880 V$(I)=STR$(NV(I))

80

tSPACE)WORDS"

DOWN}1)

PRINTSPC(2);"{DOWN)2)

PRINTSPC{2);"{DOWN}4) {2

DOWNJERVS]

(OFF)"

PRESS

irem 254

STUDY YOUR

"tPRINTSPC(2);"!DOWN)3) 100

ENTER NEW

WORDS

TAKE A TEST" srem

130

END"sPRINT"

1-4

TO

CONTINUE

srem 195

120 GETZ$sC$=ZS:V=VAL{Z$):IFZS=""OR(V<lOR

V>4)THEN120 130 IFV=4THEN190

irem 116 srem 179

140 INPUT"{2 DOWN}(RVS}D{0FF3lSK OR £rVS}

TtOFF}APE";Z$:IFZ$<>"T"ANDZ$<>"D"THEN

150

PRINT"(4 UP)":GOTO130 A?="(LEFT]{22 1

irem 121

SPACES]"sIFZS="D"THEND= irem

160 ONVGOTO230,810,810 190 END 230

PRINT"[CLR}[6

235

INPUTX%sIFX%>100ORX%<lTHEN230

DS

"

250 FORI=1TOX% 260

PRINT"fCLR}{3

W$(I)

6

:rem 226 :rem 113

DOWNjENTER # '

OF NEW WOR :rem

14

:rem

11

s^em 85

DOWN)ENTER WORD"IsINPUT

"

!rem 17

265 IFLEN(W$(I))=0THENPRINT"{6 UP)":G0T02

1850

IFNV(I ) = 3THENVS(I) = "ED"sGOTO1890

1860

IFNV(I)=1.5THENV$(I)="SD":GOTO1890

270 PRINT"{DOWNiEKTER DEFINITION"tINPUTDS

1870

srem 13 IFNV(I)-.75THENV$(I)="TD":GOTO1890

275

s rem

:rem 178

COMPUTE'S Gazette

October 1984

157

21

60

(I)

trem

:rem

79

174

IFLEN(D$(I))=0THENPRINT"[3 UPjM!G0T02 70

srem

139


280

NEXT

irem

217

300 PRINT"{CLR}":FORI=«1TOX% srem 239 310 PRINT" WORD"I"(LEFT}i";W$(I) srem 213 320 PRINT"(DOWN} DEFINITIONs"D$(I):PRINT" 330

(DOWN}"

IF(l/3)=INT{l/3)ANDX%=3THEN360

:rera 56

irern

332

205

IF(I/3)=INT(I/3)ANDX%<>ITHENGOSUB2000 srem

340

NEXT

203

srem 214

360 PRINT"[DOWN}[RVSjANY CORRECTIONS(Y/N) ? {OFF}" " srem 184

380 GETZ$sIFZ$=""OR(Z$<>"Y"AHDZ$o"N")THE N380 irem 111 390 IFZ$="Y"THEN420 srem 72 400 IFZ$="N"THEN520 irem 54

420

I=0sINPUT"(CLR}(4 DOWN}WHICH ENTRY"fI srem

435

58

IFI=0ORI>X%THENPRINT"{4 UP}"sGOTO420 srem

211

440 PRINT"{2 DOWN}WORD"I"{LEFT]s";W$(I) 450

:rem

251

470 PRINT"[2 DOWNjEINTER WORD"ItINPUTW$

trera 214

srem 105

490 PRINT"{DOWN}ENTER DEFINITION"sINPUTDS srem

500 510

D$(I)=D$ GOTO300

520

INPUT"{2 DOWNlTODAY'S DATEi

540

24

irem 60 :rem 98

PRINT"{CLR}[8 DOWN}{5

":DA$ irem

196

srem

134

SPACES][RVS]f_LE

ASE WAIT"

GOTO960

trera

950

I=X%sGOTO970

srem

180

960

INPUT#(1+D),D${I)

srem

113

970

NEXTI

1030

117

irem

980 CLOSE(1+D)sCLOSE15

40

irem 30

FORI=1TOX%

irem

130

1040 A%=X%*RND(1)+1eIFI=1THENA%(I)=*A%iGOT 01070

1050

irem 94

FORJ=1TOXX

irem

133

1060 IFA%=A%(J)THENJ=X%:NEXTsGOTO1040 :rem 1065

NEXT

1120 PRINT"(CLR}(DOWN}{RVS}

Z {OFF}"

1130 1140

222

irem

1070 AS(I)=A%sNEXT 1110 IFC$="2"THENGOTO1510

11

trem 228 irem 155

";NMS;"'S QUI

irem 153

N%=0 FORI=1TOX%

irem irem

1150 PRINT"{2 DOWN}"

165 132

trem 186

1160 N=A%{I) 1170

PRINT"{DOWNjDEFINITIONi":D$(I)srem 91

480 W$(I)=W$

940

irem 83

PRINT"DEFINITION|

";:PRINTD$(N)

irem

70

1180 WO$=>""iPRINT"{DOWN}ENTER THE WORD"iI NPUTWOSiIFWOS-""THEN1180 i<rem 109

1190 IFWO$=-W$(N)THENPRINT"{DOWN)CORRECT "sFORZ='1TO15003NEXTiGOTO1230

I

trem 67

1200 PRINT"{DOWN}SORRY, THE WORD WAStH!pR INTW${N)tFORZ=lTO1500:NEXT irem 222 1210

N%=N%+1

jrem 67

1220 WR${N)=W$(N)

1230 1250

irem 136

PRINT"{CLR}"tNEXTI irem 236 PRINT"(6 DOWN}YOU GOT"N%"WRONG"tPRIN

T"OUT OF"X%tGOSUB1900tIFN%=0THEN2100 1260

FORI=lTO3000sNEXT

irem 222 irem 70

136

1280

J=liPQ=0tFORI=-lTOX%

srem 83 srem 195

570 OPEN15,8,15sOPENl+D,l+7*D,l+D,N$:INPU

1290

IFWR${I)=""THEN1310

trem 55

1305

IFPQ<>5*JTHEN1310

550

PRINT"[2 DOWN} [RVS]l/M S_AVING YOUR WO RDS {OFF} {2 DOWN}" srem 1(?2

560 565

N$="TEST "+DA$ IFD=1THENN$="TEST

srem 162 "+DA$+",S,W" srem

T#15,A?,B$

572

srem

IFA$="63"THENCLOSE(1+D)1CLOSE15:GOTO5 20

575

srem

irem 27

PRINT*(l+D),X%tFORI=lTOX% :rem 223 PRINT*(1+D),W$(I)iPRINT#(l+D),DS(I) srem

600

50

137

NEXTIiCLOSE(l+D)sCLOSE15sGOTO50

))/I)-l)"{RVS}"NM$"{OFF}"

NPUTDAS

irem 61

ASE WAIT"

880 PRINT"{DOWN}(2 E WORDS{OFF}"

:rem 89

SPACES}(RVSJLOADING TH

N$="TEST "+DA$ IFD=1THENN$="TEST

:rem 148

srem "+DA$+n,S,R"

168

irem

137

900 OPEN15,8,15sOPENl+D,l+7*D,2*D,N$iINPU T#15,A$,BS

902

1308 PRINT"{CLR}"iNEXTIsGOTO50

tram 202

1310

NEXTIiGOSUB2000tGOTO50

irem

1510

PRINT"(CLR}(RVS}

irem 64 223

IFA?o"00"THENPRINTB$sFORI=lTO3000:NE XTsCLOSE{l+D)tCLOSE15:GOTO50 srem 24 910 INPUT#(l+D),X%iFORI=lTOX% :rem 223 920 INPUT#U+D),W$(I) :rem 128 930 IFW$(I)=""THENGOTO950 srem 199

irem 235

HIT THE BOOKS

161

"

trem

1540 PRINT"(2 DOWN}"tN=A%(I)

129

irem 168 irem 135

trem 130

trem 240 " ; iPRINTDS (N) srem

73

trem

99

1570 WOS=""tPRINT"{DOWN}ENTER THE WORD"iI NPUTWO$

1580

IFWOg=W${N)THENPRINT"{DOWN]CORRECT ":GOTO1790

irem

1

134

1590

IFLEFT?(WO$,2)=LEFT?(W5(N),2)THENG0T

1600 1610

01610 GOTO1680 IFJ1S>1THENGOTO1750

1620

PRINT"[DOWN}YOU'RE CLOSE"tPRINT"TRY

1630

J1%=J1%+1

IFA$="62"THENCLOSEl+DiCLOSE15:GOTO810 :rem

905

trem 119

1550 J%=lsJl%=l 1560 PRINT"_DEFINITION:

"il

:rem 16

{RVSjANY KEY TO C

GETZ5iIFZ$=""THEN1307

irem 157

PRINT"(2 DOWN}ENTER THE TEST DATE

«rem 93

ONTINUEtOFF}"tPOKE198,0 "

1307

1520 N%=0 1530 FORI=1TOX%

870 PRINT"{CLR}{5 DOWN][5 SPACES }{RVS }P_LE

890 895

1306 J=J+lsPRINT"{DOWN}

srem 173

810 PRINT"[CLR}(DOWN] (RVSJA TEST KADE JU ST FOR{OFF}"tPRINTTAB{INT((22-LEN(NM$ 820

1300 PQ=PO+1:PRINT"{DOWN}";WR$(D

IFA$<>"00"THENPRINTB$:FORI=1TO3000:NE

XTtCLOSE(l+D)tCLOSE15:GOTO50

580 590

67

1270 PRINT"{CLR}{2 DOWN}THE WORD{S) THAT {SPACE}YOU"iPRINT"G0T WRONG AREi"

irem srem irem

(SPACEjAGAIN"

171 207 155

trem 70

irem

163

1640 IFW5(N)=WR$(N)THENGOTO1670 1650 WR$(N)=WS(N)

trem 83 irem 143

1680

irem 114

1670 PRINT"{2 DOWN}":GOTO1560 IFJ%>2THENGOTO1750

1690 PRINT

(DOWNjSORRY,

trem 0

";NM$sPRINT"YOU"R

COMPUTE! s Gazette

October 1BB4

179


E NOT EVEN CLOSE":PRINT"(DOWNjTRY AG

AIN"

irem 77

1691 FORZ=lTO2500iNEXTtPRINT"[CLR)"irem 1 1700 PRINT"(2 DOWN)":J%=J%+1 irem 108 1710

IFW$(N)=WR?(N)THENGOTO1740

1720 WR$(N)=-W${N) 1740 GOTO1560

srem 79

irem 141 :rem 209

1750

PRINT"EdOWN}SORRY,

THE WORD WASt"iPR

1760

IFW$(N)=WR$(N)THENGOTO1790

INT"{DOWN) "W$(N):FORZ=1TO3000iNEXTi PRINT"ECLR}" irem 216 irem

89

1770 WR$(N)=W$(N) irem 146 1780 H%=N%+1 irem 79 1790 FORTD=lTO1500iNEXTtPRINT"{CLR)"iNEXT IiGOTO1250

1900

irem

59

IFN*=0THENPRINT"l2 DOWN][RVSlGREAT J

1910

1920

OB":RETURN

irem 213

N=10-(N%/X%*10)

irem 223

IFN<6.5THENPRINT"{DOWN}£ETTER STUDY [SPACE}MORE":RETURN srem 187 IFN<8THENPRINT"EDOWN}A LITTLE MORE S

1930

TUDYM:PRINT"NEEDED"tRETURN

1940

IFN<9THENPRINT"EDOWN}NOT

irem 84

BADhiRETURN irem 131

1950

IFN<9.5THENPRINT"{DOWN3GOOD JOB"iRET URN

irem 51

1960

IFN<10THENPRINT"{DOWN}VERY GOOD"RETU

1970

RETURN

2000

PRINT"[DOWN)[RVSj E(2 SPACES)"

2001

GETMT$tIFHT$=H"THEN2001

2002

PRINT"(CLR)"iRETURN

2100

GOSUB20001GOTO50

RN

:rem 42

:rem 177

ANY KEY TO CONTIHU " irem 15

52248 DATA 169,32,109,132,3,141 52254 DATA 132,3,169,0,32,189

irem 249 irem 152

52278 52284 52290 52296

irem 109 irem 254 irem 41 irem 206

52260 DATA 255,169,4,170,160,255 52266 DATA 32,186,255,32,192,255 52272 DATA 162,4,32,201,255,176

52302

DATA DATA DATA DATA DATA

3,76,61,204,76,32 205,169,8,32,210,255 169,13,32,210,255,162 0,169,1,141,198,205

169,0,141,199,205,169

trem 48 irem 56 irem 247

irem 50

52308 DATA 0,141,200,205,169,199

irem 42

52314 52320 52326 52332

DATA DATA DATA DATA

141,201,205,32,225,255 :rem 79 208,3,76,32,205,138 irem 196 72,152,72,32,41,205 trem 195 104,168,104,170,173,205

52338

DATA

205,45,203,205,240,12

trem 32

52356

DATA 173,198,205,73,255,45

:rem 62

52368

DATA

52374

DATA 128,240,20,24,173,199

irem 50

52380 DATA 205,105,1,141,199,205 52386 DATA 173,200,205,105,0,141 52392 DATA 200,205,76,93,204,173 52398 DATA 202,205,9,128,224,45 52404 DATA 144,10,173,202,205,41

:rem 38 irem 30 :rem 46 irem 1 irem 26

trem

52344 DATA 173,202,205,13,198,205 52350 DATA 141,202,205,76,143,204

136

irem 91 irem 81

52362 DATA 202,205,141,202,205,14

irem 73

198,205,173,198,205,201 trem

158

52410

DATA 31,9,128,141,202,205 DATA

142,207,205,166,2,142

52422 52428

DATA DATA

206,205,168,32,210,255 irem 87 152,206,206,205,208,246 trem 144

Power BASIC

52434 52440 52446 52452

DATA DATA DATA DATA

174;207,205,169,1,141 trem 43 198,205,169,0,141,202 irem 40 205,56,173,199,205,233trem 106 6,141,199,205,173,200 irem 43

(Article on page 128.)

52458 52464

DATA DATA

205,233,0,141,200,205 irem 28 206,201,205,173,201,205 irem 130

trem

105

trem 66 irem

221

BEFORE TYPING... Before typing in programs, please refer to "How

To Type COMPTJTEl's Gazette Programs," "A Beginner's Guide To Typing In Programs," and

"The Automatic Proofreader" that appear before

52416

Program 1:

Hi-Res Screen Dump— 64 Version

irem 37

52470

DATA

201,255,240,3,76,93

irem

201

52476

DATA

204,224,45,176,31,24

srem

253

52482

DATA

173,199,205,135,7,141

52488

DATA

199,205,173,200,205,105 trem

52494 DATA 52500 DATA 52506 DATA 52512 DATA 52518 DATA 52524 DATA 52530 DATA

the Program Listings.

irem 235

0,141,200,205,232,169 199,141,201,205,169,13 32,210,255,76,93,204 169,13,32,210,255,32 231,255,96,173,201,205 41,7,141,204,205,173 201,205,74,74,74,168

ireir 51

3 4

INPUT"(CLRjWIDTH 1 OR 2";WI$ irem 29 IP VAL(WI$)<1OR VAL(WI$)>2 THEN3

52536

DATA 185,146,205,133,251,185 irem

52542

DATA

5

POKE2,VAL(WI$)

52548

DATA 251,109,204,205,133,251 irem

52554 52560

DATA 165,252,105,0,133,252 DATA 24,173,132,3,101,252

irem 147 irem 186

10 20

1=52224 READ AiIF A=256

25

PRINT"{CLRjENTERING

30

POKE I,AtI=I+ltCH=CH+AtGOTO 20irem

40

IF

50

TATEMENTS"tEND PRINT"SYS 52224 TO START

CHO60660

srem 230 trem 54

THEN 40

DATA"iPOKE646,A irem 183

THEKPRINT"ERROR

IN

123

DATA S

trem 78 DUMP"iEND irem 172

52224 DATA 173,0,221,41,3,73 52230 DATA 3,160,6,10,136,208

trem 87 trem 135

52236

DATA 252,141,132,3,173,24

irem 241

52242

DATA 208,41,8,240,9,24

180

COMPUTE's Garerto

October 1984

trem 97

149

srem 36 irem 89 irem 251 irem 242 irem 97 irem 242 irem 255

172,205,133,252,24,165

152

trem 91 140

trem 38 irem 237

52566 DATA 133,252,173,199,205,41trem 104 52572 DATA 7,73,7,168,200,169 52578 DATA 0,56,42,136,208,252

52584 DATA 141,203,205,24,173,200 52590

:rem 164 irem 207

irem 83

DATA 205,101,252,133,252,173

:rem

136

52596 DATA 199,205,41,248,168,138irem 121 52602 DATA 72,120,162,52,134,1 trem 186 52608 DATA 177,251,162,55,134,1 irem 254 52614

DATA

88,168,104,170,152,45

irem

53


52620

DATA 203,205,141,205,205,96

52626

DATA 0,64,128,192,0,64

52632

DATA

128,192,0,64,128,192

52638

DATA

0,64,128,192,0,64

52644

DATA

128,192,0,64,128,192

3815

DATA

0

3822

DATA 15,173,106,15,135,0,141

:rem 105

3829

DATA

irem 84 srem

irera

3836

DATA DATA

66,14,169,13,32,210,255

96

3850

DATA

32,231,255,96,173,105,15

3857

DATA

74,74,74,168,185,62,15

3864

DATA

133,253,185,83,15,133,254

3871 3878

DATA DATA

173,105,15,41,7,73,7 irem 201 168,200,169,0,56,42,136irem 104

3885

DATA

208,252,141,109,15,172,107

3892

DATA

15,177,253,45,109,15,141

3S99

DATA

111,15,96,0,160,64,224

3906

DATA

128,32,192,96,0,160,64

irem 48

3913

DATA

224,128,32,192,96,0,160

irera 92

3920 3927

DATA DATA

64,224,128,16,16,17,17 18,19,19,20,21,21,22

jrem 43 irem 192

3934

DATA

22,23,24,24,25,26,26

irem 193

3941

DATA

27,27,28,256

DATA

5,6,7,8,10,11

52662

DATA

12,13,15,16,17,18

trem

52668

DATA

20,21,22,23,25,26

srem 94

52674

DATA 27,28,30,31,256

irem 9

Hi-Res Screen Dump—VIC Version 6

INPUT"{CLRjWIDTH 1

7 10

irem

6

:rem 188 :rem 188

1=3584

irem

20

READ

A:IF

30

POKE

I,AiI=I+1iCH=CH+AiGOTO

40

IF

THEN

40

CH<>35292THENPRINT"ERROR

187

irem 54

20trem

123

IN DATA":S

TOP

irem

50 PRIHT"ENTER SYS

123

OR 2";WI$iIF VAL(WI$

)<10R VAL(WI?)>2THEN POKE2,VAL(WI$) A=256

irem irem

3584 TO DUMP

184

SCREEN"tS

TOP

irem

160

3584 3591

DATA 169,16,141,132,3,169,0 irem 44 DATA 32,189,255,169,4,170,160

3598

DATA 255,32,186,255,32,192,255

3605

DATA 162,4,32,201,255,176,3

irem 212 irem 34

3612

DATA

irem 207

3619

DATA 8,32,210,255,169,13,32

irem 42

3626

DATA 210,255,162,0,169,1,141

irem 82

3633 DATA 104,15,169,0,141,105,15

trem 78

irem 154

76,34,14,76,5,15,169

3640

DATA 169,0,141,106,15,169,159

3647

DATA 141,107,15,32,225,255,208

3654

DATA 3,76,5,15,138,72,152

3668

DATA

3675

DATA 240,12,173,108,15,13,104

3682 3689

DATA 15,141,108,15,76,116,14 irem 90 DATA 173,104,15,73,255,45,108

3696 3703

DATA 15,141,108,15,14,104,15 :rem 85 DATA 173,104,15,201,128,240,20

93 143

irem 69 irem

Program 2:

POKE56,14iCLR

75

3843

52656

5

131

irem

155

3

:rem S8

irem

trem

106,15,232,169,159,141,107 trem 249 15,169,13,32,210,255,76 irem 97

trem

52650 DATA 0,64,0,1,2,3

173,105,15,105,7,141,105

102

irem

201

245

irem 150

:rem 48

irera 72

BEFORE TYPING... Before typing in programs, please refer to "How

To Type COMPUTEI's Gazette Programs," "A

Beginner's Guide To Typing In Programs," and "Tne Automatic Proofreader" that appear before the Program Listings.

irem 145 :rem

3661

DATA 72,32,14,15,104,168,104

190

trem 204

irem 84

This Publication is available in Microform.

170,173,111,15,45,109,15 :rem

142

irem 131

:rem

154

irem 171

3710 DATA 24,173,105,15,105,1,141 3717 DATA 105,15,173,106,15,105,0

irem 71 irem 78

3724

DATA 141,106,15,76,66,14,173

3738 3745

DATA 10,173,108,15,41,63,9 irem 249 DATA 128,141,108,15,142,113,15

3731

irem 94

DATA 108,15,9,128,224,22,144

irem 88

srem

183

3752 3759

DATA 166,2,142,112,15,168,32 srem 87 DATA 210,255,152,206,112,15,208

3766

DATA 246,174,113,15,169,1,141

3773 37S0

DATA 104,15,169,0,141,108,15 DATA 56,173,105,15,233,6,141

srem irem

237 146

trem 86 irem 90

3787 DATA 105,15,173,106,15,233,0 irem 87 3794 DATA 141,106,15,206,107,15,173 srem

3801 3808

DATA 107,15,201,255,240,3,76 DATA 66,14,224,22,176,31,24

189

University Microfilms International : M'rill .-.111 (I

I iil"rr:,Li!i,'i

fin Name_

Insitution Si reel

City_ Slate.

.Zip,

300 N'nnhZtct) Road, Depi. P.R., Ann Arbor, Mi.4M()6

irem 81 srem 42 COMPUTE!^ Gaiotte

Odobor 1984

181


Now there's PASCAL for the Commodore 64. And at a mini price. Kyan PASCAL is a full-featured implementation of PASCAL - no! a subset1 With these features: D high-perlormance compiler and comprehensive set of error messages for faster debugging

Q speeds up to 40 times faster than Commodore Basic D built-in lull screen editor

D support for files, pointers, record types, sets and ordinal types used in sophisticated data structures. □ plus, a comprehensive tutorial manual illustrating the speed and power ol PASCAL through sample programs. Kyan PASCAL lets you develop programs on your Commodore 64 that are transportable to most mainlrames, So it's perfect for students and working at home.

Try it for 15 days. Order Kyan PASCAL, and if you're not completely satisfied, return the diskette and manual within 15 days for a full refund.

Kyan PASCAL with complete tutorial manual

$49.95

(Add $4.50 per copy for postage and handling. $9.50 out

side North America. California residents add 6.5% sales taxi Toorder, call415/775-2923. (VISA and MasterCard accepted] Or send check or money order to: Kyan Software,

Suite 183,1850 Union Street, San ftanclsco, CA 94123. Sorry, no C.O.O. orders accepted.

Dkyan SPEND ANOTHER DOSE ONANY OTHER GAME UNTIL YOV EXPERIENCE

-tfie Saspcnse2

Better Than Original Equipment don ■

Graphic Adventure Game Series Salvage I Explore ihe sunken s S. Commodore. Can you dofy the cu'sfl and recover the valuattio I roasures below?

Salvage tl Unlock [he secrets of an evil Allen Race from Outer

Space snO return with just two itemsa valuable gem .

and your Ufa!

£s cjomn-ioapi Salvage 111

commodore

Conquer Ihe Ultimate Atlvenlure Challenge! Eipose the

Irailarous spy who sabolaged the ship and murdured Us

crew lormlulons in GOLD! Compuler Generated

Graphics In every program shows your salvage boaL, Ihe sunken ship, diver location and more

ThisCP Power Supplj for the Commodore 64 and V1C-

■lo Commodore6ianaVlcS27.95DISK$24.95 CASSETTE Order all thrao lor only 165 00 and we will

20 is definitely better and more reliable than the one that originally came with your computer, It works dependably,

absolutely FREE! - send check or money order lo

year-in and year-out. Unlike [he others, this CP Power

send you our 127.95 Action Arcado BATTLESHIP name

Supplj is serviceable. NOT disposable.

/^Computer Place 1213)325.4754

Dynastar Produclium

=r 23914 Crenshaw Blvd.

Torrance. CA 90505

Dealer Inquiries Welcome

P.O. Box 508, Toano, VA. 2316a Dealer Inquiries Invited

804/561-0087

Commodore fifl .1 ml VIC-20 jrMrrKn^mprks oiCommocforp Business Machines

fnc


UNIQUE HARDWARE

For Your Commodore or Vic Commodore or Vic Color Problems?

Is Your Commodore Disk Drive Hot and Bothered?

We Con Solve Them All.

Mosl hove interference lines crowding out their gieal graphics Many have boughi expen slve monitors oi new TVs, and often even thai hasn't helped Bui most ol us just bved wilh

the problem. Now the engineers at Bytes 5 Pieces have tour simple, inexpensive solutions. II you have an "old M" (wilh the 5 pin Monitor Din Plug), you've probably had color, resolu

tion and interference problems. We can solve I hem1 Tiic Inioieianc* Sioppai... For Vic 2O

and Commodore M A new kit Ihal insialls

2Thi Coloi Sharpanar. . .Use it youi

■ "old 64" Is hooked up lo a TV Jus! plug

in mlnules with I wo simple saldsi con nee lions Busi results when combined with W2.

inlo Ihe monitor plus, and the color □nd conlrast immediately Improve

3, oi 4 below Absolutely stops 9O% o! the RF intetrecance on youi scieen

DiarnaTically Crisp letters. Great

_

S1B.95

$15.95

Tho Monitor "Impiovoi".. .11 you have

Th» KIW Colsi Shoip««r CABLE... Use H your "old M1 is hooked up lo a monitor

a Commodoie I7O1 monitor, this cable (3 pionfl) gives you a picture you

A new 2 piong cable, wilh Ihe Color

wont believe Betloi ilian the cable

Sharpens! buill in All Ihe benelils ol *2 on your monitor

g_ .

Commodoie buill

_ _

Al lail, th« "noBded" iwltch lor air

Duit pioblami? Wu'v.. gol iii.,- annrai! There are a lot ot cheap dusl covers

VIc-lO'i and Co mm □ do i a 6-l'i. Com modoie len oul somelhing lhai's really lmportanl — a simple lesel switch How

on Ihe market, most ol them made Irom slalic blled plastic Bui Ihere aie some ot us who think □ lol ol our Commodoies We want lo protect them and

many limes have you been programming and gotlen "hung up" in youi soltwaie''

The only way to got back in contiol is to

have ihem look nice al the same lime1 That's why Bytes ft Pieces bull! ihe best

I urn oil the computer and lose youi pro gram and everylhlng you had enleied so lar Well Erie engineeis at Byles A Pieces

have solved Ihal one too a reset switch Now installing this does requiie you lo open yo'u compute!, make iwo simple

naugahyde in a brown lealhei-giain

hove your dnve out ol commission lor a

alignment Maybe you can aHoid lo

paliem They're cuslombuilt to fit you!

while. And lo pay lo have your drive repaued. Bul we've been lold lhat mosl ol these problems occur because the dnve has oveiheated. Ihrowing Ihe head oul ol alignmenl because ol parts

investment in you! Commodoie spend

a tew moie dollars and piolecl it Uom damaging dust loi lite your satlslaclion

59.95

Because They're Better

Computei dusl covers. 5T-Vt>

Disk ditve dust coveis So.95

dnve and blows cooling air Ihrough It

!■:■-: dusl coveis S7.95

lo run on II One problem Unless you work with some ol these programs everyday or

And we went one slep lurther. We built a surge proteclor into a second Ian

those pioblem commands you lorgel most

lors sell lor more than the cost o! our (an and surge proleclors put together

can have all your program commands

otlen. Simple? Ves, bul eltective Now you

So order today You won't be sorry Satls

laclion guaranteed or youi money back.

Muttm Ian $54.95

Older a couple packs today1

program means one thing, and "F5" in

12 lo. $15.95

anolhei program means something else.

Fan with

nsm

Amount

«T-

Cu&xaodora b* liWUEtnca Stoppsr .,■■■■-

1

UufOa Fam

vic-ao [ntBri*T*nc* Stopptr a SI&9&

1

H#m

Amount

Mumnram u,- SM9i

$

Mutm faru «]ih $ui^» Pioi»cidi § 57901

s

QcfiKk or Monty Ctdmi tnclOMCl DChargalomTVOAcrMancCard

MosToiCaja r

NEW Colei Sharpen*] Ca&la o$M95 Thm Monitor UnpfO**! ■334 K

3 |

sru p p mo a Handiuto

3

iuD Tolal

$

>% Sfot* Tat < WU^oruin Dtildanti 0 Ut)

$

i 00

EipualianDatB

TOTAL 1 COEELbuHioTa mm CtHwt * J90J

.

Vic 30 Dul Cortj a S5 05

5

IS*I Du* DllH CD¥ai BMOJ

I

DoTtaef Dufl COTST 3$7«

S

s»a at a Earboaxd Ch*ai siwa vji&h

t

7 Facki (I* ili**U> -j 32*91

3

.

Bjte& Pieces, Inc 55ON, 6fith Street, Wauwatosa, Wl 53213 (414) 257-1214 Dealer Inquiries Invited

•■■*» AE

surge piolecior $79.95

wraer loaays—

Ruih mo the following:

_- ..

model Most double-oullel surge prolec-

keyboard and |ust wailing lo be tilled with

OWN, custom designed "cheat" sheals

Ihose commands siraighP "F5" in one

Oty.

A simple. Inexpensive solulion And besl

same investment Our solution' Simple A

nghl at your linger tips on YOUR VERY

are a computer genius, who can keep all

more he a I-co used read/write problems

piogram printed on il Gieal idea, unless

pack o! 12 lined cards, die cut lo HI your

OK So now you've gol Ihe besl computer In the world, and lots ot complex sottware

muffin Ian that sits on lop ol Ihe disk

No more hot and bothered drives No

ot a!L Ihe Ian will work on other com puter ilems as well as long as they have vent holes in the lop Jusl set the padded Ian on top and youi problems wilh overhealing are over.

A lew companies do oiler a solution a die cul "cheat" sheet thai attaches lo your keyboard wilh all the commands o! one

you need them lor 1O or 2O programs You could purchase another disk drive tor the

Blank

expansion.

The engineers ol Bytes & Pieces pondered Ihls problem, and came up wilh a simple solulion An Inexpensive

is guaianteea

guaranteed lo be latlstled

Why Blank "Cheat" Sheets?

problems Irequenlly And almosl always, it means a irip to the shop lor a head

casselte unit as well Vou made a big

that happens, install the resel switch Us a time save I. and it's guaranteed lo lelurn control lo you every lime Ol course, you're

trouble Is. Ihey suHer Dom read and wrile

They re hand-sewn Irom leather-like

covers lor your disk dnves and your

wananty so don't proceed uniil your computer is ou! at warranty Bui Ihe day

Most ol Ihem are. you know Com modore makes a great disk diive Only

looking dust covers on the mark el

Commodore 64 and here's Ihe best news ol all you can oet matching '

solder connechons. and drill a small hole in Ihe case (to mount Ihe switch) Obvi ously. This connection will void youi

A sleal at

by a lot Tly II, you

won't be dlsappolnled (Also hooks youi Old M" lo the I7O2) *<** nc

uo?to Hrrwum

"*"

Mom/up


"The Rabbit"

S39o^|?P

for your VIC 20 or CBM 64

*

J@L

..-■ ~'Xx3{y—^

II you own a VIC 20 or a CBM 61 and hove bean

concerned about ttie high cost of;j : - ' youtpiogramsan

'

VsS^J

worryyourselfnolonger Now

f

there's 1 he RABBIT The RABBft comes in ocartndfle.

^+Jy

1 _^y~***^__

with the RABBIT you can load and store on your

—^^

CBM dalasette an 8K program In alrnov !

^^^^^^C^^

a VIC 20 or CBM M. almost as fast os the 1511 V^

J

\Jz^ ^J

^^-^^J

V—<y"^

CSr~~*J

■ Upload/Download tcVfrom disk or tope. Menu-driven, • Automatic File Translation Real Time Clock plus Alarm Clock. • Communicates in Industry Standard ASCII. • Line editing capability allows correcting and resending longcommand lines

Basic Programs, works with or without Expansion Memory, and provides two dato tile modes Ihe RABBIT is not only last but reliable

• 9 Quick Read functions. • Similar to our lamousSTCP Terminal package

k

The best feature is theprice — only S49.95 (Cartridge

(The Rabbit tor Ihe VIC 20 contains on e«ponsion connector so you con simultaneously use your memory board, etc) ■

1% n

§\

^m

L

IWI A"» m

ITIf

« hi

NOW

Please lor your own protection

TLJL atCT

In,,.".,,

FOR LESS!

consider Ihe MAI first botoreyou

buy that other a; ..-mbler We've

had numerous customers who

wosted their money on some cheaper ott brand assembler tell us how much better the MAE is. The most powerlul Macro Assembler/Editor available lor the

Commodore M and other CBM;PET computers, and olso (or the ATARI 800 XL and Apple IlillE.

MAE Includes an Assembler. Editor, Word Processor, Relocating loader, and more all lor lust SS9.95. We could go on ond describe Ihe MAE but we thoughl you would

like to read our customers' comments. The fallowing are actual unedited comments from correspondence about the MAE:

| I

1

——-il^B^t- ■

seconds, compared to the current 3 minules ol | The RABBIT is easy to install, allows one to Append

_~"j

10:14:36

Don't settle tor less than the best!

/ ,-*—^—^—v \

age disk. And speed ... this Is one fast RABBIT

disk drive.

•PFO* 10DO0DCPD1 D29ELL 12:30:00 [TELSTAR's Status Line)

\

/'>-^—-./-\

and a! a much, much lower piiceihan the over-

1

TELSTAR 64 - "A Star is Born" Sophisticated Terminal Communications Cartridge lor the 64.

"Excellent Development

"My Compliments to Carl

Rackage" "Con-pares to DEC and INTEL"

MoserandEHS" -|tisasjpe'bD:ogianv

• Works with Commodore Modems and supports

: i

,

;

auto-dialing.

and Manual)

Machine Language Monitor Cartridge for the CBM 64

More than 20 commands allow you to access the

CBM 6d's Microprocessors Registers and Memory Contents. Commands include assembla disassemble

registers, memory, transfer, compare, plus many more.

Someday eveiy CBM 64 owner will need o monitor such as this. Cartridge and Manual — S24.95

3239 Linda Dr. Winston-Salem.N.C. 27106

VISA'

{919)748-8446 Send for tree catalog!

COMPUTER ROAD ATLAS

REAL SPEECH SYNTHESIZER Only

TAKE TRIPS WITH COMPUTER

flOADSEARCH

LISTINGS SHOWING THE

$89.95

MAP

BEST ROUTE

Complete

ROADSEARCH ts A COMPUTERIZED ROAD ATLAS lhat helps you plan irlps.

Enter me depirunfl city an a Ihe dsstlrntion city. ROADSEARCH computes the shoriasi rouU or other routos mors suitable to jour needs. Printout Includes dsi .ii i i>ii driving directions, ml I sage. lime, t us I and more. ROAD5CARCH conlalns -i roadmap ol 106 citlea/road functions and 70,000 road

miles.

HOA0SEARCHPl.ua

(oilra

cosl|

DEVELOPMENT SYSTEM which leii you

also

ir I.

contains

i

ROADMAP

.. ;k your roaomap

Add local

roads, (avoille snorleuls, now destinations, flic. ROADSEARCH-PLUS lets you add up to 50 towns/road June lion a anywhere in Nor in Amorlca.

EA8VTOUSE. Back-up copies allowed. Specify Apple lulls or Commodore-64. flu Columbia Sollware carries a 16DAY MONEVBACK QUAHANTEE.

The best speech synthesizer ova i I able because it talks in your o«">

voIcbI Speaks in any language— oven singing! You can even add

special effects. Easily programs in BASIC using new commonds.

Children find it utterly fascinating. Imagine putting your own voice

ffTOP UKHQ THE "OLD FASHIONED" METHOD at tracing routes on a map. It Is tediojs, 11ms consuming, and Inaccurate. Use your computer to plan your neit muto. The printed output Is an oacsllenl companion on any trip.

(or someone else's) into education, business, and gome programs.

OHDER ROADSEARCH OH ROADSEARCH-PIUS from your dealer or direct I r from Columola Software. R0ADSEARCH-P1U8 II 171.95 and ROADSEARCH is only J3V95 Add 11.50 tor snipping and handling. MD residents add 5% stats lax.

electronic products of 1984!

MAILCOUPONORCALL TODAY

Columbia Software

(301) 997-3100

Box 2235W, Columbia, MD 21045 Please send ms

) HOADSEAHCH-n.USIor 174.95 I HOADBEARCH for SM 95

|q, (

) Apple U/lle

(

1 CB4 Blah

ADO St.SO shipping I1 lam not satisfied, I may return It tors full isfund. (

(check

(

| Mauler Charge

)VISA

Eiplrailon Dale

Card Number

NAME.

system was seloctod at CES as one ol the most innovative consumer

Available for most personal computers. The Commodore M version will reproduce spooch wilhout any exira hardware! Software

license available at no extra cost. Word recognition software avail able separately.

SEE YOUR DEAIEH NOW FOR A VOICE MASTER DEMONSTRATION O' call us ai (503) 341-1271 tor a tolaphone demonstrolIon. Please include W.00 shipping/handling when ordering from the factory. Visa, MC. MO, or check. Specify disk or tape. Call or write for further information

«nd i«e»lv« ■ FREE audio d«nw tap* I

COVOX INC.

675-D Conger St.. Eugene. OH 97402 Telex 706017

ADDRESS CITY

<

These aro just a few ot the mony reasons why thfe Voice Masler

STATE


Lyco Computer Marketing & Consultants MANNESMANN SPIRIT BO

SSB9.00

MTL-1BOL

»559OO

MTL-180L

»775O0

NEC NEC8OS3

J369.00

NEC8OI5

1899 OO

CITOH

GORILLA GX100.

-

GORILLA SERIAL .

..

SI 69 00

. ..

S199 00

PHOWRITEH II

....SSTSOO

B600

IB99 00

SHEET FEEDER

1475 00

620

3fi?9 00

H30

51B99 OO

B510SP

S499.00

B510 SCP

.

..555BOO

A10LETTEROUAL .

S499.O0

PROWRITER8510.

$335.00

PRINTMASTEFt....

£1199.00

STARWRITER. ...S929.00

PRINTING PAPER 30O0 SHEETS TANFOLO

MJ.7S

1000 SHEETS

FANFOLO

SI 9.75

1000 SHEETS LETTER

.

SJ1

200 SHEETS LETTER ... ISO RAG STATIONERY.

95

SAVE -PRINTERS $279.00

1091

$309.00

1092

MAILING LABELS ft In) .

.19.75

$459.00

M12010 M12010C-64

$1399.00

LEGEND 380 1000

$259 00 $279.00

1018

CALL

1200 1500

$32.75

Mission Pintail.

.

.522.75

Tl ML WORKS-64 Electronic Checkbook.. Star Baltte

.$18.75 $18.75

Wall SI. Manager

SIS.75

EPYX-64 Jumpman

FX-BO FX-100....

£339.00 $639 OO

$199.00 S299.00

83A 84

S569 00 $959.00

92

$409.00

RITEMAN INFO RUNNER

..127.75

Gateway to Apshai Temple ol Apshai

$27.75 527.75

162 50

Super Sketch Graphics Tablol.... $39.95 Joystick

RESTON SOFTWARE-64 Miner 2049er.

$27.95

S19 95

.

$69.95 £22.50

STRATEGIC SIMULATIONS-64

*S49 OO

STKBO .

S149 00

GEMINI 10X

..$259.00 £59.95

Cdopliltor

$27.95

Omnl Writer

S39.95

Sealo< Spare Change

$22.95 122.95

Turtle Toyland Jr

$2; .95

Time 1 Money Mgr

$39 95

Lode Runner

$22.95

Paint Brush

S1295

Hes Games

$24.95

The Factory

S21.95

Minn. Fals Pool

S19.95

CARDCO-64 S69.75

C/?B Primer Interlace ... S39.75

INF0C0M-64

DC/1 Cassette Recorder $39.75

Enchanter

$32 75

CB/5 5-Sloi Eipansion

Infidol

S32 75

. SSrt.OO

CR/1 Ughl Pen

$29.75

CE/1 Casselte Intertace. $29.75 C/02 WnieNow

$34.75

0/01 Mail List

$26.75

D/04 Spell Now

$26.75

Eagles

$26.75

$26.75

Ringside Seat

$26 75

RoBBIt Rom

$34.75

TalStaf 64

$39,95

Assembler Rom

$19.95

ALIEN GROUP-64

SCARBOROUGH-64 Maslertype

$27.75

Songwriter

S27.75

PHI Beta filer

$32.75

S99.OO

$25.00

Sea Dragon

$25.00

Stralos

$25.00

$29.95

Frogger

S39 95

S82.00

12" AMBER

589 00

100 GREEN

$115.00

105AMBEH

S32 7b

Alphabet Zoo

$23 75

Kmdercomp

£23.75

Kids On Keys

S23 75

Pacemaker

S23 75

Delta Drawing

S26 75

Fraction Fever

$23.75

Cocmlc Life Up For Grabs

$2375 $26 75

Blue Ma* Shamus

S22 75 $22 75

Shamus II

£22 75

Zeppelin

£2275

Zaiion

J22 75

132.75

Donkey Kong

$32.75

01" Dug

132.75

Home Accountant

Sd4 75

$32.75

Tai Advantage.

$35 75

Cenlipede

$32.75

C-64 Users Encyclopedia.£12.50

Delender

CONTINENTAL-64

MONITORS AMDEK

SCI00COLOR... S229.00 SG1000GREEW

£9900

SA AMBEH.

TAXAN

,

Pacman

SAKATA

12" GREEN

$32 75

SYNAPSE-64

PARKER-64 OBert

ATARI SO FT-64

Arex

$32 75

Witness

SPINNAKER-64

$21 75

Voice Boi

Planetlatl So'cerer

MICROPROSE-64 Solo FtigM

EASTERN HOUSE-64

.

HESWARE-64

$26.75

Computer Bas&ball

*CALl

Mlcrosofl Mjltlplan

Knights of Ino Desert

$25.95

MAXELL

S67S 00

POWERTYPE SWEETP|Mo0eM0OI

CK/1 Numeric Keypad... 134 75

KOALA-64

GORILLA

£1675

S575 00

RADIX 15

$39.95

Cr>G Primer Interlace..

DISKETTES " SSSD

S525 00

RADIX 10

Bank St. Writer

17.75

INTERNATIONAL-64

" SSDD

DELTA 15

CALL

ADVENTURE

ELEPHANT

.S449 00

CALL

6100

1379 OO

DELTA 10

JUKI

PERSONAL PERI PHERALS-64

$27.75

Pitstop

VIDEO 300

$109.00

..

VIDEO 30OA

£149 00

COLOR 1 +

ZENITH

$139.00

$269.00

COLOR 11+....

. $399.00

£125.00

ZVM 123A AM8ER

£95.00

210 RGB COMPOSITE ..$269.00

ZVMI23GGREEN

$85.00

400RGBMEDRES

£295.00

$349.00

ZUM 124IBM-PC.. ZUM COLOR

$129 00 £275.00

JB1260 GREEN

410 RGB HI RES

JB1201 GREEN

..$145.00

420 fiGS HI RES (IBM].... $475 00

ZUM 133 RGB

£389.00

JB1205

..SI 45.00

it 5 99

121 GREEN

S1d5.00

ZUM 135 RGB

$449.00

JC1215 COLOR

.. $269.00

117 99

122 AMBER

$149.00

ZUM 136

£589.00

JC1216

..$399 00

MO-1

$24 75

MD-2

$34.75

CERTRON

CASSETTES cc-ionsi

MICRONICS

S27.75

JumB"iari Jr

DSDO

STAR GEMINI ISX

80 82A

PROFESSIONAL SOFTWARE Word Pro64/S<X>1l

..£18.75

Data Manager

$299.00

BRODERBURD-64

Koala Pad Geometric Design

SUB LOGIC-64

£269.00

RX-BOFT

CALL CALL

Hill 1000 FANFOLO . . Sid.75

Flight Simulator II

$279.00 $279,00

D4015

RK-80

OKI DATA

BLUE CHIP

SB 99 .510.99

EPSON

PANASONIC 1090

800-233-8760

AMBER.

.

$99.00

POLICY

TO ORDER CALL TOLL FREE

NEC

In slock checks

or iond order to

^S?

■Customer Service 1-717-327-1825 Jersey Shore PA I 7 7 4C

item* require

snipped tvithin lour

deposilonC O D

weak*

24

hours of

clearance

order

befo'e

within me continental US

P* residents add *al*s la«

products lubjBd lo availability and price change prices thaw 4Q-i discouni offered tot caih Card or V<ut

Personal

shipping

Ho

order* Free shipping on p'epaitJc»*horders

OEALER INQUIRIES I

adO 4"-

Air

Advertised for Master


COMMODORE (fix SOFTWARE Arcni

Beach-Head ..

(DI23.9S

Neutral Zone

IDI2J.95

Raid oier Moscow

(D12b.9S

MsslerCompoiFr

ID1I6.9S

Ann Soft All Tillts

Call

Logo

(D)59,f5

Pilot

,.|r)H2.95

Pt! Emulalor

(D)I8.«

Intro to Bun I

(TJU.9S

Screen Edllor

|D)IB.95

Super Eip.nder VSP

[DJ37.9S

The Manager Simons Basic

(D)S9.95 (CHS.9S

Music Machine Music Composer

(CI15.9S IDI18.95

Nevada Cobol

(DW.4S

Nevada Fortran

.(DH9.95

Commnlorv

Aisembler

(DU7.95

BomiiPael

. ...<D.TH6.«

CP'M2.2Sjtlem

(C.T)57.9S

Ha.y Script

IDJM.9S

Easy MailM

(D)lfl.W

Ea^ySpellM

(D1IS.95

EasyCalcM E15V Lesson/Quiz BU7 Financed-*)

(D)M.« IDH8.9S IDI18.9S

Magic Desl

(D)S4.U

Zorin-3)

(DIM, 95

Voice Syntheili Public Domain All Titles At™unllBjScriei(ea)

(CIS9.9S (D)8.9S (DM9.95

Time Money Mgr

(DJSI.OO

Slory Machine

Omniwriier

(DJ24.2O

Train!

(DI27.9S

Mulllplan He* Writer 64

(D)59,9S [Q3O.45

Aerobk* Scaiboromh

|D)».9S

Home accountant

(D)S0.7S

Tai Advinlige FCM

(D)W.M (D176.5O

Gridrunner MFonh..

(O20-9S (CM°.9S

Songwriter Mailer Type

(D135.9S (DIJI.M

Cnallvi Stftmut Hou"hold Fin Homelnv Loan Aiulyitr Cymbal

(D.DI9 M (D.T)I9.« (D.T)I9,«

EngHid/Snimih Science

IDI34.9S (D1M.95

History/Gfogtiphy

[D1M.95

MuiicThcoty

(DIM.9S

Milhtnulict

HES Games 'M

(D:27.°5

SjiupM

Ft.Apocaljpa*

(D.O23.70

HES Modem I HUnspniH Hcllsal Ace

(DHW9S (DI2J.95

Shamua Blue Mai ZaiiDo

(D.O2J.70 (D.O23.7D (DI27.9S

Solo Flight

(DS6.9S

SSI

Nato Commander F-li Eagle

(DI26.95 (D)36.«

MinneuHaFatiPool

MbLdgic

Combat Leader Knightiofthe De«n

(DI29.00 (DI29.00

Computer Baseball

(DI29.DQ

Hudoan Commodore M

Executive M IS*) Dill Drive 1530 Dataiellc MPS R0I Primer t650 Auloniodem

1702 Color Monitor ibOO Modem

(DW.9S

Eaglet

(DI19.00

ID1M.95

Night Minion Plnball

[D126.95

(DI2S.95

Airin the Color Civn

...(CJ27.95

Ring Side Sen RFD198J Germany I9SS

(DI29.W (DI29.95 (DI34.9S

Bubble Bursl

...(O27.9S

Golf

(DI29.9S

Jn.atkka

...(C)27.9S

Broadsides

[DI31.9S

Wico

|D)i3.9S .(D.C)23.oS

Etactwole Ana One on One

(DI37.0O

Wico"Boit" .

13.50

. . .(DJ2O.3O

Mutic Comlruclton

(DI37.OO

Wico Red Ball.

20.7S

Epyi

Plump

(C12'.0O

Juke 801

Ttmplt of Apih.i

IDI27.M

Kld-intcr

Jutnpmui G»K«>ytoApltni

(COOM

Hlghl Simulltorn

EnlrrtilnmcnT Tonight Ttlvlt

<C)2?.2S

(D.Tin.CO ID1J7.0Q

Fice Maker .... He j Diddle Diddle .

b4 Prog. Vei. Guide BASF

.2I.9S

Soft BoillO) . .

.2J.90

19.SO

Command Ctrl

JumpmiriJr OilBlion

(027.00 (DJJ9.95

.(D.Q20.30

Say Foi

[DJ37.00

Snooper Troop*. ...

...(D127.00

MlaeeJluneooa

WicoPo*trGtip .20.75 Caria

ImpoiMblc Mission

ID12S.95

Fraction Fever......

...(C)23.6S

Doodle

IDI31.9S

Card + G ,

68.2S

GtoHH BucblU

(DIZ5.95

A ma ring Thing.....

...<D)27.00

WonJPro3+

(0)76.95

Card B

37 .SS

SummcrCimti

(DU°.95

AlphabetZoo

.. .(DI23.65

Trivia Mania

(DI33.9S

SiliconeWirrioT

(D)IS.M

Kidi on Kevi

.(D.O2J.6S

Paper Clip/w Spell Part , ..(DIS9.9S

DelU Drawingi,..,,

, . .(Q27,2i

Ortcal

(D|79.9S

Numeric Keypad .30.25

UpTorGrabi

...(O17.2J .. .(OJJ.U

Muaicale Mr. Bobot

(DH1.9S (D126.9S

GEMINI Printers

Suspended

(D)JT.9S

H« Software

StarcrOH

(DJJ0.9S

Deadline

(D137.W

HcsMonM TimlcCnphicil!

(C)27.0O (CW.eO

Klndercomp

Cosmic Life

Cm Inlerfaee. . .33.2S 5SlolEipamion. .b0.25

OSULLIVAN

Fumlture MAXTRON

Ta enter, call loll frer or irnd by mail.

We acctpi Visa. Matlcr Card. American ExprrSi or Money Qrdtn

Personal chrtki flV/ow />vo Keel* to clear. Add

H.QG for shipping with an aililttrwial 11.65 for C.O.D. orders. Other countries pleait cull on shipping *>iih a minimum o/SW.QO. h Credit and exchange tmly please. For return authortiaiion will \214] 759-A937,

DaEaseltei

All pnees are subject lo

Only IO°t of Software

ATARI, APPLE. IBM.SOFTWORE LISTS AVAILABLE

wt cairy 11 this nil.

LONGVIEW.TX.

FOR ORDERS OKLY CULL TOLL FREE

Outside Texas

Inside Texas

lined an

Cull if there is

a ttttiyoit nrrd fur all computer*.

We

here tu icvi" you!

1-800-527-8698 1-800-442-8717

Version 2.0

EVERYTHING YOU EVER WANTED IN A DISK UTILITY... AND MORE!! FOR THE COMMODORE 64* + *

Fully automatic back-up of almost any protected disk. Copy files [PRG, SEQ, RND] with full screen editing.

* Three minute back-up of standard disks [even many protected disks]. +

Format a disk in ten seconds.

+

View and aiter sector headers.

*

Remove errors from any track/sector.

* + *

Edit sectors in HEX, ASCII — even assembler. Create errors on any track/sector [20, 21, 22. 23. 27. 29] instantly. Drive/64 MON, even lets you write programs inside your 1 541.

*

All features are fully documented and easy to use.

*

None of our copy routines ever makes the drive head "kick." Yes, you get all of this on one disk for this low price! S39.95

WRITE OR PHONE „ 'Cornmodofs &4 -s a registered tr»dsmark of Buiiness Machin

ST&RPOINT SOFTWARE StarRouteiD

Gazelle, CA 96034

[916] 435-2371

VISA or MASTERCARD

add S3 for CO.D.

are


Let NDmRG introduce you to the AGE OF PERSONAL ROBOTS THE NafTlflD ROBOT! AFFORDABLE! FUN! EDUCATIONAL! IS NDmHD INTELLIGENT? YES! Your C-64 or VIC is NOniRQ's brain.

CAN NDmHD MOVE ABOUT? YES! IMDmflD accurately traveis forward, reverse, and pivots left and right using industrial type stepper motors.

CAN NDfTlflO SEE?

YES! NamfiD has ultrasonic sight, ranging and motion detection capabilities.

DOES NOmflD COME WITH SOFTWARE? YES! NDfTlRD comes complete with ready to run soft ware including a friendly robot language for creating

S179. 95

your own programs.

HOME SECURITY AND ENERGY MANAGEMENT PRODUCTS VIConlroller. Wireless home control using BSR or Leviton receiver modules. Software included.

$69.95

COMclock/AB Autoloads and runs program at power-up. Battery backed up clock. (C-64 only)

$69.95

COMsBnse. Provides 4 open/close and 2 analog inputs. Great for security

$69.95

SUPER SCHEDULE PLUS Control software utilizing above three pro ducts. (C-64 only)

$19.95

SPECIAL

PACKAGI

PRICE

<.inn

•> I HH

IM

COMVOICE! THE EASY TO USE SPEECH SYNTHESIZER FOR THE C-64 SPEECH IS AS EASY AS 1-2-3!

1) Plug COMvoice in.

2) Turn computer on. 3) Type SPEAK "HELlO, HOW ARE YOU" AS EASY TO USE AS A PRINT STATEMENT!

SOD

99.

95

W/EXTERNAL SPEAKER S139.95

EDUCATIONAL DEMO & AARDVARK ADVENTURE SOFTWARE AVAILABLE

GENESIS COMPUTER CORPORATION • P.O. BOX 152 • HELLERTOWN, PA 18055 DEALER INQUIRIES INVITED • (215) 861-0850 • MC & VISA Accepted


ADVERTISEMENT

Software Discounters Sal nf F

ATTENTION ALL COMMODORE 64, VIC 20, and PET OWNERS! A complete self-tutoring BASIC programming course is now available. This course starts with turning your

computer

on,

to

programming just

about

anything you want! This course is currently used in

America ACCESS Beach Head, i or D)

Neutral Zone (TorD) 121 Raid Over Moscow

fTorDi

138

ACT1VISION

ARTWORK

literacy programs. Written by a teacher, who after

Hay Diddle (0)

119

KldsonKeys(R) ...

121

Number TumDler(R) .119 SaaSpaller(R) 119 Up4Add'am(R) ... 119

KldwrlterfD) Klndercomp(R)....

121

FIRST STAR Aalro Chase (T or D)

Brldge*.0(TorO) ..

11B

CornpjlerSAT(D). . 159

Monkaymath (T or D)

116 121

HEB

HBJ

Strip Poker(DJ BATTERIES INCLUDED

HES Modem 1 HES Modem II

call

Home Organizer Ser as: Audio-Video Catalog

HESGamostW ....

123

Mulilplan(D)

166

121

Paint Brush (R) ....

118

121

Synthesound(D)...

117

Home inventory (D1121

Time/Money Mgr (0)

118

Recipes ID)

121

Stamps(D)

121 158 M7

INF0COM Deadline (0)

(D) Cneckbook(D)...

Paperclip |D) The Consultant |D) . BRODERBUND BankSl.vVrlter(D)

.

143

Castles Dr. Creep(D) 121

to

Drol(D) Loderunner(D) ....

123

Suspended(D) Wltness(D) Zork 1.11. Ill (D) KOALA

S33

Touch TflDlfit

Maskol theSun(D)

I!S

well

as

many

programs for you to make up. At the end of each

lesson is a test of the information presented. Fur thermore, ALL answers are supplied to all the questions and programs, including the answers to the tests. Follow this course step by step, lesson by

lesson, and turn yourself into a real programmer! You won't be disappointed! We will send this COMPLETE course to you at once

for just $19.95 plus $2.00 for shipping and handling (U.S. residents, please pay in U.S. funds). If you do

Championship

SoaStaiker(D) Sorcerer (D)

125

as

Loderunner[D) .. 133

Operation wnlrlwlnd CBS Big Bird's Spc. Del(D|

1JJ

DESIGN WARE Crealure Creator (0)

M«tnMaze(D) Spelllcopter |D) Trap-A-Zoid (D) .... EPVX

i

i;

COMMODORE 64 a

CHECK DESIRED COURSE;

VIC D

PET D

Send Cheque or Money Order to: Brant ford Educational Services 68 Winding Way,

Complete course:

Brantford, Ontario,

Postage and hand:

Canada, N3R3S3

Total: October 1984

$19.95 $2.00 (21.96

125 123

125 125

SUBLOaiC

Flight Simulator II (D) 135 Night Mission Plnball(D) SYNAPSE Blue Mai (TorD)... Ft. Apocalypse

121 121 121

Nee romancer (T or D) 121 |T or D)

121

call

121 SlamDail(TorD) ... 121 125 ZanonfTorD) Zepsllln<TorD| . 121

.

121 .JJt

HICBOLAB Dealh In Caribbean

(0) 123 .123 DmoEggs(D) English SAT 1 |D)... .118 Main SAT 1 (0) .119 MICRO PROSE HellcalAcs{D| .... .118

TIMEWORKS Data Manager (T or D>117 Data Manager 2(0). 133 Money Manager

117

(T or D|

Spellbound (T or D). 117 133 Word Writer (D) TRILLIUM Amazon (□)

NATO Commander

.123

.167

Dragonworld(D) ... Fanrenhell *5i(D) Rendevous with

.

Rama(D)

Shadow Keep (D). .

125

S.A.M,|D|

139 123

Suicide Strike (D) .. WAVEFORM Muslcalc i (0)

Mistertype(DorP)

125

Musicalc2(D)

SCARBOROUGH Songwriter (□) SIERRA ON-LINE

.125

Championship Box no

ID) Homaword (D).,,. Oil's Well(D)

.118

137 127

Chalerbae(O) PokersamlD)

135

Miner2C49er(R|

127

TRONIX

..

RESTON

127 127

Musicafc3(D) ACCESSORIES Allen Group Voice Box..,.,..,,...

SI!)

HS 121 123

call

Cardco Accessories call

Delta Drawing (R| .

sir,

Verbatim Disks....

call

11*

Facemaker(ft). . . .

.121

WIcoBoss

Fraction Fever (R).

.121

WIcoBil Handle.

113 119

11B

G rand m»' s H ou se ID) 121

WICoTrackball

128

(TorD) worlds Greatest

125

il.iM-l ,i!l iCl

123

.119

Hop Along

Counting (ft) ...

M5

.119 123 .139 .123 wjzardi Pnncessl 1)121 WHTypB(D) .123 SPINNAKER AOventureCroator(R)I2S AeQean Voyage <'\ »6 129 Aerobics (D) AlphabetZoo|R|.. .121 121 Cosmic Lile(R) ...

rtHlavvl

FISHEH PRICE Alpha Build (R) ... Dance Fantasy(R)

POSTAL/ZIP CODE:

Knights ol Desert |O) Pro Tour Goll(D) ... ROF 1985(0] Ringside Seat (D) . Tigers In Snow (□)..

8ASFSS.D0...l17Bo>

Tempte Apsfiai

PROV./STATE:

COMPUTED Gazette

i ii^tw^f ^i

126

125 Eagles(D) 50 Mission Crush(DI 125 Fortress(D) ....... 123 Germany 19115(0) .. 139

143

.123

(0)

IBS

121 12 S 125 125

125

P)

Cosmic Ba la ncB(D)

Sentinel (T or 0)

SupeibaSB<M(O)..

JumpmanlTorD] .. 125 9 to 5Typing ID). .. 125 OIIBarons(O) .138 Htilooffll .125 Puulepanlc(D).. . 113 Summer GameslD). .125

CITY:

176

PRECISION SOFTWARE

123

119 FAX|D|... Gateway Apahai(R) .125 impossible Mission

ADDRESS:

119

123

Dragonriders Pern (DII25

NAME:

Letter Wizard (I)),., 133 PooyaniJVD)

Fill in the coupon or send a facsimile.

SoloFlight(TorD) . SpltrireAce(D) .... 119 PARKER EROS Fioflger(R) 129 133 Popsye(R) OBert(R) 133

shipping and handling (and pay in U.S. funds). If

FULL refund.

(D)

Home Accountant (D)M7

125

125 Tralns(D) SSI Bailie Normandy (D) 125 CombatLeader(D) . 125 Computer Baseball

Pharoahs Curse

Paint-A Rhyme (D) Spider Ealer(D)

CONTINENTAL

not live in the U.S. or Canada, please add $5.00 for

return the course within 10 days of receipt for a

its

MultlDlvfrorD)... 11B Murder by Dozen(D) 123 Poanul Butter Panic 123 (D)

DATASOFT Bruce LeelDI Dallas Quest (D) .. .

you are not COMPLETELY satisfied, then simply

.. .'P.llllIM1 1 I'.l HMlLvP ^1 TJ

WWII

125

Story Machlne(R) . .

fTorD)

M6

Keyboard

Ducks Anoy |R) 123 FractionsrjorD) .. 119 MaichWItslD) 119 Math Mileage(0)... 119 MaslerlngSAT(D).. 199

FCM(O)

125

Muppot Learning 123

Decimals (TorD). . .

133

Touch Table! 126

(D)

126 133 133 133 125 133 125

Planeilall(D)

ChophMer(R)

explanations

148

Enchanter |D) lnlldel|D|

time! The lessons are filled with examples and easy understand

119

its

Most Amazing

Thlno(D)

119 Bristles (TorD) FlipFlopfJorD) ... .119

over 220 pages is now available for the COM

to programming and you can do it all in your leisure

Linking LobIc(R)... .119 MemoryManor(R) . 119

125 126

available today. This complete 13 lesson course of

takes you step by step through a discovery approach

123

Master Composer (D) 13S

classes and has also formed the basis of teacher

MODORE 64, VIC 20, and PET computers and

^4

Inquiries and PA. 412-361-5291

Baamrlder(D) PHIall(O)

together one of the finest programming courses

^^

Bra

'

For Orders Only 1800-22S-SOFT

both High School and Adult Evening Education

having taught the course several times, has put

SDo1 /.

Quest lorTlreald).

Ulllmall(D) UiysaesfD) 1

_

i

1

U

^

^

bHII4d*d*#*#^

Commodore Dust Covers 16 CompuServe Starter Kll 125 Disk Drive Cleaner . .19 Disk Case (Holds 50) 113 .17 Monitor Cable Sakata 13'Color

Monitor

339

Surfle Protector w(6

Outlets

139

P.O. Box 278 - - Dept. CG • Wildwood, PA 15091 Ordering ind To nm Orders with cashier check or money oroer shipped immedialeiy f'u r s oi3 Li'c om n a n y en ■cks allow 3 weeks clearance NoCOO'a VISAjMASTEflCARD

accpeled wjlh no addiilonai charafl lor orders snipped toconiinenial USA Snlpi >ing:

1 PA Continental U.G A — Orders under 1100 add 13. tree aJiippmg on ordera over 110 M .■■!■. add S% sal s tan AK. Ml. FPO-APO — a*i 15 on all orders dd 110 or 15% ol order winches ", iireatesl DeTechvo 11- :. ■- wilt be t -Placed wilh same merchandise — NO CREDITS' Return musl hAVD a u 1 no'if&l tori numbiT 41!) 361 5291 Prices sutHCCI 0 change without noltc L IU1 1 ilNAflONAl. —


STOP PLAYING GAMESi P.O. Box 3354 Charry Hill, N.J. 08034

■ Calculate Mos on HORSE RACES with -';■ COMPUTER using BASIC

Toll FREE (800) 992-3300

■ SCIENTIFICALLY DERIVED SYSTEM really works

TV

Siarion WLKY ol Louisville Kentucky used tins system

For Information Call (609)596-1944

Call us for reliable service, experience snd affordable prlcoa!

lo predict me Mot ol the I'JBO Kentucky DerDy See Pvpulai Computing (february lflflJ) lor a review ol Ijiii program

Tnis

system

was

wntien

and

used

ty

tompuler acfils ana a now being made available to Home cwnpiiier owners tins melriod

iBDasedo'i sioJing oata Irom a lafge numrwr ol races on a hign speed large sfale tOTVputer ?3 tactOfs taken Iram ihe Daily Racing Form" wtie men analyzed By Ine computer lo see now lliey mlruencM race results from ihese 23 tads ten were toinio to Be the most vital m determining winners NUMERICAL PROfWBILITiES ot eacn ot tnese ID lactois we men compured ana this lorms ihe basis ol trtis REVDLll'IONAHy NEW PBOGHAM

■ SIMPLE 10 JSE OBlam

Daily Racing Form " ihe oay belore the races and jnsvier the

10 quemons about each tiorse Run Ihe pnujram and your computer will prinl oirt flip

CMDS4

•Call

odds tor ,m rtorses in each rjce ■ YOU GET

PRINTERS* EPSON

»CALL

OKIDATA

scall

Silver Reed

'Call

STAR

1B20 Color Plotter

M09

Mi'snoi Printer

l2O6

1630 Datasstts 1650 Auto Modem

T.1 '86

1702 Monitor

'CAll

'266 '380

Powertypo

'395

MSD DISK DRIVE SD1 Disk Drive

'335

SD? Duel Olik DHva

'Call

Light Pen

'26

'49.95

Repeal ol e Sellout

1526 PRINTER

$269

Special of the Month

Eiiy Script

„...,,,...,

»*s

Word Pro 84

<SS

EZ Spill

'19

PROGRAMMING SERIES

'49 '47

TYMAC Connection

*7S

Multlplan

"88

Calc Resulta

'34

Practicale

'3B

Koala Pad

'86

One on Ona

'29.96

Mule

'29.9E

ATARI SOFT A

Uonk.ry Konrg

-29 «3B

Pilot

"39

1NFOCOM

MB

Tan Advantage

'45

A/R. A/P. Payroll

'36

'.tl

DATA BASES I'.r ii ■■ .■ Mgr

PET CBM

Your magazines aro o valuable source o( pro

grams, articles, columns, letters and reviews,

provides Fast, easy access to Tills valuable

Zorkl. 11,111

'29 8!.

Suspended

—.......

'29

Stdrcroti...

»28

Deadline

*29

Zaxjton

computers

Can't locate a needed so I Iw are or hardware review? That valuable programming uhlily?

rce'

. at last!

THE COMPLETE MAGAZINE REFERENCE COMPANION COMPREHENSIVE inflexaa ihe 12 most popular Commodore ana general microcomputer magazines Over 6000 cross-referenced entries covering

'29.96

January 1932 thru March 1984 Compute! Comoulo's' Qaiette, Commandet, CofifmotJoie, PowlPtay, Run, Creative Computing, and moref

COMPUTER COVERS

VERSATILE Sm separate Indexes: sut>jecl, htle. programs, soflwaro reviews, hardware reviews, and table si contents. Includes updates and VALUE Locale vaiuaDio "Ireo programs lor a wide range ol game) and applications, or reviews thai can prevent cosily purchasing errofs. No

'77

The Consultant Formriv

more Ume was I ad searching stacks ot hack issues lor that item you can't

llnd. Go directly lo III All lor 114.95.

Reg. >15B

$6.99

CMD64

90.99 '

VIC 20

J8.39 I

DltkOrin Flf»n MX

1B.93 A.I .

■ ,;" . v., 80 FT 17 99 | '. 91

17 |

Prices reflect a cash discount. For C.O.D., Visa, and Maslercard add 3% Immediate delivery wit recertified check or wired

funds. N.J. resident add 6%. Prices subject to change. Shipping For shipping and handling minimum)

Larger shipments require additional charge.

Want to stay up-to-date? Subscribs \o PcDex Quarterlyvm\ Receive4 issues including an annual cumulation tor only S1795

17.99

Ordering & Payment Policy

{S3

Commodore C4',"1 VIC-201,"' and Compulmfl magazines getting out ol hand?

-....'70

Special of the Month

3%.

When was that article?

'84 I

Super Bun 84

add

FUN and PROFIT!

revlaionr?

Code Writer '.''■ >■]-

Tip-

START USING YOUR COMPUTER FOR

Introductory Price

Horns Accountant

Commotore M [disk a uudie}.

Enclosed Is: □ check a money order □ MasierCara1 □ Visa

ped*

ELECTRONIC ARTS

Polo r'iiMImn

'39

Aim.

IBM | auk)

Magniinn resource guides for

•34.95

«B2

ACCOUNTING

Sinclair tiroo irjoo.

Flight Simulator

'3fl

Nevada Cobol

TIIS-IH. JtppU I disk).

Find it fast with PcDex""and PcDex Quartorlymt

'.UHIOC.lt

Loan

>44 'IB .„....„.,... '3ft

Yes. I want lo use my computer (or FIN ana PROFIT. Please send me "Ray ihe Horses" lor 129.95. Circle Ihe cassette you nead1 vic-2o. color computer.

SPREAD SHEET

AitomblerG4

Simon Bulc Sciein Editor N*v*di Fonnn ...,„

(503) 357 5607

'31

Special ol the Month

'46 >69

MAIL COUPON OB CAUT0DAY

3G COMPANY, INC. DEPT. GA RT. 3, BOX 28A, GA5TON, OR 97119

'29.50

6 Slot Enpanilon Datiurte

SS/DD'17.00

Bank StrHI Writer Paper Clip

II Sample form 10 si-npkfy enreung cau tor each rau

'64

Numeric Kovpad

ELEPHANT DISK WORD PROCESSING

21 toting ol BASrC progrims lor use with any computer 31 insiiucwns on no* io geivw naam eia "an me at. Rxing Fo>m 4| Tips on us.nq rrw mws generated By In* ryogram

CARDCO

'42

'39

EZ Beck up

SS/SD "18,00

'37.95

•G Printer Interfaca

Terminal Interface

1211 Super Expander

4 Outlat

'21

Int'l Soccer

1011 R3 232

Magic Volco Spooch

Gamlnf 10X Qamini 15X

SURGE PROTECTOR

i54i$caii

COMPJTEH POWEB gives you the advantage1

I) Program on usstrt! a Bis*

Catalog We sell a large selection of hardware and software. Send 81 for catalog, refun dable with order.

ALTACOM,'JVC. P.O. Bo. 19070. ALEXANDRIA. VA 22320 □ PJPiise senfl me a copy o< PcfJei at S14.95 BluS S2.00 shippma'riflndlirig' O Plnaseenter my subsinplion to PcDei Quartady (tissues) (or S17.95' Payment enclosed: $ (VA residents add 61, sales ta") Charge my:

□ VISA

Card no

Exp

Mr./ Ms Address C.ly. It* ui. add 15.00

_Slale/ZIP_

ptfo\e iPM adtfitionai try tot mat ion □

FOR FASTER SERVICE CALL 703-6B3-1442 COMMODORE TPflDEWJKS ACKNOlVIEDGED

DtAJ.tR INOUIBlEi ri\VII£O I


LERQY'S CHEATSHEET KEYBOARD OVERLAPS

rlivt

designed

h.irjw.irc liit

Th*ne lha

BIBLE SCRAMBLE-Baok fluizzer «0SICHAH-Fa5t Mubic Editor

QUICK FILE'EH-Easy Disk Filing CflT H HOUSE-Kord ftecoqinition SPELL1K SCRAHBLE-Best Speller

bmiutwf kayboard

lor

CD

cuHl-out

knyliDiird

it* pLjsl.c

Thfl

hey4

*Jth

KflOfiY TUTDR-Iiproves «e«ory

Presenting MAGICAL

-toutzvH mttlayi die dcairjnuo 1

surrounding

SOFTWARE

BIBLE HEMRUER-ftHorv Verses

3662AS, 15th St. Milwaukee, Wl 53221 (414) 383-2503

FOR COMMODORE 64 LEHOV'S CHEATSHEETS"1

CHIPMQNK

IHgitat 'Wizardry

co«nn.

contrdi orauDoa (crgslhAr 1or etity ratoronceit-

CHECKTRKKER 64

CHRISTMAS CAMLS-Nords t Husic

Software

LEROY'S CHEATSHEETS'"

ELECTO 6REET1N& CARD MAKER RESET SKITCHES-19.00

MASTER COPY $19.95 Under 5 minute back-up

♦15

MASTER LOCK $19.95

Each

3/*3S

631 ». Cherry

Hidden spells keep program?

Battleground, Hn. 9B604

PRIVATE

Send SASE for catalog L Reviews

PUBLIC NOTICE The loliowing utilities are being released iiiio the Public Domain C-64 I 1541 1.

P.oncl Diik Filts

",

Recovci Dqiclod Files

II you deilrf lining* of Ihese

UlMlliti. pleiic tend one 20 < (USA) stamp lor niiim mailing

Sens* reports the "whine" of toq tunning t&wtttd von You k<i.k the dtfUQyet's

I lllTI- It 111.

>utitle> tuU-nght and order tUmh speed

As you tv.ifr/i

ICT

(or lhi> Mfvlcr

inn torpedoes c/ass v<"" bow

Svi'3' 'ftwnS OU'l^Prl itnei \OII t/«5F U/l ttlP SllbriitirfnQ bvlOw Suditeniy. beatify to taiyet shifts <8V

dpyiees

taneaus

and

the

sonm

return

's

"'stun-

'H€ SUB IS OIRlCrtY BELOW

ll.n-ln'i'. llncdware

You

P.O. Box 7933

stab (he fire liuiti.ii and kva(t<J as 6 depth charges atcfi ">tu VI)*'1 wa*t

Severn! tony seconds pg££

b&forB they e*otude

sending S" dttniet- tit .-.-title

ivjre' to thv suitav.e

The message

SUNK

San Diego. Cn. 619

92107

224-2147

SUBMARINE

Drains & U«t Groups use

flit she s vn the si reef But congiatutHt/ii'is

our Reader Service Number

fl;p biief fou/ more subs me lurking out there tumewhen'. trymy to eactpt into the open ocean .

SONAR SEARCH is 3 'la»l-BCtion hasptl

nn

anii-aubmanna

sti.ii"uv game

wdrf.ire

Yuu am

>hf

Lur'i'i'SPirlp- 'i! rf [jmun »' Illf'r Meslrovei^ SOni to

FOR COMMODORE 64

mie*ce[iT A uttrkof 5 piipmv ^iilirnrfriiic5 Equipped

D1SKMIMIC5+-

vvilh sonar gear anil i!e|iih (.liaryes. and ftidBd hy

subma'ine B'ghlings (ram oinpr ships ami aircmll, you 1'iiihf gAl (Mi+tIIv oval a Mil' I" s<_ure i li'i Will! your Hppih i-harges

SIJNAft

SEARCH

Fe5oii>T 'in

makes

graphics.

lull use oi

mulnrnU" a'"l

■ li.i.ins ill Hip CiimmodorB 64

Ilia hi(jliautlio

cap*

I'luyramnlcil in

nachina lunguaga lo pmvjilf immodiBlfl raspnnaB

Ninn*.

ilnn ,

,

.

Vnr^o.ia ALL AUTOMATICALLV

* Supports 1S4T Dnvfls 9 Don'l He withoul • -. up" * ■■■.:. disk in lesa ihan JO seconds

Now 3 Times as Fasti

.

-

K i.i

IN LESS [HAN 8 MINUTES.

ONLY $49.95 A.I.D. CORP.

.

4D2O HEMP5TEAD TURNPIKE BEIHPAQE. NEW YOHK 11714

Allltr.

15181 '31-7100

Cilv. 50i)r.sidgp£) >)jiufl nqiS* OOfoieiii'ilfO' escti gjme oide'fil Allnaym

musi tic m USAdincit >llloiaigo pav<nai>t^ «.nt Deaydiiisl USA hanks PArpsicirnis add61J=. sale* t«« Of ciiaf^i1 tn

i

Mjsip- C^"i

VISA

P E»ii

Owe

„_

| No SEND TO

i'i elating disks for

BACKS UP ENTIRE COPY PROTECTED DISKS

iJb 00 ' i..i-1-hns-ci ■

^»^_^

up -i-i.i i I.

educational <■ raci t?nter(8inmg Cur'ies compteto will lisKUCHon Mariuiil ami keyboarri Icinpl.itv (S73 95I

<

M.i

11 i■ i-

CorTiMiodore 64" Including Cony Prqlecied

in ynu' oommands, SONAR SEARCH is rt-iilislit.

Commodoia 64 ' CHECK ONE

*

SICiNAI (OHI'iJII KHINSIJL I AM, 1.111

.

PI)

• flKshuiflh, PA ISJ3t • 14111

Dtskmim!c5" is a trademark ol AID Cn'M'alion

Commoflors B4* 1 1S41' na ttademark of Cammcjdcjra Electronics Lid

ShlpDIng 4 Handling— St.50 Bach DEALER INQUIRIES INVITED


C-64 DS TM

GIFTS THAT TEACH Tutorial cartridges for

Color Digital

Commodore 64 * Slates and Capitals

Oscilloscope

* Counties (specify state)

• Copies 99% ol currenlly available Commodore 64 disks.

• • • ■

Supports 1 or 2 1541 drives. Takes approximately 25 minutes. Easy to use—menu driven. Currently available—(uture updates

$17-

* U.S. Mountains, Rivers & Lakes

* Oceans, Seas & Waterways

• Add-on peripheral convens C-64 to

* Western Hemisphere Countries

4-channel digital oscilloscope. • 4.5" x 7" Box plugs into user port.

* African Countries

• 2 MHZ sampling rale. • 500 KHZ analog bandwidth,

* Asian Countries

* European Countries

• Simple menu driven opeietlon.

* Human Skolotal System |AgesB-i6)

• Storea/reirievss waveforms or disk or cassette

• ditto will even backup ditto.

ORDERS 800-762-5645 Hours 10-6 Mon.-Sat.

• Gains and tlmsBasB controlled trom

Clear graphics and color sprites.

keyboard.

Each cartridge S35.00 * $2.00 S&H

• Spectrum analyzor soltwara available.

Checks & money orders accepted.

• Specify disk or cassette software.

S. M. Thorpe Co.

CARDINAL SOFTWARE 13646 Jefferson Davis Highway

$249

Send:

1229 W. 4000 N. Pleasant View, Utah

Rapid Systems Inc.

call:

5415 136th PI, S.E. 206-641-2141 e-n.Q I Bsllevuo, WA 9B006 W^^& Pmc<i lubpicl to trtanga *il"out notice

64404

WooaDrldae.VA 22191

HAVE YOU GOT THE

TUTOR with your COMPUTER

1541 BLUES?

Educational SOFTWARE tutors your child, Http-by-slep Teadwi-cwaled, educationally sound

remarkably elfecltut! For

os of the jfujw, d&dpta of doom. 1 - r* h Tri-ie- -, '-* fvrult dart

*WOl( Scfrwue 1% *[ IT a^Uh - toning up Ml owi oT adventure, myittpf *rd In out W* Hfvrnrurf. Sljn erf

From the dt* tMnci rf Uurtf cJit TO rTtt m of juvicni end piwdtfn cMriudonv you «ti rri(r of ro^orim kncpw*«fac [U If*

. MATH . LANGUAGE ARTS . SOCIAL STUDIES

WE'VE GOT THE

. PRESCHOOL

PERMANENT FIX!!

For Apple II (■, lie. Commodore 64. TRS-80 Miulels III & IV

Sind ui your i*ck 1S41 ind jichvcd rorS89.05 plui '►10 ihlpplng ^ntf -.-II not only align you' drlv*.

«.n n. ii .oil-III

STAY THAT WAY.

Sinil iitf FREE tncclmrl

We guiran1» II for G month*.

DAYBREAK SOFTWARE

Wo also service the complele

(Dlv ol Educational Acliullle*} 1951 Gland Av^nu*. Dept CG

COMMODORE COMPUTER LINE with a 48-hour lurn-around time. ■■■m Iruidlca. CA C11 IT:

BOABWALK BUCTJACK

Play Blackjack Atlantic City Style using 2,4,6 or 8 decks.

BU Bladciack siiulatea playing

with real decks of cards,

including shuffling and cutting.

Allow you to practice card

counting and betting strategies.

BIT - SPLIT - DOUBLE - STAKD. Couodore version -

319.95

IBH Tersion - 624.95 Add $2.00 for shipping. NJ residents add 5x sales tax.

To order specify version and

send check or aoney order to: DETAIL TECHNOLOGIES, INC. 3490 U.S. Route 1

Princeton, IJ 08540

Bjlbmn.NY 11510

TRIAD COMPUTERS

l-ai»M5.J7,T( (U S I :.16-M3-«666 (N Y, AK. HW)

3068 Trenweil Dr. Wlmton-Satom, NC 27103 (919)765-0433

DUANES COMPUTER CORNER

[

II

ii:rFi«u.i

ii in :: ..

(518)372-1615/393-7330

COMMODORE 64

$195.00 52.

ALL C-64 SOFTWARE

•Access'Acadein)1

• flroderbund'Codewfiler Comprehensive • EPYN MUSE • HB • Timeworks Spinnaker *Scarborough Tiraeworks • Screenplay

BMC Monitors •JJ1201Y+ • 12EUN Hi Res

40%

f

List

HT*'l>.E-<UIII-b'

|

Panasonic Printers

M.9S KXPlfliH) 89.9S KXPiODl

289.95 34995

9191V-Color 249.95 KXP1092

Fuji Diskettes

- «n

Sugg.

lUtj lay

399.95

MD1

19.95 box of 10

Super Special MD2

24.95boxofI0

mm

fmtou i

M

*-■■*-

Wrile lor our frcccatalag 3901 SlateSLSdiciiedady.N.Y. 12304

■*ILL- -1


ADVERTISERS INDEX Reader Service Number/Advertiser

Page

102 Aardvark Action Software 103 Abacus Software

98 87

104 Abacus Software 1 OS Abacus Software

106 Academy Software

107 Activision A.I.D. Corp

Altacom, Inc

108 American Educational Computer

109 Artificial Intelligence Research Group 110 The Avalon Hill Game Company

111 B&BMicrolabs Basix Softworx Basix Softworx 112 Batteries Included

113 Bear Technologies

114 Bible Research Systems

115 Big Bytes

116 Brady Communications, Inc Brantford Educational Services 117 Broadway Computer Corporation 118 Bytes & Pieces, Inc

119Cardco, Inc Cardinal Software Cardinal Software

Cheatsheet Products Chemical Sank

The CHF Company

Chipmonk Software Columbia Software

Commodore Computers

89 91

122

1FC,1 190 189

29

Ill 7

133 109 182 77

140

106

132

34,35 188 133 183

IBC 133 191

190 79 71

190 184 BC

120 CompuServe CompulAbilily Computer Mail Order Computer Place 121 Covox Inc

19 103 129 182 184

122 C.S.M. Software Custom Programming Group, Inc

95 191

126 Dow Jones News/Retrieval

135

Creative Software

123 Daybreak Software 124 DesignWore Detail Technologies, Inc 125 Digital Wizardry

Dunnes Computer Corner

Dynastar Productions

127 Eastern House

Elcomp Publishing, Inc E Mori, Inc Epyx Epyx

128 ERGO Systems, inc

129 Extek Computer Aided Products Inc Genesis Computer Corporation

130 The Gold Disk 131 The Griffinworks 132 Hacker's Hardware 133HesWare HesWare HesWare

HesWare

191 27 191 190 191

182 1 84

69 135 37 39

85

53

187

41 136 190 121 123 33

Intelligent Software John Henry Software

136 94

Kyan Software

182

Ken Gordon Production

COMPUTEIs Gazette

October 1984

Page

135 Limbic Systems, Inc

125

Loadstar

Lyco Computer Marketing & Consultants

136 MFJ Enterprises Incorporated

Micol Systems 137Microcomscribe 138 Microlab, Inc

139 MicroProse Software

140 141 142 143

Micro Sci Corp Micro Ware Micro Ware Mirage Concepts, Inc

144 MMG Micro Software 145 MSD Systems, Inc

NRI Schools 146 Omnitronix 147 Orange Micro Inc 148 Orbyte Software Orion Enterprises 149 PC Gallery

Practicorp International, Inc 150 Professional Software, Inc Pro-Line Software

151 Protecto Enterprizes 152Protecto Enterprizes 151 Pi oieclo Enterprizes Protecto Enterprizes Protecto Enterprizes Quicksilva Inc 153 Radix Marketing Rapid Systems Inc

The Scorborough System

154 The Scarborough System 155 Sight & Sound Music Software, Inc Signal Computer Consultant, Ltd

156The 64 Club 157 Skyles Electric Works S.M.ThorpeCo Softlaw

Software Discounters of America The Software Sector, Inc 158 Software Warehouse Outlet

159 Southwest Micro Systems Inc Spinnaker 160 Star Micronics Inc 161 Starpoint Software Strategic Simulations Inc 162 subLOGIC Corporation

133

1 85 121

107 43 46,47 31

63 102 130 13

105 14,15

81 111 67 45 140 189

83 9

75

112 113 114,115 116,117 118,119 55 52 191

2,3

21 24,25 190

Ill .51 191 97 188 95 186

63 1? 23 186 61 57

163 Synlonic Corp

140

3G Company, Inc 166 Timeworks, Inc 167 Triad Computers 168 TusseyMt. Software

189 ' 191 '07

164 Systems Management Associotes 165 Systems Management Associates

Ultrabyte

169 USI International 170 VAISALA Inc Werewolf Software

99 101

130 21 20 191

125

127

134 Infocom

192

4

Reader Service Number/Advertiser

100

COMPUTED Gazette Disk COMPUTED Gazette Subscription COMPUTEI's Second Book of

Machine Language

49 65

73


You asked for them... CARDCO has them! LQ/1 & LQ/3 LETTER QUALITY PRINTERS

"WRITE NOW"

In response to your demand and need,

CARDCO now has available "Commodore-

WORD PROCESSOR SOFTWARE

ready "LETTER QUALITY PRINTERS". Just plug them in and print.

An excellent time saver, CARDCO OFFERS THE CfS2 "Write Now" program with built-in 80 column display. You see exactly what will print. All special codes can

Offering standard friction-feed and optional tractor-feed, the CARDCO PRINTERS come complete with built-in interfacing for all Commodore Personal Computers, as well as compatible input for PC, PC jr., TRS-80 and other

be transmitted to printers maintaining Justification.

personal computers.

LQ/1 13" carriage, 15 CPS

"CARDPRINT" C/?+G PRINTER INTERFACE with Graphics For printers that are not Commodore-ready, Cardco offers fhe C/?+G PRINTER INTERFACE Including all cables and connectors for the following printers: all new Epson MX, RX and FX series, Star Gemini 10X and Delta 10, Prowrlter, C.-ltoh 8510, NEC 8023, Okldata

82,83,84,92,93 and 94, Mannesman Tally Spirit and MT-160, Seikosha GX-100, BMC BX-80 and the Gorilla Banana. Prints the full Commodore character set; graphics, characters, reversed characters and reversed graphics characters.

cardco, inc. Wichita. Kansas 67202

"MAIL NOW11 MAILING LIST SOFTWARE CARDCO D/01 quickly (In memory) sorts by zip, category, name and state; fully compatible with "WRITE NOW". Other fine features Include: Useroriented; menu-driven operation; each disk supports

600 entries. Format can print single, double or triple

LQ/3 11" carriage, 13 CPS

300 S. Topeka

Easy full-screen editing; works with any printer.

(316) 267-65

"The world's largest manufacturer of Commodore accesso â– nmoOwe " is a legmefM Kauemo* ol Commtxfoie Buiineii Syssms. Inc.

labels across. All Cardco Products are available at your local dealers. Write for Illustrated literature.


-

i ■

IT'S NOT HOW MUCH YOU PAY.

IT'S HOW MUCH YOU GET. The computer at the top

has a 64K memory.

It has the initials I, B, and M. And you pay for those

initials—about S669.

The Commodore 64'" has

a 64K memory. But you don't pay for the

initials, you just pay for the computer: $215. About one

third the price of the IBM PCjr™

The Commodore 64

also has a typewriter-type

keyboard with 66 typewriter-

type keys. (Not rubber chicklet

keys like the IBM PCjr.)

It has high resolution

graphics with 320 x 200 pixel

resolution, 16 available colors

and eight 3-dimensional sprites. It has 9-octave high fidelity sound.

The Commodore 64 is capable of running thousands of programs for home and

office. And if you add a printer

or color monitor, disk drive and

a modem—all together it just about equals the price of the IBM PCjr all alone. With no peripherals. So you can buy a computer for a lot of money.

Or buy a lot of computer

for the money.

COMMODORE M' IT'S NOT HOW LITTLE IT COSTS, IT'S HOW MUCH YOU GET.


Issuu converts static files into: digital portfolios, online yearbooks, online catalogs, digital photo albums and more. Sign up and create your flipbook.