Compucolor.org – Virtual Media

Listing of file='INSTR.BAS;01' on disk='vmedia/chip_33-sector.ccvf'

1 REM  INSTRUCTIONS
2 PLOT 8,12,3,20,8:PRINT "WELCOME TO CASTLE QUEST"
3 PLOT 3,20,10:PRINT ""
4 PLOT 3,0,15:PRINT "ANYONE WHO HAS PLAYED THE ORIGINAL AND GENUINE"
5 PRINT "DUNGEONS AND DRAGONS WILL AT ONCE RECOGNIZE "
6 PRINT "SIMILARITIES BETWEEN IT AND CASTLE QUEST."
7 PRINT :PRINT "THE OBJECT OF CASTLE QUEST IS TO TRAVEL INSIDE"
8 PRINT "THE CASTLE, FIND TREASURE, AND GET OUT...ALIVE."
9 PLOT 3,0,28:INPUT "PRESS 'ENTER' TO CONTINUE";X
10 PLOT 8,12:PRINT "BUT MONSTERS WANDER AROUND THE CORRIDORS"
11 PRINT "AND MAY BE INSIDE ROOMS GUARDING WHATEVER TREASURE"
12 PRINT "MAY BE THERE.  SOME ROOMS OR TREASURE CHESTS MAY"
13 PRINT "HAVE TRAPS SET ON THEM."
14 PRINT :PRINT "EACH MONSTER YOU KILL WILL EARN YOU EXPERIENCE"
15 PRINT "POINTS.  AT CERTAIN TIMES YOU WILL ACQUIRE NEW"
16 PRINT "LEVELS OF EXPERIENCE.  THIS ENTITLES YOU TO MORE HIT"
17 PRINT "POINTS AND A BETTER CHANCE TO KILL MONSTERS."
18 PRINT :PRINT "THERE ARE 3 LEVELS OF DIFFICULTY (4 IN THE 32K VERSION)."
19 PRINT "AS THE DIFFICULTY INCREASES, THE TREASURES WILL BECOME"
20 PRINT "MORE VALUABLE.  IT IS UNWISE TO GO ABOVE YOUR LEVEL OF"
21 PRINT "EXPERIENCE.  GOING BELOW YOUR EXPERIENCE LEVEL WILL RESULT"
22 PRINT "IN A LOSS OF SOME EXPERIENCE POINTS."
23 PLOT 3,0,28:INPUT "PRESS 'ENTER' TO CONTINUE";X
24 PLOT 8,12:PRINT "AT THE START OF THE GAME YOU WILL BE ASKED TO NAME"
25 PRINT "YOUR CHARACTER.  FOLLOW THE DIRECTIONS."
26 PRINT "AFTER THIS YOUR 'STATISTICS' WILL BE PRINTED.  BE SURE TO"
27 PRINT "WATCH THESE CAREFULLY.  YOU HAVE A LIMIT ON THE WEIGHT THAT"
28 PRINT "YOU CAN CARRY AS WELL AS ON THE NUMBER OF HITS YOU CAN TAKE"
29 PRINT "BEFORE YOUR CHARACTER IS DEAD.  IF YOU EXCEED YOUR WEIGHT"
30 PRINT "LIMIT, YOU WILL BE ASKED TO DROP SOME TREASURE."
31 PRINT :PRINT "ARMOR, WEAPONS, AND SPELLS ALL ADD TO YOUR WEIGHT."
32 PRINT "SPELLS ARE ASSUMED TO EXIST AS SCROLLS AND WEIGH 10"
33 PRINT "UNITS EACH.  EACH TIME YOU CAST A SPELL IT IS LOST AND ITS"
34 PRINT "WEIGHT IS DEDUCTED FROM WHAT YOU ARE CARRYING."
35 PRINT :PRINT "'ARMOR CLASS' IS THE VALUE WHICH DETERMINES HOW DIFFICULT"
36 PRINT "IT IS TO BE HIT AND INJURED.  THE LOWER THIS NUMBER THE"
37 PRINT "BETTER OFF YOU ARE.  EACH HEAVIER TYPE OF ARMOR HELPS YOU"
38 PRINT "IN THIS REGARD.  A SHIELD DEDUCTS 1 FROM YOUR ARMOR CLASS."
39 PRINT "BUT REMEMBER THAT BETTER ARMOR ADDS TO YOUR WEIGHT."
40 PRINT "THERE ARE TWO MAGIC RINGS WHICH CAN HELP YOU.  ONLY ONE AT"
41 PRINT "A TIME CAN BE WORN.  THEY ARE NOT ADDITIVE.  WHENEVER YOU"
42 PRINT "GET TO TAKE A MAGIC RING, BE SURE YOU NEED IT.  AN OLD ONE"
43 PRINT "WILL BE GONE IF YOU SELECT A NEW ONE, JUST AS WITH WEAPONS."
44 PLOT 3,0,28:INPUT "PRESS 'ENTER' TO CONTINUE";X
45 PLOT 8,12:PRINT "WHENEVER YOU LEAVE THE CASTLE, YOUR TREASURE IS"
46 PRINT "ALL DROPPED AND ADDED TO YOUR ACCOUNT.  UNTIL YOU DO LEAVE"
47 PRINT "YOUR TREASURE WON'T APPEAR UNDER YOUR GOLD PIECES VALUE."
48 PRINT "WHEN YOU RETURN TO THE CASTLE, YOUR HITS ARE RESTORED TO"
49 PRINT "THEIR MAXIMUM VALUE AGAIN.  WHEN YOU GAIN A NEW LEVEL OF"
50 PRINT "EXPERIENCE, YOU WILL GAIN 1 TO 10 MORE HIT POINTS AND YOUR"
51 PRINT "CHANCES TO HIT MONSTERS GO UP BY ONE IN 20."
52 PRINT :PRINT "WHEN YOU START A GAME OR RETURN TO THE CASTLE YOU WILL HAVE"
53 PRINT "THE OPTION TO BUY DIFFERENT ARMOR, WEAPONS, AND SPELLS."
54 PRINT "ONCE BOUGHT, A SHIELD IS ALWAYS WITH YOU.  YOU MAY CHANGE"
55 PRINT "BUT CAN NEVER REMOVE ALL ARMOR OR WEAPONS ONCE YOU BUY THEM."
56 PRINT "BUT BE CAREFUL.  INSIDE THE CASTLE YOU MAY FIND MAGIC"
57 PRINT "WEAPONS.  IF YOU GET ONE AND TRY TO LATER BUY OR GET ANOTHER"
58 PRINT "WEAPON, THE OLD ONE WILL BE FOREVER GONE!"
59 PRINT :PRINT "MAGIC WEAPONS CAN BE GOOD TO HAVE.  YOUR CHANCES TO HIT"
60 PRINT "MONSTERS INCREASE BY ONE FOR EACH 'PLUS' OF THE WEAPON."
61 PRINT "ALSO THE AMOUNT OF DAMAGE DONE BY A MAGIC WEAPON IS USUALLY"
62 PRINT "GREATER FOR MAGIC WEAPONS."
63 PLOT 3,0,28:INPUT "PRESS 'ENTER' TO CONTINUE";X
64 PLOT 8,12:PRINT "HIT POINTS ARE THE AMOUNT OF DAMAGE THAT YOU CAN TAKE"
65 PRINT "BEFORE YOU DIE.  WATCH CAREFULLY.  IT IS EASY TO DIE HERE."
66 PRINT :PRINT "SOME OF THE MONSTERS HAVE SPECIAL ABILITIES SUCH AS:
67 PRINT :PRINT "     MULTIPLE ATTACKS"
68 PRINT "     IMMUNITY TO FLAME"
69 PRINT "     IMMUNITY TO REPEL"
70 PRINT "     REGENERATION OF LOST HIT POINTS (3/ROUND)"
71 PRINT "     POISON VENOM"
72 PRINT "     ONLY HIT BY MAGICAL WEAPONS"
73 PRINT "     DRAIN ONE EXPERIENCE LEVEL"
74 PRINT :PRINT "YOU'LL LEARN AS YOU GO ALONG."
75 PRINT :PRINT :PRINT "WARNING!!  YOU NEED TO PAY 50 GOLD PIECES EACH TIME YOU"
76 PRINT "WANT TO RETURN TO THE CASTLE.  IF YOU DON'T HAVE THIS MUCH"
77 PRINT "OR HAVE NOT FOUND ENOUGH NEW TREASURE, YOU WILL NOT BE ABLE"
78 PRINT "TO RETURN AND HAVE TO START OVER.  WHEN YOU DECIDE TO LEAVE,"
79 PRINT "A MESSAGE REMINDS YOU OF THIS FACT."
80 PLOT 3,0,28:INPUT "PRESS 'ENTER' TO CONTINUE";X
81 PLOT 8,12:PRINT "NOW A FEW WORDS ABOUT SPELLS..."
82 PRINT :PRINT "THEY DON'T ALWAYS WORK."
83 PRINT "YOU MAY BUY AS MANY AS YOU CAN CARRY AND AFFORD."
84 PRINT "SIX SPELLS ARE AVAILABLE AS FOLLOWS:"
85 PRINT :PRINT "     KNOCK---UNLOCKS LOCKED DOORS."
86 PRINT "     DISPEL--REMOVES TRAPS WHEN PRESENT."
87 PRINT "             (NOTE: 'STRANGE MONSTER' IS ALSO A TRAP)"
88 PRINT "     HEAL----RESTORES 11-20 LOST HIT POINTS."
89 PRINT "     REPEL---REPELS MONSTERS.  NO EXPERIENCE IS GIVEN HERE."
90 PRINT "             ONCE REPELLED MONSTER CANNOT BE FOUGHT."
91 PRINT "     FLAME---DOES 11-20 POINTS FIRE DAMAGE TO MONSTER AND..."
92 PRINT "             MAY DESTROY ANY TREASURE IF PRESENT."
93 PRINT "     SHIELD--PROTECTS YOU FROM ANY MONSTER'S ATTACK"
94 PRINT "             BUT NOT AGAINST TRAPS.  IT IS TIME LIMITED"
95 PRINT :PRINT "NOTE:  THE 'MOVING WALL' TRAP IS TIMED.  IF YOU EXCEED"
96 PRINT "THE TIME LIMIT, YOU WILL DIE A HORRIBLE DEATH."
97 PLOT 3,0,28:INPUT "PRESS 'ENTER' TO CONTINUE";X
98 PLOT 8,12:PRINT "FINALLY HERE ARE SOME WORDS ON TREASURES AND EXPERIENCE."
99 PRINT :PRINT "NO EXPERIENCE IS GIVEN FOR FINDING TREASURE."
100 PRINT "GOLD PIECES ARE THE CURRENCY STANDARD AND ARE WORTH ONE EACH."
101 PRINT "GEMS ARE WORTH 10-90 AND JEWELRY IS WORTH 100-500 EACH."
102 PRINT :PRINT "THE HARDER A MONSTER IS TO KILL, THE MORE IT IS WORTH IN"
103 PRINT "EXPERIENCE POINTS.  EXPERIENCE LEVELS ARE:
104 PRINT :PRINT "     LEVEL 1=      0 -  2000
105 PRINT "     LEVEL 2=   2001 -  5000
106 PRINT "     LEVEL 3=   5001 - 10000
107 PRINT "     LEVEL 4=  10001 - 20000
108 PRINT :PRINT "AT 20001 OR MORE POINTS YOU WIN!!!"
109 PRINT :PRINT :PRINT "THERE IS ALSO A 'SAVE GAME' FEATURE USEABLE WHENEVER"
110 PRINT "YOU TYPE 'NO' WHEN ASKED TO RETURN TO CASTLE."
111 PRINT "BE SURE YOU REMEMBER YOUR CHARACTER NAME."
112 PRINT :PRINT "TO USE A FORMER CHARACTER TYPE 'OLD' FOR GAME AT START."
113 PRINT "ONCE RECALLED, AN 'OLD' CHARACTER IS REMOVED FROM THE DISK"
114 PRINT "AND CAN NEVER BE REUSED IF THAT CHARACTER LATER DIES."
115 PRINT "ALWAYS BE SURE YOU HAVE SUFFICIENT DISK SPACE TO SAVE"
116 PRINT "A CHARACTER--128 BYTES (0001 80)."
117 PLOT 3,0,28:INPUT "PRESS 'ENTER' TO CONTINUE";X
118 PLOT 8,12:PRINT "IF YOU HAVE ANY QUESTIONS OR COMMENTS ON THE GAME,"
119 PRINT "YOU MAY CONTACT:"
120 PRINT :PRINT "          RICK TAUBOLD"
121 PRINT "          197 HOLLYBROOK ROAD"
122 PRINT "          ROCHESTER, N.Y. 14623
123 PRINT :PRINT "FULL DOCUMENTATION IS ALSO AVAILABLE."
124 PLOT 3,20,16:PRINT "ENJOY 'CASTLE QUEST'"
125 PRINT
126 PRINT ," NOW ENTER:"
127 PRINT
128 PRINT TAB( 18)"16  FOR 16K VERSION, OR"
129 PRINT TAB( 18)"32  FOR 32K VERSION."
130 PRINT
131 PRINT TAB( 5);:INPUT "YOUR CHOICE? ";C$
132 C= VAL (C$)
133 IF C= 16THEN LOAD "QST16":RUN
134 IF C= 32THEN LOAD "QUEST":RUN
135 PLOT 28,11:GOTO 131