Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- baseKB: [1] ?- current_agent(Agent),agent_call_command_now(Agent,actLook).
- Agent = iExplorer5 ;
- actNotice(you,begin(you,actLook)).
- % substs=[vHere=iArea1020, isSelf=xyzFn(iArea1020, 1, 3, 1), isSelfAgent=iExplorer5].
- [] [] [] [] [] [] []
- [] -- -- -- -- -- []
- -- -- -- -- -- []
- xp -- -- -- -- []
- -- -- -- -- -- []
- [] -- -- -- -- -- []
- [] [] [] [] [] [] []
- text= nameStringsList(iArea1020,[s("Enterprise","Security")]).
- s(Enterprise,Security)
- s(You,'re,standing,in,the,dimly,lit,Enterprise,Security)
- s(Weapons,lockers,cover,all,of,the,walls,,,except,along,the,northern,wall,,,where,a,large,glass,window,protects,dozens,of,different,phasors,,,blaster,rifles,,,and,other,high,tech,weapons)
- s(Three,long,tables,surrounded,by,chairs,stretch,across,the,room)
- path(vWest)= iArea1019.
- pathName(vWest)= s("A","corridor","is","West").
- text= localityOfObject(iExplorer5,iArea1020).
- selfAgent= iExplorer5.
- text= mudAtLoc(iExplorer5,xyzFn(iArea1020,1,3,1)).
- text= mudFacing(iExplorer5,vNorth).
- text= mudStance(iExplorer5,vStand).
- text= mudMoveDist(iExplorer5,1).
- mudLastCmdSuccess= vTrue.
- % substs=[vHere=iArea1020, isSelf=xyzFn(iArea1020, 1, 3, 1), isSelfAgent=iExplorer5].
- ftText= mudContains(iExplorer5,[]).
- ftText= mudPossess(iExplorer5,[iBoots741,iCommBadge742,iRedUniform743,iFood_rez1]).
- ftText= mudStowing(iExplorer5,[iFood_rez1]).
- ftText= mudWielding(iExplorer5,[]).
- ftText= wearsClothing(iExplorer5,[iBoots741,iCommBadge742,iRedUniform743]).
- % found(mpred_rem_support2(mudLastCommand(iExplorer5, actProlog("prolog", "'", ".")), (mudLastCommand(iExplorer5, actProlog("prolog")), pt(mudLastCommand(iExplorer5, actProlog("prolog")), rhs([\+mudLastCommand(iExplorer5, actProlog("prolog")), mudLastCommand(iExplorer5, actProlog("prolog", "'", "."))]))))).
- actNotice(you,done(you,actLook)).
- Agent = iExplorer5.
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement