a_nani_household




% This file contains the definitions for the room in a household
% To create a new world, simply change the room definitions as
% described below (or in manual)
%




use this file with...




:- ensure_loaded('a_nani_household.pfc').




*/


   13:- style_check(-singleton).   14:- style_check(-discontiguous).   15% :- style_check(-atom).
   16
   17:- op(600,fx,onSpawn).   18
   19:- expects_dialect(pfc).   20
   21% ==================================================
   22% Rooms
   23% ==================================================
   24
   25/* technically the following are not needed due the mudAreaConnected/2s below */
   26:- kb_shared((onSpawn)/1).   27onSpawn tRegion(tKitchen).
   28onSpawn tRegion(tHallWay).
   29onSpawn tRegion(tCellar).
   30onSpawn pathDirLeadsTo(tKitchen,vDown,tCellar).
   31onSpawn tRegion(tOfficeRoom).
   32onSpawn tRegion(tLivingRoom).
   33onSpawn tRegion(tDiningRoom).
   34onSpawn tRegion(tBedRoom).
   35onSpawn tRegion(tBathRoom).
   36onSpawn tRegion(tClosetRoom).
   37onSpawn tRegion(tBackYard).
   38
   39
   40% ==================================================
   41% Doors
   42% ==================================================
   43 
   44onSpawn mudAreaConnected(tLivingRoom,tOfficeRoom).
   45onSpawn mudAreaConnected(tHallWay,tDiningRoom).
   46onSpawn mudAreaConnected(tHallWay,tBedRoom).
   47onSpawn mudAreaConnected(tHallWay,tLivingRoom).
   48onSpawn mudAreaConnected(tHallWay,tBathRoom).
   49onSpawn mudAreaConnected(tKitchen, tCellar).
   50onSpawn mudAreaConnected(tDiningRoom, tKitchen).
   51onSpawn mudAreaConnected(tBedRoom, tClosetRoom).
   52onSpawn mudAreaConnected(tKitchen, tBackYard).
   53onSpawn mudAreaConnected(iArea1008, tBackYard)