Back to Basic

Content Warning: geek level high; language; violence (sorry, no sex)

---

110 IF Y$=”Y” THEN 130
120 IF Y$=”N” THEN 140
130 PRINT “YOU ARE GREAT!”
140 INPUT “DANGER, WILL ROBINSON! DANGER! WOULD YOU CARE TO CHANGE YOUR ANSWER? (Y/N)”; C$
150 IF C$=”Y” THEN 170
160 IF C$=”N” THEN 180
170 INPUT “SHALL WE PLAY A GAME? (Y/N)”;P$
173 IF P$=”Y” THEN 250
175 IF P$=”N” THEN 180
180 INPUT “SELF-DESTRUCT INITIATED. INPUT ABORT CODE SO I DON’T BLOW YOU TO HELL.”;A$
190 IF A$=”1-2-3 continuity, abort destruct order” THEN 170 
200 DEF FNN(X) = EXP((-(X^2/2))/SQR(2*KILL)
205 LET X = 100
210 LET K = FNN(X)
220 PRINT “ON A SCALE OF 1-10, HOW WOULD YOU RATE YOUR PAIN?”; K
250 PRINT "GUESS THE NUMBER BETWEEN 1 AND 100."
260 LET X = INT(100*RND(0)+1)
270 LET N = 0
280 PRINT "YOUR GUESS";
290 INPUT G
300 LET N = N+1
310 IF G = X THEN 370
320 IF G < X THEN 350
330 PRINT "TOO BIG! BITE MY SHINY METAL ASS!"
340 GOTO 280
350 PRINT "TOO SMALL! BITE MY SHINY METAL ASS!"
360 GOTO 280
370 PRINT "ABOUT TIME! IT ONLY TOOK YOU"; N;"TRIES!"
380 PRINT "ANOTHER GAME (YES = 1, NO = 0)";
390 INPUT A
400 IF A = 1 THEN 260
410 PRINT "I’M SORRY DAVE, I CAN’T DO THAT."
415 GOTO 250 
420 END 

---

I must be honest. This wasn’t entirely stream of consciousness. The raw code was, but I had to edit it and get it in the right order and double check syntax. I just couldn’t resist when I saw the word “if”.

I am not a coder/programmer/developer. I do this shit for fun. If you’re geeky enough to find the errors, please don’t tell me. I know they are there.