第一回合永远出石头,
之后回合永远重复对方上回合选择
第一回合永远出石头,
之后永远重复上回合对方决策所克的(上回合对方出剪刀,我这回合出布等等)
type rs = R | P | S (* R 石头,P 布,S 剪刀)
type strategy = (rs list) -> (rs list) -> rs (* 第一个参数是自己之前所有决策,第二个是对方所有决策,list 的序号 0 代表第一回合做出的决策,也就说 list 的最后一个元素是上回合做出的决策 *)
欢迎光临 Project1 (https://rpg.blue/) | Powered by Discuz! X3.1 |