Modified for multiple input files.

[rfk-inform.git] / kitten.inf

diff --git a/kitten.inf b/kitten.inf
index 72d5b9cf09b3f81c8830e755d745d1340cc532f8..c7113a46b8f6a443d7006091b46d775505606ba3 100644 (file)
--- a/kitten.inf
+++ b/kitten.inf
@@ -1,6 +1,6 @@
 ! robotfindskitten
 ! A Zen Simulation
-! Release 7 / Serial number 121119 / Inform v6.32
+! Release 7 / Serial number 130315 / Inform v6.33
 !
 !     [-]       |\_/|        http://www.robotfindskitten.org
 !     (+)=C     |o o|__      Leonard Richardson (C) 1997, 2000
@@ -54,7 +54,7 @@ Constant Nonkitten_Default 20;
 Constant Nonkitten_Max 589;
 
 Release 7;
-Serial "121119";       ! Presumed release date
+Serial "130315";       ! Presumed release date
 
 !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
 
@@ -111,11 +111,13 @@ Global Real_Release = 0;
 
        @set_colour Fore_def Back_def;
 
-       if (MESSAGE_NUM < Nonkitten_Max) {
-               nonkitten_count = MESSAGE_NUM;
-       } else {
-               nonkitten_count = Nonkitten_Default;
-       }
+!      if (MESSAGE_NUM < Nonkitten_Max) {
+!              nonkitten_count = MESSAGE_NUM;
+!      } else {
+!              nonkitten_count = Nonkitten_Default;
+!      }
+
+       nonkitten_count = Nonkitten_Default;
 
        Real_Release = (0-->1)&$03ff;
 
@@ -136,7 +138,6 @@ Global Real_Release = 0;
                'I':    print_instructions();
                'A':    print_about();
                'T':    print_thoughts();
-               'P':    print_all_nki();        ! See print_all_nki() below.
                }
                if (key == 'Q' || key == $1b)   ! $1b == ESC
                        break;
@@ -868,19 +869,3 @@ Global last_right = false;
        }
 ];
 
-
-! This function is mainly of use to members of the robotfindskitten
-! development team.
-!
-! When this function is uncommented and enabled in
-! the menu, this will cause a script file to be written which contains
-! all NKIs properly formatted.
-
-[ print_all_nki num mystring;
-       @output_stream 2; @output_stream -1;
-       for (num = 1: num <= MESSAGE_NUM: num++) {
-               mystring = lookup_msg(num);
-               print (string)lookup_msg(num), "^";
-       }
-       @output_stream -2; @output_stream 1;
-];