adventure: Initial commit
[pdp8.git] / sw / adventure / BUG.FT
CommitLineData
84b5715c
PH
1 SUBROUTINE BUG(NUM)\r
2C\r
3C THE FOLLOWING CONDITIONS ARE CURRENTLY CONSIDERED FATAL BUGS. NUMBERS < 20\r
4C ARE DETECTED WHILE READING THE DATABASE; THE OTHERS OCCUR AT "RUN TIME".\r
5C 0 MESSAGE LINE > 70 CHARACTERS\r
6C 1 NULL LINE IN MESSAGE\r
7C 2 TOO MANY WORDS OF MESSAGES\r
8C 3 TOO MANY TRAVEL OPTIONS\r
9C 4 TOO MANY VOCABULARY WORDS\r
10C 5 REQUIRED VOCABULARY WORD NOT FOUND\r
11C 6 TOO MANY RTEXT OR MTEXT MESSAGES\r
12C 7 TOO MANY HINTS\r
13C 8 LOCATION HAS COND BIT BEING SET TWICE\r
14C 9 INVALID SECTION NUMBER IN DATABASE\r
15C 20 SPECIAL TRAVEL (500>L>300) EXCEEDS GOTO LIST\r
16C 21 RAN OFF END OF VOCABULARY TABLE\r
17C 22 VOCABULARY TYPE (N/1000) NOT BETWEEN 0 AND 3\r
18C 23 INTRANSITIVE ACTION VERB EXCEEDS GOTO LIST\r
19C 24 TRANSITIVE ACTION VERB EXCEEDS GOTO LIST\r
20C 25 CONDITIONAL TRAVEL ENTRY WITH NO ALTERNATIVE\r
21C 26 LOCATION HAS NO TRAVEL ENTRIES\r
22C 27 HINT NUMBER EXCEEDS GOTO LIST\r
23C 28 INVALID MONTH RETURNED BY DATE FUNCTION\r
24C\r
25 WRITE(4,1)NUM\r
261 FORMAT (' FATAL ERROR ',I3,', CONSULT YOUR LOCAL WIZARD.'/)\r
27 STOP\r
28 END\r