Robopuppy Redux

An interactive fiction by J.D. Clemens (2007) - the Inform 7 source text

Home page

Contents
Previous
Next

Complete text

Section B - Action replaying

To change the noun part of (act - stored action) to (o - object): (- I7_Blk_Put({-pointer-to:act},1,{o}); -).
To change the second noun part of (act - stored action) to (o - object): (- I7_Blk_Put({-pointer-to:act},2,{o}); -).
To change the actor part of (act - stored action) to (o - object): (- I7_Blk_Put({-pointer-to:act},3,{o}); -).

To perform (next step - command):
    repeat through the Table of Stored Commands begin;
        if the command entry is the next step and the index entry is the command index begin;
            let mimicry be the undertaking entry;
            if the noun part of mimicry is the placeholder object, change the noun part of mimicry to the noted object;
            if the second noun part of mimicry is the placeholder object, change the second noun part of mimicry to the noted object;
            change the actor part of mimicry to Robopuppy;
            try mimicry;
            increase the command index by 1;
            rule succeeds;
        end if;
    end repeat;
    now Robopuppy is not scripted.