Glitchoidz Report

See all articles from SYNC v3 n4

A Machine Code Graphics Line-Drawing Subroutine, 2:6.

Listing 3: Delete one INC HL at address 40A1H

Listing 6: Insert equals signs between the letters and numbers in the LET statements.

Making Backups for Machine Language Tapes, 3:1.

Section 2. Copying with PEEK and POKE.

The second paragraph should begin: PRINT PEEK 16388+256*PRINT PEEK 16389 . . .

In the third paragraph the SAVE directions should read: To SAVE, enter GOTO 370 . . .

A Small Business Payroll Program, 3:2.

Add to the menu routines the marital status options: 1—single; 2—married; 3—head of household.

Math Support for Your ZX81, 3:2.

The alternate lines referred to in the last paragraph are:

870 INPUT A$
880 IF A$="" THEN GOTO 910
890 INPUT B$
900 GOTO 800
910 CLS
920 RUN

To superimpose graphs, add:

810 FOR X=-W TO W
830 INPUT Y

To improve response to the menu:

40 LET A=VAL INKEY$*150
50 CLS
60 GOTO A

Minotaur, 3:2.

Enter the list of variables in the immediate mode (i.e., without line numbers; e.g., LET A=1). A through I=1; J=512; K=16396; L=33; O=0; P=1; Q=2; R=3; S=5; T=20; U=31; V=128. Check by pressing PRINT (variable letter) and ENTER. Do not use RUN or CLEAR since these wipe out the variables.

To start type GOTO P; when the cursor appears, enter the density (0-1; try .35). To restart at the same density, type GOTO T. To set up the same maze again, press BREAK (except when entering density), type in RAND n (n = a number from 1 to 16535). Use the same number to repeat the maze. After the RAND command, type GOTO T to start. At density .35, RAND 19, RAND 20, and RAND 40 produce challenging mazes. The author would appreciate reports of “good numbers”; be sure to include the density setting.

Knowing Your Strengths, 3:2.

The author comments:

One of your astute readers in translating the program into TRS-80 Basic caught an unnecessary negative and a flow error which gives spurious results when attempting to RECALCulate new section or material sections. Make the following corrections:

Changes:

1545 IF N=4 THEN GOTO 2050
2140 LET S2=(W*L)/6*Z)

1545 corrects the flow and 2140 eliminates the unnecessary negative.

Add:

3005 IF N=4 THEN GOTO 3020
3035 IF N=4 THEN GOTO 3050
3075 IF N=4 THEN GOTO 3090

These skip the W, L, and X1 inputs.

Eliminating the printout (line 1622) will save screen space.

To eliminate unnecessary, screen consuming decimal places change:

3505 PRINT ". . . PT.)="; INT
S2;"#PSI"

Some additional output I have found helpful:

3515 PRINT "STRESS="; INT (100/(S
/32));"#PCT. OF YIELD"