power

■home cor nputir ig

Summer 1963 Volum8 II Number2
$2.50 U.S.
$3.50 Canada

And Even More Games for the Commodore 64

Butterfield Fools with Boolean

England Takes the VIC Seriously

"*• -^""-

BULK RATE
U.S. POSTAGE
PAID
Permit No. 1705
Phlla, PA
Cammodort Business Machinal, Inc.
1200 Wilson Dfmi- ■ Wi-.i Chi-.fr-. PA 19380
 Gridrunner
No one, not even the author, has As the pilot of the Gridrunner, a
Is available
ever achieved the fast Gridrunner. It combat ship, you must annihilate
for VIC 20™
is an extremeiy fast-paced arcade- the various enemies traveling
quality game designed to test your along the "Grid." High scores are and
coolness under fire and challenge possible only through the mastery Commodore
your reflexes. of the patterns of the X/Y Zappers 64™.
and the Gridsearch Droids which,
Can you beat
when destroyed, mutate into
Gridrunner?
potentially lethal Pods.
See your local
Gridrunner has 32 levels of diffi computer or
culty (20 levels in games dealer
the VIC 20 ver and find out.
sion). To this
date, the 13th Human Engineered Software
level has been 71 Park Lane
the highest Brisbane, CA 94005
achieved.

a division oi U5I

vie 20 and Cornmodurg B4 ars trademarks f>r

Commodo'o Electronic* LW.
 an
Commodore 64™
♦ t,
I
expansion products
from Micro Systems
Development.

A The Interbus Series. Three interfaces lor the VIC 20 and

Commodore 64: one for IEEE 488, one for RS 232 and one
for Parallel.
The VIE and C1E are IEEE 488 interfaces for the VIC 20.
When plugged into the expansion port, the cartridge is
"transparent," that is, the user can still attach other peripherals
without any interference. Devices such as 4040,8050, 2031, 2032,
4022 and 8023 can be controlled. The IEEE software can be called
by using the 'SYS' command, even in the middle of a
BASIC program.
The V232 and C232 are serial interface cartridges which
allow connection of various input/output devices such as printers,
modems, plotters, etc. to VIC 20 or Commodore 64 computers.
Features include: positive and negative voltage swings to meet full
EIA standards, straps and jumpers to allow reconfiguration to meet
pinouts for any RS232 device, and software selectable reconfigura
tion such as baud rate, parity, and duplex mode.
The VPI and CPI are parallel Interfaces for the VIC 20 and
Commodore 64. These interfaces provide direct BASIC use of the
parallel printer bus and give "invisible" access to the bus. The
VPI can be used only on the VIC 20 and uses the expansion port.
The CPI will work with both the VIC 20 and Commodore 64 and
does not use the expansion port. The CPI also has switches (or set
ting insertion or deletion of line feed, conversion of Commodore
ASCII into standard ASCII or visa versa, addresses printer to device
A. 5, 6 or 7, and allows normally unprintable Commodore characters
to be printed in a recognizable form.

B Expandoport Series. Expandoport 3 and Expandoport 6 are

three- and six-slot expansion boards for the VIC 20. Each slot on
the Expandoport 6 has a switch for controlling power to that con
nector. The switch allows the use of cartridges which respond to the
same memory space. The Expandoport 6 also has a fuse and reset
switch. The fuse prevents excessive current drain from the VIC 20
and protects it from 'shorts'. The reset switch allows the user to
'Restart' the V)C 20 without turning power off, This feature allows
RAM, which is located in the ROM expansion area, to be protected C Terminal Pak Series. D Audit) Link.
during 'Restart'.
Expandoport 4 is a four port expansion board for the
Commodore 64. It has the same features as the Expandoport 6 and
even allows for the use of varying width cartridges.

C Terminal Pak Series. The VTE 40 Terminal Emulator

(VTE 40} is a hardware and software package which converts the Call toll free
VIC 20 into a 40-column communications terminal. The VTE 40 for nearest dealer
cartridge is complete. Various set-up parameters such as baud rate,
parity, duplex, and bits per character can be selected through a
'menu' format. VTE 40 features are: 40 x 25 text display, user
1-800-527-5285
definable communication specs, smooth or normal scroll, print infor
mation to printer or disk, generation of control codes, selective Lifetime warranty
omission of data, continuous status line.
The CTE/VTE Terminal Emulator (CTE/VTE) is a software
available upon
program which converts the VIC 20 or Commodore 64 into a ter return of Product
minal. The user can 'software select' the baud rate compatible with warranty card
the modem used Full upper and lower case characters are supported E Monitor link.

D Audio Link. An audio cassette adapter interface for the

VIC 20. Features include: use of regular cassette recorders, conver
sion of VIC 20 digital data to audio and visa versa, normal and
inverted cassette signal, remote on/off control and control of
external devices.

E Monitor Link. This cable assembly allows the VIC 20 and/or

the Commodore 64 to interface with a monitor instead of a TV. The
Monitor Link provides separate video and audio output, This enables
the sound output to go directly into a stereo system for unmatched
audio quality. The Monitor Link is great for applications where a TV
is not desired. It allows the Commodore 64 user to have high quality
resolution on black and white monitors,

VK 20™ ai<d Cmmodoic M™, CBM™ and PET™ ve rc»Ht™J (wfenwte ul CmunodoiE
HrtMl*
Expnndupcrt, Audio Link. Ininbut. Terminal ft*. VRAM and Monitor (.ink art copywriJal by Micro
MICRO W SYSTEMS DEVELOPMENT, INC.
Sync™ Dl I 111O3 SHADY TRAIL • SUTE 1Od • DALLAS. TEXAS 7B2SS
 V J

power
■home compuCinq

features Summer 1983 Volume II Number 2

A ■Bl sat-.?-. ^
34 And Even More New Cartridge Games for the Commodore 64
by Diane LeBold
Three Bally/Midway arcade hits top the list of exciting new cartridge games
gays
i-*-^*-"*i"!3
^^ for the Commodore 64.

i
38 OOPS! byJeffBruette
A Commodore game programmer reveals how you can use certain bugs
(let's call them "undocumented features") to score higher in Commodore's
Omega Race and GORF cartridges for the VIC 20.

New Carlri dge Games

40 Omega Race: A Joystick Works, Tool by David Owens
You can get high scores in Omega Race using a joystick. A reader replies to
David Berezowki's claim, in the Winter issue, that paddles are the best way
to get those 200,000+ scores.

42 Making Friends With SID, Part 3: The Commodore 64 Piano

byPaulHigginbottom
Turn your Commodore 64 into a piano keyboard that sounds like a real
piano, as Paul continues his series on using your Sound Interface Device.

■ 46 Bit-Mapped Graphics on the Commodore 64 by Jim Gracely

Our new technical editor makes his debut with some valuable insight into
OOF'S producing high resolution graphics on your 64.

50 England Takes the VIC Seriously by Mike Smith

Four new business packages for the VIC 20, created in the United Kingdom,
will soon be marketed in the U.S. A member of Commodore's Software
Products Group in the U.K. explains them.

Omega Race
departments
Letters

9 Braindrops From the Editor

11 We'reGladYouAsked
Technical editor Jim Cracely answers readers' questions

12 The VIC Magician

Creating Attractive Screen Titles by Michael Tomczyk

15 Butterfleld
Foolin' with Boolean by Jim Butt erfield
 20 The Commodore Challenge Contest
A tit between two great game programs submitted by our talented readers. Type and
save PIO by George Currie AND The Maze by George Short. Then fill out the entry
blank and send in a copy of your best. Maybe you'll be the next winner!

25 High Scores
How do you measure up in our ongoing competition? Can you heat these champion
flam esters' scores? Send in a photo of your best.

27 User Croup Spotlight

Remote Terminal: The Old Harbor, Alaska, User Group by John O'Brien
SID

28 Access: Commodore User Groups

A complete list of user groups around the world

53 No More Pencils, No More Books...

A Flr«t Look at LOCO by David Malmberg
We welcome David as a regular contributor. Watch his column each issue for the
latest scoop on learning at home.

58 Kids' Comer
The best from our "Commodore Kids" is now a regular department, edited by Betsy
Bymeofthe New Mexico Commodore User Group. Look here from now on for things
by and about kids.

71 Jiffies
The Octopus Maze by Gerald and Betty Schueler
Alphamalch by Barbara J. Moody
Joyrite by Mike and Annette Hinshaw
Reinventing the Wheel in PET BASIC by Dean S. Rossa
STAR: An Astronomy Program by Alex Bakman

88 Programs
Some simple programs to type and save.
FOR... NEXT Sound Effects by Jim Lockrfdge
) Sul ii't lii hi1- Machine Language Revisited by Carl Robertson

90 Tele/Scope
Dynamic File Translator bv Jeff Hand

93 Program Review
Vixel for Fun and Learning by John Watkin

94 Glitch Fix
If we make a mistake, this is where we repair il.

100 New Products

New developments for Commodore computers from independent manufacturers.

103 Commodore Product List

108 Advertisers Index
staff

Publishing Manager
Neil Harris
For Even More Information
Editor
Diane l.uliold And Just Plain Fun
Technical Editor
Jim Gracely Watch These Upcoming Issues!
A... uii.:ti Editor
Betsy Byrne
Staff Writers
Jeff Bruettt
Jeff I land
Paul Higginbottom
John O'Brien
Mike Smith
Michael Tomczyk Commodore: The Microcom Power/Play. Watch for us again
Contributing Writers puter Magazine. Our June/July issue in the Fall with more fun, games and
Alex Bakman is devoted to programming. Whether home applications for our family users.
Jim Butterfield
you're a full-fledged techie or a stum
Mike and Annette Hinshaw
Jim Lockrldgg bling novice, you'll find something in
David Malm berg this issue that is meant for you.
Barbara J. Moody
David Owens
Carl Robertson
Dean S. Rossa
Gerald and Betty Schueler
John Wat kin
Technical Staff
John Campbell
Rick Cotton VOICE WORLD'S
Andy Kinkil

24K Golden RAM

BHlHIndorff
Cyndie Merten
Advertising Coordinator

Expansion Chassis
Sharon Steinhofer
Circulation Manager
John O'Brien
Circulation Assistant
Kathy Rdtfd
ONLY $149.00
Graphic Design
• Programmer's dream—Game Start address selection at 2000,
player's delight. 4000, 6000. AOOO HEX.
Neumann Creenberi! Schlenker
• Boosts VIC • ROM mode switches for
Cover Photo:
memory to memory write protec
Kevin Raber
29K! tion and PROM,
Printing
• 4 expansion slots EPROM
International l.i
with switches for in emulation.
stant cartridge selection— • Memory
faster lhan a disk. banks
• Accepts any cartridge hold pro
Powvi/I't.iy h published four times tyax by the
designed for the VIC 20* grams/data
Computer Systems Division, Cotnmodow Business
• System Reset Button. even when de
Machines, Inc., 12011 Wilson Drive, Welt Chester, PA
19380. Copyright © 1983 hy Commodore Electronics selected.
• Plugs directly into your VIC 20J.
Ltd, Nn material may be reprinted without permission. • Gold-plated connectors/
• 8 memory control switches—easy to
Volume II, Number 2. switch contacts for high reliability.
Subscription Information; U.S. subscriber rate is configure in 8K banks for custom
applications. • Fused to protect your VIC 20."
510.00 per year. Canadian subscriber rate is $15.00 per
ytar. Overseas S17.00 per year. Questions concerning • Factory tested—one year limited warranty
subscript inns should be directed In Commodore Busi TO ORDER:
ness Machines, Magazine Subscription Department, Send check or money order. Add 3.00
VOICE WORLD
Boi 651. Holmes. PA 19013. Phone B00-MS-8112. „ y 130SS Via Esperia shipping and handling. California
IPtnnsylvaniaphone ]-800-662-2Wi.J K«>iuji, 1 rjel Mar.CA 92011 residents add 6% sales lax.COD
VJC20™ Commudore «.'" CBM™ and SuperPET1" [6191^81-7390 DEALER INQUIRIES INVITED
are trademarks at Commodore Electronics Lid., PET?
isa registered trademark of Commudore Business VIC 20 is a registered trademark of Commodore Business Machines, INC.
Machines, Inc.

4 COMMODORE POWER/PLAY Summer 1983

 special keys

When you 're typing in Key Appears As Key Appears As

program listings for the VIC CLR/HOME n Commodore 5 55
shift CLR/HOME Commodore 6 II
20 and Commodore 64 you
CRSR down JO Commodore 7 n
occasionally come across a shift CRSRup n Commodore 8 it
reversed graphic symbol that CRSR right N CTRL RVS/ON shift M a
may not be familiar to you. shift CRSR left II CTRL RVS/ON N s
Ifyou find these symbols in a CTRL1 ■ CTRL RVS/ON shift N s
CTRL 2 CTRL RVS/ON H 11
program listing, refer to this
CTRL 3 m CTRL RVS/ON I n
table to find out what key CTRL 4 k fl ■
they represent. CTRL 5 a f2 H
CTRL 6 ii f3 ■
CTRL 7 a f4 H
CTRL 8 m 15 II
CTRL 9 til f6 V
CTRLO ■
n 11
Commodore 1 ;a f8 1
Commodore 2 R INST/DEL n
Commodore 3 S shift INST/DEL ii
Commodore 4 ■

GET THE MOST OUT OF YOUR

COMMODORE- 64
WITH SOFTWARE FROM ABACUS
TO ORDER NOW
PLEASE WRITE: ABACUS SOFTWARE
P.O.BOX7211,Grand Rapids, Ml 49510
For postage & handling, add $1.50
APHIC {U.S. and Canada),add $3.00 for
aphici
VPHICSG foreign. Make payment in U.S.
HICSORA dollars by check, ^j^ pjjg-"
4ICSGHAPHICSGRAPHI
money order or 9KI ah
SCREEN GRAPHICS 64 SYNTHY 64 CHARTPAK 64 ULTRABASIC 64 charge card. FOR IMMEDIATE
■ Adds 24 commands Full featured music Create Pie,Bar and SERVICE PHONE 616/241-5510
Turtle, hires,
to BASIC. and sound Line charts in high multicolor and sprite
■ Plot points, lines, synthesizer. resolution. graphics. FREE CATALOG
boxes, circles and fill Easy entry and Enter, edit, save and Sound and sound Ask for a listing of other soft
in hires and editing of notes aid recall to/from disc. effects. ware for your Commodore-64
multicolor. commands. Choose any of 8 chart , Screen copy to 1515, or VIC-20.
■ Define and animate Control ASDR, filters, formats and design 1525 or Epson
sprites easily. waveforms etc. charts interactively. printers.
■ Includes demos, Includes sample Produce hard copy Includes demos,
tutorial and manual. music and manual. onto 1515, 1525 or tutorial, manual.
Epson printer. $39.95 FOR TAPE
■ $24.95 FOR TAPE $29.95 FOR TAPE
■ $27.95 FOR DISK $32.95 FDR DISK $42.95 DISK ONLY $42.95 FOR DISK

COMMODORE POWER/PLAY Summer 1983 5

 Products for VIC 20 and CBM64
®

cryptic messages. HIDDEN WORDS will display a matrix of seemingly random

letters an the screen. Upon closer inspection, you will be able to find many words,
are approximately 25 different puzzles. For VIC ZIP . Only $29.95 tor ill 3
Ksyquest — Our exciting new Arcade type game thai takes you through the many levels
of an ancient dungeon while gathering treasures and gaining experience points. Monsters,
magical keys, and hidden passages all add to the excitement. ON CARTRIDGE lor VIC 20® .
SOFTWARE nun
Won) Wlnrd For ThB Vie 20' - (Requires ai tat 8K memory expansion.) A user friendly Skutch Pad & fihar-iii'ii — A high resolution drawing program that will allow you to save
WORD PROCESSOR with optional joystick control. Easy edit and siring manipulation com your pictures to tape. Also included is a simple to use character generator that will allow
mands thai follow the standard format. Full use of function keys for ease of use. 100% you to design a dirlerent charader lor every printable key. Create game creatures, foreign
machine language with Delete Word, Search functions and Full Justification. Use VIC Graphic alphabets, secret symbols or other special characters. One set is included. On tape for the
printer, or any cenironfcs compatible printer connected to tne user per!. On tape (support VIC 20* . $24.35
disk). 134.95.
ZAP! — Climbing the corporate ladder could be fun eicept for all thai falling paperwork. HARDWARE
■i:11. Hires arcade type games allows up to 4 players to advance through each floor and Expand-O-Ram — 16K Expansion Board for the VIC 20s with reset, memory write protect,
change levels to scale the corporate ranks. Be careful, it's easy to be ZAPPED! CARTRIDGE full memory allocation, plus TWO slots. Like having 2 products in 1. Can be used as a car
for VIC 20.• $29.95. tridge development system too, $119.00
Bomber Word - A unique graphic word game on cartndge that provides the full thrill of Untvnul Tine lntarte« A Duplicator - (Use on the Commodore 64* and VIC 20* ).
arcade action. Complete with six modes of play options for added en|oymenl. Play against With this device, you can easily load, save or even duplicate tapes with your standard recorder.
the computer or another player. 6 to adult. For VIC 20s . SZ9.95, Full 3 LEO Indication ol Data transfer. A reliable way to Load, Save and Duplicate, NOTE:
Tic Attack - A fast action arcade game on Cartridge that challenges all of your dexterity. Duplication requires 2 standard cassette recorders. Onry $49.50
Written in machine language for special audio S visual effects. Over 100 levels of play. High TymK Bufiarad Parallel Cabin with Driver - For the VIC 20* & Commodore 64® . This
score indication. For V!C 20* . J29.95 cable assembly plugs into the USER Port and provides a simple and inexpensive way to
Dol-A-Lot — As you wander through the maze of life collecting Berries, you happen upon connect a PARALLEL Printer to your computer. Only $29.95
some magical fruit. Pick one and thB treasures appear, but the Meanies are out today look Driver Cartridge tor VIC 20" — Take full advantage of the capabilities of your Parallel Printer
ing to spoil your run. Defeat them and continue on to a higher level. An ever changing maze including full Commodore graphics and formatting. Available for SEIKOSHA. C. IT0H. OKIDATA,
plus arcade type animation and sound will provide a real winning CARTRIDGE for Hie VTC and others. Specify printer. Only $29.95
»*■ 129.95 Tynac "ConnMNon" — A truly intelligent parallel interface for the VIC 20* and Commodore
Trtpla Pliy — Three word games that are both fun and educational. The games that are H' . It will make your pnnier operate like the COMMODORE ^^^^m
included are CROSSWORDS (requires at least BK expansion). Five complete puzzles are in Printer including graphics, text symbols, tabs, and vir
cluded and each puzzle has up to 100 different words. CP.YPT0-S0LVE will help you solve tually every otfier printer function. Plugs into the
those cryptic messages found in newspapers, books, and -lagaanes with a systematk; computer
technique. Included are approximately 50 different puzzles. You can even enter your own
serial socket. Available for most popular
parallel printers. $119.00 ^A micro
Dealer and Distributor
umrE
Inquiries Invited DISTRIBUTING INC.
NOTE1 Wo solicit liarflware and soliware items for iheVIC 20' and CBM 64"'. Royalties, license lees or outright purchases
1342 B Rt 23, Butler, NJ 07405
can be neooliiileO. CBM 64'* 8 VIC 20L are Registered Trademarks ol Cominodoie Business Machines Inc. 201-838-9027
letters
Reach
for
MICRO-ED!
To the Editor, Over 500
In your Fall, 1982, issue you said To turn off this program, type
you couldn't restore the expanded VIC SYS 64802 Educational
back to the unexpanded VIC without Programs for
the hassle of removing the memory Sincerely,
expander. Actually, it is possible with Craig Bruce
the following program: •Pet*
• Vic20™
1Q P0KE44.16-PQKE46,16:P0KE48,lfiiPQKESSj16:P0KE642,
16:POKE32/39'POKE644j30
20 P0KE5S,30:P0KE649,30!P0KE36366,150■P0KE36869j249
and
39 POKE4096.0 • The new
40 PRINT"n":NEW
50 REM**TVPE SVS64802 TO CANCEL EFFECTS*** Commodore 64™
VIC 20 and CemmWort 84 arc iratfemarks 01 Commodore
Electronics Lid
PET * a ir^isrorM trademark or CamTMoro Hua.nMi Wacninea. i

Send for FREE CXIALOG

SPECIFY MICRO
To the Editors:
My company has resisted the Thank you again for the affordable
'computer invasion' for some time. serious computer. (P.S. Why DO people Please Send me your
We, rightly or wrongly, scoffed at the buy Apples at $1,000 more for less FREE CATALOG(S)
idea of cost/effectiveness, etc. This was computing power?) C
until we broke down and bought the
Commodore 64! To tell you the truth, Sincerely, Name

I was truly petrified of the thing, think James P. Boshnack

ing its first readout would be "you're Twenty-First Century Concepts Address
fired!" Well, I am writing you this letter Houston, Texas
to tell you that it has not been that
City
way—that the 64 and I are on VERY
good terms indeed.
Slate Zip
Even without the disk drive that is
on order, we have found the machine
to be sturdy, totally flawless, and forgiv
ing. Only twice have we gotten per for □ PETD VIC"
turbed, and this due to our turning off
□ New
the machine before saving a program.
In any event, this serious business Commodore 64™
machine has been stolen by the com
Micro-Ed, Inc.
pany president and now is safely nestled
in my home, doing spreadsheets that
P.O. Box 24156
your guidebook showed me how to Minneapolis, MN 55424
erect. I've even got my kid jealous,
You can call
since the game I've created (about 9K's
us at
worth) is a full-bore re-creation of the
612-926-2292
history he's studying. VIC JO ana Cam mod arc ft* are trademarks oi
Commodore Electronics Ltd.
PET is a reQiSlereO trademark of Commodore
Business Macnln&E. Inc.

COMMODOREPOWER/PLAYSummer 1933 7
 OUR MOST POPULAR "ARCADE GAME" TAPE PROGRAM
FOR VIC 20 COMPUTERS

SUPER PARATROOPER!!
FANTASTIC SOUND AND ACTION WITH SUPER HI-RES GRAPHICS
(A PBOTECTO ENTERPRIZE EXCLUSIVE)
By Nic Dudzik

JOYSTICK
OR
KEYBOARD

SUPER PARATROOPER Is a High Resolution game The High Resolution graphics helicoptors are fan
that doesn't let you make any mistakes. You are in tastic. They look exactly like helicopters! The
charge of a big gun that sweeps back and forth by paratroopers are super realistic. Their chutes open and
your command. Helicopters Mil the sky, (and we mean then they drift down to earth. If this weren't enough
fill the sky!), dropping paratroopers. Your mission Is to the sounds are fantastic. There are helicoptor blades
keep 3 paratroopers from hitting the ground on either whirring and you can hear the howitzer pumping
side of your gun. But that's just the beginning. You shells. When you hit a parachute you hear this ripping
score by hitting the hellcoptors or the paratroopers, sound and the paratrooper falls struggling to the
but If you miss a shot It subtracts from your score. ground! NOW HEAR THIS! - If you let three
Therefore, you must make every ahot count to make a paratroopers land, they bring in a tank from either
high score! IT HAS FOUR FAST ACTION LEVELS side and blast you!!! This game really shows off the
TO CHALLENGE THE BEST PLAYER. sound and graphic capabilities of your VIC. SUPER
PARATROOPER IS OUR NO. 1 SELLING ARCADE
GAME — you've got to get this game to believe it —
LIST $24.95- SALE $19.95 we are so sure you'll like it we'll give you "10 DAY
FREE TRIAL."
VIC 30 is 9 trademark or1 Commence EUCIromcs Lift

RUNS ON STANDARD VIC 20~

we are
commodor VIC
It
experts!! ENTERPRIZES (factory direct)
BOX 550, BARRINGTON, ILLINOIS 60010
Phone 312/382-5244 to order

S COMMODOHEPOWER/PLAYSummer 1983
braindraps

And More Beginnings

I thought I was excited about the lessly. His "First Look at LOCO" in be sure to ask the manager why.
last issue, but this one may have it this issue gives you a terrific start on Our list of Commodore user groups
beat. That's because this issue marks using Commodore's new LOGO pack is fast approaching 300, worldwide.
the beginning of two new departments age to create exciting graphic designs And, what do you know, we finally got
headed up by two people who are not on your Commodore 64. Stay tuned ail the groups entered on a data base!
only fun to read nut who wil! help you for more. That means we can start communi
learn a great deal about your computer. And yet another beginning. By the cating with them via the mail, which
Betsy Byrne, president of the New time you get this issue Commodore we hope to do periodically. (In fact,
Mexico Commodore User Croup—not will have moved down the road to our some of the groups may have already
to mention the mother of four chil new quarters in the great mirror- gotten Betsy Byrne's questionnaire,
dren—has plunged enthusiastically walled building in the woods outside requesting information on what they'd
into running the new "Kids' Corner". West Chester. And for the first time like to see in the Kids' Corner depart
You probably remember Betsy's very in the history of our magazines, the ment of this magazine.) By the way,
funny account, in last issue's User whole publishing department will be if you're thinking about starting a
Group Spotlight, of how she and her in one place. It's hard to imagine what user group, I'd suggest you take a look
family became involved with Com that will be like. I'll probably gain at Jeff Hand's article (called, coinci-
modore computers, as well as her in weight, since I won't be putting in as dentally, "Starting a User Group") in
formative review of Gortek and the much mileage every day running from the April/May issue of Commodore:
Microchips in that same issue. Betsy one end of the building (where Jeff the Microcomputer Magazine.
wants programs, reviews or interest Hand has been all this time) to the See you in the fall, after the mos
ing computer-related stories by, for or other (where they hid Jim Gracely quitoes have subsided. C
about kids. If that sounds good to you, when he came in February), it crossed —Diane LeRold
turn to page 27 for full instructions on my mind that we may all find out we lCditor
how and where to send your stuff. Oh, can't stand each other, once we're in
and while you're back there, don't for such close proximity.
get to take a look at what Betsy's put to Whatever comes of it, please note
gether for this issue. Her Commodore that the new Commodore Business
Kids are pretty amazing. Machines address is now 1200 Wil
And what can I sny about David son Drive, West Chester, PA 19380.1
Malmherg? Those of you who have heard a rumor that we do have phones
read his articles on Turtle Craphics there, but I don't know what the num
and LOCO in some of the other leading ber is, yet.
computer magazines will undoubtedly Tired of hearing all this great news?
be as delighted as I am about having Well, sit right back down because I'm
him as a regular contributor. David not finished yet. With last issue both
will be writing our "No More Pencils, our magazines began to be sold in
No More Books..." column, covering 800 Waldenbooks bookstores across
the many different facets of learning at the country. That means those of you
home with your computer. I'm not sure who haven't managed to send in your
what David has planned for upcoming subscription yet will have an easier
issues, but whatever it is, you can bet time finding us. So look for us in
you'll learn a lot—and learn it pain Waldenbooks, and if we're not there,

COMMODORE POWER/PLAY Summer 1983 9

 Standard VIC 20" (CG058) Rescue From Nufon $12.95
no additional memory needed Must find 30 hostages in this 100 room. 5 story,
(CG008) Alien Panic $12.95 alien infested, graphic adventure game. A
Race against time as your guy digs holes to trap continual big seller. Keyboard only fn. = north w =
aliens in 4 floor laddered, brick construction site. west etc.)

Requires joystick. (CG068) The Catch . . . $12.95

(CG096) Antimatter Splatter $24.95 Another all machine language game based on the
This game is as good as its name. Another pure principle that one person with one joystick
machine code game, this one is fast! The alien at guiding one catch/shield can catch everything
the top of the screen is making a strong effort to that one alien can throw at one. The action comes
rid the world of humankind by dropping anti sfowly at first but by the fourth wave you'll be

matter on them. The splatter cannon and you are aware of ... "The Catch" . . .

our only hope as more and more antimatter falls,

Joystick again is optional equipment. Expanded Memory Vic 20"Games
(CG026) Collide $12.95 (CG090) Defender On Tri $19.95
"Vic" controls one, you the other as cars go Pilot a defender style ship on mission to save
opposite directions on 4 lane track. Requires trapped scientists from a fiery fate (they are
joystick. aboard an alien vessel deep in the gravity well of
(CG094) Exterminator $24.95 sol). Excellent graphics. Short scene setting story

Recently scoring a rating of 10 out of a possible in the instructions. "Defender On Tri" requires at
least 3K added memory.
10 this game was praised as "one of the best I've
seen on any computer" by a prominent reviewer (CG092)3D Man $19.95
in a leading magazine. The idea is to shoot a The maze from probably the most popular arcade
centipede before it overuns you, the problem game ever, with perspective altered from over
being every time you hit it, it divides into two head to eye level. The dots, the monsters, the
separate shorter ones. Several other little power dots, the side exits, the game is amazing.
creatures bounce around during this struggle. All "3D Man" requires at least 3K added memory.
of them lethal. 100% machine language makes
(CG088) Space Quest $19.95
the rapid fire action very smooth. A joystick is
Our first 8K memory expander game and its a
optional, but as always, recommended, (a trac
beauty. The scene (a short story is included) is far
ball is also very nice!).
in the future, a time when man's knowledge has
(CG054) Krazy Kong $12.95 reduced an entire galaxy into a mapped series of
Three screens, a gorilla, barrels, and changing quadrants. This game has stratagy (you plot your
difficulty levels help to make this one of our most own hyperspace jumps on Galaxy map), action
popular. Joystick optional. (against a starry background you find yourself
(CG098) Racelun S19.95 engaged in a dogfight, laser style), exploration

Extensive use of multicolored charactercapabili- (you must fly your ship deep into caverns to pick
ties of the "Vic" make this one very appealing to up necessary fuel). "Space Quest" requires at
the eye, Fast all machine language least SK memory expansion and a joystick.

action, quick response to the stick or

keyboard controlled throttle, combine
Commodore 64™
with the challenge of driving in (CG602) 3D-64, Man S19.95
ever faster traffic to make it This available on the expanded "Vic 20"
appeal to the rest of the body. game, has been completely rewritten for
Joystick controlling the 64 and uses sprites, sounds, and
is an option. other features not available on the "Vic".
This one requires a joystick.

P.O. Box 156, Shady Cove, Oregon 97539-0156 Mastercard and Visa cards accepted C.O.D. Orders...call {503) 878-2113
Vic 20 and commodom 64 mo uaUumarka oi commodore Elocuomca Lid. Games will be on tape unless you request disk. Ask (or our FREE catalog!

10 COMMODORE POWER/PLAY Summer 1933

we're glad you asked

Our technical staffis glad to answer your questions. Please direct them to the attention ofJim
Gracely, in care of this magazine.

Q Page 114 of the VIC 20 Computer The "X" in the formula comes from 9 FORX=1TO10:PRINT"SWHI"
Guide says that variable names may be the table on page 216. This new for
a letter, a letter followed by a number, mula will work with or without mem 20
or two letters. I have used variable ory expansion. : 007010
names such as "COUNTER" and The table on pages 83 and 84 doesn't
"FIRSTNAME$" without any syntax work with 8K or more expansion RAM (That's 29 [CURSOR DOWNJs)
errors. Is this an error in the Com because the location of screen memory Now move the cursor to the mid
puter Guide'! The only time I get a syn moves. Register 36869 contains a parl dle of the screen, type some words or
tax error is if 1 use a BASIC command of the screen memory address in bits -1, characters and then type RUN.
or function in the name: "FACTOR", 5 and 6. When 8K or more expansion
for instance, cannot be used because RAM is added, screen memory moves Q How do I move the beginning of
it contains the operator "OR". from 7680 to 4096 and the start-up BASIC so that I can protect a part of
A No, this is not an error in the VIC value of register 36869 changes from BASIC RAM?
20 Computer Guide. As far as BASIC is 240 to 192. You can still use the table A Moving the beginning of BASIC
concerned, a variable name has one of on pages 83 and 84 with 8K+ RAM by is not hard to do but there are a couple
three forms: a letter, a letter followed subtracting 48 from each of the values of rules that must be followed.
by a number, or two letters. Regardless in the "NUMBER" column. The operating systems of the VIC 20
of what you name a variable. BASIC The POKE values for locations 52 and the Commodore 64 require the
will reduce it to one of these three and 56 can still be used but they will first memory location of BASIC to be a
forms. The reason for this is that severely limit your program size. "0". The registers 43 and 44 must con
BASIC only allots two bytes of storage Instead of protecting the program tain the value of the second memory
for each variable name. Any characters mable characters it is a better idea location of BASIC. If BASIC starts at
left over are ignored. Be careful if to move the beginning of BASIC to a 2048, location 2048 must contain a "0"
you're going to use long variable location after (below) your characters. and registers 43 and 44 are poked with
names: "COUNTER" and "COLUMN" See the next question on moving the values for 2049 (43= 1 and 44=8).
both start with "CO" and BASIC will the beginning of BASIC for the cor Once registers 43 and 44 have been set,
think that they are the same variable! rect procedure. a CLR must be performed to reset all
Qonpage8oftheFalll982 of the other memory pointers, and a
Q I have been using programmable
NEW command is used to "straighten-
characters on the VIC 20 for some Power/Play there is a tip for scrolling
the screen backwards. I tried typing it up" the new BASIC location.
time. However, with 8K or more of
A simple program can do all of this
expansion RAM the formulas in the in a number of ways and I can't get it
for us:
VIC20 Proc/rtimmer's Reference Guide to work.
no longer work! Please explain how to A The instructions for using this tip 10 BG = LOCATION + 1
use programmable characters with 8K were not very clear. It is a nice little 20 HB = INT(BG/256)
or more expansion RAM. trick and here is the way to enter it
30 LB = BG - HB * 256
A Now here's a popular question. into your VIC 20 or COMMODORE 64:
Turn to page 215 of the Programmer's 40 POKE LOCATION,0
Reference Guide and find the formula 50 POKE 43,LB : POKE
PRINT"[CLR HOME][CRSR
in the section entitled "Character
DOWN] [SHIFT CURSOR 44,HB : CLR
Memory Location". The formula looks
LEFT][SHIFT INST/DEL]" 6 0 NEW
like this:
:POKE218:158
Replace the variable "LOCATION"
POKE 36869, PEEK(36869)
with your new beginning location for
AND 15 OR (X*16) This is the way to use this command BASIC. After you have typed in the pro
in the direct mode, it will scroll the gram (and saved it!), type RUN. Now
Scratch out that formula fit's type LIST. If you typed in the program
screen one line backwards (down). To
wrong) and replace it with this one: correctly, nothing will be listed! Every
get a better idea of what you can use
this for, try entering the following two thing between the beginning of BASIC
POKE 36869, PEEK(36869) line program into your VIC 20 or RAM and your new beginning location
AND 240 OR X Commodore 64. is protected (and hidden!). C

COMMODORE POWER/PLAY Summer 1983 11

 the vie magician

Creating Attractive
Screen Titles
by Michael S. Tomczyk
fiL-printed from Commodore Magatinv, Aujjusl/Stptcmher 1982

Displaying an attractive screen title is always a nice The VIC uses "shorthand" to display the CLEAR com
way to start a BASIC program. You can even let the user mand inside quotation marks, so when you hold down
choose his own title, and display it dramatically when the ISHIFTl and press |CLRVHOME| the VIC displays a reverse
program starts! heart, which means "CLEAR." The spaces you typed appear
One thing to remember when choosing a title is to as blank spaces, like this:
try to keep the length of the title less than 22 characters
including spaces, because the VIC displays 22 characters 10 PRINT" □ VIC MAGICIAN"
on each line and your title wiil "spill over" to the next To display your title, type the word RUN and press the
line if it's longer.
I RETURN | key.
Centeringyour title
If you have a problem or make a mistake, type LIST and
There are lots of ways to make attractive titles, but one
hit [RETURNl, then retype the line.
of the easiest techniques is centering your title at the top
of the screen when the program begins. Using the SPC Command
To center your title in the middle of a line, the first There's another way to put spaces in your BASIC pro
thing to do is count the number of characters in your title. grams ... by using the SPC command. If you type PRINT
Let's say your title is "VIC MAGICIAN." SPC (5) your program will insert five spaces. Remember
DnnnDDnnnaaaDDnannnnnn the SPC command is never enclosed in quotation marks
□ □□□□VIC HAGICIANDDDDD but is always outside of the quotation marks... and you
This title has 12 characters including the space. Now must always use the PRINT command hefore the SPC
subtract that total from 22 (the number of characters on command. Here's how you can use the SPC command
one line). The answer (22-12) is 10. That means you have lo PRINT! he line you just typed:
10 spaces ''left over" after PRINTing your title on the line.
To center the title, you want to have an equal number of 10 PR INT'j SHIFT] |CLR/HOME~]"SPC(5)
spaces on each side of the title, so next we divide the "left "VIC MAGICIAN"
over" spaces by 2. Since 10/2 = 5 we know to put 5 spaces
Here's another example of the SPC command:
on each side of our title if we want to center it.
The following one-line program centers the title "VIC 10 PRINTSPC (5) "MOVES 5 SPACES'^PC(3)
MAGICIAN" on the screen by CLEARing the screen and "MOVES 3 SPACES"
then PRINTing the title five spaces over from the left mar
gin (To make each space in your program, press the long Displaying Your Title in Reverse
space bar once, quickly. Any space you include inside the Now that you've created a title. Let's "dress it up" a
quotation marks will appear as a space on the screen when little by reversing the title colors. To do this, you'll have
the title is PRINTed. Notice that you don't have to worry to retype line 10. This time, just before you type the title,
about the spaces on the right side of the title because hold down the[ CTRL]key and press the |RVSON] key.-
they're automatically left blank.) This makes the title print in reverse when you RUN the
Type this line and hit the RETURN key: program. Notice that when you hold down I CTRL I and
press IRVSONI. the VIC displays a REVERSE R. Type
10 PRINT" ISHJFfi ICLR/HOMEl iSPACEl I SPACE] the following and hit the [R~ETUR~N~1 key:
ISPACEI [SPACE | [SPACEl VIC MAGICIAN" I TYPE THE "

12 COMMODORE POWER/PLAY Summer 1983

10 PRINTJSHIFfi |CLR/HOME| [SPACE | characters in the title, which was INPUT in line 10 as "T$".
|SPACE11 SPACE] |SPACE| 1 SPACE' [CTRL] Remember the centering formula we used at the begin
ning of the article? Well, this whole formula is included in
IRVSONI VIC MAGICIAN" line 20 like this: (22-LEN(T$))/2. If we use VIC MAGICIAN
The line you typed should look like this on the screen: as our title, the LENgth is 12 characters, and (22-12)/2 - 5.
So this'formula gives us the number of spaces on one side
10 PRINT' VIC MAGICIAN" of our centered title. (If you're wondering why we have
two parentheses after TS, it's because all BASIC formulas
Now type I RUN I and hit | RETURN | to see the new title.
must have the same number of left and right parentheses
What if you want to reverse the whole line, including
and the two right parentheses balance out the two left
spaces? Type this line exactly as shown and hit jRKTURNI,
parentheses. This is an over-simplification but it's impor
then tvne[RUNiand IRKTL'RNJ to see it:
tant to remember because one of the most common mistakes
10 PRINT' JSHIFTI ICLR/HOMl'l |CTRI,| when creating formulas for calculation is not balancing
left and right parentheses.)
IRVSONI L5 spaces] VIC MAGICIAN [5 spaces]"
Next, we use a counting command to tell the VIC to
This time we put the REVERSE ON command at the count five spaces and PRINT our title. We do this by saying
beginning of the first blank space and we added five blank FOR X = 1 TO 5 (remember our whole formula equals 5),
spaces on the right side of our title. When you want to PRINT a SPACE. The semicolon means print everything
print reverse spaces (solid blocks) on the screen, you have next to each other, and the NEXT command means "keep
to include all the spaces that you want to appear as solid PRINTing a SPACE until the upper limit (5) is reached."
blocks. That's why we include the right side spaces here. After our five spaces are PRINTed, we PRINT TS, which
is our title.
Letting the User Choose a Title
One of the nicest cosmetic touches you can add to a
An Easy Way to Reverse a User
title is letting the user choose his own title. The following
program asks the user to type in a title, then centers it at
Defined Title
the top of the screen. You can use these two lines at the The following program reverses the user-defined title
beginning of any BASIC program. and displays it at the top of the screen, flush left:

10 PRINT1 ISHIFT | |CLR/HOME | TITLE";:INPUTTS 10 PRINT"ISmFTl ICLR/HOMEI TITLE";:INPUTT$

20 PRINT"!SHIFT| |CLR/HOME|";:FORX = 1TOI22-LEN 20 PRINT" ISHlFTl |CLR/HOMEl"::PRINT'|CTRT1
(T$»/2: PRINT JSPACE|"::NEXT:PRINTT$ RVSOiN|"TS;:FORX = LEN(TS)TO21:PR1NT
'1CTRI.I IRVSONI SPACE ";:NEXT
After you enter this program, type the word RUN and hit
thelRETURNIkey. The screen will clear and say, ■'TITLE?" Adding Colors to Titles
Type in a title and hitlRETURNl The title appears automat Another dimension you can add to your screen titles
ically centered at the top of your screen. is color. The color command works just like thelRVSON]
The key here is using the INPUT statement in line 10 command. Hold down the |CTRL| key and press the color
to define the title typed in by the user as TS. Now. in line 20, key you want. The following program PRINTS a title in red,
we can use a special BASIC command called LEN to deter then returns the color to blue so the rest of the program
mine the LENgth of TS. LEN (T$) counts the number of will continue in blue. |CTR1.) JREP|means hold down

COMMODOREPOWER/PLAYSuinmer 1983 13
Hie magician

the [CTRLl key and press the key marked |REP) CRSR DOWN WILL APPEAR AS A REVERSE Q on
on the keyboard: your screen.

TYPE THE "3" KEY 10 PRINT'|CLR/HOMEjTITLE";:INPUTT$

10 PRINT' jSHIFTl |CLR/HOME| TITLE";:INPUTT$ 20 PRINT1 [cTr7HQMK1":FORX = 1TO10;
20 PRINT'[SHIFT) |CLR/HOMKl"::PRINT" ICTRLl PRINT' |CRSR DOWN!";:NEXT
[RVSONl [CTRL REDl" 30FQRX = 1TO(22-LEN(T$))/2:PRINT'1SPACE|"
T$;:FORX=LEN(TS) TO21:PRINT'[CTRLJ ;:NEXTX:PRINTT$
IRVSONI fiPACEl" ::NEXT:PRINT"[CTRL] IBLUi
Notice that in line 20 we told the VIC to PRINT ten
TYPE THE'7" KEY CURSOR-DOWNs, moving the position of the cursor
10 spaces down. Then in line 30 we used our centering
Experiment! formula to center the title in the middle of the screen. You
There are lots of other ways to create interesting screen can include spaces, cursor up or down movements, Control
titles. For example, try centering the title in the middle of Reverse On and Off, and Control Color commands... as
the screen (hint: use the ICRSRDOWN] key in a PRINT long as you put them in quotation marks. Just PRINT
statement, and the same centering formula we used for them like any letter, number or graphic symbol and they
centering the title horizontally). You can also create will appear in your program.
borders around your titles, on both sides or on top and As a final variation you might want to "announce"
bottom, by using a graphic character. your title with a sound effect. Try putting this one-line
Try putting graphic lines or bars above or below your program on the line immediately before the line that
titles, like this: PRINTs your title:

5 PRINT 'iSHIFTriCLR/HOMEhiFORC = 1TO22: 25 POKE36878,15:FORM = 200TO250:POKE

PRINT' I |"::NEXT 36876,M:NEXTM:POKF,36876,0
10 PRINT'VIC MAGICIAN"
20 FORG = 1TO22:PRINT' Now you're on your own. Try different colors, sound
effects, screen positioning, and other variations. C
I insert above title!

title line(s) here

jinsert below title|_

Hold down the SHIFT key and type the "C" key to get
this graphic symbol

Here's another variation to try. This program centers a

one-line title on the screen. Try changing the number 10
in line 20 to move the title higher or lower on the screen:

14 COMMODORE POWER/PLAY Summer 1983

bullet-field

Foolin' with Boolean

by Jim Butterfield

There's something in your integers or floating point variables, are chosen with letters like P and K,
Commodore computer that's so and even array elements. Arrays? That so that we may end up with something
simple—and so powerful—that you means you can have tables of "true" like X=PORK (P OR K, get it?). Don't
probably won't notice it unless you're and "false" conditions. let it confuse you. You may be com
told. It's called "boolean variables" and Keep in mind that in making forted to know that such programmers
it can change your (programming) life. boolean variables, you can use any often get caught by their own clever
At first, it seems confusing. A BASIC true-or-false test. That includes ness; if you had two boolean values
line such as X=Y=7 seems wrong. But strings, comparisons, and tests con called T and Y, and tried to code some
if you try it, you will not get SYNTAX nected with OR or AND relationships. thing like IF TANDY THEN..., the
ERROR... the computer will happily Here are some valid boolean machine would quite properly print
accept the command and print READY. calculations: SYNTAX ERROR. Why? Not because
Well, if it works, maybe it means: set of any brand considerations, but be
both X and Y to 7. Nope. PRINT X;Y cause the computer would think you
B-SE52B?
will give values of 0. meant the TAN function and would
Using parentheses helps make run into trouble there.
D=<n=2 HMD V-1384>
things more understandable. If we
had typed: X=(Y=7) we can see that Let's look at the last one more Some Handy Uses
it makes sense if we add the following closely. It seems to be looking for a Let's talk about a number of
information: X will end up as either leap year (1984, month 2) using an situations in which boolean values are
"true" or "false". If Y=7 then X will AND expression. Each of the relation especially handy.
be "true" (that's represented by a value ships on either side of the AND is an Deferred decisions: Sometimes you
of -1), otherwise X will be '"false" (a individual test... and wherever we need to make a test at a certain part of
value of 0). X has a new meaning. It's have a test, we may replace it with a the program, but you don't want to use
not really a value... it's a true/false boolean value. So we might say: the results of the test until later. For
condition. We call this type of thing a example, you're going to do some
"boolean" variable. arithmetic on variable X; when you're
If X can be true or false, we should finished, you want to take some action
D=<Fl RND B3 based on whether X was originally
be able to say such things as:
IF X THEN PRINT "HELLO" It's all logical—literally. When you greater than 99. We've changed X,
.. .which means, if X is true, perform look at an expression such as the one so the test must be deferred. Before
the rest of the command. If you've above, think: A is a boolean, either the arithmetic, we do the test with
been typing along, X will be false and true or false; the same is true of B; B = (X>99). Now we go ahead with the
so the command will not print HELLO. therefore, if both A and B are true, arithmetic. Finally, we can act on the
We can try the inverse by entering: then Dwill also be true. earlier test by writing IF B THEN....
IFNOTXTHENPR1NT"HI" Some clever programmers (not you Complex expressions: Sometimes
.. .and for "false" X the line will be and 1, of course) like to obscure things we have a number of tests grouped
completely executed and print Hi. by leaving off the parentheses, and leav together and it's hard to keep them
ing out spaces. The previous expres all straight. We can make everything
Boolean Types sions would then become D=AANDB. very orderly and very neat by assigning
Any numeric value can be a boolean: To confuse you further, the booleans interesting conditions as boolean

COMMODORE POWER/PLAY Summer 1983 15

 mmm-
2ks&&':: :"■: ::

ADVENTURE.
SB
THE KEY
IS PL/WEDWn*

YOUR COMPUTER
$14.95

16 COMMODORE POWER/PLAY Summer 1983

ssggss

f
es\denw
COMMODORE POWER/PLAY Summer 1983 17
bullcrficld

values. Thus we can set things like have the A or F matches counted more 3 L,-i
B=balance over S1000, V=high than once. 24G r-RlNT;.
volume customer, P=payment made The object is to guess the com
within the last 60 days. Now we've The guesses are inputted into array
puter's secret code. Let's make a secret
done our tests, we can efficiently code X. We use a GET statement and forbid
code as an array of four values:
things like: the user to type any keys other than
LC10 RO'I BOOLE RN Bft< I I AtoF:
IF NOT B AND NOT V AND NOT P - fin BUTTI !■'! II LD
THEN PRINT "DEADBEAT!" i' 5 ■'■ FOP . 1 ; Q ■:
ue dim c»;4) .:■:■-■: ',r-K4 >
IF B AND V AND NOT P THEN PRINT . i: ' get ;■■:; fell X*- n ■■; ,,yrf

-HURRY IT UP!"
IF NOT B AND V AND P THEN PRINT Array C will hold the mystery :: !"' ;s'~RSC . ;■;:.! ■■ ■;;■:■■'■
"WHERE ARE YOU?" combination. X will be your guess. .'■:i i1 ■■:■■ 3 OP :OC G'! ' 1 1
M and N are "matching" flags—they
. ■
The booleans make the combina will be in boolean. Now let's scramble
FT'IMT ■.!■■; K<J
tions much more readable. our random number generator, so
that each game will be different, and
HCKT .1
IF-THEN-ELSE equivalents.
You can make logic-tight alternative give instructions.
Here comes the testing for matches.
decisions using boolean values. Sup First, we need to test to see how many
pose we wished to code: IF the month exact matches we have—letters that
is less than 12 THEN add one to the I io :■' ' : i i"i "TR7 m
,; ; . IV ■■■:■■■ match in the same place. Note how
month. ELSE set the month to 1 and
we use array M{J) as a boolean; M(J)
add 1 to the year. This could get 140 PRINT "OF I
will be true if a match, and false
messy, since the month might change cunnncTpRE •■■ \o" if no match.
while we are still testing it, but it turns 156 PRINT "LETTERS f)
into crisp coding with: TO r. .. " ■ ■-■■ !■_::; ;N-h;

160 :"■■"■!;: "WflTCH FOR ■ ::■ rOf: :...! ' 0 ■!

1
MUI : [P] '■■ . " 20 V\< J ■ i . ■ ! ■ ■
[1 B !l !l I! !■! .M
Here comes the mystery com : to u< j iSBn<:: r:- ■ :ir ti.;.r^
IF MOT B rMEN M-l
bination, calculated by the computer THEN M--M+3
and placed into array C: 340 HEKT J
An Example: Bagels
Bagels is a simple guessing game. We mark off both M{J) and N(J) as
£00 I OR J :i TO 4
It has been written many times before, true if we find a match. This tells us
;:i;i i < I .INT<RHDa >
but let's do it this time with a boolean not to try to match these letters again.
f i ■, i. i
slant to the coding. The tough part Now we go for the out-of-position
of a bagels program, by the way, is 220 NCHT I
matching:
making sure that letters are not
counted twice; so that if the secret We will count the guesses as they 358 FO& -J-: TP ■■: : '•"
code is ABFF and I guess FAAC I won't are made. Here comes the question: r- .TV DOTO -!■ 8

18 COMMODORE POWER'PLAY Summer 1983

 VIC 20™
24KRAM

11 9.95
• increase usable RAM to 28.159
bytes (800% increase)

• plugs directly into VIC*

• low power, full buffering on

all signals

• 6monlhpartsandlaborwarranly

To order: Send check or money

If M(J) is true, we've already matched 458 IF 0 THEN PRINT order to Interface Computerware
this letter, so we skip. '■VOU GOT IT" P.O Box 862. Orem. Utah 84057
(801) 226-3809. Add $3 for ship
350 FOR K»1 TO 4:;TI- The next four lines are overdoing it, ping. Ut. residents add 5%.
hh'.IO fSOTO 400 really. But I wanted to show that you Dealers Welcome.
can take buoleans to the extreme. If
If N(K) is true, we've matched the
you can't fit all your IF action onto one
letter of the guess and we skip. Now VIC 20 i', d Trademark or CommoooJe Eloctionlcs Lid
line, just keep repeating your boolean
the test for a match:
decision:
370 !;:-■.■:";;:■:;.T': ^::;0<>>
333 MCJOsafei ,-N>;iO=sB 460 IF HOI E THEN PRIM"

Again, if we find a match, we mark

■■I ."«
11 ! r WAS
[F HOI '■'-■
";
Tl l'.;il rOR
PT Attack
off the appropriate position in both the comes to the VIC 20™
.rai to 4
mystery number and the guess so that 5 Game Variations
.,:;;: IF MOT I.: 7WEK PRIM
it won't be used again. We should 1 - 4 Players
also count the matches we find, and if ■ ! IE*i:cC-J ■'-.■!:>!■ is
Compete against opponents
there's a match skip to the next letter: ■■■■■:■ rr NOT B THEN NEXT
or

"VIC"
.■■■:. rr b ruEN n«n+i
Color lound graphic!
s6o rc lie And to complete the game, we'll ask
•

4813 NEXT K the user if he or she wants to try again:

Written In Basic and
4-1© NEXT I can be lilted
1500 PRINT:INPU •

Now, we've found the number of Peek imo our

exact and out-of-place matches. We programming techniques
■ , ' i . :;■ ->^BD GOTO
could just go ahead and print them. »

On the other hand, we have something Add to or change the program)

special to do if the player has guessed
•

four exact letters: the answer has been Summary Include!.! i* ■> pamphlet
explaining cverv variable
found and we may need special action. Booleans may seem like a trick •

Let's log this condition into a boolean: when you first meet them. But they 5 great games - 1 sreal
are sound coding. Understanding them demonstration of uamc
programming
420 B=s "Pi'*42 is the key to more efficient programs. C
4.Li0 PRIN1 n?"CKRCT";H? I casette $19.95
'"WITCHES" Additional easettesSl 5.95
CsinBdlBn orders * iidd I 5%
440 0-0+1 :; IF NG'l B HMD
Maine residents - >uUl 3% lalu 'ax
0-!l I. GOTO S40
^j Softwear International
Now we take advantage of our
Cj> 164 North Street
boolean, B:
^r Calais, Maine 04619
VK' ZO^a i »i Oannwdon ElceUonlo Ltd.

COMMODORE POWER/PLAY Summer 1983 19

the commodore challenge

Congratulations to
Commodore Challenge
Contest Winners
George Currie of Eugene, Oregon, for PIO
and
George Short of Easton, Maryland, for The Maze

We received a slew of superb software from our talented readers over the
past few months—so much so that we ended up with a tie between these
two excellent game programs. The judges were evenly divided between the
two. except, that is, for the judge who said we should publish both. So
that's what we decided to do.
Thanks to all of you who submitted programs. They were all, as usual,
great fun. (We never seem to have any problems getting volunteer judges for
this department, for some reason.) And keep up the good work. Maybe next
time the winner will be you.

The Commodore Challenge

Prizes • Prizes • Prizes

If you've been playing around at home developing original Business Machines, Inc., upon submission. Winning
games and programs for your unexpanded VIC 20, send your entries published by POWER/PLAY will become public
best—on cassette or disk, please—to the Commodore domain software.
Challenge contest. Include a brief description of the program's Pill out the entry form below, and submit it with your
purpose, including documentation on how to use it. If it's a game or program to:
game, be sure to include instructions. Commodore Business Machines, Inc.
Programs requiring memory expansion are eligible, too, 1200 Wilson Drive
but will not be published unless space allows. West Chester, PA 19380
Winners will receive a VIC 20 8K Memory Expander Attn: POWER/PLAY
Cartridge. All entries become the property of Commodore

Commodore Challenge Contest... Entry Form

Name_ Age Phone_

Address. Program Title.

City_ State_ Zip

1 understand that my software entry becomes the property of Commodore Business Machines, Inc., upon
submission, and that winning entries published by POWER/PLAY become public domain software.

Signature.

Parent's signature, if contestant is minor.

Void Where Prohibited

20 COMMODORE POWER/PLAY Summer 1933

 PIO
by George Currie
Fur Unexpanded Vic 2u

Guide your centipede-like animal down a course full oftrees in this fast-paced game. Uses keyboard
controlonly. Instructions are in the program.

5 H 1=700 ■ H2=5015 ■ H3=588" HU=" SWEX" : H2*=" W€X" ■ H3*-" a

10 LI=?;PRINT('."B15r*l HIGH SCORES
11 PRINT"»WLEVeLl-"INT<Hn;HU
12 0RIHT")OIILEVEL2-"INT<H2>JH2$
13 PRINT"5»Wl«LEVEL3-"INT<H3^;H3f
14 PRINT")»lia_EVEL'l-ltINT(H4);H4*
15 PRINT"KSK'*?*'
16 PRINT" »W) ip! ?»?'
17 PRIMT"S»S»! )»: SSS!
IS PRINT" 35S? ?S9! t&*l kSl "
19 PSIWT"SWI? SSSSS^1 tsss US' "
20 PR!W'" 3M! JSSWJi! !»*( >R1 "
21 PRINT" 3r*»" ?s*?s^i t*Si Elk! "
22 PRINT"9*»f ^*5>?i 1SHI KKt "
23 PRINT" 39*! !ift!»IB9) »S*I
24 PRINT"3?iS!3AgP:0S*9 MC:MLXKX IT"
c>5 FnT?ri=0T^7:1^r>pr2=3Si::;35T038^"5STFP—1 r pp^'^r^j rj H'-XT: NEXT

30 pRTWT"^r-!4E OBJECT IS TO GUITE^IC1'2*4******8'SOWN THE CC'URSIl UMILE TRVIMQ TOR

ypTri "pfJC 'i ;

33 PRINT" TRFPP" ■Pl?Il--T"fS!rvtc;v TIME PIO MRIL- fi TREE u" *? Il!?FiBLErj F^p p SECOW
3 THEN HE 15 OK"
4g PRIST"?T!PRr:S5 SZ» T0 MOVE1FI0 TOTHE LfE'T" :PRTNT"J^PRSS':i SCRSROS TO MOVE PIO
t,-[ jUC PTfHT"
41 p^ji.iT»)iTji-gpc?FC3 ci pop ^f:Rr THFO"

i2 GE"K*:IFK*=CHR*(133>THEH45
43 00T0;l2
45 PRINT'TSTTHcPE QP^. •'- LEVELS OF F"_aV "'°*1U~"'33H:*-?. TPFE^ WITjp■TER?Y?
45 o^TsjT"j(igs?a-^ T^:EE3 WIDE (SO-SO " :pRIWT";!]S5:?i?-4 ^"REES WJ ?F^!-IPRJ)>" ' PR IMT" 3^3345-
5 TREES WIPECHR-Hfl)"
'i7 P'RINT"KS!^RESS THE LEVEL '-'?!J WPNT T'^ PL13'-1 0lJD THE OfWE WILL STPRT
48 PR! N'T "ESS F0R Ti-iE HIGH SCORES- PRESS $F?

COMMODOREPOWER/PLAYSummeM983 21
the commodore challenge

90 PE=PFEKC197):IFPE=0THEHHU=2:OOTO190
91 IFPE=56THENNU=3:GOTO100
92 IFPE=iTHENNU=4:GOTOl(30
93 IFPE=57THENNU=5■GOTO100
94 IFPE=63THEN10
39 OOTO90
100 OF=3S720:S1=36S77:F0KE3GS78, 15'P0KE36879j29■R=7 9ii:XC=0:&>0 : LR=0 = :?3=36S75: F
D=0
101 !GET RERDV!":FORT=J.TO209e
111 PR I NT" rM^^KflBlFIflMSKi!WKWM".;
112 PRINT" £l&X>CC<\'*y3TflRTv>•■rt;V'i'WN'|J" ; :e,f-$ = '• STfiW*MsM" fiRF"
120 TR$="^"4-4"f'V"
150 X=(INTc!RND<l)*16)+3)-IK T''NM,-'2"': IFJ!,'C=@THFHPPTfJTT RB^^>;RTpMTff TR**HU>
153 IFXC=1THENPRINT
155 SC=SO+1.5: IFPEEK(R>=38T HENG=11 :B=1 '-QQTQ2&2
156 IFPEEK<!A)=230THENPR!NT? C*; I NT ■: SC J' FORT= 1TO5900: M"XT:nOTO380
160 IFPEEK<157>=33RNCfl>7902THENR=R-l
165 I FPEEKa 97) =23RNDR<791P THENR=R+1
176 POKER,90:POKER+OP.6■LR= ^Rj-j ■ Tp(_p~5P|fiXMf7!i-JP^TNT11! ?^^^^5^": : XC=
1
185 GOTO150
200 POKESM33TO&T-ITO400: NEXT: POKES 1 .0::"C=^C-9fC T0176
300 IFNU=3RNDSOH2TMENH2aSC :G0T0334
305 IFMU-2RNDSOH1THENH1 =SC :GOTG324
310 IFNU-4RNDSOH3THENH3-SC ■G0T0344
311 I FNU=5RND5OH4THENH4=SC ;G0T0354
315 GOTO 10
324 GOSUB590:P0KES3.0■PRINT "ENTER IHITlflLS" : tsjpiitpj :Hl*=LEFTf(RJ ;3>: GOTO IS?
334 GOSUB580■P0KES3j 0 = PRINT "ENTER INITIALS": INPUT'-1!1 .3):G0T019
344 nnc;i ipf;pR : pHKF^^. R ■ PR INT "^NTFP INHIPI i:;" : INPUT?* ,^ ^:GOTO10
354 GOSUB500■P0KES3,0:PR INT "ENTER
INTIfiLS":lNPUT!J*: H4$-LEFT*<U*.- 3>:G0T0ig
500 FORFD=lTO20^PRIHT"r3*(KKI a*'OU HRVE HIGH SCORE! ! ! " : FORT= 1 TO??': NEXT :PQKi=:S3.. 2d0
505 PRINT"&KMWE»VOU HRVE HI >! SCCREM !" :FORT=1TG5P: 20:NEMTFD:RETURN

22 COMMODORE POWER/PLAY Summer 1983

 The Maze
by George Short
For Unuxpiinded VIC 20

The object of this intriguing game is to collect as many activate the spell, the wizard can cause walls to disappear,
points as possible while traveling through a series of and thus escape from deadend situations quickly.
mazes. You control the wizard with the N, VV and E keys, A bonus "flash" is awarded for every five mazes the
which make him move north, west and east, respectively. wizard completes. The wizard can use a flash (the B key)
The wizard enters the maze from the south and must to go directly to the north wall, destroying everything in
exit through the north wall within 12 seconds. The clock his path, and escape to safety.
in the upper right corner of the screen keeps you aware of The player has three wizards at the beginning of the
the passing time. game. Wizards are destroyed if they hit a wall or fail to
Scattered through the mazes are bottles of magic potion escape a maze in the allotted time. When all three are
that allow the wizard to cast a spell. Using the J key to killed, the game ends. C

0 M3«30720:ME«3 = SO0:«T«50:T*0=S 1>0:UI1=0:POKE36878, lS:PRINT"nraWO!WIMM»irHE HRZE

1 Y=7691■P0KE36369,255:P0KE32,25 " P0KE56,23: F0RI=7168T07664 ■ POKEI, PEEKa+25599): N

EXTI
2 r0PCC=7163T07175:RERIflP;POKECC jRR:NEXT(X-BRTR2S/26j 32?>2£> 24,60.. 126j@
3 "0RCO7384T0?39i: PEPIRR ■ POKECC , RR: NEXTCC : DRTR24.24, 24,24,24, G@,. 60,24
4 =QRCC=»739STQ7406; PERDRR: POKECC , RR : HEKTCC : DflTfi 25^, 254, 254,. 254,254,254, 254,254
5 PR I NT "T; ■?-=$
£ ;<'=7^i7<=' ■ Fnpni = ' THMT: R—INT CRN!11' 1 >M75)*ltP0KEK+flia9:P0KEK+N3*fl,8!HB(TW
7 VI zz"7^,RO,: Tl=TMT|'PND1' 1) $'3) + 1 ' ^OF'!" ^TOB.Bi=INKRHBa>*200Hl.B2»
8 ^nk'EXI.+Rl.. £7; P0KEX1+B1+M3,32 : r*
q

f-FTTl* ■ PRINTRIGHT^<TIt..2) 'PRIV

12 IFD*=""Tf-jrwi;.

13 POKEV,32■IFn*="N"THEHV=V-22;GOTO 18
14 IFD*B"E"THENV=Y+1 :Ij0T018
15 I r"Ht=" U" THENV=V-1: GOTO 13
16 IFDf="J"THEH27
17 IFD*="B"T!JEM22
13 IFPEEK < V)=32THENP0KE3Si57.-i, 2S0 lDOKS36374.e:OOT':iS
19 !PPEEK <V ? =29THEN21
2? IFPEEKfV)=27TWEK?l=Sl+!:S=Z+i :PO^3687dj250:POKE36874j0 = QOTOI0
21 MC=m^- 1: POKE1'114?: POKE3?375.. 2^ 0: FORE=1TO300: NEKTE ■ PCKE3637'5,149; OOT034
22 IFW1 >STHENI..' 1 =I-J 1 -1: G0T024
23 G0T013

COMMODORE POWER/PLAY Summer 1983 23

the commodore challenge

24 FORKS*1T024: POKE'-'.' 32: '-'=V-2£' ^OKE7/ £; P0KEV+N3.2 '■ ^C'R-L^TC? '■ MEXTLL : IFV<7702THEN
35
26 P0KE35874,206:PQKE3S874,0:NEXTX3
27 !FS1=0THEN10
28 POf<E3i?37?..25@>POKi3557?.0
29 POKEv-22.-32:POf<PV-l -32 -^OKEV-1-', 32'S1=SJ-I ^O'CIS
30 IFWD0THENU!=tJl-l:GOTC2*
31 GOTOif?
32 FORX5=1TO24 : PQKEV, 32' V=y-22 ' POKE1''. 0' P0KF.V+K3.. 2' P0?L'_=?,T0?: ■!£XTLL! I'r'''-'77!?2THEH
35
33 POKE3S?74., 205 ' p0KE36874 .■ 8' M^^'^XS
34 F0RPP=J.T03(?^^MEKTPP:PRIM"'".T:^"V!TirV0U BLEN IT! I ! "''-'=~69i' 901037
35 FnR0I = ;.Trjie:MEXT9l:PRIfJT"T:PRIWT"V0U MRPE IT! ! ! ! ! ! ": IPT/?=IK'T-rT/5>THPHW:=W1+
1

37 PR I NT; PR I NT " SCOR"-" SC '■ PRINT" MPfj-" r><p

38 PRINT:Pf?IWT:P!?rJT"SPE'_!_R-"Si :?RIN-r"FL«SHS-"tii

40 P0KE3^$76 , 0; Pl?IHT"SrE!!T'9i!fSENTcR?!'ii'n ^PZE-"^": ^PR' '=' ^^^^Pfl ■ ^P^Ti i ■ ^t^-mtj-OO : nn^n^

41 PRINT"W!lK[!!5!tllt!H1))jOr'ir OVER" : P0KE3^?7f .9'EN?
42 P0KE3637.3J !.?:frORL=228TO240; PC'KE36?7^j'_:P0R|j=1tCi52 : '^EXTCi.- L ; POKES'Sft^S ■:"': RFTHRH

HYPERTEK INTELLIGENCE™ SYSTEMS

WHERE INTELLIGENCE IS THE KEY
TO RESIDENTIAL CONTROL OR COMMERCIAL FACILITY MANAGEMENT
Intelligence is the key since intelligent devices have the
ability to reason and make decisions under changing conditions.

Hypwuk Inl*lli0fnce Syilami in d*dl-

ciHd ippllciiion miciwompuisri aot
■p*c<lic«3by lo control hom«i And commar-
Cill fl Cll HIM
Sine* Hyportt* Sytlami vm Inivlllgant — STANO ALONE OPERATION DOES NOT
complex dtciuoni can be rnBdo in reaction REQUIRE AN OFFICE/PERSONAL
Eo inn Bvqr'chnnglng condition* In a home COMPUTER.
or commercial facility And sneculad wlrh CAN COMMUNICATE WITH ANY OFFI
inralliblfl compular ioqic. CE/PERSONAL COMPUTER VIA STAND
Sine* Hyparlak Syllemi ars intsMigail — ARD RS-J32 INTERFACE.
you can mampulats and roconfigure lha REMOTE ACCESS CAPABILITY VIA
optrallon ol a horns ot commercial facility MODEM.
wiih lha ■amtauaindflaiiotlilylhalagtn- OPERATION THROUGH BROWNOUTS
•ral purpoid compulgr would allow you 10 AND BLACKOUTS
manlpulats and raconfigur* word a and BOTH WIRELESS POWER LINE CARRIER
RumbM AND HARDWIRED RELAY OUTPUTS.
Sines Hyparlak SyllAnil are inlelliganL — EXTREME PROGRAMMING
you oscida now insy ooirata to imi trw FLEXIBILITY
cuilam ntadt ol your fiomt* or cornmarcial
facility.
SYSTEM OPERATION
INPUTS INTELLIGENCE SYSTEMS ■* OUTPUTS
(laniori ujch ai motion ttotsciort, Intrmoi- -^' H,i. !.:, . y tff/ ii tr>in flx
(HypDFtpk InloNigonce Sysioms then analyia
liu 13hi union imoka dcuciorn. iwiicnii, ewiy vil B5R-X10' ot ' po*»r lint
tna input oala and ma*a complai decmona
ale. ar* conrVKIH lo Inlarnal Intalliganca Syi- regardjng salB|yr aocunEy. energy manmge-
lam rsglitart lo provlda Inpul dill) ment, anO oiner opsrating airalegidB)
2) nmrd wirtd wit mttrmt nliya)

■ -lV.tc.'i l r* of Ltv<ion Mfg. Co , Inc.

HYPERTEK, INC. 30-4 FARM ROAD SOMERVILLE, NJ. 08876 201-874-4773

24 COMMODORE POWER/PLAY Summer 1983

 TM
VIC-20 and Commodore 64 high
EXPHNDER BDHRQ5
PTI offers trie finest selection
of expander boards available
for the VIC-20 and CBM 64. Up until last issue we had been accepting scores on
The design features, quality the honor system. But we thought it was time to start get
construction, and competitive
prices make any of them an ting more official. So, from now on, in order to have your
4 Slot lor Ihe 64. Toggle switches and exceptional value. New pro high score published, you'll have to send in a photo of the
reaet switch
ducts are being added monthly,
P/N C64 '69.95
screen showing the score. Don't forget—a simple Polaroid
so write for complete catalog
will doit.

BLUB MEAN1ES 1,260

Alan S. Newman, Fairfield, CT
CAR CHASE 75,865
Zach Coleman, Charlotte, NC
6 Slol lor Ihe VJC- Toggle Slot lor ih* VIC. No swncties <e$ei. or
and resei switch
CLOWNS
P/N V36 '79.95 P/NV13 '49.95
COSMIC CRUNCHER 215,000
Barbara Schreiber, New York, NY
DRAW POKER 17,410
R.Cailia.Torrance, CA
JUPITER LANDER 207,400
4 Slol (of 1 he VIC. Toggle switches and 3 Slol loi Ih* Vic. Slide switches. 10 Christopher Champlain,
resel switch reset swrtcti
St. Petersburg, FL
p/N V24 *69.95 P/N V23 '59.95
VIC 20 and Commotion £4 are. trademarks of Commodoro Electronics Lid. GORP 110,040
PRECISION TECHNOLOGY. INC. Robert Devantier, Davison, MI
COMPUTER PRODUCTS DIVISION
See your dealer, or place
i' i> II". 1 ■. 1 ■ 1 your order direct MIDNIGHT DRIVE 14.11km
SALT LAKE CITV. UTAH D41tS
KOI) II7 6166 VISA-M/C-CHECK-COD Nathan Mehl, Newark, DE
MOLE ATTACK 331
HedaTakaya, Saskatoon,
Sasketchewan

OMEGA RACE 260,050—5 ships

Cave Adventure Ben Piper, Chico, CA

for the VIC-20 PINBALL 1,500,000

Joe Ferrari, Commodore, Toronto
Restore Wealth and
RADAR RAT RACE 122,240
Happiness to the
John Higginson, South Holland, IL
Small Villase
RAID ON
of Windsor
FORT KNOX

SEA WOLF 10,080

$14.95 Jimmy Kuhn, Norfolk, VA
SKY IS FALLING 13,810
Rachel Koons, Drexel Hill, PA
File Organizer Creates Data
For the VIC-20: SLITHER 261
Base storage system Useful lor
Burger & Ffiei Fast-action Joy
stick 3ame. Eat the Iries and
mailing lists, club roslers. check Amy Miles, Mt. Pleasant, MI
books, etc $59 95
burgers but avoid the shakes
lor a top score. 514 95
Spread Sheet Powerful calcu SUPER ALIEN 45,700
lation and report tormattmg
IM
Robert Schaeffer, Brookline, MA
For the Commodore 64: capabilities. Memory divided
into grid: 26 rows by 10 col
Space Raider An amazing
umns S34 9b SUPER SLITHER 167
arcade simulation. Your mission
15 to destroy the enemy ships Dissassembler Familiar with David Goldberg, Richardson, TX
$1995 6502 assembly code' This will
decode ROM or help debug SUPER SLOT 7,306 coins
AHC Fun Part ot a series ol ed
RAM 519.95
ucational programs lor pre Jerry Krueger, Cary, IL
school aged children 59 95 Super Roller Challenging dice
game with sprite graphics and
Sprite Edilor The easy way to
sound yaht/eestyle rules of
SUPER SMASH
create, copy, alter, ana save up
play 514.95
to 5'24 sprite shapes. 524 95 VIC AVENGER 10,190
Cross Reference Generator lor dialog available
Dealer inquiries invited
^^ *■.
™™ ^ Chad McCubbins, Coatesville, IN
BASIC programs Displays line
numbers pn which any word of PHONE ORDERS: (703) 4916S05
BASIC vocabulary appears HOURS: 10 a.m. la 4 p.m. Hon.—Sit. If your score didn 't set a record this time, keep playing!
Allows you to change variable Virginia Micro Sytiernt Maybe you'll topple these champion gamesters next time!
name and ask (or lines where it U6»6 let! Oivn H-I
appears, and more S19 95 WooflbnOgt, VA 11191

COMMODORE POWER/PLAY Summer 1983 25

 BUSICALC/BUSICALC II
BUSICALC A Honey of an Electronic Spreadsheet
Why electronic spreadsheet programs?
Electronic spreadsheet programs allow the user to create a gridsheet,
spreadsheet, worksheet, or any other table of information, using the
memory of the computer as pencil and paper. The computer display or
terminal acts as a window through which the user views the information
as it is entered. Textual information (such as headings), numerical values
and formulas can easily be entered into the spreadsheet.

nun on

'=S t* d □QQDDBBBIinD

i a a a a a a a a o'« m c i :

For Commodore 64
For Commodore VIC 20
For Commodore PET/CBM 40 columns
For Commodore CBM 80 column/SuperPet

BCJS1CALC Your Computer Drone for Repetitive Calculations

The outstanding advantage of using a computer is that it acts not only
as a pencil and paper but as a perfect eraser and an automatic calculator.
The user can quickly and easily make any number of alterations to the
data within the table. The BUSICALC will evaluate any formula using the
data that has been entered. Further, it retains the formulas and displays
the resulting value. With BUSICALC controlling the entry of data, provid
ing a comprehensive memory, and performing arithmetic, the preparation
of a spreadsheet is faster and more accurate than if it were prepared
by hand.

BUSICALC With the Sting Removed from the Prices

BUSICALC 20 only $49.00 for the VIC 20

BUSICALC64 only $69.00 for the CBM 64
BUSICALC 40 only $79.00 forthe original 40 column PET/CBM
BUSICALC 80 only $89.00 for the original 80 column CBMs and SuperPets

BUSICALC AVAILABLE NOW FROM YOUR LOCAL DEALER

(800) 227-9998
FOR THE NAME OF YOUR NEAREST DEALER
Y>
California, Canada, Alaska and Hawaii please call (415) 965-1735

Skyles Electric Works

231G South Whisman Road
Mountain View, CA 94041

Europe please contact Supurisolt, Winchester House, Canning Road, Harrow Wcidldstone, Middlosux. England HA3 7SJ, Tel. 01 861 1166

26 COMMODORE POWER/PLAY Summer 1983

user group spotlight

Remote Terminal
by John O'Brien

Our user group profiles usually "Meetings are held each morning program—SAVE IT!! I" Power fluc
spotlight the large and well-established at 8:00 a.m. in the hallway of the tuations and outages are an hourly
groups. But this time we'd like to tell elementary school, right in front of occurrence.

the story of one of the smallest and room 2 (the rooms are not numbered Their first letter stated that the
newest groups from whom we recently hut no matter which way you start group had five members, one VIC 20,
received two interesting letters. The counting from it's room 2 because it's two Commodore 64's, three datas-
first letter was signed by all five in the middle). Meetings last until our settes, two disk drives and "lots of
members. principal, not a member, breaks up joysticks." When the second letter
The group is in the town of Old the meeting, usually after school has arrived, things were really looking up.
Harbor, an Alaskan Aleut village of started," according to Mercer. The mail had finally arrived with their
about 350 residents. The Aleuts are If you think you have a little trouble long awaited software, three more
two tribes related to the Eskimos getting your dealer to carry the periph 64's had heen ordered for the school
who live on the Aleutian Islands off erals and software you want, then im and membership was up to eight
southwest Alaska. Old Harbor is on agine the hardship of buying evert/thing and climbing.
Kodiak Island and can be reached, by mail. If that isn't bad enough, con In fact, COMPOOH-T recently be
according to the first letter "by a ten sider the fact that even then they must gan extending open memberships to
hour boat trip, through some of the often wait until the weather clears so anyone interested in joining. For one
world's most treacherous waters, the mail plane can get through (fog dollar you can become a member of,
or by small plane, through equally is a big problem). according to Mercer, "the most remote
treacherous airspace." Consequently, the group has taken Commodore user group." For more
The group's name is COMPOOH-T, to writing many of their own programs. information write to COMPOOH-T,
which stands for Commodore Pro They boast of a software library that is C/O Rox 118, Old Harbor. AK 99643.
grammers of Old Harbor. The T comes almost 100% written by members. See you in front of Room 2, promptly
from the fact that they are all teachers. Mercer's advice to new members is at 8:00. c
The group proudly proclaims that they "after you've written two lines of a
comprise 42% of the teaching and
administrative staff of Old Harbor
School. It's not a large group—it's a
small school—120students (K-12) and
12 staff members.
Each teaches at least two or three
different grade levels. They all mi
grated to Alaska to teach the natives,
and, as group member Paul Mercer
put it, "to get away from the hustle
and bustle of the lower 48," which is
what they call the rest of the United
States. Using computers in the class
room sparked an interest in the teach Cammndnre Programmers ofOld Harbor. Alaska. First row. 1 tor: Jane Kayuk, Patricia
McDonald, Kate Lenten. Second row, I to r: Jim Preston. Pan! Mercer. Dare Wilson,
ers that seems insatiable.
Walt Lociren.

COMMODORE POWER/PLAY Summer 1983 27

commodore user groups

User Croup Listing

ALABAMA Commodore Users Club VIC 20 Users Group Kkliitiil Pteslien

1U41 Poienwoods Drtv* 2791 McRrideLn. #121 B37KSW 14lli Street
Huntsville PET Users Club
9002 Bada.lt Rnad Santa Maria, CA 93455 Santa Rom, CA Miami. FL 33144
HuntsviIle,AL35802 (6051 937-4106 (707)575-9B36 Smith Florida
Contact: Hal Carey Contact Greg Johnson Tyson Verse
PET Users Group
Meetings: every 2nd Valley Computer Club South Bay Commodore Users Group Dave Yttuitd
Thursday 2006 Magnolia Blvd. 11(12 W. 218th St. 7170S.W. lllh
ALASKA Eiurhank.CA Tot ranee. CA 90501 WWt Hollywood, PL 33023
[213IWW0M Contact: Karl Kvans OII519B7-69H2
COMPOOH-T
1st Wed. 6 p.m. Slo VIC 20/64 Computer Club VIC Users Club
c/oBo<llH
Old Harbur. AK SSG43 ValleyComputerCluh L7669th 61. c/o RayThiftpcn
1913 Bnoih Road Los Dsiis. CA 4071 Kdilewater Drive
(907)386-2213
Ceres. CA 95307 The Diamond liar B.O.P. Users Cluh Orlando, FL32S04
ARIZONA
PUG of Silicon Valley c/oHincom School PEXt and Friends
VIC Users Group 129 NE 44 St.
22355 Rancho Ventura Road 2800 Holliriilworth
2612 E. COvina Cupertino. CA 95014 West Covina.CA 91792 Miami. Fl. 33137
Mesa, AZ 85203 1213)965-1696 Richard Plumer
Contact: Paul Muffuletto Lincoln Computer Club
750 E.Yosemile Don Mdnlosh Sun Coast VI Cs
Commodore User Group Commodore Interest Association P.O. BOX 1042
Minted. CA 95336
Metro C iimp u It r Store c/o Computer l>jta Indian Rockl Be.ich. hi
John Funft, Advisor
4500 E. Speedwsy, 14660 l.i Pa: Dr. 33535
Suite 13 PET on the Air
525 Cresllake Drive Viclorville, CA 92392 Mark Weddell
Tucson. Xf. 85712
San Francisco. CA 94132 Mark Kinley Hay Commodore Users
16021323-3116
Max J. Babin. Secretary PUrfleld vie 2ii Cluh Group
Centra] Arizona PET People
PALSIPelsAround) l336HcKinln>8L c/o Gulf Coast Computer
842 W. Calls del Korte fairfield, CA B4533
Livermore Society EschanKe
Chandler, AZ 85224 (707)427-0143 HI N.Tyndall Pttwy.
HKSSouth K
1602) 8993622 Al Brewer P.O. Box 6215
HoySchahrer Limmore. CA 94550
lst&3rJTues. at 7 p.m. Panama City. R 3240!
(415)449-1084
ACUC Everj- third Wednesday Computer Barn Computer Club 191)41785-6441
c/u Hume Computer Service Hi chard Scoficld
7:30 p.m. 319 Main SI.
2028 W. Camdhack Rd. Contact: J.Johnson Suit.- #2 (lainesvilk'Commodore
Phoenix, AZ 83015 Salinas, CA 93901 Users Cluh
(602) 249-118*
7615 LcvislonAve. 757-078B 36O4-2OASW31stDr.
Dan Deacon S. Mark Vanderbilt Gainesville, KL326O8
First Wed. of month El Cerrito.CA 94530
1415) 527-9286 COLORADO Louis Wallace
West Mesa \1C 64 Users Croup
Bill MacCracken V1CKIMPKT Users Croup
2351 S. Standage
San Diego FUG 4 Waring Lane, Creenwimd P.O. Box 561689
Mesa. AZ 85202
C/oD. Coslarakis Village Miami. R. 33156
KenneihS. Epstein
3562 tinlon Street Littleton, CO 80121 13051274-3501
ARKANSAS Evil in SI 11.1 ne
1711) 235- 7626 Contacl: Louis Jtoehrs
Commodore/PET Users Cluh 7a.rrt.-4 p.m. Colorado Ccimmodoic Computer Cluh Brandon Users Group
Conn-ay Middle School I08AnHlewoodUr.
Walnut Creek PET 2187 S. Golden Ct.
Davis Street llranJun. H. 33511
Users Club Denver, CO 80227
Cotiway. AR 72033 (813)6854138
W1S Ygnaclo Valley 9K6-0577
Contact: Geneva BowUn Koad Jack Moss Paul DauKherty
Booneville&iClub Walnut Creek. CA 94596 Meet: 2nd Wed. Commodore 6-IA'lC 20 User Group
c/oA. R. Heilerich Martin Marietta Aerospace
J urn pa Wizards CONNECTICUT
Elementary School I'.O. Bnx 5S37. Mi11IU
■1526 KinKsbury PI. John K. Carnarino
401 W.Sth'St. Orlando. FL32S5S
Riverside. CA 92503 Skiif Line Masons Island
Booncville. AH 72927 1305)352-3252/2266
Contact: Walter J. Scull Mystic. CT 06355
Mary Taff Mr, Karl Pretton
The Commudore Connection (203) 536 97H9
CALIFORNIA Hrandon Commodore lrsers Group
2301 Million St. Commodore User Club
SCPL'C Southern California ■IMK.I.umsdcnHd.
Santa Cna, CA 950611 WcllMnfleld High School
PET Users Group Brandon. R. 33511
411 Will-nil Hill Him J
c/o Data Equipment Supply Buil Massey Cainesville Comm<jdi»e Users Group
Wvthersfield. CT 06109
Corp. Santa Pe Community College
San Fernando Valley Contact: Daniel G. Spaneai
8315 Firestone Blvd. Gainesville. PL32602
Commodore Users Group V\C Users Cluh
Downey. CA 9024! JamcsE. Birdsell
1213) 923-9351
212OS Mashrille c/o Edward Barszczeu'ski
22 Tunvis Road GEORGIA
Meetings: First Tuesday of
1213)709-1736 West Hartford, CT 06107 VIC Edualora Users Croup
each month
Tom Lynch Cherokee County Sell mils
California VIC Users Croup New London County
2nd Wed. 7:30 110 Academy SI.
eft) Data Kquijimenl Supply Comrnodort Cluh
Corp.
VACUUM Doolittle K...11! Canton, CA 30114
277 K. 10th Ave. 1'ieslon. CT0n36ll [jr. w Rvani
S315 Firestone Blvd.
Downey. CA 90341
Chico,CA9592G Contact: Ur. Walter ilmlittle Bldj. 6H. FL.ETC
(916I»91-Sri«5 Glynco.GA 31521
12131 923-9361 FLORIDA
MikeCaselta Hi chard I.. Vounfl
Meetings: Second Tues. of
2nd Monday of month Jacksonville Area
each month
PET Society
401 Monument Road, #177
Jacksonville. Kl, 32211

28 COMMODORE POWER;PLAY Summer 19B3

IDAHO The Commodore 64 Users Commodore Lrsm Croup ViC£ 64 Users Croup
CHS Computer Club Group 965 2nd Si. The Boyds Connection
c/o Crangeville High School 420O Commerce Ct., Suite 100 Marlon. IA 52302 21000 Clarksburg Kil.
910S.US1. Lisle. IL 60532 1319)377-5506 Boyds, Ml) ZO841
GiarWwitlB. ID 83530 1312] 369-6525 \'ern Hotert (3011428-3174
Don Kissinger Gus Paunotta 3rd Sun. of month Tom iJeHenai
S.K.H.S. Computer Club Oak Lawn Commodore Usen Group Sioudanii Commodore Cluh VIC 20 Users Croup
c/o Salmon River U.S. The Computer Store 2700ShtridanSt. 23 Coventry Lane
Rteins.H) 83549 11004 S. Cicero Ave. Sioux City, IAS1104 Hafisrstflwn.MD 21740
Hartley Foster Oak Lawn, (I. 60-153 (712] 258-79D3 Joseph Kutkuwski
(312)499-1300 Gary Johnson
Commodoro Users Bob Hugh.eg Kajenlown Users Croun
548 E. Center 1st &3rd Monday of monlh 1201-11 Marshall St.
Pomello, ID 83301 INDIANA 421 W. 6th St. HiUlerstnwn, MD2L740
(208} 233-0670 PET/64 Users
Waterloo, IA 5(1702 (30D7M-096H
Leroy Jones 10136 K. 96th Si.
(319)232-1063 Crefl Sterart
Frederick Vulker 1st £ 3rd Friday of month 6:30 p.m.
Eagle Rock Commodore Users Croup Indianapolis. IN4G25S
900 S. Emersun C!17) 842-6353 KANSAS Rockville VIC/64 Users Cmup
Idaho Pails, ID 83401 jerry [irinsun Wichita Area PET 13013 EvanstnwTi SI,
Nancy J. Picker Cardinal Salts Users Group Rdckvilic. Ml) 20853
ILLINOIS 6225 Co(frnin Road 2231 llulliiisor (301) MS-1B84
Wichita, KS 67304 Meryle or Tom Pounds
Shelly Wurnikoff Indianapolis, IN 46Z6S
017] 238-96S0 (316| B38-051S MASSACHUSETTS
2731 N. Milwaukee
Avenue Cunt act: Carol VWieeler Contact! l Kastern Massachusiitts
Chicago. IL 60647 CM L'li (Commodore Kansas Commodore VIC Users Croup
Hardware Users Croup) Computer Cluh t/0 Frank Ordway
VIC 20/M Users Support
12104 Meadow Lane 101 S. Burch 7 Flaac Road
Croup
Oakhndon. IN4li2.16 Olathe, KS fifiOSI Marlboro. MA 02173
c/o David R. Tanin
Contact: ltd Powell Cnntac!: Paul B. Howard VIC Users Croup
111 S.Clark Strecl
Para. II. 62557 VIC Indy Cluh Commodort Users Croup iVo llent Hoffman-Sholar
(2171 562-4568 P.O. Box 11543 fiO50S.183St.Wc;t 193 Garden St.
Cenlrat Illinois PRT User Indiatupnlis, IN .11)2(11 Viola. KS 67149 Needham, HA 02192
(317)H9K-8OS3 Walti-r Lounsbtrj
Croup Commodore Users Cluh
635 Maple Ken Italilun KENTUCKY Slouithlon Hiflh School
Mt Zion.lL 62549 Northern Indiana VIC Connection Stoushton, M.^U2O72
1217)864-5320 Commodore Enthusiasts 1010 S. Elm Contact: Mike Lennon
Contact: Jim Oldfield 927 S. 26lh St. Henderson. K¥ 42420 Berkshire PKT Lovers
ASM/TED User Croup Suulh Bend.IN 46615 Jim Kemp CBM Lsers Croup
200 S. Century Eric R. Bean LOUISIANA Taconic High
Rantuul, IL61N66 Commodore Users Croup Piltslitld. HA 01201
Franklin Parish Computer
1217)893-4577 IO2<! MichieanAve. Cluh The Bos Ion Computer
Contact: Brant Anderson l.nganspori, IN46947 Sociely
#3 Fair Ave.
PBT VIC Club (PVC) [2lS 722-52115 Winni shorn, LI 71295 Three Center Plaia
40 S. Lincoln Mark Bender Boston. MA 021IW
James 1>. Mays. Sr.
Munifcletn.IL 60060 Computer Worbhop VIC 20/64 Club (617I367-S0H0
NOVA Mar)1 R. McCann
Contacl: Paul Schmidt, ZS2S.600W. 917 Cordon St.
President Hebron. IN 46341 \1C Interface Club
New Orleans. LA TOUT
Rockford Area PET Users (219) 9Kfi-)535 (504| 948-7613 c/o Procter & Gamble Inst.
Croup MaryO'B ringer Shop
Kenneth McGrud^r.Sr.
160S Benton Street The National Science Clubs ofAmerica 7S0 Washindlon St.
VIC 20 Users Croup
Rockford. 1L 611(17 Commodore L1ie^^ Division CJuincj-.MA 02169
5064BowdnnSt.
Commodore Users Cluh 7704 Tail St. C. Gary Hall
Marrtto. LA 70072
1707 East Main St. Merrillville. IN4M10 Masspet Commodort Users Croup
(50.11341-5305
Olncy, 11.62450 Rrian Lipley or Tom Vlasic VtoyneD.Lowtry.R.tJ. P.O. Box 307
Contact: David ¥.. l-awless Eail Cetitral Indbuu VIC I'scr Croup East Tauiilon. MA O271B
Hural Koute #2 David Holers
VIC Chicago Club ASSOC of Persona)
3822 N. Bell Ave. Portland, IN 47371 Haylhcon Commodore Users Croup
Stephen Erwln Computer Users
Chicago. [LEOGlfl Hayllicun Company
5(1 li Hodman Roid
Juhn L. Rosengarten National VIC 20 Program Exchange llartwcllRd. GRA-6
Bethesda. MD 20016
102 llickor>'Court Bedford. MA 1)1730
Chicago Commodore 64
Portland, IN47371 Blue TUSK John Rudy
Users & Kichangt Group
iai«) 726-4202 700 Bast Joppa Road Commodore 64 Users
P.O. Hun 14233 Baltimore. MD 21204
Chicago, IL 60614 Stephen Erwln CroupofThe Ikrkshires
Contact Jim HauS
Jim Robinson towt INIIIiKhlandAvc.
Hijusi; of Commodore Piltslield. MA 01201
Fo< Valley I'KT Users Commodore (Jltr Group SS35SatyrlliDKo.nl
Croup 11-) Stli SI.
Baltimore, MD 21234
833 Willow St. Ames, 1A 30010 Contact: Ernest J. Fischer
Lake In the Hills, IL 60102 Quad City Commodore Cluh Long Lines Computer Club
[312)658-7321 1721 Grant SI, 323 N. Charles St., Km. 201
Art DeKnee/ Bettendorf, IA 52722 Baltimore, MD 21201
(319)355-2641 Gem Mod"
John Viuas

COMMODOREPOWER/PLAYSummer I9G3 29
commodore user groups

MICHIGAN PET SET Club of St. Louis mi:i VIC User Croup
David l.icni 633 Bent Oak Drive Noflhern Neiv l^nslland 1250 Ocean Ave.
Lake St. Louis, MO 63367 CiimpulerSntiety Brooklyn, NY 11230
14361 Warwick Sired
(31-11 625-2701 or 625-4576 (212| 859-3030
Detroit, Ml 18223 P.O. Bm 69
Tony Oil Berlin. NH 03570 Dr. Levitt
VIC Users Club
WCINFOKBT I.&M Computer Club
University of Michigan nillVICN'lCs
P.O. Box 106a P.O. llm 981 VIC 20 ft «
School of Public Health
Branson. MO 65616 Salem. NH 03079 4 Clinton SI.
Ann Arbor. MNfillW
Cunt act: John Cannon 11171334-6099 Tully.NY 13159
HEW MEXICO 1315)696-HHO1
Jory Sherman
Commodore User Club Commodore- Eisers Group Dick Micktlson
32303 Columbus Drive Worth County PET Users
6212KaiKon.Nt: Commodore Users Croup
Warren. MI 48093 Group
Albu4iueroui-.NM 87113 1 CorwinPl.
ConUcl: Robert Stcinbrecher Gran I City, MO
(50S1821-S812 UkeKalrine. NT 12449
(816)564-3551
Commodore Users Group David Hardy
Danny Byrne J. Richard Wright
c/o Family Computer NEW YORK
Mid-Missouri Commodore Club 8" 8 Enthusiasts
3947W12MlkRd.
1S04 Vandiver Dr. Capilal District PETUsers P.O. Box 28 Rhodes Rd.
Berkley. Ml -18072
Columbia, MO 65301 Ben Green Apaladiin. NT 13732
W. Michigan VIC 20-64 Users [314)474-4511 Albany1 Area. NT Keith Merrill
1311 Portland NE (5181370-1H20
Phil Hishnp VlC20'Commodore64
Grand Hapids. MI 49505
1616]459-7578 MONTANA LondlflandPSTSoddy Users Croup
Raljih Hressler 31 Maple Dr.
Jim Dllacm Powder River
H.w but fields 4S Lindenhurst. NY 11757
VIC fur Business Computer Club
Taylor Avenue (516)357-1512
6037 Orchard Ct. Powder River County
Greenlawn. NY 11741) Pete Lobol
Lansing. Ml 4B910 High School
Broadus.MT 59317 PET User Club VIC Information
Mike Manilla
Contact: Jim Sampson of West Chester Club
South Computer Club P.O. Dm 1280 336 W. 23 St.
South Jr. High School Commodore User Club
Whiti Plains, NY 10602 Deer Park. NY 11729
■15201 Owen 1109 West Broadway
Contact: Hen Meyer Tom Schletfel
Belleville, MUN11I iiutlc.MT5»7(]l
Contact; Mike McCarthy LIVE ILonil Island SASE& phone please
Roiuld Ruppcrl
NEVADA
VIC Enthusiasts) New York Commodore
Commodon Ukti Croup 17i'k-;idtllyi<oad Users Group
c/o hlalcin Hapids Medical clinic I .as Vegas PET Users Great Neck, NV 11023 380 Riverside Dr., 7Q
101 SplcwvHIe Hwy. 4H84 Iron Avenue Contact: Arnold Friedman New York, NY 11)025
Katun Rapids, Ml 4S827 Us Vegas, NV 8911U (212)566-6250
Comraiidore Masters
Albert Meinke HI, M.D. NEW JERSEY Ben Tunketang
25 Crolon Ave.
South Last Michigan Pet Users Croup A ma leu r Computer Group Staten Island. N'V 10301 Parsippany Computer Croup
Bui 214 18 Alpine Drive Contact: Sleptien Farkouli 51FerncliHRd.
Farminjjlon, Ml 4K024 Wayne, NJ 07470 VIC Users Ctub Morris Plains. NJ 1)7950
Norm Kisnihcrg
Somersel Users Club 76HadfordSl. (2011267-5231
Commodore Compuler Club ■19 Marcy Street Staten Island, MV 10314 Boh Scaring
H.DoivHiHh School. Hm #226 Conlacl: Michael Franti
Somerset. NJ08873 Capitol Dist. Commodure 64/VIC Users
Midland. Ml 48640
Contact: Robert Holier ilockland Counly Commodore Group
(517)835-5130 363 Hamilton Si.
John Walley Educators Advisorj1 Useis Cioup
P.O. Box 186 c/o Ross Garbcr Albany. NY 12210
9:30 p.m. SepL>May
Medford.NJ 08055 U Hillside Court I5I8I436-1190
VIC. 64. PET Users Croup (6091953-1200 Suffern, NT 10901 Bill Piier
8439ArlisRd. John Handfietd (914)354-7439 Hudson Valley Commodore Club
Union Lake. MI 48085 1 Manor Dr.
363-8539 VIC-TIMES WtslCheslcr Counly ViC
■16 \foyne Streel Users Croun Woodstock, NY 12498
Bert Searing
Edison, NJ 08817 P.O. Box 116 F.S. Goh
MINNESOTA Thtimas R. Moinar Pelham. NV 10552 1st Wednesday of month
MUi'KT (Minnesota Users of VIC 20 User Group Jr>e Brown L1V1CS (Long Island VIC Society)
PUT) 67DistltrAve. SPUC 20 Spyglass Ijne
P.O. ilox 179 W.Caldwell.NJ 07006 4782 BDltOn Post Hi. F.astSetauket,NYlirJ3
Annandale.MN 55302 I20D284-22S1 Pelham. NY 10803 (516)751-7844
c/o JonT, Minerich G. M.Amin Paul Skipski Lawrence Stefani
Twin Cities Commodore VIC Software Development VIC 20 User Club VIC Users Group
Computer Club Club 151-28 22nd Ave. c/o Stoney Brook Learning Center
6623 Ives Ijne 77 Knmalhaut Avc. Whitestone, NY 11357 1424 Stoney Brook Rd.
Maple Crow, MN 95369 Sewll.NJ 08080 Jean i'. Coppola 8toney_Brnt>k. NY 11790
(612)424-2425 II. P. Rosenberfl VIC 20 User Club
(516)751-171!)
COFlllCt; Rollie Schmidt Robert Wurlzel
ACCNJ PBTA'IC/CHM 33ilP.irkAw,
MISSOURI User Group liabylon. NY 11702 NORTH CAROLINA
KCPUG 30RivcrviewTcrr. [316)669-9126 AmaUur Radio PET Users
5214 Hlue Hidiie Boulevard Belle Mead, NJ 08502 Gary Overman Group
Kansas City, MO 61133 I2O1I359-3S62 P.O. Box 30694
Contact: Hick West J. M. P>lka Raleiflh.SC 27fi22
(8161 356-2382 Contact: Hank Roth

30 COMMODORE POWER'PLAY Summer 1983

VIC Users Club Penn Conference Newport MC/64 Use" Commodore Users Group
c/o David C. Fonenberry Computer Club lOMaitlandCt. 5326 Cameron Rd.
Route 3.Box 351 c/o Penn Conference of SDA Newport. RIO2840 Austin. TX 78723
Lincoln Ion. NC 28092 720 Museum Road 14011849-2684 (5121459-1220
Microcomputer Users Club Reading. PA 19611 Dr.MaltMcConeghy Dr. Jem1 D. Frazee
Bus 17142 Bethabara Sla. Contact: Dan H. Knepp SOUTH CAROLINA VIC Users Group
Winstun-Salem.NC 27116 PACS PET Dlcn Croup Beau ford Technical College 3817 61th Dr.
Joel D. Brown 20th£Olney Streets 100S. RibaulRd. Lubbnck.TX 79-113
V(C Users Club Philadelphia. PA 19120
Beauford.SC 29902 Southeast Houston VIC
Rt. ll,Hux686 Gkn Schwartz Dean ol Ins! ruction Ustrs Croup
fficJtory, NX 28601 807 Avon 11423 Kirk Valley Dr.
SOUTH DAKOTA
Tim C.romlovils Philadelphia. PA 19116 Houston. TX 77089
PKTUserCroup
0)110 Gene Plandiak (713)481-6653
515 South Duff
Dayton Area PET ■1820 Anne Lane Mitchell. SD 57301 64 Users Group
User Croup Sharpsville, PA 15150 (605)996-6277 2421 Midnight Circle
933 Livingston Drive 14121962-9683 Conlact: Jim Dallas Piano. TX 75075
Xenia. OH 45385 PPC (Pittsburgh PKTCruupJ S.G.Grodin
MC/64 Users Club
B. IMw, President c/o Joel A. Casar. HMD 203 E. Sioux Aw. UTAH
1513) 818-2065 2015 Carrick Drive
Pierre. SU 57501 Utah PUG
I. Watson. Se Cretan.1 Pittsburgh. PA 15235 (605) 224-481)3 Jack Fleck
15131 372-2052 (4121371-2882 I ..irn1 l.undeen 2236 WashinRtun Blvd.
Central Ohio PET Westmoreland Commodore TENNESSEE O(idi-n,UT 81401
Users Croup L'sers Club
River City Computer The Commodore Users
107 5. West moor Avenue c/o DJ & Son Electronics
Hobbyists Club
Columbus. OH 43204 Colonial Plaza
Memphis, TN 742 Taylor Avenue
(fi 141274-6451 l-alrobe. PA 15650 Ogden.UT 84404
1st Mun. at Main Library
Contact: Philip II. Lynch Jim Mathers Contact: Todd Woods Kap,
Nashville VIC Users Croup
Toledo PETS COMPSTARS President
American Computer Store
734 Donna Drive 410 Manatawny St. David J. Shreeve,
Temperance. Ml 4K182 I'ultslown, PA 19.1lil lOMBthAvt.,8. Vice President
Contact Gerald Carter, IjrrySliupinski. Jr. Nashville, TN 37203
(615) 242-8393 Tile VIClic
President Meet at Audio Video 799 I'onderosa Drive
Jane MagUard
Chiiilcotbe Commodore Junction Sandy. UT 84070
lit Thum. of month, 6pm
Users Croup Commodore Users Club Contact: Stew Graham
Commodore User Club
P,0,Boi21] 3021 Ben Venue Dr.
VIC 20 Users
Metro Computer" Center
Cliillicotht, OH45G01 Greenshurg. PA 15601 324 N. 300 W.
1800 Dayton Blvd.
William A. Chaney (412) 836-2224 Smithficld. UT 84335
Chattanooga. TN 37405
Licking County 64 Users Group Jim Mathers Dave DeCorso
Mondays 7:30 pm
323Schuler.St. VIC 2(1 Programmers, Inc. Northern Utah VIC & 64
Metro-KnoxvilL 64 Users Cluh
Newark. OH 13055 c/o Watson Woods Users Group
7405Oimour lid.. Rt. #20
(6MJ 345-1327 llBOldBprinjJRd, P.O. Bat 533
CoitMvlIfe, pa 19320 KmovillfcTN 37621
11433 Pearl Rd. (BIS) 938-3773 Garland. UT 84312
Robert Rougher
Stmne-wilk', OII4413G Ed Prilchard David Sanders
Paul M. Warner G.U.C. User Club The Utah Commodore Users Croup
300 Wliillm Hollow Rd. TEXAS 652 West 700 North
OKLAHOMA
New Kensington, PA 15068 SCOPE Clearfield. UT 84015
Southwest Oklahoma Bill Bolt 1020 Summit Circle (801(776-3950
Computer Club
P.O. Box 6646 NADC Commodore Users Club Carrolton.TX 75006 Rodney Keller or Richard Brenchly
Lawton, OK 73504 24 8 Oak dale Ave. PET Users VIRGINIA
Carry Lee Crowd! llorsham. PA 10044 2(101 BryanTower
Norman McCrary Northern VA PET Users
1:30 1st Sunday at Suite 3800
Hob Karpen
LawtonCity Library CACC (Capitol Area Commodore Cluhl Dallas. TX 75201
2045 Eaki us Court
Tulsa Area Commodore Users Croup 134 Colleae Hill Hi l-jrry Williams Reston.VA 22091
Tulsa Computer Society ICiola. PA 17025 P,(i.Hox6f)2 (803)860-9116
P.O. Boxl523B (717)732-2123 San Antonio. TX 78293
Lewis Buttery VIC U«rs Croup
Tulsa, OK 74112 PET User Group lit. 2, tio* 180
Annette Hinshaw Union Deposit Mall at 7 p.m.
John Bowen I.ynchhurE.VA24501
OREGON PUERTO RICO Texas A & M Contact: Dick Rossignol
CUGofPuertoRico Microcomputer Club
NW PET Users Croup VIC Users Group
HFD#l.Boxl3 Texas A & M. TX
John F.Jones c/o Donnie L. Thompson
2131 N.E. 45th Avenue San Juan. PR 00914 CHUG (Commodore Houston 1502 Harvard Rd.
Portland. OH 97213 Ken Burch L'iers Croup) Richmond. VA 23226
VIC 20 User Croup 8738 Wildforest
PENNSYLVANIA Dale City Commodore
655 Hernandez St. Houston, TX 77D8S
User Group
PKT User Group Miramar. PR 00907 I713)9H9-:)65O
P.O. Box 2004
Cent Beals Robert Morales, Jr. Contact: John Walktr Dale City. VA 22193
P.O. Box 371
RHODE ISLAND Corpus Christi Commodores (703)680-2270
Monlgomeryville, PA 18936
Irving B. Sherman, CPA 3650TopekaSt. James Hogler
lSOTauntonAve. Corpus Christi,TX7«lll
(512)H52-7665
E. Providence. HI 02014
Contact; Michelle Chavaunc Br>b HcKelvj-

COMMODORE POWER/PLAY Summer 1983 31

Write For Free Vic Catalog
NEW Write For Free 64 Catalog

TM _
Software VIC
TM
VIC V7S4"

CRICKET ■ From ihe company that brought you Asteroidz. Munchman and a host of other
blockbusters. We now present CRICKET. This is a challenging game with a cast ol characters you
will love and hate. All you have lo do 15 gel Cherp Irom one side ol the road lo the river and then
across the river. Not so last though. Fust you have to figure out how to dodge the traffic and get to
thecenler. Then how are you going lo get across the river? Look here comes a log —evena turtle.
Hitch a ride across the river and jump Irom one to the other. Keepa sharp eye oul lor Ade the Gator.
He loves to have crickets for lunch. How many limescanyou get across the road and river. You will
have to work as fast as you can. Time limit and bonus. You will find this game addictive and
challenging and it will entertain you with hours ol fun and enjoyment. $14.95

BUG BLAST - II you think Centipede was fun — look out for BUG BLAST. A new and fast action
CRICKET arcade game with realistic smooth action, quality hires graphics and trouble. Its very calm as the
first wave attacks. Only a few bugs to kill, Just shoot thru the cactus and wipe them out. Alter a few
attacks you feel you have everything under control. Now the attacks really start. Those protection
areas have to go. Blast away. Will they ever stop? OK — the BUGS got me this time. Now its my
turn, Jusl one more time — BUG BLAST — Now its your turn to get even, $14.95

BOMB'S AWAY ■ Can you stop him? The crazy bomber drops the bombs from Ihe top of the
screen, You get 3 buckets to catch them. Belore you know it bombs are (ailing so last you wonder
when he vjill stop. Just when you think you have himundet control your bucket gets smaller. Isyour
hand quicker than your eye? Special $9.95

PARATROOPER - You are the only one left to stop them. The sky is full of enemy choppers.
Paratroopers keep dropping into your area with non-stop barrage of enemy Iroops. They are out to
TARGET
destroy you. This new game is an unbeatable blend ol arcade action and quick thinking strategy. COMMAND
PARATROOPER You mull m.ike every shot count — don't be to last on Ihe trigger. Every time you hit a chopper or
paratrooper you get extra poinls. Wait until you see the climax of this game — you won't believe it!
This is a multiple skill level game with razor-sharp graphics and sound. $19.95

MOW - Get ready lor the fast and furious action of the craziest mower you have ever seen How
much grass can you cut? Joystick moves your mower around as fasl as you dare. Watch out for
granny's dalodils and grandpa's radio antenna, $14.95

COSMIC CRUZER - Bring the coin-op game into your VIC. 3 Scenarios. Your Cruzer moves over
a mountainous landscape He into a tunnel ol surlace - lo - air missle, silos and ground to - air
weapons, II you can make it in and out ol the tunnel you fly into the asteroid field. Drop bombs and COSMIC
lire missiles at the luel dumps to keep your fuel supply up. If you are really good you can get to the
base and try, to destroy it. We don't know of anyone that has hit the base yet. Maybe you will be the CRUZER
1st Cosmic Ciuzer is a lun filled magnificently rendered home video game that will last lor months
ol challenge. Highly addiclmg. Hi Res Graphics, Color & Sound. SPECIAL PRICE ■ $14.95

SPACE PAK ■ Can you survive? 3 space games with the sights and sounds ol arcade games. The
excitement builds as the action is un ending. Blast away at everything in sight. The alien attacks will
MOW
stop at nothing 10 destroy you. Prepare lor battle, there is no escape, unless you can help. Can you
survive? Hi Res, Color, Graphic & Sound. Joystick or keyboard, $19.95

ALIEN INVASION - Invaders from space are attacking your home planet. Hurry and man your
lasers and prepare your robot lorces lor the inevitable attack of the Alien Invaders. Theexcitment
builds as you command a battery ol missile bases in a bunker. Each invader has a laser aimed right at
you. Will they ever stop. Only you can save the Galaxy. You can compete with 4 people in the solar
system. There are 30 levels ol play. If you destroy the Aliens in the correct order you will receive
bonus points Can you get the top score? $14.95

TARGET COMMAND -The whole West Coast 15 being bombarded and only you can save it. You
are at the controls of the missile launcher and hold the destiny ol our country in your hands. It takes
a cool head, not hand and last reflexes to zap those missiles right out ol the air. Get ready to
pulverize — atomize and vaporize them. Oh, my God, those warheads are heading right for our
ALIEN ammo dumps. They are everywhere. NO ONE CAN SAVE US — EXCEPT YOU. You must move
your laser into position and lire as last as you dare. Time limit with arcade style excitement. Protect
INVASION your ammo at all costs, 10 levels of play. $14.95 SPACE PAK
SNAKEOUT -Slip your snakeinto position and score by chomping theblocks. Watch the way you
slither because your escape routes get smaller. 2 Bonus games included. $14.95

HEAD-ON - Please do not buy this game if you are the type that says 111 play it just one more time".
Players have been known to start playing HEAD ON at 8:30 p.m. and at 2 a.m., wonder where the
time went? Have you ever Tried lo explain to someone why you played a game for live and a hall
hours. We know of no remedy lor the addiction to HEAD ON except to beat theV[Conlevel9. No
one has done il, YET, will you? We think not. Move your car as fast as you can dare around the
tracks. You get 3 cars and MUST avoid the computer car. Points lor the most dots cove red. Bonus
cars, nine levek of play. -vn:«. kh am registered traoemafta a CommodoiH electronic $14.95

SNAKE OUT CompuI(»rMnl • Box 16MB • Lake H.wasu City, az s Add $1.00 Fur Shipi>'"a HEAD ON

32 COMMODORE POWER/PLAY Summor 1983

commodore user groups

Tidewater Commodore Commodore User Group KOREA

Users Group
4917 Westgrove fid.
1130 Elm Grove St.
Elm Grove, WT 53122
Commodore Users Club
K.P.O. Box 1437
User Bulletin Board
Virginia Beach, VA 23455 Tony Hunter Seoul. Korea
Fred Monson User Groups Fanning:
Commodore 64 Software Contact; S. K. Cha
Fredcricksburfl Area Exchange Croup MEXICO
Computer Enthusiasts P.O. liui 224 HAWAII
P.O. Bra SM Asociacion l)e Usaiios
Oregon, Wl 53575 Commodore User Croup
Locust Crow, VA 22508 K.J. Rosenberg Commodore
c/u Alejandro |j>pez
of Honolulu
(703)972-7195 CLU.li.K1 c/o PSH
Michael J'arhcr Arechiga
6]56 Douglas Ave. 824HannislerSt.
Holbein 174-6° Piso
Commonweal Ih 20/64 Caledonia, Wl 53108 Honolulu, HI
Mexico 18. D.P.
Users Croup (414) 835-4645 pm
Club dc L'sarios Cummodorc (808) 848-2088
1773 Wainwriflht Di, Jack White
Reston, VA22090 Sigma del Norle 3rd Fri.Kaliho Library
2nd Sat every month 10:00 am
1703)471-6325 Mol del Valle. Local 44 MICHIGAN
CANADA Garsa Garcia. N.L. 66220
TalCarawan.Jr. VIC Commodore User Club
Toronto PET NEW ZEALAND
VIC 20 Victims Users Croup 486 MichifUn. Ave.
1301 Columbia Pike #410 Commodore Users Croup
381 Lawrence Ave. West Maricsvilk. Ml-18040
Arliniiton, VA 22294 MettalVHFCIuhr.wms
Toronto, Ontario. Canada (313)364-6804
(703)9200513 M5M 1B9 Hazel Ave.
M.Gauthier
MikeSpcnfiel (416)782-9252 Mount Koskill
Peninsula Commodore 64 Ustrs Croup Contact: Chris Bennett 3rd Wed. of month. 7:30 pm
121 Bum ham Place Roger Altena 278-5262
PET Users Club
Newport News, VA 23606 c/o Mr. Brown Nelson VIC Users Croup
1804) 595-7315
Valley Heights Secondary School c/o P.O. Box S60 Classified
Richard C. Wilmnlh Bo*159 Nelson. New Zealand
WASHINGTON Langton. Ont. N0E 1C0 Peter Archer
E.R. Kennedy ATTENTION VIC 20™ OWNERS!
NW PET Ustra Croup Vancouver PET Users Group
2565 Dexter N. 3203 P.O. Box 91164 c/o New Zealand Synthetic Educational Programs at
Statue, WA 98109 West Vancouver. iiriLish Fuels Corp. Ltd Bargain Prices!
Contact: Richard Ml Columbia Private Bag
New Plymouth
Write !o Victoria Williams. Ph.D..
PET Users Croup Canada V7V3N6
NORWAY
Pa I os Verdes Learning Center.
c/o Kenneth long CCCC {Canadian
1800 Taylor Ave. N102 716 Yarmouth Road, #203P,
Commodore ComputerClub) VIC Club of Norway
Seattle. WA 98102 c/o Strictly Commodore Ned re Bankefil 10. Palos Verdes Estates, CA 90274.
VIC 20 Computer Club 47Coachwood Place 1750 Halden
947N. Burroughs Ave. Calgary. Alberta, Canada Norway
Oak Harbor. WA 98277 T3II1E1 UNITED KINGDOM "STAR STORM"
Michael 1). Clark Contact: Roger Olanson
North London Hubby Thu new space same for Com-
Central Washington W.P.U.G. Computer Ctuh
Commodore Users Croup 9-300 Kmiiskillen Ave. modore VIC 20™. Free info: SASE
Dtpl (if Electronics &
1222 S. 1st St. Winnipeg. Manitoba H2V 0H9 Communications to STAI1 STORM, P.O. Box 59,
Yakima. WA 9X902 Larry Neufeld Enflineering WllliSton, VT 05495.
Tim Me El my VIC-TIMS The I'olylechnicofNoilh
Blue Mountain Commodore 2-830 Helena St. London
Users Club Trail, British Columbia Holloway Rd.
VIR 3X2 London N7 BOB CAPS—VIC 20™, Commodore
667 Canary Dr.
Walla Walla, WA 99362 (604) 368-9970 Croydun Microcomputer Club 64™. S5.5O (postage paid). State
(509> 525-5452 Greg Coss 111 Selhur.it R. size (S.M.U, color (red, blue,
Keith Rodue Arva Hackers Selhursl.LoniionSE25 6U! Mack, hrown). I'atclics only
WEST VIRGINIA Midway Higli School 01-553-3207
$1.75 postage paid. Cluh patches
Arva. Ontario NOM 1C0 Vernon Cifforil
Personal Computer Club write or call for quote. Archer
P.O. Box 1301
D. Lenh
Charleston, WV 25325 Nova Scotia Commodore Monograms. Box 1701, Twin
Cam Cravens Computer Users Croup Falls. ID 83301.208-733-6243.
66 Land race Cres.
WISCONSIN
Dartmouth, N.S. B2W2P9
Sewpus Andrew Cornwall
c/o Theodore). Poloiynski Fun. Games and Educational
P.O.Bo*21851 Bonnyville VIC Cursors
BuSlOO Programs under S5.00. For free
Milwaukee.Wl 53221
Ik>nn>vitle. Alberta TOA 0L0 catalog write to; SOFT-1 YOU,
Wan It cs ha Area Commodure 1403) 826-3992
UserCrouplWACUC) P.O. Box3254. ResIon.VA22090.
Ed Wittchcn
256W W. Broadway
FINLAND
Waukesha.WI 531X6
Conlact: Walter Sadler VIC-Club in Helsinki
(414) 547-9391 c/o Matti Aamio
Linnuslajankj 2B7
SF-02940 ESPOO 94
Finland

COMMODORE POWER/PLAY Summer 1983 33

 COMMODORE POWER /PLAY Summer 1983

AND
EVEN MORE
NEW GAME
CARTRIDGES
FOR THE
COMMODORE 64
by Diane LeBoid

Two very hot Bally/Midway arcarde games and

a brand new Commodore-designed race car game
top the list of new releases for the Commodore 64.
One dreary morning not too long ago I was summoned to the locked (not to mention
security- guarded) chambers where they hide our game programmers. I got my usual warm welcome
—nobody even looked up when I walked in. (They're actually a great bunch of folks. Just—you
know—focused on what they're doing.) After I bounced off the ceiling a few times, stood on my
head and sang the complete Hallelujah Chorus in four-part harmony, somebody finally noticed I
was there and things got a little more cordial. In fact, by lunchtime I walked out with the full
scoop on all the great new games you'll be seeing soon for the Commodore 64.

game have a great experience in store. gun emplacements, to rescue your ship
LaZarian (for one player
In the first round you have to shoot all —this time heartened by the William
with joystick) the meteorites and rescue your lander Tell Overture.
Those of you who have played this (inspired to action by Beethoven's ninth Then you get to the final round—
game in the arcades will not be disap symphony). Once you get through that LaZarian himself (or, rather itself, since
pointed with this Bally/Midway favorite. round, you must navigate the "Tunnel of the awesome creature is a kind of com
All the wild graphics (the bouncing eye Fear," warding off aliens, killer fish and bination pyramid-octopus-cyclops with a
is just as fearsome as it is in the single evil-looking eye in the middle of
arcades), great music, anil exciting play what might be the pyramid's forehead). If
action are right there—with a couple of you manage to burrow through this
added advantages. First, if you're a monstrous structure, you free the eye,
novice player and you get wiped out in which then bounces around trying to get
the first level of play you can reset the you. You've got to hit it four times
game and continue from where you got before it will die. Then you move on to
Wiled instead of having to start all over. increasingly difficult levels of play, where
(Your score, however, is set back to meteors shoot more often, aliens and
zero.) Second, a "pause" feature lets you fish are more vicious and LaZarian is
freeze the game, go off and eat dinner more dangerous.
or answer the phone, then come back The programmer who's been working
and pick up again exactly where you on LaZarian says his high score is
left off. around 18,000 (you get a bonus ship at
Those who aren't familiar with the 14,000 points).

34 COMMODOREPOWER/PLAYSummer 1983
l..i/,i) i.iii liimself
Blueprint

beach halls—dies of a broken heart So As if that weren't enough, the poor

Blueprint (for one player guy has to avoid killer flower pots the
the trick is for the hero to get the
with joystick) machine finished before the ogre catches ogre keeps knocking off the ledge above;
The second Bally/Midway hit you'll be the lady. control a perverse monster named Willy,
seeing very soon is Bluqmnt—& very Hut getting the machine finished is who keeps trying to jump on the
funny, not to mention complex and chal not so easy for the little guy—although machine's "start" button (the machine
lenging— memo ry-ma2e-monster game. he does somehow always seem to be will fall apart if you start it before all the
Once again, the graphics, sound effects smiling. He's got a blueprint of what he's pieces are in place); and keep away from
and play action of the original arcade supposed to build (would you believe the a hairy-faced "maze monster" who wants
game have, in our programmer's words, machine wears shoes?) and ten houses to eat him.
"been copied to a T."' where pieces of the machine are hidden. If by some miracle our hero does com
There's a lot going on in this wacky When the game starts, eight of the plete the machine, he can then use it to
game, so it's a little hard to describe. I'll houses contain the pieces he needs to shoot at the lecherous old ogre and save
bet the first thing most people would build the machine and two contain— the lovely lady. But once he konks the
notice, however, is the buxom beauty uh oh—bombs. His job is to go into a ogre, the whole thing starts all over
who keeps running across the top of the house and remove its contents. If it's a again—only worse. The ogre runs faster
screen, pursued by a hairy ogre. piece of the machine, he runs down and this time, flower pots fall more often,
This unlikely couple actually composes sticks it on the blueprint. But if it's a bombs have shorter fuses ... the poor
the timing mechanism for what's going bomb, he has to run to the "bomb pit" guy just can't win. (Is this starting to
on in the rest of the game, liadi time and throw it in before it blows him to sound like a version of your own life?)
they race across the screen the ogre is a smithereens. To complicate his life, Actually, he can win—sort of. Accord
little closer to the distressed damsel. If when he removes a piece of the machine ing to the programmer who's been work
he catches her, he throws her into a from a house, the next time he goes into ing on the game, things at least won't
"swag hag" (you even see her squirming that house he'll find—a bomb. With a get any worse after about five or six
around inside) and the hero—who mean short fuse. So he should definitely avoid levels. That programmer, by the way,
while has been frantically trying to build wearing out his welcome at any of says his high score on this version of
a machine lo bonk the ogre with big tlie houses. Blueprint is about 5O,(KK).

36 COMMODORE POWER/PLAY Summer 1983

 LeMans

LeMans "units" of time. (You can watch the You see only the taillights of the cars
countdown on your screen as you use up ahead, and then their silhouettes when
(for one player they come into the range of your head
these precious units.) As you race along
with paddle) you get points for distance you cover lights. Actually, that tunnel is pretty
This Commodore original, available and the number of cars you pass (every spooky, now that 1 think of it
If you crash you're forced to go to the
right now, is a classic race car game that time you pass ten cars you get a
uses the paddle like a steering wheel and 1000-point bonus). pits, and if you ride the shoulder, even
If you manage to score at least 20,000 though it might prevent a crash, your
the fire button like a gas pedal. You
have an aeria! view of the track in all its points before your 60 units of time are car slows down. Either way you lose
high-res glory, with curves, ice, sudden up, you get another 60 units, and can time—the deciding element in this game.
two-way traffic and a very exciting (name continue the race. Only this time around So the obvious way to stay in the race
ly dark) tunnel, al! of which come up un- each unit is a little shorter—which and keep racking up points is to be a
predictably to challenge your reflexes. means you have less real time to score quick, alert and safe driver. Just like in
The interesting thing about this game is the 20,000 points you need to get the real world.
another 60-unit extension. The scores in this game are, as you
that if you get really good and don't
mind taking your meals intravenously, You'll be amazed at how realistically might guess, VERY high. The program
your car responds to the changing road mer who's responsible for this one
you could go on playing forever, because
conditions in this game. When you hit wouldn't even hazard a guess on how
there's almost no end to how long you
the ice, for instance, you don't have as high you might expect to go, although
can keep going.
The crucial factors in this game are much control, and the car slides instead there probably is some kind of limit.
the distance you travel, the number of of turning when you try to steer out of We'll just have to wait and see how you
the skid. And the dark tunnel effects are all make out, now that we're shipping
cars you pass and the time it takes you
to do it. You start out with 60 fairly slow so realistic it's almost like being there. this one.

VIC 20 Conversions
In addition to these three exciting new original arcade graphics than ever
cartridge games designed specifically for before. In the case of Sea Wolf, three
the 64, you'll soon be seeing (if you stages of water make it even more
haven't already that is) 64 versions of challenging than the VIC version,
some of our most popular VIC games. according to an inside source.
These releases include Omega Race, As time goes on you can look forward
GORF, Clowns and Sea Wolf, all of to even more great new games for both
which happen to be Bally/Midway games the Commodore 64 and the VIC 20
and all of which play just like the emerging from those closely guarded
original arcade versions. halls where our game programmers lurk
All four, naturally, boast colorful high- long into the night. Keep watching your
dealer's shelves for new releases. C
resolution graphics that are truer to the SeawalffoT the 64

COMMODORE POWER/PLAY Summer 1983 37

 *
•
1 * y ft •
■
*

S
! I
i
rv '■V
i*
■

f »% *

P •

?
j
I *

• ■
•
*
•
■
*
■
■ V i^ • • ■ •
¥ »

• 4 4 ■ * * •
■

Score higher by taking advantage

few programming "bugs" in the re and
COtfF cartridges for the VIC 20.
Evin programors make a misteak onse
in a wile. With all our efforts to make a
game play well and fit into a limited #***
memory, we sometimes overlook a
potential "bug." And sometimes these
bugs work to the user's advantage. Let
me tell you about a few of them in Com
modore's Omega Race and GORF car
tridges that will help you rack up higher
scores than you may have been getting.

■;
Possibly the most useful bugs are in
the VIC 20 version of Omega Race. The
first one I'm going to talk about is not
really a bug in the true sense, so let's
call it an "undocumented feature." Nor

^*
mally in this game you get three ships
when you start However, if you hold
down the SHIFT key while pressing
either Fl (for joystick) or F3 {for paddle)
at the beginning of the game, you will
get—count 'em—five ships! Let's see if
that improves your score!
Another interesting quirk in Omega
ill
Race that you probably don't know
about (although some of our readers
have discovered this one by accident) is
the ability to replenish your ships if you
get down to one or two. Keep count of **#*
the number of screens you've cleared.
After you clear the fourth screen, when
the music starts to play, hold down the
function key you would use to start the
game. Continue to hold the key down
until after the "droid force eliminated"
message appears on the screen. (Some
times just part of the message will
appear, but that doesn't matter.) When
the fifth screen appears you should
now have three ships. This procedure
sometimes works using shifted function
keys, but the results in that case are
inconsistent
Keep in mind that if you have not lost
any ships up to this point and have been
awarded a bonus ship, it would be a
disadvantage to use this method,
because the ship count goes to three m :m
regardless of the number of ships you
had. You can continue doing this every

38 COMMODORE POWER/PUYSummer 1983

 fourth screen, just before the "droid

*
force eliminated" message. Try iL I think
this also might improve your score!
The next bug I'd like to tell you about
is in GORF for the VIC 20- This one
allows you to play in the "invaders"
round for as long as you want, racking
up points almost indefinitely. The pro
cedure is rather involved, so I've includ
ed some pictures to help explain.
■■■■■ Here goes... Shoot all the invaders
except the one in the upper left comer
and the one in the upper right corner
(Figure A). Then sit in the lower center
of the screen to avoid the invaders and
their missiles (Figure B). When the

■: ,-J i '
invaders are on the bottom row of the
screen, move with them to get your ship
out of the center of the screen.
Ik (Figure C).
When one of the invaders drops off
\\\
the screen your ship will be destroyed.
Immediately push forward on the joystick
and move the next ship to the center of
the screen. An invader will keep running
from one side of the screen and off the
other side. This invader will never hit

If— you if you stay as high on the screen as

you can. Also, the invader will never
drop off the bottom of the screen. You
can now just sit there and shoot the
GORF and two types of flying saucers
for bonus points (Figure D). When you
get bored you can go to the next round
by crashing your ship into the remaining
invader.
These are the only useful bugs 1 am
aware of, right now. Hopefully they will
help you get a higher score on Omega
Race and GORF. But if you find any
thing else you think is strange when
you're playing one of our games, please

1
drop me a line either through the regu
lar mail or through EMAIL on Compu
Serve (PPN 70001,1153). That way,
. ■ ■ : when I hear something interesting I can
pass it on to the rest of you.
Well, better get back to Wizard of
0 Wbr... C
 In response to David Berezowski's article in the
the notes from the champ of Omega Race who
those of us who use joysticks—especially since
are David's hints for "space jockeys" who prefer

An article in the Winter, 1982,

Power/Play gives the reader some hints
on how to score well at Omega Race
using game paddles, but it is also possi
ble to score as well or even higher using
a joystick.
First you need to learn to use the joy
stick to make your ship go where you
want it to go. Unlike the game paddle,
which allows you to make a quick and
controlled rotation, the joystick makes a
rapid rotation that takes practice to con
trol. If you also apply forward thrust
while turning you are likely to careen
wildly about the screen until you en
counter a destructive object.
It is wisest to apply thrust and rotation
in separate actions to maintain good
control and, above all, do not panic!
Controlled rotation can be had by gently
nudging or tapping the joystick left or
right Controlling the rotation so you
can get the ship pointed in the direction
you want is the hardest part of mastering
joystick control, but once the joystick
is mastered the droid fores will be at
your mercy.

40 COMMODORE POWER/PLAY Summer 1983

 by David Owens

Winter, 1982, Power/Play, David Owens writes: "When I read

only used game paddles I decided someone should defend
my highest score, using five ships, was 244,100." So here
sticks to paddles.

Thrust-Rotate-Fire The Head-on Approach The Kamikaze Secret

After you've spent a few games careen The key to staying in the game with a One would think that destroying as
ing around the screen towards oblitera joystick is the same as with paddles: get many droid forces as rapidly as possible
tion, you are ready for a more organized the command ships to fire harmlessly in using the fewest ships would be the best
approach to the game. The most suc to the side of the screen, then move out way to score well. But there is a little
cessful strategy to help a beginner clear and destroy them. But rather than known secret: Sometimes it's better to
their first screen is as follows: traveling exactly on a horizontal line, try lose ships for a better score!
traveling in a repeating diagonal pattern, After clearing four screens you ad
which allows more firing time on the ad vance to the next droid force level, more
vancing droid forces. difficult than the last. It makes sense to
score as many points as possible before
moving to the next level, where you are
likely to lose your ships quicker and
score less. But try this, instead. Clear
three screens, then sacrifice your next
ships at the last second until you have
only one ship left. Use it to clear the
fourth screen and advance to the next
1. As soon as the game starts, thrust level.
forward. This heads you straight But how can you continue with only
down. one ship? Here comes the secret If you
2. Rotate the ship until it is exactly 1. Thrust at an angle to make a hold down the fire button just after you
horizontal, thus making it possible to diagonal pass across the droid forces. dear the fourth screen and keep it down
take aim at a maximum of ships. 2. Rotate and fire. until the next level appears, you will get
3. Fire on the ships. You should be able 3. As ship returns to original position, two more ships while maintaining your
to clear the screen in a few passes up rotate to diagonal and repeat cycle score! But be forewarned! If you have six
and down. until all droids are destroyed. ships and hold down the fire button
Remember that you can only fire four By using these two basic techniques after you clear the fourth screen your
times in rapid succession before you separately or joindy you can find suc force will be depleted to three ships!
need a brief intermission to reload. cess. Hal/ the fun is developing your Using your ships to best advantage
Spreading out your shots to hit several own variations that work for different you should score over 100,000 against
ships is better than shooting your entire situations. the first force and over 200,000 against
load at once, possibly striking only one the second force. Note that survival
ship with all four shots. Also note that against the second force is most depen
missiles are released when you lift the dent upon destroying the first death
button, a crucial point for good timing. ship, which comes almost immediately.
Using the thrust-rotate-fire technique Use the first technique described here to
you can clear many screens, but you'll get quickly to the bottom of the screen
notice that most ships are struck as they and fire on it. Diagonal bursts often
recede. Thus few hits are made on high strike death ships better than horizontal
er scoring command ships and death or vertical shots, because they do not
ships. Another technique is needed. leave as many holes for them to sneak
through. Note that survival against the
third force requires impeccable tech
nique and lots of luck!
Ready? Space jockeys, man your ships!
Take hold of your joystick and show
those Omegan paddle warriors how
space was meant to be conquered! C
COMMODOHEPOWER/PLAYSummer1983 41
 PART 3
Yes, folks, it's that time again.
Hopefully by now you've begun to see
the various interactions among
envelopes, frequencies and waveforms.
The These are our basic tools for music (or,

Commodore 64 indeed, any sound) synthesis on the

Commodore 64.
Piano To recap, the program in our last in
stallment calculated a frequency array for
Finally, you're ready to make some music with seven octaves of notes. We will use that
the Sound Interface Device (SID) in your Com program as a base for this article, as we
modore 64! (This will undoubtedly be a great create a program that will allow us to
relief to those who have been following this play the keyboard like a piano. If you
series from the start.) Beginners may simply missed that issue, you'll find the original
want to type in the program listing, following program on page 45.
Before we begin adding lines to the
Paul's instructions to turn their 64 into a
program, you will need to delete all the
piano keyboard that produces a real piano
lines from 450 onward (simply enter the
sound. However, the more intrepid among you
line numbers by themselves and press
can go through Paul's line-by-line explana RETURN). If you remember, these lines
tion—you'll learn a great deal, regardless of let us hear the frequency table being
your computer experience, if you do. (Parts 1 created each time we ran the program,
and 2 appeared in the Winter, 1982 and and we certainly don't want that to hap
Spring, 1983, issues of Power/Play.) pen now.

by Paul Higginbottom

MAKING FRIENDS

\
42 COMMODORE POWER/PLAY Summer 1983
 To allow us to play the keyboard, our
500 SID-54272
program must first see if a key is
pressed. If it is, the program must 310
evaluate which note that key cor 520 VM=?:HI=256
responds to and gate a voice on with 530 FORI=0TO23:POKESID+I>0:NEXT
that particular frequency. To sound 540 POKESIB+24,15
piano-like, when a second key is hit 550
(after the first is released) the first sound 560 FORI=0TO2:INDEX*SID+I#VM
should still be able to be heard. In order 570 POKE INDEX+3,fl#16+Ii
to do that, our program must "cycle"
530 P0KEINDEX+6jS#16+R
through the voices. To put this another 585 P0KEINDEX+2,PWF1NB255
way, the first key pressed will play the
590 NEXT
first voice, the second key will play the
600 DRTR3,il*10,0.800
second voice, the third the third voice—
686 P0KEINDEX+3.PW/HI
and the fourth will go back to the first
700 K*="Q2W3ER3T6V7UI9O0P!!-*£t"
voice. A statement such as:
VOICE-VOICE + 1: IF VOICE>2 710 DIMK(255)
THEN VOICE = 0 720 FORI-ITOLENCK*)
will cycle the voice counter. The IF 730
statement ensures the variable VOICE 740 NEXT
doesn't go out of the range of 0 to 2. 750 PRINT:PRINT" 23 567 90 -£"
Load the program from our last in
?6Q PRINT"Q WERTVUI0P(5#t"
stallment (refer to page ??), delete lines
800
450 onward and enter the following:
810 KEV«K<RSCCRS)>-i:IFKEV<0GOTO800
820 IFKEV>11THENFRG=F(QCT+1, KEV-12 >:G0T0835
830 FRQ=F(OCT,KEY>
835 FH=INT(FRQ/HI):FL*FRQ-FH*HI
840 INDEX=SID+VOICE#VM
850 POKEIHDEK,FUP0KEINDEX+I,FH

WITH 860 POKEINDEX+4,URVE:POKEINDEX+4,WRVE+1

370 VOICE-VOICE+1IIFVOICE>2THENVOICE=0
839 GOTO800

Line-by-line explanation of the program:

500 Assigns the address of the SID chip

to the variable "SID."

510 Initializes variables "VOICE" (cur

rent voice being played), "OCT" (current
octave the keyboard notes begin at) and
"WAVE" (the current waveform to be
POKEd into the control register of a
voice).

520 Sets two constants. VM (Voice

Multiplier) is set to 7 because there are
6 bytes to control each voice and the
memory address of the start of each
voice is computed by VOICE'VM. HI is
set to 256, which is the high order value
divisor. See Part 1 in this series for an
explanation of how certain values are
represented by two values—"lots" of 256
plus a remainder.

530 This FOR ... NEXT loop initializes

the SID chip register to zero to ensure
that no previously run program will ef
fect this one.

540 Sets SID register 24 to 15. 24 is

the volume register, and we are setting
the volume to 15, which is the maximum
value.

COMMODORE POWER/PLAY Summer 1983 43

 550 Reads in the envelope and pulse 810 Assigns KEY to the position of the
width parameters we wish to test from keypress on the keyboard minus one.
the DATA statement at line 600. The Since elements of the array for keys not
variables A, D, S and R represent the included in the "piano" will be equal to
four parts of the envelope: Attack, zero, this expression will equal minus
Decay, Sustain and Release. PW is Pulse one if an invalid key is pressed. The IF
Width. statement checks for invalid keys by see
ing if KEY< 0. If it is, the program goes
560 Start of a FOR ... NEXT loop that back to the keyboard checking line
will set the three voices in the SID to again.
the parameters just READ. INDEX is set
to the start address of the block of seven 820 There are 12 notes in an octave.
bytes for the current voice. Since there are more than 12 keys in
our piano layout, the program must
570 Puts the attack and decay values check for this, and if the key position is
into register 5 of the current voice. greater than 11, it must subtract 12
from the key and add 1 to the octave.
580 Puts the sustain and release values Instead of actually adding 1 to the oc
into register 6 of the current voice. tave and subtracting 12 from the key,
this line evalues the frequency right
585 Puts the low value of the pulse there with the subscripts OCT+1 and
width into register 2 of the current KEY—12 and skips the next line, which
voice. would calculate the frequency normally.

586 Puts the high value of the pulse 830 Gets frequency from the array.
width into register 3 of the current
voice. 835 Evaluates the low and high values
of the given frequency in variables FL
590 Continues looping until done with andFH.
the NEXT command.
840 INDEX is set to the start of the
600 DATA to be tested. This consists of voice block of registers.
Attack, Decay, Sustain, Release and
Pulse Width (if that waveform is used). 850 The low and high frequency values
are now POKEd into the SID. INDEX is
700 K$ is set to hold all the keys that equal to the position of the low byte of
can be played. You should note that the frequency and INDEX+ 1 to the
these keys represent a piano layout on high byte.
the keyboard.
860 Because we cannot detect the dura
710 Dimensions the K< array. This tion of the keypress, the voice is gated
will be an array of the key positions off and then on, so the A-D-S cycle is
subscripted by the ASCII value of the executed when a key is depressed. The
keypress. This is necessary because we voice is gated off first, so the release will
need to know the key position along the have been completed before we gate the
piano layout to calculate the frequency voice on. To release, register A (the con
that should be used. trol register) is POKEd with WAVE (the
value of the current waveform) which is
720 Start of a FOR ... NEXT loop to either 16, 32 or 64 (or 128 for noise,
assign the K< array. The loop goes but this isn't particularly musical.) To
from 1 to the number of characters in start the cycle it is POKEd with
K$, which is calculated using the LEN< WAVE+1.
function.
870 This cycles the voice, as was ex
730 This gives the ASCII value of the plained earlier, so that each successive
i'th character in K$. keypress uses the next available voice.
This gives the user the ability to more or
740 Continues the loop. less play chords by playing keys in rapid
succession.

750-760 Prints the keyboard on the

screen.
880 This loops the program back to the
start of the main loop to check the key
board again.
800 Main loop. Checks the keyboard. If
nothing is pressed, it goes back to this
line again and continues checking. Read the description of the program

44 COMMODORE POWER/PLAY Summer 1983

carefully, until you understand how it This will make the attack and decay This will produce notes two octaves
works. Check for any mistakes and shorter than before. You may note we lower than before, and is now using the
SAVE the program before entering the have a sustain level of zero, which "mellow" pulse wave.
RUN command, because if you've made means the decay will fade to NO volume This simple program actually provides
a mistake you might cause an (or very close). quite a bit of flexibility, although,
unrecoverable crash and have to do all RUN the program again and hear the because it's written in BASIC, it does
that typing again! difference. Experiment with other have some limitations. For instance, no
When you've SAVEd the program numbers. For example, if you have the real-time special effects can be per
RUN it and you should (famous last sustain number (the third one) greater formed and the duration of keypress
words), after a second or two, see the than zero, the notes will stay on until cannot be checked. Look out for a car
layout of the keys to play appear on the the VOICE variable has cycled around to tridge coming out soon that does all this
screen. You can then play the keys and the same voice again and it is changed and more! AJso, a real synthesizer key
you'll hear the envelope that the pro to a new note. board add-on with more SID chips is
gram is using. The VOICE cycling line (870) could coming soon!
OK, maestro, the playing's over; it's also be changed so the piano becomes I would expect this is enough for this
back to work. Now it's time to experi monophonic (one voice) by changing time. This program should give you a
ment! The key line to change is the VOICE>2 to VOICE>0. Try that. Also, much better feel for how the various
DATA statement in line 600. Press the the octave and waveform could be parameters affect the sound on your
STOP key and enter changed. Try entering: Commodore 64. Next time we can go on
600 DATA 3,9.0,0,800 510VOICE=0:OCT=2:WAVE = 16 to look at the filter. Have fun! C

Program from Part 2 your programming adventure here in be s+6). Also note that in that issue
For those who missed the last issue of Part 3. For those who tried entering it there was an error in the text on page
Power/Play, this is the (corrected) base from the last issue, please note the cor 43, second full paragraph. The last lines
program from Part 2 of "Making Friends rections in lines 110 (the t was left out) in that paragraph should read "the ratio
with SID." You need it to start off on and 485 (the first POKE is supposed to between semitones is 21 (1/12):!".

180 FR=3520 :REM NOTE 'fi' IN TOP OCTRVE

110 CQ=2ta/12):REM CONSTRNTMULTIPLIER FOR NEXT SEMITONE
120 FORI=1TG9:FR=FR/C0:NEXT^REM STRRT FR RT 'C BV GOING BRCK 9 SEMITONES
130 SS*16777216:REM SIP CLOCK
140 CS=1022739:REM CPU CLOCK
150 FC=SS/CS■REM FREQUENCY MULTIPLYING CONSTRNT
200 DIMF<7.il>:REM FREQUENCY RRRRY (OCTfWE.SEMITONE)
300 FORI=0TOll:REM CYCLE THROUGH 12 SEMITONES
310 S=FR#FC-REM CPLCULRTE SIS VRLUE OF SEMI TONE IN TOP OCTRVE
400 FORJ=7TO0STEP-l'F(J.I)=S:S=S/2
410 NEXT:REM CflLCULRTE VRLUE FOR RLL 9 OCTRVES
420 FR=FR*CO:REM 00 ONTO NEXT SEMITONE
430 NEXT:REM CONTINUE THROUGH RLL 12 SEMITONES
459 REM
463 REM PRINT OUT RLL THE FREQUENCIES
470 S=54272:REM STflRT RDDRESS OF SID CHIP
475 F0RI«8T024:P0KES+l,e:MEXT:REM INITIRLIZE SID CHIP
480 P0KES+24,15:REM SET VOLUME
485 P0KES+6iU:REM RTTRCK=0-DECRY=0:SUSTRIN=0:RELERSE=U
500 PRINT"FREQUENCY TRBLE"
510 PRINT" "
520 PRINT"0CT SEM FREQUENCY"
600 FDRI=0TO7
610 FORJ=0TO11
620 PRINTl;TRB<45JJiINT<Fa,J>>
624 P0KES+4,32=REM GflTE OFF THE VOICE FIRST
625 H=INT<F(I,JV256):REM CRLCULRTE HIGH BYTE OF FREQUENCY
626 L=>F<I,J)-H#256:REM CRLCULRTE LOW BYTE
627 POKES,L-POKES+t,H:REM PUT IN FREQUENCY
628 P0KES+4J33-REM NOW GRTE IT ON
629 FORK=1TO100:NEXT:REM WRIT R BIT
630 NEXTJ.I

COMMODOREPOWER/PLAYSummer I9B3 45
o
o

o
o
o
3D
rn
TJ
O

ID
CD
US

Gerald Kolpan
BIT-NAPPED GRAPHICS
on the Commodore 64
by Jim Gracely

One of the most exciting, but sometimes frustrating features

of the Commodore 64 is bit-mapped (or high resolution) graphics.
The idea of individually controlling 64,000 dots on the screen
just cries out to be played with. Visions of cartoons and
wild animation dance in our heads. However, once the subject is
tackled, many people turn away in frustration. After all, they say,
there are all kinds of POKEs, PEEKs and special rules that even
the Commodore 64 Programmer's Reference Guide doesn't clear
up. They can't seem to find the hidden key that makes the screen
burst into designs. Well, it's not quite that simple. In this article
we'll look at one way to approach bit-mapped graphics, and
hopefully remove some of the frustration. Along the way we'll
present some utility programs and some high resolution graphics.

Starting Out
The first step in working with bit character set is inaccessible. All we can
mapped graphics is to get a feel for how do now is turn bits on and off. The 64
it works. It's not necessary to completely automatically puts the beginning of the
understand how it works to use it! The 8000 byte screen at 4096, but that's the
Programmer's Reference Guide provides same place BASIC starts! So, to keep
a good start on explaining how it works things as simple as possible, we can
(pages 121 through 127), and if you sit move this starting position to 8192 by
down with your 64 and some graph using POKE53272,PEEK(53272K)R8.
paper you would eventually figure out all This allows us 8K of BASIC for our pro
the details. But we're not going to do grams before we start writing onto our
that There are just too many exciting screen. For those of you who are com
things that can be done with BMG (Bit- piling huge programs using BMG, the
Mapped Graphics) to bother using up a trick is to move the beginning of BASIC.
couple of pages explaining it in detail. Let's review. After entering the two
So, here's just a brief explanation. POKEs mentioned above, we are in
The screen that the 64 normally BMG mode. The first location on the
displays consists of 1000 character screen is byte 8192 and the last is
blocks. This means it takes 1000 POKEs 8192 + 7999 or 16191. Now we're going
to fill the whole screen with any to change the screen into graph paper.
character. Even the period at the end of POOF! At the upper left comer. X=0
a sentence uses up one whole character and Y=0 and at the bottom right comer
block. There's no way to get any more X=319and Y-199. The X values are 0
characters on the screen than this ... to 319 across the top of the screen, and
unless ... we switch to BMG mode. the Y values are 0 to 199 along the side
There is one bit in register 53265 that of the screen. We really haven't done
tells the 64 if it is in BMG mode. By set anything other than to change our point
ting this bit to a 1, we've entered the of view. (Get out your calculator: does
world of BMG. Bit 5 in register 53265 is 8000 bytes * 8bits/byte = 320* 200
the magical bit and using bits?) We have come to the reason BMG
POKE53265,PEEK(53265>OR32 will set seems so hard: how do we put a dot
this bit to a 1. (one bit on) in the middle of the screen
I know what you're saying: fine, won (X = 160. Y-100)?
derful, so now what's going on? How Still thinking about that one? You can
come my screen just went KAPLOOOEE stop now. The way to put a dot at
when I typed that? The screen that the X-160,Y = 100 is to use the formulas
64 displays in BMG code is NOT made given in the Programmer's Reference
up of 1000 character blocks. Instead, the Guide! That's that. We can now create
screen is displaying 8000 bytes of pro what I call the base graph program
gram memory! All of the normal (BGP if you're into mneumonics):

COMMODOREPOWER/PLAYSummer 1983 47
1 P0KE33263,PEEK(S3263)0R32 Lines
2 P0KE53272,PEEK(53272)0R8
3 F0RX=8192T016191:P0KEXj Look at the following program: Add the base program and run it
0 iNEXT This program uses some basic geometry
10 V=100
4 FORI=1024TO2023:POKEI, to draw a line from point XI.YI to
3:NEXT 20 F0RX=9T0319
X2.Y2. Let's take a quick look at it
30 GOSUB280
199 G0T0248
40 NEXT
200 CH=INKX/3):ROINT<Y/3) Line 20 finds the distance between
:|_N*VRND7 The vaiue of Y remains equal to 100 X1.Y1 and X2.Y2 using a distance for
218 BY=3192+RO*320+8#CH+IN (halfway down screen) and X increases mula (an interesting side note is that
from 0 to 319. Each time X increases, a BASIC takes about 20 times longer to
GOSUB 200 is performed, Enter this perform DX.2 than DX'DXI).
220 P0KEBY,PEEK(BV>0R<2TBI>
program and add the base program to it
230 RETURN line 30 uses DX and L to compute the
as described above. Now run it. A line!
240 POKE1024,16 X increment (XI) or the amount that X
It's not very fast, but it's a straight line
changes per block. The same thing is
230 0ETn*:lFR*O" "THEN25S and it's in HIGH RESOLUTION!
also done for the Y number.
269 P0KE332G5,PEEK<53263) Add the following lines to the program
RND223 and run it again: lines 40-70 set up a FOR-NEXT loop
270 P0KE33272,PEEKC33272> from 1 to L. Each time through the
50 X=160
loop, XI is added to XI (X) and Yl is
flND247 60 FQRV=0TO199 added to Yl (Y). By computing XI and
275 CLR: PRINT".!": END 70 GOSUB200 YI in line 30, X will equal X2 and Y will
Line 1 puts us into BMG mode 30 NEXT equal Y2 when the loop is done.
line 2 puts the beginning of the screen A vertical line, too! Things are really This line program is another good
at 8192 getting exciting now!! To get lines that utility program to use inside of other
aren't just horizontal or vertical takes a programs. Once we find some points, we
line 3 clears the bit map by POKing
couple of extra lines of programming. draw lines between them!
zeros to all 8000 memory locations.
Save the previous program if you want,
line 4 sets the colors to cyan and black and enter this one:
(more about colors later)
10 X1=0-V
lines 200-270 plot any X,Y point onto 20 DX=X2-
the screen (pages 125 and 126 of the
:V=V1:L«
Programmer's Reference Guide)
30 XI=DX/I
This program is the base of all the
40 FORZ=1TOL
following graphic routines. Enter this
program and save it. When you write a 50 GOSUB209
graphics routine, number the lines from 60 X=X+XI:V=V+VI
10 to 180. Every time your routine 70 NEXT
generates an X,Y point, use a GOSUB
200 to plot it. Save your program. To
combine the two programs, use this
Colors
trick: load the base program and list it
Load your program. Before you list your Now let's take a short break from bits. The upper bits are used for the
program, move the cursor to line geometry and talk about colors. Loca character (or dot) color and the lower
number 1 of the base program and hit tions 53280 and 53281 won't change bits the background color. Page 61 of
RETURN. Continue hitting RETURN on the screen colors when in BMG mode, the Programmer's Reference Guide has
every line including line 275. Now list and the screen color locations (55296 the POKE numbers for each of the col
your program, and the base program is through 56295) aren't used for anything. ors available. To get the combination
part of it! You can save your program This is because of the way memory is you want, multiply your character color
again, and this time it includes the base shuffled around in BMG. However the number by sixteen and add it to your
program. Using this method will save screen colors can still be changed. What background color number. The result is
you a lot of time and mistakes, and you used to be the screen memory locations the number to POKE.
don't even have to think about what the (1024-2023) are now the color memory An example to the rescue. Let's use
base program is doing. locations for the screen! To change the white characters and a black back
Now let's get into some GRAPHICS! color of the whole screen or any part of ground. The chart on page 61 says that
Keep in mind that these routines need it you have to POKE the colors you white is the number 1 and black is 0, so
the base program added to them, and want. To make life harder still, the the number we want to POKE is
watch the various ways that the X,Y number you have to POKE is a little dif 1*16+0 or 16. To set this for the
points are generated. You're going to ferent than usual. whole screen change line 4 of the base
notice that BMC is not very fast. That is The locations 1024-2023 are the program to:
one of the limitations of BASIC. memory locations for both the back FOR I - 1024 TO 2023 : POKE 1,16 :
ground color and the character colors. NEXT
The eight bits in each location are split
up into four upper bits and four lower

4B COMMODORE POWER/PLAY Summer 1983

 Circles

Circles are the last geometric plot we 35 X<NX0SCT>#R+H routine. This design is surely one to
are going to consider. They are good for 40 V<rO=SINa)*R+K impress friends with.
making some designs but I have found 45 NEXT 10 R=80'H=160'K«100:P=0
them most useful for defining points to
50 FORT=1TON-1 15 FORI*0TO334STEP6
draw lines between. There are two ex
60 FORQ=T+1TON 16 PRINTI:NEXT:END
amples of that later. For now, look at
70 K 20 X1=H:Y1=K
the following program:
80 X 23 T=I*fr/190
10 R*10-H 90 DX=X2-Xl:DV=V2-Yl:X=Xl: 30 X2=R*C03<T)+H:V2=R*SIN
20 F0RI-1T036B V=V1 :L=SGR<DX#DX+DV#DV>
30 T-Udir/ieO 95 XI-BX/WI-DSVL 50 DXX2XlDYV2ViXXl
40 X»R*C0S<T)+H :V=V1:L=SQPXEX*DX+BY*DY>
100 FORZ=1TOL
30 V«R#SIN(T)+K 110 GOSUB200 60 XI=DX/L'VI=DY/L.
60 GOSUB209 120 X=X+XI-V=Y+VI 70 F0RZMT0L
70 NEXT 89 OOSUB200
130 NEXT=NEXT=NEXT
This routine will plot a circle with a 90
This program first defines 12 points of
radius of R and with its center at X = H 100 NEXT
a circle and stores them in X(N) and
and Y-K. The circle is defined by 118 P=1-P:IFP=0THEN1S0
Y(N) arrays, it then sets up two FOR-
rotating one point around the center.
NEXT loops. The outer loop sets the 120 X3=X1+2*DX:Y3-Y1
Lines 40 and 50 compute the X and Y first point of the circle to X1.Y1. The in 130 X1»X2:Y1=Y2:X2=X3:
values of this point as it is rotated ner loop then sets the next point to 140 I3QTQ58
through 360 degrees. In this example X2.Y2 and draws a line to it. In the 150 NEXT
the radius is 10 and the center is at same way, the inner loop draws a line to
160,100 (the center of the screen). The Speaking of impressing friends, be
each point higher in the array than
program is simple but the concept is a careful! I had a friend stop by after
X1.Y1. Also in the same way, the outer
little harder, so we'll just take a look at lunch the other day and I wanted to
loop sets each point of the array to
what we've done. show him the GEOMETRIC design, but
X1.Y1.
lines 20-30 set up a FOR-NEXT loop before it had drawn 20 lines, he was
lines 2O-4O define 12 points of a circle
from 1 to 360 (the number of degrees in ready for dinner! I knew I had made a
(360/30 = 12). Each point is placed into
mistake. Drawing designs takes time. If
a circle). Line 30 changes degrees to ra the X(K) and Y(N) array. The N pointer
you want to save a design, you can
dians (which BASIC uses). is incremented after each loop. dump it to a printer (look at page 88 of
lines 40-50 compute what X and Y will
Unes 50-60 set up the outer FOR- the March issue of Commodore maga
be as the angle increases from 1 to 360,
NEXT loop and define XI and Yl. The zine). Even experimenting is hard be
Unes 60-70 jump to our plot routine values for each X1.Y1 set are taken from cause once something starts drawing it
and keep the loop going. the array elements 1 through N-I. takes a while to see the result, or even
This program is also slow. After all, a mistake!
lines 70-80 set up the inner FOR-
it's plotting 360 pointsl One quick and Here are a couple of hints to keep
NEXT loop and define X2 and Y2. This
dirty way to speed it up is to add a you from pulling your hair out: before
loop is bounded from one greater than
STEP to the loop. If line 20 were: letting the whole program run, use a
the outer loop (T + l) to N-l.
FOR I - 1 TO 360 STEP 3 RUN10. This will allow you to spot any
then only 120 points would be plotted Lines 90-130 are the line drawing
problems {divide by zero, illegal quantity
(360/3-120) and the program would be routine presented earlier.
...) more quickly. Also, watch your X
three times as fast Of course you can The result of all this work is an in
and Y values! The subroutine at 200 will
use any step, but the bigger the step, teresting blend of lines and curves. By
happily plot a dot at X = -2000! Un
the dottier the circle will look. Just the way, don't expect this program to
fortunately, it won't appear on the
think, if you said STEP 120 it would on complete in a couple of minutes. It has
screen, and just might freeze up the 64
ly plot 3 points which would certainly to compute and draw 66 lines, and you
(you could be POKing in the middle of
not look much like a circle! remember how long it took to draw
your program!).
All right, let's combine some of these one line!
Well, that's our tour of bit-mapped
The last design program we'll discuss
plots and ideas to create some designs. graphics. The sample programs should
starts and ends the same as the previous
The first listing is called GEOMETRIC keep you glued to your monitors for a
and it needs the base graph added to it program, but the middle is a tittle dif
while, and maybe you even picked up
This program uses part of the circle ferent. This time after you define and
some good ideas for your own designs. If
routine to define some points and then store 12 circle points, a line is drawn
nothing else, I hope some of your
uses the line routine to draw lines be from the center of the screen to each
frustrations have floated off to bother
tween the points,
point. Then the value of DX for each
someone else. By the way, watch next
point is doubled and added to XI to
10 N=0:R=100:H=160:K=100 issue for some screen-to-tape and
make a new X2.Y2. The old X2,Y2
disk-dump routines. They can really
becomes X1.Y1 and a line is then drawn
20 FGRI=0TO330STEP30 save time! C
from X1.Y1 to X2.Y2. Lines 110-140 of
25 T=I#fi/130 the program switch the values of the
30 N=N+1 points, and loop back to the line

COMMODOREPOWER/PLAYSummer '963 49
 England
takes
the.VIC
seriously
From the title of this piece, you would
be forgiven for thinking that the British
have taken a stuffy attitude toward the
VIC 20. This of course is not true,
although many happy hours have been,
and are being, spent with the VIC 20 by
kids and grown-ups alike, whether it be
exploring with Scott Adams on one of
his adventures or evading the dreaded
Aliens. But in England, it doesn't
stop there.
When the VIC first appeared, a lot of
software houses were quick to realize its
sales potential and were keen to rush
out as much software as possible in the
shortest possible time. There were
games, more games and still more
games—but NO business software. But, if
the rest of the industry was not taking
the VIC seriously, Commodore (U.K.)
was, and so commissioned the writing of
four business packages.
The intention from the outset was to
make these packages useful to as wide a
range of customers as possible. This may
sound a little obvious but our experience
has found that although a great many
business packages are designed for
specific purposes, very few allow the user
to tailor the package to meet his own re
quirements. For this reason, the VIC
range of business software had to be
both flexible and, above all, easy to use

50 COMMODOREPOWER/PLAYSummer1983
Four business
programs for the
VIC 20, created in the
United Kingdom,
will be available in the y

U.S. very soon. \

m,
By Mike Smith

even for the person who had never

touched a computer before.
The type of business software was
another important consideration. From
enquiries received from end users, it was
evident that inventory control, informa J.irl
tion handling and word processing were
the main areas of interest. We decided
therefore to commission programs for all
three applications and an additional
'spread sheet' package. All four pack
ages have been tremendously well re
ceived in the U.K. and are being used in
a wide variety of ways in business and
the home.
For example, the University Hospital
in Cardiff, Wales, has been using VIC-
FILE, an information-handling and rec
ord-manipulation program, for some time
in the diagnosis and treatment of
diabetics. Patients are hooked up to a
machine that monitors their blood-sugar
level If this falls below a certain figure,
the shortfall is corrected by means of a
quantity of insulin automatically ad
ministered intravenously.
Before VICFILE was purchased, the
readings from the machine for each pa
tient were written on paper. This not on
ly used up a great deal of time and
paper but was also prone to errors. The
introduction of VICFILE also has al
lowed the readings for each patient to

■'■

Robert Neumann
 be stored on diskette. Therefore the ling and reporting inventory holdings.
physician can print lists of readings for One of my colleagues at Commodore
each patient whenever they are needed, (U.K.) is something of a wine con
and can quickly assimilate the infor noisseur and uses the package to check
mation and prescribe the proper the state of his cellar without having to
insulin dosage. fumble around among the cobwebs. He
In a lighter vein (no pun intended— keeps records of vintage, type, age and
honestly!!), SIMPLICALC, a "what if can even produce a value report for in
spread sheet package, is at present being surance purposes.
used by a smail business manufacturing Of prime importance for all the VIC
chocolate Easter eggs and candy bars. business software is the quality of user
The owner uses the package to calculate documentation. All too often the advan
the prices to charge for each item based tages of a package have become negated
on the quantity of ingredients used, by a manual incomprehensible except,
labour costs, overheads, etc. It has that is, to the software author, who prob
proved to be a great success. So much ably wrote the manual anyway. Moral:
so, that he presented me with an Easter the less a writer knows about the soft
egg for helping him design his applica ware at the start, the better the manual
tion, with the assurance that I would not will probably turn out.
be eating into any of his profits! Commodore (U.K.) is proud of the
V1CWRTTER, a simp!e-to-use, low-cost standard of user documentation in these
word processor for the VIC, has found four packages. (As a technical writer
great favor, especially among students myself, this view may appear to be some
and journalists. The features editor of what biased but it has been proved by
the London Times was particularly im the fact that we get very few enquiries
pressed. We have also received "divine from end users about how to operate the
approval" for this package from a software.) The approach we take in all
minister in the north of England who manuals is to show what CAN be
uses it to prepare his sermons and pro achieved and then furnish sufficient in
duce a weekly parish newsletter. formation so the user can design his
VIC STOCK CONTROL has proved to own application. The success of this ap
be very popular both in business and the proach can be judged not only by the
home as an inexpensive way of control volume of sales of VIC business software
but also by the uses to which it is being
put.
The price of VIC business-oriented
software has purposely been kept low to
encourage as many VIC owners as possi
ble to try these products for themselves
for use both in the office and in the
home. Inevitably, this has caused a few
domestic arguments, with the kids want
ing to Crunch the Cosmos while Dad is
trying to work out how far this month's
pay check will go. Most fathers, for the
sake of a little peace, resort to the only
real solution—another VIC and a por
table TV.
The success of the VIC range of
business software has finally persuaded
even the most skeptical VIC user that
this computer is simply MORE than 'fun
and games.' C

52 COMMODORE POWERyPLAY Summer 1983

 A First Look at LOGO
by David Malmberg

We are delighted to have LOGO on the Commodore 64 is triangle) how to roam over the surface
David Malmberg take over our truly a phenomenon! As a computer of the Commodore 64's screen. As this
language it is both simple to learn and Turtle moves, it can leave behind very
learning-at-home department.
extremely powerful to use. A cousin interesting and artistic pictures. Using
Beginning with this issue, Dave of the language LISP, LOCO is a fre the Turtle, it is easy for you to try
will become a regular contribu quently used tool in high-level original various ideas and to get immediate
tor to Power/Play, covering the research in the field of Artificial Intel feedback (in the form of a drawing on
many facets ofeducation in ligence at major universities. At the the screen) on whether the ideas work
same time, LOCO is being increasingly as you think they should. If they don't
the home. But, since he happens
used to teach children as young as four work quite right, LOGO easily enables
to be an expert in (among other computer programming and problem you to try something else or to explore
things) LOGO and Turtle Graph solving skills. Yet LOGO is considered your "mistakes" if you find them inter
ics, you can bet you'll be learning by many educators to be much more esting. This ability to "debug" your
a lot about using these exciting than just a computer language. It has ideas and to gradually work towards
programming languages. Coin- been called an "environment for learn a solution to a problem is the corner
ing" and a "collection of the tools for stone of LOGO'S implementation of
cidentally, that'sjust how he's
thought" by some of its disciples. the "Piagetian" view of learning.
starting off... LOCO was first developed by Let's look at Commodore 64 LOGO
Seymour Papert and others at MIT's more closely. Consider the following
Artificial Intelligence Laboratory in short LOCO program to draw a square
the late 60's. Papert had worked with on the screen:
Jean Piaget, the famous child psychol TO SQUARE :LENGTH
ogist, studying how children think REPEAT4 [FORWARD :LENGTH
and leam. Piaget felt that chiidren leam RIGHT 90]
best by self-discovery and by trial-and- END
error, and that the real challenge to LOGO is a procedural language
educators is to provide both the envi in that programs are broken up into
ronment and the tools to nourish this smaller, separate tasks or procedures.
discovery process. LOGO was designed In the case of SQUARE, the entire
with these ideas in mind. The Commo program is a single procedure. The
dore 64 implementation of LOGO first line of a procedure (beginning
succeeds extremely well in providing with TO) gives the title and lists the
both the tools and the environment inputs to the procedure, if any. The
for seif-discovery. last line of each procedure is always
The principle discovery tool in END. The middle lines, called the
LOGO for children and other begin body, give the commands telling what
ning programmers is Turtle Graphics. the procedure does. In SQUARE, the
LOGO'S Turtle Graphics capability body instructs the Turtle to REPEAT
allows the programmer to instruct an four times the sequence of commands
imaginary Turtle (represented by a small enclosed in the brackets, namely to

COMMODORE POWER/PLAY Summer 1983 53

no more pencils,
no more books

move FORWARD a distance of LENGTH :LENGTH RIGHT 360ASIDES]

(which is an input) and then turn RIGHT END
90 degrees. The colon (pronounced This procedure causes the Turtle to
"dots" by LOGO-philes) in front of the draw a regular polygon. Notice that if
name LENGTH means to use the cur SIDES has a value of four, POLYGON
rent value associated with LENGTH. will cause a square to be drawn. If you
Once a procedure is defined in enter POLYGON 8 65 the procedure
LOGO it becomes another term the would draw the octagon shown in
computer knows and it may be used Figure 2. The small triangle-shaped
just as if it were part of the original object on the left side of the octagon in
LOGO language. For example, once Figure 2 is LOGO'S representation of
SQUARE is defined you can use it in the Turtle. If you want it to disappear
Probably the most famous Turtle
another procedure, such as: so it will not detract from your pic
Graphics procedure in LOGO is:
TO PINWHEEL :TIMES :LENGTH tures, you can give the command
TO POLYSPI :LENGTH :ANGLE
REPEAT :TIMESiSQUARE HIDETURTLE.
:CHANGE
:LENGTH RIGHT 360/:TIMES]
IF :LENGTH > 200 THEN STOP
END
FORWARD :LENGTH
Once PINWHEEL is defined in
RIGHT :ANGLE
LOGO as a procedure, you may use it
MAKE "LENGTH :LENGTH +
in direct mode by entering PINWHEEL
:CHANGE
7 50 to draw seven separate squares
POLYSPI :LENGTH :ANGLE
(with sides of LENGTH 50 pixels) all
:CHANGE
pivoted around a common point in the
END
center of the screen (the Turtle's
This procedure has several new
HOME position.) See Figure 1.
LOGO commands. The second com
mand tests if the current value of
To further generalize PINWHEEL LENGTH is greater than 200 and STOPs
you can define a new procedure: drawing if it is. This command is sim
TO PINWHEEL.POLY :TIMES ilar to its BASIC language counterpart.
:SIDES :LENGTH The MAKE command is used to assign
REPEAT :TIMES [POLYGON values to variables. In this case LENGTH
:SIDES :LENGTH RIGHT is being assigned a value equal to its
360/:TIMES] current value plus the current value of
END CHANGE. The MAKE command is
As examples of the types of fantastic similar to the LET or just "=" com
designs that can be drawn by LOGO mands in BASIC.
Figure 3 shows PINWHEEL.POLY The POLYSPI procedure also illus
This ability to expand the vocabulary with TIMES-12, SIDES= 12 and trates another special capability of
of the LOCO language (as was done LENGTH-25 and Figure 4 has LOGO: it is recursive in that LOGO
with SQUARE) is called extensibility. TIMES=24,SlDE = 36and allows something to be defined in
Very few computer languages have this LENGTH-10. terms of itself. Notice that POLYSPI
very powerful capability to grow as the contains a reference to itself in the
programmer directs. The languages next-to-the-last line. Recursion is a
LOGO, LISP, APL and FORTH are exten very powerful property for a computer
sible. BASIC, the "standard" for personal language because it often enables ex
computers, and most other program tremely complex and difficult problems
ming languages are not extensible. to be formulated and solved quite easily.
Let's explore some other examples Other languages that are recursive
of LOGO'S Turtle Graphics. Consider are LISP, APL, C, and Pascal. BASIC
the following procedure: and most other languages are not
TO POLYGON :SIDES :LENGTH recursive.
REPEAT :SIDES [FORWARD Figure 5 shows POLYSPI 1 123 2 and

54 COMMODORE POWER/PLAY Summer 1983

 FIVE POWERFUL SOFTWARE
Figure 6 shows POLYSPI5 144 6. DEVELOPMENT TOOLS
Plus Zhc Exciting ftw Hook
INSIDE THE VIC
THE BOOK THE TOOLS
A ■ -i::-.i-■ ■■ i■ ■ clear explanation of machlna A i s«m bl erf Ed 11 art Load er7 Dec odo U M o n I tor
language. Assembly language. VIC 20 arcM- Full featured Assembler allows use of labels,
iflciura, griphlcs, joystick end sound flfleci comments and arithmetic expressions lo craaia
programming. Del ailed aiep-by-etflp guide to iho machine language programs. Create, save,
unit ol tha development loola How lo combine modify Assembly language programs wlih the
BASIC and machine language, make aulo-atart Editor. Load and link machine language modules
cartridge*. Interfaca with tha Internal ROM- with the Loader, Qecode machine language back
baead programs of BASIC end the Kerml. mi ■ .i 111T1 l.v language lor Bludy Or Inpul to tire
Sample pro^rama fully srplalnad. Editor. Single-step program execution with the
Manlier, Eniended features combines Assembler/
Editor for maximum ease of use.

ALL FOR $49.95 PLUS t2.l» POSTAGE ANO HANDLING Standard version runs on
any system with Datasetts (SK and up) Add $5.00 lor disk version, 55.00 for extended features
(minimum SK) Sand check, M.O., VISA/MC (12.00 S.C.) or specify C.O.D. (add $3.00) to:

P.O. Box 207, Cannon Falls, MN 55009

507-263-4B21
VIC 20 lit itQMllta TM of
Commodcjf Builnrtt wathloci Int

: 37 THE INVESTMENT ANALYST C SI 7 95

Turtle Graphics is just one of MIGHTY "V" ; 38 THE PHONE DIRECTORY CP S 9 95
LOGO'S strengths. LOGO is also a : 139 THEAMORTIZfcRP S24 95
TO THE I JO THE CHECKBOOK BOOKY C P S12 95
list processor and has tremendous I .4! THE INCOME a EXPENSER C P S14 95
RESCUE [ l« THE LOAN REPAYER C , SIC 95
capabilities in the manipulation of text.
! H3 MYCREDITCARDSCP S14 95
As a result LOGO is one of the key tools [ i*l GRADE MY KIDS C P . , S1i 95
V1C20- [ 145. NET WORTH STATEMENT C P S14 95
being used by researchers in Artificial I 146. THE SAVINGS ACCOUNT MIZER C S13 95
BUSINESS AND HOME SOFTWARE
Intelligence who are working on get That'll KNOCK your Mainframe OUT!!
I 147 CALENDAR MY APPOINTMENTS P S16 95
I 148 MIXED UP WORDS C S 8 95
ting computers to "understand" the BYTSASA I 149 THEBUDGETERC SI5 95
English language rather than needing Now available on cassettes -
I 150 PRINT MY PROGRAM P S 8 95

to always communicate via a program JUST RELEASED

n I. THE MORTGAGE CALCULATOR C S B 95
[ '51 JOGGERS LOGGER C $11 95
ming language. D 2. THE GASOLINE UN-GUZZLER C S 8 95
n 3 THE BILLING SOLVER S19 95
■ 152 NUISMAT1C PHANATIC C S12 95
As an example of LOGO'S capabilities 1 4 THE CLIENT TICKLER CP $19 95 I 53 SUPER SHOPPER CP SI2 95
■ 1M PERT MYVICC S1695
in these areas, let's write a program to U 5 THETAPEGENICP S 9 95
I 55 LINEAR REGRESS C SI 6 95
[ "1 6. THE ACCOUNTANT C P S29 95
. 156 STATISTIC SADIST1CSC SI6 95
translate English into Pig Latin. In D 7 THE BAR CHART CP ... S B 95
I 157 TRACK MYWEIGHTC SI2 95
n 8 CASHFLOWC . S1395
case you have forgotten, the rules for [ : 9 THE DEPREC1AT0R C . .. $10 95
! 58 LIGHTNING SORT C S12 95
I 159 GOLFSCORECARDC Sit 95
this translation are: (1) strip off the ["110 BUSINESS INVENTORY CP SIB 95
I 160 ORDER TRACKER CP SIB 95
I 111 THE BIOOERC $14 95
leading consonants (if any) and append I 112 THETEMPERATURECONVERTERC S 8 95 ( Copyright TSASA 1981
them to the end of the word, then (2) [ 113 FIND THE WORDS CP . S10 95 VIC 20 li a lrademark 01 Ccmmoaorfl E*c Ironies Lid
[ 114 DEAR DIARY C . . . £12 95
FREE CATALOG
add "AY" to the end of the word. For [115 PROFIT SHARING PLAN C $18 95
[ 116. LEASE/BUY? C 114 95 Specify CRTTV (C) or (P) Printer
example, "pig latin is fun" would be Programs available direct from TSASA or at lire
[ 117. RATIOSC I 8 95
translated as "igpay atinlay isay unfay." [ |18. PRESENT VALUE C . ...... $1295 Compuler Dealers Nalionwide
I 119 THE SYNDICATOR C ..... SI 5 95 DEALER INQUIRIES WELCOME
This sounds simple enough but this 1120 MOTHERS RECIPES CP S12 95
translation process is a relatively [ 121 THE TAPE WORM C $12 95 Send chock or MO wilh SI .50 TSASA
[ 122 THE CLUB LISTER C .... SI 3 95 Postage & Handling
difficult task for most computer [ 123 AT HOME INVENTORY C SI2 95 COD add S1.50
programming languages. If you are [ 124 UTILITY BILL SOLVER C SI2 95
! 125 VICKY-CALCC S12 95
skeptical, before reading any further [ !26 BIRTHDAY GUESSERC S 8 95 NAME
"127 THE METRIC BRAIN C S10 95
try to write a general BASIC program t 128 ROLL DA'DICE C SI 2 95
ADDRESS .
to translate any sentence or phrase. 129 THE TiCKER TAPE C SI 6 95 CITY
. 30 THE SUPER BROKER C S!2 95
In LOGO you must program in a 1 J3I THE MORTGAGE COMPARER C S 8 95 STATE ZIP.
"structured" style. This means break- I '32 THE RULE OF 78 C S 9 95 I ) SEND FREE CATALOG
: 133 MATH-A-MAGICIANC $14 95 Mail to 2Chipley Run
I :34 HOMEBUDGETC $12 95 West Berlin. NJ 08091
i 135 ITSTRAVELTIMEC . , . $10 95 Telephone (609)346-3063
[ : 36 V0UR MEDICAL RECORDS C P S14 %
no more pencils,
no more books

ing the programming job into small This procedure uses several LOCO IF :PHRASE - ]] THEN OUTPUT (]
meaningful pieces and making a sepa terms that need explanation: OUTPUT SENTENCE
rate procedure out of each task. For FIRST :X outputs the first character (PIG.WORD (FIRST :PHRASE))
your Pig Latin program, there are three of X if X is a string of characters or (PIC.LAT1N (BUTFIRST :PHRASE))
separate tasks needed: the first word if X is a list of words. END
1—Determining if a word begins For example: This procedure also has a new LOGO
with a vowel PRINT FIRST "ABCD will print A term. SENTENCE combines individual
2—Translating a single word PRINT FIRST [NOW IS THE TIME] words and/or lists of words into a single
3—Translating a phrase with one prints long list of words. For example, SENTENCE
or more words NOW "ONE [TWO 3 4] [FIVE 6) creates the
Let's see how LOGO can handle BUTFIRST :X outputs everything list [ONE TWO 3 4 FIVE 6). In the above
each of these tasks. First, the following except the first character if X is a procedure, the use of SENTENCE
procedure would check whether the string of characters and all but the first creates a new list composed of the first
first letter of a word is a vowel or a word if X is a list of words, i.e., word of the phrase translated into Pig
consonant: PRINT BUTFIRST "ABCD will print Latin (via the PIG.WORD reference)
TO VOWEL? :LETTER BCD plus the remaining words of the phrase.
OUTPUT MEMBER? :LETTER PRINT BUTFIRST [NOW IS THE By recursively calling PIG.LATIN with
|A E 10 U] TIME] the remaining untranslated words each
END prints IS THE TIME word in the phrase is translated in turn.
The term MEMBER? is a standard WORD takes two or more character The second line of the procedure tests
LOGO procedure that tests whether strings and concatenates them. For for the condition that the current list
something is an element of a list (or example, WORD :X "AY (in the third of words in the phrase is empty (i.e.,
set) of items. In this instance MEMBER? line) appends AY to the current charac all the words have been translated)
tests if the current value of LETTER is ters of X. In the next-to-the-last line and outputs a "null" list to stop the
a member of the list A, E, I, 0, or U and the terms WORD (BUTFIRST :X) recursive calls.
returns a TRUE value if it is and a FALSE (FIRST :X) create a new character string, Now you can test the entire program.
otherwise. In LOGO lists can be any which has the first letter of X shifted For example:
size and can contain any combinations to the last letter. PRINT PIG.LATIN [COMMODORE
of numbers, letters, words, LOGO com TEST VOWEL? (FIRST :X) in the LOGO IS FUN]
mands, or even other lists. Lists are second line of the procedure checks Prints: OMMODORECAY OGOLAY
always shown in square brackets. whether the first character of the ISAYUNFAY
LOGO'S ability to manipulate lists current string X is a vowel. If it is, the If you count the lines in these three
makes the language extremely power next line (IFTRUE, etc.) adds AY to the procedures you will see that your gen
ful for solving certain types of problems. end ofX and outputs the result. If it is eral Pig Latin program only took twelve
Because LOCO is programmed not a vowel the line beginning with lines and that included three END lines.
one procedure at a time, the process IFFALSE shifts the leading character A BASIC program to do this same trans
of testing and debugging is greatly ofX (a consonant) to the end of X lation would have taken much, much
simplified. For example, before writing and tries again with the new X string longer to write and would have been
the rest of the Pig Latin program, you by using the recursive reference to much more complicated. In addition
can test this procedure by itself. Specif PIG.WORD. This procedure will keep the BASIC version would not have been
ically, if you enter VOWEL? "Q, the calling itself recursively until it finds half as easy to test and debug.
Commodore 64 will respond with RE* the first vowel and outputs the correct In summary, Commodore's new
SULT: FALSE and if you enter VOWEL? Pig Latin translation of the word. LOGO for the 64 is a very exciting
"E, you will get RESULT: TRUE. After Once again you would test this pro language. It has broad application and
doing these tests you know this part of cedure by itself before going on to the offers something of value to beginner
the program works as it should. next part of the program. For example: and expert alike. Its Turtle Graphics
The next procedure you need will PRINT PIG.WORD "LOGO prints features offer a fun and effective way to
translate a single word: OGOLAY learn programming and problem-solving
TO PIC.WORD :X PRINT PIG.WORD "ANSWER prints skills. At the same time Commodore 64
TEST VOWEL? (FIRST :X) ANSWERAY LOGO is a very powerful language and
IFTRUE OUTPUT WORD :X "AY Your third and last procedure has many capabilities not found in
IFFALSE OUTPUT PIG.WORD handles the translation for more than BASIC, such as extensibility, recursion
WORD (BUTFIRST :X) (FIRST :X) one word: and list processing. LOGO is a lan
END TO PIG.LATIN :PHRASE guage for everyone! C

56 COMMODORE POWER/PLAY SummeM 983

 Let your VIC-20
TALK TO YOU
00
with our
Votrax Based
"VOICE SYNTHESIZER11
Real Sound
Adventures
Talking
Sale $14.95
Action
*♦ Speaker
Games

You can easily program your voice synthesizer

to give you real sound adventures and talking ac • FREE — Your choice of $19.95
tion games. With our speech editor vou can Speaker and Cabinet 4" or $14.95
create words and sentences using easy to read Voice Editor.
symbols that translate into data statements to be
used in your own custom programs.

Voice Synthesizer $109.00

Sale $79.00
Special Synthesizer Speaker * List $19.95
Sale $14.95
ENTERPRIZES
BOX 5S0, BARHINQTON, ILLINOIS 60010
Phono 312/362-5244 to ordar
Word Creator Editor Tape and manual* List$14.95
Sale $9.95

COMMODORE POWER/PLAY Summer 1983 57

 Bring thousands of dollars kids9 corner
wortti of information home
for only $14,951

Our New Department:

For Kids Only
by Betsy Byrne

To all young Commodore users: out, we want to be sure to have articles

Here it is, at last—a section of from kids all over the country. So come
Power/Plat/ all your own. I have on, get out your computer, your pencil
noticed that magazines sometimes and your stamps. And when you send
have programs of interest to kids for in your contribution, be sure to in
parents to read or type in, but not clude a picture of yourself or one of
much is actually included for you to you and your computer. Don't forget
"The best reason to buy a computer. Packed do (or read) on your own. The editors to include your area code and phone
with useful information—it's an absolute
must tor computer owners everywhere.'' of Power/Plat/ have asked me to do number so I can call you if I need more
— Giry G. Reibsamen, Vice-Prwldflnt of something about this situation, so information. Here's HOW and WHERE
NewiNsl Inc. I'm going to do my level best to put to send stuff:
Your passport to the electronic together a section where kids can read Programs: should be on tape, plainly
universe—how to turn any personal com
about the kinds of computer things marked with the program name, your
puter or word processor into a communica
tion/information machine of incredible versa kids are interested in! name, and the type of computer it was
tility and power, even without a knowledge of All the kids whose programs are made on. Be sure to include directions,
programming. Here's )ust a sampling of what in this issue live in New Mexico. That and check to see that the copy works
you get—* How to select a modem and
communications software * How to send is because / happen to live in New before you mail it. Tape mailers and
electronic letters, telexes and MailGrams" Mexico, and at the moment I don't protective envelopes are found in
♦ Money-saving technique* lor using The personally know any kids with most office supply stores.
Source, Dow Jones News/Retrieval. DIALOG,
Commodore computers that live any Articles and other contributions:
BHS and more * Get tree software! Down
load thousands of programs ♦ Gel privi where else! It's up to all of you who are Type or print them double-spaced on
leged Information irom $30,000 wortti of reading this to change that, and 1 have a printer, if you can. Otherwise, hand
newsletters * Get discounts of 10% to 40% print, using every other line. Be sure
a whole list of ways that you can use:
by shopping on-line * Trouble-iftootBr'i
guide to problem-free communications 1. Send me programs that you have your name, phone number, and address
$ Hundreds of tree computer bulletin boards written, or that your parents have are on every page. Number the pages
OBS) * Access vast libraries (Library of written for you. at the top or the bottom. Then staple,
Congreu, NX Times, magazines, am)
2. Send me a letter telling about you, or otherwise attach pages to each other.
wrwln encyclopedias) * Get real-time com
puter games and tournaments ♦ Electronic your friends, and your family. Let us Don't forget to include a few para
banking, investment management, and than know what you have been doing graphs telling about yourself and every
barter * Get loll-free numbers, valuable thing you can think of to say about
with your Commodore computer.
short-cut commands * Get on-line advice
from eiperienced users of your equipment. 3. If you especially like (or dislike!) whatever it is you are sending in.
Plus much more! In just two days you'll a particular game, program, or Remember—we want a picture of you!
see what this unique handbook can do lor computer book, write a review! The address for programs and
you—but we'll give you two weeks to decide.
Send (or your copy now. il you're not satis 4. Do you like to draw? Cartoons articles is:
fied return it in two weeks for a lull refund. or drawings of computers and Commodore Kids
Main Selection ot The Small Computer Book Club the people that use them would c/o Betsy Byrne
Alternate Book-ot-the-Month Club/Science
be great. 6212KarlsonN.E.
Selection
F'iii.v.'i rr.iu'ii rhis coupon lo your bookseller oi dirscl 1o 5. Do you have questions about pro Albuquerque, N.M. 87113
SI. Martln'i Pr»t» — — gramming or using your computer Unfortunately, we can't send your
i?a Fifm Avenue, Ne» 'itoik, N v 10010 Aim ML pp
snrid mo ■ ,',iiesl ol The Cifrplato Hand- that you haven't been able to find articles, tapes, or pictures back to you,
: Wo* otP6r»ooal Cotnpultr Communtctftons i«
I paperback *ach ■ '■1ilM aM &1 S° per book Tor paalagu answers to? Send 'em inl so be sure you keep a copy of anything
I and handling My crutch or mono/ order is enclosed in Ihft
I amounl of" I may enampne <he book lor iwo weflks 6. How about stories (fact or fiction) you send. And the next time you open
\ .i.-i il nor 14Xr% aamfwl. 1 can return it lor a lH Power/Play magazine, it may be your
I ralund and poems about computers? These
I can also be a lot of fun to write picture you see, or your program
■ Name ,

(and read). that is listed for other kids to try out.

|Crfy_
By the time the next issue comes Believe me, it really feels good! C
I SUt.

58 COMMODORE POWER/PLAY Summer 1983

 20"
Load
THE INTERNATIONAL USER'S
NEWSLETTER/MAGAZINE
CASSETTE-ALL IN ONE FOR Kids and Computers
VIC 20™OWNERS by Betsy Byrne
Don't let the cost of software take
a big byte (ouch) out of your pay
check. Have you spent more time Kids and Computers—are they
typing programs rather than enjoy
ing them? Do you have questions
really made for each other? From all
indications, kids seem to think so. ?J 1
but no where to turn? Then- Children and teens are taking to
say no more. The solution is 20 computers like ducks to water. From

W£
twelve month-old Amity Palmer, push
Load. For 50 bucks per year you
will receive each month "Ready to ing random keys to display letters on 11 -■
1 i\
U
i ]
I (• III
run" programs, programming tech a brightly colored screen, to young iu jhLjM
niques, information, input from oth Rich Kotomori, who uses a sophis
er members, and fun. Why are you ticated word processor to turn out -—affc ii
waiting? 20 Load, 550 Grant Ave his homework.
What do fifteen year-old Rich and
I
w fei"
nue, Junction City, Kansas 66441
{913)762-4730. baby Amity have in common with
VIC-20 is a trademark o(
Commodore Business Machines, inc.
each other and with possibly a million
other young computer users? The
Commodore computers they are using
to carve out a niche in this computer Amity Palmer with her father David and
generation. "her" Commodore 64.
FOX 20:™ These young people don't think that
The magazine for "VIC 20 users it surely will.
they are doing anything remarkable.
By their standards, or by the standards This new phenomenon, these
FOX 20 will provide you. each month, with
S or more ready-to-iun programs on of youthful programmers like Diana "Commodore Kids", are the reason
cassette-exciting, imaginative, game,
Kaupilla and Chris Harris they are not. that we are setting aside these pages
educational and utility programs tor most
VIC memory configurations. In adfliton. But to parents whose generation was of Power/Play exclusively for articles
you will receive Foitales. an Informative
amazed at the introduction of hand and programs by, for, and about young
Video Newsletter, on Side 2. Novice and
pro alike. FOX 20 Isthamagiiineforyou. held calculators, their achievements Commodore users. Material written by
Be a sly little lo> for only S53 a year - S6.50 are awesome. And to grandparents, kids, their parents, and their teachers
single Issue.
many of whom did not see a television will now be a regular feature in each
set until their teens, they're nothing issue. We hope to provide them with
FOX 20 Iih division of:
Foxfire Systems, Inc. short of miraculous! a forum for ideas and techniques, a
3811 Newton
When kids get together to talk place of their own where they can meet
Pasadena, Te«as 77503
about computers and to share ideas or others like themselves and better learn
comment on the latest available soft to use this wonderful tool, this magic
To order: Send check (U.S. Funds), arid
5% Sales Tan for Teias residents, Canada ware, a kind of magic sometimes seems toy, that their generation has claimed
a n d Ova rse as S63. ords rs pre- pai d D e a ler
to develop, an excitement that leaps for its own. C
and author inquiries Inviled
the normal barriers of age and gender
that they once thought so important.
FOX 20:™ Suddenly the important questions are
"Do you have a VIC 20 or 64?" or "How
The magazine for 'VIC-20 users

P. O. BOX 507
long have you had yours? Did you
Oeer Park, Texas 77536 figure out that new Adventure game?"
(713)473-6723 And best of all is the one that begins
■VIC-20 b • trade mai* ol
with "Watch this! I figured out a
Commodo/a BuLinBU Machine a
BETTER way to...". This might not
sound like a dialogue that will change
the future, but I submit to you that

COMMODORE POWEH/PLAY Summer 1983 59

kills'corner

Play Tone-Match
A Game by Christopher Harris

Christopher Harris (he likes Chris) is twelve years did and why." I called Chris to ask him how to work Tone-
old, and a seventh grader at Jefferson Middle School in Match and he laughed "Oh, no! I knew I left something
Albuquerque, New Mexico. When the Harris family bought out! DIRECTIONS!" But we have them now, and I will
a Commodore 64 last fall, Chris started right in to teach pass them on to all of you who will want to type in Chris'
himself programming, with a little help from his father, program and have fun improving your "ear" for music:
Dick. By December, Chris was well on the way to success
1. When the computer asks fora level, answer with a
fully converting his favorite arcade game to the 64. On
number, remembering that 1 is the hardest.
Christmas he received a Coleco game machine, but Chris,
being a true computer enthusiast, returned the present. 2. You will hear a tone—listen carefully! How long it plays
He came home instead with a VIC 20, a "real computer". depends on the skill level. When you hear the second
(No I am NOT making this up!) tone, try to make it match the first, using the + and -
I wanted to know how Chris happened to write the VIC keys to go up and down the scale.
program I have reprinted here. When I asked, he toid me:
3. When you think you have matched the first tone, press
"I was just fooling around with the VIC 20 sounds and PI. The computer will tell you how close you came to
up came Tone-Match." And on the subject of using entire
matching it.
words for variables: "Instead of REMark statements, I use
variables that are very obvious, so that later on when I go To play again, press any key. Your new level will match
back and look at the program I remember exactly what I your last score. For example, if you were 33 points off, last
try—your new level will be 33. C
—Betsy Byrne

Listing Codes Used

<cu> Cursor Up < sh i f ted cursor)

<CD> Cursor Down (unshi-fted cursor)
<CL> Cursor Le-ft (shifted cursor)
<CR> Cursor Right (unshi-fted cursor)
<HM> Cursor Home (unshifted CLR/Home)
Christopher Harris, age 12. <SC> Clear Screen (shi-fted CLR/Home)
Reverse On (control and 9)
<RO> Clear Screen (control and 0 )
Insert Key or Delete Key
<CC> Color Change (you will have to decide
what col or unless speci-fied)

60 COMMODORE POWER/PLAY Summer 19B3

Lines 30-33 ** Initialize program.
Lines 49-58 ** Checks to see if you pressed a number or letter.
Lines 100-110 ## Checks for + or - key pressed (raises or 1owers tone)
Lines 120-130 ** Checks tone tor too high or too low.
Line 156 *# Checks -for Fl pressed: I-f so goto 500.
Lines 5P6-50 2 ** Makes the program wa it after it tells you the score,
lines 510-810 ** Does a. Seal e and tells you your new score .

Note! In line 33 the W's are typed as shi-ftedWs! they are graphics.
30 P0KE3687?,3:PRINT"-CCC}"
31 S1=36874:S2=36875:53=36876:54=36877:V=36878
32 PRINT" <SCXCDXCDXCDXCD> ***(RU>WELCOME TCKRCO***"
33 PRINT" CRV>WWWCCC>TONE-MATCHCCC>WWW11
34 PRINT" <CDXCDXCDXCD>WHAT LEVEL WOULD YOU LIKE TO START AT?":
40 INPUTLV*:LV»VAL(L<J*)
59 IFLV=8THENPRINTMBETWEEN 1 AND INFINITY, PLEASE<CUXCUXCUKCU> ": GOTO30
60 REAL=INT<RND<1)*128>+128
70 FAKE=INTCRND<1)*128>+128
80 P0KEU,15:P0KES3,REAL
90 FORI=1TOCLV*100>:NEXT:P0KES3,FAKE
190 Q=PEEK(1?7):IFQ=5THENFAKE=FAKE+1
110 IFQ=61THENFAKE=FAKE-1
120 IFFAKE >255THENFAKE=255
139 IFFAKE <128THENFAKE"128
140 P0KES3.FAKE
150 IFO=3?THEN500
160 6OTO106
500 FOR I=1TO10
501 6ETJ*:IFJ*<>""THENSBQ
50 2 NEXT
503 IFREADFAKETHEN666
510 IFREAL<FAKETHEN760
520 F0RI=I28T0255iP0KES3,I:FORB=1TO50:NEXT:NEXT
530 PRINT" <8C>CCD><CD>£CD>{CD>! ! ! ! ! {RVXCOYOU DID IT<CCXRO>! ! i ! !"
540 UJ=\
550 6OTO860
60 0 F0RI*=I28T0255STEPt REAL-FAKE) :P0KES3,I : FORB=1TO50 :NEXT :NEXT
619 L^=PEAL-FAKE:PRINT" <SC><CDJ<CDXCD> CCD>YOU WERE "W" OFF"
62? GGTO300
70 0 F0RI = 128T0255STEP'; FAKE-REAL) :P0KES3, I :FORB=1TO50 : NEXT: NEXT
710 Ly=FAKE-REALiPRINT"<SC>CCDXCOXCDXCD>YOU WERE "LV" OFF"
80 9 POKEV.0
30 1 OETB*:IF8*=""THENSBi
310 GOTO60

COMMODOREPOWER/PLAYSummer1983 61
 Friends Of The VIC Turtle
By Albert Rizzoli.M.D.

Most of us with children have purchased a toy called There is another idiosyncracy in this program.
Etch-A-Sketch. This clever toy lets you draw pictures by My paddles are electronically noisy, particularly at the
turning knobs. One knob is for the X direction and the extremes of rotation or if turned rapidly. The moving X or
other for the Y direction. I have written a short program Y line is usually smooth, but the non-moving paddle may
to simulate this toy. It requires the Super Expander and a give some jitter to the baseline. Lines 115 and 1]7 smooth
set of paddles. The button on one paddle clears the screen this out some, but a better hysteresis algorithm should be
and the other changes the color of the line. written. Please send your ideas to Betsy for inclusion in
If you have several lines on the screen of different colors, this column. In defense of the program, it is still a lot of
you begin to notice a limitation of the Super Expander. fun and can draw some very colorful pictures.
The color in a given region can only be one color. These A similar program can be written using a joystick, see
regions correspond to the size of one VIC alphanumeric "VIC Make-A-Sketch" in COMPUTE'S FIRST BOOK OF
character. This can be frustrating if you draw two different VIC, page 31. Danny Byrne of Albuquerque has also written
color lines close together. a sophisticated graphics package using a joystick. C

1 REM ETCH-R-SKETCH
2 REM VIC-29 VERSION BY FILBERT RIZZOLI
3 REM REQUIRES SUPER EXPRNDER RND PRBBLES
4 REM FIRE BUTTONS CHflNGE COLOR RND CLEflR SCREEN
10 GRRPHIC2:COLOR1,3..0)0
20
30 IFPEEK<64e>i6THENf>33792
40
50 PX=36S72:PV=3

36
90 VL-PEEKCPXJ'VR-PEEKCPV)
190
110
115 IFflBS<X0-XX3THENX=X0
117 IFRBSCV0-VK5THENY=V0
120 DRRW3T0X,V
130 IFFRTHEH:SCNCLR
140 IFRTHEN^OC+l
156 IFO1THENOC+1
160 IFO7THENC«0
170 COLORING,C
180 GOTO60

62 COMMODORE POWER/PLAY Summer 1983

 VIC-20 COMPUTER
40-80 COLUMN BOARD

WORD

PROCESSOR ALL FOR

ELECTRONIC
PLAN SPREADSHEET
ALL IN TERMINAL LIKE VIS1CALC
MANAGER
40 AND 80 EMULATOR
COLUMN
FORMAT

Now you can get 40 or 80 Columns on your T.V. or monilor at one time! No more
running out of line space for programming and making columns. Just plug in this
board and you immediately convert your VIC-20 computer to 40 or 80 columns!
PLUS, you get a Word Processor, Mail Merge program, Electronic Spreadsheet (like
VISICALC) and Terminal Emulator! These PLUS programs require only 8K RAM
memory and comes in an attractive plastic case with instructions.List $ 149 Sale $99

•COMMODORE 64 COMPUTER - - "80 COLUMN BOARD" LIST $275 SALE $179

(j2W $20
"15 DAY FREE TRIAL"

We have the lowest VIC-20 prices

We have over 500 programs

Visa - Maatercharge - C.O.D. ENTERPRIZES ("Et

We love our customers! BOX 550, HARRINGTON, ILLINOIS 6001P
Phono 312/382-5244 to ordar

COMMODORE POWER/PLAY Summer 1983 63

kids" corner

Bank Sprites:
Gain Interest
Using Sprites in Different Video Banks
By Tim Villanueva

This article is written for users who understand the

use of sprites on the Commodore 64. For information
regarding memory' blocks, sprite pointers, and sprite
registers, refer to pages 69-71 in the Commodore 64 User's
Guide or pages 131-181 in the Commodore 64 Program
mer's Reference Manual.
A sprite's shape is defined by a 64-byte block of memory.
The starting address (memory location) is equal to the
block number times 64. For example, memory block 13
starts at 13*64 or 832. The sprite only uses 63 bytes of the
block, with the last byte being left empty. If you have made
sprites using the User's Guide, you are probably putting
them (the data for them) in the memory blocks that are
mentioned—13, 14, and 15. This may be enough for the Tim I ilhmueva showing sprite
experimenter, but someone who wants to implement manipulation on the Commodore 64.
sprites in a large program may need more than three
RAM memory for some of its information. For example,
defined shapes.
locations 1024 through 2023 control the screen memory
Another place you can put your sprites is in BASIC RAM
and 2040-2047 control sprite pointers. The video chip
memory. You can place the data for your sprites in any
can access ("see") 16K of memory at a time. Since the
free RAM available. The sprite pointers tell the computer
Commodore 64 has 64K of memory, the memory has
exactly where your sprite is. For instance, when working
been divided into four 16K video banks—16K sections of
with sprite #2, the sprite pointer is memory location
memory'where the VIC II chip sets its information. When
2042. The number POKEd into location 2042 tells the
in normal operation, the VIC II chip is operating in bank 0
computer the block of memory your sprite is in. So, if you
(banks are numbered 0-3); thus, all the display informa
POKE 2042,192, it tells the computer to set the data for
tion is contained in the first 16K of memory. That's why
your sprite in memory block 192 (starting address =
the screen is 1024-2023. By changing the video banks, you
192-64—or 12288). This location is in the BASIC RAM.
can set your sprites into higher memory. If you place your
The problem you face when placing your sprites in BASIC
self in bank 1. your sprite pointers now point to bank 1,
RAM is that you lose a horrendous amount of BASIC
Thus, memorj' block 0 now starts at the beginning of the
memory if you don't want your RASIC program to override
second 16K bank of memory—or location 16384. If you
the sprite. Thus, you may want to put the sprite in as high
were in bank 2, memory block 0 would start at the begin
memory as possible. Because of this, you may recall, the
ning of the third 16K bank of memory—or location 32768.
largest number a memory location can hold is 255. So,
But changing video banks affects several things. First, here
if you POKE the sprite pointer with 255—POKE 2042,
are the starting locations for the four video banks:
255-—this should put you into as high memory as possible.
But 255*64 is only equal to 16320. How do you set your Bank Number Starting Location
sprites into even higher memory?????? 0 0
Now let's talk about video banks. The Video Interface 1 16384
Chip (VIC II chip) inside the computer (the part that 2 32768
controls any display operations of the computer) uses the 3 49152

64 COMMODORE POWER/PLAY Summer 1983

 For instance, when you are in bank 2, ail the display . POKE 56578, PEEK (56578) or 3
information the VIC II chip needs comes from that bank. I'd rather not explain this POKE. Let's just say it
See the problem? If you remember, the screen memory warns the computer that you are about to change banks.
was at locations 1024-2023. But if now you are in bank It must be done before step 2.
2, that cannot be possible. This is so true! But don't fret, . POKE 56576, (PEEK(56576) AND 252) or A
the screen stays relative to the video bank. What???? That "A" can either be a 0, 1,2, or 3. Good guess! Yes, the
means the starting address for the screen is still 1024, 0, 1,2, and 3 stand for the bank you want to
but you must add in the starting address for the bank. enter—EXCEPT IN REVERSE. So, if you want bank 3,
For example, if you are in bank 2, the screen starts at make A=0, The following chart explains:
1024+32768. Any more problems? What about the sprite
pointers? Again, these stay relative. They move just as the Value of A Bank Number Starting Location
screen does. Thus, if you are in bank 2, the sprite pointer 0 3 49152
for sprite 2 (2042) is equal to 2042 + 32768. 1 2 32768
Now, one more problem you probably cannot recognize 2 I 16384
yet. All of the above sounds just fine and dandy, but it does 3 0 0
not take care of EVERYTHING. With the proper POKEs,
you can change video banks and know where you are. Now the question is "Which bank should I go to?" Well,
You know that if you are in bank 2, the screen starts at I suggest bank 2—that's my bank!! But seriously, if you
1024+32768. Thus, if you want to POKE a character on wish to get into high memory, bank 2 is the best choice.
the screen in the first location—POKE 33792, # (33792 Why? Well, one of the best reasons is that in hanks 1 and 3
= 32768 + 1024). Unfortunately, the computer operating the character set is not available. And I hope you don't go
system doesn't know this much. When you type on the through all the above trouble to get into bank 0!! Very few
keyboard, you will NOT see anything. This is because the BASIC programs are long enough to bother anything you
computer is still putting the characters you type at the put in bank 2.
old screen locations 1024-2023. Where the computer puts The following program will put you in bank 2, and set
its characters is controlled by the operating system. This things up for you. (By the way, when you first change
is not part of the VIC II chip and does not change when banks, the screen will be full of garbage. This is because
you move video banks. But have no fear, you can tell the the screen moved up into high RAM, where there is only
operating system where to stick its characters!! Memory a bunch of random patterns of numbers. Line 30 in this
location 648 (part of the operating system) controls this. program will take out the garbage!)
The number POKEd into this location represents where 10REM CHANGE TO VIDEO BANK 2
the computer puts its characters. The formula for figuring 20 POKE 56578, PEEK (56578) OR 3
this "mysterious number" is the following: 30 POKE 56576, (PEEK (56576) AND 252) OR 1
mysterious number = starting address/256 40 POKE 648,132
Example: If you are in bank 2, the screen starts at 50 PRINT CHRS(147): REM CLR/HOME
33792 (32768+1024). Thus, the mysterious number = 60 PRINT "HERE WE ARE IN BANK 2"
33792/256, which is 132. So, to move the cursor where it 70 END
belongs, POKE 648,132. That's all there is to it. Whew, made it (1 hope), Now what? Well, back to
Now, how to change video banks {finally). The following sprites.... How do we tie all this in to sprites? Now we can
POKEs will change banks: create several different shapes for our sprites. Since BASIC

COMMODORE POWER/PLAY Summer 1983 G5

probably won't bother us (as in bank 0) and wti don't have Just to test this, create a sprite that is just lines. Type
to worry about killing the operating system (as in bank 0), the following once you have changed video banks:
we can put our data in any of the memory blocks available POKE 53269,4 REM ENABLES SPRITE 2
(0-255) except for where the screen and sprite pointers are. POKE 53252,255 REM SETS X COORDINATE
(Remember, they changed banks also). So, all memory POKE 53253,200 REM SETS Y COORDINATE
blocks are fair game except blocks 16-31. Now, how do we (SPRITE WILL BE IN LOWER
deposit our sprites? Exactly the same as before. (Mow's RIGHT)
that?) We need to POKE the 63 data values which define POKE 53289,1 REM SETS COLOR TO WHITE
our sprite into a memory block. To figure the starting FORT=0TO62: REM POKES DATA FOR SPRITE
address for this, just multiply the block by 64, and add POKE 35968+ INTO REM MEMORY BLOCK 50
in the bank starting address. Example (only God knows T, 15: NEXT
where we would be without examples!): If you want your POKE 34810,50 REM SETS SPRITE POINTER TO
sprite in block 50, and you're in bank 2 (the only bank to MEMORY BLOCK 50
be in), the starting address will be: bank starting address + The sprite should now be in the lower right-hand corner
(memory block-64), Or -«> 32768-t-(50'64> = 35968. So, of the screen. It should look like three vertical lines.
you need to start entering the 63 data values at memory Now that we have explained the basics, we can dis
location 35968. You must also remember to charge your cuss the real stuff... cough cough cough (Just kidding!)
sprite pointer. The sprite pointer will only be the original Good luck.
value + bank starting address. So, for sprite 2, the pointer Editor's Note: TimVillanueva is the author of sev
will be 2042+32768 = 34810. So, POKE 34810,50 (which eral exciting games for the Commodore 64, using great
matches with the 50 above). sprite graphics. c

It's Time for

TOTL SOFTWARE!
for the VIC 20™ and COMMODORE 64™
WORD PROCESSING AND MAILING LIST & LABEL,
no* aoalfabi* with ^Jf/CKSP£EI>
FAST PRINTING • LIGHTNING LOADS • SIMPLE COMMANDS
TOTLTEXT 2.0 + CS VIC + 8K expansion $25.00 All programs work «.ith 40/80 column (VIC) and 80
TOTL.TEXT 2.5 + CS VIC + 16K expansion $35.00 column (64| adapters — compatible with tape or disk
TOTLTEXT 2.6 +CS Commodore 64 $40.00 systems— shipped on cassette tape—available
on disk S4.00 extra.
TOTL.LABEL 2.1 +CS VIC+ 16K expansion S20.00
TOTL.LABEL 2.6 + CS Commodore 64 $20.00 Quality You Can Afford
TOTL TIME MANAGER 2.1 VIC + 8K expansion $30.00 Available at your local dealer
TOTL TIME MANAGER 2.6 Commodore 64 $35.00 or by phone order
time management, scheduling, reports

% TbTL
RESEARCH ASSISTANT 2.0 VIC +8K expansion $30.00
RESEARCH ASSISTANT 2.0 Commodore 64 $35.00
key word cross-reference research tool
TOTL.BUS1NESS 3.0 VIC + 16K expansion $85.00
TOTL.BUSINESS 3.6 Commodore 64 $95.00 A) software inc.
business programs require disk and are shipped on disk
One Megabyte Fuzzy Diskette $25.00 ifi555 Third Ave., Walnut Creek, CA 94596
computer novelty pillow ^-S> ^Q \^ Call (415) 943-7877
Commodore 64 and VIC 20 are registered trademarks of Commodore Electronics, Ltd.

66 COMMODORE POWER/PLftYSummer 1983

 How to Create
Your Own Sprite Creator
On The Commodore 64
by Tim Villanueva

Sprites are one of the easiest forms of high resolution Now, here is an explanation of the program:
graphics available. And of course the 64 has them. But mak 10-20 Prints the grid on the screen
ing a sprite from scratch is not all that easy. It requires lots 40-50 Turns sprite on in lower right of the screen,
of work to figure and calculate the data. The following pro color white.
gram will take away the pain of creating sprites by hand. 60 Sets sprite pointer to memory block 13 (starts at
If you haven't worked with sprites yet, I suggest first location 8321
reading the short explanation in the Commodore 64 User's 100 Start of read section. Sets C=8
Guide, pages 69-71. What the following program does is 105 Loop for each of the 21 rows
print a grid on the screen that represents your sprite in 110 Loop for each row, 24 dots across
large form. You fill in the grid with asterisks in the pattern 120 PEEK the location of each dot, one at a time
you want your sprite to form. Then the program reads the through the loop.
grid and calculates data for the sprite. It automatically 130 Decrement exponent value—
enters the data into memory, and the sprite will form [f current dot location contains an asterisk,
before your eyes. First, here is the program: increment data value by adding to it 2|C, where
C represents the actual dot number of the set of
8. (3 sets in each row of 24)
10 PRINTCHR$U47>; 140 When C=0, set of 8 finished. POKE data value
29 FQRT=1TO21■PRINT"..,,,.,,..,,..,,.. into proper location and reset the value. Reset
,,..., "•■ NEXT :REM 24 DOTS value of C.
150-160 Return through each loop until finished
49 V=3324i31POKEV+21 > 4' POKEV+41,1
200 Start of data section—prints data values in rows
50 POKEV+4;255'POKEV+5;280
of 3,
60 POKE2042,13
210 Read 63 memory locations (63 data values to
70 END comprise a sprite)
100 C=3 220 Print out the value
105 FORV=0TO20 230 Format output into rows of three (21 rows with
110 FORX=1TO24 3 values—each value represents 8 dots or
120 P=PEEKO023+X+40#V> pixels, 8*3=24 across)
130 OC-1:IFP»42THENQ«Q+2?C 240 Return loop
140 IFC=0THENOS■O=G+1:P0KE331+G,Q:Q=S 250 End.
150 NEXT*
160 NEXTV How to Use the Sprite Creator
170 END Once the above program is typed in correctly, you
200 PRINTCHR*<I47):PRINT:pRINT are ready to create. The first step is to type RUN. The grid
210 FORT=0TO62 will form and the word READY will appear below the grid.
220 PRINTPEEK<832+T), Using the cursor keys, move the cursor UP into the grid.
Be sure not to move the cursor down or you may cause
239 K=K+riFK=3THEHK=0'PRINT
the grid to be pushed off the screen. Fill the grid with aster
240 NEXT
isks in the desired shape of your sprite. When you have
250 END
achieved the desired shape, move the cursor back to the

COMMODORE POWER/PLAY Summer 1983 67

kids9 corner

bottom of the grid. NOTE: Now place the cursor directly These are the registers for each sprite:
on the line below the last row of dots on the grid. Now type
in RUN 100. Your sprite should form before your very eyes Sprite Number Memory Location
in the (lower right-hand corner of the screen.) When your 0 53287
sprite is done, the computer will signal READY. You can 1 53288
now move back up into the grid to make any corrections 2 53289
you would like. But be sure not to move the cursor down 3 53290
too far or you will lose part of your grid! When you are 4 53291
done making corrections, move the cursor once again 5 53292
directly below the grid and type RUN 100. You may 6 53293
continue to do this over and over until you achieve the 7 53294
desired shape.
Once you have achieved the correct shape, you are ready Now, how to switch sprites to multicolor. Memory
for the data. To set the data for the sprite, type RUN 200. location 53276 controls multicolor mode for sprites. You
The data should print out 21 rows of 3 values each. This can switch individual sprites on to multicolor by POKing
makes it easy to copy down the values on paper (or some this location. You may have both multicolor sprites and
thing) to be used in future programs, "normal" sprites on the screen simultaneously. The fol
lowing POKE will switch a sprite to multicolor.
POKE 53276, PEEK (53276) OR (2fSN)
Using This Sprite Creator Where SN is the sprite number (0-7).
to Make Multicolor Sprites To switch a sprite off multicolor, you must do the
In the grid that this program makes, each period following POKE:
or comma represents an actual bit in memory (which POKE 53276, PEEK (53276) OR (255-2fSN)
represent the pixels of your sprite). The usual sprite is 24 Where SN is the sprite number (0-7).
pixels across, 21 pixels down. You can create your sprites If you want to switch on all sprites to multicolor, the
in three colors. But how does the computer know what following will do it:
color a certain bit should be? Well, when you put a sprite POKE 53276,255
in multicolor mode, it changes the way the computer deals If you want to switch all sprites off multicolor,
with sprites. Instead of looking at the rows with 24 dots, it POKE 53276,0
examines them as 12 pairs of dots. Each pair of dots now How do you control the color for each different bit
represents one pixel, so instead of 24 pixels across, you pattern? The computer has reserved three places for you to
have 12 pixels across. The sprite stays the same size, but enter (or POKE) the color codes which will represent the
you lose half of your horizontal resolution. Now the bit patterns. They are the following:
computer can put color into your sprite. Since two bits Bit Pattern
now represent one pixel horizontally, the computer can 00 Transparent, Screen color shows through
use the pattern contained in the two bits for color informa 01 Sprite Multicolor register 0 (53285)
tion. There are 4 possible patterns with the two bits: 10 Sprite Color Register (depends on which
sprite)
1. 00 2. 10 11 Sprite Multicolor register 1 (53286)
3. 01 4. 11 So, if on the grid you fill a bit pair (either a pair of
commas or a pair of periods) with a 01 bit pattern, that
pixel (which is actually the size of two pixels) will be the
This can be represented on the grid with an asterisk
color represented by memory location 53285, If the bit
representing a 1, and a period or comma representing a
pattern is an 11, the color will be represented by memory
zero. Now you should understand why the grid is made of
location 53286. If the pattern is a 10, then the color will
periods and commas. If creating a sprite in multicolor, you
depend on that individual sprite's color register. C
need to look at each pair of either periods or commas as
one pixel. The pattern in that pair will represent the color.
If there is no pattern in that pair (00), that will represent
the background color.

6B COMMODORE POWER/PLAY Summer 1983

 Night of Death
A Game for the VIC 20
by Diana Kaupilla

Diana Kaupilla is ten years old and When asked where she got the idea
goes to Chelwood Elementary School for this program she said, "I first got
in Albuquerque, where she is in the the idea when I was reading a book
fifth grade gifted program. She has had about choosing your own adventure,
her computer since Christmas, and is and I wondered if it couid be put onto
the main user of the computer at her the computer. I started fiddling with it
house. She has had some computer and I figured out how to make one. My
experience at school, but she says it first story was called Night ofDeath."
was so different from the VIC 20 that So, here is Night ofDeath, just the
it was "no help at all." way Diana wrote it. c
Diana Kaupilla, age 10.

1 PR I NT "X
10 FORX=1TO1000:NEXTX
14 FORtf=lTO1000
16 NEXTX
28 PRINT" "
30 PRINT"E S C R P E "
40 PRINT" "
45 FORX=1TO1000;NEXTX
50 PRINT"F ROM"
60 FORX=1TO1000
65 NEXTX
70 PRINT"H RUES"
71 FORX=1TO1000
72 NEXTX
76 PR I NT "X
30 PRINT"VOU KICK R ROCK RND fl HOLE OPENS IN THE GROUND IN FRONT OF VOU."
90 PRINT"DO VOU 1:JUMP OR 2-RUN"
100 INPUTX
110 IFX=1GOTO130
120
139 PR I NT "X
135 PRI NT"VOU IN fl CRGE.THE GURRDS ARE flSLEEP"
136 PRINT"D0 VOU 1iESCflPE OR 2-STRV FOR fl BETTER TIME"
137 INPUTX
138 IFX=1THEN160
139 IFX=2TH£NIS0

COMMODORE POWER/PLAV Summer 1983 69

kids'corner

140 PRINT'T
141 PRINT"THE LflST THING VOU FEEL IS fl KNIFE IN VOUR NECK"
142 OGTO10000
160 PRI NT"3"
161 PRINT"VOU RRE IN fl DRRK CORRIDOR"
162 PRINT"DO VOU l=O0 BflCK OR 2:KEEP GOING"
163 INPUTX
164 IFX=1THENGOTO190
165 IFX=2THENGOTO210
130 PRINT"ITS TOO LflTE. THEV UflKE UP RND CHOP OFF VOUR HERD!"
181 GOTO10000
150 PRINT"VOU SEE THE GUflRDS HGfllN. ONE OF THEM STIRS IN HIS SLEEP'
191 GOTO180
210 PRINT "VOU SEE RN OLD WOMEN.. RND SHE WRLKS UP TO VOU."
220 PR INT"RUN SHE SRVS, RUN FROM THIS GOD FORSRKEN PLP.CE."
230 PRINT"WHV DON'T VOU RUN, VOU flSK."
240 PRINT"! CRN'T. THE CRVSTflL HRS ME."
250 PRINT"I DON'T KNOW WHRT VOU'RE TRLKING RBOUT, VOU SRV."
260 PRINT"LISTEN THEN SHE SflVS,"
270 PRINT"fl LONG TIME RGOj"
230 PRINT"flN EVIL MflOICIRN"
290 PRINT'TOUMD R CRVSTRL"
300 PRINT"THRT GflVE HIM MRGICflL POWERS BEVOND IMRGINRTION."
310 FORX=1TO15000
320 NEXTX
325 PRINT".T
330 PRINT"I CRN HELP VOU, VOU SRV."
340 PRINT"THEN STEflL THE CRVSTRL FROM THE THRONE ROOM!"
350 PRINT"THEN SHE HRLKS RWflV."
36Q PRINT"DO VOU i=TRV TO STEflL THE CRVSTRL OR 2'TRV TO GET HOME"
364 INPUTX
365 IFX=1OOTO330
370 IFX=2GOTO190
380 PRINT"VOU SERRCH RND SOON SEE fl HUGE GIRNT SLEEPING."
3S5 PRI NT"VOU SEE R RED, GLOWING CRVSTRL NEflR HIM."
390 PRINT"VOU GRPE IT RND RUN."
400 PRINT"VOU SEE SOME STRflNGE MONSTERS CHfiSING VOU."
410 PRINT"VOU RRISE THE CRVSTflL RND THEV TURN PND FLEE."
420 PRINT"CON0RflTULflTI0N5. VOU WON!!!! ! !!!!!!!!"
1005 END
10003 PRINT"DO VOU WflNT TO TRV RGflIN l:VES 2:MO"
10001 INPUTX
10002 IFX=200T010004
10003 IFX=1GOTO1
10004 PRINT"T
10005 PRINT"WHV NOT VOU 8$<.>.$#<iy.y.*$<&l!??"
10006 END

70 COMMODORE POWER/PLAY Sumn-.er 1983

jiffies

The Octopus Maze

by Cerald and Betty Schueler

An octopus is on the loose. He escaped from his lair and octopus" lair. Line 230 checks to see when this sprite-to-
only you can send him back. While this may he slightly sprite collision occurs. A successful game can be replayed
melodramatic, the following program does involve moving by simply pushing the firing button on the joystick. This
an octopus-like figure through a maze and back to its lair. feature is easily attained by the WAIT command in line 320.
The program is both an exercise in joystick dexterity and The Commodore 64 allows for up to 15 different colors
a demonstration of the sprite graphics available on the as follows:
Commodore 64.
A sprite is a high-resolution, programmable object. The COLOR POKE NO. COLOR POKE NO.
Commodore 64 can make and control up to eight sprites Black 0 Orange 8
with standard programming. (See the Commodore 64 White 1 Brown 9
User's Guide or the Commodore 64 Programmer's Red 2 Light Red 10
Reference Guide). Additional sprites are possible with Cyan 3 Greyl 11
a little more complicated program. The sprites are con Purple 4 Crey2 12
trolled by a separate picture-maker inside the computer, Green 5 Light Green 13
which handles the video display. The movement of the Blue 6 Light Blue 14
sprite can be controlled by pre-programming mathematical Yellow 7 Grey 3 15
equations or by programming movement through the In our version of "The Octopus Maze", the lair-sprite
use of a joystick or the keyboard. will be light red because line 120 contains the statement,
In our program "The Octopus Maze" movement of the POKE V+40,10. This POKEs light red (code 10) as the lair
octopus sprite is controlled by use of a joystick, which color. Similarly, the octopus-sprite will be yellow because
should be plugged into port #2. Pushing forward on line 155 says, POKE V-t-37,7. This POKEs yellow {code 7)
the joystick makes the sprite move up; pulling back on as the octopus' color. Changing these numbers in the
the joystick moves the sprite down and a left or right program can provide a wide variety of colors; however,
movement of the joystick makes the sprite move left or some color combinations work better than others. For
right, respectively. If any wall of the maze is touched by example, cyan, grey and black are good alternate octopus
the sprite, itwill escape your control and the sequence colors but red and green are poor because most of the
must be repeated from the beginning (Line 240, which details are washed out.
asks the computer to detect any sprite-character If the octopus-sprite moves too fast, or if you simply
collisions. Lines 245-260 check to see that the sprite prefer to start out at an easier pace and work up with
remains inside the screen border). experience, the movement of the sprite can be cut back by
The game is won by moving the octopus-sprite into changing the horizontal and vertical position increments.
contact with the stationary skull-like sprite which is the Use the following modifications for lines 260-320.

2L-Q IFS=1THENDY=-1
IFS=5THENDY=1
27D IFS=4THENDX=-1
B7S IFS=flTHENDX=l
EflO
565
210 REM—COLLISION INDICATORS
IF<PEEK{V+3D>AND1>=1THEN3DD
3DD

COMMODORE POWER/PLAY Summer 1983 71

 jiffies

305
ENGINEERING TVPE 310
31S IFY<51ANDDY=-lTHErUbD
SOFTWflRE 32D IFY>221ANDDY=lTHENlbQ
FOR THE VIC 20'"
Experienced game players may want to move the X
values up to 4 or 5 and the Y value up to 3 for faster game
♦DIMENSIOHRL STflCK UP
play. Unfortunately, the movement of the octopus-sprite
STB MEM. O/PRT 9.50
will lose much of its smooth flow at higher X and Y values,
but the increased skill needed to win the game may make
*ROTRRV FLOW DIVIDER
the loss worthwhile.
8K EXP O/PRT 19.30
Pre-programmed cassette tapes of this game are avail
able for $5 each from: The Copy Cats 680 W. Bel Air Ave. Aberdeen. Ml) 21001 301-272-0472
♦COMPOSITE BEflMS
3k EXP O/PRT 24.50
5 PR I NT "W
19 Z=1924!V=5324S:C=55296:E=53230■K=532Si iSS=54272
15 POKES*14:POKEK>6
HflRRV F. LEONARD 29 PRINT"H10VE THE MONSTER INTO HIS LfllR WITHOUT
5556 CHERRYWOOD RD. TOUCHING THE NflGIC WRLLS"
COLUMBUS OHIO, 43229 25 PRINT"MIF fl UflLL IS TOUCHED.. THE MONSTER WILL
PHONE 614/B46-1B23 ESCRPE flND VOU MUST STRRT RQRIN
30 PRINT"IPUSH THE FIRE BUTTON TO STRRT"
VIC 20 15 a trademark of ComrnMore Elect'&ncs L10
35 URIT56464,16,16
40 PRINT"T
45 REN—THE MRZE
50 F0RRl=Z+6T02+72SSTEP4@:P0KER1,192-NEXT
COMPUTER CASSETTES
55 FOREl=C+6TQC+726:POKED 1,3 = NEXT
100% Error-Free • Fully Guaranteed 60 FORR2=Z+253TOZ+973STEP40:P0KER2,132:NEXT
65 FORD2=C+253TOC+$73STEP40 ■ P0KED2.. 3 ■ NEXT
78 F0RR3=Z+254T0Z+273:P0KER3,102:NEXT
75 F0RB3=C+254T0C+273:P0KED3.3:NEXT
i30 FORR4=2+306TOZ+796STEP40:POKEH4,102:NEXT
85 FORD4=C+306TOC+706STEP40:P0KED4,3■NEXT
90 FORFl5=Z+740TOZ+751: POKERS.. 192: NEXT
95 FORD5=C+740TOC+751:P0KED5,3:NEXT
1m F0RR6*2+353T0Z+S39:POKERG,102■ NEXT
185 FQRB6=C+553T0C+553:P0KED6>3:NEXT
LENGTH PACK PACK
115 REM--THE SPRITE LRIR
C-05 79$ 69<P 120 POKE2041,193:POKEV+40,10: POKEV+23,2
C-10 89<P 799 125 F=12352
C-20 999 899 139 REflE
Boxes 26<P 21 <J 135 P0KEF,QK
UPS S3.00 Pkg. $18.00 Case 140 F«F+l
145 POKEV+29,2:POKEV+2,175:POKEV+3,135
C-10's 39*
IMm 500 Case Lai) 150 REM—THE SPRITE MONSTER
w/labels ADD 4f,
155 POKE204
wfboxes ADD UK
160 X=30:V=
- FOR OROERS ONLY 165 P=12233
1-S00-528-60S0
170 RERDE
Extension 3005
175 POKEP/EK:p=P+i:GOTO170
MICRO-80" INC. 180 P0KEV+2I.3:Q0T0235
2665-P Busby Road
Oak Harbor. WA 98277

72 COMMODORE POWER/PLAY Summer 1983

185 REM—ROUTINE FOR TOUGHING WflLLS
199 POKEV+21, Q i F0RL=S3T0SS+24 ■ POKEL,0 • NEXT
195 IF<PEEKCV+lS)flNDlJ»lTKENPOKEV+ifii0
290 POKESS+24, 143! POKESS+6, 240 : POKESS+4, 33
205 FORT=1TG50■POKESS,223■POKESS+I,39■NEXT
210 FORT=1T0?5:POKESS,71■POKESS+1,5-NEXT
215 F0RL*SSTQSS+24:POKEL, 0■NEXT
220 PRIHT"XSPCa22)"ir30RRV BUT VOU TOUCHED THE WALL"
225 PRINTSPC<202V'irrRV RGRIN? PUSH FIRE BUTTON"
238 WRIT56464,16,16=RESTORE:G0T043
235 REM—POSITION INDICATORS
248 POKESS,16:POKESS+1.39:POKESS+4,129:POKESS+6,240■P0KESS+24j95
245 FORT=1TO5■FORM=95TO0STEP-5■POKESS+24,M■NEXT:NEXT
250 S=15-(PEEK(56320)RND15>
255 IFS=0THENDX=0RNDIiV=9
260 IFS=lTHENDV=-2
265 IFS=2THENDV=2
270 IFS=4THENDX=-3
275 IFS=8THENDX=3
280 IFX=255Rf)DDX=3THENX=0:POKEV+16,l

290 REM—COLLISION INDICRTORS

295 IF<PEEK<V+30)RND1)=1THEN350
300 IFX>30RNDV>60flND<PEEKCV+31>RNDi)-lTHEN190
305
319
315 IFV<5IRNDDV=«-2THEN190
320 IFV>229fiNDriV=2THEN190
325 REN—SPRITE MOVEMENT
330 X=X+DX:V=V+DV
335 POKEV,tf:POKEV+l;Y
34S GOTO250
350 REM—ENDING FOR WINNING GflfiE
355 F0RL=SST0SS+24 • POKEL.. Q : NEXT
368 POKESS+4.. 33:P0KESS+24,143 : POKESS+6; 240 : POKESS+5.. 190
365 FORT-1TO30■POKESS,162■POKESS+\,3?:NEXT
370 FORT=1T040:POKESS,60:POKESS+1> 59:NEXT
375 FORT=1TO3@:POKESS,162■POKESS+1,37:NEXT
380 FORT=1TO100 : POKESS.. 15 ■ P0KE3S+1,67 : NEXT
385 F0RL»S3T0SS+24:FOKEL■0:NEKT■POKEV+21>0
390 PRINT"TSPCC90VpaCONGRRTULRTIONS"
395 PRIHTSPC<175)"IFi'0U DID IT"
400 PRINTSPC''?05)"IFLflV RORIN? PUSH THE FIRE BUTTON"
405 WRIT56464.,16,16: RESTORE ■ POKEV,■ 30 ■ POKEV+1, 60 : GOTO40
1000 DfiTRS,124,0,1,254,0,7,255,128,31,255,224.63,255,240,56,129,120,126,120
110S DRTR120,120,12G,124,255,75,252,255,207,254,255,255, 254,250,202,175
1200 DRTR25P,292.167,224,136,39,224,0,39,100,75,135,100,179,134,116
13O0 DRTR235,142,IIS,37^,95,-1
1409 DPTR0,63,128,0,127,192-0,255,224,48.255,240,57,255,240,227,196,123
1500 DRTR131,206,120,135,255,252,131,255,243,227,255,240,31,213,112,1,192,120
1600 DPTftl, 241,252, 3,191 A96>1?., 47,199,9,98,103,112,193,32, 96,132,46,1
1700 DfiTR132,2S,7,31,7,7,27,7J-l

COMMODORE POWER/PLAY Summer 1983 73

 "L k what my new
lets me daw'rth
Here's what you get with the complete
Alphacom printer project set.
■ Fast, quiet 40-column Alphacom VP42 printer, which
includes the full Commodore graphics set.
■ 5 great software programs. A real ■40-column Word Processor,
graphics Sketch Pad, beautiful Kaleidoscope program,
useful Record Keeper, and a general purpose Screen Printer.
■ Compute Magazine's first Rook of VIC. full of fascinating
step-by-step VIC 20 computer adventures.
■ All the cables, printer paper, and easy-to-follow instructions
you need to begin enjoying your Alphacom VP42 as soon as
you open the box.

Get the complete Alphacom Printer Set for just $209.95

(suggested list). Call toll free for the name of your nearest
dealer: 800/538-7047 anywhere in the USA (except
California: 408/559-8000). If there is no convenient
dealer, you may order direct from Alphacom.
Same day shipment with MasterCard, VISA,
or American Express card.
Alphacom printer set
my VIC 20..?
Mister^ E: o o k Report 'CO**** *
bs Joe Grimes
! tMOOX
Boot '• lr Cl audius
fluthor! Robert Graces

Hack in the old oiay= of

Efflpire ^he cruel Emperor Ca
♦*♦♦
rrn.irders?l and a new leatltr?
■ =i chosen t>a the Praetoria
'.The Romans had rather c.dd
order in those days.) The P
Guard thougt they had chose
EiFrppleton anct ueatrling who
easily manipulated to the G

Much to ewersone's =u
Claudius lasted *or over- a
end turned out to be a wise
[«:•:(£rate leader. Robert Gra
I. Claudius cfescribes the E
'. : ~i bafora he ascended the

Write and print my letters, Create my own custom computer Show off my computer graphics
homework—just about anything. games. The printer set Includes the creations. Software includes
With Word Processor software that new First Book of VIC: it's full of Kaleidoscope and Sketch Pad
comes with the printer. great game ideas. graphics programs.

I P£H*VSC 5QUIGGLEH
E REt1*FR0M VIC 1001 USER' =
7 REM*TYPEft AND PEBUGGEC' 3V CHEESE BERRY PIE
:*■
9 PRINT'S"
10 r'ATfi"i ■,--■■, "-I", " U
2G DftTftl,6,5/6 £ Pks <:3 oz. aa. J cream
38 DftTfte* 1, 4,1- 1' 1 zw pon dered sugar
4£i [<ftTft3, 6,2,0 !;3 cup sour creaa
50 [iflTfi4,5, 0,3 i^ grated orange pee
68 Diafi*<5>,B<5,5J a 9-inch pie she] 1
7C- FOR1=0TO5 2-3 cups whole tcesh
ee FEK0fl*<i)
50 NEXT : I :up st
:-:■': F0RI»lT0<l
116 r0P-J=!T04
liQ READBCJ, I)
170 NEXT
140 NEKT Ssften cheese. Seat in s
190 Tl=l s^ur crsain and orsn^s ^eel.
£fj& T£=l in pia shell. Ton with bar
210 X-20 to L-laze. Chill, U sou 1
Learn to write my own VIC 20 Keep the family's favorite recipes
applications. With hard copy on a VIC 20 cassette. Now Mom
program listings that help me can't pretend that she lost the
debug my programs. recipe for cheeseberry pie.

fllphacom
TM

2323 South Bascom Avenue

Campbell, CA 95008

■01902 Alphitom. Inc. All rights r»«rvcd.

CominDdorf1 arid VfC 20* Jrc rrjiiTrrcd i'i<li-m*rki ufCornrnodf?^ Buitnen
MichJn*ihlncr Alphacom, Inc. ft nn[ rddteO to Commodore 6jilren MachlfiH,
Inc. Offer vord whsrt prohibited, Eixffd, ur rt uric led b/ tav.
COMMODORE POWER/PLAY Summer 1983 75
jiffies

Alphamatch/VIC 20
by Barbara J. Moody

Although Alphamatch was ALPHAMATCH is designed to help Sound is used as an optional reinforc-
designed for classroom use, we young children learn the upper and er. If the classroom activity in general re
lower case forms of the letters in the quires quiet—or if Mom needs a little
think it is also an excellent
alphabet and to practice matching peace at home—the program will run
resource for young children at them. After some initial guidance from nicely and satisfyingly with the T.V.
home. To get both graphics and a parent or teacher, most five to seven sound turned down. It is more exciting,
sound effects you need Com year-olds should be able to use the pro however, with the sound turned up.
modore's Super Expander car gram on their own. The interest level Each correct response is rewarded
appears to be high, even for older with a pleasant, light tone as the letter is
tridge. If you don't mind leaving
children. (I have even found some of printed and the graphic reward appears.
out the sound effects, you only
my fellow educators enjoying it!) An incorrect response is indicated by a
need a 3K memory expander. The program consists of two parts. In heavier, buzzing low tone as the incor
the first, the child must match upper rect response is erased for another
After sixteen years as an educational case letters by looking at the target let choice. Each time a pictured toy is com
supervisor and consultant, I have re ter displayed on the screen, finding that pleted, a mini-melody is played. At the
letter on the keyboard, and pressing end of the program, a "good work" ban
turned to the busy peace and joy of a
kindergarten classroom. Having become the letter key. In the second part, the ner is accompanied by a fanfare.
target letter is given in its lower case Generally, I prefer to have the speaker
addicted to my VIC 20 about a year
ago, 1 was eager to put it to work for form. The child must find and press the turned up because the sound signals
my young students. I purchased the matching upper case letter key. allow me to monitor a child's progress
through the program while I continue to
preschool programs from my local Com Each correct response is rewarded
with the appearance of part of a toy on attend to the needs of other children in
modore dealer, sent for program
descriptions from publishers who adver the screen (red wagon, jack-in-the-box, the classroom. This should apply also
tise learning programs for children, and truck, boat, train). Several correct at home when Mom needs to carry on
reached the conclusion that programs responses are required to complete each routine home tasks while Johnny or
of these pictures. When an incorrect Jenny works at learning, the computer
suitable for my youngsters are scarce in
deed! Here and there, now and then, I response is made, there is no reinforce play way.
ment of it. The cursor simply returns The frequency and pattern of light
found a gem that really worked in my
and flashes on that respoase until the and heavy tones tells me how many
classroom, but more usually the pro
child locates and presses the correct guesses and how much difficulty the
grams I found were too complex and/or
child is having with the task of matching
too advanced in concepts for use by five matching key. Thus, while it is possible
to make an incorrect match, the com letters. The frequency of mini-melodies
and six year-olds.
Disappointing? Yes. But what better puter will wait until a correct match is signals the child's pacing through the
made before either rewarding or rein program, and the fanfare tells me when
reason and incentive to begin my own
programming! ALPHAMATCH is one of forcing that learning. it is time to set up another game for the
the programs I developed for use in my Screen and border colors change as child or to give another child a tum to
classroom. The children have used it the program moves from part one to play ALPHAMATCH.
eagerly and successfully this year. It part two. They change again as the pro Because the sound was typed as
is often chosen over other available gram ends and a "good work" message PRINT statements, as allowed by the
programs. is flashed among the pictured toys. Super Expander, it will not work with or-

76 COMMODORE POWER/PLAY Summer 1983

dinary expansion. In any other con case mode, while line 4000 returns it to To save eye-hand fatigue, you may
figuration, these statements will merely the upper case mode and clears the obtain a copy of this program by
be printed, causing considerable confu screen for playing the game again. sending $3.50 (To cover duplicating and
sion in the screen display! The main body of the program is con postage/, a blank cassette and
With or without sound, ALPHA- tained in lines 810 through 3060. which a mailer to:
MATCH provides an interesting and provide the target letters and reward Barbara J. Moody
satisfying experience with Computer As graphics. All pictured toys are I*OKEd 1211 Sabattus Street #17
sisted Education—the play way! to the screen. C Lewiston, Maine 04240

Program Notes:
39 REN HLPHflMRTCH
ALPHAMATCH requires a VIC 20 51 REM BRRBflRfl J.MOODV
with a 3K Super Expander. The sound 52 PRINT' racnroiHR rceejremi PROGRfiM":PRIHT"(»FOR
element can be eliminated and the pro
LITTLE LEflRNERS"
gram will run on an ordinarily expanded
53 PRINT" NSmmPRESS IfSPRCE 3rrhtp ■Pf?iHT"imirro
VIC 20 by making the changes stated
CONTINUE ■ ■ ■
below. This is a long program, however,
54 GET Fit :IF fii=""THEN54
and it will NOT fit into an unexpanded
VIC 20!
60 PRINT" ["ISftliM"
To eliminate sound commands: 70 PRINT" (isr5&sr« x mm 8 j i snssw
Delete lines 80 PRINT" I&&& i £ X X X !
965,1225,2525,1845,3055,8025, and 90 PRINT" V
9000 100 PRINT IKi w S? w ^ £? ^ w
Delete the final PRINT statement In 110 PRINT IKS KJ ?^^ K w w !^ w
lines 3085 and 3090 120 PRINT "W»H"
The program works with two sub
130 PRINT " ^ySf CFw*;?'i ^^^ *
routines. The first, at line 8000, provides
140 PRINT " ivi » » * » ss! *■ X"
for input and processing of the child's
150 PRINT
response for each target letter. It also
provides the buzzing tone for error and 160 PRINT " % X X SS 8 8 » 1
g ■"
erase of incorrect responses. The sec 170 PRINT "8 8 $ & i W$- \
ond, line 9000, provides the light tone 180 GETR* :IFR$=""THEN130
for each correct response. 299 PRINT "^fflWi»BDIRECTIONS;| 1"
Instructions for playing the game are 300 PRINT ".TSRMi^^"
provided in lines 290 through 690. Lines 310 PRINT "tmX FIRST. THE CHILD"
740 through 780 provide the target let 320 PRINT "»^^ WILL BE SHOHN RH"
ter and response area on the screen.
Line 800 sets the display to upper/lower
330 PRINT "(UPPER CflSE<CfiPlfRL)"
340 PRINT "(LETTER. THE CHILD I1 1UST"
350 PRINT '(PRESS THflT LETTER ON"

COMMODORE POWER /PLAY Summer 1983 77

jiffies

360 PRINT"irTHE KEVBORRD.THIS"

370 PRINT"IWILL SHOW THE LOWER"
380 PRINT"MCflSE OF THE TRRGET"
390 PRINT"ILETTER. THE CHILD"
400 PRINT"M3HOULB STUDY THESE"
410 PRINT"WMRTCHED LETTERS THEN"
420 PRINT" PRESS IRETURNl FOR"
430 PRINTMTHE NEXT LETTER."
460 GETR*:IFR$*""THEN460
470 PRINT":jJDaHIWW"
480 PRINT">BW8 WHEN RLL OF THE"
490 PRINT'llHW UPPER CRSE RND"
500 PRINT"»LOWER CRSE LETTERS"
510 PRINT"»HRVE BEEN MATCHED, "
320 PRINT">rTHE CHILD WILL BE"
330 PRINTMSHOWN R LOWER CRSE"
540 PRINT"M_ETTER RND MUST"
350 PRINT"mVPE THE MRTCHING"
360 PRINTHJPPER CRSE LETTER,"
580 GETR*:IFR*"""THEN380
630 PRINT"3mnWW«»»EflCH CORRECT MATCH"
649 PRINT">»MLL BE REURRDED"
650 PRIHT'-WWITH fl PRRT OF fl"
660 PRINT"WPICTURED TOV. EflCH"
670 PRINT'IWIHCORRECT MRTCH"
680 PRINT"»WLL BE ERRSED TO"
690 PRINT"WFILLOW RNOTHER TRV. "
730 GETR*:lFRt"s"»THEN730
733 P0KE36S79,26
740 PRINT"^«>»
750 PRINT'IMW
760 PR1NT"IW» ^K
770 PRINT"I«W
780
800 PRINTCHR*<14)
810 PRINT"iWWD»MM-" ■ X=67: GQSUB8000
833 PRINT"M<BWiWWi«iW "
840 P0KE7738> <96+1281:POKEC7738+39720),2!P0KE7743,64 iPOKE<7743+30729)>0
850 PRINT"lWKSB»IMU"^=70:GOSUBi?000
870 P0KE7744,115'POKE(7744+30720)> 0 = P0KE7739i(96+128)!POKEC7735+307203,2
880 pRiNTu«wawiiwii":x-ei!OOSLiBea00
900 POKE7740.. O6+128): PDKE(7740+30720^ 2- P0KE77di,< 96+129) -pOKE< 7741+30720) j 2
910
930
940
S€Q P0KE7764.. 1S2^ POKE':7764+30720)..0: POKE 782S, (114+128) : POKE(7823+30720).0
965 GOSUB 9000
970 PRINT"MXM»WWO" ■ X=37:GOSUB3000
99^ P0KE7849,107:POKE<7849+30720),0:P0KE7851,115 = POKE<7951+30720)>Z
1000 PRINT"5KDa»»*»h":X=73'GOSUBS000
1020 P0KE7S59.. 127: POKE(7330+30720), 4: P0KE7872j (127+128)' POKE(7672+30720) , 4
1030 PRINT"WKOTI«f"1:X»7S:GOSUB8000

78 COMMODORE POWER/PLAY Summer 1983

1059 POKE 7894,12?: P0KE<7394+38729>, 4: P0KE7371.. 105 i POKE<7871 +30720), ?
1060 PRINT"fflD!WM«lll ":X=S4:COSUES000
1099 POKE 7873.. 105: POKE<7873+30720), 7 • P0KE7393,135: POKE<7893+30720), 7
1090 PRINTnaWW»MH#":X*90:GOSUB8000
1U0 P0KE7395., 185:POKE(7395+30729),7;POKE 7915vOG+128):
1120 PRINT"»lBI3!»Wr" ■ !<=79: GO5UB6000
U30 POKE 7916j<96+128):POKE(7916+30728>jS:PQKE 7917., (95+128) :P0KE(7917+38728).-5
114Q print"mmmii"=x=ee: oosu
1168
1170 PRIHT"aW«WMBr" ■ X=63■GOSUB8900
1199 P0KE7939,(96+128)■POKEt;7939+3072e),5■P0KE7959*(96+12?)'POKE<7959+38720)>5
1200
1220 PCKE796S, (96+126) :
1225 OOSUB 9000
1230 PRINT"WBKWMII "-X=7
1250 P0KE7923, (96+12S) ;POKE(7923+30720),2:PGKE7924,* C9S+128) ;POKE|I7S24+30720)^2
1269 PRINT"SftKK»WL"^=?6:GOSUB8000
1280 P0KE7925, (96+128) ■POKE(?S'25+3072P) .■ 2 = P0KE7926, <9£+12S> :POKE<7926+30720),2
1299 PRINT"MBJfla»MU":X=82:GOSUB8000
1310 P0KE7927,111:POKE(7927+30729), 2■POKE 7949,118:POKEC7349+30720).2
1329 PRINT"aSKWiMiril:Xa69:OOSUB9000
1340 POKE7950., 108- PQKE(7950+3072S),, 7: P0KE7945, (96+123) :POKE(7945+30720>J 2
1350 PRINT"HXBIWMIfc":K=86:GOSUB8000
1370 P0KE7946j107:P0KE(7946+3O72«),6■PGKE7947J115:pOKE(79'i7+30720),6
1388 PR1 NT"mUTHnni/" : X=?B ■ OO8UB8000
1400 P0KE79^8) C96+128>:PGKE<7948+30720)J2:PGKE7967J (36+1285 :°DKE(79
1410 PRINT"MfflWIMIl":X=>72:GOSUB8800
1430

1460 PCKE7970, (96+128) :POKE(797i?+3072S>,2-DOKE797L (96-^125) :POKE(7971+30720).2

1479 PRINT"JWraW»ir":X'=74:GOSUB8000
1499 P0KE7972, (96+123) :POKE(7972J-30720) > 2 :P0KE7983, l@2:P0KE<79P9+3e729>..{?
1509 PR I NT " ?«r®J»»B!«": X=83: OO8UB8000
1529 P0KE7992,102:POKE(7992+30720), 0:POKE 7994,192:POKE(7994+307205■0
1525 OOSUB 9009
1530 POKE36379,30
1558 PR I NT" -mmVWVi" : K=87 : GOSUB9000
1570 POKE 8026)105:POKE(8026+30720)*2:POKE 80^6,(96+128):DOKE(e0'^+30728)J6
J 538 PR I NT" MSKIKSiBSSF1" : X*=80 ■ GOSUB8000
1690 POKE3047., 127 ■ POKE-T88'17-L30720), 6: POKE8043,127: f=OKE(SP4S+3072e*J, S
1619 PRlNT"MWWaMWD":X=68:GOSUBe080
1630 PQKE8849*127:POKE(8049+30720>J6:POKE 8039.(96+123):POKE<8030+30723)^6
1649 PRINT'HKIHIOTWF" -X*70:GOSUB8000
1660 POKE8067.(96+128):POKE (8867+36720>,S:POKE 3058. (96+128):POKE(3068*307205*6
1670 PRINT"S!!l!!T!»S!!*r'nF:X=39:GO?U58000
1690 PCKE3069,(96+123):POKE(80694-30720>,6' POKE8070*(96+128):POKE(8870+30720)*6
1709 PRINT"»!Rt»MllS":XeB3:GQSUB8000
1728 POKE3071, (96+123) ;POKE(3971+39^20).-6:P0KE3872.' C96+128> :POKE(8072+30720)^6
173P PR
1758
1769
1739 P0KE8Q89,(96+12?):P0KE(3839+39728)J2:DOKE309@, (96+123):POKE(8090+30720)j2

COMMODORE POWER/PLAY Summer 1983 79

jiffies

1736 PRINT"»0&MMP"' X=S5 ■ GOSUBS000

1S10 POKE809I.. (96+129) ■ POI<E(809ii3e720),2^0^3092,(96+128) :POKE(8e?2-<-?e720),2
1320 PRINTM5HmamiJ"^=85:GOSU3Se00
1549 POKE3093,. (96+1285 ■ POKE(3093-L3i?720>, 2: POKE8094.. (96*125? ■ POKE<8094+30720>j 2
1845 GOSUB9000
1350
1870

1890 POKE8125;122:POKE(Si25+30720},0:POKE3083J i28:POKE<8083+3

1900
1910
1520
1930 P0KE9143,102■POKE(3143+30720),0;POKES!46j192:PQKE<814S+36720).0
1940 PRINT(l»flffl»»W3" ■X=51 :GOSUB800B
1950 P0KE3984,(96+128)■PQKE<8084+38720)> 2:POKES085,(96*128):

1970 P0KE8104, (96+128) ;P0KE(81.54+3^720). 2: POKES 105 ..(96*12?) : POKE C 9105+30720). 2

1980 PRlNTn)«BSIKWMK":>{«"88:OOSUBe000
1990 POKE8106. (96+128) ■ POKE(8106+30720>.2 ■PCKES107. (96+128) :POi<(Z(310^+30720).2
2000 PRINT"M!nwwWE" sX«69 ■ GOSUB8S00
2010 P0KE8126.. (96+128) :pOKE(8i.26+:?e720>..2-POKES^.27,(96+i2S):PC!--:E(81.2T'+30720)J2
2020
2030
2040 PRINT"HMSOTWWI» ! X=73 ■ GOSUB8000
2050 POKES077,104 ■ POKEC8077+30720), 0 ■ POKE807P. 104: P0KE(8e78J-3^2S>, 0
2O60 PRIHT"55(n!lffl»(*n""^=34-GiO8LlE9fl00
2070 POKE8079.-104 ■ POKE(S079+30720).- 0 : PGKE8080/ IS*1: POKE<8088+30720)/ 3
2080
2090
3000
3010
3020 PRI
3930 PQK
3040 PRI
3059
305? GOSUB 900?
3060 PRINTt'ffl(MJ»MM." :X*
3965 P0KE36879j29
30S9 PRINT"aMW#***#*#*##*##":PRINT"n» *":PRINT"!»t! 33C?D WORK!
3095 PRINT"!!* *" -PRIMT"!TW*************g"' PRINT"T5V8Q3e'F1P"

4000

9000 R*="": PRIHTu39E0ffl!DaiSNIU":INPUTS*

3010 IF LEFT$(R4. !)OCMRt<^>THEH PRIHT"T4V80iC";GOTO B800
302P IF LEFT*(fl*a)="CHR*<X)THENPRINT'T»(KSI>MitW*iri;LEFT*<f|*,n
3025 PRINT"T402V8F"
3030 FGRT=1TO1000:NEXTT
S040 PRINT"»(OimiM«iWW ": RETURN
9000 PRIMT"T5V303RFR"'RETURN

80 COMMODOREPOWER'PLAYSummei 19B3
 Joyrite
by Mike & Annette Hinshaw

This program makes it even number used by VIC in the POINT dot moves on the screen, and the lines
easier to draw pictures on your statement to put a dot on the screen. are formed by the dots. The erasing or
This program uses relational operators "not writing" sequence (lines 1000 to
screen with the Commodore
to test which of the four joystick posi 1050) just changes the color of the dot
Super Expander cartridge. tions is "on". The logical AND in the so it's the same as the screen, or back
relational statement checks J against ground, color. Even though you can't
Have you ever wanted to draw the possible joystick values. For in see it, the dot moves the same way it
pictures on your computer screen? stance, if J is equal to 4 (up), line 140 did when you drew the line. If you get
With the VIC 20 Super Expander car will look to the computer like X=X lost moving the invisible dot, just hit
tridge, you can do it with a joystick. +(-l)-(0) and line 150 will read the fire button to make it change color
A short program demonstrating the Y=Y+(0)-(0). so you can find it, and then change it
RJOY(X) function (one of several graph The POINT statement is the way the back again.
ics statements and functions the car
tridge adds) permits drawing lines on 1 SCNCLR
the screen by moving the joystick. The 2 PRINT"THIS PROG WILL DRflW IN RCCORDRNCE WITH
program is fun, but limited. It is as if
THE JOVSTICK"
the artist drawing on the screen cannot
3 PRIHT"HIT THE FIRE BUTTON TO LEAVE HO TRflIL,SPRCE
lift his pencil from the paper, and can
not erase if he makes a mistake, but TO CLERR THE SCREEN"
must start over with a new sheet of 4 FORT=1TO5090:NEXT
paper (blank screen). If he is careless 19 GRRPHIC3
and lets the line go off the page, the 20 COLOR0,7,1,1
program blows up and he has to start 125 X=170:V=180
over again. 130 J=RJOV(0)
We liked the program so well we set 135 REGI0N1
out to fix those inconveniences. The 140 X=X+ C<JRND4 >=4>-((JHND8)=8)
new program, which we call Joyrite, 150 V=V+<aRNDO = l)-CaRND2?=2)
lets you draw on the screen and clear
152 IFX<3THENX=INTO023/3) :V-V-3
the screen as before, but now you can
153
erase if you make a mistake, or "pick
154
up your pencil" when you want to. It's
easy to draw complex figures on the 155
screen. We even drew a simple elec 160 POINT2JX*3JV*3:IFJ=123THENGOTO1009
tronic circuit that looked like it had 165 IFPEEKO97)=32THEN:SCNCLR
been professionally drafted. It takes 170 GOTO130
practice to move the dot on the screen 1003 POINT0,X#3,V*3
so it comes out like you want it to, but 1010 J»RJOV<0)
since you can erase anything that 1020 X«X+<aRND4)*4>-<<JflNDe>«8>
doesn't look right, it doesn't matter.
1039 V=V+ C <JRNDI >"1 >-«JRND2) =2)
The RJOY(X) function is the core
1032 IFX<0THENX=INTa023/3>:V=V-3
of the program. It works like a binary
1033 IFX>IHTa023/3)THENX=0:V=V+3
counter, with one switch, or bit, for
each of the four directions. For ex 1034
ample, if you move the joystick up, 1035
RJOY(X) equals four. 1040 POINT0JX*3JY#3:iFJ=128THEN130
To make the screen coordinates 1045 IFPEEKa97)*32THEM: SCNCLR
come out right with the value of the 1050 GOTO1010
RJOY(O), X and Y are one third of the

COMMODORE POWER/PLAY Summer 1983 81

jiffies

To use the graphics statements for the border. This combination works the wraparound line will not meet the
added to the VIC by the Super Ex well on a black and white screen also. line you started, but will be one or two
pander, the program must be initial It's fun to experiment with different positions off, depending on the value
ized, as in line 10, with GRAPHIC plus colors in this program, but remember of X and Y at the time the line comes
a mode numbered one, two, or three. that some combinations don't show to an edge.
This program will work with any of your drawing very clearly. In lines 165 and 1045, the computer
the modes, but each works a little One color setting you should not PEEKs at the address where the name
differently. GRAPHIC 1 is multi-color, change is the one used with the POINT of the key being pressed on the key
but not high resolution, so your line statements. In line 160, the 2 specifies board is stored. A 32 means the space
is thicker. GRAPHIC 2 will give you the same color as the character color. bar. Please note that the colon after
high resolution, but not as many In lines 1000 and 1040, the 0 tells the the THEN in the IF... THEN state
colors. GRAPHIC 3. which we like computer to draw with the same color ments in these lines is not a misprint.
best, permits both high resolution as the screen. If you change it, you When the Super Expander statements
and multi-color. won't be able to erase. are used with the !F.. .THEN state
Another thing that needs to be We added the routines in lines 152- ment, they won't work unless this
initialized is color, which we do in line 155 and 1032-1035 so the program colon is present.
20 with COLOR 0,7,1,1. These four wouldn't crash when you move the dot This program is a good demonstra
numbers can be changed. They set, off the screen. This is especially help tor to show your friends how much
respectively, screen, border, character ful when you can't see the dot. When fun it can be playing with a computer. C
and auxiliary color. In this program, the dot hits a screen edge, it "wraps
we specify white (1) for the character, around" and appears on the opposite
black (0) for the screen and yellow (7) edge. If you draw a single straight line,

TAYIORMADE SOFTWARE • TAYLORMADE -t

Expanded offering of Educational Software Discover how easy It is

for the COMMODORE 64" for you to get useful

• Touch Typing Tutor {TTT64) diskette S24.95 results from your VIC.
cassette S19 95
Ideal for typing students or computer users Learn to type with all
lingers on your computer's keyboard by following itie keyboard and UnoersianOing Your VIC volume i Sane
linger placement pictured on your TV screen 19 lessons tolly de programming uses a proven stea-Oy-siep approach
scribed in 12-page manual Select PRACTICE and lype compuier lo leacn programming it coils 111 95
generated pswido words lor your rate and list ol errors Select TEXT
and sraclice English words lor limed test ol any duration A cassette tape wilh two flemonslration programs
from Iha book is available for $7 95 It will save you

for the VIC 20" typing time and eliminate typing errors

• Touch Typing Tutor 3.0 (TTT5K) cassette S19 95 VIC Soltw.r.

Has same features as TTT64 above Will run on basic VIC Four Easy to use program for you lo create new

separate programs Enhanced version now provides practice typing characters for graphics or games Cassette S9 95
English words Includes 12-page manual Selected by Denver Public
Schools lo tram 700 elementary studenis in keyboard skills

• Fun Fractions (FF + flX) diskette S24 95 Sea your dealer or orrjer direct
cassette S19 95 VISA/MC accepted
The tun way to learn acdmon. subtraction, multiplication, and Divi Money back guarantee
sion ol (factions lor grades 4-9 with sound, color, and graphics Please «O0 %2 :55 overseas)
Walcri VIC show you al Ihe intermediate steps on the screen black for shipping ana Handling
board Then take a turn and see if you can answer before the
parachute lumper crashes Three levels of diflicuiiy Help is given
lor incorrect answers, learn your score Requires 8K (or morel
memory expansion Includes 16-page manual TIS me

Foreifln orders payable U S dollars plus S3 00 snipping/handling Total Information Services, Inc.
80*931. Dept CM
TAYL0RMAPE SOFTWARE Los Alamos. NM 87544

P.O. Box 5574 mm

i——■ Lincoln, HE 68505 ■**■
(402) 46.1-9051 Dealer inquiries irmtea

Cummodor8 61 anil VIC m ate lraifemarks or Commodore Business NtatlMas. Inc

TAYIORMADE SOFTWARE • T AYIORMADI £

82 COMMODORE POWER/PLAY Summer 1983

 Reinventing the Wheel in
PET BASIC
by Dean S. Rossa

This interesting little program creates the illusion of a spinning wheel. It will run
on the PET, CBM and Commodore 64 computers.

To create the illusion of a spinning circle on the PET is by PET graphics: a horizontal, a vertical, and two diagonals.
to reinvent the wheel. Two points do not determine a line To make the wheel appear to move, we print a string and
in standard PET BASIC and a point rotating equidistant then overprint it with spaces. A fixed point is defined; a
from a fixed point cannot define a circle. Lines and shapes sector in a fixed position relative to the point is printed
displayed by PRINT statements are defined by the number and is then blanked; then other sectors and lines in differ
of characters and cursor movements required to flesh them ing positions relative to the point are printed and blanked
in on the screen. This can make the drawing of separate in a clockwise rotation.
circle segments pretty tedious. The program itself keeps score, prompts players, and
This program constructs a wheel by defining six strings, tidies the screen in a straightforward game, and in a round
each of which represents a pie-shaped wedge of the circle. about way takes a turn demonstrating the potentials of
It also defines the four diameters that can be easily defined PET/CBM graphics. C

10 PRINT CHR*<142) "HKKS 83PIN THE WHEEL!"

20 PRIKPPRINT" fi OflfiE FOR TWO PLRVERS"
30 PRINT:pRINT"flCOflL§ IS TO SCORE CLOSEST TO 500S POINTS"
46 PRINT " WITHOUT EXCEEDING 5090 POINTS" :PRINT:PRINT
56 PRINT"SHORT SPIN WILL MOVE WHEEL TO ONE"
60 PRINT" OF NEXT 4 NUMBERS IN SEQUENCE ":PRINT
70 PRINT"LONG SPIN WILL MOVE WHEEL TO NUMBER"
30 PRINT"3 TO 8 RWflV IN CURRENT SEQUENCE" :PRINT
90 PR I NT "SEQUENCE IS: 1,5,19.. 20,50, 100.. 500, 1300" :PRINT
100 PRIHT"SETTING UP PLERSE WRIT": PRINT=PRINT
110 REM ****** BUILD WHEEL.: "Tj "W'S "II"j "W'RRE CURSOR UP, DOWN,. LEFT, RIGHT *****
120
130 ! FOR I=1TO7: FOR K=1TOJ: »B*C4) +"
140 NEXT K' BK13 =B$a)+"T >B*<4)»B$<4) +"S"
159 FOR K=l TO J+l:B*a)»B*a>+L* :B*<4) =B$<4>+L* ^NEXT K:J«*J+2i NEXT I
160 >13'i FORI = 1TO 7 : FOR K=l TO J
170 Bf<2}=Bt<2>+" " :B*C3)»B*<3)+" "-Btf5)=B*<5>+" ":Bi(6)=Bf<6) +" " :NEXT K
1S0
190
200
210 FOR 1 = 1 T06 = L$<n ="3" + B*O3 : NEXT I
226 N*=CHR*f223> =FORI = 1 TO?:
230 S*«"CHR*a9D'F0RI»lT07:S
24Q R$=CHR$U92):F0R I = 1TO13 :HU=HU+flt: NEXT
250 INPUT"ENTER NRME OF PLRVER l";N$a>:N$a>LEFT*£N*<n,8)
260 INPUT "ENTER NRME OF PLRVER 2";N*C25:N*<2>=«LEFT*(N*<2)J8i ' PRIHT"T

COMMODORE POWER/PLAY Summer 1983 83

jiffies

279 DRTR" 1" 5"," 19"," 20"." 50".." 100". " 500", 1.PIS0
290 FORI=1TO8' REflDRJUVNEXTl: |[|l»|l|l|i|l»l»|»!": K=0 ' GOTO 370
290 FOR P=1TO2 : PRINT"SSTN*<P >"■ ENTER EL" FOR PI LONG SPIN,"
300 PRINT " SF5 TO PflSS , OTHER KE^S FOR SHORT" :POKE153,0
310 GET SriFS**"" THEN 310
ii
320 PRINT "31
it
330 PRINT"BM
340 IF S*="P" THEN 320
356 R="IHT<RND(9>*4) + 1: IF S$= "L"THEN R=R+4
360 FOR 1=1 TO R: K=K+1=IFK>3THEN K=l
370 P0KE594S7; t£:P0KE59466,3- PRINTH*L*a>: POKEQ, 220: POKEQ,225-POKEQ, 250
380 PPINTH$L$< POKEQ,250: POKEQ,25? : POKEQ,250 :REM PRINT WHEEL
390 PRINTH*S2* :PRINT W*R$<K) : POKEQ,250: POKEQ,255 : POKEQ,250 :REM POKE SOUNPS
400 PRINTH$L*<3> : PHKEQ i 2^0 : POK^Q . 25"1 : POKEQ,250
410 PRINTH*"a" HI* U£Lt<A) ■ POKEQ,£50: POKEQ,25? : POKEQ,250
420 PRINT H$L$ <3) H$VD* ■ POKEQ,250' POKEQ,255 : POKEQ.250
430 PRINT H* -t'',^) '■ POKEQ,250- POKEQ,255 : POKEQ,250
440 PRINT H$" IIIIIIISIIIKHI" ' 3"Hli H$ VU* : POKE Q/250' POKE Q,255 ' POKEQ,0
450 PRINTH*"S" "iti;r "iiiiri lllllllin"S2*:PRINT" WflSRtSflSlBIfiBl"
466 PRINTHfS2* "iniiiiiiiiiiir 11 aw" *i$

SPECIAL
JOIN THE
VERSION OF
COMPUTER
TYPING TUTOR
REVOLUTION
PLUS WORD INVADERS
WITH A MASTERY
NOW AVAILABLE FOR THE
OF THE KEYBOARD!
COMMODORE64™...$21.95(TapeJ
In the age of the computer, everyone
All of the features of the VIC 2Oru Version and more
from the school child lo the Chairman of
the 8oard should be at home at the
computer keyboard. Soon there will be SPRITE
a computer terminal on every desk and DESIGNER
in every home. Learn how to use it right by Dr. Lee T. Hill |
...and have some fun at the same time! ^ T*Z r__ _ r Ji E ^T

Rated THE BEST educational program lor the VIC 20™ $16.950apeJ $21.95 (D/sk)
by Creative Computing Magazine Create and then transform sprites automatically. We
have the oiher sprite making programs, but this Is the
TYPING TUTOR PLUS WORD INVADERS —$21.95 one we use lo make sprites. The automatic transform
manons are great!
(2 programs on one cassette tape for the unexpended VIC 20™)
Typing Tutor plus Word Invaders makes learning the keyboard easy and lun! ^^^^ Shipping and handling SI .00 per
Typing Tutor teaches the keyboard in easy steps Word Invaders makes typing order California residc-rt.- add 6% j^ffi
praciice an entertaining game Highly praised by customers: M^B sales tax. VISA and Mastercard "^pup
orders must include lull name as shown on card, card
"Typing Tutor is great.'", "Fantastic". "Excellent", High quality", "A source o! number, and expiration date. Free catalog sent with
great joy and learning lor our children", "Even my little sister likes It", "Word order and on request.
Invaders is sensational!"

Customer comment says It all...

"... and it was everything you advertised it would De. In three weeks, my 13 year

SOFTl^RE
old son, who had never typed belore.was typing 35 w.p.m. I had improved my
typing soeetf !5 w.p.m. and my husDand was able to keep up with his college
typing class by practicing at home. "
VIC 20 and Commoflors 6* are traOematks ol CommoOoio Eleclronlcs Lid. P.O. Box 9403, San Rafael,CA94912(415)499-0850

Programmers: Wrllo to our New Program Manager concerning any exceptional VIC 20TM or Commodore B4TM game or other program you havedaveloped.

B4 COMMODORE POWER/PLAY Summer 1983

470 T=T+l: IF T=l THEN GOTO 290
483 IFI=R THEM 5SS
499 PRINTH* B*<5) HiB*( 1) HJ 2) HS B$C3> Hi E*(5) H* B$(4>:MEKT I
583 TCP>=T«;p)+'vlflLfR±i:K:j >: I-T (P> :>5@80THEN530
510 PRINT"S!W'P"H$a V :" T(OT nx? i, i 22)N$';2>" ■ "T<2)
520 NEXT P : OOTO290
530 PPIHT"5WWrt"Nf Cl V :" T<1)T ?2>N$(2>'^'Tir2>''^^^!^sM^^!M!!l!!l?MllN$i:P)ri LOSE?
540 POKE 5:9468, 12: POKE 59467 ,16 ;P0KE594^6.. '5
358 FOR Z=EVr0ieaSTEP5;P0KE59464 ?: FOR t-J=!T0?9: NEXT W '■ WEXTZ; POKE 59464,0
568 PRINT:PRINT"ENTHR 3rVS TO PLflV RGfllM"
570 i?ET !<*:IF Kt=""THEN 570
IFK*O"V"THEN STOP
590 PRINT "n

65535 REM ********** DERM S. ROSSfl ***** JONESBOROj flRK. ***** 1993**********

fin oPEn nno shut cr5e>

FOR COITIPUTERS
Your sizable investment in your compute' should tie proiected It you have
to load and unload your computer every lime you want to move it, you
must consider ide possible damage Computer Case Company has solved
your computer protection problem. Once your equipment is safety inside
the attache-style carrying case, it never has to be taken out again. Simply
remove tfie lid, connect the power, and operate For storage, disconnect
the power, enclose your disks, working papers, and manuals in the
compartments provided, and attach the till Case closed Judge tor yourself

<> CM703 Commodore 64/VIC with Disk Dwes S529

1> CM704 Commodore 6J/VIC with Datasei 109
<► AP105 12 mch Monitor (8SW) 99
» AP106 AMDEK Color 1, II or 111 119
<» PdOt Paper Tigei 44QMi5M60 99
»» P4Q2 Centronics 730 Series 89
1i pm Epson MX70 MX80 89
<» Pd(M Epson MX100 99
t » P405 IDS 560 or Pnsm 132 Printer 109
1 » P405 Starwmer FID Punter 119
1 > CC80 Matching Attache Case (5") 85
1» CC90 Matching Attache' Case (3") 75
1>CC91 Matching Accessory Case 95
CALL TOLL FREE: (800) 848-7548 • CC92 5 25 D-skette Case 4S
Ah .
565D Indian Mound Court Columbu ., Ohio 43213 • (614) 868-9464

COMMODORE POWER/PLAY Summer 1983 85

jiffies

STAR:
An Astronomy Program
for the VIC 20
byAlexBakman

There aren't too many scientific programs for Commo

dore's VIC 20, especially in astronomy. Well, astronomy is
5 REN STRR POSITION
my hobby and 1 badly needed a program that would save me
10 X$="******#**#*#***#******"^PPINT"
time on calculations. I knew, for instance, a program that
would calculate azimuth and altitude would be very useful.
11 PRINT"MCRLCULRTION OF RZIMUTH RND
So, without further delay, I created one. If you're
familiar with astronomy you would know that you need RLTITUDE":PRINTX*
two coordinates to focus a telescope on the target of your 13
observation. The first coordinate is the horizontal rotation, 15 K=6.62240808
called azimuth. It runs from 0 to 360 degrees in a complete 20 PRINT"TXf"TIME OF OBSERVRTIONCIN
circle. The second coordinate is the elevation angle. It is HOURS)": INPUTT: IFT>24ORKC?THEN20
known as altitude, and is between 0 and 90 degrees. 21 PRINT"MQNTH":INPUTfl*
The output of this program will give you the two coordi 22 IFR$="JRN"THENfl=0
nates you need. So, for instance, if you have an azimuth 23 IFR$="FEB"THENR=3I
equal to 90 and an altitude of 45, you would then rotate the 24 IFR$="MRR"THENR=59
telescope to the 90 degree mark and move it up 45 degrees.
25 IFR*="fiPR"THENfl=90
The input of the program is as follows:
IFRS="MPV"THENfl=120
1. Your local time of observation
27 IFfl*="JUN"THENR=151
2. Date and month
3. Longitude and latitude of your location 23 IFfl*="JUL"THENfl=181
4. Right ascension and declination 29 IFR$="RU0"THENR=212
The program takes this information and starts off by 39 IFR*="S£P"THENR=243
converting your local time to universal time. Hour angle 31 IFfl$="0CT"THENfi=273
is calculated immediately afterwards. 32 IFRf="NOV"THENR=304
Most computers operate in radians, so if your input is 33 IFR*="DEC"THEHR=334
in degrees, you obviously have to convert that input to 34 PRINT"DflTE":INPUTS:IFB>31ORB<0THEH34
radians. The formula for the conversion is: :N=R+B
Rad = Deg* pi/180
36 IFN>366QRN<0THEN21
Now the program comes to the final slage and calcu
37 PRlNT"r»####LONGITUDE##**####";INPUTL0
lates the azimuth and altitude. As it does so, it displays the
results on the screen.
33 IFLQM650RLCK65THEN37
So type the program into your VIC and save yourself 39 IFL0>65RNDUK93THENR=5
from boring calculations! C 40 IFLO>90RNDLO<105THENR=6
41 IFLO>105RNDLO<120THENR=7
42 IFLO>120RNHLQ<135THENR=8
43 IFLO>135RNDLO<150THENR=9
44 IFLQM50RNDLCK163THENR-10
53 PRINT"^**##*LflTIT[JDE##******* : IMPUTLR
56 PRINT"3fc##RIGHT RSCENSI0N***": INPUTRfl

86 COMMODORE POWER/PLAY Summer 1983

 For Commodore 64

bi you imtant *tc*lf to put & ' ' * piymviTt

pocamirs in levaliaf ddtlil from ytirly & monthly

mrnarist. toispArtta *ccounl«. lodtt'tl lOumali

APRIL 03. 1963 10 33.IS

IMASIER MENUj

1. PRINT REPORTS MENU

;. INCOME MENU
3. EXPENSE MENU
A. BALANCE CHECKBOOK MENU
5 BUDGET FORECAST MENU
6 AUDIT ACCOUNTS MENU
7. AUDIT JOURNALS MENU
8. END RUN

WHAT H DO VOU WANT ! _

'■
"Family Finances''Program
On hiflh-quftlity S 1 1' floppy with
Camptato -•', \ ••-.iiv , ■-■■.-■■ i 11
MinuAl onlyr Lcriditit] ID pu'chita)-

Poslagefi hirtdkng includtd.

58 PRINT''3M#0ECLINRTION****##'': IHPUTD Mail chsck or mongy ordflr t&

60 UT=T+R
76 :3=K+. 0657*N+1.0027*UT-aO/15) 19123 Hamlin Street
30 IFS>24TH£NS=S-24 Suite A, Dept P5
90 REM END U.T. Reseda, CA 91335

120 HR=(S-RR)#15 64 its tKid*m»rk of

Commodora Elactronict I imiiod
127 REM CONV. TO RRBIflNS
130 Hfl=HR*fr/180
140 D=D#fr/180
158 Lfl=LR*Tr/130 DWLEY SOFTWARE
160 REM END CONVERSION
175 REM RLTITUDE For Commodore 64tM
li—f^ T kl f' Ti "i lifi" T 1 I f11 Q*iXf"siT*v/Tl''iAi^r"lf^i''l O "'i 'Jiff*iC" i* L-JQ "(
180 /So 1 Pi ■ JJ ' TiHr 1 pi % 1—n f"*U''—'—' > JJ *LrlJo j. Lri.' "'_''—'O . nn J
DELUXE ADDRE5SER C1O1F
1S5 RL=flThKX/SQR<-X*X+O!> Eosy moiling labels, each data tile holds
130 REM END RLTITUDE 250 addresses. Update. Delete, Add. List.
Labels, Sort. S40.00/Tope.
200 REM
MANSION! C201F
205 REM RZIMUTH
The QUTLER whispers . . . "Somebody stole
210 V*<SIN<D)-SIN<Lfl>#SIN<:flL»ACOS<Lfl)#COS(RL>) the fur coot!" Video map and dossiers. NOT
so eosy to solve1 Si4.95/Tape.
215 RZ*-RTNCV/SQR<-V#V+l)>+tr/'2
220 REM END RZIMUTH HIGH SEAS C204F
Sail the Atlantic in 1611. recover stolen
225 REM gold, avoid mutiny, bring in wonted
230 REM RRDIRNS CONV. pirates. S14.95/Tope.

231 REM TO DEGREES FURTRAPPER C205F

235 RL=RL#US0/fT) Explore the Rocky Mountains in 1B46.
gather pelts, trade for food. Lakes, villages,
240 R2=flZ*<180/iT> ferns. i14.95/Tope.
245 REM END CONVERSION BLACKJACK TUTOR C210F
253 PRINT"^RKMDW»I:(LTITUDE= ";RL Learn to stand, hit. double, ond split. Prac
tice scenarios. i14.95;Tope.
270 IFHR=HflTHEN RZ=360-RZ
280 PRINT"PZIMUTH IS'S'RZ MISSION 64 C215F
Cirion enemy spacecraft threaten your
309 END mission. Joystick or Keys, $19.95/Tape.

Add shipping of S.75 per cassette tape.

(Deolers: (816) 763-7000 for soles rep.)
• All programs con be used on disk, too •
P.O. BOX 2913
LIVERMORE. CA 94550-0291
V Commodore 64 <» □ trodema'k of
Comrnodorf ElffCifOdiCl Lid.

COMMODOREPOWER/PLAYSummer I9B3 87
program listings

FOR... NEXT
Sound Effects
by Jim Lockridge

This program provides a series of interesting sound effects demonstrating the use of FOR... NEXT loops. You'll hear
everything from racing cars to laser blasts—even what seems to be a babbling alien creature. It begins with a series of
anti-matter torp discharges and ends with a World War I biplane flying off into the sunset.

1 GOSUB20090 500 F0RV=IT02

5 P0KE36878,15 = S=36876:Sl=36875!52=36874 510 FQRYV=i35T0212STEP.3:P0KES2,YV:
10 PRINT"»dllI":REM#*SOUNDl*# POKES2,0:NEXTVV
15 F0RTT"135T0241STEP1.5 550 NEXTV
20 POKES; TTPOKES1,TT 593 PRINT"SSP1":REM#*SOUND7#*
99 POKES,0:POKES1,0 609 F0RTT=241T0135STEP-l■POKES,TT:P0KES1
100 NEXTTT .. TT i P0KES2, TT: POKES, 0: P0KES1, 0
110 PRINTira5E!":REM##SOUND2## ■POKES2.-0- NEXTTT
120 FORTT=1TO3STEP1 700 PRINT"B3Bi":REM*#S0UNDS#*
130 SS»241:POKES/SS:POKES, 0:SS*SS-i 710 FORV=15TO0STEP-.l
■ POKES,SS 720 P0KE3£978,V
140 SSI=133:POKES1,SS1:POKES1, 730 P0KE36377,212:P0KE36877,0:NEXTV
900 FORPP=1TO4000:NEXTPP
299 POKES1,0:POKES,0:NEXTTT 10000 RUN
360 PRINT"M8Br:REI1##SOUND3## 20900 PRINT11:*" :P0KE36879, 25
310 F0RTT-1T06STEP1
20010 PRINTMaaSdWDMSWIilFFlNTflSIEk CC3"
320 F0RT»241T0133STEP-l:P0KESl,T'NEXTT: 20020 PRIHTiPW«SflKifl:«Sa BV JIM LOCKRIDGE"
NEXTTT
20059 RETURN
3S0 PRINT"BaWi":REM##S0UND4*#
390 FORT=1TO3STEP1
400 F0RTT-24IT0135STEP-1:POKES,TT:POKES,
0iNEXTTT
410 F0RTT-241T0133STEP-l:P0KESI,TT
:POKES1,0:NEXTTT
420 F0RTT=241T0135STEP-l:p0KES2,TT
:POKES2,0:NEXTTT
430 NEXTT
440 PRINT"»dBr:REM#*S0UND5#*
450 F0RTT«135T0241STEP.3:P0KES,TT:
P0KES1,TTiP0KES2-TT:POKES,0■POKES1,0
■POKES2,0: NEXTTT
490 PRINT"«aSS"-REM*#S0UND6#*

88 COMMODORE POWER/PLAY Summe' 1983

 Butterfield's Machine Language
Revisited
by Carl Robertson

In the Winter, 1982, Power/Play we ran an article by Jim Butterfield titled "A Little Exercise in Machine Language"
that showed you how to fit a machine language program inside one line of BASIC. This program, submitted by reader
Carl Robertson, is a modification of Jim's program.

1 REM "MRCH L INTRO 16X"-REM R PROG MOD'N BY CRRL ROBERTSON

2 REM FROM flH flRTICLE IN POWERPLAV MRG <WINTER,82 P6 50) BV JIM BUTTERFIELD,

3'rEm'tHIS PROG MODIFICRTION flLLOUS NEC POKES TO BE DONE FROM R DRTR STRTEMENT..
4'rEm'rCCURRCV OF DRTR LINE INPUT MflV BE CHECKED BV R 'RUN200' COMMRND
5pRINTaWa THIS PROG MflV SELF- DESTRUCT UNLESS THE FOLLOLJING RRE DONE="
6 PRINT"SW1 DELETE PROG LINES 1- 9":PRINT"M2 STRRT PROG WITH 'RUN60'":PRI
HT"M3 ":
7 PRINT"CHRNGE LINE 220 TO 18 BEFORE RESTRRTING"
8 PRINT"X1 NOW HIT THE STOF KEY RHD STflRT WIPING OUT LINES 1 THRU 9!!"
■5 GET E$:IFE*=""THEH9
IS REMXXUXXKXMXXMXKKKXXXKXXKXMX
28 SV34183
30 PRINTPRINTKW THRT'S RLL"
48 PRINTtlWffl9 DON'T FORGET! CHRNGE LINE 220 TO 10 BEFORE RESTRRTING."
58 PRINT"WU!LIST220
60 fi=4193
76 F0RN=0T017
80 RERDD^OKER+N.D^NEXT
90 T=0.FORT=RTOR+l?:T=T+PEEKCJ>:NEXTJ:pRIHTir^!»aM TOT POKED ="T
100 PRINT"BW HIT SPC BRR TO CONT"
110 GETEf-IFE$=""THEH110
129 PRWT"XmM DEMO 'XI6" IS NOW RERDV" :PRINT"KBW" ■GOTO10
209 DRTR32,22?,255,201,13,208,1,96,162,15,32.210,255,202,203.250,240,236
210 F0RN»8TQ17:RERBR;T-T+fi:f€XrPRINTT:ST0P-REM SHOULD = 2S47
220 REMXXXXXXXXXXXXXXXXXXXXXXXXX
1100 0PEN4.-4:CMD4
1110 LIST
1120 PRINT#4,CL0SE4

COMMODORE POWER/PLAY Summer 1983 69

tele/scope

Commodore Information
Network File Translator
by Jeff Hand

With your Commodore computer and So after you've downloaded a program as a sequential
VICMODEM you can access the many telecom file, there's not much you can do with it, except take the
listing and type it in by hand. That's the only way you
munications data bases available in the United
can load it into the computer and get it to run. Other
States, including the Commodore Information wise you've just got a nice program listing that won't
Network. This issue the Commodore Infor do anything.
mation Network Systems Operator (fondly What a pain, right? Yes, but did you really think I'd
known as SYSOP) continues from where he leave you with no alternatives? Of course 1 wouldn't. This
issue I've come to your rescue with this short but very
left offin the spring, with an ingenious little
sweet little program written by Andy Finkel that will type
program that automatically translates program your program in for you. allowing you to convert those
listings that you saved as text into programs sequential files into program files. And the program files
that WILL run. And you don't even have to it creates WILL run on your computer. It was originally
lift a linger (well, hardly). written for PET and CBM computers with disk drives.
Changes that make it work for the VIC 20, Commodore 64
Last issue I gave you a program called VICTERM PRINT and datassette are noted in the line-by-line explanation.
that lets you download (save) a sequential file from a tele Which is one way of getting you to read the explanation.
communications data base to printer or datassette. That
program is great for saving things like answers to hotline
questions or new product information—-hut has one
limitation. When it saves a program listing, it saves it as
a sequential file—as if it were text. That's different from
saving it as a program file, which is a set of commands to
the computer.

JeffHand, Commodore Information Xetwork's kindly SYSOP

90 COMMODORE POWER/PLAY Summer 1983

59999 REM DVNRMIC FILE TRflNSLflTOP FOR THE PET/CBfi
69000 INPUT"DRIVE";D$-INPUT"FILENRME";N*:OPEH1J8J
60610 OET#l;C#:lFflSC<C*XM3THEN60010
69020 PQKE174,. l^PRINT'THHS'S :3=6 ■ GET#1, C* : IFflSCCC*>=18THEN6@050
60330 PRINTCJ; iIFflSC<C*3O13THENGET#hC*:lFST-0THENS0030
60049 IFST=0THEN609?0
60050 CLOSE1:PR1NT"FINISHEB":END
60870 ! END

Program Explanation:
60000 Input drive number and file name. Open logical carriage return it reads the next character from
file one, for device 8, and open data channel for file 1 and checks the status of the disk drive. If the
the disk drive. This can be modified to work with status is all right (ST=0), the line is executed again.
the datassette by using the command: OPEN 60040 This line checks the status of the disk drive again.
1,1,O,D$":"+N$ If the last character read was a carriage return
60010 Get each character from logical file 1 and assign then the status was not checked in line 60030. If
it to C string, If any character in the C string is the status is OK, go to line 60070.
a carriage return (ASCII 13) continue to the next 60050 Close logical file number one. print finished and
line of code, otherwise return to the beginning of terminate program.
line 60010 and get the next character. 60070 623 and 624 are the first two locations of the key
60020 Register 174 contains the number of current open board buffer. These locations are poked carriage
files. On the VIC 20 and Commodore 64 register returns. For the VIC 20 and the Commodore 64
152 keeps track of open files. The reason one is 631 and 632 are the equivalent keyboard location.
POKED into this register is explained with line Register 158 is the number of keys in the keyboard
60070. The print command is used to position the buffer. (For the VIC 20 and the Commodore 64
cursor {also explained in line 60070). Get the char this same register is 198.) A two is poked into this
acter from logical file one. If C string is an R then register, to tell the operating system that two
terminate the program. This GET command and keys were just pressed, but they are ignored as
"R" check is always performed after a carriage long as the program is running. The words
return is detected. This will detect the end of the "GOTO 60020" are printed directly under the
program because the program being loaded will program line on the screen and the program is
end with a carriage return and the word "READY". ended. Now the two carriage returns in the key
The VIC 20 and the Commodore 64 put a linefeed board buffer are executed one on the program
(ASCII 10) between the last program line and the line, putting it into memory, and one on the
word "READY". To run this program with either GOTO 60020. The program starts back up at line
of these computers, change IF C$="R" to 60020, however, once a program is ended, BASIC
IFASC(C$)=10. thinks all files are closed. By poking a one into
60030 This line reads and prints each program line onto register 174, the program is telling BASIC that
the screen. It first prints C$ and if C$ is not a one file is still open. The cursor positioning in

COMMODORE POWER/PLAY Summer 1983 91

MITEY PROGRAMS tele/scope
FOR THE VIC 20tm
and COMMODORE 64 m
WORD MITE 2
TMs fpsigra1* it a little mdta processor ilth fliG feature** Screen
edltinrj; *ri",e ana read ngsed tc*i 'lies on tape ana clsk. Print
dt display tflut irltri selected page, line, i-argln, Indent, 5 space
lengths, £nnance/reveEse cririEaetGr, u/1 case, column tac notions.

ADDRESS
C l
MITE 2
aln name/flflfltcsB lUts »ith non-print"ng phone *.
ti In natural fnrmat. F>evlenT edit, snrt Cj
t*, Snartri c* y, print, racnrfl

LETTER MITE 2
Edit, Dili! lUTiunaliies Ittteit using tt.lj from WORD MITE !. line 60020 keeps the program lines printing at
Insert first, last, full nntiea, adciri-^es Into te/l rrc ADDRESS
mme ; fI lei oc keyooitd. Print »itn ru 11 wohd hite 2 options. the same location on the screen, and allows the
LIST MITE 2 carriage returns in line 60070 to occur at the
Create general Hits of items ultM yuur nun entry format.
read MlH on tand/iJL»k. Display, edit, selectively print;
Mite,
rearch
correct locations.
By KEY or BOtOi sort list. U50 far inventories, collections, etc. Essentially this program will take the sequential file,
Each- on Tape $14.95, Disk $16.95 print it to the screen, and at the carriage return enter the
program just as if you had typed it in by hand yourself. The
°* NEWSLETTER PACKAGE $39.95 computer takes the print to the screen and tokenizes it
Con lain * WOOD Mill , flOCRI'.'. mi = f . LLMLP MITE , plus flato sioraqe.
into a BASIC program file and Voila! your sequential file is
Availanlc tax Conmouort 6fl" and VJC ?0^< pith b«* nri tane or dl^J<,
now a program file. Remember, however, the file transfer
Alan far VIC 2C"i- 5K* or, tnott, VIC '* or Inter std.; Ml so for RS-232.
5PECIFV version ana tape or disk, senfl cnech or MO; COD,12 extra.
from CompuServe to your computer is not error-free.
Therefore you may have to debug a little bit to eliminate
MORE" Write for catalog* Quantity discounts. Customizing.
• CDW33DPE 64 inrj VIC 20 are tisdeiwkt of Ca-rnQiJ^re Elcc".rc;nlc5 Ltd.
those errors that were induced over the phone lines. But
this is a lot easier than retyping the file on your own.
NELSON SOFTWARE The program that you just converted is stored in the
memory of the computer. List the program to make sure
2232 Ogden Ct., St. Paul, MN 55119 it's there. The last few lines of the program will be the
dynamic file translator program, because the line num
(612) 738-1080
bers are large (60000). If the line numbers were lower
the translated program would probably write over the
file translator program. Delete those last few lines and
• • • PROGRAM AUTHORS • * • then save your program file.
Little Wizard Manufacturing pays jhf highest royalties in the Lfniled Those of you who want to pull off a sequential file that is
Statas (or Ihe rights to duplicate quality programs. II you Itilnk you in assembler will find the dynamic file translator program
have i super program, lor any micro computer, give us a call and let is of no benefit to you. Your best bet is to use an editor that
us show you our program. You'll be glad you dldR! 1414(968-2558
operates on a sequential file, then process the edited file
through an assembler and last through a loader. This will
COMMODORE 64"and VIC-20'" Programs give you a program file that you can use on your machine.
VIC-20'M(cassc'tte) Commodore 64™ (cassette) Right now Commodore is working on several projects
that will make many more programs available to our
Chimp Chase Trip & Party Planner
telecommunications enthusiasts. We'll be adding two
Blasteroids Cribbage
Cosmic Crusader Twist 64 more sections to the Commodore Information Network.
Allied Defense Tronic Cycle 54 One will contain over 600 public domain programs for
VIC Amortizaiion Carnac Caverns the whole Commodore computer line, all of which will
VIC Twist Mail It 64
Trip S Party Planner
be free to anyone caring to download them. The other,
Super Sprite
Alphabet Soup Stock Master Commodore Softex, will offer programs for sale. Both of
Cribbage these new sections, however, will require that you have
Tronic Cycle special software in order to download the programs.
Commodore 64™ (disk)
Fire' Fire'
Ultimate Tank (8K)
The software you'll need will have to incorporate
Cribbage 64
Cosmic Crystals Carnac Caverns what are called "B protocols". At the moment, the soft
Mail It 20 (8K) Mail It 54 ware supplied with your V1CMODEM does not use these
Mail It 20 (Disk} Super Sprite protocols, which is why you need the VICTERM PRINT and
Rebel Defender (8K) Slock Master
Pro Football (BK|
File Translator programs. They give you away around the
Microtexl (Word Processor)
Camac Caverns (16K) Payroll Master B protocols. But wait...some time in the future you'll be
Stock Master 20 (BKl Write for your FREE cjufaf- lodayl seeing the release of two software packages that DO use B
Our games are in at least 75% Machine Code, and have HI-RES protocols: the Executive Terminal package (for CBM. PET
multi-colored graphics to give them arcade quality, also and Commodore 64 computers), which will be available
making them fast, taster, fastest! from CompuServe, and VICTERM 40 (for the VIC 20), from
Commodore. Then you'll be able to download program
Little Wizard Manufacturing
files directly, ready to run. c
P.O. Box 152 • Milwaukee. Wisconsin 53201
"Commodofi1" & "VIC iO" ,iri* rr.KlrnurLMjK'oriimodoK'Electronics Ltd

92 COMMODORE POWER/PLAY Summer 1983

program

VIXEL
For Fun and Learning
by John Watkin

The three-volume VIXEL series of graphics and game simply hitting any of the color keys. Draw enables you to
programs boldly stands out in the sea of available VIC 20 back up, erase, or delete lines and you can even save your
software. These entertaining and educational volumes creation on tape if you wish.
fully exploit the VIC's animation, graphics and sound The Arcade-Style Games Fire, Safari, Warp, Rail
capabilities. In addition to the exciting games and helpful and Race are all hi-res, arcade-style games that challenge
graphics, VIXEL is a great tutorial software package due to to differing degrees the VIC user's game-playing dexterity.
its superb technical documentation and to the fact that the All the games use some machine language routines to
user is able to list the programs. The three VIXEL volumes speed up the action.
include the following programs: Fire's an exciting game in which the player must
Volume One Volume Two Volume Three maneuver a helicopter over burning apartment buildings
Cover 1 Cover 2 Cover 3 and drop water on the spreading flames. The helicopter's
Fire Safari Warp water supply must be replenished frequently from a nearby
Draw Superfont Fifteen water tank. While the pilot reloads, the flames continue
Race Quix Rail (needs 3K or 8K) to spread throughout the buildings. The player races the
computer head-on in trying to douse the flames. Fire's
The Cover Programs Each of the three VIXEL
only drawback as an arcade-style game is that the action
volumes is introduced by a cover program. These brief
is not quite fast enough. Despite this minor problem, Fire
programs are brilliant exercises in animation. When they
will be a popular addition to your game library.
are run, VIXEL's hairy little mascot dances across the
screen dragging the title of the volume behind him. Each Safari requires the player to stalk the African jungle
cover is different, and each is better than the previous. The and shoot photos of wild animals and natives. This pro
cover programs use imaginative hi-res graphics combined gram involves some great hi-res graphics; the natives that
with creative sound effects to produce three of the finest run to and fro are truly artistic creations. Safari plays at
displays of VIC animation to be found anywhere. about the same speed as does Fire, but again, it could be
faster. The animals in Safari are great examples of the
The Graphics The graphics programs included in
VIC's graphics capabilities. Safari is certain to be a hit.
the VIXEL series are Superfont and Draw. Superfont is
an invaluable aid to programmers who create their own hi Rail is an intriguing game in which the player must
res graphics. Using a joystick or the keyboard, you can guide several trains through a train yard filled with rail
design your own hi-res characters on the large work screen switches and other trains. The keyboard is used to flip
either one at a time or in blocks of four. The program then track switches to prevent collisions between trains. The
will convert your creation into data statements to be used goal of this tricky game is to get your train from one side
in your own programs! This is one of the easiest, most of the screen to the train depot on the other side. Once
enjoyable ways of designing programmable characters you successfully get your train through the yard, another
available to the VIC user. No programmer should be train is added and you must guide two through simultane
without Superfont. ously. If you master the game, you will eventually be able
to steer eight trains successfully to the depot. Sound easy?
Draw is not as much a programmer's aid as it is an
addicting toy! Do you remember the Etch-a-Sketch you Not so! Rail is an exciting game that requires a lot of
played with as a child? Well, Draw can be described best practice to master.
as a multi-color, electronic Etch-a-Sketch. Either a joy Race is a simple little game in which you race your car
stick or the keyboard is used to move the line around the around a circular track avoiding the computer-guided
screen. The color of the line can be changed at any time by oncoming cars. The simplicity of Race makes it a good

COMMODORE POWER/PLAY Summer 19B3 93

 glitch fiM

game for the young kids around the house. For adults, ii
Race will serve as a fun diversion. We're
Of VIXEL'S five ;ircade-sty!e games, Warp is by far the
best. It is challengingly difficult and it rarely becomes
boring. In Warp, the player, using a joystick, must man
Glad You Asked"
euver a spaceship down into a winding tunnel. The far Winter, 1982
ther he proceeds, the narrower the tunnel becomes. If the
spaceship careens into the tunnel wall, it is destroyed and
the game ends. Warp is a refreshingly simple game, yet at
A method for disabling the RUN/STOP key was pre
the same time it is intriguing and challenging. Warp re
sented in the Winter 1982 Power/Play question and answer
quires a lot of skill and patience to master. It is a simple
section. The procedure is to POKE 788,194 to disable the
matter to become addicted to Warpl
key and POKE 788,191 to re-enable it. A side effect of using
The Puzzle Games The VIXEL series includes two this is that whenever the RUN/STOP key is disabled the
puzzle games that test your logic and recall skills. Quix real time clock (Tl and TI$) is also disabled. This is unac
is a game in which the computer presents a random se ceptable for some applications which need the real time
quence of color and sounds that flash in four boxes on the clock (such as home sentry programs which turn lights,
screen. The player must then repeat the pattern by hitting alarms or coffee pots on and off).
the corresponding function keys. As the game progresses, A second method can be used to disable the RUN/STOP
the patterns get longer. Soon, the player is frantically key without this side effect (although it does have its own).
hitting function keys, trying to remember the last pat You can disable the key by using POKE 808,109 and re-
tern. Quix is an enjoyable game that will appeal to both enable it by using POKE 808,112. The real time clock runs
young and old.
as normal now, but.... The side effect of this method is
In the game Fifteen, the screen displays a large square that the program won't LIST properly until the POKE
filled with fifteen randomly numbered squares. The object 808,112 is performed.
is to "slide" one square at a time until the numbers are in
sequence. The player can slide a square by pushing the
joystick in a given direction. Fifteen is a clever and crea
tive application for the VIC 20. The game is designed very
well and is a fun challenge, The
The Documentation Thorough, professional
documentation accompanies all VIXEL software. The VIC Magician
documentation includes both a layman's guide to the
programs as well as technical outlines of the programs Winter, 1982
themselves. These technical descriptions are very valuable
to the programmer who wants to decipher and learn from
the VIXEL programs. The software is not protected so the The very last line of that article, which is a program line
user can list and study any of the programs. This combina that is supposed to produce a beep, is wrong. It should read:
tion of listability and documentation is by far the biggest
35 POKES3,200:FORT=lTO200:NEXT:POKES3,0
selling point of the VIXEL software. Few software companies
can match VIXEL'S superb technical documentation.
VIXEL software belongs in every VIC 20 user's program
library. The wide variety of games and graphics will appeal
to everyone from young kids to serious programmers. Un
Tele/Scope
like much of the software currently available for the VIC 20, Spring, 1983
the VIXEL programs are easily listed. This advantage, in
accompaniment with the superb documentation, will prove
to be a great asset to the programming crowd. VIXEL
In the program listing on page 88, line 385 should read:
Volumes One, Two and Three are available from The
Code Works, Box 550, Goleta, CA 93116. Their number 385 IF ZT=0 THEN OPEN 4,4,7:PRINT #4,
is (805) 683-1585. The price of each volume is S12.95. c RTSRTS

94 COMMODORE POWER/PLAY Summer 1983

 Deflection"
Winter, 1982

For those of you who conquered the little tiny listing of the program that didn't nearly work. Here are the
and typed in the Deflection program from the Winter lines to change:
issue, more pitfalls. A routine was included at the end

5700 CT = 0: FOR L=SS+ WD TO SE- WD: IF PEEK(L) <> 32 THEN 5900

5800 POKE L. 102: CT= CT+ 1
6000 FOR L=l TO CT- A
6100 X=INT( RND( 1)* WD* HT)+ SS: IF PEEK(X) <> 102 THEN 6100

If you set the speed control to a number higher than time. You can correct this by changing to this new version
the recommended 10, the ball flickers on for only a short of line 3300:

3300 P0=NP: POKE Q0,NP: POKE P0,81 FOR Q5=l TO Q4*5: NEXT: Q0=P0:
GOTO 1900

Also, since we've had a number of beginners frustrated Commodore computer. Look at lines 1050-1052. Pick your
by the marginal legibility of that program listing, we machine and eliminate the words REM and the computer
thought we'd give everybody another crack at it. So here name from that line. That will set the factors for your
it is, in its entirety, with corrections. particular computer.
For those who are new, this program will run on any

RFM—REFLECTION #9 BV NEIL.
1058 REM CBM SSB327S8! 140*85:HT=23:SE"=^S+UD*HT-1:PQKE59^68> 12
1051 REM PET SS*K?(58:WD*'*0:HT™tOK5S6ilS
1052 REM VIC SS=7680:W3ss22:MT=23:SE«>SS

1100 Z»-10!
£203 IFLEFT*(R*j1>="¥"THEM4300

3.100 INPUT"W^ROFT?"' R*: R=VRL (ft*>: I*$<.I0RR>. 3*WB&HTTHEHZ*2+18: G

1450 INPUT "J9SPEEB C8-9V'JQ4; IFQ4<£T!j^Z!S2+16:(jOTO1450
1300 PR I NT "3" J i'FORL^TOUD-l; POKESS+L^ 3C '■ POKESE-L^ 9f: NEKTL
1510 FCRL=UDTO<HT-a)#WIlSTEPWD:POKESS+L^96■POKESS+WD+L-1>56:NEXTL
1539 IFR>4
1550 F0RL»lTOfl

1750 P0RL=S
1800 p=0:T*

1980 NP^PO^

COMMODORE POWEFWLAY Summer 1983 95

 E86t jaujuins AV"ld'd3MOd 3HOQOIWO0 96
I4.K3N' cc ^3>£
681 SN3tti2£ I O < % > >f33di I: 33+ (iH*at'l* (X ') UH<L 00^9
11X3N 006S
I+XO»1O:30I Q06£
BSCSNBHISEOO^riBddl s 2M~3SG*3r'H'SS3"TiJC
.(3WO0 iNEdZidilu d nciln '2ZBd5'dJ» iridibi
lybtiioil
08STO1OE :dN=0d 0E3fi
00c2OlOCi ■ Q''"0d=cjt'i i dh=t d:Q-=i!
0So?Oj.OD- nililS MU/iJiiiNIid:
riOci^ 3S00h0 /.bw iiu.^ iliRiad
3HU i»iNb ib 0 J.1HS ulNIdd
li In 1 'ju
M —.11 1 ClCJ
0B32 d0 "SJnSaSSS
aJn id NI si j-l ..INIcid 008f
uBib3dO SI d0l031jdH ii IN I dd
d 30N0 "irt^^ iiihldd 0ti£V
/ 2nd 3 ^ihi OHISfl i, in lad
~i"iba 3Hi 1031d3iI (TOiSK jiJ.Ni dd 00y>
'SSN3 3WbO 3HJ. a XN idcJ
ilH N333 SdH 130c*yi ii xniCiQ
iib"i 3hi. BONO ' ilBOdbJ. east-
3Hi HonoaHi "nya iXNiad
TlUS 3hi Ii3"id3u 01 31 iZNIda 00Vf
StJtiQ 3hi du 103150 3hJJl liNldd 08£t.
An
0Sd£u1uu;01+Z=ZN3HiuftuO < T '$U>$ tddidl 00Tf
ttN3N3Hlr,Ni.»O '$o>*ld3~)dl :*0fn3WyQ d3H10NUK illidNl
M3NN3HI 3S<ZdI lee
iC13jd 008E
iiAo ' (.S ' *Ii>$lHOiy .'ii. ii :'<£ 'o''5;Il-p5UlW I n 3dH 3WIJ, driu^fit 005S
,.3d"iaaodi,: d!.,oni sn Si.30dbi„ fu i „ioo novoc ,iNIdd 00i£
,=$ddl 00^e
00 it
0^2^0100:1 iri*ii=u 000£
0SS£uiOO.i HVQsQ 006£
000£N3hJ.T**<Q 'Sayji 0086
0S3SOJ.OO: Q' S0iS
0^3iulOO:Hi 00S5
30&SN3H1.
S0 T SN3H1 ii 5 ii =$y JI
Jt=i"dl
hij qoii|S
 Win A FREE
Commodore 64™ Computer
Can You Beat
PARATROOPER?
10 Prize Winners
A New Commodore 64 will be awarded to the person with the highest score. The winning entry
must contain a photograph of the highest score of the game.

PARATROOPER Bvn,c£w
REALISTIC SMOOTH ACTION AND TRUE Hi-RES GRAPHICS

1st Prize
CBM64
2nd Prize
Disk Drive
3rd Prize
$200 worth of Software
4th - 10th Prize
$100 worth of Software

Runs on the Standard VIC 20™ RULES

PARATROOPER a ■ -. .'i \:- < \< -t-niw ilui doesn't let you marie any misiakes Von
are in command. Helicopters fill thp ■■■,■. i ■■ ■ we mean dlL the skylh chopping 1. AHmifirt mull hemailftl, a4pO4fmdrl-iar#r#quj(dlod*l*rpnin*th*fftrlie4lwirmirtgenir^ !nlK* I
paralroopeis. Your mission is (o keep 3 paratroopers horn hiiring the ground un either rucm al a I* ihe poftrn&k -ill deternrnv Ihv winner
side of your gun But that's just the beginning You scare by hitting the helicopters orthe fl (■ JlAl 31, 1903.
paratroopers, but i! you miss a shot it subtract from your score Theretoie, you musl
rnusl t* provided Rtl urn y< f fc*ij# fronl uid proof of puiclaw t
make svtiy sho! count to make a high wore' IT HAS FOUR FAST ACTION LEVEL5
TO CHALLENGE THE BE5T PLAYER Th*r H^h Resolut™ graphics htlicoptor^ are
lantastx Thev \ook exatily like htflicopiers1 The paratrooper) me Hdpev icalisiK. Their 4 INIHIESMU5T BE MAILED TO. PAW TROOPER CONTEST. PO Bo. 388, L*h* H*v<*u
chutes open and then they drift down lu earth II thu wvturil enough ihe sounds are Civ.
fantastic There are helicopter bladn whirring and you can heac the howitzer pumping
ihelb. Tha* Qdme realV »How off ihe wund and ipaphjc capabibTrn ol you VIC
PARA TROOPER IS OUHil SELLING ARCADE GAME,you'vtgonowethft game to
believe it $19.95
T W«VTi ilJ b* nalJ*dby "4^ PubW n e ol

Order your copy today; or see your dealer.

a. On*y dn*- PIV; prr perbon pteai*
Wilt you get the top score?
9. T>Hi> unll b* ]D*!nr*rt I01 a !nr ?rtd & >d ptizt Ptute
VIC 20 and Commodort 64 arc trademarks nr 10 CinUfVf it lmrlfd 1u USA. Proprrr*! and Canada only
Cammoaoie Electjonics Ltd.

ComputerMat . P.O. Box 1664X. Lake Havasu City, Arizona 86403

COMMODORE POWER/PLAY Summer 19B3 97

 t
a

m o

oo 0
■o. o
0
OMMODORE 64. ONL
Q,
'a, 0,
What-nobody else can give you at twice the price
■ ■ O A .
ao o 'o,
o
o
'O (> o, o 'o o,e •,
•
MICROPHYS PROGRAMS have been used successfully in school and colleges
throughout the country. Now, this educational and recreational software
is available for use in your own home.

CASSETTE

FOR USE IN BOTH HOME AND CLASSROOM.

SUBJECT MATTER AVAILABLE APPROPRIATE GRADE LEVELS

VOCABULARY HIGH SCHOOL/COLLEGE

SPELLING ~ 12th Grade
SAT ANALOGIES 11th Grade
WHEEL-OF-FORTUNE 10th Grade
WORD GAMES JUNIOR HIGH SCHOOL
ANAGRAM WORD GAMES 9th Grade
CRYPTOGRAM WORD 8th Grade
GAME 7th Grade
CHEMISTRY
ELEMENTARY SCHOOL
PHYSICS " 6th Grade
MATHEMATICS 5th Grade
CAI CULUS 4th Grade

The Microphys catalog is available from leading stores and computer dealers
or you may phone or write to:

MICROPHYS PROGRAMS
MARKETING DIVISION
1737 West 2nd Street
Brooklyn, New York 11223
(212)375-5151

Foreign and Domestic Dealer and Distributor Inquires Welcomed.

COMMODORE POWER/PLAY Summer 1983 99

new products

The following information is Company: tie spider warriors to save American

taken from product announce Sirius spacemen trapped in Spider City.
10364 Rockingham Drive Package features a full-color poster
ments sent to us by independent
Sacramento, CA 95827 from the film.
manufacturers, and is provided
916-366-1195 Price: Contact company.
simply to keep our readers
Product: Company:
abreast of developments in the Four new games on cartridge for the Avalon Hill Game Company
Held. Commodore does not en VIC 20 and Commodore 64—Turmoil: 4517 Hartford Road
dorse any of the products men Fight off evil aliens attacking from both Baltimore, MD 21214
tioned, has not tested them sides. Fantastic Voyage: You and your 301-254-5300
submarine are reduced to microscopic
and cannot vouch for their Product:
proportions and injected into the blood
availability. Eight multi-cassette games for
stream of a critically ill patient. You
the Commodore 64—B-I Nuclear
must navigate past deadly defense cells,
Bomber, Midway Campaign, North
bacteria, antibodies and enzymes to
Atlantic Convoy Raider, Nukewar,
destroy the life-threatening blood clot
Planet Miners, Draw Poker, Com
near the patient's brain. Deadly Duck:
puter Stocks & Bonds, Andromeda
The crabs in the pond take to the air,
Conquest, Computer Football Strategy
armed with bricks and bombs. Deadly
andTelengard.
Duck's job is to shoot them down with
Price: From $16.00 to $24.00
his gun-barrel bill. Fast Eddie: Eddie
is on a treasure hunt, climbing up and Company:
down ladders everywhere in search KPYX/Automated
of prizes, while pesky Sneakers keep Simulations
him jumping. 1043 Kiel Court
Price: See your local Sirius dealer. Sunnyvale, CA 94086
408-745-0700
Company:
Twentieth Century-Fox
Product:
Games of the Century Jumpman—Science fiction game
4701 Patrick Henry Drive, Bldg. #9 on disk for the Commodore 64. The
player is Jupiter Jumpman, last-resort
Santa Clara, CA 95050
secret weapon against the enemy
408-988-6666
.Alienators. Jupiter Jumpman must
Product:
defuse bombs on all 30 levels of head
Flash Gordon:—Space rescue game
quarters by scaling ladders, girders and
on cartridge for the VIC 20. Maneuver
ropes. Obstacles include Alienator bul
through underground tunnels and bat-
lets, robots, dragons, birdmen, flying
saucers, crumbling girders and vanish
ing escape routes.
Price: $39.95

Company:
Tronix Publishing, Inc.
8295 S. La Cienega
Inglewood.CA 90301
213-671-8440
Product:
Three games for the VIC 20—
Deadly Skies: A "shoot 'em up" in
Flash Corilnn
which the player has a squadron of

100 COMMODORE POWER.'PLAY Summer 1983

 accompanies every move. The object is
to drag the moondust to the center of
the circles without bumping the space
walker. The point of Save New York!
is to destroy the above-ground and
subterranean mutants before they
destroy the city. Home application
programs, all conversions from the
VIC 20, include Household Finance,
Home Inventory, Loan Analyzer, Car
Costs and Decision Maker.
Price: Contact company
Product:
Two new cartridge games for the
VIC 20—Rat Hotel: Using a joystick,
Moondust fait Hotel the player has three minutes to man
euver lirmine the Rat from the attic
down six floors to the basement, where
five helicopters with which to destroy he can eat Le Grand Cheeseball. Ermine
an enemy military base. Features 32 must avoid Waldo the Maintenance
levels of play. Gold Fever!: The player Man and traps. Pipes: A home educa
is a gold miner who must gather all tion game intended to teach the con
the gold in a mine shaft while avoiding cepts of spatial relationships and
runaway box cars, boulders and claim economics. Arlo the Plumber must
jumpers. The miner must do all this connect all the houses in town to the
before oxygen runs out in the mine. main water supply by buying various
Nine skill levels. Scorpion: Pits a scor kinds of pipe from the factory. He
pion struggling for survival against selects the pipe and carries each piece
such enemies as dragons, frogs, to the work site, where he attaches it.
venus fly traps, worms and pods. The point is to hook up all the houses,
32 play levels. with no leaks, without running out of
Price: $39.95 each pipe or using too much money.
Price: S39.95 each
Company:
Creative Software Company:
230 E.Caribbean Drive RAK Electronics
Sunnyvale, CA 94086 P.O. Box 1585
408-745-1655 Orange Park, FL 32073
Product: Product:
Nine titles for the Commodore Commodore 64 Maillist—A multi
64-—Four cartridge games and five purpose mailing list management sys
home application programs on tape tem on cassette or disk. Allows you to
or disk. Games include conversions construct, sort, maintain and print out
of two VIC 20 games, Astroblitz a mailing list of over 300 addresses. Sub
and Trashman, and two new games, files created from the main file allow
Moondust and Save New York! In growth beyond the 300-address limit.
Moondust the player draws colorful Price: S14.95 cassette, S17.95 disk plus
trails of moondust crystals across S2.00 shipping per order.
glowing concentric circles. Music,
composed according to joystick action, Scorpion

COMMODORE POWER/PLAYSummer 1983 101

new products

Company: Wayne, NJ 07470 bench allow for pinch hitting and relief
COMPUTER:applications, Inc. 201-696-3296 pitching. Football Adversary: Places
13300 S.W. 108 St. Circle Product: you in the role of head coach opposing
Miami, FL33186 Zoriok—Adventure game for the the computer. A selection of 31 plays
and displays of halftime/game statistics.
Product: VIC 20 with 8K expansion, [inter the
castle of Zorlok the wizard, wipe out Requires 8K memory expansion.
Two games for the VIC 20—ZAP!:
the plague of monsters and regain his Price: Baseball $10.95; Football $14.95.
Witli keyboard or joystick, players
work their men up the many levels of treasures. Multiple skill levels. Company:
corporate structure while avoiding the Price: $39.95 Computer Software
obstacles that can zap their chances Company: Associates, Inc.
for success. KEYQUEST: Explore the Parr Programming 50 Teed Drive
many levels of an ancient dungeon 2664 Tyler Street Randolph, MA 02368
while gathering valuable treasures and 617-961-5700
Gary, Indiana 46407
gaining experience points. Destroy mon 219-885-0611 Product:
sters and search for the key to each VIC-PAK #1—Seven basic pro
Product:
dungeon level. grams for the VIC 20 on cassette.
Two sports strategy games on
Price: $29.95 each Mortgage allows the user to find
cassette for the VIC 20—Baseball
Company: Adversary: Make tough managerial the unknown variable for principle,
MicRo Information Systems decisions against your computer monthly payment, term and annual
P.O. Box 73 opponent. Additional players on the interest of a mortgage loan. Elements
provides a short quiz on naming the
chemical symbol associated with each
of the chemical elements. Statistics is
a brief introduction to the VIC 20 as
a sophisticated calculator. Calendar
products any calendar month from
1 A.D. to 9999 A.D. Marblestat illus
trates the computer's ability to imitate
real life events via programming.
Expectancy calculates a rough esti
mate of the user's life expectancy.
U-Draw allows you to draw simple
blocked graphics in eight colors.
Price: $19.95
FIVE POWERFUL SOFTWARE Company:
DEVELOPMENT TOOLS Scholastic, Inc.
730 Broadway
Plus Zhe Smtittg J\\iv Hook New York, NY 10003
212-505-3000
INSIDE THE COMMODORE 64"
Product:
THE BOOK THE TOOLS Family Computing—A national
A complain clear eiplsnaUon of machine Asserncier/EdMcrJLoadortOecodar,MonNor
consumer magazine aimed specifically
lunguago, Aa&ambly lanrjungo. CommoiTmo 6* FulMeatured Assembler allows use of labels,
architecture, graphics. Joystick and sound eflecE comments and arHhmeilc expressions lo create at families with home computers, to
programming. Detailed alepby-slep guide to Ihs machine language programs. Create, save,
use ol Iho development Icols. How lo combine modIIy Assembly IflnguBQO programs with l-he be published monthly beginning in
Editor. Load end link machine language modules
BASIC and
cartridges,
machine language, make auto-atart
interface with trie Internal ROM- with the Loader. Decode machine language beck
September, 1983.
based programs of BASIC and the Kernel Inlo assembly Fanguage for aludy or input lo (he Price: Single copies $1.95; year's
Sample programs fully explained. Editor. Singie-aEep program execution with I he
MonHor Combines Assomblflr/ Editor for maxi subscription $17.97 C
mum onso ol USD.

ALL FOR $54.95 PLUS S2.00 POSTAGE AND HANDLING Add S5.00 lor disk »»ralon.
Send chock. M.O., VISA/MC (12.00 S.C.) or specify C.O.D. (add S3.00) to:

P.O. Bo« Z07, Cannon Falls, MN 55009

507-263-4821
r*gmt"d TV o

102 COMMODORE POWER/PLAY Summer 1983

commodore
product list

Order Order
Number Product Name and Description Number Product Name and Description

Commodore Consumer Range—VIC Series Commodore Systems Peripherals—Disk Drives

VIC 20™ VIC 1530 (C2N) Datassette
Full-featured, expandable color Cassette storage for PET/CBM/VIC/C64
computer system. 5K RAM, includes RF VIC 1541 Single Disk
Modulators TV switch box. Single drive intelligent 5W floppy disk
system for the VIC 20 and Commodore
Commodore Personal Computer Range— 64. Media compatible with CBM 2031
64 Series and 4040 diskettes. (170K)
Commodore 64™ CBM 2031 Single Disk
64K RAM personal computer features Single drive intelligent 5'/4" floppy disk
16 colors, music synthesizer, high system. 170K (DOS 2.6).
resolution graphics (320 x 200 pixels), CBM 4040 Dual Drive
8 movable sprites, and CP/M* option. Dual drive intelligent 5V<t" mini-floppy
Provides access to 2 joysticks, 4 paddles disk system. 340K (DOS 2.1).
or a light pen. Display: 40 column CBM 8050 Dual Drive
x 25 lines Dual drive intelligent 5'A" mini-floppy
disk system. 1 Megabyte (DOS 2.5).
Commodore Personal Computer Range— CBM 8250 Dual Drive
4000 Series Dual drive intelligent 5Va" floppy disk
PET* 4032N system. 2.1 Megabyte, dual sided
System includes graphic keyboard and (DOS 2.7).
numeric keypad; Display: 40 column D9060 Hard Drive
x 25 lines; 32K RAM 5W' "Winchester" drive (DOS 3.0)
5.0 MB
Commodore Business Computer Range— D9090 5V4" "Winchester" drive (DOS 3.0)
8000 Series 7.5 MB
CBM™ 8032B All Commodors disk units feature compatible DOS command lanjjuafie
Typewriter style keyboard, numeric and file handling capabilities to allow upward expansion of systems
as required.
keypad, 80 column x 25 line display.
■Cl'/Mli a Iti-BijlcrciTIV: ikMarWUijiilal Research, tnc.
32K RAM, BASIC 4.0.
CBM 64K Memory Expansion Board
64K Add On-Memory. Expands CBM Printers
8032 to 96K RAM. VIC 1525 Graphic Printer
Upgrade Board V!C dot matrix printer for the VIC 20
Upgrades CBM 8032 to SuperPET and Commodore 64. 30 CPS, 80 col
umn; prints full VIC character set;
Commodore Advanced Computer Range— tractor feed.
9000 Series CBM 4022 Printer
SuperPET™ Computer SP9000 Dot matrix printer with tractor feed,
Enhanced 8032 with additional 6809 80 column, prints full PET graphics,
microprocessor; total 134K memory variable line spacing, bi-directional,
with 96K RAM. Languages include 80 CPS.
Waterloo microBASIC, Waterloo CBM8023P Printer
microAPL, Waterloo microPASCAL, Dot matrix printerwith tractor feed,
Waterloo microFORTRAN, Waterloo 136 column. Fully programmable
microCOBOL, interpreters and graphics, bi-directional, pseudo letter
Waterloo 6809 Assembler. quality, 150 CPS.

COMMODOREPOWER/PUYSummeM983 103
commodore
product list

Order Order
Number Product Name and Description Number Product Name and Description

CBM 8300P Printer 500039 Dow Jones Portfolio Management

True letter quality, daisy wheel printer System (80 col. RS232)
with 10,12,15 pitch or proportional 500041 BPI Accounts Receivable
spacing and optional tractor feed. Bi 500043 BP1 General Ledger
directional; 40 CPS; supports APL & 500046 BPI Job Cost
foreign language print wheels. 500047 BPI Inventory
500048 BPI Payroll
500049 BPI Accounts Payable
Cables
500050 Legal Time Accounting
IEEE-IEEE
Designed to connect more than one 500051 Medical Accounting System

peripheral to any PET/CBM computer. 500052 Atlas 1200 Service & Maintenance
PET-IEEE 500053 Titan Job Cost System
500060 Freight Rating and Invoice
Used for connecting one peripheral to
900040 I.R.M.A. II (Information Retrieval &
any PET/CBM computer.
Management Aid)
500100 Commodore Ceneral Ledger
Accessories
500101 Commodore Accounts Receivable
CT 500 Commodore Computer Desk
500102 Commodore Accounts Payable
26" x lVa'T-moldingvvith rounded
comers; heavy steel legs with adjustable
leveling glides; typewriter height with Commodore Marketed Applications Software for
a ventilated shelf for the disk drive. the Commodore 64 Business/Education
VIC 1311 Joystick for VIC 20 and Commodore 64 600001 EasyCaic 64—Electronic Worksheet
VIC 1312 Paddles for VIC 20 and Commodore 64 600002 EasyPlot 64—Prints charts & graphs
VIC 1600 VICMODEM 600003 EasySchedule 64—Schedules time
Telephone Interface Cartridge. Lets & resources
VIC 20 & Commodore 64 owners com 600004 EasyFinance 64—Analyze financial
municate by telephone, access tele opportunities
computing and timesharing service. 600005 EasyFile 64—Database (define, edit,
Includes VICTERM I program on tape. enter, retrieve)
Plus FREE CompuServe Subscription. 600006 Easy-Script 64—Multi-function
VIC 1525 Printer Paper wordprocessor
1000 Sheets 600008 Word/Name Machine—Simple
Peripheral Compatibility... wordprocessor/mail list
CBM Peripherals can be used with the PET, CBM, and 600009 EasyMail 64—Full feature name &
SuperPET range of computers, and also with the VIC 20 address program
and Commodore 64 computers if a special IEEE cartridge 600010 PET Emulator—Allows use of PET
is purchased. software
600011 Easy Lesson/Quiz. 64—Create/
Administer test quinx.es

Entertainment
Commodore Marketed Applications Software 600050 C-64 Avenger
600051 C-64 Jupiter Lander
for PET/CBM
400010 TCL Pascal version 1.6 600052 C-64 Road Race
600053 C-64 Omega Race
400020 Assembler Development
400030 Integer Basic Compiler
400040 CMAR Record Handler Special Documentation
400050 UCSD Pascal (without board) Commodore Software Encyclopedia
400060 PETspeed R4SIC Compiler A catalog of over 1000 software
500010 OZZ—8050
programs, books, and interfaces
500011 OZZ—4040 from Commodore and third parties.
(406 pages)

104 COMMODORE POWER/PLAY Summer 19S3

Order Order
Number Product Name and Description Number Product Name and Description

VIC 20 Programmer's Reference Guide Colorful slot machine game works

VIC 20 reference manual with infor just like the real thing! Creat music
mation on VIC BASIC. 6502 Machine and sound effects.
Code Programming, Input/Output VIC 1907 Jupiter Lander
ports, VIC microprocessing chips and Pilot your "Jupiter Lander" through
tips for all levels of programmers. the treacherous crevices of a mysteri
(289 pages) ous planet. Variable rocket thrust,
Education Marketing Resources Book anti-gravity, horizontal retros.
185 Public Domain Programs for VIC1908 Draw Poker
Education including 4 disks of software. Casino-style poker recreates the
Details of Users' clubs, educational real thing! Superb animation and
vendors, and educational applications. sound effects add to the fun, mystery,
{380 pages) and luck.
Users Magazines VIC1910 Radar Rat Race
information on our products is The magical mouse maze makes for a
continually updated in the following fast-paced, challenging game of wit,
publications: strategy and reflexes. Excellent graphics,
COMMODORE The Microcomputer VIC1913 Raid on Fort Knox
Magazine... a user magazine devoted You're scurrying through a complex
to all aspects of Commodore computers of tunnels below Fort Knox. Just ahead
including business and education. you spot the gold... now grab it and try
(6 issues) to escape before the guards find you.
POWER/PLAY Fun, Games & VIC1919 Sargon II Chess
Beyond with Commodore Home SEVEN challenging play levels. Called
Computers... a user magazine devoted the "best" microcomputer chess pro
primarily to personal fun, entertain gram by experts. SARCON li makes the
ment and learning with Commodore VIC a challenging chess opponent.
Computers. (4 issues) VIC1920 Pinball Spectacular
Plays just like a true pinball machine...
VIC Memory Expansion Cartridges only computerized... flashing lights...
VIC1110 VIC 8K Memory Expander Cartridge quick "flipper" action!
8K RAM expansion cartridge plugs VIC1921 SuperSmash
directly into the VIC. The World Championship is at stake!
VIC1I11 VIC 16K Memory Expander Cartridge As a finalist do you have the cat-like
Por use with the VIC 20 and/or VIC 1010 reflexes to return the speeding ball and
EXPANSION MODULE. take the crown? On your toes... this is
racquetball at its toughest!
VIC Interface Cartridges VIC 1922 Cosmic Cruncher
VIC10I1A RS232 Terminal Interface Maneuver your "Cosmic Cruncher"
Provides interface between the V!C 20 through the Milky Way and "crunch"
& C-64 and RS232 telecommunications all the pulsars in the galaxy... eleven
modems. Connects to the VIC's & 64's challenging levels of play... over 300
user port. color/maze combinations. Exciting
arcade action!
VIC Recreational Games on Cartridge VIC1923 Gorf (The smash-hit arcade game!)
Video Arcade Series Midway's incredible coin-operated
VIC1901 VIC Avenger game is now on cartridge for the ViC!
It's an invasion of space intruders and Includes 4 completely different games,
you're the VIC "Avenger". Space action multiple levels of difficulty, some of the
for arcade enthusiasts. best cartoon graphics ever devised for
VIC1904 Superslot video games. Invaders, gorfies, death

COMMODORE POWER/PLAY Summer 1983 105

commodore
product Hot

Order Order
Number Product Name and Description Number Product Name and Description

ships, saucers, aliens... it's terrific! VIC1915 Pirate Cove

VIC1924 Omega Race* (The smash-hit "Yo-Ho-Ho and a bottle of rum..."
arcade game!) You'll meet up with the Pirate and his
The ultimate space game. You've got daffy bird, and encounter many strange
one Omegan fighter maneuvering sights as you attempt to go from your
against droid ships, command ships, London flat to Treasure island. Can
death ships, photon mines and vapor you recover Long John Silver's lost
mines. Fantastic "rubber band" bound treasures?
aries, multiple levels of difficulty... VIC1916 Mission Impossible Adventure
all the features that make the Bally/ "Good Morning, your mission is to..."
Midway game so successful! One or and so it starts. Can you complete your
two players. mission in time? Is the world's first
VIC193I Clowns- automated nuclear reactor doomed?
Come one, come all... see the amazing This one "radiates" with excitement!
jumping clowns... direct from their VIC 1917 The Count
show-stopping Bally/Midway arcade You wake up in a large brass bed in a
tour... A true arcade "classic"! Colorful castle somewhere in Transylvania. Who
acrobatics with high scoring skill. are you, what are you doing here, and
VICI935 Commodore Artist WHY did the postman deliver a bottle of
A true lightpen drawing game... blood? It's LOVE AT FIRST BVTE!
you are the artist... you create the VIC1918 Voodoo Castle
picture... multi color! Count Christo has a fiendish curse put
VIC1937 SeaWolf on him by his enemies. There he lies,
As submarine commander you are in and you are his only hope. Can you
charge of sinking and destroying all rescue him, or is he forever doomed?
enemy ships... destroyers, freighters (Beware of the Voodoo Man!)
and P.T. boats... an explosive Bally/ Children's Series
Midway "arcade classic". Fast VTC19I1 The Sky is Falling
action fun!! Help Chicken Little by catching pieces
VICI938 Tooth Invaders of the sky as they fall! A great "first
Prevent tooth decay with Plaqueman, game" to teach motor skills... fun and
using your toothbrush and dental floss. challenging!
A great arcade/educational game. VIC 1912 Mole Attack
VIC1939 Star Post A colorful "cartoon action" game.
3D space action.. .you control the You're trying to keep those nasty moles
laser to destroy flying aliens and objects. underground where they belong but
Allow less than 8 hits on your base and they keep popping up! How many can
advance to the next level. you clunk before time runs out? Fast,
Scott Adams Adventure Games fun, frantic!
VIC1914 Adventure Land Adventure VIC1933 Bingo Speed Math
You wander through an enchanted Two learning games in one. Learn to
world trying to recover the 13 lost trea add, subtract, multiply and divide...
sures. You'll encounter wild animals, while having fun. Teach your child to
magical beings, and many other perils think and respond quickly while having
and puzzles. Can you rescue the blue ox fun. Math is made simple and fun with
from the quicksand or find your way SPEED/BINGO math.
out of the maze? For beginning Adven •Bally Midway games developed under Commodore's rtrmrnlwi[h Bally

turers and veterans alike. ManufacE u ring Company.

106 COMMODORE POWER/PLAV Summer 1963

 Order Order
Number Product Name and Description Number Product Name and Description

VIC1928 Home Babysitter command lets programmers redefine

Three preschool game programs help function keys as BASIC commands,
teach your preschool children counting, subroutines or new commands.
the alphabet and relationship skills. VIC1213 Vicmon Machine Language Monitor
Keep your children occupied for hours Helps machine code programmers
while giving him or her a headstart write fast, efficient 6502 assembly
in school. The parent's manual helps language programs. Includes one line
your child get the most out of this excel assembler/disassembler.
lent development aid.
VIC1930 Visible Solar System VIC Teach Yourself Programming Series
Astronomy buffs love this incredible VL102 Introduction to BASIC Programming
game-science-learning tool. Journey to —Part I
the major planets of our solar system, A gentle but thorough introduction to
learn key statistics about each planet... BASIC programming. Excellent first
OR... record atmospheric conditions book for any new computerist. Tutorial
and compare planetary statistics using lesson tapes included.
"Astro Calc." A wonderful astronomy VLI03 BASIC Programming—Part II
tool which gives you a tour of the solar A continuation of the excellent BASIC
system and teaches you about major programming series with more pro
planets along the way. grams, lessons, and instructional aids.
Home Improvement Cartridges
VIC 1929 Personal Finance VIC Application Programs on Tape
Your budget, expenses and personal The following pre-recorded programs are designed for use
finances are simply computerized with the Commodore Datassette Tape Recorder. Programs
through this business package. Per on tape come in several varieties and are color coded by
sonal Finance will organize, arrange and category as follows: Recreation (red), Education (blue),
computerize your home financial expenses. Business/Calculation (green). Home Utility (orange), and
Computing Aid (black).
VIC Programming Aid Cartridges VT106A Recreation Program Six Pack"
VICI2I1A VIC 20 Super Expander Car Chase—Fast-paced road action
Everything Commodore could pack VIC 21—Casino-style blackjack
into one cartridge—3K RAM memory Blue Meanies from Outer Space—
expansion, high resolution graphics Space game
plotting, color, paint, and sound com Biorhythm/Compatibility—Compare
mands. Graphic, text, multicolor and hiorhythms
music modes. 1024 x 1024 dot screen Spacemath—Math improvement
plotting. All commands may be typed grades 1-6
as new BASIC commands or accessed Slither/Super Slither—Dexterity game
by hitting one of the VIC's special func VT107A Home Calculation Program Six Pack"
tion keys. Includes tutorial instruction Personal Finance I—Home Budget
book. Excellent for all program Personal Finance II—Home Budget
ming levels. VIC Typewriter—Word processor for
VIC1212 Programmers Aid Cartridge home use
More than 20 new BASIC commands Expense Calendar—Income, expenses,
help new and experienced programmers appointments
renumber, trace and edit BASIC pro Loan & Mortgage Calculator—Decision-
grams. Trace any program line-by-line making aid
as it executes, pause to edit. Special KEY Home Inventory—Home belongings list

COMMODORE POWER/PLAY Summer 1983 107

commodore advertisers indcn
product list

Order
Numhsr Product Name and Description

VT108 Math Improvement Six Pack

Grades 2-6
Numbowl Backfire
LCM Machine Scare City Motel
Sector Five Ruler Dueler
VTI09 Sampler Six Pack Advertisers Page No.
Big Bad Wolf Treasures of the
Bat Cave Abacus Software 5
Music Synthesizer Crawler 84
Academy Software
Alpha Draw Searcher
Alphacom 74/75
VT164 Programmable Character Set/
Briley Software 87
Gamegraphics Editor
Lets the VIC user create up to 64 COMPUTE! IBC
programmable characters and use Commodore 98
them in BASIC programs. The Editor Computer Case Company 85
takes only one-half kilobyte of program ComputerMat 32/97
space, works with tape, disk and printer.
Foxfire Systems, Inc. 59
VT232 Victerm I—Terminal Emulator
French Silk 55/102
A handy VIC terminal program on tape
which converts any VIC to a terminal HES IFC
for use with a telephone modem. Hypertek, Inc. 24
Interface Computerware 19
VIC 20 Books and Manuals Harry F. Leonard 72
VM100 Personal Computing on the VIC 20
Little Wizard Manufacturing 92
The "Friendliest" computer instruction
guide available. This owner's manual Micro 80 72
comes free with every VIC 20 but is also Micro Systems Development 1
in demand by teachers who use it in the Micro-Ed, Inc. 7
classroom, and by "VIC families" who 99
Microphys
want more than one guide for each
Microware Distributors 6
family member.
Nelson Software 92
VM110 VIC 20 Programmers Reference Guide
The master VlC 20 reference manual Nufekop 10
includes information on VIC BASIC, Precision Technology 25
6502 Machine Code Programming, Protecto 8/57/63
Input/Output ports, VIC microprocess 58
St. Martin's Press
ing chips, and tips for all levels of pro
Skyles Electric 26
grammers. Indispensible.
Softwear International 19

Accessories and Replacement Parts Sophware 87

1515P Graphic Printer Paper Taylormade Software 82
1000 sheet pack, tractor feed, 15lb. bond T.I.S., Inc. 82
151r.it Printer Ribbon Cartridge
TOTL Software 66
For VIC Graphic Printer
TSASA, Inc. 55
90477801 TV Switchbox
RF Cable 20 Load 59
90510101
902505 Power Supply Victory Software 16/17
32145301 Modulator Virginia Micro Systems 25
This price litf supertax i all previous price lists. -
Voice World 4
Pifeeilultfect to change without nolict

10B COMMODORE POWER/PLAY Summer 1983

 COMPUTERS
First Book Of VIC
Authors: COMPUTE! Magazine V In [reduction
contributors
Price: SI 2.95
Chapter One: Getting Started
3 Tfie Story or Titc VIC
On Sale: Now 11 Computer Genesis Michael S. Tomczyk

20 SE.2 T° * <**** **n Hell., n^ 7ll0,nburg

Finally, it's VIC's turn! 24 Urge
g Alphabet
phabet . Jim Bu tier field
26 using a Joystick
26 D°ug Ferguson
Users of other popular personal
39 Extended Inpui
p Devices-
Devices David Malmberg
computers have been enjoying their
Pddl And The Keyboard
Paddles »*,,
COMPUTE! Books: COMPUTED 46 Game Peddles , M'ke mon LecJetmsn
First Book OtPET/CBM, Program
ming The PET/CBM, and others.
Drop
Now, there's a book devoted 72 STARFIGHT3 Dub Scroggfn
exclusively to the Commodore VIC- 78 Alphabetize; .... • ■ David P. Mi?ner
20'" Computer: COMPUTEIs First 80 Count The Hearts Jim

Book Of VIC.
The editors of COMPUTE!
J.imes P
Magazine - the leading resource for
Lyle Jordan
the VIC-20 - gathered together the 103 Amortize ■ Wayne Kozun
best VIC-20 articles published since 106 Append ■ Amihai Gla?er
the summer of 198) and added 109 Printing The Screen Wayne Kozun
some new material. The result is
113 The Confusing Quote C D L*ne
115 Alternate Screens ■ Charles Brannon
more than 200 pages of valuable 119 rimekeeprng . -Jim Butterfiefd
information - information that goes 125 Renumber BASIC Lines The Easy W.iv Kt'IE"
beyond the instruction manuals. In '</ Auiomatic Line Numbers Charles H GouW
the COMPUTE! tradition, it is care
129 Pulling The Squi'e/e On Your VIC-20' J'm Wl|c°*
Gemng The Most Out Of 5000 Bytes"
fully edited to be easily understood ■ *rl An E^twi U/jv/ TVi DnN-,^-..,,ui^-n SteinJey rVl Bt?rUr\
and useful for beginners and experts
alike. Greg and Rosi Sherwood

COMPUTERS First Book Of VIC

g oution Plotting Kenneth Knox
is spiral-bound to lie flat, and ' S4 VIC Color Tips . ■ Paul F. Serial?
includes ready-to-type program 157 The Window ... ■ ■ ■ Charles Brannon
listings and articles such as "The 160 Custom Characters For Trie we ■ Charles Brannon
Joystick Connection: Meteor Maze,"
"STARFIGHT3," "Train Your PET To
Run VIC Programs," "Renumber Chip Dale Gilbert
_ ■ Jim ButierrieitJ
BASIC Lines The Easy Way," "High
David Barren/Michael KJemeit
Resolution Plotting," "Custom Char Jim Burtcrfield
acters For The VIC," "VIC Memory -
The Uncharted Adventure," and "A
195TIWMONIAS,mpleW
202 EntermgTINYMONI Directly Into Vou, VIC-20 Jim Buiter/ield
Simple Monitor For The VIC." 211 index Russell Kavanagh
At only S12.95, less than most
computer manuals, COMPUTED First Book Of VIC
is among the best resources a VIC user can own.

Available at computer dealers and bookstores nationwide. To order directly cali TOLL FREE 800-334-0868.
In North Carolina call 919-275-9809. Or send check or money order to COMPUTE! Books. P.O. Box 5406,
Greensboro. NC 27403.

Add S2 shipping and handling. Outside the U S ddcl S5 foi <iir mail. S? lor surface mail. All orders prepaid. U.S. funds only.
VIC-JO is a trademark of CommodO'e Electronics Limited
 ■ ■=■--■ -'^™--- .■
*
-

Z commodore
1200 Wilson Drive
West Chester, Pa. 193B0
Addross Ccmoclion Requeslod r :

» ■ N

N.
*