5 DIMM$(12),T$(5):FORA=1TO12:READM$(A):NEXT
6 POKE775,168:POKE808,234
7 PRINT"{clear}":POKE53280,0:POKE53281,0:B$="{space*39}"
8 B=1:DIMS$(25,6),R$(25,2):Y$="o.k.":DF=1
9 OPEN2,8,2,"inv,s,r":FORA=1TO5:INPUT#2,T$(A):NEXT:CLOSE2:IFT$(1)<>""THEN12
10 GOSUB2148
12 Y2$="i can't do that...yet"
13 V=53248:S=54272:SB=53265
14 X1$="burchoclidigdivdridro":X2$="eatfilgetgo heljumloo"
15 X3$="movopepulquirearun":X4$="savshosmaswithrtiewea"
16 FORA=1TO25:FORAA=1TO2:READA$:R$(A,AA)=A$:IFA$=""THENAA=2
17 NEXTAA,A:POKE198,0:GOTO24
18 PRINT"{clear}{down*4}"SPC(8)"{yellow}enter adventurer level{down}":PRINTSPC(10)"{light blue}1 only learning{down}"
19 PRINTSPC(10)"2 two or three safaris{down}":PRINTSPC(10)"3 jungle jim type{down*3}"
20 PRINTSPC(13)"{pink}enter type"
21 GETA$:IFA$=""THEN21
22 GL=VAL(A$):IFGL<1ORGL>3THENPRINT"{up}";:PRINTB$:PRINT"{up}";:GOTO20
23 GOTO41
24 PRINT"{clear}{down*4}"SPC(8)"{light blue}do you wish to restore{down}":PRINTSPC(12)"a saved safari{down}"
25 PRINTSPC(17)"{yellow}y/n":GOSUB2000
26 IFA$="y"THEN2100
28 FORA=1TO25:FORAA=1TO6:READA$:S$(A,AA)=A$:IFA$=""THENAA=6
29 NEXTAA:NEXTA:GOTO18
40 PRINTY$:GOSUB2010
41 PRINT"{clear}";:POKESB,PEEK(SB)AND239:GOSUB2020:SX=0:Y=0:SP=0:X=0
49 IFB>13THEN51
50 ONBGOTO3304,3604,3550,3850,3604,3550,3550,3704,3732,3304,3004,3004,3604
51 B=B-13
52 ONBGOTO3604,3654,3885,3354,3354,3754,3252,3108,3504,3108,3900,3950
70 POKESB,PEEK(SB)OR16
71 PRINT"{home}{down*15}"
72 PRINT"{yellow}i am ";:IFB>20THEN75
74 ONBGOTO78,80,82,84,86,88,90,92,94,95,97,99,101,102,104,106,108,110,111,113
75 B=B-20
76 ONBGOTO115,117,119,121,123
78 PRINT"on the bank of the fast flowing":PRINT"zambesi river opposite trader jims."
79 PRINT"two paths lead into the jungle":GOTO126
80 PRINT"on a jungle trail.thick growth":PRINT"abounds.monkies shriek and move"
81 PRINT"through the trees as you approach":GOTO126
82 PRINT"in thick jungle.the light is dim":PRINT"here.elephants appear in a break"
83 PRINT"through the vegetation":GOTO126
84 PRINT"at a small clearing.there appears":PRINT"to be a dead body to one side."
85 PRINT"other items lie scattered about":GOTO126
86 PRINT"in a small clearing.a family":PRINT"of apes blocks your progress.they"
87 PRINT"are playing ball with two boulders":GOTO126
88 PRINT"amongst thick vegetation.insects":PRINT"swarm around your head.small animals"
89 PRINT"move around out of view":GOTO126
90 PRINT"on a track.the jungle appears to":PRINT"thin ahead of you.a musty smell is"
91 PRINT"accompanied by softening of the ground":GOTO126
92 PRINT"in a marsh.ahead is an old tree":PRINT"and clumps of reeds.in the distance a"
93 PRINT"river seems to border the marsh":GOTO126
94 PRINT"in {pink}quicksand{yellow} and sinking fast!!!":GOTO126
95 PRINT"by a muddy river.across the water":PRINT"cliffs rise to a high plateau.water"
96 PRINT"flows into the river from a stream":GOTO126
97 PRINT"by a deep ravine across from a":PRINT"waterfall.sunlight reflects from an"
98 PRINT"object in the hills above the ravine":GOTO126
99 PRINT"by a rope bridge over the ravine.":IFG=1THENPRINT"{down}":GOTO126
100 PRINT"a zulu with a big spear stands guard":PRINT"at the far end...":GOTO126
101 PRINT"by a swift stream which disappears":PRINT"into the undergrowth.":GOTO126
102 PRINT"on a jungle trail. sunlight grows":PRINT"dim as the trees thicken."
103 PRINT"vines hang from all the trees":GOTO126
104 PRINT"in a small clearing by a dark":PRINT"lagoon":IFDC=1THENPRINT"{down}":GOTO126
105 PRINT"water falls down a weird cliff":GOTO126
106 PRINT"at the bottom of the dark lagoon.":PRINT"shafts of sunlight illuminate the"
107 PRINT"water.weird fish abound":GOTO126
108 PRINT"in a dank cave.another opening":PRINT"leads south,but appears to be covered"
109 PRINT"with a thick sticky web???":GOTO126
110 PRINT"in the inner cave.it is dim here":PRINT"and hard to see.":GOTO126
111 PRINT"in the centre of a swaying rope":PRINT"bridge.far below water rushes over"
112 PRINT"jagged rocks":GOTO126
113 PRINT"on a narrow ledge above the river":PRINT"wind threatens to drag you from"
114 PRINT"your precarious perch":GOTO126
115 PRINT"on a rocky river bank covered with":PRINT"stones.spray drenches you from"
116 PRINT"head to toe":GOTO125
117 PRINT"clinging to wet,moss covered rocks":PRINT"in a raging river!{space*2}what a lot of"
118 PRINT"jolly good fun!":GOTO125
119 PRINT"at the base of ancient towering":PRINT"cliffs below a high plateau.here you"
120 PRINT"are sheltered from the spray":GOTO125
121 PRINT"on an ancient plateau by a ravine":PRINT"the jungle here appears different"
122 PRINT"and the air feels drier":GOTO125
123 PRINT"in a small clearing.an old native":PRINT"at least 7' tall sits outside a hut."
124 PRINT"he guards the track going east...":GOTO125
125 B=B+20
126 IFB=10ANDR=1THENPRINT"{pink}{down}you're free but lost your rifle..":R=4:GOSUB2011:GOTO41
128 IFB=16THENDB=DB+1:IFDB=4THENPRINT"{down}{reverse on}{light blue}i run out of breath...{reverse off}":GOSUB2011:GOTO2210
130 IFB=17ANDDH=1THENDI=DI+1:IFDI=4THEN1100
131 IFB=18ANDDH=1THENDI=DI+1:IFDI=4THEN1100
132 IFB=25ANDDG=0THENPRINT"{down}{pink}the zulu rises":GOSUB2013:PRINT"and hurls his spear":GOTO2210
150 POKE198,0:PRINT"{down}{light blue}> ";:C=0:Q=18:Z$="":J=1:C$="":D$="":IC=0
152 GETW$:C=C+1:IFW$=CHR$(13)THENPRINTCHR$(32):GOSUB2005:GOTO200
153 IFC=3THENQ=164-Q:C=0
154 PRINTCHR$(Q)CHR$(32)CHR$(146)CHR$(157);
155 IFW$=CHR$(20)THENW$="":IFLEN(Z$)>0THENPRINTCHR$(20);:Z$=LEFT$(Z$,(LEN(Z$)-1)):Z=Z-1
156 IFW$=CHR$(32)THENJ=LEN(Z$)+2:GOSUB2005:GOTO158
157 IFW$<CHR$(65)ORW$>CHR$(90)THENW$=""
158 PRINTW$;:Z$=Z$+W$:Z=LEN(Z$):IC=IC+1
160 IFB=11ANDIC=6THENGOSUB2200
161 IFB=19ANDK=0ANDIC=15THENGOTO2260
162 IFB=9ANDP=0ANDIC=30THENGOTO2290
163 IFMS=5ANDIC=40THENGOSUB8020:MS=0
199 GOTO152
200 GC=GC+1:PRINT"{light blue}":IFZ=0THEN41
201 IFZ>1THEN300
204 IFZ$="i"THEN2060
205 IFZ$="g"THEN2030
206 IFZ$="l"THEN2150
208 FORA=1TO2:IFR$(B,A)=Z$THEN210
209 NEXT:GOTO223
210 IFB=1ANDZ$="e"THENB=6:GOTO40
211 IFB=14ANDZ$="e"THENB=11:GOTO40
212 IFB=6ANDZ$="w"THENB=1:GOTO40
213 IFB=17ANDZ$="e"THENB=15:GOTO40
214 IFB=17ANDZ$="s"ANDDH=0THENPRINTY$:GOSUB2010:PRINT" you're stuck & here's the spider":GOTO2210
215 IFB=18ANDZ$="n"ANDDH=0THENPRINTY$:GOSUB2010:PRINT" you're stuck & here's the spider":GOTO2210
216 IFB=25ANDZ$="e"ANDDN=0THENPRINT"the zulu bars your way":GOTO2040
217 IFB=25ANDZ$="e"ANDDN=1THENGOSUB8020:GOTO8100
218 IFZ$="n"THENB=B-1:GOTO40
219 IFZ$="s"THENB=B+1:GOTO40
220 IFZ$="e"THENB=B+1:GOTO40
221 IFZ$="w"THENB=B-1:GOTO40
223 PRINT"sorry can't go there":GOTO2040
300 D$=MID$(Z$,J,3):IFASC(C$)>82THEN312
301 IFASC(C$)>76THEN310
302 IFASC(C$)>68THEN307
304 FORA=1TO7:IFLEFT$(C$,3)=MID$(X1$,A*3-2,3)THENONAGOTO710,490,470,530,500,540,440
305 NEXT:GOTO314
307 FORA=1TO7:IFLEFT$(C$,3)=MID$(X2$,A*3-2,3)THENONAGOTO560,520,420,330,750,460,600
308 NEXT:GOTO314
310 FORA=1TO6:IFLEFT$(C$,3)=MID$(X3$,A*3-2,3)THENONAGOTO370,680,410,2215,690,360
311 NEXT:GOTO314
312 FORA=1TO7:IFLEFT$(C$,3)=MID$(X4$,A*3-2,3)THENONAGOTO900,570,590,550,380,510,580
313 NEXT
314 PRINT"sorry can't translate":GOTO2040
330 IFB=2ORB=3ORB=5ORB=6ORB=14ANDD$="jun"THENPRINT"it's far too thick":GOTO2040
331 IFB=15ANDD$="lag"THENPRINT"it's too deep,i can't reach the bottom":GOTO2040
332 IFB=11ANDD$="pat"THENB=14:GOTO40
333 IFB=15ANDDC=1ANDD$="cav"THENB=17:GOTO40
334 IFB=22ANDD$="ban"THENB=21:GOTO40
335 IFB=12ANDD$="led"THENB=20:GOTO40
336 IFB=14ANDD$="ope"ANDD=1THENB=15:GOSUB8000:GOSUB8003:GOSUB8010:MS=5:GOTO40
338 IFB=15ANDD$="cav"ANDF=1THENB=17:GOSUB8000:GOSUB8004:GOSUB8010:MS=5:GOTO40
339 IFB=12ANDD$="bri"ANDG=0THEN2205
340 IFB=12ANDD$="bri"ANDG=1ANDK=0THENB=19:GOTO40
341 IFB=21ANDD$="roc"THENB=22:GOTO40
345 PRINT"i can't go there":GOTO2040
360 IFB=19THENPRINT"right ! lets get outa here!!!":B=12:GOSUB2013:K=1:GOSUB2269:GOTO41
369 GOTO2003
370 IFB=4ANDD$="bod"ANDN=0THENN$="spear":N=1:PC=PC+1:GOTO2280
371 IFB=13ANDD$="roc"ANDDC=0THENN$="sceptre":GOSUB2300:GOTO375
374 GOTO2003
375 IFE=0THENPRINTY2$:GOTO2040
376 PRINTY$" i use the sceptre...":GOSUB2013:DC=1:PC=PC+1:GOTO2319
379 GOTO2003
380 IFB=9ANDD$="rop"THENN$="rope":GOSUB2300:GOTO390
381 IFB=12ANDD$="spe"THENN$="spear":GOSUB2300:GOTO392
382 IFB=18ANDD$="spe"ANDF=0THENN$="spear":GOSUB2300:GOTO396
383 IFD$="kni"THENN$="knife":GOSUB2300:GOTO399
384 IFD$="vin"ANDB=22THENN$="vine":GOSUB2300:GOTO401
389 GOTO2003
390 IFE=0THEN2004
391 PRINTY$;:GOSUB2013:PRINT"{right}it catches on the tree...":P=1:T$(A)="":GOTO2040
392 IFE=0THEN2004
393 PRINTY$;:GOSUB2010:PRINT" it speeds towards the zulu":GOSUB2010:T$(A)=""
394 PRINT"it hits...";:GOSUB2013:PRINT"he topples into the ravine":S$(23,6)="spear"
395 S$(23,5)="dead zulu":GOSUB2013:G=1:GOTO2040
396 IFE=0THEN2004
397 PRINT"well done! ";:GOSUB2013:PRINT" you got the snake!!!":F=1:S$(18,1)="dead snake"
398 S$(18,6)="spear":T$(A)="":GOSUB2013:GOTO41
399 IFE=0THEN2004
400 PRINTY$;:GOSUB2010:PRINT" but i think you should keep it!":T$(A)="":GOTO2040
401 IFE=0THEN2004
402 PRINTY$" it catches on the far bank":W=1:T$(A)="":GOTO2040
409 GOTO2003
410 IFB=9ANDP=1ANDU=0ANDD$="rop"THENPRINT"ughh!!!{space*2}you're really stuck..":U=1:GOTO2040
411 IFB=9ANDP=1ANDU=1ANDD$="rop"THENPRINT"phew!!!{space*2}you're moving...":U=2:GOTO2040
412 IFB=9ANDP=1ANDU=2ANDD$="rop"THENPRINT"thats it!! you're free!!":U=3:PC=PC+1:GOTO2305
419 GOTO2003
420 N$=D$:GOSUB2160
421 IFN$<>"sceptre"THEN424
422 FORA=1TO5:IFT$(A)=""THEN424
423 NEXT:DA=0
424 IFB=18ANDF=0ANDN$="box"THENPRINTY$:GOSUB2010:PRINT"the snake strikes..":GOTO2210
425 FORA=1TO5:IFT$(A)=N$THENPRINT"i already have it":GOTO2040
426 NEXT:FORA=1TO6:IFS$(B,A)=N$THEN428
427 NEXT:PRINT"i can't get that":GOTO2040
428 FORAA=1TO5:IFT$(AA)=""THEN430
429 NEXT:PRINT"my pack is full...":GOTO2040
430 T$(AA)=N$:S$(B,A)=""
431 FORA=1TO5:IFT$(A)="old blade"THENT$(A)="machete"
432 NEXT:IFN$="sceptre"THENGOTO40
433 IFN$="rope"ANDB=20THENDD=0
434 PRINTY$:GOTO2040
440 N$=D$:GOSUB2160
445 FORA=1TO5:IFT$(A)=N$THEN447
446 NEXT:PRINT"i don't have it..":GOTO2040
447 FORAA=1TO6:IFS$(B,AA)=""THEN449
448 NEXT:PRINT"sorry no room here":GOTO2040
449 T$(A)="":S$(B,AA)=N$:IFN$="amulet"THENDG=0
450 IFN$="box"ANDDK=2ANDB=25THEN1090
452 PRINTY$:GOTO2040
460 IFB=12ANDD$="jum"THENB=20:PRINTY$;:GOSUB2010:PRINT" whe e ee{space*2}e{space*3}e":GOSUB2013:GOTO41
469 GOTO2003
470 IFB=20ANDD$="cli"THENB=12:GOTO40
471 IFB=20ANDDD=1ANDD$="rop"THENB=21:GOTO40
472 IFB=21ANDDD=1ANDD$="rop"THENB=20:GOTO40
473 IFD$="tre"THENPRINT"sorry,that's for the monkies":GOTO2040
474 IFB=22ANDW=1ANDD$="vin"THENB=23:GOTO40
475 IFB=23ANDW=1ANDD$="vin"THENB=22:GOTO40
476 IFB=23ANDK=1ANDD$="bri"THENB=24:GOSUB8000:GOSUB8002:GOSUB8010:MS=5:GOTO40
477 IFB=24ANDK=1ANDD$="bri"THENB=23:GOTO40
488 GOTO2003
490 IFB=14ANDD$="jun"ANDTZ=0THENN$="machete":GOSUB2300:GOTO496
491 IFB=14ANDD$="vin"ANDDE=0THENN$="machete":GOSUB2300:IFE=1THEN498
495 GOTO2003
496 IFE=0THENPRINTY2$:GOTO2040
497 PRINTY$;:GOSUB2010:PRINT"i see an opening..":D=1:PC=PC+1:TZ=1:GOTO2040
498 DE=1:S$(14,6)="vine":PRINTY$:GOTO2040
500 REM DIVE
501 IFB=15ANDD$="lag"THENB=16:GOTO40
502 IFB=10ANDD$="riv"THENPRINTY$;:GOSUB2010:PRINT"crocs come from everywhere":GOSUB2013:GOTO2210
504 GOTO2003
510 IFD$="vin"THENPRINT"it's too bulky..":GOTO2040
511 IFB=20ANDD$="rop"THENN$="rope":GOSUB2300:IFE=1THEN515
514 GOTO2003
515 INPUT"{yellow}where{light blue}";CC$:IFLEFT$(CC$,3)<>"roc"THENPRINT"sorry":GOSUB2010:GOTO2040
516 DD=1:T$(A)="":N$="rope":PRINTY$:GOTO2281
520 IFD$="can"ANDB=10ORB=13ORB=15ORB=21ORB=23THENN$="canteen":GOSUB2300:GOTO524
523 GOTO2003
524 IFE=0THEN2004
525 DF=0:PRINTY$:GOTO2040
530 N$="spade":GOSUB2300:IFE=1THEN534
532 GOTO2003
534 PRINTY$;:GOSUB2013:PRINT" i enjoy the exercise":GOTO2040
540 IFD$="can"THENN$="canteen":GOSUB2300:IFE=1THEN545
544 GOTO2003
545 IFDF=1THENPRINTY$:DF=0:GOTO2040
546 IFDF=0THENPRINT"sorry,it's empty...":GOTO2040
547 GOTO2003
550 IFB=16ANDD$="swi"THENB=15:DB=0:GOTO40
551 IFB=10ANDD$="riv"THENPRINT"sorry,it looks too dangerous to me":GOTO2040
559 GOTO2003
560 IFD$="rat"THENN$="rations":GOSUB2300:IFE=1THEN564
561 GOTO2004
564 PRINTY$;:GOSUB2010:PRINT" that feels better":T$(A)="":GOTO2040
570 N$="rifle":GOSUB2300:IFE=1THEN573
571 GOTO2003
573 PRINTY$;:GOSUB2010:PRINT" bang! bang! ":GOSUB2013:PRINT"that did no good!":GOTO2040
580 IFD$="hat"THENN$=D$:GOSUB2300:IFE=1THEN584
581 IFD$="amu"ANDDG=0THENN$="amulet":GOSUB2300:IFE=1THENDG=1:PC=PC+1:PRINTY$:GOTO2040
583 GOTO2003
584 PRINTY$" what a nice fit":GOTO2040
590 IFD$="box"ANDDJ=0THENN$=D$:GOSUB2300:IFE=1THEN595
594 PRINT"sorry i'm not a vandal":GOTO2040
595 N$="pebble":GOSUB2300:IFE=0THENPRINTY2$:GOTO2040
596 PRINTY$:DJ=1:PC=PC+1:GOTO2040
600 IFB=1ANDD$="tra"THENPRINT"it's that rogue trader jim's place":GOTO2040
601 IFB=4ANDD$="bod"THENPRINT"it's a dead adventurer":GOTO2040
602 IFB=4ANDD$="jew"THENPRINT"by jove! a diamond..":GOTO2040
603 IFB=8ANDD$="tre"THENPRINT"it's hollow..":GOTO2040
604 IFB=11ANDD$="pat"THENPRINT"it leads into the jungle":GOTO2040
605 IFB=12ANDD$="zul"ANDG=0THENPRINT"boy! he looks tough":GOTO2040
606 IFB=12ANDD$="rav"THENPRINT"i see a ledge":GOTO2040
607 IFB=20ANDD$="hat"THENPRINT"i see a name...dr livingstone":GOTO2040
608 IFB=22ANDD$="riv"THENPRINT"it's flowing very fast!":GOTO2040
609 IFB=15ANDD$="lag"THENPRINT"it's dark & deep":GOTO2040
610 IFB=15ANDDC=1ANDD$="cli"THENPRINT"why..it looks like a skull":GOTO2040
611 IFB=17ANDD$="web"THENPRINT"webs mean spiders":GOTO2040
612 IFB=18ANDD$="sna"ANDF=0THENPRINT"it's coiled about the box":GOTO2040
613 IFB=12ANDK=1ANDD$="bri"THENPRINT"that's had it!":GOTO2040
614 IFB=23ANDD$="cli"ANDK=1THENPRINT"it's the remains of the bridge":GOTO2040
615 IFD$="box"THENN$=D$:GOSUB2300:IFE=1THEN621
616 IFD$="dia"THENN$="diary":GOSUB2300:IFE=1THENPRINT"i see initials{space*2}d.a.s":GOTO2040
617 IFB=25ANDD$="zul"ANDDK>1THENPRINT"the zulu rises.he says 'bring me the":GOTO625
618 IFD$="sto"THENN$="stone":GOSUB2300:IFE=1THENPRINT"its shaped like a prism":GOTO2040
620 PRINT"i see nothing special":GOTO2040
621 IFDK=0THENPRINT"i see strange markings":GOTO2040
622 IFDK=1THENN$="diary":DK=2:GOTO2280
623 GOTO620
625 PRINT"serpent's nest & i will aid you":GOSUB2011:GOTO2040
680 IFD$="box"ANDDJ=1ANDDK=0THENN$=D$:GOSUB2300:IFE=1THENDK=1:PRINTY$:GOTO2040
684 GOTO2004
690 IFD$="dia"THENN$="diary":GOSUB2300:IFE=1THENPRINT"its empty.the pages are gone":GOTO2040
693 GOTO2004
710 IFB=17ANDD$="web"ANDDH=0THENN$="matches":GOSUB2300:IFE=1THEN715
711 IFB=18ANDD$="web"ANDDH=0THENN$="matches":GOSUB2300:IFE=1THEN715
714 GOTO2004
715 PRINT"ok part of the web burns away..":DH=1:GOTO2040
750 IFGC<50THEN792
751 IFN=1THEN756
752 ONGLGOTO753,754,754
753 PRINT"move the body..":GOTO2040
754 PRINT"do something for the dead":GOTO2040
756 GOSUB9000:IFU>1THEN761
757 ONGLGOTO758,759,760
758 PRINT"throw the rope to save yourself":GOTO2040
759 PRINT"use a throw to avoid a sticky end":GOTO2040
760 PRINT"think quick & use the tree":GOTO2040
761 IFGC<150THEN792
762 N$="machete":GOSUB2300:IFE=1THEN764
763 PRINT"throw yourself into the ravine??":GOTO2040
764 GOSUB9002:IFD=1THEN768
765 ONGLGOTO766,767,767
766 PRINT"chop a path in the jungle":GOTO2040
767 PRINT"clear the vegetation to aid you":GOTO2040
768 GOSUB9004:IFDA=1THEN773
769 ONGLGOTO770,771,772
770 PRINT"dive in the lagoon":GOTO2040
771 PRINT"you need a swim to cool off":GOTO2040
772 PRINT"investigate h2o":GOTO2040
773 GOSUB9006:IFDC=1THEN778
774 ONGLGOTO775,776,777
775 PRINT"move the rock with the sceptre":GOTO2040
776 PRINT"use the sceptre near by":GOTO2040
777 PRINT"shift some scenery..":GOTO2040
778 GOSUB9008:IFK=1THEN783
779 ONGLGOTO780,781,782
780 PRINT"kill the zulu with the spear":GOTO2040
781 PRINT"get onto the bridge":GOTO2040
782 PRINT"dispose of the tough block!":GOTO2040
783 GOSUB8010:IFDE=1THEN785
784 PRINT"get another 'rope'":GOTO2040
785 IFW=1THEN787
786 PRINT"use the 'rope' from the rock":GOTO2040
787 GOSUB9012:IFDG=1THEN792
788 ONGLGOTO789,790,791
789 PRINT"wear jewelery to please the zulu":GOTO2040
790 PRINT"look in the cave & be vain":GOTO2040
791 PRINT"be vain to live!!!":GOTO2040
792 PRINT"help!!! you're doing better than me":GOTO2040
900 GOSUB2020:PRINT"{clear}{yellow}saving safari...":U$=CHR$(13):OPEN2,8,2,"@0:onesave,s,w"
901 PRINT#2,B;U$;GL;U$;G;U$;DC;U$;R;U$;DB;U$;DH;U$;DI;U$;DG;U$;K;U$;P;U$;MS
902 PRINT#2,GC;U$;N;U$;D;U$;F;U$;PC;U$;W;U$;U;U$;DK;U$;DD;U$;DE;U$;DF;U$;DJ
903 PRINT#2,DA;U$;DN;U$;J;U$;L;U$;O;U$;DM;U$;MT;U$;TZ
904 FORA=1TO5:IFT$(A)=""THENT$(A)="*"
905 PRINT#2,T$(A):NEXT
906 FORA=1TO25:FORAA=1TO6:IFS$(A,AA)=""THENS$(A,AA)="*"
907 PRINT#2,S$(A,AA):NEXT:NEXT:CLOSE2
908 FORA=1TO5:IFT$(A)="*"THENT$(A)=""
909 NEXT:FORA=1TO25:FORAA=1TO6:IFS$(A,AA)="*"THENS$(A,AA)=""
910 NEXT:NEXT:GOTO41
1090 PRINT"the zulu grabs the box..":GOSUB2010:PRINT"he drops a strange stone"
1091 S$(B,AA)="stone":DN=1:GOTO2040
1100 PRINT"{down}{pink}the spider returns & repairs the web":DI=0:DH=0:GOTO2040
2000 GETA$:IFA$=""THEN2000
2001 IFA$<>"y"ANDA$<>"n"THEN2000
2002 RETURN
2003 PRINT"sorry,no effect...":GOTO2040
2004 PRINT"sorry can't do that...":GOTO2040
2005 IFZ$="go"THENC$="go ":RETURN
2006 C$=LEFT$(Z$,3):RETURN
2010 FORH=1TO750:NEXT:RETURN
2011 FORH=1TO3000:NEXT:RETURN
2012 FORH=1TO4000:NEXT:RETURN
2013 FORH=1TO1000:NEXT:RETURN
2020 FORA=0TO16:POKEV+A,0:NEXT:POKEV+21,0:POKEV+27,0:POKEV+23,0:POKEV+29,0:RETURN
2030 PRINT"i can go ";
2031 IFR$(B,1)=""THEN2037
2032 FORA=1TO2:IFR$(B,A)="n"THENPRINT"north.";
2033 IFR$(B,A)="s"THENPRINT"south.";
2034 IFR$(B,A)="e"THENPRINT"east.";
2035 IFR$(B,A)="w"THENPRINT"west.";
2036 NEXT:GOTO2040
2037 PRINT"nowhere obvious..":GOTO2040
2040 GOSUB2013:PRINT"{home}{down*15}":FORA=1TO8:PRINTB$:NEXT:GOTO71
2044 GOSUB2020
2045 POKEV+21,AA:POKEV+23,Y:POKEV+29,X
2046 POKEV,P0:POKEV+1,P1:POKEV+2,P2:POKEV+3,P3:POKEV+4,P4:POKEV+5,P5:POKEV+6,P6
2047 POKEV+7,P7:POKEV+8,P8:POKEV+9,P9
2048 POKEV+39,C1:POKEV+40,C2:POKEV+41,C3:POKEV+42,C4:POKEV+43,C5:POKEV+44,C6:POKEV+45,C7
2049 POKEV+46,C8:POKEV+10,M1:POKEV+11,M2:POKEV+12,M3:POKEV+13,M4
2051 POKE2040,S1:POKE2041,S2:POKE2042,S3:POKE2043,S4:POKE2044,S5:POKE2045,S6
2053 POKE2046,S7:POKEV+27,SP:POKEV+16,SX:RETURN
2060 GOSUB2020:ZB=0:PRINT"{clear}"SPC(8)"{yellow}{cm @*20}"
2061 PRINTSPC(7)"{reverse on}{brown}{sh pound}{yellow} i have in my pack..":PRINTSPC(7)"{brown}{reverse on}{space*20}{reverse off}{sh pound}"
2062 PRINT"{down*2}{yellow}":FORA=1TO5:IFT$(A)=""THEN2064
2063 PRINT"{right*5}"T$(A):ZB=ZB+1:PRINT
2064 NEXT:IFZB>0THEN2068
2065 IFZB=0THENPRINT"{home}{down*12}{right}{brown}{reverse on}{sh pound}{yellow} nothing bar the maker's label {right}{brown}{sh pound}{yellow} {right}{brown}{sh pound}{yellow} "
2066 PRINT"{right}{brown}{reverse on}{space*31}{reverse off}{sh pound}{right}{reverse on} {reverse off}{sh pound}{right}{reverse on} {reverse off}{sh pound}"
2068 PRINT"{down*2}{right*3}{brown}{reverse on}{sh pound}{yellow} i can carry five items only {right*2}{brown}{sh pound}{yellow} "
2069 PRINT"{right*3}{brown}{reverse on}{space*29}{reverse off}{sh pound}{right*2}{reverse on} {reverse off}{sh pound}"
2070 GOSUB2012:GOTO41
2100 PRINT"{clear}{yellow}restoring saved safari...{down}":OPEN2,8,2,"onesave,s,r"
2101 INPUT#2,B,GL,G,DC,R,DB,DH,DI,DG,K,P,MS,GC,N,D,F,PC,W,U,DK,DD
2102 INPUT#2,DE,DF,DJ,DA,DN,J,L,O,DM,MT,TZ
2103 FORA=1TO5:INPUT#2,T$(A):IFT$(A)="*"THENT$(A)=""
2104 NEXT:FORA=1TO25:FORAA=1TO6:INPUT#2,S$(A,AA)
2105 IFS$(A,AA)="*"THENS$(A,AA)=""
2106 NEXT:NEXT:CLOSE2:IFGL>0THEN41
2107 GOSUB2148
2108 GOTO28
2148 Q=1:FORA=1TO12:IFPEEK(680+A)=5THENT$(Q)=M$(A):Q=Q+1
2149 NEXT:Q=0:RETURN
2150 II=0:PRINT"{yellow}i see ";:FORA=1TO6:IFS$(B,A)=""THEN2152
2151 PRINTS$(B,A)".";:II=II+1:IFII=4THENPRINT
2152 NEXT:GOTO2040
2160 REM
2162 IFN$="rif"THENN$="rifle":RETURN
2163 IFN$="rop"THENN$="rope":RETURN
2164 IFN$="spe"THENN$="spear":RETURN
2165 IFN$="hat"THENN$="hat":RETURN
2166 IFN$="spa"THENN$="spade":RETURN
2167 IFN$="can"THENN$="canteen":RETURN
2168 IFN$="bin"THENN$="binoculars":RETURN
2169 IFN$="vin"THENN$="vine":RETURN
2170 IFN$="box"THENN$="box":RETURN
2171 IFB=16ANDJ=5ANDN$="sce"THENN$="sceptre":DA=1:RETURN
2172 IFN$="tor"THENN$="torch":RETURN
2173 IFN$="mat"THENN$="matches":RETURN
2174 IFN$="jew"THENN$="jewel":RETURN
2175 IFN$="com"THENN$="compass":RETURN
2176 IFN$="mac"THENN$="machete":RETURN
2177 IFN$="bla"THENN$="old blade":RETURN
2178 IFN$="amu"THENN$="amulet":RETURN
2179 IFN$="kni"THENN$="knife":RETURN
2180 IFN$="sce"THENN$="sceptre":RETURN
2181 IFN$="dia"THENN$="diary":RETURN
2182 IFN$="peb"THENN$="pebble":RETURN
2183 IFN$="sto"THENN$="stone":RETURN
2184 IFN$="med"THENN$="medicines":RETURN
2185 IFN$="pic"THENN$="pick":RETURN
2186 IFN$="bea"THENN$="beads":RETURN
2187 IFN$="rat"THENN$="rations":RETURN
2190 RETURN
2200 S6=S6+1:IFS6=40THENS6=37
2201 POKE2045,S6:IC=0:RETURN
2205 PRINT"the zulu hurls his spear...":GOSUB2013:PRINT"{pink}good shot-right between the eyes"
2206 GOSUB2011:GOTO2210
2210 GOSUB2011:POKES+24,0:SYS49421:GOSUB7002:FORA=0TO24:POKES+A,0:NEXT
2211 POKES+5,136:POKES+6,136:POKES+24,15:POKES+1,4:POKES,208:POKES+4,33:GOSUB2013
2212 POKES+1,3:POKES,210:GOSUB2013:POKES+1,3:POKES,54:GOSUB2013
2213 FORA=15TO0STEP-1:POKES+24,A:FORH=1TO100:NEXTH,A:POKES+4,0
2215 GOSUB2020:POKE53280,0:PRINT"{clear}{reverse off}{down*4}"SPC(7)"{yellow}you have played"GC"moves{down}"
2216 PC=PC*7:PRINTSPC(8)"{light blue}and completed"PC"% of{down*2}"
2217 PRINT"{right*9}{pink}king solomon's mines{down*4}":PRINTSPC(11)"play again{space*2}y/n"
2219 GETA$:IFA$=""THEN2219
2220 IFA$<>"y"ANDA$<>"n"THEN2219
2221 IFA$="y"THENRUN
2222 SYS64738
2250 PRINT"{home}{down*7}":FORA=1TO6:PRINTSPC(13)"{space*9}":NEXT
2251 PRINT"{home}{down*8}"SPC(15)"{gray}{cm m}{right}{dark gray}{reverse on}C{down}{left*3}{reverse off}{gray}{cm m}{right}{reverse on}{dark gray}C{down}{left*3}{reverse off}{gray}{cm m}{right}{reverse on}{dark gray}C{down}{left}C{down}{left}C{down}{left}C":RETURN
2260 IFL=0THENPRINT"{pink}the bridge starts to sway & shake...":L=1:IC=0:GOTO2040
2261 IFL=1THENPRINT"{pink}the ropes tighten-you hear a snap..":L=2:IC=0:GOTO2040
2262 IFL=2THENPRINT"{pink}the ropes give way...":GOSUB2013:GOTO2210
2269 FORA=0TO24:POKES+A,0:NEXT
2270 POKES+24,15:POKES+5,18:POKES+6,132:POKES+1,7:POKES,53:POKES+4,129
2271 FORH=1TO70:POKESB,PEEK(SB)AND239:POKESB,PEEK(SB)OR16:NEXT
2272 FORA=15TO0STEP-3:POKES+24,A:FORH=1TO300:NEXT:NEXT:POKES+4,0:PC=PC+1:RETURN
2280 PRINT"ok i see "N$
2281 FORA=1TO6:IFS$(B,A)=""THENS$(B,A)=N$:GOTO2040
2282 NEXT:GOTO2040
2290 IFO=0ORO=1ORO=2THENPRINT"you sink deeper....":O=O+1:GOSUB2013:GOTO41
2291 IFO=3THENPRINT"{pink}gulp!!!!"
2292 PRINT"{home}{down}":FORA=1TO3:PRINT"{right}";:FORAA=1TO36:PRINT"{reverse on}{dark gray} ";:NEXT:NEXT:GOSUB2013:GOTO2210
2300 E=0:FORA=1TO5:IFT$(A)=N$THENE=1:RETURN
2301 NEXT:RETURN
2302 E=0:FORA=1TO6:IFS$(B,A)=N$THENE=1:RETURN
2303 NEXT:RETURN
2305 FORA=1TO5:IFT$(A)="rifle"THENT$(A)="":R=1
2306 NEXT:B=10:S$(10,6)="rope":GOSUB2011:GOTO41
2319 FORA=1TO5:POKEV,PEEK(V)+1:POKEV+1,PEEK(V+1)+1:FORH=1TO100:NEXT:NEXT
2320 PRINT"{down}{space*10}the rock blocks the stream !":GOSUB2013
2321 PRINT"{home}{down*7}{right*7}{space*9}{right*5}{up}{space*2}":GOSUB2010
2322 PRINT"{down}{right*5}{space*7}":GOSUB2013:PRINT"{right*5}{space*11}":GOSUB2010
2323 PRINT"{right*5}{space*7}":GOSUB2010:PRINT"{right*5}{space*7}":GOSUB2010:PRINT"{right*6}{space*8}"
2324 GOSUB2013:PRINT"{right*7}{space*9}":GOSUB2010
2326 PRINT"{right*9}{space*7}{right*5} ":GOTO2040
3004 PRINT"{light blue}{reverse on}{space*34}{reverse off}{sh pound}{cm y*3}"
3006 PRINT"{space*4}{127}{reverse on}{cm o*2}{reverse off}{sh pound} {127}{reverse on}{space*11}{reverse off}{sh pound}{cm y*11}"
3008 PRINT"{space*2}{reverse on}{black} {reverse off}{space*4}{reverse on} {reverse off}{space*6}{light blue}{cm asterisk}{reverse on}{space*5}{reverse off}{sh pound} {reverse on}{black} {reverse off} {cm i}{space*6}{reverse on}{space*2}{reverse off}{space*2}{reverse on} {down*2}"
3014 PRINT"{brown}CCF{cm p*2}FFCEEECFF{cm p}{yellow}{reverse on}{cm j}{reverse off}{space*3}{reverse on}{cm l}{reverse off}{brown}{cm p*2}FFCCCFFDDDCFF{cm p*4}"
3016 PRINT"{space*2}M{space*5}{cm g}{space*6}{gray}{cm m}M{dark gray}{reverse on}C{reverse off}{gray}N{cm g}{brown}{space*18}"
3018 PRINT"{space*3}{cm g} M N{space*3}{cm @*2}{space*2}{gray}{cm m}M{dark gray}{reverse on}C{reverse off}{gray}N{cm g}{brown}{space*2}{cm p*2}{space*3}M{space*3}{cm g} {cm g}{space*4}"
3020 PRINT"{space*3}G {cm n}N{space*4}{reverse on}{yellow} {orange}{cm m}{reverse off}{gray}M{cm p}N{cm m}{dark gray}{reverse on}{cm t}{reverse off}{gray}{cm g}M{cm p}N{reverse on}{yellow} {orange} {reverse off}{brown}{space*4}{cm g} N{space*2}G{space*2}{cm m} "
3022 PRINT"{space*2}{cm m}{space*3}{cm g} M{space*2}{reverse on}{yellow} {orange}{cm m}{reverse off}{gray} {cm g*2}{reverse off}{dark gray}{cm l}{reverse on}{cm t}{reverse off}{cm j}{gray}{cm m*2}{reverse off} {reverse on}{yellow} {orange} {reverse off}{brown}{space*4}MN{space*3}N{space*2}H "
3024 PRINT"{space*2}H{space*3}G{space*2}{cm g} {reverse on}{yellow} {orange}{cm m}{reverse off}{gray} GG{dark gray}{reverse on}{cm g}{cm t}{cm m}{reverse off}{gray}HH{reverse off} {reverse on}{yellow} {orange} {reverse off}{brown}{space*4}{cm m}{space*4}{cm g}{space*2}{sh -} "
3026 PRINT"{space*2}{cm m}{space*3}H{space*2}H {reverse on}{yellow} {orange}{cm m}{reverse off}{gray} {sh -}{dark gray}{reverse on}{cm j}{cm t*3}{cm l}{reverse off}{gray}{sh -} {reverse on}{yellow} {orange} {reverse off}{brown}{space*4}G{space*3}{cm m}{space*2}M{sh -} "
3028 PRINT"{space*2}N{space*4}M{space*3}{reverse on}{yellow} {orange}{cm m}{reverse off} {cm m}{reverse on}{dark gray}{cm t*5}{reverse off}{cm g} {reverse on}{yellow} {orange} {reverse off}{brown}{space*4}H{space*3}{sh -}{space*3}{cm g} "
3030 PRINT"{space*11}{reverse on}{yellow} {orange}{cm m}{reverse off}{brown} {dark gray}{reverse on}O{cm y*5}P{reverse off}{brown} {reverse on}{yellow} {orange} {reverse off}{brown}{space*4}N{space*6}N{space*2}"
3032 PRINT"{reverse on}{green}{space*3}{green}{cm u*3}{reverse off}{cm o}{cm p}{reverse on} {reverse off}{green}{cm i}{reverse on}{cm m}{yellow} {orange}{cm m}{dark gray}{cm t*8} {yellow} {orange} {green}{cm g} {cm u*3} {green}{space*2}{green}{cm y}{cm u}{reverse off}{cm o*3}{cm i}"
3034 PRINT"{cm u*38}"
3035 AA=31:Y=16:X=15:C1=5:C2=5:C3=5:C4=13:C5=14:P0=40:P1=70:P2=97:P3=70
3036 P4=200:P5=70:P6=254:P7=73:P8=48:P9=123
3037 S1=41:S2=40:S3=41:S4=40:S5=35:GOSUB2044
3038 IFB=12ANDK=1THENGOSUB2250:GOTO70
3040 IFB=12THENGOTO70
3042 PRINT"{home}{light blue}{reverse on} {cm p}{space*32}{reverse off}{sh pound}{cm y*3}"
3043 PRINT"{space*4}{cm asterisk}{sh pound}{space*3}{cm y*4}{cm u}{cm t*2} {cm asterisk}{reverse on}{space*3}{reverse off}{sh pound} {cm y*10}"
3044 PRINTSPC(14)"{space*9}"
3045 PRINT"{home}{down*5}"SPC(15)"{space*5}{down}{left*5}{space*5}":FORA=1TO8:PRINTSPC(11)"{space*13}"
3046 NEXT
3047 PRINT"{home}{down*6}"SPC(15)"{brown}{cm t}M{right}N{cm t}{down}{left*3}{light blue}{reverse on} {down}{left} {down}{left} {down}{left} {down}{left} {down}{left} {down}{left} {down}{left} {right}{reverse off}{up}{brown}N{up}{left}{cm m}{up*3}{cm m}{down}G{down}{left}{sh -}{down}M"
3048 PRINT"{home}{down*7}"SPC(14)"M{down}{left}{cm m}{down}{cm g}{down}{left}{cm m}":P8=48:P9=123:C5=7:C6=1:AA=127
3049 M1=140:M2=148:S6=37:S7=42:C7=7:M3=158:M4=52:X=47:GOSUB2045:GOTO70
3108 PRINT"{down*3} {brown}{cm i}{cm o}{space*3}{cm @}{reverse off}{brown}{cm @}{cm o*2}{cm @}{space*7}{reverse off}{space*4}{reverse off}{space*4}{reverse off} {brown}{cm p*2}{cm @}{cm i*4}{cm o} {cm @}{cm p}"
3110 PRINT" {reverse on}{space*4}{cm u}{space*2}{cm g}{space*2}{cm m}{cm y}{cm u} {cm u} {cm u}{cm y} {cm t}{cm y*3}{cm u}{cm y}{space*12}"
3112 PRINT" {reverse on}{space*4}M N{space*4}M{space*7}N{space*3}{sh -}{space*2}M{space*3}{cm g} {cm g}{space*4}"
3114 PRINT" {reverse on}{space*4}{cm n}N{space*5}{cm m}{space*7}G{space*3}G{space*3}{cm g} N{space*2}G{space*2}{cm m} "
3116 PRINT" {reverse on}{space*5}{cm g} M{space*4}G{space*6}H{space*3}{cm g}{space*3}MN{space*3}N{space*2}H "
3118 PRINT" {reverse on}{space*5}G{space*2}{cm g}{space*3}{sh -}{space*6}{cm g} MN{space*4}{cm m}{space*4}{cm g}{space*2}{sh -} "
3120 PRINT" {reverse on}{space*5}H{space*2}H{space*9}N{space*2}N{space*5}G{space*3}{cm m}{space*2}M{sh -} "
3122 PRINT" {reverse on}{space*6}M{space*4}M{space*5}N{space*3}{cm g}{space*5}H{space*3}{sh -}{space*3}{cm g} "
3124 PRINT" {reverse on}{space*5}{brown}{space*4}{cm m}{space*2}{cm g}{space*2}{cm h}{space*11}N{space*6}N{space*2}"
3126 PRINT" {reverse on}{space*9}{reverse on}{brown} M{space*8}{reverse on}{brown}{space*2}{brown}{space*7}{brown}{space*9}"
3128 PRINT" {reverse on}{blue}{space*2}{102*3}{100*2}{space*13}{099}{cm @*3}{space*13}"
3130 PRINT" {reverse on}{space*8}{099*4}{100}{102*3}{cm @*2}{space*7}{099}{cm t*2}{space*3}{cm @*2}{099} {cm t} "
3132 PRINT" {orange}{cm u*37}"
3133 AA=63:X=15:C1=13:C2=5:C3=5:C4=5:C5=7:C6=0:S1=41:S2=40:S3=41:S4=40:S5=35
3134 S6=43:P0=40:P1=62:P2=90:P3=65:P4=190:P5=68:P6=254:P7=64:P8=31:P9=150
3135 SP=15:Y=32:M1=143:M2=141:GOSUB2044
3136 IFB=8THENB=B+13:GOTO70
3140 PRINT"{up*3}{right}{brown}{reverse on}{space*11}{cm h}{space*25}"
3141 PRINT" {reverse on}{cm @*3}{cm p*2}{cm o*2}{cm i}{cm o}{cm p}{cm @*10}{cm i}{cm o*2}{cm p}{cm @*2}MN{cm @*4}{cm i}{cm o}{cm @*2}{cm p}":P8=180:AA=31:GOSUB2045
3142 IFK=0THEN3145
3143 PRINT"{home}{down*4}{right}{reverse on}{brown}{cm q}{reverse off} {reverse on}{sh -}{down}{left*3}{sh -}{reverse off} {reverse on}{cm w}{down}{left*3}{cm q}{reverse off} {reverse on}{sh -}{down}{left*3}{sh -}{reverse off} {reverse on}{sh -}{down}{left*3}{sh -}{reverse off}C{reverse on}{sh -}{down}{left*3}{sh -}{reverse off}C{down}{left*2}{reverse on}{sh -}{down}{left}{sh -}{down}{left}{sh -}"
3145 B=B+13:GOTO70
3252 PRINT"{clear}{down}{orange}";
3254 PRINT" {reverse on} {109}{space*2}{109} {127}{reverse off} {light blue}{127}{reverse on}{space*26}"
3256 PRINT" {reverse on}{orange}{space*2}{cm h}{space*2}{109} {reverse off}{cm k}{space*2}{light blue}{127}{reverse on}{space*21}{reverse off}{sh pound} {127}"
3258 PRINT" {reverse on}{orange}{space*2}{103} {cm g} {cm g} {brown}{cm g} {reverse off}{cm f}{light blue}{cm u}{cm t}{127}{reverse on}{space*17}{reverse off}{sh pound}"
3260 PRINT" {reverse on}{orange}{space*2}{cm k} {103} {109} {brown}{cm j}{space*3}{reverse off}{cm f}{space*2}{light blue}{cm t*2}{cm u}{cm t*2} {127}{reverse on} {reverse off}{sh pound} {cm t*2}{cm u*2}{cm y*2}{space*3}{reverse on}{brown}{125}"
3262 PRINT" {reverse on}{orange}{109}{space*3}{cm m} {cm m} {brown}{cm k}{space*4}{127}{reverse off}{space*19}{cm d}{reverse on} "
3264 PRINT" {reverse on}{orange} M{space*2}{cm m}{space*2}G {brown}{cm g} {cm m}{space*4}{reverse off}{cm f}{space*3}{reverse off}{space*7}{reverse off}{space*5}{reverse off} {reverse on}{brown}{space*2}"
3266 PRINT" {reverse on}{orange}{space*2}{cm g}{space*2}M{space*3}{brown}{cm g}{space*2}{cm g}{space*2}G {reverse on}{cm asterisk}{reverse off}{space*4}{reverse off}{space*6}{reverse off}{space*3}{reverse off} {brown}{cm d}{reverse on} N"
3268 PRINT" {reverse on}{orange}{space*2}{cm k}{space*2}H{space*3}{brown}M{space*2}G{space*2}H{space*4}{cm asterisk}{reverse off}{space*9}{reverse off} {brown}{cm d}{reverse on} H "
3270 PRINT" {reverse on}{orange} N M H M{space*2}{brown}{cm g} M{space*2}H M{space*3}{cm l}{reverse off}{blue}{cm p*3}{space*5}{reverse on}{brown}{sh pound}{space*2}{cm g} "
3272 PRINT" {reverse on}{orange}{cm m}{space*2}{cm m} {cm m}{space*2}{cm g}{space*3}{brown}{cm g}{cm y}M {cm g} {cm g} {cm m} {cm asterisk}{reverse off}{reverse on}{blue}{cm o}{space*2}{cm asterisk}{reverse off} {reverse on}{brown}{sh pound}{space*3}N{space*2}"
3274 PRINT" {reverse on}{orange}{cm m} {cm m} G {cm h}{cm p}LFCR{brown}L{cm p} M{space*2}H{space*2}M {blue}{sh pound}{space*3}{cm asterisk}{reverse off}{space*2}{reverse on}{brown}{cm g}N{space*3}"
3276 PRINT" {reverse on}{orange} M M{cm p}C{cm y}{space*6}{cm m}{brown}M{cm m}{space*3}G F{blue}{sh pound}{space*5}{cm asterisk}{reverse off}{space*2}{reverse on}{brown}N N "
3278 PRINT" {reverse on}{orange}{space*3}N{space*10}{brown}{cm g}GM{space*2}N{cm y}{blue}{sh pound}{space*7}{cm asterisk}{brown}{sh pound}{space*2}{cm j} "
3280 AA=7:C1=5:C2=5:C3=0:S1=40:S2=41:S3=35:X=3:P0=230:P1=108:P2=180:P3=101
3281 P4=112:P5=126:SP=2:GOSUB2044:B=B+13:GOTO70
3304 PRINT"{green} {reverse on}{space*2}{light blue}L {cm @}{space*12}{cm @}{space*3}{reverse off}{sh pound}{reverse on}{dark gray}{sh pound}{gray}N{space*2}{dark gray} {gray}{space*2}{dark gray} {gray}{space*2}{reverse off}{brown}{cm asterisk}{reverse on}{cm asterisk}{space*3}"
3306 PRINT"{reverse on}{green} {cm p*2} {reverse off} {reverse on} {light blue}{108}{cm p}{space*7}{cm p} {sh @}{green} {light blue}{108}{cm m}{gray}{cm t}{dark gray}{cm h}{gray}{space*2}{110}{space*5}{103}{dark gray} {gray} {reverse off}{brown}{127}{reverse on}{space*3}"
3308 PRINT" {reverse on}{green}{cm m*2} {108}{112}{space*2}{light blue}{108}{space*3}{cm @} {sh @}{green} {reverse off} {reverse on} {cm i} {reverse off} {reverse on}{gray} {dark gray}{space*2}{gray}{110} {dark gray} {gray} {dark gray} {gray} {110}{space*2}{dark gray}{space*2}{brown}{cm g}{space*2}"
3310 PRINT"{reverse on}{green} {reverse off} {reverse on}{110}{111} {111}{112}{111} {light blue}{108} {sh @}{green} {reverse off} {reverse on} {109} {111}{112}{111}{gray}{sh pound}{109}{110}{cm m} {dark gray}{space*2}{gray}{space*2}{110}{space*2}{dark gray} {gray}{space*2}{brown}{cm g}{space*2}"
3312 PRINT"{reverse on}{green}{sh @}{space*2}{reverse off} {reverse on} {reverse off} {reverse on}{111*2}{sh @} {reverse off} {reverse on}{cm i}{cm o}{cm p}{space*5}{cm l}{gray} {cm m} {103} {dark gray} {gray}{space*2}{125}{space*3}{dark gray}{space*2}{gray} {brown}{cm g}{space*2}"
3314 PRINT"{reverse on}{green} {125}{112} {reverse off} {reverse on}{cm o}{cm p}{cm @*2}{sh @}{blue}{space*10}{gray} {103} {cm g}{space*4}{103}{space*2}{cm m}{dark gray} {gray}{110} {brown}{cm g}{space*2}"
3316 PRINT"{space*2}{reverse on}{orange}{cm u}{cm y}{reverse off}{cm i}{reverse on}{space*5}{112}{blue}{space*8}{gray}{108}{space*2}{110} {dark gray} {gray}{space*2}{110}{space*3}{cm g}{110}{space*2}{brown}{cm g}{space*2}"
3318 PRINT"{reverse on}{orange} {cm u}{space*6}{reverse off}{sh pound}{reverse on}{blue}{sh pound}{space*10}{cm y}{cm u}{gray}{108}{cm @*2}{dark gray} {gray} {cm g}{space*3}{104}{space*3}{brown}{cm g}{space*2}"
3320 PRINT"{reverse on}{orange}{space*6}{reverse off}{sh pound}{reverse on}{blue}{sh pound} {110}{space*2}{110}{space*14}{gray}{108}{cm i}{cm @*2}{cm h}{space*3}{brown}{cm g}{space*2}"
3322 PRINT"{reverse on}{orange}{space*6}{127}{blue} ({space*2}({space*19}{gray}{cm @}{cm o}{dark gray} {gray}{cm @}{brown}{cm g}{space*2}"
3324 PRINT"{reverse on}{orange}{space*7}{112}{blue}{space*2}{109}{space*24}{brown}{cm g}{space*2}"
3326 PRINT"{reverse on}{orange}{space*8}{127}{reverse off}{blue}{127}{reverse on}{space*7}{109}{space*17}{brown}{cm g}{space*2}"
3328 PRINT"{reverse on}{orange}{space*9}{127}{reverse off}{blue}{127}{reverse on}{cm o}{space*2}{109}{space*3}{109}{space*16}{brown}{cm g}{space*2}"
3330 PRINT"{reverse on}{orange}{space*11}{cm asterisk}{reverse off}{blue}{cm asterisk}{reverse on}{space*3}M{space*18}{brown}{cm g}{space*2}":IFB=10THEN70
3331 PRINT"{home}"SPC(18)"{light blue}{reverse on}{cm p}{space*16}{brown}{cm g}":PRINTSPC(18)"{green}{reverse on} {light blue}L{space*15}{brown}{cm g}"
3332 PRINTSPC(18)"{green}{reverse on}{cm i} P{light blue}{space*14}{brown}{cm g}":PRINTSPC(18)"{green}{reverse on}PPOOP{light blue}{space*2}{green}OP{light blue}{space*2}{yellow}{sh pound}{space*4}{cm asterisk}"
3333 PRINTSPC(18)"{green}{reverse on} {cm m}{space*3}{cm y}{cm u} {cm h}{cm y}PP{brown}{cm y}{right}{cm y*2}{green}O":PRINTSPC(18)"{blue}{reverse on}{space*6}{cm y}{cm u}{reverse off}{cm o}{cm f}{green}{cm pound}{cm +*6}"
3334 PRINTSPC(18)"{blue}{reverse on}{space*11}{cm y}{cm u}{reverse off}{cm o*2}{green}{cm +}{cm pound}"
3335 FORA=1TO3:PRINTSPC(18)"{blue}{reverse on}{space*17}":NEXT:GOTO70
3354 PRINT"{down}{gray} {reverse on}O {cm @}N{space*5}{cm o*4}{cm i*7}{cm o*2}{cm p*5}{space*5}{cm l}"
3356 PRINT" {reverse on} {110}{space*2}{cm p*2}{dark gray}{111}{cm y*2}{110}{space*11}{109}{space*4}{125} {gray}{108}{cm p}{space*3}"
3358 PRINT" {reverse on}{cm j}{103}{space*2}{dark gray}{cm g*2}{space*3}{cm g}{space*12}{104}{space*4}{103} {cm m}{gray}{space*3}"
3360 PRINT" {reverse on}{110}{space*2}{cm l}{dark gray} {104}{space*3}{cm g}{space*4}{cm @}{cm i}{reverse off} {cm u}{reverse on}{space*5}{cm h}{space*3}{104}{space*2}{112}{gray}{space*2}"
3362 PRINT" {reverse on}{space*3}{dark gray}{111}{103} {cm g}{space*2}{104}{space*3}{reverse off}{cm k}{space*5}{reverse on}{cm h}{space*3}{103}{space*4}{cm h} {gray}{cm k}{space*2}"
3364 PRINT" {reverse on}{space*3}{dark gray}{cm h}{cm g} {109}{space*3}{cm g}{space*2}{reverse off}{cm g}{space*6}{reverse on}{cm j}{space*2}{cm g}{space*3}{cm m}{space*2}{gray}{cm h}{space*2}"
3366 PRINT" {reverse on}{space*2}{dark gray}{111} {103}{space*2}{109}{space*2}{109}{space*2}{reverse off}{space*7}{reverse on}{cm k} {125}{space*4}{125} {gray}{111}{space*3}"
3368 PRINT" {reverse on} {cm l}{dark gray}{cm g} {104}{space*2}{cm m}{space*3}{109}{cm l}{reverse off}{space*7}{reverse on}{space*2}{103}{space*4}{103}{cm m}{gray}{space*4}"
3370 PRINT" {reverse on}{space*2}{dark gray}{108} {cm m}{space*3}{103}{space*3}{reverse off}{cm j}{space*6}{cm n}{reverse on} {110}{space*4}{110} {cm @}{gray}{cm h}{space*2}{110}"
3372 PRINT" {reverse on}{109}{space*2}{dark gray}{cm h} {109}{space*2}{125} {reverse off}{sh pound}{space*10}{reverse on}{space*4}{110} {sh @}{gray}{space*3}{104} "
3374 PRINT" {reverse on} {103} {dark gray}{108}{space*2}{reverse off}{sh pound}{space*15}{reverse on}{space*2}{110}{space*2}{gray}{cm h}{space*3}{125} "
3376 PRINT" {reverse on} {125}{space*2}{dark gray}{108}{reverse off}{space*20}{reverse on} {cm m}{gray}{space*4}{125} "
3378 PRINT" {reverse on}{cm h}{cm n}{space*3}{reverse off}{cm f}{space*20}{cm d}{reverse on}{space*4}{103} "
3380 PRINT" {reverse on}{cm k} M{space*3}{reverse off}{cm o}{cm @}{space*17}{cm d}{reverse on}{space*4}N {cm m}":IFB=5THEN3382
3381 AA=1:X=1:Y=1:C1=6:S1=36:P0=140:P1=90:GOSUB2044:GOTO3390
3382 PRINT"{home}{down*3}":FORA=1TO6:PRINTSPC(13)"{dark gray}{reverse on}{space*9}":NEXT
3383 PRINT"{home}{down*13}{right*5}{space*3}{down}{left*3}{cm h}{space*3}"SPC(17)"{space*2}{up}{left} "
3390 B=B+13:GOTO70
3400 GETA$:IFA$=""THEN3400
3504 PRINT"{down}{dark gray}{space*31}{reverse on}{sh pound}{space*4}"
3506 PRINT"{space*30}{cm d}{reverse on}{space*4}{cm g}"
3508 PRINT"{space*30}{reverse on}{cm h}{cm g}{space*2}{110} "
3510 PRINT"{space*14}{reverse on}{cm u}{reverse off}{cm f}{space*14}{reverse on}{110}{space*2}{cm m}{space*2}"
3512 PRINT"{space*13}{reverse on}{cm k} {104} {cm y}{reverse off}{cm i}{space*10}{cm d}{reverse on}{space*3}{104}{space*2}"
3514 PRINT"{space*13}{reverse on}{cm g} {cm m}{space*3}{reverse off}{cm f}{space*9}{reverse on}{cm g} {103} {103}{space*2}"
3516 PRINT"{space*13}{reverse on}{space*3}{109}{space*3}{reverse off}{space*9}{reverse on}{space*2}{cm g} {103}{space*2}"
3518 PRINT"{space*6}{reverse on}{sh pound} {112}{gray}{cm u}{reverse off}{space*3}{reverse on}{dark gray}{space*4}{103}{space*2}{reverse off}{cm h}{space*8}{reverse on} {110}{space*2}{cm g}{space*2}"
3520 PRINT"{space*5}{cm l}{reverse on}{space*3}{gray}{cm g}{cm l}{reverse off}{space*2}{reverse on}{dark gray}{cm g}{space*3}{104}{space*2}{reverse off}{cm k}{space*2}{cm d}{reverse on} {reverse off}{cm f}{space*2}{cm m}{reverse on} {cm g} {110}{space*3}"
3522 PRINT"{reverse on}{blue}{cm u*5}{dark gray}{cm j}{space*3}{gray}{cm j} {blue}{111}{112}{dark gray}{space*4}{106}{space*3}{blue}{111}{cm y}{dark gray}{space*3}{blue}{111}{cm y*9}"
3524 PRINT"{reverse on}{space*4}{cm m}{dark gray}{space*4}{112}{gray} {blue} {106}{099*2} {099} {101*4} {dark gray}{space*3}{cm l}{blue} {102*3}{space*5}"
3526 PRINT"{reverse on}{space*4}{106}{099}{101*3}{102*3}{space*2}{cm t*5}{space*3}{106}{099} {099} {099*3}{space*6}"
3540 B=B+13:GOTO70
3550 PRINT"{clear}{green}";
3552 PRINT"{reverse on}{cm m}{sh @}{brown}{110} {110}{light green}{108}{cm g}{reverse off}{cm v}{cm c}{cm v}{reverse on}{brown}{sh pound}{reverse off}{sh pound}{reverse on}{green}{108}{reverse off}{orange}{125}{reverse on}{green} {reverse off} {reverse on} {reverse off} {reverse on} {light green} {sh @}{108}{cm l}{green} {cm h}{light green}{cm g}{space*2}{green}{cm h}{123}{108*2}{cm g} {cm g}{125}{cm f}{cm g}"
3554 PRINT"{cm d}{reverse on} {brown} {110} {sh pound} {125}{cm p}{cm o}{reverse off}{sh pound}{reverse on}{green} {cm g}{reverse off}{orange}{125} {reverse on}{light green} {reverse off} {reverse on}{green}{112}{cm y}{reverse off} {reverse on}{space*2}{reverse off}{space*2}{cm v*2}{reverse on}{cm m}{brown} {reverse off} {reverse on}{green}{cm v}{cm f}{brown} {reverse off} {reverse on}{green}{cm t}{reverse off} {reverse on}{space*2}{111}"
3556 PRINT"{reverse on}{brown}{112}{reverse off}{green}{cm v}{reverse on}{brown}{110}{space*3}{reverse off}{sh pound}{orange}{125*3}{reverse on}{light green} {green}{cm g}{reverse off} {reverse on} {reverse off}{space*2}{reverse on}{cm m}{light green} {reverse off} {green}{cm c} {orange}{125}{reverse on}{green} {reverse off}{cm v}{reverse on}{cm p*2}{reverse off} {reverse on}{brown} {reverse off}{green}{cm c}{reverse on}{cm f}{reverse off} {reverse on}{brown} {green}{cm g}{111}{112}{reverse off}{cm v}{reverse on}{cm v}{cm @}"
3558 PRINT"{reverse on}{brown} {reverse off}{orange}{125}{reverse on}{brown}{space*3}{reverse off}{sh pound}{orange}{125*4}{green}{cm c} {reverse on}{light green} {green}{112} {reverse off}{cm c}{space*2}{reverse on}{light green} {cm g*2}{reverse off}{orange}{125}{reverse on}{light green}{cm t}{green}{111}{reverse off} {reverse on}{light green}{cm @}{108}{reverse off} {reverse on}{green}{cm @}{111}{light green}{sh @}{brown} {reverse off}{space*2}{reverse on}{green} {cm g}{reverse off} {reverse on} "
3560 PRINT"{reverse on}{brown} {reverse off}{orange}{125}{reverse on}{brown}{space*3}{reverse off} {orange}{125*3}{space*2}{green}{cm f}{reverse on}{cm y}{reverse off} {reverse on}{111*2}{reverse off} {cm c}{cm v} {reverse on}{light green} {reverse off}{orange}{125*2} {reverse on}{light green}{cm m}{green}{space*3}{cm @}{cm h}{cm m}{brown} {green}{cm g*2}{099*3}{brown} "
3562 PRINT"{reverse on}{110}{reverse off}{orange}{125}{reverse on}{brown}{space*3}{reverse off} {orange}{125}{106}{107} {reverse on}{green} {cm g}{reverse off} {reverse on} {reverse off}{cm c} {cm v}{space*2}{cm c} {orange}{125*2}{green}{cm c} {reverse on}{brown}{cm m}{green} {108}{sh @}{reverse off}{cm c}{cm v}{reverse on}{brown} {reverse off} {reverse on}{109}{reverse off} {reverse on}{cm n}{green} {brown} "
3564 PRINT"{reverse on}{110}{reverse off} {reverse on}{space*3}{reverse off} {orange}{125}{space*3}{green}{cm c} {cm v} {cm v}{space*6}{orange}{125}{space*3}{reverse on}{brown}{cm m}{reverse off} {reverse on} {reverse off} {orange}{125} {reverse on}{brown} {reverse off} {reverse on}{109}{reverse off} {reverse on}{cm n}{reverse off} {reverse on} "
3566 PRINT"{reverse on}{110}{reverse off} {reverse on}{109}{space*2}{reverse off}{green}{124}{orange}{125}{reverse on}{yellow}{cm +}{reverse off}{cm f} {cm f}{space*8}{green}{cm +}{cm pound}{space*2}{reverse on} {reverse off} {reverse on}{brown}{cm m}{reverse off} {reverse on} {reverse off} {orange}{125} {reverse on}{brown}{110}{reverse off} {reverse on} {reverse off} {reverse on}{cm n}{reverse off} {reverse on} "
3568 PRINT"{reverse on} {reverse off} {reverse on} {109} {reverse off}{green}{124}{yellow}{cm d}{reverse on}{space*2}{cm +}{reverse off} {cm f}{green}{124}{space*4}{124}{cm +*3}{124}{reverse on} {109} {brown}{cm m}{reverse off}{green}{cm pound}{reverse on}{brown} {reverse off}{green}{cm pound}{orange}{125}{green}{124}{reverse on}{brown}{110}{reverse off} {reverse on}{green} {110}{brown}{cm n}{reverse off} {reverse on} "
3570 PRINT"{reverse on}{green}{cm +}{reverse off}{cm pound}{reverse on}{brown}{space*2}{109}{reverse off}{green}{cm +}{reverse on}{yellow}{109}{110}{space*2}{cm +}{reverse off}{green}{cm pound}{cm +}{cm pound*2} {cm +*7}{reverse on} {109} {reverse off}{124}{reverse on}{brown} {reverse off}{green}{cm +*3}{reverse on}{brown}{110}{green} {110}{space*2}{reverse off} {reverse on}{brown} "
3572 PRINT"{reverse on} {reverse off}{green}{cm +}{reverse on}{brown}{109}{space*2}{yellow}{cm j} {109}{110} {cm +}{reverse off}{space*4}{green}{cm pound*3}{cm +*2}{reverse on} {reverse off}{cm +*3}{reverse on} {109} {brown} {reverse off}{green}{cm +}{reverse on} {reverse off}{124}{reverse on}{brown} {green}{110}{space*2}{reverse off}{cm +} {reverse on}{brown} "
3574 PRINT"{green}{cm +*2}{reverse on}{brown} {109} {yellow} {109}{cm p}{cm g}{cm p} {reverse off}{cm +}{space*5}{green}{cm pound*8}{reverse on} {109} {cm m}{cm pound}{109}{brown} {green}{space*2}{cm +*4}"
3576 PRINT"{cm +*2}{reverse on}{brown}{space*2}{109}{reverse off}{light green}{cm +} {reverse on}{green}{space*2}{110}{reverse off} {cm pound*3}{space*5}{cm pound*4}{cm +*4}{reverse on}{cm pound}{reverse off}{cm +*3}{reverse on}{brown} {green}{cm pound}{reverse off}{cm +}{reverse on}{cm pound*3}"
3578 PRINT"{cm pound}{reverse on}{cm +}{brown}{space*3}{reverse off} {reverse on}{green} {109}{110}{109}{light green}{cm pound*2}{reverse off}{green}{cm pound*3}{space*7}{cm pound*2}{reverse on}{cm pound}{reverse off}{cm +*3}{reverse on}{space*3}{brown} {green}{space*6}"
3580 PRINT" {reverse on}{cm +}{brown}{space*3}{green} {109}{110}{109} {reverse off}{cm pound*4}{space*10}{cm pound}{reverse on}{cm pound*3}{reverse off}{cm +*3}{reverse on} {reverse off}{cm +*6}"
3590 IFB<>7THEN70
3591 PRINT"{home}{down*8}"SPC(10)"{reverse on}{orange}{cm u*2}{right}{cm u*4}{down}{left*2} {right}{up}{right*9}{cm u}{right}{cm u}"
3592 PRINTSPC(11)"{down}{reverse on}{space*4}{down}{left*4}{reverse off}{cm t}{cm u*2}{cm y}{cm t}"
3599 GOTO70
3604 PRINT"{brown}{reverse on} {reverse off}{cm k}{reverse on}{green} L{reverse off}{cm v}{reverse on}{light green}L{cm g}{reverse off}{cm v}{cm c}{reverse on}{brown}{sh pound}{reverse off}{sh pound}{reverse on}{green}{cm o}L{reverse off}{orange}{sh -}{reverse on}{green} {reverse off} {reverse on}{brown}{space*5}{light green}L{cm l}{green} {cm h}{light green}{cm g}{space*2}{green}{cm h}{sh +}LL{cm g} {cm g}{sh -}{cm f}{cm g}"
3606 PRINT"{reverse on}{brown} {cm l}{sh pound}{space*6}{reverse off}{sh pound}{reverse on}{green}{sh @} {cm g}{reverse off}{orange}{125} {reverse on}{light green} {brown}{space*4}{110}{green} {reverse off}{space*2}{cm v*2}{reverse on}{cm m}{brown} {reverse off} {reverse on}{green}{cm v}{cm f}{brown} {reverse off} {reverse on}{green}{cm t}{reverse off} {reverse on}{space*2}{111}"
3608 PRINT"{reverse on}{brown} {110} {reverse off}{sh pound}{green}{cm v}{reverse on} {cm h}{reverse off} {reverse on} {reverse off}{orange}{125}{reverse on}{light green} {green}{cm g}{reverse off} {reverse on} {reverse off}{space*2}{reverse on}{brown}{space*3}{110} {reverse off}{orange}{125}{reverse on}{green} {reverse off}{cm v}{reverse on}{cm p*2}{reverse off} {reverse on}{brown} {reverse off}{green}{cm c}{reverse on}{cm f}{reverse off} {reverse on}{brown} {green}{cm g}{111}{112}{reverse off}{cm v}{reverse on}{cm v}{cm @}"
3610 PRINT"{reverse on}{brown}{space*2}{reverse off}{sh pound} {reverse on}{green} {reverse off} {cm c}{reverse on} {reverse off}{light green}{cm v}{orange}{125}{green}{cm c} {reverse on}{light green} {green}{112} {reverse off}{cm c}{reverse on}{brown}{space*2}{110}{space*2}{reverse off}{orange}{125}{reverse on}{light green}{cm t}{green}{111}{reverse off} {reverse on}{light green}{cm @}{108}{reverse off} {reverse on}{green}{cm @}{111}{light green}{sh @}{brown} {reverse off}{space*2}{reverse on}{green} {cm g}{reverse off} {reverse on} "
3612 PRINT"{reverse on}{brown}{space*2}{reverse off} {reverse on}{green} {reverse off} {cm v}{cm c}{cm v} {orange}{125} {green}{cm f}{reverse on}{cm y}{reverse off} {reverse on}{111*2}{brown} {110}{space*3}{reverse off}{orange}{125*2} {reverse on}{light green}{cm m}{green}{space*3}{cm @}{cm h}{cm m}{brown} {green}{cm g*2}{099*3}{brown} "
3614 PRINT"{reverse on}{space*2}{reverse off}{green}{124}{light green}{cm c}{reverse on}{green} {reverse off}{space*5}{reverse on} {cm g}{reverse off} {reverse on} {reverse off}{cm c} {reverse on}{brown}{110}{space*4}{reverse off}{orange}{125*2}{green}{cm c} {reverse on}{brown}{cm m}{green} {108}{sh @}{reverse off}{cm c}{cm v}{reverse on}{brown} {reverse off} {reverse on}{109}{reverse off} {reverse on}{cm n}{green} {brown} "
3616 PRINT"{reverse on}{109} {reverse off}{green}{cm +} {light green}{cm c}{cm v}{space*4}{green}{cm c} {cm v} {cm v}{124}{reverse on}{brown}{space*4}{110}{reverse off}{orange}{125}{space*3}{reverse on}{brown}{cm m}{reverse off} {reverse on} {reverse off} {orange}{125} {reverse on}{brown} {reverse off} {reverse on}{109}{reverse off} {reverse on}{cm n}{reverse off}{green}{cm pound}{reverse on}{brown} "
3618 PRINT"{reverse on}{109*2}{reverse off}{green}{cm +}{124}{space*2}{cm pound*5}{cm +*4}{124}{reverse on}{brown}{space*3}{110} {reverse off}{green}{cm pound}{reverse on}{space*2}{reverse off} {reverse on}{brown}{cm m}{reverse off}{green}{cm +}{reverse on}{brown} {reverse off}{green}{cm +}{orange}{125}{green}{cm pound}{reverse on}{brown}{110}{reverse off}{green}{cm +*3}{reverse on}{brown}{cm n}{reverse off}{green}{cm +}{reverse on}{brown} "
3620 PRINT"{reverse on} {109}{reverse off}{green}{cm +*3}{cm pound*2}{space*5}{cm +*4}{reverse on}{brown}{space*2}{110}{space*2}{reverse off}{green}{124}{reverse on} {109} {brown}{cm m}{reverse off}{green}{cm +}{reverse on}{brown} {reverse off}{green}{cm pound}{orange}{125}{green}{124}{reverse on}{brown}{110}{reverse off} {reverse on}{green} {110}{brown}{cm n}{reverse off}{green}{cm +}{reverse on}{brown} "
3622 PRINT"{reverse on}{space*2}{reverse off}{green}{cm +}{cm pound*2}{space*4}{cm pound}{cm +*6}{reverse on}{brown} {110}{space*2}{110}{reverse off}{green}{cm +*2}{reverse on}{cm y}{109}{110}{reverse off}{124}{reverse on}{brown} {reverse off}{green}{cm +*3}{reverse on}{brown}{110}{green}{109}{110}{space*2}{reverse off}{cm +}{reverse on}{brown} "
3624 PRINT"{reverse on}{space*2}{reverse off}{green}{cm +}{cm pound*3}{space*6}{cm +*3}{124}{reverse on}{brown}{110}{space*2}{110} {reverse off}{green}{cm +*3}{reverse on} {109}{110}{brown} {reverse off}{green}{cm +}{reverse on} {reverse off}{124}{reverse on}{brown} {green}{110}{cm y*2}{reverse off}{cm +*2}{reverse on}{brown} "
3626 PRINT"{reverse on}{space*2}{green}{sh pound}{125}{127}{reverse off}{cm pound*2}{space*7}{cm pound}{cm +}{reverse on}{brown}{space*2}{110}{space*2}{green}{cm pound*2}{reverse off}{cm +*2}{reverse on}{cm y}{109} {cm m}{cm pound}{109}{brown} {green}{cm y*2}{cm +*4}"
3628 PRINT"{reverse on}{brown}{space*2}{green}{109}{125}{110}{127}{reverse off}{space*5}{cm pound*2}{cm +*2}{124}{reverse on}{brown} {110}{space*3}{light green}{cm pound*3}{reverse off}{green}{cm +*3}{reverse on}{cm pound}{reverse off}{cm +*3}{reverse on}{brown} {green}{cm pound}{reverse off}{cm +}{reverse on}{cm pound*3}"
3630 PRINT"{cm pound}{reverse on}{109} {125} {110}{reverse off}{cm +}{cm pound*2}{space*3}{cm pound*2}{cm +*2}{reverse on}{brown}{110}{space*4}{green} {cm +*2} {cm +*2}{127}{space*3}{brown} {green}{space*6}"
3632 PRINT"{cm +}{reverse on} {109}{125}{110} {reverse off}{cm +}{124}{cm pound}{space*6}{cm +}{reverse on}{brown}{space*5}{green}{cm +}{sh pound}{125}{127}{cm +*3}{reverse off}{cm +*3}{reverse on} {reverse off}{cm +*6}"
3638 IFB=1THENB=14:GOTO70
3639 IFB<>13THENGOTO70
3640 IFDC=1THEN3647
3641 PRINT"{home}{down*7}"SPC(10)"{blue}{reverse on}{sh pound}{space*5}{right*5}{up}{cm u*2}{space*2}{right}{reverse off}{cm u}{right}{cm y}"
3642 PRINTSPC(7)"{reverse on}{sh pound}{space*5}{down}{left*8}{sh pound}{space*6}{down}{left*7}{reverse off}{cm asterisk}{reverse on}{space*10}"
3643 PRINT"{right*5}{reverse on}{sh pound}{space*6}{reverse off}{sh pound}{down}{left*8}{reverse on}{space*7}{down}{left*6}{space*7}{cm asterisk}{down}{left*7}{reverse off}{cm asterisk}{reverse on}{space*8}{down}";
3644 PRINT"{left*7}{space*7}{right*5}{cm asterisk}"
3645 PRINT"{up*5}"SPC(12)"{green}{cm pound}{cm +*2}"
3646 AA=1:C1=12:S1=34:P0=197:P1=81:GOSUB2044:GOTO70
3647 PRINT"{home}{down*6}"SPC(24)"{blue}{reverse on} {reverse off}{right}{cm u}{right}{cm y}"
3648 AA=1:C1=12:S1=34:P0=202:P1=86:GOSUB2044:GOTO70
3654 PRINT"{dark gray}{cm o}{blue}{cm i}{cm p}{cm @*2}{space*2}{green}{cm c}{reverse on} {cm g}{reverse off} {reverse on}{cm o}L{reverse off}{orange}{sh -}{reverse on}{green} {reverse off}{brown}{cm asterisk}{reverse on}{cm u*3}{cm asterisk}{reverse off} {reverse on}{light green}L{cm l}{brown} {reverse off}{cm h}{reverse on}{light green}{cm g}{space*2}{green}{cm h}{sh +}LL{cm g} {cm g}{sh -}{cm f}{cm g}"
3656 PRINT"{reverse on}{dark gray}{space*2}{blue}{space*5}{127}{reverse off}{green}{cm c} {reverse on}{sh @} {cm g}{reverse off}{orange}{125} {reverse on}{light green}{cm o}{reverse off}{space*2}{brown}{110}{127}{reverse on}{127}{green} {reverse off} {reverse on}{brown} {cm l}{reverse off}{green}{cm v}{reverse on}{cm m}{brown} {reverse off} {reverse on}{green}{cm v}{cm f}{brown} {reverse off} {reverse on}{green}{cm t}{reverse off} {reverse on}{space*2}{111}"
3658 PRINT"{reverse on}{dark gray}{109}{space*4}{blue}{space*3}{dark gray}{127}{reverse off}{space*2}{brown}{099*2}{reverse on}{green} {reverse off}{brown}{110}{cm y*3} {orange}{125}{brown}{127}{reverse on}{127}{green} {brown} {cm l}{green}{cm p}{reverse off} {reverse on}{brown} {reverse off}{green}{cm c}{reverse on}{cm f}{reverse off} {reverse on}{brown} {green}{cm g}{111}{112}{reverse off}{cm v}{reverse on}{cm v}{cm @}"
3660 PRINT"{reverse on}{gray}{cm m}{dark gray}{space*4}{blue}{space*3}{dark gray} {reverse off} {green}{cm c} {reverse on}{light green} {green}{112} {reverse off}{cm c}{cm f}{orange}{125*3} {brown}{127}{reverse on}{127}{space*2}{light green}{cm @}{108}{reverse off} {reverse on}{green}{cm @}{111}{light green}{sh @}{brown} {reverse off}{space*2}{reverse on}{green} {cm g}{reverse off} {reverse on} "
3662 PRINT"{reverse on}{gray} {dark gray}{cm g}{space*3}{blue}{space*3}{dark gray} {reverse off}{space*2}{green}{cm f}{reverse on}{cm y}{reverse off} {reverse on}{111*2}{reverse off} {orange}{125*3}{space*2}{brown}{127}{reverse on}{space*2}{green}{space*3}{cm @}{cm h}{cm m}{brown} {green}{cm g*2}{099*3}{brown} "
3664 PRINT"{reverse on}{gray} {104}{cm m}{dark gray}{space*2}{blue}{space*3}{reverse off}{dark gray}{sh pound} {reverse on}{green} {cm g}{reverse off} {reverse on} {reverse off}{cm c}{space*2}{orange}{125*3}{space*3}{reverse on}{brown}{space*2}{reverse off} {reverse on}{green} {108}{sh @}{reverse off}{cm c}{cm v}{reverse on}{brown} {reverse off}{space*3}{reverse on}{cm n}{green} {brown} "
3666 PRINT"{reverse on}{gray} {104} {127}{dark gray} {blue}{space*3}{reverse off}{space*2}{green}{cm c} {cm v} {cm v}{124} {orange}{125}{106}{107}{space*3}{reverse on}{brown}{space*2}{reverse off}{space*2}{reverse on} {reverse off} {orange}{125} {reverse on}{brown} {reverse off}{space*3}{reverse on}{cm n}{reverse off} {reverse on} "
3668 PRINT"{reverse on}{gray} {cm m} {cm m}{dark gray} {blue}{space*3}{reverse off}{space*9}{orange}{125}{space*5}{reverse on}{brown}{space*2}{reverse off}{space*2}{reverse on} {reverse off} {orange}{125} {reverse on}{brown}{110}{reverse off}{space*3}{reverse on}{cm n}{reverse off} {reverse on} "
3670 PRINT"{reverse on}{gray}{space*2}{109}{space*2}{blue}{space*4}{127}{reverse off}{space*7}{orange}{125}{space*5}{reverse on}{brown}{space*2}{reverse off}{space*2}{reverse on} {reverse off}{space*3}{reverse on}{110}{green}{sh pound} {110}{brown}{cm n}{reverse off} {reverse on} "
3672 PRINT"{reverse on}{gray}{109}{space*2}{109} {blue}{space*5}{127}{reverse off}{space*9}{green}{cm pound*3}{reverse on}{brown}{space*2}{reverse off}{green}{cm +*2}{reverse on}{brown} {reverse off}{green}{cm +*3}{reverse on}{brown}{110}{green}{109}{110} {cm +}{reverse off}{cm pound}{reverse on}{brown} "
3674 PRINT"{reverse on}{green} {reverse off}{cm +*2}{reverse on}{gray} {blue}{sh pound}{space*18}{brown}{space*2}{green}{109}{110}{brown} {reverse off}{green}{cm +}{reverse on} {reverse off}{124}{reverse on}{brown} {green}{110}{cm y*2}{reverse off}{cm +*2}{reverse on}{brown} "
3676 PRINT"{green}{cm pound}{cm +}{reverse on}{sh pound}{125}{127}{reverse off}{blue}{127}{reverse on}{space*13}{reverse off}{sh pound}{green}{cm +}{reverse on}{cm pound*2}{brown}{space*2}{green}{cm y}{109} {cm m}{cm pound}{109}{brown} {green}{cm y*2}{cm +*4}"
3678 PRINT"{reverse on} {reverse off}{cm +}{reverse on}{109}{125}{110}{127}{reverse off}{cm pound*2}{blue}{127}{reverse on}{space*8}{127}{reverse off}{green}{cm +*3}{reverse on}{light green}{cm pound*2}{brown}{space*2}{reverse off}{green}{cm +*2}{reverse on}{cm pound}{reverse off}{cm +*3}{reverse on}{brown} {green}{cm pound}{reverse off}{cm +}{reverse on}{cm pound*3}{reverse off}{cm +}"
3680 PRINT"{cm pound}{reverse on}{109} {125} {110}{reverse off}{cm +*2}{cm pound}{blue}{127}{reverse on}{space*9}{reverse off}{sh pound} {reverse on}{green} {cm +}{brown}{space*2}{green}{sh pound}{125}{127}{space*2}{reverse off}{cm +}{reverse on}{brown} {green}{space*2}{cm pound}{space*2}{cm pound}"
3682 PRINT"{cm +}{reverse on} {109}{125}{110} {reverse off}{cm +*3}{cm pound*2}{reverse on}{sh pound}{125}{127}{reverse off}{cm pound*5}{reverse on}{sh pound}{125}{127}{sh pound}{brown}{space*2}{green}{109}{125}{110}{127}{reverse off}{cm +*2}{reverse on} {reverse off}{cm +*6}"
3683 IFDC=0THEN3690
3684 PRINT"{home}{down}{dark gray}{reverse on}{space*7}{cm asterisk}":PRINT"{right*5}{reverse on}{space*3}{down}{left*3}Q Q{down}{left*3} {reverse off}{cm v}{reverse on} {down}{left*3}{space*3}{down}{left*3} {reverse off} {reverse on} {down}{left*3}{reverse off}{cm k} {cm l}"
3685 PRINT"{right*5}{reverse on}{space*4}{cm asterisk}{down}{left*5}{space*5}{cm asterisk}"
3690 B=B+13:GOTO70
3704 PRINT"{down}{light blue} {reverse on}{space*9}{reverse off} {reverse on}{dark gray}{space*3}{cm g}{space*2}H{space*6}{reverse off}{light green}{cm c}{reverse on}{green} {reverse off}{light green}{cm d}{reverse on}{green} {reverse off}{light green}{cm f}{reverse on}{green}{cm l} O{cm h}{reverse off} {reverse on}{brown}{cm k} "
3706 PRINT" {reverse on}{light blue}{cm @*8}{reverse off}{sh pound}{reverse on}{dark gray}{sh pound}{space*3}{109}{space*2}{103}{space*5}{green}{111}{cm g}{reverse off} {brown}{109}{cm o*6}{reverse on}{green} {brown}{cm h} {green} "
3708 PRINT" {blue}{cm u*22} {light green}{cm v}{reverse on}{green} {reverse off} {reverse on}{light green} {reverse off} {brown}{110}{reverse on}{green} {reverse off} {brown}{127}{reverse on}{127}{space*2}{reverse off}{light green}{cm c}"
3710 PRINT" {reverse on}{brown}{space*25}{light green} {brown} {green} {reverse off}{light green}{cm c} {reverse on}{green} {reverse off}{light green}{cm v}{brown}{127}{reverse on}{space*2}"
3712 PRINT" {reverse on} {cm +*2}{orange}{cm pound*3} {brown}{space*4}{orange}{space*5}{brown}{space*8}{orange} {brown}{space*2}{reverse off} {reverse on}{green} {reverse off}{light green}{cm c} {reverse on}{green} {reverse off} {reverse on}{brown}{space*2}"
3714 PRINT" {reverse on}{orange}{space*2}{brown}{cm +}{orange}{cm pound*6}{space*3}{cm pound*5}{space*11}{reverse off}{green}{cm pound*3}{cm +*2}{reverse on}{brown}{space*2}"
3716 PRINT" {reverse on}{orange}{space*13}{cm +}{cm pound*7} {cm +}{cm pound*2} {green}{cm pound}{cm +*4}{reverse off}{cm +*2}{reverse on}{brown}{space*2}"
3718 PRINT" {reverse on}{orange}{space*2}{cm pound*3}{cm +*4}{cm pound*2} {cm pound*2}{cm +} {cm pound}{space*3}{cm pound*3}{cm +}{cm pound*2}{space*2}{green}{cm pound*2}{reverse off}{cm +*3}{reverse on}{brown}{space*2}{green}{cm pound}"
3720 PRINT" {reverse on}{orange}{space*6}{cm +}{cm pound*2}{space*6}{cm +} {cm +}{cm pound}{space*12}{reverse off}{green}{cm +*2}{reverse on}{brown}{space*2}{green}{cm pound}"
3722 PRINT" {reverse on}{cm t}{space*2}{cm +*3}{cm pound}{orange} {green}{cm pound*2}{cm +*4}{cm pound}{cm m}{orange}{cm +}{cm i}{cm o}{cm @}{green}{cm pound*2}{orange}{cm @}{cm p}{green}{cm pound}{cm +*2}{cm pound*2}{cm t*2}{reverse off}{cm +*2}{reverse on}{brown}{space*2}{reverse off}{green}{cm +}"
3724 PRINT" {reverse on}{cm +*2}{cm pound*2}{space*5}{cm pound} {cm pound} {cm pound}{cm +*3}{cm pound*3}{space*7}{cm pound*2}{cm +*3}{reverse off}{cm +}{reverse on}{brown}{space*2}{reverse off}{green}{cm +}"
3726 PRINT" {reverse on}{cm +}{cm pound*8} {cm +}{space*6}{cm +}{124}{cm pound} {cm pound}{cm +*11}{brown}{space*2}{reverse off}{green}{cm +}"
3728 PRINT" {reverse on}{space*3}{cm pound}{cm +}{cm pound*10}{space*16}{cm +*2}{brown}{space*2}{reverse off}{green}{cm +}":GOTO70
3732 Q$=" {reverse on}{space*34}"
3733 PRINT"{light blue}{down}";:FORA=1TO2:PRINTQ$:NEXT:PRINT"{right}{blue}{cm u*34}"
3734 FORA=1TO6:PRINT"{orange}";Q$:NEXT:FORA=1TO4:PRINT"{dark gray}";Q$:NEXT
3735 PRINT"{home}":FORA=1TO9:PRINTSPC(30)"{brown}{reverse on}{space*3}":NEXT
3736 IFO>=1THENPRINT"{home}{down*7}":FORA=1TO3:PRINT"{dark gray}";Q$:NEXT
3737 IFO>=2THENPRINT"{home}{down*4}":FORA=1TO3:PRINT"{dark gray}";Q$:NEXT
3738 IFO>=3THENPRINT"{home}{down}":FORA=1TO3:PRINT"{dark gray}";Q$:NEXT:POKESB,PEEK(SB)OR16:GOSUB2011:GOTO2210
3740 GOTO70
3754 PRINT"{down}{yellow}{space*12}{reverse on}O"
3756 PRINT" {reverse on}{111}{reverse off}{space*10}{reverse on}{111}"
3758 PRINT" {reverse on}{111}{reverse off}{space*10}{reverse on}{111}{reverse off}{space*25}{reverse on}{111}"
3760 PRINT" {reverse on}{111}{reverse off}{space*10}{reverse on}{111}{reverse off}{space*19}{reverse on}{111}{reverse off}{space*5}{reverse on}{111}"
3762 PRINT" {reverse on}{111}{reverse off}{space*10}{reverse on}{111}{reverse off}{space*14}{reverse on}{111}{reverse off}{space*4}{reverse on}{111}{reverse off}{space*5}{reverse on}{111}"
3764 PRINT" {reverse on}{111}{reverse off}{space*10}{reverse on}{111}{reverse off}{space*6}{reverse on}{111}{reverse off}{space*7}{reverse on}{111}{reverse off}{space*4}{reverse on}{111}{reverse off}{space*5}{reverse on}{111}"
3766 PRINT" {reverse on}{111}{reverse off}{space*10}{reverse on}{111}{reverse off}{space*6}{reverse on}{111}{reverse off}{space*7}{reverse on}{111}{reverse off}{space*4}{reverse on}{111}{reverse off}{space*5}{reverse on}{111}"
3768 PRINT"{reverse on}{brown}{cm y*11}{orange}{111}{cm y*3}{reverse off}{space*4}{reverse on}{yellow}{111}{reverse off}{space*7}{reverse on}{111}{reverse off}{space*4}{reverse on}{111}{reverse off}{space*5}{reverse on}{111}"
3770 PRINT"{space*3}{reverse on}{brown}{cm y*12}{orange}{111}{cm y*2}{112}{yellow}{111}{reverse off}{space*7}{reverse on}{111}{reverse off}{space*4}{reverse on}{111}{reverse off}{space*5}{reverse on}{111}"
3772 PRINT"{space*5}{reverse on}{brown}{cm t*14}{orange}{111}{cm y}{112}{reverse off}{space*5}{reverse on}{yellow}{111}{reverse off}{space*2}{reverse on}{brown}{cm y*7}{orange}{111}{112}"
3774 PRINT"{space*8}{reverse on}{brown}{cm y*13}{orange}{111}{cm y}{112}{reverse off}{space*2}{reverse on}{brown}{cm y}{yellow}{111}{brown}{cm y*7}{orange}{111}{112}"
3776 PRINT"{space*11}{reverse on}{brown}{cm y*12}{orange}{111}{cm y*2}{112}{yellow}{111}{brown}{cm y*3}{orange}{111}{112}{111}{112}"
3778 PRINT"{space*16}{reverse on}{brown}{cm y*11}{orange}{111}{112}{111}{112}"
3782 B=B+13:GOTO70
3850 PRINT"{green} {reverse on} {cm h}{reverse off} {reverse on}{space*2}{reverse off}{cm b}{reverse on} {reverse off} {reverse on} {reverse off} {reverse on}{cm n}{space*2}{cm h}{reverse off}{cm b}{reverse on} L{cm j}{reverse off} {reverse on} {reverse off} {reverse on}{space*2}{reverse off} {reverse on} {reverse off}{cm b}{reverse on} {reverse off}{cm b}{reverse on}{brown}{cm o*3}{cm asterisk}{reverse off}{green}{cm b}{reverse on}{brown}{space*3}"
3856 PRINT" {green}{cm v}{cm b}{cm c*2} {reverse on} {reverse off}{cm v}{reverse on} {reverse off} {reverse on} {reverse off} {reverse on}P{reverse off}{cm b} {reverse on} {reverse off} {reverse on} {reverse off}{cm b}{cm c} {cm b}{reverse on}{cm u}{brown}{cm j}{green} {reverse off} {reverse on} {reverse off}{cm b}{cm v}{orange}{sh -} {sh -}{brown}{cm asterisk}{reverse on}{cm asterisk}{space*3}"
3858 PRINT" {reverse on}{green} {reverse off} {reverse on} {reverse off}{cm b*2} {reverse on}{cm u}{reverse off}{cm c}{reverse on} {reverse off}{cm v}{reverse on}{brown} {reverse off} {reverse on}{green}{cm o}{cm j}O{brown} {reverse off}{green}{cm b} {reverse on} {reverse off} {reverse on} {reverse off} {reverse on}{brown}{cm j}{reverse off} {green}{cm v} {brown}{cm h} {orange}{sh -} {sh -} {brown}{cm asterisk}{reverse on}{space*3}"
3860 PRINT"{space*2}{reverse on}{green} {reverse off}{cm v} {reverse on} {reverse off} {reverse on}{brown} {reverse off} {green}{cm c}{brown}{sh -}{reverse on} {reverse off} {reverse on}{green} {reverse off}{brown}{cm k} {reverse on} {reverse off}{cm l}{green}{cm c}{brown}{cm l}{reverse on}{green} {reverse off}{brown}{cm l}{green}{cm v}{reverse on}{brown}{cm j}{reverse off} {cm k} {cm h} {orange}{sh -} {sh -}{space*2}{reverse on}{brown}{space*3}"
3862 PRINT"{space*3}{cm k}{green}{cm c}{space*2}{reverse on}{brown} {reverse off} {cm h}{sh -}{reverse on} {reverse off}{space*2}{cm k} {reverse on} {reverse off}{cm l}{space*3}{cm l} {reverse on}{cm j}{reverse off} {cm k}{space*5}{orange}{sh -}{space*2}{reverse on}{brown}{space*3}"
3864 PRINT"{space*7}{reverse on} {reverse off}{space*3}{reverse on} {reverse off}{space*4}{reverse on} {reverse off}{space*6}{reverse on}{cm j}{reverse off}{space*7}{orange}{sh -}{space*2}{reverse on}{brown}{space*2}N"
3866 PRINT" {green}{cm pound*2}{cm +*4}{reverse on}{brown} {reverse off}{green}{cm +*10}{cm pound*9}{space*4}{orange}{sh -}{green}{cm pound*2}{reverse on}{brown} N "
3868 PRINT"{space*2}{reverse on}{dark gray} {reverse off}{cm f}{space*3}{green}{cm pound}{cm +*6}{cm pound*6}{space*9}{cm pound*3}{space*2}{reverse on}{brown}N N"
3870 PRINT" {reverse on}{dark gray}{cm j}{space*2}{reverse off} {green}{cm pound*3}{cm +*3}{cm pound*4}{space*18}{cm +}{reverse on}{brown} NN"
3872 PRINT" {reverse on}{dark gray}{space*4}{reverse off}{space*3}{green}{cm pound*2}{cm +}{cm pound*7}{space*10}{cm pound*4}{cm +*2}{reverse on}{brown}NN "
3874 PRINT" {reverse on}{dark gray} M{space*2}{reverse off}{cm f}{space*12}{gray}{cm d}{space*15}{reverse on}{brown}N{space*2}"
3876 PRINT" {reverse on}{dark gray}{space*2}{cm g} {cm l}{reverse off}{gray}{cm i*6}{cm p*6}{reverse on}{cm h}{cm j}{reverse off}{space*4}{green}{cm pound*9}{cm +}{reverse on}{brown}{space*3}"
3878 PRINT" {reverse on}{dark gray}{space*2}G {cm m}{gray}{space*6}O{cm y*6}{cm g}{reverse off}{space*9}{reverse on}{green}{sh pound}{cm asterisk}{reverse off}{cm +*3}{reverse on}{brown}{space*3}"
3880 PRINT" {reverse on}{dark gray}{space*2}H{space*2}{reverse off}{space*18}{green}{cm pound*2}{cm +*2}{reverse on}{sh pound}MN{cm asterisk}{reverse off}{cm +*2}{reverse on}{brown}{space*3}":GOTO70
3885 FORA=1TO14:PRINT" {reverse on}{blue}{space*37}":NEXT
3886 PRINT"{home}{down*10}{right*7}{blue}{reverse on}M{down}{cm y}EEDDCCCFFCEE{cm y*2}EDDCFFRR{cm p}N"
3888 IFDA=0THENPRINT"{home}{down*12}"SPC(12)"{blue}{reverse on}Q{reverse off} {reverse on}QQCCCCCCCCQ"
3890 AA=3:S1=34:S2=34:C1=12:C2=0:P0=40:P1=130:P2=40:P3=100:X=2:Y=2:GOSUB2044
3894 B=B+13:GOTO70
3900 PRINT"{light blue} {reverse on}{space*25}{cm @}{cm p}{cm i*8}"
3906 PRINT" {reverse on}{space*24}{reverse off}{sh pound}{space*7}{brown}M"
3908 PRINT" {reverse on}{light blue}{cm p} {reverse off}{sh pound}{cm y}{cm asterisk}{reverse on}{space*17}{cm @}{reverse off}{sh pound}{space*2}{brown}M{space*2}MN{space*2}{reverse on}{cm l}"
3910 PRINT"{space*6}{light blue}{cm asterisk}{reverse on}{space*15}{reverse off}{sh pound}{space*5}{brown}{cm t}{cm y*2}{reverse on}{cm i}{cm asterisk}{sh pound}{reverse off}{sh pound}"
3912 PRINT"{space*8}{light blue}{cm t}{cm y}{cm u}{cm y} {cm asterisk}{reverse on}{space*5}{cm o}{cm i}{reverse off}{space*11}{brown}{cm asterisk}{reverse on}M"
3914 PRINT"{space*14}{light blue}{cm asterisk}{reverse on}{space*3}{reverse off}{sh pound}{space*13}{brown}M{reverse on} "
3916 PRINT"{space*15}{light blue}{cm asterisk}{reverse on} {reverse off}{sh pound}{space*15}{reverse on}{brown} "
3918 PRINT" ECFCF{cm p}{space*9}{blue}{cm y}{reverse on}{cm i}{cm u}{reverse off}{cm f}{space*13}{reverse on}{brown} "
3920 PRINT"{space*3}B{space*2}MEEECCFF{cm @} {blue}{cm i}{reverse on} {cm o}{reverse off}{cm u}{space*13}{reverse on}{brown} "
3922 PRINT"{space*3}{cm n}{space*3}{cm h} {cm n} M {blue}{cm o}{cm i}{reverse on}{space*2}{reverse off}{cm v} {green}{cm @}{cm p*3}{cm o}{cm i}{cm o}{cm i*2}{reverse on}{cm u*2}{cm y}{cm t*2}{brown} {green}{cm u*2}"
3924 PRINT" {brown}M{space*2}M{space*2}B {blue}{cm @*2}{cm o}{reverse on}{space*3}{reverse off}{cm v}{green}{cm pound*2}{cm +}{reverse on}{cm +}{space*7}{cm +*3}{cm pound*2}{space*4}"
3926 PRINT"{space*2}{brown}{cm g}{space*2}{cm g}{blue}{cm o}{cm i}{reverse on}{space*5}{reverse off}{cm v}{green}{cm pound}{cm +}{reverse on}{space*4}{cm +*2}{cm pound} {cm pound*2}{cm +*3}{space*7}"
3928 PRINT"{space*2}{blue}{cm p}{cm o}{cm i}{reverse on}{space*6}{reverse off}{cm v}{green}{cm +*2}{reverse on}{space*3}{cm pound}{cm +*3}{cm pound}{space*14}"
3930 PRINT" {reverse on}{blue}{space*8}{reverse off}{cm v}{green}{cm pound}{cm +}{reverse on}{space*8}{cm pound*5}{space*3}{cm pound*3}{cm +*3}{space*2}"
3932 PRINT" {reverse on}{blue}{space*6}{reverse off}{cm v}{green}{cm pound}{cm +*2}{reverse on}{space*12}{cm +}{space*12}"
3940 B=B+13:GOTO70
3950 PRINT"{light blue} {reverse on}{space*25}{cm @}{cm p}{cm i*8}"
3956 PRINT" {reverse on}{space*24}{reverse off}{sh pound}"
3958 PRINT" {reverse on}{cm p} {reverse off}{sh pound}{cm y}{cm asterisk}{reverse on}{space*17}{cm @}{reverse off}{sh pound}"
3960 PRINT"{space*6}{cm asterisk}{reverse on}{space*15}{reverse off}{sh pound}"
3962 PRINT"{space*8}{cm t}{cm y}{cm u}{cm y} {cm asterisk}{reverse on}{space*5}{cm o}{cm i}{reverse off}{space*6}{yellow}{cm o}{cm p}{cm @*3}{cm i}{cm o}{cm p}"
3964 PRINTSPC(15)"{light blue}{cm asterisk}{reverse on}{space*2}{reverse off}{sh pound}{space*9}{reverse on}{yellow}{cm @*4} {cm o} {cm @}"
3966 PRINTSPC(28)"{cm m}{reverse on}{cm m}{cm l}{reverse off}{space*4}{reverse on} "
3968 PRINTSPC(28)"H{reverse on}{cm n}{cm l}{reverse off}{space*4}{reverse on}{cm j}"
3970 PRINTSPC(28)"{cm l}{reverse on}{cm l}{reverse off}{cm k}{space*4}{reverse on}{cm j}"
3972 PRINTSPC(18)"{brown}{cm p}L{cm p*4}L{space*3}{yellow}G{reverse on}{cm m}{reverse off}{cm h}{space*4}{reverse on}O"
3974 PRINTSPC(19)"{brown}{cm k}{space*4}{cm k}{green}{cm pound*2}{cm +*2}{reverse on}{yellow}{sh -}{reverse off}{cm k}{space*4}{reverse on}O"
3976 PRINT"{space*3}{green}{cm pound*6}{space*3}{cm pound*6} {brown}{cm k}{dark gray}QQQQ{brown}{cm k}"
3978 PRINT"{space*5}{green}{cm pound*2}{cm +*4}{cm pound*4}{space*3}{dark gray}Q{red}{cm c}{cm i*2}{cm u*2}{dark gray}Q"
3980 PRINT" {green}{cm +*9}{cm pound*8} {dark gray}QQQQQ{space*4}{green}{cm pound*5}{cm +*3}"
3990 B=B+13:GOTO70
5990 DATARIFLE,TORCH,COMPASS,PICK,BINOCULARS,RATIONS,KNIFE,BEADS
5991 DATAMEDICINES,CANTEEN,MATCHES,ROPE
6000 DATAE,S,S,N,S,N,S,N,N,,E,W,E,W,E,W,,S,,N,S,N,,E,,E,W,N,,,E,S,N,,,,,,,S,,N,E
6001 DATATRADING POST,RIVER,,TREES,JUNGLE,,JUNGLE,ELEPHANTS,,DEAD BODY,JEWEL,
6002 DATAJUNGLE,APES,,TREES,,BOG,,MARSH,TREE,RIVER,,TREE,,DEEP RIVER,CLIFFS,STREAM
6003 DATA,WATERFALL,PATH,,ROPE BRIDGE,RAVINE,LEDGE,,STREAM,ROCK,,SPADE,
6004 DATALAGOON,,ROCKS,SCEPTRE,FISH,,WEB,AMULET,,SNAKE,BOX,,LONG DROP,
6005 DATAHAT,OLD BLADE,ROCK,,PEBBLE,ROCKS,RIVER,,MOSS,WATER,BANK,,CLIFFS,ROCKS,
6006 DATADEAD TREE,,OLD ZULU,
7002 GOSUB2020:POKE53280,11
7004 PRINT"{light blue}{clear}";
7006 PRINT"{reverse on}{space*33}{reverse off}{sh pound}{127}{reverse on} {cm p}{cm o*2}{cm i}{reverse off}";
7008 PRINT"{cm y}{reverse on}{cm i}{cm o}{cm p}{reverse off}{sh pound}{127}{reverse on}{space*16}{reverse off}{sh pound}{cm t}{cm y}{cm u}{reverse on}{space*6}{reverse off}{sh pound}"
7010 PRINT"{space*6}{127}{reverse on}{cm @}{cm p}{cm @}{cm i*2}{cm p}{cm @}{space*7}{reverse off}{sh pound}{space*5}{reverse on}{cm o}{cm p}{cm i}{cm @}{reverse off}{sh pound}"
7012 PRINT"{space*14}{127}{reverse on}{space*5}{reverse off}{sh pound}"
7014 PRINT"{space*15}{127}{reverse on}{space*3}{reverse off}{sh pound}"
7016 PRINT"{space*16}{127}{reverse on} {reverse off}{sh pound}"
7018 PRINT"{down*2}{space*28}{yellow}{cm i}{brown}{cm i}"
7020 PRINT"{space*23}{reverse on}{yellow}{space*3}{cm y}{cm t}{space*3}{cm y}{space*3}{reverse off}{brown}{cm k}"
7022 PRINT"{space*23}{reverse on}{yellow} you're{space*4}{brown} "
7024 PRINT"{space*3}{reverse on}{dark gray} {gray}{space*2}{reverse off}{space*17}{reverse on}{yellow}{cm h}{cm p} {cm i}{space*2}dead{space*2}{reverse off}{brown}{cm k}"
7026 PRINT" {reverse on}{dark gray} {gray}{space*6}{reverse off}{space*20}{reverse on}{yellow}{cm y}{brown}{112}"
7028 PRINT"{space*3}{reverse on}{dark gray} {gray}{space*2}{reverse off}{space*22}{reverse on}{yellow} {brown}{cm m}"
7030 PRINT"{space*3}{reverse on}{dark gray} {gray}{space*2}{reverse off}{space*22}{reverse on}{yellow} {brown}{cm m}"
7032 PRINT"{space*3}{reverse on}{dark gray} {gray}{space*2}{reverse off}{green}{cm pound*6}{space*16}{reverse on}{yellow} {brown}{cm m}{reverse off}{green}{cm pound}"
7034 PRINT" {cm pound}{cm +*13}{cm pound*4}{space*3}{cm pound*4}{cm +*6}{cm pound*3}"
7036 PRINT"{124}{space*2}{cm pound*3}{cm +*5}{cm pound*3}{space*11}{cm +*6}{cm pound*2}{space*6}{cm +}";
7038 PRINT"{cm +}{124}{space*7}{cm +*3}{cm pound*7}{space*2}{cm +*9}{space*9}{cm +}";
7040 PRINT"{cm +*2}{cm pound*3}{space*18}{cm pound*4}{cm +*5}{cm pound*2}{cm +*2}{space*2}{cm +*2}";
7042 PRINT"{cm +*10}{cm pound*4}{space*4}{cm pound*9}{cm +*3}{cm pound*2} {cm pound}{cm +*2} {cm pound}{cm +*2}";
7044 PRINT"{cm +*10}{space*24}{cm pound*2}{cm +*4}";
7046 PRINT"{reverse on}{dark gray}{space*40}{reverse off}";
7048 PRINT"{reverse on}{space*40}{reverse off}";
7050 PRINT"{reverse on}{space*39}";:POKE56295,11:POKE2023,160:RETURN
8000 POKE54277,131:POKE54278,128:POKE54284,17:POKE54285,128:POKE54291,17:POKE54292,128
8001 POKE49881,33:POKE49882,33:POKE49883,33:RETURN
8002 POKE49884,1:SYS49408:SYS49434,0:RETURN
8003 POKE49884,1:SYS49408:SYS49434,1:RETURN
8004 POKE49884,1:SYS49408:SYS49434,2:RETURN
8010 FORA=0TO6:POKE54296,A:FORH=1TO50:NEXT:NEXT:RETURN
8020 FORA=6TO0STEP-1:POKE54296,A:FORH=1TO50:NEXT:NEXT:SYS49421:RETURN
8100 PRINT"ok";:GOSUB2010:PRINT" you head across the plateau":PRINT"towards the desert.."
8101 GOSUB2011
8102 PRINT"{clear}{yellow}a voice boooommmmms....":GOSUB2010
8104 PRINT"{down}{light blue}remember 'manobi'...":GOSUB2011
8105 PRINT"{down}{yellow}loading second part{down*2}":PRINT"please wait....{black}"
8106 OPEN2,8,2,"@0:start,s,w"
8107 PRINT#2,GL:FORA=1TO5:IFT$(A)=""THENT$(A)="*"
8108 PRINT#2,T$(A):NEXT:PRINT#2,DF:CLOSE2
8110 POKE49243,51:SYS40719
9000 IFGC<100THEN792
9001 RETURN
9002 IFGC<200THEN792
9003 RETURN
9004 IFGC<250THEN792
9005 RETURN
9006 IFGC<300THEN792
9007 RETURN
9008 IFGC<350THEN792
9009 RETURN
9010 IFGC<400THEN792
9011 RETURN
9012 IFGC<450THEN792
9013 RETURN
