1 POKE53280,0:POKE53281,0:GOSUB9000 2 PRINT"[152][147]DO YOU NEED INSTRUCTIONS? Y/N":GETA$:IF A$=""THEN2 3 IFA$="Y"THENGOSUB9500 4 DIMEE(4),A$(130),D$(160),O$(26),P$(32),S(4),FF(4):K=49151:L=49261:N=54272 5 PRINT"[147][152]WHICH PUZZLE? 1/2/3":PRINT" OR":PRINT"[158]'0' TO LOAD NEW PUZZLE" 6 PRINT"[152] OR":PRINT"PRESS '4' IF NEW PUZZLE IS LOADED." 7 INPUTQ:PRINT"PLEASESTANDBY....." 8 IFQ=0ORQ>3THENGOTO9060 9 FORQQ=1TOQ 10 FORR=1TO130:READA$(R):NEXT 11 FORR=1TO160:READD$(R):NEXT 12 FORR=1TO110:READA:POKE49151+R,A:NEXT 13 FORR=1TO110:READB:POKE49261+R,B:NEXT 14 FORR=1TO26:READO$(R):NEXT 15 FORR=1TO32:READP$(R):NEXT 16 NEXTQQ 17 PRINT"[147][158]HOW MANY PLAYERS?":POKEN+24,15:GOSUB200 18 J=55555:F=J:G=J:H=J:I=J:FORR=1TO4:X(R)=55555:EE(R)=5:NEXT 19 GOSUB20:GOSUB70:GOSUB100:GOTO3000 20 PRINT"[147][152] [213][192][192][192][192][192][192][192][192][192][192][192][192][192][201]" 21 PRINT"[152] [213][192][192][192][192][192][192][201] [221][149][207][207][207][207][146]=[149][207][207][207][146]=[149][207][207][207][207][146][152][221] [213][192][192][192][192][192][192][201]" 22 PRINT"[146][152][213][192][203][129]ACROSS[152][202][192][201][221][149][207][207][207][207][146]=[149][207][207][207][146]=[149][207][207][207][207][146][152][221][213][192][203] [129]DOWN [152][202][192][201]" 23 PRINT"[146][152][171][192][192][192][192][192][192][192][192][192][192][179][221][149][207][207][207][207][207][207][146]=[149][207][207][207][207][207][207][146][152][221][171][192][192][192][192][192][192][192][192][192][192][179]" 24 PRINT"[146][221][158] [213][192][192][192][192][192][192][201] [146][152][221][221][146]===[149][207][207][207][146]=[149][207][207][207][146]===[146][152][221][221] [213][192][192][192][192][192][192][201] [146][152][221]" 25 PRINT"[146][152][221][158] [221] C [221] [146][152][221][221][149][207][207][207][207][207][207][146]=[149][207][207][207][207][207][207][146][152][221][221] [221] C [221] [146][152][221]" 26 PRINT"[146][152][221][158] [221]TRIVIA[221] [146][152][221][221][149][207][207][207][146]===[209]===[149][207][207][207][146][152][221][221] [221]TRIVIA[221] [146][152][221]" 27 PRINT"[146][152][221][158] [221] O _[192][201][221] [146][152][221][221][149][207][207][207][207][207][207][146]=[149][207][207][207][207][207][207][146][152][221][221] [221] O _[192][201][221] [146][152][221]" 28 PRINT"[146][152][221][158] [221] S^ [221][221] [146][152][221][221][146]===[149][207][207][207][146]=[149][207][207][207][146]===[146][152][221][221] [221] S^ [221][221] [146][152][221]" 29 PRINT"[146][152][221][158] [221] S[202][192][192][219][203] [146][152][221][221][149][207][207][207][207][207][207][146]=[149][207][207][207][207][207][207][146][152][221][221] [221] S[202][192][192][219][203] [146][152][221]" 30 PRINT"[146][152][221][158] [202][192][192][192][192][192][203] [146][152][221][221][149][207][207][207][207][146]=[149][207][207][207][146]=[149][207][207][207][207][146][152][221][221] [202][192][192][192][192][192][203] [146][152][221]" 31 PRINT"[146][152][173][192][192][192][192][192][192][192][192][192][192][189][221][149][207][207][207][207][146]=[149][207][207][207][146]=[149][207][207][207][207][146][152][221][173][192][192][192][192][192][192][192][192][192][192][189]" 32 PRINT"[213][192][192][192][192][192][192][192][192][192][192][192][177][192][192][192][192][192][192][192][192][192][192][192][192][192][177][192][192][192][192][192][192][192][192][192][192][192][201]" 55 PRINT"[152][221] [156][207][213][192][192][192][201][208][207][213][192][192][192][201][208][207][213][192][192][192][201][208][154][207][213][192][192][192][201][208][158][207][213][192][192][192][201][208][152][146] [221]" 60 PRINT"[152][221] [156][180][221] 1 [221][170][180][221] 2 [221][170][180][221] 3 [221][170][154][180][221] 4 [221][170][158][180][221] 5 [221][170][146][152] [221]" 65 PRINT"[152][221] [156][204][202][192][192][192][203][186][204][202][192][192][192][203][186][204][202][192][192][192][203][186][154][204][202][192][192][192][203][186][158][204][202][192][192][192][203][186][152][146] [221]" 66 PRINT"[202][192][192][192][192][192][192][192][192][192][192][192][192][192][178][192][192][192][192][192][192][192][192][192][178][192][192][192][192][192][192][192][192][192][192][192][192][192][203]" 67 PRINT" [221][221]" 68 PRINTTAB(14);"[202][192][192][192][192][192][192][192][192][192][203]":RETURN 70 PRINT"[145] [158]1[146] [159]"N$(1):PRINT" [152]SCORE[146] [158]0" 71 IFP>1THENPRINTTAB(30)"[145][145][158]2[146] [159]"N$(2):PRINTTAB(30)"[152]SCORE[146] [158]0" 72 IFP>2THENPRINT" [158]3[146] [159]"N$(3):PRINT" [152]SCORE[146] [158]0" 73 IFP>3THENPRINTTAB(30)"[145][145][158]4[146] [159]"N$(4):PRINTTAB(30)"[152]SCORE[146] [158]0" 75 RETURN 97 PRINT""TAB(15)"[158]AGAIN Y/N":GETC$:IFC$=""THEN97 98 IFC$="Y"THENRUN 99 PRINT"[147]":END 100 PRINT""TAB(15)"PTS."(-220)+(S(1)+S(2)+S(3)+S(4))"[157] " 101 IFZ=1THENPRINT"[158]"S(1):RETURN 102 IFZ=2THENPRINT"[158]"TAB(35);S(2):RETURN 103 IFZ=3THENPRINT"[158]"S(3):RETURN 104 IFZ=4THENPRINT"[158]"TAB(35);S(4):RETURN 105 RETURN 200 INPUTP:FORPN=1TOP 205 PRINT"[158]PLAYER (7 LETRS. MAX.) NO."PN;:INPUTN$(PN) 206 IFLEN(N$(PN))>7THENPRINT"[152]TOO MANY LETTERS/TRY AGAIN...":GOTO205 207 NEXT:RETURN 400 PRINT"";:RETURN 500 PRINT"";:RETURN 550 PRINT"NOPE! SORRY..." 551 GOSUB9630:RETURN 560 PRINT"BLANK (=) NEXT!" 561 GOSUB9630:RETURN 570 PRINT"[158]*"N$(Z)"* SCORES" 571 GOSUB9620:RETURN 600 V$="":GOSUB400 601 IFX(Z)=55349ORX(Z)=55389ORX(Z)=55429THENGOSUB1001 602 IFX(Z)=55350ORX(Z)=55390ORX(Z)=55430THENGOSUB1002 603 IFX(Z)=55351ORX(Z)=55391ORX(Z)=55431THENGOSUB1003 604 IFX(Z)=55352ORX(Z)=55392ORX(Z)=55432ORX(Z)=55472ORX(Z)=55512THENGOSUB1004 605 IFX(Z)=55354ORX(Z)=55394ORX(Z)=55434ORX(Z)=55474ORX(Z)=55514THENGOSUB1005 606 IFX(Z)=55355ORX(Z)=55395THENGOSUB1006 607 IFX(Z)=55356ORX(Z)=55396ORX(Z)=55436ORX(Z)=55476ORX(Z)=55516THENGOSUB1007 608 IFX(Z)=55358ORX(Z)=55398ORX(Z)=55438ORX(Z)=55478ORX(Z)=55518THENGOSUB1008 609 IFX(Z)=55359ORX(Z)=55399ORX(Z)=55439THENGOSUB1009 610 IFX(Z)=55360ORX(Z)=55400ORX(Z)=55440THENGOSUB1010 611 IFX(Z)=55361ORX(Z)=55401ORX(Z)=55441THENGOSUB1011 612 IFX(Z)=55433ORX(Z)=55473ORX(Z)=55513THENGOSUB1012 613 IFX(Z)=55437ORX(Z)=55477ORX(Z)=55517THENGOSUB1013 614 IFX(Z)=55509ORX(Z)=55549ORX(Z)=55589THENGOSUB1014 615 IFX(Z)=55510ORX(Z)=55550ORX(Z)=55590THENGOSUB1015 616 IFX(Z)=55511ORX(Z)=55551ORX(Z)=55591THENGOSUB1016 617 IFX(Z)=55519ORX(Z)=55559ORX(Z)=55599THENGOSUB1017 618 IFX(Z)=55520ORX(Z)=55560ORX(Z)=55600THENGOSUB1018 619 IFX(Z)=55521ORX(Z)=55561ORX(Z)=55601THENGOSUB1019 620 IFX(Z)=55592ORX(Z)=55632ORX(Z)=55672ORX(Z)=55712ORX(Z)=55752THENGOSUB1020 621 IFX(Z)=55593ORX(Z)=55633ORX(Z)=55673THENGOSUB1021 622 IFX(Z)=55594ORX(Z)=55634ORX(Z)=55674ORX(Z)=55714ORX(Z)=55754THENGOSUB1022 623 IFX(Z)=55596ORX(Z)=55636ORX(Z)=55676ORX(Z)=55716ORX(Z)=55756THENGOSUB1023 624 IFX(Z)=55597ORX(Z)=55637ORX(Z)=55677THENGOSUB1024 625 IFX(Z)=55598ORX(Z)=55638ORX(Z)=55678ORX(Z)=55718ORX(Z)=55758THENGOSUB1025 626 IFX(Z)=55669ORX(Z)=55709ORX(Z)=55749THENGOSUB1026 627 IFX(Z)=55670ORX(Z)=55710ORX(Z)=55750THENGOSUB1027 628 IFX(Z)=55671ORX(Z)=55711ORX(Z)=55751THENGOSUB1028 629 IFX(Z)=55715ORX(Z)=55755THENGOSUB1029 630 IFX(Z)=55679ORX(Z)=55719ORX(Z)=55759THENGOSUB1030 631 IFX(Z)=55680ORX(Z)=55720ORX(Z)=55760THENGOSUB1031 632 IFX(Z)=55681ORX(Z)=55721ORX(Z)=55761THENGOSUB1032 650 O=0:GOSUB8700:GOTO5000 701 R=0:FORJ=1077TO1157STEP40:R=R+1:POKEJ,PEEK(L+R):GOSUB949:NEXTJ:RETURN 702 R=3:FORJ=1078TO1158STEP40:R=R+1:POKEJ,PEEK(L+R):GOSUB949:NEXTJ:RETURN 703 R=6:FORJ=1079TO1159STEP40:R=R+1:POKEJ,PEEK(L+R):GOSUB949:NEXTJ:RETURN 704 R=9:FORJ=1080TO1240STEP40:R=R+1:POKEJ,PEEK(L+R):GOSUB949:NEXTJ:RETURN 705 R=14:FORJ=1082TO1242STEP40:R=R+1:POKEJ,PEEK(L+R):GOSUB949:NEXTJ:RETURN 706 R=19:FORJ=1083TO1123STEP40:R=R+1:POKEJ,PEEK(L+R):GOSUB949:NEXTJ:RETURN 707 R=21:FORJ=1084TO1244STEP40:R=R+1:POKEJ,PEEK(L+R):GOSUB949:NEXTJ:RETURN 708 R=26:FORJ=1086TO1246STEP40:R=R+1:POKEJ,PEEK(L+R):GOSUB949:NEXTJ:RETURN 709 R=31:FORJ=1087TO1167STEP40:R=R+1:POKEJ,PEEK(L+R):GOSUB949:NEXTJ:RETURN 710 R=34:FORJ=1088TO1168STEP40:R=R+1:POKEJ,PEEK(L+R):GOSUB949:NEXTJ:RETURN 711 R=37:FORJ=1089TO1169STEP40:R=R+1:POKEJ,PEEK(L+R):GOSUB949:NEXTJ:RETURN 712 R=40:FORJ=1161TO1241STEP40:R=R+1:POKEJ,PEEK(L+R):GOSUB949:NEXTJ:RETURN 713 R=43:FORJ=1165TO1245STEP40:R=R+1:POKEJ,PEEK(L+R):GOSUB949:NEXTJ:RETURN 714 R=46:FORJ=1237TO1317STEP40:R=R+1:POKEJ,PEEK(L+R):GOSUB949:NEXTJ:RETURN 715 R=49:FORJ=1238TO1318STEP40:R=R+1:POKEJ,PEEK(L+R):GOSUB949:NEXTJ:RETURN 716 R=52:FORJ=1239TO1319STEP40:R=R+1:POKEJ,PEEK(L+R):GOSUB949:NEXTJ:RETURN 717 R=55:FORJ=1247TO1327STEP40:R=R+1:POKEJ,PEEK(L+R):GOSUB949:NEXTJ:RETURN 718 R=58:FORJ=1248TO1328STEP40:R=R+1:POKEJ,PEEK(L+R):GOSUB949:NEXTJ:RETURN 719 R=61:FORJ=1249TO1329STEP40:R=R+1:POKEJ,PEEK(L+R):GOSUB949:NEXTJ:RETURN 720 R=64:FORJ=1320TO1480STEP40:R=R+1:POKEJ,PEEK(L+R):GOSUB949:NEXTJ:RETURN 721 R=69:FORJ=1321TO1401STEP40:R=R+1:POKEJ,PEEK(L+R):GOSUB949:NEXTJ:RETURN 722 R=72:FORJ=1322TO1482STEP40:R=R+1:POKEJ,PEEK(L+R):GOSUB949:NEXTJ:RETURN 723 R=77:FORJ=1324TO1484STEP40:R=R+1:POKEJ,PEEK(L+R):GOSUB949:NEXTJ:RETURN 724 R=82:FORJ=1325TO1405STEP40:R=R+1:POKEJ,PEEK(L+R):GOSUB949:NEXTJ:RETURN 725 R=85:FORJ=1326TO1486STEP40:R=R+1:POKEJ,PEEK(L+R):GOSUB949:NEXTJ:RETURN 726 R=90:FORJ=1397TO1477STEP40:R=R+1:POKEJ,PEEK(L+R):GOSUB949:NEXTJ:RETURN 727 R=93:FORJ=1398TO1478STEP40:R=R+1:POKEJ,PEEK(L+R):GOSUB949:NEXTJ:RETURN 728 R=96:FORJ=1399TO1479STEP40:R=R+1:POKEJ,PEEK(L+R):GOSUB949:NEXTJ:RETURN 729 R=99:FORJ=1443TO1483STEP40:R=R+1:POKEJ,PEEK(L+R):GOSUB949:NEXTJ:RETURN 730 R=101:FORJ=1407TO1487STEP40:R=R+1:POKEJ,PEEK(L+R):GOSUB949:NEXTJ:RETURN 731 R=104:FORJ=1408TO1488STEP40:R=R+1:POKEJ,PEEK(L+R):GOSUB949:NEXTJ:RETURN 732 R=107:FORJ=1409TO1489STEP40:R=R+1:POKEJ,PEEK(L+R):GOSUB949:NEXTJ:RETURN 800 PRINT"[159] "; 801 PRINT"[157][157][157][157][157][157][157][157][157][157][157][157][157][157][157] "; 802 PRINT"[157][157][157][157][157][157][157][157][157][157][157][157][157][157][157] ":RETURN 850 POKEN+1,0:D=6:GOSUB900:D=2:GOSUB900:D=4:GOSUB900:D=7:GOSUB900 851 FORR=1TO300:NEXT:D=4:GOSUB900:D=7:GOSUB900 852 FORR=1TO300:NEXT:RETURN 900 POKEN+5,0:POKEN+6,240 902 POKEN+4,17:POKEN+2,10:POKEN+24,15 903 IFD=1THENPOKEN+1,34 904 IFD=2THENPOKEN+1,38 905 IFD=3THENPOKEN+1,43 906 IFD=4THENPOKEN+1,45 907 IFD=5THENPOKEN+1,51 908 IFD=6THENPOKEN+1,26 909 IFD=7THENPOKEN+1,54 910 FORTT=0TO50:NEXTTT:RETURN 920 POKEN+5,136:POKEN+6,136:POKEN+24,15:POKEN+4,17 925 FORTT=0TO100:NEXT 926 POKEN+4,0:RETURN 949 POKEJ+N,12:EE(Z)=12 950 POKEN+24,15:POKEN+5,5:POKEN+6,247:POKEN+4,129:POKEN+1,10:POKEN,0 952 FORTT=1TO50:NEXT:POKEN+4,0:RETURN 960 POKEN+24,15:POKEN+5,45:POKEN+6,165:POKEN+4,33:POKEN+1,6:POKEN,5 961 FORTT=1TO200:NEXT:POKEN+4,0:POKEN+1,0:POKEN,0:RETURN 1001 FORR=1TO5:GOSUB500:PRINTD$(R):NEXT:V$=P$(1):RETURN 1002 FORR=6TO10:GOSUB500:PRINTD$(R):NEXT:V$=P$(2):RETURN 1003 FORR=11TO15:GOSUB500:PRINTD$(R):NEXT:V$=P$(3):RETURN 1004 FORR=16TO20:GOSUB500:PRINTD$(R):NEXT:V$=P$(4):RETURN 1005 FORR=21TO25:GOSUB500:PRINTD$(R):NEXT:V$=P$(5):RETURN 1006 FORR=26TO30:GOSUB500:PRINTD$(R):NEXT:V$=P$(6):RETURN 1007 FORR=31TO35:GOSUB500:PRINTD$(R):NEXT:V$=P$(7):RETURN 1008 FORR=36TO40:GOSUB500:PRINTD$(R):NEXT:V$=P$(8):RETURN 1009 FORR=41TO45:GOSUB500:PRINTD$(R):NEXT:V$=P$(9):RETURN 1010 FORR=46TO50:GOSUB500:PRINTD$(R):NEXT:V$=P$(10):RETURN 1011 FORR=51TO55:GOSUB500:PRINTD$(R):NEXT:V$=P$(11):RETURN 1012 FORR=56TO60:GOSUB500:PRINTD$(R):NEXT:V$=P$(12):RETURN 1013 FORR=61TO65:GOSUB500:PRINTD$(R):NEXT:V$=P$(13):RETURN 1014 FORR=66TO70:GOSUB500:PRINTD$(R):NEXT:V$=P$(14):RETURN 1015 FORR=71TO75:GOSUB500:PRINTD$(R):NEXT:V$=P$(15):RETURN 1016 FORR=76TO80:GOSUB500:PRINTD$(R):NEXT:V$=P$(16):RETURN 1017 FORR=81TO85:GOSUB500:PRINTD$(R):NEXT:V$=P$(17):RETURN 1018 FORR=86TO90:GOSUB500:PRINTD$(R):NEXT:V$=P$(18):RETURN 1019 FORR=91TO95:GOSUB500:PRINTD$(R):NEXT:V$=P$(19):RETURN 1020 FORR=96TO100:GOSUB500:PRINTD$(R):NEXT:V$=P$(20):RETURN 1021 FORR=101TO105:GOSUB500:PRINTD$(R):NEXT:V$=P$(21):RETURN 1022 FORR=106TO110:GOSUB500:PRINTD$(R):NEXT:V$=P$(22):RETURN 1023 FORR=111TO115:GOSUB500:PRINTD$(R):NEXT:V$=P$(23):RETURN 1024 FORR=116TO120:GOSUB500:PRINTD$(R):NEXT:V$=P$(24):RETURN 1025 FORR=121TO125:GOSUB500:PRINTD$(R):NEXT:V$=P$(25):RETURN 1026 FORR=126TO130:GOSUB500:PRINTD$(R):NEXT:V$=P$(26):RETURN 1027 FORR=131TO135:GOSUB500:PRINTD$(R):NEXT:V$=P$(27):RETURN 1028 FORR=136TO140:GOSUB500:PRINTD$(R):NEXT:V$=P$(28):RETURN 1029 FORR=141TO145:GOSUB500:PRINTD$(R):NEXT:V$=P$(29):RETURN 1030 FORR=146TO150:GOSUB500:PRINTD$(R):NEXT:V$=P$(30):RETURN 1031 FORR=151TO155:GOSUB500:PRINTD$(R):NEXT:V$=P$(31):RETURN 1032 FORR=156TO160:GOSUB500:PRINTD$(R):NEXT:V$=P$(32):RETURN 3000 FORZ=1TOP 3001 POKEX(Z),7 3050 GOSUB3100:GOTO8000 3100 GOSUB6110:POKEN+1,0:FORJ=1TO16 3101 PRINT"";:GOSUB55 3105 D=INT(RND(1)*5)+1 3106 GOSUB900 3110 PRINT""; 3115 IFD=1THENPRINT" [157][157][157][157][157][157][157] [157][157][157][157][157][157][157] " 3121 IFD=2THENPRINT" [157][157][157][157][157][157][157] [157][157][157][157][157][157][157] " 3131 IFD=3THENPRINT" [157][157][157][157][157][157][157] [157][157][157][157][157][157][157] " 3141 IFD=4THENPRINT" [157][157][157][157][157][157][157] "; 3142 IFD=4THENPRINT"[157][157][157][157][157][157][157] " 3151 IFD=5THENPRINT" [157][157][157][157][157][157][157] "; 3152 IFD=5THENPRINT"[157][157][157][157][157][157][157] " 3160 NEXTJ 3165 PRINT""; 3170 IFD=1THENPRINT"[152] ONE [157][157][157][157][157][157][157][149] [207][146] [157][157][157][157][157][157][157][152] SQUARE" 3171 IFD=2THENPRINT"[152] TWO [157][157][157][157][157][157][157][149] [207][207][146] [157][157][157][157][157][157][157][152]SQUARES" 3172 IFD=3THENPRINT"[152] THREE [157][157][157][157][157][157][157][149] [207][207][207][146] [157][157][157][157][157][157][157][152]SQUARES" 3173 IFD=4THENPRINT"[152] FOUR [157][157][157][157][157][157][157][149] [207][207][207][207][146] "; 3174 IFD=4THENPRINT"[157][157][157][157][157][157][157][152]SQUARES" 3175 IFD=5THENPRINT"[152][146] FIVE [157][157][157][157][157][157][157][149] [207][207][207][207][207][146] "; 3176 IFD=5THENPRINT"[157][157][157][157][157][157][157][152]SQUARES" 3177 GOSUB9610:RETURN 4000 IFC$=O$(1)THENY=1076:FORR=1TO4:O$(1)="*" 4002 IFC$=O$(2)THENY=1077:FORR=5TO7:O$(2)="*" 4003 IFC$=O$(3)THENY=1078:FORR=8TO11:O$(3)="*" 4004 IFC$=O$(4)THENY=1105:FORR=12TO15:O$(4)="*" 4005 IFC$=O$(5)THENY=1106:FORR=16TO18:O$(5)="*" 4006 IFC$=O$(6)THENY=1107:FORR=19TO22:O$(6)="*" 4007 IFC$=O$(7)THENY=1134:FORR=23TO28:O$(7)="*" 4008 IFC$=O$(8)THENY=1135:FORR=29TO34:O$(8)="*" 4009 IFC$=O$(9)THENY=1165:FORR=35TO37:O$(9)="*" 4010 IFC$=O$(10)THENY=1166:FORR=38TO40:O$(10)="*" 4011 IFC$=O$(11)THENY=1196:FORR=41TO46:O$(11)="*" 4012 IFC$=O$(12)THENY=1197:FORR=47TO52:O$(12)="*" 4013 IFC$=O$(13)THENY=1224:FORR=53TO55:O$(13)="*" 4014 IFC$=O$(14)THENY=1231:FORR=56TO58:O$(14)="*" 4015 IFC$=O$(15)THENY=1258:FORR=59TO64:O$(15)="*" 4016 IFC$=O$(16)THENY=1259:FORR=65TO70:O$(16)="*" 4017 IFC$=O$(17)THENY=1289:FORR=71TO73:O$(17)="*" 4018 IFC$=O$(18)THENY=1290:FORR=74TO76:O$(18)="*" 4019 IFC$=O$(19)THENY=1320:FORR=77TO82:O$(19)="*" 4020 IFC$=O$(20)THENY=1321:FORR=83TO88:O$(20)="*" 4021 IFC$=O$(21)THENY=1348:FORR=89TO92:O$(21)="*" 4022 IFC$=O$(22)THENY=1349:FORR=93TO95:O$(22)="*" 4023 IFC$=O$(23)THENY=1350:FORR=96TO99:O$(23)="*" 4024 IFC$=O$(24)THENY=1377:FORR=100TO103:O$(24)="*" 4025 IFC$=O$(25)THENY=1378:FORR=104TO106:O$(25)="*" 4026 IFC$=O$(26)THENY=1379:FORR=107TO110:O$(26)="*" 4050 POKEY+N+R,12:POKEY+R,PEEK(K+R):GOSUB950:S(Z)=S(Z)+1:NEXTR:EE(Z)=12:RETURN 4501 IFC$=P$(1)THENGOSUB701:S(Z)=S(Z)+3:P$(1)="*" 4502 IFC$=P$(2)THENGOSUB702:S(Z)=S(Z)+3:P$(2)="*" 4503 IFC$=P$(3)THENGOSUB703:S(Z)=S(Z)+3:P$(3)="*" 4504 IFC$=P$(4)THENGOSUB704:S(Z)=S(Z)+5:P$(4)="*" 4505 IFC$=P$(5)THENGOSUB705:S(Z)=S(Z)+5:P$(5)="*" 4506 IFC$=P$(6)THENGOSUB706:S(Z)=S(Z)+2:P$(6)="*" 4507 IFC$=P$(7)THENGOSUB707:S(Z)=S(Z)+5:P$(7)="*" 4508 IFC$=P$(8)THENGOSUB708:S(Z)=S(Z)+5:P$(8)="*" 4509 IFC$=P$(9)THENGOSUB709:S(Z)=S(Z)+3:P$(9)="*" 4510 IFC$=P$(10)THENGOSUB710:S(Z)=S(Z)+3:P$(10)="*" 4511 IFC$=P$(11)THENGOSUB711:S(Z)=S(Z)+3:P$(11)="*" 4512 IFC$=P$(12)THENGOSUB712:S(Z)=S(Z)+3:P$(12)="*" 4513 IFC$=P$(13)THENGOSUB713:S(Z)=S(Z)+3:P$(13)="*" 4514 IFC$=P$(14)THENGOSUB714:S(Z)=S(Z)+3:P$(14)="*" 4515 IFC$=P$(15)THENGOSUB715:S(Z)=S(Z)+3:P$(15)="*" 4516 IFC$=P$(16)THENGOSUB716:S(Z)=S(Z)+3:P$(16)="*" 4517 IFC$=P$(17)THENGOSUB717:S(Z)=S(Z)+3:P$(17)="*" 4518 IFC$=P$(18)THENGOSUB718:S(Z)=S(Z)+3:P$(18)="*" 4519 IFC$=P$(19)THENGOSUB719:S(Z)=S(Z)+3:P$(19)="*" 4520 IFC$=P$(20)THENGOSUB720:S(Z)=S(Z)+5:P$(20)="*" 4521 IFC$=P$(21)THENGOSUB721:S(Z)=S(Z)+3:P$(21)="*" 4522 IFC$=P$(22)THENGOSUB722:S(Z)=S(Z)+5:P$(22)="*" 4523 IFC$=P$(23)THENGOSUB723:S(Z)=S(Z)+5:P$(23)="*" 4524 IFC$=P$(24)THENGOSUB724:S(Z)=S(Z)+3:P$(24)="*" 4525 IFC$=P$(25)THENGOSUB725:S(Z)=S(Z)+5:P$(25)="*" 4526 IFC$=P$(26)THENGOSUB726:S(Z)=S(Z)+3:P$(26)="*" 4527 IFC$=P$(27)THENGOSUB727:S(Z)=S(Z)+3:P$(27)="*" 4528 IFC$=P$(28)THENGOSUB728:S(Z)=S(Z)+3:P$(28)="*" 4529 IFC$=P$(29)THENGOSUB729:S(Z)=S(Z)+2:P$(29)="*" 4530 IFC$=P$(30)THENGOSUB730:S(Z)=S(Z)+3:P$(30)="*" 4531 IFC$=P$(31)THENGOSUB731:S(Z)=S(Z)+3:P$(31)="*" 4532 IFC$=P$(32)THENGOSUB732:S(Z)=S(Z)+3:P$(32)="*" 4550 RETURN 4700 PRINT" " 4701 PRINT" " 4702 PRINT" ":RETURN 5000 IFW$="*"THENGOSUB6000 5001 IFV$="*"THENGOSUB6050 5002 IFV$="*"ANDW$="*"THENPOKEX(Z),EE(Z):GOSUB6100:GOTO5015 5003 PRINT"[158] TYPE ANSWER/RET"; 5004 GOTO5005:IFPEEK(X(Z)-N)<27THENPOKE(X(Z)-N),PEEK(X(Z)-N)+128 5005 PRINT"[157][157][157][157][157][157][157][157][157][157][157][157][159][146]"N$(Z):PRINT"";:INPUTC$ 5006 O=0:GOSUB8600:O=0:GOSUB8800 5007 GOTO5008:IFPEEK(X(Z)-N)<200THEN:POKE(X(Z)-N),PEEK((X(Z))-N)-128 5008 POKEX(Z),EE(Z):POKE(X(Z)-N),FF(Z):GOSUB800 5010 IFC$=W$THENGOSUB850:GOSUB4700:GOSUB570:GOSUB4000:GOSUB5020:GOTO5015 5011 IFC$=V$THENGOSUB850:GOSUB4700:GOSUB570:GOSUB4501:GOSUB5020:GOTO5015 5012 GOSUB960:GOSUB960:GOSUB550 5015 GOSUB6000:GOSUB6050::NEXTZ:GOTO3000 5020 IFS(1)+S(2)+S(3)+S(4)>219THENGOTO97 5021 GOSUB100:RETURN 6000 PRINT"[158] [213][192][192][192][192][192][192][201] " 6001 PRINT" [221] C [221] " 6002 PRINT" [221]TRIVIA[221] " 6003 PRINT" [221] O _[192][201][221] " 6004 PRINT" [221] S^ [221][221] " 6005 PRINT" [221] S[202][192][192][219][203] " 6006 PRINT" [202][192][192][192][192][192][203] ":RETURN 6050 PRINT" [213][192][192][192][192][192][192][201] " 6051 PRINT" [221] C [221] " 6052 PRINT" [221]TRIVIA[221] " 6053 PRINT" [221] O _[192][201][221] " 6054 PRINT" [221] S^ [221][221] " 6055 PRINT" [221] S[202][192][192][219][203] " 6056 PRINT" [202][192][192][192][192][192][203] ":RETURN 6100 PRINT"BOTH TAKEN....!" 6101 GOSUB9630:RETURN 6110 PRINT" " 6140 PRINT"[159]"N$(Z)" ROLLING!":RETURN 6150 PRINT"DOWN [158]"D"[157] SQUARES " 6151 GOSUB9620:RETURN 6160 PRINT"UP [158]"D"[157] SQUARES" 6161 GOSUB9620:RETURN 6170 PRINT"RIGHT[158]"D"[157] SQUARES" 6171 GOSUB9620:RETURN 6180 PRINT"LEFT [158]"D"[157] SQUARES" 6181 GOSUB9620:RETURN 7000 W$="" 7001 IFX(Z)>55348ANDX(Z)<55353THENFORR=1TO5:PRINT""A$(R):NEXT:W$=O$(1) 7002 IFX(Z)>55353ANDX(Z)<55357THENFORR=6TO10:PRINT""A$(R):NEXT:W$=O$(2) 7003 IFX(Z)>55357ANDX(Z)<55362THENFORR=11TO15:PRINT""A$(R):NEXT:W$=O$(3) 7050 IFX(Z)>55388ANDX(Z)<55393THENFORR=16TO20:PRINT""A$(R):NEXT:W$=O$(4) 7052 IFX(Z)>55393ANDX(Z)<55397THENFORR=21TO25:PRINT""A$(R):NEXT:W$=O$(5) 7053 IFX(Z)>55397ANDX(Z)<55402THENFORR=26TO30:PRINT""A$(R):NEXT:W$=O$(6) 7100 IFX(Z)>55428ANDX(Z)<55435THENFORR=31TO35:PRINT""A$(R):NEXT:W$=O$(7) 7102 IFX(Z)>55435ANDX(Z)<55442THENFORR=36TO40:PRINT""A$(R):NEXT:W$=O$(8) 7150 IFX(Z)>55471ANDX(Z)<55475THENFORR=41TO45:PRINT""A$(R):NEXT:W$=O$(9) 7152 IFX(Z)>55475ANDX(Z)<55479THENFORR=46TO50:PRINT""A$(R):NEXT:W$=O$(10) 7200 IFX(Z)>55508ANDX(Z)<55515THENFORR=51TO55:PRINT""A$(R):NEXT:W$=O$(11) 7202 IFX(Z)>55515ANDX(Z)<55522THENFORR=56TO60:PRINT""A$(R):NEXT:W$=O$(12) 7250 IFX(Z)>55548ANDX(Z)<55552THENFORR=61TO65:PRINT""A$(R):NEXT:W$=O$(13) 7252 IFX(Z)>55558ANDX(Z)<55562THENFORR=66TO70:PRINT""A$(R):NEXT:W$=O$(14) 7300 IFX(Z)>55588ANDX(Z)<55595THENFORR=71TO75:PRINT""A$(R):NEXT:W$=O$(15) 7302 IFX(Z)>55595ANDX(Z)<55602THENFORR=76TO80:PRINT""A$(R):NEXT:W$=O$(16) 7350 IFX(Z)>55631ANDX(Z)<55635THENFORR=81TO85:PRINT""A$(R):NEXT:W$=O$(17) 7352 IFX(Z)>55635ANDX(Z)<55639THENFORR=85TO90:PRINT""A$(R):NEXT:W$=O$(18) 7400 IFX(Z)>55668ANDX(Z)<55675THENFORR=91TO95:PRINT""A$(R):NEXT:W$=O$(19) 7402 IFX(Z)>55675ANDX(Z)<55682THENFORR=96TO100:PRINT""A$(R):NEXT:W$=O$(20) 7450 IFX(Z)>55708ANDX(Z)<55713THENFORR=101TO105:PRINT""A$(R):NEXT:W$=O$(21) 7452 IFX(Z)>55713ANDX(Z)<55717THENFORR=106TO110:PRINT""A$(R):NEXT:W$=O$(22) 7453 IFX(Z)>55717ANDX(Z)<55722THENFORR=111TO115:PRINT""A$(R):NEXT:W$=O$(23) 7500 IFX(Z)>55748ANDX(Z)<55753THENFORR=116TO120:PRINT""A$(R):NEXT:W$=O$(24) 7502 IFX(Z)>55753ANDX(Z)<55757THENFORR=121TO125:PRINT""A$(R):NEXT:W$=O$(25) 7503 IFX(Z)>55757ANDX(Z)<55762THENFORR=126TO130:PRINT""A$(R):NEXT:W$=O$(26) 7505 IFW$=""THENGOSUB6000:GOSUB6050:POKEX(Z),EE(Z):GOSUB560:NEXTZ:GOTO3000 7510 GOSUB8500:GOTO600 8000 F=X(Z):G=X(Z):H=X(Z):I=X(Z):POKEX(Z),7:GOSUB6150 8001 FORMD=1TOD:F=F+40 8002 IFF=55789THENF=55349 8003 IFF=55790THENF=55350 8004 IFF=55791THENF=55351 8005 IFF=55792THENF=55352 8006 IFF=55793THENF=55353 8007 IFF=55794THENF=55354 8008 IFF=55795THENF=55355 8009 IFF=55796THENF=55356 8010 IFF=55797THENF=55357 8011 IFF=55798THENF=55358 8012 IFF=55799THENF=55359 8013 IFF=55800THENF=55360 8014 IFF=55801THENF=55361 8015 AA=PEEK(F):WW=PEEK(F-N):POKEF,1 8016 IFMD=1THENPOKEF-N,49 8017 IFMD=2THENPOKEF-N,50 8018 IFMD=3THENPOKEF-N,51 8019 IFMD=4THENPOKEF-N,52 8020 IFMD=4THENPOKEF-N,53 8021 GOSUB920:POKEF,AA:POKE(F-N),WW:NEXTMD:POKEF-N,49:POKEF,7:GOSUB6160 8030 POKEX(Z),7:FORMU=1TOD:G=G-40 8031 IFG=55309THENG=55749 8032 IFG=55310THENG=55750 8033 IFG=55311THENG=55751 8034 IFG=55312THENG=55752 8035 IFG=55313THENG=55753 8036 IFG=55314THENG=55754 8037 IFG=55315THENG=55755 8038 IFG=55316THENG=55756 8039 IFG=55317THENG=55757 8040 IFG=55318THENG=55758 8041 IFG=55319THENG=55759 8042 IFG=55320THENG=55760 8043 IFG=55321THENG=55761 8044 BB=PEEK(G):XX=PEEK(G-N):POKEG,1 8045 IFMU=1THENPOKEG-N,49 8046 IFMU=2THENPOKEG-N,50 8047 IFMU=3THENPOKEG-N,51 8048 IFMU=4THENPOKEG-N,52 8049 IFMU=5THENPOKEG-N,53 8050 GOSUB920:POKEG,BB:POKE(G-N),XX:NEXTMU:POKEG-N,50:POKEG,7:GOSUB6170 8060 POKEX(Z),7:FORMR=1TOD:H=H+1 8061 IFH=55362THENH=55349 8062 IFH=55402THENH=55389 8063 IFH=55442THENH=55429 8064 IFH=55482THENH=55469 8065 IFH=55522THENH=55509 8066 IFH=55562THENH=55549 8067 IFH=55602THENH=55589 8068 IFH=55642THENH=55629 8069 IFH=55682THENH=55669 8070 IFH=55722THENH=55709 8071 IFH=55762THENH=55749 8072 CC=PEEK(H):YY=PEEK(H-N):POKEH,1 8073 IFMR=1THENPOKEH-N,49 8074 IFMR=2THENPOKEH-N,50 8075 IFMR=3THENPOKEH-N,51 8076 IFMR=4THENPOKEH-N,52 8077 IFMR=5THENPOKEH-N,53 8078 GOSUB920:POKEH,CC:POKE(H-N),YY:NEXTMR:POKEH-N,51:POKEH,7:GOSUB6180 8080 POKEX(Z),7:FORML=1TOD:I=I-1 8081 IFI=55348THENI=55361 8082 IFI=55388THENI=55401 8083 IFI=55428THENI=55441 8084 IFI=55468THENI=55481 8085 IFI=55508THENI=55521 8086 IFI=55548THENI=55561 8087 IFI=55588THENI=55601 8088 IFI=55628THENI=55641 8089 IFI=55668THENI=55681 8090 IFI=55708THENI=55721 8091 IFI=55748THENI=55761 8092 DD=PEEK(I):ZZ=PEEK(I-N):POKEI,1 8093 IFML=1THENPOKEI-N,49 8094 IFML=2THENPOKEI-N,50 8095 IFML=3THENPOKEI-N,51 8096 IFML=4THENPOKEI-N,52 8097 IFML=5THENPOKEI-N,53 8099 GOSUB920:POKEI,DD:POKE(I-N),ZZ:NEXTML:POKEI-N,52:POKEI,7:POKEN+2,0 8100 PRINT"[158]MOVE 1,2,3 OR 4 "; 8101 PRINT"[157][157][157][157][157][157][157][157][157][157][157][157][146][159]"N$(Z)" ?" 8103 GETA$:GOSUB9600:IFA$=""THEN8103 8104 POKE198,0 8105 IFA$<>"1"ANDA$<>"2"ANDA$<>"3"ANDA$<>"4"ANDA$<>"Q"THENR=0:GOTO8100 8106 GOSUB800 8110 IFA$="1"THENX(Z)=F:EE(Z)=AA:FF(Z)=WW 8115 IFA$="2"THENX(Z)=G:EE(Z)=BB:FF(Z)=XX 8120 IFA$="3"THENX(Z)=H:EE(Z)=CC:FF(Z)=YY 8125 IFA$="4"THENX(Z)=I:EE(Z)=DD:FF(Z)=ZZ 8126 IFA$="Q"THENGOTO97 8127 POKEF,AA:POKEG,BB:POKEH,CC:POKEI,DD:POKEX(Z),7:POKE(X(Z)-N),FF(Z) 8128 POKEF-N,WW:POKEG-N,XX:POKEH-N,YY:POKEI-N,ZZ 8305 PRINT"":FORR=1TO7:PRINT" ":NEXT 8306 PRINT"":FORR=1TO7:PRINT" ":NEXTR 8307 PRINT""; 8310 GOTO7000 8500 IFW$="*"THENRETURN 8501 IFW$=O$(1)THENFORR=1TO4:EX(R)=PEEK(55348+R):POKE55348+R,7:NEXT 8502 IFW$=O$(2)THENFORR=1TO3:EX(R)=PEEK(55353+R):POKE55353+R,7:NEXT 8503 IFW$=O$(3)THENFORR=1TO4:EX(R)=PEEK(55357+R):POKE55357+R,7:NEXT 8504 IFW$=O$(4)THENFORR=1TO4:EX(R)=PEEK(55388+R):POKE55388+R,7:NEXT 8505 IFW$=O$(5)THENFORR=1TO3:EX(R)=PEEK(55393+R):POKE55393+R,7:NEXT 8506 IFW$=O$(6)THENFORR=1TO4:EX(R)=PEEK(55397+R):POKE55397+R,7:NEXT 8507 IFW$=O$(7)THENFORR=1TO6:EX(R)=PEEK(55428+R):POKE55428+R,7:NEXT 8508 IFW$=O$(8)THENFORR=1TO6:EX(R)=PEEK(55435+R):POKE55435+R,7:NEXT 8509 IFW$=O$(9)THENFORR=1TO3:EX(R)=PEEK(55471+R):POKE55471+R,7:NEXT 8510 IFW$=O$(10)THENFORR=1TO3:EX(R)=PEEK(55475+R):POKE55475+R,7:NEXT 8511 IFW$=O$(11)THENFORR=1TO6:EX(R)=PEEK(55508+R):POKE55508+R,7:NEXT 8512 IFW$=O$(12)THENFORR=1TO6:EX(R)=PEEK(55515+R):POKE55515+R,7:NEXT 8513 IFW$=O$(13)THENFORR=1TO3:EX(R)=PEEK(55548+R):POKE55548+R,7:NEXT 8514 IFW$=O$(14)THENFORR=1TO3:EX(R)=PEEK(55558+R):POKE55558+R,7:NEXT 8515 IFW$=O$(15)THENFORR=1TO6:EX(R)=PEEK(55588+R):POKE55588+R,7:NEXT 8516 IFW$=O$(16)THENFORR=1TO6:EX(R)=PEEK(55595+R):POKE55595+R,7:NEXT 8517 IFW$=O$(17)THENFORR=1TO3:EX(R)=PEEK(55631+R):POKE55631+R,7:NEXT 8518 IFW$=O$(18)THENFORR=1TO3:EX(R)=PEEK(55635+R):POKE55635+R,7:NEXT 8519 IFW$=O$(19)THENFORR=1TO6:EX(R)=PEEK(55668+R):POKE55668+R,7:NEXT 8520 IFW$=O$(20)THENFORR=1TO6:EX(R)=PEEK(55675+R):POKE55675+R,7:NEXT 8521 IFW$=O$(21)THENFORR=1TO4:EX(R)=PEEK(55708+R):POKE55708+R,7:NEXT 8522 IFW$=O$(22)THENFORR=1TO3:EX(R)=PEEK(55713+R):POKE55713+R,7:NEXT 8523 IFW$=O$(23)THENFORR=1TO4:EX(R)=PEEK(55717+R):POKE55717+R,7:NEXT 8524 IFW$=O$(24)THENFORR=1TO4:EX(R)=PEEK(55748+R):POKE55748+R,7:NEXT 8525 IFW$=O$(25)THENFORR=1TO3:EX(R)=PEEK(55753+R):POKE55753+R,7:NEXT 8526 IFW$=O$(26)THENFORR=1TO4:EX(R)=PEEK(55757+R):POKE55757+R,7:NEXT 8590 RETURN 8600 IFW$="*"THENRETURN 8601 IFW$=O$(1)THENFORR=1TO4:POKE55348+R,EX(R):NEXT 8602 IFW$=O$(2)THENFORR=1TO3:POKE55353+R,EX(R):NEXT 8603 IFW$=O$(3)THENFORR=1TO4:POKE55357+R,EX(R):NEXT 8604 IFW$=O$(4)THENFORR=1TO4:POKE55388+R,EX(R):NEXT 8605 IFW$=O$(5)THENFORR=1TO3:POKE55393+R,EX(R):NEXT 8606 IFW$=O$(6)THENFORR=1TO4:POKE55397+R,EX(R):NEXT 8607 IFW$=O$(7)THENFORR=1TO6:POKE55428+R,EX(R):NEXT 8608 IFW$=O$(8)THENFORR=1TO6:POKE55435+R,EX(R):NEXT 8609 IFW$=O$(9)THENFORR=1TO3:POKE55471+R,EX(R):NEXT 8610 IFW$=O$(10)THENFORR=1TO3:POKE55475+R,EX(R):NEXT 8611 IFW$=O$(11)THENFORR=1TO6:POKE55508+R,EX(R):NEXT 8612 IFW$=O$(12)THENFORR=1TO6:POKE55515+R,EX(R):NEXT 8613 IFW$=O$(13)THENFORR=1TO3:POKE55548+R,EX(R):NEXT 8614 IFW$=O$(14)THENFORR=1TO3:POKE55558+R,EX(R):NEXT 8615 IFW$=O$(15)THENFORR=1TO6:POKE55588+R,EX(R):NEXT 8616 IFW$=O$(16)THENFORR=1TO6:POKE55595+R,EX(R):NEXT 8617 IFW$=O$(17)THENFORR=1TO3:POKE55631+R,EX(R):NEXT 8618 IFW$=O$(18)THENFORR=1TO3:POKE55635+R,EX(R):NEXT 8619 IFW$=O$(19)THENFORR=1TO6:POKE55668+R,EX(R):NEXT 8620 IFW$=O$(20)THENFORR=1TO6:POKE55675+R,EX(R):NEXT 8621 IFW$=O$(21)THENFORR=1TO4:POKE55708+R,EX(R):NEXT 8622 IFW$=O$(22)THENFORR=1TO3:POKE55713+R,EX(R):NEXT 8623 IFW$=O$(23)THENFORR=1TO4:POKE55717+R,EX(R):NEXT 8624 IFW$=O$(24)THENFORR=1TO4:POKE55748+R,EX(R):NEXT 8625 IFW$=O$(25)THENFORR=1TO3:POKE55753+R,EX(R):NEXT 8626 IFW$=O$(26)THENFORR=1TO4:POKE55757+R,EX(R):NEXT 8690 O=0:GOTO8800 8700 IFV$="*"THENRETURN 8701 IFV$=P$(1)THENFORR=55349TO55429STEP+40:O=O+1:EZ(O)=PEEK(R):POKER,7:NEXT 8702 IFV$=P$(2)THENFORR=55350TO55430STEP+40:O=O+1:EZ(O)=PEEK(R):POKER,7:NEXT 8703 IFV$=P$(3)THENFORR=55351TO55431STEP+40:O=O+1:EZ(O)=PEEK(R):POKER,7:NEXT 8704 IFV$=P$(4)THENFORR=55352TO55512STEP+40:O=O+1:EZ(O)=PEEK(R):POKER,7:NEXT 8705 IFV$=P$(5)THENFORR=55354TO55514STEP+40:O=O+1:EZ(O)=PEEK(R):POKER,7:NEXT 8706 IFV$=P$(6)THENFORR=55355TO55395STEP+40:O=O+1:EZ(O)=PEEK(R):POKER,7:NEXT 8707 IFV$=P$(7)THENFORR=55356TO55516STEP+40:O=O+1:EZ(O)=PEEK(R):POKER,7:NEXT 8708 IFV$=P$(8)THENFORR=55358TO55518STEP+40:O=O+1:EZ(O)=PEEK(R):POKER,7:NEXT 8709 IFV$=P$(9)THENFORR=55359TO55439STEP+40:O=O+1:EZ(O)=PEEK(R):POKER,7:NEXT 8710 IFV$=P$(10)THENFORR=55360TO55440STEP+40:O=O+1:EZ(O)=PEEK(R):POKER,7:NEXT 8711 IFV$=P$(11)THENFORR=55361TO55441STEP+40:O=O+1:EZ(O)=PEEK(R):POKER,7:NEXT 8712 IFV$=P$(12)THENFORR=55433TO55513STEP+40:O=O+1:EZ(O)=PEEK(R):POKER,7:NEXT 8713 IFV$=P$(13)THENFORR=55437TO55517STEP+40:O=O+1:EZ(O)=PEEK(R):POKER,7:NEXT 8714 IFV$=P$(14)THENFORR=55509TO55589STEP+40:O=O+1:EZ(O)=PEEK(R):POKER,7:NEXT 8715 IFV$=P$(15)THENFORR=55510TO55590STEP+40:O=O+1:EZ(O)=PEEK(R):POKER,7:NEXT 8716 IFV$=P$(16)THENFORR=55511TO55591STEP+40:O=O+1:EZ(O)=PEEK(R):POKER,7:NEXT 8717 IFV$=P$(17)THENFORR=55519TO55599STEP+40:O=O+1:EZ(O)=PEEK(R):POKER,7:NEXT 8718 IFV$=P$(18)THENFORR=55520TO55600STEP+40:O=O+1:EZ(O)=PEEK(R):POKER,7:NEXT 8719 IFV$=P$(19)THENFORR=55521TO55601STEP+40:O=O+1:EZ(O)=PEEK(R):POKER,7:NEXT 8720 IFV$=P$(20)THENFORR=55592TO55752STEP+40:O=O+1:EZ(O)=PEEK(R):POKER,7:NEXT 8721 IFV$=P$(21)THENFORR=55593TO55673STEP+40:O=O+1:EZ(O)=PEEK(R):POKER,7:NEXT 8722 IFV$=P$(22)THENFORR=55594TO55754STEP+40:O=O+1:EZ(O)=PEEK(R):POKER,7:NEXT 8723 IFV$=P$(23)THENFORR=55596TO55756STEP+40:O=O+1:EZ(O)=PEEK(R):POKER,7:NEXT 8724 IFV$=P$(24)THENFORR=55597TO55677STEP+40:O=O+1:EZ(O)=PEEK(R):POKER,7:NEXT 8725 IFV$=P$(25)THENFORR=55598TO55758STEP+40:O=O+1:EZ(O)=PEEK(R):POKER,7:NEXT 8726 IFV$=P$(26)THENFORR=55669TO55749STEP+40:O=O+1:EZ(O)=PEEK(R):POKER,7:NEXT 8727 IFV$=P$(27)THENFORR=55670TO55750STEP+40:O=O+1:EZ(O)=PEEK(R):POKER,7:NEXT 8728 IFV$=P$(28)THENFORR=55671TO55751STEP+40:O=O+1:EZ(O)=PEEK(R):POKER,7:NEXT 8729 IFV$=P$(29)THENFORR=55715TO55755STEP+40:O=O+1:EZ(O)=PEEK(R):POKER,7:NEXT 8730 IFV$=P$(30)THENFORR=55679TO55759STEP+40:O=O+1:EZ(O)=PEEK(R):POKER,7:NEXT 8731 IFV$=P$(31)THENFORR=55680TO55760STEP+40:O=O+1:EZ(O)=PEEK(R):POKER,7:NEXT 8732 IFV$=P$(32)THENFORR=55681TO55761STEP+40:O=O+1:EZ(O)=PEEK(R):POKER,7:NEXT 8750 RETURN 8800 IFV$="*"THENRETURN 8801 IFV$=P$(1)THENFORR=55349TO55429STEP+40:O=O+1:POKER,EZ(O):NEXT 8802 IFV$=P$(2)THENFORR=55350TO55430STEP+40:O=O+1:POKER,EZ(O):NEXT 8803 IFV$=P$(3)THENFORR=55351TO55431STEP+40:O=O+1:POKER,EZ(O):NEXT 8804 IFV$=P$(4)THENFORR=55352TO55512STEP+40:O=O+1:POKER,EZ(O):NEXT 8805 IFV$=P$(5)THENFORR=55354TO55514STEP+40:O=O+1:POKER,EZ(O):NEXT 8806 IFV$=P$(6)THENFORR=55355TO55395STEP+40:O=O+1:POKER,EZ(O):NEXT 8807 IFV$=P$(7)THENFORR=55356TO55516STEP+40:O=O+1:POKER,EZ(O):NEXT 8808 IFV$=P$(8)THENFORR=55358TO55518STEP+40:O=O+1:POKER,EZ(O):NEXT 8809 IFV$=P$(9)THENFORR=55359TO55439STEP+40:O=O+1:POKER,EZ(O):NEXT 8810 IFV$=P$(10)THENFORR=55360TO55440STEP+40:O=O+1:POKER,EZ(O):NEXT 8811 IFV$=P$(11)THENFORR=55361TO55441STEP+40:O=O+1:POKER,EZ(O):NEXT 8812 IFV$=P$(12)THENFORR=55433TO55513STEP+40:O=O+1:POKER,EZ(O):NEXT 8813 IFV$=P$(13)THENFORR=55437TO55517STEP+40:O=O+1:POKER,EZ(O):NEXT 8814 IFV$=P$(14)THENFORR=55509TO55589STEP+40:O=O+1:POKER,EZ(O):NEXT 8815 IFV$=P$(15)THENFORR=55510TO55590STEP+40:O=O+1:POKER,EZ(O):NEXT 8816 IFV$=P$(16)THENFORR=55511TO55591STEP+40:O=O+1:POKER,EZ(O):NEXT 8817 IFV$=P$(17)THENFORR=55519TO55599STEP+40:O=O+1:POKER,EZ(O):NEXT 8818 IFV$=P$(18)THENFORR=55520TO55600STEP+40:O=O+1:POKER,EZ(O):NEXT 8819 IFV$=P$(19)THENFORR=55521TO55601STEP+40:O=O+1:POKER,EZ(O):NEXT 8820 IFV$=P$(20)THENFORR=55592TO55752STEP+40:O=O+1:POKER,EZ(O):NEXT 8821 IFV$=P$(21)THENFORR=55593TO55673STEP+40:O=O+1:POKER,EZ(O):NEXT 8822 IFV$=P$(22)THENFORR=55594TO55754STEP+40:O=O+1:POKER,EZ(O):NEXT 8823 IFV$=P$(23)THENFORR=55596TO55756STEP+40:O=O+1:POKER,EZ(O):NEXT 8824 IFV$=P$(24)THENFORR=55597TO55677STEP+40:O=O+1:POKER,EZ(O):NEXT 8825 IFV$=P$(25)THENFORR=55598TO55758STEP+40:O=O+1:POKER,EZ(O):NEXT 8826 IFV$=P$(26)THENFORR=55669TO55749STEP+40:O=O+1:POKER,EZ(O):NEXT 8827 IFV$=P$(27)THENFORR=55670TO55750STEP+40:O=O+1:POKER,EZ(O):NEXT 8828 IFV$=P$(28)THENFORR=55671TO55751STEP+40:O=O+1:POKER,EZ(O):NEXT 8829 IFV$=P$(29)THENFORR=55715TO55755STEP+40:O=O+1:POKER,EZ(O):NEXT 8830 IFV$=P$(30)THENFORR=55679TO55759STEP+40:O=O+1:POKER,EZ(O):NEXT 8831 IFV$=P$(31)THENFORR=55680TO55760STEP+40:O=O+1:POKER,EZ(O):NEXT 8832 IFV$=P$(32)THENFORR=55681TO55761STEP+40:O=O+1:POKER,EZ(O):NEXT 8850 RETURN 9000 PRINT"[147][159] (C) BUT OK TO COPY WITHOUT CHANGES." 9001 PRINT"WELCOME TO [158]CROSS [219] TRIVIA BY K.HIGHAM 9004 [153]" THE REASON YOU GOT THIS GAME FOR " 9005 [153]"FREE WAS....WE FIGURED IF YOU LIKE " 9006 [153]"TO PLAY IT AS MUCH AS WE DO YOU WILL" 9007 [153]"WANT SOME MORE PUZZLES.....SO GUESS " 9009 [153]"WHAT....WE JUST HAPPEN TO HAVE SOME..!" 9010 [153]"NOT FOR FREE BUT PRETTY CHEAP.....!" 9011 [153]"SYSCONTINUE? PRESS RETURN" 9012 [161]A$:[139]A$[178]""[167]9012 9013 [153]"LOAD HERE'S WHAT WE HAVE:" 9014 [153]"PRINT#POTPOURII #1  EACH PROGRAM HAS " 9015 [153]"PRINT#POTPOURII #2 2O PUZZLES FOR" 9016 [153]"PRINT#POTPOURII #3  $19.95 " 9017 [153]"PRINT#SPORTS #1" 9018 [153]"SPORTS #2 MAKE CHECKS PAYABLE TO:" 9019 [153]"PRINT#MOVIES TV #1" 9020 [153]"MOVIES TV #2 KARL HIGHAM " 9021 [153]"PRINT#MOVIES TV #3 PRINT#AND SEND TO: " 9022 [153]"PRINT#SPANISH #1 22672 LAMBERT ST. " 9023 [153]"PRINT#GERMAN #1 BOX 333 " 9024 [153]"PRINT#FRENCH #1 LAKE FOREST CA. " 9025 [153]"PRINT#MATH #1 9263O" 9026 [153]"PRINT#SCIENCE #1" 9027 [153]"PRINT#GRADE 1/3 #1 SPECIFY: OPENGAME NAME & NO." 9028 [153]"PRINT#GRADE 4/6 #1 OPENTAPE OR DISK" 9029 [153]"CLRXXX RATED #1 " 9030 [153]"CLRXXX RATED #2 ORDER THREE GET ONE FREE!" 9031 [153]"CLRXXX RATED #3 USRUSRUSRUSRUSR USRUSRUSRUSRUSR USRUSRUSR USRUSRUSR USRUSRUSRUSR" 9050 [153]"SYSCONTINUE? PRESS RETURN" 9051 [161]A$:[139]A$[178]""[167]9051 9052 [142] 9060 [153]"LOADOPENNOTE:PRINT# NOT USEABLE WITHOUT PUZZLE DATA!" 9061 [129]R[178]1[164]5000:[130]:[138] 9100 [131]---- YOUR,COAT,(SNATCH), , ,FETCH, , , , ,'----A',LAND AT,THE MOUTH 9101 [131]OF A,RIVER,S----,AGNEW, , , ,ROW A,BOAT,WITH AN,---, ,STOVE,PART, , , 9102 [131]------,STUDIES,(SCHOOL,SUBJECT), ,AMERICAN,VETERANS,(ABBR.), , 9104 [131]TOPSOIL, , , , ,CEASE,TO,LIVE, , ,CAPITAL,OF,KANSAS, , 9105 [131]DO YOU,HAVE YOUR,---- --?,(HEAR ME?),(CB 2/WDS),---SOME,PROFOUND/ 9106 [131]IMPRESSIVE, , ,ONE,(SPANISH), , , ,GRASS,LEAVES, , , 9107 [131]'PARK YOUR,---'+,'---,AT WORK.',=1WD/OPERA,THE MOUSE,---,THE CHEESE 9108 [131] , ,GEORGE,WASHINGTON,NEVER TOLD,A ---, ,HARD,TO,FIND, , ,CAPITAL 9109 [131]OF,NEW YORK, , ,----,OFFICE,(MAIL,DEPOT), ,RUDYARD,KIPLING,STORY, , 9110 [131]DUELING,SWORD,OR,FOIL, ,OXEN,(TIBET), , , ,DISTRESS,CALL,(MORSE,CODE) 9111 [131] ,LET US,(SHORT,FORM), , 9112 [131]GENERAL,PRACTION-,ERS,(DOCTORS/,ABBR.),RIVER,(SPANISH), , , 9113 [131]PART OF A,CIRCULAR,LINE, , ,CAPITAL,OF IDAHO, , , ,----- MIER,(WOMAN 9114 [131]PREMIER,OF ISREAL), ,EACH,(ABBR.), , , ,EXCHANGE,ONE THING,FOR,ANOTHER 9115 [131] ,CAPITAL,OF,DELAWARE, , ,THE DAY,BEFORE, , , ,ROOM TO,---,(FOR RENT) 9116 [131] , ,TONS,(ABBR.), , , ,EVERYTHING,IS,ALLRIGHT,(SPACE,JARGON),'MAMMA 9117 [131]---',(MY MOTHER,/ITALIAN), ,PICK UP,THE ---,(PAY FOR), , 9118 [131]'THE ---,AND THE,PUSSYCAT',(RHYME), ,'THE,PRINCESS,AND THE,---' 9119 [131]FAIRY TALE,ADDING,GETS THE,---, , ,ONE,TIMES,ONE,EQUALS,---,WORD 9120 [131]BEGINNING,MEANING,OPPOSITE,OF,TARGET,GAME, , , ,ETCETERA,(ABBR.), , , 9121 [131]LOOKS,FOR, , , ,'-----,UP',QUITS,TALKING, ,TO,HAVE,AN,AILMENT, ,SOUTHERN 9122 [131]SOLDIER,OF THE,CIVIL WAR, ,SECRET,AGENT, , , ,---L,TRAIN FUEL, , , 9123 [131]INQUIRE, , , , ,- - U,PAYMENT,VOUCHER, , ,BIG,MONKEY, , , ,PROFIT 9124 [131]AFTER,EXPENCES, , ,AFFIRMA-,TIVE, , , 9125 [131]7,18,1,2,7,5,20,4,5,12,20,16,9,18,15,15,1,18,15,22,5,14,19,15,3,9,1 9126 [131]12,1,13,22,5,20,19,19,15,4,4,9,5,20,15,16,5,11,1,5,1,18,19,15,14,1,23 9127 [131]5,21,14,15,2,12,1,4,5,19,3,1,18,13,5,14,1,20,5,12,9,5,19,3,1,18,3,5 9128 [131]1,12,2,1,14,25,16,15,19,20,11,9,13,5,16,5,5,25,1,11,19,19,15,19,12,5 9129 [131]20,19 9130 [131]7,16,19,18,9,15,1,18,3,2,15,9,19,5,7,15,12,4,1,5,1,20,18,1,4,5,4,15,22 9131 [131]5,18,5,22,5,12,5,20,20,14,19,1,15,11,13,9,1,20,1,2,15,23,12,16,5,1,19 9132 [131]21,13,15,14,5,14,15,14,4,1,18,20,19,5,20,3,19,5,5,11,19,3,12,1,13,19 9133 [131]1,9,12,18,5,2,5,12,19,16,25,3,15,1,1,19,11,9,15,1,16,5,14,5,20,25,5,19 9140 [131]GRAB,GET,DELT,PIRO,OAR,OVEN,SOCIAL,AMVETS,SOD,DIE,TOPEKA,EARSON,AWE 9142 [131]UNO,BLADES,CARMEN,ATE,LIE,SCARCE,ALBANY,POST,KIM,EPEE,YAKS,SOS,LETS 9143 [131]GPS,RIO,ARC,BOISE,GOLDA,EA,TRADE,DOVER,EVE,LET,TNS,AOK,MIA,TAB,OWL,PEA 9144 [131]SUM,ONE,NON,DARTS,ETC,SEEKS,CLAMS,AIL,REBEL,SPY,COA,ASK,IO,APE,NET,YES 9200 [131]'DA ----',BROOKLYN,NINE, , ,RENOWNED,BAND,LEADER, , ,CLASSIFY, , , , 9201 [131]TOURNEY,FOR,AMATUERS,AND,PROS,MEL ---,(BASEBALL), , , ,KOREA,CONTINENT 9202 [131] , , ,RELAYED,ITEMS, , , ,EGG,SHAPE, , , ,'--- IS ME, , , , ,'--- 9203 [131]DE,MER',(SEA-,SICKNESS),EXPLOSIONS, , , , ,LEVERAGE,TOOL, , , ,HOLE 9204 [131]IN,THE,HEAD, ,THIEVES,LEADER, , , ,SPECIAL,EDITIONS, , , ,OBSCURED, , 9205 [131] , ,EVEREST,FOR,ONE, , ,---,SKIP,AND,JUNP, ,EXACTLY,RIGHT,(2 WDS), , 9206 [131]IN,DANGER,(2 WORDS), , ,FEMALE,(SUFFIX), , , ,DICKENS,CHARACTER, , , 9207 [131]NOTION, , , , ,---- OFF,(DROVE), , , ,VIEW, , , , ,'----,BONES', , , 9208 [131]BURNS,OR,BARKER, , ,'-- -,CREEK',(2 WORDS), , ,INTER-,SECTED, , , 9209 [131]FLAKEY,WEATHER,CONDITIONS, , ,GETS,DEFEATED, , , ,SPIELBERG,FILM, , , 9210 [131]STAMP, , , , ,'LONG,TALL,-----', , ,ORB.,SOL.,OBSRVTRY.,(INLS.), ,--- 9211 [131]TIN,TIN, , ,CHILDS,GAME, , , ,NEGATIVE,(ADVERB), , , ,CANDY,OR,SAND, , 9212 [131]STINGER, , , , ,NOT,TENSE, , , ,CARNEY,OR,JAMES, , ,'---,NEWS,BEARS', 9213 [131] ,ALCOHOLIC,BEVERAGE, , , ,MAKE,FREE,OF, , ,GRADED, , , , ,HIRT,AND 9214 [131]JOLSEN, , ,BLEMISHES, , , , ,DISHONOR, , , , ,'---,POTATO', , , ,----- 9215 [131]SHOWERS, , , ,NEW YORK,FOOTBALLER, , , ,U OF U,STUDENT, , , ,FEMALE 9216 [131]SAINT,(ABBR.), , ,THAT IS,(LAT.),(ABBR.), , ,EDDIE,CANTOR'S,SPOUSE, , 9217 [131]SAYS,(SLANG), , , ,MISS,BALLARD, , , 9220 [131]2,21,13,19,12,5,19,19,15,18,20,15,16,5,14,15,20,20,1,19,9,1,2,1,20,15 9221 [131]14,19,15,2,12,15,14,7,23,15,5,13,1,12,2,12,1,19,20,19,16,18,25,2,1,18 9222 [131]5,1,18,1,12,9,5,24,20,18,1,19,19,8,1,4,5,4,1,12,16,8,15,16,10,21,19,20 9223 [131]19,15,1,20,18,9,19,11,5,20,20,5,20,9,13,9,4,5,1,20,5,5,4,19,5,5,12,1,26 9224 [131]25,2,15,2,21,16,1,13,5,20,19,14,15,23,19,12,15,19,5,19,5,20,19,20,15,13 9225 [131]16,19,1,12,12,25,15,19,15,18,9,14,20,1,7,14,15,20,2,1,18,2,5,5,12,1,24 9226 [131]1,18,20,2,1,4,1,12,5,18,9,4,18,1,20,5,4,1,12,19,19,16,15,20,19,19,8,1 9227 [131]13,5,8,15,20,1,16,18,9,12,10,5,20,21,20,5,19,20,5,9,5,9,4,1,19,5,26,11 9228 [131]1,25 9230 [131]BUMS,LES,SORT,OPEN,OTT,ASIA,BATONS,OBLONG,WOE,MAL,BLASTS,PRYBAR,EAR 9231 [131]ALI,EXTRAS,SHADED,ALP,HOP,JUSTSO,ATRISK,ETTE,TIM,IDEA,TEED,SEE,LAZY 9232 [131]BOB,UPA,MET,SNOWS,LOSES,ET,STOMP,SALLY,OSO,RIN,TAG,NOT,BAR,BEE,LAX,ART 9233 [131]BAD,ALE,RID,RATED,ALS,SPOTS,SHAME,HOT,APRIL,JET,UTE,STE,IE,IDA,SEZ,KAY 9299 [131]PROMINENT,DARANTE,HOPE,FEATURE, ,22O4.62LBS,(METRIC), , , ,'THE 9300 [131]HOSTESS,WITH,THE,----EST',SENSE,OF,SMELL,STIMULANT, ,LONELIEST 9301 [131]NUMBER,(SONG), , ,HEIGHT,TIMES,WIDTH, , ,HOLD,IN,CUSTODY, , ,HAVING,TO 9302 [131]DO,WITH,WORDS,CRAFTY, , , , ,MR.,MARSHALL,(INS.), , ,AUCTION,ENDERS 9303 [131] , , ,ROSE,GARDEN, , , ,YES,VOTE, , , ,---ISON,(CLOSE,BOND), , 9304 [131]LACK,OF,VIRILITY, , ,COMRADE, , , , ,SHOEMAKER,TOOL, , , ,ZODIACAL,SIGN 9305 [131] , , ,'FROM,HERE,TO,ETERNITY',CHARACTER,BELONGING,TO ONE,OF THE 9306 [131]CHIPMONKS, ,'- ---,FOR ALL,SEASONS',(2 WORDS), ,SHORT 9307 [131]SWIM, , , ,'----,CANAL',(SONG), , ,MISS,BRECK-,ENRIDGE, , ,FEMALE 9308 [131]SIBLING,(SLANG), , ,BLIND,OR,WEDDING,OR,PITTED 9309 [131]'WINKEN,BLINKEN,AND ---', , ,'--- TO,BILLY JO', , , ,DRUNKARD 9310 [131] , , , ,RUB,OUT, , , ,MISTER,RANDALLS, , , ,ATOP, , , , ,'----- ON 9311 [131]SUNDAY', , , ,SCHOOL,-----,(TEACHERS), , ,SPHERICAL,BODY, , , ,CECIL'S 9312 [131]SICKNESS, , , ,'HEAVY,ME---',(GROUP), , ,UNDER THE,WEATHER, , , 9313 [131]SELF, , , , ,GIRLS,ATHLETIC,ASSN,(ABBR.), ,MISS RAND,(AUTHOR), , , 9314 [131]22ND,LETTER,(PHONETIC), , ,'---,IN THE,FAMILY', , ,RIVER,(SPAN.) 9316 [131] , , ,DEVIATE,FROM,SIDE,TO,SIDE,-----,CARTA, , , ,K---,(FLIGHT-,LESS 9317 [131]BIRD), ,DULL,PERSONS, , , ,DOCTOR,DENTON,VENTS, , ,MARINE,SHOCKER 9318 [131] , , ,CHERISHED, , , , ,MADAM,(SLANG), , , ,MISS,VANDERBILT, , , 9319 [131]GAMEFISH, , , , ,ROMAN,NUMERAL,2, , ,MISTER,GERSHWIN, , , 9320 [131]--- WIT, , , , ,OBSERVE, , , , 9325 [131] 14,15,19,5,20,15,14,13,15,19,20,15,4,15,18,15,14,5,1,18,5,1,4,5,20,1,9 9326 [131] 14,22,5,18,2,1,12,19,12,25,5,7,13,7,1,22,5,12,19,18,15,19,1,18,25,1,25 9327 [131] 5,12,9,1,1,14,5,13,9,3,6,5,12,12,15,23,1,23,12,12,5,15,13,1,7,7,9,15 9328 [131] 1,12,22,9,14,19,1,13,1,14,4,9,16,5,18,9,5,13,25,18,1,19,9,19,4,1,20,5 9329 [131] 14,15,4,15,4,5,19,15,20,5,18,1,19,5,20,15,14,25,19,15,14,14,5,22,5,18 9330 [131] 13,1,18,13,19,15,18,2,19,5,1,20,1,12,9,12,12,5,7,15,7,1,1,1,25,14,22,5 9331 [131]5,1,12,12,18,9,15,25,1,23,13,1,7,14,1,9,23,9,3,12,15,4,19,6,12,1,16 9332 [131]19,5,5,12,12,15,22,5,4,13,1,13,1,13,25,7,1,18,9,9,9,18,1,14,9,20,19,5,5 9335 [131]NOSE,TON,MOST,ODOR,ONE,AREA,DETAIN,VERBAL,SLY,EGM,GAVELS,ROSARY,AYE 9336 [131]LIA,ANEMIC,FELLOW,AWL,LEO,MAGGIO,ALVINS,AMAN,DIP,ERIE,MYRA,SIS,DATE 9337 [131]NOD,ODE,SOT,ERASE,TONYS,ON,NEVER,MARMS,ORB,SEA,TAL,ILL,EGO,GAA,AYN,VEE 9338 [131]ALL,RIO,YAW,MAGNA,IWI,CLODS,FLAPS,EEL,LOVED,MAM,AMY,GAR,II,IRA,NIT,SEE 9500 [153]"LOADSYSCROSS TRIVIA INSTRUCTIONS" 9505 [153]"FOR 1 TO 4 PLAYERS OR TEAMS" 9506 [153]"PRINT# AGES SIX TO ADULT" 9507 [153]"CLR APPROX. PLAYING TIME: 2 HOURS." 9510 [153]"PRINT# WHEN YOU BEGIN PLAY YOU WILL SEE A" 9511 [153]"BLANK CROSSWORD PUZZLE GRID BETWEEN " 9512 [153]"THE 'FORACROSSPRINT#' AND 'FORDOWNPRINT#' CLUE BOXES. " 9513 [153]"BENEATH THIS DISPLAY ARE THE COLORED " 9514 [153]"BLOCKS NUMBERED FROM 1 TO 5, THE SCOR-" 9515 [153]"ING SECTION AND THE PROMPT AREA. " 9516 [153]"THE COLORED BLOCKS DISPLAY A RANDOM " 9517 [153]"NUMBER WHICH IS THE NUMBER OF SQUARES " 9518 [153]"YOU MUST MOVE IN ONE OF THE FOUR DIR- " 9519 [153]"ECTIONS;OPENUP/DOWN/RIGHT/LEFTWAITPRINT#. IF THE MOVE" 9520 [153]"WOULD PUT YOU OFF THE GRID, IT WRAPS " 9521 [153]"AROUND AND CONTINUES AT THE OTHER END. " 9522 [153]"THE FLASHING NUMBERS ON THE GRID AFTER " 9523 [153]"YOUR 'ROLL' ARE THE CHOICES FOR YOUR " 9530 [153]"CONTINUE? PRESS RETURN" 9531 [161]B$:[139]B$[178]""[167]9531:[139]B$[179][177]"Y"[167][142] 9534 [153]"LOADWAITPOSITION. WHEN YOU PRESS ONE OF THESE " 9535 [153]"NUMBERS ON THE KEYBOARD, THE CLUES FOR " 9536 [153]"BOTH WORDS WHICH INTERSECT THEREWAIT WILL " 9537 [153]"BE DISPLAYED IN THIER BOXES. IF YOU " 9538 [153]"TYPE AND ENTER EITHERWAIT CORRECT WORD, IT" 9539 [153]"WILL APPEAR ON THE GRID AND YOU WILL " 9540 [153]"BE AWARDED (1) POINT FOR EACH LETTER. " 9541 [153]"THERE ARE A TOTAL OF 22O POINTS. " 9542 [153]"SOMETIMES A CORRECT ENTRY WILL COMPLETE" 9543 [153]"ANOTHER WORD. YOU SCORE ONLYWAIT WORD TYPED." 9544 [153]" THE GRID WILL FILL SHORTLY BEFORE" 9545 [153]"ALL THE POINTS HAVE BEEN AWARDED, SO " 9546 [153]"PLAYERS SHOULD AGREE BEFORE STARTING " 9547 [153]"WHETHER TO PLAY OUT THE POINTS OR STOP" 9548 [153]"WHEN THE GRID IS FULL. " 9549 [153]"PLAYING OUT IS FUN....! TRY IT...." 9550 [153]"CONTINUE? PRESS RETURN" 9551 [161]B$:[139]B$[178]""[167]9551:[139]B$[179][177]"Y"[167][142] 9555 [153]"LOADWAITYOU WILL HAVE NO DIFFICULTY LEARNING" 9556 [153]"HOW THE GAME PLAYS, BUT THERE IS MORE" 9557 [153]"TO IT THAN MEETS THE EYE AT FIRST SINCE" 9560 [153]"THERE IS CONSIDERABLE STRATEGY REQUIRED" 9561 [153]"FOR PLAYING 'POSITION' IN ORDER TO MAX-" 9562 [153]"IMIZE POINTS AND SETTING UP FOR THE " 9563 [153]"BEST PROPABILITY OF CATCHING A WORD ON" 9564 [153]"THE NEXT ROLL." 9565 [153]"TIMELY WORD CHOICES AND SMART POSITION" 9566 [153]"PLAYS PROVIDE QUITE AN ADVANTAGE." 9567 [153]"BE SURE TO TYPE ALLWAIT THE LETTERS IN A" 9568 [153]"WORD EVEN THOUGH SOME OF THE LETTERS" 9569 [153]"ARE REVEALED." 9570 [153]"GAME (1) FOR SCHOOL AGE...GOOD TUNEUP." 9575 [153]"TYPE 'Q' AT MOVE PROMPT TO END GAME." 9576 [153]"SYSREADY TO PLAY? PRESS RETURN" 9590 [161]A$:[139]A$[178]""[167]9590 9595 [142] 9600 [151]F[171]N,49:[151]G[171]N,50:[151]H[171]N,51:[151]I[171]N,52 9601 [151]F,7:[151]G,7:[151]H,7:[151]I,7:[141]920 9602 [129]R[178]1[164]1000:[130] 9603 [151]F,AA:[151]G,BB:[151]H,CC:[151]I,DD 9604 [151]F[171]N,WW:[151]G[171]N,XX:[151]H[171]N,YY:[151]I[171]N,ZZ 9605 [129]R[178]1[164]1000:[130] 9606 [151]X(Z),EE(Z):[142] 9608 [151]F[171]N,WW:[151]G[171]N,XX:[151]H[171]N,YY:[151]I[171]N,ZZ:[129]R[178]1[164]1000:[130] 9610 [129]R[178]1[164]100:[130]:[142] 9620 [129]R[178]1[164]700:[130]:[142] 9630 [129]R[178]1[164]3000:[130]:[142]