Transcription
emnmmtsmsComputer Fun for the Whole FamilyFor the:Timex/Sinclair Radio Shack 7RS-80 Texas Instruments 77-99 Plus suggestionsFor adapting toother computersj.smnACB TBODKSDenver, Colorado
Software LicenseAll rights reserved. Non-exclusive license is hereby granted for use ofthe games in this book on reader's computer. Reproduction ofsoftware by photocopying, on cassette tape, diskette, ROM. etc, forsale or for use by others, is prohibited. No liability is assumed withrespect to the use of the information given here. k bMTBOOKSA division of Accent Publications, Inc.12100 W. Sixth AvenueP.O. Box 15337Denver, Colorado 80215Copyright 1984 Accent Publications Inc.Printed in the United States of AmericaAll rights reserved. No portion of this book may be reproduced inany form without the written permission of the publishers, with theexception of brief excerpts in magazine reviews.Library of Congress Catalog Number 83-091269ISBN 0-89636-126-8
This book isdedicatedto the glory of Godand to the spiritual growthof those who read it.God is the Creator of the laws of technology bywhich computers run. Man has made progress in thefield of computers only by the discovery of andobedience to these laws of God.God requires us to be good stewards of all that Hehas given to us, including computer technology. Wehave shown good stewardship with the computer insuch fields as medicine, communications, etc. Thepurpose of this book is to encourage Christians togrow spiritually through the enjoyment ofcomputerized Bible lessons and games.J. Conrod
The games in this book are ready for typing directlyinto the following computers:Timex/Sinclair Texas Instruments TI99 Radio Shack TRS80 In addition, suggestions are given for converting thegames to several other computers, such as Apple ,Commodore , Commodore VIC 20 , Franklin Ace1000 , Coleco Adam , and others using MBASIC language.Timex/Sinclair is the trademark of The Timex Computer Corporation and Sinclair Research LTD.TI99 is the trademark of Texas Instruments, Inc.TRS80 is the trademark of the Tandy Corporation.
ContentsCHARACTERISTICSof the Three Computers FeaturedCONVERTING PROGRAMS—Basic Language and910EquivalentsBIBLE STORY GAMES13The Elephants Are Coming to Noah's Ark 13Noah's Ark—Timex/Sinclair15Noah's Ark—Texas Instruments T19916TRS-80 Master Program—For All the BibleStory Games 20Noah's Ark— Radio Shack TRS8022Gathering the Heavenly Manna 24Manna from Heaven—Timex/Sinclair 25Manna from Heaven—Texas Instruments 26Manna from Heaven—Radio Shack TRS80 30Helping the Israelites Find Quail 32The Quail Game—Timex/Sinclair 34The Quail Game—Texas Instruments TI99 35The Quail Game—Radio Shack TRS80 39Helping Moses Find Water 42Moses' Rod—Timex/Sinclair 43Moses' Rod—Texas Instruments TI99 45Moses' Rod—Radio Shack TRS80 49The Amorites Are Coming 52The Exodus Game—Timex/Sinclair53The Exodus Game—Texas Instruments TI99 55The Exodus Game—Radio Shack TRS80 59
Daniel in the Lions' Den 62Daniel in the Lions' Den—Texas InstrumentsTI9963Daniel in the Lions' Den—Radio Shack TRS80The Mansions in Heaven Adventure7073Heavenly Mansions—Timex/Sinclair 75Heavenly Mansions—Texas Instruments TI99 76Heavenly Mansions—Radio Shack TRS80 82The Great Commission Number Game 84Church Growth Game—Timex/Sinclair 85Church Growth Game— TexasInstruments TI99 87Church Growth Game—Radio Shack TRS8092Be Prepared for the Rapture 93The Rapture Game—Timex/Sinclair 95The Rapture Game—Texas Instruments TI99 %The Rapture Game—Radio Shack TRS80 100BIBLE BOOKS SCRAMBLE GAMES103Bible Books Scramble Games—Timex/SinclairOld Testament Scramble Game IOld Testament Scramble Game IIOld Testament Scramble Game IIINew Testament Scramble Game INew Testament Scramble Game II104105107108109Bible Books Scramble GamesTexas Instruments TI99Old Testament Bible Books Game 110New Testament Books Game 114
Bible Books Scramble Game—RadioShack TRS80 118BIBLE PEOPLE, PLACES AND WORDSSCRAMBLE GAMES -123Bible Characters Scramble Games—Timex/SinclairBible Characters Scramble Game I 124Bible Characters Scramble Game II 125Bible Characters of the Old Testament 127Bible Characters of the New Testament128Bible Characters Scramble GamesTexas Instruments TI99Old Testament Personalities Game 130New Testament Personalities Game 133Bible Characters Scramble GameRadio Shack TRS80 135Bible Locations Scramble Game—Timex/Sinclair139Bible Geography Game—Texas Instruments TI99141Bible Locations Scramble—Radio Shack TRS80143Bible Vocabulary Scramble Games—Timex/SinclairBible Vocabulary Scramble Game I 147Bible Vocabulary Scramble Game II 149Bible Vocabulary Scramble Game III 150Bible Vocabulary Scramble Game IV 152Bible Vocabulary Scramble Game V 153Bible Vocabulary Scramble Game VI 155
Bible Vocabulary Scramble GamesTexas Instruments TI99Bible Vocabulary Game IBible Vocabulary Game II156159Bible Words Scramble Games—Radio Shack TRS80Old Testament Books Scramble 162New Testament Books Scramble 166Bible Word Scramble 170Two Player Bible Words Scramble 174BIBLE MEMORY VERSES178Bible Memory Verses—Timex/SinclairOld Testament Bible Memory Verses 178New Testament Bible Memory Verses 180Bible Memory Verses—Texas Instruments TI99Old Testament Bible Memory Verses 181New Testament Bible Memory Verses 184Bible Memory Verses—Radio Shack TRS80Old Testament Bible Memory Verses 187New Testament Bible Memory Verses 190
CHARACTERISTICSOF THE THREE COMPUTERS FEATUREDTIMEX/SINCLAIR COMPUTERThis is probably the easiest computer to program. Thereare three fundamental differences in the way the Timex/Sinclair computer runs a computer program and the wayother computers work. The first difference is that when youbegin a game by typing "RUN," the Timex/Sinclaircomputer automatically clears the video screen. Whenadapting the program to another computer, it is thereforenecessary to add an opening statement to the adapted gameto first clear the screen.The second difference is that the Timex/Sinclair computerautomatically prints "INPUT' prompts at the bottom of thevideo screen, leaving the game board undisturbed On othercomputers it is necessary to add a "PRINT AT' statementbefore the "INPUT' statement, or to print instructionsbefore drawing the game boardThe third difference is that the Timex/Sinclair computerprints at a specific location on the screen with the instruction PRINT AT V,H;"." Other computers use differentinstructions. This difference, as well as other minorlanguage differences, are addressed under "Basic Languageand Equivalents," page 10.TEXAS INSTRUMENTS TI99 COMPUTERPrograms for this computer add color and sound to thegames. The unique characteristic of the Texas InstumentsTI99 is its use of the instruction "CALL" as in "CALL KEY"and "CALL HCHAR"RADIO SHACK TRS80 COMPUTERPrograms for this computer not only add color, but also
include a joystick for movement on several of the gameboards given the programs. The programs for this TRS-80have been written in such a way that several games can beprogrammed into the computer at the same time. Thesealternatives have been written into the programming to giveyou more variety and also to challenge you to learn moreabout programming and to be creative in expanding thegames yourself. See "TRS Master Program," page 20.PROGRAMS GIVEN FOR EACH GAME ARE READYTO BE TYPED INTO EACH OF THE THREECOMPUTERS FEATURED.Converting ProgramsBASIC LANGUAGE AND EQUIVALENTSCLEAR—This instruction clears all variables back to zero.It is used in most computers. Texas Instruments and someother computers clear variables with the following:A B C D 0, (etc).CLS—clears the video screen. Texas Instruments, however,uses "CALL CLEAR" Most computers will also clear thescreen with the following: FOR 1 1 TO 40:PRINT:NEXT I.DIM A(10,10)—allows for A to exist as 100 differentsubscripts.FAST—speeds up the computer. Only needed for Timex/Sinclair computers.FOR 1 1 TO 10—repeats all instructions 10 times betweenthis instruction and a NEXT I instruction.10
GOSUB 240—goes to the instructions beginning at line 240and returns to original location upon a RETURN instruction.GOTO 240—goes to the instructions beginning at line 240and does not return.IF A l THEN GOTO40—only if the value of A equals 1will the computer go to line 40.IF CHR (PEEK(17656) "A" THEN GOTO 240-checksa location in the memorythat corresponds to a location onthe screen. If the memory has an "A" the computer willcontinue with line instruction 240. The Radio Shackcomputer uses IF POINT (H,V) -1 THEN 240 as acomparable type instruction. An alternate solution is toassign a subscripted value to the screen position. Forexample: IF A(H,V) 1 THEN 240.INPUT A—the computerwaits for the player to type in anumerical value for A.INPUT A —the computer waits for the player to type in astring that will become A .LET A 0—sets A equal to zero. Not necessary in mostother computers unless A previously was given a value.Mostother computers consider"LET' an option using only"A 0."LET R (RND*9) 1—picks a random value for R from 1to 9. Radio Shack uses R RND(10).Commodore uses R INT(RND(0)*9). The INT keeps therandom a whole number.Texas Instruments uses R INT(RND(1)*9) 1.LET D INKEY —the computer will assign to D whatever key is pressed on the keyboard. The "ENTER" button11
does not need to be pushed. The Texas Instrumentscomputer requires the following three statements: 10CALLKEY(0,K,S) 20 IF S 0 THEN 10 30 D CHR (K).Atari, Commodore, Apple, Franklin Ace 1000 and ColecoAdam use "GET D ."ON A GOTO 100,200,300—if the value of A is 1 thecomputer will continue with instruction line 100, if A 2then it will continue with line 200, etc.PRINT CHR (63)—the computer will print the characterwhose ASCII value is 63. Most computers assign to thequestion mark (?) the ASCII number 63.PRINT AT V,H;"T— the computer will print a "T" at thescreen location with the horizontal position whose value is"H" and whose vertical position is "V."The Radio Shack requires the following: PRINT (V*32 H)"T."The Texas Instruments computer requires:CALLHCHAR(V,H,84,1), the ASCII value of "Toeing 84.The Apple, Franklin Ace 1000, and Coleco Adam requiretwo instructions: HTAB H and VTAB V.The Commodore requires the following: FOR 1 1 TOH:PRINTCHR (29):NEXT I:FOR1 1 TO V:PRINTCHR (17):NEXT LPRINT "T."For computers that use MBASIC from the MicrosoftCorporation, the following instruction is needed: PRINTCHR (27);" ";CHR (V 32);CHR (H 32);"T."Atari uses: POSITION H,V.REM—to keep the line in the program. Anything typedafter the "REM" is ignoredSLOW—slows the computer back down after using theFAST statement Needed only for Timex/Sinclair.12
Bible Story GamesThe Bible story games in thissection usegraphic layoutsas game boards.Some ofthe games require moving a player figure arounda game layout This movement can be accomplished in twoways: either bythe use of the keyboard letters, pressing "N"to move north, "S" to move south, "E" for east and "W" forwest The second way to move is with a joystick. The gameswith movement depend on dexterity and coordination.Other games are games of logic, they require you tooutthink the computer.These Bible story games can be enjoyed by all ages,beginning with the ability to read.The ElephantsAre Coming to Noah's ArkNoah was commanded by God to take two of every kindof animal into the ark, as we read in Genesis 6. Chapter 7adds additional animals if they are clean. Althoughelephants aren't named, they very likely were includedAlthough this game has ten elephants starting for the ark,and only two reaching it it isn't likely that the animals competed to be the chosen two. God guided two of every kind tocome to the ark.The purpose of this game, however, is to remember thatGod has promised never again to flood the world, but Hestill hates wickedness and wants us to live righteouslives.13
HOW THE GAME PLAYSAfter loading the game into the computer, to play thegame you must type the word "RUN" and again press the"ENTER/RETURN" button.According to the Bible story, two of every type animalcame to the ark. This game begins with ten elephants-thatare numbered 1 to 10.The computer will ask you to choosethe two elephants you think are the twothat will come to theark. You must type in a number from 1 to 10 and press the"ENTER" button. The computer will then ask you tochoose a second number from 1 to 10.You must now type ina second number from 1 to 10 and press the "ENTER"button again.12345678910 . . ./XX?/XX?/XX?./XX?/XX?/XX?/XX?/XX?/XX?/XX?The computer will then draw a field of 10 elephants andwill randomly move them one space at a time across thescreen. The two elephants that make it across the screenfirst are the ones who make it to Noah's ark. The object ofthe game is to guess at least one of the elephants correctly. Ifyou guess them both correctly you are a fantastic guesser!14
NOAH'S ARKTimex/Sinclair TYPE THE FOLLOWING INTO YOUR COMPUTER:(Press "ENTER" after each line is typed.)10 PRINT AT 8,10;"NOAH'S ARK"20 PRINT "GUESS WHICH 2 ELEPHANTS WILLGET TO THE ARK (1-10)"30 INPUT G40 IF G 10 THEN GOTO 3050 PRINT AT 21,0;G;" 2ND GUESS?"60 INPUT F70 IF F G OR F 10 THEN GOTO 6080 CLS90 PRINT AT 21,0;"ELEPHANTSHERE COME THE"100 DIM E(13)110 FOR V l TO 10120 PRINT AT V*2-1,E(V);"./XX?"130 IF E(V) 0 THEN PRINT AT V*2-1,0;V140 IF E(V) 0 THEN NEXT V150 IF E(V) 2 THEN PRINT AT 21,0;" COME ON ";G;" COME ON ";F;"160 IF E(V) 26 AND (F V OR G V) THEN LETE(12) V170 IF E(l1) 2AND E(12) 0 AND E(13) 0 THEN PRINTAT 21,0;"YOU WERE RIGHTON NO. ";E(13)180 IF E(l 1) 2 AND E(13) 0 AND E(12) 0 THENPRINT AT 21,0;"YOU WERE RIGHTON NO. ";E(12)190 IF E(l 1) 2 AND E(12) 0 AND E(13) 0 THENPRINT AT 21,0;"YOU WERE RIGHT ON BOTH ";G;"AND ";F200 IF E(ll) 2 AND E(12) 0 AND E(13) 0 THENPRINT AT 21,0;"YOU WERE WRONG ONBOTH ";G;" AND ";F210 LET V INT (RND*10) 115
220230240250260270IF E(V) 26 THEN GOTO 210LET E(V) E(V) 2IF E(ll) 2 THEN GOTO 240IF E(12) 0 THEN LET E(13) E(12)LET E(12) 0IF E(V) 26 THEN LET E(11) E(11) 1280 GOTO 120NOAH'S ARKTexas Instruments TI99 TYPE THE FOLLOWING INTO YOUR COMPUTER:(Press "ENTER" after each line is typed.)10 CALL CLEAR20 CALL SCREEN(14)30 PRINT " BIBLE COMPUTER GAMES BY'40 PRINT50 PRINT "ACCENT PUBLICATIONS"60 FOR 1 1 TO 670 PRINT80 NEXT I90 PRINT " USER AGREES NOT TO COPY'100 PRINT " THIS SOFTWARE EXCEPT AS";110 PRINT " PERMITTED IN THE SOFT- ";120 PRINT " WARE LICENSE ON PAGE 2 ";130 FOR 1 1 TO 6140 PRINT150 NEXT I160170180190DIM E(13)E(13) 0PRINT "PRESS ANY KEY TO BEGIN"CALL KEY(0,K,S)200 XX XX 1016
210220230240IF S 0 THEN 190XX XX KCALL CLEARGOTO 620250 C 63260 GOSUB 540270 C 32280 CALL KEY(0,K,S)290300310320330IF S 0 THEN 250K K-48IF K 0 THEN 250IF K 9 THEN 250RETURN340 CALL SOUND(100,294,2)350360370380390RETURNGOSUB 540C 62GOSUB 540C 32400 CALL KEY(0,K,S)410 IF S 0 THEN 360420430440450460470480490500K K-64IF K 1 THEN 360IF K 26 THEN 360RETURNC 46GOSUB 600H H 1C 47GOSUB 600510 H H 1520 C 120530 GOSUB 600540 H H 1550 GOSUB 600560 H H 1570 C 6317
580 GOSUB 600590 RETURN600 CALL HCHAR(V,H,C,1)610 RETURN620 PRINT "ACCENT PUBLICATIONS"630 FOR 1 1 TO 5640 PRINT650 NEXT I660 PRINT "670680690700NOAH'S ARK"FOR P l TO 11PRINTNEXT PRANDOMIZE XX710 PRINT " GUESS WHICH 2 ELEPHANTS"720 PRINT " WILL GET TO THE ARK (0-9)"730 INPUT G740 IF G 9 THEN 730750 IF G 0 THEN 730760 PRINT "2ND ELEPHANT? (0 TO 9)"770 INPUT F780790800810IF F 9 THEN 770IF F 0 THEN 770IF F G THEN 770CALL CLEAR820 CALL COLOR(2,2,15)830 CALL SCREEN(13)840 PRINT " HERE COME THE ELEPHANTS'850 PRINT " COME ON";G;"COME ON";F860 FOR 1 0 TO 9870 E(I) 3880 H E(I)890 V I*2 1900 GOSUB 460910 IF E(I) 3 THEN 1000920 C V/2 47930 H 3940 GOSUB 60018
950 C 94960 H 29970 V V 1980 GOSUB 600990 NEXT I1000101010201030IF E(I) 25 THEN 1050I INT(RND*10)IF E(I) 25 THEN 1010E(I) E(I) 11040 GOTO 8801050 E(11) I1060 GOSUB 3401070108010901100E(13) E(13)-r-lIF E(13) 2 THEN 1120E(12) E(11)E(11) 01110 GOTO 10101120 PRINT E(ll);"AND";E(12);"WON!";1130 FOR 1 1 TO 10001140 NEXT I1150 CALL CLEAR1160 CALL COLOR(2,2,14)1170 PRINT "PRESS Y TO PLAY AGAIN'1180 PRINT "PRESS 1190 CALL KEY(0,K,S)TO QUIT'1200 IF K 89 THEN 101210 IF K 78 THEN 11901220 END19
TRS-80 MASTER PROGRAMFor All the Bible Story GamesTYPE THE FOLLOWING INTO YOUR COMPUTER:(Press "ENTER" after each line is typed.)102050607080CLS3:PRINT@100,tt BIBLE COMPUTER GAMES BYPRINT 162," ACCENT NT@354,"USER AGREES NOT TO COPY';THIS SOFTWARE EXCEPT AS ";PERMITTED IN THE SOFT";WARE LICENSE ON PAGE 2";90 GOSUB200100 GOTO270200 FORH 0TO63202 SET(H,0,1)204 SET(H,31,1)205 IFG O"'THEN210206 SOUNDH*3 l,l210 NEXT230 FORN 0TO31240 SET(0,N,1)250 SET(63,N,1)252 IFG " "THEN260256 SOUNDN*5 l,l260 NEXT262 RETURN270 PRINT 34,"BIBLE COMPUTER GAMES ";280 N 98290 PRINT@N," #GAME PROGRAM NAME";310 PRINT 162," 1 NOAH'S ARK312 PRINT 194," 2 MANNA FROM HEAVENMOSES' RODTHE EXODUS GAME";";";";";DANIEL & THE LIONS";300 N-162314 PRINT@226," 3 THE QUAIL GAME316 PRINT@258," 4318 PRINT@290," 5320 PRINT@322" 620
322 PRINT@354," 7 HEAVENLYMANSIONS324 PRINT@ 386," 8 CHURCH GROWTH GAME326 PRINT@418," 9 THE RAPTURE GAME";";";328 CLEAR330 G INKEY 332 TD 200334 GOSUB400336 PRINT@450,"338 GOSUB400340 PRINT@450," INPUT GAME CHOICE NUMBER";342 GOSUB400344 IFG ""THEN330346 SOUND170,1348350352354356360370380382390IFG "1"THEN3000IFG "2"THEN7000IFG "3"THEN1000IFG "4"THEN2000IFG "5"THEN6000IFG "6"THEN9000IFG "7"THEN5000IFG "8"THEN4000IFG "9"THEN8000GOTO330400 FORI lTOTD:NEXT:RETURN500 D "":PK PEEK(65280)510520530540IFJOYSTK(0) 60THEND "E''IFJOYSTK(0) 3THEND "WIFJOYSTK(l) 3THEND "N"IFJOYSTK(1) 60THEND "S"550 IFPK 1260RPK 254THEND "X"560 RETURN900 PRINT@481,"DO YOU WANT TO PLAYAGAIN? ";902 TD 200:GOSUB400904 PRINT@481," do you want to playagain?";906 GOSUB400:Q INKEY 21
908 IFQ "N"THEN10910 IFQ "YTHEN920912 GOSUB500914 IFD "XTHEN920916 IFD "S"THEN10918920930940950GOTO900IFG "4"THEN2060IFG "8"THEN4070IFG "7"THEN5062IFG "5"THEN6058960 IFG "2"THENCLS3:N 0:GOTO7070970 IFG "9"THEN8070980 IFG "6"THEN CLS8:GOTO9032990 GOT0346NOAH'S ARKRadio Shack TRS-80 TYPE THE FOLLOWING INTO YOUR COMPUTER:(Press "ENTER" after each line is typed.)(See page 20 for lines 10-990.)3000 CLS3:GOSUB200:PRINT@41," NOAH'SARK";3020 PRINT@96," TEN ELEPHANTS ARETRYING TO"3022 PRINT' GET TO THE ARK GUESSWHICH"30243028303030403050PRINT@160," ":PRINT@160," ";INPUT4 TWO WILL MAKE IT (1—10)";GIFG lORG 10THEN3020ELSESOUND128,lPRINT@224," ":PRINT@224," ";INPUT' 2ND ELEPHANT? (1-10)";F.22
3060 IFF G THEN3040ELSEIFF 10ORF lTHEN30403070 SOUND128,l:CLS33090 PRINT@448," HERE COME THEELEPHANTS"3100 IFD3 1THEN3110ELSEDIME(13):D3 13110 PRINT@0," ":PRINT@352," ":FORV lTO103112312031223124PRINT V*32 E(V)," "PRINT V*32 E(V) 3,"./";SOUND(25*V l),lPRINTCHR (137)CHR (134);"?";3130 PRINT@V*32,V;3140 IFE(V) OTHENNEXTV3150 IFE(V)O2THEN31603152 PRINT@448," COME ON";F;"COME ON";G3160 IFE(V) 24 AND (F V OR G V)THENE(12) V3170 IFE(11) 2THEN33003210 V RND(10):IFE(V) 24THEN3210ELSEE(V) E(V) 13250 IFE(12)O0THENE(13) E(12):E(12) 03270 IFE(V) 24THENE(11) E(11) 13280 GOTO31203300 IFE(12) 0 ANDE(13) 0 THENPRINT@448," YOU GUESSED RIGHT ON NO.";E(13)3310 IFE(13) 0 ANDE(12) 0 THENPRINT@448," YOU GUESSED RIGHT ON NO.";E(12)3320 IFE(12) 0 ANDE(13) 0 THENPRINT@448," YOU GUESSED RIGHT ON";G;"AND";F3330 IFE(12) 0 ANDE(13) 0 THENPRINT@448," YOU GUESSED WRONG ON";G;"AND";F3340 FORV lTO13:E(V) 0:NEXT:F 0:GOTO90023
Gathering the Heavenly MannaIn the wilderness God provided manna as the Israelites'daily food. In Exodus 16 they were told to go and gatherenough manna for each day, except that on the sixth daythey were to gathertwice as much becausethe next day wasthe Sabbath and on the Sabbath they were to restThe purpose of this game is to try to catch as muchmanna asyou canbefore the sun sets. It shows us ourGod'sfaithfulness in caring about our daily needs.HOW THE GAME PLAYSAfter loading the game into the computer, to play thegame you must type the word "RUN" and press the"ENTER/RETURN" button.The computer will tell you to catch as much manna asyou can beforethe sun sets. It will print a reminderthat youmust press the letter "L" to moveyourbucketto the left andyou must press the letter"R" to movethe bucketto the rightThe computer will then ask you if you are ready to beginplaying. To start the manna falling, press the letter "Y."'24
The computer will draw a gameboard with a line at thetop of the screen to represent the coming darkness causedby the setting sua At the bottom of screen, in the center, thecomputer will print a "IT to represent the basket that youmust move to catch the manna as it falls. The computer willthen "drop" a piece of manna (0) from a random position.Before it reaches the bottom of the screen you must movethe basket to a position directly under the manna in orderto catch it Each time some manna falls, the skyline willlower and the distance the manna has to fall will be shorter.The object of the game is to be the player who catches themost manna before the sun sets and the Sabbath begins.MANNA FROM HEAVENTimex/Sinclair TYPE THE FOLLOWING INTO YOUR COMPUTER:(Press "ENTER" after each line is typed.)10 PRINT AT 8,6;"MANNA FROM HEAVEN"20 PRINT "TRY TO CATCH AS MUCH MANNA ASPOSSIBLE BEFORE THE SUN SETS"30 PRINT "PRESS L FOR LEFT, R FOR RIGHT'40 PRINT "ARE YOU READY TO BEGIN?"50 LET A INKEYS60 IF A "Y" THEN GOTO 5070 CLS80 LET N 090 LET S 0100 LET C 15110 LET V N120 LET H INT (RND*(30-V*5/4) V/2 l)130 PRINT AT V,H;"0"140 IF V 20 THEN GOTO 25025
150160170180LET A INKEY IF A "R" THEN LET C C 1IF A "L" THEN LET C C-1IF C 31 THEN LET C 30190 IF C 0 THEN LET C l200 PRINT AT 20,C-1;" U "210 PRINT AT 21,0;"220 PRINT AT V,H;" "230 LET V V 1240 GOTO 130250 IF CO H THEN PRINT AT 21,8;"YOU MISSED IT'260 IF C H THEN PRINT AT 21,8;"YOU CAUGHT IT'270 IF C H THEN LET S S 1280 FOR 1 0 TO 31290 PRINT AT N,I;"#"300 NEXT I310 LET N N 1320 IF NO20 THEN GOTO 110330 PRINT AT 20,2;"YOU CAUGHT ";S;" PIECESOF MANNA"340 PRINT " YOU MISSED ";20-S;" PIECES OFMANNA"350 GOTO 350MANNA FROM HEAVENTexas Instruments TI99 TYPE THE FOLLOWING INTO YOUR COMPUTER:(Press "ENTER" after each line is typed.)10 CALL CLEAR20 CALL SCREEN(11)30 PRINT " BIBLE COMPUTER GAMES BY'26'
40 PRINT50 PRINT "ACCENT PUBLICATIONS"60 FOR 1 1 TO 670 PRINT80 NEXT I90 PRINT " USER AGREES NOT TO COPY"100 PRINT " THIS SOFTWARE EXCEPT AS"110 PRINT " PERMITTED IN THE SOFT120 PRINT " WARE LICENSE ON PAGE 2130 FOR 1 1 TO 6140 PRINT150 NEXT I160 DIM A(10,10)170 PRINT "PRESS ANY KEY TO BEGIN"180 CALL KEY(0,K,S)190200210220230XX XX 10IF S 0 THEN 180XX XX KCALL CLEARGOTO 550240 RETURN250 CALL KEY(0,K,S)260270280290300310320IF K 83 THEN 320IF K 68 THEN 350RETURND 3RETURNGOTO 250D D-1330 IF D 3 THEN 290340350360370380390RETURND D 1IF D 28 THEN 380RETURND 28RETURN400 CALL SOUND(100,294,2)410 SC SC 127
420430440450460GO TO 1120GOSUB 530C 62GOSUB 530C 32470 CALL KEY(0,K,S)480490500510520IF S 0 THEN 430K K-64IF K 1 THEN 430IF K 26 THEN 430RETURN530 CALL HCHAR(V,H,C,1)540 RETURN550 PRINT "ACCENT PUBLICATIONS"560 FOR 1 1 TO 5570 PRINT580 NEXT I590600610620630640PRINT "MANNA FROM HEAVEN"FOR P l TO 11PRINTNEXT PRANDOMIZE XXPRINT " CATCH AS MUCH MANNA AS YOU"650 PRINT " CAN BEFORE THE SUN SETS &"660 PRINT " THE SABBATH BEGINS"670 PRINT " PRESS ANY KEY TO BEGIN"680 CALL KEY(0,K,S)690 IF S 0 THEN 680700 CALL CLEAR710 CALL SCREEN(8)720 PRINT " USE S & D TO MOVE BASKET'730 D 15740 N l:750 V 22760 H D770 C 85780 GOSUB 53028
790 VM N 1800 HM INT(RND*(28-N) N-1)810 IF HM 28 THEN 830820 HM 28830840850860870880890900910920IF HM 3 THEN 850HM 3H HMV VMIF V 2 THEN 920V V-1C 32GOSUB 530V V 1C 48.930 GOSUB 530940 IF VM 22 THEN 1110950 H 16960 V 23970 DB D980 GOSUB 250990 H DB1000 V 221010 C 321020 GOSUB 5301030 H D1040 GOSUB 5301050 H D1060 V 221070 C 851080 GOSUB 5301090 VM VM 11100 GOTO 8301110 IF D HM THEN 4001120 FOR H l TO 321130 V N1140 C 30 1150 GOSUB 53029
1160 NEXT H1170 N N 11180 IF N 10 THEN 7501190 CALL SCREEN(6)1200 IF N 22 THEN 7501210 CALL SCREEN(5)1220 PRINT " YOU CAUGHT';SC;"PIECES OF'1230 PRINT " MANNA AND MISSED";20-SC;.1240 FOR 1 1 TO 40001250 NEXT I1260 SC 01270 CALL CLEAR1280 PRINT "PRESS 'Y TO PLAY AGAIN"1290 PRINT "PRESS 'K TO QUIT'1300 CALL KEY(0,K,S)1310 IF K 89 THEN 101320 IF K 78 THEN 13001330 ENDMANNA FROM HEAVENRadio Shack TRS-80 TYPE THE FOLLOWING INTO YOUR COMPUTER:(Press "ENTER" after each line is typed.)(See page 20 for lines 10-990.)7000 CLS3:GOSUB2007010 PRINT@38," MANNA FROM HEAVEN ";7020 PRINT@96," TRY TO CATCH AS MUCHMANNA AS"7022 PRINT' POSSIBLE BY MOVING THE BASKET'7024 PRINT' TO THE EAST (E) OR WEST (W)."7028 PRINT' WHEN THE SUN SETS THE SABBATH"30
7030 PRINT' WILL BEGIN AND THE GAME ENDS."7032 N 0:TD 200:GOSUB4007038 PRINT@352" WILL YOU BE USING AJOYSTICK?"7040 GOSUB400:A INKEY 7060 IFA O"Y"ANDA O"N"THEN70327070 CLS3:C 167110 V N7120 H (RND(INT((15-V*5/4) V/2))*2)7122 IFH 28THENH 287124 IFH 2 THENH 27130 PRINT@V*32 H,uO";7140 IFV 15THEN72507142 IFA "N"THENB INKEY 7144 IFA "Y"THENB ""7150 IFAS 'r'ANDJOYSTK OTHENBS 'W7152 IFA "Y"AND JOYSTK(0) 61THENB "E"7160717071807190IFB "E"THENC C 2IFB "WTHENC C-2IFC 28THENC 2IFC 2THENC 287192 PRINT@482,"7200 PRINT@480 C,"IT;7220 PRINT@V*32 H,CHR (175);7230 V V l:SOUNDV*10 10,2:GOTO71307250 IFC H THENPRINT@8" YOU CAUGHT IT ";7252 IFC H THENSOUND180,57254 IFCOH THENSOUND5,57260 IFCOH THENPRINT@8," YOU MISSED IT! "7262 TD 1000:GOSUB400:FORI 8TO237268 PRINT@I,CHR (128);7270 NEXTI:IFC H THENS S 17280 FOR I 0TO317290 PRINT@N*32 I,CHR (128);7300 NEXTI:N N 1:IFN 15THEN71 lOELSECLSO7330 PRINT 192,"YOU CAUGHT';S;"PIECES OFTHE"31
7340 PRINT'MANNA AND MISSED";15-S;"PIECES"7350 N 0:S 0:GOTO900Helping the IsraelitesFind QuailWhen God directed Moses to lead the children of Israelout of Egypt to take them to the promised land, they firsthad to cross the wilderness.God used the time spent in the wilderness to teach Hispeople that they should depend on Him for all their needs.Since they had been slaves in Egypt for so long, dependingon human masters for their needs, they had a very difficulttime learning to depend on the Lord.When the people became hungry in the wilderness theydid not think to stop right there and pray to God and ask forfood; instead, they complained, "Would to God we had diedby the hand of the Lord in the land of Egypt. when we dideat bread to.the full." (Exodus 16:3).In verse 13 God sentquail for them to eatHOW THE GAME PLAYSAfter loading the game into the computer, you must typethe word "RUN" and press the "ENTER/RETURN" button.The computerwill take a couple ofminutes to choose randomlocations to hide the quail.The computer then draws a field of grass in which it hasrandomly hidden the quail. It will then say, "FIND 20 HIDING QUAIL. INPUTV( 1-10)."You must now enter a verticalposition from 1 to 10 and press the "return" button. The32
computer will now ask for a horizontal position which youwill input in the same IIIIIIIIIIIIIIIIIIIIIIIII II II IIII II II II II II II II II II II II'lI II II II I12345618910If the numbers you have chosen were also the numbersthe computer had randomlychosen,the computerwillprinta "V" in the grass at the location with those coordinates. Ifthe numbers do not match, then the computer will print ablank space insteadRemember that the quails always hide in coveys of atleast 4.The object of the game is to find the quails in the leastnumber of moves.33
THE QUAIL GAMETimex/Sinclair TYPE THE FOLLOWING INTO YOUR COMPUTER:(Press "ENTER" after each line is typed.)10 FAST20 DIM A(10,10)30 LET T 040 LET A 050607080LETLETLETLETR INT (RND*9) 1S INT (RND*9) 1A(R,S) 1A(R,S 1) 190 LET A(R 1,S) 1100 LET A(R 1,S 1) 1110 FOR 1 1 TO 10120 FOR J l TO 10130 IF A(IJ) 1 THEN LET A A 1140 NEXT J150 NEXT I160 IF A 20 THEN GOTO 40170 SLOW180 PRINT AT 12,8;"THE QUAIL GAME"190 FOR 1 1 TO 10200 FOR J 10 TO 19210 PRINT AT I,J;"#"220 NEXT .J230 NEXT I240 PRINT AT 14,5;"FIND ";A;" HIDING QUAIL"250 IF A 0 THEN PRINT "YOU FOUND THEMALL IN ";T;" TRIES"260 IF A 0 THEN GOTO 260270 PRINT "V? (1-10)280 INPUT V290 PRINT AT 15,11;V;"H? (1-10)34"
300 INPUT H310 LET T T 1320 IF A(V,H) 1 THEN PRINT AT V,H 9;"V"330 IF A(V,H) 0 THEN PRINT AT V,H 9;" "340 IF A(V,H) 2 THEN PRINT AT 15,0;"YOULOOKED THERE ALREADY"350 IF A(V,H) 1 THEN LET A A-1360 LET A(V,H) 2370 GOTO 240Note: Lines 10 and 170 may not be needed if the program isadapted for another computer.THE QUAIL GAMETexas Instruments TI99 TYPE THE FOLLOWING INTO YOUR COMPUTER:(Press "ENTER" after each line is typed.)10 CALL CLEAR20 T 030 CALL SCREEN(ll)40 CALL COLOR(2,2,3)50 CALL COLOR(l 1,9,11)60 PRINT " BIBLE COMPUTER GAMES BY"70 PRINT80 PRINT "ACCENT PUBLICATIONS"90 FOR 1 1 TO 6100 PRINT110 NEXT I120 PRINT " USER AGREES NOT TO COPY"130 PRINT " THIS SOFTWARE EXCEPT AS"140 PRINT " PERMITTED IN THE SOFT35"
150 PRINT " WARE LICENSE ON PAGE 2160 FOR 1 1 TO 6170 JPRINT180 NEXT I190 DIM A(10,10)200 PRINT " PRESS ANY KEY TO BEGIN210 CALL KEY(0,K,S)220 XX XX 10230 IF S 0 THEN 210240 XX XX K250 RANDOMIZE XX260 CALL CLEAR270 GOSUB 1010280 Q 0290 FOR 1 1 TO 4300310320330340350R INT(RND*9) 1S INT(RND*9) 1A(R,S) 1A(R 1,S) 1A(RS 1) 1A(R 1,S 1) 1360 NEXT I370 FOR 1 1 TO 10380 FOR J l TO 10390 IF A(IJ) 1 THEN 420400 Q Q 1410 GOTO 430420 A(I,J) 0430 NEXT J440 NEXT I450 IF Q 20 THEN 280460470480490500510GOSUB 1100FOR V 3 TO 12H 9C V 45GOSUB 990FOR H 10 TO 1936
520 C 47530 GOSUB 990540 NEXT H550 NEXT V560 H 13570 V 15580 C INT(Q/10) 48590 GOSUB 990600 H 14610 C 48 Q-(C-48)*10620 GOSUB 990630 IF Q 0 THEN 1200640 H 8650 V 17660 C 32670 GOSUB 990680 C 62690 GOSUB 990700 CALL KEY(0,K,S)710 IF S 0 THEN 640720 VG K-47730 IF VG 1 THEN 640740 IF VG 10 THEN 640750 V V 1760 GOSUB 990770 C 62780 GOSUB 990790 C 32800 CALL KEY(0,K,S)810 IF S 0 THEN 760820 HG K-64830 IF HG 1 THEN 760840 IF HG 10 THEN 760850 H HG 9860 V VG 2870 IF A(VG,HG) 2 THEN 920880 IF A(VG,HG) 1 THEN 130037
890 IF A(VG,HG) 1 THEN 930900 C 32910 GOTO 950920 GOTO 960930 C 86940 Q Q-1950 GOSUB 990960 T T 1970 A(VG
Other games are games of logic, they require you to outthink the computer. These Bible story games can be enjoyed by all ages, beginning with the ability to read. The Elephants Are Coming to Noah's Ark Noah wascommandedbyGod to taketwoofevery kind of animal intothe ark, aswe read in Genesis
