Back to List Inventory Complete Backward Forward Plain Coloured Gaudy This code in plain text

Browsing verblibm.h XObj (lines 1967-1980) 1967 [ XObj obj f; 1968 if (parent(obj) == 0) print (name) obj; else print (a) obj; 1969 print " (", obj, ") "; 1970 if (f==1 && parent(obj) ~= 0) 1971 print "(in ", (name) parent(obj), " ", parent(obj), ")"; 1972 new_line; 1973 if (child(obj)==0) rtrue; 1974 if (obj == Class) 1975 WriteListFrom(child(obj), 1976 NOARTICLE_BIT + INDENT_BIT + NEWLINE_BIT + ALWAYS_BIT, 1); 1977 else 1978 WriteListFrom(child(obj), 1979 FULLINV_BIT + INDENT_BIT + NEWLINE_BIT + ALWAYS_BIT, 1); 1980 ];

Last updated 27 February 2004. This site is no longer supported; information may be out of date.
Maintained as a historical archive by the Interactive Fiction Technology Foundation. Copyright 1993-2018 IFTF, CC-BY-SA unless otherwise noted.
This page was originally managed by Graham Nelson (graham@gnelson.demon.co.uk) assisted by C Knight.