Here's code to change the title with a specific command. Basically the Banner function in Printing.i6t reads Story, a constant, so you can't change that. So you need to modify the Banner function.
This compiled for me in 6g but there may be more to do for 6, or to do what you specifically want.
"story" by Andrew Schultz
room 1 is a room.
Include (-
[ Banner;
BeginActivity(PRINTING_BANNER_TEXT_ACT);
if (ForActivity(PRINTING_BANNER_TEXT_ACT) == false) {
VM_Style(HEADER_VMSTY);
print (string) randStory-->storyNum;
VM_Style(NORMAL_VMSTY);
new_line;
print (string) Headline;
#ifdef Story_Author;
print " by ", (string) Story_Author;
#endif; ! Story_Author
new_line;
VM_Describe_Release();
print " / Inform 7 build ", (string) NI_BUILD_COUNT, " ";
print "(I6/v"; inversion;
print " lib ", (string) LibRelease, ") ";
#Ifdef STRICT_MODE;
print "S";
#Endif; ! STRICT_MODE
#Ifdef DEBUG;
print "D";
#Endif; ! DEBUG
new_line;
}
EndActivity(PRINTING_BANNER_TEXT_ACT);
];
-) instead of "Banner" in "Printing.i6t".
Include (-
Global storyNum = 1;
Array randStory --> 8 "The Lion the Witch and the Wardrobe" "Prince Caspian" "The Voyage of the Dawn Treader" "The Silver Chair" "The Horse and His Boy" "The Magician's Nephew" "The Last Battle";
-) after "Definitions.i6t".
to story-process:
(- storyNum = storyNum + 1; if (storyNum >= 8) { storyNum = 1; } -)
to story-fix (x - a number):
(- storyNum = x; -)
chapter incing
incing is an action applying to nothing.
understand the command "inc" as something new.
understand "inc" as incing.
carry out incing:
story-process;
the rule succeeds;
test newban with "inc/version/inc/version/inc/version/inc/version/inc/version/inc/version/inc/version/"