JUNGLE7 INGEZONDEN DOOR RAINIER MAASF( DEN HAAGa2 VOOR DE MCM/EUROSOFT|< PROGRAMMEERWEDSTRIJDFP MSX1 EN MSX2Zd: INITIALISATIE ***************n ,: : , , : : x P$( ),P2$( ),N( ),Z( ),W( ),O( ),TP( )$P. T: VASTE TEKSTEN ***************P$()"JE BENT IN DE OELOE-JUNGLE. JE OPDRACHT: DOOD DE OELOE- OELOE-KONING."ہP$()"JE STAAT OP EEN PAD ONDER HO-GE BOMEN."P$()"JE BENT OP HET ZELFDE PAD."*P$()"HET PAD MAAKT NU EEN BOCHT."eP$()"JE VIEL IN EEN RAVIJN. JE BENT NU DUS DOOD."P$()"JE STAAT NOG STEEDS OP DAT BERGPAD."P$()"JE BENT OP EEN BERGPAD.": P2$()"ER ZIJN APEN DIE JE NIET DOOR- LATEN GAAN."P$()"HET BERGPAD MAAKT EEN BOCHT."[P$()"HET PAD IS NIET MEER TE ZIEN,ZO HOOG IS HET GRAS."P$( )"HET PAD IS HAAST NIET TE ZIENDOOR HET HOGE GRAS."؃P$( )"JE STAAT OP HET PAD, HIER IS OOK EEN SOORT BEELD."+P$( )"JE STAAT AAN DE VOET VAN EEN BERG. JE KAN DE BERG OP OF HET BOS IN."P$()"DE BERG GAAT HIER STEIL OM- HOOG. IN HET OOSTEN IS EEN DEUR. HIJ IS": P2$()" DICHT.""P$()"JE STAAT OP HET BERGPAD.",P$()"JE BENT OP HET BERGPAD ALLEENHET LOOPT HIER DOOD."6P$()"JE STAAT OP HET BERGPAD."~@P$()"JE STAAT OP HET PAD.": P2$()"MAAR HET GRAS IS VEEL TE HOOG, JE KAN NIET VERDER."JP$()"EEN GROTE VRUCHT VIEL OP JE, JE BENT DOOD"TP$()"JE BENT OP EEN ZANDPAD DAT DWARS DOOR HOGE BOMEN LOOPT."I^P$()"JE LIEP TEGEN EEN BOOM OP EN BRAK DAARBIJ JE NEK. JE BENT DOOD."hP$()"JE STAAT OOG IN OOG MET DE OELOE-OELOE-KONING."džrP$()"JE STRUIKELDE EN VIEL IN EEN RAVIJN. JE BENT DOOD.")|P$()"JE LIEP IN DE VAL VAN DE KO- NING EN VIEL DAARBIJ IN EEN DIEPE PUT. JE BENT DOOO..."XP$()"JE STAAT OP EEN LANG BERG- PAD."P$()"JE STAAT OP EEN PAD. HET GRASIS HIER NIET ZO HOOG."߇P$()"HE, DAT IS LEUK ER STAAN HIERALLEMAAL BOMEN MET VRUCHTEN."%P$()"JE STAAT OP HET ZELFDE ZAND- PAD. HET GAAT NU RECHTDOOR."jP$()"JE STAAT OP HET ZANDPAD, HET GAAT NOG STEEDS RECHTDOOR."P$()"JE STAAT OP HET PAD, DE BOMENWORDEN STEEDS DIKKER."݈P$()"HET PAD WORDT SMALLER EN SMALLER."AP$()"JE STAAT OP HET PAD.": P2$()"JE KAN NIET VERDER, WANTDE BOMEN STAAN IN DE WEG."qP$( )"JE STAAT AAN DE VOET VAN DE BERG."WW$"GA PAKBEKHAKLEGKNIZAAGEEDOOLAAHELSTOLEEOPE"Ή: BEGIN HOOFDLUS ****************ԉ Edh0, P P ,,& P P P , , Q P W r : P WW& ,(,@),,TP(P): ,(,P),,TP(P) 0 C : C,: "[";: C: P$(P);P2$(P)܊D C : C: "\";: CN: "JE KAN"; X N(P) " NOORD";$b Z(P) " ZUID";>l W(P) " WEST";Wv O(P) " OOST" N(P) Z(P) W(P) O(P) " NERGENS HEEN";܋ C : PV(C)P "IK ZIE EEN ";VW$(C);".": C : C ,: OP$ OP$"": D$"": C$"": D' ,: "WAT NU ? ";JC$: C$""  : b C$()  C$() D D$(D$,,(D$)): DD: ();" ";();:  :  (C$)A (C$)Z (C$)  : DDD$D$C$: C$;: 8D$D$C$: C$;: U D$"N" D$"GA NOORD"q  D$"Z" D$"GA ZUID" D$"W" D$"GA WEST"  D$"O" D$"GA OOST"*O1$(D$,,)4 C (D$): (D$,C,)" " O2$(D$,C,): O3$(D$,C,(D$)): > : C(> C RH O1$(WW$,(C),) WWC: \ZR C\ WW z,,,,.,B,j,,,,,x,,Tӎf O1$"" OP$"JE MOET WEL WAT INVULLEN.": pOP$"IK BEGRYP JE NIET.": z O2$"NOO" N(P) PP: G O2$"OOS" O(P) PP: o O2$"ZUI" Z(P) PP:  O2$"WES" W(P) PP: OP$"DAAR KAN JE NIET HEEN.":  C : PV(C)P  : C: OP$"IK ZIE GEEN "O3$: P C : O3$VW$(C)  : C: OP$"IK ZIE GEEN "O3$:  TA OP$"DAT KAN IK NIET MEER TILLEN.": TATA: GV(C): PV(C): OP$"O.K.":  GV() OP$"IK KAN NIET MET M'N HANDEN HAKKEN.": d O2$"KUI" O2$"HOL" O2$"PUT" O2$"GAT"  : OP$"DAT KAN IK NIET HAKKEN.":  P P OP$"IK HEB NIETS GEVONDEN.": Б P PV(): OP$"IK VOND WAT...":  P PV(): OP$"IK VOND WAT...": p O2$"BEZ" C : GV(C) OP$OP$VW$(C)",": C: OP$(OP$,,(OP$)):  : C:  O2$"KAA" $OP$"IK ZIE NIETS BYZONDERS.": . C : GV(C) VW$(C)O3$ GV(C): PV(C)P: OP$"O.K.": TATA:  : C:8OP$"DAT KAN IK NIET NEERLEGGEN.": B GV() L : OP$"IK KAN NIET MET M'N HANDEN KNIPPEN.": ǓL O2$"GRA" V : OP$"DAT KAN IK NIET KNIPPEN.": V P O(): P2$()"": OP$"O.K.": !`OP$"DAT HOEFT HIER NIET.": nj GV() t : OP$"IK KAN TOCH NIET ZAGEN ZON- DER ZAAG.": t O2$"BOO" O3$"BOMEN" ~ : OP$"DAT KAN IK NIET ZAGEN.": ~ P  OP$"HIER HOEVEN GEEN BOMEN OM.":  : N(): P2$()"": OP$"O.K.": i P P  : OP$"ER IS NIEMAND OM IETS AAN TE GEVEN.": | P   O3$VW$() GV() Z(): P2$()"": GV(): TATA: OP$"DE APEN LATEN JE DOOR GAAN.":  : OP$"JE HEBT GEEN BANAAN.": ?OP$"DAT WILLEN DE APEN NIET HEB- BEN.":  O2$"GEW" GV() r : OP$"JE HEBT GEEN GEWEER.": OP$"DAT WIL DE KONING NIET HEB- BEN.":  P P OP$"ER IS NIEMAND OM TE DODEN.": ) GV() OP$"JE KAN NIEMAND DODEN.": k GV() GV() OP$"JE GEWEER IS NIET GELADEN.":  P O2$"APE" OP$"DEZE APEN ZIJN BESCHERMD.": ʗ P O2$"KON" OP$"DAT KAN IK NIET DODEN.": 1 O2$"GEW"   : OP$"DAT KAN IK NIET LADEN.": r  GV() GV()  : OP$"JE HEBT IETS NIET.":  GV() OP$"HIJ IS AL GELADEN.":  : GV(): OP$"O.K.":  P OP$"EEN KAART IS ALTIJD MAKKE- LIJK.": ]( P P OP$"JE BENT PAS AAN HET BEGIN. JEKAN NU NOG NIET RADELOOS ZIJN.": 2 P P P P P OP$"GEEF ALLE HOOP MAAR OP.": ܙ< P OP$"WAT VINDEN APEN LEKKER ?": +F P OP$"IK HEB GEHOORD DAT HIER IN DE OORLOG GEVOCHTEN IS.": gP P OP$"WAT DOE JE ALS HET GRAS LANG IS ?": ȚZ P OP$"DOOD HEM, DOOD HEM MET HET WAPEN DAT JE IN HET SPEL GE- VONDEN HEBT.": "d P OP$"WAT DOEN DE MEESTE MENSEN ALS EEN BOOM HUN IN DE WEG STAAT?": InOP$"IK HEB HIER GEEN HINT": Oxk , : "ZEKER WETEN?"A$: A$""  A$"J" A$"j" : : ,,: ћ A$"N" A$"n"  O2$"KAA"  : OP$"DAT KAN IK NIET LEZEN.": J GV()  : OP$"JE HEBT GEEN KAART.": Pi ,,,: ,,,s ,}   CC : C : Aǜ A] A^ A_ (A);: ڜ ()(A); C: : CC  , : "DIT IS DE KAART." ,: "S"<"  , : "S=STARTPUNT"[, ,: "DRUK OP ESCAPE"u6X$: X$"" 6@ X$() J 6ӝT P ^ : OP$"HIER IS NIETS TE OPENEN.": ^ GV() h : OP$"JE KAN DE DEUR NIET OPENEN.": OhGV(): O(): P2$()" OPEN.": OP$"O.K.": r: ,,,: ,,,: C : ,: "[";: Cܞ| ,: "HELAAS, DE KONING WAS JE TE VLUG AF. HY DOODDE JE MET ZIJN MES." C : "\";: C ,: "DRUK OP ESCAPE."1X$: X$"" Y X$() : : ,,: c : ,,,: ,,,: C : ,: "[";: C ,: "DE OELOE-OELOE-KONING IS DOOD. JE HEBT JE OPDRACHT VOLBRACHT." C : "\";: C, ,: "DRUK OP ESCAPE."FX$: X$"" n X$() : : ,,: : INIT GRAPHS ETC *************ɠ b: A : A$: A,("&H"A$): A : C  : N(C): C : C  : Z(C): C2 : C  : W(C): CU& : C  : O(C): C0 : C : VW$(C),PV(C): C: : C  : CC  : A$: S$S$(("&H"A$)): CC: S: $(S)S$: S$"": S: C D ~ : C  : TP(C): CN4X: KARAKTER DATA **************Rb 3C,66,C6,0C,18,00,18,00pl 78,30,30,30,78,00,78,00v 38,38,6C,6C,C6,FE,C6,00 F8,CC,C6,FC,C6,CC,F8,00ʢ 78,CC,C6,C0,C6,CC,78,00袔 F8,CC,C6,C6,C6,CC,F8,00 78,CC,C6,FE,C0,C6,7C,00$ 78,CC,C6,C0,F0,C0,C0,00B 78,CC,C6,C0,DE,CE,7A,00` C6,C6,C6,C6,FE,C6,C6,00~ 78,30,30,30,30,30,78,00 0E,06,06,06,C6,66,3C,00 CC,D8,F0,E0,F0,D8,CC,00أ C0,C0,C0,C0,C0,C6,FC,00 E6,FE,DA,C2,C2,C2,C2,00 E2,F2,DA,CE,C6,C2,C2,002 7C,C6,C6,C6,CC,D8,70,00P  70,D8,CC,C6,FE,C0,C0,00n 7C,C6,C6,C6,DC,D8,74,00  78,CC,C6,FE,D8,CC,C6,00* 7C,C6,60,38,0C,C6,7C,00Ȥ4 C0,C0,F8,C0,C6,CC,78,00> C6,C6,C6,C6,66,36,1C,00H C6,C6,C6,6C,6C,38,38,00"R C2,C2,C2,C2,DA,FE,E6,00@\ CC,CC,78,30,78,CC,CC,00^f C6,06,C6,C6,06,C6,7C,00|p FE,06,06,7C,C0,C0,FE,00z 00,70,57,D5,5D,55,FF,00 00,FF,AA,BA,AB,EA,0E,00֥ 10,10,10,00,00,00,00,00 00,00,00,10,10,10,10,10 00,00,00,F0,00,00,00,005: RICHTINGEN ***************{ 1,1,1,0,0,1,1,0,1,1,1,1,0,1,0,0,0,0,1,0,0,0,0,0,1,0,1,1,1,1,0,0 0,1,1,1,0,1,0,1,0,1,1,1,1,0,1,0,0,0,0,0,0,0,0,1,0,1,0,1,1,1,1,1 0,0,0,0,0,0,0,0,0,0,0,1,0,1,0,1,1,0,1,0,0,0,0,1,1,0,1,0,0,0,0,1M 0,0,0,1,0,1,0,1,1,0,1,0,0,1,0,1,0,0,1,0,0,0,0,1,0,0,0,0,0,0,0,0q: VOORWERPEN ****************§ GEWEER,15,ZAAG,25,SCHAAR,30,HOUWEEL,3,KOGEL,0,BANAAN,10,KAART,0,SLEUTEL,28: SPRITE DATA ***************N 2A,35,20,20,3F,3F,33,3D,37,3A,1E,1E,1F,0C,17,1B,A8,58,08,08,F8,F8,98,78,D8,B8,F8,F0,F0,60,D0,B0,1 1C,2F,27,D3,08,04,02,01,01,03,38,24,22,11,09,07,70,E8,C8,96,21,40,80,00,00,80,00,00,40,F0,F0,F8,33 03,06,05,05,3D,63,5F,50,50,50,3F,05,05,05,05,05,E0,10,F0,10,1E,11,1F,01,01,01,1F,10,10,10,10,10,2 05,05,25,15,15,49,29,00,12,00,08,02,00,00,00,00,11,12,12,12,14,34,54,20,08,A4,00,40,00,00,00,00,34$ 00,00,00,00,00,00,00,03,04,04,04,04,02,02,01,0E,00,00,00,00,00,00,00,00,80,00,00,00,00,00,00,C0,3Y. 16,25,15,0F,07,0F,0F,1F,3B,71,E3,C7,87,C3,01,03,20,10,08,84,C4,C2,E2,E2,E4,E4,F8,C0,00,80,C0,80,358 00,00,01,02,02,04,08,08,12,28,20,43,25,11,0B,08,00,00,00,80,80,40,20,20,90,28,08,84,48,10,A0,20,4*B 08,09,0A,09,08,09,8A,49,48,29,20,0A,01,08,01,00,20,20,20,20,A0,20,20,25,AA,2A,04,24,40,10,00,00,36L 0C,1A,25,04,02,3E,40,B6,48,12,15,29,D2,62,02,02,00,00,00,98,E4,9A,20,18,04,7A,46,42,80,80,80,80,5V 02,02,02,02,01,21,10,10,08,09,00,04,00,08,01,00,80,80,80,80,40,40,A1,92,02,24,84,90,00,20,04,00,37c` 64,80,60,18,64,9A,86,42,40,40,40,A0,A0,A0,50,50,26,01,06,18,26,59,61,42,02,02,02,05,05,05,0A,0A,6̬j 50,50,50,50,50,50,DE,51,49,03,03,07,07,0F,0F,1F,0A,0A,0A,0A,0A,0A,3B,CA,D2,E0,E0,F0,F0,F8,F8,FC,38t : SPRITE LOCATIES *************8~ 1,0,0,0,2,0,3,0,0,0,4,0,0,0,0,0,0,2,0,2,1,2,2,0,0,5,0,0,6,0,0,0^ : KAART DATA ****************** 88,87,87,87,89,86,88,89,94,86 86,93,90,83,86,86,88,87,83,86ʭ 84,91,88,83,86,86,94,93,93,86 86,86,88,87,83,86,86,90,95,86 90,81,87,87,91