>FOLLOW PRINCESS
I seem to have lost track of her.
You could argue that it should be "You seem to have lost track of her.", but the main point is that you get this message even if you haven't seen the princess. It should probably only print that if PRINCESS-AWAKE is true. Otherwise it should probably print "There is no princess here."
Something like this should work in PRINCESS-FCN:
<COND (<VERB? FOLLOW>
<COND (<IN? ,PRINCESS ,HERE>
<TELL
"You can't follow her until she leaves..." CR>)
(,PRFOLLOW
<DO-WALK ,PRFOLLOW>)
(,PRINCESS-AWAKE
<TELL "I seem to have lost track of her." CR>)
(T
<TELL "There is no princess here." CR>)>
You could argue that it should be "You seem to have lost track of her.", but the main point is that you get this message even if you haven't seen the princess. It should probably only print that if
PRINCESS-AWAKE
is true. Otherwise it should probably print "There is no princess here."Something like this should work in
PRINCESS-FCN
: