BeyonDtHeExpectatioN

CLS : RANDOMIZE TIMER: SCREEN 12: COLOR 2
s1 = INT(RND * 40) * 2 + 1
s2 = INT(RND * 40) * 2.7 + 1
s3 = INT(RND * 40 * 2.7) + 1
s4 = INT(RND * 40 * 2) + 1
s5 = INT(RND * 40 * 2) + 1
s6 = INT(RND * 40 * 2) + 1
x = 1
DO WHILE INKEY$ = ""
n = INT(RND * 179 + 65)

x = x + 2

IF x > 80 THEN
x = 1
END IF

IF x = s1 THEN
ELSEIF x = s2 THEN
ELSEIF x = s3 THEN
ELSEIF x = s4 THEN
ELSEIF x = s5 THEN
ELSEIF x = s6 THEN
ELSE
PRINT TAB(x); CHR$(n);
END IF

c = INT(RND * 800)

IF c = 1 THEN
s1 = INT(RND * 40) * 2 + 1
ELSEIF c = 2 THEN
s2 = INT(RND * 40) * 2 + 1
ELSEIF c = 3 THEN
s3 = INT(RND * 40) * 2 + 1
ELSEIF c = 4 THEN
s4 = INT(RND * 40) * 2 + 1
ELSEIF c = 5 THEN
s5 = INT(RND * 40) * 2 + 1
ELSEIF c = 6 THEN
s6 = INT(RND * 40) * 2 + 1
    END IF
LOOP