TLg -j u i .u i» t.m "*,i*
$3.95 X
The Best Money Can Buy . . .
HDS Floppy Drive Controller Board
•■
f N
HARD DRIVE SPECIALIST
i COLOII COUPUtER CON r«OI 1 i it
1 '
Features'
* Gold Plaud Edg« I
' Dual Selectable ROM Sn
" Compatible with COC
* 120 Day Warranty
* Double and Single 0*
L * I irl
I
.MM1M.
SINGLE SIDED
Drive Complete $249.
Drive 1 Complete $169.
Drive & 1 Dual Drive $399.
DOUBLE SIDED
$289.
$209.
$479.
Reduce your I/O errors with the Hard Drive Specialist
Floppy Drive Controller for the Color Computer. Gold edge
card connectors, advanced design, and the absence of
potentiometers make it the best available. Our newest ver-
sion controller allows the use of either (two 24 pin ROMS),
or (one 24 pin and one 28 pin ROM). Using this board with
the standard Radio Shack ROM gives you 100% compati-
bility with all Radio Shack software.
Completed and Tested Board
with Radio Shack ROM $139.
(Includes Case, and DOS Instructions)
Completed and Tested Board without ROM ... $119.
(Includes Case)
Bare Board with Instruction manual $40.
Parts Kit For Bare Board without ROM $40.
Radio Shack ROM (current version) $20.
Radio Shack ROM 1.0 $40.
Ordonng Information:
Uso our WATS line to place your order via Visa, MasterCard, or Wire Transfer. Or
mail your paymenl directly to us. Any non-cortilied funds will be bold until propor
cloaranco Is modo. COD orders are accepted as well as purchase orders from
government agencies. Most items are shipped oil the shod with the exception of hard
drive products that are custom built. UPS ground is our standard means ol shipping
unless otherwise specified. Shipping costs are available upon request.
ADOS ROM (24 or 28 pin PROM) $40.
ADOS is a product of SpectroSystems of Miami Florida
and is fully supported by the author. The HDS version of
ADOS supports 2 drives, 40 track, 6ms trk-to-trk drives
only, either Single Sided or Double Sided.
TKBUG Monitor and DOS 1 .0
on PROM (24 or 28) $40.
New, unique CoCo software monitor in ROM designed
for a minimum of key strokes and fully compatible with the
1 .0 verion of disk basic. Features 33 single key commands,
allowing the user to quickly display and screen edit RAM in
either hex or ASCII format. Also allows uV. user to dump
screen or memory to printer, set break pc nts, alter baud
rate, set 64K RAM mode, and more, TKB JG by TOMMY
KEETON.
HARD DRIVE SPECIALIST
1-713-480-6000
Order Line 1-800-231-6671
16208 Hickory Knoll
Houston, T'.-xas 77059
From Computer Plus to YOU . .
J3XHHTJTrf
after
■
Tandy 1000 779
Tandy 1200 $1599
DMP105S160
BIG SAVINGS ON A FULL COMPLEMENT OF RADIO SHACK COMPUTER PRODUCTS
COMPUTERS
Tandy 1 000 1 Drive 1 28K 779.00
Tandy 1200 10 Meg. 256K 1599.00
Tandy 2000 2 Drive 256K 1295.00
Model IV Portable 64K 970.00
Model IV Desktop 64K 959.00
PRINTERS
Radio Shack DWP-105 160.00
Radio Shack DMP-110 299.00
Radio Shack DMP-430 660.00
Radio Shack CGP-220 379.00
Silver Reed EXP-550 Daisy Wheel 430.00
StarSG-10 245.00
Star Powertype Daisy Wheel 345.00
Panasonic P-1091 275.00
CITOH Prowriter 8510AP 320.00
CITOH7500 230.00
Okidata and Epson CALL
MODEMS
Radio Shack DCM-3 Modem 52.00
Radio Shack DC Modem IB 89.00
Radio Shack DC Modem II 160.00
Radio Shack DC Modem 2212 315.00
Hayes Smartmodem II 215.00
COLOR COMPUTER MISC.
Radio Shack Drive Controller 139.00
Extended Basic Rom Kit 39.95
64K Ram Upgrade Kit 49.00
Radio Shack Deluxe Keyboard Kit 35.95
HJL Keyboard Upgrade Kit 79.95
Botek Serial to Parallel Conv. 69.95
Radio Shack CCR-81 Recorder 52.00
Radio Shack Joysticks (pair) 17.95
Amdek Color 300 Monitor 265.00
Amdek Video 300 Green Monitor 145.00
Amdek Video 300 Amber Monitor 159.00
Taxan Color 220 Monitor 245.00
Taxan 115 Green Monitor 125.00
Taxan 116 Amber Monitor 129.00
Radio Shack VM-2 Green Monitor 1 29.00
Computerware Video Plus IIC 34.95
Mark Data Universal Video Driver 29.95
COLOR COMPUTER SOFTWARE
TAPE DISK
The Sailor Man 29.95 34.95
Worlds 01 Flight 29.95 32.95
Mustang P-51 Flight Simul. 29.95 34.95
Spectral Space Pack 49.95 53.95
Spectral Adventure Pack 24.95 27.95
Spectral Typing Tutor 19.95
Major Istar 24.95
Sam Slueth Private Eye 24.95
Mark Data Graphic Adven. 24.95
Graphicom (disk only)
COCO Max by Colorware 69.95
Color ComE (rom) 49.95
AutoTerm by PXEComputing39.95
Key-264K by Key Color 39.95
Telewriter 64 49.95
Deft Pascal Workbench
Pro Color File Enhanced 2.0
Elite Calc
Elite Word
Elite File (disk only)
DynaCalc (disk only)
VIP Writer (tape 8i disk)
VIP Calc (tape & disk)
VIP Terminal (tape 8c disk)
VIP Integrated Library (disk)
69.95
69.95
22.95
27.95
27.95
27.95
29.95
69.95
49.95
49.95
44.95
59.95
89.95
59.95
69.95
69.95
74.50
99.95
69.95
69.95
49.95
149.95
Order any 2 software pieces listed
and take 10% off their listed price.
All Radio Shack software 10% off list.
Send for complete list.
CALL TOLL FREE
1-800-343-8124
• LOWEST POSSIBLE PRICES
• BEST POSSIBLE WARRANTY
• KNOWLEDGEABLE SALES STAFF
• TIMELY DELIVERY
• SHOPPING CONVENIENCE
com
^2 '^B
P.O. Box 1094
480 King Street
Littleton, MA 01460
SINCE 1973
IN MASSACHUSETTS CALL (617) 486-3193
TRS-80 is a registered trademark of Tandy Corp.
Under
The
106
,fc
,
ifck- '
T5
i I....
I
",*
-'< f f
J
£
;'* , V''''
Cover illustration copyright © 1985
by Fred Crawford
r^n The small cassette tape sym-
1=111 bols beside features and
regular columns indicate that the
program listings with those articles
are on this month's RAINBOW ON
TAPE, ready to CLDHD and RUN. For
full details, check our RAINBOW ON
TAPE ad on Page 97
FEATURES
IH1 Brotan the B\ue/ Alan A. Saporta
GAME Can you survive the red Gremlins?
[HI Quest For The Falcon's Lair/ Aaron Fransen _
GAME Join in the battle for Earth's freedom
Is3 Random Mosaics/606 and Daniel Delbourgo.
Kaleidoscopic patterns on screen
H Soccer Instructor/ Vincent H. Sheridan
18
26
40
47
GAME INSTRUCTION A program for soccer novices
frfl Operation Freedom/Stei/e Britton IV
GAME Save the captive scientists
S Say Hello To This Directory Helper/Doug Heyza
54
69
DISK UTILITY A solution for the directory's too-speedy scroll
[HI Around The World In 18 Frames/Bob, Daniel and
Tino Delbourgo .
73
GRAPHICS As the world turns . . .
B A Caterpillar's Alphabet/M/*e Knolhoff
EDUCATION C0C0 worms its way into preschool fun
[HI Oodles Of Games For 4K/CoCo Enthusiasts
83
88
Six short games to amaze and amuse you
[H| Amphibia//V/c/c Bradbury
106
iAME Your destination is this alien planet 's moon base
[HI C0C0, Phone Home/Bill Bernico
124
HOME HELP C0C0 showcases your phone messages
[HI Sir Eggbert Jumper/DaWd Dawson 129
GAME A brave knight "leaps" to rid the kingdom 's menace
Memory On A STRINGS BudgetA/orge Mir 166
TUTORIAL Using the powerful INSTR function
The Permanent Shift/Da w'd Geoffroy and
Norman Racine 169
HARDWARE PROJECT Install a SHIFT-lock key
The Joystick Fix-It/ John G. Williams
226
JOYSTICK UTILITY Aircraft technology for better control
[HI Doghouse/Srad Nation 228
GAME Which way did that mangy mongrel go?
Isl Vision/ftotoerf L. Green 230
HEALTH EDUCATION Test your eyesight
NEXT MONTH; Ease back into "school daze" with our Education Issue. We'll feature educational
material for everyone from preschoolers to post graduates — programs to improve your math
and vocabulary skills, some to learn from and even a few to aid the teacher. Take a health lesson
with Heart Quiz, then a quick course in astronomy with Starlinder. For geography buffs, there'll
be a program with a quiz on the capital cities of Canada.
Even if you're a Rhodes scholar, you'll find something to interest and intrigue you with all
of THE rainbow's regular columns, utilities, games and reviews. For a wealth of C0C0 knowledge,
don't miss us in September!
^
COLUMNS.
(si BASIC Training/ Joseph Kolar
Mastering the DRA W statement
Bits And Bytes Of BASIC/ Richard White
Spreadsheeting real data
Building August's Rainbow/J/m Reed
Managing Editor's comments
HD Byte Master/A Bartly Betts
172
80
16
96
Interfacing machine language with BASIC
Earth To Ed/ Ed Ellers
92
Beam up those "tech" questions
Ls) Education Notes/Steve Blyn
148
The rainy day account
Education Overview/ Michael Plog, Ph.D
Integrating computers into classroom instruction
GameMaster's Apprentice/George Firedrake and
KarlAlbrecht
150
154
Just an end of a beginning . . .
PR\NT#-2,/Lawrence C. Falk
Editor 's notes
B School Is In The Heart Of A Child/Bob Albrecht and
Ramon Zamora
12
136
Wonderment is contagious!
Turn Of The Screw/ Tony DiStefano
Switching double-sided disks
Wishing Well/Fred Scerbo
162
142
Co Co, can you spare a dime?
RAINBOWTECH
Downloads/Dan Downard
Answers to your technical questions
KISSable OS-9/Da/e L. Puckett
Cliffhangers in the micro soaps
MA\L09/Timothy A. Harris.
234
236
246
The remainder of MAIL09's listings
DEPARTMENTS
Advertiser Index
Back Issue Information
CoCo Gallery
Corrections
Letters To Rainbow
The Pipeline
Rainbow Info
.256
.247
.178
.224
_6
Reviewing Reviews-
Scoreboard
Scoreboard Pointers
Submitting Material
To Rainbow
Received And Certified
.120
.225
.188
Subscription Information.
These Fine Stores
.190
.180
.182
.201
.203
.254
PRODUCT REVIEWS
Product Review Contents_
185
August 1985
Vol. V No. 1
Editor and Publisher
Lawrence C. Falk
Managing Editor James E. Reed
Senior Editor Courtney Noe
Technical Editor Dan Downard
Submissions Editor Jutta Kapfhammer
Copy Editor Tamara Dunn
Reviews Editor Monica Dorth
Editorial Assistants Jody Doyle, Wendy Falk.
Debbie Hartley, Judi Hutchinson,
Angela Kapthammer, Belinda Kirby,
Suzanne Benish Kurowsky, Shirley Morgan,
Kevin Nickols
Technical Assistant Ed Ellers
Contributing Editors Bob Albrecht,
R. Bartly Betts, Steve Blyn,
R. Wayne Day, Tony DiStefano,
Dan Eastham, Frank Hogg,
Joseph Kolar, Michael Plog, Dale Puckett,
Fred Scerbo, Paul Searby, Richard White
Art Director Sally Gellhaus
Assistant Art Director Jerry McKiernan
Designers Tracey Jones, Heidi Maxedon,
Kevin Quiggins
Advertising Coordinator Doris Taylor
Advertising Representative Kate Tucci
Advertising Assistant Debbie Baxter
(502) 228-4492
General Manager Patricia H. Hirsch
Asst. General Manager for Finance Donna Shuck
Bookkeeper Diane Moore
Advertising Accounts Beverly Taylor
Dealer Accounts Judy Quashnock
Administrative Assistant to the Publisher
Marianne Booth
Manager of Public Relations
Charles L. Springer
RAINBOWfest Site Management Willo Falk
Director of Fulfillment Services Bonnie Shepard
Asst. Customer Service Manager Deidra Henry
Customer Service Representative Sandy Apple
Word Processor Manager Lynda Wilson
RAINBOW ON TAPE Subscriptions Monica Wheat
Research Assistants Judy Brashear, Laurie Falk,
Sharon Smith
Dispatch Janice Eastburn
Production Assistants Laila Masri, Melba Smith
For RAINBOW Advertising
and Marketing Office
Information, see Page 256
THE RAINBOW is published every month of the year
by FALSOFT, Inc., 9529 U.S. Highway 42, P.O. Box
385, Prospect. KY, 40059. Phone (502) 228-4492. THE
RAINBOW and the RAINBOW logoiypes are registered
® trademarks of FALSOFT. Inc.
Second class postage paid Prospect, KY and
additional offices. USPS N. 705-050 (ISSN No. 0746-
4797). POSTMASTER: Send address changes to THE
HAINBOW. P.O. Box 385. Prospect, KY 40059. Forwarding
Postage Guaranteed. Authorized as second class
postage paid from Hamilton. Ontario by Canada Post,
Ottawa, Ontario, Canada.
Entire contents copyright « by FALSOFT, Inc., 1985.
the rainbow is intended tor the private use and
pleasure ot its subscribers and purchasers and
reproduction by any means is prohibited. Use of
information herein is for the single end use of
purchasers and any other use is expressly prohibited.
All programs herein are distributed in an 'as is" basis,
without warranty of any kind whatsoever.
Tandy. Color basic. Extended Color basic and
Program Pak are registered • trademarks of the Tandy
Corp. CompuServe is a registered • trademark of
CompuServe Inc.
Subscriptions to the rainbow are $31 per year in
the United States. Canadian rates are U.S. $38. Surface
mail to other countries is U.S. $68. air mail U.S. $103.
All subscriptions begin with next available issue.
Limited back Issues are available. Please see notice
for Issues which are In print and costs. Payment
accepted by VISA. MasterCard. American Express,
cash, check or money order in U.S. currency only.
LETTERS TO THE
Postalcommunications?
Editor:
I am a victim of the world of telecom-
munications. I live in a small town in
southeast New Mexico where most people
don't even know what a modem is. I am
interested in meeting people through
telecommunications. If anybody is interested,
please write me at P.O. Box 502, 881 19.
Kenny Berard
Ft. Summer, NM
On the Air
Editor:
I would like to contact other amateur
radio operators who are using Graphicom's
SSTV mode or the WEFAX facsimile
program [February 1985, Page 42] for
transmission of pictures on the HF ham
bands.
Please contact me at P.O. Box 32215,
95152 or on the air at 00:00 GMT on
Monday (Sunday local) on 7.260 MHz
during the SPEEDX net. Thank you and
73!
J. Michael Nowicki
San Jose, CA
A Good Companion
Editor:
I would like to begin by saying how much
I enjoy your magazine. I find it very
interesting and a very good companion.
1 am a quadraplegic and have just started
to find enjoyment from your magazine. A
very good friend of mine has made it
possible for me to operate my own computer
by designing a table that fits on my
wheelchair so the computer is stablized. It
has a wooden handle that enables me to
hold down the shift key which allows me
to use the different functions of the
computer keyboard by holding a pencil in
my mouth.
Once again I would like to say keep up
the good work with helping people to
understand computers.
If anyone is interested in the design of
my special computer table, I certainly would
send the design to them. My address is P.O.
Box 901, Canada, N0K 1W0.
AlfC. Dale
Seaforth, Ontario
Catering to Cassette Users
Editor:
May I put in a word for those of us who
do not have disk drives? We enjoy the CoCo,
too, and arc always glad to see a program
that works with tape. Sometimes a program
written for disk can be made to work with
tape with just a few minor modifications.
Could program authors be encouraged to
include these modifications in the
documentation?
As I write this letter, it occurs to me that
one of your readers may have written the
type of program that would convert printer
codes. If such is the case, I sure would like
to hear from him or her. Write to me at
17212 Brunswick Blvd., Canada, H9J 1K.9.
Keep up the good work! I can't wait for
a Canadian RAINBOWfest. Why not
consider Montreal? CoCo enthusiasts would
love this city.
Gerald Carroll
Kirkland, Quebec
Going out of 'Style'
Editor:
This is in response to Larry Geiger's letter
to THE rainbow published in the April 1985
issue [Page 6] concerning Mr. Witham's
article "To Pack Or Not To Pack."
Style in programming is what one worries
about if one is writing the program for the
review and amazement of one's contempo-
raries. The kernel of good programming is
to convert an idea into a machine readable
form such that the machine will then
produce the desired output in the fastest and
most efficient manner possible.
The magical abilities ascribed to C and
PASCAL compilers, by Larry Geiger, such
that they somehow do not waste either
memory or disk space to store unnecessary
lines or space-filled lines is wondrous. Of
equal wonder is their ability to ignore those
extra lines and spaces without using
processor cycles to read and decide to ignore
them. These mystical qualities, I'm sure,
would amaze the programmers who wrote
the interpreter sections for the compiler
programs.
If enough young people come to believe
that compilers work in some magical way
and do not strive to train their minds to
program in frugal and efficient methods, no
matter which machine they are using,
someday no one will be able to produce
compilers, or for that matter, any other
software of value.
The microprocessor industry has already
recognized early mistakes that produced
horribly time-inefficient processors and are
quickly moving to RISC (Reduced Instruc-
tion Set Computer) designs to improve cycle
efficiency. Soon maybe the firms that are
now producing software such as operating
systems written in high level languages, such
as C and pascal, will also mend their ways
and stop filling up our disks and memories
with slow running trash.
Thanks for the use of your "soapbox."
D. J. Leffler
Cocoa Beach, FL
Take Heed!
Editor:
On February 25, 1985, 1 mailed the United
Color Computer Club (10117 S.W. 53
Court, Ft. Lauderdale, FL 33328), later
listed in the brochure mailed to me as the
"Worldwide Color Computer Club," my
check in the amount of S30 for a one-year
membership. Upon receiving no answer, I
wrote to them on April 3, and again received
no answer. Also, Michael Fahy of Central
City, Pa., mailed them a check in the amount
of $30 and has to date received no response.
We both have our canceled checks endorsed
"United Color Computer Club" and a
"#654978 For Deposit Only" to the account
of Hollywood Federal Savings & Loan
Assoc, teller 202.
I am reporting this to you in the hope
that other rainbow subscribers would be
alerted about this matter. Also I am going
to report this to the postal authorities to
see if this can be stopped and/ or action
instituted.
Joe F. Sobieski
Johnstown, PA
Programming Cahoots
Editor:
I'm looking for CoCo pen pals who would
be interested in co-authoring some original
programs with me. I can develop programs
easier than I can come up with the ideas
for them. I'd like to hear from other
programmers who may have ideas, partial
programs or completed programs that may
need finishing touches. Together, maybe we
can come up with a few good programs
suitable for submission to THE rainbow.
BASIC programs only, please. I don't know
that much about machine language
programming.
THE RAINBOW August 1985
Interested parties can contact me at 708
Michigan Avenue, 53081.
Bill Bernico
Sheboygan, WI
INFORMATION PLEASE
Editor:
In your March 1985 issue of rainbow
magazine 1 read in "Letters To Rainbow"
on Page 6 your advice to a reader whose
disk drive was not working to acquire a head
alignment kit. Could you advise as to where
1 could acquire such a kit and, if possible,
the price of one? I would appreciate any
help you can give me.
John Ganiel, III
Cologne, NJ
Editor's Note: A head alignment
kit can be purchased at any Radio
Shack store.
Joystick Inventiveness
Editor:
I get a lot out of your magazine. I am
getting into electronics and would like to
see more hardware articles if possible. Can
you tell me in what issue I saw an article
on how to build your own joysticks from
scratch?
Gilbert T. Allen
Schenectady, NY
Editor's Note: "Cheapstick, A Joy
For Under $10" appears in the
February 1984 issue on Page 186.
Editor:
Do you have an article on how to make
an adapter for using Atari joysticks on the
CoCo?
I love your magazine and look forward
to it each month.
Daniel Pardue
Gretna, LA
Editor's Note: Please see "Convert
Those Paddles" on Page 131 of the
August 1984 issue.
See other articles pertaining to
joysticks: "Joystick-to-itiveness"
(shows the advantages of incorpo-
rating joysticks into your pro-
grams) appears on Page 232 of the
March 1985 issue.
Also, "Wireless Joysticks" (play
games with no wires attached),
June 1985, Page 105.
Revving Up the CoCo
Editor:
I have a 16K Extended basic CoCo and
I am into road racing games. Unfortunately,
all the racing games I've seen require 32K
of memory. Are there any for I6K?
Steve Glezakos
Montreal, Quebec
Editor's Note: "Hi-Res Racer" is
a 16K game which appears on Page
124 of the March 1985 issue. Also,
see "The Ultimate Program" (Part
2) Stock Car, which is part of our
Fourth Anniversary gift to you in
the July 1985 issue, Page 55.
A Hole in One
Editor:
1 am very interested in finding a program
to handle golfers' scores and handicaps. If
you have a program of this sort, could you
send it to me? If you don't have one, is there
anyone who does have one? Write to me
at Box 493, Canada, SOA 2X0. I have a
64K CoCo and a disk drive.
G. Young
Esterhazy, Saskatchewan
Editor's Note: You just scored a
hole in one! See Page 215 of this
issue for the review of Don Hug's
program, Golf Handicaps.
Counting Calories
Editor:
1 have been a subscriber for over a year
and rainbow has taught me more about
my CoCo than any other publication I have
ever read. It has also provided me with many
useful programs.
My wife and I have become very calorie
conscious, not unlike millions of other
Americans. I don't know how to program
in BASIC, although I am getting more
familiar with the language. Are you planning
to publish a program that will enable me
to enter the caloric value for items of food
and drink that we prefer, and then when
I would enter a daily menu, provide me with
a calorie countdown or total? Or, do you
know of anyone marketing such a program?
I have a 32K ECB CoCo.
Len Zielinski
Niles, IL
Editor's Note: Color Connection
Software has a program called
DIET-ADE. See the review on
Page 206 of the May 1985 issue.
Also, read our J uly 1 985 "Received
and Certified" for information on
Nutriguide by Homesoft Com-
pany.
CoCo Checkmate
Editor:
In short, I like your magazine greatly!
Can you please help me? I am looking
for a program with the game of chess on
cassette for one player.
C.A. Bailey
Oneida, TN
Editor's Note: Read the review of
Cyrus World Class Chess, by
Radio Shack, in this issue on Page
195. Also, VOX CHESS by Com-
puterware — a review appears on
Page 195 of the July 1985
RAINBOW.
Editor:
Could you please tell me if you have
printed or know of a program that teaches
chess, or is a game-playing program
available on tape for the CoCo?
W. W. Reed
Midway, WA
Editor's Note: Computer Systems
Distributors sells CHESSD: A
Real CoCo Chess Program. See
the ad in the June 1985 issue on
Page 227.
Taking Care of Business
Editor:
In response to the letter from Sam Cerami
[Page 7] in the June 1985 issue, I have the
exact equipment that he has, and being new
to the computer world, have found the
Tandy Color Profile allows me to do all
the stock and tax record keeping that is
necessary. In addition, I use the VIP Library
for profit and loss analysis.
If he has either or both of these programs,
I would be happy to share with him the
formats I have used to do this work. I also
have found some excellent books on these
subjects.
I really enjoy RAINBOW, although being
a newcomer, I still do not understand a lot
of what 1 read in the articles. My desire
to use the computer rather than write
programs has led me to purchase programs
to fit my needs. I have, therefore, used your
reviews to help me pick the right programs.
Write to me at 2344 E. Encarto, 85203.
Joe Zagar
Mesa, AZ
Regards to RAINBOWfest
Editor:
I think everyone should give Lonnie Falk
and his supporting staff a big round of
applause for an outstanding RAINBOWfcst-
Chicago. It was a pleasure being able to
see the people you only hear over the phone.
You will have to pardon the expression
but, "From East to West, no doubt,
rainbow is the best!"
Charlie Schneider
Sofco Computer Supply
Downers Grove, IL
HINTS AND TIPS
Editor:
I have faithfully input all of the "One
Liners" and have enjoyed them very much.
I have them all on one t " : th an index
to go along with it. I have uuue something
with it you may want to pass on to others.
At the beginning of each, I put:
1. " " (An eight-letter title
describing what it is. If it needs joystick,
or something special, I also indicate that.)
2. One-Liner by (the name of the person)
3. (The person's city)
August 1985 THE RAINBOW 7
4. (Date) 1985 Rainbow Page( )
5. (Start of program)
This way, if I run into a problem, I can
quickly look up the page in the appropriate
RAINBOW.
One other thing I have discovered: Some
of the One Liners are too long and won't
accept the last two or three letters. I found
by going to EDIT 5 and then 'X,' I can add
the missing letters without any problem. It
may be an eccentricity of my CoCo, and
others may not have this problem. I have
a 64K ECB.
Thanks for an excellent magazine.
Harvey W. Marks
Lakewood, CO
Unfearful Flying
Editor:
1 recently purchased the flight simulator
FLIGHTSIM I and I have developed an
easy method for a safe flight.
Once you've loaded the program and you
are at the title screen, set the auto-pilot's
heading for the direction you want, then
set the altitude at 1,000 feet. Next, push 'F'
to turn off the Freeze mode and descend
the runway till you accumulate a speed of
about 200 knots. Now pull back on the right
joystick to take off. Once you're in the air
push 'G' to raise the landing gear. Continue
to climb until you've reached an altitude
of about 250 feet and push 'A' to activate
the auto-pilot (you may have to push 'R'
for recover if you begin to lose control or
stall). The plane will now shift to either side
to attain the set heading and will also
continue to climb till it reaches 1,000 feet.
After you've sighted an airport and you're
ready to land, push 'A' to turn off the auto-
pilot. Now push 'G' to lock in the landing
gear and slowly descend toward the landing
strip, decreasing speed as you go.
For more information write to me at 329
Sunset Drive, 21502.
Scott Geraghty
Cumberland. MD
Editor:
The game Chopper Assault (June 1985,
Page 28) can be made to run on a disk system
very easily. Simply change the variable AS
to SA in lines 330, 520, 540 and 760. Also,
I'd like to see you print more strategy war
games.
Your magazine is far better than any of
your competition. Keep up the good work!
Eric Asberry
Aft. Carmel, IL
Penguin Patch
Editor:
In your February 1985 issue the game
called Penguin Patrol caught my eye. It is
an arcade-style video game but I found it
to be a bit hard to play because it doesn't
get enough response from the keyboard, so
1 wrote this patch to make the game respond
to the right joystick.
28 GOSUB 1000
1000 H=0 V=0
1010 IF jrJYSTK(0) <=8 THEN H=-32
V=0
1020 IF JQY5TK(0) >=55 THEN H=32 V=0
1030 IF JOYSTK(l) <=8 THEN V=-32
H=0
1040 IF JOYSTK(l) >=55 THEN V=32 H=0
1050 RETURN
P.S. Spierenburg
Dollard Dee Ormeaux. Canada
Subroutine for Stalling
Editor:
I'd like to pass on a very short delay
routine that has served me well. Include this
in the form of a subroutine as follows:
10 POKE 275.1
15 IFPEEI<(275)=0 THEN RETURN ELSE 15
The subroutine can be included in any
procedure and will afford the user approx-
imately three seconds of delay if the system
is doing nothing else but returning a prompt
after the delay. It pokes a one in the high
byte of timer and loops until a zero is
generated.
Thank you for a superb magazine.
John P. Roberts, Jr.
Savannah, TN
Oh, Brother!
Editor:
Some time back my wife purchased a
Brother Correctronic 50 typewriter. We
recently purchased the Brother IF-50
Interface which transforms the typewriter
into a daisy wheel printer, but we had to
build the printer cable ourselves. This
proved to be more difficult than expected.
After a week of trial and error and some
second guessing by friends, one of my
friends called Brother. Between Brother and
our friend, the printer (a.k.a. typewriter)
works great.
In the hope that this might help others
who might be in this frustrating situation,
I am enclosing a wiring diagram (courtesy
of CoCo Max) that should be of service.
You will need a 4-pin DIN plug (#274-007),
a D-Subminiature DB-25 pin male connector
and 4+ feet of 3-conductor wire (278-371).
CoCo pin 1 is not used. CoCo pin 2 goes
to IF-50 pin 20. CoCo pin 3 goes to IF-
50 pin 1. CoCo pin 4 goes to IF-50 pin 3.
Jumper pins 4, 5, 6 and 8. Set the DIP
switches as follows: switches 1, 2, 3 and 6
to on; switches 4 and 5 to off.
ETrtlCma? 0?=SD 0001037 C3HHT3
13
' * _ L
•> ° f o t t t ♦ * *) )
\ \ o o o o o ♦ » o o o o oj /
1-t
BOUQUETS
Editor:
The purpose of this letter is to tell you,
for the benefit of your subscribers, aboul
the good service and response I have
received from one of rainbow's advertisers.
I ordered LEAST from D.J. Leffler,
based on an ad in the April issue of
RAINBOW; within a few days the program
and owner's manual were delivered. When
I called to get clarification of some questions,
I received quick and courteous response.
About LFAST: It's the greatest thing since
sliced bread. I recommend it highly for
anyone programming in assembly or ma-
chine language.
A.J. Laufer
Chesterland. OH
Editor:
I was delighted with the program called
Lurkley Manor by Richard Ramella. It is
a marvelous piece of work. I hope that one
day he will submit a 64K ECB Adventure
or Simulation. I know 64K is not as
prevalent as 1 6K or 32K, but once in a while,
let's have one for us 64Kers.
Colorware's Real Talker and Talkhead
are beyond belief! They are the best as are
Jack Knott's accompanying programs. He
backs up his merchandise — I know!
Bob Nevin
Bay side, NY
The Graphics Dump
You've Been Looking For
Editor:
This letter is in reply to Brad Williams
["Letters to Rainbow," June 1985, Page 7]
and Beau Palmer and all those looking for
a screen dump program. In the October 1983
issue of THE rainbow there is a graphics
dump program by J. Paul Fountain. I use
it all the time with my LP VII printer.
I really like THE rainbow and read it from
cover to cover every month.
David Morgan
Joplin, MO
Looking from the outside at the
RS-2352 and RS-232-C jacks.
Dennis O. Dorritv
Fort Ord, CA
KUDOS
Editor:
Just a note much overdue to say thank
you! I've come a million miles in under-
standing my CoCo and it's probably 25
percent my part and 75 percent rainbow's.
Fred Scerbo and Steve Blyn have taken
my children and made their day, and "old
mom" sitting at the keyboard gets all the
hugs, thanks and, "Gee, you're smart."
It's amazing how Dan Downard can
answer my questions before I even get
around to sending them in.
rainbow allows me to be master of my
machine. It is always a great day when the
mailman brings my rainbow. I only wish
it would come more often — 30 days can
seem forever when you start feeling the
tension of needing another rainbow fix.
Kalhy Brisbin
Temple, TX
8
THE RAINBOW August 1985
Gallery Votary
Editor:
... I think "CoCo Gallery" is a great
idea! The Color Computer can do some
fancy graphics, and it's about time someone
showed them off! . . .
Allen Huffman
Broaddux, TX
Small Investment — Big Return
Editor:
I would like to commend you on an
excellent job done in devoting rainbow to
the Color Computer. I have been a fan of
yours for about nine months now. As the
proud owner of two Color Computers, I
feel that every issue provides a healthy
addition to my software library and overall
knowledge of the Color Computer. I've
spent over $3,000 on hardware and I believe
$31 for a subscription to THE RAINBOW is
the best investment I've made so far. Thanks
for an excellent magazine and keep up the
good work!
Mark Daniels
Fargo, ND
BULLETIN BOARD SYSTEMS
Editor:
This letter is to inform your readers of
a merger. Colorama Plus of Port Jefferson
Station has merged with Colorama of
Middle Island.
Both bulletin boards will now be known
as Colorama Plus. They are both run on
a 24-hour, seven-day-a-week basis. Each
system will support X-modem downloads,
along with <C>ft for Colorcom/e users.
Colorama Plus offers something no other
bulletin board offers, we have an online
CoCo club, a magazine section, online
games, club section, programming hints,
corrections to RAINBOW, club newsletter,
stop and shop boutique, graphics gallery,
downloads, plus a whole lot more.
The board is open to all with limited
access to first-time callers. If anyone wishes
to join the CoCo Club we are asking for
a $10 donation for one year's access to the
club section.
The numbers are listed as Colorama Plus
of Port Jefferson (516) 331-3718 and
Colorama Plus of Middle Island (516) 924-
6262.
John Adkins
Colorama Plus Sysop
Ml. Sinai, NY
Editor:
I have established a BBS in my area called
The Californian of Ventura. It has the
following menu selections: answers, bargains,
converse with Sysop, downloads, intelli-
gence, message base, magazine, user log,
parameter change, questionnaire, want ads,
time view, upload, xpert speed, and sign and
update.
Also, the system is dedicated to the CoCo,
but other computer users are welcome. The
number is (805) 656-7390. It runs 24 hours
a day, seven days a week.
Jack Sanders
Ventura, CA
Editor:
I run the only local BBS. The program
is widely used in Connecticut and is written
by Cliff Skolnick. It works under his own
operating system called KDOS64 (this was
copyrighted in 1983 and is not related to
K.-DOS). Cliff is writing an OS-9 BBS in
machine code and will be marketing it soon.
People who wish to log into my BBS must
send $3 to me in care of The Barn Board
along with their name, city and state, type
of computer, phone number and an eight-
letter password. The BBS does work at 1200
Baud and is open 24 hours a day. Write
to 36 Norfolk Road, 06759.
Phone (203) 567-8077 (voice) or (203) 567-
4852 (BBS).
Angus Nichelson
Litchfield, CT
Editor:
I would like to announce a new BBS for
the Metro Atlanta area. The number is (404)
255-1791. Operating hours are now at night
and on weekends.
David Tidwell
Atlanta, GA
Editor:
I would like to announce the Great
American Connection BBS. It is up and
running 24 hours a day, seven days a week.
We have uploads, downloads, want ads, E-
Mail, online games and much more. The
number is (201) 928-0949.
Michael Jury
Jackson, NJ
Editor:
There is a BBS in New York called
Cutthroats BBS. It is a very good BBS with
many sub-boards. The number is (914) 737-
6770.
Elliot Richman
Hartsdale. NY
Editor:
We are pleased to announce that our BBS,
Grand Central Terminal, now supports both
300 and 1200 Baud users.
We have added a Model 100 SIG and
a scanner subsection. With popular down-
loads such as Hi-Res graphics, machine
language music files, digitized pictures,
printer and disk utilities and our POKE and
PEEK file, we are the choice board for Color
Computer users in the New York area as
well as surrounding areas.
Grand Central Terminal is up 24 hours
a day, seven days a week and is a free access
BBS in New York City, which can be
reached at (212) 682-0681. Once again, we
wish to thank THE rainbow readers for their
generous contributions, uploads and
support.
Steve Schechter
Sysop
Editor:
I would like to announce the new number
for our Maxi CoCo BBS 5.0 Bulletin Board
System: (216) 793-7353. We operate at 300
Baud, 24 hours a day, seven days a week.
Our Sysop is Curt Nickel.
William Wills
Youngstown, OH
Editor:
I would like to inform your readers that
I run the CoCo Beach BBS in Kent. It is
up 24 hours a day and includes downloads,
uploads, great text files and online pictures.
The number is (206) 432-25 1 2.
Jeff Gill. Jr.
Kent, WA
Editor:
Halifax Dartmouth Colour Computer
Users Group (HDCCUG) BBS operates
Monday through Friday, 9:30 p.m. to 9
a.m.; Saturday, 5:30 p.m. through Monday,
9 a.m.; (902) 434-5278; Sysop is Peter Allen.
Please do not call outside of the advertised
hours. This is a business line for Sector
Software.
A. Knight
Dartmouth, Nova Scotia
the rainbow welcomes letters to the
editors. Mail should be addressed to: Letters
to Rainbow, The Falsoft Building, P.O. Box
385, Prospect, KY 40059. Letters should
include the writer's full name and address.
Letters may be edited for purposes of clarity
or space.
ARTS AND LETTERS
Envelope Of The Month
John Kniatkowski
Mary Esther, FL
August 1985 THE RAINBOW 9
AND
RARING
TO GO!
^v
The Tandy 200 is the one portable for all.
Meet the New Generation
of Portable Computing
Our celebrated Model 100 set a
new standard in portable comput-
ing. Now we've done it again! Intro-
ducing the Tandy 200, another true
breakthrough, featuring advanced
features you requested. You get
more built-in software, a bigger
screen and a larger memory. All this
in a system that measures just
2 1 /4 x 11 3 /4 x 8V2'; and goes wher-
ever you go because it's completely
battery powered.
Six Built-in Programs
Including Multiplan™
For complex spreadsheet analy-
sis and calculations, we put popular
Multiplan software into the Tandy
200's permanent memory. It's easy
to do sales forecasts, profit and loss
projections, budgeting, pricing, en-
gineering calculations and more.
Comes with Five More
Powerful Programs
An improved version of the Model
100's easy-to-use word processing
program makes the Tandy 200 es-
pecially useful for journalists, sales-
people, students and anyone who
needs to write letter-perfect memos,
reports and correspondence in a
hurry. Edit, delete and move blocks
of text with the touch of a conven-
ient function key.
Four other "instant-on" programs
let you use the Tandy 200 as your
personal appointment calendar, ad-
dress and phone directory and tele-
phone auto-dialer/directory (the
Tandy 200 generates tone dialing
pulses, so you can use it with long-
distance services). A much more
powerful built-in program for com-
munications makes it easy to ac-
cess other computers by phone,
as well as national information
networks. Resident BASIC
language lets you write your
own programs, too.
Why 40 Columns Are
"Bigger" than 80
Take a look at the 80-column
screens on other portables, and
you'll see why we chose a 16 x 40-
character format. Characters on 80-
column displays are tiny and
difficult to read. Tandy 200's flip-up
liquid crystal display has 240 x 128
resolution for big, clear graphics
and easy-to-read characters. Tandy
200 is the perfect take-along tool for
word processing and spread-
sheets—without eyestrain.
We also increased the standard
memory size to 24,000 characters,
expandable to 72K.
The Best in Technology
for Under $1000
Whether you're a student,
scientist, busy professional or
home computer user, the
Tandy 200 is a smart invest-
ment. The Tandy 200 even
has parallel printer, RS-
232C, cassette and bar
code reader interfaces
for added versatility. You
can even add disk stor-
age and a monitor for
a complete desktop
computer system.
Adopt One Today!
Step up to the powerful software
and impressive capabilities of the
Tandy 200 portable computer for
just $999 (26-3860). Best of all, the
Advanced Technology Tandy 200
represents the state of the art in
performance, quality and price
breakthrough (because we've intro-
duced the latest technology for over
60 years). Stop by your local Radio
Shack Computer Center, or partici-
pating Radio Shack store or dealer
and "size it up" today!
Prices apply at Radio Shack Computer
Centers and at participating Radio Shack
stores and dealers. Multiplan/TM Micro-
soft Corp.
Radio /hack
The Technology Store
A DIVISION OF TANDY CORPORATION
/
/
y
/
PRINT #-2,
Whenever members of the CoCo Community gather together, one
of the first subjects these days seems to turn to the "new" Color
Computer. With a mixture of expectation, speculation and lots
of other things, people all have different ideas about what might be coming
next from Tandy.
I was reminded about this the other day when I received a letter from
a reader. He mentioned that he had a friend who was "into" Commodore
computers and, having just bought the latest one, came running over
to show off the new manual.
"Look at this," crowed the Commodorian (a new word, perhaps?). "The
'new' Commodore has a LINE command, a CIRCLE command and a bunch
of other stuff, too!"
My correspondent said he studied the manual for a minute and replied:
"So what, the Color Computer has had all this — and a lot more
— for the past four years."
My point, I suppose, is that what we take for granted many view as
the latest innovation. When you really look at it, the Color Computer
has been so far ahead of everyone for so long that anything others have
as "new" we would have to view as "So what?"
Oh, certainly. We'd like more memory. We could use a better screen
display. We could use a better — and more friendly — operating system.
We could use the ability to mix text and graphics on the same screen.
Hey! Wait a minute. We have those things!
Nope, perhaps not right out of the box. But what comes out of the
box isn't as important as what you can do with the things that do come
out.
Let's look at these things briefly. You can upgrade CoCo to 128K,
and I keep hearing about more than that. I also keep hearing about
hard drives, too, which vastly improve the storage "memory"; not to
mention the fine disk drives that are available.
There are a host of programs — from Telewriter (the first) through
the Elite series, PBJ, Cer-Comp, the Pro-Color Series, DynaCalc and
many others — that give you "wide" screen displays, in an application
or any other form you want. This is something of a "standard," really.
We have OS-9 as a truly powerful operating system. And, now, many
of the programs we've been using on a "regular" CoCo are being written
for OS-9. In addition, there are a bunch of new programs out that give
OS-9 even more power (such as those from Computerware, Microtech,
D.P. Johnson and Frank Hogg Labs). And, too, there is a new program
called the OS-9 Solution from Spectrum Projects which makes OS-9 easy
to use.
No one could wish for a more powerful system than OS-9. And with
everything coming available for it, there are more ways to go with this
"alternate operating system" than there are for some "primary" systems,
period.
It is almost silly to have to mention all the wonders you can do with
the CoCo screen. We have CoCo Max, ViziDraw, Graphicom, Bjork
Blocks, the Nexus system and a host of others. We also have printer
utilities galore, enough games to satisfy even the most ambidextrous
Earthling, some super speech programs and some really innovative things
12 THE RAINBOW August 1985
the Color Computer Word Processor
3 display formats: 51/64/85
columns x 24 lines
True lower case characters
User-friendly full-screen
editor
Right justification
Easy hyphenation
Drives any printer
Embedded format and
control codes
Runs in 16K, 32K, or 64K
Menu-driven disk and
cassette I/O
No hardware modifications
required
THE ORIGINAL
Simply slated, Telewriter is the most powerful
word processor you can buy for the TRS-80
Color Computer. The original Telewriter has
received rave reviews in every major Color
Computer and TRS-80 magazine, as well as
enthusiastic praise from thousands of satisfied
owners. And rightly so.
The standard Color Computer display of 32
characters by 16 lines without lower case is
simply inadequate for serious word processing.
The checkerboard letters and tiny lines give you
no feel for how your writing looks or reads.
Telewriter gives the Color Computer a 51
column by 24 line screen display with true
lower case characters. So a Telewriter screen
looks like a printed page, with a good chunk of
text on screen at one time. In fact, more on
screen text than you'd get with Apple II, Atari,
TI, Vic or TRS-80 Model III.
On top of that, the sophisticated Telewriter
full-screen editor is so simple to use, it makes
writing ftm. With single-letter mnemonic
commands, and menu-driven I/O and
formatting, Telewriter surpasses all others for
user friendliness and pure power.
Telewriter's chain printing feature means that
the size of your text is never limited by the
amount of memory you have, and Telewriter's
advanced cassette handler gives you a powerful
word processor without the major additional
cost of a disk.
...one of the best programs for the Color
Computer I have seen...
— Color Computer News, Jan. 1982
TELEWRITER-64
But now we've added more power to
Telewriter. Not just bells and whistles, but
major features that give you total control over
your writing. We call this new supercharged
version Telewriter-64. For two reasons.
64K COMPATIBLE
Telewriter-64 runs fully in any Color Computer
— 16K, 32K, or 64K, with or without Extended
Basic, with disk or cassette or both. It
automatically configures itself to take optimum
advantage of all available memory. That means
that when you upgrade your memory, the
Telewriter-64 text buffer grows accordingly. In
a 64K cassette based system, for example, you
get about 40K of memory to store text. So you
don't need disk or FLEX to put all your 64K
to work immediately.
64 COLUMNS (AND 85!)
Besides the original 51 column screen,
Telewriter-64 now gives you 2 additional high-
density displays: 64 x 24 and 85 x 24!! Both
high density modes provide all the standard
Telewriter editing capabilities, and you can
switch instantly to any of the 3 formats with a
single control key command.
The 51 x 24 display is clear and crisp on the
screen. The two high density modes are more
crowded and less easily readable, but they are
perfect for showing you the exact layout of
your printed page, all on the screen at one
time. Compare this with cumbersome
"windows" that show you only fragments at a
time and don't even allow editing.
RIGHT JUSTIFICATION &
HYPHENATION
One outstanding advantage of the full-width
screen display is that you can now set the
screen width to match the width of your
printed page, so that "what you see is what
you get." This makes exact alignment of
columns possible and it makes hyphenation
simple.
Since short lines are the reason for the large
spaces often found in standard right justified
text, and since hyphenation is the most
effective way to eliminate short lines,
Telewriter-64 can now promise you some of the
best looking right justification you can get on
the Color Computer.
FEATURES & SPECIFICATIONS:
Printing add formatting: Drives any printer
(LPVII/VIU, DMP-1007200, Epson, Okidata.
Centronics, NEC, C. Itoh, Smith-Corona,
Terminei, etc).
Embedded control codes give full dynamic access to
intelligent printer features like: underlining,
subscript, superscript, variable font and type size, dot-
graphics, etc.
Dynamic (embedded) format controls for: top,
bottom, and left margins; line length, lines per page,
line spacing, new page, change page numbering,
conditional new page, enable /disable justification.
Menu-driven control of these parameters, as well as:
pause at page bottom, page numbering, baud rale (so
you can run your printer at top speed), and Epson
font. "Typewriter" feature sends typed lines directly
to your printer, and Direct mode sends control codes
right from the keyboard. Special Epson driver
simplifies use with MX-80.
Supports single and multi-line headers and automatic
centering. Print or save all or any section of the text
buffer. Chain print any number of files from cassette
or disk.
File and I/O Features: ASCI! format files —
create and edit BASIC, Assembly, Pascal, and C
programs. Smart Terminal files (for uploading or
downloading), even text files from other word
processors. Compatible with spelling checkers (like
Spell 'n Fix).
Cassette verify command for sure saves. Cassette auto-
retry means you type a load command only once no
matter where you are in the tape.
Read in, save, partial save, and append files with disk
and/or cassette. For disk: print directory with free
space to screen or printer, kill and rename files, set
default drive. Easily customized to the number of
drives in the system.
Editing features: Fast, full-screen editor with
wordwrap, block copy, block move, block delete, line
delete, global search and replace (or delete), wild card
search, fast auto-repeat cursor, fast scrolling, cursor
up, down, right, left, begin line, end line, top of text,
bottom of text; page forward, page backward, align
text, tabs, choice of buff or green background,
complete error protection, line counter, word counter,
space left, current file name, default drive in effect,
set line length on screen.
Insert or delete text anywhere on the screen without
changing "modes." This fast "free-form" editor
provides maximum ease of use. Everything you do
appears immediately on the screen in front of you.
Commands require only a single key or a single key
plus CLEAR.
...truly a state of the art word processor...
outstanding in every respect.
— The RAINBOW, Jan. 1982
RAINBOW
CEflT'lCATlOh
KAU
PROFESSIONAL
WORD PROCESSING
You can no longer afford to be without the
power and efficiency word processing brings to
everything you write. The TRS-80 Color
Computer is the lowest priced micro with the
capability for serious word processing. And
only Telewriter-64 fully unleashes that
capability.
Telewriter-64 costs S49.95 on cassette, $59.95
on disk, and comes complete with over 70
pages of well-written documentation. (The step-
by-step tutorial will have your writing with
Telewriter-64 in a matter of minutes.)
To order, send check or money order to:
Cognitec
704 Nob Street
Del Mar, CA 92014
Or check your local software store. If you have
questions, or would like to order by Visa or
Mastercard, call us at (619) 755-1258
(weekdays, 8AM-4PM PST). Dealer inquiries
invited.
(Add S2 Tor shipping. Californians add 6<?o stale lax.
Now available at
Radio /hack stores
via express order
Apple II is a trademark of Apple Computer. Inc.; Atari is a
trademark of Atari. Inc.; TRS.80 is a trademark of Tandy
Corp; MX-80 is a trademark of Epson America. Inc.
MODEL 101 INTERFACE 54^5" 49.50
The Model 101 is a serial to parallel
interlace intended for use with a
COCO and any Centronics compatible
parallel input printer. The 101 has 6
switch selectable baud rates (300-
9600). It comes with a "UL" listed
power supply that can be unplugged
from the interface if your printer
supplies power (Most do). The 101 is
only 4" x 2" x 1" and comes with all
cables and connectors for your
computer and printer.
MODEL 102 SWITCHER 35.95
The Model 102 has 3 switch positions
that allow you to switch your
computer's serial output between 3
different devices (modem, printers or
another computer). The 102 has color
coded lights thai indicate the switch
position. These lights also act as
power indicators to let you know your
computer is on. Supplied with the 102
are color coded labels that can be
applied to your accessories. The 102
has a heavy guage anodized
aluminum cabinet with non-slip ruober
feet.
MODEL 103 COMBO psf 73.50
With the turn of a knob the model 103
switches your computer's RS232C
serial port to any one of 3 outputs —
2 serial and 1 parallel. The serial ports
may be used for modems, serial
printers or even another computer. The
parallel port can be used with any
Centronics compatible printer. The 103
has the best features from the 101
and 102: color coded posilion indicator
lights, 6 switch selectable baud rates,
heavy anodized aluminum cabinet,
"UL" listed power supply and many
more.
The Model 101, 102 and 103 will work with any level COCO basic, any memory size 4K-64K
and are covered by a 180 day warranty.
The Model 101 and 103 work with any standard parallel input printer including Gemini,
Epson, Radio Shack, Gorillia, C.ltoth, Okidata and many others. They support basic print
commands, word processors and graphic commands.
II ... : 1,1 , ..I it 1
HINtlM iniu
■ci i«M Mrinic iHcuatntLJ
B • ■ ' « >
CASSETTE LABEL PROGRAM 6.95
This fancy printing utility prints 5 lines of information on
pinfeed cassette labels. "Cassette Label" is menu driven
and is very easy to use. It uses the special features of your
printer for standard, extended or condensed characters.
Each line of lext is automatically centered. Before the label
is printed, it is shown on your CRT — enabling you to make changes if you like — then
print 1, 2 or 100 labels. The program comes on tape and it is supplied with 24 labels to get
you started 16K ECB required.
OTHER ITEMS
High quality 5-screw shell C-10 cassette tapes $7.50/dozen
Hard plastic storage boxes for cassette tapes S2.50/dozen
Pin feed cassette labels S3.00/100
VISA'
MoitarCord
To order call our 24 hour order line 513-677-0796 and use your VISA or MASTERCARD
or request COD.
Or send check or money order to:
METRIC INDUSTRIES
P.O. BOX 42396
CINCINNATI, OH 45242
NEW LOW PRICES
Free shipping on orders over $40.00. Ohio
residents add 5.5% sales tax.
Orders under $40.00 please add $3.00 for
shipping
We manufacture these products. Dealer inquiries
are invited.
that fall into almost no category, such
as Speech Systems' EARS, Green
Mountain Micro's Machine Language
Learning Lab, a whole host of small
business software and so much more
1 cannot even keep track of it all.
Honestly, these things just roll off my
fingertips and into my word processor!
For each I have mentioned, there are
scads of others. No, I am not trying
to give a commercial for these firms.
What I am doing, though, is won-
dering aloud whether we even need a
"new" Color Computer. Tandy keeps
lowering the price, and the support —
from both third party and Tandy —
keeps getting better. In short, we have
a super computer. Maybe we have
reached close to an ultimate.
Not an ultimate in what people can
make CoCo do, because I believe we
will continue to keep expanding both
the quality and quantity of what is
"Maybe the CoCo as we
know it . . . is pretty
much perfect. "
available for the Color Computer. But
I have to remember I paid S399 for my
first CoCo and got 4K of memory and
just regular BASIC. Now you get 32K,
Extended BASIC and a better keyboard
for just SI 69.95.
I keep thinking of Thor. He invented
the wheel. We haven't been able to
improve on it much in quite some time.
Maybe the CoCo as we know it — as
a machine — is pretty much perfect.
Maybe in Thor's time there were
people who invented other things to get
around on. Bags which squeezed out
mud so that things could slither along?
But the wheel was the best.
I like to think CoCo is the wheel of
home computers. We'll have people
who use it to do a variety of things —
turn with water, provide a "base" for
vehicles, use it to tell time with gears
and the like. Constantly, people will
find better, more efficient and a greater
variety of uses for CoCo.
But can they make CoCo itself better?
Or is it, much like the wheel, so good
that it is well near perfect at the price?
Sometimes I truly wonder.
— Lonnie Falk
14
THE RAINBOW August 1985
YOU COULD FALL IN LOVE WITH
AUTOTERM !
IT TURNS YOUR COLOR COMPUTER INTO THE
K
WORLD'S
SMARTEST
TERMINAL
GOOD
LOOKIN'
AUTOTERM shows true upper/
lower case in screen widths of 32,
40, 42, 51, or 64 characters with
no split words. The width of 32
has extra large letters. Scrolling is
forward, backward, and fast. Block
graphics pictures are displayed
automatically and can be scrolled.
The screen's top line shows
operating mode, unused memory
size, memory on/off, and caps-
lock on/off. It also gives helpful
prompts.
SWEET
TALKIN'
KEY-BEEP can be on/off. Unac-
ceptable keystrokes cause a lower
pitched BOP! This ERROR-
BEEBOP can be on/off.
Talks to other computers with
Full or Half Duplex; Baud Rate of
110, 150, 300, 600, 1200; Parity as
even, odd, mark, space, none; 7
or 8 bit Word; any Stop Bits; all
128 ASCII characters; true line
Break; XON/XOFF protocol; and
optional line-at-a-time transmis-
sion. Able to send and receive
text, block graphics, BASIC and
ML programs. A 64K machine
holds up to 46,600 characters
(34,900 in HI-RES).
DUAL PROCESSING lets you
review & edit while more data is
coming in.
Fully supports D.C. Hayes and
other intelligent modems.
Talks to your printer with any
page size, margins, line spacing,
split word avoidance. Embed your
printer's control sequences for
boldface, underlining, etc. Narrow
text can be automatically spread
out.
You'll also use Autoterm
for simple word processing
and record keeping
You can display directories,
delete files, transmit directly from
disk, and work with files larger
than memory. Easily maintain a
disk copy of an entire session.
Compatible with TELEWRITER
(ASCII) & other word processors.
SMOOTH
WALKIN'
AUTOTERM moves smoothly
and quickly between word proces-
sing and intelligent terminal
action. Create text, correct your
typing errors; then connect to the
other computer, upload your text,
download information, file it, and
sign-off; then edit the received
data, print it in an attractive
format, and/or save it on file.
Editing is super simple with the
cursor. Find strings instantly, too!
Any operating parameter, such as
screen width, can be altered at
any time. Uncompleted com-
mands can be cancelled.
PUTTY IN
YOUR HANDS
The word processor can be
used to create, print, and/or save
on file your personal KSMs. They
let AUTOTERM act like you. For
example, it can dial through your
modem, sign-on, interact, perform
file operations, & sign-off; an
entire session without your help.
KSMs can answer the phone,
prompt the caller, take messages,
save them, hang-up, and wait for
the next call. The KSM potential
is unbelievable!
NO OTHER COMPUTER IN
THE WORLD CAN MATCH
YOUR COCO'S AUTOMATIC
TERMINAL CAPABILITIES!!!
WHAT THE
REVIEWERS SAY
"AUTOTERM is the Best of
Class."
Graham, RAINBOW, 6/83
"The AUTOTERM buffer system
is the most sophisticated — and
one of the easiest to use. . ."
Banta, HOT CoCo, 9/84
"Almost a full featured word
processor. . ."
Ellers, RAINBOW, 11/84
RECOMMEND 32K to 64K
Tape-to-Disk Upgrade $23
You Keep the Cassette
CASSETTE $39.95
DISKETTE $49.95
Add $3 shipping and handling
MC/VISA/C.O.D.
PXE Computing
11 Vicksburg Lane
Richardson, Texas 75080
214/699-7273
Please hire the mentally retarded. They are sincere, hard working and
appreciative. Thanks! Phyllis.
TIME BANDIT
Bill Dunlevy S Harry Lafnear
Tired ol the same old screens 9 In TIME
BANDIT, you pick from more than
TWENTY places with over 15 levels in
each place. Thai's over 300 screens!
Visit FANTASY WORLD, WESTERN
WORLD. & SPACE WORLD. Eight the
Evil Guardians: Killer Smurphs, the
Looking Lurker, Angry Elmo and more!
Find the Keys and collect the treasures
of time! Crisp Supergraphics, colorful
SCROLLING landscapes, full animation,
and over THREE HUNDRED SCREENS 1
The conquest of time and space awaits
you!
32K Tape $27.95/Disk $29.95
CASHMAN
Bill Dunlevy & Doug Frayer
Explosive color, fast-moving animation
and amazing sound make this non-
violent game a classic! Different levels
and more than FORTY screens offer as
much challenge & good clean fun as you
can take! Play solo or enjoy the challenge
of two-player simultaneous competition.
Scramble to get the loot first, but be
careful: the KATS are prowling and your
opponent is tossing eggs!
32K Tape S27.95/Disk $29.95
1
16
SUPER PAINT
by John Crane
Super Paint is an exciting new en-
hancement for your Graphicom draw-
ing system. Break the chains restrict-
ing your creative freedom! Now you can
draw and paint with every color your
machine is capable of. Over 250 colors
are available at all times! It's no longer
impossible to find just the right shade or
texture. Super Paint brings the COLOR
back into your Color computer! Requires
Graphicom system.
32K Disk $19.95
576 South Telegraph
Pontiac. Michigan 48053
(313) 334-6576
THE RAINBOW August 1985
BUILDING AUGUST'S RAINBOW
Analyzing Our Surveys
• What's this, a new formal for your
column? What gives?
Well, as they say, imitation is the sincerest
form of flattery — or, at least, the most
obvious. So, when I note from our RAIN-
BOWfest survey responses that "Letters to
Rainbow,""Reviewing Reviews, ""Pipeline,"
"Downloads" and "Earth to Ed" are among
our top-rated departments, 1 recognize a
good device when I see one: concise, topical
treatment of reader concerns. Besides, I get
mail, too, and I have no shame. Shoot the
Answer Man another question.
• OK, what else did you glean from the
survey?
That Joseph Kolar, Dick White, Dale
Puckett and Tony DiStefano needn't
consider changing anything; our survey
respondents rate them tops. In fact, all of
our departments received gratifyingly good
marks. Oh, nobody escaped getting a share
of the "fair" and "poor" marks, but, overall,
all of our regulars were rated "excellent"
or "good" some 70 to 85% of the time. For
obvious reasons, we'll keep the total
rankings confidential, but, just for the
record, "Scoreboard" and "Scoreboard
Pointers" were ranked at the very bottom.
• Aha! Does that mean they get the ax?
Maybe. Maybe not. Certainly, a low
rating means we're going to take a strong
look at a given department, but before we
give up the ballgame, perhaps we'll "punt"
and regroup. Surveys have so many variables
and are only one part of our continuing
evaluation process.
»OK,OK. We all know statistics must be
kept in perspective. Now tell us what we
told you. What else did you learn?
Our RAINBOWfest-Irvine respondents
say they bought, on the average, four
products in the past year as a result of
rainbow ads. Ranking at the top of
software most wanted are utilities and word
processing, followed by business and games.
As to hardware, acquiring a monitor was
the chief interest, followed closely by more
memory, disk drives, modems and speech/
sound synthesizers. While 98% of Irvine
respondents rated THE RAINBOW as excellent
or good (76% excellent!), they would like
to see more utilities, hardware and machine
language.
• Overall, then, I see the Irvine survey
corresponds closely with the one at
Princeton.
That's true, and preliminary results from
Chicago tend to follow the same pattern.
A significant 45% or our respondents
indicated they are hesitant about buying
from a new advertiser. Concomitantly, they
prefer to see a new product advertised three
times, or more, before being inclined to
purchase it. In fact, a whopping 89% of
respondents rely on rainbow reviews. Some
28% always wait and another 61% at least
sometimes wait until they've seen rainbow's
product review before making a purchase.
And, 88% of those surveyed rate our
reviewers as qualified (59%) or well-
qualified (29%).
• What else did we tell you?
Well, 92% at least sometimes will type
in a program listing, but only 12% do so
frequently. A full 93% of those surveyed
have had occasion to use our advertiser
index. Some 78% say color ads get their
attention more than black and white ads.
• What's the feeling about issue themes?
In general, respondents seem well pleased.
Only a mere 3% said they seldom or never
like them. The most popular are the
Anniversary, Utilities, Games and Beginners
issues — in that order. The Music and
Business themes were rated lowest with
Printers and Education doing only slightly
better. Is there a theme you'd like to see?
• /'// think about it. In the meantime, isn't
it time for your closing theme?
How kind of you to remember. Yes, that
brings us to the $31 question. You see, the
survey form we value the highest is THE
rainbow subscription form — yes, we
certainly do read and heed the comments
RAINBOW and rainbow on tape subscribers
make — because that means you're a regular
reader and, as the first question in this
column underlines, our readers are rated
tops as writers, too.
— Jim Reed
.
R.S. Cat.# 90-5002
$89.95
\3fft
$39.95
RS#90-5001
$59.95
RS#90-5000
= m^
HOT CoCo *Ug«
-(March 19051
-Whai Kh ihe D£FI product apart it the ctfenl q<
'ii coverage. Ii provides ihe CoCo user with a v«y
compaiihle .mplementat.or, of vizard Pascal
along with many useful cxienvions for string hand-
ling, absolute memorv access, and Ihe com-
p.fal.on of separate program modules. Thais quite
afcai lor a system lh.it can run on a 32K computer
DtFT'i Pascal supports nul (thai is, floaiing.poinli
vanahlw. Many CoCo aftcf market languages
handle only mlcgers; ih.s Pascal gives you full-
bore compuiaiion capabtfitv/.-
RAINBOW Magulna * (November 1984)
"The DEFT Systems people have put together a pack-
age which is a complete Pascal and'or assembly pro-
gramming environment that is reasonably priced and
works like a champ."
-DEFT Bench and DEFT Pascal remain an e«cellent
et ample of whal can be accomplished in ihe CoCo
world The entire package gives you all the necessary
tools In learn Pascal If you already know Pascal, then
it Rives you a lot.il development environment. No-
thing is missing, there is nothing else lo buy."
"Any college applicant altempring lo oblain advanced
credil will be required lo know Pascal in order lo
complete the rum. DEFT Bench and DEFT Pascal
provide an excellent learning environment. The entire
package is impressive. It is very well-written and
e«lremelv easy lo use. In all ihe years I have been
looking at software packages, never have 1 seen so
much offered (or so little.-
DEFT Extra Only $39.95
The perfect addition to your DEFT Pascal or DEFT
Pascal Workbench. DEFT Extra is a library of gaming
and direct file I/O routines with graphics routines that
provide Extended Basic's graphics capabilities in all 8
graphics modes. Full DEFT quality documentation and
sample Paint program included, (requires 64K)
Available
By Express Order
At Your Local
Store!
Also Av.iil.iblL' in Canadian Kadio Shack Stores!
All DEFT software and programs developed with DEFT software
are BASIC ROM independent and use all of the memory in your
Color Computer without OS-9. All you need is DEFT software and
a Tandy Color Computer with Extended Disk BASIC, at least 32K of
RAM and One Disk Drive. With DEFT Pascal ($59.95) you will also
need a text editor to write your programs. PBJ WORD-PAK compati-
ble upgrades and Educational discounts available. Dealer inquiries
welcome.
Orders and Sales Information 1-800-992-DEFT
Technical Assistance 1-301-253-1300
3-D Graphics Sampler
Only $29.95
Do 3 Dimensional Imaging
from Pascal. Define an object by
specifying points and lines.
Then, with 3-D graphics library
procedure calls, Rotate, Zoom
and Move your 3-D Skeletal Ob-
ject(s). All Source Files
Included
SYSTEMS, INC.
P.O. Box 359
Damascus, MD 20872
Quanlily ol Each: _ DEFT Pascal _ DEFT Bench
— DEFT Eitra _ DEFT Pascal Workbench _ 3-D Graphics
Method of Payment tcheck one) D Check Enclosed
D VISA D Master Card Q COD
Account Number I || )| II | |_
Card Expiration Date QQ / I II I
Signature
Name
State □□ Zip
All orders are shipped UPS within 24 hours of receipt. Add 4% for shipping and handling;
Maryland residents add 51 for State Sales Tax; add $2.00 for COD.
GAME
32K
ECB
nfHTP
RAINBOW
ust a few minutes ago,
you were the high ap-
prentice of Zygon, a
powerful wizard who
dwells in the hills of a
countryside. It was a
routine magic-creating day until the
wizard asked you to hand him the
maroon potion, but accidentally, you
gave him the azure potion. The mixing
of his new potion with the wrong
ingredient (he hadn't noticed your
foolish mistake) resulted in an explosion
(Alan Saporta is a sophomore and a
self-taught computerist. He has worked
with many different computers, but his
favorite is the Color Computer.)
18 THE RAINBOW August 1985
and destruction of part of his laboratory.
Even though he was close to the blast,
he did survive and, in his rage, turned
you into a Brotan. Brotans are short,
blue creatures (no, not Smurfs! Brotans
are shorter) with two green eyes and
one mouth. Their only purpose in life
is to eat yellow energy dots and
(something that goes without saying)
avoid red Gremlins who eat anything,
including yellow energy dots, themselves
and blue Brotans.
If you attain an energy score of
15,000, Zygon will return you to your
normal state. But, until then, he has
placed you in a strange box where two
things are constantly produced: yellow
energy dots and red Gremlins.
How to Play
This is a game for those with 32K
Extended Color BASIC. You use three
of the arrow keys to move the Brotan
to the right, left and down. Once you
go down an opening, you can't go back
up. Because PEEKs are used to poll the
keyboard, there is no need to contin-
uously hit the keys; just hold down the
arrow key of your choice.
After the title page is displayed, press
any key (except BREAK) and the screen
("strange box") will be drawn. The
strange box has six levels. At the
beginning, the first two levels have three
openings, the next three have two
openings and the exit level has one.
The Brotan begins at the topmost,
inner level at the left. To cross an
opening just continue in one direction
and a bridge will be formed. If you want
to descend an opening, place yourself
on top of it (lean a bit to the left) and
press the down-arrow key. The bridge
will be broken (if there is one) and a
blue "slide" will form on which the
Brotan will descend.
The energy dots are the yellow plus
signs that line the top of each level. They
are placed at a random distance from
one another and can be worth zero,
four, eight or 12 points. That, too, is
random. When you score, the screen
flashes and sounds, and four points are
added to your energy score. If an energy
dot is worth eight points the screen will
flash twice and eight points are added,
etc. Some dots are what I call "duds"
— they are worthless. If you encounter
one, you will simply consume it with
no ill effects.
In the middle of the box is a giant
red energy dot. If eaten, the screen
flashes and 50 points are added. There
is one per screen.
When you advance a skill rank, one
of the openings on one of the levels will
be blocked, preventing your escape to
a lower level and increasing your
chances of losing one "man" (you have
eight). The skill ranks are as follows:
Completing the first screen places you
on the first rank, then every 250th point
you will advance to the next rank
(meaning more openings will be blocked
if and when you reach the next screen).
You can jump two or three skill ranks
in one screen (just count how many
II M I T I I T I T T I I I 1 I I I I I I I I I I I I I I 1 1 I I I I I 1 1 1 1 1 1 1 1 I I I I 1 1 IT
THE DIFFERENCE BETWEEN PROGRAMMING
AND SUCCESSFUL PROGRAMMING
DISK
ANTI-PIRATE
(A Breakthrough in Disk Protection)
Your Only Weapon Against Software Piracy!
Here is a chance for you to copy-protect your Basic
and ML programs. DISK ANTI-PIRATE does more
than any other program in the market. Compare the
features:
* Auto starts your Basic/ML programs.
* Effectively encrypts your programs.
* Disables BREAK/CLEAR KEY, RESET BUTTON.
* Modifies your code so LIST, LLIST, POKE, PEEK, EXEC,
USR, CSAVE (M), CLOAD (M), EDIT, DEL, TRON, TROFF,
SAVE (M), LOAD (M), MERGE will ONLY work with your
own PASSWORDS.
* Your Basic program loads with LOADM.
* I ncludes a Title Screen Editor to create title screens, which
can be displayed while your program loads.
* 'ONERR GOTO feature to trap errors (even for ML
programs).
* Canbeusedtoturnon64KALL-RAM MODE in32K/64K
memory systems.
* EASY-TO-USE and FULL DOCUMENTATION.
* NO ROYALTIES/AGREEMENTS/CONTRACTS.
MIN. 1 6K ECB Disk System.
(Works with CoCol and CoColl)
ONLYS5g 95
HIDE-A-BASIC 1.1
(A Breakthrough in Cassette Protection)
AT LAST! A program that combines
autostart with complete protection of
your valuable Basic programs.
IMPORTANT FEATURES:
• Autostarts your programs.
• A ML program that modifies your program and MOT just
'Stands Apart'.
• Option to disable Break-key. Clear key & Reset button.
• Disables LIST, LLIST, EDIT, DEL, TROM, TROfT, CSAVE (M),
CLOAD (M).
• Disables POKE, PEEK, EXEC & USR to prevent 'Back-door
entry' to your program.
• Disables disk functions to avoid access thru Disk System.
• Creates an 'OMERR GOTO' routine to trap errors.
• Your Basic program is loaded as a ML program - with
CLOADM.
• Full documentation.
WITH II IDEA- BASIC 1.1 THERE IS PRACTICALLY MO WAY
AMYOME CAM 'GET INTO' YOUR PROGRAM.
Buy Mow & Protect your Profits. For 16K ECB Cassette System.
Tape Only $24.95.
Buy BOTH for ONLY $ J Q QC
AJF-
MICROCOM SOFTWARE
P.O. BOX 214, FAIRPORT, N.Y. 14450
716-223-1477
500 PORES, PEEKS
'N EXECS for
the TRS-80
COLOR COMPUTER
NEVER BEFORE has this information of vital sig-
nificance to a programmer been so readily available
to everyone. This book will help you 'GET UNDER-
NEATH THE COVER' of the Color Computer and
develop your own HI-QUALITY programs, SO WHY
WAIT?
This 80-page book includes POKES, PEEKs
and EXECsto:
* Autostart your Basic programs.
* Disable most Color Basic/ECB/Disk Basic commands.
* Disable BREAK KEY, CLEAR KEY and RESET BUTTON.
* Generate a Repeat-Key.
* Merge two Basic programs.
* Transfer Rompaks to tape (for 64K only).
* Speed up your programs.
* RESET, MOTOR ON/OFF from keyboard.
* Restart your Basic program thru the RESET BUTTON.
* Produce Key-Clicks and Error-Beeps.
* Recover Basic programs lost by NEW, ?I0 ERRORS and
faulty RESET.
* Set 23 different GRAPHIC/SEMIGRAPHIC modes.
* Set 15 of the most commonly used Baud Rates.
* Allow you more plays in 23 of your favorite arcade games.
* AND MUCH MUCH MORE!!!
COMMANDSCOMPATIBLEWITH16K/32K/64KCOLOR
BASIC/ECB/DISK BASIC CASSETTE and DISK SYSTEMS
and CoCol and CoColl.
ONLYS
16.95
To Order: VISA, MC, CHECK, MO, COD ($2.50 extra) Please add $2.00 ship-
ping and handling (Foreign $5.00), NYS Residents, please add Sales Tax.
• Immediate shipment • Order by phone and get a $2.00 refund for your phone
call • Call for discounts on bulk quantities • Dealer inquiries invited.
UTILITY ROUTINES
for the TANDY & TRS-80
COLOR COMPUTER (VOL I)
This powerful book lor Basic and ML Programmers, includes program explanation, memory
requiremenls. and an annotated source listing tor the utility routines given below. These
routines if bought individually will cost you HUNDREDS OF DOLLARS.
These are 100% Position Independent ML Utilities and require no ML programming
knowledge:
COMMAND KEYS: Access most Basic Commands with 2 keystrokes.
CURSOR STYLES: Create OVER 65000 Cursor Styles.
FULL LENGTH ERRORS: Get lull length error messages.
KEY CLICKER: Ensure key input accuracy.
PAUSE CONTROL: Put Basic / most ML programs "on hold".
REPEAT KEY: Repeat ANY key. 5 different repeat speeds.
REVERSE VIDEO (Green and Red): Eliminate eye strain.
SPOOLER (16K, 32K, 64K): Don't wait lor those printouts. 32K Spoiling Butter in 64K.
SUPER SCROLLER (64K Only): Save and examine everything thai scrolls off the text screen.
TAPE-TO-DISK: Move Basic and ML programs from Tape to Disk.
AND MUCH MUCH MORE!!
Compatible wilh 16K/32K/64K ECB / Cassette
and Disk Systems and CoCo I and CoCo II.
BOOK $19.95
THESE ROUTINES (READY-TO-RUN) ON
CASSETTE/DISK: $24.95
BOTH BOOK & CASSETTE/DISK: $36.95
VISA
Triniiiirr 24-hour order hot line :(7i6) 223-1477 rimmi
openings have been blocked when the
next screen is drawn). When you reach
the seventh skill rank everything stays
the same. There will only be one
opening per level through which to
escape.
For your convenience, there is a
pause feature for those who get that
annoying phone call right before they
reach the 15,000 mark. By pressing any
key (except BREAK) all action will stop.
When you lose a man your score and
the amount of men you have left are
updated.
If your computer can't take the
"speed-up" POKE 65495,0 , then delete
it from lines 10 and 201 1. Also, if you
reach 15,000 you are given the option
to continue (just in case you want to
know how high a score you can get).
When you reach 2,000 points you get
an extra man and at 5,000 you get two
more. You also get points when you
descend openings. One limitation,
though: You can't have more than nine
men at once.
About Those Gremlins
They pop out everywhere (the amount
and where they pop out is randomly
determined). If one ever blocks your
only means of reaching the next level,
you can kill him by hitting him, but
it will cost you at least one man; many
will get two and some can never be
killed, making death inevitable. Most
can be killed, but that's a chance you'll
have to take.
Hints
Here are a few hints that will help:
1) The leftmost row of energy dots is
duds; 2) Even though the red Gremlins
appear as if they are nomads, after some
experience you might catch a "pattern"
they may follow; and 3) If two red
Gremlins are on both sides of you and
both block another opening, always kill
the one on your left (the Brotan's right).
This game is based more on luck and
risk than skill. Will you eat more energy
dots, or will you escape down an
opening because with one man left
you're afraid a red Gremlin will appear
and block your path to victory? Brotan
the Blue is a great escape from the
monotonous life of a wizard's
apprentice.
r
32 ... .
...226
54 ....
...239
210 ...
....62
506 ...
....14
1008 ..
....59
2004 . .
...150
END..
104
The listing: BROTflN
i *******BROTAN********
2 '(C) 1984 BY A.A.M.S.&ASAP CO
4 '*WRITTEN BY ALAN A SAPORTA*
6 '**ALL RIGHTS RESERVED******
8 »*****JULY 1984*************
10 PCLEAR8 : CISEKR1000 : X=3 2 : Y=2 5 : G
Y=8 : SC=j8 : DIM BL ( 2 4 , 16 ) : FR=0 : X=RN
D (-TIMER)
12 POKE 65495, J3:G0SUB 2000
14 GOSUB4j3j3:GOSUB10j30:GOSUBlp50
16 CL=RND(50) :FORCD=32T0224 STEP
CL:FOR RY=25T0125 STEP 20:CIRCL
E(CD,RY) ,3,2:NEXT RY, CD: CD=218 :X
=32:Y=25:MX=CD:IF RK=5 THEN GOTO
1J312
17 CIRCLE (134 ,72) , 5 , 4 : PAINT (135 ,
72),4,4
18 D=PEEK(342) :L=PEEK(343) :R=PEE
K(344) :S=X:F=Y:RK=,0:CD=218
20 IF D=247 AND Y=>25 AND Y<108
THEN GOTO100 ELSE IF Y>108 AND D
=247 THEN GOTO500
22 IF L=247 THEN X=X-2:GOT028
24 IF R=247 THEN X=X+2:GOT028
26 GOT018
28 IF X<32 THEN X=32
30 IF X>218 THEN X=218
32 PUT(S,F)-(S+8,Y+11) ,SP:IFSC>2
000THENGY=GY+1 : IFSO5J300ANDFR=1T
HENGY=GY+2 : FR=2 : IFSO1/8000ANDFR=
2THENGY=GY+3 : FR=3
34 PUT(CD,Y)-(CD+8,Y+11) ,SP:IFSC
<\5000 THEN 36 ELSE IFRP=1 THENG
OT035
35 CLS:PRINT"YOU HAVE BEEN LET O
UT!": PRINT: PRINT "YOU HAVE WON!":
PRINT: PRINT "BUT WOULD YOU LIKE T
O CONTINUE TO SEE HOW HIGH A SCO
RE YOU CAN GET";:INPUTGP$:IFLEFT
$(GP$,1)<>"Y"THEN END ELSE PMODE
3,1: SCREENl , : RP=10
36 PUT(X,Y)-(X+8,Y+11) ,GU
37 IF Y=65 AND PPOINT(X-l, Y+lj3) =
4 OR PPOINT(X+10,Y+9)=4 AND X>11
9 AND X<139 THEN SC=SC+50:PMODE4
, 1 : SCREENl , 1 : PMODE3 , 1 : SOUND15J3 , 2
: SOUND155 , 2 : SOUND162 , 2 : SCREENl ,
38 A=PPOINT(X-l,Y) : B=PPOINT (X+12
,Y) :IFX=32THEN18ELSE IF A=4 OR B
=4 THEN GOTO 200 ELSE IF A=2 OR
B=2 AND X>33 THEN SC=SC+4 :PMODE3
, 1 : SCREENl , 1 : PLAY"T200O3V3 1GABBG
CGDAB": SCREENl,
40 RR=RND(101) :IF RR>50 AND RR<5
5 THEN GOTO 50 ELSE GOTO 18
42 GOT018
50 MX=CV:CD=RND(188)+32:CR=CD-MX
:IFCR>30 THENCD=MX+30 ELSEIFCR<0
THEN GOT056
52 CD=MX+CR:PUT(CD,Y)-(CD+8,Y+11
) ,SP:PUT(CD,Y)-(CD+8,Y+11) ,MO:GO
T038
20
THE RAINBOW August 1985
54 G0T018
56 RF=MX-CR:FOR CV=MX TO RF:PUT(
CV,Y)-(CV+12,Y+11) ,SP:PUT(CV,Y)-
(CV+12 , Y+ll) ,MO : RK=8 : GOT03 8 : NEXT
CV
58 GOT018
100 Y(1)=Y:Y(2)=Y+20:IFPPOINT(X+
4 , Y+13 ) O1THENP0KE342 , 255 : GOT018
102 FOR YR=Y(1) TO Y(2) :PUT(X, YR
)-(X+12,YR+ll) ,GU:NEXT YR:SC=SC+
5 : POKE3 42 , 255 : Y=YR-1 : GOT018
200 RK=l:GY=GY-l:IFGY=0THENGOTO2
08
201 IF GY>10 THEN GY=9
202 COLORl,l: LINE (150, 160) -(220,
190) , PSET, BF: DRAWC3BM152 , 165D8U
8F8E8D8BR4R6L6U8R6L6D4R3L3D4R6BR
6U8F8U8BR4BD7BR6C2"+N$(GY) : IF RK
=3THENGOTO1012
204 SOUND3 , 4 : SOUND2 , 5 : SOUND1 , 8 : G
OSUB300
206 GOTO 18
208 PMODE4,l:SCREENl,l:PMODE3,l:
PLAY"L801T2EFDCBAG" : FORT=1TO900 :
NEXTT : PCLS
210 CLS0 : PRINT §0, "YOUR SCORE: ";S
C
212 PRINT!? 12 8, "PLAY AGAIN (Y/N) "
; : INPUTA$ : SCREEN0 , 1 : IFLEFT$ ( A$ , 1
)="Y"THEN10ELSE CLEAR: END
214 END
300 COLORl,l: LINE (30, 160) -(130,1
80) ,PSET,BF:SC$=STR$(SC) :YS=84:F
ORR=2TOLEN(SC$) : S$=N$ (VAL(MID$ (S
C$,R, 1) ) ) : DRAW"BM"+STR$ (YS) +" , 17
2C4"+S$ : YS=YS+10 : NEXTR: DRAW"BM30
,172C4R5U3L5U2R5BR4BD5U5NR5D5R5B
R4NR5U5R5D5BR4U5R6D2L6RF3BR6NR5U
3NR3U2R5"
302 RETURN
400 FORZ=0TO9:READN$(Z) :NEXTZ:RE
TURN
402 DATA"U6R4D6NL4BR" , "BR2BU3E3D
6BR" , "NR4E5HL3G2BR" , "R4U3NL2U3L4
BR" , "BU2U4D4R6L2U4D6BR3 " , "BU6R6L
6D2R4FD2GL4R3BR3 " , "U6D6R5U3L5R5D
3BR" , "E6L6R6BD6BR" , "U6R4D3NL4D3N
L4BR" , "BR4U3L4U3R4D6BR"
500 IFX>48THENGOT018ELSE IFX=>32
AND X<48THENF0RY=125T0152:PUT(X
,Y)-(X+12,Y+12) ,GU:PUT(X,Y)-(X+1
2 , Y+ll ) , SP : NEXTY : RL=2
502 IF RLO2THENP0KE342, 255: GOTO
18ELSEGOSUB1000:GET(13 6,48)-(160
,64) ,BL:SC=SC+15
504 IFPPOINT(72,36)=1THENPUT(60,
28)-(84,44),BL: IFSO250THENPUT ( 3
2,48) -(56,64) , BL: IFSO500THENPUT
(200, 88) -(224, 104) , BL: IFSO750TH
NEW?
MAROONED!
Bv Steve Hartford
Sitting on the back porch on© after-
noon, you see a strange, flashing UFO
descend from the clouds & land out m
the corn field- Being the curious type,
you run out to investigate and find o
spaceship with it's hatch open. ..as you
step inside, the hatci closes dnd the
ship takes oft' You must find a way to
get bock home. A great graphics
adventure 1 32K & one disk drive
required.
Disk or Amdek $29.95
Blackjack Dealer
Feeler Dealer
These two programs help you develop
your Blackjack skill and strategy, in
Blackjack Dealer, 'he computer deals
the cards and plays the dealer's hand
dgoinsryou Feeler Dealer enables you
to test your strategy by playing the
desired number of hands using your
techniques & tendencies. A great
teacher for new Blackjack plovers and
a valuable tool for the veteran plover
Both progroms included 32K ex-
tended.
Tape $24.95 Disk $29.95
EAGLE
A graphic-enhancea lunar simulator The
pilot Breaks out of lunar orbit ona attempts
a sctr landing on the lunar surface.
Joysticks control thrust and craft oitituoe
ana information is continually displayed
on horizontal ana vertical velocities, ac-
celeration values, vertical ana horzontal
distances from target, fuel consumption
ana much more Disk version aiiowschoice
of landing site between Mars ana Earth's
moon A great tool for the future astronaut
or physicist 32K. 2 joysticks required.
Tape - $24.95 Disk - $29.95
Sketchpad $19.95
Graphics Drawing Piogiam • 32K Disk
ALPHA -40+ $19.95
formats 40- Tracks, Much Mere 1 32k Disk
Testmaker $29.95
Makes T/F. Mull. Choice Tests - Disk Only
Maycode
$24.95
6809 Diassembler - Add S500 For D*k
P51 Mustang 32k
Worlds Of Right
Sailor Man mk
Trekboer 32K
Tut's Tomb 32k
Zookey Typing Tutor
To Preserve Quandic
Disk • 32K
LIZPACK
Disk • Star. Anal.
Super Screen Machine
Add S3 00 For Disk
$23.75
$23.75
$23.75
$19.75
$19.75
$19.75
$29.75
$145.00
$33.75
This Month's
Spec/a//
Amdek 3"
3ox
Of
10
$20
Diskettes
Box
Of
10
Reg. '25
limited 3 Boxes • Expires B/31/85
Saguaro
Software
Factory Closeout!
Amdek Dual 3 Disk Drive
While
Supply
Lasts!
$499
While
Supply
Lasts!
Includes 10 Diskettes & Cable
See This Month's Special'
Monitors
Amdek Color 1* M99
Reconditioned - 90 Day Warranty
Amdek Color 300 s 239
Composite. 300x260 Res
Amdek Color 500 '339
Composite/ RGB
Video Driver s 27.95
Mark Data • Works On All Models
With Monitor Purchase - S25 95
Reverse Video Switch '11.95
Works On All Models With
Plug-In VDG Chip
$1.00 Shipping!
We'll Ship Your Order
To Anywhere In The USA
For $1.00
Software Onlv - Hardware Shipped At Cost
Outside USA - S2 00/ Program ( S600 Max )
Send For Our Free Catalog
Gift Certificates Available
We've Moved!
(303) 728-4937
C.O.D. Orders Add $3.00
P.O. Box 1064 • Telluride, CO 81435
Colorado Residents Add 7\ Tax
August 1985 THE RAINBOW 21
MORE FROM DERRINGER SOFTWARE
TELEGRAPHICS *@fr SIMON
© 1985 by Derringer Software, Inc.
PRINT HI-RES GRAPHICS WHILE USING TELEWRITER-64!
Use your CoCo Max, Graphicom or any other graphics ediling program lo
create your own letter heads or sales charts and then print them while you're
using TeIewriter-64. It's the perfect way to add that personal touch to your
correspondence.
Telegraphies comes with a hi-res screen print routine that interfaces with
Radio Shack, Epson, Gemini, C-Itoh and Okidata printers having dot-
addressable graphics. A simple modification to Telewriter-64 will allow you
to exit Telewriter via the DISK I/O MENU and print out the graphic without
affecting any of your text in the buffer. Using Telewriter's partial print op-
tion you could have a sales chart or any other graphic printed right in the
middle of your document.
This is the same feature that is included in our MASTER DESIGN program.
Since we felt you don't need to buy two graphics editing programs, we have
made this feature available at a reduced price.
SPECIAL INTRODUCTORY OFFERS!
TELEGRAPHICS - $19.95
TELEWRITER-64 + TELEGRAPHICS - $64.95 (SAVE $15.00)
COCO MAX + TELEGRAPHICS - $74.95 (SAVE $15.00)
ALL 3 PROGRAMS - $129.90 (SAVE $19.95)
(A vailable Only On Disk) (No Oilier Discounts Applicable)
DYNAGRAPH
© 1984 by Derringer Software, Inc.
A utility program for owners of DYNACALC®
DYNAGRAPH will transfer graphic files from DYNACALC to standard
graphic files for further enhancing and labeling by graphic editing programs
such as MASTER DESIGN.
DYNACALC stores its graphic displays in a way that is not accessable by the
standard LOADM command. DYNAGRAPH will convert these to files that
can be LOADMed by most any graphics editing program such as MASTER
DESIGN. DYNAGRAPH will also convert a standard hi-res display into
the format that is needed by DYNACALC. DYNAGRAPH can also reduce
a graph vertically and horizontally so that multiple displays can be combined
into one.
DYNAGRAPH — $19.95
MASTER DESIGN - $29.95
DYNAGRAPH + MASTER DESIGN - $44.95
DYNACALC - $99.95 (DYNAGRAPH INCLUDED!)
ALL 3 PROGRAMS -$119.95
© 1984 by Derringer Software, Inc.
Wouldn't it be nice if you could run through a BASIC program, answer
prompt after prompt, and then have the same responses generated again with
the touch of one key? You can with SIMON !
SIMON will "watch" you run through any BASIC program and keep track
of every keystroke you make. The keystrokes can be saved in a disk file so
the next time you want to perform the same procedure, SIMON will do it for
you.
SIMON can remember 6000 keystrokes (including mistakes) and will faith-
fully repeat them for you at anytime. A custom menu can be created so that
the press of one key will have SIMON run your BASIC program(s) and select
the appropriate command file to use. You can even have SIMON pause at
any input so that you can enter information that won't be the same each
time.
SIMON is perfect for any type of reporting, file maintenance or any other
program that requires a sequence of prompts to be answered each time it's
used. This works especially well with our PRO-COLOR-SERIES programs.
Requirements: 64K Color Computer with Disk.
$24.95 (Disk Only)
SIDE WISE„
© 1984 by Derringer Software, Inc.
SIDE WISE makes your printer do something you never thought possible —
print side ways! Print out an ASCII spread sheet file that has up to 255
characters per row for easier viewing. No more hassles with trying to hold
sheets together!
SIDE WISE will read in any ASCII text file and print it out side ways using
a Radio Shack, Epson, Okidata, C-Itoh or Gemini printer. The only re-
quirement is that your printer has dot-graphics ability. SIDE WISE reads
any ASCII file including BASIC programs and word processor files.
Add a new "twist" to your printer's capabilities!
$19.95 (Disk Only)
Include $3.00 for UPS Shipping - $5.00 U.S. Mail - S9.00 Air Mail
Checks, Money Order, VISA or MasterCard
Derringer Software, Inc.
P. 0. Box 5300 - Florence, S. C. 29502-5300
(803) 665-5676
Pro-Color-Series
TM
© 1984 by Derringer Software, Inc.
Now there's a series of programs that offers integration between the five major uses of a computer
Database, Word Processing, Spread Sheet, Communications and Graphics!
PRO-COLOR FILE 'Enhanced* 2.0 $59.95 MASTER DESIGN
An all new version of PRO-COLOR-FILE will once again leave lis mark as
trie most flexible database in ils price range tor the Color Computer.
• 60 Da/3 Fields • 1020 BYTE RECORDS • TRUE MUL Tl DRIVE SUPPORT
• 4000+ RECORD CAPACITY • 4 USER DEFINED DATA ENTRY
SCREENS • 28 MATH EQUATIONS • IF-THEN-ELSE FUNCTIONS IN
EQUATIONS • FILE-WIDE RECALCULATION • 8 USER DEFINED REPORT
FORMATS • 6 USER DEFINED LABEL FORMATS • TOTAL FIELDS ON
REPORTS • SUMMARIZE FIELDS • SEND REPORTS TO PRINTER,
SCREEN OR TEXT FILE • FAST ML SORT (750 RECORDS IN LESS THAN
5 MINUTES) • CREATE UP TO 16 INDEXES FOR SORTING OR REPORTING
RECORDS • AUTO KEY REPEAT • KEYBOARD CLICK • STORES FOR-
MATS FOR REPEATED USE • CUSTOM SELECTION MENUS •
PASSWORD PROTECTION • CREATES FILES COMPATIBLE WITH
DYNACALC 9 •
Because o( PRO-COLOR-FILES ability to send reports to a text tile, this
means you can use your favorite communications prdgram to transmit
reports to other computers or read them in with your favorite word pro-
cessor for creating customized reports. You can also convert ASCII tiles
from your favorite spread sheet program into data tiles thai can be ac-
cessed for further reporting and analyzing. PRO-COLOR-FILE is also sup-
ported by the PRO-COLOR-FILE National Users Group with quarterly
newsletters. Join the rest of the world and discover for yourself whal
you've been missing.
PRO-COLOR-DIR
$21.95
Need to organize all your diskettes so you know where each program is?
PRO-COLOR-DIR will read your directories and create a master data file
that can be accessed by PRO-COLOR-FILE for sorting and reporting.
1000+ records can be stored on one diskette with valuable information
about each program.
• DISK ID NAME • FILENAME/EXT • TYPE OF FILE • DATE CREATED •
DATE UPDATED • NUMBER OF GRANS ALLOCATED • NUMBER OF SEC-
TORS ALLOCATED AND USED • MACHINE LANGUAGE ADDRESSES •
A diskettes directory can be re-stored in the data file with old entries
deleted and new ones appended automatically. You can obtain hard
copies of the information and create labels of the filenames lor placing on
the diskette itself.
$29.95
This graphics program does more lor you than just hi-res graphic editing.
It will generate lettering in hi-res graphics that can be different sizes,
skinny, bold, textured, drop shadowed, raise shadowed or tall. It will
also interface with the Telewriter-64 word processor for printing hi-res
displays with your letters.
As a graphics editor, it takes full advantage of all the extended BASIC hi-
res graphic commands. Create boxes, circles, lines, copy displays and
utilize GET and PUT features. Some added commands include mirror
reflection, turn displays backwards or upside down, Squish displays,
create dot patterns for shading, or diagonal lines for creative
backgrounds.
Special text files created with the Letter Head Utility allow you to access
hi-res graphics from Telewriter-64, your own BASIC programs or PRO-
COLOR-FORMS.
MASTER DESIGN comes with its own screen dump routine which inter-
faces with all popular dot matrix printers that have dot addressable
graphic ability.
See reviews in:
July '84 flainooiv.Oct. '84 HolCoCo Telewriter-64 © 1983 by Cognitec
PRO-COLOR-FORMS 2.0
$29.95
PRO-COLOR-FORMS will access data files you create with PRO-COLOR-
FILE and merge them with a letter or place them on pre-printed forms
such as statements. Any field of information Irom your data file can be
placed anywhere and repeated as many times In the letter or on the form.
You can use the built in ML text editor lor creating the form or use your
favorite word processor.
• Of SIGN UP TO 6 FORMA TS AT ONE TIME • USER DEFINED PAGE SIZE
• SUPPORTS SPECIAL PRINTER CONTROL CODES • RIGHT JUSTIFICA-
TION • PASSWORD PROTECTION • MERGES WITH GRAPHICS FROM
MASTER DESIGN •
II you use our graphics program MASTER DESIGN, you can merge
graphics with your forms for added enhancements. Have your graphic
letter head printed at the top of each letter or incorporate designs, bar
graphs or any display created within the form itself.
Buy any 3 and deduct 10% — Buy all 4 and deduct 15%
Shipping: Include $3.00 for UPS shipping, $6.00 postal, $12.00 overseas
Send orders to: Derringer Software, Inc. P.O. Box 5300, Florence, SC 29502-2300
VISA/MasterCard customers call: (803) 665-5676 10:00 am to 5:00 pm EDT \ ,..
-SI
DYNACALC
®
BEST SPREAD SHEET PROGRAM ON THE MARKET* $99.95 (Includes DYNAGRAPH©)
$89.95 IF PURCHASED WITH ANY OF THE ABOVE PROGRAMS.
DYNACALC Is a faglsloraii trademark ol Computet Systems Center. DYNAGRAPH © Is copyrighted by Derringer Sotlware. Inc.. 1914. . .*J>.
TELEWRITER-64 < is copyrighted by Cognitec. 1983. " , '.:"'■
ENPUT(164,28)-(188,44) ,BL:IFSC>1
000THENPUT(76, 68) -(100,84) , BL
506 IFSO1250THENPUT(164,108)-(1
88 , 124 ) , BL: IFSO1500THENPUT ( 164 ,
28)-(188,44) ,BL
508 X=32:Y=25:POKE342,255:GOT016
510 GOTO 18
1000 PMODE3,l:PCLS2:COLOFv4,2:LIN
E(8,8)-(248,152) ,PSET,B
1002 DRAW"C4BM8,8F8R20H8L20F8D13
6NH8R16U16NL8H8ND8U4R80U8NH8L80U
8NR72U4R24U8NH8L24U8NR16U4R60U8N
H8L60U8NR52U4R16U8NH8L16U8NR8U4R
44U8NH8L44U8NR36U4R12U8"
1004 DRAW"BM44,8D8F8U8H8R196C2R8
ND7L8C4F8L19 6D8R180ND4R8D12H8L52
D8F8U8NH8R52BD8L8ND4NL44R8D12H8L
20D8F8U8NH8NR20D8R12ND4R8D12H8L4
8D8F8U8NH8R48BD8L48R40ND4R8D12H8
L16D8F8U8NH8R16BD8L16R8ND4R8D12"
1006 DRAWH8L52D8F8U8NH8R52BD8L5
2R46ND4R8D12NH8L192H8NR192D16F8U
16D16BRC2L16BM30,8R13BM8,145D7R7
BM76, 28C4D8F8U8H8R52F8BM144 , 28D8
F8U8H8R20F8BM112 , 108D8F8U8H8R52F
8"
1008 LINE(84,36)-(136,44) ,PSET,B
: LINE (152, 36) -(172 ,44) ,PSET,B:LI
LOWEST PRICES
EDITTRON
EDITTRON is a Machine-Language, Full-Screen
BASIC Program Editor. More powerful than any word
processor for editing your BASIC programs. EDITTRON
allows you to RUN and debug your programs without
having to SAVE them in ASCII. 20 simple commands
plus Auto-Numbering make EDITTRON an extremely
powerful and time-saving BASIC programming aid.
Requires 16K Extended Color BASIC.
GOLDKEYS
GOLDKEYS is a 64K Machine-Language Keyboard
Enhancement which adds these powerful new features
to your Color Computer: Function Keys, Type-Ahead
Buffer, Non-Destructive Cursor, Auto-Repeating Keys,
Key Click, Enhanced Line Editor, and these Powerful
Commands: BREAKON, BREAKOFF, ONBREAKGOTO,
ONRESETGOTO, INPUTUSING, and much more!
Requires 64K Extended Color BASIC.
Buy Either Program for 5 20°° on Cassette or °22°° on Disk
Buy Both Programs for '35°° on Cassette or s 39°° on Disk
Color BASIC ROM 1.2 s 30°°
Disk Extended Color BASIC ROM 1.1 5 30°°
64K/128K RAM Buttons s 3 5 °
TFRMS: Cashier's checks and Money Orders for immediate
delivery • Personal checks allow 2 weeks • Orders over $100 save
10% • California residents add 6°7o Sales Tax • Orders under $25 add
$2 shipping • U.S. C.O.D. orders add $4
4418 E. Chapman Ave., Suite 284
Orange, CA 92669
(714) 639-4070
VIDTRON
&o«/
NE (56, 56) -(116, 64) , PSET, B: LINE ( 1
32,56) -(204, 64) , PSET, B: LINE (100,
76) -(178, 84) , PSET, B: LINE (64,96) -
(208,104) , PSET, B: LINE (120, 116) -(
172,124) ,PSET,B
1010 DRAW"BM48,4 8D8F8U8H8R60F8BM
124 , 48D8F8U8H8R72F8BM92 , 68D8F8U8
H8R76F8BM56 , 88D8F8U8H8R144F8 1 ' : FO
R YT=40TO120 STEP20 : PAINT (134 , YT
) ,3,4:NEXT YT: PAINT (160, 40) ,3,4:
PAINT(100,20) ,3,4:PAINT(20,36) ,3
, 4 : PAINT ( 9 2 , 60 ) , 3 , 4 : PAINT (40,16)
,1,4:RK=3:GOTO202
1011 RK=5:GOT016
1012 RETURN
1050 DIM GU(8,11) ,MO(8,ll) ,SP(8,
11)
1052 PCOPY1T05
1054 A$="BR2R5L5GD4FR5EU4HL3D4L2
R4DGLD3FR2L2HGL" : B$="C4R8L3D3LU3
D3L3D4R8U4L5D3L2R4L2D3G2LRE2F2R2
ii
1056 DRAW"BM40,25C3;XA$;"
1058 GET(40,25)-(48,36) ,GU:PCOPY
5TOl:GET(40,25)-(48,36) ,SP
1060 DRAW"BM40 ,25; XB$ ; " : GET (40,2
5)-(48,36) , MO :PCOPY5T01: RETURN
2000 PMODE4,2:SCREENl,l:PMODE3,2
:PCLS4
2002 A$="ND24R24D24NR8NU24L24D32
R3 2NU32BR12U56R24D24L24F32BR12U5
6R24D56NL24BR10BU56NR24R12D56BR1
2U12R4U12R4U12R4U12R4U8D8R4D12R4
D12NL20R4D12R4D12BR12U56D8R7D12R
7D12R7D12R7D12U56"
2004 DRAW"BM12,20C1;XA$;BM20,2 4C
3 * XA$ " "
2006 DRAWBD100BL200C3D28R12U12N
L12D12BR8BU4NU16R12NU16D12NL12U1
2BR12BU4R8C2BR12BD8U12NR16U8R16D
20BR6NU20R12BR6U12NR16U8R16D20BR
6U20F20NU20BR20U12NR16U8R16D20BR
4RULD"
2008 DRAW"S5;BD10BL90C3L20D10R20
D10NL20 ; S4 ; BR6U12R16D4NL16D8BR6U
12R16D4NL16BD8BR6U12R16D12NL16BR
6U12R16D4L16R8F8BR13U12L7R16BD12
BR6U12R16D4NL16D8"
2010 FORR=1TO1000:NEXTR: PAINT (18
0,37) ,2, 3: PAINT (50, 64) ,2, 3: PAINT
(40,25) ,2,3:PAINT(120,35) , 2 , 3 : PA
INT (75, 35) ,2,3: PAINT (0,0) , 2 , 3 : PA
INT(40,148) ,2,3
2011 POKE65494,0:PLAY M T8V31O2BAG
AB ; PI ; B ; PI ; BBBBB ; PI ; A ; PI ; A ; PI ; AA
AAA ; PI ; B ; PI ; B ; PI ; BBBBB ; PI ; BAGA ; B
; PI ; B ; PI ; BBBBB ; PI ; A ; PI ; A ; PI ; B ; PI
;A;P1;GGGGGGGG":POKE65495,0
2012 EXEC44539:PCLS:PMODE3,l:SCR
EEN1 , : PCLS 2 : RETURN /Z\
24
THE RAINBOW August 1985
: -#-'— '-• '
> wm
the Rainbow The Falsoft Building
502/228-4492 Prospect, KY 40059
I would like to send a gift certificate for a one year (12 months)
subscription to:
Name
Address
City
State.
ZIP.
M
r<«?
From:
Name
Address .
City
State_
ZIP.
D Payment Enclosed
Charged VISAD MasterCard □ American Express □
My Account#
Signature Card Expiration Date
33=
■
1 w®
Kentucky residents add 5% sales lax. All subscriptions begin "T^v^ Jc* \0
with the current issue. Please allow up to 5-6 weeks for ■> jC fQ
rst copy. U.S. FUNDS only. We do not bill in order to hold " kp \J £*»
)sls. £> JT \V
GAME
-
m frmsm
In the year of our Lord 1991, several of Earth's deep space probes
encounter several intelligent forms of life. Not all are peaceful.
One of these races (through the probes' information) has found
its way to Earth and is now proceeding to overtake it.
Several of their "motherships" encircled the Earth and surrounded
it with a blue shield of energy, with the motherships themselves acting
as the charging bases, and in the process leaving them open without
defenses. However, each mothership has one falcon ship, a smaller
and more versatile ship capable of firing back and blocking your
laser.
You will be controlling three successive attack bases, capable of
firing at the falcon ship and its base. Caution: Do not fire when
the blue bar is directly below your own base, or you will be destroyed!
To fire, simply press the firebutton on the right joystick, which controls
your base.
There are nine levels of play, indicated by the blue bars at the
bottom of the screen, one being the easiest and nine the most difficult.
(Aaron Fransen is a 17-year-old high school student and has been involved
with the CoCo since its introduction.)
26
THE RAINBOW August 1985
August 1985 THE RAINBOW 27
You will receive three bases, indicated
by the red bars at the bottom of the
screen (emanating from the right). Your
score is indicated by a red line at the
bottom (emanating from the left).
What you must do is shoot through
the defense of the falcon ship's base (the
Falcon's Lair) so you may then destroy
the Lair's power cell. Once it is destroyed
the entire ship falls to the ground,
explodes and you are transported to
another Lair's area.
The more of the shield you destroy
before destroying the power cell, the
higher your score will be at the end of
the round. This is not as easy as it may
seem. As each level progresses, the
shield starts to rebuild itself at speeds
according to the level of play.
The listing is rather long, but hope-
fully you'll find the game to be worth
it. If you would like a line-by-line
reference and variable reference table
for this game, please send a SASE and
$1 to me at this address: Box 817,
Revelstoke, British Columbia, Canada
VOE 2S0.
Please remember I live in Canada,
so use sufficient postage. If you simply
have a question, complaint (or compli-
ment?) or other comment, just send a
SASE to the same address.
Instructions:
1) Load game.
2) RUN it (you may have to run it
twice because of a bug in BASIC).
3) Press Reset (and RUN) until screen
is red.
4) After the title page comes up and
the introduction sounds are
played, press fire.
5) Adjust the right joystick to select
difficulty, then press the firebutton.
6) After a few seconds the game will
begin. The object is to destroy the
blue power cell at the center of
the Falcon's Lair (at the top of
the screen), while at the same time
either destroying or avoiding the
small falcon ship which hovers
just below the Falcon's Lair. Do
not fire when the blue bar (the one
that moves about) is directly
below you, or you will be
destroyed.
7) After you have lost all three bases,
the game ends, showing you your
final score and asking if you would
like to try again. Your selection
is made by adjusting the right
joystick until the white box is
around the appropriate answer;
then press fire.
r*
...11
19 ....
....75
31 ....
...183
45 ....
....25
52 ....
....64
63 ....
...152
69 ....
....85
82 ....
...149
END ..
92
The listing: FLCNLAIR
1 PCLEAR7:PMODE4,l:SCREENl,l:PMO
DE3:PCLS3
2 I$=INKEY$:IFI$=""THEN2
3 CLSrDIM X, Y,EX,EY,PX,T,R, LEV,M
EN,A(10),E(656),E1(50) ,E2(50) ,Y(
16),P(31) ,D$(61) ,D(5j3) ,N$(9) :ER$
="R8DL8DR8DL8DR8DL8BU5"
4 POKE187,0:FORT=0TO16:READ Y(T)
: NEXT : FORT=0TO2 6 : READ D$ (T) : NEXT
:FORT=0TO9:READ N$(T):NEXT
5 PMODE4 , 4 : PCLS : PMODE4 , 1 : PCLS 1 : S
CREEN1,1:I$="THE":DRAW"C0S8BM100
, 20" :GOSUB79:I$= M FALCONS": DRAW'S
16BM14 , 60" : GOSUB81 : I$="LAIR" : DRA
W"BM60 , 90" : GOSUB81
6 I$="BY§AARON§MARTIN@FRANSEN":D
RAWS4BM30 , 140" : GOSUB79 : FORT=0TO
7:GET(25,145-T)-(210,145-T) ,E,G:
PUT(25+T,145-T)-(210+T,145-T) ,E,
PSET:NEXT
7 PMODE3 : COLOR3 : LINE (0,0) - (255 , 1
9 1 ) , PSET , B : COLOR2 : LINE ( 4 , 4 ) - ( 2 5 1
,187) ,PSET,B:PMODE4:PLAY"L20T8BA
GFEDCBAGFEDCBAGFEDCAGFEDCAGFEDCA
GFEDCGFEDCGFEDCGFEDCFEDCFEDCFEDC
EDCEDCEDCDCDCDCCCCC
8 P=PEEK(65280) :IFP=1260RP=254TH
EN9ELSE8
9 CLS:PRINT@22 6,"WITH THE JOYSTI
CK, CHOOSE A LEVEL OF DIFFI
CULTY, THEN PRESS THE FI
RE BUTTON": PLAY "PI
10 LEV=INT(JOYSTK(0)/7.4)+l:PRIN
T@ 2)3 2, "LEVEL =";LEV
11 P=PEEK(65280) : IFP=1260RP=254T
HEN12ELSE10
12 CLS1:PRINT@227,"Y0U WILL BEGI
N IN A MOMENT"; :SCREEN0,1
13 MEN=3
14 PMODE4,2:PCLS:PMODE3:PCLSl
15 PMODE3:COLOR2:LINE(0,0)-(31,6
) ,PSET,BF:GET(0,0)-(31,6) ,P:PCLS
1
16 GET(0,0)-(80,20) ,E: PMODE3 : COL
OR3 : FORT=10TO20STEP2 : LINE (T, 4) - (
T+20 , 9 ) , PSET : LINE (T+30 , 9 ) - (T+50 ,
4) ,PSET:LINE(T,34)-(T+20,29) ,PSE
T : LINE (T+30 ,29)- (T+50 ,34), PSET : N
EXTT:GET(0,0)-(80,20) ,E1:GET(0,2
0)-(80,40) ,E2:PCLS
17 PMODE3, 4 :FORT=40TO74: CIRCLE (1
28,144) ,T,3, . 4:NEXTT:FORT=0TO20:
CIRCLE (128, 144) ,T,2, .7:NEXTT:COL
OR2 : LINE (0 , 140 ) - ( 70 , 13 4 ) , PSET , BF
: LINE (255, 140 ) - ( 18 5 , 134), PSET , BF
: LINE (0 , 148 ) - (70 , 154 ) , PSET , BF: LI
NE(255,148)-(185,154) ,PSET,BF
18 PMODE3,1:LINE(0,12)-(15,22) ,P
RESET , BF : GET (0,12)-(15.22).E: DRA
W"BM8 , 12C3M0 , 2 1M15 , 2 1M7 , 12 " : PAIN
T ( 7 , 16 ) , 3 , 3 : PMODE4 : GET (0 , 12 ) - ( 15
28
THE RAINBOW August 1985
m
LOWEST PRICES
x
DERBY CITY SOFTWARE
"The Place to Shop for ALL your COCO Needs"
Derby City is proud to announce that we now carry the full hardware and software
lines of the following COCO suppliers:
Spectrum Projects • J&M Systems, LTD • Derringer Software, Inc. • Speech Systems
In our opinion, these suppliers have the finest and broadest selection of the things
you need to make your COCO perform at its peak. Order from Derby City today. . .
our prices are low and the products are the best.
OPERATING SYSTEMS
XEX (The NEW FLEX)
(D) S99.95
SPECTRUM DOS
(EPROMable)
(D) S25.00
JDOS 1.2
(128K. 28 pin) ROM
S49.00
JDOS 1.2 (24 pin) ROM
$49.00
JDOS 1.11 (24 pin)
$3995
JFD-CP Disk Controller
$149.95
1.2 ROM ROM switcher
Memory Minder parallel por
DISK DRIVES
FROM SPECTRUM PROJECTS:
(6ms. 40 tracks & 1 2 hi.)
DRIVE system
$229 95
DRIVE 0,1 syslem
$349.95
DRIVE 1 . 2 or 3
SI 39 95
DISK CONTROLLER
w RS 1.1 ROM
S119.95
AMDEK TWIN 3? DRIVE
$19995
AMDEK DRIVE one-drive syslem
w controller
S299 95
FROM J S M Lid.: (6ms. 40 Iracks. 1 2 ht.|
Includes:
- JFD-CP Disk controller
- JDOS 1.2 ROM (128K-28 p
n) ROM
- Complete JDOS manual
DRIVE system (SS)
$289 00
DRIVE syslem (DS)
S359 00
DRIVE 0.1 syslem (SS)
$4 29.00
DRIVE 0.1 system (DS)
$499 00
DATABASE MANAGEMENT
PRO-COLOR-FILE enhanced 2.0
Compalible w Dynacalc 559.95
PRO-COLOR-FORMS 2
Increase design flexibility $29.95
E-Z BASE
(The besl small database) S21.95
SPREADSHEET
DYNACALC
(The latesl version) $79.95
DYNAGRAPH
More graphics lor Dynacalc $19.95
WORD PROCESSING
TELEWRITER 64 (D) $59.95
TELEGRAPHICS
Add graphics to TW 64 S19 95
THE WIZ
Add character sels to TW 64 $19.95
MASTER DESIGN . 529.95
(Graphic text designer editor-TW 64)
COMMUNICATIONS
COLORCOM E
300 1200 baud!
TERM TALK
Talking terminal Pak
COLORAMA BBS
The besl BBS lor CoCo
TIME MODULE
lor COLORAMA BBS
549.95
549.95
$9995
$59.95
S29.95
S69.95
S149.95
SI 9.95
$2600
$33 00
$79 00
S99.00
$1995
MEMORY EXPANSION
64 K
CMOS-120ns-Sel ol 8 chips
64K
26-3 134 A & 26-3 136 A ONLY
256K Thunder RAM
(NO soldering 1 )
MAJOR UTILITES
CoCo CHECKER
Best CoCo diagnostic
MEMORY MINDER Diagnostic Diskette
FOR JDOS 1 2
SS & 28 pin ver.
FOR JDOS 1 2
DS & 28 pin ver.
MEMORY MINDER
Program 8 Diagnostic Diskette
For JDOS 1.11 or earlier (SS)
For JDOS 1.11 or earlier (DS)
DISK SORT & ORDER
SS & DS version
Remove all sectored data Irom disketles
and alphabetize directory, saves wear &
lear on disk drives - A must lor JDOS users.
MLBAS1C COMPILER $69 95
The most comp. BASIC compiler.
64K DISK UTILITY PACKAGE $19 95
TAPE DISK UTILITY $24 95
DISK UTILITY 2 1 $24.95
MULTI-PAK-CRACK $24.95
SPIT-N-IMAGE 3.1 $29 95
CoCo VIDEO TITLER $19 .95
CoCo CHECKBOOK $39.95
SPECTRUM ADVENTURE
GENERATOR $39 95
VOICE RECOGNITION & SPEECH
EARS
The ONLY voice recog sys $99 95
SUPER VOICE
Unlimited vocabulary $79 95
HOME COMMANDER
Controls appliances $59 95
VOICE CONTROL $24 95
Voice control lor Home Commander
SPECTRUM VOICE PAK
ESTHER
Talking psychoanalysl
FINAL COUNTDOWN
Talking adventure
STAR TALK
Talking adventure
SHIP HUNT
Talking adventure
ADVENTURE GENERATOR
Talking Adv. Gen.
MUSIC
MUSICA 2 (ver 2.6) .
MUSIC THEORY
Course 1
MUSIC THEORY
Course 2
MUSIC LIBRARY
Vol. 100
$69 95
$2495
$24 9".
HA 95
$24 95
539 95
52995
S29.95
549.95
539.95
MUSIC LIBRARY
Vol 200
$3995
MUSIC LIBRARY
Vol. 300
S39.95
STEREO PAK
Conned CoCo lo stereo
S39.95
GRAPHICS
CoCo MAX (Disk) $69.95
GRAPHICOM (Cheshire Cal) $24 95
GRAPHICOM p. II (Whitesmith) $24.95
BJORK BLOCKS (DISK) S39.95
SCHEMATIC DRAFTING
PROCESSOR S29.95
MASTER DESIGN $29.95
DYNAGRAPH $19.95
GRAPHIC SCREEN DUMPS
GEMINI EPSON . S16.95
CGP-115 COLOR DUMP $21 95
Is the FASTEST dump lor CGP-1 15
DMP-DUMP $19.95
EDUCATIONAL
PRE-SCHOOL:
TALKING COUNT TO ONE
HUNDRED
TALKING ALPHABET
TALKING NUMBERS &
COLORS
TALKING NUMBER SKILLS
TALKING CLOCK
$2995
$29.95
$2995
$29.95
$29.95
GRADES 2-6
TALKING SUBTRACTION
KING AUTHOR'S TALES
COLOR MATH
SPELL-A-THON
SPELLING TESTER
POETRY CREATOR
SHORT STORY MAKER
FOREIGN LANGUAGE
w French Diet.
PRESIDENTS
STATES
CAPITALS
MATH DRILL
EDUCATIONAL PAKS:
VOLUME # 1 -
Grades 1 .2 & Spec. Ed.
VOLUME #2
Grades 3 to 6 & Spec. Ed
HARDWARE
DOS SWITCHERS:
For J&M Controllers
- With RSDOS 1 1
For RS Controllers
- With JDOS 1.11
- with JDOS 12 (24 pin)
RS-232C 2 POSITION SWITCH
RS-232C 3 POSITION SWITCH
40 PIN DOUBLE Y CABLE ....
40 PIN TRIPLE Y CABLE .........
S29.95
S29.95
$24.95
$24.95
$9.95
$9.95
$9.95
$9 95
$9.95
$9.95
$9.95
$9.95
$29.95
$29.95
$21.95
$49.95
$31.95
$52.95
$62.95
$24.95
$29.95
$29.95
539.95
3825 Bardstown Road, Suite 232, Louisville, KY 40218
(502) 454-6809
All orders S3. 00 shipping & handling. Ky. residents add 5% sales lax
C.O.D.(add$2.00)/VISA/MasterCard/Cash
— VISA -
VIP Writer
3S-
VIP Integrated
U| TM
brary
VIP Desktop Magic! *
Finally, you can have the power and integration of Lotus Symphony",
1 2 3" or Open Access" for the larger micros on your Color
Computer! The convenience of instant changes to a new application
and effortless transfer of files is at the tip of. your finger.
With VI P Desktop, the six applications of VI P Library are integrated
into one program, on one disk. You have instant access to word
processing, with a spelling checker always in attendance, data
management with mail merge, spreadsheet financial analysis, tele-
communications and disk maintenance. )ust move the hand to point
to the volume, and the new application is there. And VIP Integrated
Library has been made to work well with one disk drive, or all four, so
be ready to push vour Color Computer to the limits!
Elegance!
VIP Integrated Library is a product with finesse, inside and out.
Inside is one awesome but very elegant program. On the outside, it
comes handsomely bound in two cloth covered, gold embossed
binders with slipcases - like those you get with software for the
Tandy 2000". And remember, to get software of this quality for the
Tandy 2000 you would have to pay hundreds more!
Stand-Alone Power
VIP Integrated Library is not one of those slip-shod, all-in-one
slicer-dicer machines, good for one day and then you throw it away.
It fully integrates the six top-of-the-line stand-alone programs
described in the following pages: VIP Writer, VIP Speller, VIP Calc,
VIP Database, VIP Terminal & VIP Disk-Zap. You can buy the entire
Integrated Library at once, or you can buy one or two programs that
you need now and upgrade to the integrated Library later.t
Shared Files, Shared Features
All VIP Integrated Library applications share common features,
such as ease of use, built-in help, the same commands, full printer
control, full use of your 64 K of memory, and step-by-step tutorials.
Most important, all essential applications feature professional high
resolution lowercase displays to give you a choice of 51, 64, or 85
characters per line, with 21 or 24 lines per screen. You get a
professional display on your Color Computer without any hardware
modification!
Buy the Integrated Library for
$149.95
Or buy the individual volumes separately,
as shown on the following pages!t
Requires 64K and one or more disk drives.
Radio Shack is a fCRisierfd trademark of Tandy Corp.
Tandy 2000 is a trademark ol Tandy Corp.
Symphony and 12 3 are trademarks ol Lotus Development Corp
Open Access is a trademark of Software Products International.
RATED TOPS IN RAINBOW ^
COLOR COMPUTER MAGAZINE & COMPUTER USER
The most powerful and easy-to-use word processor is available in
the showpiece and workhorse of the Library: The VIP Writer".
The result of two years of research, the VIP Writer" offer every
feature you could desire from a word processor. It is the most
powerful, fastest, most dependable and most versatile. With the hi-
res display, workspace and compatibility features built into the
Library the Writer is also the most usable.
". . . Nearly every feature and option possible to implement on the
Color Computer. The design of the program is excellent: the
programming is llawless. October 1983 "Rainbow"
Among word processors lor the CoCo. VIP Writer stands alone as
the most versatile most professional program available." May 7984
"Comptuer User"
The Writer will work with you and your printer to do things you
always wanted to do. Every feature of your printer can be put to use,
every character set, every graphics capability at any baud rate, EVEN
PROPORTIONAL SPACING. All this with simplicity and elegance.
Professional features of particular note:
■Memo/y- Sense with bank switching to »niiv utilize 64 k. giving not jusi
24 or lOK, hul up lf> S IK ol workspace with the* tape version and SOK with the
disk version.
■ TRUE FORMAT WINDOW allowing you to preview the printed page ON
THE SCREEN BEFORE PRINTING, showing centered lines, headers, FOOT-
NOTES, page hreaks. page numhers. J. margins In line lengths ol up lo 240
Characters, ll make-. HYPHENATION a snap.
■ A TRUE EDITING WINDOW in all 9 display modes lor Ihose extra wide
reports and graphs (up to 24(1 columns!}.
■ FRE E DOM In imbed any number ol PRINTER CONTROL I ODES anywhere,
EVEN IUSTIFIEDTEXT.
■ Full 4-way cursor tontrol. sophistic aled edit r ommands, Ihe ability to edit
any BASIC: program or ASCII texlfile. SEVEN DELETE FUNCTIONS, LINE
INSERT, LOCATE AND CHANCE, wild card locate, up lo TEN SIMULTANEOUS
block manipulations, word wrap around, programmable tabs, display memory
used and led. non-breakable space, and headers, looters and FOOTNOTES.
■ Automatic justification, automatic pagination, automatic centering, auto-
matic Hush right, underlining, superscripts, subscripts, pause print, single-
sheet pause, and print comments.
■ Type-ahead, typamalic key repeat and key beep lor the pros, ERROR
DETECTION and UNDO MISTAKE leatures. 1 PROGRAMMABLE functions,
auto column creation, and instant on-screen HELP,
32 K (Comes with tape & disk) $69.95
VIP Writer-VIP Speller Combo comes in VIP Writer Binder.
Buy the VIP Speller Separately
32 K Disk Only $49.95
ALL COCO OWNERS!
Trade in Any Non-Game
Program From Any
Company And Buy
VIP Integrated Library
For Only $99.95
HERL'S HOW: If you already own .1 VIP product or any other com-
pany's product, a disk drive, and have f>4 K of memory, all you have to
do to take advantage of this offer is send your VII? Super "Color", or
other non-game program back, with .1 credit c ard (Visa or MasterCard)
number, a check, or money order for $99.95 plus $6 for shipping and
handling (S10 for Canadal. Send it to:
Library Upgrade Offer / VIP TECHNOLOGIES
132 Aero Camino, Sanla Barbara, CA 93117
VIP Database ™ VIP Terminal
"ONE OF THE BEST" JULY 1984 "RAINBOW"
This high speed MACHINE LANCUACE program fills all your
information management needs, be they for your business or home.
t^omputer, featuring machine code, lowercase screens and mail-
ry, accounts, mailing lists, family histories,
j will keep track of all your data, and it will
merge VIP Writer" files.
maximum ui
"^^^^ M
Full sort of records is provided for easy listing of names, figures,
addresses, etc.. in ascending or descending alphabetic or numerical
forms arithmetic operations and updates other fields. Unlimited
codes for use with all printers.
32K DISK $59.95
64 K Required for math package & mail merge
j(l:l lit! J»(tr»llM (MCI IWSlil
:<■.:: (rtdil
Ih: e; it -,.- v tM i: r.i;
rEt-: -..I* III!"!,
B«" fc.l. |l«H .'.: \\\.<-
■: . ■
•'>! "iril
(Mill U; :n; BlU-rtl
»is.B is** ruii.sj
VIP Calc
"MORE USABLE FEATURES" FEB 1985 "RAINBOW"
VIP Calc" is truly the finest and easily the most powerful electronic
worksheet and financial modeling program available for the Color
Computer. Now every Color Computer owner has access to a
calculating and planning tool better than VisiCalc", containing all its
features and commands and then some, WITH USABLE DISPLAYS.
There's nothing left out of VIP Calc". Every feature you've come to
rely on with VisiCalc" is there, and then some. You get up to 5 TIMES
the screen display area of other spreadsheets for the Color Computer
and Memory-Sense with BAN K SWITCHI NC to give not just 24, or 30,
bul UP TO 33K of WORKSPACE IN 64K!!! This display and memory
allow you the FULL SIZE, USABLE WORKSHEETS you require. You
also get: User definable worksheet size, up to 51 2 columns by 1024
rows!* Up to SIXTEEN VIDEO DISPLAY WINDOWS to compare and
contrast results of changes * 16 DIGIT PRECISION * Sine, Cosine and
other trigonometric functions, Averaging, Exponents, Algebraic
functions. Column and Row Ascending and Descending SORTS for
comparison of results • LOCATE FORMULAS OR TITLES IN CELLS *
Easy entry, replication and block moving of frames * Global or Local
column width control up to 78 characters per cell ' Create titles of
up to 2 55 characters per Cell " Limitless programmable functions *
Typamatic Key Repeat ' Key Beep ' Typehead ' Print up to 255
column worksheet * Prints at any baud rate from 1 1 to 9600 • Print
formats savable along with worksheet * Enter PRINTER CONTROL
CODES for customized printing with letter quality or dot matrix
printer • Combine spreadsheet tables with VIP Writer" documents
lo create ledgers, projections, statistical and financial reports and
budgets.
64K (Comes with tape & disk) $69.95
VIP Programs do not work with (DOS
RATED BEST IN JANUARY 1984 "RAINBOW"
For your important communication needs you've got to go beyond
Software that Onlv lets VOU Chat. You need a smart terminal in that >/r.
can send and receive programs, messages, even other VIP Library
files. VIP Terminal" has "more features than communications soft-
ware for CP/M, IBM and CP/M 86 computers." Herb Friedman,
Radio Electronics, February 1984.
FEATURES: Choice of 8 hi-res lowercase displays * Memory-Sense
data at baud rates from 110 to 9600 • Full 128 character ASCII
repetitive pre-entry log-on tasks and send short messages * Program-
trapping ' Send up to ten short messages (KSMs), each up to 255
rharartprs Inno antnmati^^llw »^ r i..r. mnn ».. ...i»_ . — in i_--
distance. Recommended baud rates are 1 10 and 300.
32 K (Comes with tape & disk) $49.95
(Tape works in 16K but without hi-res displays)
VIP Disk-ZAP™
RAVED ABOUT IN THE APRIL 1983 "RAINBOW!"
Your database file disk, form letter disk, or BASIC program disk
goes bad. An I/O error stops loading, or even backing up of the disk.
Weeks, even months of work sit on the disk, irretrievable. Now
catastrophic disk errors are repairable, quickly and with confidence,
using the VIP Disk-ZAP". It is the ultimate repair utility for simple
and quick repair of all disk errors. Designed with the non-programmer
in mind, the VIP Disk-ZAP" will let you retrieve all types of bashed
files, BASIC and Machine Code programs. The 50 page tutorial
makes the novice an expert.
16K DISK $49.95
To Order Direct Call:
[MasterCard]
1-800-328-2737
In California call:
1-800-468-8737
Order Status and Software Questions call
(805) 968-4364
MAILORDER: $3.00 U.S. Shipping per productdhe library is
two. products). (S6.00 CANADA; S20.00 OVERSEAS).
Personal checks allow 3 weeks.
All pru es subject to ( hange without noiice.
132 Aero Camino
Santa Barbara,
California 93117
TKS-B0 is a trademark of Tandy Corp. VisiCalc is a trademark of
VisiCorp.
°198S by Sofllaw Corporation
,22) ,A:PUT(0,12)-(15,22) ,E
19 PCOPY7TO1:PLAY"L100T100O2":PM
0DE4 , 2 : SCREEN1 , 1 : PM0DE4 , 1 : FORT=0
T047 : GET (0 , T) - ( 2 55 , T+3 2 ) , E : PUT (0
, T+l) - (255 , T+33 ) , E : PLAY"FC" : NEXT
T : PCOPY2T01 : PMODE4 , 2
20 RESTORE :FORT=0TO16: READ Y(T):
NEXTT
2 1 PMODE3 , 2 : COLOR2 : F0RT=1T0 ( LEV*
28)STEP28:LINE(T,188)-(T+20,190)
,PSET,B:NEXTT:PMODE4,2
22 PMODE3,2:COLOR3:ON MEN GOSUB7
7,76,75
23 GET(j3,33)-(255,46) ,E:SH=1:Y=1
60 : X=120 : R=RND ( -TIMER)
24 J=JOYSTK(0) : IFJ<15THENX=X-8EL
SEIFJ>48THENX=X+8
25 IFX<0ORX>240THENX=Q
26 IFRND(10-LEV)=1THENPUT(PX,172
)-(PX+31,178) ,E:PX=RND(20)*8:PUT
(PX,172)-(PX+31,178) ,P
27 PUT(Q,160)-(Q+15,170) ,E:PUT(X
,160)-(X+15,170) ,A:P=PEEK(652 80)
:IFP=1260RP=254THENGOSUB39
28 IFTIMER>1500-(LEV*100)THENTIM
ER=0:GOSUB57
29 IFRND(12-LEV)=1THENG0SUB37
30 GOSUB34
31 SH=-SH:IFSH=-1THENPUT(EX,EY)-
(EX+80,EY+20) ,E1 ELSEPUT (EX,EY) -
(EX+80,EY+20) ,E2
32 PMODE3,2:COLOR3:LINE(0,184)-(
SCR/ 100, 185) ,PSET,B:PMODE4,2
33 Q=X:GOT024
34 EX=EX+((RND(3)-2)*8) :IFEX<0OR
EX>172THENEX=QX
35 EY=EY+( (RND(3)-2)*2) :IFEY<30T
HENEY=30ELSEIFEY>12J3THENEY=120
36 QX=EX: RETURN
37 LINE (EX+35,EY+10)-(EX+35, 170)
, PSET: LINE (EX+45, EY+ 10) -(EX+45, 1
70) , PSET: PLAY"L20T40O4BGEDC" :IF (
EX+46>X AND EX+46<X+15) OR(EX+34>
X AND EX+34<X+15)THEN 59
38 LINE(EX+35,EY+10)-(EX+35,170)
, PRESET: LINE (EX+45 , EY+10) - (EX+45
, 170 ) , PRESET : RETURN
39 IFX>=PX AND X<PX+20THEN59
40 IFX>EX AND X<EX+70THEN45
41 T=X/8:IFT<7ORT>23THENTY=0:GOS
UB74: RETURN
42 T=T-7 : TY=Y (T) : GOSUB74 : IFY (T) =
0THEN44ELSEY (T) =Y (T) -4 : LINE ( (T*8
)+60,Y(T) )-((T*8)+67,Y(T)+8) , PRE
SET , BF : SCR=SCR+50
43 IF(T>6AND T<10)AND Y(T)<10THE
PROGRAMS • PERIPHERALS • SUPPLIES • SERVICE
Free gilt mlh any order placed on out exclusive "Electronic Shopping Service.
• Write •
Shop by Modem
NEW for 85...
SHIPPING will be charged at our ACTUAL COST
Ohio residents add 5.5% Sales Tax COD add 2.00
SG-10
» 120cpsdralt
quality
■30 cps NEAR
LETTER
QUALTIY
■2K bufler
• Proportional
spacing
"Authorized*
STARMICRONICS
Service Center
70% oft any Interface with printer
File Edit Goodies Font Si y I e
P ■::* id
lino Max;
Tne complete . .
includes
ystem
L/f Deluxe Joystick
IV I and Y-cable ' '
cocoMaH only $ 69.95
with Joystick
or v-caDie 9-4.95
The Hot Line.
• 300/1200 Baud
• Autoanswer/dial
• Hayes compatible
• Real-lime clock/cal-
ender
• Auto redtal
• Expandable
PROMETHEUS
Pro Modem 1200
Options Processor.
Alphanumeric display...
Modem plus both options
Fast Delivery .. . Friendly Service
Choose from our large selection of Coco products...
B5 ... Colorware ... Deft ... Dynacalc ... Elite ... HJL ... J & M ... Mark Data ... Metric Industries ...
Michtron ... Microcom ... Tom Mix ... PBJ ... PXE ...Speech Systems ... Sugar ... TCE ... VIP ... and more!
^
32
THE RAINBOW August 1985
N47
44 RETURN
45 SCR=SCR+20 : TY=EY+5 : GOSUB74 : PL
AY"01ABDGEFABDFE" : PM0DE4 , 2 : FORT=
0TO18:PUT(EX+RND(80) ,EY+RND(20) )
-(EX+RND(80),EY+RND(20)) ,E,NOT:N
EXTT
46 PUT(EX,EY)-(EX+80,EY+20) ,E:EX
=RND(20)*8:EY=RND(100)+32:RETURN
47 PM0DE4 , 2 : R=l : PLAY "T2 L2 " : GET ( 1
08,0)-(149,ll),D,G:FORT=0TO77:PU
T(108+R,0)-(149+R,ll) ,D,PSET:PLA
Y"ET+" : IFR=1THENR=0ELSER=1
48 NEXTT : PC0PY6TO1 : PM0DE4 , 1 : GET (
0,15) -(255,80) ,E:FORT=15T067STEP
2:PUT(0,T)-(255,T+65) ,E:PLAY"L10
0T50C" : NEXTT: PM0DE4 , 2 : FORT=20TO1
50STEP4:PUT(0,T)-(255,T+65) ,E
49 PLAY"L100T20C" : NEXT : PM0DE4 , 2 :
FORT=0TO4 : X=RND (128) +64 : Y=19 1-RN
D(32) :F0RR=3T0RND (20) +10: CIRCLE (
X,Y) ,R,1, .9:CIRCLE(X,Y) ,R-3,0, .9
:NEXTR:PLAY ,, L50T50O1CEDCC": NEXTT
50 FORT=0TO30:PMODE3,2:SCREEN1,1
: PLAY"03GEDC" : PM0DE4 , 2 : SCREEN1 , 1
:PLAY"GEDC II :NEXT
51 FORT=0TO16:INC=INC+((Y(T)-30)
*-.5) :NEXTT:CLS:PRINT@233,"BONUS
:":FORT=SCR TO SCR+INC:PRINT@24
0,T:PLAY"L15T8E" : NEXTT :SCR=SCR+I
NC
52 SCREEN1,0:PCLS1:DRAW"C0BM8J3,4
0":I$= H SCORE":GOSUB79:DRAW ,, BM128
,40":I$=STR$(SCR) :G0SUB8J3:DRAW"B
M40, 60" : I$="ADVANCE@TO@NEXT@LEVE
L":GOSUB79
53 DRAW"BM36,80":I$="PRESS@FIRE@
TO@CONTINUE" : GOSUB79 : PLAY"L200T1
00"
54 C=RND ( 12 ) : FORT=2 1T01STEP-1 : PL
AY"V"+STR$ (T) +" ; "+STR$ (C) : P=PEEK
(65280) :IFP=12 60RP=254THEN55ELSE
NEXTT:GOT054
55 PCLS : PLAY"V28" : LEV=LEV+1 : IFLE
V>9THENLEV=9
56 GOT019
57 T=RND(16) : IFY (T) >28THENRETURN
58 PMODE4,l:GET((T*8)+60,Y(T))-(
(T*8)+67,Y(T)+4) ,E:PMODE4, 2 :PUT(
(T*8)+60,Y(T))-((T*8)+67,Y(T)+4)
, E : Y (T) =Y (T) +4 : GET (0 , 20 ) - ( 60 , 40)
,E:RETURN
59 PMODE4,2:PLAY"L10T8BGEDCAFDCG
EDCDCC" : FORT=0TO3 : Q=X+RND ( 40 ) -10
: W=Y+RND ( 20 ) -5 : FORR=3TORND ( 10 ) +5
:CIRCLE(Q,W) ,R,1:CIRCLE(Q,W) ,R-3
PAYROL/BAS
TM
By Bernie Litton
A dynamic lool lor businesses and accountants. PAYROL/BAS™ cuts checks and
keeps records (or companies up to 100 employees. All you need is a computer
with 64K Extended Basic, one disk drive and a printer, and PAYROL/BAS™ lets
you:
• Enter employee data (name, address, SS#, PICA, taxes, deductions, profit
sharing, insurance).
• Cut checks. (The program works with both pin-teed and triclion-leed printers,
and we can even supply the checks it you need them.)
• Automatically calculates and stores seven deductions, including federal, FICA,
state, three ot your choosing (such as city, profit sharing or insurance) and one
miscellaneous.
• Will calculate tax and print to screen for approval before printing check.
• Keep ledgers (including monthly listings ol all checks, gross income. FICA,
taxes, prolil sharing, insurance).
• Error correcting routine lets you change data if you have made a mistake.
• Handles weekly, bi-weekly, semi-monthly and monthly pay periods.
• Calculates state tax automatically.
• Each state has custom code included.
• We have New York City witholding. $29.95/extra.
Only $79.95 ($2 shpg)
WITH PAYROL/BAS™ YOU'LL ALSO WANT. . .
941 Program: Gives individual summaries and totals of check information to
prepare 941 and state unemployment forms. S29.9S (S2 shpg)
W-2 Program: To cut year-end W-2-s. $29.95 ($2 shpg)
1-800-443-1444
I VIP WRITER: Powerful word processing program has
all standard word-processing features PLUS
automatic juslilication. pagination, centering options,
as well as Error Detection and Undo Mistake features.
A "llawless" program, according to Raintxm. $68.88
(includes VIP Speller) (S2 shpg)
VIP CALC: Create business spread sheets, get up to 33K of work space in 64K.
Calculation functions include trigonometry and sorting. $68.88 (S2 shpg)
VIP OATABASE: Stores data and files ot all kinds and allows you to combine VIP
Writer files as well. Do mailing lists, inventories, menus and recipes, and more!
$58.88 IS? shpg)
VIP LIBRARY: Includes all ol the above plus terminal & Disk-ZAP in
one intergrated package $125 ($2 shpg)
OTHER PROGRAMS FROM HOWARD
SAP II STOCK ANALYSIS PROGRAM: Stores and tracks your stock portfolio's
performance A Howard exclusive. $19.95 (S2 shpg)
EPSON PRINTER TUTORIAL: Menu driven program that leaches you how to use
the different commands to unleash the lull potential ol your Epson pnnter. $24.95
(52 shpg)
Illinois residents add B°/o tax. American Express, MasterCard, VISA accepted.
SEND TO: Howard Medical Computers
Box 2, Chicago IL 60690 312/278-1440
Name
Address
City. State. Zip
Please send (desc. & qty.— III. res. add 8% sales tax):
mZ.
include card ff
exp. date
DEALER INQUIRIES INVITED RB i284a
August 1985 THE RAINBOW 33
New Dual Mode EPSON
The new Epson LX-80 ofters printing flexibility in
two modes: one mode allows you to print in a quick
(100 cps) dot-matrix style for programming and
graphics, and the Near Letter Quality mode (16
cps) produces precise (240 dots per inch),
beautiful type for correspondence, reports, and
similar purposes. The LX-80 offers 160 different
type-style combinations, including Pica, Elite,
Enlarged, Emphasized, Condensed, Subscripts
and Superscripts, and type-styles can be selected
quickly from the top control panel or from program
control. Comes standard in friction feed; tractor op-
tion is also available.
LX-P package includes LX-80 with a serial inter-
face with 2K buffer, a Color Computer to Epson
cable, and Printer Tutorial that teaches you how
to program the different type styles (S29.95 value).
LX-P: LX-80 package $317 ($7 shpg)
ET-1 tractor option for LX-80. $29.50.
SF-1 Single-sheet feeder for the LX-80. $145 ($7
shpg)
*EPSON RX-80F/T+
RX-P package includes Epson RX-80F/T+ printer,
Epson serial interface, a serial Color Computer to
Epson cable, and free Printer Tutorial. $317 ($7 shpg)
MONITORS
123 Zenith 12" Green Screen, 640 dotsx200 dots
resolution, 15 MHz band width. $114 ($7 shpg)
122 Zenith 12" Amber Screen, 640 dotsx200 dots
resolution, 15 MHz band width. $134 ($7 shpg)
» 131 -Zenith 13" Color Monitor with speaker, com-
posite & RGB jack, 240 dots x 200 dots resolution,
2 5 MHz band width. S384 $149 [$14 Shpa)
FMc
NEW: 141 Roland 13" Color Monitor with speaker,
270 dotsx200 dots resolution, 4 MHz band width
$247 ($12 shpg)
All monitors require video controller.
Reverse video free with monitor order.
MEMORY
64K Upgrades— 1 Year Warranty
64-E1 for E Boards with complete instructions. Re-
move old chips and replace with preassembled
package— no soldering or trace cuts. $52.45 ($2
shpg)
64-F1 tor F Boards. No soldering needed. Capacitor
leads must be cut. $48.45 ($2 shpg)
64-2 for COCO 2. Kit requires one solder point, no
trace cuts. $48.45 ($2 shpg)
SURGE SUPPRESSOR
SS-1 protects your data and equipment against power
surges and transients. $16.25 ($2 shpg)
CONTROLLERS
New Controller from J&M: Has switch that allows
either JDOS or RS DOS to be the disk operating
system; eliminates software compatibility problems,
while preserving the advantages of J&M's gold con-
tacts and data separator. Also added to the DC-2 is
a parallel port, which means a serial interface is no
longer needed to make a parallel printer (like the
Epson) work.
DC-2 Disk Controller with JDOS. $138 ($2 shpg)
RS-1: RS DOS ROM Chip. $20.00 ($2 shpg)
DC-1 Disk Controller reads and writes to 35 and 40
track single and double-sided drives for all models
of the Color Computer w/ JDOS. $128 ($2 shpg)
VC-1 Video Interface mounts inside Color Computer
by piggy-backing IC on top of interface— no solder-
ing, no trace cuts. All models give composite video
& sound. $24.45 ($2 shpg)
VC-2 for COCO 2— mono only. $26.45 ($2 shpg)
VC-3 for COCO 2— both color or monochrome
$39.45 ($2 shpg)
VC-4 for new Color Computer (no sockets, chips are
soldered to mother board). Attaches with spring-
loaded clips. Color or mono. S39.45 ($2 shpg)
EPSON AND J&M
The EJ-P Package
The Epson LX-80 Printer learned with our new
J&M DC-2 Controller gives you top printing
capabilities plus built-in switch gives JDOS or
Radio Shack DOS so all software can run on your
Color Computer. Package includes: Epson LX-80
Printer with ET-1 tractor; DC-2 controller;
parallel Color Computer to J&M cable;
Epson Printer Tutorial ($29.95 value).
Complete EJ-P package $425.00 ($7 shpg)
DRIVE O PACKAGE
359,424 byte package includes half-height, double-
sided double-density TEAC drive with slim-line case
and heavy-duty power supply, DC-2 J&M Controller,
and a gold-plated connecting cable. Accesses both
35 and 40 track disks.
D0-P package $354 ($7 shpg)
HOWARD QUALITY STANDS
New TS-1X Mon-
itor Stand: De-
signer-beautiful
stand with clear
corner posts,
easy side access
to ROM port, re-
set and on/ofl
buttons. $39.50
($3 shpg)
TS-1: Standard 13" monitor stand for the original Color
Computer. Specify black, ivory or clear. 15" x11" x4".
$29.50 ($3 shpg)
TS-2: Same as above for the COCO 2. $29.50 ($3
shpg)
PS-1X Printer Stand features new noise-suppressing
foam top and cork base. 15" x11" x2'/2". $24.95 ($3
shpg)
GUARANTEE
Howard Medical's 30-day guarantee is meant to
eliminate the uncertainty of dealing with a com-
pany through the mail. Once you receive our hard-
ware, try it out; test it for compatabillty. It you're
not happy with it tor any reason, return it in 30 days
and we'll give you your money back — no questions
asked.
1-800-443-1444
Howard Medical Computers
Telephone (312) 278-1440
1 1690 Elston. Chicago 60622 Computer Bulletin Board (312) 278-9513
Cat. No. Quantity Description Unit cost Cost
$ $
D Bill (circle one)
D Mv check Of
money order CreOil Card ff _
is enclosed
D Send COD E»pnaIion dale .
MC
VISA
AE
Name
Address
City. Stale, Zip.
Total Cost
Shipping
III. res add 8%
COD (add 1.90)
Total order
:?
■1
">«. .
*.
i i ■ I
1 1 1.
■ 1 1
■ ii
in
III I
■ ■ .
■ i ■ i
■ ■■ i
• l .
776 S. TeleqRAph
Pontiac Ml. 4809 J
Oiidais ANd lsfo
(71 7) 774 7700
SPEED RACE
by Steven Hirsch
The checkered flag drops as your pulse rises in this
lively new arcade game. The road twists to the horizon
on the 3-D panorama that sets the stage for the most
exciting race the CoCo has ever seen! Vie for time as
you speed through the curves at incredible speeds.
Step through the gears to stay ahead of the pack, but
step lively since some will stop at nothing to see the end
of the race, or the end of you! Four challenging raceways,
complete with obstacles and colorful 3-D scenery, put
your skills to the test in this Pole Position'" type game.
32K Color Computer Required.
$34.95
nomm
•»
©
You clutch the tank controls, searching for any sign of the
enemy. Suddenly a blip appears on radar! Frantically, you
move your tank into position. At last you spot the elusive
enemy tank! Facing it, you race to lock sights and fire before
he does!
Enter the ultimate battle-zone in this exciting 3-D tank
combat game. Strategy, speed, and your tank's cannon are
your only hope as you wind through a three-dimensiona
course inhabited by impenetrable barriers and enemy tanks.
Dazzling graphics and lifelike sound take you a step beyond
the ordinary in this fast, machine-language arcade game.
Enter the next dimension, ROMM EL's troops are waiting for
you!
By Kary McFadden
32K Color Computer Required.
$29.95
,0:NEXTR:PLAY"L20T20O1CEDC":NEXT
T
60 MEN=MEN- 1 : 1 FMEN< 1THEN 6 2
61 PMODE4,2:PCLS:GOT018
62 PCOPY6T01:PMODE4,l: GET (0,15)-
(255 , 80) , E : FORT=15T047STEP2 : PUT (
, T) - (255 , T+65 ) , E : PLAY"Llj30T5j3C"
: NEXTT : PMODE3 , 2 : COLOR2 : R= . 8 : X=0 :
FORT=60TO191: LINE (128-X,T)- (128+
X , T ) , PSET : X=X+R : NEXTT
63 PLAY"L20T20CDEFGABO+CDEFGO-CD
EFABO+CDEFGO-CDEFGABO+CDEFGABO-C
DEFGABO+CDEFGO-DEFGABO+CDEFGO-DE
FGABO+CDEFGO-DEFGABO+CDEFGO-DEFG
ABG+CDEFGO- EFGABO+CDEFGO-EFGABO+
CDEFGO-EFGABO+CDEFGO-EFGABO+CDEF
GO-
64 PLAY"FGABO+CDEFGO-FGABO+CDEFG
O-FGABO+CDEFGO-FGABO+CDEFGO-GABO
+CDEFGO-GABO+CDEFGO-GABO+CDEFGC—
GABO+CDEFGO-ABO+CDEFGO-ABO+CDEFG
O-ABO+CDEFGO-ABO+CDEFGO-BO+CDEFG
O-BO+CDEFGO-BO+CDEFGO-BO+CDEFG
65 PLAY"CDEFGCDEFGCDEFGCDEFGDEFG
DEFGDEFGDEFGEFGEFGEFGEFGFGFGFGFG
GGGG
66 PMODE4,2:I$="THE§ENEMY@HAS@SU
CCEEDED" : DRAW" BM3 2,4": GOSUB8 2:1$
="YOU@HAVE@FAILED":DRAW"BM64,50"
:GOSUB82
67 I$="YOU@WILL@RECEIVE@":DRAW"B
M48, 120" :GOSUB82 : I$=RIGHT$ (STR$ (
SCR) ,LEN(STR$(SCR))-1) : GOSUB80
68 I$="DOLLARS@FOR@YOUR§EFFORTS"
:DRAW"BM32,130":GOSUB82
69 I$="DO@YOU@WISH@TO@TRY@AGAIN"
: DRAWBM32 , 150" : GOSUB82 : I$="@@YE
S@@@@§@@NO@@":DRAW"BM64,170":GOS
UB82
70 T=SGN(JOYSTK(0)-31) :IFT=-1THE
NR=0ELSER=1
71 COLORR:LINE(132,168)-(196,178
) , PSET, B:COLORR+l: LINE (124, 168)-
(60,178) ,PSET,B
72 P=PEEK(6528j3) : IFP=12 60RP=254T
HEN73ELSE70
73 IFT=-1THENRUNELSECLS : PRINT"TH
IS IS THE END ":END
74 PMODE3,2:COLOR2:LINE(X+7,Y)-(
X+9 , TY) , PSET , B : PLAY"02BGDC" : LINE
( X+7 , Y ) - ( X+ 9 , TY ) , PRESET , B : RETURN
75 LINE(167, 182)-(193, 184) , PSET,
B
76 LINE(197, 182)-(223, 184) , PSET,
B
77 LINE(227, 182)-(253, 184) , PSET,
B : RETURN
78 DATA16,24,24,28,28,28,32,32,3
2,32
32,28,28,28,24,24,
16
79 FORT=lTOLEN(I$) :Q$=MID$ (1$ , T,
1) :R=ASC(Q$)-64:DRAWD$(R) :NEXTT:
RETURN
80 FORT=lTOLEN(I$) :Q=VAL(MID$(I$
,T,1) ) :DRAW N$(Q)+"BL7"+N$(Q)+"B
L" : NEXTT : RETURN
81 FORT=lTOLEN(I$) : Q$=MID$ (1$ , T,
1) :R=ASC(Q$)-64:DRAWD$(R)+»S4BL2
9BUS16"+D$ (R) +"S4BL29BUS16"+D$ (R
) + " S 4 BL3 BD2 S 1 6 " : NEXTT : RETURN
82 FORT=lTOLEN(I$) :Q$=MID$(I$,T,
1) :R=ASC(Q$)-64:DRAW"C0"+ER$+"C1
"+D$(R)+"BL7"+D$(R)+"BL": NEXTT :R
ETURN
83 DATA BR8,BRGD2NDR4NDU2HNL2BR5
,RNR3D4NLR3EHNLEBR3BU,BRR2NFL2GD
2FR2EBU3BR4
84 DATA RNR2D4NLR2EU2HBR5,NR4D2N
R3D2R4BR4BU4,NR4D2NR3D2BR8BU4,BR
1NR3GD2FR3ENL2BR3BU3 , D2ND2R4ND2U
2BR4
85 DATA BR2NLNRD4NLRBR5BU4,BR4D3
GL2NHBR7BU4 , D2ND2RNE2F2BR5BU4 , D4
R4BR4BU4,ND4F2E2ND4BR4
86 DATA ND4F4U4BR4,NR4D4R4U4BR4,
ND4R3FGNL1BR5BU2 , BRNR2GD2FR2ENFN
HU2BR4BU,"ND4R3FDGLM+2,+lBU4BR4"
87 DATA BR4L3GFR3FGL3BR7BU4,R2ND
4R2BR4 , D3FR2EU3BR4 , D2F2E2U2BR4 , D
4E2F2U4BR4
88 DATA F4H2G2E4BR4,DF2NDE2UBR4,
R4G4R4BU4BR4
89 DATA BRGD2FR2EU2HNLBR5,BR2NGD
4NLRBR5BU4 , BDER2FDL3GDR4BR4BU4
90 DATA BDER2FGFGL2NHBR7BU4,D2R4
ND2NU2R1BR3BU2,NR4D2R3FGL3BR8BU4
91 DATA BR4L3GD2FR3EHNL3BR4BU2,R
4G2D2BR6BU4 , BRNR2GFGFR2EHEBR4BU1
,BR3NFL2GFR3NUDGL2BR7BU4 ^
36
THE RAINBOW August 1985
Why do more CoCo owners
choose 'REAL TALKER'?
Sure it's priced right, but there's more...
bousands of 'Real Talker' owners know 'Real Talker' beats ALL
ther Coco voice synthesizers in ease of use and flexibility. And,
10 other Coco talker has a clearer, more intelligible voice,
hat's quite a lot of advantage when you consider Real Talker's
nbeatable price. Yet, Real Talker has some important features
lat you simply will not find in other Coco talkers:
SAY' command - You'll have your
omputer talking brilliantly in just
ninutes thanks to this powerful
lew command. Type SAY
ANYTHING YOU WANT" and
'our words are instantly spoken,
t's that simple. Think how easy
his makes creating speaking Basic
uograms. Adding speech to your
existing programs is a snap too.
CONVERT' - This is a truly power-
ul command for the basic pro-
;ramer. CONVERT automatically
ransforms a machine language
lependent speaking program into
i stand-alone Basic program. In
>ther words, you can effortlessly
vrite speaking Basic programs that
lo not require a machine language
ranslator in memory. Thi^ is a uni-
jue feature of 'Real Talker'. No
>ther voice synthesizer gives you
inything even remotely ap-
aroaching this type of capability -
;ven synthesizers costing con-
iiderably more.
'Real Talker' is compatible with any 16K, 32K, 64K Extended or
non-extended Color Computer. It works with any cassette or
disk system and comes complete and ready to talk through your
T.V. or monitor speaker. Price includes the 'Real Talker' elec-
tronic voice synthesizer in a ROM pack, software on cassette
(may be transferred to disk), and user manual.
NOW INCLUDED WITH
'REAL TALKER'.
1. 'DR. TALK-Tbis interactive "Eliza"
type psychoanalyst program will
discuss your innermost problems
at length.
2. TALKING BATTLESHIP'-W's you
vs. the computer in this speaking
version of the classic game.
3. TALKING BLACKJACK'- Play for
big stakes against a rather talkative
casino dealer.
ONLY
'Real Talker' is a full-featured electronic voice syn-
thesizer unit built into a compact cartridge case. You
simply plug it into the side of your computer.
$5995
Dther features include software controlled pitch, unlimited
/ocabulary text-to-speech, and even a program that will recite
iny ASCII file (such as from Telewriter-64 & other word pro-
ressors). You also get Colorware's unique full-screen phoneme
editor program that let's you experiment with and modify speech
at it's most fundimental level.
'REAL TALKER-1' (for the original Color Computer) $59.95
'REAL TALKER-2' (for the Color Computer-2) $64.95
■Y ■ BRANCHING CABLE' For disk systems. If you have a disk
system but do not have a Radio Shack Multi-Slot unit, this
economical cable will allow to connect and use your
Real Talker and Disk system together 27.95
FALK
f you have a 'Real Talker', do not deprive yourself
)f this absolutely incredible machine-language
"alking Head simulation program. While other
alking head simulations use a minimal cartoon-
ike face, TALKHEAD uses high resolution, full-
screen, digitized images of an actual person's face
o create a life-like animated effect.
SOFTWARE FOR THE 'REAL TALKER'
TALKHEAD can be easily commanded in Basic to
appear on screen and say anything you want.
Available on cassette or disk for only $19.95,
TALKHEAD requires 64K and a Colorware 'Real
Talker'.
ONLY*19.95
ACTUAL UNRITOUCHED PHOTO
COLORWARE INC.
YV)f f\B\AiABE? 78-03F Jamaica Ave.
.WWfcWfl WAtflE Woodhaven, NY 11421
(718) 647-2864
VISA
'
c©
• • • ORDERING INFORMATION • * •
ADD $3.00 PER ORDER FOR SHIPPING AND HANDLING.
CO.O.'S ADD 53.00 EXTRA.
SHIPPING AND HANDLING FOR CANADA IS $5.00
WE ACCEPT VISA, MASTER CARD, M.O.'S, CHECKS.
N.Y. RESIDENTS MUST ADD SALES TAX.
This is one of those rare
programs that will captivate
everyone in your family....
No one can see CoCo Max
and not want to try it!
We are all witnessing an exciting revolu-
tion in microcomputers: a radically new
kind of computer and software that
opens a whole new world of creative
power to computer users.
It was inevitable that this exciting ap-
proach would be brought to the CoCo.
With this in mind, Colorware chose to
go all out and maximize this new con-
cept for the color computer. That meant
designing not just software but hardware
too. It meant thousands of hours of pure
machine language programming. Rarely
has this much effort been applied to one
product for the Color Computer.
UNMATCHED CAPABILITY...
Because we took the maximum approach:
highly optimized machine code combin-
ed with hardware, CoCo Max truly
stands above the rest as the ultimate
creative tool for the Color Computer. It's
unrivaled performance lets you create
with more brilliance and more speed
than any similar system - much more
than you ever imagined possible. And,
you can do it in black & white or color.
File Edit Goodies Font Slyle
|QBB> — Mrmntn/= —
?
A
ffl ■£:-: .:::. :■::■:
■■■■ ■■ ■■ ■■
■■ ■■■■■■■ ■■
■■ ■■ ■■ ■■
■■■■ ■■■ ■■■ *■»■
■■■■■■ ■■■■ ■■■■■■ ■■
■■ ■■ ■■ ■ aa ■ aa
■■ ■■ aa
■•■■■ ■■
± S. p. ± a.
aaaaaa ■■■■ ■■■■ aa
£
o
•
b
■J
19
JJ
i — i mi UHgagsxifip: 1
All the sophisticated power of the bigger
systems is there: Icons, Pull-Down Menus,
full Graphic Editing, Font Styles, and all
kinds of handy tools and shortcuts.
Plug your joystick, mouse or touch pad
into CoCo Max's Hi-Res Input Unit. Then
use a delightfully simple Point-and-Click
method to get any of CoCo Max's power-
ful graphic tools. It has them all:
You can Brush, Spray or Fill with any Col-
or, Shading or Pattern. Use Rubber Band
Lines and Shapes (square, rectangle, cir-
cle, elipse, etc.) fo create perfect illustra-
tions with speed and ease. There's a Pen-
cil, an Eraser and even a selection of
Caligraphy Brushes. And, as you can see,
CoCo Max can do a lot with text.
All of the newest special effects are
there: Trace Edges, Flip, Invert, Brush Mir-
rors, etc. And all of the very latest super-
capabilities like: Undo, which
automatically reverses your mistakes, and
Fat Bits which zooms you way in on any
part of your subject to allow dot-for-dot
precision.
THE BIG PICTURE
The large image box in the middle of the
CoCo Max screen is actually only a win-
dow on an even larger image. Use the
Point-and Click "Hand" to effortlessly
move your window over any portion of
the larger image. You have a working
area of up to 3-'/2 times the area of the
window itself.
FLEXIBLE PRINTING...
CoCo Max gives you many ways to print.
Fill a whole page with your image or
condense two full CoCo screens to less
than 'A page for a finely detailed copy.
"Dump" your CoCo Max screen full size
or shrink it to '/e page size.
FREEDOM TO CREATE...
Anyone who wanls to create anything at
all on their CoCo screen or printer will
certainly be very glad to meet CoCo
Max. CoCo Max's friendly yet
sophisticated graphic and text
capabilities let you almost instantly pro-
duce illustrations, diagrams, charts,
File Edit Goodies Font style >
You may then use CoCo Max's graphic
magic on it. The DS-69 is available as an
option from Colorware from S149.95
complete with its own software on disk
or tape. Using the DS-69 with a disk re-
quires an RS multi-pak adaptor.
graphs, and computer art - tor serious
use or just for creative fun.
tion by using software schemes such as
sliding windows. Although clever, these
schemes yield sluggish and awkward
results. Only CoCo Max does it the right
way. The CoCo Max Hi-Res Input Unit
plugs into your ROM slot and adds an
entirely new joystick input to your com-
puter - a precision one with a 49,152
point resolution to match the CoCo
screen exactly.
Plug your same joystick, mouse or touch
COCO MAX REQUIREMENTS
The CoCo Max System includes the Hi-
Res Input Unit, software on disk or
cassette (please specify) and user manual.
It will work on anv 64K Extended or non-
AN ABSOLUTE GUARANTEE
CoCo Max ii a hardware software system
lhat.no software-only system can
match. Get CoCo Max and see vour
CoCo perform as it never could before.
If you don't agree that CoCo Max is the
ultimate creative tool for the Color Com-
puter, simply return it within 20 davs for
a full, courteous refund from Colorware.
THE HARDWARE...
This is the key to CoCo Max's unmatch-
ed performance. Did you know the nor-
mal joystick input built into the Color
Computer only allows access to 4,096 I64
x 64) points on theCoCo screen? Yet, the
Color Computer's high resolution screen
pad into this new input and you have a
whole new kind of control. The dif-
ference is remarkable.
A DIGITIZER OPTION...
We studied all the video digitizers
available and picked the best of them to
link with CoCo Max. The DS-69 from
Micro Works was our choice. This op-
tional device lets you capture the image
from any video source (video recorder,
camera, etc.) on your Color Computer.
extended Color Computer. You'll need a
Radio Shack or equivalent joystick,
mouse or touch pad. Disk systems re-
quire a Multi-Slot Interface or Y-
Branching Cable.
THE COMPLETE COCO MAX SYSTEM,
with software on DISK $69.95
with software on CASSETTE (Available
Mar '85) $69.95
Y-BRANCHING CABLE-W you have a disk
system but do not have a Multi-Slot In-
terface, use this economical 40-pin, 1
male, 2 female cable to connect the
CoCo Max Hi-Res input unit and your
disk controller to your CoCo $27.95
Sorry, COCO MAX is not compatible with JDOS
[COLORWARE
has 49,152 (256 x 192) pixels. This means
that a joystick, mouse or even a touch
pad can, at best, only access about one
tenth of the pixels on the CoCo screen.
Most graphic programs ignore this hard-
ware limitation of the Color Computer
and give you only low-res control.
Others attempt to overcome the limila-
Colorware Inc.
78-03 F Jamaica Ave.
Woodhaven, NY 11421
(718) 647-2864
VISA
ORDERING INFORMATION
■\DD $3.00 PER ORDER FOR SHIPPING AND HANDUNC.
C.O.D.S ADD $1,011 C\TRA.
SHIPPING AND HANDIING FOR CANADA IS $5.00
WE ACCEPT VISA. MASTER CARD. M.O.'S, CHECKS.
N.Y. RESIDENTS MUST ADD SALES TAX.
GRAPHICS
RA INBOW
7^-^U —
ECB ! |l RAINBOW
Random Mosaics
By Bob and Daniel Delbourgo
andom Mosaics is a very simple
program which works entirely
in the low resolution graphics
mode. It was inspired by the
mosaics one often sees on
floors and murals.
The computer draws the
mosaics at random with various
colors and patterns. Nine dif-
ferent types of mosaics (in
addition to the title card mo-
saic) have been devised and
come in increments of just
under 10 lines each.
Line 9 makes the random selection and subroutine 100
ensures that colors are distinct to bring out the best in
the profiles. If you do not like the patterns you can easily
add a few more mosaics of your own by altering Line
9 appropriately.
Notice the high-speed poke in Line 1 and delete it if
your computer cannot handle it. Type in the program,
RUN it and enjoy the ever changing scenery.
(For questions regarding this program, the Delbourgos
can be contacted at 15 Willowdene Avenue, Sandy Bay,
Hobart, Tasmania, Australia 7005)
(Daniel Delbourgo is the 13-year-old son of Bob Delbourgo
who is an A ustralian physicist. They have fun collaborating on
creating special graphics effects.)
40
THE RAINBOW August 1985
PRICKLY- PEAR SOFTWARE
QUALITY PROGRAMS FOR YOUR COCO & TDP-100
PROGRAMS REQUIRE 16K EXTENDED BASIC FOR TAPE, AND 32K DISK UNLESS OTHERWISE NOTED.
TO PRESERVE QUANDIC - Hint sheet
If you have not been able to PRESERVE QUANDIC you
will be happy to hear that our hint sheets are now available.
It is fully coded to give you only the information you wish to
decode. $3.95
UZPAC - STATISTICS
Absolutely the most complete statistics package we have
seen for ANY computer anywhere. Lizpac is 850,000
Bytes of programming filling 7 disks with an eighth disk
containing data files to be used in the examples. The 200
page manual completely explains all that Lizpac has to
offer. Write for more information. Req. 32K disk only.
$195.00 ^
JHRbt
FLIGHT SIMULATORS
Flight — This graphics flight simulator gives you four
levels of difficulty from student level to instrument only
landing. The high resolution graphics screen shows your
instruments and two representations of your plane in
relation to the flight path. When you bring your plane in the
synthesized voice from the tower says "perfect landing!".
This program was written by a professional pilot and it
shows! Req. 32K and a joystick. Tape — $24.95; Disk —
$29.95
JUMBO JET
Take off from one airport, fly to another, and land safely,
using full instruments and a thru the window view. It takes
two joysticks to fly the mighty 747C Jumbo Jet. To com-
plete this graphics simulation successfully, you must not
only make a satisfactory take-off and landing, but turn the
plane 1 80 degrees, land on a diagonal airstrip, and do all of
this without running out of fuel, crashing or subjecting the
plance to excessive amounts of stress damage. Req. 32K
EB. Tape — $24.95; Disk — $29.95
MICROARTIST
Finally!!! a graphics program so easy to use anyone can
create beautiful detailed pictures. Save your pictures to
tape or disk and incorporate your artwork in your own
programs or print it out on your printer. The ease menu
selection provides 1 6 modes of operation including zoom,
get/put, paint, text, erase and much more. Take advantage
of all the COLOR your color computer has to offer. Order
MICROARTIST now! Req. 32K EB and a mouse or joy-
stick. Tape — $24.95; Disk — $29.95
+3Sf» :
SUPER ASTROLOGY
This program calculates complete natal horoscopes to an
accuracy of approximately one minute of arc. All you need
to know is the time and place of birth. Req. 32K. Tape —
$24.95; Disk - $29.95
§ QUEUES
IS SEA
SCEPTER OF URSEA
Explore the kingdom of Ursea in search of the elusive
sceptor. The country-side is represented by an elaborate
graphics screen which harbors friend and for alike. Or
enter the dark dungeons, where unknown dangers and
wealth await you. Roll up your character and set out on a
great adventure. Req. 32K EB. Disk only — $29.95
CITY WAR
Strategy and politics are the key to winning CITY WAR.
The object is to eliminate the leader of the opposing
country. There are 1 4 commands accessed by a single key
stroke. With your secret access code you are the only one
that can command your army of missiles. You can even
request a cease fire from your opponent. The "save the
game" feature makes it easy to resume negotiations. Tape
— $24.95; Disk — $29.95
1-800-223-5369 Extension 256
Send for our free Catalog of great Programs for your CoCo
POLICY ON PROTECTION
We believe our customers are honest — all of
our software can be backed up using standard
backup procedures.
Your Personal check is welcome - no delay. Include
$1.50 shipping for each program ordered. (Shipping
free on $50.00 or larger orders). AZ residents add 5%
sales tax. Orders shipped within two days.
Dealer and author inquiries are always wel-
come. Canadian dealers should contact Kelly
Software Distributors, Ltd., P.O. Box 11932,
Edmonton, Alberta T5J-3L1 (403) 421-8003
Stocked by Quality Dealers, or
Send Order To PRICKLY-PEAR SOFTWARE
2640 N. Conestoga Ave.
Tucson, Arizona 85749
(602) 749-2864
#^
The listing: MOSAIC
12 ....
....67
31 ....
...159
38 ....
....99
50 ....
....99
64 ....
...166
75 ....
...183
83 ....
...174
92 ....
...100
END
80
1 CLS0:POKE65495,0:S$="L40O3CO2B
AGFEDC":PRINT§448, "RANDOM MOSAIC
S BY D&R DELBOURGO"; : PRINT@480 , "
hobart, tasmania, austral ia700 5"
; : F0RV=1T05 : GOSUB100
2 Z=R:FORY=0TO384STEP128:FORX=1T
02 5STEP6 : GOSUB6 : NEXTX , Y
3 Z=S:FORY=0TO2 56STEP12 8:FORX=3 3
T057STEP6 : GOSUB7 : NEXTX, Y
4 Z=T : FORY=0TO2 56STEP12 8 : FORX=69
T09 3STEP6 : GOSUB8 : NEXTX , Y
5 PLAY " PI ":NEXTV: PLAYS $ : GOT09
6 O=102 4+Y+X:FORW=0TO3:POKEO+W,Z
:POKEO+34+W,Z:NEXTW:PLAY"L25502C
" : RETURN
7 O=1024+Y+X:FORW=0TO1:POKEO+W,Z
: POKEO+3 2+W, Z : POKEO+3 4+W, Z : POKEO
+64+W / Z:NEXTW:PLAY"L25502E":RETU
RN
8 O=1024+Y+X:FORW=0TO1:POKEO+W,Z
: POKEO+30+W, Z : POKEO+32+W, Z : POKEO
+64+W,Z:NEXTW:PLAY"L25502G":RETU
RN
9 A=RND(9):ONA GOTO 10, 20, 30, 40, 5
0,60,70,80,90
10 CLS0:FORV=1TO5:GOSUB100
11 Z=R:FORY=65T0449STEP128:FORX=
0TO24STEP8 : GOSUB16 : NEXTX, Y
12 Z=S:FORY=37T0421STEP128:FORX=
0TO16STEP8 : GOSUB17 : NEXTX , Y
13 Z=T:FORY=129T0385STEP128:FORX
=0TO24STEP8 : GOSUB16 : NEXTX, Y
14 Z=U:FORY=101TO357STEP128:FORX
=0TO16STEP8 : GOSUB17 : NEXTX, Y
15 PLAY "PI" :NEXTV: PLAYS $ : GOT09
16 O=1024+Y+X: POKEO, Z: POKEO+1, Z:
POKEO+3 , Z : POKEO+4 , Z : POKEO-3 1 , Z : P
OKEO-3J3 , Z : POKEO-29 , Z : POKEO-62 , Z :
PLAY"02L255C" : RETURN
17 O=1024+Y+X: POKEO, Z: POKEO+1, Z:
POKEO+3 , Z : POKEO+4 , Z : POKEO+3 3 , Z : P
OKEO+3 4 , Z : POKEO+3 5 , Z : POKEO+6 6 , Z :
PLAY " 02 L2 5 5G ": RETURN
20 CLS0:FORV=1TO5:GOSUB100
21 Z=R:FORY=0TO194STEP194:FORX=3
3T057STEP6 : GOSUB2 6 : NEXTX , Y
22 Z=S:FORY=0TO188STEP188:FORX=3
6TO60STEP6 : GOSUB2 6 : NEXTX , Y
23 Z=T:FORY=0TO194STEP194:FORX=1
30TO154STEP6:GOSUB26: NEXTX, Y
24 Z=U:FORY=0TO188STEP188:FORX=1
3 3T0157STEP6:GOSUB26:NEXTX,Y
25 PLAY " PI ":NEXTV: PLAYS $:GOT09
26 O=1024+Y+X: POKEO, Z:POKEO+32,Z
: POKEO+64 , Z : POKEO+65 , Z : POKEO+66 ,
Z : POKEO+9 6 , Z : POKEO+9 8 , Z : POKEO+12
8 , Z : POKEO+130 , Z : PLAY"L25502C" : RE
TURN
30 CLS0:FORV=1TO5:GOSUB100
31 Z=R:FORX=33TO47STEP14:G0SUB3 6
: NEXTX : FORX=13 6TO150STEP14 : GOSUB
37 : NEXTX : FORX=2 2 5T02 3 9STEP14 : GOS
UB3 6 : NEXTX : FORX=3 2 8T03 4 2STEP14 : G
OSUB37: NEXTX :FORX=417T0431STEP14
:GOSUB3 6:NEXTX
32 Z=S:FORX=40TO54STEP14:GOSUB3 6
: NEXTX :FORX=129T0143STEP14: GOSUB
37: NEXTX :FORX=23 2T024 6STEP14: GOS
UB3 6 : NEXTX : FORX=3 2 1T03 3 5STEP14 : G
OSUB37:NEXTX:FORX=424T0438STEP14
:GOSUB3 6:NEXTX
3 3 Z=T:FORX=69TO90STEP7:GOSUB3 9:
NEXTX: FORX=162T0183STEP7:GOSUB38
: NEXTX :FORX=2 61T02 82STEP7:GOSUB3
9 : NEXTX: FORX=3 54T0375STEP7: GOSUB
3 8 : NEXTX
34 PLAY"P1":NEXTV:PLAYS$:G0T09
36 O=1024+X:POKEO,Z:POKEO+1,Z:PO
KEO+3 , Z : POKEO+4 , Z : POKEO+5 , Z : POKE
0+6 , Z : POKEO+3 2 , Z : POKEO+3 5 , Z : POKE
0+3 8 , Z : POKEO+64 , Z : POKEO+65 , Z : POK
EO+66 , Z : POKEO+67 , Z : POKEO+69 , Z : PO
KEO+70 , Z : PLAY"02L255C" : RETURN
37 0=102 4+X: POKEO, Z : POKEO+1, Z : PO
KEO+2 , Z : POKEO+3 , Z : POKEO+5 , Z : POKE
0+6 , Z : POKEO+3 2 , Z : POKEO+3 5 , Z : POKE
0+38 , Z : POKEO+64 , Z : POKEO+65 , Z : POK
EO+67 , Z : POKEO+68 , Z : POKEO+69 , Z : PO
KEO+70 , Z : PLAY"02L255E" : RETURN
38 0=lp24+X: POKEO, Z: POKEO+1, Z:PO
KEO+3 3 , Z : POKEO+65 , Z : POKEO+96 , Z : P
OKEO+97 , Z : PLAY"02L255G" : RETURN
39 0=102 4+X: POKEO, Z: POKEO+1, Z : PO
KEO+3 2 , Z : POKEO+64 , Z : POKEO+96 , Z : P
OKEO+97 , Z : PLAY"03L255C" : RETURN
40 CLS0:FORV=1TO5:GOSUB100
41 Z=R:FORY=0TO256STEP256:FORX=1
T02 1STEP10 : GOSUB4 6 : NEXTX , Y : FORY=
128TO3 84STEP256:FORX=6TO2 6STEP10
:GOSUB4 6:NEXTX,Y
42 Z=S:FORY=0TO256STEP256:FORX=6
T02 6STEP10 : GOSUB4 6 : NEXTX , Y : FORY=
128TO384STEP256:FORX=1TO21STEP10
:GOSUB4 6:NEXTX,Y
43 Z=T:FORY=0TO256STEP2 56:FORX=3
T028STEP5 : GOSUB47 : NEXTX, Y
42
THE RAINBOW August 1985
44 Z=U:FORY=128T0384STEP256:FORX
=3T028STEP5 : G0SUB47 : NEXTX, Y
45 PLAY"P1":NEXTV: PLAYS $:G0T09
46 0=lj324+Y+X:POKEO,Z:POKEO+l,Z:
POKEO+3 , Z : POKEO+4 , Z : POKEO+3 2 , Z : P
OKEO+3 6 , Z :POKEO+64 , Z : POKEO+68 , Z :
POKEO+96 , Z : POKEO+97 , Z : POKEO+99 , Z
: POKEO+100 , Z : PLAY"L25502C" : RETUR
N
47 0=lp24+Y+X : POKEO , Z : POKEO+3 1 , Z
:POKEO+33 , Z : POKEO+63 , Z : POKEO+65 ,
Z : POKEO+9 6 , Z : POKEO+3 2 , Z-3 : POKEO+
64 , Z-12 : PLAY M L25502G" : RETURN
50 CLS/8:FORV=lT05:GOSUBlj3j8
51 Z=R:FORY=^T0384STEP192:FORX=2
T016STEP14 : G0SUB56 : NEXTX , Y : FORY=
96T0288STEP192 : FORX=9T023STEP14 :
G0SUB56: NEXTX, Y
52 Z=S:FORY=j3T03 84STEP192:FORX=9
T02 3STEP14 : GOSUB56 : NEXTX , Y : FORY=
96T0288STEP192 : FORX=2T023STEP14 :
G0SUB56: NEXTX, Y
53 Z=T:F0RY=J3T0384STEP96:F0RX=35
T056STEP7 : GOSUB57 : NEXTX, Y
54 PLAY"P1" :NEXTV:PLAYS$:GOT09
56 0=1^24+X+Y: POKEO, Z:POKEO+l,Z:
POKEO+2 , Z : POKEO+4 , Z : POKEO+5 , Z : PO
KEO+6 , Z : POKEO+32 , Z : POKEO+34 , Z : PO
KEO+3 5 , Z : POKEO+3 6 , Z : POKEO+3 8 , Z : P
OKEO+64 , Z : POKEO+7J3, Z : PLAY"L25502
C": RETURN
57 0=102 4+X+Y : POKEO , Z : POKEO+4 , Z :
POKEO+32 , Z : POKEO+3 3 , Z : POKEO+34 , Z
: POKEO+3 5 , Z : POKEO+3 6 , Z : POKEO+66 ,
Z : PLAY"L25502G" : RETURN
60 CLS0 : F0RV=1T05 : GOSUBlp^l
61 Z=R:FORY=j3T0384STEP128:FORX=j3
T024STEP8 : GOSUB66 : NEXTX, Y
62 Z=S:FORY=j3T0384STEP128:FORX=3
3T061STEP4 : POKE10 2 4+X+Y, Z : NEXTX,
Y:FORY=0TO256STEP128:FORX=71TO87
STEP8 : GOSUB67 : NEXTX , Y
63 Z=T:FORY=j3T0384STEP128:FORX=3
9T055STEP8 : POKE102 4+Y+X, Z : NEXTX,
Y:FORY=pT0256STEP128:FORX=67T091
STEP8 : GOSUB68 : NEXTX , Y
64 PLAY "PI" :NEXTV: PLAYS $:G0T09
66 0= lj3 2 4+X+Y: POKEO, Z:P0KE0+1,Z:
POKEO+2 , Z : POKEO+4 , Z : POKEO+5 , Z : PO
KEO+6 , Z : POKEO+32 , Z : POKEO+34 , Z : PO
KEO+3 5 , Z : POKEO+3 6 , Z : POKEO+3 8 , Z : P
OKEO+64 , Z : POKEO+65 , Z : POKEO+66 , Z :
POKEO+68 , Z : POKEO+69 , Z : POKEO+70 , Z
:PLAY"02L255C": RETURN
67 0=lj324+Y+X: POKEO, Z: POKEO+3 1,Z
: POKEO+32 , Z : POKEO+33 , Z : POKEO+64 ,
THE BEST JUST GOT BETTER
•* (With New Low Prices)
THE BEST HARDWARE
WORD-PAK II
80 column video cartridge
switch and smooth scroll.
CC BUS
6 slot software selectable
PC PAK (P)
Fully buffered Centronics
parallel port cartridge.
PC PAK (R)
Battery backed real time c
PC PAK (C)
Parallel port and real time
cartridge.
2SP-PAK
Dual RS232 cartridge.
$134.95
with soft video
$129.95
expansion bus.
$ 49.95
compatible
$ 59.95
lock cartridge.
$ 99.95
clock in one
$ 79.95
and THE BEST SUPPORT, all from
THE BEST SOFTWARE
Support Drivers $ 17.95
Patches and drivers for OS-9 or Flex for Word-Pak, P-C Pak and 2SP-Pak.
Cbreeze $ 29.95
Full screen editor for OS-9 Word-Pak with "windows" capability.
(OS-9) 'Stylo 111 word processor
(OS-9) "Stylo Pak (includes stylo, mailmerge and spell checker)
(OS-9) *X-Word wordprocessor
(OS-9) *X-Merge mail merge for X-Word
(OS-9) *X-Term terminal package
(BAS) * El iteWord wordprocessor
(BAS) "EliteCalc spreadsheet
(BAS) *Deft Pascal software development system
(BAS) *DataPak II terminal package
•COMBO PRICE*
Take 15% off the list price of any of these software packages when
ordered with the Word-Pak II.
$ 99.95
$199.95
$ 79.95
29.95
59.95
79.95
79.95
89.95
44.95
ML
inc.
"Innovative Products for the CoCo User"
Call or write today for our FREE Catalog
P.O. Box 813 • North Bergen, N.J. 07047 • 201-330-1898
OS-9 is a trademark of Microware.
August 1985 THE RAINBOW 43
Z:PLAY"L2 5502E": RETURN
68 0=102 4 +Y+X: POKEO, Z : POKEO+30 , Z
: P0KE0+3 1 , Z : POKEO+32 , Z : POKEO+3 3 ,
Z : POKEO+34 , Z : POKEO+64 , Z : PLAY"L25
5026": RETURN
70 CLS0 : F0RV=1T05 : GOSUB100
71 Z=R:FORX=3 3TO57STEP6:FORY=0TO
224STEP224:GOSUB76:PLAY"L25503C"
:NEXTY,X
72 Z=S:FORX=130TO154STEP6:FORY=0
T0224STEP224 : GOSUB77 : PLAY"L25503
E":NEXTY,X
73 Z=T:FORX=102TO126STEP6:FORY=0
T0224STEP224:GOSUB78:PLAY"L25503
G":NEXTY,X
74 Z=U:FORX=167TO191STEP6:FORY=0
T0224STEP224:GOSUB79:PLAY"L25504
C": NEXTY, X
75 PLAY "PI" :NEXTV: PLAYS $:G0T09
76 O=1024+X+Y:FORP=0TO4:POKEO+P,
Z : NEXTP : POKEO-3 2 , Z : POKEO+3 2 , Z : PO
KEO-30 , Z : POKEO+3 4 , Z : POKEO-2 8 , Z : P
OKEO+36,Z:RETURN
77 O=1024+X+Y:FORP=0TO4:POKEO+P,
Z : POKEO+P+64 , Z : POKEO-32+32*P, Z :N
EXTP: POKEO-64 , Z : POKEO+98 , Z : RETUR
N
78 O=1024+X+Y:FORP=0TO3:POKEO-P,
Z : POKEO-3 2 *P , Z : NEXTP : POKEO-3 4 , Z :
RETURN
79 O=1024+X+Y:FORP=0TO3:POKEO-P,
Z:POKEO+32-32*P,Z: NEXTP :P0KE0-4,
Z: RETURN
80 CLS0:FORV=1TO5:GOSUB100
81 Z=R:FORX=100TO124STEP8:FORY=0
T0192STEP192:GOSUB86:PLAY"L255O3
C":NEXTY / X:FORX=417T0441STEP8:FO
RP=0TO3 : POKE1024+X+P, Z :NEXTP: POK
E1024+X+35,Z:NEXTX
82 Z=S:FORX=200TO216STEP8:FORY=0
T0192STEP192 : GOSUB86 : PLAY"L25503
E" : NEXTY , X : FORX=64T088STEP8 : FORP
=0TO3 : POKE1024+X+P, Z : NEXTP : P0KE1
024+X-32 , Z :NEXTX: 0=1216 : G0SUB89 :
0=1408 : GOSUB89 : FORP=0TO2 : FORQ=0T
0192STEP192
83 P0KE1183-P+Q,Z:P0KE1247-P+Q,Z
: P0KE124 5+3 2 *P+Q , Z : NEXTQ , P : Z=T : F
ORX=96TO120STEP8 : FORY=0TO192STEP
192:G0SUB87:PLAY"L25503G":NEXTY,
X
84 FORX=38TO62STEP8:FORY=0TO384S
TEP192 : GOSUB88 : PLAY"L25504C" : NEX
TY,X:FORX=130TO154STEP8:FORY=0TO
192STEP192:GOSUB88:PLAY"L25504C"
: NEXTY , X
85 PLAY " PI ":NEXTV: PLAYS $ : G0T09
86 0=102 4+X+Y:FORP=-3T03:POKEO+P
,Z:NEXTP:FORP=-64T064STEP32:POKE
O+P,Z:NEXTP:FORP=0TO3:POKEO+64+P
, Z : POKEO- 64 -P , Z : NEXTP : FORP=0TO2 :
POKEO+3-32*P, Z : POKEO-3+32*P, Z :NE
XTP : RETURN
87 O=1024+X+Y: POKEO, Z : POKEO+ 100,
Z : RETURN
88 O=1024+X+Y: POKEO, Z: POKEO+32 ,Z
: RETURN
89 FORP=0TO2: POKEO-3 2 *P,Z:POKEO+
32*P, Z : POKEO+1+P, Z : POKEO+65+P, Z :
POKEO+3-3 2*P,Z: : NEXTP : RETURN
90 CLS0 : F0RV=1T05 : GOSUB100
91 Z=R:FORX=3T027STEP8:GOSUB96:N
EXTX : FORX=167T018 3STEP8 : G0SUB9 6 :
NEXTX : F0RX=3 2 3T03 47STEP8 : G0SUB9 6
:NEXTX: 0=1215 :GOSUB97:FORP=192TO
194 : POKE1024+P, Z : POKE1088+P, Z : NE
XTP
92 Z=S : FORX=7T02 3STEP8 : GOSUB9 6 :N
EXTX:FORX=163T0187STEP8:GOSUB96:
NEXTX:FORX=327T0343STEP8:GOSUB96
: NEXTX
93 0=1055 :GOSUB97: 0=1375 :GOSUB97
: FORP=32T03 4 : POKE1024+P, Z : POKE10
88+P,Z:POKE1344+P,Z:POKE1408+P,Z
: NEXTP
95 PLAY " PI ":NEXTV: PLAYS $:G0T09
96 O=1024+X:FORP=0TO3:POKEO-P,Z:
POKEO+32+P, Z : POKEO+64-P, Z : POKE0+
96+P, Z : POKEO+128-P, Z : NEXTP: PLAY"
L25503C": RETURN
97 FORP=0TO3:POKEO-P,Z:POKEO+64-
P, Z : POKEO+128-P, Z :NEXTP: POKEO+32
, Z : POKEO+96 , Z : PLAY"L25503C" :RETU
RN
100 R=RND(8) :S=RND(8) :IFR=S THEN
100
101 T=RND(8) :IFT=R THEN101
102 IFT=S THEN101
103 U=RND(8) :IFU=R THEN103
104 IFU=S THEN103
105 IFU=T THEN103
106 R=16*R+127:S=16*S+127:T=16*T
+127:U=16*U+127:RETURN ^
FLORIDA
SEARCH NO LONGER!
The Software Connection of
Fori Lauderdale is your one slop source
for your Color Computer Software
•enpherals. Books Magazines & Repairs
-Software
Connection
4301 N STATE RD a7
LAUDERDALE LAKES. FL 33319
305-484-7547
44
THB RAINBOW August 1986
The HJL-57 Keyboard
-
A
Now available for all models
including CoCo 2.
^T^j*
m
Compare it with the rest.
Then, buy the best.
If you've been thinking about
spending good money on a new
keyboard for your Color Computer,
why not get a good keyboard for
your money?
Designed from scratch, the
HJL-57 Professional Keyboard
is built to unlock ALL the
potential performance of your
Color Computer. Now, you can
do real word processing and sail
through lengthy listings.. .with
maximum speed; minimum errors.
At $79.95, the HJL-57 Is reason-
ably priced, but you can find
other CoCo keyboards for a few
dollars less. So, before you buy,
we suggest that you compare.
Compare Design.
The ergonomically-superlor
HJL-57 has sculptured, low
profile keycaps; and the three-
color layout is Identical to
the original CoCo keyboard.
Compare Construction.
The HJL-57 has a rlgidlzed
aluminum baseplate for solid,
no-flex mounting. Switch contacts
are rated for 100 million cycles
minimum, and covered by a spill-
proof membrane.
Compare Performance.
Offering more than full-travel,
bounce-proof keyswltches, the
HJL-57 has RFI/EMI shielding that
eliminates Irritating noise on
displays; and four user-definable
function keys (one latchable),
specially-positioned to avoid
inadvertent actuation.
Free Function Key Program
Your HJL-57 kit includes usage
instructions and decimal codes
produced by the function keys,
plus a free sample program
that defines the function
keys as follows: F1 = Screen
dump to printer. F2 = Repeat
key (latching). F3= Lowercase
upper case flip (if you have
lower case capability). F4 =
Control key; subtracts 64 from
the ASCII value of any key
pressed. Runs on disc or tape;
extended or standard Basic.
Compare Installation.
Carefully engineered for easy
installation, the HJL-57 requires
no soldering, drilling or gluing.
Simply plug It in and drop It
right on the original CoCo
mounting posts. Kit Includes a
Ordering Information: Speolly model (Original, F-varslon, or CoCo 2). Payment by CO.D,, check,
MasterCard or Visa . Credit card customers Include complete card number and expiration date, Add
$2.00 tor shipping ($3.50 tor Canada). New York state residents add 7% sales lax.
Dealer Inquiries Invited.
new bezel for a totally finished
conversion.
Compare Warranties.
The HJL-57 is built so well, It
carries a full, one-year warranty.
And, it is sold with an exclusive
15-day money-back guarantee.
Compare Value.
You know that a bargain Is a
bargain only so long as It lasts.
If you shop carefully, we think
you will agree...The HJL-57 Is
the last keyboard your CoCo will
ever need. And that's real value.
Order Today.
Only $79.95, the HJL-57 Is
available for Immediate shipment
for either the original Color
Computer (sold prior to October,
1982) or the F-version and TDP-100
(introduced in October, 1982),
and the new 64K CoCo. J*low also
available for CoCo 2.
Call Toll Free
1-800-828-6968
In New York 1-800-462-4881
■isllslia
PRODUCTS
Dlv. of Touchstone Technology Inc.
955 Buffalo Road • P.O. Box 24954
Rochester, New York t4624
Telephone: (7 16) 235-8358
Protect Your Valuable Magazine Collection With .
1
Every single issue of the rainbow is a vital resource
that you will refer to again and again for new insights,
to explore new areas of interest or simply to refresh your
memory. So, you need to keep your copies of THE rainbow
safe — in high-quality, vinyl binders that provide complete
protection.
These distinctive red binders not only ensure that your
RAlNBOWs stay in mint condition, but they showcase your
collection as well. Each binder is clearly embossed with
the magazine's name in gold lettering on both the front
DISTINCTIVE
AND DURABLE
RAINBOW BINDERS
and the spine. They're a handsome addition to any decor.
They also make it possible for you to organize your
workspace and eliminate the clutter on a permanent basis.
You will spend more time on your CoCo and eliminate
those frustrating searches for misplaced magazines.
A set of two handsome binders, which hold a full 12
issues of THE RAINBOW is only $13.50 (please add S2.50
for shipping and handling).
Special Discounts On Past Issues With This Offer
To help you complete your collection of THE RAINBOW,
we're offering a special discount on past issues with the
purchase of one or more sets of binders.
When you place an order for six or more back issues
of THE RAINBOW at the same time you order your binders,
you are entitled to $1 off each magazine, which normally
sells for the single issue cover price. For an order form,
please refer to our "Back Issue Information" page (check
Table of Contents under departmental listings). Also with
this offer, copies of the "Official And Compleat Index To
THE RAINBOW" (a comprehensive index of Rainbow's first
three years, July 1981 through June 1984), usually priced
at $2.50, may be purchased for only $1 with a set of binders.
Due to heavy demand, we suggest you order the back
issues that you want now while supplies last.
YES. Please send me
sets of binder(s) at $13.50 each (plus $2.50 per set for shipping and
handling. If your order is to be sent via U.S. Mail to a post office box or to another country, please
add $2. Kentucky residents add 5% sales tax).
I also want to take advantage of the special savings of $1 off single issue cover price for back issues
with the purchase of a set of binders. (Minimum order of 6 magazines. An order form from a recent
issue indicating the back issues you wish to receive should accompany this order.)
I want to purchase the comprehensive index to THE RAINBOW (July 1981 through June 1984) at the
special price of $1 (regular price $2.50) with my purchase of one or more sets of binders.
Name _
Address
City
State
ZIP
. My check in the amount of
Charge to: □ VISA □ MasterCard
Account Number
Signature
is enclosed. (In order to hold down costs, we do not bill.)
□ American Express
Expiration Date
Mail to: Falsoft, Inc., The Falsoft Building, Prospect, ICY 40059. To order by phone, call: (502) 228-4492
GAME INSTRUCTION
32K
ECB
nme M
RAINBOW
J- "u
occer Instructor
By Vincent H. Sheridan
A text and graphics program,
Soccer Instructor helps new-
comers to the game of
soccer understand the field mark-
ings and their effect on the game.
The program requires 32K or 64K
Extended basic and a cassette
player. I have coached minor
league soccer for nine years, and
wrote this program to show my
family that CoCo could be used
for more than playing games.
The title page is followed by an
introductory note on the program
after which the field is drawn in
PMDDE4 for the first time, off
screen, and shown following the
SCREEN command. The program
then switches to a menu listing sev-
en field features.
(Vincent Sheridan is a supervising
design engineer with Ontario Hydro.
He is an amateur photographer, and
has coached minor league soccer for
several years. He is interested in
writing educational programs for the
Co Co.)
August 1985 THE RAINBOW 47
Selection of a feature will cause
the field to be redrawn quickly by
means of the PCDPY command. The
feature is emphasized by flashing,
by PSETting and PRESETting lines
or PAINTing first in the foreground
color and then in the background
Program Structure
10-20 Credit
30 Reserves eight graph-
ics pages
50-240 Title page
250-280 Introductory text
290-310 INKEYS routine for
branch to Line 10000
for field graphics
subroutine
320-430 Menu
440 Branch to exit
program
450 Branch to repeat
program
1000-7190 Subroutines for field
features
1 0000- 1 0260 Draws initial soccer
field
color. After five flashes, the text
screen is shown to describe the field
feature and its effect on -the game.
Soccer Instructor will be of use
to beginning soccer players and
coaches alike for a better under-
standing of the game.
The listing: SOCCER
10 REM* *************************
* SOCCER FIELD *
* AN ILLUSTRATED GUIDE *
* FOR NEW SOCCER PLAYERS *
* BY V.A.SHERIDAN *
* COPYRIGHT (C) 1985 *
**************************
20
REM* *************************
30
PCLEAR8
40
CLS
50
FOR X=3 3T062
60
PRINT§X,CHR$(128)
70
NEXTX
80
FORX=449T0478
90
PRINT@X,CHR$(12 8)
100 NEXTX
110 FORY=65T0417STEP32
120 PRINT® Y,CHR$ (12 8)
130 NEXTY
140 FORY=80TO462STEP32
150 PRINT@Y,CHR$(128)
160 NEXTY
170 FORZ=94T0446STEP32
180 PRINT@Z,CHR$(128)
190 NEXTZ
200 PRINT@131,"S O C C E R";
210 PRINT@164,"F I E L D" ;
220 PRINT@ 3 3 8, "A GUIDE FOR" ;
2 30 PRINT§3 70,"NEW PLAYERS";
2 40 FORT=0TO3000:NEXTT
250 CLS
260 PRINT: PRINT"**********SOCCER
FIELD********** THE GAME OF SOC
CER IS PLAYED ONA SPECIALLY MARK
ED FIELD. IT IS IMPORTANT THAT A
NEW PLAYER LEARNS WHAT THES
E MARKINGS ARE FOR AND HOW THEY
EFFECT THE GAME";
270 PRINT". I HOPE THIS PROGRAM W
ILL PROVE TO BE USEFUL.
A PICTURE OF THE SOCCF
R FIELD FOLLOWS, YOU WILL THEN
SEE A LISTOF FIELD FEATURES . PRES
SING THE NUMBER KEY WILL TELL Y
OU MORE."
280 PRINT :PRINT"PRESS ANY KEY TO
SEE THE FIELD."
290 I$=INKEY$
300 IF I$=""THEN290
310 IFI$O""THENCLS:GOSUB10000
320 PRINT" soccer field
": PRINT" (1) SIZE OF THE
FIELD. (2) THE GOAL.
(3) THE GOAL AR
EA. (4) THE PENALTY
SPOT. (5) THE PENALTY
AREA . " ;
3 30 PRINT" (6) THE CENTRE CIRCLE.
(7) THE CORNERS."
340 PRINT: PRINT" PICK A SUBJECT A
ND PRESS THE NUMBER KEY, OR PR
ESS 'E 1 TO END THE PROGRAM, OR P
RESS 'R' TO REPEAT THE PROGR
AM."
350 K$=INKEY$
3 60 IFK$=""THEN350
370 IFK$=" 1"THENSOUND200 , 2 : GOSUB
1000
380 IFK$="2"THENSOUND200,2:GOSUB
48
THE RAINBOW August 1985
DISK
s 44.95
H&i
%H.
J^fggS I:
Introducing The "Super Smart"
DATA PACK II
TERMINAL COMMUNICATIONS SOFTWARE
Also Supports The PBJ 80 Column "Word Pak", Deluxe RS-232 Pak,
Parallel Printer Card and PBJ 2SP Pak
"FEATURES"
No Lost Inform.! lion When Using Hi-Resolulion Display On UnC
ASCII Compatible File Formal
Full Text Buffering
Terminal Baud Rah™, 300 lo 9600
Automatic Word Wrap Eliminates Split Words
Rill /Hall Duplex
Automatic File Capture
Programmable Word Length, Parity and Stop Bits
Save and Load Text Buffet and Program Key Buffers to Tape
or Disk
9 Hi-Resolution Display Format-,. 28 to 255 x 24
True Upper ' lower Case Display
Kill Graphics Option for an Eietra 6K
Supports Line Break
Freeze Display and Review Information On Line
Send Files Directly from Buffer or Disk
Full Disk Support lor Disk Version
Send Control Codes from Keyboard
Separate Prinler Baud Raid 1 10-9600
Display on Screen or Output Contents of Buffer lo Prinler
Automatic Memory Sense 16-64K
9 Programmable Function Key Variable Length Macro Bulfei
Programmable Prompt Character or Delay lo Send Next Line
Programmable Control Character Trapping
Programmable Open/Close Buffer Characters
Automatic Key Repeat For F.dlling
Program and Memory Status Displays
TAPE
s 34.95
jpPMfclty
»J&
fHH0*
"The Wait is Finally Over"
ANNOUNCING
The CBASIC COMPILER
Now anyone can create fast efficient Machine Language Programs
without the Drudgery of using an Assembler.
CBASIC is a fast Machine Language integer Basic Complier that can convert Color Basic programs into fast machine language programs. CBASIC features over
100 Basic Commands and functions that fully support Disk, Tape, Screen and Printer I/O. Hi & Low Resolution Graphics. Sound, Play and String Operations just like
Color Basic. CBASIC also includes a powerful full featured Basic program Editor using a 5 1 ,64 or 85 by 24 line display. The Hi-Resolution display can be automati-
cally included in your compiled program for enhanced display capability and allow mixed text and graphic displays.
Graphics Commands:
Sound Commands:
String Functions:
Numeric Functions:
I/O Commands:
CIRCLE. COLOR, CLS. DRAW. GET. LINE, PAINT.
PCLS. PCOPY. PMODE. PRESET. PSET, PUT.
RESET. SCREEN. SET. POINT. PPOINT
PLAY. SOUND
CHRS. LEFTS. MIDS. RIGHTS. LEN. INSTR, LSET,
RSET, TRMS. STRS. STRINGS. INKEYS. MKNS
ABS. POS. TIMER. RND. ASC. TAB. CAL. JOYSTK.
PEEK. POKE. LOC. LOF. EOF. FREE. CVN. ERR.
VARPTR. SWAP
OPEN, CLOSE. INPUT. LINEINPUT. PRINT WRITE.
PRINT @, GET. PUT. KILL CHAINM. FIELD, DATA,
READ. RESTORE
Program ControL
Editor Commands:
FOR/NEXT/STEP. GOTO/GOSUB. IF/THEN/
ELSE RETURN. STOP. RETI. ON n GOTO/GOSUB.
ON ERROR. ON RESET. ON IRQ/FIRQ/NMI. ON
OVR/NOVR. EXEC. LET
ORG. REM OR'. END, DIM, END. BASE. RAM. ON/
OFF. RAM64 K. HIRES. GENERATE. DPSET. STACK
LINE EDIT. AUTO EDIT. COPY, MOVE, RENUM-
BER, AUTO LINE*. PRINTER. LIST. DELETE,
SEARCH. REPLACE. BAUD RATE. PRINTER,
CBASIC. TAPPEND. SKIP. SIZE. LOAD. SAVE.
APPEND. KILL DIR. and much, much more.
FtEQUIRES 32K and Disk. 64K recommended
Introductory Price $119.00
Regularly $149.00
Screen Enhancement Program Compaiison Chart
PROGRAM FEATURES HI-RES II HI-RES 1 BRAND X
NEW OLD
NEW IMPROVED VERSION
- UP TO 85 CHARACTERS PER LINE
READABILITY
- ADJUSTABLE A UTOMA TIC KEY REPEA T
■ PROPTECT 1-23 SCREEN LINES
- CONTROL CODE KEYBOARD
■ FULLY BASIC COMPATIBLE
• DISPLAY FORMATS OF 28 lo 255 CHARACTERS PER LINE
• FULL % UPPER/LOWER CASE CHARACTERS
• MIXED GRAPHICS & TEXT OR SEPARATE
GRAPHIC & TEXT SCREENS
• INDIVIDUAL CHARACTER HIGHLIGHTING
• REVERSE CHARACTER HIGHLIGHT MODE
• WRITTEN IN FAST MACHINE LANGUAGE
• AUTOMATIC RELOCATES TO TOP OF 1 6/32K
• AUTOMATICALLY SUPPORTS 64 K ol RAM WITH RESET CONTROL
• REVERSE SCREEN
• ON SCREEN UNDERLINE
• DOUBLE SIZE CHARACTERS
• ERASE TO END OF LINE
■ ERASE TO END OF SCREEN
• HOME CURSOR
• BELL TONE CHARACTER
■ HOME CURSOR & CLEAR SCREEN
• REQUIRES ONLY 2K OF RAM
• COMPATIBLE WITH ALL TAPE & DISK SYSTEMS
Hl-EES II SCREEN ullLliy
f t ' lu n nr- joijbTfTsiTfil """" '^
111. S ( r.fi, UHl«;U8IHu
Prol*ct FroM 1 IctZJScrT?
■ srt of Cursor Control f
. 'I?* 1
KSrlr-'Kt
Ful I sel of Cur
trueOeeerR Loner ; a» c r.arac tgi
3 Characters e*r F
? 2 Chuicl.rt . . . I ,
st> Character* rer lint
42 Characters e«r line
51 Characters r*r lint
«1 Cl.tr Kt»rt »rr hi.*
*'fj.r**rtf »t* tin*
Yes
Yes
$9/195 $OQ95
A* ^K TAPE isW *J DISK
ALL ORDERS SHIPPED FROM STOCK
ADD $2.50 POSTAGE
CCWP
SS66 Ricochet Avenue Las Vegas, Nevada 89110
(702) 452-0632
Upper/Lower case characters Ye*
Mixed Text and Graphics Yes
Separale Text & Graphics
Print @ (ully implemented
Print @ on all line lengths
Different line lengths
Automatic Key Repeat
Ad|ustahle Key Repeal
Auto Repeal Disable
Erase to end ol line/screen
Home Cursor
Solid or Blinking Cursor
CLS command supported
X.Y Coordinate Cursor
Positioning
Double Size Characters
Individual/Continuous
Highlighting
On Screen Underlining
Clear Key functional
16.32 &64K Supported
Green or Black Background
Dual Character sets for
Enhanced 64 and 85
Characters per line display Yes
Protected Screen Lines
(programmable) 1 lo 23
Full Control Code Keyboard
lor Screen control directly
from the keyboard Yes
Programmable Tab Character
Spacing Yes
Full Screen Reverse Function Yes
Switch lo & from the Standard
16 by 32 Screen for full
compalabilltv Yes
On Error Goto Function No
Extended Basic Required No
All Machine Language Program Yes
RAM Required in addition to
Screen RAM 2K
Program Price (Tapel $24 15
Yes
Yes
Yes Yes
Yes Yes
Yes Yes
28lo255|'))28 lo 255
Yes Yes
Yes No
Yes No
Yes Yes
Yes Yes
Yes No
Bulf/Biack Bull/Blark
Yes
Yes
Yes Yes
Yes Yes
Clear/LkeysCle.rr key
Yes Yes
Yes No
No
Yes
Yes
Yes
No
Yes
51 only
I) 51 only (I)
Yes
No
No
Yes
Yes
Yes
Bull/Black
No
No
No
No
No
Yes
No
No
No
No
Yes
Yes
2K
$10 05
No
Yes
Yes
Yes
2K
$.21 05
VISA. MASTERCARD AND C.O.D. ACCEPTED
20,0,0
3 90 IFK$=" 3 "THENSOUND200 , 2 : GOSUB
3000
400 IFK$="4"THENSOUND200,2:GOSUB
4 10 IFK$= » 5 "THENSOUND200 , 2 : GOSUB
5000
420 IFK$= ,, 6"'THENSOUND200,2:GOSUB
6000
430 IFK$="7"THENSOUND200,2:GOSUB
7000
440 IFK$="E"THENCLS : PRINT@193 , "N
OW YOU KNOW THE FIELD! ! " : PRINT@2
57, "HAVE A GOOD SOCCER SEASON!!"
:FORT=l TO10000:NEXTT:CLS:END
450 IFK$="R"THENCLS:GOTO10
460 CLS:GOTO3 20
1000 F0RN=1T05
1010 PMODE4,5:COLOR0,1:SCREEN1,0
: PCOPY1T05 : PCOPY2T06 : PCOPY3T07 : P
C0PY4T08
1020 FORT=1TO500:NEXTT
1030 LINE (4, 16) -(252, 176) , PRESET
, B : SOUND150 , 4 : FORT=1TO500 : NEXTT
1040 NEXTN
1050 PCLS
1060 CLS
1070 SCREEN0,0
1080 PRINT"*********SIZE OF FIEL
D**********"
1090 PRINT" THE FIELD IS 50 TO 1
00 YARDS WIDE, AND 100 TO 130 Y
ARDS LONG. THE LINES AT THE GOAL
ENDS OF THE FIELD ARE CALLED
GOAL LINES, AND THE LINES DOWN TH
E SIDES OF THE FIELD ARE CALLED
SIDELINES."
1100 PRINT" IF THE ATTACKING TEAM
KICKS THE BALL OVER THE GOAL LI
NE THE DEFENDING TEAM IS AWA
RDED A GOALKICK."
1105 PRINT: PRINT "PRESS ANY KEY T
CONTINUE."
1106 B$=INKEY$
1107 IF B$=""THEN1106ELSE1110
1110 CLS: PRINT: PRINT" IF THE DEFE
NDING TEAM TOUCHES THE BALL BE
FORE IT CROSSES THE GOAL LINE T
HE ATTACKING TEAM IS AWARDED A C
ORNER KICK. IF A PLAY
ER CAUSES THE BALL TOCROSS THE S
IDELINE,THE OPPOSING TEAM IS AWA
RDED A THROW-IN."
1111 PRINT: PRINT" PRESS ANY KEY
TO CONTINUE."
1120 A$=INKEY$
1130 IFA$=""THEN1120ELSE RETURN
2000 PMODE4,5:COLOR0,l:SCREENl,0
: PCOPY1T05 : PCOPY2T06 : PCOPY3T07 : P
COPY4T08
2010 F0RN=1T05
2020 LINE(0, 84)-(4, 88) , PRESET, BF
2030 LINE (0,104) -(4, 108) , PRESET,
BF
2040 LINE (0, 84) -(0, 108) , PRESET
2050 LINE(256,84)-(256,108) , PRES
ET
2060 LINE (256, 104) -(252, 108) , PRE
SET,BF
2070 LINE(256,84)-(252,88) ,PRESE
T,BF
2080 FORT=1TO500: NEXTT
2090 LINE(0,84)-(4,88) ,PSET,BF
2100 LINE (0,104) -(4, 108) ,PSET,BF
2110 LINE(0,84)-(0,108) , PSET
2120 LINE(256,84)-(256, 108) , PSET
2130 LINE(256,104)-(252,108) , PSE
T,BF
2140 LINE(256,84)-(252,88) ,PSET,
BF
2150 SOUND150,6
2160 NEXTN
2170 PCLS1
2180 CLS
2190 PRINT"************THE GOAL*
*************
2200 PRINT" THE GOALS ARE MADE
F TWO UPRIGHT GOALPOSTS AND
A CROSSBAR. THEY CAN ONLY BE OF
WOOD OR METAL, AND ARE PAINTED
WHITE. THE GOAL IS 8 YARDS (
24 FEET) WIDE, AND 8 FEET HIGH.
it •
2210 PRINT" THE USE OF NETS IS
PTIONAL, BUT CAN BE ENFORCED B
Y THE LOCALRULING BODY.
FOR A GOAL TO BE SCO
RED, THE BALL MUST BE COMPLETE
LY BEHIND THE GOALINE . "
2220 PRINT" PRESS ANY KEY TO CON
TINUE . "
2230 I$=INKEY$
2240 IF I$=""THEN2230ELSERETURN
3000 F0RN=1T05
3010 PMODE4,5:COLOR0,1:SCREEN1,0
: PCOPY1T05 : PCOPY2T06 : PCOPY3T07 : P
C0PY4T08
3020 PAINT(10,96) ,0,0
3030 PAINT(246,96) ,0,0
3040 SOUND150,4:FORT=1TO500:NEXT
T
3050 NEXTN
3060 PCLS1
3070 CLS
3080 PRINT"*********THE GOAL ARE
A********** 11
3090 PRINT" THE GOAL AREA IS DIR
ECTLY IN FRONT OF THE GOAL. IT
50
THE RAINBOW August 1985
ND ONE TEAMIS GIVEN THE BALL.";
6100 PRINT "THE OPPOSING TEAM MU
ST STAY IN THE OTHER HALFOF THE
FIELD AT LEAST 10 YARDS AWAY FR
OM THE BALL."
6110 PRINT" PRESS ANY KEY TO CON
TINUE . "
6120 I$=INKEY$
6130 IFI$=""THEN6120ELSE6140
6140 CLS: PRINT: PRINT" THE BALL M
UST BE KICKED INTO THE OPPONEN
T'S HALF OF THE FIELD. THE KICKER
CAN NOT TOUCH THE BALL A SECO
ND TIME UNTIL IT HAS BEEN TOUCHE
D BY ANOTHER PLAYER."
6150 PRINT: PRINT" PRESS ANY KEY
TO CONTINUE."
6160 K$=INKEY$
6170 IFK$=""THEN6160ELSERETURN
7000 FOR N=1T05
70 10 PMODE4 , 5 : COLOR0 , 1 : SCREEN1 ,
: PC0PY1T05 : PCOPY2T06 : PCOPY3T07 : P
COPY4T08
7015 FORT=1TO500:NEXTT
7020 PAINT(5,17) ,0,0
7030 PAINT(251,17) ,0,0
7040 PAINT(251,175) ,0,0
7050 PAINT(5,175) ,0,0
7060 SOUND150,4:FORT=1TO500:NEXT
T
7070 NEXTN
7080 PCLS1
7090 CLS
7100 PRINT"***********THE CORNER
S**********»
7110 PRINT" THE CORNERS OF THE F
IELD ARE MARKED BY AN ARC OF 1
YARD RADIUS, AND A FLAG OF
MINIMUM HEIGHT 5 FEET."
7120 PRINT" IF A DEFENDING PLAYE
R TOUCHES THE BALL BEFORE IT PA
SSES OVER THE GOAL LINE, THE ATT
ACKING TEAMIS AWARDED A CORNER K
ICK.THE BALL IS PLACED INSIDE
THE CORNERMARKING BEFORE BEING
KICKED INTOPLAY."
7130 PRINT: PRINT" PRESS ANY KEY
TO CONTINUE."
7140 I$=INKEY$
7150 IFI$=""THEN7140ELSE7160
7160 CLS: PRINT: PRINT" THE DEFEND
ING PLAYERS MUST BE AT LEAST 10
YARDS AWAY FROM THE BALL UNTIL
IT IS KICKED. A GOAL MAY BE SCOR
ED DIRECTLY FROM A CORNER KICK
ii
7170 PRINT: PRINT" PRESS ANY KEY
TO CONTINUE."
7180 K$=INKEY$
7190 IFK$=""THEN7180ELSERETURN
10000 PMODE4,l
10010 COLOR0,1
10030 PCLS1
10040 LINE(4,16)-(252,176) ,PSET,
B
10050 LINE(128,16)-(128,176) , PSE
T
10060 LINE(4,52)-(40,140) ,PSET,B
10070 LINE(4,76)-(16,116) ,PSET,B
10080 CIRCLE(128, 96) ,20,0
10090 CIRCLE(28,96) ,2,0
10100 CIRCLE(28, 96) ,20,0,1, .875,
.125
10110 LINE(0,84)-(4,88) ,PSET,BF
10120 LINE (0,104) -(4, 108 ) ,PSET,B
F
10130 LINE(0,84)-(0,108) ,PSET
10140 LINE(256,84)-(256,108) ,PSE
T
10150 LINE(256,104)-(252,108) , PS
ET,BF
10160 LINE(256,84)-(252,88) ,PSET
,BF
10170 CIRCLE(228, 96) ,20,0,1, .375
, .625
10180 CIRCLE (228, 96) ,2,0
10190 LINE(252,76)-(240,116) , PSE
T,B
10200 LINE(252,52)-(216,140) , PSE
T,B
10210 CIRCLE(4, 16) ,8,0,1,0, .25
10220 CIRCLE (252, 16) ,8,0,1, .25, .
50
10230 CIRCLE(252,176) ,8,0,1, .5, .
75
10240 CIRCLE(4, 176) ,8,0,1, .75,0
10245 SCREEN1,0
10250 FOR T=l TO 10000 : NEXT
102 60 RETURN ^
Quickie . . .
Sinelines
If you want the graphics to move a bit faster or
slower to match your preferred beat, then change the
'S' variable in Line 61 to, for example .05 for slower
music. Experiment!
10 REM**SINLINES, BY NORM CUTTER
20 PCLS : PMODE 4,1: SCREEN1 , 1
S0 B=B+I
Gl S=S+.l
70 D=D+q
B0 IF B>250 THEN PCL5:I=-2
90 IF D>1B0 THEN Q=-2
92 IF D<5 THEN q=2
93 IF B<5 THEN 1=2
9G X=(SIN(S)*129)+129
100 LINE (X,D)-(D,B),PSET
150 GOTDG0
August 1985 THE RAINBOW 53
GAME
54
THE RAINBOW August 1985
Sape The Captire Scientists!
OPERATION
FREEDOM
By Steve Britton IV
T!
££ ri l^his is the only message we have received from
them," your superior says as he hands you the
interstellargra'm. "The lives of almost 80 of the
Earth's most brilliant scientists are at stake! That is why I
have decided to send you, our best agent, to free as many
of those people as you can, before it is too late . . ."
With these words ringing in your ears you now stand at
the beginning of what seems to be a deserted lunar street. This
is only one of the many that run throughout Luna Alpha,
the first lunar colony of its kind, population: 80.
Operation Freedom will run on any 16K CoCo with Extended
Color BASIC. The object of the game is to free as many captives
as possible and safely escape without being killed by terrorist
laser fire.
The, playing screen is divided into three views. The largest
is a map showing your position in Luna Alpha. At the bottom
of the screen toward the middle is a side view of you as you
run along the lunar streets. The smallest view, in the lower
left corner of the screen, is the view of your laser weapon's
targeting system.
You may move around the streets (yellow lines) of the map
using the right joystick. Your position is indicated by the blue
(Steve Britton is a 16-year-old student who will be a senior at William
Blount High School this fall. He is a self-taught programmer and has been
developing programs for the past two and a half years.)
August 1985 THE RAINBOW
55
dot. The small red areas are the
locations of captives being held prisoner
by the terrorists. To free these captives,
move up to an area that you have not
been to yet and watch for the prison
bars to appear on the side view and
press the firebutton. The number of
captives you have freed from this area
is indicated under the word "FREED"
located at the top right corner of the
screen. The number of captives in an
area will vary from one to six.
As you move around the deserted
streets of Luna Alpha, you will encoun-
ter terrorists quite frequently. When a
terrorist has been encountered, a red
square will appear in the view of your
targeting system. This square represents
the relative position of the terrorist.
Notice the two rows of green dots
running up and down and left to right
along the two sides of this view. These
are aim indicators. To aim at the
terrorist, use the right joystick. Moving
the joystick left and right controls the
horizontal indicators, while moving the
joystick up and down controls the
vertical indicators. Align the blinking
indicators up so when you fire, the point
where the indicators intersect is on top
of the red square.
On paper this sounds quite complex,
but when you actually play a few times
it becomes quite simple. Just hitting the
red square will not kill the terrorist
because the terrorists have developed
a special armor. Keep firing, though,
until you hit a weak spot. However,
don't concentrate too deeply on killing
the terrorist because he is firing at you,
too! He will either shoot at your head
or at your feet. When a terrorist fires,
you will see the shot coming toward
you (on the side view) at a speed
determined by the skill level chosen at
the beginning of the game (one is easy
and five is hard). To dodge this shot,
push the right joystick all the way up
and press the firebutton to jump. Push
the right joystick all the way down and
press the firebutton to duck. Be sure
to hold the firebutton down until the
shot has safely passed.
All of this running and shooting can
drain one's strength and ammunition
supply rather quickly. Your strength
and ammo are indicated by red lines
at the lower right of the screen. When
the red line under strength reads zero,
you will die of fatigue. When your
ammo reaches zero, you will not be able
to shoot at terrorists; you will simply
have to dodge any shots fired until the
terrorist goes away. They usually only
take a few shots and retreat anyway,
so it is relatively easy to survive without
ammunition.
The green areas on the map are the
secret hideaways inhabited by th<
scientists who managed to escape th<
terrorists. Stop at these places to res
and reload your laser weapon witl
energy by moving up beside them unti
a green figure appears in front of yoi
in the side view. When this occurs, hi
the firebutton and your strength anc
ammo are now ready for combat onci
again.
Free as many captives as you can
being careful not to use too mucl
strength in the process and stop tc
restore your essentials until you read
your destination; the starbase where at
escape ship awaits to "beam you up !
(located at the top left of the map anc
represented by a green star-like shape)
When you successfully complete
Phase one by reaching the escape ship
you then start over on Phase two. Aftei
each successful completion of a phase
1,000 bonus points are awarded. The
higher the phase, the harder the game
For each phase you gain, the difficult}
factor will increase by one until il
reaches five (the highest skill level). Foi
beginners, 1 would recommend starting
on Phase one or two to get used to the
controls. Intermediates will find chal-
lenge on Level three, while experts will
find levels four and five quite difficult
to master.
Good luck!
•*
~
120 ...
....94
8027 . . .
..254
125 ...
...170
9000 . . .
..189
155 ...
...207
10020 .
...24
510 ...
....73
20020 .
...18
1005 . .
...190
30010..
..130
7020
84
END
23
The listing: FREEDOM
CLS0:C$=CHR$(128) :GOTO40000
1 PH=1:CLS0:PRINT@45,"PHASE 1" ; :
FORX=1TO500 : SCREEN0 , 1 : NEXTX
2 POKE140,150
99 PMODEl,l:PCLS3
100 DRAW"BM16,3C2R2D2R2L6BM9,8R2
F2R8F2H2L4D2R2L2D4R2D2R2F2D2BM14
,18D4L2BM16,8R2"
101 DRAW"BM38,3R2D2R2L6BM31,8R2F
2R8D2L4D4R2D2R4D2BM36,18D4L2BM38
,8R2"
1^2 DRAW"BM56,1R2D2R2L6BM54,8E2R
6F2H2L2D2L2D4L2D2R6D2 "
103 DRAW"BM82,9R2D2R2L6BM80,14R6
D2L4D2L2H2F2D4L2R2U4R6D4R4"
104 DRAW"BM100,6R2F2G2L2U2D6U4R2
F2D2BM108 , 14R1BM112 , 6D8BM116 , 14R
1BM120,6D8U4R2E2H2L2BM100,20D2R1
4L2U2L4BM124,22L6R2U2R2"
105 DRAW"BM135,10C4R18D2L18R4D8L
4R18D2L18U2R8U8R4D8R4U8"
106 DRAW"BM162,7C1R4D2L4R2D4R2F2
H2L4H2F2R2D6R2D2R2D2BM160 , 22U2R2
U2"
110 DIMR1(1,2) ,R2(2,2) ,J(1,2) ,D(
1,2),K(2,2),P(1,2),H(1,2),IK(1,2
),IS(1,2),ZT(7,7)
120 GET(9,3)-(22,23) ,R1:GET(30,2
) -(45,23) ,R2: GET (54,1) -(65 ,16), J
: GET (76,9)-(90,22),D: GET ( 100 , 6 ) -
(12 5,22) ,K: GET (13 5, 10) -(155, 22) ,
P:GET(160,7)-(169,22) ,H
121 PCLS3:COLOR4,3 : LINE (5, 3) -(19
7,117) ,PSET,B:LINE(5,135)-(53,17
7 ) , PSET , B : LINE (68,135)-(165,176)
,PSET,B
122 DRAW"BM184,106C1R2L4D2R4F2H2
U2E2G2L4H2F2D2G2E2U2R4U1C2U29L40
D2 6L3 8U2 6L42D2 6L3 6U50R40D1J3R38U3
0R48D18R20U40L76D24L58U18L24U8C1
R2L4U2R4E2G2L4H2F2D2G2E2R4F2H2BM
56
THE RAINBOW August 1985
REM Industries, Inc.
presents
the CoCo Cooler Th ank y 0y
SWEEPSTAKES
Grand Prize
Your Choice of a
64k Color Computer II or Modem II or DMP105 Printer
(5) I st Prizes
Your Choice of a
CoCo Cooler $44.95
or
CoCo Cooler Too$44.95
(20) 2D4 Prizes
Q pad
$14.95
jftSterd Prizes
Keyboard Cover $9.95
(20)4th Prizes
(lOO)Sth prizes
Anti Zap
$3.95
Disk Marker
$1.49
Reason for Sweepstakes
How do you say Thank You! to a I I of the
people that have supported you and bought
your products over the last two and a half
years? We decided to say Thank You I with a
first of Its kind CoCo Cooler Thank Youl
Sweepstakes with prizes that will help you
for years as you continue In computing.
Rules
(I) One entry per household. (2) Entries
must be postmarked no later than midnight
September 30, 1985. (3) Choice of Grand and
1st prizes must be marked on entry blank to
validate entry. (4) All prizes will be
awarded October 15, 1985. (5) Requests for
list of winners must Include SASE.
Ordering Information
Add $2.50 shipping for U.P.S. In 48 states.
Add $4.00 shipping for U.S. Mall to P.O.
boxes, AK, HI, APO's and Canada.
Add $15.00 shipping for overseas.
California residents add 6. 5% sales tax.
United States residents add $3.00 for COO.
Entry Blank
Name.
Address.
City, State, Zip
If I win, I would like
Grand 64k CoCo II
Prize: RS Modem II
CoCo Cooler
CoCo Coo I er
Too
as my
1st
Prize:
RS DMP105
Age: under 18 18-25 26-35 36-50 50 +
I do don't subscribe to RAINBOW Magazine.
Yes, send me Information on a CoCo RS232 switcher
__three line at $19.95, two line at $14.95.
I presently own the following computers:
NO PURCHASE NECESSARY.
Mail tO- REM Industries, Inc.
9420 "B" Lurline Ave.. Cholsworth. Co.. 9131 1
(818)341-3719
183 , 133C2R6L6D4R6D4L6BM193 , 133R4
L2D8BM2j81,133R4D6F2H2U2L4D4U8BM2
11, 133R6L6D4R2L2D4R6"
123 DRAW"BM168,79C2D8C4R2L4D2R4B
M145,76C1L2U2R2BM145,88C2L8C4U2L
2D4R2BM1J86,99C1L2U2D4L2U4BM84,79
C2D8C4R2D2L4BM65 , 8^C1L2U2L2D4R2B
M47 , lj3j3C2U8C4R2U2L4D2BM28 , 96C1L2
U2L2D4R2BM221,13 3C2D8U8F4R2D4U8B
M231, 133R6D2U2L6D8R6U2R2L4BM243 ,
133R4L2D8BM251, 133D8U4R4U4D8"
124 DRAW"BM31 f 64C2R8C4U2R2D4L2BM
52 , 55C2D8C4R2D2L4U2BM73 , 56C1R2U2
R2D4L2BM1J38 , 47C2R10D4C4R2D2L4U2B
M127 / 31C2U8C4R2U2L4D2BM132,35C1D
2R2D2L4U2BM174 , 35C2L6U6C4R2U2L4D
2BM151,12C2Dlj8C4R2D2L4U2BM178,12
C1R2U2R2D4L2"
125 DRAW"BM98,19C2L6C4U2L2D4R2BM
71,32C2U8L8C4U2L2D4R2BM51,36C2D6
C4R2D2L4U2BM45,20C1R2U2R2D4L2BM2
3 , 16C2D2pC4R2D2L4U2BM2p5 , 2C2R6L6
D8U4R2BM215,2R4D6F2H2U2L4D4U8BM2
25,2R6L6D4R2L2D4R6BM235,2R6L6D4R
2L2D4R6BM245,2R4F2D4G2L4U8"
126 DRAW"BM183,156C2G2D6U4R4U2D6
BM189 , 156D8U8R2D2R6U2L2D2G2E2R4D
6BM203 , 156D8U8R2D2R6U2L2D2G2E2R4
D6BM219,156G2D4F2E2U4H2BMlj33,16C
1R2U2R2D4L2" :F0RX=11T047STEP4
127 PSET(X, 137,1) :NEXTX
128 FORY=13 9T0175STEP4
129 PSET(9,Y,1) :NEXTY
13p COLOR2,3
131 IFPH>1ANDLQ<7THENLQ=LQ+1:G0T
0135
132 CLS: INPUT "LEVEL <l-5>" ;LQ : IF
LQ>50RLQ<lTHEN132ELSELQ=LQ+2
135 PRESET(X,Y) : PLAY"V3103T2 55" :
SCREEN1,0
140 X=18 6:Y=lj3/3:C=222:OO=205:PP=
25:V=222:W=J3
150 S=20:A=20
151 COLOR4,3:LINE(182,14 6)-(22j3,
148) ,PSET,B: LINE (174, 168) -(220,1
70 ) , PSET , B : C0L0R2 , 3
152 PRESET(X,Y)
155 J=JOYSTK(0) :J1=J0YSTK(1) : IFY
=11THENY=10
156 IFX=18AND Y=10THEN20000ELSEI
FX=17AND Y=10THEN20000
157 PUT(139,150)-(150,170) ,R1:EX
EC43359 : IFRND (11) =1THEN8000
158 IFPPGTNT(X+2,Y)=10RPPOTNT(X-
2 , Y) =10RPP0INT (X , Y+2 ) =10RPP0INT (
X, Y-2 ) =1THENRH=1 : PUT ( 111 , 155 ) - ( 1
20,170) ,H:ELSEIFRH=1THENLINE(104
,155) -(120, 170) , PRESET, BF:RH=,0
TRS-80 COMPUTER DISCOUNTS
COLOR COMPUTERS
26-3134 16k color II
110.00
26-3136 16k ext color II
130.00
26-3127 64k color comp
150.00
26-3029 1st disk drive
289.95
26-3130 2nd disk drive
169.95
PRINTERS
26-1276 DMP 105
169.95
26-1271 DMP-110
220.00
26-1277 DMP-430
799.00
26-1278 DWP-220
500.00
MODEL 4 and 1000s
25-1000 mod 1000
850.00
25-1004 128K memory board
200.00
25-1005 2nd drive mod 1000
170.00
26-3211 Monochrome monitor
125.00
26-1069 mod 4 64k 2dr.
999.95
26-5103 mod 2000 2dr.
1.400.00
26-5104 mod 2000 HD
2,200.00
IVe Carry the Complete Line of TRS-80
Computer Products at Discount Prices
CALL FOR A FREE PRICE LIST 800-257-5556
IN N.J. CALL 609-769-0551
WOODSTOWN ELECTRONICS
Rt. 40 E. WOODSTOWN, N.J. 08098
58
THE RAINBOW August 1985
159 IFPPOINT(X+2,Y)=40RPPOINT(X-
2 , Y) =40RPP0INT (X , Y+2 ) =40RPP0INT (
X, Y-2 ) =4THENPC=1 : PUT ( 111 , 155) - ( 1
31, 167), P ELSEIFPC=1THENLINE(111
,155)-(131,167) , PRESET, BF:PC=j3
16j3 IFJ=63ORJ=J3ORJ1=0ORJ1=63THEN
50
165 !FTIMER>=lpj3THEN6pj2ELSEPUT(l
39,15/8) -(152,170) ,R2 :EXEC43 359 : F
0RQ=1T035 : NEXTQ : LINE (13 9, 150 ) - ( 1
56,170) , PRESET, BF
170 PE=PEEK(65280) :IFPE=1260RPE=
254THEN7000ELSE155
500 IFRH=1ANDPEEK(652 80)=12 6ORPE
EK( 65280 )=254THEN7000ELSEIFJ=63T
HENIFPPOINT (X+2 , Y) =2THENPSET (X, Y
) :X=X+2: PRESET (X,Y) :GOT0165
505 IFJ=0THENIFPPOINT(X-2,Y)=2TH
ENPSET(X,Y) :X=X-2: PRESET (X,Y) : GO
T0165
510 IFJl=63THENIFPPOINT(X,Y+2)=2
THENPSET(X,Y) : Y=Y+2 : PRESET (X, Y) :
GOT0165
515 IFJ1=0THENIFPPOINT(X,Y-2)=2T
HENPSET(X,Y) :Y=Y-2 : PRESET (X, Y) :G
OT0165
520 GOT0165
600 TIMER=0:S=S-1:C=C-2:PSET(C,1
46,2) :PSET(C, 148,2) : IFC=182THEN5
000ELSEGOTO165
700 Q=RND(5) : FD=FD+Q: FORZ=lTOQ: S
OUND(Z^30) , 1: LINE (00, PP) -(00+3, P
P+2 ) , PSET , B : 00=00+8 : IF00>=2 4 5THE
NPP=PP+6: 00=205
701 IFPPOINT(X+2,Y)=4THENPSET(X+
2,Y,3) :PSET(X+3,Y,3)
702 IFPPOINT(X-2,Y)=4THENPSET(X-
2,Y,3) :PSET(X-3,Y,3)
703 IFPPOINT(X,Y+2)=4THENPSET(X,
Y+2,3) :PSET(X,Y+3,3)
704 IFPPOINT(X,Y-2)=4THENPSET(X,
Y-2, 3) :PSET(X,Y-3,3)
705 NEXTZ:SC=SC+(7*Q) :G0T0155
800 V=V-2:PSET(V, 168,2) : PSET (V, 1
70 , 2 ) : RETURN
1000 XT=RND(30)+11:YT=RND(33)+13
8
1005 LINE(XT,YT)-(XT+3,YT+3) ,PSE
T,BF
1010 AZ=1
1015 GOTO170
5000 LINE (139, 150) -(150, 170 ), PRE
S ET , BF : PUT ( 13 1 , 15 4 ) - ( 15 6 , 17 )8 ) , K :
F0RX=1T015 : PLAY"T25CCA" : NEXTX
• *•*•• SELECTED SOFTWARE **••••
BUY ANY TWO HARDWARE ITEMS AND GET 10% OFF OR
SAVE 10% ON ANY HARDWARE WITH SOFTWARE PURCHASED!
SOLDERLESS UPGRADE KITS
With easy-to-foilow instructions
64K FORE BOARD
64K FOR F BOARO
$39.95
$29.95
$29.95
64KFORCOC02*
• Now CoCo2 Model 26-31 34/36 requites one soldei
joint.
NOTE: All ICs used in our kits are first quality 150 NS
prime chips and carry one full year warranty.
BOOKS
COLOR BASIC
UNRAVELLED $19. 95
EXTENDED
BASIC UNRAVELLED $19.95
DISK BASIC UNRAVELLED $19.95
ALL 3 BOOKS ONLY $49.95
• •*••*•*****•**•*
SPECIAL
OF THE MONTH
P51 MUSTANG
TAPE DISK
$19.95 $21.95
**•**•*•*••****•
COCO MAX $69.95
Y BRANCHING CABLE $27.95
DS-69 DIGISECTOR S149.95
VOLKSMODEM 300 BAUD
With all cables $64.95
VOLKSMODEM 12
300/1 200 Baud with all cables $219.95
THE INTRONICS EPROM
PROGRAMER $139.95
DATARASE $39.95
2764 HIGH SPEED COMPATIBLE $9.95
27 128 HIGH SPEED COMPATIBLE $17.95
ROM PACK P.C. BOARD
With case lot 27XX $9.95
TEAC 55B DS/DD Half Height Drive $ 1 39.95
CASE AND POWER SUPPLY $49.00
NEW J & M DISK CONTROLLER
With J Dos 1.2 $149.00
DISKETTE CAROUSEL $29.95
ZENITH ZVM-123GREEN $119.95
ZENITH ZVM- 1 22 AMBER $ 1 29.95
VIDEO PLUS $24.95
VIDEO PLUS IIC $34.95
VIDEO PLUS IIU $34.96
REAL TALKER I
With 3 talking games $49.95
REAL TALKER II
With 3 talking games $54.95
HJL.57 KEYBOARD $79.95
Take a closer look. . .
TAPE DISK
DYNACALC - $74.95
PROCOLOR FILE - $49.95
MASTER DESIGN - $29.95
TELEWRITER G4 $39.95 $47.95
SUPER SCREEN MACHINE $35.95 $38.95
RAINBOW SCREEN MACHINE $23.95 $26.95
COLORCOM/E - $39.95
AUTOTERM $31.95 $39.95
ADOS - $27.95
FAST TAPE 021.95
THE PEEPER WITH SOURCE S24.95 $26.95
32K GAMES
P51 MUSTANG $23.95 $27.95
Optional Cable $9.95
SAILOR MAN (64KI $23.95 $27.95
WORLDS OF FLIGHT $23.95 $26.35
DRACONIAN $22.95 $24.96
SR-71 $23.15 $25.55
BUZZARD BAIT $22.35 $24.75
GALAGON $19.95 $22.35
LUNAR ROVER PATROL $19.95 $22.35
MS. GOBBLER $19.95 $22.35
LANCER $19.96 $22.35
CUBIX $19.95 $22.35
FROGGIE $19.95 $22.35
CANDY CO. $27.95 $27.95
WILLY'S WAREHOUSE $27.95 $27.95
8-BALL ROM PACK $21.95
GHOST GOBBLER ROM PACK $19.96
PIN-BALL ROM PACK S 1 9.96
WHIRLY 8IRD RUN ROM PACK $19.95
WE PAY SHIPPING in the United States, Canada & Mexico.
Overseas please add 10%. (MN Residents add 6% sales tax.)
We accept Visa, Mastercard, check or money order. U.S.
funds only for foreign orders. C.O.D. please add S2.00.
Send to:
SELECTED SOFTWARE
P.O. Box 32228, Fridley, MN 55432
24 HOUR ORDER LINE 612-757-2439
INFORMATION 612-757-1026 (11 A.M. - 2 P.M. C.S.T.
SAME DAY SHIPPING BEFORE 2 P.M. C.S.T.
August 1985 THE RAINBOW 59
*.
\
V
^
•v/ ; » j.
*** EARS
•
st
I
v;
\
^.j •* ^$£^
"W
»
^
.*
\
• 1
< I
• <
'//'
Electronic Audio Recognition System
EARS
Electronic
Audio
Recognition
System
$99.95
SPEECH
RECOGNITION
•HANDS OFF
PROGRAMMING
•HIGH
QUALITY
SPEECH
REPRODUCTION
EARS Does It All!
Two Years In the Making. Speech Systems
was formed to develop new and innova-
tive speech products. After 2 years of in-
tensive Research and Development, we
have created a truely sophisticated
speech recognition device. Recognition
rates from 95% to 98% are typical. Until
now, such a product was outside the
price range of the personnel computer
market, and even small businesses.
EARS is trained by your voice and capable
of recognizing any word or phrase.
Training EARS to your particular voice
print takes seconds. Up to 64 voice prints
may be loaded into memory. You may
then save on tape or disk as many as you
like so that your total vocabulary is virtu-
ally infinite.
Speech and Sound Recognition. EARS is re-
ally a sound recognition system, so it re-
ally doesn't matter whether you speak in
English, Spanish, orFrench. In fact you do
not have to speak at all, you can train
EARS to understand sounds such as a
musical note or a door slamming.
Hands Off Programming. Imagine writing
your own BASIC programs without ever
touching the keyboard. Everything that
you would normally do through a
keyboard can now be done by just
speaking.
Programming EARS Is Easy. LISTEN,
MATCH and other commands have been
added to BASIC so that programming
EARS is a piece of cake! The single BASIC
line: 10 LISTEN: MATCH will instruct
EARS to listen to you and return the
matching phrase.
It Talks. EARS is also capable of high qual-
ity speech. We mean REALLY high quality.
The speech is a fixed vocabulary spoken
by a professional announcer. Speech
Systems is currently creating a library of
thousands of high quality words and
phrases. For a demonstration call (312)
879-6844, you won't believe your ears or
our EARS.
DISK OWNERS. EARS will work with any
disk system with either a MULTI-PAK or
Y-CABLE. Our new Triple Y-CABLE was
specifically developed for those wishing
to add SUPER VOICE as a third device.
You Get Everything You Need. You gel ev-
erything you need including a specially
designed professional headset style noise
cancelling microphone. The manual is
easy to use and understand. Several
demonstration examples are included so
you don't have to write your own pro-
grams unless you want to. EARS will work
in any 32K or 64K Color Computer.
SUPER VOICE $20 OFF
Imagine talking to your computer and it
talking back to you. When you need an
unlimited vocabulary, you can't beat
SUPER VOICE. For a limited time, we will
give you the SUPER VOICE for $59.95 with
your EARS purchase. Even if you already
have another speech unit, here is your
chance to buy the best and save $20.
VOICE CONTROL
Applications for EARS are astounding.
Here is our first of many listening pro-
grams to come. VOICE CONTROL is a
program specifically designed to allow
you to control any appliance in your
house with your voice and our HOME
COMMANDER (sold separately). For
example, you can control your TV by
saying "TV ON" or TV OFF". $24.95
1
—
VISA'
[MasterCard]
^™ -^^
Dealer Inquiries
Invited
'//<
Speech ^udt
em. A
We accept CASH, CHECK, COD, VISA and MASTER CARD orders.
Shipping and handling US and Canada $3.00
Shipping and handling outside the US and Canada $ 5.00
COD charge $2.00
Illinois residents add bV*% sales tax
38W 255 DEERPATH ROAD
BATAVIA, ILLINOIS 60510
(312) 879-6880 (VOICE)
coloSama E (312) 879-6811 (24 HR. BBS)
CALL ANY DAY TO ORDER. ALSO ORDER BY MAIL OF BBS.
'SUPER VOICE'
COCO'S MOST ADVANCED
SPEECH SYNTHESIZER.
IT TALKS, SINGS AND
MORE.
only . . . $79.95
WITH EARS OR PIANO
KEYBOARD PURCHASE
only . .a $59.95
SUPER VOICE is no ordinary speech synthesizer. It uses Silicon
Systems, Inc. SSI-263, the most advanced speech/sound chip
available. SUPER VOICE is not only capable of highly intelligible
speech, sound effects, and singing over a 6 octave range, but now
we have turned SUPER VOICE into a monophonic Super Music
Synthesizer with our PIANO KEYBOARD.
IT TALKS. A free TRANSLATOR text-to-speech program makes
writing your own talking program as easy as SAYING "HELLO."
SUPER VOICE works in any 32K or 64K computer. A disk system
requires a Y-Cable or Multi-Pak.
Here are the facts;
the decision is yours.
I REAL TALKER
RS SPEECH
CARTRIDGE
VOICE-PAK
Synthesizer Device
-
scot
SP 256
SC-01
Speaking Speeds
:.
16
1
1
Velume Levels
1
1
Articulation Rates
a
1
1
Vocal Tract
Filler Settings:
zss
1
1
Basic unil
ol Speech
64 phone
l otiriiioni net
64 phonemes
64 allophones
5 pause lengths
64 phonemes
Pilch Variations
40M 13? iojoi.
win 4 imiBctmn
'
1
4
• - •■
W> ■ ■■■' -"^ "--w->>- - >^
•"■■■.- : ;■•?•£» •- • ***
. --- : - -' '■ v >>. ' - ■>?
• •»? - -,-- • . •-
FOOL'S CROSSING
The world's first TALKING HI-RES GRAPHICS adventure. Finding
the hidden treasure is the easy part, getting back home is another
story. FREE EARS to the first one to submit a solution.
32K Disk S24.95
SUPER TALKING HEADS
When the SUPER VOICE speaks in a low pitched voice, the man
speaks, when a high pitched voice is used the woman
speaks S24.95
•a^THE PIANO KEYBOARD SI
A 2'/2 octave (32 note) and 4 octave (49 note) professional Piano Keyboard connects to your COCO and
SUPER VOICE to turn SUPER VOICE into a real music synthesizer. These keyboards are not toys. They are
the same style, shape, size and 1eel as professional synthesizer keyboards. Included is the software to give
MUSICA 2 (sold separately) Piano Keyboard input and SUPER SYNTH, a program that allows you to control
critical SUPER VOICE parameters to develop incredible sounds.
Disk system will require a Triple Y-Cable or a Multi-Pak. We have lots more plans for these keyboards, so
keep watching our ads.
2'/2 octave (32 note) $79.95 4 octave (49 note) $1 19.95
'HOME COMMANDER'
$59.95
The HOME COMMANDER easily connects (o the
cassette port of yourColorComputerand lets you
control appliances in your home.
NO WIRES NECESSARY
The HOME COMMANDER uses your home's
existing electrical wiring to control virtually any-
thing. Appliances are controlled via small control
modules available at your local SEARS or Radio
Shack store.
ON FRIDAY 7:42 PM, OFF
SUNDAY 1:26 AM
Included FREE is a program to allow you to control
up to 256 devices and specify the time and date
they are to be activated. That's right, the software
has its own built in accurate clock.
Imagine controlling a light or TV with your voice.
When used with our Electronic Audio Recognition
System, EARS, you can literally control any
appliance.
PLUG'N POWER USERS
If you were disappointed in the software that
came with the Radio Shack PLUC'N POWER unit,
and you probably were, we'll offer you our pow-
erful software separately. An early version is de-
scribed in the Feb., April, lune, and August 1983
issues of RAINBOW. Our current version is even
better $1 9.95
PLUC'N POWER is a trademark of Radio Shack"
PRECISION TIME MODULE $59.95
— INCLUDES OS9 DRIVER —
Now your computer will always know the correct
time and date. This amazing precision time mod-
ule is calibrated to the National Bureau of Stan-
dards (WWV) atomic clock and you should never
have to change it.
Use the PRECISION TIME MODULE to add the
time element to your games or use on BBS. If you
like, purchase separately our BBS.
COLORAMA BBS (64 K, 1 drive minimum) $99.95
BATTERY BACKUP
Even when your computer is off, the clock
keeps correct time by operating using the
internal battery backup system.
SI***'
MONTHS, LEAP YEARS & DST
The PRECISON TIME MODULE automatically
adjusts for the different number of days in
each month as well as leap years. And believe
it or not, it adjusts for DST so you don't have to
remember if it's SPRING FORWARD or FALL
FORWARD.
Y-CABLE $28.95
Why pay $100 to $200 for a multi-pak. With
the Y-CABLE, you can connect your disk
system to your computer along with either
our STEREO PAK music synthesizer, our
VOICE, SUPER VOICE speech synthesizers,
or our PRECISION TIME MODULE. All con-
nectors gold plated.
TRIPLE Y $34.95
We developed the Triple Y-Cable specifically
for those interested in both speech synthesis
and speech recognition. The Triple Y-Cable
lets you connect EARS and SUPER VOICE to
your color computer along with your disk
system.
. Need an
^ ATTENTION EXPERIMENTERS! «*' $2900
Interested in building your own project? Disks (any quantity) SI. 49
Our oversized board gives plenty of room Tape C-1 0, C-20 $0.69
for construction whilethesturdyaluminum Advanced Hard Tape Box $0.29
case with black satin finish assures protec- £^ ec 6821 $2 95
tion and a professional appearance. SSI-263 74 LSI 38 $0.79
Prototype Board only $19.95 $34.95 7407 so - 79
Prototype Enclosure only $19.95 IC sockets 14, 16, 22 pin $0.29
Buy both for $29.95 'C sockets 24, 28, 40 $0.39
^
FREE
BLANK DISK
^S. OR TAPE
^> WITH EVERY
ORDER
7u
#
VISA'
MostwOcmj
Dealer Inquiries
Invited
We accept CASH, CHECK, COD, VISA and MASTER CARD orders.
Shipping and handling US and Canada S3. 00
Shipping and handling outside the US and Canada $ 5.00
COD charge $2.00
Illinois residents add 6V«% sales tax
emd
Speech S^udti
38W255 DEERPATH ROAD
BATAVIA, ILLINOIS 60510
(312) 879-6880 (VOICE)
coloSa B m T a e (312) 879-6811 (24 HR. BBS)
CALL ANY DAY TO ORDER. ALSO ORDER BY MAIL OF BBS.
'//<
fO*
s\<*
*W
&*
»»
NjOV
cV
•VPIANO KEYBOARD ft
The best music composition program, MUSICA 2, and most advanced speech/sound
synthesizer, SUPER VOICE, just got better.
Imagine, now you can compose music with MUSICA 2 by inputting notes via a real
piano keyboard. Hit A# and MUSICA 2 instantly displays the note.
The same keyboard can be used with SUPER VOICE to give you a real monophonic
music synthesizer. The PIANO KEYBOARD comes in a 2!6 and 4 octave version. They
are not toys. They are the same style, shape, size, and feel you find in professional
synthesizers.
Included is an enhanced command which gives MUSICA 2 (sold separately) piano
keyboard input. Also included is SUPER SYNTH, a program which turns SUPER VOICE
(see $20 off special offer) into a Super Synthesizer. Disk owners must use a Y-CABLE or
Multi-Pak.
Vh octave (32 note) $79.95 4 octave (49 note) $1 19.95
M U S I CA 2 W -2 5
• When in stereo mode, music is
played through our STEREO PAK
(purchased separately).
• Loudness of each voice may be
individually specified.
• Memory available is constantly
displayed.
• Voice waveshapes may be
exchanged between voices at any
point.
• Tempo may be specified and may
even be altered as the music plays.
• Flats and sharps supported.
• Billions of timbre combinations.
• High resolution graphic display,
looks just like sheet music.
• MUSICA 2 is 100% software, no need for
hardware unless you want music produced in
STEREO. In that case, the STEREO PAK may be
purchased separately. It's a must for the
audiophile!
• Repeat bars allow repeating of music without
re-inserting music a second or third time.
• 30 page manual describes all.
• Requires minimum of 32K.
t 9:97445080
3 3:95577000
1C 4S=MEHQRY
2 7:98750000
4 9:95443201
iMuuii
• Output music to your printer
(Gemini 10X, Epson, R.S. printers).
Mar
• Allows you to specify key signature.
• Voice timbre (waveshape) may be
altered by specifying harmonic
content just like stops on an organ.
• During editing, voice being inserted
is displayed.
• Each measure is numbered for easy
reading of music.
• Measure bars aid in reading and
developing music.
• Each voice may be visually
highlighted for easy identification.
• 4 Voices produced simultaneously.
• Input notes from Coco keyboard,
joystick, or Piano Keyboard.
• Play music from your own BASIC program.
• Block copy music for easy music development.
• 100% machine language so it is lightning fast.
• Vibrato effect easily produced.
• With STEREO PAK, voices may be switched
between left and right speakers as music plays.
• Durations include: whole, half, quarter,
eighth, sixteenth, thirty-second, sixty-fourth,
and triplet.
U & MUSIC THEORY <7 rt
An advanced music course that covers Major and Harmonic Minor scales, interval spelling, Triad (Chord) theory, Inversions, Dominant 7th
chords, and interval ear training. Format of the course includes drill and practice sessions, ascorecard to measure progress, graphics and sound
output, and a reviewing session.
32K Disk only $49.95
&* STEREO PAK™ $39.95
Plug this gem into your computer, connect to your nome
stereo system and sit back and enjoy music realism. The
STEREO PAK is a hardware music synthesizer that plays our
MUSIC LIBRARY and MUSICA 2 music in stereo. Because it
was designed specifically with music reproduction in mind,
the sound is superb. The highs are crisp and clear while the
bass notes will rattle your walls.
The STEREO PAK is all hardware. It is intended as an
enhancement for MUSICA 2 and our MUSIC LIBRARY. Disk
owners may use the STEREO PAK with the R.S. Multi-Pak or
our Y-CABLE ($28.95)
u&
*«
HP
«*'
MUSIC LIBRARY 100 categories:
Stage, Screen, and TV Classical
Christmas (popular)
Christmas (traditional)
Patriotic
Polka Party
^ MUSIC LIBRARY™ — 3 VOLUMES
You get over 100 four voice songs with a combined
playing time of 3 hours. That's right, 3 hours of music. You
won't belive your CoCo could sound so good. To fit over
100 songs required both sides of 5 C-20 tapes and the disk
version uses 5 full disks (that's a half box of disks).
AJUKE BOX selection program is included to allow you to
select specific songs or automatically play each. These
songs are ready to go, you don't need MUSICA 2 or a
knowledge of music.
These songs were developed using the best music program
available for the CoCo; MUSICA 2. The tunes may be used
as source files for MUSICA 2 and changed by the user.
When coupled with the STEREO PAK the songs are
reproduced in stereo with unsurpassed realism.
Music of the 70's
Music of the 60's
Music of the 50's
Old Time Favorites
MUSIC LIBRARY 200
Our second volume of 100 tunes, Vh hours of musfc.
MUSIC LIBRARY 300
Our third volume of 100 tunes, 3 more hours of music.
MUSIC LIBRARY(Each Volume).. (32KTape) ... $34.95
(Specify 1 00, 200, or 300) (32 K Disk) .... $39.95
SPEECH SYSTEMS
DATAPEN $29.95
Two programs are provided
free with each DATAPEN.
SKETCH is a superb high reso-
lution color drawing program
allowing precise drawing and
freehand sketching, painting
and much more. SHAPE
CREATE is a high resolution
library shape drawing program.
You can even save your work
to tape or disk for later display
or editing.
The software is shipped on
tape and may easily be moved
to disk. Included is complete
documentation to allow you
to integrate the DATAPEN into
your own BASIC program.
Requires 32K.
EASY TO
USE!
EDUCATIONAL
SOFTWARE
An easy and tun way for kids to
enter answers.
Vol. 1 — grades 1, 2, and special
education.
Includes these five programs:
• Basic Addition
• Basic Multiplication
• Match the Shapes
• Match the Numbers
• Rhyme the Words
32Kdisk $29.95
Vol. 2 — grades 3 to 6 and
special education
Includes these five programs:
• Men of Science
• Mixed Math
• World Capitals
• Computer Terms
• 20th Century Events
. •
VISA*
MasterCard]
^^P^^^
Dealer Inquiries
Invited
'//'
S^peech ^ust
y
*erns
We accept CASH, CHECK, COD, VISA and MASTER CARD orders.
Shipping and handling'US and Canada S3. 00
Shipping and handling outside the US and Canada S5.00
COD charge $2.00
Illinois residents add 6 '/«% sales tax.
38W255 DEERPATH ROAD
BATAVIA, ILLINOIS 60510
(312) 879-6880 (VOICE)
coLonA Y M T A E (312) 879-6811 (24 HR. BBS)
CALL ANY DAY TO ORDER. ALSO ORDER BY MAIL OF BBS.
50JS1 CLS4:PRINT§lp2,"may ,l C$"you"
C$ l, rest"C$"in"C$"peace" ;
5j3j32 FORE=128TO480STEP32:PRINT@E
; STRING$(31," ");:NEXT
50J33 PRINT§224, "YOU FREED "FD" P
EOPLE . . . " ;
5£J34 PRINT@32#,"AND KILLED "XI"
IMPERIALS . . . " ;
5pj35 PRINT@3 84,"FOR A TOTAL SCOR
E OF "SC;
5jd06 IFINKEY$=""THEN5j3^6
5,0)37 GOT0121
6pj5p INPUTX, Y: PSET (X, Y, 1) : SCREEN
1,0: FORX=lTO20j3 : NEXTX : GOTO60J30
6999 RH=1
7j3j2j3 IFRH=,0ANDPC=0THEN155ELSEIFP
C=1THEN700ELSEIFRH=1THEN FOR C=l
82 TO220:PSET(C, 146,4) :PSET(C,14
8,4) : PLAYS TR$ (INT ( (224-C)/4) ) :NE
XTC:S=20:C=222
7005 FORV=174TO220:PSET(V, 168,4)
:PSET(V, 170,4) :PLAYSTR$(INT( (22 4
-V)/4) ) :NEXTV:V=222
7010 IFPP0INT(X+2,Y)=1THENPSET(X
+2,Y,3) :PSET(X+3,Y,3)
7015 IFPP0INT(X-2,Y)=1THENPSET(X
-2,Y,3) :PSET(X-3,Y,3)
7020 IFPP0INT(X,Y+2)=1THENPSET(X
,Y+2,3) :PSET(X,Y+3,3)
702 5 IFPP0INT(X,Y-2)=1THENPSET(X
,Y-2,3) :PSET(X,Y-3,3)
7030 GOT0155
8000 EX=RND(19)+15:EY=RND(16)+14
3
8005 LINE(70,137)-(129,170) , PRES
ET,BF
8010 COLOR4,3:LINE(EX+2,EY+l)-(E
X, EY+5 ) , PSET , BF : COLOR2 , 3 : J=JOYST
K(0) :Jl=JOYSTK(l)
8011 IFJ<6THENJ=6
8012 IFJK6THENJ1=6
8015 J=INT(J/6) :WX=(J*4)+6:J1=IN
T(Jl/6) :WY=(J1*4)+134
8020 PSET(WX,137,4) : PSET (9 ,WY, 4)
8025 Q=PEEK ( 65280) :IFQ=12 60RQ=25
4THENPK=PPOINT(WX,WY) :IFV<176THE
N8050ELSEGOSUB800 : LINE (WX, 137 ) - (
WX,WY) , PSET: LINE (13 4, 157) -(73, 15
7) ,PSET:LINE(9,WY)-(WX,WY) ,PSET:
PLAY"ABABABAB" : IFPK=4THEN8030ELS
ELINE(WX,137)-(WX,WY) , PRESET: LIN
E(9,WY)-(WX,WY) , PRESET
8026 LINE(73, 157)-(134, 157) , PRES
ET:GOTO8050
8027 GOTO8050
8030 XI=XI+l:COLOR4,3:LINE(EX-4,
128KTHE EASY WAY
AS SEEN IN DECEMBER '84 RAINBOW
'D', 'E', 'F', & CoColl (USA)
LOGIC BOARD $39.95
Logic Board with 64K Socketed Ram
$109.00
128K Newletter (per year) 10.00
Star Dos 1 28K 59.95
Procolor File 59.95
1 28K Drive 3 24.95
DEALER ORDERS WELCOME
SEND FOR FREE CATALOG
CLEARANCE CORNER (Minimun Order 12)
TDP Dust Cover cost 2.46 1 .00
TDP C-20 Laaderless cost 2.76 1.00
Five PIN DIN (Joystick) cost .76 .50
Centronics 36 Pin Mais cost 3.79 3.00
WHILE SUPPLY LAST
128K OS-9 IN MEMORY DRIVE OS-9 RAM DISK DRIVER
Gives a full 64K in memory drive that works al
lightening speed when chaining programs. £^«1 95
(Does not increase useable memory). *
BASIC MEMORY MANAGEMENT*
Features full variable passing between pages
& chained programs with full command pass- $39.95
ing between multiple in memory programs.
• 64K memory required please specity board.
DSL COMPUTER PRODUCTS INC.
P.O. Box 1 176, Dearborn, Mi. 48121 Phone: 313-582-8930
Michiqan Residents add 4% Sales Tax to Order Please include S2 00 tor S 8 H
Detroit Metropolitan Area
Vist Us at 4950 Schaefer near Michigan Ave. Dearborn
In Canada you can order these
items Irom
RSR COMPUTER PRODUCTS
P.O BOX 7105 SANDWICH
WINDSOR. ONT N9C321
519-255-91 13
66
THE RAINBOW August 1985
EY) - (EX+10 , EY+10 ) , PSET , BF : C0L0R2
, 3 : FORQ=30TO100STEP5 : PLAY"T"+STR
$ (Q) +"AB" : NEXTQ : LINE (EX-4 , EY) - (E
X+10 , EY+10 ) , PRESET , BF : SC=SC+300 :
LINE (WX, 13 7 ) - (WX, WY) , PRESET : LINE
(9,WY)-(WX,WY) , PRESET: PSET (WX, 13
7,1) :PSET(9,WY,1)
8031 LINE(73,157)-(134,157) , PRES
ET:GOT0155
8050 PSET (WX, 137,1) : PSET (9 , WY, 1)
:IFRND(16)<=(LQ-2) THEN8060ELSE8
010
8060 10=10+1 :IFIO=4THENIO=0: LINE
(EX-4 , EY) - (EX+10 , EY+10 ) , PRESET , B
F: GOT0155ELSEZZ=l : Q=70 : PSET (EX+2
, EY+3 , 4 ) : PLAY"ABABCDCD M : PSET (EX+
2,EY+3,1) :IFRND(2)=1THEN9000
8065 Q=Q+ZZ:ZZ=ZZ+LQ
8066 EXEC43359
8067 J=JOYSTK(0) :J1=J0YSTK(1)
8070 IFPPOINT(146,150)=2ANDQ>=14
6THEN5000ELSEPSET (Q , 150 ,4): DV=PE
EK( 65280) :IF(DV=1260RDV=254)ANDJ
1=63THENPUT ( 139 , 157 ) - ( 150 , 170 ) , D
: LINE (139, 150) -(150, 155) , PRESET,
BF ELSEPUT(139,150)-(150,170) ,R1
8075 IFQ<=149THEN8065
8080 LINE(71,150) -(150, 150) , PRES
ET:PLAY"CDCDABAB" '.LINE (139, 150) -
(150,170) , PRESET, BF: PUT (13 9, 150)
-(150,170) ,R1: LINE (156, 151) -(162
, 151) , PRESET : LINE ( 167 , 151) - ( 180 ,
151) , PRESET :GOTO8050
9000 Q=Q+ZZ:ZZ=ZZ+LQ
9001 EXEC43359
9005 J=JOYSTK(0) : J1=J0YSTK(1)
9010 IFPPOINT(146,166)=2ANDQ>=14
6THEN5000ELSEPSET ( Q , 166 , 4 ) : DV=PE
EK(65280) :IF(DV=12 60RDV=254)ANDJ
1=0THENPUT ( 139 , 150 ) - ( 150 , 165 ) , J:
LINE ( 139 , 167) - (150 , 170) , PRESET, B
F ELSEPUT(139,150)-(150,170) ,R1
9020 IFQ<=149THEN9000
9030 LINE(71, 166)-(150, 166) , PRES
ET : PLAY"CDCDABAB" : LINE (139, 150 ) -
(150,170) , PRESET, BF: PUT (13 9, 150)
-(150,170) ,R1: LINE (156, 167) -(162
,167) , PRESET: LINE (167, 167) -(180,
167) , PRESET :GOTO8050
10000 CLS0
10001 PRINT© 13 6,"" ;
10002 POKE140,245
10005 A$="operation" :GOSUB10030
10010 A$=" freedom"
10015 P0KE1169,58:EXEC43359
10016 PRINT§146, I,M ;
Authorized Star Micronics Service Center * Call for return authorization number.
THE WAITING IS OVER!
THE SUPER COSMOS CONNECTION
SERIAL TO PARALLEL CONVERTER WITH BUFFER!
YOU JUST CANT BUY A BETTER
SERIAL/PARALLEL CONVERTER!
ORDER YOURS TODAY
- 8K SUPER COSMOS CONNECTION
ONLY $129.95
8K RAM CHIP SOLD SEPARATELY - $15.95 each
3 FOR $42.95
16K VERSION -$144.95
24K VERSION -$154.95
32K VERSION - $169.95
• SERIAL TO PARALLEL CONVERSION
• 110 TO 19,200 BAUD, 7 OR 8 BIT
• 8K BYTES STANDARD BUFFER
(USER EXPANDABLE TO 32K IN 8K STEPS)
• COPY/CLEAR, LED PUSH BUTTON (MULTIPLE COPIES)
• MODEM SWITCH AND ALL CABLES
• COMPLETE WITH POWER PAK AND SIMPLE INSTRUCTIONS
• WORKS WITH ANY PARALLEL PRINTER OR YOUR MONEY BACK
• HIGHEST QUALITY CONSTRUCTION, TWO- YEAR WARRANTY
IF YOU'D RATHER BE USING YOUR COMPUTER THAN WAITING
FOR YOUR PRINTER THE WAIT IS OVER.
TEST RESULTS: (79,056 BYTE PROGRAM
LISTING AT 9600 BAUD.)
32K SUPER COS-CON
36.8 Seconds
OTHER INTERFACE
4 min. 59.8 sec.
8K SUPER COSMOS CONNECTION
AND STAR SG-10 PRINTER
$379.00 Package S&H Included!
NO SURCHARGE FOR
CREDIT CARDS
SG-10 Package with Regular CosCon
Still Available Now at $289.00
Shipping Included!
APPLE IIC VERSION AVAILABLE
Dealer Inquiries on Company Letterhead invited.
August 1985 THE RAINBOW 67
1J3)32^5 GOSUB1003,0
10021 FORX=1TO100: NEXTX: POKE 119 8
, 45 : EXEC43 359 : PRINT@175 , " " ; : A$="
by":GOSUB10030
10022 POKE1201,45:EXEC43359:PRIN
T@202,"" ;:A$="steve":GOSUB10030
10023 PRINT@208,"";:A$="britton"
:GOSUB10030
10025 FORX=1TO800: NEXTX :G0T01
10030 F0RX=1T0LEN(A$)
10031 POKE140,150
10035 B$=MID$(A$,X,1) :PRINTB$;:E
XEC43359:F0RZ=1T0 RND(50) :NEXTZ :
NEXTX
10 40 RETURN
10045 NEXTKQ
10050 DRAW"BM88,4D7U3R4U4D7BM94,
8D3F1R3BM95,8R2D2L2BM100,6D6BM10
3 , 8D7U5R2E1U1H1L2BM116 , 4D4BM116 ,
11M116 , 11BM120 , 4D4BM120 , 11M120 , 1
1BM123 , 4D4BM123 , 11M123 , 11"
10060 FORKQ=1TO200 : NEXTKQ: LINE (8
20050 DRAW"BM40,100C2D2R6U2L4D6R
2U4C4BM39 , 100D6R2U2BM44 , 108L2D2R
2BM48 , 100D6L2U2" :GET (0 , 71) - (83 , 1
20) ,ZT
20060 PLAY"01T1 ; 4 ; 6 ; 5 ; 1 ;T1;3"
20070 FORY=71TO0STEP-1:PCLS3:W=W
+2:PUT(0,Y)-(83,Y+49) ,ZT:PLAY"T"
+STR$ (W) +"02ABCD" : NEXTY
20080 CLS0:PRINT"you"C$"have"C$"
escaped" ; : POKE1024+17 , 33 : POKE102
4+18,33
20090 FORE=12 8TO480STEP3 2: PRINTS
E,STRING$(31," ");:NEXT
20095 SC=SC+1000
30000 PRINT@224,"YOU FREED "FD 11
PEOPLE . . . " ;
30010 PRINTS 3 20, "AND KILLED "XI"
IMPERIALS . . . " ;
30020 PRINT@3 84,"FOR A TOTAL SCO
RE OF "SC;
30030 IFINKEY$=""THEN30030
30031 PH=PH+1 : CLS0 : PRINT@45 , "PHA
8,4)-(123,15) , PRESET, BF
10070 GOTO10020
20000 C$=CHR$(128) : PMODE1, 1: PCLS
3 : SCREEN1 , : COLOR2 , 3 : DRAWBM0 , 12
0C4R4L2M8 , 99R66M80 , 120R2L4BM75 , 9
9E8U12H8L66G8D12F8":PAINT(3 6,88)
,4,4: PSET ( 20 , 180 , 2 ) : DRAWBM16 , 18
3C2F2R4E2M20,187G2D2BM23,190U2":
GET (16, 180) -(24, 190) , IK: LINE (16,
-(40,99) , PRESET, BF: NEXTX
180) -(24, 190) , PRESET, BF
20010 FORJZ=1TO10: PRESET (RND( 80)
,RND(25)+71) :NEXTJZ
20020 FORX=lTOINT(FD/5)
20025 FORZ=250TO40STEP-20
20030 GET(Z,111)-(Z+10 / 120) , IS : P
UT(Z,111)-(Z+10 / 120) ,IK:EXEC4335
9 : FORA=1TO50 : NEXTA : PUT ( Z , 111) - ( Z
+10, 120), IS
20040 NEXTZ:PUT(40,111)-(50,120)
, IK : LINE ( 40 , 9 9 ) - ( 50 , 120 ) , PSET , BF
: FORT=50TO100STEP10 : PLAY"T"+STR$
(T) +"ABABABA" : NEXTT : LINE ( 50 , 120 )
SE " ; PH ; : FORX=1TO500 : SCREEN0 , 1 : N
EXTX:GOT0121
40000 CLS:A$="TO:THE FEDERATION
OF EARTH" : PRINTS0 , " " ; : GOSUB10030
:A$=" FROM: PEOPLE'S REVOLUTION FO
R" : PRINTS 64 , " " ; : GOSUB10030 : A$="A
NARCHY":PRINT@96,"";:GOSUB10030:
A$=" DATELINE : LUNA ALPHA" : PRINT@1
35,"";:GOSUB10030
40009 FORX=1TO200: NEXTX
40010 A$="WE HAVE TAKEN LUNA ALP
HA" : PRINTS192 , " " ; : GOSUB10030 : PRI
NTS218,"-STOP-"; :SOUND200,1
40014 FORX=1TO100: NEXTX
40015 A$="WE HAVE PRISONERS" : PRI
NTS256 , " " ; : GOSUB10030 : PRINT@2 82 ,
"-STOP-" : SOUND200 , 1
40019 FORX=1TO100: NEXTX
40020 A$="THEY START DYING IN 8
HRS . " : PRINTS 3 20 , " " ; : GOSUB10^ 30 : P
RINT@34 6, "-END-" : SOUND200, 1
40030 FORX=1TO500: NEXTX : GOTO1000
/^
68
THE RAINBOW August 19B5
DISK UTILITY
16K
Disk
RAINBOW il
Say 'Hello' To This
Directory Helper
By Doug Heyza
"Stop! Slow down! I want to get on!"
Have you been saying those words
every time you look at your diskette's
directory? Well, I have a solution. Hello
will help those of us who would like
to see the directory before it scrolls
down the screen.
From the program you can LOAD,
RUN, KILL and RENAME programs with
a section of the directory to look on.
The program has a total of three pages
available and 26 program names possible
per page. Hello will list the programs
you have on the pages, starting from
the first page.
After you type in the program, make
sure you save it. When you load or run
a program from Hello it will be replaced
with the program you select. A good
thing to do is save this program on your
most-used diskettes; it will save time in
changing diskettes.
Instructions
When you run Hello, the program
will ask for a drive number. Press the
(Doug Heyza is 15 years old and attends
Stevenson High School in Livonia,
Michigan. He is interested in computers
and electronics and plans to have a
computer-oriented career.)
appropriate drive number from which
you want the directory listed (0, 1, 2
or 3). The program will then assign the
programs on the disk with a letter and
display them on the screen. These letters
are used instead of typing in the whole
program name:
R
= Run
L=
: Load
N
-Rename
K.
=KiIl
P=
= Page
E=
=End
program
t=
Rerun program
To use a function, press the letter of
the function you want, which is outlined
in black at the bottom of the screen.
When using the functions Load and
Run the program asks for a letter; press
the corresponding letter to the program
you want.
Pressing 'R' (Run) will LOAD a BASIC
program and RUN it. If the program is
in machine language it will be LDADed
and EXECed. If the BASIC program needs
a CLEAR or a PCLEAR before being RUN,
don't use this option. Or, if a machine
language program needs an EXECing
address, don't use this option; you may
be able to use the next option.
Pressing 'L' (Load) will basically do
the same thing as Run except it only
LOADs the program and does not RUN
or EXEC it.
Pressing 'N' (Rename) will ask for
the letter assigned to the program you
would like to change, then there will
be a space for the new name to be
entered. Enter the name only in the blue
space (first eight characters), then enter
the extension in the red space (last three
characters). It will then ask, "COR-
RECT (YES/ NO)?" You must type YES
and press the ENTER key. Inputting
anything else will take you to the main
menu. After YES is entered it will
RENAME the program you selected and
relist the directory from Page 1.
By pressing 'K' (Kill), you will be
asked to press the letter of the program
you want to kill. After the appropriate
letter is pressed it will ask, "CORRECT
(YES/ NO)?" You must, again, type
YES. It will kill the program and relist
the directory.
Pressing 'P' (Page) will take you to
the next page of the directory. If you
are on the last page it will return to
Page 1. It will also tell you what page
you are on and the total number of
pages.
August 1985 THE RAINBOW 69
Pressing 'E' (End Program), will exit
you from the program, but will not clear
it from memory.
Pressing the up-arrow key will rerun
the Hello program. You can use this
if the program you want isn't on the
diskette you selected. First, change the
diskette when you're at the main menu
and while the disk light is off, press the
up-arrow key. The new diskette's
directory will be listed after you enter
the drive number.
If you press the wrong function, and
it is asking for a letter, pressing the
CLEAR key will take you back to the
main menu.
How it Works
Hello checks Track 17 on the drive
you select, which contains the names
of the programs on that disk. It uses
the DSKIS command. It will check from
sectors 3-11. Bytes 0-7 contain the
name. If byte is zero, then the name
has been deleted and the program skips
it. If byte is "FF" (hexadecimal), then
there are no more program names and
the program goes to the next procedure.
The extensions are in bytes 8-10 and
the last thing it looks for is the file type
(example: basic, data). That resides in
byte 1 1. If it is a BASIC program, byte
1 1 would be zero. BASIC data files are
one. Machine languages are two and
text editor sources are three. If it isn't
zero or two, it doesn't allow you to load
it. (You can find out more in your "Disk
Systems" book.)
It will then proceed to print the
directory with a corresponding letter,
one for each program on that page.
From there it goes to the main menu
subroutine and waits for a key (using
the INKEYS statement) and goes to the
proper subroutines. It uses the regular
commands to LOAD, RENAME and KILL.
To RUN it uses LOAD"program name", R.
For machine language programs it
uses LOADM and LDADM followed by an
EXEC command. The flashing cursor is
produced by a colored square being
printed before the INKEYS and a
CHR$(9), backspace, after it checks to
see if there is an INKEYS. Otherwise,
it branches to the subroutine selected.
Variables
DN —
Drive number
IS
INKEYS inputs
T$ -
Program name
E$ -
Extension name
PS —
Program name and extension
F —
File type
PG -
Number of pages
PL -
Number of program on last
page
P
Page presently on
ST -
Number of programs per
column
PN —
Program number
LP —
Program number from input
RS —
New name input from rename
Changes that Can be Made
If you have only one drive you can
put REflarks before lines 40-100 to keep
from entering the drive number every
time you run the program.
If you don't receive rainbow on
tape and don't want to type this
program in, send me S3 for postage and
handling. I'll send you a cassette copy.
My address is 36145 Jay, Livonia, MI
48152.
v\c=x^;
The listing: HELLO
tf/240...
...128
470 ...
....59
640 .. .
...213
850 .. .
...160
END ..
...70
OTO250
220 E$(N)=MID$(A$(Q) ,1+8,3)
BY DOUG HEYZA
10 'HELLO
20 CLEAR 2000
30 'SELECT DRIVE NUMBER
40 CLS
50 SOUND 200,1: PRINT "DRIVE # :"
60 PRINT" (0,1,2 OR 3)"
70 PRINT© 10, CHR$ (191) ;:I$=INKEY$
:IF 1$="" THEN PRINT CHR$(8);:GO
TO 70
80 IF I$<"0" OR I$>»3" THEN 70
90 DN=VAL(I$)
100 PRINT @ 10, DN;
110 DRIVE DN
120 DIM A$(69) ,N(69) ,T$(69) ,E$(6
9) ,P$(69) ,F(69)
130 'READ DIRECTORY
140 N=0:P=0:FOR X=3 TO 11
150 DSKT$ DN,17,X,A$(1) ,A$(2)
160 FOR Q=l TO 2
170 FOR 1=1 TO 12 8 STEP 3 2
180 N=N+1
190 T$(N)=MID$(A$(Q) ,1,8)
200 IF ASC(T$(N) )=255 THEN N=N-1
.-GOTO270
210 IF ASC(T$(N))=0 THEN N=N-1:G
230
240
250
2 60
270
280
290
300
310
3
320
330
P$(N)=T$(N)+"."+E$(N)
F(N)=ASC(MID$(A$(Q) ,1+11,1) )
NEXT I,Q,X
'PRINT FILES
PG=INT(N/2 6+.97)
PL=INT( ((N-(PG-l)*26)/2)+.5)
P=P+1
CLS
IF P=PG THEN ST=PL ELSE ST=1
FOR PN=1 TO ST
PRINT CHR$(PN+9 6) ;" ";P$(PN+
((P-l)*26)),
340 IF P$(PN+ST+( (P-l) *26) )="" T
HEN 3 60
350 PRINT CHR$(PN+ST+96) ;" ";P$(
PN+ST+((P-1)*26) )
3 60 NEXT PN
370 'MAIN MENU
3 80 SOUND 200,1: PRINT© 4 4 8," rUN
10AD REnAME kILL eND" ;
3 90 PRINT© 4 80, "FUNCTION: " ; CH
R$(126) ;"RUN pAGE" ;P; "OF" ;PG;
400 PRINT@490,CHR$(175) ;:I$=INKE
Y$:IF 1$="" THEN PRINT CHR$(8);:
GOTO 400
410 IF I$="R" THEN 500
420 IF I$="L" THEN 580
430 IF I$="N" THEN 660
70
THE RAINBOW August 1985
MEDIEVAL ADVENTURE
Use Your Weapons and Your Wits! Fight Off The
Evil That Lurks In The Dark And See If Yo
Can Escape From The Multi-Leveled
Dungeon Of DENNA!
Alter capturing the Castle of Denna, you and your trusted followers
are given to wine and song and celebration. So much celebration that
you deplete the overthrown king's ale and must rummage the castle
tor more. You soon discover a small strongbox covered with strange,
indecipherable writings. You bring it back to your comrades where you
discover inside a rusted metal staff on which similar writings are
recorded. Convinced it is a powerful magic wand, you become the
focus of jokes and chiding. One of your friends playfully touches the
staff to your shoulder while scoffing at your belief in magic. Their
boisterous laughter is quickly replaced with open-mouthed astonish-
ment as you vanish in a blinding flash of light. You find yourself in a
dark, damp and stinking dungeon deep within the bowels of the castle.
Armed with nothing more than your good sense and survival skills, you
must avoid being killed by the many monsters and pitfalls inhabiting
these depths. You must ESCAPE FROM DENNA.
DENNA is a graphic adventure game requiring 32K and Extended
Basic. Player picks his character along with strength, agility, physique
and alertness. He must maneuver through a multi-tiered dungeon
whose play and characteristics are different every game. Player col-
lects items, inventory, checks status and any ol 7 other options. Com-
bat with all sorts of monsters. Lots of fun. Cassette $25.95 and disk
$28.95. Versions are ditferenl.
THE POWER OF THE TRS-80
COLOR COMPUTER by John
Sharp and David Bolton is a great
guide to programming featuring
short, powerful programs in-
cluding Bar Chart Plotter, Secret
Code Maker, Racing Driver, City
Bomber, Space Invader, Check-
sum, Bio-rhythms, Lissajous
Figures, True Interest Rate. Data-
base, Screen Crawler and much
more. Plus sections on de-
bugging, checksums and program
merge. Routines are fully docu-
mented in clear, concise terms.
This booh is loaded with features
lor experts and beginners alike.
$14.95.
COLOR COMPUTER
m.
"7 ^WJV^
Programs and Programming
(or Ihe TRS-80 Color Computer
RIVER CROSSING
A Company Commander Game Module From
ARK ROYAL GAMES For The TANDY Color Computer
RIVER CROSSING A Company Commander game module. (Player
must have C/C to play.) Involves a host of new functions including
Situation Map, new terrain features, minefields, spotters, late arrivals,
flamethrowers and renovated operation of direct lire, weapon mal-
function, artillery, enemy armor operations, terrain modifiers and a
more precise victory objective as player takes on Russian, Japanese
or German opponent in any of 12 scenarios including Borisov, New
Guinea, Guadalcanal, Pont i'Abbe, Kursk (where you command an
armored squad ol Panther tanks), Peleliu, Remagan, Sicily and others.
$19.00 tape or disk.
OTHER ARK ROYAL GAMES...
Some at reduced prices!
Battle of Midway 32K $27.95
Company Commander 32K
Waterloo 32K
(Mar 84)- * $22.95
• Guadalcanal 32K
$29.95
Battle of the Bulge 32K $25.95 Battle for Tunis 32K $20.95
Across the Rubicon 32K Kamikaze 32K
(Feb '84) $24.95 (Apr '83) - - $19.95
" ' Denotes Rainbow Review Month.
* Special: Start yout war games collection with this for $10.00.
WRITE FOR FREE CATALOGUE.
ARK ROYAL GAMES
P.O. Box 14806
Jacksonville, FL 32228
(904) 786-8603
Prices on all games include shipping, Florida Residents add 5% tax. All games available on
disk, add $3.00. All programs shipped wilhin 24 hours regardless ol check or money order. We
pay shipping lo U.S. and Canada. Others add 10%. Dealer Inquiries invited. COO's accepted in
U.S.A. No bankcards. All programs require Color ComPuter TM (Tandy Corp.) or TDP System
100 Computer TM (RCA).
440 IF I$="K" THEN 820
450 IF I$="E" THEN END
460 IF I$="P" THEN 920
470 IF I$=" A " THEN RUN
480 SOUND 20, 5: GOTO 400
490 'RUN
500 PRINT@448,"RUN LETTER:
ii .
510 GOSUB 950
520 IF F(LP)=1 THEN PRINT@480,"C
AN ' T LOAD DATA " ; :
SOUND 200, 5: FOR EE=1 TO 500: NEXT
EE:GOTO 500
530 PRINT© 4 4 8, "RUNNING: ";P$(LP)
540 IF F(LP)=2 THEN LOADM P$(LP)
:EXEC
550 IF F(LP)=0 THEN LOAD P$(LP),
R
560 GOTO 380
570 ■ LOAD
580 PRINTS 4 4 8, "LOAD LETTER:
ii •
i
590 GOSUB 950
600 IF F(LP)=1 THEN PRINT@480,"C
AN ■ T LOAD DATA " ; :
SOUND 20, 5: FOR EE=1 TO 500: NEXT
EE:GOTO 500
610 PRINT§448, "LOADING: ";P$(LP)
•
620 IF F(LP)=2 THEN LOADM P$(LP)
:END
630 IF F(LP)=0 THEN LOAD P$(LP):
END
640 GOTO 3 80
650 'RENAME
660 PRINT§448,"RENAME LETTER:
ii •
#
670 GOSUB 950
680 PRINT@448,P$(LP) ;" TO ";STRI
NG$(8,175) ;".";STRING$(3,191) ;
690 PRINT@464, ;: SOUND 200,1: LINE
INPUT N$
700 IF LEN(N$)>8 THEN 680
710 PRINT@472 , " . " ;STRING$ (3 , 191)
720 PRINT@473,
INPUT E$
730 IF LEN(E$)>3
740 R$=N$+"."+E$
750 PRINT§4 80,STRING$(31," ");
760 PRINT@480, "CORRECT (yes/no)?
: SOUND 200,1: LINE
THEN 710
770
780
300
790
800
810
820
830
840
850
8 60
ii .
870
880
300
890
900
910
920
930
940
950
r]
SOUND 200,1: LINE INPUT YN$
IF YN$<>"YES" THEN CLS : GOTO
RENAME P$(LP) TO R$
GOTO 140
•KILL
PRINT§4 4 8, "KILL LETTER:
ii •
GOSUB 950
PRINT@448,"KILL: ";P$(LP);
PRINT@480,STRING$(31," ");
PRINT@480, "CORRECT (yes/no)?
SOUND 200,1: LINE INPUT YN$
IF YN$<>"YES" THEN CLS: GOTO
KILL P$(LP)
GOTO 140
'PAGE
IF P=PG THEN P=0
GOTO 2 90
•INPUT LETTERS
SOUND 200,l:PRINT@4 80,"[clea
TO EXIT TO MENU ";
960 PRINT@4 63,CHR$(2 55) ; :I$=INKE
Y$:IF 1$="" THEN PRINT CHR$(8);:
GOTO 9 60
970 IF I$=CHR$(12) THEN 380
980 LP=(ASC(I$)-64)+((P-l)*26)
990 IF P$(LP)="" THEN SOUND 20,5
: GOTO 960
1000 PRINT§480,STRING$(31, " "
1010 RETURN
/^\
Corporation Plus is a fast paced arcade styled game combining skill, strategy and luck. In
the course of the game, players may buy and sell corporations, invest in the stock market,
buy lottery tickets, lose or gain capital in situations on the board or go bankrupt.
One to Seven players can play or players may compete against the computer.
Requires 32K Extended Basic
Corporation Plus — $24.95
(Add $2.50 shipping and handling)
Send Check or Money Order To:
DiamondStar Software
P.O. Box 21580
St. Petersburg, Fla.
33742
RAINBOW
CF.nU'iCA'iO'J
SEAl
^^^W^»OttS****S****3«3^^
72
THE RAINBOW August 1985
By Bob, Daniel and Tino Delbourgo
It is quite common to get a view of
the rotating Earth at the start of
a news program. This is easy to
arrange through cinefilm or on main-
frame computers with powerful graph-
ics, but represents a real challenge on
small microcomputers with their limited
memories. We offer you a program for
our favorite 64K machine which just
manages such a graphics feat. (You can,
of course, adapt it to other
circumstances.)
(Bob, Daniel and Tino Delbourgo are
a faiherj sons programming learn who
have a particular interest in computer
graphics. Tino delves into machine
language, Daniel handles graphics and
Bob provides the mathematical
formulae.)
There are two tricks needed to
simulate a spinning world: First, one
has to devise a way of encapsulating
the map of the Earth; second, one must
find a way of storing the pictures in
the computer — this is where the
memory limitation is most acute.
For trick #1, we have broken up the
world into 18 lunes (20 degree separa-
tions between lines of longitude),
marked out the key vertices that needed
joining and stored them in strings via
DATA statements. Then, depending on
the orientation of the Earth, we have
called them up, done the necessary
spherical projection and drawing, and
stored the frame on tape or disk. For
trick #2, we have managed to release
36 graphics pages in PM0DE2 (a large
slice of memory), and after calling up
Around
The
World
In
18
Frames
the pictures from tape or disk, stored
each frame in two pages.
After that it is a simple matter to flick
through them in quick succession and
get a perfectly satisfactory representa-
tion of the turning world. The eye is
easily deceived into thinking the motion
is smooth; with fewer pictures this
would not have been true.
The program is necessarily divided
into two parts. Listing 1 , Earthrot, takes
care of the world map and the successive
drawings. When running it, do make
sure your tape or disk is ready to store
the 18 screens. Pageturn, the second
listing, contains a machine language
injection to release 20 pages in the upper
reaches of the 64K.
ofthe64K.
In addition, you will need to do some
appropriate PDKEs to release a further
16 pages in the lower 32K — the
instructions appear in the program.
With all this memory available, loading
the screens becomes a cinch (remember
to have your disk ready or your tape
properly rewound). The final step is the
cinematography.
Even if your colleagues have another
computer brand, they will be impressed
by the versatility of CoCo, so please
bring them along to the show!
(The Delbourgos may be reached at
15 Willowdene Ave., Sandy Bay,
Hobart, Australia 7005 for any questions
you may have concerning these
programs.)
August 1985 THE RAINBOW 73
Listing 1: EARTHROT
f 110 ...
....90
*' 200 .. .
...38
290 ...
...246
360 ...
1
390 ...
...217
470 ...
...97
END .
70
10 CLEAR17J20:PI=3. 141592 65 : CLS : P
RINT M ROTATING EARTH — THE DELBO
URGOS": PRINT "WAIT A MOMENT FOR T
HE GEOGRAPHICSTRINGS TO BE READ
ii
2j3 DIMN(20) ,A$(2j3) :N ( 1) =45 :N (2) =
40 : N ( 3 ) =4 3 : N ( 4 ) =20 : N ( 5 ) =20 : N ( 6 ) =
46:N(7)=69:N(8)=44:N(9)=25:N(10)
=15:N(11)=10:N(12)=18:N(13)=17:N
(14)=42:N(15)=63:N(16)=27:N(17)=
11:N(18)=36
30 FORJ=lT018:FORI=lTON(J) :READL
A , LO : A$ ( J) =A$ (J) +CHR$ ( LA+90 ) +CHR
$(LO) :NEXTI,J
40 PRINT :PRINT"WILL YOU SAVE THE
PICTURES TO <T>APE OR <D>ISK?
ii
50 IN$=INKEY$ : IFIN$= ,I T"THENDE=1 :
GOTO70
60 IFIN$="D"THENDE=2:VERIFYON:GO
TO70ELSE50
70 FORJ=18T01STEP-l
80 PMODE2,1:PCLS1:SCREEN1,0
90 F0RK=1T09:I=J+K-1:IFI>18THENI
=1-18
100 LA=ASC(LEFT$(A$(I) ,1) )-90:LO
=ASC(MID$(A$(I) ,2,1) )-110+20*K:W
=0
110 LO=LO*PI/180:LA=90-LA:LA=LA*
PI/180 : GOSUB200 : X1=X : Y1=Y
120 FORII=3TOLEN(A$(I) )STEP2:LA=
ASC(MID$(A$(I) ,11,1) )-90:LO=ASC(
MID$(A$(I) ,11+1,1) ) :W=0:GOSUB210
:NEXTII,K
130 CIRCLE (128, 96) , 96 ,0 : CIRCLE (1
8,18) , 16: LINE (18,18) -(18+16*COS(
J*2*PI/9) ,18+16*SIN(-J*2*PI/9) ) ,
PSET : PAINT ( 2 40 , 190 ) , , : PAINT ( 20
,19J3),0,0
13 5 IFJ=2*INT(J/2)THENPSET(10,90
,1) :PSET(30, 170,1) : PSET (210, 6 , 1)
: PSET (2 30, 70,1) : PSET (23 5 , 130 , 1) :
PSET(220, 180,1) :PSET(250,40,1) :P
SET(10, 130,1)
140 IFDE=2THENSAVEM"PAGE"+MID$ (S
TR$(19-J) ,2) ,&H0E00,&H19FF,&HB44
A
150 IFDE=1THENCSAVEM"PAGE"+MID$(
STR$(19-J) ,2) ,&H0600,&H11FF,&HB4
4 A : MOTORON : FORTT=lTO 1000 : NEXTTT :
MOTOROFF
160 NEXTJ: PRINT: PRINT "all saved!
" : END
170 FORF=0TOl:FORK=-3TO4STEPST/2
: PMODEM, 13 -ST : PCLS1 : SCREEN1 , SC : C
OLORINT(M/2)
180 FORL=lTO ST:A=USR0( (32-ST+L)
*256+2*K+6+L+16*F) :NEXTL,K,F
190 F0RI=1T033-M STEPST: A=USR1 (I
) : SCREEN1 , SC : FORT=1TO20 : NEXTT , I :
GOTO190
200 Y=95*(l-COS(LA) ) :X=128+95*(S
IN (LA) )*(SIN(LO) ) :X=INT(X) :Y=INT
(Y) : RETURN
210 IFLO>20THENLO=LO-100:W=1
220 LO=LO-110+20*K:LO=LO*PI/180:
LA=90-LA:LA=LA*PI/180:GOSUB200
230 IFW=1THENCOLOR1ELSECOLOR0
240 LINE(X,Y)-(X1,Y1) , PSET
250 X1=X:Y1=Y: RETURN
260 DATA 78,20,79,16,76,20,78,20
,70,120,62,6,60,8,61,11,57,13,59
,18,64,17,67,20,54,120,55,11,58,
12,57,10,55,10,50,0,40,100,41,2,
42,4,43,10,38,17,36,17,37,13,38,
17,39,18,44,13,45,15,40,20,32,12
Robotize Your Co Co with EMC
Our unique expansion hardware enables you to create a versatile automated control system.
All EMC boards come fully assembled and computer tested.
Model 1 00 Parallel Port (PIA) $39.95
Features: Two 8 Bit Bi-Directional Ports, 4 Control Lines, Sample Software Provided
Model 200 Buss Driver $89.95
Features: TTL. Fanout of 10, 2 Card Slots and Flexible Ribbon Buss Provided.
Additional Connectors Available.
Model 400 Mother Board
Features: 4 Slots, 5 Gold Pin Connectors, PC Board, for all Addr. Decoded Boards.
I
MODEL 100
/!R\
Model 500 Motor Control Amp
Features: TTL Compatable, LED Direction Indicators, Drives DC Motors 500 MA
Max at 1 2 VDC.
$44.95
$29.95
iW«k
J-'«l
Purchases Add S3.00 Shipping & Handling with Check • Shipping is FREE
with Money Orders • Florida residents add 5% sales tax • Send lor
FREE Brochure • For Information Call (8131 896-8295
MODEL 500
MODEL 400
ELECTRONIC MOTION CONTROL
P.O. Box 17271 • ARPT Station
Clearwater, Florida 33520
Dealor Inquiries Welcome
74
THE RAINBOW August 1985
0, 29, 20,31,10,33, 12 ,32, 0, 5, 100, 4
,1)8,-2,9,-7,13,-20,12
27J3 DATA -35,18,-35,20,-70,120,-
68,10,-70,0
280 DATA 70,0,71,9,68,20,68,17,6
5,18,66,20,67,100,67,2,65,6,62,5
,61,12,54,0,40,100,36,2,38,4,41,
4,41,7,46,8,45,18,42,20,41,7,37,
8,37,17,32,16,31,10,32,0,20,120,
30,18,28,17,29,15,15,20,0,110,-1
7,120,-20,15,-23,15,-34,8,-35,0,
-70,120,-68,14,-69,0
290 DATA 66,0,69,14,66,20,46,120
,45,16,43,16,42,20,4 6,20,44,112,
47,9,45,6,38,8,36,12,41,14,43,11
,44,12,40,120,2 6,120,27,17,28,12
,31,7,24,10,25,16,22,20,17,17,12
,7,20,0,15,100,11,6,12,12,4,8,-4
,0,-17,0,-17,106,-14,10,-20,10,-
25,8,-24,5, -17 , 6 , -20 , 100
300 DATA -70,100,-65,1,-68,20
310 DATA 66,0,69,0,72,6,71,12,67
,8,69,16,71,15,71,20,10,120,8,18
,16,14,22,12,20,10,25,6,25,0,0,1
20,-68,100,-68,14,-70,15,-67,20
320 DATA 71,0,76,20,5,120,7,18,1
6 , 17 , 14 , 16 , 22 , 10 , 2 1 , 8 , 15 , 2 , 10 ,0 ,
9,100,7,2,6,0,9,0,4,120,6,16,-2,
20,-67,120,-66,5,-67,0
330 DATA 76,0,75,12,71,4,72,20,4
0,120,38,17,3 6,20,26,120,22,15,2
1,9,20,11,19,8,21,9,20,6,18,5,13
,7,3,5,13,2,8,0,5,4,1,4,6,0,-2,5
,-4,3,-2,100,-4,3,-9,15,-6,10,-4
,3
340 DATA 1,120,0,18,4,17,5,19,7,
17,2,9,-2,11,-3,16,0,18,-5,20,-2
0,120,-22,16,-3 6,17,-35,20,-67,1
20,-66,15,-67,0
350 DATA 72,0,68,17,70,20,58,120
,56,18,55,20,46,20,42,13,43,8,40
,7,36,9,35,6,40,5,40,0,36,100,36
,2,34,0,30,2,26,0,40,120,38,19,3
5,10,34,9,36,20,21,101,23,3,22,1
,21,1,6,105,8,7,9,5,13,4,15,2,17
,2,17,1,15,0,13,4,9,2,9,5,7,3,6,
5
3 60 DATA 1,101,2,5,-1,0,-1,2,-5,
2,-3,0,-5,0,-3,120,-4,16,-1,12,-
3,13,-5,17,-9,20,-17,120,-15,15,
-12,16,-13,10,-16,8,-15,6,-20,0,
-3 6,120,-3 3,18,-35,16,-34,11,-3 5
,0,-67,100,-66,14,-67,20
3 70 DATA 70,0,68,20,53,120,56,17
,58,20,61,20,58,16,58,0,50,110,3
6,100,39,2,41,1,42,3,44,1,49,3,5
6,1,44,1,41,1,40,1,-3,100,-6,8,-
5,14,-3,12,-5,15,-7,12,-6,8,-10,
10,-9,8,-7,4,-9,0
3 80 DATA -17,100,-12,2,-25,13,-3
0,14,-36,10,-38,5,-36,0,-42,104,
-41,7,-44,6,-43,4,-42,4,-67,100,
-72,20
390 DATA 68,0,67,20,65,120,63,19
,59,1,53,0,-49,108,-48,11,-42,14
,-38,19,-37,16,-3 5,14,-37,15,-40
,13,-42,14,-41,11,-46,7,-49,8,-6
, 100,-72 , 100 , -73 , 14 , -80,0 , -82 , 8
,-81,11,-81,20
400 DATA 65,0,65,10,67,0,72,20,7
0,9,67,20,67,9,65,17,62,13,60,20
,58,13,58,20,0, 100 ,-82, 100 ,-81,2
410 DATA 72,0,71,20,58,100,59,8,
61,13,60,20,0,110,-76,120,-79,0,
-81,0
420 DATA 73,20,74,12,78,15,79,20
,73,20,72,120,71,0,33,120,41,15,
47,15,50,13,48,15,60,0,0,110,-76
,100,-78,10,-75,11,-74,20
4 30 DATA 70,20,74,5,70,4,69,10,7
, 20 , 68 , 120 ,67,15,71,0,17, 120 , 20
,13,32,6,23,9,33,0,0,100,-74,100
,-76,20,-71,20
440 DATA 80,20,79,0,76,0,76,20,7
4,120,74,9,73,7,69,14,71,20,51,1
SOFTWARE
Color Computer MACHINE MONITOR - professional software and manuals published by R. C.
EDIT memory Content, TRACE program Instructions, TRAP data Reference, 3 display Formats.
Program distribution includes both [2K] CoCo-dependent and [4K] stand-alone Versions.
#10101/Tape = $14.45, #10102/Disk = $16.95; User Guide #201 01 /Small manual = $9.95
U P P L ; E S
SPIRAL BINDING system for printer Paper. Coil twists into pin-feed Holes to form Book.
#40101/Zring .5" DIA. helix Coil, 11" long, brite plated finish = $.50/ea, $5.00/doz
#40103/Acetate 7.5 MIL plastic Cover, 9"X11", 22 hole Punched = $.80 ea, $8.00/doz
#40104/Board 6 PLY coated board Cover, 9"X11", 22 hole Punched = $.40/ea, $4.00/doz
RESOURCE
*"** product Catalog, data Sheets, mail Updates available on request ****
the Zellerbach GROUP, 1335 Pacific Ave. #216, San Francisco, CA 94109 (415) 673-3485
TERMS". 3% LESS for Money Order, Cashier Check; 3% MORE for C.O.D., Visa, Mastercard.
FUNDS: U.S. SALES: 6.5% TAX in Calif. SHIP: $2 to U.S., $3 to Canada, S6 to Overseas.
Augusl 1985 THE RAINBOW 75
.
20,52,16,55,16,5
8,12,68,0,50,100
,18,29,17,29,4,2
0,23,16,29,104,2
,10,22,13,16,12,
0,10,16,13,13,17
450 DATA -74,100
460 DATA 80,0,76
,76,10,74,0,71,0
14,65,2,68,6,71,
,9,58,12,60,16,5
3,46,10,47,14,45
40,4,34,2,32,0,2
20,109,18,11,18,
470 DATA 10,100,
0,8,2,5,2,0,0,-7
7,6,61,6,64,10,6
,32,120,26,20,25
3,120,23,16,21,2
6,3,19,4,18,8,22
16,16,11,18,10,2
,-76,20
,10,82,20,75,120
,67,18,66,11,64,
0,51,100,63,2,61
3,20,50,120,49,1
,17,43,14,44,15,
5,0,23,100,21,3,
7,20,9,21,102,21
12,8,10,20,10,10
,0,-16,5,-18,8,-
35,7,-54,6,-56,8,-56,13,-54,6,-5
3,11,-38,18,-38,20,-77,120,-72,2
0,-70,16,-63,20,-67,15,-71,9,-76
,?>
480 DATA 82,0,84,20,66,120,61,16
,67,4,69,5,75,0,53,100,51,4,51,0
,46,1,51,4,48,7,46,1,10,100,7,3,
6,10,0,12,-3,20,-21,120,-24,14,-
34,9,-33,3,-36,5,-38,0,-78,120,-
77,0
490 DATA 84,0,82,20,75,10,73,15,
66,0,20,100,-3,100,-7,5,-21,0,-7
8,100,-72,20
500 DATA 64,3,67,9,66,0,64,3,50,
120 , 53 , 19 , 56 , 17 , 59 , 18 , 59 , 17 , 57 , 1
6,55,16,54,12,51,12,51,14,55,16,
54 , 17 , 50 , 16 , 50 , 20 , 48 , 13 , 47 , 14 , 42
,14,42,11,36,11,35,15,3 6,19,42,2
0,3 3,120,3 5,15,33,12,28,10,23,5,
14,3,5,11,5,20,-70,120,-72,0
^~
110 5
END 33
Listing 2: PAGETURN
10 CLEAR200,&H7FA0:DEFUSR0=&H7FA
1:DEFUSR1=&H7FC7
20 CLS:PRINT"SPINNING EARTH — T
HE DELBOURGOS": PRINT" HAVE YOU R
EMEMBERED TO ENTER"
30 PRINT" POKE28160,0:POKE25,110
:NEW for disk OR": PRINT" P
OKE26112,0:POKE25,102:NEW f
or tape?"
40 PRINT: PRINT" IF YOU HAVE, PRE
SS <ENTER>; OTHERWISE <BREAK
>, ENTER POKES, AND RELOAD THE P
ROGRAM."
50 IFINKEY$OCHR$(13)THEN50
60 PRINT: PRINT" LOAD FROM <T>APE
OR <D>ISK?"
70 A$=INKEY$ : IFA$0"T"ANDA$0"D"
THEN70
80 PRINT" GET YOUR TAPE/DISK REA
DY... AND THEN HIT ANY KEY."
90 IFINKEY$=""THEN90
100 FORI=&H7FAl TO&H7FFF:READD:P
OKEI,D:NEXTI
110 DATA189,179,237,52,4,31,137,
141,50,31,1,53,4,141,44,31,3,16,
142,6,0,26,80,127,255,223,236,12
9,2 37,193,49,62,38,248,127,255,2
22,57,189,179,2 37,77,3 8,48,141,1
3,31,1
120 DATA220,183,147,186,159,186,
48,139,159,183,57,90,193,3 5,34,2
8,150,188,192,20,36,4,203,20,134
,128,52,2,134,6,61,235,224,79,30
,137,77,43,4,145,25,3 6,1,57,126,
180,74
130 PMODE2,15:PCLS:SCREEN1,0
140 F0RP=1T03 5STEP2
L50 IFA$="D"THENLOADM"PAGE"+MID$
(STR$( (P+l)/2) ,2) ,21504
160 IFA$=" T" THEN : CLO ADM" PAGE "+MI
D$(STR$((P+l)/2) ,2) ,21504
165 A=USR0(35*256+P) :A=USR0(36*2
56+P+l)
170 NEXTP
180 F0RP=1T035STEP2:A=USR1(P) :SC
REEN1 , 1 : FORT=1TO40 : NEXTT , P : GOTOl
80
ITS
I
76
THE RAINBOW August 1985
COMPUTER
CONNECTOR
BUILT-- IN MODEM
CONNECTOR
uma plnouta aa
Color Computer
aerial I/O port
MO DEM- PRINTER
SWTTCH
PRINTER CONNECTOR
highest quality
with metal ehell
and fold contact*
MODEL 1 49.95
"WITH MODEM CONNECTOR
AND SWITCH
ADD 3.00 FOR SHIPPING AND HANDLING
MODEL 2 39.95
WITHOUT MODEM CONNECTOR
AND SWITCH
WITH POWER SUPPLY
ADD 5.00
DISK DRIVE SPECIAL
COMPLETE DRIVE SYSTEM
* TEAC FD56B DISK DRIVE
* New J&M DISK CONTROLLER
(JDOS ROM inoluded)
* DUAL DRIVE CASE It
POWER SUPPLY
* DUAL DRIVE CABLE
* OPERATORS MANUAL
$ 299
plus shippmb
!
SG-10 PRINTER &
INTERFACE SPECIAL
* Ultra High Resolution Graphics
* 120 cpa. Draft Mode
* 30 ope. Near-Letter— Quality
* 2K Buffer (expandable to 8K)
* with Model 2 Interface:
$ 269
» irtth Model 1 Interface:
$ 279
plus shipping
DISK DRIVES
& ACCESSORIES
TEAC FD54-A $ 95
TEAC FD66A $ 110
TEAC FD55B $ 120
Ne-ir J&M CONTROLLER. $ 135
J&M DISK CONTROLLER $ H5
Dual Case & Ps $ 59
Dual Drive Cable $ 23
PLUS SHIPPING
STAR PRINTERS
* Ultra High Resolution Graphics
* 16K Buffer on 15". 2K on 10"
* Draft Modes from 120-200 ops.
* NLQ Modes from 30-60 cps.
* 100% D3M Compatible
* SG-10.. $ 249* SG-15.. $ 399
* SD-10.. $ 369 * SD-15.. $ 479
» SR-10.. $499* SR-15.. $629
pun HHIPPWO
TRI-TECH ELECTRONICS
P.O. BOX 8100 ROCHESTER, MI 48308 (313) 254-4242
Computer Island Educational Software
PROGRAM TITLE GRADES MEMORY pr.ce PROGRAM TITLE G RADES MEMORY PR.CE
PRESCHOOL
Preschool I - counting Pre-K 16KExt. 11.95
Preschool II - adding Pre-K 16K Ext. 1 1 95
Preschool III - alphabet Pre-K 16K Ext. 11.95
Music Marvel-play songs Pre-K, 1 16K-Ext. 11.95
Arrow Games - 6 games Pre-K,1 32K-Ext. 21.95
First Games - 6 games Pre-K.1 32K-Ext. 24.95
Mr. Cocohead-facemaker K-3 16K-Ext. 16.95
BentleyBear Pre-K 32K-Disk 29.95
LANGUAGE ARTS
Beyond Words 1-3 parts 3-5
Beyond Words 2-3 parts 6-8
Beyond Words 3-3 parts 9-12
Vocabulary 1-1000 words 3-5
Vocabulary 2-1000 words 6-8
Vocabulary 3-1000 words 9-12
Context Clues 4,5,6,or 7
Cocojol - jotto game 3-up
Reading Aids - 4 parts 2-4
King Author - writing tool 2-6
Cocowheel of Fortune 4-up
32K-Ext.
32K-Ext.
32K-Ext.
32K-Ext.
32K-Ext.
32K-Ext.
16K-Ext.
16K
16K-Ext.
16/32 Ext.
32K-tape"
FOREIGN LANGUAGES
French Baseball-200wds. 4-up
French Baseball-500wds. 4-up
Spanish Baseball-200wds 4-up
Spanish Baseball-500wds 4-up
Italian Baseball-200wds. 4-up
Hebrew Alphabet beginners
Hebrew Utility drawing utility
CRITICAL THINKING PROBLEMS
Factory by Sunburst 4-up
Pond by Sunburst 2-up
Teasers by Tobbs-Sunb. 4-up
Inner City - simulation 7-up
Find The Math Sequence 4-up
Stranded-graphic advent. 4-up
TEACHER/STUDENT AIDS
Colorgrade - gradebook Adult
Quizmaker - write quizzes 5-up
ETT typing tutor (cocoWarehousei 4-up
The Puzzler (ColoiConnecnon) 4-up
16K-Ext.
32K-Ext.
16K-Ext.
32K-Ext.
16K-Ext.
16K-Ext.
16K-Ext.
32K-disk
32K-disk
32K-disk
32K-disk
32K-Ext.
32K-disk
32K-disk
32K-Ext.
16K-Ext.
32K-disk
19.95
19.95
19.95
19.95
19.95
19.95
17.95
11.95
19.95
29.95
19.95
11.95
19.95
11.95
19.95
11.95
11.95
15.95
39.95
39.95
39.95
49.95
19.95
24.95
29.95
24.95
21.95
23.95
MATH
Dollars & Sense
McCoco's Menu
Moneypak
Graph Tutor
Graph-It
Math Invaders
Mathquiz - 4 operations
Addition & Subtraction
Crocodile Math - joystick
Skill Tutor Series
Division Tutor
Multiplication Tutor
Factors Tutor
Fractions Tutors a programs)
addiliun. subuaclion 01 multiplication
2-4
3-5
2-5
3-7
7-up
1-8
2-5
2-3
2-5
3-7
3-7
5-8
4-8
10
9
11
Trigonometry
Equations Linear
Equations Quadratic 8
Arith. Diagnostic Disk 3
Fraction Diagnostic Disk 4
Verbal Problems Series
Distance Problems
Area & Perimeter
Pizza Game
Sales & Bargains
SOCIAL STUDIES
Know Your States
History Game
States & Capitals
Explorers & Settlers
Famous American Women
Street Map Game
MISCELLANEOUS
Name That Song 1,2.or 3 2-up
Circus Adventure
Schoolmaze Adventure
Treasure Hunt - joystick
Picnic - 2 arcade games
Music Drill
Science Game
Computer Literacy
5 Educational Programs
with Lightpen
16K-Ext.
16K-Ext.
32K-Ext.
32K-Ext.
16K-Ext.
16K-Ext.
32K-Ext.
16K
1 6 tape '
16K-Ext.
16K-Ext.
16K-Ext.
16K-Ext.
32K-Ext.
32K-Ext.
32K.Ext.
32K-disk
32K-disk
14.95
14.95
24.95
19.95
14.95
17.95
19.95
11.95
17.95
14.95
14.95
19.95
I9 95ea.
24.95
19.95
19.95
49.95
49.95
5-8
32K-Ext.
19.95
5-8
32K-Ext.
19.95
3-5
32K-EXL
19.95
6-8
32K-Ext.
19.95
5-up
32K-Ext.
19.95
5-up
32K-Ext.
14.95
5-up
32K-Ext.
19.95
4-up
32K-Ext.
19.95
6-up
32K-Ext.
19.95
3-5
32K-Ext.
19.95
2-up
16K-Ext.
11.95
1-3
16K
11.95
1-4
16K
11.95
1-5
16K-tape"
19.95
3-up
16K-Ext.
11.95
3-up
16K-Ext.
19.95
8-up
32K-disk
29.95
6-up
32K-Ext.
19.95
The Educational Answers
LIGHTPEN PROGRAMS
Grades 1-2, SPECIAL EDUCATION
LIGHTPEN PROGRAMS
Grades 3-6, SPECIAL EDUCATION
32KE.B $44.95 Each,
INCLUDING LIGHTPEN
Five menu driven educational pro-
grams on each disk designed for
early elementary or upper elemen-
tary students, or as an alternative
lor those children who have dif-
ficulty using the keyboard, Grade
appropriate material on each disk
covering, reading readiness and
math for early grades, and math,
social studies and sciences for the
upper grades. Hi - res graphics
and text combined on the screen.
Light pen included.
HMiilJ^
A top qualil> pen plus a nm-cIUM pnicrani.
The hevi value pen pjek^cc uvuilublc.
Introducing a NEW program lor the Trojan Light Pen
This new ADVANCED program includes the loiiowmg
graphics facilities
* Draw Box
* Draw Circle
* Draw Line
* Draw Picture
* Colour Fill Designaied Areas
* Save and load pictuies to and Irom lape
All m Hi-Res Screen in any ol (our colours
The lollowing functions are fc use on the Text Screen
* Data entry and processing
* Menu selection and control
* Games playng — the fascinating game ol NIM
included on cassette
This is a first-class program which gives hints and lips on
how to wnte programs for the pen. Ideal lor many
educational uses
ww eajaa
SUNBURST
The Factory:
Strategies In Problem Solving
Grades 4-adult. Winner 1983 Learning
Software Award. Recommended In
Classroom Computer Learning,
Courseware Repon Card and Electronic
Learning Unique three-leval program
challenges students to create geometric
products" on a simulated machine
assembly line which the sludant designs.
Diskette lor 32K IRS 80 Color
Computer with Extended Color BASIC
S39 95
The Pond: n»i sunburst
Strategies In Problem Solving
Grades 2-adull. Winner 1983 Learning
Software Award. Recommended in
Classroom Computer Learlng. A small
green frog, lost In a pond of Illy pads,
helps students recognize and articulate
patterns, generalize from raw data and
think logically. Diskette
tor 32K IRS-80 Color Computer with Ex-
tended Color BASIC $39.95
STRANDED 32K EB
$24.95 DISK ONLY
A fully graphic adventure in which
you are an astronaut stranded on
the moon. Your space ship cannot
be repaired and you must get back
to earth. Inventory displayed on
screen at all times. Save and re-
load at any time. Map included, if
you wish to use it. An entertaining
way to improve critical thinking
BENTLY BEAR'S LETTERS,
NUMBERS AND SHAPES
32KE.B. $29.95 Disk
An excellent preschool program on
disk that reinforces the learning of
letters, numbers, and shapes.
Correct responses are rewarded
by a hi - res Bently Bear. Musical
accompaniment in 4 part harmony.
Delightful learning for the young
child. Beautiful graphics and
SOUnd. n -.->-y»
STREET MAP GAME 32KE.B
$19.95 Tape $24.95 Disk
Hi • res screen and graphics por
Iray a typical section of a streel
map. This one shows people s
homes, the school, the park, the
post office, etc. Questions are ask-
ed on how to get from one place to
another and the footsteps are
shown alter response. A lun way
to improve map skills.
BINARY DICE GAME
$19.95 Cassette
32KE.B.
S24.95 Disk
Learn to work with binary
numbers Makes the binary
system clear and understandable.
Two levels. Learn to convert from
binary to regular numbers. A great
enhancement to any computer
literacy program for groups or in-
dividuals. Set of binary dice in-
cluded .
COCO WHEEL OF FORTUNE
32KEB $19.95 TAPE ONLY
Hi-res graphics and screen in this
version of tne popular TV show
One or two players. Spin the wheel
lor points and guess a letter to
solve the puzzle. Over 225
puzzles. Have fun while
strengthening language arts
skills.
RAINBOW
CERTIFICATION
SEAL
Dealers inquiries invited.
All payment in U.S. funds.
m. (718)948-2748
miSmm Dept. R 227 Hampton Green, Staten Island, N.Y. 1 031 2
Send lor catalog with complete descriptions.
Please add $1.00 per order for poslage. N.Y. residents, please add proper tax. FREE set ol BINARY DICE, including lull directions, with orders ol 2 or more items
Authors: We are seeking quality children's software lor leisure or learning. Write lor details. Top Royalties.
TRS-60 Color Computer. TD pSyslem 100.
BITS AND BYTES OF BASIC
With five years of data stored in a notebook, the author
decides it 's time to create a spreadsheet to analyze it
Spreadsheeting
Real Data
By Richard A. White
Rainbow Contributing Editor
I got my CoCo in late 1980. Then,
it was a new machine and there was
no software available except a few
ROM packs from Radio Shack. The
only practical thing to do was learn to
program in BASIC. One of the first
things I learned was that it takes three
to four weeks to learn enough BASIC
to use up the memory in a 4K machine.
By April 1981, I had upgraded to
16K. Extended BASIC was out and I had
that, also. Each of those items cost as
much as a 64K CoCo costs today. And,
I was working on one of my first
"major" programs: a program to
calculate gas mileage for my recently
purchased new car. That was a good
learning exercise though it consumed
hours and hours.
The program finally worked, though
there were weaknesses. Editing data
entry errors was difficult and missing
data caused problems. The display of
results was limited and there was no
code to scroll up and down the data.
(Richard While has a long background
with microcomputers and specializes in
BASIC programming. With Don Doll-
berg, he is the author of the TIMS
database management program.)
All in all, I found little encouragement
to continue using the program or to
rewrite it. However, I continued to write
down each gasoline purchase, the date
and the mileage, though the rest of the
family failed to do so from time to time.
Now it's 1985 and I have five years
of data in a notebook. Why not do a
"When setting out to
analyze data, it is
important to determine
what is significant and
what is not. The
methods used, in the
analysis can then be
selected and properly
applied."
quick spreadsheet to analyze that data
and see what it may have to say?
When setting out to analyze data, it
is important to determine what is
significant and what is not. The methods
used in the analysis can then be selected
and properly applied. In this case, the
lank was not always completely filled
at each purchase, so the mileage foi
each single gasoline purchase is mean
ingless in some cases. Determining tht
average mileage over three to five
purchases will reduce these variations.
On the other hand, averaging wil
hide some real peaks and valleys leaving
only longer term trends like diminishinj
performance for lack of engine main
tenance, or the mileage loss due to ver
cold weather in winter and use of ai
conditioning in the summer.
I chose to use a five point movin
average. This means the mileage ca.
culated is averaged over the last fiv
gasoline purchases.
The other data to be entered will b
the odometer reading for each purchas
and the month (number) of eac
purchase. We will use the month lati
when we do some data plotting.
The finished spreadsheet with son
data is shown in Figure 1. Colurr
headings in cells A5 . . . D5 are rig
justified to align better over the da
in the columns. Data in columns '
through 'C is entered as numbe:
DynaCalc shows the numbers in c<
umns 'A' and 'B' as they are entere
Column C was formatted for t\
decimal places.
80
THE RAINBOW August 1985
You may remember that in DynaCak
an empty cell will not take a format,
however, a space may be typed into cell
C6 and a format can be applied to that
cell. C6 can then be replicated down
Column C. The cells will still look
empty, but the format is there waiting
to act when you type in a value.
Columns 'D' and 'E' are formatted also,
but each cell contains a formula and
is willing to accept a format.
Before moving to the formulae, let's
look at the data. The 4.4 gallons shown
in C12 represents a partial fill because
the car was driven almost 300 miles
since the last fill. This causes the
calculated average gas mileage, 32 mpg,
to be erroneously high, but not exces-
sively so due to the use of the averaging
over five data points. The next purchase
was a fill-up and the new gas mileage
is a better representation.
The data for cells B16 and C16 was
missing. Nothing to do in this case but
make a guess of both miles and gallons
and enter these. After all, we are dealing
with a data set that cannot be duplicated
as you might with laboratory data.
What is gone is gone forever. However,
we do know on an average what mileage
we are getting and can make an
educated guess.
1 later found an even better way. Pick
some estimated miles where gas was
probably added and divide that number
by average gas mileage then being
obtained. If the last fill-up occurred at
45,600 miles, the estimated miles at the
next fill-up is 45,850 and the car is
getting approximately 28 miles per
gallon, the entry in the gallons column
would be 250/28. The computer will
perform the calculation and print 8.93
in the cell. Even better, DynaCak stores
the entry as 250/28 which is shown on
the cell contents line at the top of the
sheet when the cursor is placed over
the cell.
At the top of the spreadsheet we do
not have five data pieces to average so
we start out with a simple average
Formula in D7. While there are gallons
shown in C6, this serves only to start
with a full tank and is not used in the
:alculations. In D8, we have two fills
o work with and set up the form of
he equations we will use for the
emainder of Column D.
The formula in D 1 1 has five purchases
o average. This formula can be repli-
ated to the rest of the column, as long
is you want to make it. 1 took it to
tow 1 50, which will cover several years,
lefore doing the replicate, remember
to apply the two-decimal place format.
Note in each of the succeeding equations
the cell addresses are adjusted one row
down in each case. This is another
example of relative addressing discussed
in previous columns.
Column E is set up to plot the mileage
as a bar graph. I expected all the mileage
values would exceed 15, so I subtracted
that amount from each 'D' column
value and applied a graph format to
each cell. Actually, do this only to cell
E7, then replicate that cell over the
range E8. . . El 50. Again the addressing
is relative.
In cell D152, the average mileage
A ][
B ][
c ][
D ][
E ]
1-
GASOLINE MILEAGE
2-
1980 HORIZON
3-
NEW
9/80 10
MILES
4-
START 9/2/83
5-
MO
MILES GALLONS
MILEAGE15 20 25 30
6-
9
43433
10.90
7-
9
43663
8.50
27.06
############
8-
9
43889
8.50
26.82
############
9-
10-
10
10
10
44131
44448
44751
8.60
10.20
11.10
27.27
28.35
28.10
############
#####»#######
11-
####■#########
12-
10
45035
4.40
32.06
#################
13-
11
45172
10.40
28.70
##############
14-
11
45407
8.80
28.42
#############
15-
11
45600
6.89
27.70
#############
16-
17-
18-
19-
20-
12
12
12
12
1
45950
46200
46492
46729
46978
10.00 29.61
8.93 25.88
10.20 29.45
9.50 29.04
9.99 28.34
Figure 1
###############
?r W W W ir W W ffWWW
Wfrff 'WWWW&TrtPfFWfrfr
##############
TrffW frff ffftfFW &W TPff
[A ][
][
][
][
1-
GASOLINE
MILEAGE
2-
1980 HORIZON
3-
NEW 9/80
10 MILES
4-
START 9/2/83
5-
MC
MILES
GALLONS
6-
9
43433
10.9
7-
9
43663
8.5
8-
9
43889
8.5
9-
1(J
44131
8.6
10-
1?
44448
10.2
11-
10
44751
11.1
12-
1?
45035
4.4
13-
11
45172
10.4
14-
11
45407
8.8
15-
11
45600
193/28
16-
12
45950
If
17-
12
46200
250/28
18-
12
46492
10.2
19-
12
46729
9.5
20-
1
46978
9.99
MILEAGE15
20
25
30
(B7-B6)/C7
(B8-B6)/@SUM(C7. . .C8)
(B9-B6)/@SUM(C7. . .C9)
(B10-B6)/@SUM(C7. . .C10)
(B11-B6)/@SUM(C7. . .Cll)
(B12-B7)/@SUM(C8. . .C12)
(B13-B8)/@SUM(C9. . .C13)
(B14-B9)/@SUM(C10. . .C14)
(B15-B10)/@SUM(C11. . .C15)
(B16-BU)/<asUM(C12. . .C16)
<B17-B12)/@SUM(C13.
(B18-B13)/@SUM(C14.
(B19-B14)/@SUM(C15.
(B20-B15)/@SUM(C16.
.C17)
.C18)
.C19)
• C20)
D7-15
D8-15
D9-15
D10-15
Dll-15
D12-15
D13-15
D14-15
D15-15
D16-15
D17-15
D18-15
D19-15
D20-15
Figure 2
[A ][ B ][ C ][ D ]
(B149-B144)/@SUM(C145. . .C149
(B150-B145)/@SUM(C146. . .C150
149-
150-
151-
152-GRAND AVERAGE MILEAGE (@MAX(B7 . . . B15J3) -B6)/@SUM(C7 . . . C150
Figure 3
August 1985 THE RAINBOW 81
33.8
25.0
1980 HDRIZ0N MILEAGE SEPTEMBER! 1983- HftVi 1985
5-SftriPLE HD'-'IHG AVERAGE AVERAGE = 28.56
Figure 4
' 1 2. 3 H
based on all the data in the spreadsheet
is calculated. B7 is the starting miles.
@MAX(B7 . . . B150) finds the highest
number in the range B7 . . . B150. This
will be the miles in the last entry. Data
can be entered from time to time and
the spreadsheet will still work.
@SUM(C7 ... CI 50) sums only cells
that have values.
DynaCalc has a plotting capability
that is unique in CoCo spreadsheets.
You can make a line plot, a bar chart,
a pie chart or a high/ low/ average plot
such as those used to show stock
performance. Plots are made on the
high resolution graphics screen.
Data to be plotted is drawn from
specified ranges of cells on the spread-
sheet with a maximum of 121 cells per
range. Except for the pie chart, up to
three ranges may be defined. The graph
is automatically sized according to the
value extremes within the ranges
specified. Once the plot is made, you
can type captions onto it, save it to disk
or print it on your printer.
The graph in Figure 4 is a printout
of a plot of my gas mileage data. This
is actually a composite of two plots.
First, a plot of identical ranges from
the mileage and month columns was
made. The gas mileage line is at the
top.
Since the months were entered as
numbers from 1 to 12, they plot as a
stepped line at the bottom of the chart.
The text and numbers on the plot are
made in the caption mode. The arrow
keys are used to move the cursor to
where the user wants and the text is
typed in. Text can be erased by moving
to its beginning and typing spaces.
Careful, for the plotted lines can be
erased as well.
The dashed line through the gas
mileage curve is a calculated average
for the data points used. This could not
be done from the plot as shown since
DynaCalc would have used both the
month and the mileage values to
determine an average.
First, I saved my captioned graph
with both the mileage and month curves
to disk, then I exited the graphics mode
and reentered to get a clean screen. This
time 1 plotted only the mileage figures
and used the average line option. The
first plot was then loaded. It overlaid
the second. The result looks just like
the first plot except the average line of
the second shows.
Now comes the bottom line. What
can be learned from this plot? First, the
automobile performance has been
essentially constant over the 21 month
period. There are low spots each winter
and high spots in the spring and fall.
These seem to reflect the effects of
driving in the cold and snow versus
driving in moderate weather without air
conditioning. The overall average
mileage for this period was about one
mile per gallon better than the previous
two years reflecting an office move to
a location where I could drive interstates
for the most part, rather than all city
streets. Finally, this data tells me the
engine remains sound and in tune.
Other uses? Surely you can find them.
How about lab and other reports for
those in high school or college? Keeping
and plotting sports statistics seems a
natural. Budgeting is another — plot
your budget amounts against what is
actually spent. And the uses in business
are almost limitless.
/
FOR THE
COLOR COMPUTER
VOLUME 1 NOW AVAILABLE!
DISK ($21.95) CASSETTE ($19.95)
DISK PACKAGE REQUIRES 32K
16K or 32K CASSETTE PACKAGING
500 QUESTIONS/ANSWERS
4 ONE or TWO PLAYER QUIZZES ON
4DIFFERENTSUBJECTS
1 TWO PLAYER QUIZ WITH ALL 4
SUBJECTS MIXED
COMPLETE THE FOLLOWING AND SEND WITH A CHECK OR MONEY ORDER PAYABLE TO MOORE COMPUTER SERVICES, INC.
ALLOW 2 - 3 WEEKS FOR PRE-PAID DELIVERY. FLORIDA RESIDENTS PLEASE ADD 5% SALES TAX.
NAME
ADDRESS
CITY/ST/ZIP
CHECK ONE: D DISK
CHECK ONE: □ 32K
D CASSETTE
D16K
^
NOTE. 16K CASSETTE DOESN'T INCLUDE THE MIXED SUBJECT QUIZ
WARNING-YOU MAY BECOME ADDICTED
82
THE RAINBOW August 1985
EDUCATION
RAINBOW ,
Co Co worms its way into preschool fun
A Caterpillar's Alphabet
By Mike Knolhoff
Asa teacher I am able to see and
/% evaluate educational software
LJLquite frequently. This gives me
le opportunity to get ideas for pro-
■ams I can write for my own children
• for my classes.
I recently saw an interesting program
at was written for a more expensive
■mputer. The program was designed
help preschoolers or primary school
ildren learn the alphabet. A sequence
five letters was displayed in order
i the screen with the middle letter left
ink. The student was to figure out
rich letter went in the blank and type
it letter. The letter typed would then
. in the blank, and a right or wrong
e would be given.
Each time the student typed the
rrect letter, a caterpillar segment
mid appear on the screen until the
erpillar was complete. At that time
(ike Knolhoff is a 6th grade teacher
to is married and has three children.
? is currently earning a master's
gree emphasizing computer applica-
nts in education.)
the caterpillar would walk around and
off the screen as a visual reward for
a job well done. Tapping any key would
then restart the program.
The program required no reading
skills on the part of the student, and
all keyboard input from the student
consisted of single keystrokes. The
program was written in machine lan-
guage and sold for about $30.
The listing that follows is my version
of this program. Thanks to the powerful
graphics commands Tandy gave the
CoCo, it is written entirely in BASIC.
Admittedly, the graphics are not as
refined and the animation not as
smooth as its inspiration program, but
it does function in much the same
manner (and is a great deal more
economical). I believe parents will find
it very beneficial for their 4-6 year old
children.
You need 16K Extended BASIC for
the program. It uses the speed-up POKE
in Line 690, so if your computer cannot
handle this POKE you will have to edit
that line to remove it. It will run on
disk as well as cassette.
The following is a brief line descrip-
tion of the program:
Line Description
10-20 Program set up
30-80 Title screen
90-250 DRAW and GET caterpillar
segments
260-340 Put letter sequence on the
screen
350-370 Receive keyboard input
380-390 Display answer in blank
spot
400 Branch to 570 on correct
answer
410-420 Wrong answer cue
430 Second try for first wrong
answer
440-490 Flash correct answer
500-550 Erase sequence of letters
560 Return to start of loop
570-670 Put caterpillar segment on
screen
680-840 Animation routine moves
caterpillar left to right and
off screen
850-1070 Animation routine moves
caterpillar right to left and
off screen
1080-1090 Await key press to begin
again
1100-1380 Draw strings for letters of
the alphabet
August 1985 THE RAINBOW 83
A steal at any price. Darn near a felony at these prices.
SDOS®
Real Disk Operating System
and Professional Software Tools
Full 2-Pass Assembler
Text Editor
6809 Debugger
Fully interrupt driven
Disk buffer pool/LRU cache
Supports up to 4 drives
Date-stamped tile backup utility
Disk disaster recovery utility
RSDOS data file transfer utility
Friendly command interpreter
User-definable error messages
Keyboard typeahead at all times
(not just when disks are idle)
Screen-edit style input editing
Full ASCII keyboard (inc. CTRL)
Software selectable baud rates
Full serial I/O to 19.2Kb
thru RS Modem cartridge
400+ pages documentation
only $49.95!
SD BASIC Compiler
Full-featured language
Tight code, fast execution
(3X times faster than RSBASIC
doing Prime Number search)
FOR 1=1 to 10000/NEXT I
takes 1.8 second (12X faster)
A=1 takes 2 bytes of memory
(not counting Runtime Package)
Automatic runtime integer/
floating point optimization
32 letter variable/label names
True Subroutine/Functions with
named, multiple arguments
WHILE-DO and IF-THEN-ELSE
All execution errors trappable
Fast, 65K char string facilities
Assembly language interface
Fast Decimal f.p. arithmetic
(no money conversion errors!)
Cursor positioning
Print USING
Device-independent ASCII and
binary file I/O to the byte
Indexed file option available
$49.95 (requires SDOS)
SEDIT/TYPE: Word Processing
SEDIT: full screen text editor
Place cursor and start typing!
What-you-see-is-what-you-get
Typeahead and autowrap on margin
"No wrap" mode for programs
Edits files up to 80Kb
Global Search/Change
SEDIT or SDOS can use 24 by 80
CRT via modem card with multipak
TYPE: Document Processor
Formats raw text mode with SEDIT
according to embedded commands
Automatic justification
Automatic pagination
Definable page titles/footings
Automatic page numbering
Centering
Foreign language accents
Multiple file merge
(for big documents or mailings)
Table of Contents generation
Semi-automatic index generation
150+ pages documentation
$49.95 (requires SDOS)
CHESSD": A REAL CoCo Chess Program
High resolution display
High quality play
Variable skills levels
Plays Black or White
Can act as referee
Accepts Algebraic-like notation
Handles and plays special moves
Castle, En Passant, Pawn Promote
Tournament/Rapid Transit Modes
Tournament timer logic built-in
32,000 move disk opening book
$49.95 (does NOT require SDOS)
Not RSBASIC compatible
All products require Color Computer with 64K and at least one disk drive.
4
li
»
COMPUTER SYSTEMS DISTRIBUTORS
P.O. Box 9769
Anaheim, California 92802
(714) 772-1390
Visa and Mastercharge accepted.
Shipping charges $2.00 per order.
Dealer inquiries invited.
Software consulting also available.
"SDOS is a registered trademark of Software Dynamics.
'CHESSD is a trademark of Software Dynamics.
The listing: LETRSKIP
1 ****************************
2 ' CATERPILLAR
3 ' LETTER SKIP
4 ****************************
5 ■ BY
6 ■ MIKE KNOLHOFF
7 ■ STERLING, IL.
8 ' MAY 1984
9 i ***************************
10 C=0:DIMH1(14) ,B(14) ,H2(14) ; BL
(14)
20 CLS2:GOSUB1110
30 PRINT@201," CATERPILLAR " ; : PR
INT@265," LETTER SKIP ";
40 A$="T303L4CP3 2L8CP128L4DP32L8
DP12 8EP128GP12 8EP128L4 . C"
50 PLAYA$
60 PLAY"P8L4CP32L8CP128L4DP32L8D
P128L4.EP128CP8"
70 PLAYA$
80 PLAY"P8L3AP32DP128L8FP128L4.E
P128L1C"
90 PMODE3,1:PCLS:SCREEN0,1
100 CIRCLE (20, 20) ,8,6, .9:PAINT(2
0,20), 6, 6
lip CIRCLE (24, 16) ,2,8
120 DRAW"BM26,22C8L6H2"
130 DRAW M BM18,14C8U4E4BR4G4D4"
140 GET(12,2)-(28,32) ,H1,G
150 PCLS
160 CIRCLE(20,20) ,8,6, .9:PAINT(2
0,20) ,6,6
170 CIRCLE(16,16) ,2,8
180 DRAW"BM14,2 2C8R6E2"
190 DRAW"BM18,14C8U4H4BR4F4D4"
200 GET(12,2)-(28,32) ,H2,G
210 PCLS
220 CIRCLE(20,20) ,8,6, .9:PAINT(2
0,20), 6, 6
230 DRAW"BM18,2 6C8NG4BR4F4"
240 CIRCLE(20,20) ,4,8, .9
250 GET(12,2)-(28,32) ,B,G
2 60 PCLS
270 SCREEN1,1
280 R=RND( -TIMER)
290 R=RND(26)
30j3 IF R<3THEN310ELSEDRAW"BM0,20
C7S16'*+L$(R-2)
310 IF R<2THEN320ELSEDRAW"BM50,2
0C7S16"+L$(R-1)
320 DRAW"BM92,64C8S16R12"
3 30 IF R>25THEN3 50ELSEDRAW"BM150
,20C7S16"+L$(R+1)
340 IF R>24THEN3 50ELSEDRAW"BM200
,20C7S16"+L$(R+2)
3 50 I$=INKEY$:IFI$=""THEN35,0
3 60 A=ASC(I$)-64
370 IFA<10R A>26THEN350
380 DRAW"BM100,20C8S16"+L$(A)
390 FORK=1TO500:NEXTK
400 IFA=R THEN570
410 FORX=1TO50:PLAY"V30T255L255O
1CP2 50": NEXTX
420 W=W+1 : DRAWBM100 , 20C5S16"+L$
(A)
430 IFW=1THEN350
440 W=0:FORX=1TO5
450 DRAW"BM100,20C8S16"+L$(R)
460 FORK=1TO100:NEXTK
470 DRAW"BM100,20C5S16"+L$(R)
480 FORK=1TO100:NEXTK
490 NEXTX
500 IFR<3THEN510ELSEDRAW"BM0,20C
5S16"+L$(R-2)
510 IFR<2THEN520ELSEDRAW"BM50,20
C5S16"+L$(R-1)
520 DRAW M BM100,20C5S16"+L$(R) : DR
AW"BM92,64C5R12"
530 IFR>25THEN540ELSEDRAW"BM150,
20C5S16"+L$(R+1)
540 IFR>24THEN560ELSEDRAW"BM200,
2 j 0C5S16"+L$(R+2)
550 FORK=1TO300:NEXT
5 60 GOTO290
570 W=0
5 80 C=C+1
590 ON C GOTO600,610,620,630,640
, 650,660
600 PUT(96,100)-(112,130) ,H1,PSE
T:GOT0665
610 PUT(80,100)-(96,130) ,B,PSET:
GOT0665
620 PUT(64,100)-(80,130) ,B,PSET:
GOT0665
630 PUT(48,100)-(64,130) ,B,PSET:
GOT0665
640 PUT(32,100)-(48,130) ,B,PSET:
GOT0665
650 PUT(16,100)-(32,130) ,B,PSET:
GOT0665
660 PUT(0,100)-(16,130) ,B,PSET
6 65 FORX=1TO5:SCREEN1,0:FORK=1TO
150 :NEXTK: SCREEN1, 1 : FORK=1TO150 :
NEXTK: NEXTX
670 PLAY"T255L255V30O2CDEFGABO3C
DEFGAB04CDEFGABAGFEDCO3BAGFEDC03
BAGFEDC02BAGFEDC"
680 IFC<7THEN500
690 POKE65495,0:SCREEN1,0:X1=112
August 1985 THE RAINBOW 85
:X2=128:M$="V3101T255L255CP255C"
700 F0RK=1T08
710 PUT (XI, 100) -(X2, 130 ), HI, PSET
720 PUT(X1-16,100)-(X2-16,130) ,B
,PSET
73j3 PUT(X1-112,100)-(X2-112,130)
,BL,PSET
740 PLAYM$:FORD=1TO50: NEXTD
750 X1=X1+16:X2=X2 + 16
760 NEXTK
770 PUT(224,100)-(240,130) ,B,PSE
T
780 PUT(128,100)-(144,130) ,BL,PS
ET : PLAYM$ : FORD=1TO120 : NEXTD
790 X1=144:X2=160
800 F0RK=1T06
805 PUT(224,100)-(240,130) ,BL,PS
ET
810 PUT (XI, 100) -(X2, 130) ,BL,PSET
: PLAYM$
815 PUT(224,100)-(240,130) ,B,PSE
T
820 FORD=1TO80: NEXTD
830 X1=X1+16:X2=X2+16: NEXTK
835 PUT(224,100)-(240,130) ,BL,PS
ET
840 FORD=1TO800: NEXTD
850 PUT(224,150)-(240,180) ,H2,PS
ET : PLAYM$ : FORD=1TO120 : NEXTD
860 X1=208:X2=224:FORK=1TO6
870 PUT(X1,150)-(X2,180) ,H2,PSET
880 PUT(X1+16,150)-(X2+16,180) ,B
, PSET : PLAYM$
890 X1=X1-16:X2=X2-16
900 FORD=1TO80: NEXTD
910 NEXTK
920 X1=112:X2=128
930 F0RK=1T08
940 PUT(X1, 150)-(X2, 180) ,H2, PSET
950 PUT(X1+16,150)-(X2+16,180) ,B
,PSET
960 PUT(X1+112,150)-(X2+112,180J)
,BL,PSET:PLAYM$
970 FORD=1TO50: NEXTD
980 X1=X1-16:X2=X2-16:NEXTK
990 PUT(96,150)-(112,180) ,BL,PSE
T
1000 PUT(0, 150)-(16, 180) ,B, PSET:
PLAYM$
1010 FORD=1TO120: NEXTD
1020 X1=80:X2=96
1030 F0RK=1T06
1035 PUT(0, 150)-(16, 180) ,BL, PSET
1040 PUT(X1,150)-(X2,180) ,BL,PSE
T : PLAYM$
1045 PUT(0, 150)-(16, 180) ,B, PSET
1050 FORD=1TO80: NEXTD
1060 X1=X1-16:X2=X2-16
1070 NEXTK
1075 PUT (0,150) -(16, 180) ,BL, PSET
1080 I$=INKEY$:IFI$= IM, THEN1080
1090 POKE65494,0:C=0:SCREEN1,1:G
OTO500
1100 END
1110 DIML$(26)
1120 L$(1)="BD10U5NR8U1E4F4D6BR4
BU10"
1130 L$(2)="D10R6E2U1H2NL6E2U1H2
L6BR12"
1140 L$(3)="BR3NR5G3D4F3R5BR3BU1
0"
1150 L$(4)="D10R5E3U4H3L5BR12"
1160 L$ (5) ="NR8D5NR6D5R8BR4BU10"
1170 L$(6)="NR8D5NR6D5BR12BU10"
1180 L$(7)="BR8L6G2D6F2R4E2U3L4B
R8BU5"
1190 L$(8)="D10U5R8D5U10BR4"
1200 L$(9)="BR1R6L3D10L3R6BR5BU1
0"
1210 L$(10)="BR2R6L3D8G2L1H2U2BR
12BU6"
1220 L$ (11) ="D10BR8L1H5NL2E5R1BR
4"
1230 L$(12)="D10R8BR4BU10"
1240 L$(13)="ND10F4E4ND10BR4"
1250 L$(14)="ND10D1F8D1U10BR4"
1260 L$(15)="BR2G2D6F2R4E2U6H2L4
BR10"
1270 L$(16)="ND10R6F2D1G2L6BR12B
U5"
1280 L$(17)="BR2G2D6F2R4E1NH3NF1
E1U6H2L4BR10"
1290 L$ (18) ="ND10R6F2D1G2L6R1F5B
R4BU10"
1300 L$(19)="BR8L6G2D1F2R4F2D1G2
L6BR12BU10"
1310 L$(20)="R4ND10R4BR4"
1320 L$(21)="D8F2R4E2U8BR4"
1330 L$(22)="D6F4E4U6BR4"
1340 L$(23)="D10E4NU1F4U10BR4"
1350 L$(24)="D1F8D1BL8U1E8U1BR4"
1360 L$(25)="D1F4ND5E4U1BR4"
1370 L$(26)="R8D1G8D1R8BR4BU10"
13 80 RETURN /^\
86
THE RAINBOW August 1985
DIGISECTOR
DS-69
VIDEO
DIGITIZER
FOR THE
COCO
Give your COCO the gift of sight!
The Micro Works is happy to introduce the newest
member of our Digisector™ family — the DS-69 Video
Digitizer for your COCO. It has all the standard
features of its big brothers but comes with a price tag
that's right for you.
■ High Resolution 256 by 256 spatial resolution.
■ Precision 64 levels of grey scale.
■ SPEED! 1 /2 second for a full screen of video.
■ Compactness Self contained in a plug in Rompack.
■ Ease of Use Software on disk will get you up and
running fast!
The DS-69 Digisector
opens up a whole new
world for you and your
COCO. Your computer
can be a security system,
take portraits, analyze
signatures, inspect
assembly work . . .
the DS-69 is your COCO's
eyes. Use the DS-69 and a TV camera to get fast,
precise conversion of video signals into digital data.
Powerful C-SEE™ software.
C-See is a menu-driven software package included
with your DS-69. It provides high speed 5 level digitiz-
ing to the screen, high precision 16 level digitizing for
superb hard copy printout, and simple software con-
trol of brightness and contrast. Or call our driver rou-
tines from your own Basic
program for easy 64 level
random access digitizing.
Pictures taken by the
DS-69 may be saved on
disk by C-See and then
edited by our optional
MAGIGRAPH package for
enhancements and
special effects.
The DS-69 comes with a one year warranty. C-See
supports both cassette and disk operation with the
Multi-Pak adaptor and requires 64K. Cameras and
other accessories are available from The Micro
Works. Let your COCO see the World!
■ DS-69 Digisector & C-See Software $149.95
■ MAGIGRAPH Graphics Package on disk $ 39.95
Terms: Visa, Mastercard, Check or C.O.D.
Purveyors of Fine Video Digitizers Since 1977.
mD©03@
■
Established 1977
P.O. Box 1110 Del Mar, CA 92014 (619) 942-2400
GAME SHORTIES
Now, just the moment you've been
waiting for . . .
-» t
Oodles
A Mind Boggier
See if you can solve this Picstick puzzle. Play against
the computer, alternating turns until all 15 sticks are
taken. The object is to force the computer to take
the last stick. Each turn (your's and the computer's)
is limited to one, two or three sticks. Of course, when
you figure out the correct pattern you will always
win. But, how long will that take?
The listing: PICSTICK
1 CLS: PRINT "PICK UP STICKS" : PRIN
T
2 PRINT" YOU MAY PICK UP 1,2, OR
3"
3 PRINT" STICKS EACH TIME. THE O
BJECT"
4 PRINT" IS TO MAKE THE COMPUTER
PICK"
5 PRINT" THE LAST ONE. PRESS ENT
ER"
6 PRINT" WHEN YOU ARE READY."
7 INPUT A$
8 CLS(0)
10 FOR 1=1 TO 15
20 FOR J=16 TO 31
30 SET(I*4,J,4)
40 NEXT J
50 NEXT I
60 SW=1 :T=15
100 PRINT@0, "ENTER NO. (1,2, OR
3) "
110 INPUT A$
120 A=VAL(A$)
130 IF A<1 OR A>3 THEN 100
140 T=T-A
145 PRINT" STICKS CHOSEN="A" REM
AIN="T
150 IF T>0 THEN 180
160 IF SW=1 THEN PRINT@0,"YOU LO
SE" ELSE PRINT@0,"YOU WIN"
170 GO TO 1000
180 SW = -SW
88 THE RAINBOW August 1985
190
200
210
220
230
240
2 50
2 60
270
280
290
300
310
320
330
340
3 50
3 60
370
1000
1010
1020
B=(15-(T+A) )+l:Bl=(B+A)-l
FOR I=B TO Bl
FOR J=16 TO 31
RESET (1*4, J)
NEXT J
NEXT I
IF SW=1 THEN 100
ST=T-1
MC=0
IF MC=3 THEN 3 60
MC =MC+1
A=(ST-MC)/4
A=ABS (A)
A=A-INT(A)
IF AO0 THEN 280
A=MC
GOTO 140
A=l
GOTO 140
PRINT@32 "END
PRINT"
INPUT
RESTART
A$:GOTO
GAME"
= ENTER"
8
Brian Baxter
Arlington, TX
Where Are the Walls?
The Maze Game begins with a man (in the upper
left corner of a blank screen) and a blue dot (in the
lower right corner of the screen) indicating an exit.
Your goal is to find your way out of the dark maze,
however, the walls are invisible. They only appear
as you run into them.
The listing: MflZEGflME
10 REM MAZE
20 DIM A$(16)
30 MV=0:F=3
40 GOSUB 700
60 FOR 1=1 TO 16
70 READ A$(I)
80 NEXT I
90 READ L,E:X=INT(L/100) :Y=L-(X*
>f Games For 4K
-» v
/
M
95 EX=INT(E/10,0) :EY=E-(EX*10p)
CLS(^) :MX=X:MY=Y
SET(EY*2, (EX-1)*2,3)
GOSUB 400
B$=INKEY$
IF EX=X AND EY=Y THEN
IF B$="" THEN 12JZ5
MX=X:MY=Y
AND X>1 THEN MX=X-
8^5^
IF
IF
IF
IF
B$="U"
B$="D" AND X<16 THEN MX=X
B$="L" AND Y>1 THEN MY=Y-
B$="R" AND Y<32 THEN MY=Y
100
101
105
12j3
123
125
130
140
1
150
+ 1
160
1
170
+ 1
180 IF MID$(A$(MX) ,MY, 1) ="W"THEN
GOSUB200 ELSE GOSUB300
190 GOTO 120
REM WALL
11= (MX-1) *2 : IJ= (MY-1) *2
FOR 1=11 TO II+l
FORJ=IJ TO IJ+1
SET (J, I, 8) :NEXT J
NEXT I: RETURN
REM RESET/SET POSITION
II=(X-1)*2:IJ=(Y-1)*2
FOR 1=11 TO II+l
FOR J=IJ TO IJ+1
RESET (J, I)
NEXT J: NEXT I
II=(MX-1) *2:IJ=(MY-1) *2
FOR 1=11 TO II+l
FOR J=IJ TO IJ+1
SET(J,I,5)
NEXT J: NEXT I
X=MX : Y=MY : MV=MV+ 1
RETURN
DATA WWWWWWWWWWWWWWWWWWWWWWW
WWWWWWWWW
510 DATA WSWSSSWSSWSSSWSSSWWFSWS
WSSSWSSSW
200
210
220
230
240
2 50
300
310
3 20
330
340
3 50
400
410
420
430
440
445
450
500
520 DATA WSWSWSWSWWSWSWSWSSSWSWS
WSWSSSWSW
530 DATA WSSSWSWSSSSWSWSWWWSWSWS
WSSWWWWSW
540 DATA WWWWWSWSWSWSSWSSSWSWSWS
WWSSSSWSW
55jZ) DATA WSSSSSSSWSWSSSWWSWSWSSS
wswwsswsw
560 DATA WSWSWWWWWSWSWSSSSSSSSWS
SSSSSWSSW
570 DATA WSWSWSSSWSSSSWWWWSSWSSW
WWWWWWSWW
580 DATA WSWSSSWSWWWWSSSSSWSWSWS
SSSSSWSSW
590 DATA WSSWWWWSWSSSWFWWWWWWSWS
WSWWSSWSW
600 DATA WWFWSSSSWSWSSWSSSSSWSWS
WSSSWSSSW
610 DATA WWWWSWWWWSSWSWSWWWSWSWW
WWWSWWWSW
620 DATA WSSSSWSSSWSWSWSSSWSWSWS
SSSSWSSSW
630 DATA WSWWWSSWSWSWSSSWSWSWSWW
SWWWWWWWW
640 DATA WFSSSSWWSSSWSWWWSWSWSFW
SSSSSSSSW
650 DATA WWWWWWWWWWWWWWWWWWWWWWW
WWWWWWWSW
660 DATA 0202,1631
70J3 CLS:PRINT"MAZE (VERISION 1)"
710 PRINT: PRINT"FIND YOUR WAY OU
ijiii
7 20 PRINT"U=UP D=DOWN L=LEFT R=R
IGHT"
725 PRINT"EXIT IS BLUE SQUARE"
7 30 PRINT"PRESS 'ENTER 1 TO START
ii
7 40 INPUT B$
7 50 RETURN
800 CLS: PRINT" YOU MADE IT OUT IN
"MV'MOVES. 11
Brian Baxter
Arlington, TX
August 1985 THE RAINBOW 89
Watch Out, Danny Sullivan!
Indy4K\s a road race in which you control a super-
fast car with your right joystick. Stay on the road
for as many miles as you can.
If your CoCo can not take the "Vitamin E" POKE,
delete it from Line 0.
The listing: INDY4K
POKE65495,0:CLS:PRINT@106,"KAM
AKAZIE KAR":PRINT§175, "BY": PRINT
@238,"PAUL":PRINT@2 69,"WAGORN":P
RINT@33 4 , "FOR" : PRINT§397 , "APOLLO
" :PRINT@428 , "SOFTWARE"
1 SOUND 100,4:SOUND140,5:SOUND10
, 1 : SOUND140 , 1 : SOUND100 , 1 : SOUND1
10 , 1 : SOUND120 , 1 : SOUND130 , 1 : SOUND
140 , 1 : SOUND130 , 2 : SOUND120 , 4 : SOUN
D110,8:SOUND100,10
2 FORPO=503 TO 2 3 STEP -64: PRINT
@PO,"!";
3 POKE65315,63:FORI=lT0255STEP9:
POKE653 12 , 255 : P0KE653 12 , I : NEXT
4 PRINT@PO-31,">"; :POKE65315,63:
F0RI=1T0255STEP9 : POKE65312 , 255 : P
OKE6 5 312,1: NEXT : NEXTPO
5 PRINT@490, "PRESS A KEY";:EXEC4
1329
6 C1$=CHR$ (132+96) +CHR$ (143+48)+
CHR$ (13 6+9 6) :C2$=CHR$ (13 2+9 6) +CH
R$ (140+48) +CHR$ (136+96) :WL$=CHR$
(194) :CLS:P=15:S$=CHR$(255) :M$=C
HR$(128) :R$=CHR$ (131+32) +S$+M$+M
$+M$+M$+WL$+M$+M$+M$+S$+CHR$(131
+32) :RP=12
7 FORI=l TO20:PRINTTAB(RP) ;R$:NE
XT:PRINT§P,C1$; : PRINT@P+32 , C2$ ; :
PRINT@14+98 , "start" ; : SOUND100 , 1 :
SOUND200 , 3 : SOUND50 , 3 : SOUND100 , 1 :
SOUND140 , 2 : SOUND130 , 3 : SOUND110 , 4
: SOUND100 , 5 : SOUND90 , 6 : SOUND80 , 7 :
PRINT@0,"";
8 CD=RND(3)-2:F0RL=1T0 4
9 D=D+1
lj3 IF JOYSTK(0)=<3 AND P>=1 THEN
P=P-1:ELSEIFJOYSTK(0) >=60 ANDP<
=28 THENP=P+1
11 KI=P+64+1024:IFPEEK(KI)=255OR
PEEK(KI+1)=2550RPEEK(KI+2)=255TH
EN 16
12 PRINTTAB(RP) ;R$
13 GOSUB15:IFRP+CD>0ANDRP+CD<18T
HENRP=RP+CD : NEXTL : ELSEGOT08
14 GOTO 8
15 PRINT@P, Cl$ ; : PRINT§P+32 , C2$ ; :
PRINT @ 4 7 9 , " " : RETURN
16 E1$=CHR$ (139+48) +CHR$ (140+16)
+CHR$ (141+48): E2 $=E1$ : E3 $=CHR$ ( 1
90 THE RAINBOW August 1985
41+16)+CHR$ (131+96) +CHR$ (139+16)
: E4 $=E3 $ : F0RI=1T05 : PRINT0P, El$ ; :
PRINT§P+32 , E2 $ ; : POKE653 15 ,63: FOR
R=lT04:POKE65312,2 55:POKE65312,R
ND(255) :NEXT:PRINT@P,E3$; :PRINT§
P+32,E4$;
17 SOUND200,1:NEXTI
18 SOUND10,4:SOUND40,2:SOUND1,1:
SOUND10 , 1 : SOUND40 , 4 : SOUND20 , 1 : PR
INT@230,"MILELAGE:"D/20"MILES."
19 PRINT@480+RP+1, "PRESS A KEY";
:POKE65314,14:EXEC413 29:CLEAR:GO
TO 6
20 FORI=lTO 4:MOTORON:FORK=1TO50
: NEXT : SOUND1 , 4 : FORK=1TO500 : NEXT
:CSAVE"KAM KAR":NEXT
Paul Wagorn
Carp, Ontario
Screen Cleaning
Use the arrow keys in Cleanup to travel the screen
and clean up all of the characters. But, don't touch
the outer walls or any of the graphics.
The listing: CLERNUP
5 CLEAR 500-.CLS
10 PRINT: PRINT" (PRESS ANY KEY TO
START) "
15 A$=INKEY$:IF A$=""THEN 15
20 CLS : BL=0 : SC=0 : INPUT" STARTING
LEVEL (1-50) " ;S:IF S<1 OR S>50 TH
EN 20
25 CLS(0) : PRINT "SCORE=";SC
30 FOR X=0 TO S*3-l
35 P=RND(375)+96:IF PEEK(P+15360
)<33 THEN PRINT@P,CHR$(RND(63)+1
28) ;ELSE35
40 NEXT X
45 FOR X=0 TO S*3-l
50 P=RND(375)+97:IF X/3=INT(X/3)
THEN IF PEEK(P+15360)<33 THEN P
RINT@P,CHR$(RND(94)+32) ;ELSE 50
55 NEXT X
60 FOR X=0 TO 63:SET(X,3,5) : SET (
X, 3 1,5): NEXT X:FOR X=4 TO 31: SET
(0,X,5) :SET(63,X,5) :NEXT X
65 X=5:Y=5:U=0:H=0:A$=INKEY$:FOR
D=l TO 2 STEP 0:IF INKEY$<>""TH
EN D=2:NEXT D ELSE NEXT D
70 K$=INKEY$
75 IF K$=CHR$(94) THEN U=-1:H=0
ELSE IF K$=CHR$(10) THEN U=1:H=0
ELSE IF K$=CHR$(8) THEN U=0:H=-
1 ELSE IF K$=CHR$(9) THEN U=0 : H=
1
80 X=X+H:Y=Y+U:IF POINT (X,Y)>1 T
HEN 100
85 IF POINT (X,Y)=-1 THEN SC=SC+1
: BL=BL+ 1 : PRINT § 7 , S C ;
90 SET(X,Y,1) :IF BL<S THEN 70
95 CLS : PRINT "LEVEL" ;S; "COMPLETED
. . . BONUS :";S*5:SC=SC+S*5:BL=0:S=
S+l:FOR D=l TO 1000: NEXT D:GOTO
25
100 SOUND 45,1: CLS : PRINT" YOU MAD
E IT TO LEVEL "S;"WITH A SCORE
F "SC
Stephan J. Elms
Fort Ann, NY
Hunt and Peck
Typanic will test your knowledge of the CoCo's
keyboard, as well as your reflexes. Shoot down falling
:haracters before they hit the ground by typing the
ippropriate key on the keyboard. If you miss five
imes, the game is over and the CoCo displays your
core.
The listing: TYPRNIC
10 CLS : PRINT@43 , "TYPANIC" : PRINT:
PRINTTAB (7) ; "LEVEL: " : PRINTTAB (7)
; " ( 1 ) BEGINNER" : PRINTTAB ( 7 ) ; " ( 2 )
INTERMEDIATE " : PRINTTAB ( 7 ) ; " ( 3 )
EXPERT " : PRINTTAB ( 7 ) ; " ( 4 ) PRETTY
DARN HARD"
20 A$=INKEY$:IF A$="" THEN 20
30 A=VAL(A$):IF A>4 OR A<1 THEN
20
40 POKE282,1:CLS:T=300-50*VAL(A$
)
50 PO=2+RND(28) : C=32+RND (58)
60 C$=CHR$(C) :Y=PO
70 A$=INKEY$
80 PRINT@Y,C$;:Y=Y+32
90 IF Y>448 THEN 130
100 IF A$=C$ THEN 150
110 FOR DL=1 TO T:NEXTDL:PRINT§Y
-32," ";
120 IF A$="" THEN 70 ELSE 70
130 SOUND 1,1:W=W+1:IF W=5THEN17
140 GOTO 50
150 T=T-A: SOUND 200 , 1 : PRINT§Y-32
," "; :SC=SC+1:PRINT@0,SC:IFT<4 T
HEN T=5
160 GOTO50
170 CLS0:FOR S=200 TO 1 STEP -6
180 SOUND S,1:NEXTS
190 PRINT@160,"YOUR SCORE IS "SC
200 PRINT@224,"PLAY AGAIN (Y/N) ?
";:A$=INKEY$:IFA$=""THEN200ELSEI
FA$="Y"THENRUN ELSEEND
Michael Sims
Nanuet, NY
Memory Jogger
Letter Memory is a simple but challenging game
that tests your memory. The object of the game is
to remember a letter string that keeps growing larger.
When you run the program it will briefly display a
letter which you are to remember. You must type
the letter and the same letter will appear with another
letter added. The computer will keep adding more
and more to the string, one letter at a time, until
you forget part of the string (or, if you type it
incorrectly).
The listing: LETRMMRY
10 '
20 ! LETTER MEMORY
30 ' BY BEN JOHNSON
40 '
50 SC=0
60 A$="ABCDEFGHIJKLMNOPQRSTUVWXY
Z"
70 CLS
80 FOR T=l TO 255
90 GOSUB 140
100 INPUT F$
110 IF F$OS$ THEN 220
120 SC=SC+T:IF T/5=INT(T/5) THEN
SC=SC+5
130 NEXT T
140 R=RND(26)
150 D$=MID$(A$,R,1)
160 S$=S$+D$
170 D$=""
180 PRINTS$
190 FOR H=l TO 500: NEXT H
200 CLS
210 RETURN
220 CLS 3: PRINT"? " ;F$ : PRINT" SORR
Y, YOU LOST TRACK."
230 PRINT" SCORE: "SC
240 PRINT"CURRENT STRING:"
250 PRINTS $
2 60 GOSUB310
270 FOR L=l TO E : PRINT@159+NM (L)
,"-":NEXTL
2 80 PRINT: PRINT "TAP <ENTER> TO P
LAY AGAIN ..."
290 A$=INKEY$:IF A$OCHR$(13) TH
EN 2 90
300 RUN
310 FOR J=l TO LEN(S$)
320 IF MID$(S$,J,l)OMID$(F$,J,l
) THEN E=E+1:NM(E)=J:NEXT ELSE N
EXT
3 30 FOR J=l TO LEN(F$)
340 IF MID$(F$,J,l)OMID$(S$,J,l
) THEN E=E+l:NM(E)=J:NEXT ELSE N
EXT
350 RETURN Ben Johnson
Charlestown, WV
August 1985 THE RAINBOW 91
Inverting The Output
By Ed Ellen
Rainbow Technical Writei
(
• //7 your June 1985 issue, you recom-
mended Radio Shack's Hi-Res Screen Print
Utility, so maybe you can help me with this.
My PMOQE 4 diagrams are displayed with
while lines on a black background, and
BWDUMPprin/j them that way. However,
I need black lines on white paper because
the diagrams reproduce better that way. Is
there a simple way (e.g., a set of POKEs)
to invert the output from BWDUMP?
Humphrey Bryson
Stratford, CT
I don't know of any way to make
BWDUMP invert its printing, but you can
invert the screen easily if your program is
in BASIC. One way is to change PCLS to
PCL55 (to clear to white) and then use
PRESET to "set" points to black and PSET
to "reset" them to white when desired.
Another is by running this program:
10 FDR Y=0 TD 191: FDR X=0 TD 255
20 S=PPOINT(X,Y):IF 5=0 THEN
PSET(X.Y) ELSE PRESET(X,Y)
30 NEXT X,Y
(Ed Ellers, a RAINBOW and PCM staff
member, is a self-confessed electronics
fanatic whose other interests include
science fiction.)
CoCo Fender-Benders?
• Some lime ago there was mentioned an
auto touch-up paint that could be used to
touch up the original gray CoCo. Do you
know what type of paint would be used?
Harold L. Laroff
Monsey, NY
Strangely enough, the paint to use for this
job is made to match late model Mercedes
models' silver finish. You can find this at
any auto parts store or (if you're desperate)
at the parts department of a Mercedes-Benz
dealer.
Where Did It Go?
• When I load a machine language tape
into my 64K ECB CoCo, then enter PRINT
MEM. the MEM value remains the same. Could
it be it 's storing the value in high memory?
Aaron Repath
Tucson, AZ
Yes it could, but that isn't causing the
apparent discrepancy. The MEM value
represents the amount of memory left for
BASIC programs and variables; loading
machine language file has no effect on th
pointer.
Watching the Files Go By
• We now find that we have more file
on our disks than will display on on
directory screen. We would like to do on
of the following:
1) Get a printout of the directory, or
2) Display the directory in two column
as on the screen.
Do you have a solution to this problem?
John E. Bee,
Boise, 11
Yes. To get a printout of a disk director
just get your printer ready (and POKE 15
with the proper value, if needed), then entf
POKE 111,254 :DIR or DIR1. The POK
redirects output from the screen to th
printer. I've never had any luck using it fc
other screen output.
DfiTfi Statement Tricks
How can you input various items o
92
THE RAINBOW August 1985
information at prompts and then, by
programming, transfer the information to
a OATfl statement?
For example:
(890):
10 LINE INPUT "CHECK NUMBER";C$
(9/12/84):
20 LINE INPUT "DflTE";D$
(10.00):
30 LINE INPUT "S AMOUNT ;"R$
8300 DRTfl B90, "9-"12/B4", "10.00"
/ am a magician, but don't know how
to do this trick!
John R. Morrison
Beaver. PA
The third guess on your reply card was
about right; it's like the Hindu rope trick
that everyone talks about, but no one does.
DRTfl statements are mainly intended for
data items that are pretty well fixed and
simply need to be tucked into memory when
the program is run. It is possible, but hardly
practical, to POKE in new lines like this; you
would have to know all sorts of pointer
addresses to get the lines in the right place
with the proper format.
Board Conflicts
• / have been using the CNR Engineering
SP-I internal serial interface board to
connect my CoCo to an Epson MX-80
printer. I will soon have another Tandy
computer which has parallel output. Can
I plug this into my MX-80 without taking
out the SP-1 serial board?
Ralph J. Fusco. M. D.
Miami, FL
It would be best to take out the option
board before using the MX-80 with a
parallel interface. Leaving it in shouldn't do
any damage, but the board's signals may
interfere with the signals coming from the
other computer.
ASCII Aggravation
• Ever since I have owned my CoCo, I
have had trouble saving and loading files
in A SCII on tape. If I listen to the tape,
I find that the signal is very weak. Everything
works fine when using the binary mode.
Rodney Lee Gibbons
Fairmont, WV
This sounds like a problem with your
cassette recorder. Apparently the automatic
level control circuit is increasing level during
the blank spaces between blocks; when the
block comes along, the ALC drops way
down and takes some time to recover. The
result is that the signal is recorded too
weakly. If you don't have a Radio Shack
computer recorder, I suggest getting one.
Does Frugality Pay Off?
• / like to keep my disk drives clean, but
I like to avoid waste, too. I use Radio
Shack 's drive head cleaning kit, and I've
noticed that, although I follow directions
to the letter, I've always got cleaning Jluid
left over. This is true even when I've used
the cleaning disks the recommended 13
times each. Is it OK to continue to use these
disks until the Jluid is used up, or could
that in some way damage my drives?
Barry Friedman
Union, NJ
I wouldn't recommend using the cleaning
disks more than 13 times simply because
there's that much more chance of fouling
the head from some large particle. Since you
seem to have more fluid than you need, you
might want to use it to clean the heads of
your tape recorder (if you use one). /^\
INTRODUCINB:
PERIPHERALS THAT WORK TOGETHER!
«*«»t»»t»«»«»«««»««**«»**»««*«»t»t«»«*»n»»««*t»t*»t
Now, use disk drives, modems, parallel printers and
more ... all at the same time!
Universal Interface -- connects to CoCo, provides
buffered bus and device selection $49.95
NOTE: All boards below require the Universal I/F be
connected to the computer.
Floppy -- controls 4 single, double, or quad density
5-1/4" drives, or 8" drives $139.95
Dual 5-1/4" drive cable $19.95
Ramdisl: — contains 256K of RAM, expandable to 2
megabytes. Transfers over 70K bytes/sec $229.95
Print Spooler -- contains 64K buffer. Controls 2
parallel printers $129.95
5 ft. printer cable $24.95
RS-232 Controller — contains 64K buffer. Controls 2
serial ports. Baud rates to 19,200 $149.95
5 ft. male or female RS-232 cable $12.95
To order or for information:
WRITE: Research Service Labs CALL: (405)745-9322
P. 0. Box 19124 Bam-4pm CST
0KC, OK 73144 Monday-Friday
. .
L
J£)
MicroWorld II
Laneco Plaza Clinton, NJ 08809
(201)735-9560
Call or write for Price List
LOW PRICES ON 1 00%
Radio Shack Equipment
(with full warranty)
New Slimline Drive $270.00
New Slimline Drive 1 $165.00
Both $435.00, installed $445.00
Prices include shipping!
64K Upgrade (150NS) Top of the line $30.00
16K Extended $88.00
64K Extended $145.00
Diskettes $1.50 each, Flip N Files $14.95, Library Cases $2.50
10% off all Radio Shack Sale Items
10% off Computerware
15% off Radio Shack Hardware
August 1985 THE RAINBOW 93
GREAT COCO PRODUCTS
s\Jpt R
PRO
KtV BOM«>
WHY
PAY
MORE?
The best
is only
$59.95*
• Fast, easy installation — no soldering
• Individually boxed with full instructions
• Smooth "Touch Typist" feel — no sagging
• U.S. made— high quality, quad gold contacts
i Professional, low profile, finished appearance
• Computers produced after approximately October 1982 require an
additional keyboard plug adapter. Please add $3.95.
QUALITY VIDEO MONITORS
SAKATA COLOR SC-100 $239.95
The SC-100 is a streamlined 13" composite
monitor which produces sharp, brilliant
colors. The cabinet is made of durable sty-
rene and is available in an attractive off-while
color. Includes audio with speaker and ear-
phone jack. V\fe highly recommend this color
monitor because of its excellent performance
and beautiful styling.
TAXAN AMBER SCREEN $119.95
A 12" amber screen composite monitor of the
highest quality with exceptional reliability
and performance. 18 MHZ bandwidth. At-
tractive off-white cabinet. We use this moni-
tor in our offices.
We carry other brands also.
Call for additional information.
Order a quality monitor from us and get a
Universal Video Driver for only $24.95
Save $5.00
^
<&
Ato
SERIAL TO PARALLEL
^y INTERFACE
300 to 9600 baud. Complete with all cables
and power supply.
Only $49.95
V
'h
%
PRINTERS
NEW Star Gemini
SC-10 model printer-
Only $249.95
120 cps w/true
descenders,
2K buffer,
proportional
spacing. New mo
GREAT BARGAINS ON
COCO DISC DRIVES
COMPLETE SYSTEMS INCLUDE: _^ t
• Hi-Quality Teac Thin Line Drives <<0C
• Attractive, Beige Dual Drive Cabinet/Power Supply
• Fill Panel lor Single Drive Disc Systems / ...
• Radio Shack or NEW TYPE I & M Disc Controller ^^^^J
Offering Swiich Selectable Rorm and Parallel Printer Port
• Cable and Operating Manual
• Full 90 Day Warranly
Single Drive (SSDD) in Dual Cabinet w/Conlroller $299.95
Additional Drive 89.95
Two Driws (SSDD) in Dual Cabinet w/Con(roller 384.95
Single Drive (DSDD) in Dual Cabinet w/Controller 359.95
Additional Drive T29.95
Two Drive? IDSDD) in Dual Cabinet w/Controller 484.95
Dual Cabinet/Power Supply 79.95
Disc Controller (Radio Shack or) 8, M) 139.95
Connecting Cable 24.95
Radio Shack DOS ROM 1.1 or J/DOS w/Manual 39.95
UNIVERSAL VIDEO DRIVER
• Works with Monochrome Monitors
• Works with Color Monitors
• Easy Installation— No Soldering
ENABLES YOUR COCO TO OPERATE WITH
A VIDEO MONITOR INSTEAD OF A
TELEVISION.
Carefully engineered to work with
ALL Color Computer models, includ-
ing the new COCOII.
Great Price! ONLY $29.95
$$ SAVE MONEY ON YOUR $$
CASSETTE & DISC SUPPLIES
CASSETTES
We buy cassettes and discs in large quantities for our own use and can pass the savings on
to you.
C-10 Cassettes w/labels .59 ea 10 lor 15.50
Cassette storage box .25 ea 10 tor 2.00
ROMS
Basic 1.2
Extended 1.1 w/Manual
Disc 1.1 or l/DOS w/Manual
.539.95
.49.95
. , 39.95
5V. DISCS
High quality, nationally advertised brand. Guaranteed Performance. We will replace any disc that
fails during normal use. Discs are double density, reinforced hub with sleeve. $12.95 for 10 discs
in an attractive storage box. • Great Price!
NEW! DISC STORAGE
Attractive, heavy duly, smoked acrylic case. Holds
and protects up to 75 5W" discs with six
moveable, indexed dividers.
SUPER BARGAIN — ONLY $9.95
SPECIAL— Purchase this storage case including 10 discs for
only $21.95
NEED MORE MEMORY?
64K Memory Expansion Kit
All parts and complete instructions
(For 'E' and 'F' boards and CoCo II).
NOW ONLY $14.95
SERIOUS STUFF
ACCOUNTING SYSTEM
The Mark Data Products Accounting System is ideal for the small businessman needing a
fast, efficient means to process income and expenses, prepare detailed reports and
maintain most of the information required at tax time. The system is a family of programs
which operate by means of a "menu" selection scheme. When the operator selects a task
to perform, the computer loads a program designed to handle that task from the system
disc. The system disc contains all of the programs required to create, update and maintain
data files and prepare the necessary accounting reports including a transaction journal, a P
& L or income report, an interim or trial balance and a balance sheet.
This accounting software equals or exceeds higher priced packages for other computers
and includes a detailed operating manual. ONLY $99.95
ORDER ENTRY SYSTEM
The Mark Data Product sales order processing system provides a fast, efficient means to
enter orders, print shipping papers and invoices, prepare sales reports, and monitor
receivables. The system automatically enhances the monitor screen to a 51 character by 24
line display. 32K of memory is required along with an 80-colurnn printer and oneor more
disc drives.
This order entry software equals or exceeds higher priced packages for other computers
and includes a detailed operating manual. ONLY $99.95
EASY EDIT
Easy-Edlt is a versatile, easy to use text editor which is particularly convenient for assembly
language and BASIC programming. This editor offers powerful text handling capabilities .
along with many special features including a built-in disc operating system, 32/64K memory
sense, a 51 character by 24 line screen, auto key repeat, extensive error reporting, and
complete compatibility with popular assemblers. Requires 32K and at least one disc drive.
Master disc and instructions are packaged in an attractive 3-ring binder. $34.95
EASY-FILE
Data Management
System
Rainbow, Nov. *84 "Easy File is one program that Ihvs up to its name. . Easy File is so easy it speaks
(or itseii."
Hot CoCo, Feb. '85 "/Ye examined tour database programs for the CoCo in the last tew months.
Easy File is the easiest to master and the one that best addresses my needs. Il'yvu need to organize
the information in your life, Easy File might just be the best method."
Need a good mailing list or customer list program? How about a program to keep track of your in*
vestments, your computer magazines, or record collection? Do you have an inventory of all house-
hold items for insurance purposes? EASY-FILE will do all of these things and many more. The
EASY-FILE master disc and instructions are packaged in an attractive 3-ring binder. Requires 32K
and at least one disc tin -.v.
Order Yours Now! Gel Organized for Only $59.95!
SUPER SCREEN
The Color Computer Supercharger
• A big 52 character by 24 line screen
• 'PRINT @' is fully implemented on the big screen
• Easily combine text with hi-res graphics
• Auto-key repeat for greater keyboard convenience f _1
• The 'ON ERROR GOTO' statement is fully implemented ' =
• Control codes for additional function
Guaranteed to be the most frequently used program in your software library. . .once you use it you
won't be without ill Cassette $29.95 Disc $32.95
JUST FOR FUN
Adventure and Arcade
Games • Cassette $24.95 Disc $27.95 • All require 32K
TREKBOER
This exciting hi-res adventure be-
gins aboard the starship Irekboer in
the 21st century. Life on Earth is
threatened by a deadly virus and
your mission is to search ihe fron-
tiers of space and return with a cure
to save mankind from disaster.
CALIXTO ISLAND
A valuable museum treasure has
been stolen; can you recover it???
This is a challenging adventure with
an occasional twist of humor. You'
visit a secret laboratory, a Mayai
pyramid, and you'll meel craz
Trader lack — all in living color an
exciting detail.
•"ii!;iliiTMlli!:ii
' I;
izOroxoxoiciYm-ci .<--
m EH
TUrS TOMB
Explore the ancieni, mystical tomb
of thegreat Pharoah. Find the magi-
cal keys which lead you to unbeliev-
able treasures as you oulmaneuver
the creatures that slither and swarm
about you. Super fast arcade action —
this one will knock your socks off.
SEA SEARCH
Get your shark repcllant and scuba
tanks ready! The graphics in this
adventure are truly outstanding and
the underwater scenes arc unforget-
table. You'll run into a pirate, a
mermaid and some hungry sharks tn
this coloful and unique treasure
hunt.
ii.lKl - '-.(i pub
- . . i >•* n«i1
- ■ > t
SHENANIGANS
Countless legends tell of a magnifi-
cent pot of gold hidden at the end
of the rainbow. Many have attempt-
ed to find the marvelous treasure
but success has eluded them and it
remains hidden to this day. You, as a
dedicated adventurer, have deter-
mined to search for the fabled riches.
1
BLACK SANCTUM
Encounter the forces of black magic
as you roam around an 18th century
monastery. You'll see all the evil
locations in this spooky adventure;
you'll love searching for and destroy-
ing evil in this classic tale. A MUST
for every adventure game fanl
SHIPPING: All orders under $100 please add S2 regular. $5 air All orders over Si 00 please add 2% regular. 5% air California residents ptease add 6% sales tax. Orders outside
the continental U S . check with us for shipping amount, please remit U.S. funds Software authors— contact us for exciting program marketing details. We accept MasterCard
and VISA. Distributed in Canada by Kelly Software
FREE— Send for our NEW 24 page catalog!
Mark Data Products
24001 ALICIA PKWY., NO. 207 • MISSION VIEJO, CA 92691 • (714) 768-1551
BYTE MASTER
16K
ECB
HfSETP
RAINBOW:
- J- "u
Interfacing
Machine Language
With BASIC
By R. Bartly Betts
Rainbow Contributing Editor
While the topic of this month's
column is interfacing machine
language programs with BAS-
IC, it covers other territory as well.
Along with another method of initial-
izing machine language programs, it
introduces a few ROM routines to use.
Finally, everything is tied up in a neat
machine language program that lets you
type a selected number of characters on
the screen. The characters you type are
in reverse video but, when you press
ENTER, they flip back to regular video
and are stored in a string variable that
you specify.
Last month the feature program
demonstrated one way to interface
BASIC to machine language. The pro-
gram this month shows you another
way to interface BASIC with machine
language, and also how to interface
machine language with BASIC.
Push and Pull
But first, some lessons. Two new
instructions for you to learn are PSHS
and PULS. PSHS (Push a Register on
(R. Bartly Bens is currently a technical
writer for Tandy Corp. and is a former
news reporter and magazine editor. As
the fat her of 10 children, computers are
his escape from reality.)
the Hardware Stack) is used like a good
filing system. In effect, issuing an
instruction like PSHS Y is like filing
the sales figures for yoyos in a file
drawer. The next time you need to know
how many yoyos are sold, open the
drawer and pull the yoyo file.
Likewise, if you have some informa-
tion in Register Y and are afraid it might
get lost or destroyed if you leave it there,
you can file its contents on the hardware
stack with a PSHS Y instruction. In
fact, PSHS can be used to save any
number of .the registers. To test this,
type Listing 1, then single-step through
it to observe the results:
Listing 1: DEMO
(A demonstration of the PSHS
and PULS instructions.)
00100 START
LDA
#9
00110
LDB
#8
00120
LDX
#7
00130
LDU
#6
00140
PSHS
A,B,X,U
00150
CLRA
00160
CLRB
00170
LDX#0
00180
LDU#0
00190
POLS
A , B , X , U
00200 DONE
SWI
00210
END
As you can see, this program doe. 1
nothing but load values into foui
registers, then clears them to zero
Before clearing them, however, Lint
140 causes them to be pushed onto the
hardware stack. After the registers art
clear, a PULS instruction is issued ir
Line 190 to restore the values. In this
demonstration program, four register;
are saved. PSHS can, however, save as
many or as few registers as you wish
using only one PSHS instruction.
Reading the Registers
To see the program in action, entei
the ZBUG mode by typing Z and
ENTER. To begin single-stepping, type
START, (type a comma after START).
Press 'R' to see the condition of the
registers. Register A contains the value
'9'. To step to the next instruction, press
the comma again. Again press 'R' tc
see the registers. Register A still
contains '9' and Register B contains '8'.
Continue through the program bj
pressing the comma to advance. Exam-
ine the registers each time. You see the
four registers A, B, X and U loaded
with values. The subsequent PSHS
instruction does not cause any change.
Next, the registers are cleared. Finally
the PULS instruction loads all the
original values back into the four
registers.
96
THE RAINBOW August 1985
Give Your Eyes
And Fingers A Break!
With rainbow on tape, you'll spend your time enjoying programs
instead of typing . . . typing . . . typing them. Each month, rainbow
on tape brings you ready-to-run programs from the current issue
of the rainbow (excluding OS-9 programs and any less than 20
lines long). Think of how your software library will grow. With
your first year's subscription, you'll get more than 230 new programs:
games, utilities, business programs, home applications — the full
spectrum of the rainbow's offerings.
You will receive as many as two dozen programs a month. Using
the documentation provided by the magazine, all you have to do
is load and run them!
.fl
A luxury service at a bargain-basement price:
rainbow ON TAPE single-copy rate is $10 within the U.S.; $12 for all other countries, rainbow ON tape
annual subscription rate is $80 within the U.S.; $90 in Canada; and $105 for all other countries.
Past Releases of RAINBOW ON TAPE Available, Too!
If you're among many readers of THE RAINBOW who file every issue, expecting someday to need a program
or article contained within the magazine, past releases of rainbow on tape are available — beginning with
the April 1982 edition. (Please check this issue's Table of Contents for "Back Issue Information" to review
previous magazine themes.)
Programs From Past Games Issues:
August 1984 — M*A*S*H, a trivia quiz about the hit TV series; The Trip, a graphics Adventure game played
with joystick; The Jungle, a safari challenge; Sopwiih CoCo, a flight simulation for would-be pilots; Dragon's
Gold, in which you must climb the ladder to success; Key Bombers, a game/ tutorial for improving typing skills.
Also: utilities for checking the speed of your disk drives/ and backing up disk programs on cassette. Plus, a
variety of other games and utilities.
August 1983 — Autodesigner, a graphics program for designing you own dream car; Football, a Simulation
of one of America's favorite sports; Missile Barrage, a game of strategy complete with sound and colorful graphics;
Mastermind, a game for psychics and sleuths; Safecracker, a safecracking challenge; and Enrak, an Adventure
game. Also: Sales Register, an on-sight cash register and sales recorder and Strumming, a music program featuring
folk favorites.
The Perfect Companion To Your RAINBOW
Each edition of RAINBOW ON TAPE is a collection of ready-to-load-and-run programs from the corresponding
month's issue of RAINBOW magazine. RAINBOW ON TAPE is not a "stand-alone" product, but is intended to be
an adjunct and complement to the magazine. That is, even if you purchase RAINBOW ON TAPE, you will still
need the magazine for loading and operating instructions. RAINBOW ON TAPE will not run on Dragon or MC-
10 computers.
Look for the order card between pages 34 and 35 in this issue.
To order by phone, call: (502) 228-4492
When using the PSHS and PULS
instructions, remember that you must
keep track of the order in which
registers are loaded onto the stack. The
stack operates in a "last in, first out"
manner. Therefore, if you push the
value in Register Y onto the stack,
followed by the value in Register X,
a PULS Y instruction does not load
Y's original value back into Y, it loads
the value from X.
Relating to ROM
Last month 1 discussed writing to the
text screen by storing character values
directly into the screen memory. This
column introduces you to a different
approach.
"A great many ROM
routines are available
for you to use from
machine language. A 11
you need to know is
what they do and
where they are. "
In BASIC, characters are displayed on
the video screen by a subroutine in
ROM (Read Only Memory). ROM has
hundreds of routines that BASIC uses
to do its work. For instance, there are
routines to turn on your cassette
recorder or disk drives. There are
routines to do arithmetic. There are
routines to read key presses when you
type, and there are routines to display
characters on the screen. A great many
ROM routines are available for you to
use from machine language. All you
need to know is what they do and where
they are.
Listing 2 makes use of two of these
subroutines to 1) get a keypress and 2)
display the generated character on the
video screen. It also introduces you to
the USR method of interfacing to BASIC.
The origin of this program is set to
$E00 to be compatible with all com-
puters. The next instruction, in Line
1 10, jumps to a ROM subroutine that
loads Register D with the value of the
argument, or parameter, included in the
BASIC USR command. For instance, if
you issue the command A=USR0(101),
Listing 2: SCRNTYPE
(A program to
read keyboard
input and display
it on the
icreen. The
location for the display is controlled by the USR function.)
00010
Vf^tfoVVoWoWfyoWoWoWoWoWoVVr
00020
* SCREEN TYPE
00030
* BY E
. BARTLY
BETTS *
00040
ycyoWoViWoWa'o'oWoV
V'.WoWoWoV
00050
*
00060
•k
0E00
00100
ORG
$E00
0E00 BD
B3ED
00110
START
JSR
$B3ED
0E03 C3
0400
00120
ADDD
#1024
0E06 IF
01
00130
TFR
D,X
0E08 BD
A1C1
00140
GKEY
JSR
$A1C1
0E0B 27
FB
00150
BEQ
GKEY
0E0D 81
20
00160
CMPA
#32
0E0F 27
0C
00170
BEQ
SPACE
0E11 81
08
00180
CMPA
#8
0E13 27
0E
00190
BEQ
BACK
0E15 81
0D
00200
CMPA
#13
0E17 27
12
00210
BEQ
DONE
0E19 A7
80
00220
STA
,x+
0E1B 20
EB
00230
BRA
GKEY
0E1D 86
60
00240
SPACE
LDA
#96
0E1F A7
80
00250
STA
,x+
0E21 20
E5
00260
BRA
GKEY
0E23 30
IF
00270
BACK
LEAX
-i,x
0E25 86
60
00280
LDA
#96
0E27 A7
84
00290
STA
,x
0E29 20
DD
00300
BRA
GKEY
0E2B 39
00310
DONE
RTS
0000
00320
END
0000 TOTAL ERRORS
Line 1 10 stores the value 101 in the 'D'
register. Therefore, in the case of this
program, the characters you type begin
at screen location 101.
Line 120 of the program adds 1024
to the value now stored in Register D.
This is because the text screen memory
begins at 1024. When this value is added
to the screen location value you set in
the USR command, the result is the
proper screen memory location. The
new value of 'D' is then transferred to
Register X for safe keeping.
A second ROM routine is used in
Line 140. Here, the routine at SA1C1
is used to capture the keys you type.
It stores your keystrokes in Register A.
Routine SA1C1 does not produce a
cursor when you type. I have used the
label GKEY to mark the beginning of
the routine that handles the character
you type. Here is how the routin
works:
• Line 150 compares a keystrok
stored in Register A to a value c
zero. Zero in Register A means tha
no key is pressed and the routin
loops back to check again.
• Line 160 compares the keystrok
to a space (you pressed the spac
bar). If it is a space, Line 17 1
branches to a routine to display
space (character 96). The norma
character 32 (generated when yoi
press the space bar) causes a blacl
block to appear on the screen whei
stored in text screen memory.
• Line 180 compares the keystrok*
to a backspace (character 8). If yoi
press a backspace, Line 19(
98
THE RAINBOW August 1985
YOU should be here . . .
FULL 80 COLUMN CAPABILITY
elite software
PBJ WORD-PAK
1. List su«f«ts en screen
H. List 5usf«ts en printer
3. Pevieu suspects
4. Apply correcticns to file
B. Edit file in artext
6. Learn harked uord5
7. List uords used an screen
8. List uords used en printer
-EIEttC> Return to 1st *eru
|t last... uou can give YOUR Color Cofutar • full 80 ehracter screen
display, At* h».« powerful software that's easy to um. Elite Software ard
the PBJ Urd-Pal . . . truly a wiming animation.
It'i easy... all you need for an 80 colun-i display is Uord-P* II. a "Y* Cable
' *or disl users), and a monitor. Everything plugs together. NO hardware
"edifications are reeded.
I"agine using the power of a progra* like Ellte«*rd with an 80 ooluwi
display. Elite«Uord/PBJ practically displays your final oocunent. Just lot*
at this screen. . . you see Right-Side text justification, Page filtering.
Bono* Page Margin. Page Break, Top Margin, and Auto-Line Centering.
E!ite«Uord/PBJ can display even sore' Elite*Spel/PBJ will find your spelling
errors. And just lot* at Elite»Calc/PBJ with an 80 coluwn screen display.
MKflfJI
1 III H2I 27JB2
MR
a
1 C
1 ii E
■ F " (
r> ■
l
llll LOOK
HI THIS llll
»» FULL 81 COLUNN I I S f L R V ««
"9HTKLV CKECf IEGISIEK
immiiE FOINII
11243 St
» at t
U1TTEH 10
HIE
M0OM IEP0SI
mmce
II IIII
ELITE, lilt
4/12/81
179 55
IIIS3 tl
II 1121
ElECHIC LIGHT CO
4/13/81
1112.51
IIKI II
12' 1122
JOHH lOOGH
151 18
11811 II
4/15/84
1588 II 1151 1 II
14 112]
MFEIMl HEUEWE SERVICE
11211.18
1311 II
15 1124
RftlMlOH NM2IHE
4/28/84
III II
1297 II
It 1125
ELITE. IDC.
124. »
1272 It
" 1124
WHO SHOCK
4/25/84
1123.95
1141.21
H' 1127
ElllE, IK
129.95
111821
" 1128
III! 2(
21 112)
1118 21
1*m f*m ( ■«■ ,
. > V
* v W
•f v
Elite-File
*«^
EliteCalc/3.0
Elite-Word"
SAME POWERFUL FEATURES + 80 COLUMN DISPLAY
Specify Disk or Tape, $79.95 each + $3.00 Shipping/Handling
These versions not available at Radio Shack
Hike S&fit urate
Elite -SpeL
SAME POWERFUL FEATURES + 80 COLUMN DISPLAY
Specify Disk or Tape, $39.95 each or $20.00 when purchased
with Elite-Word + $3.00 Shipping/Handling.
WORD-PAK II
Our Price $125.00
$3.00 Shipping/Handling
"Y" Cable Connector $25.00
SPECIAL - BUY
Elite-Calc or Elite-Word
with WORD-PAK
and deduct 10%
from total price.
201 Penn Center Blvd., Suite 301, • Pittsburgh, PA 15235 • (41 2)795-8492
• COLOR COMPUTER WORKSHEET *
IiteCalc73.0
How do you improve a widely acclaimed worksheet
program that's already powerful, fast, and easy to
use? We've added new features, more commands,
four screen displays, while maintaining excellent
ease of use and full compatability with all existing
Elite»Calc worksheets. You have more power and
flexibility than ever before! Elite»Calc/3.0 is your
best choice, and it's waiting to work for you.
WINDOW- TITLE LOCK
Holds Column and/or Row Titles
FOUR SCREEN DISPLAYS
Features 2 Hi-Res Screens
El
IMPROVED STORAGE
Stores 30% More Information
ZAP COMMAND - wipes out
numbers. ..leaves text & formulas
Ml «* xa*
it
:: 3 :: J :E:: F
IWC< SUES WCflLE 3V SUiiM
JtStUSNM OK •
u
I
5
3
3
«r suz; pmfile
st'),337 «eoti*N*Mi
:i!,i>3 —— —
S7.5&2 **»**im
ujn
tlC4N — ■
SiQ.121 ——MUM
1
1 n «H (»IH
<
im 1 1 » i
ii
MM MM
i ■
.
.»•! *ll 1 1 ( li Ml 1
IM l«
(Ml
«*■!«» !«(■ fftM'ft
MMI •
Ml IIMI n
H •
lii'l IK
Hit
l. (I'M
■Ml
i'i n
• Mil il
itiniii nwt ti
l-ll'H
huh
nm ii
i«» MW
1'iiH
IHM
mn ii
DM M 11)11 H
• iH|
mnw itnui hhki
nm ■»
DM II
>HMH MIUIK
I'M'**
11* H
IJ*Mi
it in
tint lit
IN fl
un ii
\) m
HMD BKl
i-rm
MI ft
II M II
il 'WI
um ik
mn
■ III *
ii im
MHN
llll*
Elite«Calc/3.0 offers TWO 51 character displays
Existing Elite«Calc user — contact us for upgrade pricing
CALC-LIST is a separate, machine language, utility that works
independently of Elite«Calc. It can read either tape or disk work-
sheet files, and will give you additional information that was pre-
viously "hidden" within your worksheet. With CALC-LIST, you can
list on the screen (or print) the actual contents of your worksheet
cells, including FORMULAS. CALC-LIST $24.95
Special Elite«Calc/PBJ version for Word-PAK
SPECIFY TAPE OR DISK ELITE CALC/3.0 $69.95
Elite-Calc/3.0Tape Radio Shack # 900-187
Ellte-Calc/3.0 Disk Radio Shack # 900-188
PACKAGES ONLY FROM ELITE SOFTWARE
Specify Dttk or Tap*
Elite.Calc/3.0&Calc-Liit - $79.95
Elite-Calc/PBJ forWord-Pak - $79.95
The "Original" Elite-Calc (Ver,1.2) NOW - $34.50
• COLOR COMPUTER DICTIONARY *
* COLOR COMPUTER COMMUNICATIONS *
Elite • Coram I Elite • Spel
TM
Elite»Comm turns your Color Computer into a powerful 300
Baud terminal.
Elite- Comm is SMOOTH Specify Tape or Disk
operation that's
EASY TO USE!
Not presently available at Radio Shack
$29.95
£lite SoJjt urate
now at Radio /hacK stores
Available via Eipresa Ofdor
Hi0>O . ■■ ii • il ■ " - -.i - >i ■ ol Tmdr C< ■ -.. • .. ,
Elite»Spel is an excellent spelling checker for your Colo.
Computer, and its VERY FAST . . . that's the key. Why wai
while a spelling checker does its job? Elite»Spel identitiei
all potentially misspelled words with a single pass througl
its perfectly adequate 24,000 word dictionary. Elite»Spe
lets you Add or Delete Dictionary words EASILY. Elite* Spe
is fully compatible with Elite»Word and will work with ASCI
files from other programs.
Speed is the fcey. . . Available on
r-,.» r> ■ l •.• Disk only
Elite 'Spel has it!
Radio Shack® Catalog # 900-185
$29.95
When purchased with ELITE' WORD . . . ONLY S1S.00
with
FREE
ail Merge
COLOR COMPUTER WORD PROCESSOR *
lite-Word
Also Available On OS-9
Elite-Word TAPE RS# 900-183
Elite-Word DISK RS# 900-184
Elite-Word/OS-9 RS# 900-186
"Elite* Word is a lerritic word processor with an impressive list
ol features, yef it's easy to learn and use."
-Stuart Hawkinson. HOT COCO
"I was more than satisfied with Elite* Word . . . After the review.
I would not hesitate to compare it with the two best selling
word processors. And my comparison places it at the top of
the list. "
-A. Buddy Hogan. RAINBOW
* COLOR COMPUTER DATA BASE MANAGER
EliteFile
THE SECOND GENERATION WORD PROCESSOR IS HERE!
ELITE'WORD is a high performance, all machine language,
c u// Screen Editor which offers an ease-ol-use that is simply
ncredible. ELITE*WORD has many powerful features not
'ound in other word processors for the Color Computer.
ELITE »WORD also offers a printed output flexibility that can
handle your sophisticated home and business applications.
LOOK at these features:
/ery easy to use • Top screen line reserved for HELP dis-
play/Command prompts • Excellent for BOTH program
sdltlng and word processing • TWO text entry modes;
nsert or Exchange • Auto Key-Repeat • Smooth display
scroll for easier proof reading • True Upper/Lower case
display with lower case descenders • Hl-Res text "View"
node displays text exactly as it will be printed; including
text Justification, Auto Line Centering, dynamic Margin
shanges, Top and Bottom Margins, Page Numbering, and
'age Breaks • Include feature (disk only) permits In-
cluding several file names within one output document;
total document will have sequential page numbering If
desired • Fast Disk I/O; no loading of overlay files to
ilow down operation • Variable Text (Mail Merge)
capability for Form Letter generation included FREE!
12K Extended Basic Required (or ROM routine calls • Variable TAB
itops • User definable Headers and Footers • Smooth cursor move-
nent over text; in any direction (including vertical) • Page Forward
>r Backward through text • Jump to beginning or end of text • Auto-
natic text centering • Automatic text Word-Wrap if desired • True
Block text Move, Delete, or Copy • Delete entire screen line • Back-
ipace and Delete Character • Delete character above cursor • Find
i string of characters • Global Replace character string • Two Hi-
tes screen displays; 32x19 for text entry/editing, 64 x 1 9 for for-
natted text viewing • Continuous Memory display • Over 22K file
lize in 64K machines • Easy generation of ASCII files • Save/Load
ext files (in ASCII if desired) • Program remembers last File Name
oaded or saved, and will write to it by default if desired • All I/O
irrors trapped and recoverable • Disk commands for Change Drive,
directory and Free Space • Print Format features allow user to
ipecify Left Margin, Line Length, Line Spacing, Top and Bottom
Margin, Duplicate Copies, Right-Side text Justification, Page Pause,
'age Numbering, and more • Dynamically change any print Format
eatures within text • Imbed Hex codes and printer Font changes
vithin text.
\dditional OS-9 version features:
Edit two files simultaneously • Save or Print only a portion of the text
suffer • Edit files larger than memory (uses disk as buffer) • Block
2opy from one file to another • Execute any OS-9 command from
Editor
If you want powerful features AND a program that's
EASY TO USE, Elite'Word is for you...
THE BEST FOR ONLY
Specify Ta p e $ 6 9. 95
RS Disk S 69.95
THIS IS IT! ELITE»FILE is the Data Base Manager that Color
Computer users have been waiting for. ELITE»FILE is for
everyone who needs to store and retrieve information.
ELITE»FILE is a full-featured relational Data Base Manager
with all the editing and report formatting features that are
typically found on much larger computer systems. COM-
PARE the others for record structure flexibility, total record
capacity, information processing ability, speed of program
response, printed output flexibility, and you'll agree that
ELITE»FILE may very well be the most powerful /useful pro-
gram ever written for the Color Computer.
OS-9 Disk $ 79.95
OS-9 & RS Disk S1 15.95
"/ like Elite -File and would readily recommend it to
anyone. .Its power and speed have to be seen to be
appreciated. "
-Ed Lowe, RAINBOW
"Elite • File is a very decent program and you can learn
to do a lot with it in a hurry. "
-Scott L. Norman, HOT COCO
No other File Manager gives you these features:
All machine language for speed • Flexible, user defined,
data record structures • Up to 255 characters per record
field • Up to 255 fields per record • Up to 2000 charac-
ters per record • Up to 4000 records per file • Up to 1 6
files can be open at the same time for Information pro-
cessing • Edit, Scan, Sort, Select Record information; all
done FAST • Output reports to Screen, Printer, or ASCII
Disk file • Place output data by Field Name, with Custom
Text anywhere on the printed page • Perform math oper-
ations (+, -, *, /) between Field contents • Produce tabu-
lated reports from multiple record contents • Generate
column totals across record field contents.
Compatible with Elite'Calc and Elite»Word files • User friendly
combination of Menu driven input, and single key commands • Sup-
ports up to 4 drives • Minimum 32K RAM, Disk required • Nested
sub-field definitions • Up to 8 fields in Primary Key • Copy record
definition from file to file • View/Print record definition • Input/Add
records with easy to use field name format display • Edit records
with full screen "type over" editor • Copy records to repeat identical
data • Load Elite'Calc worksheets into random access data files •
Scan mode for quick data retrieval
Radio Shack ®cata log # 900-189
COMPARE features and per-
formance speed . . . you'll agree
that EHte»Flle is the one to buy.
FOR ONLY
$74. 50
Disk Only
Productive Programs for Serious Users
Add $3.00 shipping and handling
PA Residents add 6% Sales Tax
OS-9 is a trademark ol Mlcroware and Motorola.
Dealer Inquiries Invited
Box 1 1 224 • Pittsburgh, PA 1 5238 • (41 2) 795-8492
hranches to a routine that decreases
Register X by one and stores 96
in place of the previously typed
character, erasing it.
• Line 200 compares Register A to
the value generated by a carriage
return. If it is a carriage return, 210
causes the program to end.
• If you press a key, but it was not
a carriage return, space or back-
space, Line 220 stores the character
value you typed into text screen
memory at the location pointed to
by Register X and increases Reg-
ister X by one.
• Line 230 then causes the program
to always branch back to the
GKEY routine to look for the next
keystroke.
"When using the PSHS
andPULS instructions,
remember that you
must keep track of the
order in which registers
are loaded onto the
stack. The stack
operates in a 'last in,
first out" manner. "
You can see that using ROM routines
is easy. A jump-to-subroutine instruc-
tion (JSR) is all that is required. Each
ROM routine ends with a RTS (Return
From Subroutine) instruction that
causes it to return control to your
program, beginning execution at the
line following the JSR.
Joining Forces with BASIC
To use Listing 2 with basic, all you
need are a few short lines that establish
the beginning of the machine language
routine and call it with a USR command
that contains a valid argument. Listing
3 does this:
Listing 3: INTRFfiCE
(A BASIC program to interface the
previous machine language pro-
gram with BASIC.)
1/8 CLS
2j3 DEFUSR#=&HE0j3
3j3 A=USRJ3(101)
4J3 END
Listing 4: REVTYPE
(A program
to display keyboard
input on
the screen in reverse video,
then invert the characters when you press ENTER.)
00010
**********************
00020
* REVERSE TYPE *
00030
* BY
CHRIS
BONE *
00040
**********************
00050
*
00060
*
7000
00100
ORG
$7000
7000 E6
84
00110
START
LDB
,x
7002 10AE
02
00120
LDY
2,X
7005 34
20
00130
PSHS
Y
7007 9E
88
00140
LDX
$88
7009 BF
705F
00150
STX
BEGIN
700C 3A
00160
ABX
700D BF
705D
00170
STX
LENGTH
7010 BD
A1B1
00180
LOOP
JSR
$A1B1
7013 81
0D
00190
CMPA
#$0D
7015 27
2D
00200
BEQ
DONE
7017 81
20
00210
CMPA
#32
7019 25
0C
00220
BLO
CONTRL
701B 26
08
00230
BNE
FLIP
701D 9E
88
00240
LDX
$88
701F A7
80
00250
STA
,x+
7021 9F
88
00260
STX
$88
7023 20
07
00270
BRA
CONTR0
7025 88
20
00280
FLIP
EORA
#$20
7027 BD
A30A
00290
CONTRL
JSR
$A30A
702A 9E
88
00300
LDX
$88
702C BC
705F
00310 CONTR0
CMPX
BEGIN
702F 24
07
00320
BHS
NOTBEF
7031 BE
705F
00330
LDX
BEGIN
7034 9F
88
00340
STX
$88
7036 20
D8
00350
BRA
LOOP
7038 BC
705D
00360
NOTBEF
CMPX
LENGTH
703B 25
D3
00370
BLO
LOOP
703D 86
08
00380
LDA
#$8
703F BD
A30A
00390
JSR
$A30A
7042 20
CC
00400
BRA
LOOP
7044 BE
705F
00410
DONE
LDX
BEGIN
7047 35
20
00420
PULS
Y
7049 A6
84
00430
DONELP
LDA
.x
704B 88
40
00440
EORA
#$40
704D A7
80
00450
STA
,x+
704F 81
60
00460
CMPA
#$60
7051 26
02
00470
BNE
NOTSPC
7053 86
20
00480
LDA
#$20
7055 A7
A0
00490
NOTSPC
STA
,Y+
7057 BC
705D
00500
CMPX
LENGTH
705A 26
ED
00510
BNE
DONELP
705C 39
00520
RTS
705D
00530
LENGTH
RMB
2
705F
00540
BEGIN
RMB
2
0000
00550
END
00000 TOTAL ERRORS
102
THE RAINBOW August 1985
From Computer Pius to YOU . . .
PLUS after PLUS after PLUS
A SPECTACULAR
OFFER!
A
VER
AFFORDABLE
DAISY WHEEL PRINTER
SMITH-CORONA L-1000
ONLY
.00
The Smith-Corona L-1000 text printer delivers
fully formed executive quality daisy wheel print
at a speed of 12 characters per second. It
features bi-directional printing, triple pitch — 10,
12, 15 cpi, logic seeking, underlining, 570 char-
acter buffer, and has both a serial and parallel
interface for easy connection to any computer.
It takes single sheets of paper up to 13 inches
wide, and an optional continuous forms feed
can be added at any time.
CALL TOLL FREE
1-800-341-8124
• LOWEST POSSIBLE PRICES
• BEST POSSIBLE WARRANTY
• KNOWLEDGEABLE SALES STAFF
• TIMELY DELIVERY
• SHOPPING CONVENIENCE
The Smith-Corona L-1000 is a simple, low
cost and reliable text printer backed by the
quality workmanship of Smith-Corona. The
L-1000 is compatible with most word proces-
sors, and even if you own a dot matrix printer
this is a great opportunity to obtain professional
looking results at an affordable price.
Take advantage of this one time offer from
Computer Plus while supplies last.
VISA
9m
P.O. Box 1094
480 King Street
Littleton, MA 01460
IN MASSACHUSETTS CALL (617) 486-3193
Line 20 establishes the beginning of
your machine language program with
the DEFUSR statement. Line 30 calls the
machine language program, passing it
an argument of 101. Thus, when the
program is run, the characters you type
begin to appear at screen location 101.
To use the programs, simply LORD
them using the proper loading com-
mands, type RUN and ENTER (because
the machine language program is
initialized by the BASIC program, you
do not use the EXEC command). The
screen clears and you can begin typing.
To return to BASIC, press ENTER.
Type and Invert
Listing 4 uses some of the preceding
features in a different way. The current
cursor position establishes where the
characters you type are displayed. The
characters appear in reverse but, when
you finish and press enter, they
immediately invert to normal uppercase
characters.
This program also uses two new
ROM routines. The routine at SA1B1
is similar to the routine at SA1C1,
except the normal cursor is on the
screen as you type. The second routine
at SA304 causes the characters typed
to be displayed on the screen. This is
the routine your computer uses in
basic, and it replaces the STA instruc-
tion we used in the earlier program.
Listing 5 is commented to help you
follow its logic. The following notes
describe some of the key points:
• The RMB instructions in lines 530
and 540 set aside storage space that
points to the beginning and end of
the string.
• Memory location $88 stores the
current screen cursor position.
• The ABX instruction adds the 'X'
and 'B' registers. 'X' and 'B' are the
only registers that allow this 16-
and 8-bit addition.
• The subroutine at $A1B1 gets
whatever key you press and stores
it in Register A. This subroutine
provides a normal cursor while
waiting for a key press.
• The subroutine at SA30A displays
the character currently in Register
A on the screen at the current
cursor position.
• If you are not familiar with the
ASCII values of characters (used
in lines 190, 210, 310, 360, 380, 460
and 500), there is an ASCII chart
in your Color basic manuals.
Listing 6: SAMPLE
A BASIC program to show how REVTYPE can be used.)
10 CLS
20 CLEAR 1000,&H6FFF: REM change
&H6FFF to &H3FFF for a 16K mach
ine
25 LOADM" REVTYPE: REM change LOA
DM to "CLOAD for a tape system
30 DEFUSR0=&H7000 : REM change &H
7000 to &H3000 for a 16K machine
40 PRINT TAB (5) "COMPLETE THE SE
NTENCE
50 FOR T=l TO 3
60 READ A$
70 S$(T)=A$
80 NEXT T
90 FOR T=l TO 3
100 PRINT
110 PRINT S$(T) " ";
120 B$=USR0("
")
130 C$=S$(T)+" "+B$
140 PRINT
150 PRINT "this is what you wrot
e:"
160 PRINT C$
170 NEXT T
180 DATA ROSES ARE, MY BONNIE LIE
S,HOME IS WHERE THE
Listing 5: CALLER
(BASIC program to call the Reverse
Type program. The number of
spaces between the quotes in Line
120 establish the maximum
number of characters you can
type.)
10 DEFUSR0=&H7000
20 A$=USR0("
3.0 END
")
Listing 6 is a sample of how the
program might be handled from BASIC.
The program asks you to complete
three sentences. The characters you type
are in reverse video. When you complete
your entry and press the ENTER key,
the typed characters flip back to normal
video. To show that the characters you
type are stored in B$, Line 1 30 combines
them with the partial sentence.
After using the program, LIST it. The
last characters you typed are now part
of the program and are displayed
between the quotation marks in Line
120.
Forging Ahead
Now, put your imagination to work.
Use some of the techniques you have
learned to write programs of your own.
You can, for instance, combine last
month's program with the one for this
month and create a program that lets
you type characters in reverse video, flip
them when you are through, then flash
them.
You probably realize that i ou now
have the knowledge to write a simple
word processor, or create your own
editing routine for a program.
You should feel that assembly lan-
guage isn't too difficult. You should
have the heady feeling of accomplish-
ment that comes with realizing you are
writing routines which could be used
in full-fledged machine language games
and utilities.
We have covered a lot of ground; now
take your time and explore the new
territory during the next month. It's a
territory filled with more treasures.
When you find some, write me, and we
will share them with others. My address
is 2251 Lipscomb, Fort Worth, TX
76110. ^
104
THE RAINBOW August 1985
We have ways
of naming your
computertalk.
VOLKSMDDEM 12"
A very smart 300/1200 baud
auto-dial/auto-answer modem
that makes computer-to-
computer communications
smarter, faster and easier.
Compatible with virtually every personal
computer on the market today, the
Volksmodem 1 2 is loaded with today's most
desired features. By using the Volksmodem
1 2. one adapter cable and software, you are
instantly in touch with the world of data
communications.
The Volksmodem 1 2 is capable of full
unattended operation in conjunction with
stand-alone terminals and computers which
have an RS232-C interlace. With the
Volksmodem I2's ability to access data
sources as well as transmit data information.
it's truly the affordable way to maximize your
personal computer's productivity.
Hayes compatible
300/1200 baud ONLY
modem $199.00
SPECIAL VOLKSMODEM 12
PACKAGE * AUTOTERM
PRICE only $229.00
VDLKSMDDEM
It puts computer-to-
computer communica-
tions within easy reach
of every personal
computer owner.
Jusl plug Volksmodem'" between
any wall phone jack and tele-
phone and pul your computer into
instant communication with thousands
of others. It's that easy. No extra parts
or tools are necessary — just one adapter
cable and software is all that's needed.
Completely portable. Volksmodem trans-
mits both voice and data over all common
telephone lines, automatically changes
from Originate to Answer and back again
when you're in the data mode, and uses a
low-cost 9V battery. With Volksmodem's
ability to access data sources as well as
transmit data information, it's the truly
a"ordable way to maximize your personal
computer productivity.
SPECIAL
PACKAGE
PRICE
0-300 baud
ONLY
$59.95
Volksmodem™
& AUTOTERM
AUTOTERM
TURNS YOUR COLOR COMPUTER INTO THE
WORLD'S
SMARTEST TERMINAL!
YOU'LL ALSO USE AUTOTERM FOR SIMPLE
WORD PROCESSING & RECORD KEEPING.
Cassette §39.95 Diskette $49.95
* Total Communications Capability
* Send/Receive Text, Graphics, & ML Programs
* Scroll, Search, Edit, Load, Save while On Line
* Built-in Word Processor
« HI-RES Lower Case is Optional & Fast
* Screen Widths of 32, 40, 42, 51, & 64
* Many Printer Options
* Optional Key-Beep & Error Beebop
* Automatic Block Graphics
* Unbelievable Keystroke Multiplier Abilities
ORDERING
INFORMATION
ADO $2.00 PER ORDER
FOR SHIPPING.
WE ACCEPT VISA MASTERCARO.
CHECKS. MO.
COO. ADO $3.00 EXTRA.
California Residents, Add 6%
Sales Tax to Orders
V/SA'
Utiib...
6201 C Greenback Lane
Prices good through 8/31/85
SOFTWflRC PLUS
(916) 726-8793
(MasterCard)
Citrus Heights. CA 95610
GAME
Travel to the surface of an alien planet,
dodging boulders, rockets, bombs and more,
in route to your final goal
By Nick Bradbury
Amphibia is loosely based on the
Moon Patrol. A Hi-Res 32K game,
Amphibia has several features which you may find
interesting:
1) Hi-Res artifact graphics
2) Machine language subroutines for "superfast"
3) Four totally different screens
4) Scrolling screens for continuous play
Because of the many machine language subroutines
in Amphibia, I will explain how these routines work and
also how the graphics were created.
How to Play
You travel the surface of an alien planet trying to
reach your final destination: Moon Base Amphibia! Your
vehicle is capable of traveling under water as well as
over land. To reach your base, you must complete three
levels of difficult obstacles: 1) boulders and rockets,
(Nick lirudhury enjoys cartooning, music and computer program-
ming. He will attend the University of Missouri- Holla this fall where
he plans to obtain his bachelor's in computer science.)
106
THE RAINBOW August 1985
August 1985 THE RAINBOW 107
2) bombs and craters, and 3) geysers
and surface rockets.
On each level, the right joystick
controls your movements (you can only
move left and right) and the firebutton
controls jumps.
On Level one, you must jump over
boulders while avoiding jumping up
into the overhead rockets. Your timing
must be perfect to jump over the
boulders. After the timer runs out (at
the bottom of the screen), you will go
to the next screen.
In the second screen, you are under
the alien ocean. Large craters appear
and you must jump over them. Occa-
sionally, undersea patrollers appear
above you. You must avoid the bombs
they drop and watch out for the craters
the bombs leave when they hit the ocean
floor.
After this screen, you will go on to
level three. There are two obstacles you
must avoid in this screen. The surface
rockets appear to your left. These
rockets pause for a moment, then
unexpectedly shoot across the screen.
You must jump over these rockets using
split-second timing. Geysers will occa-
sionally appear at the right of the
screen. These are impossible to com-
pletely jump, but you must jump high
enough so the water does not reach your
cockpit.
After completion of these three
screens, you will appear in front of the
moon base. Above and below you are
two revolving treadmills. The top
treadmill is slowly coming down upon
you, so you must act fast. To your right
are two berserkers which you must
avoid before you can reach your base.
To reach your base, you must move
your vehicle to the right. Upon com-
pletion of this screen, you will receive
a bonus and will return to the first
screen.
How to Create Graphics
The shapes in Amphibia are created
in an extremely simple way. All shapes
were originally drawn on graph paper.
Because of Extended Basic's DRAW
command, this drawing can be easily
translated into a draw string. For
example, if a line on the graph paper
moves right four spaces, I translate this
to equal "R4." After the complete string
has been created, I draw it the size I
want using the powerful scale option
of the DRAW command. The PAINT
command was used to fill in the shapes.
The colors used in this game are the
famous "artifact" colors that give
different colors in PMDDE 4 using
SCREEN 1,1. The best way I've found
to use these colors is by using memory
location 178. By changing the value in
this location, the colors in the graphics
commands are changed. By poking a
1 into this location, blue will show up.
By painting in this mode with the
format of PRINT (x,y) , ,1, the color
blue will show up instead of white.
The ML Subroutines
The most important subroutine is the
routine that copies an object onto the
graphics screen. The other routines do
the same action or scroll the back-
ground. I will only explain the copy
routine, for I feel it is the most useful.
This routine (see accompanying
listing) uses less than 50 bytes. First
draw the shapes onto pages five througr
eight. The ML routine copies thes(
shapes onto a specified section of th<
viewing screen. The ROM routine a
SB3ED (hexadecimal) is used to senc
the location from the USR command tc
the ML routine. This ROM routin<
transfers the contents in between thi
USR brackets and places it into the 'D
register. The ML routine takes thi:
location and places the shape in th<
desired memory location. You may usi
this routine in any of your programs.
Getting it Working
There are two problems you may fine
in Amphibia. First, the artifact color;
may not turn out correctly. To solvi
this, you will see a cleared screen a
the beginning of the program. If thi
screen is a bluish color, press Reset anc
rerun the program until the colors an
correct. After a short pause, the screei
will change and the program wil
continue.
The other problem you may have i
with the famous "speed-up" POKE tha
is used. If you have problems with thi
POKE, change the value of "PK"in Lim
to 65494. This will set the speed fo
the entire program.
If you encounter any problems witl
Amphibia, please write me and includ'
a full explanation of what went wrong
Also, please include a self-addressed
stamped envelope. I will write back a;
soon as possible. My address is I050(
Sandpiper Lane, Knoxville, TN 37922.
112 233 5255 218
410 33 6900 24
1016 104 7124 85
1218 60 7430 95
2000 179 7905 158
3052 69 8130 104
3162 234 8400 33
3316 218 8984 62
5050 151 9190 118
5175 128 END 128
T
Listing 1: AMPHIBIA
CLS0 : CLEAR8 5 , 3 1000 : PCLEAR8 : DIM
Al (10) : PK=65495 : POKEPK,0 : PMODE3 ,
1 : PCLS3 : PMODE4 , 1 : SCREEN1 , 1 : S 1=0 :
NS=4 : PX=10 : PY=12 : GOSUB5000 : GOSUB
2000 : CLS : PRINT@32 , Z$ ; : PRINT@448 ,
Z$;:PRINT@72,"a m p h i b i a":P
RINT@131, "(C) 1983 BY NICK BRADBU
RY" :PRINT@160,Z$;
20 SCREEN0 , : PMODE4 , 1 : PCLS0 : PMOD
E4 , 5 : PCLS0 : POKEPK,0 : PRINTQ224 : PR
INT@256:PRINT@284:GOSUB1000:GOSU
B3000 : DEFUSR0=3 1000 : DEFUSR1=3 105
: DEFUSR2=3 1100 : DEFUSR3=3 1150 : DE
FUSR4=3 1200 : DEFUSR5=3 12 50 : DEFUSR
8=3 1400 : GOSUB6300 : GOSUB6500 : PLAY
"O3V30L255T255" : POKE65494 ,0 :
85 IFINKEY$=CHR$(13)THEN90ELSEPL
AY"FAAE":GOT085
90 R1=0:R2=0:TI=0:POKEPK,0:BG=52
54 : BX=5 : E1=0 : E2=0 : PC=0 : JP=0 : U=US
R0(BG)
98 LV=1:PMODE4,1:COLOR1,0:SCREEN
1,1
100 J0=JOYSTK(0) :IFJP=1THEN108EL
SEIFJ0<20THEN200ELSEIFJ0>43T'HEN2
25
108 PC=1-PC:U=USR0(BG) :U=USR4(0)
108 THE RAINBOW August 1985
suisyiis/iER
Double
yXIVOEK/DR I VES
FREE
with
drive
purchase
«a ooyi
o
ONLY $199.00
$259.00 CDN
urn mwmmm mm
|« AT NO EXTRA CHARGE
A COPY OF OUR NEW SUPER UTILITY
COiVHS/ly^ND MASTER
Command Master allows you to write your own
customized version of Basic - include any of our
Command Set™ routines or write your own and
rade them with others. All programs written using
x cutomized Command Master Basic are STAND
\LONE and yours to do with as you wish. The
system includes Command Master- Command
Set - Build utility- and a handsom swede finish
hree ring binder for notes and documentation.
VISA &
MASTER
CARD
HOLDERS
CALL
1 - 416-
529-1319
9AM 5PM EDT
mmw \mw \mw
mwm ram™ @©ms)
©©©©it og®„®§ p®.©§ ©mj
*
Please add $1 shipping - J & M controllers
with JDOS $149 ($1 99 Cdn) - Cable for one
double Amdek and one RS $1 9 ($24 Cdn)
DEALER INQUIRIES INVITED
USA
l> ■•! Ill ■*■ ■ ■■ ■•■! ■ ■■>■■ !■■■■■■ !■■!■■■ ■■■
iiBiigi^i
125 SOUTH FIFTH STREET
LEUJISTON, NV, 14092
CRNHDfl
420 FERGUSON RUE. N
HRMILTON, ONT, L8L 4V9
: IFPC=1THENEXEC3 155,0
112 IFR1=1THENGOSUB405
120 IFJP=1THEN310ELSEIF(PEEK(&HF
F00 ) AND1 ) =0THEN300
124 IFPC=1THENBG=BG-32ELSEBG=BG+
32
130 U=USR4(0) :U=USR3(0) :IFR1=1TH
ENGOSUB405ELSEIFRND(15)=1THENGOS
UB400
144 IFR2=1THENG0SUB425ELSEIFRND(
2 6 ) =1THENG0SUB4 20
180 TI=TI+1:IFTI>8THENTI=0:GOSUB
6400
190 PLAY"O5V31P255":GOTO100
200 IFBX<1THEN108ELSEBX=BX-1:BG=
BG-1
205 U=USRl(BG+7) :GOTO108
225 IFBX>16THEN108ELSEBX=BX+l:BG
=BG+1
230 U=USR1(BG-1) :GOTO108
300 JP=1:J2=0:J1=0:PLAYP2$
310 IFJ2=1THEN320ELSEJ1=J1+1:IFJ
1>4THENJ2=1ELSEBG=BG-128
315 GOTO330
320 J1=J1-1:IFJK1THEN350ELSEBG=
BG+128
330 GOTO130
350 J2=0:JP=0:GOTO130
400 R1=1:E1=5755:U=USR5(E1) :X1=2
9
405 Pl=PEEK(El+98) : IFP10255THEN
910ELSEE1=E1-1 : X1=X1-1 : IFXK1THE
N414
4 10 U=USR5 (El): RETURN
414 R1=0: 1=480 :U=USR1(E1-I) :U=US
R1(E1-I+1) :U=USRl(El-I+2) :U=USR1
(El-I+3) :U=USRl(El-I+4) : RETURN
420 R2=1:E2=4768:U=USR8(E2) :X2=1
425 Pl=PEEK(E2+258) :IFPK>42THEN
910ELSEE2=E2+1:X2=X2+1:IFX2>28TH
EN440
430 U=USR8(E2) : RETURN
440 R2=0:FORI=0TO4:U=USR1(E2+I) :
NEXTI: RETURN
910 PLAYPP$:NS=NS-1:CLS:SCREEN0:
PRINT@32,Z$;:PRINT@448,Z$;: PRINT
@99,"YOU HAVE "NS" BUGGIES LEFT.":
PRINT© 16 3, "YOUR SCORE IS"Sl"POIN
TS . " : PMODE4 , 1 : COLOR1 , : LINE (0,98
)- (255, 150) , PRESET, BF:FORX=0TO2 5
5:Y=143+RND(3) :PSET(X,Y) :PSET(X,
Y+l) :NEXTX:PMODE4,1:COLOR1,0:
955 R1=0:JP=0:J2=0:PC=0:R2=0:GOS
UB6500 : POKE65494 , : PRINT@387 , "PR
ESS <ENTER> TO CONTINUE"
975 IFINKEY$=CHR$(13)THEN980ELSE
975
9 80 CLS:POKEPK,0:GOTO98
1000 PMODE3,l:COLOR4,l: LINE (0,0)
-(255,30) ,PSET,B:LINE(4,4)-(248,
26) ,PSET,B:PAINT(2,2) ,3,4:PMODE4
, 1 : COLOR1 , : FORX=0TO2 5 5 : Y=14 3 +RN
D(3) :PSET(X,Y) :PSET(X,Y+1) :NEXTX
: POKE178 , 2 : PAINT (12 8, 190 ) , , 1 : COL
OR1 , : Y=90 : Xl=2 5 6 : FORX=0TO12 8 : PS
ET(X,Y) :PSET(X1,Y) :PSET(X,Y+1)
1016 NEXTX:PMODE4,1:COLOR1,0:LIN
E(0, 170) -(255, 192) , PRESET, BF: LIN
E (0,170) -(255, 192) , PSET, B: D1$="R
2F1E1R1D1F1D1L1G1H1D1L2H1G1L1H1L
1E1U1R1E1R1" : PMODE4 , 1 : DRAWC1S16
BM44,58;XD1$;BM128,61;XD1$;BM212
,58;XD1$;":COLOR1,0:PAINT(60,60)
, ,1:PAINT(130,64) , ,l:PAINT(214
1100 PMODE4,1:COLOR1,0:PCLS0:D1$
="E1U1F1R1F1" : LINE (0 , 150) -(255,1
88) ,PSET,BF:FORX=6TO250STEP12:CI
RCLE (X , 56 ) , 8 , 1 : NEXTX : LINE (0,52)-
(255,70) , PRESET, BF: LINE (251, 51)-
(256,51), PSET: POKE178 , 1 : PAINT ( 12
8,60) , ,1:COLOR1,0: PAINT (100, 160)
, , 1 : PMODE4 , 1 : COLOR1 , : PMODE4 , 1
1185 PMODE3,l:COLOR4,l: LINE (0,0)
-(255,30) , PSET, B: LINE (4, 4) -(248,
26) ,PSET,B:PAINT(2,2) ,3,4:PMODE4
, 1 : COLOR1 , : FORI=1TO30 : PRESET (RN
D(255) ,161+RND(7) ) :NEXTI:RETURN
1200 PMODE4 , 1 : COLOR1 , : PCLS0 : PMO
DE3,l:COLOR3,l: LINE (0,156) -(255,
180 ) , PSET , BF : PMODE4 , 1 : COLOR1 , : F
ORI=1TO100: PRESET (RND (256) , 159+R
ND (8 ) ) : NEXTI : Xl=256 : COLOR1 , : Y=8
: FORX=0TO128 : PSET (X, Y) : PSET (X, Y
+1) :PSET(X1,Y) :PSET(X1,Y+1) :X1=X
l-l:Y=Y-2+RND(3) : IFY<72THENY=7
1218 NEXTX :PMODE3,l:COLOR4,l: LIN
E (0,0) -(255, 30) , PSET, B: LINE (4, 4)
-(248,26) ,PSET,B:PAINT(2,2) ,3,4:
PMODE4 , 1 : COLOR1 , : D1$= M R2F1E1R1D
1F1D1L1G1H1D1L2H1G1L1H1C1E1U1R1E
1R1" : PMODE4 , 1 : DRAW"C1S16BM36 , 40 ;
XD1$ ; BM110 , 44 ;XD1$ ; BM2 10 , 40 ; XD1$
;": PAINT (42, 49) , , 1: PAINT (116 , 5
1280 PMODE4,1:COLOR1,0: LINE (0,17
0)- (255, 192) , PRESET, BF: LINE (0,17
0)- (255, 192) ,PSET,B:POKE178,l:PA
INT(128,66) , ,1:RETURN
1300 PMODE4,1:COLOR1,0:PCLS0:LIN
E (0 , 170 ) - ( 2 55 , 192 ) , PRESET , BF : LIN
E (0 , 170 ) - ( 2 55 , 192 ) , PSET , B : PMODE3
,l:COLOR4,l:LINE(0,0)-(255,30) ,P
SET, B: LINE (4, 4) -(248,26) ,PSET,B:
PAINT ( 2 , 2 ) , 3 , 4 : PMO DEM , 1 : COLOR1 ,
:D1$="U4E2R1U4E1U2H1L1H1U1H1U1E1
U1E1R1E1U1E1D1F1E1U1F1D1F1R1F1
1340 LINE(0,31)-(255,48) ,PSET,BF
: LINE (0,162) -(255, 169) ,PSET,BF:P
MODE4 , 1 : COLOR1 , : CIRCLE ( 180 , 89 ) ,
110
THE RAINBOW August 1985
10,1:POKE178,1:PAINT(180,115) , ,1
:COLOR1,0: RETURN
2000 P2$="O2V30L255T255DCGAFB":P
3$="O3V30L255T255FA" : P4$="O1V30L
255T255A02G01A" : P5$="O5V30L255T2
55EO3AO1G":PP$="O1V30L255T255FFA
FEAV25EGFADCEV20BGFEDAV15GFDACEV
10CBEGDDAV5FDEADV2GFEDA" : Z$=STRI
NG$(32,»*")
2505 TM$="BM+3,0U6L3R6BR2BD6;BM+
5,-6L4R2D6L2R4BR3;BM+l,0U6RlF2Dl
U1E2R1D6BR3;BM+5,0L4U6R4BD3BL2L1
BD3BR6;": RETURN
3000 PM0DE4 , 5 : D1$="E1R9NR2G1D2R4
U2NH1D3G1U1L2D1L3U1L2D1L1U1L2D1L
1H1U3 " : D2 $="R2 D1NL2 D1L1NU2 L1U2 " :
DD$="NL2R1D1R1H1F1D1L5U1E1" : PMOD
E4 ; 5 : DRAWC1S16BM34 , 92 ; XDD$ ; " : PO
KE178,l:PAINT(32,97) , ,1:COLOR1,0
: CIRCLE (28, 101), 2,1: CIRCLE ( 3 9 , 10
1), 2,1: GET (20, 90) -(46, 105) ,A1,
3010 DRAWC1S16BM8 , 8 ;XD1$ ; » : DRAW
"BM14 , 8 ;XD2$ ; BM22 , 8 ;XD2$ ;BM30 , 8 ;
XD2 $ ; " : POKE17 8 , 1 : PAINT ( 40 , 2 1 ) , , 1
: COLOR1 , : CIRCLE ( 20 , 24 ) , 4 , 1 : CIRC
LE(32,24) ,4,1: CIRCLE (52 ,24) ,4,1:
DRAW"C1S16BM8 , 42 ;XD1$ ; " : DRAW'BMl
4,42;XD2$;BM22,42;XD2$;BM30,42;X
D2$;":POKE178,2:PAINT(40,55) , ,
3028 LINE(0,30)-(92,68) ,PSET,B:P
OKE178,l:PAINT(l,31) , ,l:PMODE3,5
:COLOR2,l:LINE(0,30)-(92,68) , PSE
T , B : PMODE4 , 5 : COLOR1 , : D3 $="R1F1D
1F1L6U1E1R1E1" : PMODE4 , 5 : COLOR1 ,0
: DRAW" BM9 8,13; XD3 $ ; " : PAINT ( 9 8 , 20
) ,,l:LINE(92,21)-(94,23) , PRESET:
LINE (92, 21) -(95, 18) , PRESET: LIN
3052 LINE(140,14)-(150,22) ,PSET,
B : POKE17 8 , 2 : PAINT (144, 16), ,1: COL
OR1 , : PMODE4 , 5 : COLOR1 , : D5 $="R8F
1L9U1":DRAW"C1S12BM215,16;XD5$;"
: PAINT (220, 16) ,,1:PSET(243,19) :P
MODE3 , 5 : COLOR3 , 1 : X=2 14 : FORY=13TO
15 : LINE (X, Y) - (X+12 , Y) , PSET : X=X+2
:NEXTY:X=222:FORY=19T021:LINE(
3 100 PMODE4 , 5 : COLOR1 , : D1$="E1U"1
E1R2F1D1R1E1R3E1R2E1U1H1R4G1D3F1
D3H1D3F1L4E1U1H1L2H1L3H1L1D1G1L2
H1U1H1" : DRAWC1S8BM102 , 48 ;XD1$ ; "
: CIRCLE ( 108 , 47 ) , 3 , 1 : PAINT (126,47
) , ,1: PAINT (108, 51) , ,l:PAINT(108,
43) , ,1: LINE (118, 46) -(134, 48) , PRE
SET , B : COLOR3 , 1 : FORX=120TO130ST
3142 PMODE4 , 5 : DRAW"C1S8BM182 , 52 ;
XD2 $ ; " : POKE178 , 2 : PAINT ( 188 , 52 ) , ,
1 : COLOR1 , : DRAWBM168 , 52 ; XD2$ ; » :
^
l^ D
^N
•1
Mouse Technological Software
For The Color Computer]
Many Companies call their
Home and Business Software
User Friendly . . .
ONLY ONE CALLS IT
Child's may
TM
n ■ .. . 1 1
112 THE RAINBOW August 1985
D1$="D4R12U4G2L1G1L1G1H1L1H2L1H1
" : DRAW"C1S16BM208 , 50 ;XD1$ ; » : PAIN
T(22^ / 6j3) // l:PAINT(246,6^) , ,1:PM
ODE4,5:COLORl,0:LINE(94,33)-(256
,64) , PSET, B:POKE178,l: PAINT (95
3162 PMODE4 / 5:COLORl,^f:LINE(254,
49) -(255, 64) ,PSET, B:PM0DE4 , 5: COL
0R1,^:D1$="R1E1U1F1R1F1R2E1R1E1F
1R1F1" : D2$="E1U1H1L1G1U2E1R2F1E1
R2F1D2H1L1G1D1F1" : PMODE4 , 5 : DRAW"
C1S16BM12 , 1^1 ;XD1$ ; " : LINE (12 , 102
) - (64 , 102 ) , PSET : POKE178 , 2 : PAINT (
50,100) ,,l:PAINT(26,100) ,,1:PM
3220 DRAW"C4S16BM29 , 98 ;XD2$ ; » : PM
ODE4,5:POKE178,l:PAINT(36,88) , ,1
: PM0DE3 , 5 : PMODE4 , 5 : DRAWC1S16BM8
4,101;XD1$;»:LINE(84,102)-(136,1
02 ) , PSET : POKE17 8 , 2 : PAINT (96, 100 )
, ,l:PAINT(124,100) , ,l:PMODE3,5:C
OLOR3 , 1 : LINE ( 8 4 , 10 2 ) - ( 13 6 , 10 2 ) , P
SET: DRAW"C4S24BM98 , 98 ;XD2$ ; " : P
3246 DRAWS8BM34, 92 ;XD2$;": COLOR
4,1: LINE (110, 100) -(110, 80) ,PSET:
LINE (106, 100) -(106, 80) , PSET: LINE
(114 , 98 ) - ( 114 , 80 ) , PSET : PMODE4 , 5 :
COLOR1 , : D3 $="E1R5F1R1F1R1F1L8E1
L3D1H1U1E1" :DRAW"C1S12BM24,121;X
D3$;":PAINT(42,124) , , 1: D4$="U1E1
R2F2L5" : D5$="G2R3E2L3 " : PMODE3 ,
3266 DRAW"BM28,124;XD5$; ,, :PAINT(
28,128) ,3, 3: LINE (32, 130) -(10, 130
) , PRESET : COLOR2 , 1 : FORX=40TO54STE
P4: PRESET (X, 126) : NEXTX : LINE ( 4 6 , 1
21) -(48, 123) , PSET, BF: PRESET (49,1
21) :RETURN
3300 PMODE4,5:COLOR1,0:PCOPY5TO1
: PCLS0 : PC0PY1TO5 : LINE (0 , 2 9 ) - ( 2 55
, 48 ) , PRESET , BF : D1$="NU4ND4NL4NR4
" :D2$="NE4NF4NG4NH4": LINE (0,42) -
(255,42) , PSET: LINE (0,54) -(255,54
) ,PSET:LINE(0,40)-(255,40) ,PSET:
LINE(0,56)-(255,56) ,PSET:POKE178
, 2 : PAINT ( 100 , 55) , , 1 : PAINT ( 100 ,
3316 LINE(0,62)-(255,62) ,PSET:LI
NE (0 , 74 ) - (255 , 74 ) , PSET : LINE (0 , 60
)- (255, 60), PSET: LINE (0,76) -(255,
76) ,PSET:POKE178,2:PAINT(128,61)
,,1: PAINT (128 ,75) , , 1: COLOR1,0 : FO
RX=8T0256STEP16 : CIRCLE (X, 48) , 7 , 1
: CIRCLE ( X , 6 8 ) , 7 , 1 : NEXTX : DRAW" CIS
4" : F0RX=8T0256STEP16 : DRAW"BM"+
5000 ML$="BDB3ED1F01108E1E01C607
A6A0A7805A26F930881931A819108C21
872DEB39":TT=31000:GOSUB5500:ML$
="BDB3ED1F01108E1E08C601A6A0A780
5A26F930881F31A81F108C21882DEB39
":TT=31050:GOSUB5500:ML$="BDB3ED
1F018600C607A7805A2 6FB39":TT=311
00:GOSUB5500
5030 ML$="8E1001108E1000A680A7A0
8C129F26F78E129F108E12BFA684A7A4
3088E031A8E08C0FFF26F139":TT=311
50 : GOSUB5500 :ML$="8E1801108E1800
A680A7A08C18BF2 6F78E18BF108E18DF
A684A7A43088E031A8E08C17FF2 6F139
" : TT=3 1200 : GOSUB5500
5J050 ML$="BDB3ED1F01108E1FAAC605
A6A0A7805A2 6F930881B31A81B108C21
2E2DEB39":TT=31250:GOSUB5500:ML$
="BDB3ED1F01108E1FB9C606A6A0A780
5A2 6F930881A31A81A108C20BE2DEB39
" : TT=3 1400 : GOSUB5500
5090 ML$="8E0CE1108E0CE0A680A7A0
8C0FDF26F78E0FDF108E0FFFA684A7A4
3088E031A8E08C0CFF26F139":TT=315
50 : GOSUB5500 :ML$="BDB3ED1F01108E
21C1C607A6A0A7805A26F930881931A8
19108C25C72DEB39" :TT=31600 : GOSUB
5500
5110 ML$="BDB3ED1F01108E2288C601
A6A0A7805A26F930881F31A81F108C26
682DEB39":TT=31650:GOSUB5500:ML$
="8E18C1108E18C0A680A7A08C1B1F26
F78E1B1F108E1B3FA684A7A43088E031
A8E08C18DF2 6F186FF8E1A20A7843088
E08C18A02 6F639" :TT=31700:GOSUB55
00
<V Software <h
KEEP- TRAK "DOUBLE-ENTRY" General Ledger
Accounting System Reg. SS&99 — ONLY $19.95
"Double-Entry" General Ledger Accounting System lor home O' business 16k.
32k. 64k User-friendly, menu driven Program features balance sheet, income &
expense staiement (current & YTD ). journal, ledger. 899 accounts 4 2350 entries on
32k & 64k (710 accounts & entnes on 16k) disk only. VefSKin 1 2 with screen pnntouts
For upgrade return onqmai disk & $5 00 Rainbow Reviews 1.1 -9/84:1.2-4/85
"OMEGA Fl LE" Reg. SfifcW— ONLY $1 4.95
Filing data base File any information with Omega File Records can have up to 16
fields with 255 characters per field (4060 characters record). Sort, match fi, pnnt any
noH User friendly menu dnven Manual included (32k/64k disk only)
Rainbow Review 3/85
. nm.wi.1. BOBS MAGIC GRAPHIC MACHINE-Mtwiwiii.)
Turns 2 woeks ol graphic programming into 2 hours with rubber band" type graphics
Generate BASIC code to use in your programs Easy drawing and manipulation of
aretes, elipses. boxes, lines and ARCS Single joystick operation with on line HELPS
at all times Allows text on the graphics screen and movement ol objects on the screen
Can be used as a stand-alone graphics editor Great lor programmers and LOTS OF
FUN lor the novice Reg. 130*5 — ONLY $14.95 lor cassette and $14.85 lor disk
64k with ECB required (includes instruction manuall GRAPHICS EDITOR
•• AMT Amortization Sch.dul. { Rainbow Review < 0/841 $14.95
PERSONAL INFORMATION FILE— 114.05 disk HOME INVENTORY— $14.95 dl.k
CASH-IN (billing)— $14.95 dl.k MEMO WRITER— $14.95 disk
GRADE EASY (teacher dal» b*M>— $14.95 32«4k dl.k
64 K UPGRADE
6809 PROCESSOR
FLIP « FILE 50
FUJI-MAXELL SSDD
$35.00
$25. 00
$12.95
$17.95
CARRYING CASES COCO I.HS35.O0
VOLKS MODEM $59.95
RtTEMAN PLUS PRINTERS
GENERIC DISKS SSDD
$275.00
$14.95
COMPARE FEATURES AND PRICE, then buy
"THE OTHER GUYS SOFTware!"
(add $2.50 lor postage and handling) *( Please specify if J4M controller)
Send check, money order or COD.. U.S. funds to:
THE OTHER GUYS SOFTware • 875 S. Main . Logan, UT M321
PHONE (801) 753-7620 or WRITE for a FREE CATALOG
August 1985 THE RAINBOW 113
6ctlN3
RAINBOWfest is the only
computer show specifi-
cally dedicated to your
Tandy Color Computer. No-
where else will you see as
many produces, have imme-
diate access to the top experts,
or be able to attend free semi-
nars of such import. It's the
next best thing to receiving the
latest issue of the rainbow in
your mailbox!
Every RAINBOWfest fea-
tures many delightful surprises
because it's a great opportuni-
ty for commercial pro-
grammers to show off many
new and innovative products
for the very first time. You get
the jump on new capabilities
for your CoCo. In exhibit after
exhibit, there are demonstra-
tions, opportunities to experi-
ment with software and hard-
ware, and special
RAINBOWfest prices.
You can set your own pace
between visiting exhibits and
attending valuable, free semi-
nars on all aspects of your
CoCo — from improving basic
skills to working with the so-
phisticated OS-9 operating
system.
Many of the persons who
write for the rainbow — as
well as those who are written
about — are there to meet you
and answer your questions,
technical and otherwise. You
also will meet lots of other per-
sons, just like you, who share
your interest in the Color Com-
puter. It's a person-to-person
event, as well as a tremendous
earning experience, in a fun
and relaxed atmosphere.
To make it easier for you to
participate, we schedule RAIN-
BOWfests in three parts of the
country. If you missed the fun
in Irvine, Calif., and Chicago,
why don't you make plans now
to join us in Princeton, N.J.?
For members of the family who
don't share your affinity for
CoCo, you'll be comfortable
knowing that RAINBOWfest is
located in an area with many
other attractions.
The Hyatt Regency — Prince-
ton offers special rates ($65,
single or double room) for
RAINBOWfest. The show
opens Friday evening with a
p.m. to 10 p.m. session. It's a
daytime-only show Saturday
— the CoCo Community Break-
fast is at 8 a.m., then the exhib-
it hall opens promptly at 10
a.m. and runs continuously un-
til 6 p.m. (There will be no exhi-
bition hours or seminars Satur-
day evening.) On Sunday, the
exhibit hall opens at 1 1 a.m.
and closes at 4 p.m.
A well-known speaker again
will keynote the highly popular
CoCo Community Breakfast.
These traditional gatherings al-
low you to catch up on signifi-
cant happenings in the CoCo
lommunity in an intimate
etting.
When you attend other com-
uter trade shows, you are
ften disappointed. But you'll
Dve RAINBOWfest because it
> the only major show com-
pletely dedicated to the Tandy
)olor Computer.
Tickets for RAINBOWfest
lay be obtained directly from
he rainbow. We'll also send
ou a special reservation form
o you can get your special
oom rate.
Come to RAINBOWfest!
et's all celebrate the CoCo
Jommunity!
list
Your admission to
RAINBOWfest also
entitles you to visit the premiere
of PCMfest! It's a brand new
show focusing on Tandy's new
generation of computers — the
Tandy MS-DOS computers
and the Tandy Portables.
PCMfest is sponsored by our
sister publication, PCM, The
Personal Computing Magazine
for Tandy Computer Users.
The show will be in the same
location as RAINBOWfest and
the exhibit hours will be exact-
ly the same. If you also use
one of these Tandy computers,
it's an opportunity you won't
want to miss!
Show Schedule:
Friday evening — Exhibits open
from 7 p.m. to 10 p.m.
Saturday — CoCo Community
Breakfast at 8 a.m.
Exhibits open at 10 a.m. and
close at 6 p.m.
Sunday — Exhibits open from
11 a.m. to 4 p.m.
RAINBOWfest/PCMfest -
Princeton, N.J.
Dates: October 11-13, 1985
Hotel: Hyatt Regency-
Princeton
Rooms: $65 per night, single or
double
Advance Ticket Deadline:
October 4, 1985
FREE T-Shirt to first five ticket orders received from each state.
FREE Rainbow poster for first 500 ticket orders received.
JOd, I'm coming to Princeton! I want to save by buying tickets now at the special advance
sale price. Breakfast tickets do require advance reservations.
'lease send me:
Three-day tickets at $9 each total
One-day tickets at $7 each total
Circle one: Friday Saturday Sunday
Saturday Breakfast at $12 each
total
"
Handling Charge $1
$1.00
TOTAL ENCLOSED
(U.S. Funds Only, Please)
3 Also send me a hotel reservation card for the
Hyatt Regency— Princeton ($65, single or double
oom).
Name (please print)
Address
City
State
Telephone
Company _
ZIP
□ Payment Enclosed, or □ Charge to:
□ VISA □ MasterCard □ American Express
Account Number
Exp. Date
Signature
vlake checks payable to: The RAINBOW. Mail to: RAINBOWfest, the Falsoft Building, P.O. Box 385,
3 rospect, KY 40059. To make reservations by phone, call: (502) 228-4492.
Advance ticket deadline: October 4, 1985. Orders received less than two weeks prior to show opening will be held for
/ou at the door. Tickets will also be available at the door at a slightly higher price.
/ou at the
5130 ML$="8E0C01108E0C00A680A7A0
8C0CDF26F78E0CDF108E0CFFA684A7A4
3088E031A8E08C0BDF26F139":TT=317
60 : GOSUB5500 :ML$="BDB3ED1F01108E
222CC607A6A0A7805A26F930881931A8
19108C25922DEB39":TT=31800:GOSUB
5500
5150 ML$="BDB3ED1F01108E2337C601
A6A0A7805A26F930881F31A81F108C25
172DEB39 " : TT=3 1850 : GOSUB5500 : ML$
="BDB3ED1F01108E2335C601A6A0A780
5A26F930881F31A81F108C25152DEB39
" : TT=3 1900 : GOSUB5500 : ML$=" BDB3ED
1F01108E23BAC606A6A0A7805A26F930
881A31A81A108C253E2DEB39"
5175 TT=31950:GOSUB5500:ML$="BDB
3ED1F01108E27A0C608A6A0AA84A7805
A26F730881831A818108C2BA72DE939"
:TT=32000:GOSUB5500:ML$="393939"
: TT=3 2050 : G0SUB5 500 : ML$= " 8E0A8 1 1
08E0A80A680A7A08C123F26F78E123F1
08E125FA684A7A43088E031A8E08C0A9
F26F139":TT=32100:GOSUB5500
5210 ML$="8E0E81108E0E80A680A7A0
8C123F26F78E123F108E125FA684A7A4
3088E031A8E08C0E9F26F139":TT=321
50:GOSUB5500:ML$="8E19E1108E19E0
A680A7A08C1B1F26F78E1B1F108E1B3F
A684A7A43088E031A8E08C19DF26F139
" : TT=3 2 200 : G0SUB5 500
5230 ML$="BDB3ED1F01108E26A1C609
A6A0A7805A26F930881731A817108C2A
C9 2 DEB3 9 " : TT=3 2 2 50 : G0SUB5 500 : ML$
="BDB3ED1F01108E26AAC609A6A0A780
5A26F930881731A817108C2AD22DEB39
" : TT=3 2 300 : G0SUB5 500 : ML$= " BDB3 ED
1F01108E26B2C609A6A0A7805A26F930
881731A817108C2ADB2DEB39"
5255 TT=32350:GOSUB5500:ML$="BDB
3ED1F01108E2BC1C607A6A0A7805A26F
930881931A819108C2EA72DEB39":TT=
32400 :GOSUB5500:ML$="BDB3ED1F011
08E2 300C60FA6A0A7805A26F93088113
1A811108C252F2DEB39":TT=32450:GO
SUB5500
5280 ML$="BDB3ED1F01108E2580C60F
A6A0A7805A26F930881131A811108C27
6F2DEB39":TT=32500:GOSUB5500:ML$
="BDB3ED1F01108E1E71C602A6A0A780
5A26F930881E31A81E108C21F22DEB39
" : TT=32550 : G0SUB5 500 : RETURN
5500 F0RI=1T0LEN(ML$)STEP2:AA$=M
ID$(ML$,I,2) :AA=VAL("&H"+AA$) :P0
KETT+ W , AA : W= W+ 1 : NEXTI : W=0 : RE
TURN
6 300 TM=0 : PM0DE3 , 1 : C0L0R3 , 1 : TY=1
78 : FORTX=40TO240STEP4 : LINE (TX, TY
) - (TX , TY+6 ) , PSET : TM=TM+1 : NEXTTX :
PM0DE4 , 1 : DRAW"C1S4BM4 , 184 ;XTM$ ; "
: RETURN
6400 TX=TX-4 : PM0DE3 , 1 : C0L0R4 , : L
INE(TX,TY)-(TX,TY+6) ,PSET:S1=S1+
5 : TM=TM-1 : IFTM<1THEN6900
6425 PMODE4,1:COLOR1,0:PLAYP3$:R
ETURN
6500 PMODE4,1:COLOR1,0:IFNS<=0TH
EN20000
6504 LINE(8,7)-(240,24), PRESET, B
F: X=8 : Y=8 : F0RI=1T0NS : PUT (X, Y) - (X
+26,Y+15),A1,0R:X=X+26:NEXTI:RET
URN
6900 IFLV>1THEN7600ELSEPOKE65494
,0 : POKE65314 , 170 : PLAY"O1V30L255T
255FE02A" : P0KE65314 , 255 : F0RI=«1T0
200: NEXTI
6905 CLS : SCREEN0 : PRINT@32 , Z$ ; : PR
INT@448 , Z$ ; :NS=NS+1 : PRINT@96 , "YO
U HAVE COMPLETED LEVEL ONE.":PRI
NT" BONUS 500!M":S1=S1+500:PRIN
T:PRINT"YOUR SCORE NOW IS"S1".":
PRINT "YOU HAVE "NS" ROVERS LEFT.":
POKEPK , : LV=2 : PMODE4 , 1 : COLOR1 , :
PCLS0 : GOSUB6500 : GOSUB1100 : GOSU
7000 CLS : DEFUSR0=3 1600 : DEFUSR1=3
1650 : DEFUSR2=31700 : DEFUSR3=31760
: DEFUSR4=3 1800 : DEFUSR5=31850 : DEF
USR6=31900 : DEFUSR7=3 1950 : POKE654
94,0: CLS : SCREEN0 , : PRINT@227 , "PR
ESS <ENTER> TO CONTINUE"
7074 IFINKEY$OCHR$(13)THEN7074
7090 BG=5287:BX=5:JP=0:PC=0:E1=0
: E2=0 : E3=0 : POKEPK, : PMODE4 , 1 : COL
OR1,0:SCREEN1,1
7100 J0=JOYSTK(0) :IFJP=1THEN7108
ELSEIFJ0<20THEN7200ELSEIFJ0>43TH
EN7225
7108 PC=1-PC:IFE1=1THENGOSUB7410
7110 U=USR0(BG) :U=USR2(0) :U=USR3
(0) :IFJP=1THEN7310ELSEIF(PEEK(&H
FF00 ) AND1 ) =0THEN7 300
7124 IFE1=1THENGOSUB7410ELSEIFRN
D(24)=1THENGOSUB7400
7128 IFE2=1THENGOSUB7440
7130 U=USR2(0) :ML=ML+1:IFML>8AND
E1=0THENIFRND (INT (TM/3) ) =1THENG0
SUB7500:ML=0
7140 IFPEEK(BG+1061)=85THEN7905
7180 TI=TI+l:IFTI>10THENTI=0:GOS
UB6400
7190 PLAY"O5V31P255":GOTO7100
7200 IFBX<1THEN7108ELSEBX=BX-1:B
G=BG-1
7205 U=USRl(BG+7) :GOTO7108
7225 IFBX>16THEN7108ELSEBX=BX+1:
BG=BG+1
7230 U=USR1(BG-1) :GOTO7108
7300 JP=1:J2=0:J1=0:PLAYP2$
7310 IFJ2=1THEN7 3 20ELSE Jl=Jl+ljI
116
THE RAINBOW August 1985
FJ1>3THENJ2=1ELSEBG=BG-128
7315 GOTO7330
7320 J1=J1-1:IFJK1THEN7350ELSEB
G=BG+128
7330 GOT07124
735J3 J2=0:JP=0:GOTO7130
74,00 E1=1:EP=3739:U=USR4(EP)
7410 EP=EP-1:IFEP<3711THEN7420EL
SEU=USR4(EP)
7412 IFE2=1THEN7415ELSEIFRND(18)
=1THEN7430
7415 RETURN
7420 E1=0:FORI=0TO6:U=USR1(EP+I)
:NEXTI: RETURN
7430 E2=l:EO=EP+514:PLAYP5$:EY=0
:U=USR5(E0)
7440 EY=EY+6:EO=EQ+192:IFEY>42TH
EN7460
7445 IFPC=1THENU=USR5(E0) ELSEU=
USR6(E0)
7448 Pl=PEEK(EO+512) :IFPK>85THE
N7905
7450 RETURN
7460 EI=EO+448:U=USRl(EO-448) :E2
=0 : G0SUB7 50 5 : PLAYP4 $ : RETURN
7500 EI=6299
7505 U=USR7 (EI) : RETURN
7600 IFLV>2THEN8600ELSEPOKE65494
GRAFPLOT
TRY IT BEFORE YOU BUY XT! !
FREE!!
DEMON
TEST DRIVE GRAFPLOT
IN YOUR OWN HOME, i
ABSOLUTELY FREE! !
YOU'LL WONDER HOW
YOU EVER SOT ALONG ,
WITHOUT ITi !
/^\
RAINBOW
Stock Trend Rnalwsls <Smoothing>
~5S Tia i33
Purchase of Stock
Davs Hfti
» YOU CAN BE A GRAPHIC ARTIST!
» PUNCH UP YOUR RRESENTAT I DNS !
* PROFESSI ONAL GRAPHS WITH EASE!
* BUS I NESS-FI NANCE-8C I ENCE-ENGRS
* IRONCLAD MONEY— BACK GUARANTEE!
CALL NOM F^OR YOUR F^REE DEMO !
24 MOUR MOTL-INE < 4 1 = > = 4'7 — ■753S37'
HERE - 8 WHAT THE EXPERTS SAY ABOUT GRAFPLOT I
A great package gets ev
equally ueeful in the
holding documentation ..
"A high quality product
n better ... totally lmpreeaed ...
home and office ... meticulous, hand-
very easy to uee" RAINBOW, 6/84 %. 7/B3
. . click preaentatlone" Hot CoCo, B/B4
* Easy to Uae, Menu-Driven Operation with 37 Page Manual.
* Nine Graphing Bymbole and Unlimited Overlay of Data Bete.
* Automatically Bcalee and Labele fill Thrrt of the Akee.
* Calculate* Math Function*, Integrate and Moving Average*.
* Worka with all CoCo modele - requlree Extended BABIC.
I4K TAPE - *35.00, 32K TAPE - MO. 00, 32< DISK - »45.00 (UB)
nBK YOUR DEfilER FOR, GRA.FPLQT OR ORBER P. I REST FRQMi
HAWKE8 RESEARCH 8ERVICEB, 83? STANFORD AVE, OAKLAND, CA 94408
YOUR PERSONAL CHECK 18 WELCOME! SHIPMENT WITHIN 48 HOURB!
•3.00 SHIPPING ON ALL ORDERS. CA. RE8IDENTB ADD SALE8 TAX.
,0 : P0KE65314 , 170 ; PLAY"O1V30L255T
255FE04E" .POKE65314, 255: F0RI=1T0
200.NEXTI
7605 NS=NS+1:S1*=S 1+1000 :CLS:SCRE
EN0:PRINT@32,Z$;:PRINT@448,Z$;:P
RINT@96,"YOU HAVE COMPLETED LEVE
L TWO" : PRINT" BONUS 1000 111": PRI
NT:PRINT"Y0U HAVE "NS" ROVERS LEFT
. » : P0KEPK, : LV=3 : PM0DE4 , 1 : C0L0R1
, : PCLS0 : GOSUB6500 : GOSUB1200 : GOS
UB6300:GOTO8000
7 905 POKE65494,0:PLAYPP$:CLS:SCR
EEN0 , : NS=NS-1 : PRINT@3 2 , Z $ ; : PRIN
T@448,Z$;:PRINT@99,"YOU HAVE"NS"
BUGGIES LEFT. ":PRINT@163," YOUR S
CORE IS "SI "POINTS . " : PM0DE3 , 1 : COL
OR2,1:LINE(0,69)-(255,149) ,PSET,
BF : C0L0R4 ; 1 : LINE (0 , 150 ) - ( 2 55 , 170
) , PSET , BF : PM0DE4 , 1 : C0L0R1 , : FO
7970 POKE65494,0:PRINT@387,"PRES
S <ENTER> TO CONTINUE"
7975 IFINKEY$=CHR$(13)THEN7980EL
SE7975
7980 CLS :POKEPK,0:GOTO7090: STOP
8000 CLS : DEFUSR0=3 1000 : DEFUSR1=3
1050 : DEFUSR2=3 2 100 : DEFUSR3=3 2 150
: DEFUSR4=3 2 200 : DEFUSR5=3 2 2 50 : DEF
USR6=3 2 300 : DEFUSR7=3 2 3 50 : DEFUSR8
=32400 : POKE65494 ,0 : CLS : SCREEN0 ,
: PRINTS 2 2 7, "PRESS <ENTER> TO CON
TINUE"
8074 IFINKEY$OCHR$(13)THEN8074
8090 JP=0;BG=5574:BX=5:CT=0:E1=0
: E2=0 : F3=0 : U=USR4 (BG)
8098 PMODE4,1:COLOR1,0:SCREEN1,1
:POKEPK,0:GOSUB6500
8100 J0=JOYSTK(0) :U=USR3(0) :U=US
R4 (0) : IFPC=1THENU=USR2 (0)
8104 IFJP=1THEN8108ELSEIFJ0<20TH
EN8200ELSEIFJ0>43THEN8225
8108 PC=1-PC:IFF3=1THENGOSUB8550
8110 U=USR0(BG) :IFE1=1THENG0SUB8
410ELSEIFE2=lTHENPE=PEEK(F2+485)
:IFPE<255THEN8910
8120 IFJP=1THEN8310ELSEIF(PEEK(&
HFF00 ) AND1 ) =0THEN8 300
8130 U=USR4(0) :CT=CT+1:IFCT<7THE
N8180
8135 IFE2=1THENGOSUB8510ELSEIFE1
=0ANDRND ( 20 ) =1THENG0SUB8 500
8140 IFE2=1THEN8180ELSEIFE1=1THE
NGOSUB8410ELSEIFRND(20)=1THENGOS
UB8400
8180 PE=PEEK(BG+357) :IFPE>0THEN8
910
8185 TI=TI+1:IFTI>9THENTI=0:GOSU
B6400
8190 PLAY"O3V31P255":GOTO8100
8200 IFBX<1THEN8108ELSEBX=BX-1:B
August 1985 THE RAINBOW 117
G=BG-1
8205 U=USRl(BG+7) :GOTO8108
8225 IFBX>16THEN8108ELSEBX=BX+1:
BG=BG+1
8230 U=USR1(BG-1) :GOTO8108
8300 JP=1:J2=0:J1=0:PLAYP2$
8310 IFJ2=1THEN8320ELSEJ1=J1+1:I
FJ1>7THENJ2=1ELSEBG=BG-128
8315 GOTO8330
8320 J1=J1-1:IFJK1THEN8350ELSEB
G=BG+128
8330 GOTO8130
8350 J2=0:JP=0:GOTO8130
8400 E1=1:F1=5464:FX=27
8410 IFPC=1THEN8450ELSEU=USR5(F1
) :F1=F1-1
8420 GOTO8480
8450 U=USR6(F1) :F1=F1-1
8480 FX=FX-1:IFFX<1THENE1=0:U=US
R7 (Fl) : P0KE6528 , 170 : CT=0
8490 RETURN
8500 E2=1:F2=5728:X2=2:FF=0:F3=0
8510 IFF3=1THEN8550ELSEFF=FF+RND
(3) :IFFF>26THENFF=0:F3=1:GOTO855
8514 IFPC=1THENF2=F2-32ELSEF2=F2
+32
8530 U=USR8(F2) :GOTO8580
tii(Wt<iii(i(iiiiutiut<utiiiia(k(tititik(inu(i()it(iitiiiiiUHMt(i(iii(t<i(iao'i<io(t'HHtita(ti
TOTMJ AN SOFTWAREl
NllllHIIHUIllllll/li I>ll» Illll IIIIIII.HIHU IK IIIIIIHHII
TEACHER PAK Tour 16K Ext. BASIC programs. Make
out grades (with or without weighting),
statistical analysis of grades, alphabetize nam*
lists, create seating charts. On tape but works
with disk. 80-column printer helpful. $34,95
TEACHER PAK PLUS Like Teacher Pak but Includes
CoCo Teetem described below. $47.95
COCO TESTEM Create multiple choice, completion,
short answer, true/false, and matching tests. On
tape but works with disk. Requires 32K Extended
BASIC and 80-column printer with underline
ability like DMP-110, LP-VIII. $19.95
SCHOOL DAYS Hilarious but quite realistic
be-a-teacher game. 32K Extended BASIC. $19.95
L1SSAJ0US ART Create and print artistic,
Intricate Llssaloue figures, Requires 16K
Extended BASIC and dot matrix printer with
graphic ability like DMP-110, LP-VIII. $19.95
SOUND GENERATOR Draw sound waves and hear them.
Make machine language sounds that can be EXECuted
by BASIC. 16K Extended BASIC. $19.95
GRAPHIC PHYSICS Some of the most fascinating
concepts In physics. 1GK Ext. BASIC. $19.95
COCO-LIFE The classic game of living, growing,
reproducing patterns. Printer optional. 16K
Extended BASIC + machine language. $19.95
All programs sold on tape. Send check or money
order (no cash - Pa. residents add 6X) to:
/J^^\ Tothlan Software rf^\
HAINBOW BOX 663 MINBOW
-2.'- Rlmersburg, Pa. 16248 ""ffi"
All of these programs carry the Rainbow Seal.
8550 F2-F2+1:FF=FF+1:IFFF>27THEN
8590ELSEU-USR8 (F2)
8580 RETURN
8590 E2»0:U=USR7(F2-416) :CT=0:F3
=0: RETURN
8600 POKE6,5494,0:POKE65314,170:P
LAY"O1V30L255T255FEO2FEO3FEO4FEO
5FE04FE03FEFEFEF" : POKE65314 , 255
8610 CLS:FORI-1TO200:NEXTI: SCREE
N0,0:PRINT@32,Z$;:PRINT@448,Z$;:
PRINT@96,"YOU HAVE COMPLETED LEV
EL THREE . " : PRINT" BONUS 1500 1 ! 1 "
: Sl-Sl+1500 : PRINT: PRINT" YOUR SCO
RE IS NOW"Sl"POINTS.":PRINT"YOU
WILL GO TO THE FINAL LEVEL" :PRIN
T"WITH"NS " BUGGIES. " :GOTO9000
8910 PLAYPP$:FORI-1TO200:NEXTI:S
CREEN0 , : CLS : PRINT@32 , Z$ ; : PRINT@
448 , Z$ ; : PRINT@98 , "YOU HAVE"NS"BU
GGIES LEFT."; PRINTS 16 4, "YOUR SCO
RE IS"S1" . " : PMODE4 , 1 : COLOR1 ,0 : LI
NE (0 , 88 ) - (255 , 155) , PRESET, BF: NS»
NS-1 : POKE65494 ,0 : CLS : PRINT@227 , "
PRESS <ENTER> TO CONTINUE"
8984 IFINKEY$OCHR$(13)THEN8984
8990 CLS : JP=0 : BG-5574 : BX=5 : CT=0 :
E1=0 : E2=0 : F3=0 : GOTO8098
9000 POKEPK, : GOSUB3 300 : GOSUB130
: GOSUB6300 : GOSUB6500 : DEFUSR0=3 1
000 : DEFUSR1=3 1050 : DEFUSR2=32450 :
DEFUSR3=32500:DEFUSR4=32550:JP=0
: BG=5252 : BX=3 : RP-6176 : E1=0 : E2=0 :
RQ=RP-3072
9098 PMODE4,1:COLOR1,0:SCREEN1,1
:EX=3183:E1=0:E2=0:EY=5583
9100 J0=JOYSTK(0) :IFJ0<20THEN920
0ELSEIFJ0>43THEN9225
9108 PC=1-PC:U=USR0(BG) :GOSUB940
0:IFPC=1THENU=USR2 (RP) :U=USR2 (RQ
) ELSEU=USR3 (RP) :U=USR3 (RQ)
9122 IFPC=lTHENRQ=RQ+32
PE=PEEK(BG+99) : IFPE>0THEN99
9180
00
9185
900
9190
9200
PE=PEEK(BG+101) :IFPE>0THEN9
PLAY" P2 55" :GOTO9100
I FBX< 1THEN9 10 8 ELSEBX=BX- 1 : B
G=BG-1
9205 U=USRl(BG+7) :GOTO9108
9225 IFBX>16THEN9108ELSEBX=BX+1:
BG=BG+1
9230 U=USR1(BG-1) :IFBG=5261THEN9
500
9245 GOTO9108
9400 IFE1=1THEN9450
9410 EX=EX+192:U=USR4(EX) :E2=E2+
1:IFE2>8THENE1=1
9430 GOTO9470
9450 EX=EX-192:U=USR4(EX) :E2=E2-
118
THE RAINBOW August 1985
1:IFE2<1THENE1=0
9470 IFE1=1THEN9485
9475 EY=EY-192:U=USR4(EY) : RETURN
9485 IFE2<3THENU=USR4 (EY) ELSEEY
=EY+192:U=USR4(EY)
9490 RETURN
9500 U=USR0(BG) :POKE65314,170:PL
AY"V31L255T255DEFEDGDE M : POKE6531
4,255: POKE65494 ,0 : PLAY"O3V30L255
T255DEFFDEEDFADFADFADF" : CLS : FORI
=1TO300 : NEXTI : PRINT@32 , Z$ ; : PRINT
@448,Z$;:PRINT@96,"CONGRATULATIO
NS!!!": PRINT "YOU HAVE MADE IT TO
* , :PRINT"MOON BASE AMPHIBIA!!!"
9590 GOTO20
9900 POKE65494,0:PLAYPP$:FORI=1T
0200 : NEXTI : SCREEN0 , : CLS : PRINT© 3
2 , Z$ ; : PRINT§448 , Z$ ; : PRINT@98 , " YO
U HAVE "NS "BUGGIES LEFT. ": PRINT @1
64, "YOUR SCORE IS"S1" . " :GOSUB130
: JP=0 : BG=52 52 : BX=3 : RP=617 6 : E1=0
: E2=0 :RQ=RP-3072 : NS=NS-1 : P0KE654
94, 0: CLS :PRINT@227, "PRESS <ENT
9984 IFINKEY$OCHR$(13)THEN9984
9990 CLS:POKEPK,0:GOTO9098
20000 POKE65494,0:FORI=1TO200:NE
XTI : CLS : SCREEN0 , : PRINT@ 3 2 , Z $ ; : P
RINT§448,Z$;:PRINT@128,"YOUR FIN
AL SCORE IS"Sl:PRINT§352:INPUT"P
LAY AGAIN (Y/N) " ; A$ : L$=LEFT$ (A$ ,
1) :IFL$="Y"THENRUN
Listing 2:
7918
00000
00005
00007
7918 BD
B3ED
00010
791B IF
01
00020
791D 108E 1E01
00030
7921 C6
07
00040
7923 A6
A0
00050
7925 A7
80
00060
7927 5A
00070
7928 26
F9
00080
792A 30
88 19
00090
792D 31
A8 19
00100
793p( 108C
2187
00110
7934 2D
ED
00120
7936 39
00130
0000
00140
00)200 TOTAL ERRORS
ORG 31000
*THIS ROUTINE PUTS THE BUGGY GRAPHIC ON THE GRAPHIC SCREEN
*AT THE LOCATION SPECIFIED THROUGH THE BASIC PROGRAM.
START
L00P1
JSR
$B3ED
TFR
D,X
LDY
#$1E01
LDB
#7
LDA
,Y+
STA
,x+
DECB
BNE
L00P1
LEAX
$19, X
LEAY
$19, Y
CMPY
#$2187
BLT
L00P1
RTS
END
*GET PARAMETER FROM BASIC
*STORE PARAMETER IN X
*PUT LOCATION OF BUGGY GRAPHIC IN Y
*LENGTH IN BYTES OF GRAPHIC
*LOAD BYTE FROM BUGGY
*PLACE BYTE ON SCREEN
*COUNT
*IF NOT ZERO, THEN GO BACK
*NEXT LINE
*NEXT LINE
*END OF GRAPHIC?
*N0, RETURN
/^
W TRS-80 COLOR COMPUTER USERS NEWSPAPER
SELL OR TRADE YOUR UNWANTED PROGRAflS OR HARDWARE IN THIS MONTHLY NEWSPAPER. FIND GREAT BUYS.
CIRCULATION - OVER 18,000 COCO OWNERS. LIST YOUR CLUB OR BBS. FULL OF TIPS, ARTICLES, REVIEWS
AND PROGRAMS FOR YOUR COCO. DON'T DELAY, SUBSCRIPTION STARTS AT ONLY $5.00 PER 12 ISSUES(1 YEAR)
CLASSIFIED AD'S ONLY $.15 A WORD, USE SEPERATE SHEET OF PAPER FOR CLASSIFIED AD'S
YES - I WOULD LIKE A SUBSCRIPTION TO COCO ADS
■ V ^-^kH&^'-l ! iM tft *-ft3Kiffl$ft . 1 YEAR THIRD CLASS MAIL $5.00
UNIX TRAINING — OS-9 users
wanting to learn more about the UNIX
operating environment will be interested
in a new series of UNIX Systems
tutorials to be conducted by AT&T at
the UNIX Expo, Sept. 18-20 in New
York City.
A multi-level program composed of
20 sessions is designed to teach skills
for job-specific applications and will
include a series of laboratory courses
to provide hands-on experience.
The exposition is expected to attract
more than 200 leading manufacturers
and vendors displaying the latest
UNIX-based hardware, software and
services. Write: Robert Birkfeld, Na-
tional Expositions Co., 14 West 40th
Street, New York, NY 10018.
FORTH AND GOAL — Cybertron
Forth, an instructional package for the
FORTH computer language, has been
introduced by Cybertron, Inc.
The package includes software and
tools for applications program devel-
opment, along with a comprehensive
educational manual on the language
and full source listings.
FORTH is an advanced language used
for real-time and control applications.
It allows the addition of new words as
a permanent extension of the language
by letting the programmer use a new
word or symbol to represent complex
functions within the computer. Write:
30600 Solon Industrial Parkway, Solon,
OH 44139.
SUNNY SUGAR — Sugar Software's
move from Reynoldsburg, Ohio to
Florida is now complete. Although the
company continued to respond to
customer orders within 24 hours of
receipt, Susan Davis wants to pass
along her apologies for any inconven-
ience experienced during the move.
Sugar's new address is: 1710 North
50th Ave., Hollywood, FL 33021. The
telephone number is 305-981-1241.
NO, THANKS — The board of direc-
tors of H & R Block recently turned
down a $72.5 million offer to purchase
its subsidiary, the CompuServe Infor-
mation Service, by a group headed by
Jeffrey M. Wilkins, former chairman
and chief executive officer of
CompuServe.
During the past year Wilkins has
made similar proposals to buy various
segments of CompuServe, according to
Henry W. Bloch, president of H & R
Block. Wilkins was axed just prior to
the offer and David C. Swaddling,
CompuServe's chief financial officer,
resigned.
Bloch said that since acquiring
CompuServe in 1980, H & R Block has
made direct investments totaling more
than $20 million. "These strategic
investments are beginning to pay off in
accelerated earnings and revenue
growth. We have every intention of
continuing on this promising course,"
said Bloch.
CompuServe claims more than
200,000 personal computer subscribers.
Unaudited pretax earnings for fiscal
year 1985 were up approximately 50
percent.
DAILY NEWS — So much is happen-
ing so rapidly in the world of computers
that Ziff-Davis Publishing Co. plans to
introduce Computer Industry Daily this
summer. The newspaper will cover the
entire computer industry, including
product announcements, internationi
developments, managerial change:
analyses and columns by well-know
computer industry experts.
The publication will be targeted <
computer businesses, along with pre
fessionals in businesses that serve th
industry. Write: Ziff-Davis Publishin
Co., One Park Avenue, New York, N'
10016.
TAX HELP — If you claim time o
your Color Computer as a busine;
expense on your personal income ta
form, you may find the new Person!
Computer Usage Record helpful durin
an audit.
It's a 4-by-6-inch logbook designe
for logging your time on the compute
Each page of the ledger is divided inl
columns which make it easy to recor
the amount of time spent for person;
and/ or business use. Write: Richard C
Foley, 1440 Japaul Lane, San Jose, C/
95132.
RS-232 PROTECTION — A "lightnin
sponge" to protect devices remotel
connected to a host computer by RS
232 cables has been introduced b
Telebyte Technology.
The device is designed to accommo
date lightning strikes on or near RS
232 cables and provide a low impedanc
path to "earth" ground before they cai
damage display terminals and compu
ters. Write: 270 E. Pulaski Road
Greenlawn, NY 11740.
SCREEN SHIELD — The Sentinc
VDT BodyGuard has been introduce
by Packaging Industries Group. Con
sisting of a superfine wire mesh protectiv
shield which fits over a compute
monitor, the BodyGuard is anti-glare
anti-reflective and anti-static.
The maker also says that the shiek
provides protection from low leve
radiation and eliminates buildup o
static electricity and possible resultinj
dust and potential skin problems
Write: One Sentinel Plaza, Hyannis
MA 02601.
PECTRUM P
SHOPPING
V CHIP OFF THE OLD...
.821 Standard PIA $9.95
7128 Eprom - Fits new ctlrs* $14.95
<809E CPU Chip (NEW LOW PRICE) ...$19.95
asic ROM 1.2 Chip (30% FASTER) ..$19.95
8766 (Fits Disk Basic Skt) Eprom. $19.95
iisk ROM 1.1 (New DOS Command) ..$29.95
lew SAM Chip w/heatsink (74LS785). $29.95
xt Basic 1.1 ROM - NEW LOW PRICE. $29. 95
8 pin Ext Basic-upgrade 26-31 34A . $34. 95
prom Eraser - 3 min erasure time. $49. 95
ower Kit Bd - Specify CoCoI/II**.$59.95
oCo First Aid Kit - includes 2 PIAs,
•809E & SAM (Be Prepared!!!) ....$59.95
6-31 34A & 26-31 36A 64K Upgrade - 2 chip
et (ONLY for new Korean CoCoIIA). $59.95
prom Prgmr (2ms speed/2K - 16K).$139.95
4K CpCo JJ -~w7NEW keyboard $149.95
:OCO LIBRARY...
oCo Memory Map $12.00
ainbow Book & Tape of Adventures. $14. 95
asic Programmi ng Tricks Revealed. $14. 95
he FACTS - Inside "guts" of CoCo. $14.95
00 Pokes, Peeks 'N Execs $16.95
asic 9 Tour Guide $18.95
tility Routines - Top Pgm Secrets . $19. 95
ainbow Book / Tape of Simulations .$19.95
xtended Basic Unraveled $19.95
isk BasictTTO/l.l) Unraveled ...$19.95
ew! CoCo JJ Service Manual $19.95
he Complete Rainbow Guide to 0S9.$19.95
/Two Disk Package of demo pgms ..$49.95
ltimate CoCo Ref Guide - 350+ pgs.$29.95
o lor / Extended /D isk Basic Unraveled -
omplete 3 Book Set - Save $10! ..$49.95
i/IORE GOOD STUFF...
?8pin / 24pin Adapter - Plug-in new 128K
IPOS 1.2 in older J&M ctlrs $19.95
loCo F reeze Frame - Stop your CoCo dead
n its tracks! Put games on " H0LD "$19.95
'.oCo Light Pen -..$24v#S Save $3!.. $21. 95
■pectrum Voice Pak - SAVE $30!! ..$39.95
'BJ WO RD-PAK II - Hi-Res 80x24 display
i/smopth scrolling & 8x10 matrix $139.95
: - - J&M and the NEW SuDer Controller
III orders plus $3.00 S/H (Foreign $5.00)
COD add $2.00 extra
NYS Residents add Sales Tax
COCO CABLES AND...
Printer / Modem 15' Extender Cable .$14.95
T ired of unplugging devices from your
RS232 port? Try a RS232 "V" Cable . $19. 95
J oystick / Mouse 10' Extender Cable. $19. 95
Null Modem Cable - 4 pin to DB25 .$24.95
D isk Interface/Rom Pak Extender - Move
your disks & ROM Paks (3 feet) ..$29.95
T riple R S232 Switcher - Now select one
of any three RS232 peripherals ...$29.95
40 Pin Dual "Y" C able - Hook up a Disk
w7Voice, Word Pak, CoCo Max, etc ..$29.95
T riple " Joyport " Switche r - Joystick,
Mouse. Wico Adapter or Light Pen .$39.95
40 Pin Triple "Y" Cable - Hook up any 3-
Voice7Word/RS232/Digitizer PAKs ..$39.95
Finally ! 24" Multi-Pak Extender ..$39.95
OTHER GOOD STUFF...
C— 10 tapes in any quantity 49 cents
5 1/4 Diskettes in any quantity ..$1.19
Joystick, Cassette or Serial plug .$2.99
32K , 64K or 128K RAM Button $4.99
Rompak w/Blank PC Brd-27xx series .$9.95
The Disk Doubler - Doubleside your 5 1/4
diskettes for 160K more storage ..$19.95
Video C lear - This cable will reduce TV
interference created by CoCo! ....$19.95
Video Reverser -Reduce eyestrain w/ green
letters on black background** ....$24.95
The Magi c Box - Load Mod I / 1 1 1 Basic
program tapes into the CoCo $24.95
DOS Switcher - Select from any two DOSs
"(Disk 1.0 1.1, JD0S) in J&M ctlr .$24.95
St ereo Pak - Hardware synthesizer used
w7Musica 2.. . superb stereo sound! $39.95
EARS -CoCo's first Voice Recognition unit
w/95% accuracy & 64 Voice Prints ! $99.95
** N T for 26-31 34736~CoCo II's
SPECTRUM PROJECTS
PO BOX 21 272
93-15 B8TH DRIVE
WOODHAVEN NY 11421
71B-441-2B07
SPECTRUM PROJECTS
SOFT AND HARD WARES FOR
COLORFUL COMPUTING
SPREADSHEET
ICompeti I. ion
IdynacaTcI
Screen 32X16 51X?4
Precision 9 digits 16 digits
Hi-Res Graphics NO YES
Visicalc cmd format NO YES
New Jow price! 64K Disk S79.95
Side Wise -Print DYNACALC files
up to 255 chars- sideways !$19.95
DISK DRIVES
a
I
DRIVE System* - SS/DD. 6ms,
40 Tracks, Half Height .$229.95
DRIVE & 1 System* - $349.95
Disk Drive 1, 2 or 3 - $139.95
D isk C ontroller w/o ROM $99.95
Controljer w/1.1 ROM - $119.95
10 meg Hard Drive/OS-9* - $1295
* PLUS: controller-manual-cable
SUPER CONTROLLER
DATA BASE MANAGER
PRO-COLOR FILE 2.0 - 60 Data
Fids, 8 Report Fmts, 4 Screen
Fmts. 1020 bytes/record. Sort 3
Fields, Global Search, FAST ML
Sort, Create Files Compatible
w/DYNACALC! - Disk S59.95
PCF Forms 2.0- Merge DATA files
from PCF to Letter/Forms. $29.95
1
m
GAME CONTROLLERS
G raphicom Joystick - Has 2 Fire
buttons (menu/pen), smooth and
easy joystick control - $24.95
Mach \l Joystick - 360 Degree
control with center return or
anajog positioning. - S39.95
Wico Comm and Control - Hook up
2 Atari type joysticks - $19.95
m
m
256K CORNER
i
iiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiii
m
The most AMAZING CoCo Disk
Controller ever! Switch up to 4
DOS's (up to 16K!) via a single
software POKE! Uses 27128 or
2764 EPR0MS. Choose between Dsk
1.0/1.1. Spectrum DOS, JD0S,
etc. Designed by "Turn of the
Screw"" Guru- T.DiStefano $99.95
iii
iiiiiiiiiiiiiiiiiiiiiiiii ii minium
lii
^■illllllllllllllllllllllllllllllllllllllllllll
/ 'Hlf Thunder RAM - First 256K memory
Bd for CoCo! Load 4 32K pgms at
once, emulate a 40 trk Ra mdisk ,
60K Print Spooler, FAST access,
30+ Hi-Res screens in memory!!!
Thunder RAM Bd w/o 256K .$59.95
Thunder RAM Bd w/256K ..$119.95
* NOT Available for CoCo II 's *
a
m
m
SPECTRUM PROJECTS
PO BOX 21272 93-15 86th DRIVE
WOODHAVEN NY 11421
All orders plus $3.00 S/H (Foreign $5.00) - COD add $2.00 extra - NYS Residents add Sales Tax
SPECTRUM PROJECTS
SOFT AND HARD WARES FOR
COLORFUL COMPUTING
si
COMMUNICATIO
COLORCOM/E - A complete smar
terminal package! Upload,
Download. Hi-Res (51X24)
screen, 300/1200 Baud, Offline
Printing. Rompak/Disk* - $39.95
* - Now with CpCp Si£ & TBBS
XMODEM support! Download ML!
COMPUSERVE 5hr Start Kit $39.95
WORD PROCESSING
im
|U
I|LIWRIIER=64 - Three Hi -Res
screens, true lowercase char's
right justify, full screen
editor. Tape $49.95 Disk $59.95
rELEPATCH A TW-64 enhancer! ! !
Block move, visable carriage
return. Print Spooler, Key beep
FASTER Disk I/O 64K Disk $19.95
IrS
a Hi
I
aj
SI
m
MODEMS
MJ_N.I = MODEM - Direct connect,
300 Baud.'Orig/Answer - $49.95*
J-CAT Modem - Lowest priced
auto/answer modem - $119.95
HAYES SM300 - "Programmable"
auto-dial/auto answer - $199.95
300/1200 Baud Modem! - $199.95*
* - Add $14.95 for Modem Cable
KEYBOARDS
iiiiiiiiiiiiii iiiiiiiiiiiiiiiiiiiiiiiiiii
iyEIR=f_B ( Mark Data ) $59.95*
KEYTRONIC S keyboard - $69.95**
HJL57 - Save $7.00!! - $72.95*-*
Specify Model/Revision Board.
* Add $5 for "F" board adapter
** Free function key software
CoCo 1 1 HJL version available!!
15 key Numeric Keypad - $59.95
PRINTERS
QEMINJ SG-10 - 120 cps w/true
descenders, 2K buffer, tract-
frict feed. Near Letter Quality
mode, 1 Yr. warranty! - $249.95
B riteFace -The first INTELLIGENT
Parallel Ptr Interface for CoCo
Auto set Baud rates from 600 to
9600/NO switches to turn $59.95
MONITORS
M QNQCHROME Monitors - 80x24
screens plus Hi-Res w/AUDIO!
Green - $99.95 Amber - $119.95
13" COLOR Monitor - $239.95
TAXAN Tuner -Converts composite
monitors into TV sets! 1 ! $99.95
Universal Video Driver - Works
w/all monitors & CoCos'- $29.95
SAVE $10
OFF COLORCOM/E WITH ANY MODEM
OFF TELEWRITER-64 WITH ANY PRINTER,
KEYBOARD OR MONITOR
SAVE $10
FOR EXPRESS ORDERING PLEASE CALL 718-441-2807
HOME HELP
16K
ECB
nnurp
RAINBOW
^^ J l
CoCo,
Phone
Home
Here's a nice little program to
show your friends. It's called
Phone, and upon running the
program, a black desk phone appears
and begins ringing. If you hit ENTER,
you've answered the phone and your
printed message appears on the screen
along with your spoken message.
All you have to do is put this program
on tape, and immediately after it, put
your spoken message. Match the
spoken message to the screen message
for a finishing touch and you're done.
Now, call a friend into the room, run
the program and let them answer it. By
now you've had time to include them
in your message. "Good morning, Mr.
Phelps. Your mission, should you
decide to accept it ... "
(Bill Bernico is a self-taught computerist
who also enjoys golf, music and pro-
gramming. He is a drummer with a rock
band and lives in Sheboygan, Wis.)
By Bill Bernico
Line Description
20 128 Makes the phone black
159= Yellow
175 = Blue
191 = Red
207 = White
223 = Cyan
239 = Magenta
255 = Orange
30-210 Draws the phone
220-3 10 Draws the phone cord
320-350 Puts number buttons on
face of phone
360 Produces 10 rings
370 Creates ringing sound
380 Delay between rings
390 If ENTER is hit, phone is
answered
410 Input your message here to
match the spoken message
on tape
420 Sends cassette message to
TV speaker and turns on
cassette motor
(If you have any questions regarding
this program, Bill may be reached at
708 Michigan Avenue, Sheboygan, WI
53801, phone (414) 459-7350.)
!»•••
*%«•• ' * "»**€•• •'''/,,,
124
THE RAINBOW August 1985
-iV-iV FOURTH ANNIVERSARY SALE -tr-k
, ifc«f
To help celebrate Spectrum Projects
Fourth year in supporting the CoCo, we
are offering a truly unbelievable once
in a lifetime deal! Buy any software
from our 2 page "Colorful Utilities" ad*
and get a set of (81 64K CoCo chips for
only $14.95 and/or a Disk Drive
for only $199.95. Expires 09/10/85.
Order now as quantities are limited!
Sorry, no rainchecks! ( * Or CoCo Max)
INSTRUCTIONS FOR BOTH COCO I S. COCO II INCLUDED !
b~ V
MAM
FEATURE PACKED
- Pull-Down Menus
- Undo your mistakes
- Full graphic editing
- "Point-and-Click"
- Fat Bits "Zoom"
- Hardware ROMPAK
Requires Multi-
64K DISK $69.95
SYSTEM :
- Icons & Font Styles
- Full Size Screen Dump
- 32 paintbrush shapes
- Use w/video digitizer
- 256x192 joystick input
-Pak or Y-Cable
Y-CABLE $29.95
SHIPPING $3.00 (FOREIGN $5.00) - COD $2.00 EXTRA - NY RES. ADD SALES TAX
PO BOX 21272 93-15 86TH DRIVE
WOODHAVEN NY 11421
COD ORDER HOT LINE 718-441-2807
0<N> COLORFUL UTILITIES &&
COCO CHECKER *
Something possibly wrong with your CoCo? ?? CoCo CHECKER is the answer !! Will test your ROMs,
RAMs, Disk Drives & Controller, Printer, Keyboard, Cassette, Joysticks, Sound, PIAs, VDG, Internal
Clock Speed, Multi-Pak Interface and more!! 1 6K TAPE/DISK $19.95 (see Jan '85 Rainbow Review)
MULTI-PAK CRAK
Save ROMPAKs to your 64K Disk system using the RS Multi-Pak Interface. Eliminate constant
plugging in of ROMPAKs now by keeping all your PAK software on disk . Includes POKEs for
"PROBLEM" ROMPAKs. (Downland, Megabug, Micro Painter, Stellar Lifeline, etc..) 64K DISK $24.95
TAPE N IMAGE
Easily handles programs with auto loaders , no headers , no EOF markers , unusual size blocks and
more! Now is the time to get your tape software collection protected ... against loss!!! TAPE $24.95
SPIT IM IMAGE
A super upgrade from Disk Omni Clone! Back everything up! This amazing program handles " non
standard " disks with ease. We haven't found any disk yet that it can't handle. Don't ever be caught
without a backup again! Lowest price too! Beats most " copy protection " programs! 32K DISK $29.95
COCO SCREEN DUMP
The best screen dump program for the Panasonic , Epson & Gemini printers ever! Have the option of
standard or reverse images w/regular or double sized proportional pictures. 600-9600 Baud too! A
must for Graphicom and Bjork Block users. 16K TAPE/DISK $19.95 (see Nov '84 Rainbow Review)
DISK UTILITY 2.1*
A multi - featured tool for USER FRIENDLY disk handling. Utilize a directory window to selectively
sort, move, rename and kill file entries. Lightning fast Disk I/O for format, copy and backup.
Examine contents of files, the Granule Table, plus the size, load addresses and entry points of all
programs. Single command execution of both Basic and ML programs. 32K/64K DISK $24.95 " Disk
Uti lity has proven itself very quickly at my house" - Ed Ellers Oct '84 Rainbow Review pg. 220
THE DS-9 SOLUTION
NOW, a program that creates a "USER FRIE NDLY" environment within OS-9! The OS-9 SOLUTION
replaces 19 of the old " USER HOSTILE " commands with single keystroke, menu driven commands. No
more typing in complex, long pathnames or remembering complicated syntaxes! Set all XMODE
parameters at the touch of keys! Requires OS-9 Ver. 01.01.00 $39.95 (see May '85 Rainbow pg. 254)
SPECTRUM DOS
Add 24 NEW Disk commands with 2 Hi-Res screens! Supports 40 track & Double -Sided
stepping, auto disk search, error trapping & " EPROMABLE ". 64K DISK $49*5; New LOW pr
SCHEMATIC DRAFTING PROCESSOR
drives, 6 ms <
rice!! $24.95 I
Save tim e and design pro looking diagrams using a 480X540 pixel worksheet w/6 viewing windows .
Over 30 electronic symbols w/10 definable symbols . (Even Logic gates & Multipin chips!) Print hard
copy and save to disk. 64K DISK ~$4&&5. New LOW price!!! $29.95 (see Jan '84 Rainbow Review)
COLORAMA
A first - class Bulletin Board package... especially geared towards CoCo users ... has an ordering
section for those who want to run a mail-order business... supports Color Graphics ... one nice piece
of work. 64K DISK $99.95 July '84 Rainbow pg. 235. NEW! COLORAM A BBS Time Module $59.95
COCO CHECKBOOK
Use your CoCo to keep track of your checking and savings accounts! Printout individual personal
checks! 32K/64K TAPE $29.95 DISK $39.95 (see April '85 Rainbow Review pg. 210)
NOW AVAILABLE BY EXPRESS ORDE
AT YOUR LOCAL Radio /haek STORE -
#90-0289 COCO CHECKER - #90-0290 DISK UTILITY 2.1
ASK TO SEE THE DEMO DISK '.'.!
<fr<N> COLORFUL UTILITIES <K»<I>
FAST DUPE II
The fastest Disk copier ever! Will format and backup a diskette in only one pass (up to 23 grans)
and can make up to 4 Disk copies at once in 2 minutes ! The must utility for every multiple Disk
Drive owner. Fixes the " head-banging " bug! 32K/64K DISK $19.95 (see May '84 Rainbow Review)
COCO VIDEO TITLER
Start your VCR tapes with dazzling title frames followed by professional countdown to black fade-
outs! Use a title page editor with several sizes of text & background colors ! 16K TAPE $19.95
AUT-O-START
Autostart your Basic /ML programs with im pressive title screens using a mixture of text and
graphics ! 16K TAPE $19.95 "Aut-O-Start is an excellent program" June '85 Rainbow Review
B4K DISK UTILITY PACKAGE
Take advantage of an expanded 64K machine. Make an additional 8K of_ RAM available by relocating
the Ext Basic ROM from $8000 to $D800 . Copy ROMPAKS to disk (even " protected " PAKS) and create
a 32K SPOOL buffer for printing.- DISK $21.95 (see July '83 Rainbow Review)
TAPE/DISK UTILITY
A powerful package that transfers tape to disk and disk to tape automatically. Does an automatic
copy of an entire disk of programs to tape. Ideal for Rainbow On Tape to disk. Also copies tape to
tape & prints tape & disk directories. TAPE/DISK $24.95 (see Sept '83 Rainbow Review)
PAST TAPE
Save and load cassette files at twice the speed! Now you can run tape and printer I/O operations
in the high speed mode without a locked up system or I/O ERRORS! Works great with the popular
Telewriter-64 word processor tape by Cognitec. "If you are tired of waiting for those long tapes to
load, I strongly recommend that you buy this fine utility." TAPE $21.95 July '83 Rainbow
GRAPHICOM
The ultimate CoCo graphics development tool with sophisticated editing, preview animation,
telecommunications and printer support. Hi-Res graphics for only $24.95. W/Spectrum's Menu Foot
Switch $34.95 or W/Spectrum's Graphicom Joystick $49.95. 64K DISK (see April '84 Rainbow Review)
EZ BASE
A truly user friendly data base program at an affordable price. Maintain inventories, hobby
collections, recipes, greeting card lists and much, much more! Hi-Res screen, up to 500 records with
15 fields , record or field search, and a Mailing Labels option. Also converts EZ BASE data files to
ASCII format for transmission via Modem ! 32K DISK $24.95 (see July '84 Rainbow Review)
BLACKJACK ROYALE
A Hi-Res graphics casino blackjack simulation and card counting tutor. Fully realistic play includes:
double down, splits, surrender, insurance bets, 1-8 decks, burnt cards, shuffle frequency and more!
"This fine program is a must for the CoCo Blackjack player." (Aug '83 Rainbow Review) 32K
TAPE/DISK $24.95 "Best training aid for learning winning Blackjack." (Dec '84 Rainbow Review)
esident
s Tax
Q1=J =1-^ = 1'
O BOX 21272
WQODHAVEN IMY 11421
EXPRESS ORDERING 718-441-2807
DEALER/CLUB INQUIRIES INVITED
SOFTWARE SUBMISSIONS WELCOMI
SOFTMART
AUGUST SALES
SALE PRICES GOOD UNTIL AUGUST 31
NEW PRODUCT RELEASES
STOMP
Stomp Is A Unique Boerdgeme for two to four players, agtssl'indovir. With STOMP, you
play against each other, not against a computer. It Is a gimt that requires strategy in order to
capitalize on your chances and yat the few rules ere very simple, and easily understood Each)
player gets an aqua) number of turns, end you cen win or loam on the same turn.'
/deaf family games, friendly end captivating and always challenging.
Joystick or keyboard. 32K eat. Basic
Script*
Script* is a menu-driven spelling program. Prompt allows for correct spelling only, or lots
student know spelling Is incorrect.
it's Intended for children in grade three or ebove. and displays words in colorful "Script*", the
style most used in e'ementerv end Junior-high schools.
Up to sixteen letters and speclel characters, two /etter sires, two speeds, and variable lesson
duration can be selected.
Words can be saved on cassette, and optionally, output to a printer.
This program is easy to use and is designed for children three and up,
Require Keyboard 3ZK Eat. Basic
5KEET
Skeet is an excellent typing tutor. When the clay pigeon is over the letter number or character
press the cormct key.
Require ECB 32K Keyboard
SUPER ROMBACK
Super Romback is a ( 00% usable menu driven program that wiliunscr
rompeck programs. Provided owner with .■ tape clone copy of their ro
guarantee.
Require ECB 32K or I6K
amble and rescramble all
mpaek lOOIbdownloed
KRON
You are trapped Inside advancing wails of concrete, spiders, cycles, cones and mazes of
enemy tanks To save yourself, you must blast your way out. Can you get the enemy before he>
gets you? Excellent graphics and game play for mil ages.
Require ECS 32K Joystick
KINGPEOE
Get the bugs before they ge
Require ECS 32K
you. 1 .' But watch out for the falling mi
shrooms'.'
HARDWARE
Double Driver Color or Mono
J&M controller JDOS only ..
Bare Disk (Teac SS. DD 1 Mt
Vedft COS-9 Screen Editor.)
SOFTWARE
MC & VISA WELCOMED
SOFTMART
S024E Departure Drive - Ra/eJgh. NC 27604
ORDER ONLY INFORMATION
1-600-334-0854. EXT. 879 C9T9J 876-6/24
OS-9 is a trademark of Microware
W 270 141
The list
END 183
ing: PHONE
i
10
2LS:PRINTTAB(4)"HIT ENTER TO
ANSWER PHONE
20
2=128
30
PRINT@38 , STRING$ ( 20 , C)
40
PRINT© 68 , STRING$ (24 , C)
50
PRINT@98 , STRING$ ( 28 , C)
6J3
PRINT@130 , STRING$ ( 5 , C)
70 1
PRINT@138 , STRING$ ( 2 , C)
80 ]
PRINT@148 , STRING$ (2 , C)
90 ]
PRINT@153,STRING$(5,C)
W
PRINT@162 , STRING$ (5 , C)
110
PRINT§170 , STRING$ ( 12 , C)
120
PRINT@185 , STRING$ (5 , C)
130
PRINT@202 , STRING? ( 12 , C)
140
PRINT@229 , STRING$ (22 , C)
150
PRINT§2 61 , STRING$ ( 22 , C)
160
PRINT§293,STRING$(22,C)
170
PRINT@325,STRING$(22,C)
180
PRINT§357 , STRING$ (22 , C)
190
PRINT§389 , STRING$ (22 , C)
200
PRINT@421,STRING$(22,C)
210
PRINT@453 , STRING$ (22 , C)
220
PRINT@161,CHR$(137) ;
230
PRINTS 19 3, CHR$ (134)
240
PRINT§225,CHR$(137)
250
PRINT@257 , CHR$ ( 134 )
2 60
PRINT@289,CHR$(137)
270
PRINT@3 21,CHR$(134)
280
PRINTQ353 , CHR$ ( 137 )
290
PRINTQ3 85 , CHR$ ( 134 )
300
PRINTQ4 17 , CHR$ ( 137 )
310
PRINT@449 , CHR$ ( 134 )
•CHR$(137
) ;CHR$(134) ;CHR$(137) ;
320
POKE 1267,57:POKE1263,56:POK
E1259,55
330
POKE 1331,54:POKE 1327,53:P0
KE
1.323,52
340
POKE 1395,51:POKE1391.50:POK
E1387,49
350
POKE 1459, 35: POKE 1455,48:P0
KE
1451,42
3 60
FOR Y=l TO 10
370
PLAY "V30L9 204 AFAFAFAFAFAFAFA
FAFAFAFAFAFAFAFAFA
380
FOR X=l TO 1300: NEXT X
390
IFINKEY$=CHR$(13)THEN 410
400
NEXT Y
410
CLS : PRINT"HELL0 . . . PRINT YOUR
MESSAGE HERE TO MATCH THE SPOKE
N MESSAGE ON THE TAPE!
420
AUDIO ON: MOTOR ON
ts
128 THE RAINBOW August 1985
Sir Eggbert lumper
Leaps To The Rescue
By David Dawson
O
ne terrible day a hole
appeared in the ground in a small kingdom.
Terrible creatures began to spring from it
and ravage the countryside. Many knights
descended into the pit but none returned.
Finally, Eggbert, a strange knight who never
used weapons and had only his odd ability to
jump like a rabbit, volunteered to rid the kingdom
of the menace. The king was doubtful but desperate,
so he agreed to send the young, peculiar knight.
Sir Eggbert Jumper is a one-player game similar to many "climb-
up" games like Donkey Kong but with more of a "swords and sorcery"
theme. There are eight dungeon screens included in Eggy's tasks (his
friends call him Eggy), five of which are different. The last screen
holds many surprises which you will have to play to see.
Game Play
The main objective for Eggy is to grab the yellow key and move,
not jump, below the yellow door to exit the dungeon level. Be careful
— jumping into the door could erase it and trap you on that level.
(David Dawson holds a master's degree in psychology and will be working towards
his doctorate in the fall. He has a wife, Leigh Anne, and a son, Adam.)
August 1985 THE RAINBOW 129
Touching any red object will knock
Eggy out. Touching yellow objects,
except the key, will cause the screen to
change color. While the colors remain
abnormal it is not possible to jump off
the level Eggy is on, but be careful not
to step off the platform. The creatures
cannot harm Eggy while they are not
red, so use this time to get away from
them.
Touching blue objects, and all objects
while the colors are not normal, scores
points.
A creature will appear if too much
time is taken on a level. This creature
leaves a permanent trail that may make
it impossible to continue and effectively
end the game. Be careful to finish
quickly.
Joystick Operation
Move right or left by moving the
joystick in the direction desired. If at
any time Eggy's feet are not supported
he will fall.
To jump up, press the joystick button
while pressing the joystick forward. If
the stick is also inclined to the right
or left, Sir Eggbert will jump in that
direction as well as up.
Jumping down is done the same way
but the joystick must be pulled back.
When jumping down it is critical that
Eggy is near the edge of the platform
upon attempt. If he is too far away from
the edge he will try to jump up instead
of down; on the other hand, if he steps
off before he jumps he will fall to his
death.
If a platform is above Eggy when r
makes an upward jump he will bounc
off the platform and, if a platform
below him at the end of the jump, \
will land safely. This could be used I
jump over small breaks in the platfon
on which Eggy is traveling or to avoi
objects.
Use PCLEAR2 and ENTER befoi
running the program. As a hint to wh;
waits on the last screen: The slogan <
avid Eggy players is "Jump A Dragon
(For those having questions regardii
this program, Mr. Dawson may
contacted at 4808 Davenport, Apt. ft
Omaha, NE 68132.)
The listing: EGGBERT
5 CLEAR100:PCLEAR2:PMODE1,1:PCLS
10 DIM Hl(ll,15) :DIM H2(11,15):D
IM OJ(9,5):DIM CI (13 , 17) : DIM C2 (
13,15)
20 DRAW"C3BM20,120D2NR6D4R2NF4L2
D2L2D2L2BM106 , 120D2NL6D4L2NG4R2D
2R2D2R2"
30 FOR C=1T08:READX,Y:PSET(X,Y,4
):NEXT:DATA 20,116,2)3,118,22,116
,22,118,104,116,104,118,106,116,
106,118
40 DRAW II C2BM3 6,90D4L2U2NU2R8D2"
50 COLOR4,l:LINE(86,58)-(98,72) ,
PSET , BF : PRESET ( 9 8 , 70 ) : PRESET (98,
72) :PRESET(98,58) : PRESET (96, 58) :
PRESET(88,58) : PRESET (88 , 60)
60 LINE(86,56)-(86,66) ,PRESET:LI
NE(92,68)-(98,70) , PRESET, BF
70 PRESET (92, 66) : PRESET (90,66) :P
SET(96,62,2) : PSET (96 , 68 , 3)
80 GET(16,116)-(26,130) ,H1:GET(1
00, 116) -(110, 130) ,H2:GET(36,90)-
(44,94) ,OJ:GET( 88, 58) -(100,72) ,C
2
100 CLS: PRINT® 128, "(C) 1982 BY D
AVID LIONELL DAWSON" :PE=3
400 CL=0:KX=20:KY=168
405 IF RO=0 THEN 4 80
408 IF RO=8 THEN DRAW"BM40 , 80R4B
R3NU3D3BR4U6F6U6BR8F2ND4E2BR4D6R
6U6NL6BR4D6R6U6BR4D3ND3R4NF2U3NL
4BR12NR6D3NR6D3BR12U3NR6U3R6D6BR
4NR6U6R6BR4NR6D3NR6D4R6" : FOR XX=
1 TO 3: PLAY "T10;L4;O1;12;12;8;8
;4":NEXTXX
409 PLAY"T10 ; L4 ; 03 ; 1 ; 3 ; 5 ; 3 ; 5 ; 6 ; 6
; 8 ; 6 ; 5 ; 6 ; 8 ; 10 ; 12 ; 04 ; LI ; 1"
410 DRAW"BM"+STR$ (DX) +" , "+STR$ (D
Y)
420 SOUND255,8:FOR X=l T052:DRAW
"S"+STR$(X) :GOSUB8200:NEXT:SC=SC
+RO*100:DRAW"S4"
480 RO=RO+l
482 IF RO=9 THEN SCREEN0 ,0 : FOR X
=1 TO 250 STEP6:CLSRND(8) :SOUNDX
,1:NEXT:CLS:PRINT@224, "DUNGEON
COMPLETE , BONUS=" ; SC*100 : SC=SC+SC
* 100: RESTORE
485 IF RO=9 THEN FOR C=1T04:READ
X,X,X,X:NEXT
500 IF RO=9 THEN RO=l
510 COLOR 3,l:PCLS
515 LINE(0,0)-(254,4) ,PSET,BF
520 ON RO GOSUB 4000,4200,4000,4
400,4200,4400,4600,4800
540 READ F:F0R C=l TO F
550 READPX, PY: DRAW"BM"+STR$ (PX) +
" / "+STR$(PY) : GOSUB 8000
570 NEXT
590 READ F:FOR C=l TO F
610 READ PX,PY:DRAW"BM"+STR$(PX)
+","+STR$(PY) :GOSUB8100
' NEXT
READDX,DY
DRAW"BM"+STR$ (DX) +" , "+STR$ (D
630
640
650
Y)
660
670
GOSUB 8200
READNO:IF NO=0
THEN 700
130
THE RAINBOW August 1985
680 FOR C=l TO NO
690 READ PX(C) ,PY(C)
695 NEXT
700 READ PX, PY: PUT (PX, PY) - (PX+8 ,
PY+4) ,OJ
710 DATA 2,140,92,140,184,2,230,
85, 13)3, 131, 10,0,2,80, 3j3,5j3, 76, 14
,82
720 DATA 3,10,46,170,46,60,92,2,
50,89,160,132,128,52,2,128,30,12
8,76,208,36
730 DATA 2,140,92,140,184,2,2 30,
85,130,131,10,0,2,80,30,50,76,14
,82
740 DATA 3,190,46,130,92,8,138,2
, 10 , 3 7 , 170 , 12 9 , 4 5 , , 6 , 100 , 12 2 , 20
0,76,10,76,50,30,100,30,160,30,2
38,82
750 DATA 3,10,46,170,46,60,92,2,
50,89,160,132,128,52,2,128,30,12
8,76,208,36
760 DATA 3,190,46,130,92,8,138,2
,10,37,170,129,45,0,6,100,122,20
0,76,10,76,50,30,100,30,160,30,2
38,82
770 DATA 4,40,138,74,92,130,92,1
0,92,1, 110 , 85 , 90 , 9 8 , 1 , 180 , 12 2 , 20
,129
780 DATA 1,180,138,1,100,129,10,
54,0,240,175
785 CO=200-RO*10
1000 IF R0<3 THEN NO=0
1010 CNT=0:K=0:I=1
1020 HX=50:HY=168
102 5 SCREEN 1,0
1030 LX=HX : LY=HY : EX=0
1031 CNT=CNT+1
1039 IF PPOINT(HX+5,HY+18)=7 THE
N 1100
1040 IF PPOINT(HX+5,HY+18)=3 THE
N 1100
1050 IF PPOINT(HX+5,HY+35)=3 OR
PPOINT(HX+5,HY+35)=7 THEN HY=HY+
17:GOTO1200 ELSE 3000
1100 X=JOYSTK(0) :Y=JOYSTK(l) : IF
X>40 THEN M=l ELSE IF X<20 THEN
M=2 ELSE M=0
1110 IF Y<20 THEN U=l ELSE IF Y>
40 THEN U=2 ELSE U=0
1120 IF PEEK(65280)=254 OR PEEK(
65280) =126 THEN 1130 ELSE 1190
1130 PLAY"T255;12;1":IF U=2 THEN
IF PPOINT(HX+15,HY+18)=l OR PPO
INT(HX-15,HY+18)=1 THEN HY=HY+46
:GOTO1190
1140 IF PPOINT(HX+5,HY-2 7)=l THE
N HY=HY-46:EX=15:GOTO1190 ELSEHY
=HY-17 : EX=15 : GOTO1190
1190 IF M=0 THEN 1200 ELSE IF M=
1 THEN HX=HX+10+EX ELSE IF M=2 T
HEN HX=HX-10-EX
1200 IF HX>245 THEN HX=245 ELSE
IF HX<15 THEN HX=15
1210 LINE(LX-10,LY)-(LX+14,LY+14
), PRESET, BF: IF M=l THEN PUT(HX,H
Y)-(HX+12,HY+14) ,H1 ELSE PUT(HX,
HY)-(HX+12,HY+14) ,H2
1220 IF K=l THEN PUT (HX, HY) - (HX+
10,HY+6) ,OJ
1230 IF NO=0 THEN 1300
1240 X=RND(NO) : LINE (PX (X) -4 , PY (X
) )-(PX(X)+16,PY(X)+14) , PRESET, BF
1250 IF HX<PX(X) THEN PX(X)=PX(X
)-6 ELSE PX(X)=PX(X)+6
1260 PUT(PX(X) ,PY(X) )-(PX(X)+12,
PY(X)+14) ,C1
1300 IF CNT<CO THEN 1400
1310 KX=KX+I*4:IF KX<10 THEN KY=
KY-46:I=1 ELSE IF KX>245 THEN KY
=KY-46:I=-1
1315 IF KY< 30 THEN KY=168
1320 PUT(KX,KY)-(KX+12,KY+14) ,C2
: CIRCLE (KX-2,KY+5) ,5,4,3
1400 IF K=0 THENIF RND(40)=1 THE
N PUT(PX,PY) -(PX+8, PY+4 ) ,OJ
1410 IF R0O8 THEN 1450
1420 IF DF=0 THENDF=1: PX(1)=136
.__ 10 DISKETTES
FREE 0R
■ ■■■■■■ 20 C-20 CASSETTES
A subscription to the 'Coco-Cassette' gets you a tape
or disk full of 10 quality programs delivered to you by
first class mail every month. The documentation included
will help you run great utilities like 'Word Processor,' and
'Budget Analyzer,' or enjoy great games like Frogjump'
and Caterpillar Cave' FOR AS LITTLE AS 46 CENTS
EACH!
■A- Limited offer * Subscribe for a year on cassette
and receive 20 Free C-20 cassettes or subscribe for a
year on disk and receive 10 Free 5'A single sided
double density diskettes!
Now available on disk!
i — PRICES
TAPE
DISK
1YR(12ISSUES)
55°°
70°°
6 M0 (6 ISSUES)
30°°
40°°
Single Copies
goo
goo
* 1 6K extended required M * h Res ' ^1"°° , „
, « -„., , Overseas ADD SI lo subscription
Someprogramsrequ,r e 32K.and/ordisk and s , 00 l0 si le issues
* Over 3000 salislied customers
* Back issues available tram July '82 PERSONAL CHECKS WELCOME!
(over 280 programs to choose Irom!)
* Also available lor Commodore 64.
. T & D Subscription Software
^■A p -°- B0X 256 " c
HOLLAND, Ml 49423
(616) 396-7577
"
August 1985 THE RAINBOW 131
:PY(1)=48 ELSE LINE (PX(1) , PY (1) )
-(PX(1)+12,PY(1)+14) ,PRESET,BF
143)3 IF PX(1)<HX THEN PX(1)=PX(1
)+4 ELSE PX(l)=PX(l)-4
1435 PY(1)=PY(1)+RND(30)
1440 IF PP0INT(PX(1)-6,PY(1) )<>1
OR PY(1)>182 THEN DF=0 : PLAY"T25
5; 2, -6, -10" ELSE PUT(PX(1) ,PY(1) )-
(PX(1)+12,PY(1)+14) ,C1
1450 IF PPOINT(HX-12,HY+8)=l AND
PPOINT(HX+12,HY+8)=l THEN 2000
1455 IF PPOINT(HX-12,HY+8)=5 THE
N 2000
1460 IF PPOINT(HX-12,HY+8)=4 OR
PPOINT(HX+12,HY+8)=4 THEN 3 200
1470 IF PPOINT(HX-12,HY+8)=2 OR
PPOINT(HX+12,HY+8)=2 THEN IF HX>
PX-13 AND HX<PX+18 AND HY<PY AND
HY>PY-40 THEN K=l : PLAY"T1 ;04 ;L1
6;12":GOTO1800 ELSE CL=CNT+50:SC
REEN 1,1:GOTO1800
1472 SC=SC+RO*10
1480 SOUND 250,1
1800 FOR X=12 TOl STEP -2:PLAY"T
255;L16;04;"+STR$(X) : CIRCLE (HX,H
Y+6) ,X+10,2, .2:CIRCLE(HX,HY+6) ,X
+10,1, .2:NEXT
2000 IF CNT>CL THEN SCREEN 1,0
2005 IF K=l AND PPOINT (HX+5 , HY-1
2) =2 THEN 400
2010 GOTO 1030
3000 FOR X=HY TO 171 : HY=X: LINE (H
X-5,HY) -(HX+10,HY-10) , PRESET, BF:
PUT (HX , HY) - (HX+10 , HY+14 ) , HI :NEXT
3 200 FORX=1TO10:SOUNDX,1:SCREEN1
, 1 : SCREEN1 , : NEXTX
3210 LINE (HX,HY)- (HX+10 ,HY+12) ,P
RESET, BF
3220 DRAW"BM"+STR$ (HX) +" , "+STR$ (
HY+16) +"H4R8NU6R8U2L2"
32 25 SOUND100,10:SOUND1,20
3 2 30 IF PE=1 THENSCREEN 0,0:CLS:
PRINT§160,"TRY AGAIN ADVENTURER!
":PRINT"YOU REACHED LEVEL" ;RO: PR
INT"SCORE WAS" ;SC:END ELSE PE=PE
-1:CLS: SCREEN 0,0: PRINT@160,"AD
VENTURERS REMAINING" ; PE : FORX=lTO
2000 : NEXT : GOTO10 10
4000 LINE(0,184)-(254,191) ,PSET,
BF
4005 LINE(0,0)-(254,2) ,PSET,BF
4010 LINE(0,138)-(208,144) ,PSET,
BF
4020 LINE(0,92)-(70,98) ,PSET,BF
4030 LINE(104,92)-(254,98) ,PSET,
BF
PICOSOFT STRATEGY GAMES
0S& THE SPANISH ARMADA
Simulates the problems faced by the
English Commanders in 1588 as they
struggled to defeat the ARMADA.
■Cope with fickle winds. A relentless
current. Difficulty of supply. $24.95
DEBACLE
Command an 18th century army in the &
opening campaign of the French and
Indian War. Build a road through the "^
wilderness. Establish supply lines. Cope<t''_ ,
with Indian attacks. Capture a frontier &*}:$&££■
fort. ^ $24.95
FEUER AND GASSE
Lead the American 2nd Division in a
counter offensive against von Luden-
dorff's final drive on Paris in 1918.
Recreates the battles of Belleau Wood
and Chateau Thierry. Plays in real
time. $24.95
All games require a 32K computer and are graphically portrayed
using the semi-graphics 4 mode to depict the battle maps. Tape
and disk compatible. Games are shipped on tape.
Send check or money order to PICOSOFT GAMES, P.O. BOX
35. EIGHTY FOUR, PA 15330; (412) 267-3721. Games are
shipped postage paid. PA residents add 6% Tax. No delays for
personal checks.
Distributed in Canada by Kelly Software Distributors Ltd.. P.O. Box 1 1932,
Edmonton, Alberta T5J 3L1; (403) 421-8003.
NO MORE GAMES
EZ PROFILER — counts how many times each line of a basic
program is executed when it is run. Extended basic, 32K,
one disk drive required. On a disk. $20.00
EZ CASSETTE ENCRYPT — encrypts cassette files through
use of a password. Encrypted files are unreadable until
decrypted with the same password. All machine language.
On a cassette. /^i\ $25.00
EZ DISK ENCRYPT — encrypts disk files. All machine
language. Comes on a disk. $29.00
EZ RAM DISK — use upper memory as if it were a disk drive.
All machine language. Accesses all available memory. For
16, 32 and 64K computers. On a cassette. $25.00
EZ CASSETTE PILOT — run Pilot language programs on
your CoCo. This preprocessor translates Pilot programs into
Basic programs. For cassette systems. $15.00
EZ DISK PILOT — translate Pilot programs on disk systems.
On a disk. $19.00
Both encrytion programs for $35.00. Both Pilot programs tor
$25.00.
LANDWARE
6 Larchmont Rd.
Edison. NJ 08817
(201) 738-4213
No shipping charges. No handling charges.
NJ residents add 6% tax.
132
THE RAINBOW August 1985
4040 LINE(0,46)-(100,52) ,PSET,BF
4050 LINE(144,46)-(214,52) ,PSET,
BF
4060 LINE(208,46)-(214,92) ,PSET,
BF
4070 COLOR4,1:LINE(202,26)-(214,
40) ,PSET,BF: PRESET (214, 26) :PRESE
T(202,26) :CIRCLE(208,32) ,5,2:PSE
T(208,32) -.LINE (204, 38) -(212,38) ,
PRESET
4080 GET(202,26)-(214,40) ,C1:LIN
E(202,26)-(214,40) , PRESET, BF
4100 RETURN
4200 LINE(0,184)-(254,191) ,PSET,
BF:LINE(0,138)-(96,144) ,PSET,BF
4210 LINE(128,138)-(216,144) , PSE
T,BF: LINE (44, 92) -(254, 96) ,PSET,B
F
4220 LINE(0,46)-(96,52) ,PSET,BF:
LINE(128,46)-(228,52) ,PSET,BF
4230 C0L0R4,1: CIRCLE (18, 172) ,14,
4: PAINT (18, 172) ,4, 4: FOR X=l TO 4
:PSET(RND(28) ,146+RND(12) ,4) :NEX
T: LINE (10, 158) -(28, 165) ,PSET,BF
4240 RETURN
4400 LINE(0,184)-(254,191) ,PSET,
BF:LINE(0,138)-(44,144) ,PSET,BF
4410 LINE (154 ,138) -(230,144) , PSE
T , BF : LINE ( 64 , 92 ) - ( 152 , 98 ) , PSET , B
F
4420 LINE(202,92)-(254,98) ,PSET,
BF: LINE (0,46) -(64,52) ,PSET,BF:LI
NE(178,46)-(218,52) ,PSET,BF
4430 RETURN
4600 LINE(0, 184)-(254, 191) , PSET,
BF
4610 LINE(0, 138)-(204, 144) , PSET,
BF : LINE (0 , 9 2 ) - ( 2 8 , 9 8 ) , PSET , BF : LI
NE( 74, 92) -(148,98) , PSET, BF: COLOR
4,1 '.LINE (148,0) -(254, 98) ,PSET,BF
:LINE(0,0)-(148,52) ,PSET,BF
4 620 RETURN
4800 LINE(0,62)-(26,34) ,PSET:LIN
E-(44,56) , PSET .'LINE- (54, 30) , PSET
: LINE- (216,30), PSET : LINE- (222,52
) ,PSET:LINE-(240,28) ,PSET:LINE-(
244,60) ,PSET:LINE-(254,42) , PSET
4810 PAINT (100, 20) ,3,3
4820 COLOR 4,1
4830 LINE(76,0)-(70,14) ,PSET:LIN
E-(118,46) ,PSET:LINE-(94,16) ,PSE
T : LINE- (112,2), PSET : LINE- ( 130 , 2 2
) ,PSET:LINE-(138,30) , PSET: LINE- (
138,40) ,PSET:LINE-(142,44) ,PSET:
LINE- ( 14 6 , 40 ) , PSET : LINE- (148,30)
, PSET: LINE- (154, 22) ,PSET
4840 LINE- (150, 16 ), PSET: LINE- (14
2,12) , PSET: LINE- (136, 16) ,PSET:LI
NE-(130,22) , PSET: LINE (156,22) -(1
78,4), PSET : LINE- (212,18), PSET : LI
NE-(202,46) ,PSET:LINE-(232,12) ,P
SET:LINE-(232,0) , PSET
4850 PAINT(144,0) , 2 , 4 : PAINT (144 ,
20), 4, 4
4870 LINE(120,10)-(122,28) ,PSET:
LINE- (13 6, 34) , PSET: LINE- (148 , 34)
, PSET : LINE- (162,28), PSET : LINE- (1
64,12) ,PSET
4880 PAINT(158,22) , 4 , 4 : PAINT (128
,22), 4, 4
4885 CIRCLE(138,26) ,2,2, . 5 : CIRCL
E(148,26) ,2,2, .5
4890 PSET(138,24,3) : PSET (138 , 26 ,
3) :PSET(148,24,3) : PSET ( 148 , 26 , 3)
:PSET(144,40,3) : PSET (140 , 40 , 3)
4900 COLOR 2,1:LINE(142,12)-(134
,9) , PSET: LINE (14 6, 8) -(13 8, 5) ,PSE
T: DRAW"C4BM128 , 32D8ND8R4ND8L8ND8
BM156,32D8ND8R4ND8L8D8"
4910 COLOR 3,1: LINE (0,92) -(162 ,9
8) ,PSET,BF
4920 LINE(0, 184)-(254, 191) , PSET,
BF: LINE (62, 138) -(128, 144) ,PSET,B
F : LINE ( 17 8 , 13 8 ) - ( 200 , 14 4 ) , PSET , B
F
4930 LINE(50,90)-(140,100) ,PRESE
T,BF
4950 CIRCLE (14 2, 58) , 4 , 4 : CIRCLE ( 1
42 , 58 ) , 1 , 2 : COLOR4 , 1 : LINE (14 6,56)
-(138,48) ,PSET
4960 GET(136,48)-(148,62) ,C1
4970 LINE(136,48)-(148,62) , PRESE
T,BF
49 80 RETURN
8000 DRAW"C3U10E4R4F4NL8D10" : PAI
NT(PX+4,PY-3) ,3,3
8010 RETURN
8100 DRAW"C2NU8R8E4H4ND8L8G4F4"
8110 RETURN
8200 DRAW"C2NR20NL4D2NL4D2NL4D6N
L4 D2NL4D2NL4D6R20U20 " : PAINT ( DX+2
,DY+2),2,2
8205 DRAW"BM-14,+4C3R6D2L2ND4L4"
8210 RETURN fZ\
Sqq You At
RAINBOWfest Princeton
October 11-13
August 1985 THE RAINBOW 133
HARDWARE
DOUBLE SWITCH - Two LEDs show you which port is being used, 1 or 2. High Quality
parts with o great looking face plote! 529.95
DOUBLE CABLE -Hook a MODEM and a PRINTER up at the same time with this
Y-connector $14. 95
EXT-CABLE- long printer or MODEM cable (15 feet) 514.95
Y-CABLE — You can connect two devices at the same time to your ROM port (80 col-
umn card and disk Drive) S29.95
DOUBLE DRIVER- Best video driver available for your CoCo. Made by our friends at
Moreton Boy Software. Specify CoCo or CoCo II S24.95
MINI MOUTH - Now get sound from your mute monitor. Plugs right in, nothing to
solder 524.95
COLOR POWER II - This plug in CP'M board will allow you to use thousands of CP/M
programs $329.00
MINI-MODEM - 300 BAUD, Originate /Answer Full Duplex, Direct Connect . S79.95
(Sove SI 0.00 when you buy one of our terminal programs and a modem)
DISKS - DISKS - DISKS - DISKS - DISKS
Save on blank 514" diskettes. Buy in bulk and save! No sleeves. (10 minimum in
each order) $16.00
DOUBLE CABLE
*
***
DOUBLE TERM + Plus +
This program is the ultimate in CoCo communicating! Double Term + is used with i
plug-in 80 column board. Supports either Double 80 Plus, Color Power II or Won
Pak.
Here are jusl some ol the features Double Term + has to ofler:
Select:
Half, Full Duplex or Echo
Odd, Even, Mark, Space or No Parity
7 or 8 Bit Words
1 or 2 Stop Bits
All Caps if needed
Several Printer Formats
Trapping of incoming characters
BAUD Rotes:
110-4800 (communicate)
600-9600 (printer)
Screen Format:
80 x 24 upper/ lowercase
Send all 1 28 characters from keyboard
Buffer:
Merge text or programs
49K to 53K memory
Four Buffer Send Modes
Display Bytes Used/ Remaining
Editor — Move forward and reverse thru buffer. Insert, type over, delete lines
characters or words. Block delete.
10 Macro keys
Automatic Capture of incoming files
X on/X off capabilities
Send True Line Break
Transmit/ Receive BASIC Programs, Files or Machine Code. No need to translat
BASIC programs to ASCII Format.
Save/ Load Macros or Parameters to Disk
Use 1 to 4 Disk Drives (w/SAVE, LOAD, DIR & Granule Display)
Print while receiving information*
Easy to use MENU driven format
Comprehensive users manual
Works on All Radio Shack Color Computers, and All Radio Shack Disk systems.
15-day money back guarantee (less a S10.00 restocking/use charge.)
Only $5.00 each for all future upgrades when you return your warranty cord.
PRICE: Double Term + 559.95 (Disk
Y-Cable 529.95
Double 80 Plus $99.95
Complete Package 51 89.95 + SSI
•Requires PC Pak from PBJ, Inc.
* DOUBLE 80 PLUS
TRUE 80 COLUMN OUTPUT
BUILT IN SWITCH FOR COCO OR DOUBLE 80 PLUS
ADJUSTABLE VIDEO OUTPUT
GOLD PLATED EDGE CONNECTOR
DRIVERS AVAILABLE FOR BASIC, OS9 and FLEX
DISPLAY ALL ASCII CHARACTERS
ALTERNATE CHARACTER SETS AVAILABLE
METAL CASE (not cheap plastic)
DOUBLE TERM + available lor this board
BACKED BY A 90 DAY PARTS AND LABOR WARRANT
DOUBLE 80 PLUS (80 column board) S99.9.'
Y-CABLF. 29.9.'
BASIC DRIVER 12.9.'
OS9 DRIVER 12.9;
FLEX DRIVER (available soon) 12.9.'
DOUBLE TERM + (disk only) 55.5
COLOR TERM + Plus +
Select:
Hall, Full Duplex or Echo
Odd. Even, Mark, Space or No Parily
7 or 8 Bit Words
1 or 2 Stop Bits
All Caps it needed
Several Printer Formats
Trapping ot incoming characters
BAUD Rates:
110-4800 (communicate)
600 9600 (printer)
Screen Format:
32 x 16, 42, 51, 64 or 85 x 24
Send all 1 28 characters from keyboard
Butler:
Merge text or programs
49K to 53K memory
Four Butler Send Modes
Display Bytes Used/Remaining
Editor- Move lorward and reverse thru buffer. Insert, type over, delete lines,
characters or words. Block delete.
1 Macro keys
Automatic Capture of incoming files
X on / X oil capabilities
Send True Line Break
Transmit/Receive BASIC Programs, Files or Machine Code. No need to translate
BASIC programs to ASCII Format
Save/Load Macros or Parameters to Disk
Use 1 to 4 Disk Drives (w/SAVE, LOAD, DIR & Granule Display)
Print while receiving information*
Easy to use MENU driven format
Comprehensive users manual
Works on All Radio Shack Color Computers, and All Radio Shack Disk systems.
<%<
W*.
PRICE: Color Term i
$49.95 (Disk/Tape)
SUPER UTILITY SPECIAL!!
Save over s 50 00 !!
5et the following utilities on a single disk
or one low price: Double Spooler, ROM
/love, Color Disk Saver, Autoload II, Double
/lailer, & Color Key Command —
Juper Utility Disk s 49 95
SUPER GAME SPECIAL!!
Save over s 50°°
•Jet the following games on a single disk for
>ne low price: Clone Attack, Color lago,
aalactic Math, Color Biorhythm, Modem
)hess, & Underground.—
Super Game Disk s 39 95
DOUBLE DOS II
Double DOS II - Now use 35, 40, or 80 trock (double or single sided) drives, oil on
one system, all at the same time. All regular disk commonds are supported with
Double DOS II and are totally transparent to your BASIC programs! You can get
up to 158 granules on a disk using an 80 track drive. These are the added
commands:
BAUD 1-6... change the BAUD rate.
TRACK 35,36,40,80. ..change number of tracks.
DOUBLE... enable the double sided option.
PDIR . . . print your directory to printer.
DUMP ON/OFF.. .send programs without a terminal program.
RATE 6,35 . ..change the head stepping rate.
VIDEO ON/OFF... reverse video without a hardware mod.
SCROLL 1 -255 . . . change your screen scrolling speed.
COMMAND . . . will list all new commands.
DUPE 0,1,2 . . .will allow copy & backup from one side of a drive to another!
DATE ... you can enter the month, day and year as an extension to your programs
when they are displayed during a DIR command.
We guarantee that this program will work using the above commands, with oil types
of 35, 40 or 80 track drives!
PRICE: S29.95 (DISK ONLY) 64K required
#
©©iy>lbll(g iDniJD/iiiSiyj $@fftw@tfi
620 Kings Row • Denton, Texas 76201 • 817-566-2004
MasterCard
(2.00 shipping and handling on all <>nU
SCHOOL IS IN THE HEART OF A CHILD
16K
RAINBOW
Play And Learn Together —
Wonderment Is Contagious!
By Bob Albrecht and Ramon Zamor
Rainbow Contributing Editor
"School Is In The Heart Of A Child" is for parents of quite young children.
We want to help you work and play with your 3- to S-ycar-old child und learn
to use computers as a joyful family experience. We suggest ways to use the
home computer as another means to encourage your child's independence, growth
and control over her own life. Sec the pride on her face as she directs the
computer to do what she selects with deliberation. See her head gears switch
to "on" as she progresses step by step with your presence and caring guidance.
We will explore (we hope, with your help) the following:
• Specific "leaching" techniques so the discovery can be the child's own.
• Critical evaluation of software based on extensive playtcsting in family and
related environments,
• Additional resources to consult: books, magazines, software publishers,
networks, etc.
• Suggestions for interludes and fun limes away from the computer (a must!):
call the librarian for information; watch TV together and discuss it; work
together as volunteers in a community project; take an "awareness" walk.
• Whatever we learn from families we work with in Menlo Park or from you,
our readers. Lei's pool our knowledge and share our experiences as we learn
from our children.
Copyright® 1985 by DragonQucst, P.O. Box 7627, Menlo Park, CA 94026.
(Well-known author Bob Albrecht co-authors the
"Game Master's Apprentice "feature for THE RAINBOW
each month. Ramon Zamora is author and co-author
of several books, co-founder of Computer Town
USA!, and currently designing computer games for
kids at Child Ware Corp. in Menlo Park, Calif)
Since you haven't said you want more Wandering Stai
this time we will give you an assortment of program
from TRS-80 Color BASIC by Bob Albrecht.
We begin with Intergalactic Broadcasting. We sugges
you type it in using your name. Then, encourage your chili
to change it to her or his name.
w
CLS
105
1
110
PRINT
"INTERGALACTIC"
120
SOUND
89, 20
125
i
130
PRINT
"BROADCASTING"
140
SOUND
125, 20
145
1
150
PRINT
"COMPANY"
160
SOUND
147, 20
165
1
170
PRINT
"BRINGS TO YOU. . ."
180
SOUND
176, 40
185
i
200
CLS
Of course, you may wan
210
PRINT
" LUCY " ; — lo put your name in
220
SOUND
89, 1 | Line 210.
230
GOTO 2
10
.
136
THE RAINBOW August 1985
You see, the way to make a computer wonderful to a
hild is to play with the child on the computer. Play
jgether, learn together. Wonderment is contagious!
We think your small child might like this one. Encourage
im or her to type in his or her name.
100
110
199
200
210
299
300
310
320
330
340
350
399
400
410
499
500
510
REM**GRAND FINALE SCH 16-2
CLS
i
REM**FOR WHOM?
INPUT "YOUR NAME"; N$
REM**CRESCENDO FOR
CLS
FOR T=l TO 255
: PRINT N$;
: SOUND T, 1
NEXT T
i
REM**LONG TIME
FOR K=l TO 2500:
i
REM** DO IT AGAIN
GOTO 110
Patience!
This will take
about five seconds.
DELAY
NEXT K
Almost every kid we know is on a team or has a friend
n a team. So we suggest this program called Go, Team,
■nl
100
199
200
210
220
299
300
310
320
399
400
410
420
430
499
500
510
599
600
910
920
REM**GO TEAM GO! SCH 16-3
i
REM**' GO 1 ON A BLUE SCREEN
CLS 3: PRINT "GO";
GOSUB 910 « Use time delay subroutine
i
REM**' TEAM' ON ORANGE SCREEN
CLS 8: PRINT "TEAM";
GOSUB 910 -+ Use time delay subroutine
i
REM**' GO! 1 ON MAGENTA SCREEN
CLS 7: PRINT "GO!";
GOSUB 9 10 Use time delay subroutine
GOSUB 910 " twice for longer delay
i
REM**KEEP IT GOING
GOTO 210
REM**TIME DELAY SUBROUTINE
FOR K=l TO 500: NEXT K
RETURN
Adults love to kid adults. Kids love to kid adults. Adults
>ve to kid kids. And so on. Imagine this: You are the
ist one to go to bed tonight. Before you go, put a message
n the screen for the early risers.
100
4
199
200
210
220
230
T";
299
300
310
320
330
399
400
410
420
430
499
500
510
599
900
910
920
REM**MESSAGE BLINKER SCH 16-
REM**GET MESSAGE & PLACE
CLS
INPUT "YOUR MESSAGE"; M$
INPUT "WHERE SHALL I BLINK I
P
i
REM**BLINK MESSAGE ON
CLS: PRINT §P, M$;
Z = 500
GOSUB 910
REM**BLINK MESSAGE OFF
CLS 2
Z = 300 / ' BRUSH
GOSUB 910 ' 'OUR TEETH,
REM**DO IT AGAIN
GOTO 310
i
REM**TIME DELAY SUBROUTINE
FOR K=l TO Z: NEXT K
RETURN
Can you figure out how to use the following program
to paint many (or few) colored stripes on the screen?
100 REM**STRIPE 'PAINTBRUSH' SCH
16-5
110 CLS
199 •
200 REM**DIALOG WITH PAINTER
210 PRINT @0, CHR$(30): PRINT @0
•
220 INPUT " DOWN, L,R, CLR"; DOWN,
L, R, CLR
299 '
300 REM**PAINT HORIZONTAL STRIPE
310 FOR OVER=L TO R
320 : SET (OVER, DOWN, CLR)
3 30 NEXT OVER
399 •
400 REM**DONE. SOUND OFF.
410 SOUND 89, 10
499 '
500 REM**GO BACK FOR MORE
510 GOTO 210
Aha! L is the Lett
end of the stripe.
R is the Right end.
August 1985 THE RAINBOW 137
The real wonderment of computers is to make them do
what you want them to do. Everyone who reads this
magazine can learn to read and understand CoCo BASIC
programs, if only the people who write for the magazine
have compassion for you, the beginner. If you learn to
read and understand BASIC programs written by others,
you will soon learn to express yourself in the language
built in to every home computer.
Now try to read and understand this program. Replace
the DflTR statements with locations of your stars.
100
110
199
200
210
299
300
310
320
330
340
399
400
410
499
500
910
920
930
940
950
REM**CONSTELLATION SCH 16-6
CLS
i
REM**NS IS NUMBER OF STARS
READ NS
i
REM**TURN ON NS STARS
FOR STAR=1 TO NS
: READ OVER, DOWN
: SET (OVER, DOWN, 8)
NEXT STAR
REM**DO NOTHING LOOP
GOTO 410
REM** STAR DATA
DATA 7
DATA 6 , 12 ,
DATA 26, 12,
DATA 38, 20,
DATA 56, 14
18,
34,
54,
10
14
20
Values of OVER and DOWN
lor seven stars
A mandala is a symmetric pattern; nice to look at. A
giant snowflake is beautifully symmetric about its center.
Snowflakes are great mandalas but melt too soon. Use
this program to put an ever changing mandala on the screen.
100 REM**MANDALA, EVER CHANGING
SCH 16-7
110 CLS
199 '
200 REM**HORIZONTAL & VERTICAL O
FFSET
210 H = RND(32) - 1
220 V = RND(16) - 1
299 •
300 REM**RANDOM COLOR
310 KOLOR = RND(8)
399 •
400 REM**TURN ON FOUR BLIPS
410 SET (31 - H, 15 - V, KOLOR)
420
SET (31 -
H,
16
+
v,
KOLOR)
430
SET (32 +
H,
15
—
V,
KOLOR)
440
SET(32 +
H,
16
+
v,
KOLOR)
499
1
500
REM** DELAY,
THEN
DO
MORE
510
Z = 10
520
FOR K=l r
ro
Z: NEXT
K
530
GOTO 210
RUN the program. The computer turns on four ligh
at a time, symmetric with the center of the screen. If yo
don't see this happen, increase the time delay by changir
Line 510 to:
510 Z = 500
and RUN the program again. If you want the mandala t
change more rapidly, delete lines 510 and 520, or chanj;
Line 510 to 510 Z = 1.
Experiment! Try these variations:
Variation 1: Change only Line 210, as follows:
210 H = RND(RND(32) ) - 1
Variation 2: Change only Line 220, as follows:
220 V = RND(RND(1G)) - 1
Variation 3: Change both lines 210 and 220, as follows:
210 H = RND(RND(32) ) - 1
220 V - RND(RND(1E) ) - 1
Variation 4: Change either Line 210 or Line 220, or botl
as follows:
210 H = RND(RND(RND(32) ) ) - 1
220 V = RND(RND(RND(1G) ) ) - 1
Vaiiation 5: Change either Line 210, or Line 220, or both
210 H = 32 - RND(RND(32))
220 V = 1G - RND(RND(1G))
Variation 6: Change Line 310:
310 KOLOR = RND(RND(B))
Experiment! The best
variations are your
variations.
Variation 7: Anything suggested by the above variations.
Here is a simple number guessing game. The numbe
of stars tells you how close you are to the CoCo's secre
number. Can you guess the number in seven guesses (ever
time)?
^~
The listing: STARS
500 .
END
.37
.65
100 REM**STARS - A GUESSING GAME
SCH 16-8
199 »
200 REM**TELL HOW TO PLAY
210 CLS
138
THE RAINBOW August 198b
220 PRINT
"WELCOME TO MY GALAXY.
I ■ LL"
2 30 PRINT
"THINK OF NUMBER, 1 TO
100 . "
240 PRINT
"YOU GUESS MY NUMBER.
IF YOU"
2 50 PRINT
"MISS, I'LL PRINT SOME
STARS . "
2 60 PRINT
"THE CLOSER YOU ARE, T
HE MORE"
270 PRINT
"STARS YOU WILL SEE."
2 80 PRINT
"IF YOU SEE 7 STARS (*
******) f "
290 PRINT
"YOU ARE VERY, VERY CL
OSE!"
299 '
300 REM**COCO 'THINKS' OF A NUMB
ER
310 X = RND(100)
399 '
400 REM**GET GUESS, G
410 PRINT
§480,;
420 INPUT
"YOUR GUESS"; G
499 •
500 REM**D IS DISTANCE
FROM X
510 D - ABS(X - G)
599 '
600 REM**CHECK FOR A WIN
610 IF D=0 THEN 810
699 '
700 REM**NO WIN. PRINT
HINT.
710 PRINT @4 64, "*";
720 IF D<64 THEN PRINT
II * II .
730 IF D<32 THEN PRINT
II * ll .
740 IF D<16 THEN PRINT
II *ll.
750 IF D<8 THEN PRINT
II * ll .
760 IF D<4 THEN PRINT
ll * II .
770 IF D<2 THEN PRINT
II * ll .
780 PRINT: GOTO 410
799 '
800 REM**WINNER!
810 CLS
820 FOR K=l TO 100
830 : PRINT @RND(510),
II * II .
840 NEXT K
850 PRINT @480, "YOU GOT IT, MY
NUMBER WAS" X
899 '
TM
XPNDR2
for the CoCo
DISK SYSTEM
XPNDR2 S39.95 each or 2/S76
This prototype card features a 40 pin
connector for projects requiring an on-
line disk system or ROM paks. The
CoCo signals are brought out to wire-
wrap pins. Special gold plated spring
clips provide reliable and noisefree
disk operation plus solid support for
vertical mounting of the controller. The
entire 4.3*7 inch card is drilled for ICs.
Assembled, tested and ready to run.
XPNDR1 S19.95 each or 2/S36
A rugged 4.3*6.2 inch bare breadboard
that brings the CoCo signals out to
labeled pads. Both XPNDR cards are
double-sided glass/epoxy. have gold
plated edge connectors, thru-hole
plating and are designed with heavy
power and ground buses. They're
drilled for standard 0.3 and 0.6 inch
wide dual in-line wirewrap sockets:
with a 0.1 inch grid on the outboard end
for connectors.
SuperGuide S3.95 each
Here is a unique plastic insert that
aligns and supports printed circuit
cards in the CoCo cartridge port. Don't
forget to ORDER ONE FOR YOUR
XPNDR CARDS
•->>'
Included with each XPNDR card
are 8 pages of APPLICATION
NOTES to help you learn about
chips and how to connect them to
your CoCo.
■E
33
To order or for technical informa-
tion call:
(206) 782-6809
weekdays 8 a.m. to noon
We pay shipping on prepaid orders.
For immediate shipment send
check, money order or the number
and expiration date of your VISA or
MASTERCARD to:
MICROSYSTEMS
ROBOTIC
BOX 30807 SEATTLE. WA 98103
THE VERY BEST
• Dennis Kitsz • Bill Barden, Jr. • Stephen P. Allen
• William Clements, Jr. • Mark Goodman
• And Others
present
Sophisticated Hardware! Up-to-thc-Minure News, Gossip and
Reviews! Languages! A/L Applications! Graphics! And other
good stuff!
26 times a year
If you are a talented hacker— or plan to he— you should he
reading UnderColor.
Stay on top of the Color World: Suhscrihe today!
Yes, enter my subscription to UNDERCOLOR
2 years S66.00
1 year $33.00
Canada/Mexico
1 year $47.00
Overseas
: 1 year $53 US dollars □ Airmal $65 US dollars
[ l 2 years $94.00
City .
Stale
Zip.
Mail to: ColorPlus, Box 6809,
Roxbury, VT 05669 or call (802) 485-6440
August 1985 THE RAINBOW 139
£Nf)IC0<F7
COMPUTER SOFTWARE AND ACCESSORIES
PRINTERS
* SPIRITPI80CPSF/T) $214 00
OKIOATA 82 (SEP. ) W/COCO CABLE $329.00
OKIDATA 92 (PARI $394 00
( 1 60 CPS Draft - 40 CPS Correspondance Qualilyl
OKIDATA 93 (PAR - 15 CARRIAGE) $595 00
1 160 CPS Drall - 40 CPS Correspondance Ouallly)
* CITIZEN MSP-10 $338.00
(160 CPS Drall - 40 CPS Correspondance Qualilyl
* PANASONIC KX 1090 (PARI (80 CPS F/T|. . . . $224 00
* PANASONIC KX 1091 (PAR) $306 00
( 1 20 CPS Draft S 22 CPS Near Letter Quality!
* EPSON CODE COMPATIBLE
PRINTER INTERFACE
(Serial to Parallel)
Pbh (PRINTER 8 MODEM CONNECTIONS) . . $59 95
PURCHASED WITH PRINTER $54 95
MODEMS
VOLKSMODEM WITH ALL CABLES $69 95
(300 BAUD - MANUAL ANSWER/DIAL)
NEW! A GREAT BUY! NEW!
VOLKSMODEM 1200 WITH ALL CABLES $224 95
(300/1200 BAUD - AUTOANSWER/DIAL)
CoCo MAX o
COCO MAX $66 45
Y BRANCH CABLE $25 95
MONITORS
AMDEK 12 YEAR WARRANTY)
COLOR 300 (COLOR COMPOSITE AND B8W MODE)
(REPLACES OLD COLOR I) $262 00
VIDEO 300 (GREEN. NOGLAREI $149 00
VIDEO 300AIAMBER. NOGLAREI $155 00
NAP (AMBER W/AUDIOI $10900
MONITOR INTERFACES
VIDEO PLUS $24 95
ICOLOR OR MONOCHROMEI
PURCHASED WITH MONITOR $20 95
VIDEO PLUS IIC $39 95
(COLOR FOR COLOR II)
PURCHASED WITH MONITOR $31 95
UNIVERSAL VIDEO ADAPTER (By Mark Dala) . $28 95
PURCHASED WITH MONITOR $24 95
WORKS WITH ALL COCO S BUT A MUST FOR
NEW COCO II s WITH SOLDERED IN VIDEO CHIP
KEYBOARD
SUPER PRO BY MARK DATA $53 95
(NOT FOR COCO II)
ADAPTER (FOR POST - 10/82 COCOl $3.65
AUTOTERM/MODEM SALE!
AUTOTERM WITH
VOLKSMODEM (SEE BELOW). . . .
VOLKSMODEM 1200 (See Belowl .
T
$95 95 $9995
$249 95 $25495
DISKS
ELEPHANT SSSD
ELEPHANT SSDD
ELEPHANT OSDD
BASF QUALIMETRIC SSDD
BASF QUALIMETRIC DSDD
1 BX 2 + B)
$1750 $165C
$18 50 $17 50
$22.00 $2100
$1900 $1800
$22 00 $2100
TAPES
C-10IONE DOZEN). $7 50
TWO OR MORE DOZEN $7 00/OOZ
DISK STORAGE
FLIPNFILE10 $545
FLIP N FILE 25 $16 95
FLIPNFILE50 $23 95
DISK BANK 5 (HOLDS 50) $12 95
JOYSTICKS/ADAPTERS
WICO JOYSTICK ADAPTER $18 95
WICO ANALOG JOYSTICK S38 95
(NO ADAPTER REQUIRED - FREE FLOAT OR
SELF CENTERING BIG BAT HANDLE - RUGGED'I
Look at These Discounts and Compare.
ALL SOFTWARE DISCOUNTED AT LEAST 20% !
SPECTRAL ASSOCIATES
T D
> ICECASTLES $1995 $22 35
> GALAGON $19 95 $22 35
> PENGON $19 95 $22 35
> COLOR PANIC $19 95 $22 35
> CU8IX $19.95 $22 35
> LANCER $1995 $2235
> MS GOBBLER $19 95 $22 35
WHIRLYBIRD RUN $19 95 $22 35
LUNAR ROVER PATROL $19.95 $22 35
COMPUTERWARE t d
STAR TRADER (32K CASS/64K DISK)$19 95 $22 35
> MAJOR ISTAR $19.95 $22 35
SAM SLEUTH (64K| $19.95 $22 35
COCO COOKBOOK $22 35
> MR DIG $22 35 $24 75
> JUNIORS REVENGE $23 15 $25 55
RANDOM BASIC (OS-9) $60 00
t> COLOR BASIC COMPILER $31 95
64K SCREEN EXPANDER I64K) $19 95 $22 35
* THE SOURCERER IR DOS) $27 95 $31 95
THE SOURCERER (OS-9) $31 .95
> MACRO ASSEMBLER & XREF (R DOS) $39 95
MACROASSEMBLER * XREF (0S-9I $39 95
> COLOR EDITOR $19 95 $23 95
> COLOR MONITOR $19.95 $22 35
> MOON HOPPER $19 95 $22 35
BLOC HEAD (O-BERTI $21 55 $23 95
DOODLE BUG (LADY BUG) $19 95 $22 35
GRAN PRIX $17 55 $21 55
SOFT LAW T 4 D INCLUDED
D VIP WRITER (INC SPELLER') $55 95
Q VIP SPELLER $39 95
D VIP CALC $55 95
Q VIP TERMINAL $39 95
Q VIP DATA BASE $47 95
□ VIP DISK-ZAP $39 95
D VIP INTEGRATED LIBRARY 51 19 95
COGNITEC t d
Q TELEWRITER 64 $39 95 $47 95
DISKI
(DISK)
(DISK)
(DISK)
ELITE SOFTWARE t d
D ELITE-WORD $47 95 $47 95
D ELITE-WORD/SPEL $59 95
ClELITE-SPEL $2395
D ELITE-CALC IVER 3.0) $55 95 $55 95
DCALC-LIST $19.95 $1995
D ELITE-FILE 559 60
D ENTIRE LIBRARY (DISKI $16400
DEFT SYSTEMS
DEFT PASCAL
DEFTBENCH
DEFT PASCAL WORKBENCH iBolh Abouel
DEFT EXTRA
..$47 95
. 531 95
. $71 95
$31 95
D
$39 95
PXE COMPUTING T
D AUTOTERM $31 95
(SEE PAGE 15 OF RAINBOW)
CSC
DYNA CALC $79 95
PRICKLY-PEAR SOFTWARE
T D
> TO PRESERVE QUANOIC $27.95
* MODEM MASTER $1745
SUPER SCROLL I64K) $17 45 $17 45
* COLOR DISK TRIVIA $2095
BI3LE $13.95
ENTERTAINMENT $13 95
SPORTS $13.95
CHILDREN $13 95
> JUMBO JET $ 1 7 45 $20.95
> MUSIC READER $24 45 $27 95
* ERLAND $1745 $2095
> TRAVELINTOAD $1745 $20 95
> OCKYWOKY $17 45 $20 95
> ADVENTURE IN WONDERLAND $17 45 $20 95
THE DISK MANAGER $20 95
THE DISK MASTER $17 45
COLORKIT (Programming Utility) $24.45 $27 95
FLIGHT $13.95 $17 45
TOM MIX
.523 20
P51 FLIGHT SIMULATOR ...
P51 FLIGHT SIMULATOR CABLE
THE SAILORMAN I64K) $23 95
> PAC PANIC - 519 95
OUIX $19 95
> WORLOS OF FLIGHT $23 95
SKRAMBLE 519 95
> SR-71 $23.15
> CU-BER $22.35
> BUZZARD BAIT $22 35
> AIR TRAFFIC CONTROLLER $23 15
> SPACE SHUTTLE $23 15
> THE KING $2155
>COLORGOLF 51435
TAPE TO DISK 514 35
SCREEN PRINT ROUTINE 515 9a
(Specily Printer DMP - EPSON - OKIDATA
$27 2
.$9.9
$27 9
$22 3
$223
S26 3
522 3
$25 5
$24 7
524 7
$255
$255
$23 9
$17 5
ADVENTURE INTERNATIONAL
* FIRE COPTER
* SAIGON THE FINAL DAYS.
# EARTHQUAKE
# AIRLINE
> SEA DRAGON
T
$19 95
$19 95
$19 95
.S1995
$27 95
> DISKEY (Utility To Examine And Change Oisk Content
Plus Computer Diagnostics) $39 9
MARK DATA
T
SHENANIGANS $19.95
BLACK SANCTUM $19 95
SEA QUEST $19.95
CALIXTO ISLAND $19 95
TREKBOER $19 95
COCOUTIL
D
$22 3!
$22 3!
$22 3!
$22 3!
$223!
$22 3!
PROGRAMMERS INSTITUTE
T D
> COMPLETE PERSONAL
ACCOUNTANT - ( 1 .2.43) $63 9.
NOTE: ALL SALES FINAL. NO RETURNS UNLESS DEFECTIVE. ADDITIONAL LISTINGS IN OUR FREE CATALOG - CALL OR WRITE,
•if Requires 16K Ext Basic Minimum ^Requires 32K Ext Basic Minimum DWe Recommend 32K or 64K. Others 16K Ext. Std Basic Minimum
U.S. AND CANADA ADD $1 00 PER ORDER FOR SHIPPING.
C.O.D. ADD $2.00 (U.S.A. ONLY). ALLOW 2 WEEKS FOR
CHECKS TO CLEAR. NO P.O. BOXES 1 MUST HAVE
STREET ADDRESS. SHIPPING - OTHER COUNTRIES:
ADD $Z00 EACH SOFTWARE ITEM AND EACH JOYSTICK
- ADD $5.00 EACH ALL OTHER ITEMS. NO MONITORS
OR PRINTERS SHIPPED OUTSIDE U.S.A. - ITEMS ARE
SHIPPED AIR MAIL. PRICES SUBJECT TO CHANGE
WITHOUT NOTICE.
Computer Software And Accessories
2806-A S. MEMORIAL PARKWAY
HUNTSVILLE. ALABAMA 35801
VISIT OUR STORE
PRICES IN AD ARE MAIL ORDER ONLY
PHONE ORDERS
205/536-4400
(PHONE OPEN _
7 DAYS A WEEK) Jj ;
L_
900
REM** PLAY AGAIN?
910
PRINT "TO PLAY AGAIN, PRESS
ANY
KEY"
920
IF INKEY$="" THEN 9 20 ELSE 2
10
lain and Fancy Patterns, the Easy Way
Our next number pattern program will generate any of
e sequences shown in previous episodes, and lots more,
ich sequence is defined by four numbers: 'S,' 'M,' 'A'
id 'B.' 'S' is the first number in the pattern. To get the
:xt number:
1) Add 'A' to the preceding number
2) Multiply the result of Step 1 by 'M'
3) Add 'B' to the result of Step 2 in BASIC: S = N*(S
+ fi) + B
The following table shows the values of 'S,' 'M,' 'A' and
' for some of our previous patterns.
Pattern
M
B
12 14
i ,t,j,i, ...
1
1
1
2,5,8,1 1. ...
2
1
3
1,2,4,8,...
1
2
11,111,1111,...
11
10
1
32,332,3332, ...
32
10
1
2
34,334,3334, ...
34
10
-1
4
It's your turn. Show the values of 'S,' 'M,' 'A' and 'B'
r each of the following patterns.
Pattern S M A B
2,4,6,8, ...
1,3,5,7, ...
1,10,100.1000, ...
3,6,12,24,...
1,-2,4,-8, ...
99,999,9999, ...
43,433,4333, ...
98,998,9998, ...
37,337,3337, ...
12,102,1002, ...
Relax for a while. Do something physical. Jog, stretch,
ince, play tennis. Then browse through our previous
umber Patterns programs. Now, refreshed in mind and
3dy, do the next exercise.
xercise
Write the program Number Patterns which generates
itterns defined by 'S,' 'M,' 'A' and 'B.' Read their values
om DATA statements. Write DATA statements for the
itterns you want to see.
We will help you get started by showing an outline of
le program using REM statements. All you have to do
write the statements that follow each REM statement.
100 REM**NUMBER PATTERNS
200 REM**READ STARTING NUMBERS
300 REM**SHOW "LATEST 1 NUMBER
400 REM**COMPUTE NEXT NUMBER
500 REM**WHAT TO DO NEXT
900 REM**DATA: VALUES OF S,M,A,B
DragonSmoke
Our newsletter, DragonSmoke, is growing slowly. We
began in January 1985 with two pages copied on our trusty
Canon PC copy machine, then grew to eight pages in
February, 16 in March, and 20 in April. Here are two
ways to sample DragonSmoke.
copy machine, then grew to eight pages in February, 16
in March, and 20 in April. Here are two ways to sample
DragonSmoke.
— Send SI and we will send you the first four issues,
January, February, March and April.
— Or, send SI and ask for the latest issue. Our address:
DragonSmoke, P.O. Box 7627, Menlo Park, CA 94026.
DragonSmoke is a beginner's periodical covering
computers, role playing games, play-by-mail games and
tennis.
Connect your TRS-80 Color Computer
to the Outside World
Learn the simple techniques for putting your computer to
work monitoring and controlling outside devices and instru-
ments. Construct and use input and output ports, analog-
to-digital and digital-to-analog converters to control signals
using BASIC language programs. Excellent for individual or
classroom instruction.
The book, TRS-80 Color Computer Interfacing, With Experi-
ments, no. 21893, fully explains the fundamentals and
illustrates them with experiments. $14.95
The Expansion Connector Breadboard, no. CC-100,
connects directly to the computer and brings out the needed
address, data, and control bus signals. $34.95
^The Experiment Component Package, no. CC-150,
contains all of the parts needed to do the experiments in the
book. $89.95
For a limited time only, get all three for $105.00, a 25%
saving. (Or take 15% off of any individual item.) Offer expires
Nov. 15, 1985.
Virginia residents, add 4% sales tax.
Include $2.50 for shipping.
Write for our new free catalog of books, hardware, and
software on interfacing, electronics, scientific software,
and personal improvement guides. Order from:
PUTTING
HANDS
AND
MINDS
TOGETHER
*/^\
roup cJechnology, <zL>ld.
P.O. BOX 87 • CHECK. VIRGINIA 24072
Visa/Master Card accepted. 703-651-3153
TRS-80 is a trademark of Radio Shack, a Tandy Corporation.
August 1985 THE RAINBOW
141
16K
ECB
Hfdfef
RAINBOW 1
CoCo, Can You
Spare A Dime?
By Fred B. Scerbo
Rainbow Contributing Editor
Editor's Note: If you have an idea for
the "Wishing Well," submit it to Fred
c/o THE RAINBOW. Remember, keep
your ideas specific, and don 't forget that
this is BASIC. All programs resulting
from your wishes are for your use but
remain the property of the author.
By now all of you should be
familiar with the graphics power
of your Color Computer. We
have spent many articles in the past year
reviewing different graphics techniques
that will let you have fun with the
graphics commands of Color Extended
basic. We have drawn rock groups,
baseball teams and even motion picture
characters. What we have really not
done until now is use any of this
graphics magic for educational purposes.
Our educational graphics have been
limited to the CHRS found in Color
BASIC.
(Fred Scerbo is a special needs instructor
for the North Adams Public Schools.
He holds a master's in education and
published some of the first software
available for the Color Computer
through his software firm, Illustrated
Memory Banks.)
This month, we will remedy that with
the Color Change Quiz written in 16K
Color Extended BASIC. The program
can be used to help instruct youngsters
in the correct counting of coins, but best
of all, it will do so using the kind of
Hi-Res graphics you would expect from
a program costing quite a bit of money.
Computer Graphics and Education
As computers get more and more
sophisticated, we have come to expect
a great deal from them as far as high
resolution graphics are concerned. 1
remember when I first got the original
16K. Color BASIC CoCo back in the
spring of 1 98 1 and how excited everyone
got when 1 produced a low resolution
character block map of Europe for my
students. None of my students had ever
seen anything remotely like it on a
computer TV screen, and even though
the image was rather rough, most of
them got the idea of what I was trying
to present.
However, when we wish to present
something drawn on a computer screen
in graphics tod ay, we have much greater
competition to deal with. Arcade games
now explode with detailed color graph-
ics. Can we seriously expect a student
using an educational program on a
computer to be satisfied with anythii
less? Therefore, if we are going
display or simulate something on o
CoCo screen, we should be careful
make it look as close to the object
copies as possible.
Unfortunately, I have seen a numb
of graphics programs which deal wi
dollars and coins and do a very po
job of displaying the currency. Can \
expect students to make change in re
life if a computer drills them in mon
skills by using a circle with "25 cent
written inside of it?
If we are going to draw a quarte
then we should see good old Geor;
Washington right down to his pigt;
hairdo. Similarly, a dime should ha -
Roosevelt, a nickel should have Jeffe
son and a penny should be copper-n
with honest Abe Lincoln on it. Regre
tably, I have yet to see any reasonab
priced educational software offer th
kind of detail. That's why I wrote Coh
Change Quiz.
The Wish
Since I have gotten many letters froi
parents who like to use their CoCos f(
math instruction with their youngster
offering this program seemed to be tf
right idea at this time. Money handlin
142
THE RAINBOW August 1985
WLS NEST
SOFTWARE
' WE GIVE A HOOT '
TWO NEW PROGRAMS DESIGNED FOR THE 64K COLOR COMPUTER 5
LABEL64 - LABEL64 ie a name and address file/print
By stem that takes advantage of your 64K. You can deve-
lop and maintain a mailing list. Print lists or mail-
ing labels in your choice of 1, 2, or 3 wide. Sup-
ports 3 or A line addresses with phone optional. You
can aort by last name, first name, and/or zip code.
You can work with up to 300 records in memory at a time
We include a second copy for back up 'jt no additional
charge. Take advantage of your 64K with LABEL64.
Cassette - 64K EXT Postpaid $24.95
FILE64 - FILE64 is a data management system designed
to take advantage of a 64K machine. You CBn create
and maintain records on anything you choose. Recipes,
coupons, household records, financial records - you
name it. You create records containing up to five
fields you define. You can search, 6ort, modify, add,
delete, save on tape, display on the screen and print
on s printer. The program could cost you much more
and we include a back up copy at no additional charge.
Cassette - 64K EXT Postpaid $24.95
SAVE $$ Take both our LABEL64 and FILE64 for only
$40.00 Postpaid. Don't miss this special offer!
NOTE! If you already have our LABELIII or FIL'£III
program we will upgrade you to the 64K version for
only $10.00. Upgrade both for only $15.00. It is
not necessary to return your old programs. Simply
send your invoice number with your request.
ALCATRAZ ADVENTURE 6ur newest and we think most in-
volved adventure. You nave been unjustly imprisioned
and sentenced to death. You must escape to prove
your innocence. You will face many unique problems
as you work on your goal. If you liked our BASHAN
adventure you will love ALCATRAZ. Your adventure
contains a large vocabulary and some unique features.
This is a tough one recommended for advanced players.
32K EXT Postpaid Disk $20.95 Cassette $17.95
CUBE ADVENTURE - Cube is a non violent adventure for
a minimum 16K EXT system. You must lobate and enter
the "CUBE" gathering treasures along the way. You
will encounter some unique problems aa you work on
your goal. CUBE is an intermediate to hard adven-
ture suitable for everyone.
16K EXT postpaid Disk $20.95 Cassette $17.95
GOOD NEWS FOR OUR FRIENDS FROM DOWN UNDER!
We are pleased to announce that our customers in Aus-
trailia can now purchase our programs from our Austra-
lian distributor. This will avoid long shipping
delays. Remit in Australian DollarB to COMPUTER HUT
SOFTWARE 21 WILLIAMS St. B0WEN QLD. 4805 Phone (077)
862220
GOOD NEWS FOR OUR FRIENDS FROM UP NORTH!
Now our friends from Canada can purchase our progrsms
direct from our Canadian distributor. Remit in
Canadian dollars to KELLY SOFTWARE DIST. LTD.
P.O. Box 11932 EDMONTON, ALBERTA T5J 3L1 (403)
421-8003
NOW LABELIII IS AVAILABLE ON DISK!
LABELIII - (Reviewed in Nov 83 Rainbow) With LABELIII
you can develop and maintain a mailing li8t. Print lists
or mailing labels in your choice of 1, 2, or 3 wide.
Supports 3 or 4 line addresses with phone optional.
Sort by last name, firat name or zip code.
16K EXT Postpaid DiBk $21.95 Cassette $19.95
FILEIII - Data management Bystem. With FILEII1 you
can create and maintain recordB on anything you choose.
RecipeB, coupons, household records, financial records -
you name it. You create records containing up to five
fields that you define. You can search, sort, add,
delete, modify, di spiny on the screen or send to a
printer. The program is user friendly and user proof.
Prompting is extensive. A comparable program could
cost you much more. This one is a baroain!
16K EXT Postpaid Disk $21.95 Caaaette $19.95
PROGRAM FILE - (rev Oct 83 Rainbow) Organize your
programs. With PROGRAM FILE you create a file of your
computer programs. You can search, aort, add, modify,
delete, save to tape and display on the screen or
aend to a printer.
16K EXT Postpaid Disk $16.95 Cassette $14.95
DATA MANAGEMENT PACKAGE - Save $$ Take the three above
on disk or tape (specify) for only $40.00 Postpaid
ESPIONAGE ISLAND ADVENTURE - (reviewed in June 84 Rain-
bow) You have been dropped off on an island by submarine,
You must recover a top secret microfilm and signal the
Bub to pick you up. Problems abound in this 32K EXT
adventure.
32K EXT Postpaid DiBk $20.95 Cassette $17.95
FOUR MILE ISLAND - You are trapped in a disabled nuclear
paver plant. The reactor is running away. You must
bring the reactor to a cold shutdown and prevent the
"China Syndrome". Can you save the plant (and your-
ae.lf)? It's not eaBy!
16K EXT Postpaid Disk $20.95 Cassette $17.95
KINGDOM OF BASHAN - Our flagship adventure. Baahan has
a very large vocabulary and some unique features. You
must enter BASHAN (not eaay), gather the ten treaeuree
of the ancient kingdom (oven harder) and return to the
starting point (harder yet). If you can acore the
maximum 200 point b in BASHAN you are an expert!
32K EXT Postpaid Diak $20.95 Cassette $17.95
ADVENTURE COMBO Save $$ The three above adventures on
three cassettes or one disk (specify) postpaid for only
$40.00
ATLANTIS ADVENTURE - This one is not easy - in fact
we challenge you to complete it in 30 days. If you do
we will send you any adventure we sell - poatpaid - at
absolutely no charge. You start on a dissbled sub
nes:r the lost city of Atlantis. You must get the sub
(and yourself) safely to the aurface. Do you think
Atlantians are friendly?
Postpaid 32K [XT Disk $24.95 16K EXT Csssette $21.95
ADVENTURE STARTER - Lesrn to play those adventures the
painless way. You start with an easy adventure and
move to an intermediate. Two complete seperate non
violent adventures plus hints and tips on adventuring
in general. Finish this and you will be ready for
ATLANTIS!
Cassette - 16K EXT Postpaid $17.95
C.O.D. orders please add 1 .50
No Delay For Personal Checks
In a Hurry? Call (61 5) 238-9458
OWLS NEST SOFTWARE
P. O. BOX 579
OOLTEWAH. TN 37363
VISA'
PP* 1
Sample Graphics
-<n i >-?i_
_n i rry.
U/? bw uU yA i ©
(S?|
w
IP?*
^2#
i <r c. .•' i JL s- v_ .■ I L
II > Z^ V n> ^_n if it
*i v- /H i'jv Ai v ,rl i-a- i
1m 1 * I > 'A. 1 IIJ>
*w - IW
m
ill!
yj
'""""""
I
hjijHi;i}i|
liiiiiiiiiiii
!!!!!!!!!!!!!
I I
• I
I I
liiiiiiiiiiii
One-Liner Contest Winner . . .
This "pixel-blaster" program loads any standard
Hi-Res (PMDDE 4) picture file from disk and then
converts the whole picture to either red or cyan,
depending on whether you select odd or even aliasing
and the reset state of the CoCo. You can then re-
save the file on disk.
For use with cassette systems, change LOflDM to
CLOADM, SAVE to CSAVEM and change the SRVEM
addresses to S.HG00,&H1DFF,S,HR027.
The listing:
£ CLS: INPUT "PICTURE" ;F$ : INPUT"EV
EN (1) OR ODD (2) ALAISING" ; A: PM
ODE4 , 1 : PCLS : SCREEN1 , 1 : LOADMF$ : FO
RI=A T0256STEP2: LINE (1,0) -(1,192
) , PRESET : NEXT : F0RD=1T03 j3,0j3 : NEXT :
INPUT"RESAVE IT (Y/N) " ; A$ : CLS : IF
LEFT$ (A$ , 1) ="Y"THENSAVEM F$ , &HE0
j3,&H25FF,&HA£52 7
Scott Bain
San Diego, CA
(For this winning one-liner conies! entry, (he aulhor has been senl copies
of both The Rainbow Book Of Simulations and its companion Rainbow
Simulations Tape:)
i"V'T
is a skill everyone needs to master
order to survive, so having an easy-
use program for the CoCo on t
subject was a desirable wish for me
readers.
Other suggestions that have come
included ways to have students nu
the correct correlation between a digi
clock and the type with two han
These ideas slowly jell to form a w
from month to month. In this case. 1
change skills seemed to be a good roi
to follow.
The Program
Color Change Quiz starts off with c
now typical title card using the CH
blocks. I have found that these ma
quick and colorful title screens becai
they allow the use of a totally bla
background. Since we have to inclu
instructions or prompts to make t
program run the way we wish, as w
as our credits and copyright symbo
staying in the text mode saves us t
difficulty of redrawing our alphabet
the graphics mode.
Also, INPUT statements would n
work in graphics; we would have to i
the INKEYS function instead. To put
all into a nutshell: Why go to all th
THE TIME MACHINE!
Stop wasting time on that cassette or single-
drive system. You can afford Polygon's disk
systems featuring Teac Vz height, 40 track
drives that are fast, quiet, and use less power.
With complete systems you get J&M Systems'
controller with gold-edge connectors, the
latest circuitry and reliable design. For 100%
compatability. The controller is supplied with
RSDOS assuring easy, trouble-free operation
with all commercial software.
Drive(s) w.
Case/Pwr Supply
Systems w/
Controller/DOS
No. of Drives
Teac Sgl Sided
Teac Dbl Sided
One
S159
S279
Two
S229
S339
One
S239
S279
Two
S319
S429
Drives are pre-tested and ready to plug in
and use. Options available are ADOS in ROM,
JFD-CP controller w/printer port, HDS dual
ROM controller. Horizontal case, etc. call for
details.
C£3 POLYGON COMPUTERS
k -— * 1 316 Wilshlre Blvd., Suite 206
Los Angeles, CA 90017
(213)483-8388
Ca. Res. 6'A% tax Shipping: S2 Software
Visit our Retail Store Charges: SS Hardware
144
THE RAINBOW August 1985
^
rouble when the text mode will let us
lo it attractively and efficiently? Case
:losed.
The actual coins in our program are
imited to quarters, dimes, nickels and
>ennies. I have left out the half-dollar
or two reasons: Few people use half-
lollars nowadays, and drawing a half-
lollar on the screen would take up too
nuch space, allowing for the use of
ewer coins on the screen at one time.
\lso, if 1 were to take up the space using
i half-dollar, the next logical step would
>e to draw a Susan B. Anthony dollar
ince it is smaller than a half-dollar. The
nain purpose of this program is to be
unctional.
The coins are created using a com-
>ination of DRAW and CIRCLE com-
nands. 1 have taken great pains to make
he characters on the coins look as much
ike the actual coins' figures as possible.
I did not go into as much detail on
he penny. You will see a shadowy
mage of Lincoln, but you will have no
lifficulty recognizing the coin as a
>enny.)
Each of the coin graphics is stored
in a graphics array using the GET
command. When we want to draw a
given coin, we simply PUT the approp-
riate array where we want it. The
selection of coins displayed is determined
by a selection of random numbers.
Running the Program
When you run the program, you will
be asked to select the number of coins
to be displayed. The maximum number
of coins is 15, but you can display as
little as one coin. The screen will go
blank and then display a title card
asking you to select the red-colored
letter. You must select either 'A' or 'B.'
This determines our color-set and helps
insure that our pennies are red, not blue.
Next, our screen will display our
coins starting in the upper left-hand
corner. The lower left-hand corner will
show a box with three spaces ($0.00).
Above the space farthest to the left will
appear an arrow. Let's say the total for
the coins on the screen is $.30; then the
first digit you must enter is '0' for the
dollar's place. It must be entered as
$0.30 instead of $.30.
If at any point you enter an incorrect
digit, pressing the backspace arrow will
correct the error. When the final digit
is entered, the screen will indicate if the
answer was correct or wrong. If the
answer is wrong, you may not continue
until you enter the correct answer.
The program will keep displaying sets
of coins for you to add until you press
the '@' key. Then, a "scorecard" will
appear with the number wrong, the
number correct, your percentage and
the prompt for trying again ('Y' or 'N').
That's all it takes to run the program.
Try Color Change Quiz if only to see
the graphics it draws. You will find it
is very useful to any youngster trying
to learn about coin mathematics. Best
of all, it will teach these skills in a way
which graphically represents exactly
how these coins appear in the real
world. After all, isn't that what a
computer program should do?
f
..
\ 140 .. .
...205
280
...174
400 .. .
...147
540 ...
....24
670
...195
870
...189
950 .. .
...246
END
11
10
• *
20
i *
30
• *
40
I *
50
• *
60
• *
The listing: CHNGQU I z
COLOR CHANGE QUIZ *
BY FRED B. SCERBO *
COPYRIGHT (C) 1985 *
149 BARBOUR ST . N . ADAMS , MA*
*****************************
70 SCREEN0,0:CLS0:FORI=0TO64STEP
3 2 : FORY=10 62TO1080 : READA : POKEI+Y
,A+128:NEXTY,I
80 FORI=0TO64STEP32:FORY=1156TO1
179: READA : POKEI+Y , A+12 8 : NEXTY , I :
FORI=0TO64STEP32:FORY=1256TO1270
: READA : POKEI+Y , A+128 : NEXTY , I
90 DATA63, 60, 60, ,63,60,63, ,63,48
,48, ,63,60,63, ,63,60,63
100 DATA127, 112, 112, ,127,112,127
, ,127,112,112, ,127,112,127, ,127,
125,114
110 DATA44, 44, 44, ,44,44,44, ,44,4
4,44, ,44,44,44, ,44,32,44
120 DATA95, 92, 92, ,95,80,95, ,87,9
2, 91,, 95, 91, 80, 95,, 95, 92, 92,, 95,
92,92
130 DATA95, 80, 80, ,95,92,95, ,95,9
2, 95, ,95, 84, 91, 95, ,95,84,95, ,95,
92,92
140 DATA92, 92, 92, ,92,80,92, ,92,8
0,92, ,92,80,84,92, ,92,92,92, ,92,
92,92
150 DATA47, 44, 47, ,47,32,47, ,36,4
7,40, ,44,44,47
160 DATA47, 33, 47, ,47,32,47, ,32,4
7,32, ,35,44,32
170 DATA44, 44, 46, ,44,44,44, ,36,4
4 40 44 44 44
180 DIM D(55) ,P(55) ,N(55) ,Q(55) ,
A(8) ,CV(4) ,TV(10) ,N$(10) ,CS(15) ,
PS(15)
190 DATA BL2L3H2U7E2R3F2D7G2,BLL
6R3U11LGD,NU2L7U3E2R3E2U2H2L3G2D
2,BH4BL3D2F2R3E2U3H2NL2EU2HL3GD,
L3R2U11LG5D2R8 , BL7BU2F2R3E2U3H2L
3G2U6R7D2 , BU10BLHL3G2D7F2R3E2U3H
2L3G2 , BL6E6U5L7D3 , BU2G2L3H2U3E2H
U2ER3FD2GNL3F2D3 , BL5NHR3E2U7H2L3
G2D3F2R3E2
200 FORI=0TO9:READN$(I) :NEXT
210 JK(1)=100:JK(2)=10:JK(3)=1
BY FRED B.
COPYRIGHT (
220 PRINT@352,"
SCERBO": PRINT"
C) 1985"
230 R=5:PRINT@416," ENTER NUMBER
OF COINS (MAX. 15) ": PRINT: PRINT@
August 1985 THE RAINBOW 145
4 60,""; : INPUT QW:IF QW>15THEN2 30
ELSE IF QW=0 THEN 230
240 T=1:IF QW>5THENDL=2
250 IF QW>10 THEN DL=3
260 GOTO270
270 PM0DE4,1:PCLS1:SCREEN1,1
280 CV(1)=1:CV(2)=5:CV(3)=10:CV(
4)=25
290 PM0DE3,1
300 F0RI=1T03:DRAW"S16BM"+STR$(I
+84)+",136C7U3NR4U2END6R2ND6FD5B
R12C6U6RND6R2FDGNL2RFDGL3 " : NEXTI
310 DRAW"S12BM3 6,50C1U6R3FDGNL3B
D3BR3U6R3FDGL3R2F2DBR3NR3U3NR2U3
R3BR3BD6R3U3L3U3R3BR3BD6R3U3L3U3
R3BR2"
320 DRAWBD6BR16U6L2R4BR3D6U3R4U
3D6BR3NR3U3NR2U3R3"
330 DRAW"BM27,88U6R3FDGL3R2F2DBR
3NR3U3NR2U3R3BR3ND6R2F2D2G2L2BR1
8NU6R3BR3NR3U3NR2U3R3BR3R2ND6R2B
R3R2ND6R2BR3NR3D3NR2D3R3BR3U6R3F
DGL3R2F2D"
340 X$=INKEY$ : IFX$="A"THEN350ELS
EIFX$="B"THEN3 60ELSE340
3 50 L=7:GOTO370
3 60 L=6
370 CLS0 : PM0DE4 , 1 : PCLS1 : SCREEN0 ,
Canadians
Our summer 1985
Catalog is now ready.
Send for your FREE copy
KELLYNEWS
SUMMER 05
Kellynews Vol-2 is now available and contains
news, hints, programs and articles from the
crew at Kelly Software. We are Canada's
largest national distributors of Color
Computer products and we stock all of the
largest games, utilities, simulations and
business programs. We encourage all Canadian
Color Computer owners and dealers to send for
our free catalog.
Kelly Software Distributors Ltd.
P.O. Box 11932
Edmonton. Alberta
T5J 3L1 Telephone: (403) 421-8003
1
380 CIRCLE ( 40 ,4j3) ,14,0, .9
390 DRAW"S4C0BM48,44NG5U3EU4HULH
2L2HL5GLGDGD2FG2DRD2NR3D2FR2FRFD
RFRBU6GLREBU2REU2HL2BL3BDNL2NGHL
HLBU4R4BFGBGF"
400 CIRCLE (40, 40) ,12,0, .9,. 4, .2
410 GET(16,18)-(64,62) ,D,G:PCLS1
420 CIRCLE(80,40) ,16,0, .9:PAINT(
80 , 40 ) , , : PMODE3 , 1 : PAINT (80 , 40 )
, L, 8 : PM0DE4 , 1 : SCREEN0 , 1 : CIRCLE ( 8
0,40) ,16,0, .9: CIRCLE (81, 40) ,16,0
,.9,. 6, .3
430 LINE(60,26)-(100,54) ,PSET,B:
CIRCLE (80, 40) ,14,0, .9,. 15, . 4 : CIR
CLE (80, 40) ,14,0, .9,-65, .9
440 FORI=70TO71:DRAW"C0BM"+STR$(
I) +" , 46UE3UBRNF2BLUE2UHU2HR2E2UR
BRR2FRFRDR2D2G4F2DRBL4F6BL4NH3BL
4NH4BU11U2R3BD2DBD5BR4NR4BL8BU4L
3NU2BL3BD2L5":NEXT
450 GET(56,18)-(104,62) ,P,G
460 FORI=0TO1: CIRCLE (135, 40) ,20+
1,0, .8:NEXTI
470 COLOR1,0: LINE (110, 24) -(160,5
6) ,PSET,B
480 FORI=17T019STEP2: CIRCLE (135,
40) ,1,0, .8, .4, .7:CIRCLE(13 5,40) ,
1,0, .8, .9, .1:NEXT
490 DRAW"C0BM125,52U2ENR3U2E3R3E
R6FD2FD2FD2BR3U2HU2HU2NL4U3L3D3R
3U3E2UEUHU2HU2HLHL12GLGD2NR3GDNF
2FDG2DNR3R2DGDNR3GF2R2"
500 FORI=2T06STEP4 : CIRCLE (13 6,34
) ,1,0,1.3, .2, .5:NEXT
510 CIRCLE (13 8, 50) ,6,0, .7, .5, .8
520 GET(111,18)-(159,62) ,N,G
530 FORI=20TO22: CIRCLE (200 ,40) ,1
,0,. 9,. 6,. 9: CIRCLE (200, 40), 1,0,.
9, .2, .3:NEXTI
540 C0L0R1 , : FORI=180TO2 10STEP5 :
LINE (I, 20) -(1+2,90) , PSET, BF:NEXT
I
550 FORI=0TO1: CIRCLE (200, 40) ,2 4+
1,0, .9:NEXT
560 CIRCLE (200, 40) ,19,0, .9, .15, .
35
570 DRAW"C0BM212,52U2LU2H2U2H2R2
F3D2RD3BL4BU8R2E2U2HL2HL2H2L2GDB
R8U3HU2H2UHUL11GLGLDLD2LDLDBRF2B
DG3DR3LD2NR2D2F2R2FD3G3DGBR8BU9N
E4BL11BD2L4BH2R7BR7BU10H2NLBD2D"
580 GET(176,18)-(224,62) ,Q,G
590 GOTO640
600 PUT(C,D) -(C+48,D+44) ,P,PSET:
RETURN
610 PUT(C,D)-(C+48,D+44) ,N,PSET:
RETURN
620 PUT(C,D)-(C+48,D+44) ,D,PSET:
146
THE RAINBOW August 1985
V.
RETURN
630 PUT(C,D)-(C+48,D+44) ,Q,PSET:
RETURN
640 PMODE4,l:PCLS5:SCREENl,l
650 KC=0:PMODE3,1
660 HL=RND(30) :IF HL<27 THEN 680
670 FOR RT=1T0QW:CS(RT)=HL-2 6:NE
XTRT:GOTO690
680 FOR RT=1T0QW:CS(RT)=RND(4) : :
NEXTRT
690 SR=0
700 FOR RT=lTOQW-l:IF CS (RT) <CS (
RT+1)THEN720
710 NEXT RT:IF SR=1THEN690ELSE73
720 TEM=CS(RT) : CS (RT) =CS (RT+1) :C
S (RT+1) =TEM: SR=1 :GOTO710
730 D=0:JC=0:FORY=1TO DL:C=2:FOR
I=T TO R:JC=JC+1
740 F=CS(JC)
750 TV=TV+CV(F) :KC=KC+1
760 IF F=1THENGOSUB600ELSEIF F=2
THENGOSUB610ELSEIF F=3THENGOSUB6
20ELSEIF F=4THENGOSUB630
770 C=C+50:IF KC=QW THEN800
780 NEXTI
790 D=D+44:NEXTY
800 COLOR8, 6: LINE (0,144) -(142,18
2) , PRESET, BF
810 FORK=0TO80STEP40:LINE(32+K,1
48)-(56+K,178) , PSET, BF :NEXTK
820 DRAW"C5S4BM62,178U3R2D3"
830 COLOR7,5:LINE(0,144)-(142,18
2) , PRESET, B
840 DRAW"S8BM10,170C8FRND3NU12R2
ND3NU12REU3HL5U3ER4F"
850 PV=1:FORK=0TO80STEP40:DRAW"B
M"+STR$(K+44)+",140C7NU6NH2E2L3"
860 X$=INKEY$:IFX$=CHR$(8)THEN95
0ELSEIFX$="@"THEN970ELSEIFX$=""T
HEN8 60
870 KP=ASC(X$) :IFKP<48THEN860ELS
EIFKP>57THEN860
880 KP=KP-48 : DRAW"BM"+STR$ (K+51)
+" , 174C7"+N$ (KP) +"BM"+STR$ (K+44)
+" , 140C8NU6NH2E2L3"
890 AV=AV+KP*(JK(PV) ) :PV=PV+1:NE
XTK
900 IF AVOTV THEN940
910 NR=NR+1 : DRAWS16BM153 , 173C7H
U3ERFBD3GNLBR3HU3ERFD3GNLBR2U5R2
FDGNL2FDBRU5R2FDGNL2FDBRU5NR3D2N
R3D3R3BR2HU3ERFBD3GNLBR3U5L2R4" :
SOUND200,4
920 FOR P=1TO1000:NEXT P
930 GOTO960
940 NW=NW+1:F0R BQ=1T03 : PM0DE4 , 1
: SCREEN1 , : S0UND19 , 5 : PM0DE4 , 1 : SC
REEN1,1:S0UND1,5:PM0DE3, 1 : NEXT B
Q : AV=0 : KP=0 : GOTO800
950 DRAW ,I BM"+STR$ (K+44) +" , 140C4N
U6NH2E2L3 " : AV=0 : KP=0 : GOTO800
9 60 AV=0:C=0:D=0:TV=0:GOTO640
970 PMODE4,1:PCLS1:CLS0:FORI=102
4T0153 5 : POKEI ,32: NEXTI : SCREEN0 ,
: PRINT@101, "number" ; : PRINT@165 , "
number" ; : PRINT @ 108 , "right" ; : PRIN
T@172, "wrong";
980 NW$=STR$(NW) :NR$=STR$(NR) :Q=
LEN (NR$) : F0RI=1T0Q : W=ASC (MID$ (NR
$,1,1) ) :POKE1142+I-Q,W:NEXTI:Q=L
EN(NW$) :F0RI=1T0Q:W=ASC(MID$(NW$
,1,1)) :POKE1206+I-Q,W:NEXTI
990 SCREEN0,0:J=NR+NW:IF J=0 THE
N J=l
1000 SC=INT(NR/J*100) :PRINT@229,
"your" ; : PRINT§234 , "score" ;
1010 NR$=STR$(SC)+"%":Q=LEN(NR$)
: F0RI=1T0Q : W=ASC (MID$ (NR$ ,1,1)):
P0KE1271+I-Q,W: NEXTI
1020 PRINT@293, "another"; :PRINT@
301, "try"; :PRINT§306, "y" ; : PRINT©
308, "or" ; :PRINT§311, l, n";
1J330 X$=INKEY$:IF X$="Y" THEN RU
N ELSE IF X$="N" THEN CLS.-END EL
SE 1030
£ TAKE A BYTE V^/~)
Finally! A Nutritional Content Program
For The Health Conscious.
The Program:
• Calculates ideal weight and calorie requirements
based on your personal data.
• Calculates calorie, carbohydrate, tat, protein, vit-
amin and mineral intake.
• Graphic plotting of your weight and comparison to
medical standards.
• Create your own recipes from foods on file and
enter recipes into food file for future reference.
• Allows addition of new food items to food file.
Requires 64K Coco w/Disc Drive
Ages 25-50 Women4'8"-5'10" — ,^
Men5'1"-6'3" Homesoft I I
ONLY $24.95 until Aug., then $29.95
:0
NUTRIGUIDES(S)at
Please send me
$24.95 each (if mailed by Aug. 1, 1985).
□ VISA Q MC#
Ex. Date Bank*
Name (print)
Address
City
(MO
State
-Zip
Signed
Mail to Homesott. P O Box 607, Baker, LA 70704-0607
Allow 4 to 6 weeks for delivery
^
August 1985 THE RAINBOW 147
The Rainy
Day Account
By Steve Bly
Rainbow Contributing Edito
You are never too young to learn
the value of saving your money.
One never knows when a rainy
day emergency may come along. Sim-
ilarly, one never knows when that big
ticket item that you have been wanting
for so long finally goes on sale.
Many school systems throughout the
country have banking programs for
elementary school age children. This
helps to reinforce the importance of
saving.
Parents and grandparents often open
accounts for youngsters. This may
represent a substantial amount of
money. The child should not necessarily
be aware of this account. We can,
however, easily open a small account
with the child for the purposes of
instruction as well as savings. This
(Steve Blyn teaches both exceptional
and gifted children, holds two master's
degrees and has won awards for the
design of programs to aid the handi-
capped. He and his wife, Cheryl, own
Computer Island.)
account can help instill positive values
and experiences into the child's
environment.
A larger than life approach is often
quite successful with younger children.
This implies making a big deal out of
what is often commonplace to us.
Visiting a bank and signing your name
"This month's program
illustrates a simple
hank account book that
shows deposits and
withdrawals. "
to an application for an account is a
big deal to many youngsters. (Signing
for your first library card is in the
category of important events.)
This month's program illustrates a
simple bank account book that shows
deposits and withdrawals. The child's
task is to compute his balance after each
transaction.
The child should first be familiarize
by an adult with the meaning of tl
key words. They are withdrawa
deposit and balance. These words m<
be likened to positive and negati'
numbers if this is appropriate for yoi
children. A deposit of S5.00 is simili
to +5 and a withdrawal of S3. 00
similar to -3.
The balance would be +2, which
the sum of these two signed number
An introduction to signed numbers ca
be approached in this manner. Son
children find this approach easy t
understand; others would be bettt
served by using play money to figui
out each transaction in a tangibl
manner.
The reasons we use a bank for oi
savings should also be discussec
Mention of the safety factor and th
interest that may be earned can b
explained by the adult. Children wi
not initially believe that withdrawal
can be made at any time. The fact tha
the money is still his even though it i
in the bank should be stressed.
148
THE RAINBOW August 1985
#f
200 249
END
.63
The listing: BANKACCT
10 REM" BANK ACCOUNTS"
20 REM"STEVE BLYN , COMPUTER ISLAN
D, NY, 1985
30 CLS: PRINT "WHAT IS YOUR NAME";
40 INPUT NA$
50 N$=LEFT$(NA$,10)
60 FOR N=l TO 10
70 B=5j3
80 READ A$(N) : NEXT N
90 CLS
100 PRINT@0,N$;" 'S BANK ACCOUNT"
110 PRINT STRING$(32,255) ;
120 PRINT" DATE WITHDRAWAL DEPOS
IT BALANCE" ;
130 PRINT"
50
140 PRINT"01/01
50"
150 FORR=1TO10:PRINT@160+T,A$(R)
160 T=T+32
170 NEXT R
180 DATA 01/25,02/10,03/016,04/14
,05/22,07/15,09/30,10/19,11/08,1
2/17
190 FOR T=l TO lj3
200 D=RND(20)
210 R=RND(4)
2 20 W=0
2 30 IF R=4 THEN W=RND (20) : D=0
240 PRINT§168+L,W;
250 PRINT@178+L,D;
2 60 PRINT© 18 5+L,"";
2 70 INPUT G
280 B=B+D-W
290 IF G=B THEN PRINT@492 , "CORRE
CT ••; :PRINT@185+L," ";:SOUND14
0,3: SOUND150 , 3 : CT=CT+1
300 IF GOB THEN PRINT§492 , "SORR
Y" ; B ; : PRINT@ 18 6+L , B : SOUND10 , 5
310 L=L+32
3 20 PRINT@2 6,"*=";CT;
3 30 NEXT T
340 SOUND200,5:PRINT§483,"PRESS
ENTER TO GO AGAIN.";
3 50 EN$=INKEY$
3 60 IF EN$=CHR$(13) THEN RUN ELS
E 350
S2\
nnnnn
nnnnn
>■■■ ■
nnnnn
nnnnn
3QQDPQ]uaras
COLOR COMPUTERS
CALL TOLL FREE 1 -800-248-3823
COMPUTERS
COMPUTERS
LIST OUR
PRICE PRICE
26-3136 16K Extended Color Computer 2 $ 159.95 S 130.00
26-3127 64K Extended Color Computet 2 219.95 169.00
26-3129 Disk Drive for Color Computer 349.95 290.00
26-3130 Disk Drive 1 for Drive 199.95 169.00
26-1276 DMP-105 80 cps Dot Matrix 199.95 169.00
Telewriter 64 Tape 49.95 42.00
Telewriter 64 Disk 59.95 49.00
VIP Writer 69.95 59.00
LIST OUR
PRICE PRICE
26-1069 Model 4 Desktop 64K S 1299.00 S 945.00
25-1000 Tandy 1000 1 Dr. 128K 999.00 795.00
25-3000 Tandy 1200 10 Meg H.D. 256K 1999.00 1525.00
26-5 1 03 Tandy 2000 2 Dr. 256K 2499.00 1 225.00
26-5104 Tandy 2000 1 Dr. 10 Meg H.D. 256K .... 3950.00 1885.00
26-3860 Tandy Portable 200 24 K 999.00 725.00
26-1 208 CCR 81 Tape Recorder 59.95 50.00
26-1209 CCR 82 Tape Recorder 49.95 42.00
SOFTWARE
PRINTERS
LIST OUR
PRICE PRICE
VIP Database ...$ 59.95$ 49.00
VIP Terminal Disk 49.95 45.00
VIP Integrated Library 149.95 139.00
RADIO SHACK Software — 15% Off
Tom Mix Software CALL
Comrex SS/DD 10 Pack Disks 2100 '4.00
LIST OUR
PRICE PRICE
Epson LX-80 Printer (Friction Feed) $ 299.00 S 250.00
Epson LX-80 Tractor Feed 49.95 40.00
OKIDATA 182 Printer 299.00 245.00
STAR SG-10 Printer 299.00 265 00
C.ITOH 7500 Prownter Printer 289.00 225.00
Botek Serial to Parallel Interface 59 00 49 00
MONITORS
ACCESSORIES
LIST OUR
PRICE PRICE
Comrex 12" Green Monitor $ 119.00 S 95 00
Comrex 12" Amber Monitor 1 29.95 1 10.00
Comrex 13" Color Monitor 329.95 285.00
Amdex 300A Monitor 199.95 155.00
Teknika RGB/Composite Color Monitor 399.00 299.00
VIDEO Plus Monitor Adaptor 32.00
LIST
PRICE
..$ 39.95
69.95
19.95
29 95
59.95
Anchor-Signalman Modem 300/1200 Baud 399.00
26-3018 Extended Basic Kit
26-3017 64K Memory Kit
26-3008 Joysticks (PAIR)
26-3012 Deluxe Joystick (EACH)
26-1178 DCM-3 Direct Connect Modem .
ana oilcfa "i.if Do cnangcO O" Witnaiowi Ailooul noiici
.til Do lutwct to 10% unlocking IW Dolocti.e ilom* ieou«
in COD AtoplcO (iM)OO cnaigi; per caHOO on C O D dill lor lurllH'
' OW IOi B •/ A fJumhei Poton* roliiinmg ttc'itpr, n. tollfOtl lo ploOuCI ■!>
COD !
liability
1 ?V AX .100 D* All
OUR
PRICE
5 37.00
59.00
16.95
2500
50.00
275.00
PERRY COMPUTERS • 124 SOUTH MAIN STREET • PERRY, Ml 48872
_
EDUCATION OVERVIEW
Integrating Computers
Into Classroom Instruction
By Michael Plog, Ph.D.
Rainbow Contributing Editor
When educators speak of com-
puter uses in schools, they
generally think of computer
assisted instruction (CAI) or computer
management of instruction (CMI).
When used as CMI, the computer may
never be touched by students, but used
as a recording device by teachers. Some
teachers have even written programs to
calculate grades and print report cards.
When used as CAI, students usually
have direct access to the computer. If
students are sitting at a computer
keyboard, they are generally learning
something through the electronic me-
dium. The computer is transformed into
a smart workbook. Student responses
are used by the program to determine
what problems to present next, or what
to assign the student.
In math classes, for example, students
are practicing addition facts in front of
a screen instead of using paper and
pencil. Sometimes the computer lesson
presents new facts to students instead
of drilling on facts already learned.
There is nothing wrong with this type
of computer use in schools. Such
learning can be very helpful for students
by using the computer to drill or even
(Michael Plog received his Ph.D. degree
from the University of Illinois. He has
taught social studies in high school,
worked in a central office of a school
district, and currently is employed at
the Illinois State Board of Education.)
introduce material, and no one would
doubt the benefits of having the
computer perform calculations for
teachers.
In neither case, however, is the
computer fully integrated into a lesson.
Most CAI deals with lower order
learning skills, such as practice, drill,
etc. Some simulations attempt to deal
with higher order thinking skills, such
as synthesis, analysis of knowledge and
testing hypotheses generated by stu-
dents. This month, I would like to
present a different type of classroom
computer use, and ask your assistance
about such suggestions.
For lack of a better term, we are
calling this use of the computer "inte-
grating with the lesson. "This means the
computer is used in a unit of study in
various places to help students with
higher order learning skills.
For example, let us consider a social
studies lesson. (This example is pre-
sented only because I taught social
studies, and am not all that familiar
with other subject areas.) Intentionally,
the lesson is one of the dullest I can
think of: a civics or government lesson
about local elections. The class is to be
divided into several groups, each group
attending to a single campaign.
The purpose of the lesson will be to
have students learn about local election
processes, understand factors that
influence local campaigns, and conduct
an analysis of election victories and
losses. The class will not be spendin
full time every day on the lesson, bi
will be dealing with other activitie
associated with local democratic pre
cesses. This class activity will take a fc
months to be completed.
The role of the teacher in this lesso
is to coordinate and guide studer
activities. The teacher will do very littl
lecturing, but spend most of the tim
working with the groups of student!
The activities done by the students ar
the key part of this lesson, includin
their use of the computer.
Each group of students will have t
write letters to tne candidates in th
various races being examined. Th
letters will explain what the class i
doing, ask for interviews with th
candidates, and ask for updates on new
releases and public appearances. Th
letters do not have to be the same fror
each group, but all groups should b
aware of other letters. A word processin
package should be used to write th
letters.
Throughout the campaign, eacl
group of students should identify a
many issues as possible discussed b;
each candidate. The position of eacl
candidate on every issue should b
recorded. A database package or won
processing package could be used t<
store issues and positions. This file wil
need updating often, as candidate
make speeches, public appearances anc
news releases come out.
150
THE RAINBOW August 1985
The students should keep a record
'f each candidate's appearance before
ivic groups, presentations before
■ublic bodies, news conferences, etc.
One important learning activity for
he class would be to conduct a pre-
lection public opinion poll of the races
■eing examined. There could be three
■r four such polls during the campaign.
lach group would contribute questions
o the poll, but there should be one poll
rom the entire class.
The poll could be taken of students
n the school and their parents (not just
n the civics class). Results of polls
hould be released to candidates and
he newspapers — with an explanation
hat the results are unscientific and
robably not accurate in predicting the
inal vote.
A spreadsheet or database package
ould be used to store the poll results.
V BASIC program could be written
possibly by students in the computer
lass, not the students in the civics class)
o calculate frequencies and percentages
if responses to questions. If preferred,
spreadsheet package could be used
o calculate frequencies and percentages,
lome of the graphics packages available
■n the market would be an excellent
/ay of obtaining figures and charts of
he poll results. Naturally, a word
processing package would be used to
/rite the results of the poll.
After the election, students could
■btain voting results by precinct for all
aces studied in the class. Precinct
esults can be stored on a spreadsheet
>r database. Comparisons of actual
esults with the pre-election polls could
>e made to determine how close the
ample matched the final vote. The
Tecinct results have greater use for
nalysis of the election, which is the
airpose of the whole exercise.
Students can compare all races
xamined by the groups of the class to
se what patterns exist. Each group
/ould have to share its files with all
ther groups. In order to provide an
nalysis of the elections, the teacher
lay want to direct the classroom to
ositions on issues held by candidates,
leakingengagements, editorial support
om news media and even precinct
Dting patterns. A BASIC program or
ord processing package can be used
) merge important information from
le various files created by the students.
Throughout this entire exercise,
tudents are not taught anything about
he computer itself; they never sit down
in front of a keyboard for a lesson. The
computer is integrated into the lesson,
which would be impossible to complete
in the same way without electronic
assistance. Some students might learn
how to type during the unit on local
elections; some will learn their way
around a database package; some will
discover previously unknown secrets of
a spreadsheet program; and some may
never turn on the computer. Someone
in each group will have to operate the
computer: store and retrieve informa-
tion, type reports and put pieces of data
together in a coherent form. That does
not mean all members of the group will
have to be turned into computer
operators.
The role of the computer is to
organize information needed by the
students in order to solve problems and
assist with higher order thinking skills.
In the truest sense of the term, the
computer is a classroom tool, very
similar to a 16mm movie projector or
card catalog in the library. Students are
never assigned a computer task for the
purpose of that task itself, but only to
help them in a learning experience.
After all, the purpose of this lesson
is not to learn about commercial
packages or BASIC programming; it is
to learn about local elections. Without
the electronic aid, students would have
a much more difficult time sifting
through the information on hand, and
might not ever be able to conduct the
same type of analysis that is possible
with the computer.
The example of a civics class lesson
is given for illustrative purposes only.
The same type of activities could be
done in many different classrooms with
many different subjects.
As far as I know, there is no school
where such a curriculum is in use. In
all probability, there are individual
classrooms where teachers are using the
computer in the manner described
above, but doing so in isolation from
other teachers in the building. In a way,
that is a desirable condition; teaching
is an art, and individual teachers are
expected to create individualistic lessons
for their students.
If you, or anyone you know, is using
the computer to conduct lessons similar
to the one described, please write to me.
I would like to know about the activities
and start a file on such units of
instruction. My address is 829 Ever-
green, Chatham, IL 62629.
WHITE HOUSE
COMPUTER
P.O. Box 4025
Williamsport, PA 17701
1-800-351-3442
(717) 322-7700 (In Pennsylvania)
HOURS: Monday thru Friday
9:00 am till 6:00 pm
PRINTERS
STAR M1CR0NICS
SG 10 217.00
SG 15 379.00
SD 10 345.00
SO 15 450.00
SR10 485.00
SR 15 585.00
Powerlype 309.00
LEGEND
880 209.00
1080 229.00
1380 269.00
1385 305.00
C ITOH
851 OA 285.00
8510BC2 389.00
8510BP1 33900
8510SP 389.00
8510SR 429.00
8510SCP 459.00
8510SCR 489.00
1550BCD 529.00
1550P 485.00
A10-20P 465.00
F10-40P/S 875.00
F10-55P/S 1059.00
FIOTraclor 169.00
F10 Sheel
Feeder 349.00
EPSON
RX80 219.00
RX80FT 269.00
RX 100 379.00
FX80 369.00
FX 100 490.00
JX80 529.00
LO 1500P '237.00
LO 1500S 1 149.00
PANASONIC
1090 187.00
1091 237.00
1092 389.00
1093 585.00
3151 475.00
MANNSEMAN
TALLY
Spirit 80 269.00
MT160L 549.00
MT180L 749.00
OK I DATA
182 219.00
83 545.00
84 640.00
92 349.95
93 565.00
Image Writer 425.00
Ohimale 10 179.00
PRINTER RIBBONS
DUST COVERS
PRINTER PAPER
9'."x11" 500 sheets while 11.95
9V«11" 500 sheets oreenbar 11.95
9v,"xi 1" 1000 sheets while (Lazer 20«| .... 19.95
9Vx11" 200 sheets while 8 99
9V"x11" 150 sheels rag while 10.99
9Vx11" 250 sheels ivory 10.99
9'."xl1" 300C sheels while 42.75
I4"x11" 1000 sheets greenbar 24 75
1" Mailing labels (qty. 10001 9.75
SAKATA MONITOR
SC 100 Colo'. 195.9f
SG 1000 Green. ..99 95
SA 1000 Amber .105 95
ZENITH MONITOR
ZVM 1 22 Amber . 85.95
ZVM 123 Green... 75.95
ZVM 131 Color/Medres
299.95
ZVM 133 Color/Hi res
RGB 399.95
ZVM 135 Color/Hi res
459.95
ZVM 136 RGB/Hires
. 599.95
NEC
1201 Green/HI res
w/speaker 139.95
1205 Amber/Hi res
TEAC DISK DRIVE
FD 55V 320K/Hall Height
DS/DD 149.00
FD 55F 320K/Hall Height
96T.P.I. ... 169.00
Sollware for
FD55V 39.95
DISKETTES
SKC
SS/SD 10.50
SS/DO 13.50
OS/DD 15.50
w/speaker
1260 Green .
AMDEK
300 Green. . .
300 Amber . .
300 Color
139 95
.97.95
. 135.95
. 145.95
.249.95
MAXELL
MD-1
MD-2
ELEPHANT
SS/SD
SS.'OD
DS/DO
15.95
21.95
13.50
15.50
19.50
TEKNIKA
MJ- 10 Composite/
Separate Video -199.00
MJ-22 RGB Composite
Separate Video . . . 289.00
MODEMS
Volksmodem/
cable 58.95
Volksmodem
1200 249.95
Hayes 300 199.00
Hayes 1200 385.00
CompuServe Starter
Kit 24.95
INNOVATIVE
CONCEPTS
Flip-N-File (10) 3.50
Flip-N-File ..(151 8.50
Flip-N-File w/lock
(25) 18.50
Flip-N-File (50! 17.50
Flip-N-File w/lock
(50| 23.50
Flip-N-Flle ROM Holder
17.50
INTERFACES
SP-3 Serial to
Parallel 56.95
♦ Dealers Inquiries Invited*
POLICY:No deposit on COD orders. Free Ireight
on all prepaid cash orders over S300.00 in the
continental U.S. APO & FPO add S5.00 per
hundred. For priority mail add S8.00 per hundred.
PA residents add 6 Q o sales tax. Defective
products must have Prior RA number. Schools
nel 15.
VISA and MC Accepted 4%
August 1985 THE RAINBOW 151
New Hard Drives
COMPLETE SYSTEM JUST PLUG IN
-^ QUALITY
VIDEO MONITORS
Call For
BEST PRICE
"1 iiiiiiii
iidiiii
Starting at §7Q
MONOCHROME
COLOR MONITORS
95
Warranty - One Full Year
VIDEO DRIVER
ENABLES YOUR COCO TO OPERATE WITH A
VIDEO MONITOR INSTEAD OF A TELEVISION!
5 to 20 Megabyte, ready to run on the TRS
80 Model I/III/IV/4P, color computer,
SCREEN DUMP PROGRAM
04lX UP UnAUbb jy The best screen dump program tor the Epson & Gemini
printers ever!! Have the option of standard images
or reverse w/regular or double sized pictures si Q95
sp-3 interface for Color Computer
■ 300-19,200 BAUD rates
■ External to printer — No AC Plugs
■ Built in modem/printer switch — no need for
Y-cables or plugging/ unplugging cables
PRINTER CABLES AND
INTERFACES AVAILABLE
Call for current pricing
• 100 - 120 - 160 CPS
' Bidirectional Logic Seeking
• Fnclion and Tractor
■ 9X9 Dot Matrix
' True Decenders
• High Res-Bit Image Block Graphics
GEMINI 10X (9 Inch Carriage. 1 20cps) Friction and Tractor SCALL
GEMINI 15X (15 Inch Carriage. 120cps) Friction and Tractor . SCALL
DELTA 10 (10 Inch Carriage. 160cps) Friction and Traclor SCALL
POWER TYPE Letter quality
Super Scnpl Subscript
Underlining
Backspacing Doublestnke
5. 6. 8 1/2. 10. 12 and 17 Pitch
Programmable Line Spacing
SIX (61 MONTH WARRANTY
Only:
COMPLETE SYSTEM
now
with
screen
dump
$239
SG-10
Nothing more to buy!
Dealer inquiries invited
I
1
1
TRUE DATA PRODUCTS
19S Linwood Street, P.O. Box 546
Linwood, Massachusetts 01525
CALL US TODAY!!
ORDER TOLL FREE
(617)234-7047
1-800-635-0300
NEW
DISK
DRIVES
New Low Price!
»ff*
rw
<*£
STARTING AT
$ 89.
DoubleSided
Double Density
40 or 80 Tracks
95
1/2 Hght.Teac/Panasonic
TANDON MPI TEAC
WITH CASE &
POWER SUPPLY
$12995
CALL FOR
SALE
PRICES
Speed 6 ms tk to tk and up
Capacity 250k unformatted
Tracks 40
Warranty now 1 YEAR
We carry only the finest quality disk drives »no seconds* no surplus
SATISFACTION GUARANTEED!! all drives fully teste d&warranteed
Complete Disk Drive with Power Supply&Case i??9 $129.95
Two Drivesin Dual Case&Power Supply t?? p £2J&95 CALL
1/2 ht double sided double density Disk Drives .(Panasonic/Teac)3> $119.95
1/2 ht double sided double density Disk Drive with ps& case!.... ^$1-99^55 CALL
low to use your new drive system on audio cassette
Single ps&case $44.95 Dual 1/2 ht ps& case $54.95 Dual ps& case... Call
Color Computer Controller f j&M] $129.95
DRIVE FOR RADIO SHACK COLOR COMPUTER
TANDON, MPI OR TEAC DRIVE (SINGLE SIDED 40 TRACKS SPEED 5MS TRK TO TRK& UP)
POWER SUPPLY and CASE, TWO DRIVE CABLE WITH ALL GOLD CONNECTORS .
..fj&M CONTROLLER, MANUAL and DOCUMENTATION $_249^ , $ SALE!
«»* . DRIVE FOR RADIO SHACK COLOR COMPUTER
'^ cfr PANASONIC 1/2 HEIGHT DOUBLE SIDED DOUBLE DENSITY DRIVE 500K unformatted \
* ^5> N POWER SUPPLYand CASE, 2 DRIVE CABLE WITH ALL GOLD CONNECTORS C\\<? e V
J&M CONTROLLER. MANUAL and DOCUMENTATION %^J&^^ t SALE!
TAKE ADDED SAVINGS ON TWO DRIVE SYSTEMS _M te »DiM«ta*
DISKETTES with free library case M U..f^.vnT.T".". $1795
Unadvertised Specials J^Will • $Call
Drives cleaned, aligned & tested * ™ . (P $29.95
TECHNICAL STAFF ON DUTY, PLEASE CALL FOR ASSISTANCE.
CALL US TODAY!!
S ORDER TOLL FREE
(617)234-7047 .DEALER INQUIRIES invited.
1-800-635-0300 [617)234-7047
TRUE DATA PRODUCTS
195 Linwood Street, P.O. Box 546
Linwood, Massachusetts 01525
(617) 234-7047
We welcome
Visa/Master Charge " :
HOURS MON SAT 9-6 (EST)
• Checksfallow 2 weeks for clearing)
• COD. Add $2.00
GAMEMASTER'S APPRENTICE
For The GameMaster,
Just The End M
Of A Beginnin
y George Firedrake and Karl Albrecht
I
t was September 1982. THE RAINBOW was small then
- 106 pages. One of those pages was the first episode
of "GameMaster's Apprentice." It began like this:
Let's pretend. Let's go adventuring in a world of
imagination where magic works and great deeds can
be done. Let's explore, overcome adversity, solve
problems and garner fame, glory and fortune. Let's
play a fantasy role playing game.
Role playing games are usually played by people
ROLE PLAYING GAMES
Millions of people play role playing games. A role playing game is a game in
which one or more players create anil play characters (adventurers) who live their
imaginary lives in a specially made game world- The game world is created, managed
and operated by a Came Master (GM), referee, or dungeon master (DM).
Most people who play role playing games use a formal rule system. Some of
the best known arc shown below.
Bushido. Fantasy Games Unlimited. P.O. Box 182. Roslyn. NY 11576.
Champions. Hero Games. 92 A 21st Avenue. San Mateo, CA 94402.
Dungeons & Dragons (D&D). TSR. P.O. Box 756, Lake Geneva. Wl 53147.
RuneQuest (RQ). Avalon Hill. 4517 Harford Road, Baltimore. MD 21214.
Star Trek. FASA. P.O. Box 6930. Chicago. I L 60680.
Tunnels & Trolls (T&T). Blade. P.O. Box 1467, Scottsdale. AZ 85252.
Beginners beware! The rule books are formidable. If you are a beginner, we
suggest you start with one of the following hooks, both from Reston Publishing
Company. 1480 Sunset Hills Road. Reston, VA 22090.
Adventurer's Handbook: A Guide to Role Playing Games by Hob Albrecht
and Greg Stafford.
You will also need Adventurer's Handbook if you play our play-by-mail
beginner's game. We call it DragonFun.
Copyright® I9S5 by DragonQuest. P.O. Box 7627. Menlo Park. CA 94026.
sitting around a large table. As you walk into the
game area, you see people obviously having a good
time. Curious, you approach.
The players interact animatedly. Then a player asks
a question of the GameMaster. Play stops while she
digs out the appropriate rule book. After some time,
she answers. Play resumes, then stops again while
rule books are consulted. You notice that much time
is spent flipping pages in numerous rule books.
Slowly, an idea forms in your mind. Why not use
the Color Computer as a . . .
* Database Management System
* Management Information System
* GameMaster Information System
Call it what you will. We call it "GameMaster's
Apprentice." In this series, we will surely, but slowly,
explore how to use the Color Computer to help
manage a fantasy world such as Dungeons & Dragons,
RuneQuest, Tunnels & Trolls or Worlds of Wonder.
And so we did. This is the 27th, and last, "GameMaster
Apprentice" in THE RAINBOW. Thanks, Lonnie, for givir
us space and wonderful readers so we could experimei
and develop this idea. We almost know how to do it now
Thanks, Bill Nolan, who wrote "The Dragon's Byte" fc
quite a long time. We wrote tutorials for beginners or nes
beginners. Bill wrote useful programs for experienced D&,
players.
Our three years writing for the best CoCo magazine hi
been a great experience. This ending is another beginnin;
We'll tell you about that at the end of this final installmer
of "GameMaster's Apprentice."
154
THE RAINBOW August 1985
807 Minutemen Causeway (D-2), Cocoa Beach, Florida 32931
(305) 783-1083
For information or technical support, please
call between 5:30 and8;30 P.M. Eastern time.
1 S 8 5 ._! t- ( i
■ ■■.
.ti
T ..
' ■-
:
■ ■
•
1
■ :
I?
:
14
I k "
•'
1"
1
19
:o
"
. •'
-■"
e«
: '
. :■
IC
31
GET YOUR LIFE ORGANIZED
DATE-O-BASE CALENDAR
puts YOU in charge ol your schedule!
■ Graphically displays any monthly
calendar between 1 700 and 2099.
You put in up to twelve 28 character
memos per day . . . calendar shows
where the memos are . . . call up of
day shows details.
■ Use for appointments or a log of past activity.
■ Search capability allows you to list or print all memos between
two specified dates or only ones meeting key-word criteria.
■ Date computation shows elapsed time between two dates in
days, weeks, months and years.
■ Printed graphic calendar available with optional Screen Print
Program.
■ Requires 32K in BASIC
TAPE DATE-O-BASE CALENDAR - S1 6.95 (max. 400 memos/
tape file)
DISK DATE-O-BASE CALENDAR - $1 9.95 (over 4000 memos/
disk. . . max. 300 memos/month)
**********
GRAPHIC SCREEN PRINT PROGRAM
Works in all PMODES and lets you shill screen image anywhere on
the printed page.
■ Relocatable code lets you use all of your 16K or32K machine.
■ Available in Color Basic 1.0 and 1.1/1.2. Use EXEC 41 175 to
see which you have and SPECIFY WITH ORDER.
■ SPECIFY PRINTER TYPE ... in Machine Language.
$7.95-TRS-80 c LP-VII/VIII & DMP 100/105/200/400/420
S9.95- Epson GRAFTRAX", NEC 1 PC 8023 A-C. IDS 440/445,
Paper Tiger- 460/560, Micro Prism- 480, Prism"- 80/132 (with dot
plotting), TRS-80 : DMP-1 20, DMP-1 1 0.TDP-1 , PROWRITER" Cen-
tronics 739, Microline' 82 A/83 A (with Okigraph 1)/84/92/93, Star
Micronics, Inc. GEMINI 10/1 Ox/1 5 and Gorilla Banana
(Trademarks of Tandy Corp., Epson America, Inc., C-ltoh, NEC
America, Okidata Corp., Integral Data Systems, Inc.)
**********
43
+69
102
1+4+6=11
HELP YOUR
CHILDREN
HELP
THEMSELVES
MATH TUTOR
■ 5 Programs in 1 . . . ranges from simple addition through long
division with 4 levels of difficulty.
■ Requires regrouping to be shown . . . provides for trial quotients
in long division.
■ Shows how to correct errors . . . step by step approach stresses
accuracy.
S13.95 in BASIC
**********
SPELLING TEACHER
■ Teaches students their own word list . . . tape or disk files hold
up to 200 words each.
■ Suitable for any level from kindergarten to college.
■ Misspelled words are retaught to reinforce correct spelling.
■ Words presented in 4 lively formats - study, scrambled word
game, trial test, final test.
S12.95 in BASIC
POT YOUR FINANCES IN ORDER
DISK DOUBLE ENTRY
II you have spent hours trying to balance
your Debits and Credits. DISK DOUBLE
ENTRY is lor youl
■ Designed for small business, club
and personal use.
■ Enter transactions in a journal type
format. Program will maintain cur-
rent account balances, produce Trial Balanced Income, and
Balance Sheet reports and complete Account Ledgers.
■ Will handle up to 300 accounts including report headings and
totals.
■ Up to 1 400 average transactions on a diskette.
■ Summary reports and four levels of subtotals available.
■ Requires 32K and an understanding of standard double entry
accounting concepts.
S44.95 in BASIC with Machine Language subroutines
**********
STATEMENT WRITER
For use with land requires) Disk Double Entry
■ Produces statements suitable for billing from your Receivables
accounts.
■ Provides account summaries and mailing labels to use with
your statements.
■ Designed and documented to allow you to change formats to
accommodate your own special needs.
S34.95 in BASIC
**********
That's INTEREST- ing
Let your computer do some REAL computation!
■ Helps you solve problems dealing with time, money, and
INTEREST!
■ AMORTIZATION TABLES any way YOU want them . . . even lets
you change any terms mid-schedule!
■ Calculate Present Value, Future Value, Capital Recovery for
any combination of payments you specify.
■ Rate of Return computation predicts how hard your money will
be working for you!
■ Computes Bond yields . . . current and to redemption.
■ All answers available on screen or printer.
$29.95 in BASIC
**********
ALPHA- DRAW
Works great with GRAPHIC SCREEN PRINT PROGRAM!
■ Subroutine designed to let you add any keyboard character to
your graphic displays.
■ You define X and Y coordinates and a string variable of one or
more characters . . . ALPHA-DRAW does the rest!
■ BONUS- includes instructions for a true line-numbered merge
of tape files.
S8.95 in BASIC
ALL PROGRAMS require Extended Color Basic and >^?^^^
are delivered on cassette. All, except Tape Date- f^f^^F^^
O-Base Calendar, are DISK System compatible. ■■ W All
U.S. and CANADA addS1 .00 per orderfor shipping. RAINBOW
Overseas S2. 50 per order. All prices in U.S. dollars. ctKTmcATKX
Florida residents add 5% sales tax. Return within **-* L
two weeks if not completely satisfied. ™k™J. E ,2
rHUoHAMo
VISA
jdMki^ For VISA and Master Card orders: Include type,
^y 2 account number, expiration date, signature
^^^^^ and phone number Sorry 1 No COD'S.
A Directory of Play-By-Mail Games
Here is a list of companies who run play-by-mail games.
Advent Games, P.O. Box 81674, Lincoln, NE 68501
Adventures By Mail, P.O. Box 436, Cohoes, NY 12047
Adventures Design Group, P.O. Box 821072, Dallas, TX
75382
Adventure Systems, 1669 S. Voss, Suite FF-H, Houston,
TX 77057
Arden Enterprises, Rt. 4 Box 4506, New Philadelphia, OH
44663
Rick Barr, P.O. Box 1873, Cave Creek, AZ 85331
Central Texas Computing, 710-S, Southwest Tower,
Austin, TX 78701
Clemens & Associates, P.O. Box 4529, San Clemente, CA
92672
C-Mind Enterprises, 1008 Tenth St. No. 417, Sacramento,
CA 95814
Comstar Enterprises, P.O. Box 601062, N. Miami Beach,
FL 33160
ECI-Power, 6923 Pleasant Dr., Charlotte, NC 2821 1
Fantastic Simulations, P.O. Box 24566, Denver, CO 80224
Flying Buffalo, P.O. Box 1467, Scottsdale, AZ 85252-1467
4 Sight, P.O. Box 1903, Indianapolis, IN 46206
Game Systems, Inc., P.O. Box 431 166, Miami, FL 33243
Graff Simulations, 27530 Harper, St. Clair Shores, MI
48081
Jabberwock Enterprises, P.O. Box 158, Somers, CT 06071
JF&L, 305 E. Caffery, Pharr, TX 78577
KSK Concepts, P.O. Box 375, Morris Plains, NY 07950
Neolithic Enterprises, 350 N. Lantana, Suite 58'
Camarillo, CA 93010
Palace Simulations, P.O. Box 743, Madison, NJ 07940
Pierce & Co. PBM, P.O. Box 25675, Chicago, IL 60625
Quest Computer Services, P.O. Box 1300, Dahlgren, VA
22448
Rhiannon Enterprises, P.O. Box 510, N. Highlands, CA
95660
Schubel & Son, P.O. Box 214848, Sacramento, CA 9582
Superior Simulations, P.O. Box 505. Fairfield, ID 83327
Time Space Simulations, 5304 Crossfield Rd., Virginia
Beach, VA 23464
Vigard Simulations, P.O. Box 231, Orangevale, CA 9566
White Lion Enterprises, P.O. Box 188, Wood Ridge, NJ
07075
Mike Williams, Route 4, Box 802, La Follette, TN 37766
World Campaigns, P.O. Box 321, Epping, NH 03042
Constantine Xanthos, 120 MacDougal St., NY, NY 1001
Zorph Enterprises, 3646 Gibsonia Rd., Gibsonia, PA 150'
We know little or nothing about most of these companie
However, without reservation, we can recommend Flyir
Buffalo, Inc.
Fortunately, Rick Loomis, who can lay fair claim 1
starting all this, has begun (or helped begin) an associatic
to promote responsible play-by-mail moderating. It is Tl
PBM Association, 8149 E. Thomas Rd., Scottsdale, A
85251. Send them a self-addressed, stamped envelope an
AA
R-RICE SALE ^c^<
SUPER SUMMER HALF
FOR A LIMITED TIME ONLY, THE
KEY TO G4K < KEY— 2 G 4K ) CAN BE YOURS
FOR ^13.35 (Cass) <z>ar 3521.35 (Disk)
*** Works with CASSETTE based systems! ***
*** Uorks with DISK based systems! ***
The KEY-264K divides the 64K ran memory into two 32K banks or sides, each of which can be utilized independently
by the BASIC interpreter, with the ability to switch instantly from one side to the other. IT'S LIKE HAVING TWO
COMPUTERS IN ONE!! Have your BASIC program on one side and keep your variables on the other side, or have your
main program on one side and your subroutines on the other side, or have your program on one side and use the
other side for 4 additional HI-RES pages, or any combination you like. The possibilities are endless because the
KEY-264K allows full communication between sides plus the ability to switch back and forth at will, all from
within BASIC. You could also have different programs in each side and switch back and forth between them using
simple keystrokes, even while the programs are running!! Or run them both at the same time in the
FOREGROUND/BACKGROUND MULTI-TASKING mode. Don't buy that printer buffer yet! Uith the KEY-264K you can be
Printing in the background side while utilizing your computer normally in the foreground side Al IHt SAME TIME!!!
ebugging a program? Use either a BASIC command or simple keystrokes to instantly duplicate your program, in it's
present status, on the opposite side. Switch to the opposite side later and pick up exactly where you were before!
For DISK users, the KEY-264K allows you to alternate between DISK and EXTENDED BASIC on the sane side with
simple keystrokes. No need to pull your controller or power down. You can be in EXTENDED BASIC on one side and in
DISK BASIC on the other side and still switch back and forth and have full communications between the two sides.
The KEY-264K does this and MORE thru extensions to BASIC. No need to learn a new language! The KEY-264K adds
15 NBTCTJHWIDS and 1 function to BASIC, including powerful new BLOCK MEMORY MOVE and GRAPHICS VIEWING commands.
The KEY-264K works on ANY 64K COCO or 64K C0C0-2 and on older 32K systems with "E", 'F', or even modified "D"
boards and requires EXTENDED or DISK BASIC (R.S. only, not for JDOS or others) with GOOD 64K MEMORY CHIPS !!
ORDER YOUR KEY-264K TODAY by sending check or money order for J19.95 (cassette) ot $21.95 (disk)
PlU5~$27uTrP0S]AIJE U.S.A77I5.00 outside U.S.A.) MASS. residents add 5% sales tax.
MASTERCARD, VISA, OR COD
CALL (61?) 779-5034
KEY COLOR SOFTWARE
P.O. BOX 360
HARVARD, MA. 01451
^
156
THE RAINBOW August 1985
ey will send you a list of PBMA members.
If you play role playing games, play-by-mail games, on-
le games on computer networks, or even solitaire
dventure games on your CoCo, we bet you will enjoy
e following books: Dream Park by Larry Niven, Octagon
l Fred Saberhagen and True Names (novella) by Vernor
inge in BINARY STAR #5, editor: James R. Frenkel.
loysious — One More Time
Aloysious made it across the creek, successfully climbed
e embankment and exercised his displeasure by throwing
few stones. Now, late in the day, he continues his journey.
Hit with fist — Success percentage: 50%
Aha! A "weapon," cheap and always available. For
loysious, flailing with his fist is a hit or miss proposition,
e connects about half the time, if he is trying to hit a
:rson of average S1Z and DEX.
Success: Roll 50 or less on the percentile dice
Failure: Roll 51 or more on the percentile dice
Night falls. Aloysious spends the night in the woods near
cliff. He lights a fire and makes some tea. Presently,
: notices his shadow on the cliff and decides to get in
little boxing practice. Roll the dice: 36. He lands a blow,
uch! Well, so much for boxing your shadow on a cliff.
Hit with stick — Success percentage: 25%
This is the ability to hit a moving target with a stick
• similar weapon: a broom, shovel, rake or even a "real"
eapon such as a mace or spear.
Success: Roll 25 or less on the percentile dice
Failure: Roll 26 or more on the percentile dice
Aloysious awakes with a start. In the bright moonlight
ortunately), he sees a raccoon trying to pilfer his
ovisions. He grabs his sturdy walking stick (always by
s side) and leaps to the fray, flailing as he goes.
completely computer-moderated game.
The game we are in began in the game year 801. Here
is the State of Cairleon as the game began.
,rst roll: 78
:cond roll: 89
nird roll: 52
He misses.
Another miss.
Curses! Missed again.
The raccoon, too wise to remain hungry, runs away,
loysious now does what he should have done before. He
ings his gear from a branch of a tree, out of reach of
e more ubiquitous nocturnal bandits. With a sigh, he
ttles down to a good night's rest.
And so we leave Aloysious, sleeping beneath the stars
ith his seven characteristics and his 11 special skills. His
lventures will continue to be chronicled in another place.
eport from Cairleon
We are playing Feudal Lords by mail, making one turn
ich month. We are the Lord of Cairleon on the west
>ast of Britain. There are five other human players, each
e lord of a fief. Forty other fiefs are controlled by the
imputer, which is also the GameMaster. This is a
Market Price for Food: Sell 10, Buy
II
Lord's Rank: Baron, Leadership 2
Gold
1400 Tax rate 20
Lumber mills
Food
1400 Markets
Fishing fleets
Knights
200 Cattle
Mines: Stone
Peasants
800 Ships
Metal
Townsmen
200 Agric. bonus
Gold
Castle
10 Champion 3
Gem
Each turn is one game year. We can send up to 12 orders
selected from a list of 31 possible orders. We spent about
three hours trying out various possibilities. Soon we will
have a CoCo program to help us!
First, we must feed our peasants and knights at least
one food unit per year, a total of 800 + 200 = 1 ,000 food
units. Townsmen will buy their own food. We have an
excess of 400 food units. We decided to give our peasants
an extra 100 food units to encourage population growth.
Peasants are the strength of a fief — they grow most of
the food.
We now have a surplus of 300 food units. We will sell
250 at the market price, thus increasing our gold supply
from 1,400 to 3,900. We will soon spend much of this
gold.
The rulebook informs us that about 25 percent of surplus
food will spoil, so we convert the surplus to livestock at
a cost of five gold and one food unit for each unit of
livestock. We buy 50 livestock. This brings our gold supply
down to 3,650.
In the year 801 "food is gold," so we will use some gold
to increase our ability to grow food. We spend 1,000 gold
on agricultural research. We now have 2,650 gold.
We send two spies to tell us what is going on in the
neighboring fiefs of Hereford and Glamorgan, both
controlled by the computer. Spies cost 100 gold each, which
leaves us 2,450 in our treasury.
It costs five gold to maintain a knight — there goes
a cool 1,000 gold to maintain our 200 knights! We decide
to disband half our army in order to use more gold to
build other resources. In a couple of turns we will build
the army up again. We now have 1,450 gold.
Let's spend a little more gold. We'll build a fishing village
at a cost of 300 gold. This will produce additional food
in the future. Here is a summary of our orders.
Order Additional Description
Sell 250 food
Spend 1,000 gold on agricultural
research
Give 100 extra food to peasants
Send spy to fief #24 (Hereford)
Send spy to fief #21 (Glamorgan)
Disband 100 knights
Buy 50 livestock
Build one fishing village
Code
Info
16
250
21
1000
18
100
23
24
23
21
8
100
20
50
29
August 1985 THE RAINBOW 157
We mailed our orders to Flying Buffalo and waited for
a reply. In the meantime, we send letters to the Lord of
Denbigh and the Lord of Dorchester, suggesting a friendly
and mutually supportive alliance. Without allies, you will
soon be wiped out in this game!
Soon the computer replied with a very complete repo
of the State of Cairleon and news of other events in Britaii
Cairleon began 801 with:
Maintain 200 Knights
Disband 100 Knights
Sell 250 food at market
Townsmen had to buy 200 food
Give 900 food to peasants
Agricultural research faileth
Spy on Hereford
Spy on Glamorgan
Buy 50 livestock
Build 1 Fishing Fleet
Gold
Food
Peasant
Townsmen
Knights
1400
1400
800
200
200
-1000
-200
+0
+0
+0
+0
+0
+0
+90
-100
+2500
-250
+0
+0
+0
+0
-900
+0
+0
+0
-1000
+0
+0
+0
+0
-100
+0
+0
+0
+0
-100
+0
+0
+0
+0
-250
-50
+0
+0
+0
-300
+0
-10
+0
+0
Thy Chancellor reporteth the following revenues:
Tax & population growth/ decline
+ 1914
+0
+59
+ 15
+0
A normal harvest (1.52)
+0
+ 1290
+0
+0
+0
(Average harvest was 1.6)
Fishing
+0
+ 18
+0
+0
+0
Livestock increase by 10
Thy Sheriff reporteth other events in thy fief:
28 foreign knights join thy service.
Thy Marshall reporteth the following military activity:
In Cheshire: Wroxeter won a 8:1 raid against Cheshire.
In Devon: Cornwall won a 8:1 raid against Devon.
In Gloucester: Hereford won a 1:1 raid against Gloucester.
In Uxworth: Norfolk lost a .4:1 siege against Uxworth.
Thy champion rode errant into the Fens and defeated dwarves, gaineth eight peasants.
Spy reports
Hereford
Player: non-player
Gold 1874 Peasants
Food 1439 Townsmen
Knights 183
No Overlord
819 Castle 10
204 Ships
Glamorgan
Player: non-player
Gold 2161 Peasants
Food 1332 Townsmen
Knights 211
No Overlord
854 Castle 1 1
191 Ships
158
THE RAINBOW Augusl 1985
Well, that was a good year. Cairleon begins the year
)2 as follows.
Market Price for Food: Sell 9, Buy 10
-ord's Rank: Baron, Leadership 2
3old
3064
Tax rate
20 Lumber mills
-*ood
1308
Markets
Fishing Fleets
1
Cnights
128
Livestock
60 Mines: Stone
feasants
857
Ships
Metal
Townsmen
305
Agric. Bonus
Gold
3astle
10
Champion
4 Gem
Except for the size of its army, Cairleon is in much better
lape than at the beginning of the game. Now if we would
ist get a favorable reply from the Lords of Denbigh and
•orchester.
Feudal Lords is an excellent multi-player Simulation
ime requiring much careful analysis, record keeping,
iplomacy, contingency planning, resource management,
c. For more information, write to either of the following.
- Flying Buffalo, Inc., P.O. Box 1467, Scottsdale, AZ
85252-1427
- Graaf Simulations, 27530 Harper, St. Clair Shores, Ml
48081
ames for Beginners?
If you are a beginner, you may be at a disadvantage
i a multi-player, play-by-mail game. Why? Because there
ill probably be experienced players in the game who know
rategies you don't know. We are trying to arrange some
imes for beginners only. In these games, all players will
: beginners (unless someone lies — please don't).
If you are interested in playing in a beginner's game,
send a self-addressed, stamped envelope to DragonSmoke,
P.O. Box 7627, Menlo Park, CA 94026. Be sure to tell
us what you want — we get lots of self-addressed, stamped
envelopes!
DragonSmoke
We will continue with our own newsletter, which began
in the same way as THE RAINBOW. Our first issue (January
1985) consisted of two pages run off on our Canon PC
copy machine. DragonSmoke grows as did RAINBOW. Our
February issue had eight pages; March, 16 pages, April,
20 pages; and May, 24 pages.
THE RAINBOW grew and became the number one
magazine for the CoCo Community, with more than 200
advertisers and almost everything a CoCo user could
possibly want. THE rainbow covers the world for CoCo
users, from beginner to expert.
DragonSmoke will remain small. It will not take ads.
It does not compete with magazines like THE rainbow.
It is for beginners. It explores computers for beginners,
role playing games, play-by-mail games, encourages new
ways to learn and points CoCo users back to RAINBOW.
In DragonSmoke, we will rerun "GameMaster's
Apprentice" from the beginning. Thanks to our RAINBOW
experience, we can make it better the second time around.
Here are some ways to sample DragonSmoke:
- Send $1 and we will send you the first three issues:
January, February and March.
— Or, send $1 and tell us you want the most recent issue.
Our address is DragonSmoke, P.O. Box 7627, Menlo
Park, CA 94026.
Farewell, RAINBOW. For us, this is the end ... of a
beginning.
One- Liner Coniesl Winner . . .
As many people already know, Halley's Comet is
already well within our solar system and is expected
to make its appearance later this year. This program
is a graphics presentation of the sun, Earth's orbit
and the path of the comet.
The listing:
1 PMODE3:PCLS3:SCREEN1,,0:FORX=1T
08p:PSET(RND(25^5) ,RND(190) ,2) :NE
XT: CIRCLE (7^,95) ,12,2, .9:PAINT(7
j3,95) ,2, 2: CIRCLE (7)3, 95) ,55, , .9:F
ORY=1.4T04.9STEP.)33:V=COS (Y) *177
+23j3:H=SIN(Y) *65+95 : PSET (V,H, 1) :
NEXT:PLAY"01T3V13L1CV24G02V28CP5
03L4EL1D+":GOT01
Don Rowan
Minneapolis, MN
(For this winning onc-lincr comest entry, the author has been sent copies
of both The Rainbow Book Of Adventures and its companion Rainbow
Adventure Tape.)
One-Liner Contest Winner . . .
This program sorts strings alphabetically. Simply
input the number (up to 999) of strings to be sorted
and then input each string.
The listing:
1 DIMN$(999) :CLS:PRINT@43,"SUPER
SORT" : INPUT "# OF WORDS" ;W: FORX=
1TOW: INPUT" INPUT WORD";N$(X) :NEX
TX : FORS=lTOW-l : IFN$ (S ) <=N$ (S+l) T
HENNEXTS : CLS : FORX=lTOW: PRINTN$ (X
) : NEXTX : END : ELSEH$=N$ ( S ) : N$ ( S ) =N
$ (S+l) :N$ (S+l) =H$ : S=)3 :NEXTS : CLS :
FORX=lTOW:PRINTN$(X) :NEXTX
Michael Stankas
Moundsville, WV
(For ihis winning onc-lincr conies! entry, the author has been sent copies
ol" both The Rainbow Book Of Simulations and its companion Rainbow
Simulations Jape.)
August 1985 THE RAINBOW 159
.
tware
Do you want your reports
to look like this?
Disk compatible
Fast Machine Language sort routine
- sort on 3 fields simultaneously
With our ML search routines you can
- search on a selected field
- search for a specific item
- search for records within range
Phrase substitution editor - fast ML delete routines
Up to 8 user-definable fields per record
- up to 230 characters per field
- variable field length
- variable record length
(memory allocated is the actual length of the record)
Upper and lower case
User-selected report formats
- report headings
- full margin control
- select which records to print
- select field to print
- select order in which fields are printed
- multiple fields per line
Send TIMS file to either tape, disk or printer — allows you to
use the extensive editing capability available with a word
processor to add to or combine other data with a TIMS
report
Save, load, append and verify routines
SUGAR SOFTWARE
PRODUCTS
SORTED BY AUTHOR
TIMS
NOVEMBER 1, 19B3
PAGE 1
DENNIS /AEBST
STATGHAF
EDUCATIONAL
GRADE 10 AND UP
S2K
TAPE
• 24 .95
G.T. BARRICK
THE GREAT USA
EDUCATIONAL
GRADE 4 AND UP
IfaK
TAPE
» 1 9 . 93
GARY DAVIS
AUTO RUN
UTILITY
PROGRAMMER
Idf
TAPE
il9.95
or this?
SUGAR SOFTWARE PRODUCTS SORTED BY TITLE
NOVEMBER 1. 199?.
TIMS
PAGE 1
UTK ITY
FIRmKI. 'Oh
DIS» J»
GARY DAVIS
♦99. 95 PROGRAMMER
iRhMHDER
S.DAVIS '. S.C0SIAN2U
EDUCAI IONAL
HI I J2t
♦19.95 :-b
SILLY SYNIA*
IAFE !&►
GARY DAVIS
•19.95 GRADE 5 AND UP
E DUCAT IONAL
database
management
system
or this?
SUGAR SOF1WARE
NOVEMBER 1. 190
PRODUCTS SORTED BY
TOPIC
TIMS
PAGE I
I DUIJAI IONAL
DENNIS 7AEBST
GRADF 10 AND UP
STAIGRAf SIf>
TAPE
*?4.95
EDULfi! IONAL
G. 1. l-ARRICK
GRADE 4 AND UP
1HZ GREAT USA !(.»
TAPE
♦19.95
EDUCATIONAL
GARY DAVI5
GRADE 5 AND UP
SILI > 5>'NTA1 l&t-
TAPE
•19.95
You can do it all
with TIMS -$24.95
tJ,
TIMSMAIL
$19.95
32K ECB recommended
Disk compatible
Th e ultimate mailing |«st
Send your maUing Bst to printer, '
^iT^oIolurnn printer
Designed tor «* > ts
UserSe nuforsSe sheet
2 5 2.75, 3. 35 and 4
ScSs to print
lefect records to pnnt
TIMS UTILITY
TIMS UTILITY features:
Multi-Term Search - Search your database using a search criterion
based on up to 5 keywords. You can use either "AND LOGIC" or "OR
LOGIC".
Global Change - This is the "automatic" version ol the modify mode. II
can be used when there is a unique set of features in a specified field
For example, we could change all references to Rainbow lo RB.
Global Delete - Automatically deletes every record in the database
which meets the search criteria.
$14.95 -Tape
Record Change - Add or delete fields to your records. The maximum
number of fields per record is still 8.
Split File Mode - Use "AND" logic (all articles published in Rainbow
and written by Davis) "OR" logic (all customers in Ohio or Maryland),
or Range Search lo split your large file into 2 or more smaller files. You
can save your new file to tape or disk.
TIMS UTILITY comes on lape and is disk compatible. It requires 32K,
and a file created with either TIMS or TIMSMAIL.
tware
J% CMI0 Calitgraptpr
See You at
Chicago RAINBOWfest
Use your C0C0, your 8-bit dot addressable graphics
printer and the C0C0 Calligrapher to create beautiful
signs, invitations, flyers, greeting cards, diplomas, cer-
tificates, awards and love letters.
The original Calligrapher letters are 36 points (1/2 inch)
high and variably spaced. It includes an easy-to-use ,
menu-oriented program and these three typestyles:
Old English Cartoon
Gay Nineties
Gey Nineties
The C0C0 Calligrapher requires 32K ECB.
Tape $24.95 Disk $29.95
ADDITIONAL TYPESTYLES
These tapes of additional typestyles are available for
$19.95 each. They can be easily moved to disk. The
original Calligrapher program is required.
Tape 1 - Reduced, Reversed, and Reduced-Reversed
versions
Old English
Gay Nineties
Cartoon
These disks of additional typestyles are
available for $49.95 each.
Disk 1 - all type styles on Tapes 1 , 2 and 3.
Disk 2 - all type styles on Tapes 4, 5 and 6.
Tape 4: Wild West/Checkers
Wild West Checfc
ers
utm<<*utitiirishakc«le
All typestyles on Tapes 2, 3, 4, 5, and 6 include Stan-
dard (1/2 inch), Reversed, Reduced, and Reduced-
Reversed unless otherwise noted.
Tape 2: Broadway/Old Style
IBroaduay tJld^fylf
Tape 3: Business/Antique
Business *&«f iquc
Tape 5: Star
Hebrew
Stairs U^V?
Victorian (Standard and Reverse only)
WlcTcrfau
Tape 6: Block/Computer
Block
CompuTEPi
t% (§^-B Calltgrapljer.
$39.95
Requires OS-9 Version 01.01.00 and a dot matrix print-
er. The OS-9 Calligrapher reads a standard input text
file which contains text and formatting directives to pro-
duce standard utput for printer or disk. You can specify
which font to use; centering; left, right or full justification;
line fill; narrow mode; margin; line width; page size;
page break and indentation.
These disks of additional typestyles are available for
$49.95 each. They are not compatible with the C0C0
Calligrapher typestyles or program. OS-9 typestyle
disk must be used with the OS-9 Calligrapher.
Disk 1 - OS-9 version of all type styles on Tapes 1 , 2 and
3.
Disk 2 - OS-9 version of all type styles on Tapes 4, 5 and
6.
Dealer and author Inquiries arc al-
ways welcome. Canadian dealers
should contact Kellv Software Dis-
tributors, Ltd., P.'O. Box 11932,
Edmonton, Alberta T5J-3L1, (403)
421-8003.
Disk software compatible with Radio
Shack DOS onlv.
SUGAR SOFTWARE
1710 N. 50th Ave.
Hollywood, Florida 33021
(305) 981-1241
A complete catalog of other sweet
Sugar Software products Is available.
Add $1.50 per program for postage and
handling. Florida residents add 5% sales tax.
COD orders are welcome. CIS orders EMAIL
to 70405, 1374. No refunds or exchanges.
^
TURN OF THE SCREW
Switching
Double- Sided Disks
By Tony DiStefam
Rainbow Contributing Edito
.
It was great seeing the whole RAIN-
BOW gang at the Chicago RAIN-
BOWfest in May. That made my
first RAINBOWfest anniversary. There
were a lot of new products to be seen.
Fancy software, new and improved
hardware, and a lot of new faces.
These get-togethers are quite warm
and friendly. I have gone to many
computer shows, some for different
kinds of computers and some that host
just one brand. But, I have never seen
one that came close to the atmosphere
at a RAINBOWfest. I tip my hat to
the CoCo Community.
Speaking of new products, look
forward to seeing my new line of
products, starting with the D1STO disk
controller.
Clearing up Confusion
The topic of this month's project
involves disk drives and disk controllers.
There seems to be some confusion
about disk drives being double-sided,
double-density, single-sided, single-
(Tony DiStefano is well-known as an
early specialist in computer hardware
projects. He lives in Laval Ouest,
Quebec.)
density, 96 or 48 tpi (tracks per inch)
and the compatibility between them.
Especially when you talk about OS-9.
"When the Color
Computer first came
out, the only mass
storage available was a
cassette recorder.
Though the cassette
recorder works well for
music and speech, it
was slow and not well-
suited for computer
work. A new form of
mass storage had to he
invented: The diskette
was introduced."
1 hope to clear all that up right here
and now and follow it up with a small
project to let you see just what side of
the fence, uh . . . I mean disk, you are
on.
I will start off by describing a diskette
and a disk drive. First, a diskette i<
form of media. It holds information
what information is up to you.
telephone numbers file, a game or tw
your favorite word processor. All
these are files that make your compu
function the way it does; this data r.
to be stored somewhere.
When the Color Computer first cai
out, the only mass storage available v.
a cassette recorder. Though the casse
recorder works well for music a
speech, it was slow and not well-suit
for computer work. A new form of m;
storage had to be invented: The diske
was introduced. There are many kin
of diskettes on the market today, b
I will limit this discussion to those tl
are compatibile with our lovable CoC
Without going into too much deu
the Radio Shack standard diskette us
with the CoCo is a 514-inch, sing
sided, double-density, 35 tracks at
tpi, soft-sectored diskette. The Rac
Shack Disk BASIC, disk operati
system, drive and controller are ma
to comply with these standards. Y
can get more details on the DOS in t
Disk BASIC manual. The Radio Sha
controller is made to handle two orfo
drives, depending on what cable y
have.
162
THE RAINBOW August 1985
ft
1 2
1 N/C
Z
3 4
1 N/C
c
5 6
3 N/C
□
7 B
J INDEX/SECTOR
c
9 10
3 DRIVE ENABLE
c
11 12
3 DRIVE 1 ENABLE
ALL
c
13 14
3 DRIVE 2 ENABLE
THESE
PINS a
ARE ~
NNECTED
TO
ROUND
c
c
c
c
15 16
17 IB
19 20
21 22
3 MOTOR ON
3 DIRECTION SELECT
3 STEP
3 WRITE DATA
c
23 24
3 WRITE GATE
c
25 26
3 TRACK
c
27 28
3 WRITE PROJECT
c
!9 30
3 READ DATA
c
31 32
3 DRIVE 3 ENABLE
kc
33 34
1 N/C
Figure 1
34-pin disk drive
connector pinout
Note: L
1
P
P
ooking at the DISK CON-
ROLLER edge connector,
in #1 is the top right-hand
in
The disk drive itself connects to the
ltroller via a 34-pin ribbon connector.
;ure 1 shows the pin configuration
the "disk side" of the controller. As
i can see from the diagram, four pins
used for selecting or activating up
our drives. Radio Shack drives differ
m standard drives by the way they
selected. You see, all four pins on
dio Shack drives are connected
;ether and the selecting is done by
>sing pins in the cable connector,
-or example, to select Drive 2, the
>le connector that is configured to
number 2 has the pins that correspond
drive numbers 0, 1 and 3 missing.
at way, when another drive is
ected, it won't affect that drive
:ause that pin is missing.
There is one more interesting thing
Dut the Radio Shack cable config-
ition. Drive 3 pin on the controller
not in the normal position for a
ndard drive. The normal position for
itandard Drive 3 is pin #6, where
dio Shack chose to keep this pin
pty.
Interestingly enough, though, the
ice they did put it is where the
ndard disk drive has its side select,
pin #32 (for double-sided drives only).
Since this pin is connected to the
controller, it gives us access to the
second side of a disk drive. All the
hardware is there to use the second side,
providing you have double-sided drives.
Today, the price of double-sided
drives is so low that in some cases it
is cheaper to buy a double-sided drive
from another company than it is to buy
a single-sided drive from Radio Shack.
More and more people already have
them and are not using the second side
because Disk BASIC does not allow
them to do so. I will show you a couple
of ways to access the second side. One
is software and the other is hardware.
Use the method that suits you best.
Either way, you will want to build the
project if you have double-sided drives.
"There are two ways to
change the mask byte
in software. One is to
burn the new mask byte
into an EPROM. The
second is to use the 64K
mode of the computer
and make the changes
in RAM."
The first thing to do to use the
double-sided drive is make sure you
have one! You must connect it to the
Radio Shack controller. Remember, I
said there were pins missing in the
Radio Shack cable and that will give
us problems.
The side select pin is only present on
a four-drive cable, and then only on
the fourth drive. You must add another
connector for every double-sided drive
you are adding to your system. (They
are available at your nearest Radio
Shack Computer Center.) The connector
is a 34-pin edge card connector. If you
don't know how to install it on your
cable, ask your dealer to do it for you.
Have him press the new connector
about an inch and a half away from
the old connector.
The disk drive now has to be con-
figured to which drive number you
want. There are jumpers inside the drive
you must set. In the owner's manual
of the drive there will be instructions
on how to do that.
Now you have a double-sided drive
on line, but you will still need a way
to access it. The first way is in software.
The way Disk BASIC selects the drive
is by using four "mask" bytes. Each byte
contains the necessary data in order to
activate that drive number. There are
four bits that control each of the output
pins as seen in Figure 1 .
In the controller, there is a memory-
mapped byte that controls the output
of these pins. It is at SFF40 or 65344.
Try this:
POKE G5344,l
The select light on Drive turned on.
Now try the values two, four and 64
instead of one. This will turn on drive
numbers 1, 2 and 3, respectively. The
last value of 64 activates Drive 3 (if you
have four drives), but remember on our
double-sided drive that is the side select.
By changing the values on the four mask
bytes we can access the second side of
the drive. By changing the mask data,
you can access the second side of the
drive as another drive.
PIN # 32
A
p .
a X c
fH i
V
SPDT
SWITCH
~i
X = CUT TRACE
Figure 2
Double-sided drive switcher
Example: If you have one single-
sided Radio Shack drive and one
double-sided drive with the right
changes to the mask byte, you will have
three drives on line. The Radio Shack
drive is the first, the first side of the
double-sided drive is the second and the
second side of the double-sided drive
is third. If you had two double-sided
drives, it would be as if you had four
separate drives. Two double-sided
drives is the maximum you can have
with Disk BASIC because there are only
four mask bytes.
August 1985 THE RAINBOW 163
DRIVE* 0-10
DRIVE » 112
DRIVE » 2-14
SIDE SELECT-32
•SEE TEXT
IS
G2A
Q2B
7
4
L
S
1
9
y6
f
R1
100 .n v.w
GROUND 1
Figure 3
Dual color-drive side indicator
There are two ways to change the
mask byte in software. One is to burn
the new mask byte into an EPROM.
The second is to use the 64K mode of
the computer and make the changes in
RAM. I'll leave that part up to you,
but what I will do is tell you how to
change the mask byte.
The four mask bytes correspond to
four drives. Since we are using the last
drive number as a side select, we can
no longer use it as a drive but only as
a side select. That leaves us with three
other mask byte values. The values are
1, 2 and 4. The side select value is 64.
Any combination of this will work
(maximum of four).
First example: Your first drive is a
Radio Shack single-sided drive. You
want it to be Drive 0, so the value of
the first mask byte is '1.' Your second
drive is a double-sided drive; they will
be Drive 1 and Drive 2. The second
mask byte will be '2' and the third byte
will be 65. The fourth byte will be
untouched.
Second example: You have two
double-sided drives. Drive will be the
normal side of the first drive; Drive 1
will be the normal side of the second
drive. Drive 2 will be the second side
of the first drive and Drive 3 will be
the second side of the second drive. The
four mask bytes are 1, 2, 65, 66.
Radio Shack has two versions of
DOS: 1.0 and 1.1. The memory address
of the four mask bytes for DOS 1.0
is SD7AA (55210); the address mask
bytes for DOS 1.1 is SD89D (55453),
plus the next three bytes for the other
three values.
If all that doesn't thrill you, you can
select the other side by adding a small
switch to your disk controller. Figure
2 shows how to hook up the switch to
your controller. You must cut the foil
between points 'A' and 'B.' Drill a
suitable hole in the cover of the
controller to mount the switch. When
the switch is in the up position, the
normal sides of all double-sided drives
are accessed. When the switch is in the
down position, the second side is
accessed. Never change the switch when
doing I/O to disk since it will ruin both
sides. Again, remember, you must not
use the fourth drive on a four-drive
connector.
To some, it is easier to install the
switch than to do it in software, but
it is a little more difficult to manually
flip the switch. In any case, visual cue
as to what side of the disk you are really
on is almost a necessary option.
Figure 3 is a schematic for a circuit
that will tell you what side of the drive
you are using by lighting a different
color LED for each side. This circuit
goes inside the disk drive and replaces
the "active drive" select LED. The heart
of the circuit is the Radio Shack Tri-
color LED (part #276-035). This LED
glows one of three colors. We will be
using only two of these colors, red and
green. The circuit uses a 74LS138
decoder.
When no drive is selected, the f
outputs used are logical level one a
the LED is off. When the drive
question is selected, the 'A' (drive sele
input goes low, therefore activating t
chip. If the 'B' (side select) is high (fi
side of the drive), the Y7 output gc
low. This will cause a positive volta
to appear across the Tri-Color LE
which makes the LED glow red. If t
'B' input is low, the Y6 output goes lo
in which case there will be a negati
voltage across the LED. Then the LE
will glow green. When the 'A' input
high (drive not selected) the chip
disabled and both Y7 and Y6 are hij
the LED will be off. I put red as t
first side because it is the color ol
single-sided drive. That way when I <
green, I automatically know I'm on l
other side.
There are just a few things to consic
when hooking up this circuit inside t
drive. The first is where to get the fi
volts and ground needed to run t
circuit. The easiest place to get a grou
is pin #1 of the drive cable connect'
Pin #1 is on the side of the conned
that has all the pins connected togeth
They are all the odd-numbered pii
The drive connector pins are number
on each end.
Five volts can be taken from the li
pin of any 74LSXX chip. Use a v
meter to check the voltage. This is eitl
pin #14 or #16 depending on how ma
pins there are on that chip.
The second thing to watch for is
make sure the 'A' input matches tl
of the drive selected. This means if t
'A' wire goes on Drive 0, make si
the drive configuration block is set
Drive 0, otherwise the LED will ne^
light.
The actual construction of the circ
can be done on a small perf board. Ta
or glue down the board in an unus
area of the disk drive. Make sure
doesn't get in the way of the diske
that enters the drive. Remove the c
LED. Replace it with the new one. I
tape or glue to hold it down.
Now, try the drive and access the fi
side of the drive. The LED should
red. If it is green, reverse the wires tt
go to the LED. When all is OK, t
LED will glow red for the first side a
green for the second side. This way y
will always know which side of the dri
the software is accessing.
164
THE RAINBOW August 1985
tware
The
Presidents
of the
United
States
Who was the only Eagle Seoul
10 become President? Which
President had the shortest term
of office? Which President later
became Chief Justice of the U.S.
Supreme Court?
Find out with the great new
educational game The Presi-
dents of the United States.
Grades 5 and up
Study mode
2 separate games
User-modifiable data
100% Machine Language
Menu-oriented
Up to 8 players
Tape contains both
16K and 32K versions
$24.95
Disk requires 32K
$29.95
The
Great
USA
*>L
l"W
PrivU4y
H ln
■ oil
?%m
^EfS^B 1 " '^P
~J3M
Ni'j jiH
msM mm-: M
iJilC^
w
■ m
l"M
w
B i ii|
\
EASTERN USA
L'wmmm
For grade 4 and up
Sharpen your knowledge of
the 50 stales
- Abbreviations
- Capitals
- Nicknames
- Birds
- Trees
- Flowers
- Random combinations
of the above
Play alone or compete
against each other
Ideal for home or classroom
Colorful, detailed maps
User modifiable input
Easily moved to disk
Both 16K ECB and
32K ECB versions
included on the tape
$19.95
GALACTIC
HANGMAN
For grade 2 and up
Exciting version of the pop-
ular word guessing game
Play against the computer
or a friend
Outstanding high-resolution
graphics and animation
Great sound effects
and music
700 word vocabulary
included
Create your own word files
- your child's spelling list
- foreign language
vocabulary
- specialized word list,
- i.e., geographic,
chemistry, physics
Broaden your vocabulary
Easily moved to disk
Both 16K ECB and
32K ECB versions
included on tape
$17.95
Dealer and author inquiries are al-
ways welcome. Canadian dealers
should contact Kelly Software Dis-
tributors, Ltd., P. O. Box 11932,
E^monto"' Alberta T5J-3L1, (403) A complete "catalog of other sweet
421-8003. Sugar Software products is avail-
able. Disk software compatible with
Radio Shack DOS only.
Sugar Software
1710 N. 50th Ave.
Hollywood, Florida 33021
(305) 981-1241
Add $1.50 per program for postage and
handling. Florida residents add 5% sales tax.
COD orders are welcome. CIS orders EMAIL
to 70405, 1 374. No refunds or exchanges.
TUTORIAL
Memory On A
STRING$Bu
One of the most powerful string functions available
in Extended BASIC is the INSTR (in-string) function.
This function searches for the first occurrence of
String 1 in String 2 and returns the position at which the
match is found. If no match is found, it returns a zero.
This may be difficult to grasp at first, so let's look at
some examples in order to illustrate the function:
1. A=IMSTR ("ABCDEFG", "C")
2. A=INSTR ("ABCDEFG", "CDE")
3. A=INSTR ("ABCDEFG", "X")
4. A=INSTR (2, "ABCDEFG", "CDE")
5. A=INSTR (5, "ABCDEFG", "CDE")
Example 1 — In this first example, the value of 'A' will
be set to three since the character 'C is located in the
third position of the string "ABCDEFG"
Example 2 — In this case, the value of 'A 1 will also
be set to three since the string "CDE" starts at the third
position of the string "ABCDEFG"
Example 3 — Here is a case where 'X' is not contained
in the string "ABCDEFG," so the value of 'A' is set to
zero, meaning no match was found.
Example 4 — You can add a numeric value (must be
less than the length of the string being tested) at which
(Jorge Mir is a certified public accountant and
controller of a Fortune 500 Corporation. He publishes
most of his original work through THE RAINBOW)
point you want to start the search. In this case, the compu
will start searching at Location 2 (the 'B') of str
"ABCDEFG" to see if the string "CDE" is contained wit
it. The value of 'A' will be set to three in this exam
since a match will be made and "CDE" starts at Posit
3 of the string being tested.
Example 5 — In this example, the computer will st
searching at Location 5 (the 'E') to see if "CDE" is contaii
in the rest of the string. The value of 4 A' will be set
zero since "CDE" is not contained in that section of
string being tested.
You can use string values in the program step rat
than the actual strings. Here is an illustration:
10
x$
= "ABCDEFG'
20
v$
= "CDE 1
30
z$
■ "X"
40
A =
INSTR
(X$,
v$)
50
B =
INSTR
(X$,
z$)
60
PRINT A
70
PRINT B
If you run this program, the screen will show a th
(the value of 'A') since YS was found in XS starting
Location 3, and a zero (the value of 'B') since ZS is
contained within XS.
This is powerful stuff! But, how do you use it ii
program? Here are some examples. Let's assume you h
166
THE RAINBOW August 19B5
dget
By Jorge Mir
data file containing names and addresses which have
en stored in string values from NS(1) to N$(100) and
u want to find out if there is anyone in the file who
es in Atlanta, Georgia. The subroutine might look like
s:
1000 INPUT "KEYWORD: ";K$
1010 FOR X = 1 TO 100
1020 IF INSTR (N$(X),K$) = THEN 1040
1030 PRINT N$(X)
1040 NEXT X
When the computer reaches this subroutine, you will
prompted for a "keyword" (Step 1000). In this case
u will enter the word flTLRNTFl. The subroutine then goes
o a loop, testing each of the 100 items in memory. Step
20 tests to see if the word "Atlanta" (stored in K$) is
ntained in the string N$(X). If it is not, it will return
zero and the program jumps to Step 1040 where it
ntinues to the next name and address. If it is contained
the string N$(X), it will then continue with Step 1030
d print that name and address record on the screen.
Please note that in the case above all records containing
i word "Atlanta" will be printed on the screen, so if
;re is an Atlanta, Florida in the file, it will also be printed,
kewise, if someone's name is Atlanta, or if there is a
eet named Atlanta, those will also be printed. If you
.nt to avoid this, you can type the keywords ATLANTA,
ORG I A, thus restricting the search further.
The INSTR function can also be used to conserve space
in a program. For example, let's assume your program
contains a menu from which the user is to select an item.
The subroutine might look like this:
2.000
CLS
2010
PRINT
" A -
ITEM ONE"
2020
PRINT
" B -
ITEM TWO"
2030
PRINT
" C -
ITEM THREE'
2040
PRINT
PRINT
1 YOUR CHOICE?"
2050
1$ = INKEY$
: IF 1$ ="'
THEN
2050
2060
ON INSTR("ABC",I$) GOTC
2100
2200,2300
2070
GOTO 2050
2100
PRINT
" YOU
CHOSE ITEM
ONE": END
2 200
PRINT
" YOU
CHOSE ITEM
TWO": END
2 300
PRINT
" YOU
CHOSE ITEM
THREE" :END
Steps 2000-2040 print the menu on the screen. Step 2050
assigns a value to IS equal to the key pressed on the
keyboard (if no key is pressed, it repeats the step until
a key is pressed). Step 2060 determines if the key pressed
is an 'A,' 'B' or 'C If it is one of these keys, the program
will continue with step 2100, 2200 or 2300. If it is not
any of these three keys, Step 2070 will return to the start
of "the loop at Step 2050.
The function can also be used to conserve memory space
by compacting data into strings and later being able to
separate the data. Let's assume you want to add certain
information to the name and address file referred to in
a previous example. In addition to variables NS(l-IOO),
you can also create variables IS( 1-100) to store the added
data, but this will use up a lot of memory. Instead, you
can add the data to variables NS(1-100) using a specific
code in order to indicate where the name and address data
ends and the added data begins.
Let me illustrate how this could be done. Suppose you
want to code each name and address file to indicate whether
it belongs to a friend (code 1), a relative (code 2) or a
business associate (code 3). In addition, you want to indicate
whether a Christmas card was received (code 4), or sent
(code 5).
Here is the way the data could be compacted:
3000 FOR X = 1 TO 100 : PRINT N$(X)
3010 INPUT "TYPE (1-3): ";T$
3020 INPUT "XMAS CARD RECEIVED (Y/N)";I$
3030 IF I$="Y" THEN CR$ = "4" ELSE CR$ = ""
3040 INPUT "XMAS CARD SENT (Y/N)";I$
3050 IF I$="Y" THEN CS$ = "5" ELSE CS$ = ""
3060 N$(X) = N$(X) + "/" +T $ + C R$ + CS$
3070 NEXT X
Step 3060 compacts the data by adding the '/'to indicate
where the name and address ends and the codes start. If
you had indicated that the record was a business associate
from whom a Christmas card was received, it would look
like this:
NAME AND ADDRESS/3 4
To select specific names and addresses through a
subroutine, you have created the variable CIS containing
a '3' and the variable C2S containing a '4' because you
want to search the name and address file to find all business
August 1985 THE RAINBOW 167
Latest Hardware
Newest Software
Technical Sessions
for 6809 & 68000
Meet people making it happen in OS-9. The movers and shakers
who are helping OS-9 become the fastest growing operating
system for the 6809 & 68000 in the world.
Lively and informative round-table discussions v/ill cover the
design and use ofMicroware Software. We'll also discuss OS-9's
dynamic growth from where we are today to where we may be
in the future.
The exhibit area will feature booths from many of the leading
suppliers of OS-9 compatible hardware and software. It's a great
opportunity to increase your skill and knowledge in the latest
microcomputer software technology. Plan to attend — Register
Today!
Seminar only $150 Hotel Package' $350
Location Marriott Hotel, Des Moines, IA
Don't Miss It — Pre-Register Now!
Call 515-224-1929 or Write
MICROWARE SYSTEMS CORPORATION
1866 N.W. 114th St. • Des Moines, IA 50322
— 7mct0tcme>-
'Hotel package includes 3 nights, single occupancy at the Marriott Hotel
and registration lee.
OS-9 and BASIC09 are trademarks ol Microware and Motorola
associates who have sent you Christmas cards, then pi
such names and addresses. Here is what the subrout
would look like in order to accomplish this:
4000 FOR X = 1 TO 100
4010 A = INSTR (N$(X),"/")
4020 IF A = THEN 4060
4030 IF INSTR (A,N$(X) ,C1$)
= THEN 406?
4040 IF INSTR (A,N$(X) ,C2$)
= THEN 406£
4050 PRINT LEFT$(N$(X) ,A-1)
4060 NEXT X
In steps 4010-4020, we find out if the record has b
coded. If the character "/" is not contained in the stri
it means it has not been coded and the program goes
the next record.
In steps 4030-4040, we find out if both codes
contained in the record by examining the charac
contained in variable NS(X) starting at the spot in the rec
where "/" was found. If neither of these codes is fou
the program advances to the next record.
In step 4050 we print the record, except we exclude
character "/" and the codes that follow, only printing
name and address. In other words, we print the left :
of the record up to the character prior to where
is located.
Now, let's complicate this matter further. Let's assi
the name and address record which is all contained i
single string contains a T to indicate separations betw
name, city, state and ZIP code (since you want the c
printed in the usual format rather than in a single li
In this case, NS(X) would look like this:
JOE SMITHS1234 MAIN STREET$ANYTOWN, WI 53533/34
In order to print the record in the regular name i
address format, steps 4045 and 4055 would be added
the subroutine and would look like this:
4045
N=INSTR(N$(X)
,"$»):
IF
N=0 THEN 4050
ELSE
MID$(N$(X) ,N,
1) =
CHR$(13) :GOTO
4045
4055
N=INSTR(N$(X)
,CHR$(13)) :
IF N=0 THEN 4060 ELSE
MID$(N$(X) ,N,
!)=»$"
:GOTO
4055
In Step 4045, we replace each "$" with a charactei
(a carriage return) until all have been replaced. In 5
4055, we restore the "$" in their original spot be:
continuing to the next record.
On the other hand, if you wanted to print the m
and address file in single line format, instead of inser
a CHR$(13) where each "$" is located, just insert a bl
space (either a CHR$(143) or " " would do the trick).
There are many other uses of this function which cc
simplify and compact your programs considerably, I
conserving valuable memory. You should become fam
with it by writing your own subroutines in various forn
and for various purposes. You will soon recognize its m
uses when you sit down to write that huge program i
will do everything for you.
168
THE RAINBOW August 1985
[ARDWARE PROJECT
istall a SHIFT-lock key
n your CoCo's keyboard
The Permanent Shift
By David Geoffroy and Norman Racine
A fter owning a TRS-80 Color
'% Computer for some time, I have
^.discovered a way of modifying
: computer to make the use of
percase lettering more practical.
To use the computer in typewriter
m, as in word processing, I noticed
did not have a SHIFT-lock key, as
es a typewriter. I found it was so
lple to install a SHIFT-lock key I
ndered why I hadn't done it sooner.
For installation, all that's needed is
)ush on/ push off key switch (Radio
ack #275-1565) and two wires. If
sired, connectors (Radio Shack #64-
19) can be installed on the wires to
ike disconnection possible if the
/er is taken off again. (A note of
rning: Modification will cancel your
rranty.)
First, unplug the computer and
nove the screws from the bottom. It
best to turn the computer upside
wn to remove the screws. Next, turn
i computer back over, remove the
/er and unplug the keyboard from
: main board.
There are 16 pins on the keyboard
inector. Pin #3 on the keyboard is
ssing — it is an unused ground. Now
der one end of the wires to pins #8
i #16 of the keyboard.
\fter soldering the wires to the pins,
s necessary to drill a hole in the lid
>avid Geoffroy is a veteran of the
tiled States Air Force. He lives in
■cramento, Calif., and works for the
y repairing traffic signals. He has
meda CoCofor about four years now
d enjoys it very much.
Norman Racine is interested in
rdware and utility programs; he does
sembly language and BASIC program-
ing. He works for National Business
'stems and owns a Color Computer
)
to the left of the left SHIFT key. Due
to a post, the hole cannot be straight
across from the shift key, but will be
just a little up. Also, the keyboard lies
under the lid a little, so don't try to
locate the switch too near the edge of
the opening.
Now that the hole has been drilled,
install the switch. Next, solder the wires
to the switch. It makes no difference
which wire goes where. Now, plug the
keyboard in, put the top back on, install
the screws and it's all done.
The SHIFT-lock key is useful for
upper- and lowercase word processing,
and it is great for listing programs.
When listing programs, type LI ST, push
the SHIFT-lock key and then the enter
key. When the '@' key is pressed, the
listing will stop. By pressing any key
again, and then the '@' key, there will
be a few more lines listed.
A word of caution, though: The
SHIFT-lock key is not labeled, but the
SHIFT-lock key is red and does extend
higher than any of the other keys. With
a little effort it's easy to memorize where
and what the key does.
(For anyone having questions con-
cerning this project, Mr. Geoffroy may
be contacted at 4700 28th Avenue,
Sacramento, CA 95820.)
P1A
6821/2
PB7
KEYBOARD
CONNECTOR
KEYBOARD
LS-LEFT SHIFT
RS-RIGHT SHIFT
SL-SHIFT LOCK
(see article)
August 1985 THE RAINBOW 169
Price Changes
Occur On A
Daily Basis.
Please Call
1-800-343-8841
PRICE BREAKTHROUGH
Price Change
Occur On A
Daily Basis.
Please Call
1-800-343-88^
CO
Super Sale on New Hard Drives
MEGADISK™
Winchester Hard Drive Ready to
run on the TRS 80 Model I/III/IV/4P,
Color Computer, I.B.M.-PC, TANDY 1000,
Max/80.
Software Drivers: LDOS, NEWDOS/80,
DOSPLUS, OS9, TRSDOS 6.0, CP/M, COCODOS
Fully Warranteed
DRIVE A HARD BARGAIN starting at $599.95
Call Toll Free Ordering 1-800-343-8841
High Quality Lowest Price
Drive 0, 1, 2, 3
for the
Color Computer
Starting at $199.95
SOFTWARE SUPPORT, INC
1 Edgell Road, Framingham, MA 01701 (617) 872-9090 Telex-383425
Hours: Mon. ihru Fri. 9:30 am lo 5:30 pm (E.S.T.) Sal. 10:00 am lo 3:30 pin
DEALER INQUIRIES INVITED.
TERMS:
M.C./Visa/Amex and personal checks
accepted ai no extra charge.
Shipping: Please call for amount.
Not responsible for typographical errors.
Prices subject to change.
CANADA
1720 CHARETTE STREET
BUBERNAY. LAVAL, CANADA H7E4L9
(514)662-3227
Service! Service!
All in slock products are shipped within 24 how
of order.
Repair/ Warranty service is performed within 24
hours of receipt unless otherwise noted. We
accept C.O.D., foreign and A PO orders. School
and D&B corporate PO.'s accepted.
TRS/80 Registered Trademark Tandy Corp. Apple Registered Trademark Apple Computer Corp.
IBM-PC Registered IBM Corp. Franklin Registered Trademark Franklin Corp. Max/80 Registered Trademark Lobo
LDOS Reg. Logical System Inc. Dosplus — Micro Systems Software Ncwdos/80 — Apparat
-
Prices Change
Every Day.
Please Call
1-800-343-8841
or Lower Prices.
I PRICE BREAKTHROUGH I
DEALER INQUIRIES INVITED
Prices Change
Every Day.
Please Call
1-800-343-8841
For Lower Prices.
MEGADISKTM HARD DISK DRIVE SYSTEMS TOLL FREE ORDERING 1-800-343-8841
For ih P f IBM/PC Tandy 1000. TRS/80 Models I/III/IV/4P, Compaq, Eagle. Sanyo,
< Tava, PC Workalikes, Color Computers, Heath/Zenith, Max/80
(.Complete with Hardware, Cables, Software and Quikfit Installation
5
10
20
5
10
20
Megabytes Internal Mount .
Megabytes Internal Mount .
Megabytes Internal Mount .
Megabytes External System
Megabytes External System
Megabytes External System
toi
°m
New
tow
ftfc
Streaming Tape Backup System — Internal Or External r? O. starting at
es
starting at $
starting at
starting at
starting at
starting at
starting at
299.95
544.95
799.95
499.95
699.95
999.95
499.95
/IBM/Heath — DOS, 1.0, 2.0, 2.1, 3.0, or later
I TRS/80-LDOS, TRSDOS 6.x, Newdos/80, Dosplus 3.5, CP/M, COCO DOS, Max/80 LDOS, OS9
WARRANTIED — PARTS AND LABOR — 24 HOUR SERVICE — CALL TOLL FREE — 1-800-343-8841
DOS Systems Awn'lable:
FULLY
FLOPPY DISK DRIVES, POWER SUPPLIES AND CABINETS
Out Disk Drives arc UL approved — Our Floppy Drive Cabinets and Power Supplies
are Underwriters Laboratory Listed and have passed the required Federal
Communications Part IS Section B-EMI/RF1 tests.
Warrant) on all disk drives is nne full scar parts and labor. Warranty on floppy disk
drive power supplies is five 15) years. In warranty or out of warranty service is 24 hour
lurn>a>round on all disk drives and power supplies.
Tandnn — Full Height Drives
100-1 Single Sided 40 Ik Bare S125.00
In Case with Power Supply 166.95
Dual Drives in One Cabinet 326.95
100-2 Dual Sided JO tk Bare 162.00
In Case with Power Supply 206.95
Dual Drives in One Cabinet 381.95
Half lli|ih Drives
65-1 Single Sided 40 Ik Bare 122.00
In Case with Power Supply 156.95
Dual Drives in One Cabinet 306.95
65-2 Dual Sided 40 Ik Bare 142.00
In Case with Power Supply 176.95
Dual Drives in One Cabinet 346.95
65-4 Dual Sided 80 Ik Bare 162.00
In Case with Power Supply 196.95
Dual Drives in One Cabinet 356.95
TKAC Half High Drives
55A Single Sided 40 Ik Bare 125.00
In Case with Power Supply 166.95
Dual Drives in One Cabincl 316.95
55B Dual Sided 40 Ik Bare 157.00
In Case with Power Supply 196.95
Dual Drives in One Cabincl 356.95
55F Dual Sided 80 tk Bare 177.00
In Case with Power Supply 216.95
Dual Drives in One Cabinet 386.95
Apple/Franklin Disk Drives
35/40 Track in Case with Cable and Software 159.95
Controller Card for Two Disk Drives 46.95
Combination Price for Disk Drive and Controller 196.95
Commodore Disk Drives , 236.95
Power Supplies and Cabinets 5M# and Hard Drive Systems starting at 42.00
COI.OR COMPUTER DISK DRIVE SYSTEMS AND ADD IN PRODUCTS
40 Track Single Head Drive with Case, Power Supply, Cable
Controller. Instruction Booklet. Diskettes SI 99.95
Above with Dual Drives in One Cabinet 279.95
40 Track Dual Head with Case, Power Supply. Cable,
Controller. Instruction Booklet. Diskettes 239.95
Above with Dual Drives In One Cabincl 369.95
128 Memory Upgrade Kit 129.95
Dual DOS Switch 29.95
With Second DOS System — JDOS. RSDOS. Micro DOS. and Booklet .... 69.95
************ MEGADISK SPECIAL ************
With a 10 megabyte system, you can purchase a complete IBM or
PC compatible host, software and cable for only S15.00!!
P.S. Ask about the MEGAPLEXER.
IBM - PC/XT WORKALIKE
All of our computer, have: 8 slot motherboard. 640K, monochrome adapter, parallel
printer port, 130 won power supply, free software — all with our full warranty.
/PC- 2 Floppy Drives - Monochrome Monitor, MS-DOS Sl.595.00
Color system resolution - 720h x 240v, MS-DOS Sl.995.00
Smeg/XTtra - 1 Floppy Drive ■ Monochrome Monitor. MS-DOS 51.745.00
Color system resolution - 720h x 240v, MS-DOS 2.145.00
lOmcg/XTtra - I Floppy Drive - Monochrome Monitor. MS-DOS 2.095.00
XTtra • Color system resolution - 7201t x 240v. MS-DOS 2.495.O0
20mcg/XTtra - 1 Floppy Drive - Monochrome Monitor. MS-DOS 2395.00
XTtra - Color system. MS-DOS 2.795.00
I nlctnal Tap:.' Backup For Any Of Above systems Add S449.95
PRINTERS
Dot Matrix
Citizen $ Call
Star Micronics
Gemini 120 CPS Near letter quality starting at $259.95
Delta 10/15 160 CPS starting at 424.95
Radix 10/15 200 CPS siarting at 649.95
Panasonic 1090 249.95
Daisv Wheel
Silver Reed 440 80 Column 12 CPS 315.95
550 132 Column 19 CPS 439.95
770 132 Column 36 CPS 895.00
Olympia 132 Column 14 CPS with Form and Tractor 399.95
Apple/Franklin Printer Interface w/Graphics and Cable 84.95
Printer Cables starling at 19.95
Printer Paper — Microperf Edge 1000 Sheets 16.95
MODEMS
S 69.95
Mark XII 1200/300 Baud Autodial
2K4.95
ALL IN-STOCK ITEMS SHIPPED WITHIN 24 HOURS. SAME DAY SHIPPINf J
PROVIDED BY REQUEST WITHOUT ANY EXTRA HANDLING CHARGES.
ELECTRICAL
Surge Protectors — Line Fillers — SL Wabcr — 6 Outlets with Switch $ 39.95
Unintcrruptablc Power Supplies 399.95
MISCELLANEOUS
Diskettes in 10 Pack from $ 10.95
Twoprinl Switches from 99.95
Disk Drive Cables from 16.00
Maintenance Cleaning Kits 12.00
Parallel Printer Bufrcrs BK 149.95
Floppy Disk Drive Cables
1 Drive 16.00
2 Drives 18.95
Heath/Zenith 2 Drive Cables — Shielded 24.95
1985
SOFTWARE SUPPORT, INC
1 Edgell Road, Framingham, MA 01701 (617) 872-9090 Telex-383425
Hours: Mon. thru Fri. 9:30 am to 5:30 pm (E.S.T.) Sal. 10 am lo 3:30 pm
SERVICE POLICY — Our Professional Technical Staff Is Available To Assist You Monday Through Saturday.
WARRANTIES — Up To One Full Year Parts And Labor. Floppy Disk Drive Power Supplies — Five (5) Years.
SERVICE — 24 Hour Turn-A-Round On All In-Stock Parts. Dealer Inquiries Invited. Call 617-872-9090
P.ease Call For Shipping, Toll R^e 1-800-343-8841
Handling And Insurance. Please Call For Our Latest Price Saving Specials.
Not Responsible lor Typographical Krrors.
Prices and Specifications Ma> Chunue
Without No Ike.
Mastering The
DRAW Statement
By Joseph Kola
Rainbow Contributing Edito
We have been working with the
DRAW statement and proving
to one and all that beginners
can master it without special effort.
Today, while you are brimming with
confidence, we will create an interesting
design.
As you work through this tutorial,
do not hesitate to stop and run off on
a tangent when you get an idea. Pursue
it! You can always return to this article
and pick up where you left off. Your
ideas are too precious to relegate to the
back of your mind. Truly, a discovery
you make on your own is more impor-
tant than those which you may glean
from this tutorial.
Key in lines 0, 10, 500 from Listing
1. Look at Figure 1. It is a design
worked out on graph paper. Each box
is one unit long. The star is the point
of origin. You must begin drawing the
design at some location.
At the starting point, go up and to
the right two units, E2. Following
along, you can readily see that to
advance further, you must go right two
units, R2. The next line traces down
and to the right. You might go two
(Joseph Kolar is a free-lance writer and
programmer dedicated to proselytizing
for computers in general, and the CoCo
specifically.)
units, F2. If you do, you have a choice
of traveling in three directions — up
and to the right, E4; down and to the
right, F4; down and to the left, G2.
Although you may create the com-
plete design using any of the three
routes, you are likely to choose E4
followed by R8F4E2R2F2G2L2H2G4L
8H4G2L2H2, returning to the point of
origin (Line 15 of Listing 1).
If you began with E2R2, rather than
stopping at F2, you could have con-
tinued four more units in the same
direction, F4. Put another way, F2F4
or, simply, but no less correct, F6. Using
this alternate routing, R8E6R2F2
G2L2H6L8G6L2H2, brings us to the
starting point (Line 20).
Line 25 creates the same design
another way. First the left unit is created
(trace it out). BR6 moves us to start
creating the large central unit. BR 16
moves us over to create the right un
In order to get back to the startii
location, we must move left as mai
'B' units as we advanced to the rigl
BR6+BR16=BR22. The opposite dire
tion of BR22 is BL22.
Key in Line 15. Type RUN, examin
then hit the break key. Ditto for Lii
20.
Since we plan to use the desij
repeatedly, we can avoid keying t
same line over and over again, whi>
is boring and subject to error. We p
the design into a string and call it wi
the variable, AS. For practice, y<
could do this with Line 15 or 20. T
instructions to CoCo are omitted
Line 25 and the directions are enclosi
in quotation marks (" "). To make ti
line appear on the screen, a new lir
30, is created. This line has the instru
tions to CoCo within quotation mar
172
THE RAINBOW August 1985
Have You Heard About .
Video Plus Interfaces
You can enjoy the crisp display of a
composite video monitor using our
Video Plus interlace. Each is fully
assembled and tested. Installation is
quick, easy and requires no soldering.
Audio output Is also provided.
Don't settle for less than our Video Plus.
All cables are included they have the
easiest installation, and a far superior
picture than any other!
Video Plus I $24.95
interfaces the original model of Color
Computer to any composite video
monitor.
Video Plus IIC $34.95
interfaces the Color Computer II with
either a color or monochrome
composite video monitor. Computer
must have video chip in socket.
Video Plus IIU $34.95
interfaces the newest Color
Computer II with either a color or
monochrome composite video
monitor. Specially designed for those
computers with video chips soldered
rather than socketed.
"1
and Monitors
J
NAP 12" green
NAP 12" amber
$104.95
$109.95
Sanyo Color
This monitor has everything! It includes
color composite video, monochrome &
color RGB, plus audio.
$249.95 plus $15 shipping
% St
the new standard in
communication software!
Smartmodem
Q) Hayes
Color Connection III
• Up to a 42K buffer
• Upload & download of files bigger than
the buffer
• CompuServe's Protocol B!
• XMODEM protocol that downloads &
uploads direct to & from disk
• Automatic XON/XOFF protocol lhat
downloads direct to disk
• Reliable support of smartmodem
features including auto dial/auto
answer for both Hayes compatible and
Radio Shack modems
• Selectable printer baud rates. You can
print the buffer directly from the
program.
• Baud rates to 9600 using the Radio
Shack Deluxe RS232 Program Pack
• Single key macros for often-used
passwords and IDs
• All control characters supported.
Requires 32K Disk $49.95
Computerware is a federally registered
trademark ol Compulerware
DON'T
FORGET!
Personal Time Management
System and Event Recorder
with Memos
Need a helpful reminder of that
important appointment or special
birthday? We all try to plan ahead but
how easy it is to forget a special
occasion or lose the note we jotted
down. You won't forget with Don't
Forget! You'll actually enjoy getting
organized with this personal time
management system. The Macintosh-like
icons (or pictures representing actions)
make entertaining your personal
schedule simple and fun.
With Don't Forget! you can record the
entire year's occasions and daily
appointments ahead. Each day has
spaces for 4 Special Occasions, 2
Memos, and hourly notes for 6 am
through 9 pm. The built-in 51 x 24 upper
and lower case hi-res display makes it
very easy to read.
You can display or print any daily
schedule— or a whole week at a time — so
you'll remember every important event.
You can even print a blank monthly
calendar page with big boxes to scribble
notes in!
So use your CoCo's memory and Don't
Forget! as your personal secretary.
Designed for mouse, joystick, or
keyboard entry.
Requires 32K Disk $32.95
G»*
Aotf
»
• pages or hardware
• over 50 software products
Cf 6 • informative articles & product reviews
• monitors, disk drives, modems, printers, joysticks, & more.
• business applications, OS-9 software, personal productivity
tools, games, & more
send for our free catalog & get $3 off with this coupon.
Call or Write to:
Name
Address
Cily
COMPUTERWARE
(619) 436-3512
Box 668 • Encinitas. CA • 92024
Stale Zip
Yes! Send me your FREE catalog! CoCo
VISA MasterCard
Card * Exp .
Signature
Item
Format
Price
Shipping 6% Calif. Sales Tax
Surface — $2 minimum. COD Add $5
2% for orders over $100 Shipping'
Air or Canada — $5 minimum TOTAL
l_
5% for orders over $100
Checks are delayed for bank clearance
J
* LOCAL * IN •■ LOS * ANGELES *
•232 RemotePlus* b, D..U a*™
*- Requires RS232 Pak or PBJ 2SP
^ Remote Terminal Program
k- Parallel to Keyboard
* No Lott or Garbled Data
** Error Trapping S Software Clock
•s Disable Break Key s InkeyS Support
" Neu> Terminal Program
** Conversation Mode
^ All Ext. & Disk Commands RAINBOW
*s 20 Commands Added
y Perfect for BBS
*■ 4 Version. Incl: Ext., 1.0,1.1 & JDOS
y Much More - Uses 4K
$24.95 + 2.50 S & II »„
^
CERTIFICATION
SEAL
First Come -
First Served
GEMINI 10X
$215.00
DELTA 10
$325.00
AMDEK AMDISK III B
CALL
HAYES 300 SMART
$185.00
E.D.C. carries the most
complete line of software
and hardware in the market.
Green Mountain Micro!!
Computerware (All)
Custom Software (No Disc.)
Key Color Software (Key 264K)
Michtron
Tom Mix (All)
Moreton Bay (More)
Prickly Pear (Colorkit!)
Platinum Software (!)
Softlaw (VIP)
Spectral Associates
Speech Systems (All)
Sugar Software & (Super)
CoCoPro (V2)
Computer Systems Center
Cer-Comp
Metric HJL Elephant
Hayes Teac Star
Interfaces Monitors Controllers
Speech Music
ALWAYS MORE AND BETTER
SUMMER SPECIALS
Music/Speach Synthesis CALL
COLOR & MICRO COMPUTERS
Software • Hardware • Support
Educational • Small Business • Games
VOICE (2131 254-6809 10 A.M.-10 P.M.
BBS (213) 258-0640 24 HRS.
300 and 1200 Baud
Extended Hours+Call before coming.
6130 YORK BOULEVARD
POST OFFICE BOX 42718
LOS ANGELES, CA. 90042
(" "), telling CoCo where you want the
design to appear and in what size.
Concatenating '+,' A$ tells CoCo what
design to display.
Key in Line 30, type RUN, check and
then hit the BREAK key. Key in Line
40. This demonstrates how AS is used
to put a design element above the three
on the screen and one below them. Now,
we have five designs in a column.
Suppose we add a design at the left
side. Key in: 50 DRAW"BM50,70"+A$
and type RUN. This location was a lucky
guess! It connects nicely. We'll make
two more units underneath which give
us a total of three design units. Then
we'll make a unit farther to the left.
This means the next row will have two
units side by side; one beginning at
horizontal, 0, and the other at 50. Hit
the BREAK key and add to the end of
Line 50 :DRAW"BM0,90"+A$+"BR
25"+A$ and RUN.
If you left out +"BR25", you would
have lost the second unit. Delete it and
see! Do you know why?
The first AS at "BM0,90" ended at
49,90. If you merely added another
+ AS, it would print in the same location.
How could you solve it? Move the
starting location over by inserting
+BR25 between the ASs.
Can you think of another way? If you
edited out BL22 from the end of Line
25, and RUN, you will note that it must
be pushed to the right to avoid overlap.
If you added BR3 to the end of Line
25, it would be just right. Try it and
see! Then hit the break and change
BR3 back to BL22.
Add to Line 50 :DRAW"BM50,
110"+A$ and RUN. It is decided to have
five columns, which will begin at
horizontal 0, 50, 100, 150, 200.
Why did we have to move "BR25"
rather than the "BR50" that you would
expect? Change the +BR25 to +BR50
and see the second AS disappear. Now
RUN. What happened?
Moving it over 50 units printed it over
the middle piece. Hit the BREAK key.
To see that this is so, change +BR50
to +BR49 and RUN. Can you see it now?
Hit BREAK and change it to +BR25.
Change the size in Line 30, S8, to
S4 and RUN. Now change +"BR25" to
+"BR50" and RUN.
In other words, size S8 is twice the
size of S4, so the design needs to be
moved over half the number of units
required in S4. We don't really care why
CoCo does what it does. All we want
to know is what it does.
Hit the BREAK key and change L
30 back to S8 and Line 50 back
+"BR25".
Whether or not you understand w!
the correct shift is matters little. Y
can always work it out by trial and er
to get the solution.
Without peeking at the listing, c
you add four units to the right side
make it a symmetrical display? Trj
and see (Line 60).
Suppose you wanted to make f
design units across the top of the sen
at horizontal 10. Line 70 shows c
way.
Suppose you wanted to make
similar five units at the bottom to ke
the symmetry of the display. Line
shows you a second way.
The technique in Line 80 is long
but it is easy to figure out. Althou
not as elegant as the solution in Li
50, it is perfectly adequate. Just as lo
as the result is satisfactory, any meth
is fine.
Line 70 was a little tricky. O/S (C
of String Space) error message fore
us to insert a pair of DRAW stateme
to overcome this problem.
This could be partially overcome
adding 5 CLEAR 500. When plann;
to use strings, play it safe and CLE
500.
Finally, in Line 70, if you change
first ':' to '+' and delete DRAW, you v
find it OK. But, if, in addition, y
change the second ':' to '+' and del
DRAW, you will get an L/S (String T
Long) error message.
It is time to introduce the 'A' opti
of DRAW. The 'A' option allows you
draw a design around a point (locatio
A0 prints the design as you conceiv
it; Al prints it from the same starti
point but 90 degrees clockwise, perpe
dicular to A0 but above it. A2 prii
a further 90 degrees clockwise, radiati
in the opposite direction of AO; ,
places it 90 degrees further along ir
clockwise direction to be opposite t
perpendicular, Al
This may sound confusing but it
well worth the effort to add this feati
to your store of useful knowledge.
Key in lines 0, 5, 10, 20, 500 frc
Listing 2. Notice that Line 20 dra
the same element used in Listing I.
you trace it out on graph paper, y
will discover that the starting point
at the opposite end.
The object is to give you plenty
174
THE RAINBOW August 1985
CoCo's Best & Fastest Spreadsheet System
ACCLAIMED BY THE EXPERTS
"DYNACALC is my choice for a CoCo spreadsheet,"
Dan Downard, RAINBOW, September, 1984.
RAINBOW
CERTIFICATION
SEAL
"Eat your heart out, Lotus 1-2-3!"
Scott Norman, HOT CoCo, October, 1984.
Built-in Features:
• 51 x 24 Display with Lower Case
• Super-fast Smart Screen Refresh
• Auto-Repeat Keyboard Driver
• Keysaver (TM) repeats last command x times
• Disk Operating System (works just like ROM DOS)
• Easy communication with BASIC/DOS programs
• Two-way communications with PRO-COLOR-FILE • Enhanced*
• Outputs to ASCII Word Processors like Telewriter-64
• Fast 16-Digit Arithmetic with Scientific Functions
• Summation, Mean, and Standard Deviation Functions
• Logical Functions with String & Numeric Comparison
• String locate command to navigate large worksheets
• Sort full or partial worksheet by columns or rows
• Line, Bar, Hi/Lo/Close, Circle Graphs
• Full Graphics captioning and overlay facility
• Graphics Drivers for all popular Printers
• Joystick/Mouse Driver for Cursor Movement
• Works with any ROM versions, even JDOS
• 33k Available Worksheet Space
• Up to 256 Columns or 256 Rows
• Can use VisiCalc worksheets & training materials
• On-screen Help Messages
FOR 64K DISK SYSTEMS
available from
NOW
ONLY
$9995
<£%&»
tf**
560
now with
GRAPHICS!
Jun Jul M'.'9 i-P dct Row Ik
%
CANADA-CDN $129.95
DATAMAN international
420 FERGUSON AVE. N.
HAMILTON, ONT L8L 4Y9
(416) 529-1319 AUSTRALIA
PARIS RADIO
161 BUNNERONG RD.
KINGSFORD 2032 NSW
(612) 344-9111
COMPUTER SYSTEMS CENTER
42 Four Seasons Center #122
$&** f. Chesterfield, MO 63017 USA
JB&52— (314) 576-5020
10 to 6 Mon.-Fri.
or your local DYNACALC dealer
Price US$99.95
Outside North America add $10 postage
DYNACALC Reg. U. S. Pat. Off.
Lotus and 1-2-3 are trademarks of Lotus Development Corp
PRO-COLOR-FILE is a trademark of Derringer Software
Telewriter-64 is a trademark of Cognitec
VisiCalc is a trademark of VisiCorp.
practice creating a familiar design and
stimulate you to go off into uncharted
territory.
Key in the first part of Line 30:
30DRflW"S4BM128,9S"+fl$ and RUN.
You should have the same old design
unit. If in doubt, hit the BREAK key
and temporarily change S4 to S8. Now
RUN and you will be able to see it better.
When your design is OK, change back
to S4. After S4 insert A0, the first 'A'
option. This is the default option. You
get it whether you like it or not, unless
you advise CoCo otherwise. RUN.
Now, change AO to Al and RUN. See?
It is perpendicular. Do the same to get
A2 and A3 to see all four possible
options at work. If you have trouble
visualizing the rotation, temporarily
add:
25 LINE (128,0) -(128, 191), PSET
Run through the 'A' options a few
times to observe what is what. When
you are satisfied, delete Line 25. Did
you notice that AO radiates out to the
left of the starting location; Al radiates
upward; A2 radiates to the right and
A3 radiates downward in this example?
Hit the BREAK key. Make sure that
Line 30 is AO and add at the end of
it, +"fll"+flS. We told CoCo, in
addition to the original design element,
we also wanted one radiating upwards.
VIZIERJW ™
INTERACTIVE DKiWINC M>«KD
GftMPMIC DISTLJTV PKCtfSSOK
The largest worK »re* of al
graphics programs for your
COCO C448x488 pixels) a
full 7" « 7" dunp from your
printer' ■' Uhy settle for
newsletter with 34 font. seU
Radio ShacK LP 8 formats ,
less area'? Great for composing that special
that co»e on disK or tape. Printer options:
C-Itoh Prowriter CNEC), EPSOH and GErttKI IB - 10X. You can put graphics
in any part of the worK area' This ad composed on VIZIDRAW.
SPECIAL OFFER - OBttEB THIS MONTH AND GET CLIP DISK 1 t 2 FOB
ONLY SI* • ■
PLEASE SPECIFY DISK OR TAPE-.S49.9S «■ S2 POSTAGE
UXTM CLIP OTSK J S * SHFCTAL OTrEB SS9. 9S * £2 rVSTltGE
Now you can run your COCO-MAX with your Radio
ShacK X-PAD. tUKes Colorwrs's CCCO-nAX in
even better graphics program.
DISK VERSION ONLY S14.9S PPD .
YOU ASKED FOR IT! By popular
de*and , we are now offering disK.s
with clip art.
SPECIAL- DISKS1 X S2..S19.9S PPD .
Connects to the RS-232 port of your
COCO, no need for y-cahles or wlll-
packj ' TAPE or DISK version lfaK to 32k .
Cones with software that you can modi-
fy to your needs .
VIDX-1 S99.9S * S3 postage
VIDX-2 S124.9S * S3 postage
VXDX-^ nar Kb-^*S rwiicher
Read all 4«,15fr '.256x192: pixels on
your COCO. Corrects to thr RS-Z32 port
of youi ronpulw . Run VIl-X with ORAFPAX
and touch those pictures up without
Qoiriq to another oraphics prooran*
GRAfPAX »lth G.O.S SS9.95
plus S2-SO postage
afaacc, cod™*
SIMP FOR OUR SO* IUAKL/DIGI T1ZED
iiVBea eaaa byup p
8 -64K RAM CHIPS .. .S19.9S «S2
DSS DISH CUrHROLLER. ..
UITH 1.1 DOS.. sue • S2
U1IHOU1 [>;.-!,... '.. IDS • S2
PICTURE DISK ONLY S? . SO. SEE
687be.C CPROfTb
, .514 .9S
SI
SAMPLES OF UHA! OUR SOFTUARl DOES
TO PLACE YOUR ORDER SEND CHECK OR 11.11.
n it A f x
PO BOX 2B4
UEST nlFELIH, PA 1S1Z2-82S
VOICE 41? 4fe(, «,•><< <G-9 PH>
24 HR B8S COCOHCT 412 744 233S
:m» i?oo baud nooFn OML ihi
YO»l CAM UIIM IMC IREF D1GIIIZID P1X
Now, RUN and hit the BREAK key.
Let's tell CoCo to add the a>
element to radiate to the right. Add
Line 30 + "A2"+fl$, RUN and hit
BREAK key. Now, add and check
last option. Did you note when )
instructed CoCo to change the ori
tation of the design element that
information must be enclosed in q
tation marks (" ")?
Caution: AO is not necessarily in
same quarter (radiating left), but co
be in any location depending on the c
in hand. Anyway, it isn't a bad desi
What else can we do?
You could create more designs on
blank parts of the screen. Hint: Choi
an arbitrary set of location poii
BMx,y and after you create the eni
design, move it over to its final rest
place by trial and error.
"We don't really care
why CoCo does what i
does. A 11 we want to
know is what it does."
Why do I frequently insist on ti
and error? According to "Kolar's La>
no matter how well you calculate a pi
it rarely is correct because you are ;
to make changes, modifications
enhancements, throwing your figu
awry. So, you may just as well ease y(
design into its berth. Visualize a bur
of tugs nudging and pushing an oct
liner into its berth. Push a little t
way. Nudge a bit that way. Ease it ii
its dock.
Key in Line 50. We want to sup
impose the same enlarged design o'
our creation. RUN and check. If you ;
curious, you could add one 'A' opti
at a time. Note that once you use
'A' option, every time you chai
options in each new DRAW line you m
indicate an option, even AO, the defa
option.
To illustrate the concept, delete
in Line 50 and RUN. Sorry about th
What happened was that the 1
instruction CoCo received was A3
the end of Line 40. It began Line
with the downward design; then I
upward; the right; and again, downwa
176
THE RAINBOW August 1985
:reated A3, the downward element,
ce. Of course, you could change A3
AO in Line 50 and correct it. Now,
■ou RUN, you will see that the second
wnward element is facing left. But,
't it easier to insert the AO in the
it place?
\t any rate, we have a pleasing
;ign. But, since we superimposed S12
,ts over S4, what do you say we super-
pose S8 on the whole mess and see
at we come up with?
Ley in Line 60 and RUN. It is really
a repetition of the design in Figure 1
rotated in four directions in three sizes.
As a point of information, the
instructions to CoCo could be in any
order. Line 60 could have been written
"BM12B,9GS8R0C1", just so all the hot
scoop was enclosed within quotation
marks (" ")• CI is the default color and
is included just to illustrate the point.
Line 40 was not used. It was included
for you to substitute it for AS and cycle
through the 'A' options to reinforce in
your mind what happens when the basic
element is radiated right instead of left.
Notice that what was A2 using AS is
now AO using BS.
This tutorial should have given you
food for thought. You are invited to
get out the old graph paper, plot out
your own design element and run it
through its four 'A' option paces.
Create! Experiment!
CSflVE a copy of Listing 2 for next
month. We will add the same design
unit in the four diagonal directions, H,
E, F and G.
.istingl: LISTING 1
"LISTING1
5 CLEAR 500
10 PMODE4,l:PCLS:SCREENl,l
15 DRAW"S8BM100,70E2R2F2E4R8F4E2
R2F2G2L2H2G4L8H4G2L2H2 "
20 DRAW"S8BM100,90E2R2F6R8E6R2F2
G2L2H6L8G6L2H2"
25 A$="E2R2F2G2L2H2BR6E4R8F4G4L8
H4BR16E2R2F2G2L2H2BL22"
30 DRAW ,, S8BM100,110 ,I +A$
40 DRAW"BM100 , 50"+A$ : DRAWBM100 ,
130"+A$
50 DRAWBM50 , 70"+A$ : DRAWBM0 , 90"
+A$+"BR25"+A$:DRAW"BM50,110"+A$
60 DRAWBM150 , 70"+A$ : DRAWBM150 ,
90"+A$+"BR25"+A$ : DRAWBM150 ,110"
+A$
70 DRAWBM0 , 10"+A$+"BR25"+A$ : DRA
W"BR25"+A$+"BR25"+A$:DRAW"BR25"+
A$
80 DRAW"BM0 , 170 "+A$ : DRAWBM50 , 17
0"+A$ : DRAWBM100 , 170 "+A$ : DRAW'BM
150,170"+A$:DRAW"BM200,170"+A$
500 GOTO500
Jsting 2: LISTING 2
'LISTING2
5 CLEAR500
10 PMODE4,l:PCLS:SCREENl / l
20 A$="H2L2G6L8H6L2G2F2R2E6R8F6R
2E2"
30 DRAW"S4A0BM128 , 96"+A$+"Al"+A$
+"A2"+A$+"A3"+A$
40 B$="E2R2F6R8E6R2F2G2L2H6L8G6L
2H2"
50 DRAW"S12A0BM128 , 96"+A$+"Al"+A
$+»A2"+A$+"A3"+A$
60 DRAW"S8A0BM128 / 96"+A$+"Al"+A$
+"A2"+A$+»A3"+A$
500 GOTO500
Listing 3: SHUTTLE
• SHUTTLE
10 '(C) 1984, J. KOLAR
30 PMODE3:PCLS:PMODE4
40 A=90:B=86:R=76:P=1.70
50 DIM S(7) ,T(7)
60 CIRCLE (8, 8) , 8 , 1 : CIRCLE (7 , 7) ,8
,1
61 DRAW"BM8,8NBU3L6U5R10D10L10U5
ii
70 GET(0,0)-(16,16) ,S,G
72 CIRCLE(38,8) , 6 , 1: PAINT (40 , 8) ,
1,1
73 GET(30,0)-(46,16) ,T,G
80 PCLS: SCREEN 1,1
90 FOR Q=.15 TO .05 STEP -1
100 F0RZ=1T06.55 STEPQ
110 C=Z:C=40-(C)*P*270-R A 2
115 K=LOG(C A 2)*COS(R)/COS(R A 2)
120 X=INT(A-6+R*COS(C) ) :Y=INT(B-
8+R*SIN(K))
130 PUT(X+36,Y+10)-(X+52,Y+26) ,S
,OR
135 PUT(X+36,Y+10)-(X+52,Y+26) ,T
,AND:SOUND100,1
140 X=INT(A-6+R*SIN(K) ) :Y=INT(B-
8+R*COS(C))
150 PUT(X+36,Y+8)-(X+52,Y+23) ,S,
OR
155 PUT(X+36,Y+8)-(X+52,Y+23) ,T,
AND:SOUND100,1
160 NEXT Z,Q
170 PLAY"V20O3L8EEFFABO4L16CCO3F
AL8FFAAL4FEL2CP4V25L8FFAAB04CL16
EEDDL8CCO2AAL4FEL2CP4V20O2L8EEFF
AAO3V25L16CCO2BAV20L8FFDDL4CV15O
1B02DL2C"
180 PCLS:GOTO90
/»
August 1985 THE RAINBOW 177
Robert Centurelli
Skyline
This month's first prize winner is a serene
reflection of the Big Apple drawn using
Graphicom II. Robert lives in Plainville,
Conn.
John Poole
A Reef Scene
From Titusville, Fla., John sends the
Gallery a subaqueous second prize
winner drawn using Graphicom II 's pan
and zoom mode.
[3rd
P
R
I
Z
E
Jeff Steinmetz
Shuttle
Jeff lives in Minneapolis, Minn., and used
CoCo Max to draw a profile of the Space
Shuttle using the upper and lower
portions of the CoCo Max screen.
178
THE RAINBOW August 1985
sharlie Fulp
2ompuWar
Charlie drew the grid and light cycles of
his futuristic warscape using Extended
iasic. The tank and spheres were drawn
ising CoCo Max. Charlie lives in South
Joston, Va.
SI 111 fLE SKYLINE
Betty Ann White
Seattle
Betty Ann used the draw, line and print
commands of PM0DE4 to create this
stylized portrait of the Emerald City's
skyline on a sunny day. Betty Ann lives
in Kirkland, Wash.
'.'■■.'.'. ••'.'.*•* Il t. , .v.v. , . , . , . , . , . , . , .'.'. , . , .'. , . , . , . , .'I , . , I , I". - .'
Send your entry on
either tape or disk to:
CoCo Gallery
THE RAINBOW
P.O. Box 385
Prospect, KY 40059
Attn: Monica Dorth
Be sure to send a cover letter with your name, address
and phone number detailing how you created your picture
(what programs you used, etc.), how to display it and a
few facts about yourself.
Please don't send us anything owned by someone else;
this means no game screens, digitized images from TV
programs or material that's already been submitted
elsewhere.
We will award a first prize of $25, a second prize of $15
and a third prize of $10. Honorable mentions also will be
given.
August 1985 THE RAINBOW 179
RAINBOW
us your best: Join the ranks of these courageous CoCoists in showing the Color Computer world
your high score at your favorite micro-diversion. We want to put your best effort on record in THE RAINBOW'S
Scoreboard column. All entries must be received 60 days prior to publication. Entries should be printed
— legibly — and must include your full name, address, game title, company name and, of course, your
high score. Each individual is limited to three score entries per month. Send your entries to Scoreboard,
c/o the rainbow. * Current Record Holder
ASTRO BLAST (Mark Data)
35.600 *Chris Morris. Colonial Heights. VA
ATOM (Radio Shack)
41 *Erik Huffman, Delran, NJ
BASEBALL (Radio Shack)
535-50 *Bob Oewill, Blue Island. IL
BATS AND BUGS (THE RAINBOW)
24,600 *Michael Rosenberg, Prestonburg. KY
8.450 Bill Mnnm, Myrtle Beach, SC
7,200 Lezleo Bishop, Salt Lake City, UT
5,220 Brian Cook, Dixon, IL
4.000 Jon Hobson, Plainfield, Wl
BATTLE OF MIDWAY (Ark Royal)
1009:259 *Matt Hazard, Columbia Station. OH
BLOC HEAD (Compulerware)
41,975 *Miohael Hebb, Victoria, Australia
27.000 Rodney Mullineaux, Gig Harbor. WA
23,500 Paschal Wilson. Kenlwood. LA
BREWMASTER (NOVASOFT)
98,875 *Chri9 Cope, Central, SC
9,150 David Hart, Salt Lake City, UT
BUSTOUT (Radio Shack)
15.520 *Brett DuPont, Oregon. OH
14,500 Wayne Oewitt, Blue iBland, IL
13.500 Ken Dewltt. Blue Island. IL
BUZZARD BAIT (Tom Mix)
3,091,700 *Blossom Mayor, East Greonbush, NY
CALIXTO ISLAND (Mark Data)
115 *Glenn Dolla-Monlca, Sacramento, CA
CANYON CLIMBER ( Radio Shack)
288,800 *Beverly Herbers, Placontia, CA
162,500 Michael Sileo Jr., Glendale, NY
140,500 Todd Wall, Durham, NC
128.200 Stephana Asselln, Bale-Comeau,
Quebec
8,900 George Frausto. Blue Island. IL
CAVERN COPTER (THE RAINBOW)
2,431 *Jay Beam, Louisville. KY
1,535 Pierre-Jean Doulllard, Granby,
Quebec
1,245 Sean Conner. Summit, NJ
1 ,213 Doug Schwartz, Glendale, AZ
968 Michael Mefferd, Wren, OH
CHAMBERS (Tom Mix)
104,200 *Blossom Mayor, East Greenbush. NY
CLOWNS & BALLOONS (Radio Shack)
15.130 *Brett DuPont. Oregon, OH
COLOR BASEBALL (Radio Shack)
668-0 *Christian Roch, Granby, Quebec
254-0 Chris Reynolds, Richmond, KY
250-0 Rob Mowery, Robinson, PA
167-0 Keith Townsend, Kokomo, IN
158-0 Bart Ankrom, Atlanta, KS
158-0 Toby Jacobs, Bellefontalne. OH
COLOR CAR (NOVASOFT)
525.650 *Dan Bouges. Niantic, CT
154,600 Scott Cunningham, East Lyme, CT
COLORPEDE (Inlracolor)
133.036 *Mariano Frausto, Blue Island, IL
23,450 Georgo Frausto, Blue Island, IL
COSMIC INVADERS (Spaclral Associates)
16,400 *Mariano Frausto, Blue Islsnd, IL
CRYSTLE CASTLES (ThunderVision)
83,297 *Craig Hoffmann, Kenosha, Wl
CLTBER (Tom Mix)
19,550 *Rodney Mullineaux, Gig Harbor, WA
DALLAS QUEST (Radio Shack)
93 #Robert Sunderland, Sacramento, CA
DEFENSE (Spectral Associates)
56.720 *Brett DuPont, Oregon, OH
DEMOLITION DERBY (Radio Shack)
119.800 *Dovld Oelhaupl, Calgary. Alberta
109.100 Charles Bowen. Imperial Beach, CA
79,100 David Close. Springfield. VA
44.000 Joseph Dehn, Tucson. AZ
32.900 Les Dorn, Eau Claire, Wl
DEMON II (THE RAINBOW)
21,925 -■ it. Schuler, Merritt Island. FL
12,475 Rhett Bagnall, Saskatoon.
Saskatchewan
10,075 Frank Canepe III, Santurce,
Puerto Rico
1.800 Bryan Ecker, Lusby, MD
DEVIL ASSAULT from Mix)
64.741 *Eugene Little, Piorcalend,
Saskatchewan
DOODLEBUG (Compulerware)
825,370 *Susan Bellinger. Uxbridge. Ontario
66,770 Sean Colsen, East Lyme, CT
DOUBLE BACK (Radio Shack;
337,990 *John Denn, Hobarl, IN
286,570 Timothy Bishop, Jacksonville, FL
268,350 Marc Ploulfe. Willlston, VT
258,400 Alfredo. New York, NY
235.1 10 Les Dorn, Eau Claire, Wl
219,720 Jeff Lahale, Essex Jet., VT
181.150 Michael Brennan, Calgary, Alberta
DOWNLAND (Radio Shack)
20,900.400 *Adam Petersen, Portland, OR
68,345 Alain Cyr, Valcourt, Quebec
67,456 Chris Mitchell, Byron, GA
67,141 Cliff Farmer. McGregor, TX
66.145 Jeanine McCuen, Rutland, MA
DRACONIAN (Tom Mix)
35B.550 *Jamle Sprang, Dartmouth, Nova Scotia
241 ,290 Kristopher Staller, Ft, Wayne, IN
206,240 Joe Neuman, Sacramento, CA
136.400 Tony Cross. New South Wales,
Australia
FOODWAR ('Arcade Animation)
165,960 *Chris Cope, Central, SC
74,120 Jim Partridge, Clinton, CT
FROGGER (Cornsolt)
15,860 *Erlk Huffman, Delran. NJ
12.000 Nicole Freedman, Wellesley, MA
GALAGON (Spectral Associates)
219.670 *Brian Wagner, Lawrence, KS
214,920 Tony Smith, Gig Harbor, WA
185,740 Arnold Snitser, Los Angeles, CA
144,710 Brendan Smith, Coral Springs. FL
135.180 Mario Asselln. Baie-Comeau. Quebec
97,790 Miriam Kavis, Los Angeles, CA
GHOST GOBBLER (Spectral Associates)
48,200 *Steven Allen, Sharpsburg, MD
34,270 Glen Bilodeau, Otterburn Park,
Ontario
32,260 Jean-Pierre Boisclalr, Asbestos,
Quebec
GLAXXONS (Mark Data)
19.146 *Terry Moore, SI. Catherines, Ontario
GOLD RUNNER (NOVASOFT)
144,150 *Chris Cope, Central, SC
65,800 Dan Bouges, Niantic, CT
65.800 Sean Colsen. East Lyme. CT
GUARDIAN (Quasar Animations)
4,350 *Jason Forbes, Moxico, NY
ICEMASTER (Arcade Animation)
14,525 *Jean-Plerre Boioclair. Asbestos,
Quebec
THE INTERPLANETARY FRUIT FLY (THE RAINBOW)
37.000 *Scott Perkins. Port Orange. FL
27.500 Le3 Dorn. Eau Claire, Wl
26,000 Eric Foss, Cochrane, Alberta
25.500 Michele Gaborlault, Foxboro. MA
25.000 Andrew Bartels. Sulphur. OK
THE JUNGLE (THE RAIN80W)
668.690,000 *Jolf Lawrence, Cambridge, Ontario
459,351.041 Denise Morln. Hudson. MA
4,560.144 Jon Hobson. Plainfield, Wl
4,134,000 Brandon Duncan, Benton. KS
1,659,162 Jay Andraschko, Yuma, AZ
JUNIOR'S REVENGE (Compulerware;
8.020,000 #lan Stewart, Lynwood, Perth-Australia
3,386,000 Chris Morris, Colonial Heights, VA
786,300 Richard Wiseman, Marion, OH
205,700 Tony Smith. Gig Harbor, WA
112,300 Jeff McClure, Weshington, PA
JUNKFOOD (THE RAINBOW)
1,187,520 *Larry Thomson, Menominee, Ml
1,079,600 Jean-Francois Morln, Lorettevllle,
Quebec
338,930 Jon Hobson, Plainfield, Wl
309,460 Shirley Black. Quinton, AL
206,940 Rhett Bagnall, Saskatoon,
Saskatchewan
119,200 Annemarle Stoer. Deventer,
The Netherlands
112,720 Jamie Spreng, Dartmouth, Nova Scotia
KATERPILLAR II (Tom Mix)
156.317 *Uwe Steingens. Essen, West Germany
135,467 Thomas Tiggelbeck. Essen,
West Germany
97.735 Sabine Bergholz. Essen, West Germany
KEY BOMBER (THE RAINBOW)
29,052 *Tony Boring, Armagh, PA
THE KING (Tom Mix;
1 ,670,900 *Yolanda Farr, Sayre, PA
1,003.400 Tim Rueb, Atlanta. GA
543.400 Doug Tower. Colonial Heights, VA
337.800 Kirk Carter, Cooper City, FL
301,100 Tom Harrison, Pittsfield, MA
26.450 Ken Dewltt. Blue Island. IL
KRON (Oregon Color Computers)
33,000 *Chris Cope, Central, SC
LANCER (Spectral Associates)
224,000 *Tom Mahoney, Centerport, NY
208.350 David Carver. Galena, OH
165,750 Glenn Dolick, Burlington, Ontario
162,300 Bryan Bell. South Lyon, Ml
157,500 Dan Bouges, Niantic, CT
1 10,350 Chip Beasley, Colonial Heights, VA
LASERWORM S FIREFLY (THE RAINBOW)
25.776 *Jason Forbes, Mexico. NY
19,780 Jim Partridge, Clinton. CT
13,834 Dean McWhorter, Argyle, NY
LUNAR-ROVER PATROL (Spectral Associates)
136,700 *Lori Day, Arlington, TX
MADNESS & THE MINOTAUR (Radio Shack)
240 *Chris Mitchell, Byron, GA
MARATHON (THE RAINBOW)
307,790 *James Sheedy III, Tonawanda. NY
MAZELAND (Chromesette)
21 ,060 *Todd Knapp, Prairie du Chien, Wl
8,550 Brian Cook. Dixon, IL
MEGA-BUG (Radio Shack)
7,930 *Ron Haines, Nepean, Ontario
3,998 Christopher Romance, Massapequa
Park, NY
3.693 Jim Partridge, Clinton, CT
1 ,085 Larry Cowles, Westport, WA
MICROBES (Radio Shack)
491,100 *David & Alan Heckler. Hartselle, AL
237,560 Todd Bartels. Coal Valley, IL
178,550 Apollo Latham. Rich Square. NC
144.350 Theodore Latham Jr., Rich Square. NC
101.960 David Barnekow, Elkhorn, Wl
97,950 Ivan Catlett, Laguna Hills. CA
MISSILE BARRAGE (THE RAINBOW)
2-1 * Joe Caicaterra, Ridgewood, NY
MONSTER MAZE (Rad/o Shack)
316,000 *Mohamed Behery. Clemson, SC
215,110 Sloven Allen, Sharpsburg, MD
205.180 Richard Fiore, Clemson. SC
200.020 Terry Steele, Summerfield, NC
200.000 Jason Pelfrey, Germantown, TN
75,230 Ivan Catlett. Laguna Hills, CA
••••••••••••••••••••••••••••••••••••:
180
THE RAINBOW August 1985
************************************
SCOREBOARD
>ON HOPPER (Computerware)
60.280 *Rodney Mullineaux, Gig Harbor, WA
I. DIG (Computerware)
259,750 *Ellen Ballinger, Uxbrldge, Ontario
100,650 Biagio Di Lorenzo, Montreal, Quebec
001,100 Ross & Daniel Mehlman, Todd Boehm,
Nashville, TN
875,870 Ann-Marie MacKay, Port Hardy,
British Columbia
520,650 Thomas Henry, Boca Raton, FL
531 ,570 Tony Cross, New South Wales,
Australia
lDPIES(A(tan7Von)
981,700 *Jon Blow, San Diego, CA
345.100 Brian Wollgram, Freeland, Ml
285.600 Stephen Zamonski, Ewing, NJ
1 37,000 David Craft, Roanoke. VA
1 14,800 Barry Stanton, North East, PA
•THOUSEfMichTronJ
23,730 *Brian Wollgram, Freeland, Ml
14,663 Aaron Repath, Tucson, AZ
.C-TAC (Computerware)
14,425 *Alfredo. New York, NY
NGUIN (THE RAINBOW)
48,250 *Paul Wagorn. Carp. Ontario
26.330 Kirby Smith. York. PA
22,670 Gary Bedlord. Piqua, OH
14,550 Matt Funk, Hanover, PA
14,540 Michael Nelson, Lancaster, PA
IANTOM SLAYER (Med Systems)
1,326 *Susan Ballinger. Uxbridge, Ontario
124 Chris Morris, Colonial Heights, VA
*ELINE (THE RAINBOW)
1,332 *Kent Prehn, Carol Stream, IL
1,162 Mike Garozzo, Morrisville, PA
925 Andy Green, Whitehall, PA
483 Susan Ballinger, Uxbridge. Ontario
405 Joe Bironas, Crestwood, KY
ANET INVASION (Spectral Associates)
59,600 *Terry Steele, Summerfield, NC
52,450 Ian Loeppky, Blumenort. Manitoba
32,350 Susan Ballinger, Uxbridge, Ontario
10,750 Saul Klrsch, Ra'anana, Israel
8.950 Michael Derman, Tel-Aviv. Israel
)LARIS (Radio Shack)
171.862 *Thomas Levasseur, Rockland, ME
133,726 Ed Meyer, Vancouver, British Columbia
112.535 Brett Ankrom. Atlanta, KS
97.450 Jay Beam, Louisville, KY
87,910 Ron Sujkowski, Bay City. Ml
>LTERGEIST (Radio Shack)
6,000 *Billy Fairiull, Charleston, SC
4,900 Kristine Haines, Nepean, Ontario
4,885 Frank Canepa III, Santurce,
Puerto Rico
4,830 Lisa Ballinger, Uxbridge, Ontario
4,830 Joel Peacock, Thousand Oaks, CA
4,200 Bryan Ecker, Lusby, MD
30YAN (Datasolt)
,785,000 *Ben Collins, Clemson, SC
,546.000 Jell Connell. Winona, MN
,250,350 Richard Hawkins, Cleveland, TN
978,450 Christopher Romance. Massapequa
Park, NY
900,250 Daniel Belisie. Montreal, Quebec
140,450 Beverly Herbers, Placentia, CA
1 1 1 ,000 Nancy Herbers, Placentia. CA .
80.150 Bart Nigro. Tempe, AZ
8,500 Hiram Esparza. Blue Island, IL
4.600 George Frausto. Blue Island, IL
3PCORN (Radio Shack)
45,210 *Mike Norris. Columbia, SC
41,910 Nicole Fraedman, Wellesley. MA
36,500 Barry Stanton. North East. PA
34,900 William Blaine III. Gallipolis
Ferry, WV
32,430 Chris Bosl, Temple, TX
26,360 Ivan Catlelt, Laguna Hills, CA
16,490 Frank Wood III, Niverville, NY
HOJECT NEBULA (Radio Shack)
2,005 ^Christopher Romance. Massapequa
Park, NY
YRAMID (Radio Shack)
220/1 12 *George Fairfield. Victoria,
British Columbia
220/112 *David Oelhaupl. Calgary, Alberta
220/114 Chris Mitchell. Byron, GA
Q-NERD (TH# RAINBOW)
1,958,950 *Bruce Baltzer, Hanover, Ontario
61,290 Sean Conner, Summit, NJ
QUIX (Tom Mix)
907,320 *Andrew Norrie, Mississauga, Ontario
525,633 Clayton Foxworth, Florence, SC
447,353 Stephane Asselln, Baie-Comeau,
Quebec
323,373 Jean-Francois Lauzier, Asbestos,
Quebec
271,965 Nicole Freedman, Wellesley, MA
RAAKA-TU (Radio Shack)
50 *Ryan Devlin, Louisville, KY
50 *Todd Knapp, Prairie du Chien, Wl
40 Robbie Haines. Nepean, Ontario
RACER (THE RAINBOW)
159.9 *Frank Canepa III. Santurce,
Puerto Rico
90.2 Chris Neal, Wabash, IN
RADIO BALL (Radio Shack)
4,510,740 *Les Dorn. Eau Claire, Wl
3,706.810 Stephen Zamonski, Ewing, NJ
1,738,150 Mickey Emberton, Indianapolis, IN
1 ,629,200 Benolt Lareau, Montreal, Quebec
1,511,640 Kelly Dion, Cap-de-la-Madelelne.
Quebec
REACTOIDS (Radio Shack)
5,257,295 *Gary Bedford, Piqua, OH
73,240 William Blaine III. Gallipolis
Ferry. WV
RETURN OF THE JET-I (ThunderVision)
538,432 *Matt Griffiths. Stilwell, KS
429,160 Jean-Francois Bruneau, Si-Hubert
Quebec
203,500 Jamey Maumus, New Orleans, LA
REVERSE (THE RAINBOW)
7 *Jon Hobson, Plainfield, Wl
ROAD RACE (THE RAINBOW)
91.7 *Bill Martin, Myrtle Beach, SC
576.6 Eric Clarkson, Missouri City, TX
706.1 Michael Hebb, Victoria, Australia
1212.4 Michael Martens. Wausau, Wl
2158.5 Steven Roth, Fannystelle, Manitoba
RUN FOR YOUR LIFE (THE RAINBOW)
20.000 *Ryan Devlin. Louisville, KY
SAILOR MAN (Tom Mix)
596,700 *Jeff Picketts. Brantford, Ontario
570,500 Aaron Samuels, Monument. CO
535,900 Scott Sherman, Woodstown, NJ
488,600 Paul Kenyon, Phoenix, AZ
435,700 Andy Daler, Medford, OR
232,000 Brian Baggett, Maumee, OH
SANDS OF EGYPT (Radio Shack)
80 *John Allocca, Yonkers, NY
60 *BobDewitt, Blue Island. IL
82 Jeff McKay, Travis AFB, CA
97 Phill Zarfos, Dallaslown, PA
98 Aaron Durkee, Lansing. Ml
102 Clyde Siverd Jr., Saratoga Springs. NY
SEA DRAGON (Adventure International)
39.030 *Brian Wollgram. Freeland. Ml
12,000 Ken Dowitt, Blue Island, IL
SHAMUS (Radio Shack)
62,940 *Jon Blow, San Diego, CA
SHENANIGANS (Mar* Data)
96 *N. Wakolin, Mt. Lebanon. PA
103 Chris Cope, Central, SC
SHOOTING GALLERY (fladio Shack)
227,840 *Cliff Farmer, McGregor, TX
SKIING (Radio Shack)
01:00 *Scott Clevenger. Fairmount. IN
01:00 *Billy Fairiull. Charleston, SC
01.10 Mike Scharf, Fremont. OH
01:12 Sean Conner. Summit, NJ
05.85 John Hokpins. Greenville, SC
SLAY THE NERIUS (Radio Shack)
472,667 *Jim Herbers, Placentia, CA
221,496 Shirley Herbers, Placentia, CA
SNAKER (THE RAINBOW)
1:24 *Luanne Ashby, Phoenix, AZ
1:26 Dan Sobczak, Mesa. AZ
1:37 Susan Ballinger, Uxbridge. Ontario
1:50 Andy Green, Whitehall, PA
1 :59 Baiju Shah, Deep River, Ontario
SOLO POKER (Datasolt)
1.100 it-Carol Staker. Moscow. ID
690 Robert Peterman Jr.. Newton. TX
SPACE ASSAULT (Radio Shack)
19.065 *Steven Allen. Sharpsburg, MD
SPACE RACE (Spectral Associates)
83.422 *Mark Donahue. Alexandria, VA
11.600 Mario Asselin, Baie-Comeau. Quebec
SPEED RACER (MichTron)
126,750 *Jack Manzullo, Saginaw, Ml
121,260 Paul Kenyon, Phoenix, AZ
115,410 Jean-Francois Pigeon. Villemontel,
Quebec
1 1 1 .200 Mike Rebbecchl. Somerdale. NJ
109.440 Dan Bouges, Niantlc. CT
96,000 ChrisCope.Central.SC
STAR BLAZE (Radio Shack)
9,000 *Gary Bedford, Piqua, OH
7.950 Matthew Daley, Binghamton, NY
7,950 Mike Marcol, River Grove, IL
4,500 Ted Barkley, Whitehall, NY
STELLAR LIFE-LINE (fladio Shack)
119.030 *Brian Shaber, Boise, ID
101,430 David Barnekow, Elkhorn, Wl
73.950 Lori McCullar, Brazil, IN
62,390 Andrew Lawrence, Cambridge. Ontario
39,210 Alfred Silva, Cranston, Rl
20,580 Matt Shalfer, Reading, PA
STORM ARROWS (Spectral Associates)
263,850 *Arnold Snitser, Los Angeles, CA
TEMPLE OF ROM (Had/o Shack)
837.600 *Davld Oelhaupl. Calgary. Alberta
673,800 Sonya Hurst, Richmond, CA
620,800 Rhea Jarrard, Olympia, WA
463,400 Glenn Alfrey, Olympia, WA
288,500 Carol Elliot, O'Leary, Prince
Edward Island
TIME BANDIT (Mich Tron)
1,025,210 *Terry Moore, St. Catherines. Ontario
359.980 Krlstopher Staller. Ft. Wayne, IN
88.940 Brian Wagner, Lawrence, KS
68,390 Jamie Sprang. Dartmouth, Nova Scotia
27.890 Jason Forbes. Mexico. NY
24.770 Stephanie Michel Morgan, Centerville,
OH
THE TOUCHSTONE (Tom Mix)
226.640 *Kristopher Staller. Ft. Wayne. IN
TRAILIN' TAIL (THE RAINBOW)
273.390 *Jerry Dill. Grafton. MA
1 19,705 Diego Gallina, Summit. NJ
105.300 Jerry Dill, Frankfort, Ml
102.930 Philip Parent. Smiths Falls, Ontario
94.810 Jean-Marc Parent. Smiths Falls.
Ontario
TRAPFALL (7om Mix)
50.078 *Lori Day, Arlington. TX
TUTS TOMB (Mar* Dara;
189.960 *Nicole Pouliot Coors. Mobile. AL
189,760 Jerry Austin. Baraboo, Wl
184.380 Biagio Di Lorenzo, Montreal, Quebec
163,060 Michael McCafferty, Oceanside, CA
158,000 Chris Russo, Miami, FL
WHIRLEYBIRD RUN (Spectral Associates)
43.850 *Glen Bilodeau, Otterburn Park.
Ontano
30,100 Dan Durga, Flint, Ml
16.900 Stephane Asselin. Baie-Comeau.
Quebec
WILLY'S WAREHOUSE (Intracolor)
163,500 * Alan Morris, Chicopee, MA
93,700 Craig Kluger, Miami, FL
48,900 Stephane Asselin, Baie-Comeau,
Quebec
ZAXXON (Datasolt)
2,068,900 *Dave Levora, Oak Forest, IL
2,057.600 Chris Oberholtzer. Lexington. MA
1,700,000 Biagio Di Lorenzo, Montreal, Quebec
1,510,000 James Ouadrella, Brooklyn, NY
666,000 Andy Green, Whitehall. PA
137,000 Bob Dewilt, Blue Island, IL
115,000 Thomas Bacon, Grayling, Ml
91.600 Ronald Simmonds. Winnipeg.
Manitoba
78,600 Jay Andraschko, Yuma, AZ
65,000 Michael Brennan, Calgary, Alberta
36.400 Mariano Frausto. Blue Island. IL
— Debbie Hartley
'*•••••••••••••••••••••••••••••••••••
August 1985 THE RAINBOW 181
-****************+*******************
In conjunction with the rainbow's Scoreboard, we offer this column of
pointers for our game-playing readers' benefit. If you have some interest-
ing hints and tips, we encourage you to share them by sending them to
the Scoreboard, c/o the rainbow.
IN 'SEARCH' OF THE RIGHT NAME
Scoreboard:
In ihe "Scoreboard" column, you have
both Sea Quest and Sea Search listed. These
are both the same game, and should only
be listed once. I guess Mark Data changed
the name for some reason. The current name
is Sea Search.
Brett Noble
Redlands, CA
Editor's Note: Mark Data did change
the name. From now on, Sea Quest
will be referred to as Sea Search.
Thank you, Brett.
UNTRUE STATEMENT
Scoreboard:
In a recent issue of rainbow, I noticed
someone stated that the scepter was useless
in Pyramid. You can wave the scepter at
the bottomless pit and a bridge will span
across the pit to the hall of gods.
I also need help in killing the gargoyle
with the candle in Raaka-Tu. Please send
any information to 1615 Highland Ave.,
53545.
Todd Harris
Janesville. WI
KEY TO TREKBOER
Scoreboard:
Here are a few tips for those of you having
trouble with the Adventure Trekboer, by
Mark Data Products.
To open the cabinet you must get the key
from the manual. Once you open the
cabinet, you must examine it three times
to get everything out.
When you are on the planet Aridak (the
desert planet), to get the liquid, type GET
LIQUID WITH BEAKER. To find the wrecked
starship when you arrive through the
teleport, type S, S, S, S, E. To go back
to the teleport, type N, E, W, N.
I have almost finished Trekboer, but 1
can't get out of the large underground
complex on the Garden planet. I would
appreciate it if someone could tell me.
If anyone needs some tips or all the
answers to the following Adventures, write
to 181 Geoffrey Rd., Chittaway Pt., Wyong
2259. The games are Pyramid. Bedlam,
Madness and the Minotaur and Trekboer.
Oh! What is the canteen for?
Tony Cross
New South Wales, Australia
HORSIN' AROUND
Scoreboard:
The games Sands of Egypt and Dungeons
of Daggorath are driving me crazy! In Sands
of Egypt, I can't even find the pool. Can
anyone please send me the solutions? They
would be greatly appreciated. My address
is 622 Perdido Dr., 75043.
Here's a hint for those of you with Dallas
Quest. Start the game and get the bugle.
Go east until you reach the horse. Examine
the horse and the tree. Then examine Lucy
and ride the horse; that will give you the
first clue. Go back down and get the shovel
(go north until you reach the barn).
When you're in the pasture, just move
around until the cattle start to stampede
toward you. When that happens, play your
horn and dig up whatever the cattle
uncovered. After that, go into the study and
then the grass field and find your way to
the airfield. The rest is up to you!
Eric Hedstrom
Garland, TX
Scoreboard:
For anyone who is having trouble with
Dungeons of Daggorath, here are some
hints. Watch the speed at which the
monsters travel and time your hits so the
computer will hit them the moment they
enter your block. It also helps to keep useless
treasure, such as dead torches, in front of
you.
Also, I have found another ring on the
fourth level. It's a Joule ring. I won't tell
you to what it incants, but to find out, just
look in your old, trusty "Webster's
Dictionary."
The Elvish sword and Mithrel shield are
also found on the fourth level. To get these,
kill all the scorpions and wraiths first, then
go after the massive galdrogs who carry the
sword, shield. Joule ring and a Seer scroll.
I hope I have been of help. For mi
information or help with Black Sanctum
Raaka-Tu, send a SASE to 210 Spri
Hollow Ln., 43081.
Chris D,
Westerville. I
Scoreboard:
If you are having trouble with Sands
Egypt, here are a couple of hints.
To drain the pool you need the scept
which is at the base of the pyramid. If you
made it to the underground river, you ha
to go to the boat and type FLOAT BOf
You need the rope to tie the boat up
the archway and you need the shovel to n
the boat.
For those of you who are having troul
with the mummy, the first thing you do or
you get into the archway is type TRANSLA
HIEROGLYPHICS, then place the scepter
the mummy. The place should shake a
reveal a crack in the wall. Get the ladd
then go back to the archway.
Does anyone know how to find the 1;
treasure in Sea Search? I have already fou
the ring, the anchor, the silver and the pea
Somebody please help!
I have solved Shenanigans, Black Sancti
and Dallas Quest. If you need help se
a SASE to 19695 Barnett Rd., 70791.
Dustin Maxfu
Zachary, 1
Scoreboard:
For anybody who plays Adventures, he
are some of the games I have solved: Bla
Sanctum, Sea Search, Calixto Islan
Shenanigans and Bedlam.
ln Shenanigans, when you are in the cav
and you hear a voice saying "Sean," ty
SEAN.
For Bedlam, try putting the pill in t.
meat and then give it to the dog. Also, whi
you stumble over something in Sea Searc
type GET SHOVEL.
For any more help, write to me at R
6, Box 293, 26505.
Doug Wilbm
Morgantown, W
••••••••••••••••••••••••••••••••••••
182
THE RAINBOW August 1985
************************************
CAR STOPPER
ireboard:
n Poltergeist, from Radio Shack, on the
eens with the large housing development
■ou hold the joystick button down while
s being drawn up (before the cars come
:) and keep it held down, the cars will
/er show up.
Glen Button
Cheshire, CT
FREEBIES
SHENANIGANS
Scoreboard:
1 need help on Shenanigans. Any answers
or solutions would be appreciated. Every
lime I go into the pub, I get kicked out.
I can help on Calixto Is/and. My phone
number is (602) 889-755 1 , or you can write
to 333 W. Dakota St., 85706.
Aaron Repath
Tucson, AZ
Editor's Note: No shirt, no shoes, NO
SERVICE!
Scoreboard:
1 need help with the Adventure game
Shenanigans. I can't seem to get past that
stupid snake in Ihe cave. If anyone can help
me, please write to 8113 E. Whitton Ave.,
85251.
Chuck Kiefer
Scottsdale, AZ
Editor's Note: Examine the clover
fields more closely.
treboard:
have been noticing that more and more
>ple are writing in with questions on how
solve certain Adventures. There are also
>ple who offer solutions for money. Well,
oo am a CoCo Adventure addict, and
tave solved quite a few. They include:
dlam. Black Sanctum, Blackbeard's
md, Calixto Island, Dallas Quest, Major
ir, Pyramid, Raaka-Tu, Sam Diamond,
m Sleuth, Sands of Egypt, Sea Search,
enanigans, Syzygy, To Preserve Quandic
i Trekboer. If any of you would like help
my kind, write to me at 1 10 Ashley Drive,
531. I can also be reached at (803) 654-
12, but please call after 6 p.m. 1 don't
;h that you send money, but a SASE
uld be nice.
f there is anyone out there who has solved
iaron, I would appreciate it if you would
e me some hints, I would also love to
ir from any of my fellow CoCo-nuts.
ppy Adventuring!
John Allen
Clemson, SC
••••••••••••••••••••••••
DARTH LIVES ON
oreboard:
[ need help with the 3-D graphics
venture Syzygy, from Spectral Associates,
an just about finish the game, except I
l't kill Darth Vader and I can't get past
: second force field on one of the lower
els (1 believe it is Level 3). I can get all
the treasure, including the communicator,
1 1 can't seem to kill Darth Vader. Anyone
o can help, or needs help, please call me
(203) 634-0680, or write to me at 3 1 Fiesta
;ts., 06450.
Here is a hint. You need the string and
)lanket to survive the fall from the cliff.
Mike Sengstock
Meriden, CT
•••••••••••
rrarr
Now Your Popular B5 Educational
Programs are Available Through
Radio Jhaek
Express Order aa ^ a j^l
PROGRAMS
RS Catalog No.
available at
stores
Computer
Retail
CLOCK
BORROW
CARRY
90
90
MONEY |°;
90
90
90
90
MATHFACT j>°
90
90
90
90
90
90
90
90
90
90
90
90
90
90
SPELL
HANGWORD/SCRAMBLE
SKIP COUNTING
KEYBOARD
5181
5182
5183
5184
5185
5186
5187
5188
5189
5190
5191
5192
5193
5194
•5195
-5196
-5197
-5198
-5199
-5200
-5201
-5202
5203
5204
. . . CC 16K ECB Cass S24.95
. CC32KECB Disk S26.95
...CC16K ECB Cass S19.95
. .CC 16K ECB Disk S21.95
,. CC 16K ECB Cass S19.95
. .CC32KECBDisk S21.95
...CC16K ECB Cass S19.95
. ..CC32K ECB Disk S21.95
. ..CC 16K ECB Cass S16.95
. . . CC 32K ECB Oisk S18.95
. ..CC 16K ECB Cass S19.95
. ..CC32K ECB Disk S21.95
. CC 16K ECB Cass S17.95
. . CC32K ECB Disk S19.95
.. CC 16KECB Cass S16.95
. . .CC 32K ECB Disk S18.95
. .CC 16KECB Cass S19.95
. CC32K ECB Cass S24.95
...CC32K ECB Disk S26.95
. . . CC 16K ECB Cass S19.95
. CC32K ECB Disk S21.95
CC32K ECB Cass S29.95
...CC32K ECB Disk S31.95
. CC 32K ECB Disk S31.95
RECESS GAMES
CONGRESS
PRESIDENTIAL DECISIONS
of Andrew Jackson
BASKETBALL STATISTICS 90-5205 cc 32K ecb oisk
DATA FILES for use with Spell, Hangword Scramble, and Keyboard Programs
Grade 2 Spelling
Grade 3 Spelling
Grade 4 Spelling
Grade 5 Spelling
Grade 6 Spelling
.90-5206
90-5207
. 90-5208
90-5209
. .90-5210
90-5211
. .90-5212
90-5213
.90-5214
90-5215
Casselle .
. . Disk . . .
Cassette .
. . Disk . . ,
Cassette .
. . Disk .
Cassette .
. . Disk . . .
Cassette .
. . Disk . . .
S8.95
S10.95
S8.95
S10.95
SB.95
S10.95
SB.95
S10.95
S8.95
S10.95
Space Word List
Most Misspelled
Words
Dolch Words
Keyboard Phonic
Drill
90-5216 .. Cassette
90-5217 .... Disk ...
.90-5218 - Casselle .
90-5219 ... Disk .. .
90-5220 Cassette .
90-5221 .... Disk . . .
90-5222 . . Cassette .
90-5223 ... Disk . . .
S8.95
S10.95
S8.95
S10.95
S8.95
S10.95
. S8.95
S10.95
All programs listed are tor the Radio Shack 'Color Computer and Color Computer II. in I6K. 32K. and 64K models with ECB.
B5 Programs Maintain a Consistant Quality of Excellence
B5 Programs:
• Assist modern teachers in classrooms across Ihe nation on a
daily basis
• Help teachers motivate students and build enthusiasm lor
learning
• Written by experienced educators and skilled programmers
• Continuously revised and enhanced
B 5 Software Co.
1024 Bain-bridge Place
Columbus, Ohio 43228
Phone (614) 276-2752
Easy to use and easy to view
Appealing to students
Sound educational content
Long lasting value
Sell-paced with skill levels
Creative and colorful screen designs
Rewards to build confidence and sell-esteem
Refer to Radio Shack's Education Source
Book, or write for a free catalog and com-
plete information.
— Clip for Easy Reference
August 1985 THE RAINBOW 183
THE NEW GENERATION
ic3\
s \3?££
gb^ss
-\0
COMPLETE SG-10
PRINTER SYSTEM
All the performance, features, and compatibility of
the Star Micronics GEMINI-10X PLUS:
120 CPS with true descenders.
NLQ 17 x 11 (Near Letter Quality).
2K BUFFER accessible.
HEX DUMP for Machine Language listings.
ULTRA HI bit image graphics.
20% INCREASE in throughput.
• SC- 10 PRINTER
• BLUE STREAK II INTERFACE
W MODEM SWITCH
• SUPER GEMPRINT
• TYPESELECTION'TUTORIAl.
COMPLETE
SYSTEM
NOTHING MORE TO BUY
$-10095 + S10 Shipping
**02r and Insurance
1 YEAR STAR WARRANTY
Servicable at over 4000 locations.
SG-15-439"
*LUE STREAK II
SERIAL TO PARALLEL INTERFACE
• RUN COCO I or II to PARALLEL PRINTER
• HIGH QUALITY TOGGLE SWITCH ELIMINATES CABLE SWITCHING
• 300. 600. 1200. 2400. 4800. 9600 SWITCH ABLE BAUD RATES
• AC POWER OPTIONAL-NOT NEEDED WITH SG-10 PRINTER
• COMPLETE WITH ALL CABLES AND CONNECTORS
• 180 DAY WARRANTY
/^v\ C/195 SHIPPING (SPECIFY PRINTER)
3*4 PAID!
SUPER GEMPRINT
CUSTOM SOFTWARE
Overall, Super Gemprint is very well-written and documented."
— Rainbow December 84 review.
BONUS! TYPE SELECTION/TUTORIAL PROGRAM
FREE WITH SUPER GEMPRINT
Menu driven program for the CoCo. Teaches and shows the new
user the numerous features of the SG-10.
SUPER GEMPRINT AND
TYPE SELECTION/TUTORIAL PROGRAM
5 17
95
+ S2 Shipping
and Handling
DAYTON ASSOCIATES-^, INC.
mieronicj-inc
AUTHORIZED
DEALER
DUN & BRADSTREET LISTED
7201 CLAIRCREST BLDG. C
DAYTON, OHIO 45424
OHIO RESIDENTS ADD 6% SALES TAXi
C.O.D. ADD $2.00
AUTO»ORDER LINE
1-800-251 STAR
Personal Service
(513)236-1454
RAINBOW REVIEWS
ACDITS
Does Inventory For Your Disk Files/ 'Aurora Computing 217
ANIMATOR COMMERCIAL
Creates Eye-Catching Displays/777ad Pictures Corporation 212
Animator Junior
Create Animated Graphics/777ad Pictures Corporation 207
Battle Of The Bulge
A Tactical Game Of World War \l/Ark Royal Games 197
Cassette Tape Tester
Affords Security For Data/Free CoCo Software 21 1
CINC PAC — Battle Of Midway
For Victory At Sea/ Ark Royal Games 1 98
CoCo Talker
Speaks For Itself/Compuferware 218
Color Disk Manager
A Virtual Disk Saver/Sugar Software 21
Count To 100
Provides Preschool Fun With Matb/CY-BURNET-ICS 221
Cyrus World Class Chess
A New Dimension In Chess/Radio Shack 195
Data Bank
Organizes Data With Or Without OS-9/Compufenvare 194
File 64
A Great File System For Cassette Users/Ow/s Nest Software 214
500 Pokes, Peeks 'N Execs
CoCo Gains Power And Speed/Specfrum Projects, Inc 1 99
Golf Handicaps
Keeps League Statistics Up To Par/Don Hug 215
Handycode
An Efficient Way To Keep Data Private/V. Baumann 206
The Magic Box
CoCo Enters A New World/Specfrum Projects, Inc 216
Mathfun
Practice Your Math Skills/Compugram 200
Metric Mind
Performs Well At Teaching Conversions/Creaf/Ve Technical Consultants 1 96
Missile Math
A Winning JooUMESA 213
Multiple Choice Test
Fits Specific Needs/D & D Software 202
Personal Finance System
For Checkbook Organization/Compuferware 203
Practical Programming In Pascal
Makes Learning Pascal Easy/New American Library 192
Space Web
Teaches Strategy And Reasoning Skills/Specfacu/ar Software 201
VIEW-EDIT k
A Dynamic Approach To Image Processing/SoftC/rcu/fs, Inc 219
Warehouse Mutants
For Masochistic Madness/Tom Mix Software 220
i
August 1985 THE RAINBOW 185
(
Radio Shack Has the
Software You Want
Color File.** An easy-to-use
home filing
system for
personal re-
cords.
Comes pre-
set with
seven files —
or create your own. Was
$24.95inRSC-14. ._.,.
#26-3103 1 9
Spectaculator '"■'. Do planning
and budget-
ing with this
electronic
spreadsheet.
Just enter
numbers and
formulas —
results are displayed on com-
mand. Ideal for financial fore-
casting. Was $34.95
in RSC-14. #26-3104
I
29
,95
-CUB 1-I.Jtlili- I ■
aval;':
29
95
Color SCRIPSIT®. A powerful
home word ^ a . j....,..,
processing
system for
correction-
free letters.
Text can be
saved on op-
tional cassette recorder or
printed with optional printer. Was
$34.95 in RSC-14.
#26-3105
Personal Finance II. Includes
26 expense
categories,
including
auto, gas,
food and
more. Review
spending on
year-to-date or category basis.
Was $34.95 in RSC-1 4. _ _ Q _
#26-3106 29 9&
Color Editor/Assembler. De-
velop 6809
software. You
get trial as-
sembly in
memory, an
editor to
change your
program and Z-Bug for testing.
Was $49.95 in RSC-14.
#26-3250
alike -ix. niuiuueo
I
39
95
• tnrorn mm ■■■ in m
m r- mum unnil
n mm ran nnrrmtca
r- m in it r nnicn
r. rn n it rn nriirrnri
Bingo Math.* Three exciting
games to
make learn-
ing math fun.
Bingo, Speed
Math and
Number
Hunt. Was
$24.95 in RSC-14.
#26-3150
19
95
Baseball.* This exciting game
plays like the
big leagues!
You are the
coach— it's
up to you to
control the
pitching, de-
fense, and running for extra ex-
citement. Fast paced baseball
action. Was $24.95 in ^ rtQ c
RSC-14. #26-3095 1 9 s
Canyon Climber.* Your climb-
ing skills are
tested when
you find kick-
ing goats,
falling rocks,
zinging ar-
rows and
more on your way to the summit.
Was $34.95 in RSC-14.
#26-3089
29
95
Downland.* You're alone in a
secret cave,
you jump and
climb from
chamber to
chamber col-
lecting gold
and dia-
monds. Each chamber is a new
danger. Will you survive? Was
$24.95 in RSC-14.
#26-3046
19
95
Galactic Attack.* Enemy
spaceships
bomb your
defense
shields. If you
destroy this
squadron, the
enemy re-
verts to a deadly night attack.
Was $24.95 in
RSC-14. #26-3066
19
95
I
Poltergeist. Based on the hit
movie.
Search for
clues and
face the pol-
tergeist. Not
for parents or
others easily
frightened. Was $29.95 rt . M
in RSC-14. #26-3073 Z4 3D
' Joysticks required.
' Cassette recorder required.
' Joysticks and recorder required.
Color Computer
at New Low Prices!
Mega-Bug. * A maze of fun! Try
:o lose the lit-
;le "buggers"
not on your
rail. You
;an'tstop.
Everywhere
/ou go, on
jvery turn, there's more of them!
excellent color graphi-
cs. Was $29.95 in -irian
3SC-14. #26-3076
19 £
Slay the Nerius.* Fast action is
leeded to
save your
submarines
rom deadly
starfish and
he ancient
sea creature
—Nerius. Was $24.95
n RSC-14. #26-3086
19
95
Dlowns and Balloons.* A real
;ircus act.
Jse your i
safety net to
jounce the
;lown up and
jown to pop
he balloons
Dverhead! Be careful — don't let
he clown fall. Was $29.95 - ftg5
n RSC-14. #26-3087 l\3
Deluxe Joystick. Get accurate
cursor control and quicker re-
sponse. Dual-axis trim controls.
Was $39.95 in RSC-14. nAQi;
#26-3012 Z9 S!>
Joysticks. Two controls with full
360° movement! Single-shot but-
ton. A "must" for selected games.
Was $24.95 in RSC-1 4. H ftq c
#26-3008 (pair) I5J
LKuJ
Cyrus. A chess program with be-
ginner to
tournament
skill levels.
You can take
back a move
or reject the
computer's
move and force it to play again.
Was $24.95 in RSC-14.
#26-3064
19
,95
7 Card Stud. Compete with
three com-
puter poker
players. They
can adjust to
your playing
style and
make it more
difficult to win. Was
$24.95 in RSC-14.
#26-3000
19
95
Radio /hack
The Technology Store"
A DIVISION OF TANDY CORPORATION
r~"
Find out more about
Radio Shack's Color Computer.
Send for a free catalog.
Mail To: Radio Shack, Depl. 86-A-89
300 One Tandy Center
Fori Worlh, Texas 76102
"1
Address .
City
. Stale .
.Zip.
Telephone .
L.
Prices apply at Radio Shack Computer Cen-
ters and at participating Radio Shack stores
and dealers.
._l
RECEIVED & CERTIFIED
The following products recently have been received
by the rainbow, examined by our magazine staff and
approved for the Rainbow Seal of Certification, your
assurance that we have seen the product and have
ascertained that it is what it purports to be.
This month the Seal of Certification has been
issued to:
_
Disto Floppy Disk Controller, a disk
controller for CoCo or CoCo 2 with
gold contacts on all connectors, shielded
metal box for low RF noise, four 28-
pin sockets, internal mini-expansion
bus interface and 16 MHz high speed
master clock. CRC Computers, 1720
Charette, Duvernay Laval, Quebec,
Canada H7E 4L9, $99.95
Graphicom Part II, a 64K menu-driven
graphics utility requiring at least one
disk drive and capable of supporting
four drives. Does not require Graphicom
to run and includes these functions:
Load and Save both Graphicom format
screens and standard (binary), keyboard
or joystick input, color or black-and-
white Hi-Res operation, OOPS com-
mand to recover mistakes and four
screen display modes. Computize, Inc.,
P.O. Box 207, Langhorne, PA 19047,
disk $24.95 plus $3 S/H
Hardcopy, a 64K screen print /graphics
dump utility requiring at least one disk
drive but capable of supporting four
with keyboard or joystick input. Com-
patible with Graphicom and Graphicom
Pari II, Hardcopy loads standard 6K
images and CoCo Max pictures. Cap-
able of supporting Hi-Res in all four
Graphicom display modes; there is also
black-and-white or gray scale printing.
Users should specify printer when
ordering. Computize, Inc., P.O. Box
207, Langhorne, PA 19047, disk $29.95
plus $3 S/H
War of the Worlds, a 64K joystick-
driven Adventure in three chapters.
Suitable for group play, each chapter
contains more than 200 situations.
Possible are save game option and
master control option which resumes
play at the point where you left off.
Triad Pictures Corp., P.O. Box 1299,
134 Simders Rd., Sequim, WA 98382,
cassette $18.95 per chapter or $39.95
for complete three chapter edition plus
$3 S/H
Soccer Statistics Package, a 32K sports
utility requiring a disk drive. Possible
are mid-season entry, updates and
additions, correct and review all stats
in file, correction on all input screens;
raw dump to the printer for the player,
goalie and opposing team's files;
summary of the player, goalie and
opposing team's stats. Also, summary
of 16 individual player and 10 goalie
stats; tracking of 14 goalie stats; and
19 opposing team stats. Sugar Software,
1710 North 50th Avenue, Hollywood,
FL 33021, disk $29.95
Utility Routines, a book written for
basic and ML programmers including
routines such as Command Keys, Super
Scroller, Full Length Errors, Auto Line
Increment, Pause Control, and Cursor
Styles. Compatible with 16/32/64K
disk or cassette, CoCo or CoCo 2.
Microcom Software, P.O. Box 214,
Fairport, NY 14450, book $19.95; book
with cassette or disk $36.95; cassette or
disk only $24.95 plus $2 S/H
Enhanced Disk Operating System
Version 2.6, an alternate operating
system for the CoCo designed to replace
Disk Extended Color basic 1.0 while
remaining 98 percent compatible.
EDOS2.6 requires a disk system with
a drive capable of 6 ms and 40 tracks
and is available only on an EPROM
which is enclosed with the pack. Micro
Computer Services, P.O. Box 1001, 101
Bush Street, Angus, Ontario, Canada
L0M 1 B0, $100
Latin Translator, a 32K ECB utility
package requiring a disk drive for the
teaching or learning of Latin. Based on
the first semester course followed in the
book First Year Latin by Charles
Jenney, Jr., Roger V. Scudder and Eric
C. Baade, it requires some fundamental
knowledge of Latin but examples are
given within the manual and the
program itself. Joe Pottinger, 13
Pauline Ln., Rolla, MO 65401, disk
$14.95 plus $2 S/H
Q.D.S. A/B-4, a disk driven syst
consisting of Hard Drive Speciali:
floppy drive controller and two doub
sided, double-density Remex RFD L
disk drives. The controller has go
plated edge card connectors, absence
potentiometers and dual selectal
ROM sockets. The dual Remex RJ
480 drives run up to 5 ms track to trf
speed and have a special circuit Quat
Data Systems installed on the dr
board to intercept the drive select sigi
from the controller and change I
signal; the double-sided drives act 1:
four separate single-sided drives alio
ing users without a DOS that suppo
double-sided drives to use both si<
of the drive. Quattro Data Syster
P.O. Box 180071, Austin, TX 787
0071, controller $120, dual drives $3
RS23210, a utility program to incre;
the flexibility of the RS-232 port w
any custom peripheral or homema
project such as robotics, ROM burn
and any RS-232 peripheral not set
specifically for the CoCo. Racine, 52
S. Birmingham, Tacoma, WA 9841
cassette $30
DynaCalc, requires OS-9 Operati
System and handles all types of da
numbers, labels and equations. Possil
are the creation of worksheets of 2
columns and 256 rows; printer outp
24 built-in mathematical functioi
performance of all regular math opi
ations to 16-digit accuracy; and readi
and writing of OS-9 data files. Rac
Shack stores nationwide, disk $99.95
Super LOGO, an expanded version
Color LOGO with the added features
list processing capability, decin
arithmetic, flexibility in the use of t
immediate mode, and improved editi
and disk handling features. Compa
bility with Color LOGO has be
maintained and almost all procedui
written in Color LOGO will run withe
alteration in Super LOGO. Radio Sha
stores nationwide, disk $99
OS-9 Solution, an interface softwa
system requiring OS-9 Version 01 .0 1 .C
designed to make OS-9 menu-driven
replacing 19 OS-9 commands wi
single keystrokes. By using a directo
window with the up- and down-arn
188
THE RAINBOW August 1985
;ys for access and command execution,
ie program allows multiple copying,
Uing and info printouts for whole or
irtial directories. All XMODE pa-
.meters can be set at the touch of a
ngle key and the necessity to type long
ithnames has been eliminated. Spec-
um Projects Inc., P.O. Box 21272, 93-
i 86th Drive, Woodhaven, NY 11421,
sk $39.95, plus$3S/H
)Co Solver, a 32K utility requiring
disk drive or 16K for cassette users
use as an equation generator, a mini
ta file manager, programming tutor
d advanced programmable calculator.
Dtions include utilities to kill files on
data disk, erase, copy and a monitor
PEEK at memory. Compatible with
)OS as well as Disk basic. JTJ
iterprises, P.O. Box 1 10841, Nashville,
vl 37211, disk for 32K or cassette for
K S79.95
pine Align Cushion, designed to be
;ed with standard secretarial chairs or
at seats without back supports, this
lgled, well-padded cushion is meant
i reduce "desk distress" of the lower
ick. Spine Align, 345 So. McDowell
Ivd. #209, Petaluma, CA 94952,
19.95 plus $2.50 S/H
aseball Statistics Package, a 32K
iorts utility requiring a disk drive.
Dssible are mid-season entry, update
id additions; correct and review all
ats in file; correction on all input
reens; and raw dump of data to the
inter for the player, pitcher and
>posing team's files. Also, summary
the player, pitcher and opposing
am's stats; tracking of 21 individual
ayer stats with 18 cumulative stats per
ayer; tracking of 15 individual pitcher
ats with 11 cumulative totals per
tcher; compilation of total team
mmary of 16 separate stats; and
•mpilation of total pitching summary
1 1 stats. Sugar Software, 1710 North
'th Avenue, Hollywood, FL 33021,
sk $29.95
isketball Statistics Package, a 32K
oris utility requiring a disk drive,
issible are mid-season entry, update
d additions; correct and review all
its in file; correction of input screens;
w dump of data to the printer, for
e player and opposing team's files;
mmary of the player, opposing team
d 17 individual player team stats,
so, tracking of 22 individual player
its with 18 cumulative stats per
player; and compilation of opposing
team summary of 19 separate stats.
Sugar Software, 1710 North 50th
Avenue, Hollywood, FL 33021, disk
$29.95
Football Statistics Package, a 32K
sports utility requiring a disk drive.
Possible are mid-season entry, updates
and additions; correct and review all
stats in file; correction on all input
screens; raw dump of data to the printer
for the player and opposing team's files;
summary of the player and opposing
team's stats; and tracking of 90 indi-
vidual player stats. Also, summary of
63 individual cumulative stats per
player; summary of 17 cumulative team
and 28 cumulative opposing team stats;
team summaries of 87 stats; comparitive
summary printouts of 63 stats for your
team; and 62 stats for the opposing
team. Sugar Software, 1710 North 50th
Avenue, Hollywood, FL 33021, disk
$29.95
Thunder RAM, a 256K memory up-
grade board for the Color Computer
requiring a disk system. Features
include the emulation of a 40-track
RAM Disk, speed up to 30 times faster
than an ordinary floppy disk drive, a
full 60K print spooler and storage of
up to 30 Hi-Res screens in memory at
one time. Users can create basic
programs up to 128K long. Spectrum
Projects, Inc., P.O. Box 21272, 93-15
86th Street, Woodhaven, NY 11421,
$119.95 plus $3 S/H
Cosmic Paint, a 32K graphics system
requiring at least one disk drive (two
are recommended) and an analog
joystick (Radio Shack), a mouse or a
touch pad. Commands reside in an icon
grid featuring scrolling, lines, rectangles,
boxes (3-D), detail mode, circles or
ellipses, painting, sketching, a disk
menu, magnification, a wrench (for
fixing mistakes), erase, mask patterns,
dump to printer, text and select (to
modify portions of the screen). Cosmic
Software, 515 Beverly West, Sherwood,
AR 721 16, disk $20
Teacher Pak, a 16K collection of four
programs for teachers designed by
teachers. Dister, a statistical analysis
utility for lists of numbers such as, but
not limited to, grades. It works out
averages, sample, and population
standard deviations and variances.
Possible are both printed and on-screen
distributions. Grader allows users to
choose straight percentages or weighted
grading. Alpher produces printed or on-
screen alphabetized lists of names or
words. These lists may be saved and
used with Grader and Sealer. Sealer
produces printed seating charts for
classrooms of almost any size.
Teacher Pak Plus, requires 32K and
contains all of the above with CoCo
Testum for an 80-column printer with
underline function to create and print
tests. Possible are the creation of
multiple choice, fill in the blank, short
answer, true/ false and matching tests.
Tothian Software, P.O. Box 663,
Rimersburg, PA 16248, Teacher Pak
cassette $34.95, Teacher Pak Plus
cassette $47.95
Color Computer Machine Monitor—
CCMM, a full-featured debug machine
monitor that interfaces with the ROM-
resident operating system(s) and device
configuration(s) of CoCo and CoCo 2.
The command facilities include: LIST/
EDIT of registers, memory and pro-
gram; EXECUTE of program (subrou-
tines under monitor supervision;
TRACE of RWM Resident program
instructions; BREAK-Point on control
sequencing; ACCESS-point on data
addressing; self-relocatable. Position
Independent Code (P.I.C.); CoCo
dependent [2K] and stand-alone [4K]
Versions. Published by Real Computers
and Intelligence of Santa Clara, Calif.,
and distributed by The Zellerbach
Group, Unit 216, 1335 Pacific Avenue,
San Francisco, CA 94109, disk CCMM
16/D program(s) $16.95, manual
CCMM 20/S $9.95, tape CCMM 17/
T program(s) $14.45, manual CCMM
20/S $9.95
The Seal of Certification program is open to all
manufacturers of products for the Tandy Color Computer,
regardless of whether they advertise in the rainbow.
By awarding a Seal, the magazine certifies the
product does exist — that we have examined it and have
a sample copy — but this does not constitute any guarantee of
satisfaction. As soon as possible, these hardware or software
items will be forwarded to the rainbow's reviewers for evaluation.
— Monica Dorth
August 1985 THE RAINBOW 189
REVIEWING
Consumer Wish List
Editor:
I've found that as a consumer of software
for the Color Computer I need to know the
following: I) Is the program position
independent? (I will not buy one that is not.)
2) Is the program ROM independent?
(Again, I will not buy one that is not, as
I have different CoCo systems at work and
at home.) 3) Does the program provide an
easy return to BASIC? (or OS-9, as the case
may be.) Some programs, especially games,
take over the computer and require it to
be shut off in order to return to BASIC I
then have to reload all of my defaults and
external hardware registers. 4) I need to
know whether or not a backup can be made.
5) If the program is a graphics program,
does it store the results in a manner
consistent with loading to a basic graphics
screen? (Or is it like Art Gallery, where the
tape cannot be used by any other program?)
6) Will it work with all larger RAM sizes?
7) If the product is a program pack with
a port in it, what is the port address or
address range? 8) Does the program require
a special interface, the Multi-Pak or a
specific printer? 9) Does the program pack
require 12 volts? (One of my systems has
12 volts, the other does not. Some of my
ports will not work on the CoCo 2.) 10)
Does a driver for a device conflict with
certain other software?
I feel that if the above information could
be included in a review a consumer can make
an informed choice.
Larry Robinson
Bloomington, IN
CENTIPEDE ABC's & 123s
Editor:
We would like to thank RAINBOW and
Stephanie Snyder for the thoughtful and
thorough review of Centipede A BC's & 123 's
in the June 1985 issue (Page 205j.
Somehow the price change we reported
to you didn't make it into the review. For
the record. Centipede ABC's & 123's are
now sold on one cassette for $18, not the
$25 listed at the end of the review.
Ms. Snyder hit upon something in her
review which no one here at Triad, nor any
of the 400-odd preschools using the program
saw: the need for a shorter game option to
accommodate the shorter attention span of
2-year-olds. Future versions of the program
will incorporate such a feature. Thanks!
Stan Osterbauer
Triad Pictures
Computer benefits from the thought
competent reviews you publish.
Michael Marcel)
Bacchus Computer Softn
ADVENTURUS SUPREMUS 4.6B
Editor:
I would like to thank rainbow for the
positive review of Adventurus Supremus
4.6 B in the June 1985 issue [Page 221].
However, there are a couple things that I
would like to comment on.
First, I feel the mention of R-rated actions
is out of place. The one action that causes
death is meant as punishment for vulgarity,
and the other action uses proper English.
1 feel that these actions are at very most
PG-rated and are less offensive than many
things most children have seen in PG-rated
movies. I even talked to the reviewer about
this, and he agreed I am probably right in
this.
Second, the use of the OK prompt is
meant to be humorous by being slightly
smug. Also, since all the verbs are listed,
the only problem should be in finding a working
verb/ noun combination, so such a simple
prompt is justified.
All things considered, 1 found the review
to be thoughtful and positive, although the
remarks about R-rated actions did disturb
me a little. Also, keep up the good work,
because everyone involved with the Color
MULTIPLE CHOICE TEST
Editor:
First, I wish to thank you for y<
consideration and review of our Multi
Choice Test program [August 1985, P:
202]. I have always appreciated your I
and honest reviews of other products, s
I hope we at D&D Software can make
grade.
Multiple Choice Test has been develop
for a specific need, and as an alternat
for those who can use it to meet their nee
We are very explicit in our advertising
to what our programs will do and we bi
our programs 100 percent. At $29.95,
feel we have given teachers a vial
alternative.
In response to the review by Mr. McGar
it strongly stressed what the program woi
not do and has no balance of its capabiliti
A review should at least mention the featu
of a program so the customer can make
his or her own mind as to its benefits a
use by comparing the assets and liabilit
of the program.
As to the "bug" found in saving a te
why would anyone go to the trouble
making up a test and not giving it a filena:
before saving it, especially when there i:
specific prompt to do so? Nevertheless,
will write in an error trap to cover t
situation should it occur. If there are bi
in any of our software, individual hardw;
problems, operator problems, or speci
software needs, our customers can asst
you that we will be there to help.
Dale Lit
D&D Softwi
190
THE RAINBOW August 1985
L
I
LftST.
i*'
tcl ur.d*<-bru4f.
■•-.'■' i . ' ■
.7—52.
ssassss- 5 **'
BUZZWOAM
This one will drive you nuts. Guide Ihe
snake around Ihe screen eating Ihe
snakebait (or points, bu' don't bite
yourselt! lots ot tun awaits you with this
one
HCQUIRCS 32K & JOYSTICK
TflP€ $15.95
DISK $18.95
BR€WMAST€R
Move along the end of the bars
serving beer to your thirsty customers
Watch tor (ailing glasses and rowdy
customers. Loads o( tur.
RCQUIR6S 32K & JOYSTICK
TRP€ $14.95
DISK $17.95
glackbcards island
A brand new high res graphic
adventure. This one will blow your socks
oft! Wander around Blackbeard's Island
being ever mindlul of the hazards
while your lust builds for Blackbeard's
buried treasure Taint easy, matey!
RCQUIRCS 32K DISK ONLY
DISK $19.95
mu?mi
PANIC
Climb the ladders and light the
"meanies". Dig holes and bury them
Hours of (un await you in this
outstanding graphic arcade game.
Enjoyment for all ages.
RCQUIRCS 32K & JOVSTICH
TRPC $14.95
DISK $17.95
MON6VOPOLV
Now! Play this popular board game on
your computer. Probably the most
realistic computer board game
simulation ever. Contains all Ihe
features of the original. Buy, rent or sell
properties and become a wealthy
land baron with this prog-am.
ACQUIRES 3SK & JOYSTICK
TRP€ $19.95
DISK S22.95
TH€ MARTIAN CRVPT
fill new graphic adventure — Man discovers
that life once existed on Mors, Con you find
the hidden Martian Crypt? with sound effects
to over 30 screens of animated high res
grophics.
R€QUIfl€S 32K MACHINE
TRP€ $18.95
DISK $21.95
GOLD AUNNCA
Travel the maze, in your never ending
search for GOLD. But be careful! There ore
hidden trap doors, burly guards, tricky
ladders & slippery ropes. Sounds easy you
say? Clear the 1st screen and 24 more
owait youl
RCQUIRCS 64K MACHINE
JOVSTICH OR KCVBORRD
TRP€ $12.95
DISK $15.95
BATTL6 STATIONS
BATTL€ STATIONS is a remake of a
popular board game Without a doubt
the most outstanding sound and
graphics you have ever heard or seen.
BRTTl€ STATIONS is a one player
Interactive simulation of skill, strategy
and luck The player pits his tactical
skills against the cold, cunning logic of
the computer.
RCQUIRCS 32K DISK
THP€ $21.95
DISK $24.95
V€GAS GAM€ PAK
Have you ever wanted to bring Las
Vegas home with you? Now you can!
Six different games in this package
Blackjack. Keno. Poker, plus three other
slot machine lookalikes, The only thing
missing is the voice of Wayne Newton!
RCOUIRCS 16K €XT. BfiSIC jf*
TflP€ $84.95 b **
DISK $£7.95
COLOR CAR
You asked for it and now here it is!
Fast-moving Grand Prix style racing.
With your computer sit at the wheel of
ycur racer through the difficult
racecourse. "Bump & Jump" other cars,
but be careful because they'll return the
favor!
RCOUIRCS 64K St JOYSTICK
TflPC $19.95
DISK S22.95
Phone Order, (616) 957-0444 NO D€fiL€RS pi£flS€
4285 Bradford N.E.
Grand Rapids, Ml 49506 . Add s2 . o shipping & handling
Book Review*
7?^\
Practical Programming
In Pascal
Makes Learning Pascal Easy
PASCAL is much more than a programming language.
It was conceived by Niklaus Wirth as an academic tool
to teach structured programming techniques. As such, most
texts on the subject are written with the computer science
major in mind, and are extremely academic and technical.
For a novice programmer, it can be a strenuous if not
insurmountable task to try to learn the language for
practical purposes from such a text. Kent Porter's Practical
Programming In Pascal bridges the gap.
Inside the flashy red, soft cover of this book (which will
make it easy to find in the pile of documentation that
always accompanies computer ownership) is a very well
organized text. Also, due to Mr. Porter's smooth writing
style and thorough knowledge of PASCAL, all 266 pages
are incredibly easy to read and understand.
In the first four chapters you will be introduced to the
history of PASCAL and the benefits of structured
programming, then be taken from a description of the bare
basics through the step-by-step development of a program
using PASCAL'S excellent looping and decision making
abilities.
The development of the program from statement
purpose to final product is, of course, accompanied
a technical discussion of the parts of the program as t
are constructed. As the book progresses, this proces
repeated, developing more and more complex progr;
while readers learn more and more features of this powe
programming language. By the time you finish it, you
have a practical knowledge of PASCAL and have lear
structured programming techniques which you can ap
regardless of the language you are using.
This brings me to BASIC09. This book was written
Mr. Porter as "An Introduction to Computer Programmi
and has much general programming information dem
strated in PASCAL. In that BASIC09 is an enhanced BA
with added PASCAL-like features, they are very similar
you are having some difficulty understanding some of
features of BASIC09 like parameter passing, defining d
types and complex data structures, this book will hi
It is a PASCAL study guide, however, and it should
studied along with the use of a pascal compiler.
In summary, if you are just beginning, this book '
get you started in the right direction. Get yourself i
of the available PASCAL compilers and use Praci.
Programming In Pascal as your study guide. You'll
writing PASCAL programs in no time.
If you already program in PASCAL at an intermedi
level, the book will be useful for review purposes. Si
it is structured as a study guide, it is not particularly sui
for use as a reference manual, but it is fully indexed.
(New American Library, 1633 Broadway, New York, NY
10019, $14.95)
TRS-80+ MOD I, III, COCO, TI99/4a f£|
TIMEX 1000, OSBORNE, others
GOLD PLUG - 80
Eliminate disk reboots and data loss due to oxi-
dized contacts at the card edge connectors.
GOLD PLUG 80 solders to the board edge con-
nector. Use your existing cables, (if gold plated)
neW
fp&
&4
$16.95
INCL
$7.95
29.95
39.95
COCO Disk Module (2)
Ground tab extensions
Disk Drives (all R.S.)
Gold Disk Cable 2 Drive
Four Drive Cable
USA shipping $1 .45 Can/Mex $4.
Foreign $7 Don't wait any longer TEXAS 5% TAX
Available at your lavorite dealer or order direct Irom
E.A.P. CO.
P.O. BOX 14
KELLER, TEXAS 76248
(817)498-4242 MC/VISA
+ trademark Tandy Corp
— James F. Tay
One- Liner Contest Winner . . .
Windows demonstrates some of the CoCo's
"windowing" capabilities. Enter PM0DE4 : PCLS before
RUNning.
The listing:
1 PMODE4:SCREENl,l:PMODE£l:X=RND(
255) :Y=RND(191) :R=RND(5#) :C=RND(
4)-l:CIRCLE(X,Y) ,R:POKE178,C:PAI
NT(X,Y) , ,1:PM0DEJ2,2:X1=RND(255) :
Y1=RND(191) :LINE(X,Y)-(X1,Y1) , PS
ET : PMODEJ2I , 3 : POKE178 , C : LINE (X, Y) -
(XI, Yl) , PSET, BF: PMODE0 , 4 : LINE (X,
Y)-(X1,Y1) ,PSET,B:GOT01
Mark Werclin
St. Ignatius, MT
(For this winning one-liner contest entry, the author has been sent copies
of both The Rainbow Book Of Simulations and its companion Rainbow
Simulations Tape.)
192
THE RAINBOW August 1985
Now from Falsoft, The RAINBOW MAKER, comes . . .
The monthly magazine that's reader-friendly
PCM has gone through quite a number of changes lately! We've extended our coverage to include
the newest Tandy computers, increased our number of pages, and because our old name sounded
a bit stuffy (" — The Magazine for Professional Computing Management"), we changed it to the
more reflective and friendlier "PCM — The Personal Computing Magazine for Tandy® Computer
Users."
Tviow, we cover five of the most exciting computers on the market , as well as the most productive
— the highly popular Model 100; a brand new portable, the Tandy 200; and Tandy's new MS-DOS
computers, the Tandy 2000, Tandy 1200 and Tandy 1000.
FREE PROGRAMS!
We learned from the rainbow that readers want programs to type in , so, each month we bring
you an assortment of them, including games, utilities, business applications and graphics.
BARCODE, TOO!
Also, pcm is the only computer publication in the world (that we know of) that brings you programs
in bar code, ready to scan into memory with the sweep of a wand !
TUTORIALS GALORE
Add to this our regular tutorials on telecommunicating, hardware and machine language, as well
as basic programming tips and product reviews, and we think you'll find we're one of the most
informative and fun magazines on the market today.
So if you're ready to add portability or step up to MS-DOS, stay with Tandy and the rainbow
family through pcm.
□ YES! Please send me a one year (12 issues)
subscription to PCM for only $28.* A savings of 22%
off the newsstand price.
Name
Address
City
State
ZIP
In order to hold down costs, we do not bill.
I iMy check in the amount of
Charge to my: LJviSA DMasterCard
Acct. #
is enclosed.
I lAmerican Express
Expiration Date_
Signature
'Canadian subscribers add U.S. $7. Surface rate elsewhere $85. Allow 5-6 weeks lor lirsl copy. Kentucky residents add 5% sales tax.
Mail to: PCM, The Falsoft Building, P.O. Box 385, Prospect, KY 40059
Software Review!
Tr7Z\
Data Bank Organizes Data
With Or Without OS-9
My previous experience with serious microcomputer
databases was the Model II's PROFILE II and CoCo's
Pro-Color-File, so I knew this package wasn't a game I'd
be playing with the kids.
Data Bank has many of the same features I was already
used to: user definable data to be stored, the input screen(s)
and report layouts to the screen or printer. It does include
all basic math functions so the computer will automatically
make calculations for you.
Validation of input lets you be sure you're only putting
numbers or letters (even numbers or letters between
specified limits) in fields you define as numeric, alpha-
numeric, date or reserved for computer generated math
answers. This eliminates lots of unhappy hours at report
time.
You will receive an unprotected disk and a 29-page
manual! A tutorial database is included to help get your
feet wet.
Data Bank operates in the OS-9 environment with at
least one drive. It does take advantage of extra drives.
You do need 64K, but you do not need the OS-9 system.
The package allows you to load and run from BASIC.
I ran the program from my version 1.0 of Radio Shack
Disk BASIC without any problem and went directly into
the tutorial. The wide screen is very impressive but some-
times a little hard to read from a TV screen.
irfttM
The Handicapper
Use your Color Computer to improve your performance at the
track! These 16K programs for Thoroughbred, Harness and
Greyhound racing rank the horses or dogs in each race quickly
and easily. All the information is readily available from the Racing
form, harness or dog track program.
Thoroughbred factors include speed, distance, past perfor-
mance, weight, class, jockey's record, beaten favorite and post
position. Harness factors include speed, post position, driver's
record, breaking tendencies, class, parked-out signs and beaten
lavorite. Greyhound factors include speed, past performance,
maneuvering ability, favorite box, class, kennel record, beaten
favorite and breaking ability.
Complete instructions and wagering guide included. Thorough-
bred, Harness or Greyhound Handicappers, $34.95 each on
tape or disk. Any two for $54.95 or all three for $74.95.
Toll Free (Orders Only) 800-245-6228
For Information Call 301-547-1447
Federal Hill Software
8134 Scotts Level Rd.
Baltimore, MD 21208
VIS
Everything was explained clearly between the mam
and screen prompts until I got to the part where you c
change your display format, and 1 found I didn't ha
lowercase. Also, repeatedly I found myself outside t
tutorial database and having to completely exit the progri
and start over — that's really frustrating.
Anyone not familiar and comfortable with the Of
environment will be completely baffled by some of I
problems they'll run into such as suddenly finding th
tutorial is no longer in the active directory, strange en
messages and having no lowercase input. Shell commai
and error messages are explained somewhat in the rrianu
but BASIC users are very restricted without a real Of
system.
Data Bank lets you delete records (and restore tht
if you make a mistake), compress data files to elimini
dead space, selectively transfer (archive) records, ev
restructure your records if you later find a need for chan
— this is impossible or tricky in other programs.
I was impressed with the ease with which new files c
be set up. You'll be prompted on the screen for many thin
I've had to search for in other programs.
Reports are easily formatted, and you can specify tot;
and break points. I didn't follow through myself, but i
easy to imagine a checkbook application with subtot;
for various expense items so you would have your figui
all organized and in one place for the IRS next April 15
I was disappointed that Data Bank doesn't seem to ha
an option for conditional sort. For instance, sort and pri
all records whose ZIP code is higher than 69999. Ah
no provision was made for easy label printing.
This is a pretty powerful database manager which mea
you'll need to spend some time learning how to masi
its abilities so they'll work for you. No one should exp(
to go into any program of this caliber without expecti
to invest some serious time.
OS-9 isn't really needed, but BASIC users will sa
themselves a lot of frustration giving this one a wide bed
Otherwise, I can recommend this without qualificatio
to anyone who wants to get all that disorganized data sort
out and stored in order.
(Computerware, P.O. Box 668, Encinitas, CA 92024,
requires 64K, disk S79.95 plus $2 S/H)
— Bob Doom:
One- Liner Contest Winner . . .
This one-liner is called Rowboat. If the water comes
up red instead of blue, press the Reset button and
run the program again; repeat if needed to make the
water blue.
)3 PMODE4,l:PCLS:SCREENl # l:FORA=p
TO255STEP20 : CIRCLE (A+10 , 164 ) , 10,
,.7,0, .5:NEXT:DRAW"BM175,168M192
, 144L119M90, 169BM132 , 144NG25E20F
3G42BM133,144CPR4" : POKE178 , 2 : PAI
NT (0,191) , ,5:PLAY"L4CCL8.CL16DL4
EL8 . EL16DL8 . EL16FL2G04L8CCO3GGEE
CCL8 . GL16FL8 . EL16DL2C" :RUN
Garry Sittler
Jacksonville, IL
(For this winning one-liner contest entry, the author has been sent copies
of both The Rainbow Book Of Simulations and its companion Rainbow
Simulations Tape.)
194
THE RAINBOW August 1985
ft ware Review!
rsz\
lyrus World Class Chess Is
k New Dimension In Chess
)o you enjoy playing chess? If not, would you like to
n? Or would you just like to sit back and watch the
lputer play a game by itself?
f you answered "yes" to any of the above questions,
n Cyrus World Class Chess is what you're looking for.
■us requires at least 16K RAM (a joystick is optional),
er inserting the cartridge, the title screen appears for
lort moment, then the chessboard appears with the chess
;es automatically placed in position — white at the
torn of the screen and black at the top. You are now
dy to play.
f you have never played chess before, you will find the
nual most helpful. It gives an in-depth explanation of
rules of chess and the types of moves each piece makes.
:n if you're an expert at chess, there are some options
t Cyrus has to offer in order to make your game more
Testing and challenging.
Vhen the chessboard appears, you will see a small green
are flashing on and off inside the square at the bottom-
corner of the board. This square, known as the marker,
icates to the computer the piece you want to move.
: four arrow keys are used to move the marker around
board.
"o move a chess piece, first bring the marker onto the
are occupied by the piece you want to move. Secondly,
ss ENTER and the piece will start to flash, then use the
dw keys to move the piece to its new square and press
"ER again. The joystick may be used for the same
pose.
f you attempt to make an illegal move, an error signal
nds, and you must move again. Also, if you have taken
trol of a piece but then decide not to move it, return
o its original square and press ENTER. The piece is
lrned and the marker may be moved to another piece,
en you have completed your move, Cyrus computes
•eply and then makes its move.
lyrus always lets you move first and play white. If you
it to play black, press 'M'; Cyrus will then move first,
s possible to have black at the bottom of the screen
pressing T to invert the board.
)ther than the chessboard itself, there are several other
)lays. By pressing the space bar, the message display
appear. The message display shows a record of the
ves made so far in the game. It records the moves with
lint . . .
Machine Language Offset Loading
If you want to load an ML file at a location higher
lan the addresses in the file, type the command
LDADM (or LOPlDM for disk) "filename", (new
ddress-old address). If you want to load a file at
lower location, type the command CLOADM (or
OflDM) "filename", (new address-old
ddress)+G5536.
the use of a letter-number system. Each column is given
a letter name (A through H), and each row a number (1
through 8). The level at which you are playing is also shown
on this display. The levels (one through nine) represent
the amount of "thinking" time that Cyrus is allowed before
each move. Cyrus plays better if it has more thinking time
per move. The time spans range from two seconds to three
and a half minutes.
There are three additional levels: adaptable, infinite and
problem. When playing on the adaptable level, Cyrus takes
roughly the same amount of time as you. When playing
on the infinite level, Cyrus will normally compute until
you tell it to move by pressing 'M.' On the problem level,
Cyrus searches for a way to force checkmate in five moves
or less.
The other displays show numerous commands and
options you may use during the game. For example, you
can watch the computer play by itself by pressing 'D.' It
is also possible to take back a move by pressing 'B.' If
you cannot decide which move to make, press 'H' and
the computer will give you a hint.
Cyrus is such a versatile game and has so many options
that it would take days to explain them all. Although I
am not a master at chess, I enjoy playing it every so often,
and Cyrus is by far the best video chess game I have ever
seen.
(Radio Shack stores nationwide, 16K Program Pak, S39.95)
— David So
THE SOFTWARE HOUSE!
€3^
ATA GRADE TAPE
(with labels)
! C- 1 S6.95/DOZ. 25/S 1 3.95
I C-20 S8.50/DOZ. 25/S 15.95
I C-30 S9.95/DOZ. 25/S17.95
"SPESHUL"
(15 Tapes, Hard Boxes, Labels
and Storage Box)
I C-10 S12.95 C-20 S13.95
C-30 S14.95
i Hard Boxes 25/54 50-100/SI5.00
RIVE HEAD CLEANER
$7.95
| RIBBONS: EPSON MX/FX/RX 70/80 S6.50ea.
Rod, Green, Blue, Brown S7.00 ea.
Gemini 10, 1 0X 2/S5.00
Okldata BO, 82, 02, 93 2/S5.00
GEM/OKI Colors S3.00 ea.
C.IT0H, NEC 8023
Apple Pro $6.50 ea.
Apple Pro Colors S7.00 ea.
SENTINEL BRANDj
100% Certified Disks
SS/96TPI Box ol 10 S23.95 '
DS/96TPI Box ol 10 S25.95
SENTINEL Bulk Disks W/Tyvek
SS/DD 1 0/S 1 2.95 - 1 00/S 120.00
DS/DD 1 0/S1 4.95-1 00/S1 40.00
COSMOS DISKS
(Our Own Brand Label)
Certified 1 00% Error Free
SS/DD 10/S10.95- 100/S95.00
DS/DD 10/S12.95-100/S110.00
Tyvek Sleeves 25/S3.00-1 00/S 10.00
6/S35.00
4/S26.00 q
Doz.ZS25.00 i
DO2./S25.00 i
DOZ./S25.00
6/S35.00
4/S26.00
ALL ITEMS 1 00% GUARANTEED!
Add $2.50 S/H in U.S.A. - Canada Add $3.50
Michigan Residents Add 4% Sales Tax
Check/Money Order Payable to:
Dallas Cox
9020 Hemingway, Redford, Ml 48239
(313) 937-3442
Send card » & exp. dale
Mm. chg. order S20.00
August 1985 THE RAINBOW 195
Software Reviewi
T/^\
Metric Mind Performs Well
At Teaching Conversions
Have you heard the recent radio commercials about the
new "Thirstbuster" bottles of cola? It seems that the world
of metrics is upon us again. This time in the new three-
liter size. Gee, how many eight ounce servings can I get
out of this one? How many calories per bottle would that
be? I had better get the old Metric Mind out and start
practicing again. I am referring to Metric Mind by Creative
Technical Consultants Software. Metric Mind is a drill
and practice program to assist students in learning
conversion between metric and English units of meas-
urement.
Metric Mind is written for a CoCo or CoCo 2 with
Extended Color BASIC and at least 16K of RAM, and it
comes on cassette. With a I6K machine, you must first
perform a PCLEflR 1 before loading the program. If you
also have a disk drive attached, you may have to unplug
the drive from the computer before loading the program
so as not to receive an OM Error.
After loading the program and typing RUN, a menu
displaying five choices appears. They are as follows:
1) Conversion table
2) Prefix table
3) English to metric problems
4) Metric to English problems
5) Estimating in metrics.
ADOS
ENHANCED, EPROM-ABLE
DISK BASIC
Now, you can supercharge Basic with an impressive array ol extra features
WITHOUT sacrificing compatibility! AOOS is compaltbie with virtually 100% of
commercial software. Customizing utilities are provided to allow user-defined
command abbreviations, baud rate, stop rate, 1'acks per disk {35 or 40), support of
double-sided drives, and more. After customizing ADOS, you can nave it burned into
an EPROM that plugs into the Disk Basic ROM socket, or just use it in RAM as a 64K
disk utility. (EPROM + burning will cost about S20~we provide information
concerning how you can have Ihis done-) Features include; * repeat and edit of (he
last direct-mode command • 26 definable control key abbreviations ■ automatic line-
number prompts • DOS command * lowercase command entry (a fine complement to
a Lowetkil or PBJ WordPak) • COPY (filename) to (drive number) « AE error override
option • RAM command HWK) * RUNM command • text echoing to printer • ML
monitor • text file scan • enhanced dirociory • error trapping ■ hi-res text utility
included (42, 51, or 64 characters per line)
1 COULD NOT FIND ANY SOFTWARE THAT WOULD NOT RUN UNDER ADOS."
THE RAINBOW. Oocomber 1984
"I LOVE ADOSI . . . A GENUINELY FIRST RATE PRODUCT."
Color Micro Journal. February 1985
"I WONT PART WITH MY ADOS EPROM FOR ANYTHING . . . NO COMPATIBILITY
PROBLEMS'-
Hot CoCo.May 1985
Dlik.127.9S
THE PEEPER
ML PROGRAM TRACER
Monitor machine-language programs AS THEY ARE RUNNING! Peeper actually
timeshares wilh the target program, giving FULL CONTROL as ML programs run.
Switch instantly between watching regular program output and Peeper's trace ol
registers and stack on screen or printer. Inspoct momory In any of 26 display modes.
Execution speed can he varied from lull speed to tho barest crawl, or halted onlirely,
as programs run. Single-stepping, breakpoints, momory or register examino/chango.
Relocatable, supports 64K use (16K required) See February "85 review.
Disk 523.55 Tape $21.95 Assomblor source listing Add 3.00
FASTAPE THE NEXT BEST THING TO A DISK DRIVE
Fastapo allows cassette I/O at 3000 baud- TWICE NORMAL SPEED. II uses the high-
speed (POKE 65495.0) mode, and makes it convenient to stay in this modo
throughout. Features automatic adjustment of cassette and printer parameters whon
speed mode la changed. Control-Key functions (or many Basic commands and lor
changing speed modes Compatible with all Mo types, and can be usod with
Telewriter-64 and many other tape utilities.
Tapo . S21.95 (16K. required) ' See July '83 review.
SPECTROSYSJEMS.
No delay on personal checks
Please add 52 00 shipping Sniry
11111 N. Kendall Drive,
Suite A 108
Miami. Florida 33176
(305) 274-3899 Day or
ri. I 'n 111 , .Mis or COD'S
Menu choices one and two simply display conversion tab
and metric prefixes.
When you select either of these choices you are prompi
for a skill level of from one to five with five being I
most difficult. A skill level of five will display all of i
conversion tables and prefixes. There are a total of
different conversion formulas for convening things l
inches to centimeters or miles to kilometers. There are e\
a few exotic formulas like 1 Joule = .24 calories. Just thii
at only two calories per bottle you'll now be consum
8 Joules. Feeling a bit heavy?
Selecting menu option three or four brings us to
nitty gritty of Metric Mind. Here you'll get a chance
strut your stuff. The program now prompts you for y<
name and a skill level and proceeds with a series of
conversion problems. You are presented with wore
problems such as "If Puff The Dragon is 5 miles long fn
head to tail, how many kilometers long is he?" You
then given two chances to provide the correct answer.
Since the program is to teach metrics, not math, y<
answer may be within plus or minus two percent of be
correct and it will be accepted. After 10 such proble
you are asked if you would like to try again or reti
to the main menu to select another option or skill level.
The last menu option, "Estimating in metrics," sim
presents you with some common objects like a stop s
and requests that you estimate its size in some metric ui
All in all, Metric Mind performs well and does whai
is advertised to do: drill and practice.
(Creative Technical Consultants, 16-8 Sangre de Cristo,
P.O. Box 652, Cedar Crest, NM 87008, 16K cassette $17.95;
— Larry A. Birkenf
One- Liner Contest Winner . . .
Gemslash produces slashed zeros on Star Micronics
dot-matrix printers (such as the Gemini- 1 OX and 15X S ,
which don't normally have this character. It works
by downloading a bit image of the character intc
the printer, which will then use this new charactei
in place of its usual zero. To return to the normal
zero (for text applications) switch the printer off and
back on.
The listing:
1 CLS:PRINT"GEMINI SLASHED-ZERO
:PRINT"TURN PRINTER ON: PRESS e:
ter":EXEC44539:A$="" :FORX=1TO20
READY :A$=A$+CHR$(Y) :NEXTX: PRINT
-2,A$:DATA27,42 / p f 27, 42 ,1,48,0, •
2,34,65,16,73,4,65,34,29,27,36,
:END
John R. Cur
Louisville, K)
( For this winning one-liner contest entry, the author has been sent copie
of both The Rainbow Book Of Simulations and its companion Rainbo\
Simulations Tape.)
196
THE RAINBOW August 1985
tware Review,
T/X\
Battle of the Bulge:
A Tactical Game
Of World War II
ae fog has kept Allied aircraft tied down in England
veeks. The advance on the Rhineland and into Germany
ailed in the forests of Belgium. American and British
ps will have to spend Christmas in the mud and snow,
cd down by scattered German resistance,
iddenly SS Panzers attack! Where have all those Tiger
s come from? Who is guarding the Third Army fuel
ps? Where is Patton?
n December 16, 1944. the Battle of the Bulge starts
the Belgian town of Bastogne. Hitler has massed 27
lions, including nine armored, by pulling troops and
s from the eastern front. German forces drive westward
ugh the Ardennes forest. The Allies must hold out
I the weather clears and air strikes can resume. Hitler's
great counter offensive of the war will decide the fate
urope.
ittle of the Bulge is a strategic war game for one or
players. This game recreates the last German attempt
reak through the Allied advance across Europe that
ed with the invasion of Normandy in June 1944. You
e your troops and tanks, call in artillery support, engage
mibat and wait for the weather to clear,
ne object of the game is for the Axis forces to capture
:own of Liege, on the Meuse River, or break through
Allied lines and cross the river. The Allies must hold
until December 31.
ne game begins with a display of the battlefield. A
resolution map shows rivers, forests, roads and towns,
igle screen of text introduces the game and asks whether
want to play against the computer. If you so choose,
computer will take the Axis side and make the first
e.
layers alternate turns moving their entire forces, with
focusing on a local battle screen. A map displays a
II region of action and gives the moving unit's name,
bat strength and movement range. The map area is
posed of text and graphics characters that represent
dus terrain features and unit types (knowing the
rence between armored and infantry divisions is very
srtant). Towns are represented by a single letter; water
solid blue block. Allied troops are beige, Axis troops
Tiagenta, etc.
ou move your units with the arrow keys. The troop
ement is accompanied by sound and costs from one
t on roads to four points in mountain terrain. Moving
water stops the unit for that turn,
rtillery support can be called in by any infantry unit
has an average level of strength remaining. You move
■Cover the target with the arrow keys. The maximum
;e is five grid positions. Firing at random in a three-
hree grid about the target, each barrage produces a
stic sound. A direct hit reduces the enemy's strength
inc. Even bridges can be destroyed by artillery fire.
sometimes offers a temporary tactical advantage.
Other commands at your call include intelligence reports
on local forces, an expanded map of the region, complete
strength of your forces, and requests for.iirtillery support,
or air strikes if available.
Help is provided for new players. The '@' key calls up
a sequence of four screens that review the unit designations
and give brief descriptions of commands. A separate map
sheet is provided with the instruction sheet to help you
visualize the whole field of play.
Combat begins by moving onto an opposing unit's
square. The outcome depends on the two units' relative
strength, type of terrain they occupy (or moved from) and
a random factor. Losing units either retreat or are
eliminated when their strength is reduced to zero.
The game blends the capabilities of the CoCo with the
action and strategy of good war gaming. The elements of
movement and fire power are well-balanced and the final
objective is sometimes difficult to obtain.
The computer play of the Axis divisions doesn't
effectively use artillery fire. Only a few random shellings
are made during the first round of play. After that, the
Axis forces conduct a respectable Blitzkrieg, moving
relentlessly toward their goal. It can be frustrating to chase
a Panzer battalion that has broken through the lines.
A typical game requires one and a half to two and a
half hours. The time passes quickly, but there is no provision
for saving a partially completed game.
I don't usually like "involved" war games, but Battle
of the Bulge is an exception. The action is intense, the
play is challenging and the outcome is never certain. The
historical battle was won when the skies finally cleared
and air strikes wiped out the last German Panzer threat.
The computer game may rewrite history.
(Ark Royal Games, P.O. Box 14806, Jacksonville, FL
32238, cassette S25.95, disk S28.95)
— Stuart Hawkinson
One- Liner Contest Winner . . .
Alphabet is a good program to teach children how
to use the keyboard. It puts a letter on the screen
at random and waits until that key is pressed.
The listing:
j3 CLS : X=RND ( 2 6 ) +64 : PRINT§2 7 1 , CHR
$ (X) : F0RT=1T0999999 : A$=INKEY$ : IF
A$=CHR$(X) THEN SOUND 20j3,3:GOT
J3.-ELSE IF A$<>""THEN SOUND 50,
3: NEXT T:ELSE IF A$="" THEN NEXT
T
Will Cotter
Redwav, CA
(For this winning one-liner contest entry, the author has been sent copies
of both The Rainbow Book Of Simulations and its companion Rainbow
Simulations Tape.)
August 1985 THE RAINBOW 197
Software Review!
ff£\
CINC PAC - Battle of
Midway For Victory At Sea
By H. Larry Elman
A few months ago I single-handedly sank the entire Royal
Navy in the English Channel; shortly after that, I found
a way to mishandle even U.S. Marines into frequent
surrender. So the RAINBOW editor, reacting the way any
normal government ruler would, gave me an extra star
or two and sent me off to command at Midway. Of course,
one of the first ridiculous things I succeeded in doing was
landing an entire Squadron of B-17 "Flying Fortresses"
on the deck of the USS Yorktown. (This is comparable
to driving a Boeing 747 airliner through your local car
wash.)
Midway was one of the more crucial battles of this
century and has become the focus of tremendous study
by tacticians, strategists and war-gamers. There are a
number of computer games available based on this battle;
one of the best is Ark Royal's CINC PAC — Battle of
Midway: (For the civilians among us, CINC PAC stands
for Commander-in-Chief, Pacific Fleet. It is pronounced
as if spelled sink-pack.)
In this game, the computer commands the Imperial
Japanese Navy, while you command three aircraft carriers,
a few squadrons of aircraft and three shore bases (two
of which are almost totally useless). Your biggest advantage
is the fact (as in the actual battle) that the Navy can read
the Japanese code, enabling you to set an ambush.
Believe me, if you fight this battle without using that
asset, your Color Computer will cream you! I know; it
has beaten me more times than I will publicly admit.
If you have not tried war games (or "Battle Simulations"
as some of their authors prefer to call them), then you
have probably missed one of home computing's more
challenging intellectual pursuits. You need not be either
a militarist or a history nut to enjoy these descendants
of chess.
War games can be broken into a number of subcategories,
of which two are worth a short digression. Some war games
are based on a particular historic event; CINC PAC —
Battle of Midway is of this type, while chess is not. All
war games involve some sort of map for a board. 1
computer war games use a low resolution, semi-gra|
screen. Again, the comparison with chess is
appropriate.
A small number, CINC PAC— Battle of Midway an
them, utilize the highest resolution available on the mo:
to provide a map board which looks like it came :
a geography text. Of course, the selection of that tyt
display implies dedication of much larger computer stc
just for the map.
Most semi-graphics war games can be programmf
BASIC; CINC PAC — Battle of Midway uses BASK
input/ output and logic, but has machine language co.
over the displays. Another difference between semi-gra]
and high resolution games is that the rules for navig;
and movement can be more generalized in high resolu
The price paid for this is the user no longer simply m
pieces with arrow keys, but must think through the an;
directions for his movement and/ or his fire.
I have seen semi-graphics simulate the tactics
particular time quite well, but 1 was unprepared for
well Steve Berry was able to model the subtleties of r
and air warfare at Midway and "shoe horn" it intc
Color Computer's 32K. In this game, the user can
as if he is there — the displays are that well done,
even the pauses between moves have the suspense of "b
there."
As with most such games, 1 found the instructions
brief. There is no way to enter your initial game later
a week before the battle; the instructions suggest yoi
that time to practice fleet maneuvers. I did, but bee
a bit miffed because by the time I finished the pra
and had gotten acceptably proficient I had destroyed all
a third of my fleet in operational accidents! The only t
to do was start over at the NEW GAME point an
watching the idiot box while pressing SKIP MOVE
I had passed the wasted week. This process left my f(
intact. After that, of course, 1 simply saved the new sta
situation and worked from it.
One of the reasons I lost so many assets during
up was a few bugs in the program. I phoned Ark R
and requested software support. During most of the ii
calls they were unaware that I was reviewing the g
for RAINBOW, so I can state quite confidently that
software support to the general customer is excellent.
There seem to be two main problems. The lesser
is the lack of a logic trap to prevent overloading a platl
(carrier or land base); if more than nine squadrons of pi
CCAD-B SYSTEM TEfiCH
The CCAD-B system is:
♦13 Bit Analog/Digital Converter »
16 InDut Channels for Analog Sensor
signals * 3 TTL Cospatable Latched
Outputs for OUT of RANGE Indicators
* Operates with CoCo 1 or 2. Disn
or TaQe * On-Board User Amplifiers
for Scaling of Sensor Inputs *
Operating Addresses Switch
Selectable for Multiple Units *
Dn-Board HIGH PRECISION Reference
for Stability and Accuracy *
Optional MENU DRIVEN BASIC/MACHINE
CODE Operating System for CCfiD-B
ORDER: CCAD-BH ' 4169. M
CCSOFT-DISK 529.53
CCSOFT-TAPE S27.58
YOUR COCO 1 or £ COMPUTER
' fiNOLOS'
Allow your Computer to understand the world
of Analog signals. The integration of your
computer and a Technical Hardware Analog to
Digital Converter creates a Sophisticated
Data Acquisition Systen whose Performance is
Equal to systems costing Thousands more.
* Easily Installed, Sisply Plug In to
Cartridge Port * Use of Optional Operating
System ICCSOFT) requires no Software Knowlege
« General Applications Include: * Energy
Management * Temperature * Pressure * Light *
Current » Colorimetry * Process Control
TECHNICAL HARDWARE INC., PC BOX 36D9
FULLERTON, CALIF. 92634 THinc
AD-8 SYSTEM
♦ B Bit Analog/Digital Converter
8 Input Channels for Analoo Sens
signals * Operates with CoCo 1 o
2, Disk or Tape ((Interface
contained in Plastic Case for
Convenience * Sensor Interface v
PC Mount Terainal Strip *
Operatino Addresses Switch
Selectable for Multiple Units *
Optional MENU DRIVEN BASIC/MACHI
CODE Duerating Systeto for AD-B
ORDER: AD-8H *&3- c ;
ADSOFT-DISK 1AD-BD) * 9.<
ADSOFT-TAPE (AD-8T) * l. c .
-w-
198
THE RAINBOW August 1985
landed on any platform it is possible to hang the
>ram and watch your fleet sail off to never-never land,
mse the normally prudent player is unlikely to put more
i five squadrons on any one platform, this bug is
iidered very minor.
owever, a somewhat related bug is the ability to lose
:rol over a carrier by attempting to exit the Launch
les sequence improperly. To correct that, simply replace
■ 1 186 of the main program with:
Book Review*
X7Z\
5 IF H$="S" THEN 119G ELSE IF HS>"1'
OR IF VHL (H$)>(UC+1) THEN 1185
OR A$>"9"
his patch is simplicity itself on the disk version but
ewhat inconvenient on the tape version. Ark Royal
if you get a copy that is not marked with a red 'X'
should contact them for replacement; copies with a
'X' will already have had the patch inserted. With the
h inserted, you can abort Launch Planes by typing
md the keyboard is locked against the non-numeric
it which is known to cause the bug.
nother minor difference likely to occur in the patched
ion concerns Ship's Bells. In all versions, the program
; the Admiral (you) back from coffee breaks by sounding
lime with Ship's Bells. Later versions sound somewhat
e like "Victory at Sea" than earlier ones; the do-it-
rselfercan improve the early version by a higher pitched
: in lines 1357 and 1359 and by a smaller time delay
.ine 1358. I mention this not as a bug, but as a small
nple of the mood-setting touches which make this game
timulating.
here is another anomaly in the program; whether to
it a "bug" is a judgment call. Every U.S. unit on the
en (possibly even some enemy units) is a tiny interrupt-
en blinking light. Sometimes after combat, a downed
will continue to blink; a ghost which can be battle
■is. I considered it a radar sighting for my search units.
screen shows about 3,000 miles of Pacific Ocean, but
bat sightings are at distances more like 100 miles,
urate navigation improves your score. On the other
d, in one game I wasted three days' use of two B-17
idrons chasing these ghosts. Personally, 1 feel the
ence of the ghosts provided the touch of uncertainty
led in a combat game.
you want a game more challenging than ones which
totally on the arrow keys or the joystick, consider
'C PAC — Battle of Midway. It is good enough to
itself a battle Simulation, and it is fun enough to call
f a game.
*rk Royal Games, P.O. Box 14806, Jacksonville, FL
2238; requires 32K, tape $27.95, disk $30.95)
CoCo Gains Power
And Speed With 500
Pokes, Peeks 9 N Execs
This comprehensive book, 500 Pokes, Peeks TV Execs
by Kishore M. Santwani, will provide you with hours of
PEEKing, POKEing and EXECuting.
The soft cover book contains 68 pages, all chock-full
of useful information for the CoCo user.
The use of the various commands listed will allow you
to enhance the capability of your BASIC programs without
having to resort to complicated machine language routines.
We are all familiar with the high-speed POKE and other
often-used PEEKs and POKEs frequently found in the pages
of RAINBOW. This book contains a wealth of others that
will amaze and amuse you.
The book is well structured into various sections which
deal with cassette, disk, printer, etc., and each command
is followed by the expected result and an appropriate
remark as to what it can be used to accomplish. Here in
one easy-to-use source are all the various PEEKs and POKEs
you will likely ever need. No more searching through scraps
of paper and past issues of RAINBOW to find that "handy
POKE I can't remember."
The book contains many useful commands and routines
too numerous to list here, but suffice it to say that almost
anything from Auto-Start to Zax.xon plays is covered.
Other useful commands to provide key beeps and screen
print are included as well as key disables, memory bank
switching and recovering lost BASIC programs.
In summary, this is a unique book which contains
information which took a great deal of research to collect.
Many of the commands listed have been, until now,
relatively guarded by those "in the know." It will help
unravel the many POKE, PEEK and EXEC commands of the
CoCo to help you gain the power and speed of assembly
language through BASIC. It will help you reach greater
heights in successful programming and professionalize your
work. I believe you will find 500 Pokes, Peeks TV Execs
worth the price.
(Spectrum Projects, Inc., P.O. Box 21272, Woodhaven, NY
1 1421, $16.95 plus $3 S/H)
— Jerry Semones
tint .
Automatic Lowercase
To move automatically to lowercase, type POKE
82,0. To switch back to all caps, type POKE 282,1.
Hint . . .
Cold POKE
If for some reason you want to simulate a cold
start up, type POKE 113,8 and ENTER, then press
the Reset button. (The usual EXEC 40999 doesn't work
properly if your computer is in the 64K mode.)
August 1985 THE RAINBOW 199
Software Review!
?S2\
Practice Your Math
Skills With Mathfun
Mathfun is an educational program designed to give the
user practice in basic mathematical skills. This program
randomly generates numbers, between two digits and five
digits, which the player must either add. subtract, multiply
or divide.
After loading Mathfun, which requires a Color Computer
with Extended BASIC, the title screen appears. The player
is then asked to enter his/her name, up to eleven letters
in length. The main menu is displayed and shows the types
of mathematical equations available. To make a selection,
press ' 1' for addition, '2' for subtraction, '3' for multiplication,
'4' for division, '5' for a mixture of problems, or '6' to
terminate the game. If addition, subtraction, or a mixture
is chosen, 10 problems will be given to the player to solve.
If multiplication or division is chosen, then seven problems
will be given. After making a selection from the main menu,
a skill level must be selected by pressing '1,' '2' or '3.' If
the player arrives at the skill level menu and decides that
he would like to change his selection from the main menu,
he may press 'C to return to the main menu.
For each problem, the player types in his answer and
presses the ENTER key. The program then tells the player
whether the answer is correct or incorrect, and an
STOCK & FUND INVESTING
with the
TRS-80* COLOR COMPUTER
USE FUNDGRAF AND FUNDFILE
FUNDGRAF ia a slock mnrket analysis program thnt not only gmphs and
annlyxes funds or stocks, hut also makes decisions on when to BUY and SELL.
Improve market timing using your COCO.
I I i I
GRAPHS fund's progress lup lo 200 ■
weeks). SUPERIMPOSES for comparison:
a line of constant percent growth or a
graph of any other fund (or stock).
CALCULATES over any time span: the
percent price change and the moving
average lany span). INDICATES BUY
andSELLsignals.FUNDGRAFrcquircs
16 KECBmin.
16/32 K Tape S-19.95
16/32 K 5 in. Disk $69.95
ADD S2 handling on all orders.
I ' I ■ I
FUNDGRAF— A STOCK
MARKET ANALYSIS
PROGRAM FOR 16K EX
TRS-80 COLOR COMPUTER .
THS-60 COiOH COMPUTES - 1M TANDV COUP
I I I ■ I ■ I ■
-L
FUNDFILE is a portfolio and account management program for securities.
Manage single or multiple portfolios of stocks, mutual funds, bonds, money
market funds, etc. FUN DFI LE allows easy maintenance of all your records for
accurate portfolio evaluation. NEW 32 K VERSION of FUNDFILEsummarizes
transactions (dividends, interest, purchases and sales) between any two
dates of your choice- weekly, y early, etc. Categorizes interest and dividends paid
as to tax liability (tax free, etc.) and capital gains as long or short term. Great for
tax reports.
FUNDFILE REQUIRES 16 K ECB min. and 80-COL PRINTER.
5-in. Diskette only for 16 K ECB $27.95
5-in. Diskette only for 32 K ECB $37.96
ADD S2 handling on all orders.
^
Write for free brochure for details. Dealer inquiries invited.
PARSONS SOFrWARE, DEPT. G
118 WOODSHIRE DRIVE
PARKERSBURG, WV 26101
appropriate tune is played based on the results. Sfi
a player wish to end a round before it is completed
round can be aborted by entering a special code whei
program asks for the answer. This code is 1 1 1 1 ( r
'O' is the capital letter 'O,' not zero).
At the end of each round (a set of seven or 10 probk
a summary of that round is displayed. The display incl
the number of correct answers out of the numbt
problems and the percentage of correct answers,
summary takes into account the total number of prob
the round is supposed to present (seven or 10) even i
round is aborted. However, the final summary only t
into account the attempted problems. After reviewing
round summary, press ENTER to continue. At this i
the main menu will reappear.
The final summary is displayed only after the p
presses '6' on the main menu to end the program,
number of correct answers out of the number of atteni
problems is shown, along with the percentage of co
answers. The number of rounds which were aborted is
displayed.
Mathfun has excellent sound effects but could use <
improvement in the graphics department. It is defir
a useful program for students in third grade through mi
school and possibly high school.
(Compugram, Box 26663, Richmond, VA 23261, cassct
$10)
— Davi
*c
Full
Character Set
FOR
CoCo or CoCo2
%
Easy to install board adds:
• All 96 Standard ASCII Characters
• Uppers Lower Case Displayed Simultaneous,
with NO Inverse Video
• True Lower Case Descenders
• Braces & Vertical Bar Characters
• Slashed Zero
• Other Features
Board is hardware driven and requires NO sottwar
drivers. NO effect on any memory.
Enhances CoCo screen for:
• OS-9 Operating System Programming
• "C" Language Programming y^^s,
• Word Processing //l^5V
• Communications Terminal Modes rainbow
Cfo'incAfiO'.
PRICE S38.00
(+S2.00 shipping/handling if charge)
CoCo Devices
Box 677, Seabrook, TX 77586
713—474—3232
Visa (Specify CoCo or CoCo2) Mastercarc
200
THE RAINBOW August 1985
ftware Review*
rrz\
Space Web Teaches
trategy And Reasoning Skills
^s you beam through hyperspace going many times the
ed of light, you see something in the distance. As your
d gets closer, the faint object begins to take shape. You
ice something familiar about the object, and as it gets
ser, the terror grips you.
Oh no," you yell, "it's the dreaded space web." As the
3 surrounds your ship, you know that your only hope
escape is to change the color of the web walls to the
get color and make the web dissolve.
>Jo, you're not in the newest ship of the 21st century,
u're not even in the next Buck Rogers episode. You're
ying Space Web, the newest creation from Spectacular
'tware. Space Web is a 32K high resolution game that
uires joysticks.
"he scenario is as follows: Your objective is to escape
dreaded space webs that inhabit hyperspace as you
;mpt to pilot your spaceship to its destination. To do
i you must change all of the sides of the web to the
get color which is displayed at the upper right-hand
tion of the screen. Each time you hit a side of the space
) you change its color.
The joystick is used to control the direction of your ship.
When you are the farthest away from a wall, you must
move the joystick in the direction you want the ship to
go. You must go to an adjacent wall. In Level one you
can bounce off of a wall three consecutive times before
your ship will be destroyed. As you get to the higher skill
levels the amount of consecutive times you may bounce
on a wall decreases.
There is also a time limit on each level of play. The
time is the same on each level, but as you reach the higher
levels the clock moves faster.
Space Web seems to be a game for the younger generation
(about 8-10 years old) because it teaches strategy and
reasoning skills which are very essential. Also, the first
time that I played the game, I got to Level six (there are
only nine levels).
Many improvements are needed to make this game a
good one. One suggestion would be to make it more of
a shoot-'em-up, while still teaching strategy and reasoning
skills.
I find Space Web to be tedious, but a good learning
game. It isn't outstanding like the new games that we have
been seeing lately. I will give it three stars — an average
rating.
(Spectacular Software, P.O. Box 363, Mansfield Center,
CT 06250, cassette or disk $19.95 plus $1.50 S/H)
— Pat Downard
Submitting Material
To Rainbow
Contributions to THE RAINBOW are welcome from
eryone. We like to run a variety of programs which will
useful/ helpful/ fun for other CoCo owners.
Program submissions must be on tape or disk and it
best to make several saves, at least one of them in ASCII
rmat. We're sorry, but we do not have time to key in
ograms. All programs should be supported by some
itorial commentary explaining how the program works,
jnerally, we're much more interested in how your
bmission works and runs than how you developed it.
ograms should be learning experiences.
We do pay for submissions, based on a number of criteria,
lose wishing remuneration should so state when making
b missions.
For the benefit of those who wish more detailed infor-
ition on making submissions, please send a SASE to:
Amissions Editor, THE RAINBOW, The Falsoft Building,
ospect, KY 40059. We will send you some more
mprehensive guidelines.
Please do not submit programs or articles currently
bmitted to another publication.
E.I. T . Electronic Typing Teacher
by CHERRYSoft
Learning to type the right way can save you hours of tedious
work when entering programs into your CoCo, and this is just
what ETT was designed to do. Devote a little time every day prac-
ticing with ETT and before you know it you will be typing with con-
fidence. Entering those programs will no longer be the chore it
use to be.
ETT's video keyboard lets you practice with all the keys labeled,
all the keys blank or only the "home" keys labeled. The visual
cues guide you while you learn to type without watching your
fingers. ETT shows your accuracy, response time, and words per
minute. You will quickly see that you are improving with practice.
With the sentences provided by ETT learning to type can be fun.
Over 1000 variations chosen because they include every letter in
the alphabet. You can also create your own practice sets. This
outstanding program was written by a certified teacher and pro-
fessional programmer and comes with a ten page student
manual-study guide. Requires 16K Extended Basic.
Cassette
s 2 4
95
FREE
SHIPPING Disk
$ 29
95
ETT is being used in schools throughout the U.S.
See ETT at your favorite dealer or order direct.
DEALER INQUIRES INVITED
^CoCo
G Walehouse
Where Shopping By Mail is "USER FRIENDLY"
500A N. DOBSON - WESTLAND, Ml 48185
Phone (313) 722-7957
August 1985 THE RAINBOW 201
J
Software Reviewi
i7^\
Multiple Choice Test
Fits Specific Needs
Teachers, what is the best way to prepare a multiple-
choice test? D & D Software believes that Multiple Choice
Test is the answer. I wish I could say the same. Writing
multiple-choice tests is inconvenient at best. Any program
designed to make the job more convenient has potential.
I'm sorry to say that Multiple Choice Test simply doesn't
make the grade in my book. The program has many
limitations and anyone contemplating its purchase should
look very closely. You may find that it isn't right for you.
The program aids in the writing, printing, storage and
grading of multiple-choice tests. One section allows you
to enter test questions, choices and correct responses. It
is this section which is most restrictive. The program allows
questions to be a maximum of 96 characters long. This
is far too short for many of the questions I regularly use
on this type of test. The second restriction is in the number
of possible choices. There can be only three. All of the
multiple-choice tests I have seen recently have four or five
answers from which to choose. If the program allowed
two choices, it might be useful for true/ false-type tests,
but three choices is what you get and that is unnecessarily
restrictive. Each answer choice can be up to 64 characters
long which is less of a problem than the length limitation
placed on questions.
BASIC COMPILER
\\ \s \l( n\\ \RK belfovM Mini usm uf the ( ulorCompuin doervf the
heiii in uw nil (»4k uf h \M i Ikii h available in the computer, and have ffctl
machine iimcim^. program* ilmt use tin* full potential of tin- it.sov mlcropromsor^
That is wh) the MASK compiler, called MI.H \si< mrt developed- litre are Mime
of the reasons iiui make iiiis compiler one of i he beat bargain* in Ho's mainline:
• Program* can use all h-ik of K \\| for either program Murage
or fur large number* of variable* and array* like M20000I
- lull Floating Point arithmetic expression* wftb funtlfurn
• Sl'BftOI I INK and ( AlJ commands tillmts fur structured
prugrammiiiE and mure independent program development
- Full sei| ue filial and direct aeeess disk Tiles alluned
- BASIC source and \l.l- output I/O to disk, tape or memor>
COMMANDS SUPPORTED
1. I/O -Commands
CLOSE CLOADM CSAVEM DIR
D5KOS FIELD FILES GET
LSET OPEN PRINT PUT
DRIVE DSKIS
INPUT KILL
HSRT
2. Pronran Control Commands
CALL END EXEC FOR STEP NEXT
GOSUB GOTO IF THEN ELSE ERROR
ON.. GO RETURN STOP SUBROUTINE
3.
Math Functions
ABS ASC
ATN
COS
CVH
EOF
EXP FIX
INSTR
INT
LEN
LOG
LOC LOF
PEEK
POINT
PPOINT
RND
SGN SIN
SQR
TAN
TIMER
VAL
4.
String Functions
CHR5 1NKEYS
LEFTS
MIDS
MKNS
RIGHTS
STRS STRINGS
».
Gmphlc/Sound Conmands
COLOR CLS
CIRCLE
DRAH
LINE
PAINT
PCLEAR PCLS
PLAV
PMODE
PRESET
PSET
RESET SCREEN
SET
SOUND
6.
Other/Special Com
mands
DATA DIM
LLIST
MOTOR
POKE
READ
REM RESTORE
RUN
TAB
VERIFY
DLD
DST IBSIIFT
LREG
PCOPY
PMODD
PTV
REAL SREG
SKP
VECTD
VECTI
Tape- S69.95 rf^\
Bo s th: tiV.lt MKKiynKK " « Wasatch Ware
7350 Nutree Drive
Salt I^ake City, Utah
B4121
No C.O.D.. Utah res. add 5% tax. Call (801) 943-6263
Add S4.00 Postage and Handling
Send check or Money order.
The ability to edit questions hardly exists. That is ui
you consider reentering an entire question as editing. T
is no provision for using pieces from two or more
to form a new test, so you cannot keep blocks of quest
and build tests from them. There is also no provision
mixing the order of questions on a test or of mixing
order of the answer choices for each question. It wi
be handy to be able to do either of these things so
different versions of the same test could be produced
security.
The production or printing of the tests is ano
problem. There is no provision for changing the stanc
format which is: no left margin, one line between (
question and the first answer choice and one line betv
answer choices. The program doesn't compress three s
answer choices onto one line to save space, so a 50-ques
test will take something like eight pages to print. 1
is not counting the answer sheet.
There are two other main options in addition to
above. The first allows one person at a time to tal
test on the computer. That could be useful under cer
circumstances. The last option has the potential of b
the most useful.
The program allows rapid entry of student respo
to a test. This allows you to grade tests using the compi
There is little real advantage to using the computer
grading tests. But, since the answers are stored for t
student, there is the possibility of using the data gatht
in this way for test analysis.
Overall, the program operates somewhat sloppily,
main menu jumps every time it is presented. Thi
apparently due to the addition of choices to the menu
after the original program was written. There is als
bug in the file save routine. If you hit the ENTER ke;
response to the filename prompt when the test is tc
saved, the program enters an endless loop and the
you just entered is lost.
There is certainly a need for a good, flexible multi
choice test generating program in the educatic
community. Right now a good word processor will do
job, but something better suited to the job would
welcome. Multiple Choice Test, however, is not I
program. Unless your test writing needs specifically fit
program, I would recommend a good word processor.
(D & D Software, Rt. 2, Box 47, West, MS 39192, 321
disk S29.95)
— Donald L. McGs
^
SOMETIMES I'D RATHER
DutJuL
DUDUL is an entertaining graphics doodling program with the
usual things like line, box, paint, and circle drawing, plus
some very unusual things like chained parallelograms. Joysticl
function selection. On screen menus. 20 drawing functions
Pattern painting. Text. Undo. Condensed Disk/Tape Filing
PM0DE3. 64K Extended Basic. Sent on tape. Disk optional
$22 + $2 shipping. MO residents, 6% tax. Check or M.O
payable to Doug Dugan. 45 1 4 Wichita, St. Louis, MO 63 1 1
202
THE RAINBOW August 1985
)ftware Review!
7fc\
Personal Finance System
or Checkbook Organization
By Dennis A. Church
Personal Finance System is a disk-based checkbook filing
>gram with some additions, requiring a 32K CoCo. It
nes in a half sheet-sized envelope with a single diskette
i 11 pages of legible, clearly-written documentation,
vly first hour of working with the program led me to
conclusion that it had a bug. It would not allow the
ation of the user's own checkbook file. When I called
mputerware, they were friendly and aware of the
>blem. My original program disk was sent and returned
h the "debugged" program in a week and a day.
Personal Finance System or PFS consists of 12 individual
k programs in BASIC which are constantly being swapped
the program is used. Generally this is no problem as
y load quickly and the full range of options remains
lilable, through menus, from any program in memory,
e BREAK key is generally disabled. There are times,
iecially in the Loans/ Investments section, when the
)gram indeed broke, but typing RUN quickly returned
1 function without loss of data. The program is
protected, and the user is instructed to make a backup
the original disk for use.
The meat of PFS is the checkbook file function. This
creates a file of your checking account transactions that
includes check (or deposit) number, date, payee, amount
and budget account. The checking account balance is
constantly updated and displayed when entering transac-
tions. When entering checking or deposit information, any
item can be revised before adding it to the record by simply
choosing the number next to the item. You then replace
that item with corrected data.
You also have the options of dropping the entire entry,
adding it to the record, returning to the menu or continuing
with the next transaction. Listing pre-authorized deductions
or ADT withdrawals is taken care of by clever numbering.
The documentation suggests using 99990-99999.
PFS periodically and automatically writes new data to
disk. There is no "save records" option accessible to the
user. When first using PFS you should select Change
Startup Information from the menu. This introduces a
menu that allows you to select or initiate a new checkbook
file, set the printer Baud rate, determine the number of
disk drives you want to use and choose whether or not
to automatically load the indicated checkbook file. With
a single disk drive, the documentation says up to 1,300
check and deposit transactions can be accommodated on
the program disk. Using more drives for data-only disks
gives 3,000 transactions on each disk.
Another process that must be undertaken before serious
data entry is to customize the Budget/ Expense categories
to reflect your own financial situation. There are 48 possible
accounts with which you must classify each check or deposit
entry. There is a demonstration file on the PFS disk.
On the last page of the documentation is a sample
About Your Subscription
Your copy of THE RAINBOW is sent second class
nail. If you do not receive your copy by the 5th*
>!' the month of the publication date, send us a card
ind we will mail another. ^Canadian subscribers and
foreign air mail allow two additional weeks.
You must notify us of a new address when you
nove. Notification should reach us no later than the
15th of the month prior to the month in which you
:hange your address. Sorry, we cannot be responsible
For sending another copy when you fail to notify us.
Your mailing label also shows an "account number"
ind the subscription expiration date. Please indicate
this account number when renewing or corresponding
with us. It will help us help you better and faster.
For Canadian and other non-U. S. subscribers,
[here may be a mailing address shown that is different
from our editorial office address. Do not send any
:orrespondence to that mailing address. Send it to
our editorial offices at Falsoft, Inc., The Falsoft
Building, Prospect, KY 40059. This applies to
jveryone except those whose subscriptions are
through our distributor in Australia.
The book you've been
waiting for ...
THE ULTIMATE COLOR COMPUTER
REFERENCE GUIDE AND TOOL-KIT
by David D. McLeod and Robert van der Poel
• Complete details on every BASIC, Extended BASIC
and Disk BASIC commands, plus syntax, parameters
and potential errors.
• An entire section (47 pages) deals with making your
programs run faster and more efficiently.
' Extensive subroutine library full of BASIC and
Machine Language routines which can easily be
incorporated into your own programs.
• Over 350 - 8V? by 1 1 pages.
' Easy to read! A valuable asset for every Coco owner!
$27.95 (U.S.) or $34.95 (CDN.) plus $3.50 shipping.
Immediate shipment - Write or phone Today.
Visa, Mastercard, Money Order or Certified Cheque.
Canadians - send $2.00 for our Complete Price List.
DEALER INQUIRIES
WELCOME
CMD MICRO COMPUTER SERVICES LTD.
10447- 124 STREET
EDMONTON. ALBERTA. CANADA
T5N 1R7
PHONE (403) 488-7109
August 1985 THE RAINBOW 203
printout of the accounts for this file. It shows account
names, budgeted amounts, expenditures/deposits for the
months and the amount over or under budget along with
a summary of all figures. You will need to plan all account
categories (including income) and amounts, then enter them
into the Accounts/ Budgets/ Balance section of the program.
The amounts may be changed easily. After checks are
entered, the category names may not be changed, since
they are tied to the data in the checkbook entries.
An interesting aspect to check entry is the feature that
allows you to divide the amount of a single check if
expenditures fit into more than one category. You may
record the same check number as often as necessary,
changing only the account category and the amount (to
reflect only the portion of the check falling into that
category).
The utility of the checkbook program lies in the fact
that you can organize your income and expenditures by
category. At the end of the year or quarter you may see
totals of expenditures in tax deductible areas (contributions,
for instance) or reports of sources of income (provided
you deposited them in the checking account). The account
balance can also be used in reconciling the bank statement
with the checkbook.
Those summaries are all available as printouts only.
Without a printer, some of the most useful options are
unavailable to you. When "Print the Reports" is selected
the records are automatically sorted and saved by date.
You can then request deposits, expenses or account
summaries for any range of dates. You may also limit the
report to any specific account.
Before describing what is essentially a second, independent
part of PFS, perhaps I should comment on the practice
of using the computer to do what your checkstubs 1
been doing for years. If you're wondering whether to b
using a program like this you need to realize that
will be recording every transaction twice: once in
checkbook and once later on, sitting in front of the Cc
Is it worth it? You need to answer several questions.
Do you need easy access to expense summaries at
time? Are you trying to stick to a rigorous monthly bud
Is it time you pinned down exactly where your mc
is going, and is it important to know if that pattern su
changes? Are monthly summaries of your finan
transactions important to you? If your answer is yes, t
PFS will do well for you.
This package contains more, however, that may incn
its worth to you. Two additional options on the main m
are Compute Loans and Compute Investments. This is
my specialty, so I asked a friend who is an insure
investment counselor to explain some of the terms to
Selecting these options loads a program that will comj
a total of 18 different aspects of loans and investme
These include principal, payment, last payment, real te
and annual terms for loans.
The program will print out a mortgage loan amortizai
table and a declining interest loan table. The Investmi
module includes computations of the value or future v<
of an investment or regular deposits, amounts of in:
investments needed for regular withdrawals, and nom
and effective interest rates. It will also generate a prir
table of earned interest on an investment. If you underst
all these terms easily, you best know your need fo
program that quickly and easily computes them. Tha
not to say the average person can't find use in then
have computed that if I want to have a decent retireir
income I had better boost my IRA deposits dramatical
Personal Financial System is a well-written checkbi
record entry program, with handy extra features. It
clear, though not exhaustive, documentation and effec
error handling. Its use of disk access does a good job
fitting large data areas and program features into 32K.
©'
.©
--trj
COMPUTER GRADE
• DATA TRAC •
BLANK CASSETTES
C-05, C-06, C-10, C-12, C-20, C-24, C-32
From the leading supplier of Computer
Cassettes, new. longer length C-12's
(6 minutes per side) provide the extra
lew (eel needed for some 16K programs.
BASF-LHO (OPS) world standard tape
Premium 5 screw ihell with leader.
Internationally acclaimed Thousands ol
repeal users
Error Free • Money back guarantee
BUY THE BEST, AT FACTORY-DIRECT PRICES
♦ MO C I? I ot C 10 1 - 3lr tart
» Jt*i; iCT <t t Snso«o Jt-'SOO
WO Bom U* m • SNpo-n« J'O'SOO
t*'tt Caddy o«*< acn noi applil
*
IMCIOfUHD.DII-Cin
■UUUCASSintlAMU
WHI'IUOO'IOO IMOMOOO
..COIORIDUWIS • "WHi
iJEWbm, «».* Grnn St>Km l M nOf
WOO IOC JJOQO'iOOC
Call: 818/700-0330 .JSfcj) ORDER NOW.
FOR IMMEDIATE DELIVERY^ ■■«.■>■■ --
FREE
i caddy with iwny *
4 001 CAISflTIS PUBCHAStO
MAIL TO -
on Credit Card Orders
VODH lO 9525 Vassar Ave «">
Chatsworth. CA 91311
r
I'SM
1 DOZEN
1 DOZEN
IOIAI
CM
] '«
■ ; 13 00
:«
CIO
",1
m
(")'•«
,. M
Cm
m
it M
f
i.do
u.rjc
C M
"nr-.-,
MOO
; ■ i.OOvlOO
n *3T
.-.in: ":>
■ ■ 1 .1- '
-] « 00-100
□ JOOOiOOO
■■ >.* .hi, :<>; -■! .-.
V.I" I0TII
Ci'l rtl.-«riu itfd UIH •,.
S*4f"»*>n
"win Sutai - aaa.iioMi *i
0CJ rauifltl 0' MiM
3 50
CMrtr U a
TOTAL
ORDER FORM i
Each cassortc mctudos 2 labels only Boxes sold separate
ly In Continental US snipmeni by U P S M Pa/cel Post
pfoloriod. check here Q
Chock or M O enclosed j Send Quantity Discounts Q
Cnarge to credit card VISA ] MASTERCARD ; ]
ii!
CaiO No_
E>P-
( !|
SlaloZip .
Signatufe Phono
Ask about our DUPLICATING SERVICE
204
THE RAINBOW August 1985
(Computerware, P.O. Box 668, Encinitas, CA 92024, disl
S27.95)
One- Liner Contest Winner . . .
Happyface is a graphics animation program that
shows an animated head with moving lips. This should
entertain the kids for hours . . .
The listing:
S3 PMODE4 : PCLS1 : SCREEN1 , 1 : COLOR4 :
CIRCLE (128, 96) ,96, , . 9 : CIRCLE (75 ,
60) ,15:PAINT(75,6J3) : CIRCLE (180 , 6
p) ,15:PAINT(18j3,60) : CIRCLE (128 , 8
4 ) , 15 : FORR=lT09 : FORX= . 02TO . 4STEF
.02:CIRCLE(128,138) ,49, ,X:NEXT:F
ORY=.4TO.02STEP-.j32: CIRCLE (128,1
38),49,1,Y:NEXTY,R Doug Wylie
Mentor, OR
(For ihis winning one-liner contesi entry, the author has been sent copies
of both The Rainbow Book Of Simulations and its companion Rainbow'
Si/nutations Tape.)
BUT... CHECKERBOARDS
ARE FOR TABLECLOTHS!
THE LOWERKIT III FROM
GREEN MOUNTAIN MICRO
Still cloaking your Color
Computer in a checkerboard
tablecloth? Since 1981.
thousands of Color Computer
users have uncovered their computer by
discovering the Lowerkit — the first and
best full-time lowercase and special
symbols generation system for your
Color Computer.
Why a Lowerkit? Because uppercase-
only display is a relic of the user-
unfriendly past. And because you can't
really read a checkerboard excuse for
lowercase display. Sure, software
lowercase comes with a handful of
commercial programs. But software
lowercase gobbles up over 6,000 bytes of
your precious memory, liven if you have
64K, you'll give up 10% of it for a
simple lowercase display. And software
fcnrertase vanishes when you change
programs or turn off your computer.
Take IS minutes. Put the Lowerkit in,
A Lowerkit is simple, reliable — and it's
always there. You Hip on your machine,
and Lowerkit's bold lettering greets you.
No tapes, disks or cartridges to load
first. No compatibility problems; when
you don't want it, you switch it off.
And now. the new Lowerkit III
includes a reverse screen switch as well.
Big, bright green letters on a black
background.
Original Colin- Computer Displa
III ltic ludes f -j i 1 -
lowercase display,
nd reverse video, and
ohics compatibility.
LOWERKIT HI Display (reverse video, loo)
Four years ago. the Lowerkit made
history and set the standard in Color
Computer lowercase. For example, game
and education programs from Sugar
Software have Lowerkit display options.
Spectrosystems' ADOS supports the
Lowerkit; so does Cer-Comp's TextPro.
Cartridge Scripsit looks beautiful with a
Lowerkit. Spectrum Projects, Cheshire Cat
and many others have developed
beautiful alternate character sets which
you can download from Micronet. burn
into an EPROM, and snap into your
Lowerkit.
Pull the checkerboard tablecloth off
your Color Computer with a Lowerkit.
The original. The standard.
New Low Price on the
Assembled Lowerkit III!
• Lowerkit III, assembled and tested, S67.50
• Lowerkit IN, complete kit of parts, S49-95
• Lowerkit HI, printed circuit board, S20.00
Be sure to specify Color Computer or
Color Computer 2.
ALSO AVAILABLE FROM
GREEN MOUNTAIN MICRO
Color Burner with/software, $69.95 /
S56.95 kit
Micro Language Lab "Learning the
6809 ",S99 (P l «s s 3-50 shipping and
handling)
CoCoPort interface. S54.95 / S44.95 kit
RAM/ROM pack, S29.95 / S19-95 kit
64K Color memory upgrade kit, S49-95
with NEW Memory Tester, S54.95
Color Quaver. Software Music
Synthesizer, S14.95
Multipak Extender Cable 24".
It works! S3 5. 00
TV Buff II* improved to handle virtually
all monitors, S19.95
(Add $2.50 shipping and handling)
'Specify Color Computer or CoCo II
Green
Mountain
Micro
Bathory Road, Box R -
Roxburv, Vermont 05669
802 485-6112
Hours: 9am-5pm, Monday-Friday
COD/VISA/MASTERCARD
TRS-80 is a trademark of Tandy Corporation
f THE COLORSOFT®
BUSINESS SYSTEM
Software Review!
i
QUALITY BUSINESS SOFTWARE FOR THE
COLOR COMPUTER SINCE 1982
SAMPLE TRANSACTIONS INCLUDED
USER FRIENDLY AND MENU DRIVEN
SMALL BUSINESS ACCOUNTING This sales
based accounting package is designed (or the non-accounting
oriented businessman. It also contains the flexibility lor the
accounting oriented user to set up a double entry journal with an
almost unlimited chart of accounts. Includes Sales Entry, transac-
tion driven Accounts Receivable and Accounts Payable, Journal
Entry, Payroll Disbursement, and Record Maintenance programs.
System outputs include Balance Sheet, Income Statement, Cus-
tomer and Vendor Status Reports, Accounts Receivable and Pay-
able Aging Reports, Check Register, Sales Reports. Account Sta-
tus Lists, and a Journal Posting List S59.95
ACCOUNTS RECEIVABLE Includes detailed audit
trails and history reports lor each customer, prepares invoices and
monthly statements, mailing labels, aging lists, and an alphabet-
ized customer listing. The user can deline net terms lor commer-
cial accounts or finance charges for revolving accounts. This
package functions as a standalone A/R system or integrates with
the Small Business Accounting package $49.95
PAYROLL Designed for maintaining personnel and payroll
data for up to 200 hourly and salaried employees with B deduc-
tions each. Calculates pay roll and tax amounts, prints checks and
maintains year-to-date totals which can be automatically trans-
ferred to the SBA package. Computes each pay period's totals for
straight time, overtime and bonus pay and determines taxes to be
withheld. Additional outputs include mailing list, listing of
employees, year-to-date federal and/or state tax listing, and a
listing ol current misc. deductions. Suited for use in all states
except Oklahoma and Delaware S49.95
All programs require a printer and a minimum ol 32K and 1 disk
drive but will take advantage of 64K and 2 drives. Each package
features a hi-res 51 x 24 black on green screen.
INCLUDE S5.00 Shipping/Handling Per Order.
BRANTKX, INC.
P.O. Box 1708
Greenville) Texas 75401
TELEPHONE ORDERS
(214)454-3674
COD/VISA/MASTERCARD
V
206
■ ag e Hs g ^^gg^ssgss s ss5sssssg gg!ssgg
THE RAINBOW August 1985
M
Handycode — An Efficier
Way To Keep Data Privat
Handycode is an encryption program for the si
storage of small lists of information. Most people al
time or another have a need for the safe storage of sen:
or personal data. Handycode is just the program they i
With Handycode, they can enter a list of such tl
as passwords they wish to keep secret, phone numbers
wish to keep private or even confidential records iron
office.
When Handycode is LOflOed and RUN, a standard
page with a prompt for encryption or decryplio
displayed. Having entered your choice, you will be a
for your secret password needed to gain access to
list. If you choose to encode, you will be allowed to t
your list which will be saved in coded form to tap
disk. If, however, you choose to decode, the program
immediately search for your file and proceed to de
it, listing it on the screen as it does.
Handycode, written for 16K ECB, is just what it cl
to be: an efficient way to keep your information safe
only real drawback is when using the disk version,
must rename the file before working with another li
feel the author could have improved on the produc
allowing the user to input the filename of his or her chi
(V. Baumann, P.O. Box 415, Hammond, IN 46325, 16
ECB, cassette $18.50, disk S19.50)
— Stephen 1
One- Liner Contest Winner . . .
This one-liner is a mini word processor which run
on a 16K ECB CoCo. The program prints only on
line at a time, but you don't have to worry abou
splitting a word in the middle.
The listing:
1J3 CLEAR 5j8j8: PRINT #-2,CHR$(2 6)
LINE INPUT D$:L=LEN(D$) :FOR X=l
TO L:M$=MID$(D$,X,1) : PRINT #-2,
$;:IF X>70 AND M$=CHR$(32) THEK
1J3 ELSE NEXT X:GOTO 10
Elizabeth Ligo,
Miami, F,
(For this winning one-liner contest entry, the author has been sent copu
of botli The Rainbow Book Of Simulations and its companion Rainbo
Simulations Tape.)
ftware Review!
TSZ\
Create Animated Graphics
With Animator Junior
nimator Junior, a recent release by Triad Pictures
poration, is a simplified version of their 64K. Animator
nmercial program which was designed for commercial
Animator is a graphics/ animation program that allows
jser to create animated graphics for enjoyment or BASIC
»ram use. The Animator Commercial program was
2wed in the January 1985 issue of THE RAINBOW.
ma tor Junior uses 16 eels or 500 frames which gives
ut one and one half minutes of continuous animation.
ior requires 16K of memory and uses "semigraphics"
3w resolution graphics.
encountered two problems in using this program. First,
program will not work with a disk system connected
le computer. The problem is not the amount of memory
led to operate the program, but the location in which
machine language program resides. The program does
claim to work on disk systems, but I feel the user
aid be informed in the documentation that the disk
em needs to be removed. Personally, I feel the program
Id be adapted very easily to a disk system by adjusting
memory locations.
he second problem was a syntax error in Line of
basic Loader program. For my computer, the problem
a PCLS4 statement that should have been PCLS 4.
error caused other problems by preventing the machine
;uage subroutines from being loaded until the computer
reset. The documentation attempts to help you with
iing difficulties, however, this problem was not
itioned.
he program uses four menu options to develop low
ilution animation. The CEL-STUDIO is where you
ite the screens (or frames) in your animation. A eel
is a simple drawing and contains one frame. Using the
arrow keys to move the cursor around the screen, you
draw your picture using various colors. You can move from
eel to eel by using the left- and right-arrow keys. A help
screen is always available to assist you with color changes
and erasing. You can write on the screen using the CoCo's
letters by pressing the '@' key. There is also a "copier"
that allows you to copy the contents on one eel to another.
This is good for continuity.
Once the eels have been created, you sequence them.
This is where you put the show together. This is like
shooting an animated cartoon on film. You select a eel,
shoot a frame of "film," select another eel, shoot it, etc.
Then, when the frames, or eels, are displayed in sequence,
you create an illusion of motion. The SEQUENCE option
also has a help screen to assist the user.
To see your creation, use the DISPLAY option. The
display option allows you to view your film one lime or
you can select a continuous option. This is a nice feature
and opens up many options to the user.
The final menu selection is the CASSETTE LAB. Here
is where you can SAVE and LOAD previously created shows.
The documentation gives instructions for using the created
animation in your BASIC programs. Also, two demo
programs are included on side two of the tape. The first
demo is a "slide show" presentation of a little man "waving."
The second demo is a simplified demonstration of the piston
action in an internal combustion engine.
Aside from the loading problems I encountered,
Animator Junior is a well-developed and professionally
written piece of software. I would consider this excellent
educational software and just plain fun for anyone. The
price is great and affordable for all. For program
developers, you could create some fantastic title screens
and menus with the help of Animator Junior.
(Triad Pictures Corp., P. O. Box 1299, Sequim, WA 98382,
cassette $16)
— J.D. Ray
FOUR STAR SOFTWARE
' CoCo has the potential, we have the products, you have the power '
GALACTIC FIGHTER
A fast-paced arcade game with great graphics
and sound. CoCo at its best!
Save earth by lighting your way to Dracoz,
the home world ol the invaders. Fly earth's
secret weapon, The Galactic Fighter'.
Overcome alien ships, missiles and meteor
showers. Try and survive the deadly laser
trench.
32K, one joystick required.
CASS. S19.95 (U.S.)
D\SK S24.95 (U.S.)
S24.95 (CDN.)
S29.95 (CDN.)
COCO PAINT
A very advanced, easy-to-use graphics
development system for a 64K, single-drive
CoCo!!
• Supports: keyboard, single joystick,
mouse or X-pad
• Mix graphics and text, using built-in or
user-definable characters and textures
• Create stamps: rotate, mirror, shrink,
expand or invert
• Screen dump to most common printers
• 300 — 1200 baud modem communications
capabilites
• Plus many more excellent features
DISKS39.95 (U.S.)
$49.95 (CDN.
Write for free catalogue
Dealer enquiries welcome ^^
Overseas orders add 10% ^J^\
P.O. BOX 730
STREETSVILLE, ONTARIO
CANADA L5M 2C2
(416) 858-STAR
BUGS II
An adventure game with all the excitement of
arcade action.
Earth is infested with intelligent killer
bugs. Find your way through the maze
and destroy their reactor. However, you
must fight the bugs all the way!
New and improved version of the game that
won the Color Computer Magazine*
programming contest. 64K required.
CASS. S19.95 (U.S.) S24.95 (CDN.)
DISK S26.95 (U.S.) S32.95 (CDN.)
Cheque or Money Order
Add S2.50 shipping
Ont. Residents add 7% lax
HAIWBOW
August 1985 THE RAINBOW 207
TH€
SAILOR
MAN
TAPE $29.95
DISK S34.95
GflMCS
The first screen objective is lo caic'i enough ot Elmo's kisses (those B«<J Heart
Shaped Things) to fill in the squares on the Saito:rnan's house, it you can time
your punch jusl so, you con send the punching Dag over to knock the bucket down
and, with a little bit ot luck, nghl on Bigtatbadguy's head This will give you a
little (but not much) time to catch all those RHSTs
You must avo-d contact with Blglalbadguy who is actively pursuing you. Vou
must also Do cjrefol ol Old ugly sea woman who will appear at higher difficulty
levels to chuck empties at you Either avoid the fly-
ing bodies or punch (hem (with the fire button) to
keep from being knocked into Ihe water.
The second scroen objective is to collect enough
notes to play Elsie a tittle love song You may jump
oil and onlo the other end of Falguyeathigham-
burger's leelertoliei lo fly up a deck and oven |wo
docks il you manage lo calch hold of Smartnteck-
kid's grab handles Time it right and away you go.
Tho Third screen objective is to collect enough let-
ters (thrown by Elsie'3 cnes for H-E-L-P) lo complete
a ladder all the way to tho crow's nesl whore Elsie
is calling you Beware ot tho Crow, however, who
thinks you are altoi her eggs!
On all screens, eating a can of collard greens
(labeled "S" for Collard and grasped by punching
the can just right) will give you amazmg speed,
strength and ability and allow you to send Blglal-
badguy mio the drink with a single punch
DRAGON
SLfi¥€fi
Save the villagers of Pendor! They
live in fear of Icarus, the blood
thirsty dragon. The dragon lives in
a cave, way up in the mountains.
The cave is a treasure chest, full
of gems and cashbags. The trail to
the cave is as menacing as Icarus
himself. You will have to secure the
necessary equipment to climb the
rocks and cross the rivers and
chasms along the way. Be on the
lookout for enemies and barriers at
all times.
4 Tape S24.95 Disk S29.95
THE KING
Tape S26.95
SR-71
Tape 28.95
DRACONIAN
Tape S27.95
CU*BER
Tape S27.95
Disk S29.95
Disk S31.95
Disk S30.95
Disk S30.95
SPACE SHUTTLE
Tape S28.95 A „Disk S31.95
FROG
Tape S27.95 Disk S30.95
CHAMBERS
Tape S24.95 Disk S27.95
TRAPFALL
Tape S27.95 Disk S30.95
KATER PILLAR II
Tape S24.95 Disk S27.95
WAREHOUSE MUTANTS
Tape S24.95 *Disk S27.95
UTIUTICS
NOW! You can own the tools we've used to create "Donkey King",
"Sailor Man", and others.
We are proud to announce our new utilities for the 64K Disk Color
Computer, featuring
• Full use of 64K RAM • 100% Machine Language
• Parameters easily changeable in basic loader • No ROM calls
• "Cold start" exit to basic • Easy-to-read, informative documentation
• Keyklik • Selectable drive stepping rate
• Support 1-4 drives • Easy to use, with menu selected functions
To make life with your disks easier, may we suggest. . .
MAS — the finest assembler ever written for the
Color Computer (includes EOT) S74.95
Disk
EDT — effortless full (51x24) screen editing w/2 way cursor. Disk commands
allow easy save/backup/append. Text files to 48K+. Copy, save, move, delete
or print blocks. Much more S39.95
Disk
The Deputy Inspector — Alphabetize, re-sort, and backup directory; fast
3-swap backups, copy files or programs to same or other disks, can auto-
reallocate granules during backup for faster loading, and more. .521,95
Disk
The Sector Inspector — Alphabetize, backup, and printout directory; repair
crashes, LUST basic programs, name disks, read in and edit 23+ grans, 3-swap
backups, and more. Has 35-page manual and gran
table print program S29.95
Disk
^aMJ €DUCnTIONRL
FACTPACK
FACTPACK is a set ol 3 programs designed for hi
or school use. The programs provide drill
practice with basic addition, subtraction, rr
plication and division facts and are appropriate in grades 1-6. Each program requires a
Extended BASIC Color Computer. Disk drive and printer are optional.
Requires 32 K Ext. Basic Tape '24.95 Disk '2!
T€ACH€RS DATABASC II
Teachers' Database (TDB) is a program designed to allow a teacher to keep a compuleri
file of information about his/her students.
The program requires a 64K Color Computer and at least one disk drive. This comple
revised program includes all ol the capabilities of the original TDB plus many new fealu
• Information on as many as 100 students, or more, may be in the computer at one li
• Each student may have as many as 20. or more, individual items of data in his/her reo
• The program has many easy to follow menus.
• Records may be easily changed, deleted, or combined.
• Information about students may be numerical or text.
• Records may be quickly alphabetized or reordered based on their contents.
• Records may be sored by various criteria.
• A full statistical analysis of scores may be done and sent to the printer.
• Student test scores may be weighted, averaged, changed to a percentage or chat*
to a letter grade.
• Individual student progress reports and class gradebook sheets may be printed.
• Three methods of data entry spped the task ot typing in student grades and test rest
• The program may be easily customized to work with any printer.
• Student seating charts may be created and printed.
• Graphs ol student test results may be created using the computer's high resolution grar.
screen.
• Grade distribution can be displayed numerically or as a histogram.
Requires 32K Ext. Basic Tape S39.95 Disk S4!
VOCABULARY MANAG€M€NT
Requires 16K Ext. Basic or 32K for printer output.
The Vocabulary Management System (VMS) is a series of programs designed to aid a pat
or teacher in helping children lo learn and practice using vocabulary and spelling words. "
11 programs that comprise the VMS include a full feature data entry/edit program, three prir
output programs and 5 vocabulary/spelling game programs. The system's many outstand
features include:
• As many as 300 vocabulary words and definitions may be in the computer's memori
one time.
• Words and definitions may be saved on disk or tape.
• Remarks and/or comments can be saved with word files.
• A disk loading menu allows students to load disk files without typing file names.
• Word lists may be quickly alphabetized.
• The three printer segments allow you to create and print individualized tests, puzzl
word-searches and worksheets.
• The printer segments allow full use of your printer's special features.
• The 5 game programs are based on sound educational principles and provide pract
in identifying words and matching them with their definitions in a fast-paced set ot activiti
TAPE '39.95 DISK '42,95
FRACTIONS - n Three Program Packag
MIXED & IMPROPER
t. Review converting mixed numerals and improper fractions.
2. Practice converting mixed numerals to improper fractions.
3. Practice converting improper fractions to mixed numerals.
4. Practice of both types. (Mixed to improper & improper to mixed)
5. Review converting mixed numerals to mixed numerals. (Used in regrouping in substractic
6. Practice converting mixed numerals to mixed numerals.
EQUIVALENCE
1. Delinitions of terms and review ol finding equivalent fractions.
2. Practice finding equivalent fractions.
3. Practice finding sets of equivalent fractions.
4. Review of dinding if one fraction is equal to, not equal to, less than or greater than anolf
LOWEST TERMS
1. Review ol placing Iractions into lowest terms by dinding the greatest comon factor (GC
of the numerator and denominator.
2. Practice finding the GCF of pairs of numbers.
3. Practice placing fractions into lowest terms by finding Ihe GCF of Ihe numerator a
denominator.
32K EXT BASIC TAPE '30.95 DISK '35.
MATH DU€l
MATH DUEL is a challenging mathematics game that pits you against the computer in a gar
of wits. You must use all of your knowledge of factors, multiples and prime numbers to devel
a strategy that allows you tog ather more numbers and thus more points than the comput
The game is deceptively simple, you select the size of the playing field that is composed
Irom 8 to 100 numbers. You must then choose numbers that will give you the maximum numt
of points and the computer the least number ol points. There are only 6 rules.
32K EXT. BASIC TAPE'24.95 DISK '29.
SIMULATIONS
*;•*."'■'?'«
oQ
....,
32K Machine Language
P51
Mustang
attack Flight Simulator
Experience the ultimate video experience.
jr For the first time ever, two computers can be
a^* v is^ be linked together with action and re-action at
■£* ■$* at either location, or play alone. The P-51 Mustang
was the attack workhorse during WWII. To experience
the flight of this beautiful plane in actual combat situation
will give many hours of excitement. You can test your skill
against the computer to defend your position or try your hand
competing against your opponent at any remote location. Two CoCo's
Two CoCo's can be linked by cable for TRUE two players adventure.
With the use of a modem you can test your skill across town or across
country!! This program is another first from Tom Mix Software. Order
your excitement today. Direct cable available separately when two computers
are used at the same location.
ju^P
Tape $29.95 Disk $34.95 Cable «1 0.95
C.L - "As a pilot I found
"Flight" to be an out-
standing simulation".
WORLDS OF FLIGHT (WOF) is a "view" oriented flight simulation tor the TRS-80 Color Com-
puter, written entirely in Machine Language. "View" oriented means that the pilot may deter-
mine his or her position by actually viewing the surrounding landmarks as opposed to using
instruments which sense navigational reterences. This is a major departure from "instrument
only" simulations which can be achieved through BASIC programs. Most instrument
maneuvers and procedures may be practiced. The craft is a light-weight, single-engine airplane
with low wings. A nose wheel which is both steerable and retractable is also modeled. Some
aerobatics are possible including sustained inverted flight, aileron rolls, spins and stalls.
JOYSTICKS REQUIRED
32K MACHINE LANGUAGE
TAPE S29.95
DISK $34.95
'APPROACH
CONTROL
SIMULATION
From Betasoft Systems
"Caught in a blinding snowstorm, two jet airliners are on a collision
course. The pilots are completely unaware of the immenent danger.
Hundreds of lives are at stake. A high-speed disaster is inevitable
unless you act fast. . ."
This and many other exciting scenarios await you as "Air
Traffic Controller" with the APPROACH CONTROL SIMULA-
TION. The thrills, challenges and fruslrations you'll experience
with this authentic, real-time simulation will lead to countless
hours of discovery and adventure.
• • A Complete Simulation Package • •
• Software on Disk or Tape • Comprehensive Manual
• Quick Reference Guide • No Joysticks Required
32K MACHINE LANGUAGE TAPE S29.95 DISK $34.95
TOM MIX SOFTWARE
4285 BRADFORD N.E.
GRAND RAPIDS, Ml 49506
•ADD $3.00 POSTAGE & HANDLING-TOP ROYAL TIES PAID
•MICHIGAN RESIDENTS ADD 4% SALES TAX*
WE HAVE MORE SOFTWARE AVAILABLE THAN LISTED.
-i WRITE FOR OUR FREE CATALOGUE. HB^
TO ORDER CALL 616/957-0444 , ? ^'
Software Reviewi
»S3\
Color Disk Manager —
A Virtual Disk Saver
By Lewis R. Jansen
In the two years that I have had my disk drive, 1 have
occasionally had a disk go bad. This has ranged from a
single sector on the disk being trashed to most of the
directory track getting erased. The latter happened only
once but, fortunately, the Granule Allocation Table (GAT)
survived. I was therefore able to rebuild the disk.
Good computer habits include making sure you have
at least two copies of every program, preferably on different
disks. Nobody is perfect, however, and I often have only
one copy of something or only one copy of the latest update.
What happens when you get a problem with the disk? Unless
you know the Color Computer DOS well enough to rebuild
a directory, you are probably stuck.
Enter Color Disk Manager from Sugar Software. This
utility is pretty much an extended disk-zap program. By
extended, I mean that this program supports 37 different
commands. For a better picture, I'll go through some of
them and give a brief description of each.
r— # Product; Continuous fan-fold
r cnccks w ' tn duel-windowed
1 ' envelopes, checKbook binder and
software designed especially for com-
puter use in the home, You can't get con-
tinuous checks like these anywhere In the
world.
i—jff Savings: Special package— in-
y eluding software — to get you
1 — ' started. 200 checks, 100 envelopes
and bindcr-$59.95. 500 checks. 300
envelopes and pinder— $79.95. Both with
our versatile "Checkbook-Checkwrlter II"
prosram that will have you printing your
checks the day you receive them.
SPECIAL BONUS:
• Each 2S0th customer— 50% off your order;
• Each 500th customer— your order free,-
■ Each 1000th customer— your order Iree,
and Iree check refills for life.
j— f Guaranlee: Our t
V cessones are guar*
L-- -J ynti flnrt uiiiLii-'i'
checks and ac-
guaranteed to please
you and guaranteed compatible
with your bank. In fact, if you order a
special package and aren't satisfied for
any reason, simply return it for a full refund
(including postage) and you can keep the
"Checkbook-Chcckwriter II" program.
Now CHECK WITH US. ..Order a special
package with moneyback guarantee
today! Just enclose a voided check for
encoding Information with your order. Or
send today for our free Information
package. We guarantee you'll be pleased.
Visa, M,C, AMEX orders welcome.
Shipping: SS.OO USA, S5.00 Outside USA.
LAEM .'■ --.-<:.-.' v..'
210
SYNERGETIC SOLUTIONS
4715 SHEPHERD RO • MULBERRY, FL 33860 ■ PHONE (813)6*4-6557
THE RAINBOW August 1985
LOAD SECTOR loads a sector into memory fr
anywhere on the disk, and LOAD TRACK does the se
thing, but for a disk track.
SAVE SECTOR saves a sector to the disk, and SA
TRACK does the same for a track.
LOAD FILE ADJusted loads an entire file from d
removing header bytes if necessary. (Header bytes are t
on binary files to tell BASIC where they are supposec
be loaded.)
LOAD FILE NORMAL loads the file into mem<
but leaves the header bytes (if any) intact.
SAVE FILE saves a file to disk, and allows you to chai
the start and exec addresses of machine language files.
SAVE MEMORY BLOCK saves a block of mem
as a machine language file on the disk.
BACKUP is one of the more useful commands. It all<
you to back up any number of tracks on the disk. ^
can back up anywhere from one track to an entire d
If it is unable to read a bad sector, it will notify y
put a sector full of carriage returns (ASCII 13) in pi
of that sector, then continue.
DIRECTORY does a directory of the disk, gives
number of free granules and the number of free by
if the number is below 65535.
FILE MAP gives you a list of the tracks, sectors ;
granules occupied by the file that you specified.
RAPID SCAN lets you look around on the disk,
displays the current sector in ASCII and lets you mc
around on the disk with the arrow keys. The left- ;
right-arrow keys change the current sector, while the
and down-arrows change the track. This is handy if j
want to either search for something or look at a particu
sector.
ALLOCATION MAP displays all of the granu
showing the track and first sector for each, and tells )
which granules are in use.
INITIALIZE allows you to erase and reformat any rai
of tracks and will handle tracks above the 35th.
APPEND SECTOR appends a sector from the disk
the end of the memory buffer. Used primarily in recover
crashed files.
CHANGE DRIVES allows you to change which dr
is being used. It is possible to set one drive as the In]
drive and another as the Output drive. Commands wh
read from a disk do so from the Input drive. Commar
which send output to disk send it to the Output dri
At the start, Color Disk Manager has both the Input a
Output drives set as drive 0.
RECOVER FILE recovers a file from the disk, provic
that the Granule Allocation Table is still intact.
GO TO ADDRESS acts like an EXEC from BAS
Control of the computer is passed to the routine at I
memory address that you specify.
MOVE MEMORY BLOCK allows you to move a blc
of memory to a different spot.
DECIMAL TO HEX and HEX TO DECIMAL
numeric conversion for you and EXAMINE MEMO!
lets you look at, and change if you want, an area in memo
You specify the location to start at and can move arou
with the up- and down-arrow keys. Memory can
displayed in Hex, decimal or ASCII.
ASCII DUMP dumps the contents of memory starti
at the address you specify to the screen in ASCII form
During the dump, you can pause or exit at any time.
CHANGE FORMAT changes the default output form
default can be either Hex or decimal. An option lets
choose whether or not to be prompted for the format
;n a command offers both.
LOM TO RAM turns the 64K mode on and then copies
ROMs to RAM; EXEC ROMPAC turns on the 64K
ie, moves a file from the buffer to the memory that
OM pack would normally occupy, and then executes
APE LOAD loads the next file from tape into the
fer. If it is a binary file that resides in the same memory
Disk Basic's variable and buffer storage area ($600-
>0), you will be asked if you want the program converted
t will load and EXEC properly from a disk.
KIP FILE searches the cassette for the next end-of-
block. It doesn't verify the cassette data like SKIPF,
t can be used in the middle of a cassette file without
able.
.OAD GRANULES loads a range of granules from the
c into the buffer as a file.
VRITE PROTECT ON-OFF lets you enable/ disable
oftware write-protect switch. When enabled, any
imand that writes to the disk will abort,
here are also two subroutines included with the
gram. By typing TRKF-'SUB you will find out what file
5 a given track and sector and typing HIDEGRN-'SUB
protect/ unprotect a granule from BASIC. HIDEGRN
landy for hiding a bad granule from BASIC when the
of the disk is still good.
)n to the 29-page manual which came with Color Disk
nager. In a word, excellent. I didn't find any major
ographical errors and everything is thoroughly
lained. All of the commands are explained, as well as
rything you need to know in order to effectively use
program. It does not, however, re-explain Chapter 11
the TRS-80® Color Computer Disk System Owners
nual & Programming Guide which you get when you
' your first disk drive system. I suggest you read that
pter before reading the Color Disk Manager's manual,
"here are two things that really should be added to this
nual: an index and table of contents. I would find myself
;ering through the manual in search of the description
a command, when an index could have told me the
ct page immediately.
"he program itself is menu driven. In other words, you
ler choose an item from the current menu, or hit BREAK
»et the next menu. There are four different menus, and
i can only move to the next; there's no going back,
course, when you go past the last one, you go back
the first. I found it irritating to have to go through
:e menus to get back to the one I just passed. Another
should be added for going backwards. That's the only
blem I had with the program.
Ul in all, Color Disk Manager is a professional package,
loes require a 32K Color Computer (minimum), but
elieve that 32-64K has now become the standard for
< systems. Should you buy this program? It depends
>n your needs. If you can never remember to make sure
i have backups of programs, then I suggest you get
For $35, it provides a lot of insurance against losing
ny hours of work.
Sugar Software, 1710 North 50th Ave, Hollywood, FL
53021, 32K disk S34.95 plus SI. 50 S/H)
Software Review!
Zr72\
Cassette Tape Tester
Affords Security For Data
The review copy of Cassette Tape Tester (CTT) arrived
— on a disk marked "Generic Mini-Floppy Disks" — with
no real name or address, no real documentation (the page
of instructions is a printout from the disk itself) and no
indication of what CoCo configuration it is meant for,
beyond a penciled note "16K tape or disk" on the upper
right-hand corner of the instruction sheet. As it happens,
you need no more than that.
When you LOflDM the program you learn it was written
by Bill Nethken and distributed by Free CoCo Software.
They hope if you like the program you'll send them whatever
sum you think it is worth. I like the concept. The distributors
should welcome the private circulation of backup copies,
as it would multiply their chances of seeing some return
on their investment without multiplying their investment,
but they have retained copyright on the program and
anyone caught selling it would be subject, quite rightly,
to prosecution.
The program itself is simple enough. It writes a stream
of data to a previously erased tape and then reads the
data back to determine whether the tape is faulty. The
instructions are clear about how to do this.
How well does CTT work? Well, it does what it claims
to do. I found it reported a bad read about one time out
of five on the same tape, but who is to tell what transient
bobble in the power supply might have contributed to that?
The instructions recommend you test the tape twice; a few
more tries will hurt nothing. After using the program a
cold start will be necessary, as it does lock up the computer.
CTT affords some additional security for data stored
on tape, and even those who have gone entirely over to
disk may find this helpful if they use cassettes for any
purpose, such as archival backups of disks. And who can
complain about the price?
(Free CoCo Software, Box 2231, Westovcr, WV 26502,
machine language, 16K cassette or disk. Contributions
accepted.)
— R.W. Odlin
Hint . . .
64K Memory Upgrade:
CoCo 2 With Eight RAM Chips
Install a set of 4164 64K RAM chips in place of
the eight I6K. RAM chips near the lower right corner
of the board. On U.S. -made CoCo 2s, solder together
the two adjacent PC board holes marked Wl next
to the 6822 chip. On Korean-made computers,
connect the two holes together in the white box
marked 64K.
August 1985 THE RAINBOW 211
Software Review*
ANIMATOR COMMERCIAL
Creates Eye-Catching Displays
I can remember in grammar school how I used to draw
little stick figures on the page margins of my textbooks
and Hip the pages rapidly to produce crude animation.
AN IMA TOR COMMERCIAL provides the 64K Color
Computer owner with a color animation studio of limited
capability.
Two versions of the program are supplied on the cassette
which is not copy-protected. One is the semigraphics
version, while the other employs a screen resolution of
128 by 96.
After you CLOAD the BASIC program and run it, the tape
recorder loads in a machine language subroutine. After
it loads, you are greeted with UL ERROR IN 1. The Line
number 164 referenced in Line 1 does exist but the ML
routine seems to interfere with the stack or some essential
pointers. If you type RUN again it seems to work without
problems.
Demos are provided to allow you to see right away what
can be done with ANIMATOR COMMERCIAL. In the
Hi-Res mode, 12 screens or eels are available, while the
semigraphics mode has 100 screens.
In ANIMATOR COMMERCIAL, you draw the
HEED AN INEXPENSIVE
SERIAL-PARALLEL
INTERFACE?
SP-2 INTERFACE for EPSON PRINTERS:
■ 300-19.200 BAUD rates
■ Fits inside printer — No AC Plugs
■ Optional external switch ( $ 5°° extra) frees
parallel port for use with other computers
■ *49 ,s (plus *3°° shipping)
SP-3 INTERFACE for MOST OTHER PRINTERS:
■ 300-19,200 BAUD rates
■ External to printer — No AC Plugs
■ Built in modem /printer switch — no need for
Y-cables or plugging/unplugging cables
■ s 64 95 (plus *3°° shipping)
Both also available for RS-232 and Apple IIC computers.
Co Co Serial Cables 15 ft. — *I0.
Co Co /RS-232 Cables 15 ft,— s 20. Other cables on request.
m P.O. Box 492
Piscataway, NJ 08854
(201)752-0144
R ENGINEERING
DEALER INQUIRIES INVITED!
background and copy it to other eels and make ;
changes or additions to produce motion effects.
The graphics editor allows you to set points, draw
or circles and paint, using one of two available coloi
of four colors each in the Hi-Res mode. The semigra]
version lets you put eight color graphics block chara
on the text screen.
Creating eels can be a long and tedious job with a mi;
possibly spoiling many hours of work, but the editoi
a very useful feature that allows you to view each add
or change in artwork before it becomes finalized.
Once the eels you have drawn are to your satisfac
you use the sequencer to program which eels wil
displayed and for how many seconds (one through
seconds range). After all this work you are finally rewa
with the fruits of your efforts.
Except for the aforementioned bug, the program
produce simple slide shows and animation-like efl
Rapidly viewing the cells gives the best effect but it do
last very long (only two seconds when run from sta
finish), but you may include an auto repeat that
continually repeat the eel display for as long as you
That two-second show is in sharp contrast to the t
or four minutes it takes to save or load the eels from cas
tape storage.
Simple instructions are given for appending
animation eels to your own programs, but due to the ;
of memory required to contain the eels, your progi
will have to be fairly short to take advantage of this feal
You must be very careful that your program doesn't
memory containing the eel data.
The documentation is very well-written with step-by-
instructions that are easy to understand and get you g
in the minimum amount of time.
As a draftsman and artist with some professi<
animation experience, 1 find it hard to imagine anj
actually using this program to produce professional
commercial animation as the name and advertisem
claim. I do believe it has a lot of potential for use
tiller for homemade videos and for producing eye-catel
sales displays.
Retailing at $50 a copy, ANIMA TOR COM M ERR
is expensive, but for those interested in learning s
fundamental aspects of animation, it may be just what
are looking for.
(Triad Pictures Corp., P.O. Box 1299, Sequim, WA 9838:
cassette $50)
— J. Michael Nov
Hint . . .
64K Memory Upgrade:
CoCo 2 With Two RAM Chips
The two-RAM chip CoCo 2s use the new 446^
RAMs (or the NEC uPD41254) for the 64K upgrade
Install a pair of these in place of the two 4416 RAM
chips located between the gray sockets; connect the
two holes together in the white 64K box on the lefi
side of the board.
212
THE RAINBOW August 1985
jftware Review;
tt\
Missile Math Is
A Winning Tool
When 1 first received Missile Math and saw it was written
the Middletown Educational Software Association, I
)ndered if it was written by a group of teachers. Being
:eacher myself, I thought how great it would be to have
ichers writing educational software because they would
iow what is needed in the classroom. The only thing
tter than having teachers write the software, in my mind,
)uld be to have students, supervised by teachers, writing
1 was pleasantly surprised when I called MESA about
question I had concerning the program to find that it
is, indeed, written by students; a third year high school
mputer programming class which, for their final project,
tided to write and market a program. This is the first
their efforts and I am looking forward to seeing their
ture projects.
Missile Math is written for 32K Extended Color BASIC
ing either a cassette or disk drive. It comes with an eight-
ige instruction book that not only tells you how to run
e program but also gives ideas on how to use it in a
assroom, hints on what to do if things don't work right
id an evaluation form to send back to MESA after you
ive used the program for a while. They have also included
"summary of key functions card" which can be placed
:side the computer when the program is being used.
When you get Missile Math you are instructed to make
backup copy to use, then either CLOP.D and/ or RUN the
ogram. After an initial display of a missile destroying
city, there are three choices you can make: T for
structions, 'R' to review addition tables and 'S' to start
e game.
Missile Math is a drill and practice game with a tutorial
ction designed to aid elementary students in addition,
i the game, students have 12 cities they protect by correctly
iswering addition problems. There are 10 levels of
-oblems ('A' through 'J') ranging from simple facts to
iur digits added to four digits with carrying in all columns,
hese problems are shown at the bottom of the screen
ong with a display showing the number of "smart bombs"
ley have.
Students can acquire smart bombs in the five hardest
vels by going through a two-minute drill answering
idition facts. They receive up to five bombs which can
len be used in the game if they get stumped on a problem.
After the problem is displayed, a missile descends toward
city. During the first part of the game they descend slowly,
ut as the game progresses the missiles descend faster and
ister. To get rid of the missile before it destroys anything,
le correct answer must be typed in and ENTER pressed,
he missile will stop as soon as a key is pressed but there
re only fifteen seconds to finish the answer before the
lissile continues to descend and destroy a city. If students
;l the answer right and press ENTER in time, the missile
destroyed. If they get the answer wrong, or take too
luch time, a shield or city is destroyed. This continues
ntil all cities are destroyed or they press 'Q' to quit. When
either of these things happen, the score is displayed and
students are asked if they want to play again.
Besides being able to destroy missiles with smart bombs,
it is also possible to receive help in answering problems
by pressing the 'H' key in every level but 'A' and 'B\ which
are facts levels. If the 'H' key is pressed in levels 'C through
'E' students can page through tables where they can find
answers to facts and then return to the same problem to
finish it.
In levels 'P through! 'J* when the 'H' key is pressed,
a lively tutorial with numbers moving around the screen
appears, displaying answers and demonstrating how to
carry if the sum of a column more than 10 is shown.
Students are then given a new problem.
The students in my sixth grade class just love these kinds
of programs. I had a couple of them come to my house
to test their reactions and was not really surprised. Anything
that has action, movement, color and sound immediately
appeals to them and Missile Math has plenty of it all.
A tutorial with a game that is similar to the popular game
Polaris is a winning combination for getting students
interested in doing math.
Missile Math covers the subject of addition in small steps
allowing for students of all ages to have an enjoyable
experience with the computer. The only suggestions for
improvement that I have would be to include a menu where
the speed of the missiles could be controlled, the number
of cities limited and where an amount of time for playing
the game could be set. I think if these suggestions became
part of the program it would be easier for students to use
Missile Math as a tool for competition and improvement
between themselves and the clock. It would also give the
program a little added versatility in a classroom where
there are not many computers per student and time on
the computer is a critical factor. I do not believe these
areas of concern are serious enough to dismiss this program
from consideration. Missile Math is a fine program to have
and use.
I like Missile Math and would recommend it as a program
worth the money it costs for several reasons. It is well-
done and impressive. The graphics are effective. The scope
and sequence of the curriculum are well thought out. The
tutorial for levels 'P through 'J' is very catchy. The manual
that comes with the program is complete. And finally, I
am very impressed with a teacher who would take the time
and effort to not only teach computers and computer
programming, but who would go the extra mile to provide
direction and stimulation for students to start a business
and achieve something with what they have learned.
(MESA, Middletown High School, Valley Road, Middle-
town, RI 02840, tape $24, disk $26)
— Tom Nedreberg
Hint . . .
To Hex With Decimal
To convert a hexadecimal number to decimal on
an Extended BASIC machine, type PRINT &Hxxxx. To
convert from decimal to Hex, type PRINT HEX$ ( yyyyy.
Note that "xxxx" is a Hex number between 0000 and
FFFF, and "yyyyy" is a decimal number between
and 65535.
August 1985 THE RAINBOW 213
Software Review!
7f7?\
File 64 Is A Great File
System For Cassette Users
File 64 from Owls Nest Software is an excellent file system
for those owners of 64K Color Computers without disk
systems. The program will produce and maintain a data
file of up to five fields (subcategories). The information
may be sorted, modified, added to or deleted as desired.
Your data may be displayed on the screen or sent to
your printer. The program is very easy to learn and comes
with a brief but adequate set of instructions as well as
a backup program tape for those who don't want to figure
out how to make their own backup copy.
A database, for those not familiar with the term, is a
computer file system that allows the user to store various
related pieces of information (such as inventory, record
collections, etc.) so they can be located and sorted in various
ways and printed on the screen or on paper in an easy-
to-use form. Some databases are quite complex and provide
the user with so many options that they are almost computer
languages in themselves.
File 64 is a database in its simplest form. It files, sorts
and retrieves information much like a simple card file. The
nice thing about such filing programs is they can be used
fairly quickly and File 64 is no exception.
Formatter
the fastest, most complete
office package yet!
Totally Menu Driven
Customize with company information
Complete "on screen instructions
FORMS
STORES
FIGURES
letter
invoice
complete forms
item list
quantity
list
quote
purchase order
mail order
subquotes
letters
footnotes
net
discount
subtotals
confirm order
customer info
tax
receipt
freight, etc.
SEPARATE CONFIGURE
PROGRAM
PRINTS
for company info
printer options
quote & inv. #
w/auto sequencing
auto date
form feed
letterhead
envelope
multiple copy
emphasized
WATCH FOR OUR NEW SOFTWARE
Challenger Software
42 4th Street
Pennsburg, PA 18073
Or Call (215) 679-8792 (Evenings)
$ 49 32K disc
send for more information
On the plus side, File 64 is extremely easy to learn. (
Nest Software has used extensive prompting so anyt
who has used a file system before could probably use
64 without reading the directions. The instructions are \
written, however, and worth the 10 minutes or so it
take the user to read.
After loading the program, the user sees a menu
is self-explanatory. The first-time user will head for
Input Data section and then will be asked to define
to five fields for his file system. If, for example, the
is of names and addresses, the first field would be nai
the second, street address, and so on. After defining
fields, the user types in the specific data and return
the main menu to locate, modify, delete, sort, save, li
show or print the materials. The screen always pron
the action or actions that should be taken next.
File 64 will hold up to 250 records. A single record :
be up to 250 characters long. The program converts
64K CoCo into a true 64K computer and holds all
data in memory until it is saved to cassette. Since m
of the program is written in BASIC, if the user sh(
accidentally hit the BREAK key, or, for some reason
an error message, the user is told to type GOTO 5 anc
the data in memory will still be there as the program rest;
Sorting is very fast through the use of a machine langt
routine. The documentation claims that a file of 200 reci
can be sorted on three field levels in less than 20 seconc
As simple as it is, File 64 lacks a number of thin:
would have liked to see in such a system. There is no '
to add data from various fields to form a summary fi
The program is set at a printer Baud rate of 600 and
user must do some poking to get it going at the popi
higher rates. The report (printout) is limited to one for:
As a longtime disk user, I was a little bit skeptica
to how fair 1 could be to return to cassette and rev
a tape-based file program. 1 was quite impressed with r
well File 64 operated and how easy it was to learn. O
Nest Software has done a very good programming job ;
has put together a very neat and easy cassette-based fil
system. The user should remember that this is not a su
fancy relational database system but performs exactl\
advertised as an easy-to-use file system. What more •
you ask?
(Owls Nest Software, P.O. Box 579, Ooltewah, TN 37363
64K cassette, $24.95)
— Brian Jai
Him
What's Your ROM Version?
With all the talk about new ROMs, you may be
wondering exactly which ROM you have. If you have
an older CoCo with Extended BASIC, just read the
version number of your Extended basic at the top
of the screen on power up. Then, to see which Color
BASIC ROM you have, type EXEC 41175 and press
ENTER.
If you have the new ROMs, Extended BASIC will
be version 1 . 1 and Color BASIC will be Version 1.2.
On the CoCo 2, Color BASIC will always be Version
1.2 or 1.3 (which are functionally identical).
214
THE RAINBOW August 1985
)ftware Review '«
r/^\
Golf Handicaps Keeps
league Statistics Up To Par
jolf Handicaps is not a game and is a serious attempt
provide a golf league secretary (or individual) a means
computing golf handicaps for a group of players. The
; of the group is adjustable, but the program user must
into the program to modify the program line for
inging numbers to suit the situation.
While the program was written to conform to the
rthern California Golf Association (NCGA) rules, the
>gram is open to modification to any local rules since
: material is supplied unprotected. Modification,
wever, would require some knowledge of programming.
Jnfortunately, in this part of Pennsylvania, the NCGA
es were not available to refer to in doing this review,
e best source of input came from the golf pro at the
al public course. He noted that Golf Handicaps should
very helpful to golf leagues in which different courses
used throughout the season. Golf Handicaps provides
use of the course rating which may or may not be
r for the course.
Use of the course rating allows for equating the level
difficulty of the course and the players' scores. Thus,
: scores for team members are computed against the
arse rating, and the difference between the rating and
ire becomes part of the pool of differentials used to arrive
the handicap. The program provides for the entry of
differentials out of which the 10 lowest are selected
arrive at the handicap.
\s an example, after the program has been loaded and
: data file called up, each player would have a set of
ferentials in the file and a handicap computed up to
it point in time. Now, as a new set of scores is entered
the result of the latest round of golf, the program allows
the previous handicap to be used to adjust the score
d then also compute a new handicap. The author warns
: user that it may take two to three minutes for each
Iyer's history to be updated. (A machine language routine
handle the math would really speed up the procedure.)
The program will supply the user with printouts of the
Iyer's name, team number (if used), gross score for that
y's play, the old handicap (from last entry), any
justments required for bogies, the new handicap and a
ice for "remarks" to be entered. The print routine is
for an Okidata 82a with 600 Baud transfer rate. The
thor has provided for the user to get automatically the
mber of copies of the printout the user might need by
t entering the number at the prompt.
A printout of the differentials table for each player is
o available as a selection from the menu. Corrections
the table are provided for in the program, so if a wrong
>re is entered for a player, it is no problem to correct.
The program was written by a golf buff because it has
ne traps and hazards. However, a user can play around
ise and establish an NCGA handicap. The first major
zard is the all too brief instructions (a two-page printout),
t the actual program is filled with REPIarks which provide
ditional insight into its operation. Since the program
is supplied unprotected, it is possible (nay, necessary) to
run a printout of the program for the additional
information.
The second hazard occurs in entering the original data
to establish individual files on each player. If the user should
enter more than 20 differentials, the program goes "out
of bounds" and all the data is lost. While it does not affect
the program, the method of entry of data is a little strange
in that after a score is entered, the information remains
on the screen and the next entry is written over the last
entry.
The program is supplied on tape, but is designed to be
used with a disk drive and tape unit. When exiting the
program, the data file of players and their scores is saved
to the disk and two backups of the program and data
file are saved to tape. The double save to tape is insurance,
but if a disk unit is online, backups to disk are much faster.
About the only option this program did not include was
getting a tee time at a public course! While it may not
interest every golfer, it should be of special interest to golf
league secretaries with a Color Computer.
(Don Hug, 1111 Terra Way, Roseville, CA 95678, tape
S35, disk $39)
— Robert E. Foiles
**********************
* *5><£»K EXPANDERS
* Permanent Software? in a ROM that allows
* -full use o-f both 32K memory banks in 64K
* or larger computers. 9&KX-M module *59.95
* Cartridge. *49.95
*
* VIDEO REVERSERS
* Provide (1) Reversed, (2) Reversed all
* Capitals, «< (3) Normal Display *24.95
* (See December 1984 Rainbow Review)
*
* 13SK MEMORIES
* Solderless modular design upgrades all
* 64K Color Computers to 12BK. *129
* We also have 64K upgrades -for D, E & 285
*
* PROGRAM SAVER
* Uninterrupted Power Source (UPS) provides
* 5 volts to RAMS saving your programs when
* power -fails. Mounts under keyboard. *59. 95
*
* DYNAMIC COLOR NEWS
* Educational material on Color Computers.
* Recent editorials on writing programs
* especially -for 64K and larger memories.
* Monthly Newsletter. *15/yr. Sample *1.
*
* SOFTWARE
* DISASM - Decimal 6809 Assembler. *19.95
* MPM - Stack up to 5 programs. *14.95
* (See April 1985 Rainbow MPM review)
* DYTERM - Terminal Program. S14.95
* Checks, Visa & MC Cards. Add *2 ship.
* Free Catalog. 24 Hour phone.
*
* DVNAMIC ELECTRONICS
* BOX e<5»«£, (205) 773-2758
* MAR-TSEL_L_E , AL 35<£>-<*C>
**********************
August 1985 THE RAINBOW 215
Software ReviewZ
r/^\
CoCo Enters A New World
With The Magic Box
What's so magic about The Magic Box"! Well, like magic
it will allow you to read Level II basic program tapes
from a Model I or III into your trusty CoCo. The Box
part of this magic is a special cable that plugs into the
right joystick port of the CoCo and the earphone jack
of the cassette tape recorder. So what you get when you
buy this package is a cassette tape, the cable and a four-
page instruction sheet.
The instructions are quite clear and point out the many
differences between the CoCo and the Model I/III
computers. Paramount of course, is that while the CoCo
uses a 6809 microprocessor, the Model I/III use a Z80,
and for that reason machine language or "system" tapes
from the Model I/III cannot be read. In fact, the CoCo's
BASIC and the Model 1/ Ill's BASIC are also different
versions of Microsoft's BASIC and some modifications to
the programs after loading into the CoCo are often
required.
The instructions do a good job in pointing out these
differences and how to deal with them. Also noted is that
Model I/III tapes load into the CoCo best when using
a Radio Shack CTR-80A tape recorder. I can certainly
news
Fort Qu'Appelle -- Due to the
numerous requests for single
issues of diginews for coco
-- "to see what it's like" ~
sample copies of diglnews+m are
now available for $6.50* each
(current subscription rate card
will be included). send your
check or m.o. to:
DIGINEWS
P.O. Box 1340
Fort QuAppelle, Sask.
CANADA SOG ISO
Pieter van der Breggen,
Publishing Editor, DIGInews.
* U.S. residents pay in U.S. funds.
Canadian resident pay in CDN funds.
Color Computer and CoCo2 are Trade Karke of Tandy Corporal Ion.
attest to that statement! I could not get any Moc
programs to load at all with my Radio Shack CC1
tape recorder that I normally use with my CoCo. Luc
I had a CTR-80 on hand from my old Model I days
it worked just fine.
A very good calibration technique is used with The M
Box software to get the critical volume setting just i
when loading in the Model I/III programs. As you
or may not know, the Model 1 is notorious for pain
sensitive volume settings. The authors of The Magic
were wise to recognize this problem and include a solu
with the software.
I loaded in several Model I programs with little diffic
but had to edit several lines to get the text to dis
correctly on the TV screen. This is because the Modi
III use 64 characters per line while the CoCo uses 32.
than that, and some other commands unique to the M
I/III that had to be converted to CoCo lingo, it woi
beautifully.
By the way, when the CoCo encounters one of t
unique commands, it highlights it by inserting aster
before and after the command. It's pretty simple from
point to locate these bugs and edit them out.
Another point to remember is programs using grap
will also come out looking pretty weird. That's bees
of the different graphics capabilities of these comput
The Model I/III have 1,024 PRINT B positions while
CoCo has 512. This makes it a real challenge to cor
some of these programs to work on your CoCo.
In spite of the many differences between these comp
systems, The Magic Box offers a viable solution to tr
who have the patience to modify BASIC programs
provides the CoCo user with a whole new spectrun
software. So dust off those old Model I/III tapes and w;
the magic.
(Spectrum Projects, Inc., P.O. Box 21172, Woodhaven, N'
11421, $24.95 plus S3 S/H)
— Jerry Seme
One- Liner Contest Winner . . .
This program will alphabetize a set of strings. First
enter the number of strings to be sorted, then cntei
the strings one by one. (Note: Be sure to include the
spaces shown in the listing.)
The listing:
p CLS : INPUT" #";N:DIMA$(N) ,B$(N)
C(N) : FORX=lTON: INPUT" $";A$(X) :N'.
XT : FORX=lTON : FORY=lTON : IFA$ (X) >;
$(Y)THENC(X)=C(X)+1:NEXTY,X ELS!
NEXTY , X : FORX=lTON : B$ ( C (X) +1) =A:
(X) : NEXT : FORX=lTON : IFB$ (X) =" "TH]
NB$(X)=B$(X-1) :PRINTB$(X) :NEXTE:
SEPRINTB$(X) .NEXT
James Fowlei
Glen Burnie. ML
(For this winning one-!incr contest entry, the author lias been sent copie;
of both The Rainbow Hook Qf Simulations and its companion Rainbow
Simulations Tape.)
216
THE RAINBOW August 1985
L
Software Review i
rr^\
CoCo Talker
Speaks For Itself
If you have a voice pak then you should not be without
CoCo Talker from Computerware. No matter what brand
your voice pak, Computerware probably has a version that
is compatible. The version I will be reviewing is for the
Radio Shack Speech-Pak.
CoCo Talker comes in an attractive package with an
1 1-page manual. The first page gives warranty information
and requests that you not pirate Computerware 's software.
The other 10 pages contain complete instructions as well
as programming examples.
The disk I received contained seven files. These included
a text-to-speech translator, an exceptions dictionary for
the translator, a manager which allows the user to alter
the dictionary, and a "Talking Head" program. To get into
the translator, you simply type RUN "SPEAK". You are
greeted with a menu which allows you to enter text and
have it spoken.
One note here: Although this program worked flawlessly,
the instructions gave no information on how to use
phonemes. Computerware also neglected to include a list
of phonemes in the package. This is a major drawback
since phonemes are required to edit the dictionary.
OS-9
USERS GROUP
• Information exchange —
BBS or CompuServe
•Software Library —
over 30 diskettes planned
•Periodic newsletter —
MOTD (Message Of The Day)
Write for information
or
GO PCS18 on CompuServe
OS-9 USERS GROUP
P.O. BOX 7586
DES MOINES, IA
50322
OS-9 Trademark ol Microware
Another option which the translator allows is si
echo. After choosing this option, you may return to B
and from there each alphanumeric character that is pr
on the screen will also be spoken. Simple keystrokes <
you to toggle this mode on and off and also switch bet
word and letter echo. In my opinion, this is when
software shines!
Even if you don't use the echo, the translator maj
be used with simple USR(X) functions. The trans
includes a dictionary of exceptions which it checks bi
speaking each word. If it finds the word to be spoki
the dictionary, it will use the predefined phonemes to s
the word. If not, it uses a standard phonetic algor
for the voice. I found the translator did an excellen
and rarely did I find it necessary to intentionally mis
a word for better pronunciation.
The Talking Head program is, of course, the mos'
of all of the programs. It is actually just the trans
attached to the graphics subroutine which makes a
Res graphics head's mouth move as the computer spt
Although it is very entertaining, I can think of no prac
uses for it. Note here that you must have a disk sy
for the Talking Head program. All of the other soft
works with cassette.
Overall, I would highly recommend CoCo Talkt
anyone who has a voice pak. I congratulate Computer
and Frank Delargy for an excellent utility, but I feel
package does have one major flaw. If you don't know n
about the use of phonemes in voice synthesis, that
of the software will be completely useless to you bee
the instructions are very sketchy in that area. Furthern
you will be unable to alter the dictionary as it also n
phonetic input. (This is not a software flaw — everyt
worked fine — this is merely alack of documentation w
I am sure will be remedied.) Even with this drawb
CoCo Talker is an excellent addition to anyone's soff
library.
(Computerware, P.O. Box 668, 4403 Manchester Avenu
Suite 102, Encinitas, CA 92024, tape S21.95, disk S24.95)
— Rick Rf
One-Liner Contest Winner . . .
This one-liner is for disk clean-up time. When
disk is full of useless files, instead of typing the KILI
command over and over, use Killprog.
The listing:
j2 CLSJ3: PRINT" HIT § THEN ENTER '.
OR DIRECTORY" :PRINT@67," HIT / '
HEN ENTER TO END " ; : PRINT@2 24 , ":
ROGRAM NAME/EXT: " ; : LINEINPUTA$
PRINT@485," ANY KEY TO CONTINUE
" ; : IFA$="/"THENCLS : ENDELSEIFA$= !
@"THENDIR:EXEC44539:G0T0pELSEKI.'
LA$ : EXEC4 4 53 9: GOTOp
Bob Kult i
Marshfiekl, H'
(For this winning one-liner contest entry, the author has been sent copii
of both The Rainbow Book Of Simulations and its companion Hainho
Simulations Tape. )
218
THE RAINBOW August 1985
ftware Review*
7fc\
[CDITS Does Inventory
For Your Disk Files
\urora Computing Disk Information and Transfer
item, or ACDITS, will assist you in organizing your
k files and transferring disk to tape and tape to disk.
e program (actually two programs on the system disk)
uires a minimum of 32K. and a disk drive.
ACDITS works flawlessly in performing the three
tctions described:
) The creation of a disk information file on each disk
in your library that contains detailed information
about that disk. This file can be output to the printer
or screen. Labels can be printed for each disk jacket.
!) A catalog can be created of all your disk files. An
entire catalog can be output to the screen or printer.
While working with a catalog file you can search,
delete or append.
I) Transferring files from tape to disk or disk to tape.
In the tape to disk mode you can either transfer an
entire tape to disk or transfer a single file. In the
disk to tape mode only one file can be transferred
at a time.
n order to make a disk information file for a disk it
ist have at least one free granule. You will be asked
input a date (up to 12 characters), a disk ID number
ro to 255) and a disk name. The computer will then
.d the directory and write a file to the disk.
nformation about a particular disk can be printed to
ler the screen or printer. The information printed
hides the filename/ extension, the start, end and EXEC
Iresses of machine code programs, the disk ID and the
mber of granules the file uses, all sorted by filename.
your output is to screen you can use the arrow keys
scroll through the information. For files sent to the
nter you are asked for an appropriate Baud rate (300,
), 1200 or 2400).
'.n creating a catalog mode you can create one big catalog
all your disks or a catalog for each category of disks
it you have, i.e., utilities, Adventures, games, etc. Each
alog file will contain the same information about each
■■ as the Disk Information File mentioned above.
A catalog can be output to the screen or printer. When
tput is sent to the printer the computer will automatically
;>e files after each 50 have been printed. It will not number
: pages, though; this would have been nice.
The Search function will tell you which disk(s) a
rticular file is on. You will be provided the same
ormation mentioned in the Disk Information File. The
arch function works fine but you are required to type
the entire filename, including extension. It would have
;n nice if you were allowed to type in part of a filename,
iividual Disk Information Files can be appended to a
alog file at any time.
Vou are given two options for deletion of information,
u can delete an individual file from a catalog or, if you
;h, you can delete an entire disk from a catalog. In this
ond mode all files will be deleted that have the disk
mber entered.
Attractive labels can be made for your disk jackets. The
files are printed out three across in vertical, alphabetical
order. At the top of the label the number of free granules
remaining on the disk and the disk ID number are printed
as a title.
The Tape to Disk option will allow you to either transfer
all files on a tape automatically to disk or you can be
selective and make a decision as each file is loaded in from
tape. This portion of ACDITS is a separate program and
can be used by itself if you wish. You are limited to
transferring files of no more than 24K.
The Disk to Tape option allows transfer of files included
in a Disk Information File to be transferred to tape. It
is not a stand-alone program and files must be included
in ACDITS file before they can be transferred.
ACDITS is a relatively easy program to use and seems
to be designed so you won't easily lose data. Most of the
time it is user friendly, but there are some areas where
this could be improved. As mentioned earlier, when entering
filenames you must use a backslash (\) between the
filename and extension. If you try to enter a filename using
a period (.) ACDITS will not accept it. This proves to
be quite irritating if you are used to using the period.
Another area that could be improved is the Search function.
To search for a file you have to type it in exactly as it
appears in a catalog. It would have been nice if you could
just type part of a filename and search for all occurrences
of that particular string. One other thing that would be
nice is for automatic page numbering on printouts of more
than one page.
That's enough criticisms. All in all, ACDITS is a good
program for disk file cataloging. 1 have two other similar
programs that have some nicer features but they don't have
the file transfer capabilities that ACDITS does. ACDITS
comes on disk with eight pages of documentation. If you're
looking for a program that does the things I mentioned
above, then this is a reasonably priced program to take
care of those needs.
(Aurora Computing, 49 Brookland Ave., Ontario, Canada
L4G2H6, disk $19.95)
— Michael Hunt
One- Liner Contest Winner . . .
This program uses the CoCo's fast screen printing
capability to create optical illusions with your own
name (or any string).
The listing:
1 P$="T255BA#AG#GFFEE-DC#C" : CLS4
: INPUT"NAME" ; A$ : CLS3 : FORN=lT02 : P
LAY"05BP255":NEXT:PLAY"04 ,, +P$+"0
3 "+P$ : FORN=lTOLEN ( A$ ) : PRINTMID$ (
A$,N,1) ; :PLAY"02P1"+P$+P$:NEXT:F
0RN=1T099 : PLAY"V3102BB" : B$=B$+"
" : FORM=lT02 5j3 : PLAY"V805B" : PRINTA
$+B$; :NEXTM,N
Steve Sward
Bellevue. NE
(For iliis winning one-liner contest entry, the author has been sent copies
of both The Rainbow Book Of Simulations and its companion Rainbow
Simulations Tape. >
August 1985 THE RAINBOW 217
ftware Review!
T/X\
VIEW-EDIT: A Dynamic
pproach To Image Processing
By Dan Downard
ecehtly, a review appeared in the rainbow (June 1985,
j 197) for VIEW-II and CoCoGrey, a complete SSTV
sceiver for the CoCo. SoftCircuits has introduced a
if image processing programs called VIE W-EDIT that
e this combination hard to beat for 8.5-second slow
IEW-EDIT requires a disk-based 64K CoCo and one
lick. Disk basic is recommended, but ADOS will work
ell. It is not necessary to have the CoCoGrey medium
lution adapter, but I would highly recommend its use.
s CoCoGrey is a hardware modification that gives you
;ray levels with 128-by-192 resolution.) The software
es non-protected, so you can make as many copies
3U wish for your own use. The documentation consists
n attractive 16-page booklet that is above average in
aining the functions Of the program.
ne best way to describe VIEW-EDIT is to point out
e of the high points of the program. It is truly an
ge processing system, not just another graphics
;ram.
IEW-EDIT pictures are stored in an 8K format with
i byte representing two pixels on the screen. Two 128-
by-128 screens are available for editing; these screens are
called buffers. At any time during the editing process a
16-level gray scale can be called by positioning the cursor
at the bottom-left of the screen. With this feature the current
gray level for the cursor can be changed at will.
The menu is joystick driven by positioning the cursor
next to the function desired. Depressing the firebutton
activates that particular function. A Help function is
available in case you need to refresh your memory on the
function in question.
Define is the heart of any function selection. Define
allows the selection of the area of the image you wish to
process. After you Define the area, you can either use it
as a Stamp or a Window. A Stamp, as in many other
graphics programs, allows the duplication of the defined
area to another portion of the image. The Window mode
allows processing on a restricted part of the image. Of
course, you can Define the entire image as the Window
and perform functions on the whole working buffer.
An Undo function allows the cancellation of the previous
operation. This is really nice for making changes if things
didn't work out the way you planned.
A multitude of functions can be performed on the Stamp
buffer. It can be flipped horizontally or vertically, rotated,
shrunk, expanded, inverted, blanked or filled with one of
16 gray levels. These features allow the generation of
tremendous graphics designs from scratch.
The whole scheme of operation amounts to defining your
stamp using a rubber band rectangle. This same rubber
band technique is used to place the stamp at any position
on the screen. Hence, there are actually no shrink and
w@m)
\
#/#
To make the'most of your new Dragon microcomputer from Dragon-Tano, you need Dragon User
— the international, independent magazine for Dragon owners.
Each issue of Dragon User contains:
• reviews of the latest software
• programming advice for beginners
• hardware projects
The Dragon microcomputer was launched in the UK
last year. Since then we have developed a knowledge
and mastery of the machine's abilities. You can
benefit from our experience by subscribing to
Dragon User, which is expanding its coverage to include
all US developments.
To make sure that you receive a copy of Dragon User
regularly, subscribe direct to us. This costs only $29.95
for 12 issues airspeeded to you - or take advantage of
our special offer to long-term subscribers. Individual
copies of the magazine can be obtained from your
Dragon dealer.
• program listings covering games and utilities
• reviews of Dragon peripherals and add-ons
• technical advisory service
• programming articles for users
r
I SI
I
I
Subscription order form. Receive a free book and save money by taking out a
long-ierm subscription — a two-year subscription saves 10%. a three-year
subscription saves 20% . In addition, long-term subscribers will receive a free
copy of either C The Working Dragon or □ Dragon Games Master. Please send
a check, made payable to Dragon User, with tnis form.
Start my subscription from the following issue
Name
Address
I
I
Signed.
Date..
Subscription rates US and Canada airspeeded lJ US$29.95 for 12 issues/1 year
D USS53 90 for 24 issues D USS71 .90 for 36 issues Send t' '
Dragon User. % Business Press International, 205 E. 42nd St.. I
u iui *£ issuer/ i ycoi
I this form to
.New York. NY 10017. I
August 1985 THE RAINBOW 219
expand functions, as these features are automatic. A status
line is included at the bottom of the screen for maintaining
the correct aspect ratio of the Stamp image.
A Text function allows the generation of up to nine
characters at a time. Characters are placed on the screen
with the same rubber band method as in graphics editing.
This is one of the weak points of the program, as only
coarse block lettering is available. At the same time, this
type of lettering is common for slow scan transmissions
due to the need for contrast.
Fatbits allows individual pixel editing by expanding the
screen so each pixel can be set to a distinct gray level.
A picture could be created by this method, but it is very
tedious to say the least.
• Lines and circles can be generated using rubber band
techniques with the joystick. As in all other features, the
function in question is generated in any one of 16 gray
levels using the drop-down pallette of colors, or gray levels.
The features that really distinguish VIEW-EDIT from
other graphics programs are the image processing functions.
One has already been mentioned, Invert. A pixel-by-pixel,
gray-scale inversion can be performed on the Stamp buffer,
giving you a video negative.
In addition, several filters are available, including low
pass, high pass, notch and peak. A histogram of the image
can be generated at any time. The results of these filters
are unique for their intended purpose, or just to create
some very interesting effects. The filter commands require
some experimentation, but make the whole program
worthwhile.
One feature that is outstanding is Scan Edit. It is normal
to have misplaced scans during any slow scan transmission.
Using Scan Edit, any horizontal scan can be isolated and
moved to align it with the rest of the picture. This is the
first time I have ever seen this feature in a program, and
it is invaluable for the slow scan enthusiast.
Brightness and contrast of the digital image can be
adjusted by two additional functions. First, a histogram
displays the current level, then you are allowed to alter
it as you wish.
As VIEW-EDIT is a disk-based software package,
standard disk commands are included such as SAVE, LDflD,
KILL, DIR and QUIT. The default drive can be changed
using the New Drive command. One drive is necessary
for the software, but the remaining space is just adequate
for storage of a few pictures. Two drives make life a little
easier.
All of the pictures are given an extension of "PIX." When
any disk command is encountered, a menu appears of the
pictures on the default drive. The picture is selected by
placing the cursor next to the name. The PIX extension
is omitted on all menus.
If you already have the VIEW-II software, a program
is included to merge all of the necessary programs onto
one master disk.
I think VIEW-EDIT is a dynamic approach to image
processing with a small personal computer. Those who
enjoy this type of activity, for ham radio or for any other
similar hobby, should consider this package a necessary
addition to their software library.
(SoftCircuits, Inc., 401 S.W. 75th Terrace, North
Lauderdale, FL 33068, disk S24.95)
Software Review*
For Masochistic Madness
Play Warehouse Mutants
While playing Warehouse Mutants, I found it diff
to imagine being a warehouse caretaker fighting off de
intruders. But it doesn't take a lot of imagination to e
playing the game. As a matter of fact, the fast pac
Warehouse Mutants does not allow its players a lc
time to think about anything but survival.
The game is very arcade-like with its excellent grar.
and movement. It begins with you in the middle of a r
of square crates, more like blocks, and a mutant in ■
of the four corners of the screen. The object is to kil
of the invaders before they get to you. They move tov
you swiftly and the only way to destroy them is to sn
crates against them. And, as if the first four mutants ai
enough to deal with, there are eight more at ram
locations waiting to break out of their crates and a
in the chase. Fortunately though, the flashing, cr
invaders can be destroyed before they break out by pus',
their crates into a wall or zapping them with the firebut
But, before you know it, if you survive long enough,
will be confronted by a warehouse full of mutants.
To survive the game, each of the destructive creat
must be zapped before the player gets hit four times s
four hits ends the game. The difficulty comes in fin<
time to strategize a plan for killing the mutants w
constantly avoiding them. The most success I had invo
first killing off a few of the creatures, then moving S'
crates around to form a blocked off area. Stopping
blocked off area can drive several mutants into a swir
madness long enough for you to map out more strat
Also, getting a lot of them into a concentrated area
be good since the 50 points awarded for killing one mu
is doubled for each additional one killed with the s.
block. Therefore, if you kill three mutants in a row,
will get 50 + 100 + 200 = 350 points. Killing eight mut,
with one crate is worth 6,400 points, which would bt
honorable total game score itself.
If you are able to kill all of the mutants in a sen
you move on to a faster and harder screen. Whatever
you have left are kept and a bonus hit is earned e>
time you get through a screen without getting hit.
game also includes a pause feature by hitting the CL1
key. Pressing the SHIFT and '?' keys simultaneously
allow you to skip any screen if pressed when the sci
is just starting.
Although I achieved much more frustration t
gratification from playing Warehouse Mutants, I still fo
myself wanting to play continuously. Something about
pesty mutants, which more often than not got the I
of me, seemed to bring out a masochistic streak! Need
to say, it usually proved futile as I was tortured time a
time.
(Tom Mix Software, 4825 Bradford N.E., Grand Rapids
MI 49506, 16K tape $24.95, 16K disk $27.95)
— Philip S. H
220
THE RAINBOW August 1985
iftware Review!
rsz\
Count To 100 Provides
Preschool Fun With Math
ount To 100 is designed for preschool, kindergarten
first grade level children. It can be used to reinforce
h concepts for up to third grade remedial level. It is
lenu-driven program that requires a minimum of
itance once the program is loaded.
selection of control features eases the operation of
program by allowing a one-key selection of: Returning
le menu. Voice on/ off. Upper range limit, Help function
Pause option.
'ount To 100 is useful in sequential counting, counting
wos (even or odd numbers), counting by fives or 10s,
counting backwards, if you so desire. All but the
nting backwards option are supported by manual input
flashcard modes. The flashcard mode allows you to
nt along with your CoCo, while the manual mode
lires that you key in the next number,
he voice option of the program is guaranteed to work
l The Voice speech synthesizer; other synthesizers may
k but are not guaranteed to perform.
It tested the Count To 100 with our preschooler, who
turned five, our kindergarten superstar, who just turned
and our second grader who doesn't care about anything
:ss it eats hay and wears a saddle. The only problem
sneountered was finding enough time to let "oF Dad"
ew this package. The flashcard mode provided an
resting competitive game, and the pause control featuie
: more than sufficient help and a chance to gather your
ie when things get out of control,
he tape version we had loaded several times with no
. of any problems. The documentation provided was
ct and very adequate with specifics and examples
liable if needed.
he package is obviously well thought out and provides
tecessary functions for a useful math learning tool. For
price, the quality and interest that it generated in math
:tice and learning, it could be said that "You can count
t!"
CY-BURNET-ICS, 5705 Chesswood Dr., Knoxville, TN
7912, tape $29.95 or 34.95 with voice, disk $32.95 or 37.95
vith voice)
— Tony Compton
oior Computer Disk DriveO
$199.00
Southwestern Digital
2515 West Main #337
Houston, Texas 77098
1-713-480-3296
VISA'
FOR THE COLOR COMPUTER FROM
triad pictures corp.
p o box 1 299 sequim, wo 98382
ODDDDDDDDD OXt DDDQODDDDDDDDODD
WAR £ WORLDS
QoaaoooDoooaoooDnaaaoaoDooao
A 100% JOYSTICK-DRIVEN ILLUSTRATED ADVENTURE!
NO MORE "HUNT-AND-GUESS" ON THE KEYBOARD!
HUNDREDS OF CHALLENGING SITUATIONS!
The highly detailed black & while illustrations put even the best color
adventure graphics to shame the lirsl ol a whole new kind oi
poinl-and-klick' adventure . . the wave ol the luturel!
WAR ol the WORLDS Chapter One - The Landing
SPECIAL INTRODUCTORY OFFER - $16.95
SOLD SEPARATELY tor $18.95 eoch:
WAR ol the WORLDS Chapter Two - The Quest
WAR ol the WORLDS Chapter Three - The Lost Hope
SPECIAL PACKAGE PRICE - All 3 Chopters (or $39.95
SUPPLIED ON CASSETTE
REQUIRES 64K AND ONE RADIO SHACK-TYPE JOYSTICK
• A***********************
Please send me: Order f Orm
LJ Bill me
[J Payment enclosed
$
Add $3 shipping and handling ... $3
TOTAL $
address
ci ly
slate
TRIAD PICTURES
P.O. Box 1299
Soquim, WA 98382
(206) 683-6459
CALL OR WRITE FOR CATALOG
IN AUSTRALIA
ORDER IRIAD PICTURES SOFTWARE FROM
SOFTWARE SPECTRUM. P.O. BOX 2101
ADELAIDE, SOUTH AUSTRALIA. 6001
(08) 211 8763 OR 51 4868
August 1985 " THE RAINBOW 221
MORETON BAY
MORE KEYS
At last a quality numeric keypad for your Color
Computer. Tin's 15 key numeric pad plugs inside your
computer and gives you the convenience of rapid
numeric data entry. Dimensions: length 6V2"
(165mm), width 4" (101 mm), height 3" (76 mm).
Baked black enamel finish. Specify computer model.
MORE KEYS complete with cable and connector.
$69,95
RESET-POWER-SWITCHES
A REAL IMPROVEMENT
Move the power switch and reset switch where they
belong. An LED power on light too! High quality
parts. D, E boards and C0C0 2 totally solderless kit.
F board requires soldering.
Reset 1 C0C0 1 S24.95
Reset 2 C0C0 2 527.95
Either kit add S2.00 shipping and handling
DOUBLE DRIVER
The BEST monitor driver
available. Color composite,
monochrome and audio out-
put. For original C0C0 D, E
and F boards. $24.95.
Mono II for Color Computer
2. An excellent monochrome
monitor driver that has
audio output also. $24.95. Specify model neei
MINI MOUTH
Add sound to your mute
monitor. Hear the bells and
whistles of your software
again. No batteries.
Solderless installation.
All Color Computer Models
$24.95
\
\
/
64K UPGRADES
«gi
Guaranteed Pretested
Instantly access 64K via M/L
totally solderless kit to
upgrade E Boards. Kit in-
cludes eight 4164 prime chips
and chips U29 and Ull
already soldered.
SPECIAL: E Board Kit
$39.95, F Board and Color
Computer 2 $26.95.
THE COCO-SWITCHER
A QUALITY PIECE OF HARDWARE
The C0C0 Switcher allows you to hook up th
peripherals to your RS-232 jack. Connect yc
modem, printer and any other RS-232 compati
peripheral to the C0C0 Switcher. An LED on
C0C0 Switcher shows if your computer is on or
at a glance. The LED flickers when transmitting
receiving data.
Dimensions: 2Vi" (64 mm) x 4" (102 mm)
x 5 7/8' (150 mm)
$39.95 plus $2,00 shipping and handling
FILE CABINET — Data base, alphabetizes, sorts numeric
entries, searches for key words or numbers, computes
totals & averages by categories, saves records, changes
or deletes them. Up to 20 entries for each record, up to
256 characters for each entry. Mailing list included. Out-
put to screen printer or tape. Print all or selected records,
+ , -, x, -r Numeric entries.
16K EXB Cassette $29.95
COCOWRITER II — Powerful and full featured,
excellent word processor at an affordable price. 32
64 or 85 characters per line, justify right, left, center, in
delete, move blocks. Menu driven printing and format
Tabs, etc. One of the best values in word proces
today!
16 K EXB Cassette $34.95, 16K EXB Disk $44j
Having trouble with your C0C0? We have the chips
need. Call us. (805) 962-3127
CORRECTIONS
"Play Your Favorite Games With No Wires Attached"
(June 1985, Page 105): Jim Shaver tells us there are a few
errors in the schematic diagrams, and that the parts list
was left out. Here is the parts list, with Radio Shack catalog
numbers in parentheses:
C1-C3 0.1 mf (272-135)
IC1, IC3 74LS240 octal buffer
1C2 7402 quad NAND gate
1C4, IC5 4066 CMOS quad bilateral switch (276-
2466)
1C6 4011 CMOS quad 2-input NAND gate
(276-2411)
IC7 7805 voltage regulator (276-1770)
Jl, J2 9-pin D-sub connector plug (276-1537)
J 3 |/8" miniature phone jack (274-251)
LED1-LED10 T-P/ 4 red LED (276-041)
P1,P2 Joystick plug with cable (AW-2894;
order from Radio Shack National Parts)
R1-R10 I0K V A watt (271-1335)
R11-R20 IK !4 watt (271-1321)
R21-R38 47K % watt (271-1342)
R39, R40 1 megohm '/ 4 watt (271-1356)
S W 1-SW3 SPST toggle (275-624)
POKE &HD29D, 4(3: POKE &HD65F, 40 : POKE &HD682.4
FOKE &HD44C,78:P0KE &HC735 , 78 : POKE &HC7BB.7
POKE &HC7Dj2,78:POKE &HC7EF, 78 :POKE &HCD26.4
POKE &HCEB5,78:POKE &HD534, 39 : POKE &HC75A.1
"Geo-Graphics" (September 1984, Page 177): Josepl
Paravati advises us that, although the listing in the magai
is correct, many users have reported they get an ?FC Ei
in Line 5120 due to an incorrectly typed DATA statemi
He suggests the following procedure to find the error:
- Enter PRINT AS immediately after the error occi
This will show the letter or numeral the error is cau
by. Check the DATA line containing that letter.
If more than one character appears, enter PRINT
Count that number of characters over, and that charai
is the one at fault.
"MAIL09 (June 1985, Page 249): Please refer to P
246 of this issue for the remainder of the listings wh
were inadvertently left out of this OS-9 feature. ^
The 74LS240 and 7402 chips are not available from Radio
Shack, but can be had from industrial electronic
distributors in major cities.
In addition, these corrections apply to the schematic
diagrams on pages 106 and 108:
1) In Figure 1, pins 6 and 8 are reversed.
2) In Figure 2B, the three leads of IC4 going to ground
should be marked '3,' '7' and '9.' In addition, the chip at
the bottom of the page should be marked IC5; pins I,
II and 14 go to +5 volts.
3) In Figure 3, the upper chip should be labeled as a
74LS240 instead of 74L5240.
"Super Disk Charger" (June 1985, Page 113): Dennis
Bironas tells us that a line should be added in Listing 2
as follows:
00105
NOP
Also, the POKEs in the yellow box at the top of Page
1 16 apply to Version 1.0 or Disk BASIC. If you have Disk
BASIC 1.1, use these POKEs instead:
One- Liner Contest Winner . . .
This one-liner isn't your ordinary shoot-'em-up
game. Cannon shows a cannon and target on the
screen, then asks for an elevation angle. The object
is to find the correct angle to hit the target in as
few tries as possible.
The listing:
J3 PMODE3:PCLS:N=19j3:R=RND(15^)+E
: LINE (R, 182 ) - (R+8 f N) , PSET, B : CII
CLE (8 , N) , 5 : SCREEN1 : PLAY"P1" : FORE
=1T05 : INPUT"EL" ;E : SCREEN1 : FORT=]
T099:X=6*T*COS (E/57) :Y=(6*SIN(E/
57 ) - . 08 *T ) *T : PSET (X+8 , N-Y) : IFY<j<
THENNEXTS ELSEIFR-8<X ANDX<R ANE
Y<7THENPRINT"hit"ELSENEXT
J.D. German
Cedar Crest. NM
(For this winning one-liner contest entry, the author has been sent copies
of both The Rainbow Book Of Simulations and its companion Rainbow
Simulations Tape.)
224
THE RAINBOW August 1985
....{ JOHN ' S "•-•• .T'jii
r r.j '-'■•*
-d! W
nr
Si
IAUNDRY.
.-^SV ^
..v-Vv 1 --'.^ Y9 it?
41'ikra
SOFTWARE
SAM DIAMOND, P.I.
The first of our new Sam Diamond graphic adven-
tures. More than 40 detailed high resolution graphic
scenes. A killer is loose in the city. Can you bring
him to justice before he gets you? Excellent graphics
and a tough mystery to solve.
32K Disk Only $29.95
plus $2.00 shipping and handling
GET THE MOST FROM YOUR GRAPHIC PROGRAMS
How to integrate Graphicom and CoCoMax. Two tutorial
disks full of examples and suggestions. See how to create
graphics step by step. Learn how to display and even
animate your graphics from Basic.
1 Disk $14.95
2 Disks $24.95
WHEELS
THE VERY BEST IN GRAPHICS
PLACES AND FACES
BJORK BLOCKS
i incredible graphic utility. Fun. Easy. Create graphic
eens as good as any you have seen. All you need is a
■stick or mouse. "The most user friendly program I have
it seen for the CoCo. For those of you with graphic
erests, I guarantee that you will not be disappointed."
view in Rainbow, Oct. 1984.
quires 32K EXB
K for animation)
pe or Disk $34.95
II.D1NG BLOCKS 1
cture Disk) S'15.95
Created with Bjork Blocks
GRAPHICOM
Buy Graphicom from us and get one of our unique picture
disks free! Get our improved Picture Disk One also. The
first in the new generation of graphic utilities. An excellent
utility. Requires: 64K EXB, Disk Drive and Joy Sticks. Three
disks and the best bound documentation for only $29.95.
Calligraphy STAMP DISK: Useful letters and designs for
making your own signs and menu screens.
Adventure Disk I: Indoor scenes and objects. Helps you
draw pictures and learn more about Graphicom.
Adventure Disk II: Outdoor scenes and objects. A
Graphicom tutorial as well as a useful library of images you
can use.
tz:
slrae.
'ECIAL: BJORK BLOCKS and GRAPHICOM S55.00,
MORETON BAY SOFTWARE
Ca.Xlft« i'<iti h <| IX
udl ill ill in ag< ur mm. icdj 3m> aiai
A Division of Moreton Bay Laboratory
316 CASTILLO STREET
SANTA BARBARA,
CALIFORNIA 93101
(805) 962-3127
Ci&ililiiigiiraipihiy
aalillflgJSPQTpBlgJ Ud GQiiSflslj-ffi|i)G3fg S
Calligraphy Disk II: 23
New letter stamp sets
Tfrf 'liri. :<:i.p: :■•: i ,i .: •..., », „., ,1,1 1..1 ;t,joir t .i
E,.:r. .*.».« .-ill Sum rn. .j,t,..,.f,( .:01.x, «P*n4ing
oa norisomftl position uwr ( pofstcu, inMt first
ir*n -u .... f r.< okiium
1 ««a» I • lUUHlHlH
.:":■.
J .. ,.' .' •. '-.
Ordering information
! S2.00 shipping and handling per order. We ship within 24 hours on
ipl of order. Blue Label Service available. California residents add 6%
i lax.
-Cr
Adventure Disk II
Adventure Disk 1
1 Picture Disk $15.95
2 Picture Disks $24.95
3 Picture Disks $29.95
4 Picture Disks $34.95
^™5: rr? ft *7n
.ow To Read Rainbow
ease note that all the basic program
igs you will find in the rainbow are
latted for a 32-character screen —
ley will show up just as they do on
■ CoCo screen. One easy way to
:k on the accuracy of your typing
3 compare what character "goes
3r" what. If the characters match —
your line endings come out the
e — you have a pretty good way of
wing that your typing is accurate,
e also have "key boxes" to show you
minimum system a program needs.
do read the text before you start
nally, the little cassette symbol on
igs indicates that program is availa-
hroughourRAiNBOWONTAPE service,
jrder form for this service is on the
rt card bound in the magazine.
What's A CoCo
)Co is an affectionate name which
first given to the TRS-80 Color
iputer by its many fans, users and
ers.
)wever, when we use the term
o, we refer to both the TRS-80 Color
iputer and the TDP System-100
iputer. It is easier than using both
le "given" names throughout the
bow.
,e Rainbow Check Plus
^
ie small boxes that you see accom-
'ing programs in the rainbow is a
ck sum" system, which is designed
ilp you type in programs accurately.
tin bow Check PLUS will count the
ber and values of characters you
in. You can then compare the
ber you get to those printed in the
30W. On longer programs, some
:hmark lines are given. When you
h the end of one of those lines with
typing, simply check to see if the
bers match.
To use Rainbow Check PLUS, type
in the program and cshve it for later use,
then type in the command run and press
enter. Once the program has run, type
NEW and enter to remove it from the area
where the program you're typing in will
go.
Now, while keying in a listing from the
rainbow, whenever you press the down-
arrow key, your CoCo will give you the
checksum based on the length and con-
tent of the program in memory. This
is to check against the numbers printed
in the rainbow. If your number is
different, check the listing carefully to
be sure that you typed in the correct
basic program code. For more details
on this helpful utility, refer to H. Allen
Curtis' article on Page 21 of the February
1984 rainbow.
Since Rainbow Check PLUS counts
spaces and punctuation, be sure to type
in the listing exactly the way it's given
in the magazine.
10 CLS:X=25G*PEEK(35)+178
20 CLEAR 2S.X-1
30 X=25G*PEEI< (35)+l?8
40 FOR Z=X TO X+77
50 READ Y:W=W+Y:PRINT Z,V;U
G0 POKE 2, Y: NEXT
70 IFUI=7985THEN80ELSEPRINT
"DATA ERROR": STOP
80 EXEC X:END
90 DATA 182, 1, 10G, 167, 110, G0, 134
100 DATA 12G, 183, 1, 10G, 130, 1, 107
110 DATA 175, 140, 50, 48, 140, 4, 181
120 OATA 1, 107, 57, 129, 10, 38, 38
130 OATA 52, 22, 79, 158, 25, 230, 129
140 DATA 39, 12, 171, 12B, 171, 128
150 DATA 230, 132, 3B, 250, 48. 1. 32
1G0 DATA 240, 183, 2, 222, 4B, 140, 14
170 DATA 159, 1GG, 1GG. 132, 28, 254
180 OATA 189, 173, 198, 53, 22, 12G,
190 DATA 0, 135, 255, 134, 40, 55
200 DATA 51, 52, 41,
Using Machine Language
Machine Language programs are one
of the features of the rainbow. There
are a number of ways to "get" these pro-
grams into memory so that you can
operate them.
The easiest way is by using an editor/
assembler, a program you can purchase
from a number of sources.
An editor/assembler allows you to
enter mnemonics into your CoCo and
then have the editor/assembler assem-
ble them into specific instructions that
are understood by the 6809 chip that
controls your computer.
When you use an editor/assembler, all
you have to do, essentially, is copy the
relevant instructions from the rainbows
listing into CoCo.
Another method of getting an assem-
bly language listing into CoCo is called
"hand assembly." As the name implies,
you do the assembly by hand. This can
sometimes cause problems when you
have to set up an ORIGIN statement or
an EQUATE. In short, you have to know
something about assembly to hand
assemble some programs.
Use the following program if you wish
to hand assemble machine language
listings:
10 CLEAR200,&H3F00: I=£H3FB0
20 PRI NT "ADDRESS : " ; HEXS ( I ) ;
30 INPUT "BYTE";B$
40 POKE I,VAL("&H"+BS)
50 I = I+1:GOTO20
This program assumes you havea16K
CoCo. If you have 32K, change the
S.H3F00 in Line 10 to &H7F00 and change
the value of 'I' to &H7F80.
The Rainbow Seal
RAINBOW
CERTIFICATION
SEAL
The Rainbow Certification Seal is our
way of helping you, the consumer. The
purpose of the Seal is to certify to you
that any product which carries the Seal
has been physically seen by us, that it
does, indeed, exist and that we have a
sample copy here at the rainbow.
Manufacturers of products — hard-
ware, software and firmware — are
encouraged by us to submit their pro-
ducts to the rainbow for certification.
We ascertain that their products are, in
actuality, what they purport to be and,
upon such determination, award a Seal.
The Seal, however, is not a "guarantee
of satisfaction." The certification pro-
cess is different from the review process.
You are encouraged to read our reviews
to determine whether the product is
right for your needs.
There is absolutely no relationship
between advertising in the rainbow and
the certification process. Certification is
open and available to any product per-
taining to CoCo. A Seal will be awarded
to any commercial product, regard/ess
of whether the firm advertises or not.
We will appreciate knowing of in-
stances of violation of Seal use.
August 1985 THE RAINBOW
225
JOYSTICK UTILITY
16K
ECB
Q
With a little aircraft technology, you can
be in complete control . . .
The
Joystick
Fix-It
By John G. Williams
This program is a solution to a problem which plagues
users of the standard Radio Shack joysticks. We
all know the sticks are inexpensive and work well
enough for most applications. However, they seem to be
too sensitive near the center so it is easy to over-control
screen objects.
Since I am an engineer on the F-16 fighter program,
I'm aware of a method used in its flight control computer
to cure that same problem in the aircraft. The pilot
commands are received by the computer and shaped by
a series of equations to provide the desired airplane motion.
The CoCo can do the same thing for us. All it takes
is for the stick command to be multiplied by the absolute
value of itself and divided by a constant to retain proper
scaling. The stick will then have a slower response near
center, but will still have quick action near the extremes.
Stik Fix is a demonstration of this capability. RUN the
program and slowly move the right stick laterally to see
the effect. The screen horizontal axis is the stick motion
while the vertical axis is the modified command. (I have
put this change into the Sopwith CoCo flight simulator
roll control, and it makes the action much smoother and
easier to manage.)
The listing:
10 PM0DE4,1:SCREEN1,1:PCLS(5) : CO
LOR0 , 5
15 LINE(128,0)-(128,191) ,PSET:LI
NE (0,96) -(255,96) , PSET
20 X=3.2*(JOYSTK(0)-31.5)
30 Y=(ABS(X)*X)/130
40 PSET(128+X,96.5-Y)
50 GOTO20 /£\
D
"H
226
THE RAINBOW August 1985
Help
Battle the
•st of Disk Drives
w Lower Price
i-DISK Drives $4&$5?
$34.95
3el! There are emply spaces in your 32K
54K CoCo. The Preble VDOS Un-DISK
-. you fill them up with PROGRAMS!
n-DISK uses your computer's extra
imory like a fast disk drive.
n-DISK can store BASIC and MACHINE
NGUAGE programs.
n-DISK is INVISIBLE. Yup! Un-DISK
es not interfere with normal Color Corn-
ier Operation.
n-DISK appears only when you type the
igic word VDOS.
n-DISK comes with comprehensive in-
uctions which you may not need be-
use:
n-DISK is self-prompting and easy to
e!
n-DISK is provided on cassette.
n-DISK is faster than a slow clumsy
SK DRIVE and best of all . . .
n-DISK isCHEAPER than a DISK DRIVE!
n-DISK will work even if you already own
iisk but WHY BUY A DISK AT ALL?
n-DISK should be in the library of every
rious CoCo user even if you own a disk
ys Frank J. Esser. independent reviewer
r rainbow Magazine!
OK sure, disk drives ARE NICE. I own one.
But if your finances are limited, the Un-DISK
can give you much of the power of the
mechanical drive. Even if you already own a
disk the Un-DISK can work like a super fast
extra disk.
EXTRA . . . EXTRA . . . EXTRA . . . EXTRA . . .
Additional Power For S14.95
Only with VDUMP for the Un-DISK!
• VDUMP lets you make a cassette backup
copy of everything stored in the Un-DISK.
• VDUMP lets you save 5, 10, 15 or more
programs on a single cassette tape file.
• VDUMP lets you switch Un-DISKs. With a
single load operation replace a group of
financial programs with a set of children's
programs. (The new VDUMP tape over-
writes the old.)
• VDUMP can allow you to save a whole lot
of rainbow on tape in a SINGLE file.
• VDUMP is the perfect companion to the
Preble VDOS Un-DISK.
Available from Doctor Preble's Programs,
naturally! Bringing you fine Color Computer
Products Since 1983!
<>
The Preble VDOS Un-DISK $34.95
The Preble VDUMP S14.95
Shipping & handling
U.S. and Canada $1 .50
or S5.00 to other foreign points
VISA and MasterCard accepted
Order From:
Dr. Preble's Programs
6540 Outer Loop
Louisville, KY 40228
(502) 966-8281
Canadians may order from Kelly Software
-
Watch out for dog bytes! This canine version of the
carnie's classic shell game is a fascinating test of your
visual reflexes
Which Way Did Tha
Mangy Mongrel Go;
By Brad Nation
]T> oghouse is a short program to
m M challenge the visual reflexes of
J-^r everyone from toddlers to
adults. The 2,087-byte Color BASIC and
machine language program is simple.
A dog runs in and out of three doghouses
and after it stops you are asked which
(Brad Nation is a quality assurance
failure analyst at Sundstrand Data
Control, Inc. He writes programs for
fun and profit at home in his spare
time.)
house you think he is in. After each
response the dog's speed is adjusted by
approximately 30 percent, faster if your
answer was right and slower if it was
wrong.
Due to the machine language sub-
routine, the speed of the dog can be
varied from as fast as 0.03 seconds to
cross the screen from doghouse ffl to
doghouse #3, to as slow as 1.9 seconds
to cross the screen.
Doghouse was written for any Color
Computer, 4K or more, Extended or
228 THE RAINBOW August 1985
Extended BASIC. Please note,
ver, that users with Color BASIC
d replace Line 2 with 2 POKE
ML'25G:P0KE 27G , ML-PEEK
) *256. This is because the DEFUSR
land is not supported by Color
:, so the machine language routine's
ition address must be poked into
ons 275 and 276. As an alternative,
of either system can replace Line
th 2 IF(PEEI< (32768)=G9
>EEK(327G9)=8B) THEN DEFUSR=
ILSE POKE 275,ML/256:
276, ML-PEEK ( 275 )»25G which
s the program to determine if
ided BASIC is present or not. The
am will then be able to run on
ystem.
The 321-byte machine language
routine is position-independent so users
with 32K or more may want to put the
ML routine into higher memory by
changing the CLEAR statement in Line
1 to CLEAR 200,32446, and also the
value for ML in Line 1 .
Also, 4K BASIC users must change
the CLEAR statement to CLEAR 200 , 3774
and change the value of ML to ML=3775.
This is due to the smaller memory size.
Type in Doghouse and run the
program. Operating instructions are
provided on-screen. Pressing 'S' when
"PRESS 4 TO GO" is displayed will
show the speed the dog will run during
the next round (100 = fastest and =
slowest).
The assembly listing for the ML
routine is not included. The routine
operates as follows: On entry to the
routine, if the passed parameter is equal
to T (i.e., A=USR(1)), then the dog has
started in doghouse #2 and the doghouse
doors are opened. If the passed parame-
ter is '2,' then the doghouse doors are
closed so the dog can't be seen; if the
passed parameter is '3,' then the doors
are opened to show the dog. If the
passed parameter is any other value (in
Line 7 NP equals 1317, 1327 or 1337),
then the dog runs to the new location.
(For those having questions about
this program, you may write to Mr.
Nation at: 15115 N.E. 8th Street,
Bellevue, WA 98007.)
e listing: DOGHOUSE
:LS3:PRINT@137," doghouse game
;: CLEAR 200, 16062 :PRINT@448: PR
I?:ML=16063
DEFUSR=ML' EXTENDED ONLY
?OR I=ML TO ML+320:READ J: POKE
,J:NEXT I:A=USR(1) :R$=" GOOD,
J WERE RIGHT! " : C$=CHR$ (175) : F
1=1 TO 5:C$=C$+C$:NEXTI:S=25
PRINT @ 100, C $;: PRINT @ 10 4," PRES
■4 1 TO GO "; :A$=INKEY$
^$=INKEY$:IF A$="S" THEN PRINT
30,C$;:PRINT@106," speed =" ;IN
L00-S/1.27) ;:FORI=1TO900:NEXTI
DT04 ELSEIF A$="4" THEN PRINT§
3 , C$ ; : PRINT@107 , "GET READY" ; :
3E A=RND(6) : GOTO 5
FOR 1=1034 TO 1449 STEP 32:J=R
(8)*16+127:POKE I, J: POKE 1+1/9,
3OUND(255-(I-1035)/2) ,1:NEXTI:
KE ML+232,S:POKE ML+234,S:FOR
L034 TO 1449 STEP 32: POKE 1,17
POKE 1+10, 175 :NEXTI:PRINT@100,
;:FOR 1=1 TO 15+RND(15)
!JP=RND(3)*10+1307:IF NP=OP THE
7 ELSE A=USR(NP) :OP=NP:NEXT I:
JSR(2) :PRINT@103," WHERE IS TH
DOG?";:A$=INKEY$
k$=INKEY$:G=VAL(A$) :IF G<1 OR
3 THEN 8 ELSE A=USR(3) : S=PEEK(
+232): G=G* 10+1307 : PRINT@ 100 , C$
IF GONP THEN 10
PRINT§101, ;:FORI=l TO LEN(R$):
INT MID$(R$,I,1) ;:IF MID$(R$,I
)=" " THEN FOR J=l TO 50:NEXTJ
: FORJ=1TO500 : NEXTJ : S=S/1 . 3 : GOT
4 ELSE SOUND ( 10+10*1) ,l:NEXTI
PRINTS 101," SORRY, YOU WERE W
NG ";:FOR 1=1 TO 11: SOUND 50,1
: SOUND 75,1:NEXT I : S=S*1 . 3+1 : IF
S<127 THEN 4 ELSE S=127:GOTO 4
11 DATA 189,179,237,193,1,16,39,
0,30,193,2,39,79,193,3,39,67,2 37
,141,0,233,23 6,141,0,227,16,163,
141,0,224,39,119,16,44,0,116,22,
0,147,95,231,141,0,212,142,5,47,
175,141,0,201,175,141,0,199,134,
49,183,4
12 DATA 197,134,50,183,4,207,134
,51,183,4,217,142,4,227,49,141,0
,206,141,46,142,5,1,141,41,230,1
41,0,168,39,105,32,70,51,141,0,2
03,32,4,51,141,0,208,142,5,33,14
1,16,142,5,65,141,11,142,5,97,14
1,6,142
13 DATA 5,129,141,1,57,31,50,166
, 160 ,39,22, 167 , 132 , 167 , 137 , , 10 ,
167,137,0,20,48,1,32,238,166,160
,39,4,167,128,32,248,57,198,1,23
1,141,0,98,106,141,0,91,141,190,
174,141,0,84,48,30,49,141,0,83,1
41,68,48
14 DATA 136,30,141,218,48,136,27
,3 2,29,95,231,141,0,65,108,141,0
,58,141,157,174,141,0,51,49,141,
0,65,141,37,48,13 6,27,141,187,48
,136,28,16,142,202,202,16,175,13
2,48,3,16,142,197,197,16,175,132
15 DATA 134,25,198,25,90,44,253,
74,44,248,22,255,33,141,153,48,1
36,29,141,148,57,5,57,5,57,0,204
,198,198,0,195,194,193,0,128,128
,128,193,0,201,201,204,0,194,193
,195,0,194,128,128,128,0,172,168
,179,164,172,0,168
16 DATA 179,183,191,191,191,187,
17 9,164,0,191,255,255,255,255,25
5,255,255,191,175,0,191,207,207,
207,207,207,207,207,191,175,0 ^
August 1985 THE RAINBOW 229
HEALTH EDUCATION
This practical application gives a simple
test of your eyesight to indicate if there's
a need to seek professional examination
As Far As
The Eye Can See
By Robert L. Gr<
Many of us take our precious
gift of sight for granted, but
misuse, pollution and disease
can slowly rob us of our good vision.
I'm just a country programmer, but my
CoCo can now make my family and
friends more alert to vision dangers and
seek regular checkups with a doctor of
optometry or an ophthamologist.
Vision is the eye-opening program
that turns our computer into a health
advocate. The first test is for retinal
disparity and focus. This "parlor trick"
test serves to grab our attention in
preparation for the red/ green colorblind
test. The red/green syndrome is usually
a male trait, but that distinction is
necessary for traffic signals, other light
indicators and for electronic component
coding.
For the beginning programmer,
Vision serves to clearly demonstrate
both special CoCo features and some
sophisticated techniques. It also provides
(Robert Green is former president of
the TRS-80 Users Group of Atlanta,
Ltd., and was selected by Johns Hopkins
and Tandy to host the Southeast's first
computer-assisted aid to the handi-
capped workshop and fair. He writes,
teaches and does consulting work.)
that person with a free alphabet (lines
290-560).
Line 20 dimensions the 'A' array for
a GET and PUT function later in the
program, and also makes ST$ equal 32
graphics characters to enhance and
make more professional the set of
""Vision is the eye-
opening program that
turns our computer into
a health advocate . . .
For the beginning
programmer, it serves
to clearly demonstrate
both special CoCo
features and some
sophisticated
techniques. "
instructions (lines 580-690).
Line 130 sets up the three views of
the three colored circles. Line 70
determines the length of time the circles
remain on the screen. Line 160 deter-
mines the length of time the screen is
cleared (PCLS).
The colorblind test begins wit!
170. Using PSET to color in m
the screen took so long 1 feared m
takers would fall asleep.
Lines 170-180 use loops to ran
place colored dots at the upp<
corner of the screen in a 20-by-2(
Line 190 GETs the area in the 'A'
and stores it for later use.
Line 200 uses loops to replica
SET 'A' array, thus drawing the
much faster with no big loss to ra
coloring.
In Line 30 is the first of the
commands using the alphabet
290-560). This technique saves 1
typing and errors.
Another timesaver is the II
(Line 270 for the colorblind tes
Line 710 for the instructions),
allow quick keyboard one-stroke
ation and using the feature as a [
routine permits faster typing c
program.
SOUND is used in Line 250 met
a prompt to alert the user th;
computer is ready with another c(
circle to be discerned.
Vision adds a very practica
rewarding aspect to the CoCo. It s
prompt others to contribute pro.
that can benefit the family an
population in general.
230
THE RAINBOW August 1985
7f 190 .. .
...161
410 ...
....75
600 ...
....12
670 ...
...22
END
99
: listing: VISION
3 ********* VISION ********
L ■** COPYRIGHT (C) 1984 **
2 '** BY ROBERT L. GREEN **
3 ■** POST OFFICE BOX 419**
4 ■** CLARKSTON, GA 30021**
5 i** ph: (404) 451-9813 **
5 '************************
10 CLEAR1000
20 DIMA (20,20): ST$=STRING$ ( 3 2 , CH
*$(150))
30 CLS:PRINTST$:GOSUB580
10 PMODEl,l:SCREEN4,l:PCLS:GOSUB
2 90
50 FORT=lT03
50 CIRCLE ( 100 , 100 ) , 60 , 3
70 FORX=1TO500:NEXT
30 PAINT (105, 120) ,3,3
90 CIRCLE (100, 100) ,30,4
L00 PAINT (100, 100) ,4,4
L10 CIRCLE (100, 100) ,10,3
L20 PAINT (100, 100) ,3,3
130 FORX=1TO3000:NEXT
140 PCLS
150 NEXTT
160 FORX=1TO500 : NEXT
170 FORX=0TO21:FORY=0TO21:PSET(X
,Y,RND(9)-1)
180 NEXTY:NEXTX
190 GET(0,0)-(20,20),A
200 FORX=19TO150STEP20:FORY=19TO
150STEP20
210 PUT(X-19,Y-19)-(X,Y) ,A:NEXT:
NEXT
230 DRAW"S12 ; C2 ; A2 ; BM170 , 10 ; "+C$
+0$+L$+0$+R$ : DRAW'S 12 ;C4 ;A2 ;BM20
, 30 ; "+0$+F$ : DRAWS12 ; C3 ; A2 ; BM16
5 , 50 ; "+C$+I$+R$+C$+L$+E$
240 FORT=1TO2000: NEXT: DRAW" S 12 ;C
4 ;A2 ;BM8 , 150 ; "+H$+I$+T$+SP$+K$+E
$+Y$
250 FORX=0TO8:SOUND2*(X+1) , 2 : CIR
CLE ( 80 , 80 ) , 50 , X : GOSUB2 70 : FORW=lT
010 : CIRCLE ( 10 , 10 ) , W , X : NEXTW : NEXT
X
260 CLS: PRINT "THE END": END
270 I$=INKEY$ : IFI$=" "THEN270ELSE
RETURN
290 A$="BEHUNU2R4NU2DGL2BGBL6"
300 B$="BEHENR3HER3D4L3BGBL6"
310 C$="BU4ER2FD2GL2HBG2BL4"
320 D$="BEHU2ER3D4L3BGBL6"
330 ES="BER3U2NL2U2L4BG5BL2"
340 F$="BUR4U2NL3U2BG5BL5"
350 G$="BUR4U3HL2GDRBG3BL4"
3 60 H$="BUU2NU2R4NU2D2BGBL9"
370 I$="BR2BUU4BU2BD7BL8"
3 80 J$="BUU3ER2FDBG3BL7"
390 K$="BUE2NH2R2ND2U2BG5BL5"
400 L$="BU5R4D4BGBL9"
410 M$="BUNU4E2F2U4BG5BL5"
420 N$="BUU4F4U4BG5BL5"
430 0$="BEHU2ER2FD2GL2BGBL6"
440 P$="BER3U2NU2L3GNFBG2BL4"
450 Q$="BEHU2ERNDNURFD2GL2BGBL6"
460 R$="BEHERNH2R2NU2D2L3BGBL6"
470 S$="BU2FR2EHL2HER2FBG4BL6"
480 T$="BUR2NU4R2BDBL10"
490 U$="BUU3ER2FD3BGBL9"
500 V$="BUU2E2F2D2BGBL9"
510 W$="BUU4F2E2D4BGBL9"
520 X$="BUE2NH2NE2F2BGBL9"
530 Y$="BUE2NU2F2BGBL9"
540 Z$="BUNR4E4L4BG4BDBL2"
550 SP$="BE4BUBG5BL5" • ***SPACER
560 RETURN
580 PRINTTAB(10) "v i s i o n":PR
US, & RED/ GREEN COLOR BLINDNESS.
11 : PRINT" THOUGH AN OPHTHALMOLOGI
ST OR ODSHOULD ALWAYS BE CONSULT
ED, YOURCOCO MAY BE AN INEXPENSI
VE TEST."
590 GOSUB700
600 PRINTTAB (8) "retinal disparit
y" : PRINT: PRINT" WHEN WE FOCUS O
N SOMETHING, WERETAIN THAT IMAGE
EVEN AFTER WE STOP LOOKING AT I
One-Liner Contest Winner . . .
This one-liner prints a small checkerboard on the
Radio Shack DM P- 100, Line Printer VII, Line
Printer VIII and some other Tandy printers.
To print a full-size (8-by-8-inch) checkerboard,
change FOR H=l TO 1 to TO 9 in two places and
FOR J=l TO 7 to TO S0 in four places.
The listing:
1 PRINT#-2 , CHR$ ( 18 ) : FORG=lT04 : FO
RH=1T01 : FORI=lT04 : FORJ=lT07 : PRIN
T#-2,CHR$(12 8) ;:NEXT:FORJ=lT07:P
RINT#-2,CHR$(2 55) ; : NEXTJ , I : PRINT
#-2 : NEXT : FORH=lT01 : FORI=lT04 : FOR
J=1T07:PRINT#-2,CHR$(255) ;:NEXT:
F0RJ=1T07 : PRINT#-2 , CHR$ ( 12 8 ) ; : NE
XTJ, I : PRINT#-2 : NEXTH, G
James Britlain
Liverpool, NY
(For this winning one-liner contest entry, the author has been sent copies
of both The Rainbow Book Of Simulations and its companion Rainbow
Simulations Tape.)
August 1985 THE RAINBOW 231
INT: PRINT" THIS PROGRAM QUICKLY
TESTS FOR: RETINAL DISPARITY, FOC
T . " : PRINT : PRINT " HOWEVER , THAT
IMAGE NOT ONLY REMAINS ON OUR E
YE'S RETINA, BUTTHE COLORS BECOM
E OPPOSITE!";
61j3 GOSUB700: PRINT" OUR FIRST T
EST WILL BE THREE CIRCLES. STA
RE AT THEM. THEY WILL DISAPPEA
R AND REAPPEAR TWO MORE TIMES."
620 PRINT" AFTER EACH DISAPPEAR
ANCE, YOU SHOULD STILL SEE SOMET
HING. IF NOT, THIS MAY INDICATE
A CONCERNFOR AN EYE CHECKUP . " ; :
GOSUB700
630 PRINT" WHILE LOOKING AT THE
SECOND & THIRD CIRCLES, YOU MAY
SEE THE REVERSED IMAGE APPEAR
AT DIFFER-ENT SPOTS AROUND THE C
IRCLE . "
640 PRINT" AFTER VIEWING THE 3
RED & BLUECIRCLES, CLOSE YOUR EY
ES & OPEN THEM, LOOKING AT A WHI
TE WALL."
641 PRINT" TRY THIS TEST 3 TIM
ES IF YOU DON'T DO WELL TO COMPE
NSATE FOR THE RANDOM BACKGROUND
COLORS . " ; : GOSUB700
650 PRINT: PRINT" THIS MAY ALSO 3
NDICATE NEED FORA VISION CHECK I
Y AN OPTOMETRIST" ; : GOSUB700 : PRII
TTAB(8) "color blindness": PRINT
660 PRINT" AFTER THE 3 -CIRCLE TI
ST, YOU ■ LLUNDERGO A SERIES TEST
FOR RED/ GREEN COLORBLINDNESS . "
: PRINT: PRINT" A MULTI-COLORED E
LOCK WILL BE DRAWN AND A COLORE:
CIRCLE DRAWNWITHIN IT . " ; : GOSUB7
00
670 PRINT" YOU SHOULD BE ABLE I
SEE THE CIRCLE AND IDENTIFY TH
E COLORS: GREEN WHITE GREEN BLUE
RED WHITEGREEN BLUE RED";:GOSUE
700
680 PRINT" TO CHANGE THE (HIDDE
N) COLOREDCIRCLE , HIT THE SPACE
BAR.": PRINT: PRINT" A CIRCLE (I
N THE UPPER LEFT) WILL GROW TO
INDICATE THE PRO-
THE TEST CIRCLE."
LUCK!";:GOSUB700
690 RETURN
700 PRINT :PRINTST$: PRINT" >-> H
IT g KEY TO gO ON"
710 I$=INKEY$:IFI$=""THEN710ELSE
CLS : PRINTST$ ; : RETURN /R\
PER COLOR OF
PRINT" GOOE
Forget Those Point Spread Blues!
With Pigskin Predictions!
Toll Free (Orders Only) 800-245-6228
For Information Call 301-547-1447
Tired of wrestling with Sunday point spreads? Let your
Color Computer do it for you! Pigskin Predictions, the
best-selling NFL handicapper, is ready for the 1985 sea-
son. Spend a few minutes typing in scores each week, and
here's what it will do:
■ Menu-driven selection of schedules, ratings, division
races, predictions or results by team or week. Seven differ-
ent reports to screen or printer!
■ Easy once-a-week entry of scores-no complex, mean-
ingless stats.
■ Predicts scores of all games for remainder of season
each week!
■ Calculates projected won-lost records for all weeks.
■ Maintains home field advantage and power ratings for all
teams.
■ 1985 schedule data file included free. Or enter the sched-
ule yourself.
■ 32/64K enhanced version features dazzling Rainbow
Writer Screen display. Seeing is believing! Standard 16K
version included, too.
You'll be amazed at the power of this program. 16/32K
ECB required (32K for disk version). Only $35.95 on tape
or disk. 1985 Data tape or disk for previous owners, just
$13.95.
Federal Hill Software 8134 Scotts Level Rd. Baltimore, Md. 21208
232
THE RAINBOW August 1985
■
iHSSS
fifi!
234
236
246
RAINBOWTECH
Downloads/Dan Downard
Answers to your technical questions
KISSable OS-9/Da/e L. Puckett
Cliffhangers in the micro soaps
MML09/Timothy A. Harris.
The remainder of MAIL09's listings
DOWNLOADS
Printing Through
The Line Feed Patch
By Dan Down
Rainbow Technical Ed
• / spoke with you at RA IN BO Wfest and
you said you had a patch to add a linefeed
to the basic LIST command. I have a 64K
CoCo 2 with Disk basic.
John Enders
Marinette, WI
John, we haven't run this program for
quite a while, so let's hope it's of some use
to the newcomers. It adds a line feed after
every carriage return. It also has some other
features such as setting your Baud rate.
Change 1 80 in Line 230 to your desired Baud
rale. The following version is written for
32K, but will run fine in I6K if you change
lines 100, 150, 190, 200 and 210 to 16K
addresses by subtracting 1 6384 from the 32K
value. Also, in Line 220, change POKE
360,127 toPDKE3G0,S3.
100 CLEAR200, 32743
110 DATA 52 , 21 , 214 , 111 , 193 , 254
120 DflTR 38 , 11 , 129 , 13 , 3B , 7 , 190
130 DATA 160,2,173,3,134,10,53
140 DATA 21,57
150 FOR D=32744 TO 32765
160 READ E:P0KE D,E:NEXT D
190 POKE 327G5, PEEK (359)
200 POKE 32766, PEEK (360)
210 POKE 32767, PEEK (361)
220 P0KE359 , 126 : POKE360 , 127 : PDKE
361,232
(Dan Downard is an electrical engineer
and has been involved in electronics for
25 years through ham radio [K4K WTJ.
His interest in computers began about
six years ago and he has built several
68XX systems.)
230 POKE150.180
240 END
Forwarding Address
• I found THE rain BOH' in a bookstore
in Portsmouth and bought the April and
May issues. In both issues, /found what
seems to be a mistake on the "rainbow
Info" page. In the column on "Using
Machine Language, "if the address is &H7F00
shouldn't l=&H7F80? Then, how do you
execute the program? All it does is hang
up my machine and I lose everything.
I have enjoyed your magazine, especially
the One- Liners. Also, the reviews of the
products and software are excellent. Does
anyone have anything more on the DMP-
105?
John Burns
Chesapeake, VA
You are completely correct, John, in
observing that if you change the CLEAR
command for 32K, you should also change
T, or the starling address of the program.
Since we receive a few questions on this
program, let's explain it to the non-machine
language programmers. First, the program:
10 CLEAR200,S.H3F00:I=&H3F80
20 PRINT"ADDRES5: ";HEX$(I);
30 INPUT"BYTE";B$
40 POKE I,VAL("iH"+B$)
50 I=I+1:GOTO20
Line 10
CLEAR200.&H3F00 tells Extended BASIC
to reserve 200 bytes for string space and
not to let any basic program extend
address &H3F00 in memory. Since i
of memory in a 16K CoCo is &H3FF
command reserves 256 bytes at the
the memory for machine language pro
For a 32K/64K computer you can i
this part of the command to I
200,&H7F00, since &H7FFF is tl
memory location.
At the same time there is ai
statement on the line: I=&H3F80
identifies the beginning address
machine language program. This
should be changed to correspond
lowest address encountered in the as;
listing. If you should change this ac
be sure to change the corresponding
in the CLEAR command.
I would suggest deleting Line 1
adding the following:
10 INPUT-BEGINNING ADDRESS:";?
15 I=VAL("&H"+SS)
This will allow you to pick you
beginning address. It won't protect
program from BASIC, but you shoul'
it before you run a BASIC program an
Lines 20-50
These BASIC commands allow y
input the hexadecimal bytes at each a>
one at a time. After the byte is inpi
address counter T is incremented, an
are ready for the next byte. Keep I
in the Hex bytes until you reach th
of the program.
Just for reference consider the foil
line output from EDTASM+:
7E00 8E 0400 00100 START LDX #$
234
THE RAINBOW Augusl 1985
.his case, 7E00 is the address of the
ling byte of this instruction. 8E.04 and
e the bytes at addresses &H7E00,
;01 and &H7E02 respectively. If this
le first line of the program, you would
mething like this:
Change Line 10 of the program to:
:i_EAR200,&H7DFF: I=&H7E00
JUN the basic program
The following will appear on your
.creen:
\DDRESS: 7E00 BYTE:
r"ou type: 8E (CR)
Vou will see:
\DDRESS:7E0I BYTE:
v ou type: 04 (CR)
o on until you reach the end of the
ig this program
;t hit BREAK and you will be back at
)K prompt. Your machine language
am will still be in memory, then you
save the program. Use the (C)SAVEM
nand in the following way:
iAVEM"name", start addr.end
•, execute addr
>od luck, and I hope this little program
nterest you novice ML programmers.
:h where your programs are located,
program will not work for loading
in ML programs located below address
E00 due to conflicts with basic. As
as the programs are in upper memory
ihouldn't have any problems.
New, Improved Step Rates
Now Faster Than Ever!
Viil Caylon of Texas City, Texas, wrote
e May 1985 issue how to speed up the
rate of your disk drives. Just to add
s lip, it is possible to shorten the delay
after the controller turns on the motors
waits for them to come up to speed.
e DSKCON subroutine calls a delay
twice before trying to read or write
■e disk. This program just eliminates
of the calls to the delay routine by
ng no operation codes where the first
> routine is called. First, get into the
AM mode with the corrected version
? ROM RAM program (WEADA. instead
f\DftS)from the same May "Downloads"
Tin. Mr. Clayton's step rate line and
of the following lines can be added to
•rogram for one quick fix. You can also
another program from the Super-
A R A M program by adding another line
RUN "MYPROG-'BAS"
educe the wait time on motor start up
DOS 1.0:
X=54937 TO 54339: POKE X,1B:
TX
For DOS 1.1:
FOR X=551B0 TO 551B2:P0KE X,1B:
NEXT X
Both the step rate increase and the
shortened wait time can be added to
programs that use the all- RAM mode on
their own if they have a BASIC loader that
executes the RAM mode. Telewriter-64 in
particular benefits if you create a new line
in the program U/BAS. Make the new
line number 205 and include the step rate
and motor wait all on that line. This will
make the fixes after it is in the all- RAM
mode, before the BASIC loader executes the
machine language program. There is a
definite improvement.
Jerome P. Cigna
Rochester, NY
Between you and Phil, we'll have the
fastest CoCo disk drives in town, Jerome.
Thanks again and keep those tips coming.
You are correct about the ROM RAM
program in the May column. Let's see if
we can get it right this lime.
10 'ROMRAM 8--85 RAINBOW
20 CLEAR 999
30 DATA 26,80,190, 128,0,183,255,
222,166,128
40 DATA 183,255,223,167, 31,140,224,
0,37,241,57
50 FOR I=1T021:READA:A$=A$+CHR$(A)
:NEXT I
60 P=VARPTR(A$)+1
70 POKE P,126
80 EXEC P
90 PRINT "BASIC IS NOW IN RAM"
Split-second Question
• The following is an open letter to the
readership sparked by the May issue.
"Downloads" had a "how to" donated by
Phil Cayton: P0KE;>?g to speed disk track
to track access time to six milliseconds,
however, it was for a 64 K machine. Does
anyone know what to POKE for the same
result on a 32 K or less machine? I know
it can be done since Peter Stark's Spell N'
Fix II does it.
James H. DeStafeno
Swedesboro, NJ
The only reason it can be done with Spell
N' Fix II, Jim, is that this program has a
separate DOS on the disk. The constants
for track to track access time are in the Disk
basic ROM and cannot be changed unless
you are in the all-RAM mode.
Keyboard to Joystick Conversion
• / was wondering if it would be possible
to alter programs in order to use the joystick
instead of the arrow keys?
AlfC. Dale
Seaforth, Ontario
Alf, you did not mention any specific
program, so we will deal in generalities. The
ASCII codes for the arrow key on the CoCo
are:
Up-arrow 94 $5E
Down-arrow 10 $0A
Left-arrow 8 $08
Right-arrow 9 $09
A BASIC program to detect the right-
arrow would look something like:
100 AS=INKEVS
110 IF AS=CHR$(9) THEN GOTO . . .
To give you an understanding of the
JOYSTK function, run the following program
from the Getting Started with Color BASIC
manual:
10 CLS
20 PRINT@0, JOY5TK(0) ; 'Right-Horiz
30 PRINT@5, JOYSTK(l) ; 'Right-Vert
40 PRINT@10, J0YSTI<(2) ; 'Lef t-Horiz
50 PRINT@15, J0YSTK(3) ; 'Lef t-Vert
60 GOTO 20
Assuming you are using the right joystick,
the equivalent program for detecting a right
movement of the joystick instead of the
right-arrow would be:
100 A=JOYSTI<(0)
110 IF A>31.5 THEN GOTO . . .
The only problem with this procedure is
detecting when the joystick is centered, since
JOYSTK returns an integer. In the above
example, change 31.5 to 35 and this should
give you a little play in the center.
Making IBM Work for CoCo
• / have been the proud owner of my
CoCo for about two years. Since I must
use the IBM PC at school, nowadays I read
a lot about changing the Radio Shack DOS
("Cooking with CoCo" by Colin J.
Stearman).
I have been wondering if it is possible
to read ASCII files made with an IBM PC
and create ASCII files that can be read by
the IBM PC so it will be possible to create
files with WordStar at school, then finish
these files at home on my own CoCo with
Telewriter. / have tried it with the Dutch
basicode, but it is a very complicated way
to solve this problem.
Jorgen le Giffel
Haarlem, the Netherlands
Jorgen, we are aware of at least one
program that will transfer ASCII files from
an IBM PC formatted disk to a CoCo
formatted disk. It is available from Mark
Data Products. See their ad in this issue
(check the "Advertisers Index" on Page 256
for the page number) and write for a catalog.
eTS
August 1985 THE RAINBOW 235
ffl
OS
KISSable OS-9
Cliffhangers In
The Micro Soaps
By Dale L. Pud
Rainbow Contributing Ed:
Reporting news from the microcomputer software
community is a lot like watching prime time
television soaps. On Knots Landing, Val saw her
babies. But, will she get them? On Dallas, Bobby died.
How will Ewing Oil survive? And on Dynasty, half the
cast was killed by terrorists in an obscure nation named
Mondavia — but, which half?
Come to think of it, Des Moines and Fort Worth are
a lot like Mondavia. The cities may not be obscure, but
the people there sure like cliffhangers.
"We're working on several interesting projects," said
Andy Ball, a marketing representative at Microware
Systems Corporation, the Des Moines company that gave
birth to OS-9 and licensed it to hundreds of original
equipment manufacturers. "We have negotiated some very
interesting deals with some large vendors. I think you'll
see some very interesting products from Microware and
from the OEMs."
What are these "projects"? Unfortunately, we'll have to
wait until later this fall to find out — just like on the
soaps. However, Ball did offer a few hints.
"Take a look at what is happening to UNIX and you'll
find a big hole opening up in the 68000 market," Ball said.
"I just returned from a 16 day visit with several major
(Dale L. Puckett is a free-lance writer and programmer
who has worked with the Motorola family of
microprocessors since 1976. He is the author of The
Official BASIC09 Tour Guide, published by Micro-
ware and The Official Rainbow Guide to OS-9,
published through the Rainbow Bookshelf. He serves
on the Info World Software Review Board and is a
chief warrant officer in the U.S. Coast Guard.)
European distributors and the OS-9 68K market the
far more mature than in the states. The same is tri
Japan. We have licensed hundreds of thousands of coj
Why all the interest in OS-9 68 K? Ball had a few ans'
"You can now have a BASIC09 workspace nearl
megabytes long. And, real data is stored in eight
instead of five. In fact, both real and integer numbers
a much greater range," Ball said. "Because of the 1;
workspace you can build a lot of valid tools with
BASIC09. You can also handle bigger jobs because yoi
work with more data in memory."
Does all this hoopla about OS-9 68K mean the
and the Color Computer will go the way of CP/M?
"Definitely not! We are very much locked into the 6!
Ball said. "We have a large investment in the 6809
9 and so do our customers. Because of this we are g
to continue to support it and are working on several
products. For example, our full FORTRAN compiler sh
be released very soon."
Most of you have probably already read about a
of the enhancements built into OS-9 68K. You've proh
also wondered if you will ever see them in the C
Computer version of OS-9.
"It is our general policy to move technology from
processor to another when possible," Ball said. "This |
our customers a more unified environment when
upgrade to a new chip. It helps us make the difft
versions of our operating system look the same to the
user. Unfortunately, the 64K addressing range avail
on the 6809 means we cannot make our utilities as
as we would like to and this reality is tying our h.
somewhat."
Ball told us that Microware, which made a big n
for itself by designing and writing software for dedic
236
THE RAINBOW August 1985
process control systems, was starting to make a big splash
in the personal computer marketplace. He predicted they
would establish an even bigger beachhead in the war for
personal computer supremacy within the next year or two.
"We have made a big splash in the personal computer
industry in Japan. And, OS-9 is still popular at Tandy,"
Ball said. This statement prompted me to ask the "64 K
question." If OS-9 has been so popular in Japan, why
haven't these companies moved it into the U.S. market?
Like any good PR man, Ball had the answer.
"OS-9-based machines are so much in demand in Japan
that they have had to convert factories to keep up with
the two-month backlog," he said. "They can't even think
about selling machines here until they catch up at home."
New Trends Appearing
We noticed several trends emerging in both hardware
and software at RAINBOWfest Chicago. In hardware
everything is pointing toward hard disk systems that deliver
several million bytes of storage at an affordable price. Since
OS-9 is a disk intensive operating system, this is a real
blessing.
To find out about these trends we interviewed several
industry leaders. The first to sit down across from our
trusty TRS-80 Model 100 was Steve Odneal of P.R.O.
Systems, 10601 West 63rd Street, Shawnee, KS 66203 (913-
631-0665). Steve made a name for himself by being one
of the first programmers to move FLEX, Technical Systems
Company's operating system, to the Color Computer. Now,
he has designed the hardware and written the software
for the 10-meg hard disk P.R.O. Systems was demonstrating
in Chicago.
"It's a full implementation of a hard disk for the Color
Computer," Odneal said. "This means the software treats
the hard disk as a full-size hard disk. It also means that
with OS-9 you can format the entire 10 megabyte drive
and wind up with almost 40,000 free sectors. The hard
disk controller that comes with the unit also supports up
to four additional floppy disk drives, either five- or eight-
inch.
"We supply the complete package — everything you
need," Odneal added. "OS-9 made the job easy because
it let us install our hard disk system by simply adding
a new device driver and device descriptor. In plain English,
the device driver contains the software that actually
communicates with the hard disk. The device descriptor
tells OS-9 what our drive looks like. The device descriptor
also let us reserve part of the hard disk for Radio Shack
DOS programs and another part for FLEX programs."
Using a hard disk with OS-9 really speeds up your work.
Steve made his point by loading BASIC09. It took his Color
Computer seven seconds to load the program's 22K of code
from a floppy. The P.R.O. Systems hard disk loaded it
in two seconds.
"Overall, the hard disk is about two and a half times
faster than a floppy disk," Steve said. "But, it seems even
faster when you are using OS-9 because OS-9 needs to
access its directories continuously every time it reads or
writes a file."
Odneal was selling the new slim-line hard disk at a special
price of $995 during RAINBOWfest. On the market he
expects it to sell for $1,295 to $1,495 — depending on
the dealer.
The P.R.O. disk system features a heavy-duty cast
power supply. Odneal learned how heavy-duty whei
drive he brought to RAINBOWfest was thrown 12
by a baggage attendant at O'Hare Airport. "We were a
it wouldn't work at all after watching it hit the deck
it worked flawlessly at the show," he said.
P.R.O. supplies all the software you need to install
run its hard disk — drivers for Radio Shack DOS, F
and OS-9 and a program that automatically confij
the drive. They also give you a handful of wild card uti
that make it easy to copy and delete files, and per
other routine file maintenance chores.
To boot OS-9 or FLEX, you simply run a Radio S
Disk Extended basic program and type 'o' for OS-'
T for FLEX when prompted. Odneal noted that his
version of the software will let you boot OS-9 directl
the hard disk. He said it would be available by the
you read this column.
But Odneal was displaying only one of the three
disks we saw at the show. Brian Lantz stayed
throughout the weekend demonstrating his handiwoi
the J & M Systems booth (15100-A Central
Albuquerque, NM 87123, 505-292-4182). He was espec
proud of the fact that his drivers for the new J & M
megabyte full-size hard disk system give full use of
9's fantastic type-ahead feature. J & M's system feat
a full-size five megabyte hard drive and an attractive p
Meanwhile, up in the Users Group hospitality s
Martin Nelsen of a new start-up company na
Interactive Task Management System, 230 East 1
Street, West Chicago, IL 60185 (312-293-0549) — IT
Inc. for short — was showing off his new Hard C
subsystem for the Color Computer. The ITMS drive
also a full-size five megabyte model and comes with a
and power supply. Its controller card can support
additional disk drives. A patch for the Radio Shack ver
of the OS-9 C Compiler lets you install C on the di
The list price for this unit is $599.95; they were sel
it at RAINBOWfest for $529.95.
DynaCalc for OS-9 Available
We received some good news shortly after we ent<
the exhibit hall at RAINBOWfest Friday evening.
Turner of Computer Systems Center in St. Louis,
publisher of Dynamite and many other programs for
Color Computer, pulled me aside and waved a bright gi
box in the air. Bold white letters in a classy sans <
typeface screamed "Tandy" from the side of the b
DynaCalc for OS-9 had finally arrived at local Radio Sh
stores around the nation.
Turner couldn't wait to show me DynaCalc runr
under OS-9 68K on his QT from FHL. There were
more features than we can detail here, but among oi
things, the version we saw would let you use more t
17,000 rows or columns. And, it was lightning quick. A
(he demonstration, we made Joe promise to reserve a
minutes to discuss OS-9 with us before the weekend
over. He went one better and showed up for the interv
Sunday with Scott Schaeferle, the programmer who ma
DynaCalc tick.
We led the interview with another 64K question: A
software developer, what do you think gives you
advantage?
238
THE RAINBOW August 1985
Incredible!
Terminal nol Included.
lulti-User!
ik Hogg Laboratory announces their
id Terminal (QT) series of multi-user computer
ems, designed to run Microwares new
9/68000 operating system. The QT offers 32 bit
lessor power in a compact integrated package
requires only a terminal to operate.
i QT hardware features: 68008 processor running
I Mhz, 128K bytes expandable to 512K bytes,
interval timer for time sharing, 4 serial ports
i selectable baud rates from 300 to 19,200, 2
itronics compatible parallel printer ports. Sup-
ts 2 double sided double density 96 tpi floppy
< drives and a SCSI (SASI) bus interface for
ichester disk drives. The QT is available as a
gle floppy (1), a dual floppy (2) or as a single
>py and a 10 or 20 megabyte hard disk (HD).
i 5 1/2 high, 11 1/2 deep, 9 1/2 wide. Can be
unted vertically or horizontally.
oftware Included!
FTWARE included is OS-9/68000, the 68000
sion of the proven OS-9 operating System that
noth disk and file compatible with standard and
lor computer versions of OS-9. Basic09 is the
)00 version and is source compatible with the
)9 version. DynaCalc is the 68000 version of the
iven 6809 spreadsheet. Stylograph is the 68000
sion of the popular 6809 word processor. Mail
rge and speller are the 68000 versions of those
igrams. Programming tools included are a
ocating macro assembler with linkage editor,
een and line editors, and an interactive
augger. The software has a retail value in excess
$2000 and is INCLUDED free! Programming
iguages available and under development
:lude C, Pascal, Fortran and Sculptor.
A Hellava Deal!
The QT is available in four basic configurations.
Other configurations are possible and are
available. Call for price.
QT1
128K, single 96tpi double sided floppy and
all software $1595.00
QT2
same as 1 but with 2 floppys $1750.00
QTHD
same as 1 but add a 10 meg hard disk $2695.00
QT HDXL
same as HD but with 512K $2695.00 Special Offer ^
Reg. $2995.00
512K expansion kit (16 256K DRAMS) $150.00
Replace the 10 meg with a 20 meg Add $300
Note: The QT can hold 2 half height drives internal-
ly (floppy or hard). Provision has been made for
hooking up external floppy drives. This allows us-
ing large capacity full height hard disk drives in the
QT case with floppy drives in another case. You
can boot from the hard disk so floppys would only
be necessary for program transfers and backup.
Removable hard drives are also available. Call or
write for complete specifications and prices.
FRANK
HOGG
770 James St., Syracuse, New York 13203
315/474-7856
HL
Hardware Library
I can see clearly
now. Can you?
: rom GE by special purchase
ve oiler the best buy in the
Sold Star Super AMBER
nonilor. Now you can see
ilearly too. Match up with the
Jniversal Video Driver and/or
A/ordPak II and you can't
teat
It!
'his is a 12 inch composite
nonitor with 19mz bandwidth!
/ery attractive oil white
:abinet that matches the
:oCo well. Compare this to
)ther AMBER monitors that
:ost $20-330 more! This is a
SUPER buy!
SPECIAL sqq g5
ONLY 599-93
We looked at all the Video
adaptors available and the
UVD is by far the best buy.
Works with B&W and Color
monitors and with all CoCos,
even the new CoCo II. No
soldering or chip removal,
easy installation. Perfect with
our AMBER monitor and
WordPak II.
Only S29.95
Word-Pak II
The New Standard
Video Board
Get an 80 column display with
your CoCo. Makes the CoCo
easy to use with word
processors like DynaStar and
Stylo. Works with many RS
DOS programs too. Acclaimed
by all as the best for the
CoCo. Works GREAT with our
AMBER monitor from GE.
Smooth scrolling and an
improved character set, the
WP II works with FLEX. XEX,
and RS OS9 and RS Basic.
ONLY $134.95
OS-9 or FLEX drivers
S17.95
P-C Pak w/printer port
clock $99.95
OS-9 driver for P-C Pak
$17.95
and
NOMAD
The Color Computer Robot
NOMAD is controlled by your Basic programs
running on your CoCo. Requires 16K Basic. NOMAD
can be told to move forward, backward, turn left or
right. NOMAD can see with an ultrasonic sensor
and report distances accurate to 2 tenths of an
inch. Program NOMAD for collision avoidance or lo
protect your house from intruders. Includes
everything, power supply, software on tape and
NOMAD with 25' cord.
Move into the future today with
your own Robot.
ONLY $250
DISK DRIVES AND SYSTEMS
FREE FLEX WITH SYSTEMS
Includes drive(s). dual case with power supply.
cables and disk controller. Drives are 1/2 height
double sided Teac with a 1 year guarantee. Case
will hold Iwo drives. CC FLEX, a S49.95 value is
FREE with all systems!!! Best price anywhere!!
Drive double sided 40 $339.00 and 1 double sided 40 $465.00
Drive double sided 80 $350.00 and 1 double sided 80 $487.00
BARE DRIVES
Double sided 40 track $130.00 Double sided 80 track $145.00
Dual case w/power supply $79.95 NEW J&M controller $1 49.95
RS DISK BASIC ROM 1.1 $15.00 Two drive cable $25.00
Filler plate $6.00 Call for custom cables
BOOKS
NEW Complete Rainbow Guide
to OS-9 $18.95
Basic09 Tour Guide $18.95
Starting FORTH $18.95
Official OS9 Manual set $40.00
RMA Manual S25 (Use the
relocating assembler that you get
with Tandy's 'C')
FM
BULK DISKS
as low as $1.29
10 lor $1.50 each
50 for $1.40 each
100 for $1.29 each
FRANK
HOCC
LABORATORY
770 James St., Syracuse, New York 13203
ORDERING INFORMATION:
In USA Add S3. 50 (small items) S10.00 (large items) excess refunded.
All Others Add 10% Excess Refunded.
Visa, MasterCard Accepted
315/474-7856
"One of the biggest things OS-9 has to offer is its
standardization of input and output," Turner said. "Just
look at some of the programs that run under Radio Shack
DOS. They are all surrounded with controversy about the
Color Computer ROM call tables. This controversy just
doesn't exist when you use OS-9.
"Besides, OS-9 has saved us a lot of time . . . and time
is money," Turner said. "Indirectly, it has also saved our
customers a lot of money, too — for the same reason.
Additionally, OS-9 lets us write a piece of code once. When
we get it right the first time it saves everyone a lot of
confusion later on."
Turner then gave us an example of OS-9 efficiency.
"We use the OS-9 "get status" system calls rather than
hard code to find the screen size for DynaCalc," he said.
"One call returns both the number of columns and the
number of rows on the screen. Once DynaCalc has this
information, it automatically sizes itself to fit this screen."
Turner told us that OS-9 also made it much easier for
DynaCalc to support the many different printers on the
market. "DynaCalc simply sends its printer output to the
standard printer output device (/p) and works with any
printer that uses this device.
"The same goes for disk drives. OS-9 DynaCalc can store
files on any disk drive connected to your computer.
Contrast this with the Disk BASIC version of DynaCalc
which only works with standard hardware like Radio Shack
or J & M. We really don't have to worry about any of
the low level details when we program with OS-9; we just
read from and write to OS-9's standard input/ output
paths," Turner said.
Turner brought DynaCalc author Scott Schaeferle along
for the interview and asked him what he liked about OS-
9.
"I like the flexibility of its memory management and
the way it loads and links modules," he said. "This came
in very handy and made it easy for us to install "/sx,"
the system execute command which lets you run another
OS-9 program without quitting DynaCalc. All we had to
do was make a system call to OS-9 that puts DynaCalc
to sleep while the other program is running. When the
other program is through, the Shell wakes up DynaCalc
and you can go back to your spreadsheet work."
Schaeferle, like everyone else we talked to at RAIN-
BOWfest, was impressed with OS-9 68K. He likes the wild
card matching, the alphabetized directories and the RAM
disk that comes as a standard part of the system. He said
he was especially impressed with the 68K Copy utility,
which like most of the 68K utilities, uses the wild card
feature built into the new Shell.
Rosen Premiers OS-9 Solution
Bob Rosen of Spectrum Projects, 93-15 86th Drive, P.
O. Box 21272, Woodhaven, NY 1 1421, took time out from
his busy schedule at RAINBOWfest to talk with us about
several of the new products he is aiming at the OS-9 market.
He was beaming about the release of his OS-9 Solution,
a program he feels is a major breakthrough for novice
OS-9 users.
"I get letters. I talk to Radio Shack sales managers. And,
the calls pour into my company. The average guy who
has bought a 64K Color Computer eventually buys OS-
9. Then he gets frustrated and puts it back in the box,"
Rosen said. "I think a front-end program like tr
9 Solution is the absolute answer to an OS-9 beg
prayers. I think Tandy should pick it up.
"I hope that people who do buy the OS-9 Solutioi
Barry Thompson, Tandy's Color Computer pi
manager, and tell him what they get from the pro/
he said.
Rosen also expressed concern that the lack of i;
shown in innovative programs would cause software
like Jeff Francis of MegaSoft, who designed and
Rosen's OS-9 Solution, to lose interest in writing pro
for the Color Computer. "I'm afraid he'll look else
— like Atari or Amiga.
"I still believe OS-9 has a very good future and v
make every effort to support it at Spectrum," Rosen
Rosen had just finished teaming up RAINBOW';
Downard and Brian Lantz to write OS-9 RAM disk c
for his new ThunderRam, a 256K upgrade for the
Computer. He believes a RAM disk like this will
the OS-9 Solution even more popular.
"You can use the extra RAM memory as a print s]
to hold 30 Hi-Res screens, or to run four 32K pro,
in the four different banks at the same time."
A Closer Look at 'the Solution'
So, just what is this OS-9 Solution Bob Rosen is pi
so hard? Essentially, it is a single program that let
run any one of 19 individual OS-9 commands with a
keystroke. It stays in your standard execution dire
/dO/CMDS.
The exciting point, however, is that you almost
need to type a filename or one of those super lonj
9 pathlists. With the OS-9 Solution you use the up
down-arrow keys to point to the file you want to
with, then type a single key to tell OS-9 to carry ou
of 19 different actions. It sells for $39.95.
The Solution runs on vanilla Color Computer OS
Version 1.01 — as well as Hi- Res from FHL and the ^
Pak from PBJ. The only catch is that your screen d
must use the standard Radio Shack OS-9 cursor cc
sequence. Of course, you could always write a pi]
translate Radio Shack cursor control sequences inl
XYZ cursor control sequence.
Eight of the utilities can also work on multiple
Utilities built into the Solution that are not availat
the standard issue Color Computer OS-9 CMDS dire
include:
Alphabetize Directory
GoTo a new Director
Help screens
Information about a file
Jumble order of filenames
Set Directories
1 believe the Solution could be very handy for ses;
where you are performing a lot of file maintenanc<
this assignment it will save you a lot of keystrokes.
However, this program is not for all jobs. It is too
to leave in memory all the time with Level I OS-9.
example, you can't run BASIC09 from it. Both progi
will not fit in memory.
OS-9 Level II — if it ever comes to the Color Comp
— will be a whole new ball game and most everyone
240
THE RAINBOW August 1985
HL
Software Library
DynaStar
Screen editor/
rord processor
claimed by professionals
their favorite editor/word
Dcessor. Simple and easy
use but powerful.
Itemed after Word Star T '-'
ise it ALL the time!
>OS9or Flex $49.95
DynaForm
(NEW OS9 VERSION)
| Formatter for DynaStar |
This new version has
features galore. Everything
you asked for in the past.
Format output from
DynaStar for manuals,
letters, anything!
RSOS9or Flex $49.95
DynaSpell
On the BEST
SELLER list!!!
The Mac version of
DynaSpell (Hayden Speller)
is on the best seller list for
good reasons. DynaSpell is
the BEST!!
CoCo OS9 or Flex $59.95 \
Lookup for $3 4# 95
CoCoOS9 *"'»' I »«*
O-Pak
#1 OS9 Utility!
If you have OS9 then you
need O-Pak. The first and
best Hi Res screen display
for OS9. You select the type
of screen and font you want
to display. Includes a
Character set editor and
copy utilities for Flex/OS9/
RS DOS file transfers.
Best Buy! only $34.95
XEX
IEW version of
= lex for CoCo
/on want the best
orating system for your
K CoCo then XEX is it!
sy to use and understand,
;X includes most of the
urce. Includes Ed/Asm
d DBasic. Order TODAY!
99.95 for everything.
DynaCalc
All we can say is that this IS
THE BEST spreadsheet!
Available for RS DOS, RS
OS9(soon) and FLEX
RS DOS & RS OS9 $99.95
Flex $200.00
.Disk & Bootfix UniCharger for 0S9
place the disk driver
)dule in 0S9 with one that
irks with ALL types of
ives. 35, 40 or 80 track SS
DS. Even reads and writes
standard OS9 disks,
dividual stepping rates to
ns. Bootfix is needed for
! drives.
$29.95
35.95 with Bootfix.
Cross
Assemblers
rue (not macro) cross-
ssemblers will let you
evelop programs on your
lex or OS9 system for the
802/5, 6800/01/11/03, 6804,
805, 6809, 6502/3, 8080/5,
048, 8051, Z-80, and 68000.
ource included (in C)
>200 for everything!
Make Unix"'' out of OS9!
29 additional commands
that make OS9 look like its
big brother Unix. Have the
power and ease of use that
is only available on $10,000
systems. The most powerful
package for OS9 yet
available! Featured in 'The
Rainbow guide to OS9'.
Only $150.00
Dyna C
Fast small C
Unlike the others, Dyna C
produces compact,
ROMable, position-
independant, re-entrant
optimized code that runs
circles around anything else
in its price class. 'C for
yourself! Run time source is
included!
$59.95 FlexorOS9
CModem
Telecommunications
Menu driven terminal
program that supports dumb
terminal mode to 2400 baud.
Upload and download in
non-protected mode, and
Christensen (CP/M Modem7)
mode. All disks have both
CoCo and standard versions.
OS9orFLEX. $ 50 binary
$ 1 OO with source.
Utilix
Unix like utilities
15 utilities to manipulate
text files. A MUST for
programmers and general
users alike, cat, code, crypt.
dilf, display, grep, lower,
upper, pack, unpack, pr, sort,
tail, time and wc. Featured
in 'The Rainbow guide to
OS9'.
only $49.95
DynaSoft Pascal
Small p-code Pascal
Learn Pascal with this fast
p-code implementation. It
produces ROMable p-code
that is very compact!
$59.95
S89.95 w/run time source.
OS9 Utilities
Filter #1, 12 utilities for OS9
LS, BUF. CP, DL, FLIST,
INFO, MV, PAG, SELL,
SETAT, SECAT, and SORT.
Filter U2, 10 Utilities,
APPEND, CONFIRM, FF,
FORCERROR, MACGEN,
NULLDEVICE, REP, SIZE,
TOUCH and UNLOAD
$29.95 each
eFORTH
Powerful FORTH
Move up to power pro-
gram ing with eFORTH, the
best FORTH available.
Complete system with easy
to understand manual.
Available for CC FLEX or RS
DOS.
FLEX or RS DOS $79.95
Sleuth disassembler
Find out what's going on
inside your computer with
SLEUTH, the best
disassembler for the 6809.
Converts binary code into
source that you can modify
or just examine. Learn about
programming by studying
other code! RS D0S 549
FLEXorOS9 $50
Source available, OS9 or
Flex for S50.00 extra.
FRANK
HOQG
770 James St., Syracuse, New York 13203
ORDERING INFORMATION: In USA Add S3.50
All Others Add 10% Excess Refunded.
Visa, MasterCard Accepted
315/474-7856
probably want to boot up into the OS-9 Solution. Also,
to build pipelines and exercise OS-9's multitasking
capabilities, you'll need to use the Solution's Z command
to escape to the OS-9 Shell.
Overall, this program should make OS-9 a whole lot
less scary to the beginner. It may even ease some of the
pain of routine file maintenance tasks for the experienced
user.
Put the Mouse to Work
You can't do it just yet, but very soon now you may
see a mouse-based editor that runs on Color Computer
OS-9. Michael L. Bailey of Cameron, Mo., distributed a
few test copies of a full-screen editor named TED and
a companion text processor for Color Computer OS-9 at
RAINBOWfest-Chicago.
To run it, you need a 64K Color Computer with at least
one disk drive and the OS-9 operating system. The Color
Computer mouse from Radio Shack or a joystick is
optional.
I test drove Mike's editor using a joystick and was so
impressed 1 almost ran out to Radio Shack and bought
a mouse. The presentation is not as pretty as the high
density bit mapped Apple Macintosh MacWrite program,
but the pull-down menus work the same way. The program
was a breeze to use and got me excited about OS-9's future.
Bailey hasn't sold the program to a distributor yet, but
I'm betting he will. He is literally on to something very
big. Why? Follow the easy steps you use to move a block
of text.
Move the cursor into the menu bar and push the mouse
button to pull down the "block" menu. Then, move the
cursor down with the mouse to the word "BlockKopy."
You'll know you're in the right place because TED will
highlight the word to which you are pointing. Now, push
the mouse button again; TED will tell you you have gone
into the BlockKopy mode at the top of the screen.
Now all you need to do is use the mouse to point the
cursor at the beginning of the block of text you want to
move and push the button. "Mouse" the cursor to the end
of the block and push the button again — the selected
text disappears. Next, pull down the block menu again
and select the BlockPaste command, then place the cursor
where you want the text and push the button on the mouse.
The text magically appears in the new location.
The whole process is completely intuitive. After a few
minutes with the mouse you don't even think about what
you're doing. You just do it. In fact, it is much harder
to describe than it is to do.
There are a few little problem areas in the test version
wc played with but I'm sure they'll be removed before the
program is distributed. For example, Bailey needs to add
word wrap ability to the program. It irritates me to no
end to see a word split in the middle at the end of a line.
And, when you use the arrow keys, life would be easier
if TED would let you hold down the key to auto repeat.
Operation with the joystick was a little erratic — a
hardware problem that Bailey warned us about — but it
sure gave us a feel for how this editor is going to work.
And, Bailey is already thinking about supplying a driver
that would let you use the mouse with the special high
precision hardware input device that comes with CoCo
Max — the Color Computer version of Mac Paint.
Yet Another Utility Package
A month or two ago we mentioned that we didn't
whether or not Saturn Electronics Company was still s
their OS-9 bulletin board system. We received the ai
recently — in the form of program manuals — from
Dionysiou at Saturn.
Saturn — also doing business as DSS Peripl
Corporation, 62 Commerce Drive, Farmingdale, NY 1
516-249-3388 — is selling 22 OS-9 utility programs
package named Utilipak for $99. Most of the I
standards like grep, mv and tr are in the package,
there's even an alarm clock.
The name of Saturn's OS-9 Bulletin Board Systt
"Co9." To run it you need a 64K Color Computer,
disk drives, OS-9 and BASIC09. Co9 was written in BA
and has 1 1 commands.
Questions, Answers, Tips and a Few Listings
Our first tip for the month was contributed by P. Do
Van Dusen, a U.S. Air Force Tech Sergeant at Hoik
AFB in New Mexico. He wrote a short BASIC09 proce
to emulate the PRINTS command in Radio Shack Exte
Color BASIC. It's named prnt.
When you run prnt you pass two integer param
— the column and the row where you want the ci
to go. For example, to move the cursor to the top
hand corner of the screen, you would use a calling sequ
like this.
DIM column, row: INTEGER
column :=
row := J?
RUN prnt (column, row)
The utility will work with Hi-Res in FHL's O-Pak
with PBJ's Word-Pak when it is running in the Radio SI
compatible mode. It may also run with other OS-9 sc
drivers. The only requirement is that the screen uses
standard Radio Shack OS-9 cursor control characters.
Tom Wong of Oakland, Calif, wrote to ask hov
initialize OS-9's Color Computer graphics mode
control the cursor from within an assembly langi
program. Let's start with the cursor control problem s
we just showed you how to do it with BASIC09.
To control the OS-9 cursor you need to send a th
character sequence to the screen. The first character
send must have a binary value of two. This means
binary or 0000 00 10 and not two in ASCII, which is actu
32 or 0011 0010 in binary.
When the OS-9 screen driver receives a '2', it kn
that you are trying to tell it to reposition the cursor. Furt
it expects you to follow the '2' with two additic
characters. The first character is computed by adding
decimal —that's 20 Hex — to your desired column numi
The second character must contain the sum of the desi
row number and 32 decimal. In BASIC09, Van Dusen
it with this statement:
PRINT CHR$(2); CHR$(column+32) ; CHR$( row+32)
242
THE RAINBOW August 1985
nee the BASIC09 PRINT statement sends its output to
)'s standard output path and since the standard output
is normally sent to the screen if it hasn't been
ected, the BASIC09 statement above simply sends out
: characters to the screen — a binary two, followed
le column number and row number plus 32 — exactly
t the OS-9 screen driver needs to know.
3 do the same thing in assembly language you will
t to use the OS-9 ISWRITE system call. When you
e this call, you must pass three parameters in the 6809
•ters. Register X must contain the starting address of
data you want to send. Register Y must contain the
ber of bytes of data you want to send. And, Register
lust contain the number of the path that you want
■ceive your data.
rst reserve three bytes of memory where you are going
ace the cursor control string. Something like this should
tie job.
Now that the data is initialized, you must initialize the
registers and send the data to the screen.
thNo feb 1
*** Standard output
EFIX feb 2
*** the screen driver prefix character
1 rmb 1
w rmb 1
sCol rmb 1
sRow rmb 1
ien initialize your data. For example, to move the
or to the top left-hand corner of the screen try this:
Lda #0
adda #32
sta col
Lda #0
adda #32
sta row
i a real program you would probably want to use two
itional variables containing the desired column location
row to create a universal subroutine. For example:
Ida DesCol
adda #32
sta Col
Ida DesRow
adda #32
sta Row
leax PREFIX, u *** put addr of Prefix in X-register
ldy #3
*** we want to send three bytes
Ida PathNo
*** Get the path number in A-register
OS9 I$WRITE
*** Now make the call
bes error
*** handle error if carry bit is set
*** else go on about your business
In a nutshell, that's how to position the cursor in assembly
language. In a real program you would most likely put
several of the sequences above into subroutines and then
call them when you need them. For example:
bsr getpos *** initialize cursor data
bsr setpos *** actually send data to set position
. . . *"''* continue your application program
To tell OS-9 you want to go into the graphics mode,
you need to send the character 15 decimal and two
additional characters to the standard output path. (This
means you could also use the routines above to do the
job.) Except this time you will need to store the value
of your desired graphics mode in the "DesCol" variable
and store the value of the color set you want in the
"DesRow" variable. The value you need for these codes
can be found in the tables on Page 128 of the OS-9
Commands manual (the red one).
H. Bruce Phillips of Bolingbrook, 111. contributed a nifty
BASIC09 program that will give you a formatted listing of
a BASIC09 procedure without the line numbers. To do the
job, it reads a file that contains a listing produced by the
standard BAS1C09 LIST command.
Tom Fields helped with the procedure which is set up
to work with an Epson MX-80 printer. Use the following
steps, however, before you run it, make sure you have
previously saved the procedures you are listing.
1) LIST the program to a temporary file named "temp"
2) KILL*
3) LOAD prfile
4) RUN prfile
The final listing comes from Steve Roberson of Chandler,
Ariz, who works for Motorola Microsystems and does most
of his development on the EXORset. His contribution is
a procedure he uses in a BASIC09 bulletin board system
on his Color Computer. It loads the filenames from a
directory into an array. This gives him the ability to list
downloads and search a user's directory for mail.
OS-9 SOFTWARE
SDISK— Standard disk driver module allows the use of
35, 40, or 80 track double sided drives with COCO OS-9
plus you can read/write/format the OS-9 formats used
by other OS-9 systems. $29.95
SDISK + BOOTFIX— As above plus boot directly from a
double sided diskette $35.95
FILTER KIT #1 — Eleven OS-9 utilities for "wild card"
directory lists, copies, moves, deletes, sorts, etc. Now
includes disk sector edit utility also. $29.95
FILTER KIT #2— Macgen command macro generator
builds new commands by combining old ones with
parameter substitution, 10 other utilities. $29.95
HACKER'S KIT #1 — Disassembler and related utilities
allow disassembly from memory, file. $24.95
PC-XFER UTILITIES —Utilities to read/write and format
MS-DOS™ diskettes on CoCo under OS-9. Also transfer
files between RS disk basic and OS-9 (requires SDISK).
$45.00
Prices are CoCo OS-9 format disk, other formats , add
$2.00 per disk and specify format and OS-9 level. All
orders prepaid or COD, VISA and MasterCard accepted.
Add $1.50 S&H on prepaid, COD actual charges added.
D.P. Johnson, 7655 S.W. Cedarcrest St.
Portland, OR 97223 (503) 244-8152
(For best service call between 9-11 AM Pacific Tima)
OS-9 Is a trademark ol Microware and Motorola Inc.
MS-DOS is a trademark of Microsoft, Inc.
August 1985 THE RAINBOW 243
Steve asked about eavesdropping on
a BBS user on the Color Computer
screen. I don't believe you can do it,
Steve. However, you may want to try
redirecting the output of the BBS into
an OS-9 TEE filter to send a copy of
the BBS output to a disk file, your
printer or another terminal connected
to the RS-232 bit banger port, since you
appear to be using the ACIA program
pack for your BBS.
TEE would even let you send a copy
of the output to the device /TERM
which would put it on the Color
Computer screen like you want. How-
ever, the operation most likely won't
be smooth because of the way OS-9
writes to /TERM. In fact, you will
probably receive the data from the BBS
in bursts each time you hit the ENTER
key on the Color Computer keyboard.
Give it a try and let us know how it
works out.
Next month the television soaps will
be gearing up with a brand new season.
Let's cross our fingers and hope we get
to see some of that fantastic new
hardware that's been hanging on the
cliff for so long! Rest assured, if we
hear any news, we'll let you know.
The listing:
PROCEDURE
prnt
9999
PARAM col, row: INTEGER
999*
DIM c,r: INTEGER
0016
c:=col
«riE
r :-row
0026
PRINT CHR$(2); CHRS(c+32); CHR$(r+32);
003C
END
PROCEDURE
prlist
9999
DIM prpath,filepath:BYTE
?m
DIM line:STRING[255]; ans :STRING[1]
0022
0023
RUN SetupPrinter
0027
(3028
REPEAT
W2A
OPEN #filepath, "temp": READ
(3039
OPEN #prpath,"/p": WRITE
0046
0047
WHILE NOT(EOF(#filepath)) DO
0052
READ #filepath,line
005C
IF LEN(line)>4 AND LEFT$(line,l)0"P" THEN
0074
line-" "+RIGHT$(line,LEN(line)-5)
008C
ENDIF
008E
WRITE #prpath,llne
0098
ENDWHILE
009C
009D
PRINT #prpath,CHR$(12)
00A7
CLOSE #filepath,#prpath
00B2
00B3
RUN query("print another listing? (y/n) ",ans)
00DD
UNTIL ans-"n" OR ans="N"
00F1
DELETE "temp"
00F9
END
PROCEDURE
query
0000
PARAM message: STRING [40]; reply: STRING [1]
0017
DIM ok: BOOLEAN
ONE ^x e p^)?^99S
COLORBURST features:
• Six software selectable expansion ports.
• Disk controller cartridge connector in back.
• Parallel interface for printer.
• 2K pages mapped anywhere.
• Programmable write-protection by page.
• Programmable timer for:
1) Single stepping through ROM routines.
2) Improved CoCo serial port performance.
• Memory mapping makes Disk Spooling.
RAM Disk, and Disk Cache transparent to
user programs.
• Can access memory from different cartridges
simultaneously at different addresses.
• Plugs directly into CoCo cartridge port.
• OS/9 and RS DOS compatible.
• One year warranty.
OSJ9 Is .1 trademark of Microware, RS DOS Is a trademark of Tandy Corp
COLORBURST 128K S599.
COLORBURST 64K S570.
COLORBURST One Meg S999.
COLORBURST 5I2K S799.
COLORBURST 256K S640.
Please add SI-1.00 for shipping. Shipping outside US. and Canada add 530.00. All prices rn US. dollars.
Wisconsin residents add 5% tax. Dealer inquires Invited. Clubs call for quantity prices Personal checks
and COD's accepted.
MAXSYS Electronics & Software Co. • P.O. Box 25336 • Milwaukee, U/l 53225 • (414J 281-2671
COLORBCIR.ST
244
THE RAINBOW August 1985
-E
.F
>5
>6
ok : -FALSE
REPEAT
>8
PRINT message;
>E
INPUT reply
53
PRINT
J5
36
IF reply-"y" OR reply-"Y" OR reply="n" OR reply-"N
" THEN
5B
ok: -TRUE
51
ELSE
55
PRINT "what?"
5E
ENDIF
19
71
UNTIL ok
79
END
7B
3EDURE
SetupPrlnter
30
DIM prpath:BYTE; ans : STRING
3D
3E
OPEN #prpath , "/p" : WRITE
LB
RUN queryC'sklp over perforations? (y/n) ",ans)
46
47
IF ans-"y" OR ans-"Y" THEN
5C
PRINT #prpath,CHR$(27); "N" ; CHR$(4)
BE
ENDIF
70
71
RUN query("emphaslzed print? (y/n) ",ans)
96
97
IF ans-"y" OR ans-"Y" THEN
AC
PRINT #prpath,CHR$(27); "E"
BA
ENDIF
BC
BD
RUN query("double strike? (y/n) ",ans)
DF
EJJ
IF ans-"y" OR ans-"Y" THEN
F5
PRINT #prpath,CHRS(27); "G"
03
ENDIF
05
J36
CLOSE #prpath
pc
END
CED0RE
readdir
w
(* loads filenames from directory into an array *)
32
(* contributed by Steve Roberson *)
55
56
DIM path: INTEGER
5D
DIM filename (20): STRING [32]
6E
DIM char: STRING [1]
7A
INPUT "Enter directory name : " , dir$
98
OPEN #path,dir$:READ+DIR
A4
nura-63
AC
dn=J3
B4
100
fl$-""
BE
FOR x-1 TO 32
DJ3
num=num+l
■DC
SEEK #path.num
'E6
IF EOF(#path) THEN 2(3?
IF3
GET #path,char
IFD
ac-ASC(char)
•07
IF ac-0 AND x-1 THEN
.1C
num-num+31
.28
GOTO 100
.2C
ENDIF
.2E
IF ac>127 THEN ac-ac-128
.46
fl$-flS+CHR$(ac)
.54
num-num+ ( 3 2 - x )
.64
dn-dn+1
-70
filename (dn)=f IS
.7D
GOTO 10(3
L81
ENDIF
183
fl$=fl$+CHR$(ac)
L91
NEXT x
L9C
200
CLOSE #path
LA5
FOR x-1 TO dn
LB7
PRINT filename(x)
LCJJ
NEXT x
GZ\
LCB
END
REAL
TIME
CLOCK
Full featured, yet very easy to use,
RTC-10 is a quartz-based, Time/Date
clock contained in a compact ROM
case. Supplied with simple to use
basic and machine code programs. A
2-year+ replaceable battery backup
Is included.
NOW ONLY $49.95
Compatible with any Color Computer
I or II with or without a Radio Shack
or any other Multi-Slot unit.
Compatible with all known plug-in
packs. To use it with another plug-in
pack without using a Multi-Slot,
order the Y-cable below.
Completely assembled, tested and
ready to plug-in and use, with
programs included to set, read, and
display the Time/Date on the screen.
RTC-10 NOW $49.95
ROM/PROJECT CASES
3 piece unit with hardware.
ONLY $5.50
PC BOARDS for 27XX type proms for
above case. ONLY $4.00
DISK CONTROLLER PACK
by HDS. For Coco I & II Gold contacts
w/ROM ONLY $119
COCO CABLES
All connectors have GOLD plated
contacts.
MULTI-SLOT EXTENDER CABLE - 40
conductor, 6" to 15" (specify), 1
Male, 1 Female. - STOP THOSE
LOST CONTACT BLUES. -
ONLY $21.95
Y-CABLE - 40 conductor, I ft. long, 1
Male, 2 Females. Lets you connect
the RTC-10 to a disk, voice or any
other plug-in pack. ONLY $27.95
DISK PACK EXTENDER CABLE - 40
conductor, 2 ft. long, 1 Male, 1
Female. Not for use with Multi-Slot.
ONLY $22.95
DISK DRIVE EXTENDER CABLE - 34
conductor, 2 ft. long, 1 Male, 1
Female. ONLY $21.95
CUSTOM FLAT CABLES - Call
Custom Computer Products
6 Dogwood Court
Goshen, N.Y. 10924
(516) 783-7426
ccp
ADD $3.00 PER ORDER FOR SHIPPING & HANDLING
FOR C.O.D.. INCLUDE AN ADDITIONAL $3.00
NY RESIDENTS MUST INCLUDE SALES TAX
August 1985 THE RAINBOW 245
OS-9
OS-9 UTILITY
MAIL09
Correction
The following is the remainder of the
listings that were inadvertently left out
of MAIL09 (June 1985, Page 249). This
was due to an editorial error on our
part here at THE rainbow, and was not
the fault of the author, Timothy A.
Harris. Please refer to last month's
MAIL09 Correction (July 1985, Page
266) for listings 2-9. Again, we apologize
for any inconvenience this may have
caused, either to Mr. Harris or to our
readers.
Listing 10:
PROCEDURE alterentry
0000 TYPE labeltype-companynarae: STRING [25]; title:STRING[4] ; lname
: STRING [25]; fname: STRING [10] ; addressl: STRING; address2
:STRING; city:STRING[15] ; s tate: STRING [ 1? ] ; zip:STRING
0069
007F
0(388
0096
00A2
00AE
00B5
(JJJC8
00D4
m?
00E4
0104
012C
0154
^156
0162
016E
(3182
J3184
0195
01C3
J31C7
01F5
01F7
$9229
JJ258
027B
J3288
02A1
02A5
02B6
02DD
JJ2F2
0315
0327
033A
0348
03 4A
0369
0381
0383
0387
03AB
03C0
03DD
03EF
0402
0410
0412
0414
0432
04 4 A
044C
04 6 A
0482
0<i84
04A2
04 BA
[10]; phone: STRING [14]
TYPE indextype-name : STRING [25]; number:BYTE
PAEAM label :labeltype
PARAH Index(100) : indextype
PARAM llstfile: STRING [5]
PARAM lndexfile:STRING[6]
DIM tempname ; STRING
DIM id , f d .numentries , entrynuraber : INTEGER
DIM resp: STRING [1]
DIM keyname: STRING [25]
RUN clearscreen
PRINT " MAIL09"
PRINT " Alter Individual Entry"
PRINT " ■ — ,——"
PRINT
OPEN #fd,listf lie: UPDATE
OPEN #id,indexfile: UPDATE
RUN getindex(id, index, numentries)
PRINT
clist" THEN
Company Name of desired entry
IF listfile
INPUT "
EtSE
INPUT "
ENDIF
PRINT "
PRINT "
Last Name of desired entry
".keyname
" .keyname
Enter changes where needed or enter"
a '*' to keep a field the same"
RUN f indentry ( keyname , index , numentries , f d , label , entrynuraber
)
IF entrynumber=— 1 THEN
PRINT "Entry does not existl"
ELSE
IF listfile-"clist" THEN
INPUT "Is the Company Name the same ? ",resp
IF resp-"n" OR resp-"N" THEN
INPUT "New Company Name : " .label. companyname
index ( entry-number ) . name : -label . companyname
SEEK #ld, (entrynumber-l)*SIZE(index)
PUT #id,lndex(entrynumber)
ENDIF
INPUT "New Last Name : ".tempname
IF tempnameO"*" THEN label. lname: -tempname
ENDIF
ELSE
INPUT "Is the Last Name the same ? ",resp
IF resp-"n" OR resp-"N" THEN
INPUT "New Last Name : ", label. lname
index( entrynuraber) .name :— label. lname
SEEK #id, (entrynumber-l)*SIZE(Index)
PUT #id,index(entrynumber)
ENDIF
ENDIF
INPUT "New First Name : ".tempname
IF tempnameO"*" THEN label. f name: -tempname
ENDIF
INPUT "New Title : ".tempname
IF tempnameO"*" THEN label. title:-tempname
ENDIF
INPUT "New Address 1 : ".tempname
IF tempnameO"*" THEN label. addressl :-tempname
ENDIF
246
THE RAINBOW August 1985
ting 11:
3EDURE addtolist
?JJ TYPE labeltype=companyname:STRING[25]; title:STRING[4] ; lname
:STRING[25J; fname : STRING [ 10 ] ; addressl: STRING; address2
:STRING; city:STRING[15] ; state : STRING [1(3] ; zip:STRING
59
?F
38
)6
\2
IE
;i
;8
:c
'9
.B
16
i2
iE
'2
'8
18
15
16
'9
'D
:f
II
13
.5
• 9
D
7
■2
A
.5
7
B
D
F
9
B
A
9
2
B
C
A
5
\
2
1
2
■\
"
A
2
2
A
C
A
2
4
A
A
G
c
2
[1JJ]; phone: STRING [14]
TYPE indextype=name: STRING [25]; nuraber;BYTE
PARAM label rlabeltype
PARAH lndex(lJJf»):indextype
PARAM listfile:STRING[5]
PARAM lndexf lle:STRING[6]
DIM fd,id,numentries,i:INTEGER
DIM alldone: BOOLEAN
RUN clearscreen
PRINT " MAILJJ9"
PRINT " Add Entries to List"
OPEN #fd,listfile:UPDATE
OPEN #id, lndexf lie: UPDATE
RUN getindex(id, index, numentries)
alldone: -FALSE
SEEK #fd,numentries*SIZE(label)
PRINT "
IF listfile-"clist" THEN
PRINT "
ELSE
Hit <ENTER> for Last Name to END"
Enter Data at Prompts"
Hit <ENTER> for Company Name to END"
or to leave another field blank"
PRINT "
ENDIF
PRINT "
REPEAT
PRINT \ PRINT
RUN inputdata (label, lis tf lie, alldone)
IF NOT(alldone) THEN
numentries :»numentries+l
index (numentries) .number : -numentries -1
IF listfile-"clist" THEN
index(numentries) .name: -label. companyname
ELSE
index(numentr ies ) . name : -label . lname
ENDIF
PUT #fd, label
ENDIF
UNTIL alldone OR numentries>-ipp
CLOSE #fd
RUN mailsort(l, numentries, index)
SEEK #id,j3
FOR i:-l TO numentries
PUT #id,index(i)
NEXT i
CLOSE #id
END
INPUT "New Address 2 : ".tempname
IF tempnamoo"*" THEN label. address2 : -tempname
ENDIF
INPUT "New City : ".tempname
IF tempnameO"*" THEN label. city: -tempname
ENDIF
INPUT "New State : " , tempname
IF tempnameO"*" THEN label. state :=tempname
ENDIF
INPUT "New Zip Code : " , tempname
IF tempnameO"*" THEN label. zip: -tempname
ENDIF
INPUT "New Phone Number : ".tempname
IF tempnameO"*" THEN label .phone : -tempname
ENDIF
SEEK #fd,index(entrynumber) .number*SIZE(label)
PUT #fd, label
ENDIF
CLOSE #ld
CLOSE #fd
END
ting 12:
EDURE updatelist
TYPE labeltype-corapanyname: STRING [25]; title : STRING [V
lname
Back copies of many issues of
the rainbow are still available.
All back issues sell for the
single issue cover price. In addi-
tion, there is a $3.50 charge for
the first issue, plus 50 cents for
each additional issue, for postage
and handling if sent by United
Parcel Service. A $5 charge plus
$1 each additional copy for orders
sent U.S. Mail. UPS will not
deliver to a post office box or to
another country.
Issues July 1981 through June
1982 are available on white paper
in a reprint form. All others are
in regular magazine form. VISA,
MasterCard and American Ex-
press accepted. Kentucky resi-
dents please add 5 percent state
sales tax. We do not bill and no
C.O.D. orders accepted.
Due to heavy demand, we sug-
gest you order back issues you
want now while supplies last.
To order, just fill out the form
on the next page and mail it with
your payment to:
THE RAINBOW
9529 U.S. Highway 42
P.O. Box 385
Prospect, KY 40059
a.
N
«
m
E
Z
HI
<
□
O
S
D
in
z
o
x
Q.
<
in
■a
5
4C
Q
o □ 8
<
a
z
o
<
a.
x
LU
August 1985 THE RAINBOW 247
BACK ISSUE ORDER FORM
I
See overleaf for instructions.)
'. □ Please send
me the following back ;
• issues:
(Payment must accompany back issue :
; orders. We do not bill.)
VOLUME 1
MONTH
: no
YEAR
PRICE
1
JULY '81
PREMIER ISSUE
S2.00
a :
2
AUG. '81
$2.00
a -
: 3
SEPT. '81
EDUCATION
$2.00
a :
4
OCT. '81
PRINTER
$2.00
n :
5
NOV. '81
$2.00
D •
: 6
DEC. '81
HOLIDAY
$2.00
d :
7
JAN. '82
$2.00
e :
: 8
FEB. '82
$2.00
D •
: 9
MAR. '82
$2.50
d :
10
APR. '82
$2.50
e :
: 12
JUNE '82
VOLUME 2
$2.50
□ ;
: 9
MAR. '83
NUCLEAR
$2.95
D •
: 10
APR. '83
SIMULATIONS
$2.95
□ :
11
JUNE '83
PRINTERS
$2.95
n :
: 12
JULY '83
ANNIVERSARY
VOLUME 3
$2.95
□ •
: 1
AUG. '83
GAMES
$2.95
D :
: 2
SEPT. '83
EDUCATION
$2.95
D ".
3
OCT. '83
GRAPHICS
$3.95
□ :
: 4
NOV. '83
DATA COMM.
$3.95
a •
: 5
DEC. '83
HOLIDAY
$3.95
a :
7
FEB. 84
ADVENTURE
$3.95
n :
: 8
MAR. '84
BUSINESS
$3.95
D •
: 9
APR. '84
GAMING
$3.95
d :
10
MAY. '84
PRINTER
$3.95
a :
; 11
JUNE '84
MUSIC
$3.95
D •
12
JULY '84
ANNIVERSARY
VOLUME 4
$3.95
a :
; 1
AUG. '84
GAMES
$3.95
□ :
2
SEPT. '84
EDUCATION
$3.95
D •
: a
OCT. '84
GRAPHICS
$3.95
D ■
4
NOV. '84
DATA COMM.
$3.95
d :
5
DEC. '84
HOLIDAY
$3.95
□ •
'. 6
JAN. '85
BEGINNERS
$3.95
d :
7
FEB. '85
UTILITIES
$3.95
□ :
'• 8
MAR. '85
BUSINESS
$3.95
a •
: 9
APR. '85
SIMULATIONS
$3.95
a :
10
MAY '85
PRINTER
$3.95
a '.
: 11
JUNE '85
MUSIC
$3.95
■a ■
: 12
JULY '85
ANNIVERSARY
VOLUME 5
$3.95
a :
: 1
AUG. '85
GAMES
$3.95
D •
: RAINBOWINDEX(Flrstthreeyears
$2.50
D j
; July 1981-June
1984)
I Note: Our Fourth Year Index is
; Included In the July 1985 Issue.
TOTAL
SHIPPING,
U.P.S. CHARGE
U.S
MAII r.HARGF
KY RESIDENTS ONLY
ADD 5%
TOTAL AMOUNT
ENCLOSED _
0069
007F
0096
00A2
00AE
00C2
00C9
00D9
00EA
00FC
00FE
0102
0123
014C
0175
0177
01A4
01D1
01FF
022B
022D
0257
0263
0267
028B
0290
02B7
02BC
MAIL09"
Update Mailing List"
:STRING[25]; fnarae : STRING [ 10 ] ; addressl : STRING; address2
:STRING; city :STRING[15] ; state : STRING [ 10 ] ; zip:STRING
[10]; phone '.STRING [14]
TYPE indextype=name:STRING[25]; number:BYTE
PARAM label; labeltype
PARAM index(100):indextype
PARAM listf ile :STRING[5]
PARAM indexfile: STRING [ 6]
DIM add, alter, delet:STRING[U]
DIH resp:BYTE
add:-"addtollst"
alter ;-"alterentry"
dielet:-"deleteentry"
LOOP
RUN clearscreen
PRINT "
PRINT "
PRINT "
PRINT
PRINT "
PRINT "
PRINT "
PRINT "
PRINT
INPUT "
EXITIF resp-0 THEN
ENDEXIT
IF resp-1 THEN RUN add(label, index, listf lie, indexfile)
KILL add
ELSE IF resp-2 THEN RUN alter (label, index, listf lie , indexf:
)
KILL alter
ELSE IF resp-3 THEN RUN delet(label, Index, listf ile, indexf il
)
KILL delet
ELSE RUN entryerror
ENDIF
ENDIF
ENDIF
ENDL00P
END
3 --
1 -- Add to Existing File"
2 -- Alter Existing Entry"
Delete Existing Entry"
Return to Main Menu"
Selection : ",resp
02E3
02E8
02EF
02F1
02F3
02F5
02F9
Listing 13:
PROCEDURE createlist
TYPE labeltype-companynatne: STRING [25]; title : STRING[4] ; lname
:STRING[25]; fname : STRING [ 10 ] ; addressl: STRING; address2
:STRING; city:STRING[15] ; state : STRING[10] ; zip:STRING
[10]; phone: STRING [14]
TYPE indextype-name : STRING! 25 ] ; number: BYTE
PARAM label: labeltype
PARAM index(100):indextype
PARAM listfile:STRING[5]
PARAM indexfile :STRING[6]
DIM fd, id: INTEGER
DIM i.entrynumber: INTEGER
DIM alldone: BOOLEAN
entrynumber :-0
alldone: -FALSE
RUN clearscreen
PRINT "
PRINT "
PRINT "
CREATE #fd,listfile
CREATE #Id, indexfile
PRINT "
IF indexf ile-"cindex"
PRINT "
0069
007F
0088
0096
00A2
00AE
00C4
00CB
00D2
00D8
00DC
00FD
0125
014E
0158
0162
0190
01A2
01D6
01DA
020B
020D
023E
0240
0244
0258
MAIL09"
Create Mailing List"
ELSE
PRINT "
ENDIF
PRINT "
REPEAT
PRINT
Enter Data at the Prompts"
THEN
Hit <ENTER> for Company Name to END"
Hit <ENTER> for Last Name to END"
or to leave another field blank"
\ PRINT
RUN inputdata( label, listf ile, alldone)
IF NOT(alldone) THEN
248
THE RAINBOW August 1985
Set
he
nost
>ut
BASICS
OFFICIAL BASIC09 TOUR
DE is skillfully written in a friend-
and easy-to-read style. Just
ect for those new to computers
to BASIC09. It's also a valuable
rence book for programmers,
ineers, students and hobbyists,
v/iding an in-depth look at
3IC09 plus an overview of the
•9 operating system. Compre-
isive reference sections on
3IC09 and OS-9 commands are
> included.
i book "maps" out your route
iugh the Mercedes of Basics . . .
3IC09 and puts you in the driv-
! seat in no time. Fasten your
tbelt, sit back and enjoy the ride
perfecting your programming
Is.
MICROWARE . . .
The OFFICIAL BASIC09 TOUR
GUIDE comes from the people who
wrote BASIC09. As the leader in
6809 system software, we at
MICROWARE care about our users
and want to help you get the most
from our products.
It's Easy to Order.
Phone orders are accepted from
MasterCard or VISA cardholders or
for COD shipment. You can also
order by mail using the coupon
below. Quantity discounts are
available to educational organiza-
tions and dealers. For further infor-
mation contact Microware.
Specialists in system software for 68-family microprocessors since 1977.
OS-9 and BASIC09 are trademarks of Microware and Motorola.
Microware Systems Corporation
1866 N.W. 114th Street
Des Moines. Iowa 50322
Telephone 515/224-1929
Telex 910-520-2535
Please send
copies of
the Basic09 Tour Guide book at
$18.95 each. Add $2.00 for UPS
shipping in the U.S. or $10.00 for
overseas air mail per book. Iowa
residents add 4% sales tax.
Name
Address
City
State _
.Zip.
□ I have enclosed a check
LJ Charge to my bank card:
MasterCard D VISA □
Card Number
Expiration
THE X-TEAM FOR OS-9
XTERM
XTERM is a full featured OS-9 communica-
tions program that takes full advantage of the
power of OS-9. It works with the normal text
screen, XSCREEN, or the Wordpak 80 column
board.
XTERM is menu oriented for ease of use,
it is simple to use even for the novice OS-9 user.
And yet, XTERM is powerful enough for the expert
OS-9 user.
Some of the features of XTERM include: full
upload and download support with remote buffer
operation; supports XON/XOFF protocol;
1 10/300/600/1200 baud, 5/6/7/8 bits, even/odd/no
parity, full or half duplex; able to execute an OS-9
shell command from within XTERM.
XTERM works with a Color Computer using
the standard serial interface, but also will work with
a hardware serial port. Also, if you are using a hard-
ware parallel printer port, you can print data to the
printer as it is received.
XTERM $59.95
XMENU
XMENU is a system that creates a menu-
driven environment for the Color Computer
using OS-9. OS-9 now becomes easy-to-use with
command selections made from menus. Menus
are included to access OS-9 commands. An
easy-to-use utility is provided that allows for the
creation and maintenance of menus.
XMENU works with XSCREEN, the normal
text screen, O-PAK, and the WORDPAK
80-column board.
XMENU 29.95
XSCREEN creates a high resolution screen
for the Color Computer using OS-9. This high
resolution screen gives you 24 lines of text with
51 , 64, or 85 characters per line. Characters can
be either white on a black background or vice
versa. Easy menu operation.
XSCREEN $19.95
MICROTECH
CONSULTANTS
INC
1906 Jerrold Avenue
i St. Paul, MN 55112
XWORD
XWORD is a powerful word processing system
for the Color Computer using OS-9. XWORD is
feature packed with only a few features mentioned
here.
Some of the editing features of XWORD
include: true character oriented full screen editor;
works with the normal text screen, XSCREEN,
O-PAK, or WORDPAK 80 column card; full block
commands with blocks displayed in inverse
characters (except with normal text screen) for easy
block manipulation; file size not limited to a buffer
size; full find and replace commands with wildcard
character; able to execute an OS-9 shell command
in the middle of editing. Many, many more features,
too many to mention here.
Some of the formatting features of XWORD
include: proportional spacing supported; perfectly
aligned hanging indents and columns, even when
using proportional characters; full printer control
with control of character size, emphasized, italics,
overstrike, underlining (with or without spaces),
super and sub-scripts; up to 10 header/footers;
page numbering in decimal or Roman numerals;
margins and headers can be set differently for even
and odd pages; automatically reads printer in-
itialization file to define XWORD for your printer
(many included, and easy to write or modify your
own). Many more features.
XWORD $79.95
XMERGE gives XWORD powerful mail merge
capabilities. With it you are able to merge in data from
a data file or from the keyboard to get professional
looking results. ■ .
XMERGE 29.95
XDIR & XCAL
A package of two powerful utilities you won't want to be
without. XDIR is an OS-9 directory program that prints full
hierarchical directories. The directory does full sorting and has
complete pattern matching, including wildcard and character
classes.
XCAL is a powerful calculator for OS-9. Ideal for both
programmers and for general use. XCAL features include: work
in decimal, hexadecimal, binary; previous 25 results are stored:
functions include AND, OR, NOT, XOR. V^tt
XDIR & XCAL $24.95 W ;
Ordering Information
Add $2.50 shipping & handling. MN residents add 6%
sales tax. Visa, Mastercard, COD (add $2.50), personal
checks all shipped Irom stock within 24 hours.
Dealer Inquiries Invited
OS-9 is a trademark of Microware
(612) 633-6161
entrynumber : =entrynumber+l
index (entrynumber) .number: -en trynumber-1
IF indexfile-"cindex" THEN
index(entrynumber) .name : -label . companyname
ELSE
lndex(entrynumber) .name:-label.lnamo
ENDIF
PUT #fd, label
ENDIF
UNTIL alldone OR entrynumber>-10f)
CLOSE #fd
RUN mallsort(l,entrynumber, Index)
FOR 1:-1 TO entrynumber
PUT #ld,lndex(i)
NEXT i
CLOSE #ld
END
ngl4:
DURE mailsort
TYPE lndextype=name: STRING [25]; number: BYTE
PARAM bot, top: INTEGER
PARAM index(ipp) :indextype
DIM pa ss.j: INTEGER
DIM integerchange: BOOLEAN
Integer change : -TRUE
pass:-l
WHILE pass<=top-l AND integerchange DO
integerchange : -FALSE
FOR j:=l TO top-pass
IF index(j) .name>indcx(j+l) .name THEN
integerchange : -TRUE
RUN xchange(index(j),index(j+l))
ENDIF
NEXT j
pass :-pass+l
ENDHHILE
END
DURE xchange
TYPE indextype=name:STRING[25] ; number:BYTE
PARAM a,b:indextypa
DIM temp:lndextype
temp:— a
a:-b
b:-temp
END
ng 15:
EDURE mainmenu
2 TYPE labeltype-companyname: STRING [25]; t itle: STRING [ 4 ] ; lname
:STRING[25]; f name : STRING [Iff] ; addressl: STRING; address2
:STRING; city : STRING [15] ; state : STRING [ 1JJ] ; zip:STRING
[10]; phone: STRING [14]
TYPE indextype=name:STRING[25] ; number : INTEGER
PARAM label :labeltype
PARAM Index ( IflfS) : indextype
PARAM listfile:STRING[5]
PARAM indexfile:STRING[6]
DIM creat , updat , disp , prnt .make , one : STRING [ Ifl]
DIM resp:BYTE
creat :-"crea tells t"
updat :-"updatelist"
disp: -"display! 1st"
prnt: -"print list"
make :-"makelabel"
one:-"onelabel"
LOOP
RUN clearscreen
PRINT "
PRINT "
PRINT "
PRINT
PRINT " 1
PRINT " 2
PRINT " 3
PRINT " 4
PRINT " 5
PRINT " 6
HOW TO
RENEW YOUR
SUBSCRIPTION
TO THE RAINBOW
WITHOUT
RIPPING UP
YOUR
MAGAZINE.
MAILJJ9"
Main Menu"
Create Mailing List"
Update Mailing List"
Display Mailing List"
Print Mailing List"
Print Mailing Labels"
Print Individual Labels"
CALL 1 (502) 228-4492
(ASK FOR DEIDRA)
ITS THAT EASY.
August 1985 THE RAINBOW 251
64K EXT. BASIC 129
Color Computer II
95
c
H
E
A
P
E
S
T
P
R
I
C
E
E
V
E
R
KEYBOARD 39
95
Newest Color Computer II keyboard to fit your old style Color Computer I (silver or white case),
TDP-100, and older CoCo II. Just drops in, no soldering or cutting necessary. Adaptor for 1982
and previous computer (D&E Boards) 9.95.
Monitor Interface for above CoCo II 29.95 plus 7.50 installation, (color & green compatible)
Drive 1
125
95
Your Choice
Silver or White
21 r
Drive
SUPER DRIVE SALE
Special prices on new first quality disk drives. They even have GOLD connectors on the
back. . .Some other places charge 279.00 for dr. 1 and 349.00 for dr. 0, not us! Drive 1 is for
mod I, Second Color Computer drive, or external mod III, IV. Drive is your first Color Computer
drive and comes complete with cable, manual, and R.S. controller. Bare drives for internal mod
III, IV, only 79.95! For double-sided, add 45.00 (only for those who have DS-DOS, boards and
knowledge)
THE COMPUTER CENTER
901-761-4565, 5512 Poplar, Memphis, TN 38119
Add $4.90 for shipping & handling— Visa, M/C accepted— Dealer inquiries welcome
7 -- Execute Shell Command"
JJ -- Return to Selection Menu"
Selection : ",resp
PRINT "
PRINT "
PRINT
INPUT "
EXITIF resp-JJ THEN
RUN clearscreen
ENDEXIT
IF resp-1 THEN RUN creat(label, index, listfile, indexf lie)
KILL creaC
ELSE IF resp-2 THEN RUN updat(label, index, listfile , indexf ile
)
KILL updat
ELSE IF resp-3 THEN RUN disp(label, index, listfile, indexf lie
KILL disp
ELSE IF resp-4 THEN RUN prnt(label, index, listfile, indexf lie
KILL prnt
ELSE IF resp-5 THEN RUN make(label , index, listfile, indexf ile
)
KILL make
ELSE IF resp-6 THEN RUN one(label, index, listfile ,
indexfile)
KILL one
ELSE IF resp-7 THEN RUN shellcommand
ELSE RUN entryerror
ENDIF
ENDIF
ENDIF
ENDIF
ENDIF
ENDIF
ENDIF
ENDLOOP
END
/R\
UL-T -SCREEM]
/^\ COLOR CHARACTER GENERATOR ^
RAINBOW
RAINBOW
A NEW DIMENSION IN COLOR COMPUTING "";.""
"Now includes a character generator and sample graphic space
game at no e>:tra cost.
•Full 224 text and graphic characters. Underline in all PMOOES.
Prints vertically.
•All machine languagei user transparent. Supports all BASIC,
EXTENDED BASIC and DISK commands.
•Automatic loader recognizes I6K1 32V; J! S4K computers.
•Mix up to 5 character sizes in 4 colors all on one screen. A
total of 10 sizes available from 8*4 to 42*24 or 32*32 'n
vertical mode.
•Use up to 4 defineable window screens of any size. Also
includes horizontally scrolling (crawling) one line screens.
■Includes positive & negative screen dumps in 2 sizes for R/S,
Epson & Gemini printers. ( Please specify)
•Special Trace Delay can be used to debug programs one line at
a time ( even graphics I.
• A special printer control can output characters to the screen
St printer simultaneously.
•A must 'or all color computer owners. Once you try it you
won't write another program without it.
INCENTIVE SOFTWARE
(519) 081-0133
P.O. BOX 323
STATION B
LONDON ONTARIO
CANADA N6A kWl
MINIMUM REQUIREMENT
TAPE - 24.95 US or
DISK - 27.95 US or
P.O. BOX 7281
PORT HURON
MICHIGAN 48301
U .S.A.
16K BASIC
29.95 CDN
32.95 CDN
Tape to Disk upgrade available for *8US or *I0CDN. We pay
postage within US & CANADA on orders over *20. otherwise
please add SI . Other countries please add S2. Charge orders
please add «1.
August 1985 THE RAINBOW 253
L
THESE FINE STORES
CARRY THE RAINBOW
The retail stores listed below carry the rainbow on a
have other products of interest to Tandy Color Computer
patronize those in your area.
regular basis and may
users. We suggest you
ALABAMA
Albertville
Birmingham
Brewton
Florence
Huntsvllle
Madison
Montgomery
ALASKA
Fairbanks
ARIZONA
Phoenix
Scottsdale
Tempe
Tucson
ARKANSAS
Fayettevllle
Little Rock
CALIFORNIA
Chula Vista
Citrus Heights
Downey
ElCaJon
Exton
Ft. Bragg
Fortune
Grass Valley
Halt Moon Bay
Hesperla
Hollvv/ood
Lompoc
Los Angeles
National City
Pacific Beach
Palo Alto
Sacramento
San Diego
Sewell TV & Radio Shack
Jefferson News Co.
McDowell Electronics
Anderson News Co
Endlcott Software
Madison Books
Trade 'K Books
Electronic World
The Computer Shop
Home Brew Computers
Trl-Teck Computers
Data Concepts
Softwareland Corp.
All Systems Go
Books Etc.
Computer Library
Anderson News Co.
Mlnz Electronics
Vaughn Electronlcs/Radlo Shack
Anderson News Co.
Santa Rosa
Southgate
Stockton
Sunnyvale
COLORADO
Aurora
Colorado
Springs
Westminster
CONNECTICUT
Danbury
Orange
DELAWARE
Mlddletown
Wilmington
R 6. R Software
Software Plus
The Floppl Disk
Radio Shack
Software City
Earthly Delights
R&V Sound
Advance Radio. Inc.
Sfrawflower Electronics
Dessert Sound. Inc.
Levity Distributors
L&H Electronics Emporium
E.D.C. Industries
Polygon Co.
JARB Software
Willy's Electronics
Pro Am Electronics
Printers, Inc.
Tower Magazine
The Computer Store
Dimensional Software
Disney's Electronics
Radio Shock
Sawyef s News. Inc.
Cokx Computing
Hardlngs Way News
Computer Literacy
Aurora Newsland
Hathaway's Magazines
Software City
Computer Seiv. of Danbury
Software City
Delmar Co,
Milford News Stand
Normar. Inc.— The Smoke Shop
FLORIDA
Boca Raton
Software. Software. Inc.
Clearwater
The Avid Reader
Soenen & Wllmoth Books
Software City
Cocoa
The Open Door
Davie
Software Plus More
Ft. Lauderdale
Mike's Electronics Distributor
Software Connoction
Jacksonville
Bill's CoCo Coiner
The Book Nook
Book Town
Madison
Electronics of Madison
Melbourne
City Newsstand
The Utile Store
Miami
The News Rack
Newsstand of Cutler Ridge
North Miami
Beach
Almar Bookstore
Orange Park
Software City
Orlando
The Alamo
Panama City
FJoyd-Ebert Corp.
Computer Systems Group
Pensacola
Anderson News Co.
Pinellas Park
Wolf's Newsstand
Sarasota
Family Computers
South
Pasadena
Poling Place
Stuart
Caribbean Engineering Corp.
Sunrise
Sunnys at Sunset. Inc.
Tallahassee
Anderson News Co.
Tampa
Fine Plint Bookstore
Software Clly
Sound Trader & Computer Center
Titusvllle
Computrac
GEORGIA
Atlanta
Chips. Inc.
Guild News Agency
Bremen
Boogie Shoppe
Columbus
Muscogee News Co.
Cummings
Kent Radio Shack
Jesup
Kannon Music
Radio Shack
Marietta
Act One video
St. Simons
Island
Radio Shack
Toccoa
Martin Music Radio Shack
IDAHO
Blackfoot
F/M Systems Electronics
Moscow
Johnson News Agency
Priest River
K&W Electronics
ILLINOIS
Aurora
Kroch's St Bientano's
Belleville
Software or Systems
Champaign
Book Market
Chicago
B. Dalton Booksellers
N. Walbash St.
West Jackson St.
Bob's In Newtown
Bob's News Emporium
Bob's Rogers Park
Book Market
East Cedar
North Cicero
West Dlveisey
EB. Garcia & Associates
Guild Books & Periodicals
Kroch's & Brentano's
South Walbash
West Jackson
516 N. Michigan
835 N. Michigan
Parkway Drugs
Parkwest Books
Sandmeyer's Bookstore
Univ. of Chicago Bookstore
Univ. of Illinois Bookstore
Vldeomat. Inc.
Chllllcothe
Book Emporium
Danville
Book Market
Decatur
Book Emporium
K-Mart Plaza
Northgate Mall
DeKalb
Appletree Computers
East Mollne
Book Emporium
Evanston
Chicago-Main News
Geneseo
B & J Supply
Kewanee
Book Emporium
Lisle
Book Nook
Metropolis
Jim's Home Center
Newton
Bill's TV Radio Shock
Oak Brook
Kroch's & Brentano's
Oak Park
Kroch's & Bientano's
Paris
Book Emporium
Peoria
Book Emporium
Sheridan Village
Westtake Shopping Center
Book Market
Illinois News Service
Schaumberg
Kroch's & Bientano's
Skokle
Kroch's & Brentano's
South Holland
Abacus Computer Distributors
Springfield
Book Emporium
Sangamon Centei North
Town S Country Shopping Ctr.
Sunnyland
Book Emporium
West Frankfort
Paper Place
Wheeling
North Shore Dlstilbutois
Software Unlimited
INDIANA
Beme
White Cottage Electronics
Columbus
Micro Computer Systems. Inc.
Garrett
Finn News Agency. Inc.
Greenwood
The Computer Experience
Indianapolis
Bookland, Inc.
Indiana News
Jaspei
Computer Store
Elex Mart
Lawrenceburg
Bauer Electronics
Madison
Arcs Office Supplies
Marion
Computer Comer
Martinsville
Radio Shack
New Haven
Advanced Color Software
Scott sbuig
Radio Shack of Scottsbuig
Walbash
Mitting's Electronics
IOWA
Cosmos Computers
Bettendorf
Davenport
Interstate Book Store
Software City
KANSAS
Junction Clly
III H's Stereo
Topeka
Palmer News, Inc.
Town Crier of Topeka. Inc.
Wichita
Amateur Radio Equipment Co.
Lloyd's Radio
KENTUCKY
Baidstown
Skaggs Electiic/Radio Shack
Danville
Boyle Electronics
Greenville
Williams & Wells. Inc.
Hopklnsvllle
Hobby Shop
Louisville
The Computer Store
Paducah
Radio Shack
Gus-Stan Enterprises
Gus-Stan Enterprises
Palntsville
Plkevllle
Princeton
Millet Electronics
LOUISIANA
Baton Rouge
Acme Book Co.
Crowley
Acadiana Newsstand
Gretno
Compute! Supply Store
MAINE
Bangar
Magazines. Inc.
Brockton
Voyager Bookstore
Waterboro
Radio Shack
MASSACHUSETTS
Brockton
Vogager Bookstore
Cambridge
Nlnls Corner. Inc.
Out Of Town News
Danvers
Mlcrocon Computer & Software i
Rtchburg
Corners Book Shop
Ipswich
Ipswich News
Uttleton
Computet Plus
Lynn
North Shore News Co.
Qulncy
Soft Ware House
MICHIGAN
Allen Park
Book Nook. Inc.
AnnAtbot
Community News Center
Brooklyn
Weatherwax Radio Shack
Dearborn
DSL Computer Products
Durand
Robblns Electronics
Fenton
Trl-Counfy Electronics Radio Shoe
Flint
"IO"
Greenville
Robbins Electronics
Haitlson
Harrison Radio Shack
Kalamazoo
John Rollins
Lapeer
Computer Comet
User Friendly
Lowell
Curf s Sound & Home Arcade Ce
Ml. Clemens
Key Book Shop
Michigan Radio
Muskegon
The Eight Bit Cotnei
Novi
Ml Software Dlst.. Inc.
Okemos
Software City
Owosso
C/C Computet Systems
HI-FI Audio Co.
Peny
Peny Computets
Perry OH & Gas
Petoskey
B & L Sound. Inc.
Pontlac
Computet Shack
Rosevllle
New Horizons
Royal Oak
Software City
St. Johns
Clinton Electronics
Southfleld
Software City
Sterling
Heights
Sterling Book Center
Tecumseh
White Electronics
Wyoming
Getty's Book Co,
254
THE RAINBOW August 1985
IESOTA
neopolis Read-More News
•nar The Photo Shop
ISSIPPI
noda
levins
Miamisburg
Mount Orab
Rocky River
Toledo
OURI
sasClry
.ville
»rty
ouls
Stereo Store ot Grenada, Inc.
Stonehenge Computer Software Center
Midwest CoCo Systems
T&R Electronics
Audio Hut
Book Emporium
Computer Xchange
Softwalre Centre
Rnal Edition
Wilke News
Mount Orab Radio Shack
Programs Unlimited
Leo's Book & Wine Shop
Reltz Electronics
salty City
ITANA
lefish The Computer Corral
ASKA
oln Hobby Town
aha Computers & Components
J5A
Vegas
Hurley Bectronics
HAMPSHIRE
irborough
BRW Electronics/Radio Shack
smouth
Portsmouth Computers
t Lebanon
Verham News Corp.
JERSEY
lar Knolls
Village Computer & Software
irry Hill
Software City
ton
Micro World II
renceville
Micro Con Software Center
*ood
Software City
mora
Outpost Radio Shack
itvale
Software City
rlstown
Software City
nsville
Dave's Elect. Radio Shack
rEdge
Software City
koway
Software Station
imlt
Software City
Tie
Wayne Software
MEXICO
nogordo
New Horizons Computer Systems
iquerque
East-West Enterprises
Page One Newsstand
Salt ot the Earth
YORK
:kpotl
Lift Bridge Book Shop. Inc.
ro Heights
Southern Tier News Co., Inc.
x>rt
Software City
son falls
GA West& Co.
isonCify
Unicom Electronics
<lsco
Software City
/York
Barnes & Noble— Sales Annex
Coliseum Books
Eastern Newsstand
Grand Central Station. Track 37
200 Park Ave., 'Pan Am #1 )
55 Water Street
World Trade Center *2
First Stop News
Idle Hours Bookstore
International Smoke Shop
Jonll Smoke
PennBook
State News
Usercom Systems, Inc.
Walden Books
World Wide Media SeMces
/hlte Plains
Software City
tsburg
Adirondack Computer Supplies
hester
Village Green
World Wide News
>dhaven
Spectrum Pro)ects
H CAROLINA
rdeen King Electronics
Radio Shack
I News Center in Cory Village
irlotte Newsstand Infl
Papers & Paperback
lock Computer Concerns
:oiy C 1 Books & Comics
Inburg Radio Shock
Ion Boomers Rhythm Center
'land Alpine Electronic Systems
ilgh DJ.'s Book and News
Softmart
3 Total Data Systems
H DAKOTA
io Computer Associates
I
iton Little Professor Book Center
:lnnatl Clnsoff
jmbus Little Professor Book Center
locton Utopia Software
ton Wllke News
>orn News-Readers
on Gal-Tronlcs
The News Shop
Ion T.W. Hogan & Associates
jwood Lakewood International News
a Brunner News Agency
Edu-Caterers
field
sights Software City
OKLAHOMA
Hobart Shortgrass Electronics
Oklahoma
City Merit Micro Software
Tulsa Steve's Book Store
OREGON
Aloha
B. Color Computer and Software
Hermlston
Lee's TV & Radio Clinic
PENNSYLVANIA
Allison Park
Software City
Altoona
Newborn Enterprises
Brookville
Larry's Stereo Shop
Greensburg
The Program Store
Harrisburg
Harrisburg News Co.
Malvem
Personal Software
Philadelphia
City Software Center
Newsy
Phoenlxville
Stevens Radio Shack
Pittsburgh
All-Pro Souvenlers
Pleasant Hills
Pitt Computer & Software
Shlppensburg
Rainbow Adventure
Temple
Software Corner
Tunkhannock
The Donna Comm. Co.
Wllliomsport
Shade Tree
York
The Computer Center of York
RHODE ISLAND
Warwick
Software Connection
SOUTH CAROLINA
Charleston Hts.
Software Haus. Inc.
Greenville
Palmetto News Co.
Hilton Head
Megatron Corporation
Spartanburg
Software City
Union
Fleming's Electronics
TENNESSEE
Chattanooga
Anderson News Co.
Dickson
Highland Electronics
Knoxville
Anderson News Co.
First Byte Computer Co,
Memphis
Computer Center
Software, Inc.
Nashville
Campus Computer Corp.
Mosko's Book Store
Smyrna
Delker Electronics
TEXAS
Elgin
The Homing Pigeon
Ft. Worth
RFI Electronics
Software Terminal
Houston
MicroSolutlons
Orange
Northway Books & News
Paris
Software Solutions
UTAH
Murray
Deseret Book
Ogden
Computer City
VIRGINIA
Gafton
Electronics Marketing
Norfolk
l-O Computers
Richmond
Software City
WASHINGTON
Bellevue
Software City
Davenport
Davenport Electronics
Mount Lake
Terrace
Emerald Computer Services
Renton
Data Borne
Seattle
Adams News Co.. Inc.
Tacoma
Nybbles 'N Bytes
WEST VIRGINIA
Huntington
Nick's News
Lesage
Pioneer Technology
Logan
Stan's Electronics 8 Radio Shack
Parkersburg
Valley News Service
WISCONSIN
Appleton
Badger Periodicals
Cudahy
Cudahy News & Hobby
Janesville
Book World
Ladysmllh
Electronics, Etc.
Milwaukee
Abacus Micro
Book Tree
Booked Solid
Booked Solid II
Harvey Schwartz Bookshop
Univ. of Wisconsin Bookshop
WYOMING
Casper
The Computer Store
Worland
Price Electronics
AUSTRALIA:
SYDNEY
Klngsford
Paris Radio Bectronics
CANADA:
ALBERTA
Athabasca
McLeans Ltd.
Banff
Banff Radio Shack
Barrhead
Barrhead Sound 1982 Ltd.
Blalrmore
L&KSports& Music
Brooks
Double 'D" A.S.C. Radio Shack
Calgary
Billy's News
Imperial Computer Ltd,
Rainbow Software Services
Camrose
Radio Shack Associated Stores
Claresholm
Radio Shack Associated Stores
Coaldale
Coaldale Sight & Sound
Drayton Valley
Langard Electronics
Edmonton
CMD Micro
Kelly Software Distributors
Edson
Radio Shack
Fairview
D.N.R, Furniture & TV
Fox Creek
Fox City Color & Sound
Ft. Macleod
Fort Pharmocy
Radio Shock
Gronde
Cache
The Stereo Hut
Grande
Centre
The Book Nook
Grande Prairie
Northern Computer Service
Hanna
Technics TV Ltd.
Innlsfall
L & S Stereo
Lacombe
Tall Pine TV
Leduc
Radio Shack Associated Stores
Uoydminster
Lloyd Radio Shack
Peace River
H & S Music Centre
Radio Shack Associated Stores
Pincher Creek
Thornton & Son's
Redcllff
Gale Distributing
Red Deer
Computet World
Rlmbey
Roy's TV
St. Paul
Tele-Logic
Sundre
Sundre Sound
Taber
Pynewcod Sight & Sound
Valleyview
Don's Radio Shop
Vermilion
Photocratt Vermilion Ltd.
Wetaskiwln
Radio Shack
BRITISH COLUMBIA
Burnaby
Compulit
Campbell
River
TRS Electronics
Chllliwack
Charles Parker
Courtenay
Bell Radios TV
Valley Computers
Ft. St. John
Ken Dawson
Ladysmith
Ladysmith Sound Center
Merrit
Merrit Radio Shack
N. Vancouver
Mlcrowest Distributors
Sicamous
Shuswap Electronics
Sidney
Sidney Electronics
Victoria
Datatact
International Software
Techworld
Williams Lake
Norcom Software
MANITOBA
The Pas Jodl's Sight & Sound
Winnipeg J & J Electronics Ltd.
NEW BRUNSWICK
Moncton Canadian Colour Connection
NEWFOUNDLAND
Labrador City
Sound & Vision
NOVA SCOTIA
Dartmouth
Sector Software
Halifax
Atlantic News
ONTARIO
Angus
Micro Computer Service
Atlkokam
Gill's Furniture
Bowmanville
Bowmanville Audio Vision LTD
Smoke Shop
Cochrane
Ftederlckhouse Sound
Efobicoke
NEPCOM
Hamilton
Dataman
Kingston
T.M. Computers
Ottawa
National News Co., Ltd.
St. Catherine
Smoke Shop-2 Stores
South River
Max TV
Strathroy
Downtown Sound
OUEBEC
LaSalle
Messagerles de Presse Benjamin Enr
Sherbrooke
Soc. DeLoc
SASKATCHEWAN
Asslniboia
Telstar News
Nlplwan
Cornerstone Sound
Reglna
George Gloss
Reglna CoCo Club
Softwre Supermarket
Saskatoon
Computertlme
Tlsaale
Paul's Service
YUKON
Whltehorse Big Byte Computer Services
H & O Holdings
PUERTO RICO
Son Juan Software City
Also available at all Coles Bookstores, B. Dalton Bookseller and
Waldenbooks stores in the United States and Canada.
August 1985 THE RAINBOW 255
A D VER TISER 'S INDEX
We encourage you to patronize our advertisers — all of whom support the
Tandy Color Computer. We will appreciate your mention ing THE rainbow when
you contact these firms.
Ark Royal Games 71
B5 Software 183
Brantex, Inc 206
Cer-Comp 49
Challenger 214
Cinsoft 32
CMD Computer Services 203
CNR Engineering 212
CoCo Devices 200
CoCo Warehouse 201
Cognitec 13
Colorware 37, 38, 39
Computer Center 252
Computer Island 78, 79
Computer Plus 3, 103
Computer Systems Distributors 84
Computerware 173
Computize, Inc 257
Cosmos Computer Services Inc 67
Custom Computer Products 245
Custom Software Engineering 155
Dataman International 109
Dayton Associates of
W. R. Hall, Inc 184
DEFT Systems 17
Derby City Software 29
Derringer Software 22, 23
DiamondStar Software 72
DIGInews 216
Dorsett Educational Systems IBC
Double Density Software 134, 135
Dragon User 219
DSL Computer Products 66
Dugan, Doug 202
DYNACALC 175
Dynamic Electronics, Inc 215
E.D.C. Industries 174
EAPCo 192
Electronics Motion Control 74
Elite Software 99, 100, 101
Endicott Software 140
Federal Hill Software 194, 232
Four Star Software 207
GRAFX 176
Green Mountain Micro 205
Group Technology Ltd 141
Hard Drive Specialists IFC
Hawkes Research Services 117
HJL div. of Touchstone
Technology, Inc 45
Frank Hogg Laboratory . . .237, 239, 241
Homesoft 147
Howard Medical 33, 34
Incentive Software 253
J & M Systems BC
D.P. Johnson 243
Kelly Software Distributors 146
Key Color Software 1 56
Landware Co 132
Mark Data Products 94, 95
Maxsys Electronics & Software . . . .244
Metric Industries 14
MichTron 16, 35
Micro Works, The 87
Microcom Software 19
Microtech Consultants Inc 250
Microware Systems
Corporation 168, 249
Microworld II 93
Mix, Tom Software 208, 209
Moore Computer Services 82
Moreton Bay 222, 223
Novasoft 191
Other Guys Software, The 113
OS-9 Users Group 258
Owls Nest Software 143
Owl-Ware 1 1 1
Parsons Software 200
PBJ, Inc 43
PCM 193
PD Software 119
Perry Computers 149
Picosoft Games 132
Polygon Co 144
Dr. Preble's Programs
Prickly-Pear Software
PXE Computing
Radio Shack 10, 11, 186
RAINBOW OS-9 Book
Rainbow Binder
Rainbow Books
Rainbow Gift Certificate
Rainbow On Tape
RAINBOWfest 114
REM Industries
Research Services Labs
Robotic Microsystems
Saguaro Software
Selected Software
Softmart
Software Connection
Software House, The
Software Plus
Software Support, Inc 17(
Southwestern Digital
Spectrosystems
Spectrum Projects Inc.
121, 122, 123, 125, 126
Speech Systems 6
Sugar Software 160, 161
Synergetic Solutions
T & D Software
TCE Programs, Inc
Thine
Tothian Software, Inc
Tri-Tech Electronics
Triad Pictures
True Data Products 152
Undercolor
Vidtron
VIP Technologies
(Softlaw Corp.) 3
Wasatchware
White House Computer
Woodstown Electronics
York 10
Zellerback Group, The
M3 Calf:
Cindy Shackleford
Director, West Coast Office
12110 Meridian South, Suite 8
P.O. Box 73-578
Puyallup, WA 98373-0578
(206) 848-7766
Cal