10[ Perform_Undo;
11 #ifdef PREVENT_UNDO; IMMEDIATELY_UNDO_RM('A'); new_line; return; #endif;
12 if (IterationsOfTurnSequence == 0) { IMMEDIATELY_UNDO_RM('B'); new_line; return; }
13 if (undo_flag == 0) { IMMEDIATELY_UNDO_RM('C'); new_line; return; }
14 if (undo_flag == 1) { IMMEDIATELY_UNDO_RM('D'); new_line; return; }
15 if (VM_Undo() == 0) { IMMEDIATELY_UNDO_RM('F'); new_line; }
16];
21[ ANNOUNCE_SCORE_R;
22 if (actor ~= player) rfalse;
23 #Iftrue USE_SCORING == 0; ANNOUNCE_SCORE_RM('C'); new_line;
24 #ifnot; ANNOUNCE_SCORE_RM('A'); PrintRank();
25 #endif;
26];
Switch Score Notification On Rule.
31[ SWITCH_SCORE_NOTIFY_ON_R;
32 if (actor ~= player) rfalse;
33 #Iftrue USE_SCORING == 0; ANNOUNCE_SCORE_R();
34 #ifnot; notify_mode=1; #endif;
35];
Standard Report Switching Score Notification On Rule.
40[ REP_SWITCH_NOTIFY_ON_R;
41 if (actor ~= player) rfalse;
42 #Iftrue USE_SCORING ~= 0; REP_SWITCH_NOTIFY_ON_RM('A'); new_line; #endif;
43];
Switch Score Notification Off Rule.
48[ SWITCH_SCORE_NOTIFY_OFF_R;
49 if (actor ~= player) rfalse;
50 #Iftrue USE_SCORING == 0; ANNOUNCE_SCORE_R();
51 #ifnot; notify_mode=0; #endif;
52];
Standard Report Switching Score Notification Off Rule.
57[ REP_SWITCH_NOTIFY_OFF_R;
58 if (actor ~= player) rfalse;
59 #Iftrue USE_SCORING ~= 0; REP_SWITCH_NOTIFY_OFF_RM('A'); new_line; #endif;
60];
Prefer Sometimes Abbreviated Room Descriptions Rule.
65[ PREFER_SOMETIMES_ABBREVIATED_R;
66 if (actor ~= player) rfalse;
67 lookmode=1;
68];
Standard Report Prefer Sometimes Abbreviated Room Descriptions Rule.
73[ REP_PREFER_SOMETIMES_ABBR_R;
74 if (actor ~= player) rfalse;
75 print (TEXT_TY_Say) Story; REP_PREFER_SOMETIMES_ABBR_RM('A'); new_line;
76];
Prefer Unabbreviated Room Descriptions Rule.
81[ PREFER_UNABBREVIATED_R;
82 if (actor ~= player) rfalse;
83 lookmode=2;
84];
Standard Report Prefer Unabbreviated Room Descriptions Rule.
89[ REP_PREFER_UNABBREVIATED_R;
90 if (actor ~= player) rfalse;
91 print (TEXT_TY_Say) Story; REP_PREFER_UNABBREVIATED_RM('A'); new_line;
92];
Prefer Abbreviated Room Descriptions Rule.
97[ PREFER_ABBREVIATED_R;
98 if (actor ~= player) rfalse;
99 lookmode=3;
100];
Standard Report Prefer Abbreviated Room Descriptions Rule.
105[ REP_PREFER_ABBREVIATED_R;
106 if (actor ~= player) rfalse;
107 print (TEXT_TY_Say) Story; REP_PREFER_ABBREVIATED_RM('A'); new_line;
108];
Announce Pronoun Meanings Rule.
113[ ANNOUNCE_PRONOUN_MEANINGS_R x y c d;
114 if (actor ~= player) rfalse;
115 ANNOUNCE_PRONOUN_MEANINGS_RM('A');
116
117 c = (LanguagePronouns-->0)/3;
118 if (player ~= selfobj) c++;
119
120 if (c==0) { ANNOUNCE_PRONOUN_MEANINGS_RM('D'); rtrue; }
121
122 for (x = 1, d = 0 : x <= LanguagePronouns-->0: x = x+3) {
123 print "~", (address) LanguagePronouns-->x, "~ ";
124 y = LanguagePronouns-->(x+2);
125 if (y == NULL) ANNOUNCE_PRONOUN_MEANINGS_RM('C');
126 else { ANNOUNCE_PRONOUN_MEANINGS_RM('B'); print (the) y; }
127 d++;
128 if (d < c-1) print ", ";
129 if (d == c-1) {
130 #ifdef SERIAL_COMMA; print ","; #endif;
131 LIST_WRITER_INTERNAL_RM('C');
132 }
133 }
134 if (player ~= selfobj) {
135 print "~", (address) ME1__WD, "~ "; ANNOUNCE_PRONOUN_MEANINGS_RM('B');
136 c = player; player = selfobj;
137 print (the) c; player = c;
138 }
139 ".";
140];