Child's Play

An interactive fiction by Stephen Granade (2007) - the Inform 7 source text
Volume 7 - On Things That Are Not For General Consumption - Not for release
Chapter 0 - Debugging Actions and Rules
[Let me command other babies while I'm testing.]
The can't command others rule is not listed in any rulebook. Persuasion rule for asking people to try doing something: persuasion succeeds.
Orderizing is an action out of world. Understand "orderize" as orderizing. Carry out orderizing: seed the random-number generator with 31337.
Summoning is an action applying to one visible thing. Understand "summon [any thing]" as summoning. Carry out summoning: now the noun is in the location. Report summoning: say "[The noun] appears."
Passivating is an action applying to one visible thing. Understand "passivate [any person]" as passivating. Carry out passivating: now the noun is passive.
Passivating-all is an action applying to nothing. Understand "passiv-all" as passivating-all. Carry out passivating-all: now all playmates are passive.
Activating is an action applying to one visible thing. Understand "activate [any person]" as activating. Carry out activating: now the noun is active.
Activating-all is an action applying to nothing. Understand "activ-all" as activating-all. Carry out activating-all: now all playmates are active.
Burden-testing is an action applying to one visible thing. Understand "burden test [any person]" as burden-testing. Carry out burden-testing: say "Burdened? [if the noun is burdened]Yes![otherwise]No![end if]Unburdened? [if the noun is unburdened]Yes![otherwise]No![end if]Overburdened? [if the noun is overburdened]Yes![otherwise]No![end if]".
Fascination-testing is an action applying to one visible thing. Understand "fascinate test [any person]" as fascination-testing. Carry out fascination-testing: try the noun going west.
Present-testing is an action applying to one visible thing. Understand "present test [any person]" as present-testing. Carry out present-testing: say "[The noun] is [if the noun is present]totally[otherwise]not[end if] present."
Height-testing is an action applying to one visible thing. Understand "height test [any thing]" as height-testing. Carry out height-testing: say "[The noun] is - "; if the noun is zeroth-height, say "zeroth height - "; if the noun is eighth-height, say "eighth height - "; if the noun is quarter-height, say "quarter height - "; if the noun is half-height, say "half height - "; if the noun is eighth-height-or-higher, say "eighth height or higher - "; if the noun is quarter-height-or-higher, say "quarter height or higher - "; if the noun is half-height-or-higher, say "half height or higher - "; say paragraph break.
Deleting is an action applying to one visible thing. Understand "delete [any thing]" as deleting. Carry out deleting: remove the noun from play. Report deleting: say "You make [the noun] vanish."
[Get around the odd scoping that I'm doing.]
A procedural rule when summoning or passivating or activating or burden-testing or fascination-testing or present-testing or height-testing: ignore the babies have stubby little arms rule; ignore the check-heights rule.
Pinging is an action applying to nothing. Understand "ping" as pinging.
Carry out pinging:
   repeat with toddler running through the playmates begin;
   say "[The toddler] is ";
   if the toddler is active, say "active and "; otherwise say "passive and ";
   if the toddler is pulled up on something (called the support), say "pulled up on [the support] ";
   if the toddler is gnawing something (called the mastication), say "chewing on [the mastication] ";
   if the toddler is carrying something, say "holding [a list of things carried by the toddler] ";
   if the toddler is fixated, say "fascinated by [focus of toddler] ";
   say "in [location of the toddler]. [run paragraph on]";
   end repeat;
   say paragraph break.

The source code to Child's Play is licensed under a Creative Commons NonCommercial Sampling Plus 1.0 License.