Modifications Or Corrections To Previous Articles
TI Teeth Wisdom
Line 650 of this program from the July 1983 "Programming The TI" column (p. 199) should read:
650 PRINT " ";CHR$(156);"!}e";CHR$(136) & CHR$ (137) & CHR$ (138); "e~ " ; CHR$(127) & CHR$(157)
Bee Trap For VIC
In the instructions for keyboard play on page 102 of the June 1983 issue, line 320 should read:
320 IFPEEK(KB) = 35THEND1 = D1 + 22 : GOTO335
Memory Trainer For TI
For the TI-99/4A version of this program (June 1983, p. 118) to work in standard TI console BASIC, the following changes must be made:
240 IF (DR<1) + (DR>10) THEN 140 270 IF SL<2 THEN 275 ELSE 280 275 SL = 2 280 IF SL>90 THEN 285 ELSE 290 285 SL = 90
Thanks to David Duffan and others who suggested this change.
Atari P/M Graphics Simplified
The following lines in the moving ship example program developed on pages 175-178 of the June 1983 issue need corrections:
310 POKE VSA + ADD + 1, PMHIGH 360 COLR1 = 25 : COLR2 = 11 : COLR3 = 74 370 POKE 704, COLR1 : POKE 705, COLR2 : POKE 706, COLR3 400 Y1 = 125 : Y2 = 25 : Y3 = 25
Slow List On The VIC-20
The mysterious memory location 37879 described in this article from the June issue (p. 180) is actually location 37159, the high byte of the interrupt clock. Because of incomplete address decoding for the I/O chips, the contents of locations 37136-37167 appear to repeat several times in locations 37168-37887. The location normally contains 66, not 64 as stated in the article. For a thorough discussion of the effects of changing the contents of location 37159, see the article "Versatile Data Acquisition With VIC" (COMPUTE!, May 1983, p. 244).
UnNEW For VIC And 64
This utility program from the June 1983 issue (p. 213) will not work from disk. It must be SAVEd to tape in the manner described in the article.
Minefield For 64
The 64 version of this game from the June issue (p. 266) requires the following correction:
360 B3(J) = BT(J) + .5*BT(J) : B4(J) = B3(J)+.25 *BT(J)
To allow legal jumps with kings in this game for the Commodore 64 (May 1983, p. 90), the following line must be changed:
585 IFLl < = 5ANDU1 > = 2THENIFS(LP,UM)<0ANDS(L1 +2, Ul - 2) = 0THEN600
Crosswords For VIC
Line 860 of this program from the May issue (p. 82) should read:
860 GET F$ : IF F$ = " " THEN 860
TI General-Purpose Data Base
Line 203 of this data base management program for the TI from the May issue (p. 232) should read:
203 FOR IO = 1 TO IR
64 Odds And Ends
The article (May 1983, p. 237) noted that listing could be disabled by POKE 775,200. To restore the list feature, POKE 775,167.
Retirement Planner For VIC
Robert A. Brown suggests modifications which make this program for calculating retirement saving needs from the April 1983 issue (p. 71) more accurate, and also allow calculations for any time period, not just multiples of five years. First, delete lines 120, 460-500, 590, and 600, then make the following changes:
510 D = AI/ (1 + AI/2) : Q= ((1 + AI) ↑ Y - 1) /D 540 W = (SR-S1 * (1 + AI) ↑ Y)/Q
We regret that we are no longer able to respond to individual inquiries about programs, products, or services appearing in COMPUTE! due to increasing publication activity. On those infrequent occasions when a published program contains a typo, the correction will appear on the CAPUTE! page, usually within eight weeks. If you have specific questions about items or programs which you've seen in COMPUTE!, please send them to Readers Feedback, P.O. Box 5406, Greensboro, NC 27403.