people/presets/RouteWalker.lua

if event.type == "program" then
    mem.positions = {pos}
    mem.cur = 1
    mem.dir = 1
    mem.wait = true
elseif event.type == "tell" then
    if event.message == "here" then
        mem.positions = {event.senderpos}
        mem.wait = false
        mem.cur = 1
    elseif event.message == "then here" then
        table.insert(mem.positions, event.senderpos)
    end
elseif event.type == "act" then

    if mem.wait then
        action = {"wait", time=20}
        mem.wait = false
        return
    end

    action = {"go", pos=mem.positions[mem.cur]}
    mem.wait = true
    mem.cur = mem.cur + mem.dir
    if mem.cur > #mem.positions then
        mem.cur = #mem.positions
        mem.dir = -1
    elseif mem.cur < 1 then
        mem.cur = 1
        mem.dir = 1
    end

end