New NKIs!
[rfk-inform.git] / kitten.inf
index 89ce7e3a32b782a5e6b1e9f5cac2dd57bc5f0902..d756519300226bdfa63a0146055888fc42ee99cc 100644 (file)
@@ -1,10 +1,10 @@
 ! robotfindskitten
 ! A Zen Simulation
-! Release 7 / Serial number 130320 / Inform v6.33
+! Release 8 / Serial number 220120 / Inform v6.35
 !
 !     [-]       |\_/|        http://www.robotfindskitten.org
 !     (+)=C     |o o|__      Leonard Richardson (C) 1997, 2000
-!     | |       --*--__\     David Griffith (C) 2002-2013  (Inform Edition)
+!     | |       --*--__\     David Griffith (C) 2002-2022  (Inform Edition)
 !     OOO       C_C(____)
 !
 !
@@ -16,6 +16,9 @@
 ! Lots more information on robotfindskitten is available at
 ! http://www.robotfindskitten.org.
 !
+! This rendition of robotfindskitten is distributed under the Artistic
+! License 2.0.  See the file LICENSE in the robotfindskitten repository
+! or https://opensource.org/licenses/Artistic-2.0 for more information.
 !
 ! In this game, you are Robot (#).  Your job is to find Kitten.  This
 ! task is complicated by the existance of various things which are not
@@ -23,7 +26,6 @@
 ! not.  Move Robot with the cursor keys, the numeric keypad, or
 ! using the vi/rogue movement keys. The game ends when robotfindskitten.
 ! Alternatively, you may end the game by hitting the Esc or Q keys.
-!
 ! 
 ! Notes:
 !      1) More than half of the code is taken up by non kitten items
@@ -50,8 +52,8 @@ Constant Nonkitten_Default 20;
 !
 Constant Nonkitten_Max 589;
 
-Release 7;
-Serial "130320";
+Release 8;
+Serial "220120";
 
 !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
 
@@ -171,7 +173,7 @@ Global Real_Release = 0;
        @set_cursor 8 30;
        print "Leonard Richardson (C) 1997, 2000";
        @set_cursor 9 30;
-       print "David Griffith (C) 2002-2013 (Inform Edition)";
+       print "David Griffith (C) 2002-2022 (Inform Edition)";
        @set_cursor 10 30;
        print "    ", MESSAGE_NUM, " different nonkittens!";
 
@@ -295,10 +297,10 @@ by Leonard Richardson (C) 1997, 2000.^
 Written originally for the Nerth Pork robotfindskitten contest.^
 Reimplemented in Inform by David Griffith (C) 2002.^
 ^
-This code is freely redistributable.  Do with it what you will, but
-don't go about claiming you wrote it.  I, David Griffith, retain
-copyright on this program except for the NKIs imported from the master
-(aka POSIX) port.^
+This code is distributed according to the Artistic License 2.0.  See
+https://opensource.org/licenses/Artistic-2.0 for more information. I,
+David Griffith, retain copyright on this program except for the NKIs
+imported from the master (aka POSIX) port.^
 ^
 Lots more information on robotfindskitten is available at
 http://www.robotfindskitten.org.^
@@ -352,6 +354,12 @@ Modular release.^
 - NKIs now generated from an external file using nki2inf.pl.^
 - NKIs reduced to 723 because of redundancies and recommended deletions.^
 ^
+Release 8 / Serial Number 220120^
+- Twenty Year Anniversary release.^
+- Fixed a problem that crashed some interpreters when robotfindskitten.^
+- Fixed a potential problem of wrongly determining screen size.^
+- Now distributed under the Artistic License 2.0.^
+^
 ^
 Known Bugs:^
 ^
@@ -686,7 +694,8 @@ Global last_right = false;
                if (anim_finished == false) {
                        j = TopBar - 1;
                        @set_cursor 1 Width;
-                       @aread junk 0 10 pause -> junk;
+                       @read_char 1 10 pause -> junk;
+                       @nop;   ! This is for padding.
                } else {
                        style reverse;
                        draw_object(player_x, player_y, '#');
@@ -810,7 +819,7 @@ Global last_right = false;
 
 [ get_random_msg num;
        num = random(MESSAGE_NUM);
-       while (is_duplicate_msg(num) == true) {
+       while (is_duplicate_msg(num) == true || num > MESSAGE_NUM || num < 1) {
                num = random(MESSAGE_NUM);
        }
        return num;