Remote agent/Agent interface: Difference between revisions

Content added Content deleted
(→‎Tcl: Added implementation + demonstration of how to use the interface)
(→‎{{header|Tcl}}: Fix trivial logic bug)
Line 148: Line 148:
}
}
}
}
}
if {rand() < 0.5} {
my TurnLeft
} else {
my TurnRight
}
}
} trap bumpedWall {} {}
} trap bumpedWall {} {}
if {rand() < 0.5} {
my TurnLeft
} else {
my TurnRight
}
}
}
set ::wonGame ok
set ::wonGame ok