Classic Computer Magazine Archive COMPUTE! ISSUE 20 / JANUARY 1982 / PAGE 183

CAPUTE!

1. COMPUTE! #12, pg. 94. The authors suggest that the following lines should be changed to:

255 UG = GU:PRINT
257 IFGU = 0 THEN 270
290 WD = WI:WF = WI:WT = (12-WI)/2
370 IF WI>4 THEN 300
530 IF WT<0 OR WT = 0THEN WT=l:RN = 0
610 IF PEEK(KY)=251THEN ME = ME-1:KK = -1
1060 IF WD<3 THEN PRINT "LITTLE";: GOTO 1200
1120 PRINT "CHEATER";
1200 PRINT "FOO";

2. COMPUTE! #17, pg. 112. The following changes to the "Atari Program Library" will lock all cataloged programs. Then, after adding new programs to a disk, only the unlocked (new) programs need to be cataloged:

420 IF B<3 THEN ?"DISK IS#";VOL$: XI035,#3,0,0,"D:*.*":?:?"INSERT LIBRARY DISK"
370 IF IN$(1,1) = "*" OR DSN$ = "DOS.SYS" OR DSN$ = "DUP.SYS" OR
    DSN$ = "MEM.SAV" OR DSN$ = "DISK.CAT" THEN 310

3. COMPUTE! #17, pg. 143. Mr. Swaim has suggested the following lines as an alternative way to load the X$ array for business keyboard users and to correct an error in transcription:

110 X$(1) = CHR$(164):X$(2) = CHR$(175): X$(3) = CHR$(185): X$(4) = CHR$(162)
112 X$(5) = CHR$(18) + CHR$(184) + CHR$(146): X$(6) = CHR$(18) + CHR$(183) + CHR$(146)
115 X$(7) = CHR$(18) + CHR$(163) + CHR$(146): X$(8) = CHR$( 18) + CHR$(32) + CHR$(146)

4. COMPUTE! #17, Pg. 152. The correct SYS is 7168 in line 120.

5. COMPUTE! #17, pg. 162. Table 1 is missing number 9, Subtraction:

Load FPAC1 with subtrahend

JSR $C58F

LDA AL source address
LDY AH for minuend

(Addressed value is loaded into FPAC2, FPAC1 is subtracted from FPAC2 and result in FPAC1; FPAC2 unchanged.)

Number 6 should include JSR $C0D 1.

COMPUTE!'s Listing Conventions

Many programs which are listed in COMPUTE! use cursor control keys, color keys, and so forth. We have established a listing convention which we believe eases the task of typing programs in accurately.

Atari Conventions

For the Atari, all the editing and cursor-control characters are spelled out and surrounded by brackets: [CLEAR] for "clear screen." Other characters, such as CTRL-T (the "ball" character) will be listed as the "normal" character, but within brackets: [T]. A series of identical control characters will be indicated by a number within the brackets: [3 DOWN] means type the cursor-down key three times; [12 R] means type CTRL-R twelve times.

Two control characters, [ = ] and [ - ] should be shifted. Any reverse field text will be enclosed within vertical lines. (Press the Atari logo key [] for each vertical line you see.)

PET/CBM/VIC Conventions

Generally, PET/CBM/VIC programs will contain bracketed words for any special characters: [DOWN] means the cursor-down key; [3 DOWN] means type the cursor-down key three times.

If a program line runs over onto the next line down, the ˜symbol indicates where the line broke (in case the number of spaces is unclear between quotes). An underline means that that key is shifted.

8032/Fat 40 Conventions

SET WINDOW TOP	         [SET   TOP]
SET WINDOW BOTTOM	 [SET   BOT]
SCROLL UP		 [SCR   UP]
SCROLL DOWN		 [SCR   DOWN]
INSERT LINE		 [INST   LINE]
DELETE LINE		 [DEL   LINE]
ERASE TO BEGINNING       [ERASE   BEG]
ERASE TO END	         [ERASE   END1
TOGGLE TAB		 [TGL   TAB]
TAB			 [TAB]
ESCAPE KEY		 [ESC]

ALL Commodore Machines

CLEAR SCREEN	         [CLEAR]
HOME CURSOR		 [HOME]
CURSOR UP		 [UP]
CURSOR DOWN		 [DOWN]
CURSOR RIGHT	         [RIGHT]
CURSOR LEFT	 	 [LEFT]
INSERT CHARACTER	 [INST]
DELETE CHARACTER	 [DEL]
REVERSE FIELD ON	 [RVS]
REVERSE FIELD OFF	 [OFF]

VIC Conventions

SET COLOR TO BLACK              [BLK]	
SET COLOR TO WHITE              [WHT]	
SET COLOR TO RED                [RED]	
SET COLOR TO CYAN               [CYN]	
SET COLOR TO PURPLE             [PUR]	
SET COLOR TO GREEN              [GRN]	
SET COLOR TO BLUE               [BLU]	
SET COLOR TO YELLOW             [YEL]	
FUNCTION ONE                    [Fl)	
FUNCTION TWO                    [F2]	
FUNCTION THREE                  [F3]	
FUNCTION FOUR                   [F4]	
FUNCTION FIVE                   [F5]	
FUNCTION SIX                    [F6]	
FUNCTION SEVEN                  [F7]	
FUNCTION EIGHT                  [F8]	
ANY NON-IMPLEMENTED FUNCTION	[NIM]