10 PRINT "Welcome to the freakmachine.";
20 GOTO 10


10 INPUT choice$
20 IF choice$ = "Movies" THEN GOSUB movies

RUN

Welcome to the freakmachine. Welcome to the freakmachine. Welcome to the freakmachine. Welcome to the freakmachine. Welcome to the freakmachine. Welcome to the freakmachine.

10 PRINT "What?"
20 INPUT what$
30 IF what$ = "I like pictures" THEN GOSUB creative
ELSE GOSUB otherstuff

10 PRINT "Join us."
20 IF INKEY$ = "y" THEN GOSUB freaks

krull
10 PRINT "The 1983 fantasy movie 'Krull'."
20 GOTO krull

10 PRINT "Choose your poison:"
20 INPUT poison$
30 IF poison$ = "Let me join in!" THEN GOSUB project_oy
ELSE IF posion$ = "Let me play!" THEN GOSUB games

POKE 381,552

Games

10 PRINT "Original games at ' freak ARCADE!' "
20 GOTO freakarcade

RUN

SYNTAX ERROR

10 PRINT "The 1980 movie 'Flash Gordon."
20 GOTO flash

flashgordon

PEEK 850,19,
211,981,17,34

RUN

Comics

10 PRINT "'Cappuccino Comic Online."
20 GOTO cappuccino

QUIT

Join us.
10 PRINT "Visit the freakmachine club or mail the machine directly."
20 INPUT x$
30 IF x$ = "club" THEN GOTO club ELSE IF x$ = "mail" THEN GOTO mail ELSE GOSUB otherstuff

LOAD""

10 PRINT "Internet art at 'f_gallery."
20 GOTO f_gallery

net.art

RUN

10 PRINT "Choose from (F)lash gordon or (K)rull"
20 IF INKEY$ = "f" THEN GOSUB flash
30 IF INKEY$ = "k" THEN GOSUB krull

SYNTAX ERROR

Project OY!
10 PRINT "Join the colaborative photography experiment 'Project OY!'."
20 GOTO project_oy

LOAD""CODE

RUN

POKE 451,32,45

RUN

10 PRINT "What pictures?"
20 INPUT creative$
30 IF creative$ = "Net.art" THEN GOSUB netart ELSE IF creative$ = "Comics" THEN GOSUB comics

NEW

CLS

10 DESTROY EARTH

POKE 844,21

PEEK 845,42,21

RUN

MOO

.