HANGMAN; (C) LARRY PHILLIPSW VANCOUVER B.C.r (604)325-6224x I BELIEVE IN FREE OR CHEAP SOFTWARE,JUST LEAVE THE CREDITS. MODIFIED BY G J FLYNN WORDS ARE BIBLE CHARACTERS] PROGRAM USED WITH THANKS BY CHRISTIAN COMPUTER/BASED COMMUNICATIONSc DATA,LINES 10010-10160 53272,23:53280,0:53281,0:"" "HE WORDS USED IN THIS HANGMAN "GAME ARE WORDS FROM THE BIBLE.2 " RESS ŠҒ TO CONTINUEG I$:I$" " 19U 53272,21r ""16)"HANGMAN." (:7)"DO YOU NEED INSTRUCTIONS?" 2I$ <I$"Y"90 FI$"N"200 P50 Z" I WILL THINK OF A WORD." d"THE DASHES () WILL SHOW YOU"6 i"HOW MANY LETTERS IT HAS.":^ n"IF YOU GUESS A LETTER CORRECTLY," s"I WILL PUT IT INTO THE WORD, AND GIVE" t"YOU A CHANCE TO GUESS THE WHOLE WORD.": v"IF YOU DON'T WANT TO GUESS THE WORD THENPRESS 'SPACE'.":& x"IF YOU ARE WRONG, I WILL DRAW ANOTHER"@ }"PART OF THE MAN.":n "THE MAN WILL BE COMPLETELY DRAWN AFTER" "TEN WRONG GUESSES.(AND WILL BE HUNG)": :"HE IS DEPENDING ON YOU!":: "DO YOU WANT TO PLAY NOW?" I$:I$"Y"200 I$"N"1999 190 2000" ""4 X(1)Y(0),85F X(5)Y(0),74Y X(1)Y(21),73l X(5)Y(21),75 I120:X(1)Y(I),64 X(5)Y(I),64:I X(4)Y(0),93:X(4)Y(21),93 X(3)Y(0),93:X(3)Y(21),93 "X(2)Y(0),93:X(2)Y(21),93,I2639:X(0)Y(I),160:I<6I024:X(I)Y(39),160:IY@I2638:X(23)Y(I),206pJX(24)Y(I),207:ITX(23)Y(26),233:X(23)Y(39),232^X(1)Y(35),95:X(1)Y(36),223hX(2)Y(36),95:X(2)Y(37),223rX(3)Y(37),95:X(3)Y(38),223!|X(4)Y(38),95:X(1)Y(28),66CX(2)Y(28),66:X(3)Y(28),66XX(24)Y(39),207" LETTERS GUESSED" ""2050:2200:22603000:3010:30203030:3040:305030503060:10)"HANGMAN" I13000:I&&10)" ":2300K0LG$(26),W$(50),WU%(50):LM$(12)a:I049:W$(I):IyDI049:WU%(I)0:INS10:S20:FL0X I025:LG$(I)" ":I]WR0:NC0:3140bW((1)50):WU%(W)1610cNWNW1dNW50620g"YOU TRIED ";NW;"WORDS":5h:"YOU GUESSED";NR;"OF THEM"gi"AND HUNG THE POOR FELLOW";NH;"TIMES";"":mjlWU%(W)1:NL(W$(W)):""vI1NL:" ";:I:{N1I111:LM$(I)"":I "GUESS A LETTER? ";L$:FL0:L$"A"660 L$0L$"Z"660<I025PLG$(I)L$689YFL1c7300jIxFL1650NN1I1NLL$(W$(W),I,1)740LM$(I)L$ FL1ILG$(N)L$FL11050WRWR1:"SORRY, THAT LETTER "9 "IS NOT IN THIS WORD":C3200sWR800,810,820,830,840,850,860,870,880,890|650 "YOU GET A HEAD":7000:2050:3070:3140:*"HERE'S THE BODY.":7000:2200:3070:3140:4"NOW HIS FIRST LEG":7000:2260:3070:3140:>>"SECOND LEG!":7000:3000:3070:3140:tH"THIS GETS YOU AN ARM":7000:3030:3070:3140:R"THE OTHER ARM...":7000:3040:3070:3140:\"OH NO! A FOOT!":7000:3010:3070:3140: f"HEY, DON'T HANG ME!!":7000:3020:3070:3140:Dp"A HAND--ONLY ONE LEFT":7000:3050:3070:3140:|z"AAARGH! I'M HUNG!":7000:NHNH1:3060:3070:9007100:7200:"";:I120:" ";:I:"";:I120:" ";:I:"";:I120:" ";:I:"";:I120:" ";:I3140:2300:6001:"THAT'S A GOOD ONE!"M$"HERE'S WHERE IT GOES"h.7000:3070:3140:FL0t8I0NLBLM$(I)""FL1GI:FL11150L"":"GOT IT IN ";N1;"GUESSES!"QNRNR1VI11500:I`I021:X(9)Y(I),32:IjI019:X(11)Y(I),32:I0t2300:7200:600J~3220:3140:FL1650T1100_"END"evX(24),Y(39)J1024I024:X(I)J:JJ40:II039:Y(I)I:II2729:X(4)Y(I),99:I! X(4)Y(26),78:X(7)Y(30),78 \X(4)Y(30),77:X(7)Y(26),77  X(5)Y(25),118:X(6)Y(25),103:X(5)Y(31),117*X(6)Y(31),101:X(8)Y(27),99:X(8)Y(29),994X(5)Y(27),81:X(5)Y(29),81:X(6)Y(28),87 9>X(7)Y(27),74:X(7)Y(28),64:X(7)Y(29),75]X(8)Y(28),224  I914:J2630X(I)Y(J),224:J:IX(9)Y(28),150:I1012X(I)Y(28),218:II2630:X(13)Y(I),226:I2I2627:J1518:X(J)Y(I),102:J:IxI2630:X(14)Y(I),102:I ~I419:J2531:X(I)Y(J),32:J:I: I2930:J1518:X(J)Y(I),102:J:I:  X(18)Y(25),111:X(19)Y(25),226:X(19)Y(26),226$ X(19)Y(27),226:W I2931:X(19)Y(I),226:X(18)Y(31),111:I: I1013:X(I)Y(25),231:I:X(9)Y(25),233: I1013:X(I)Y(31),229:I:X(9)Y(31),223: X(14)Y(25),81: X(14)Y(31),81: ""; I09:LG$(I);" ";:I:6 "";:I1019:" ";LG$(I);:I:[ "";:I2025:LG$(I);" ";:I:& "":I1NL:" ";LM$(I);:I:: D I021:X(14)Y(I),32:X(16)Y(I),32:X(17)Y(I),32I X(10)Y(I),32:IN 3200X  I021:X(19)Y(I),32:I  7 ::::"GUESS THE WORD?":FL0:"";C I1NLc I$:I$" "FL1:INL:3275t I$"A"3240 I$"Z"3240 I$(W$(W),I,1)FL1 " ";I$; I p600XPS11000:PS: 1251,43:1253,43:1331,85:1332,64:1333,73(7000: h "";"THE WORD WAS ";"";W$(W);"":7000*"";"...ANOTHER WORD?"/I$4I$"Y""";" ":>I$"N""";"OK.....THANKS FOR THE GAME!";"":615H72153"";" ALREADY PICKED ";L$:7000:3140:R' NICODEMUS,ASCENDED,RABBIo$' PERISH,PHARISEE,VERILY.'COMPASSION,FAIN,FAMINE8'SWINE,JESUS,LUKEB'JOHN,BIBLE,LOVEL'FORGIVENESS,GOD,SPIRITV'PROMISES,ROMANS,LIFE `'MASTER,TEACHER,RULER j'FAITHFUL,SERVE,PAUL7 t'MATTHEW,MARK,CUBITT ~'STRENGTH,SERVICE,FOLLOWn 'PEACE,PRESENCE,TRUTH 'SHARE,ACTS,APOLLOS 'CORINTH,EPHESUS,ROME 'PETER,APOSTLES,DISCIPLE 'COMMANDMENT,FORSAKE,BELIEVE 'SALVATION,LORD$