CP/M/CPM_CDROM.iso/enterprs/c64/games/quest

Commodore BASIC | 1992-06-25 | 15.1 KB | 610 lines

0 GOTO 5050
1 POKE53280,0:POKE53281,0
2 PRINT"[147]"
3 POKE53280,0:POKE53281,0
5 PRINT"        THE QUEST"
6 PRINT         "
7 [153]"       PRESS SPACE TO CONTINUE"
8 [137] 5000
9 [129]K[178]1 [164]1500:[130]
10 [129]K[178]1 [164]1500:[130]
11 [153]"LOAD"
12 [153] "      ***WELCOME TO THE QUEST***"
20 [153]
30 [153] "YOU ARE WALKING DOWN A ROAD"
40 [153] "YOU SEE A PIT"
50 [153] "DO YOU WANT TO ENTER PIT?";A$
60 [133] A$
70 [139] A$[178]"N" [167] [137] 130
80 [137] 3190
130 [153] "YOU ARE STILL WALKING"
140 [153] "DOWN THE ROAD"
150 [153] "YOU SEE A SWORD "
160 [153] "YOU TAKE THE SWORD"
170 [153] "YOU SEE A CAVE"
180 [153] "DO YOU WISH TO ENTER CAVE?";B$
190 [133] B$
200 [139] B$[178]"N"[167] [137] 215
210 [137] 250
215 [153] "YOU KEEP WALKING"
220 [153] "AND YOU COME TO A FORK IN THE PATH"
230 [153] "DO YOU WANT TO GO LEFT OR RIGHT? "
240 [133] QQ$
245 [139] QQ$[178]"LEFT"[167] [137] 3945
247 [137] 4000
250 [153] "YOU ARE IN A DARK CAVE "
260 [153] "YOU SEE TWO EYES STARING AT YOU"
270 [153] "IT'S AN ORC!"
280 [153] "DO YOU WISH TO FIGHT?"
290 [133] C$
300 [139] C$[178]"N"[167] [137] 307
305 [137] 340
307 [153] "THE ORC RIPS OPEN YOUR CHEST"
310 [153] " AND DOESN'T EVEN STOP TO COOK YOU"
320 [153] "THE END"
330 [128]
340 [153] "YOU EASILY KILL THE ORC"
350 [153] "THERE ARE TWO PASSAGES"
360 [153] "DO YOU WANT TO ENTER THE LEFT CAVE?"
365 [133] D$
370 [139] D$[178]"N"[167] [137] 421
375 [153] "YOU SEE A TRIP WIRE"
380 [153] "TOO LATE"
390 [153] "AN ARROW SHOOTS RIGHT THROUGH"
400 [153] "YOUR HEAD"
410 [153] "THE END"
420 [128]
421 [153] "THERE IS A HUGE LOCKED DOOR"
422 [153] "DO YOU HAVE THE KEY"
423 [153] "WITH THE SECRET WORD INSCRIBED ON IT?"
424 [133] YY$
425 [139] YY$[178]"Y"[167] [137] 430
426 [153] "YOU DON'T?! "
427 [153] "WELL,YOU CAN'T GO ANY FURTHER"
428 [153] "THE END"
429 [128]
430 [153] "WHAT IS THE WORD?"
431 [133] ZZ$
432 [139] ZZ$[178]"PIRATE"[167] [137] 435
433 [153] "THAT WAS NOT THE WORD!"
434 [137] 427
435 [153] "THE BIG DOOR OPENS AND FIND THAT"
448 [153] "YOU ARE IN A LIGHTED PASSAGEWAY"
449 [153] "YOU SEE A SWITCH"
450 [153] "DO YOU WANT TO FLIP SWITCH?"
460 [133] E$
470 [139] E$[178]"N" [167] [137] 500
480 [153] "YOU FALL IN A TRAP"
490 [153] "SPIKES ARE BELOW YOU"
495 [153] "YOU SHOULD KNOW YOUR FATE"
496 [153] "THE END"
497 [128]
500 [153] "YOU KEEP WALKING"
510 [153] "THERE IS A LOCKED DOOR"
520 [153] "DO YOU HAVE THE X KEY?"
525 [133] F$
530 [139] F$[178]"N"[167] [137] 590
540 [153] "YOU LIAR!"
550 [153] "THERE IS NO X KEY!"
560 [153] "I DON'T PLAY WITH LIARS!"
570 [153] "THE END"
580 [128]
590 [153] "SUDDENLY,YOU FALL INTO A TRAP"
600 [153] "YOU SLIDE INTO A LARGE ROOM"
610 [153] "A GOBLIN IS SITTING IN THE ROOM"
620 [153] "DO YOU WISH TO FIGHT?"
630 [133] G$
640 [139] G$[178]"N"[137] 670
650 [153] "YOU CHARGE AT THE GOBLIN"
660 [153] "YOU MISS HIM BY AN INCH"
665 [153] "HE DOESN'T MISS"
667 [153] "THE END"
669 [128]
670 [153] "YOU HIDE BEHIND A TABLE"
680 [153] "SOON,THE GOBLIN LEAVES"
690 [153] "DO YOU WANT TO WALK "
700 [153] "AND LOOK AROUND?"
710 [133] H$
720 [139] H$[178]"N"[167] [137] 750
730 [153] "YOU WALK TO THE CENTER"
740 [153] "SUDDENLY,ANOTHER GOBLIN"
745 [153] "BEFORE YOU CAN DUCK,"
746 [153] "THROWS A DAGGER"
747 [153] "IT'S TOO LATE"
748 [153] "THE END"
749 [128]
750 [153] "ANOTHER GOBLIN ENTERS,THEN EXITS"
760 [153] "YOU WALK THROUGH A DOOR"
770 [153] "GREEN SLIME COVERS EVERY WALL"
775 [153] "THERE IS A SMALL PATH THROUGH THE SLIME"
778 [153] "THAT LEADS TO A DOOR
780 PRINT "DO YOU WANT TO RUN THROUGH THE SLIME?"
785 INPUT I$
790 IF I$="Y"THEN GOTO 850
800 PRINT "THE GREEN SLIME "
810 PRINT "CRAWLS UP YOUR LEG "
820 PRINT "AND SOON KILLS YOU"
830 PRINT "THE END"
840 END
850 PRINT "YOU RUN THROUGH THE SLIME "
860 PRINT "AND LEAVE THAT ROOM"
870 PRINT "THROUGH A DOOR "
890 PRINT "YOU SEE A CLEAR LIQUID"
900 PRINT "IN THE MIDDLE OF THE ROOM"
910 PRINT "DO YOU WANT TO DRINK IT?"
920 INPUT J$
930 IF J$="N"THEN GOTO 965
940 PRINT "YOU DRINK THE LIQUID"
945 PRINT "AND FALL UNCONSCIOUS"
946 PRINT "(PRESS RETURN)"
947 INPUT DDD$
948 PRINT "YOU WAKE UP AND FIND YOURSELF"
949 PRINT "IN DIFFERENT SURROUNDINGS"
950 PRINT "THERE ARE 4 PATHS"
951 PRINT "DO YOU WANT TO FOLLOW PATH 1,2,3, OR 4?"
952 INPUT EEE$
953 IF EEE$="1"THEN GOTO 4189
954 IF EEE$="2"THEN GOTO 4197
955 IF EEE$="3"THEN GOTO 4199
956 PRINT "YOU FOLLOW PATH 4"
957 GOTO 3805
965 PRINT "YOU ACCIDENTALLY TRIP OVER A STONE"
966 GOTO 945
970 PRINT "YOU OPEN THE DOOR TO FIND"
980 PRINT "A TREASURE UNGUARDED!"
990 PRINT "DO YOU WANT TO TAKE THE TREASURE?";K$
1000 INPUT K$
1010 IF K$="N"THEN GOTO 1050
1020 PRINT "YOU GET THE TREASURE"
1030 PRINT "AND GET SPEARED IN THE BACK "
1040 PRINT "BY A HIDDEN GUARD"
1045 PRINT "THE END"
1047 END
1050 PRINT "YOU TAKE A BETTER LOOK"
1060 PRINT "AT THE ROOM"
1070 PRINT "AND SPOT A HIDDEN GUARD!"
1080 PRINT " DO YOU WANT TO FIGHT HIM?";L$
1090 INPUT L$
1100 IF L$="N" THEN GOTO 1220
1120 PRINT "YOU DRAW YOUR SWORD"
1130 PRINT "AND CHARGE!!!!!!!!!!!!"
1140 PRINT
1150 PRINT
1160 PRINT
1170 PRINT
1180 PRINT
1190 PRINT "THAT WAS ONE BIG BATTLE!"
1200 PRINT "AND YOU LOST"
1210 PRINT "THE END"
1215 END
1220 PRINT "YOU CRAWL TO THE HIDDEN GUARD"
1230 PRINT "AND JUMP OUT AT HIM"
1240 PRINT "HE TURNS AND RUNS"
1250 PRINT "SCARED HALF-TO-DEATH!"
1260 PRINT "YOU GRAB THE TREASURE "
1270 PRINT " AND RUN OUT A DOOR "
1280 PRINT "THAT LEADS INTO A HALL"
1290 PRINT " (PRESS RETURN)";M$
1300 INPUT M$
1310 PRINT "WHERE YOU SEE ANOTHER ADVENTURER"
1320 PRINT "LOOKING FOR THE SAME TREASURE"
1330 PRINT "YOU HAVE!!!!!"
1340 PRINT "DO YOU WISH TO FIGHT? ";N$
1350 INPUT N$
1360 IF N$="Y" THEN GOTO 1400
1370 PRINT "DID YOU SEE THAT? "
1380 PRINT "THAT GUY TOOK YOUR TREASURE!"
1390 PRINT "WHAT A PITY!"
1395 PRINT "THE END"
1397 END
1400 PRINT "YOU BADLY WOUND HIM"
1410 PRINT "AND TAKE HIS ARTICLES"
1420 PRINT "THEY CONSIST OF SOME GOLD"
1430 PRINT "AND A STRANGE PICTURE"
1450 PRINT "YOU LOOK UP TO FIND A PASSAGE"
1460 PRINT "DO YOU WISH TO ENTER IT? ";P$
1470 INPUT P$
1480 IF P$= "N"THEN GOTO 1530
1490 PRINT "YOU CLIMB UP THE LADDER"
1500 PRINT "YOU SEE A BLACK KNIGHT"
1510 PRINT "HE CAPTURES YOU AND USES YOU"
1520 PRINT "FOR TARGET PRACTICE"
1525 PRINT "THE END"
1527 END
1530 PRINT "YOU WALK UNTIL YOU COME"
1540 PRINT "TO A DEAD END"
1550 PRINT "DO YOU WISH TO TURN BACK? "Q$
1560 INPUT Q$
1570 IF Q$="N"THEN GOTO 1630
1580 PRINT "YOU TURN BACK "
1590 PRINT "ONLY TO GET SHOT IN THE HEAD "
1600 PRINT "WITH AN ARROW"
1610 PRINT "THE END"
1620 END
1630 PRINT "YOU EXAMINE THE WALLS"
1640 PRINT "AND FIND A SECRET DOOR"
1650 PRINT "DO YOU WISH TO ENTER DOOR?";R$
1660 INPUT R$
1670 IF R$="Y"THEN GOTO 1720
1680 PRINT "YOU TURN BACK"
1690 PRINT "AND GET CUT IN HALF"
1700 PRINT "BY AN AXE BLADE"
1710 PRINT "THE END"
1715 END
1720 PRINT "YOU SEE A TALL MAN"
1730 PRINT "HE WANTS YOUR STRANGE PICTURE"
1740 PRINT "YOU GOT FROM THAT OTHER ADVENTURER"
1750 PRINT "DO YOU WANT TO RUN?";S$
1760 INPUT S$
1770 IF S$="Y"THEN GOTO 1830
1780 PRINT "YOU GIVE HIM YOUR PICTURE"
1790 PRINT "HE LOOKS AT IT"
1800 PRINT "AND TURNS INTO A LARGE SPIDER"
1810 PRINT "THE DOOR SHUTS BEHIND YOU"
1820 PRINT "THERE IS NO ESCAPE"
1825 PRINT "THE END"
1827 END
1830 PRINT "YOU KEEP RUNNING"
1840 PRINT "UNTIL YOU'RE LOST"
1850 PRINT "YOU SEE A SCARED ELF"
1860 PRINT "DO YOU WANT TO HELP HIM?";T$
1870 INPUT T$
1880 IF T$="Y"THEN GOTO 1930
1890 PRINT "YOU WALK AROUND A CORNER"
1900 PRINT "AND RUN INTO A RED DRAGON"
1910 PRINT "LOOKS AS IF YOU'RE GOING"
1920 PRINT "TO BE FRIED FOR DINNER!"
1925 PRINT "THE END"
1927 END
1930 PRINT "THE ELF TELLS YOU ABOUT"
1940 PRINT "A DRAGON THAT LIVES"
1950 PRINT "AROUND THE CORNER."
1960 PRINT "ELVES ARE KNOWN TO TELL LIES"
1970 PRINT "DO YOU TRUST HIM?"U$
1980 INPUT U$
1990 IF U$="Y"THEN GOTO 2050
2000 PRINT "YOU WALK AROUND THE CORNER"
2010 PRINT "AND RUN INTO A RED DRAGON"
2020 PRINT "LOOKS AS IF YOU'RE GOING"
2030 PRINT "TO BE FRIED FOR DINNER!"
2040 PRINT "THE END"
2050 PRINT "THE ELF LEADS YOU TO A TRAP DOOR"
2060 PRINT "HE TELLS YOU TO ENTER IT"
2070 PRINT "DO YOU WANT TO ENTER IT?";V$
2080 INPUT V$
2090 IF V$="Y"THEN GOTO 2150
2100 PRINT "YOU TELL THE ELF NO"
2110 PRINT "AND YOU WALK AWAY"
2120 PRINT "OH NO!"
2130 PRINT "YOU SLIPPED AND BROKE YOUR NECK!"
2140 PRINT "TOO BAD"
2145 PRINT "THE END"
2147 END
2150 PRINT "IT IS VERY DARK"
2160 PRINT "YOU SEE TWO CAVES "
2170 PRINT "DO YOU WANT TO ENTER THE LEFT CAVE?";W$
2180 INPUT W$
2190 IF W$="N"THEN GOTO 2250
2200 PRINT "YOU SEE A LIGHT"
2210 PRINT "THE LIGHT WAS SO BRIGHT"
2220 PRINT "THAT YOU DID'NT SEE THE ARROW"
2230 PRINT "FLY STRAIGHT AT YOU "
2240 PRINT "THE END"
2245 END
2250 PRINT "YOU SEE A BOOK"
2260 PRINT "DO YOU WANT TO READ BOOK? ";X$
2270 INPUT X$
2280 IF X$="Y"THEN GOTO 2320
2290 PRINT "YOU KEEP WALKING"
2300 PRINT "THE WALLS OF THE TUNNEL"
2310 PRINT "YOU ARE WALKING THROUGH COLLAPSE"
2312 PRINT "AND FALL ON YOU"
2315 PRINT "THE END"
2317 END
2320 PRINT "THE BOOK IS BLANK EXCEPT FOR THE"
2330 PRINT "WORD ''STRAIN''"
2340 PRINT "YOU SEE A HOLE IN THE GROUND"
2350 PRINT "DO YOU WANT TO CLIMB DOWN IN IT?";Y$
2360 INPUT Y$
2370 IF Y$="Y"THEN GOTO 2450
2380 PRINT "YOU KEEP WALKING"
2390 PRINT "YOU SEE A DIAMOND "
2395 PRINT "YOU GET THE DIAMOND"
2397 PRINT "AN ALARM SOUNDS"
2410 PRINT "YOU HEAR SEVERAL FOOTSTEPS"
2420 PRINT "THERE IS NO ESCAPE"
2430 PRINT "THE END"
2440 END
2450 PRINT "YOU SLIP WHILE CLIMBING INTO THE HOLE"
2460 PRINT "YOU LAND IN WATER"
2470 PRINT "DO YOU WANT TO SWIM AROUND?";Z$
2480 INPUT Z$
2490 IF Z$="Y"THEN GOTO 2550
2500 PRINT "YOU SEE SEVERAL RATS"
2510 PRINT "THEY HAVE A DEADLY DISEASE"
2520 PRINT "THEY BITE YOU IN THE ARM"
2530 PRINT "NOW YOU HAVE THE FATAL DISEASE"
2540 PRINT "THE END"
2545 END
2550 PRINT "A VOICE CALLS YOUR NAME"
2555 PRINT "DO YOU WANT TO FIND OUT"
2560 PRINT "WHO'S CALLING YOU?";AA$
2570 INPUT AA$
2580 IF AA$="Y"THEN GOTO 2650
2590 PRINT "YOU TRY TO HIDE"
2600 PRINT "BUT THE VOICE FINDS YOU"
2605 PRINT "IT'S AN ORC!"
2608 PRINT "IT SNARLS AT YOU "
2610 PRINT "AND THROWS A LIQUID ON YOU"
2620 PRINT "THE ORC RUNS AWAY"
2630 PRINT"AND YOU FIND THE LIQUID WAS ACID!"
2640 PRINT "THE END"
2645 END
2650 PRINT "IT'S A SKELETON!!!"
2660 PRINT "IT TELLS YOU NOT TO BE FRIGHTENED"
2670 PRINT "YOU THINK IT IS A GOOD SKELETON"
2680 PRINT "IT TELLS YOU TO GO UP A LADDER"
2690 PRINT "DO YOU GO UP THE LADDER?";BB$
2700 INPUT BB$
2710 IF BB$="N" THEN GOTO 2770
2720 PRINT "YOU GO UP THE LADDER"
2730 PRINT "AND SEE MANY HOLES IN THE WALL"
2740 PRINT "WHICH MANY ARROWS SHOOT OUT OF"
2750 PRINT "WHEN SOMEONE FOOLISH LIKE YOU CLIMBS"
2760 PRINT "THAT LADDER YOU'RE ON."
2765 PRINT "THAT WASN'T A GOOD SKELETON"
2766 PRINT "AFTER ALL!!"
2768 PRINT "THE END"
2769 END
2770 PRINT "YOU COME TO A LARGE DOOR"
2780 PRINT "THE DOOR OPENS BY ITSELF"
2790 PRINT "YOU LOOK INSIDE AND SEE "
2800 PRINT "A WIZARD/WARRIOR!"
2810 PRINT "[183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183][183]"
2820 PRINT "(PRESS RETURN)";CC$
2830 INPUT CC$
2840 PRINT "HE THROWS A LIGHTNING BOLT AT YOU AND"
2845 PRINT "IT BARELY MISSES YOU"
2850 PRINT "YOU HAD BETTER DO SOMETHING FAST!"
2855 PRINT "DO YOU REMEMBER THE WORD IN THE BOOK"
2857 PRINT "THAT YOU MAY HAVE FOUND?"
2860 PRINT "(PRINT Y OR N)"
2870 INPUT DD$
2880 IF DD$="Y"THEN GOTO 2930
2890 PRINT "THAT'S TOO BAD"
2910 PRINT "THE WIZARD/WARRIOR DRAWS HIS SWORD"
2920 PRINT "AND EASILY KILLS YOU"
2925 PRINT "THE END"
2928 END
2930 PRINT "WHAT IS THE WORD?";EE$
2940 INPUT EE$
2950 IF EE$="STRAIN"THEN GOTO 2980
2960 PRINT "THAT WAS NOT THE WORD!"
2970 GOTO 2910
2980 PRINT "THE WIZARD/WARRIOR SCREAMS AND"
2990 PRINT "TURNS INTO DUST"
3000 PRINT "(PRESS RETURN)";FF$
3010 INPUT FF$
3020 PRINT "THERE IS A DOOR ON THE OTHER SIDE"
3030 PRINT "OF THE ROOM"
3040 PRINT "DO YOU WANT TO OPEN IT?";GG$
3050 INPUT GG$
3060 IF GG$="Y"THEN GOTO 3110
3070 PRINT "YOU WALK OUT OF THE ROOM"
3080 PRINT "AND SIT DOWN"
3085 PRINT "SUDDDENLY, THE WALLS START"
3087 PRINT "TO CRACK"
3089 PRINT "AND THE CAVE COLLAPSES ON YOU"
3090 PRINT "THE END"
3095 END
3100 PRINT "YOU OPEN THE DOOR"
3110 PRINT "SUNLIGHT STREAMS INTO THE ROOM"
3120 PRINT "YOU WALK OUTSIDE,RELIEVED "
3130 PRINT "THAT YOU MADE IT OUT ALIVE"
3140 PRINT "(PRESS RETURN)";HH$
3150 INPUT HH$
3160 PRINT "CONGRADULATIONS!
3170 [153] "                THE END"
3180 [128]
3190 [153] "YOU SEE THREE CAVES"
3200 [153] "DO YOU WISH TO ENTER,
3210 PRINT "CAVE 1
3220 [153] "CAVE 2
3230 PRINT "CAVE 3
3240 [133] II$
3250 [139] II$[178]"CAVE 1"[167] [137] 3300
3260 [139] II$[178]"CAVE 2"[167] [137] 3340
3270 [139] II$[178]"CAVE 3"[167] [137] 3380
3280 [139] II$[178]"1"[167] [137] 3300
3290 [139] II$[178]"2"[167] [137] 3340
3295 [139] II$[178]"3"[167] [137] 3380
3300 [153] "YOU ENTER CAVE 1"
3310 [153] "AND SEE A GIANT SCORPION"
3320 [153] "DO YOU WISH TO FIGHT OR RUN?"
3330 [133] JJ$
3335 [137] 3450
3340 [153] "YOU SMELL FUMES"
3350 [153] "AND FALL TO THE FLOOR, DEAD"
3360 [153] "THE END"
3370 [128]
3380 [153] "YOU ENTER CAVE 3"
3390 [153] "ARROWS PIERCE YOUR HEART"
3400 [153] "YOU SCREAM AND DIE INSTANTLY"
3410 [153] "THE END"
3420 [128]
3450 [139] JJ$[178]"RUN"[167] [137] 3200
3460 [153] "YOU FIGHT A BIG BATTLE"
3470 [153] "AND THE SCORPION HURTS YOU BADLY"
3480 [153] "BUT YOU STILL WIN"
3490 [153] "YOU START WALKING "
3500 [153] "AND YOU COME TO A FORK IN THE PATH"
3510 [153] "YOU COME TO A SIGN POINTING RIGHT"
3520 [153] "DO YOU WANT TO GO RIGHT?";KK$
3530 [133] KK$
3540 [139] KK$[178]"Y"[167] [137] 3600
3550 [153] "YOU SEE SOME WRITING ON THE WALL"
3560 [153] "IT SAYS ''SNOWBLIND''
3570 PRINT "YOU DECIDE TO FOLLOW THE RIGHT PATH"
3580 PRINT "(PRESS RETURN)";LL$
3590 INPUT LL$
3600 PRINT "YOU WALK INTO A ROOM INHABITED"
3610 PRINT "BY A GIANT. THE GIANT SAYS,"
3620 PRINT "''DID YOU SEE THE WORD PRINTED ON"
3630 PRINT "THE WALL?'' (Y OR N)";MM$
3640 INPUT MM$
3650 IF MM$="Y"THEN GOTO 3690
3660 PRINT "THE GIANT IS FURIOUS!"
3670 PRINT "HE LOCKS YOU IN A DUNGEON FOREVER"
3680 PRINT "THE END"
3685 END
3690 PRINT "WHAT IS THE WORD?"
3700 INPUT NN$
3710 IF NN$="SNOWBLIND"THEN GOTO 3740
3720 PRINT "THAT'S NOT THE WORD!"
3730 GOTO 3660
3740 PRINT "THE GIANT LETS YOU PASS"
3750 PRINT "THERE ARE 3 DOORS IN THE NEXT ROOM,"
3760 PRINT "DO YOU WISH TO ENTER 1,2,OR 3?"
3770 INPUT OO$
3780 IF OO$="3"THEN GOTO 3830
3790 IF OO$="2"THEN GOTO 3930
3800 PRINT "YOU ENTER ROOM 1"
3805 PRINT "AND YOU FIND YOURSELF F"
3806 PRINT "                       A"
3807 PRINT "                        L
3808 [153] "                         L"
3809 [153] "                          I"
3810 [153] "                           N"
3811 [153] "                            G"
3812 [153] "                        "
3813 [153] "                        SPLAT!!"
3814 [153] "THE END"
3820 [128]
3830 [153] "YOU ENTER ROOM 3"
3840 [153] "AND THERE ARE STAIRS LEADING DOWN"
3850 [153] "DO YOU WANT TO GO DOWN,"
3860 [153] "OR ENTER ANOTHER DOOR? "
3870 [153] "(PRINT STAIRS OR DOOR)"
3875 [133] PP$
3880 [139] PP$[178]"DOOR"[167] [137] 3760
3890 [153] "YOU GO DOWNSTAIRS AND"
3895 [137] 500
3930 [153] "YOU ENTER ROOM 2 AND WALK DOWN A HALL"
3940 [137] 2770
3945 [153] "YOU GO LEFT AND COME TO ANOTHER FORK"
3946 [153] "(LEFT OR RIGHT)"
3950 [133] RR$
3955 [139] RR$[178]"RIGHT"[167] [137] 4000
3960 [153] "YOU COME TO A SMALL TOWN"
3965 [153] "IN THE TOWN,THERE IS:"
3966 [153] "A RAILROAD STATION,"
3967 [153] "A SALOON,"
3968 [153] "A HOTEL,"
3969 [153] "AND A HOUSE"
3970 [153] "WHERE DO YOU WANT TO GO? "
3971 [133] SS$
3972 [139] SS$[178]"RAILROAD STATION"[167] [137] 4020
3973 [139] SS$[178]"SALOON"[167] [137] 3980
3974 [139] SS$[178]"HOTEL" [167] [137] 3987
3975 [153] "YOU ENTER THE HOUSE AND"
3976 [153] "SOMEONE HITS YOU OVER THE HEAD"
3977 [153] "AND STABS YOU WITH A KNIFE"
3978 [153] "THE END"
3979 [128]
3980 [153] "YOU WALK INTO THE SALOON"
3981 [137] 4136
3982 [153] "THE BARTENDER GETS MAD AND"
3983 [153] "FORCES YOU TO BE HIS SLAVE"
3984 [153] "THE END"
3985 [128]
3987 [153] "YOU SEE A SIGN"
3988 [153] "IT SAYS ''HELP WANTED''"
3989 [153] "DO YOU WANT TO TAKE THE JOB? "
3990 [133] TT$
3991 [139] TT$[178]"N" [167] [137] 3965
3992 [153] "YOU TAKE THE JOB"
3995 [153] "AND LIVE HAPPY EVER AFTER"
3996 [153] "THE END"
3997 [128]
4000 [153] "YOU TAKE THE PATH TO THE RIGHT"
4005 [153] "YOU FOLLOW THE PATH TO A DARK CAVE"
4010 [153] "AND DECIDE TO ENTER IT"
4015 [137] 260
4020 [153] "YOU ARE AT A RAILROAD STATION"
4025 [153] "AND CAN TAKE A TRAIN "
4026 [153] "TO AN ABANDONED CASTLE"
4027 [153] "DO YOU WANT TO VISIT THE CASTLE?"
4028 [133] UU$
4029 [139] UU$[178]"Y" [167] [137] 4060
4031 [153]"YOU FIND A PATH ON YOUR WAY BACK TO THE TOWN"
4032 [153] "DO YOU WANT TO TAKE THE PATH?"
4034 [153]"(Y OR N)"
4035 [133] VV$
4040 [139] VV$[178]"Y" [167] [137] 4050
4045 [137] 3965
4050 [137] 4005
4060 [153] "YOU RIDE THE TRAIN TO THE CASTLE"
4070 [153] "AND ENTER IT"
4075 [153]"DO YOU WISH TO EXPLORE?"
4076 [153]"(Y OR N)"
4080 [133] WW$
4085 [139] WW$[178]"Y" [167] [137] 4100
4087 [153]"YOU RIDE BACK TO TOWN ON THE TRAIN"
4090 [153]"AND START TO WALK TO TOWN WHEN YOU FIND A PATH"
4095 [137] 4032
4100 [153]"YOU START TO EXPLORE AND"
4105 [153]"ALL YOU FIND IS AN ENVELOPE"
4110 [153] "ON THE GROUND"
4115 [153] "INSIDE IS A KEY WITH THE WORD ''PIRATE''INSCRIBED ON IT"
4120 [153] "(PRESS RETURN)"
4125 [133] XX$
4130 [137] 4087
4136 [153] "A MAN OFFERS TO PLAY CARDS WITH YOU"
4140 [153] "DO YOU WANT TO PLAY?"
4145 [133] AAA$
4150 [139] AAA$[178]"Y" [167] [137] 4155
4151 [153] "YOU DECIDE TO LEAVE THE SALOON"
4152 [153] "AND GO BACK INTO THE STREET"
4153 [137] 3965
4155 [153] "YOU DECIDE TO PLAY POKER"
4160 [153] "HE DEALS YOU THESE CARDS:"
4161 [153] "KATN,J(null),Q(null),A(null),JATN"
4162 [153] "DO YOU WANT TO GO FOR A STRAIGHT,"
4163 [153] "OR TAKE THE ONE PAIR YOU HAVE?"
4164 [153] "(PAIR OR STRAIGHT)
4165 INPUT BBB$
4166 IF BBB$="STRAIGHT"THEN GOTO 4175
4167 PRINT "YOU GO WITH THE PAIR AND"
4168 PRINT "HE DEALS YOU ANOTHER JACK!!"
4169 PRINT "YOU SHOW HIM YOUR CARDS"
4170 PRINT "AND YOU WIN!
4171 [153] "THE MAN GETS MAD AND PULLS OUT A GUN"
4172 [153] "B  A  N  G  !"
4173 [153] "THE END"
4174 [128]
4175 [153] "YOU GO WITH THE STRAIGHT AND"
4176 [153] "HE DEALS YOU THE 3(null)"
4177 [153] "YOU WALK FROM THE TABLE,FUSTRATED"
4178 [153] "YOU HEAR THE MAN LAUGHING BEHIND YOU "
4179 [153]"DO YOU WANT A DRINK?"
4180 [133] CCC$
4185 [139] CCC$[178]"N"[167] [137] 4188
4186 [153] "YOU BUY A DRINK BUT YOU HAVE NO MONEY"
4187 [137] 3982
4188 [137] 4151
4189 [153] "YOU FOLLOW THE PATH"
4190 [153] "AND COME TO A TALL DOOR"
4191 [153] "THE DOOR WON'T MOVE"
4192 [153] "PICK ANOTHER PATH"
4193 [153] "(PRESS RETURN)
4194 INPUT FFF$
4195 GOTO 951
4197 PRINT "YOU WALK DOWN A PATH AND SEE A DOOR"
4198 GOTO 970
4199 PRINT "YOU FOLLOW PATH THAT LEADS OUTSIDE"
4200 GOTO 3960
5000 GETSP$:IFSP$=" "THENGOTO 10
5001 GOTO5000
5050 REM(null):REM(null):REM(null):REM(null):REM(null):REM(null):REM(null):REM(null):REM(null):REM(null)
5051 GOTO1