Jess - 添加随机函数的事实

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实现了俄罗斯方块游戏。