This is what I use.
[spoiler][code]To say raw: (- RAW(); -).
Include (-
[ RAW ix;
for (ix=6: ix <= UUID_ARRAY->0: ix++) print (char) UUID_ARRAY->ix;
];
-).
Include (-
[ IFID;
PrintText((+ IFID Header +));
print ": ";
RAW();
print “^”;
];
-).
The IFID Header is a text that varies. The IFID Header is “Identification number”.
To say the/-- ifid: (- IFID(); -).
To say the/-- banner text: (- Banner(); IFID(); -).
Include (-
[ ANNOUNCE_STORY_FILE_VERSION_R ix;
if (actor ~= player) rfalse;
Banner();
IFID();
if (standard_interpreter > 0) {
print "Standard interpreter “,
standard_interpreter/256, “.”, standard_interpreter%256,
" (”, HDR_TERPNUMBER->0;
#Iftrue (#version_number == 6);
print (char) ‘.’, HDR_TERPVERSION->0;
#Ifnot;
print (char) HDR_TERPVERSION->0;
#Endif;
print ") / ";
} else {
print "Interpreter ", HDR_TERPNUMBER->0, " Version ";
#Iftrue (#version_number == 6);
print HDR_TERPVERSION->0;
#Ifnot;
print (char) HDR_TERPVERSION->0;
#Endif;
print " / ";
}
print "Library serial number ", (string) LibSerial, “^”;
#Ifdef LanguageVersion;
print (string) LanguageVersion, “^”;
#Endif; ! LanguageVersion
#ifdef ShowExtensionVersions;
ShowFullExtensionVersions();
#endif;
say__p = 1;
];
-) instead of “Announce Story File Version Rule” in “ZMachine.i6t”.
Include (-
[ ANNOUNCE_STORY_FILE_VERSION_R ix;
if (actor ~= player) rfalse;
Banner();
IFID();
@gestalt 1 0 ix;
print "Interpreter version ", ix / $10000, “.”, (ix & $FF00) / $100,
“.”, ix & $FF, " / ";
@gestalt 0 0 ix;
print "VM ", ix / $10000, “.”, (ix & $FF00) / $100, “.”, ix & $FF, " / ";
print "Library serial number ", (string) LibSerial, “^”;
#Ifdef LanguageVersion;
print (string) LanguageVersion, “^”;
#Endif; ! LanguageVersion
ShowFullExtensionVersions();
say__p = 1;
];
-) instead of “Announce Story File Version Rule” in “Glulx.i6t”.[/code][/spoiler]
This allows for easy customisation of the header test that prefixes the IFID and an easy way to say the raw IFID value.
Also, these are the I6 rules that print the version, so you should be able to modify them as much as you like.
Hope this helps.