我想构建一个专家系统，在建筑物发生紧急情况时（该建筑物有地面层加三层楼），电梯应将人们带到地面层。理念是首先从最高层（第三层）救人，然后是第二层，最后是从第一层。我在规则的优先级上遇到了问题（我为每一层都设置了单独的规则）。开始时，“MoveFloor3”规则的优先级最高——将电梯移动到第三层（因为我想首先从最高层救人）。当我从第三层救出所有人后，我想将此规则的优先级改为0（或比第二层和第一层的优先级低的某个数字），因为之后我想从第二层和第一层救人。下面是此规则的代码，如何修改此代码以便在该层人数变为0后更改优先级。

(defrule moveFloor3(declare (salience 50))?j<-(lastJob ?t&~moveFloor3)?e<-(elevator ?peopleInElevator)?f<-(floor3 ?peopleInFloor)(capacityElevator ?capacityElevator)=>(bind ?newPeopleInElevator (+ ?peopleInElevator (min ?peopleInFloor (- ?capacityElevator ?peopleInElevator))))(bind ?newPeopleInFloor (- ?peopleInFloor (min ?peopleInFloor (- ?capacityElevator ?peopleInElevator))))(retract ?e ?f ?s ?j)(assert (elevator ?newPeopleInElevator))(assert (floor3 ?newPeopleInFloor))(assert (lastJob moveFloor3))(printout t "Elevator moved to third floor" crlf))

回答：

使用全局变量来设置优先级，该变量可以在规则触发后在规则的右侧（RHS）进行更改。另见 在规则定义中使用变量声明优先级