Jess - Add Fact with Random函数

Question

我正在制作一款俄罗斯方块游戏，我想知道如何在我的事实中添加分数。

 (deftemplate point
 (slot i(type INTEGER))
 (slot j(type INTEGER)))

 (defglobal ?*LINES* = 24)
 (defglobal ?*COLUMNS* = 12)

 (deffacts initial
 (piece 0))

 (defrule choosePiece   
 =>
 (bind ?y (mod (random) 7)) //there are 7 pieces in Tetris game
 (assert (piece ?y)))

我有一个随机规则choosePiece，如果该规则的结果是1，我想在坐标(1,6) (1,7) (2,6) (2,7)中添加一个正方形到我的事实中，如果它是2，我想添加一个T。我如何创建一个规则，允许我修改这些事实的坐标来移动这些碎片。谢谢。

Answer 1

虽然你当然可以实现这一点，但这将是困难和混乱的，并且最终是毫无意义的。Jess更适合编写一个玩俄罗斯方块的机器人；我会用Java实现俄罗斯方块游戏本身。