浅尝问世四十年的 CLIPS 语言工具。例程片段:
(defrule 地牢南面
(物 (id 冒险家)
(位置 地牢南面))
=>
(println "你在地牢南角。")
(println "一大堆瓦砾从")
(println "墙壁上垮了下来。"))
(defrule 由北往南
?位 <- (物 (id 冒险家)
(位置 地牢北面))
?令 <- (命令 (行动 向南 走))
=>
(retract ?令)
(modify ?位 (位置 地牢南面)))
[待续]
![]() |
1
levelworm 2 天前 via Android ![]() 看这玩意第一反应是写文字冒险游戏的 ZIL 。。。
|
![]() |
2
xuanwu OP |
![]() |
3
xuanwu OP 五,第四章开始规则重构,减少雷同代码: https://zhuanlan.zhihu.com/p/30539558081
|