VINTAGE YO!

10 INPUT "What is your name: ", NAME$
20 PRINT "Hello "; NAME$
30 INPUT "Do You Like Text Based Games? ", A$
40 IF LEFT(A$,1) = "Y" OR LEFT(A$,1) = "y" THEN 80
50 IF LEFT(A$,1) = "N" OR LEFT(A$,1) = "n" THEN 170
60 PRINT "Error!"
70 GOTO 30
80 INPUT "Are You a Virgin? ", MARRIED$
90 IF LEFT(MARRIED$,1) = "Y" OR LEFT(MARRIED$,1) = "y" THEN 130
100 IF LEFT(MARRIED$,1) = "N" OR LEFT(MARRIED$,1) = "n" THEN 150
110 PRINT "Error!"
120 GOTO 80
130 PRINT "+1 Honesty, Go Directly to FAIL!"
140 GOTO 200
150 PRINT "You're a LIAR "; NAME$
160 GOTO 80
170 PRINT "Thanks for playing "; NAME$
200 END