10 REM SUICI.ECB 20 REM ...SUICIDE...FROM MECC : H4U1062 FEB 78 100 PRINT "&K" 110 PRINT TAB(8);"==============/'''''''''''''''\" 120 PRINT TAB(8);": S U I C I D E \ %%%%% ) \" 130 PRINT TAB(8);"==============: \ %%%%%% ) \" 140 PRINT TAB(22);":........; ;" 150 PRINT TAB(22);" \ :: / I ##### I" 160 PRINT TAB(24);"\ '' / I ##### I" 170 PRINT TAB(25);"---- I ##### I" 180 PRINT TAB(32);"I ##### I" 190 PRINT TAB(32);"---------" 200 PRINT 210 PRINT "(+) ENTER ANY LETTER TO PULL THE TRIGGER ---=>"; 220 INPUT I$ 230 PRINT 240 LET Z=RND(0) 250 PRINT "THIS IS A GAME OF RUSSIAN ROULETTE." 260 PRINT "AND THE OBJECT IS NOT TO BE KILLED." 270 PRINT 280 LET F=INT(6*RND(0))+1 290 PRINT "YOU HAVE JUST SPUN THE CHAMBER." 300 PRINT 310 PRINT 320 PRINT "DO YOU WISH TO FIRE OR CHICKEN OUT ---=>"; 330 INPUT (1,0)A$: LET A$=A$+"F" 340 PRINT 350 LET A$=A$(1,1) 360 IF A$="C" THEN 430 370 PRINT "NOW YOU ARE SQUEEZING THE TRIGGER......." 380 LET F1=INT(6*RND(0))+1 390 IF F=F1 THEN 420 400 PRINT " CLICK" 410 GOTO 290 420 PRINT "BANG.... YOUR FUTURE LIFE HAS JUST BEEN TERMINATED..." 430 END