Try This

“Try This” features short programs to show off your computer, impress your family and friends, and tickle your imagination when SYNC arrives at your place. Send your contributions to: Try This, SYNC, 39 E. Hanover Ave., Morris Plains, NJ 07950.

---

8K ROM; 1K RAM

Type in the following lines:

1 FAST
2 SLOW
3 FAST
4 POKE 16427,1
5 CONT

Press RUN and ENTER. Observe the results. Can you figure this one out? Our thanks to:

Michael Allen
[address omitted]

---

8K ROM; any RAM

Type in the following lines:

 10 FOR X=0 TO 31
 20 LET R=INT (RND*5)+10
 30 FOR Z=R TO 21
 40 PRINT AT Z,X;"[graphic]"
 50 NEXT Z
 60 PRINT AT INT (RND*(17-R))+R,X;"[graphic]"
 70 FOR Q=5 TO R-1
 80 PRINT AT Q,X;"[graphic]"
 90 NEXT Q
100 NEXT X

Put the computer in SLOW mode for best results. Press RUN and ENTER. Observe the results. After you have digested the display, try the variation in the following lines:

 10 FOR X=0 TO 31
 20 LET R=INT (RND*8)+10
 30 FOR Z=R TO 20
 40 PRINT AT Z,X;"[graphic]"
 50 NEXT Z
 70 FOR Q=5 TO R-1
 80 PRINT AT Q,X;"[graphic]"
 90 NEXT Q
 95 PRINT AT INT (RND*(R-7))+5,X;"[graphic]"
100 NEXT X

Press RUN and ENTER. Which variation do you prefer? Our thanks to:

Tuan Ton
[address omitted]

---

8K ROM; 1K RAM

Let’s try Eric Chandler’s “Try This” again (SYNC 3:4):

20 FOR N=1 TO 5
30 PRINT CHR$(38+INT(RND*26+.5));
40 NEXT N
50 PRINT "###";
60 GOTO 20

Press RUN and ENTER; press CONT and ENTER for another screen. What happens here?

Line notes:

20: 5 letters
30: A random letter A-Z
50: 3 spaces after each word (8 * 4 = 32 = a full line).

Our thanks for the correction to:

Eric Chandler
[address omitted]