常数和GOAL配合——AI编写的利器

老胡V1

相信学过编程语言的都清楚，在编程时，往往要用到许多变量，要给他们赋值。而帝国时代的AI语言中，同样也有变量（受到AI官方教程的影响，我喜欢把它叫常数，虽然他是可变的。以下还是叫做常数吧！）。那么，常数到底有什么作用呢？简单地说，常数的用处有以下几点：

1.把常数作为条件的一部分，看成不成立。这一个用处的例子有很多，例如：
(defconst G_YES 1)                              
(defconst G_NO 0)      
(defconst gold-on-map 13)
(defconst stone-on-map 14)
(defconst stone-mine 102)        
(defconst gold-mine 66)  
………………
（定义的前两个常量只是为了表示“是”和“不是”。而13、14等式表示GOAL的编号
然后，就是设置初始值：
(defrule
  (true)
=>
   (set-goal gold-on-map G_YES)  
  (set-goal stone-on-map G_YES)
  (disable-self)
)
上面的语句等价于
(defrule
  (true)
=>
   (set-goal 13 1)  
  (set-goal 14 1)
  (disable-self)
)
然后下面是判断语句：

(defrule
  (cc-players-unit-type-count 0 gold-mine < 2)
=>
  (set-goal gold-on-map G_NO)
  (disable-self)
)
(defrule
  (cc-players-unit-type-count 0 stone-mine < 2)
=>
  (set-goal stone-on-map G_NO)
  (disable-self)
)

上面的语句等价于
(defrule
  (cc-players-unit-type-count 0 gold-mine < 2)
=>
  (set-goal 13 0)
  (disable-self)
)
(defrule
  (cc-players-unit-type-count 0 stone-mine < 2)
=>
  (set-goal 14 0)
  (disable-self)
)

（以上的意思是，当盖亚的金矿数小于等于2的时候，就把GOAL编号为gold-on-map（也就是13）的值设为G_NO（也就是0）。当盖亚的石矿数小于等于二的时候，就把GOAL编号为stone-on-map（也就是14）的值设为G_NO（也就是0）
（如果有不了解GOAL的 请稍等，在本文最后将会提到）

如何利用这个常数呢？请看：

(defrule
  (current-age == imperial-age)
  (goal gold-on-map G_YES)
  (goal stone-on-map G_YES)
=>
  (set-strategic-number sn-food-gatherer-percentage 40)
  (set-strategic-number sn-wood-gatherer-percentage 25)
  (set-strategic-number sn-gold-gatherer-percentage 30)
  (set-strategic-number sn-stone-gatherer-percentage 5)
  (set-strategic-number sn-maximum-food-drop-distance 25)
  (set-strategic-number sn-maximum-wood-drop-distance 25)
  (set-strategic-number sn-maximum-gold-drop-distance 15)
  (set-strategic-number sn-maximum-stone-drop-distance 15)
  (disable-self)
)

(defrule
  (current-age == imperial-age)
  (goal gold-on-map G_NO)
  (goal stone-on-map G_NO)
=>
  (set-strategic-number sn-food-gatherer-percentage 50)
  (set-strategic-number sn-wood-gatherer-percentage 50)
  (set-strategic-number sn-gold-gatherer-percentage 0)
  (set-strategic-number sn-stone-gatherer-percentage 0)
  (disable-self)
)

看！常数就可以用来当条件了！当那个GOAL的值为XX时，就执行XX语句！
如果还有金子，村民们就40%采集食物，25%砍树，30%采金，5%采集石头。
如果没有金子，村民们就一半采集食物，一半砍树。
为什么我们不把
(goal gold-on-map G_NO)

换成
(cc-players-unit-type-count 0 gold-mine < 2)

呢？
因为这样一来，假设后来测试AI的时候，你发现小于2好像不好，要改成3。如果你是用后者的写法，你要把每一个这样的语句中的2换成3。而用前者的写法，只要把
(defrule
  (cc-players-unit-type-count 0 gold-mine < 2)
=>
  (set-goal gold-on-map G_NO)
  (disable-self)
)

里面的2换成3就可以，只用改一个值！这就是常数的便利之处！







2.常数与随机数相结合（实际上也是用GOAL）。


这一点的意思可能很难讲清楚（我表达力不行），直接看代码！
     ; 定义常数
(defconst feudal-age-rush 1)
(defconst castle-age-rush 2)

; 首次演算：设置一个介于 1 到 100 之间的随机数。

(defrule

(true)

=>

(generate-random-number 100)

(disable-self)
)

; 由其结果决定战略
; 20% 机会进行封建时代快攻
; 80% 机会进行城堡时代快攻

(defrule

(random-number > 80)

=>

(set-goal 1 feudal-age-rush)

(disable-self)
)

(defrule

(random-number < 81)

=>

(set-goal 1 castle-age-rush)

(disable-self)
)


看了代码，你应该就明白了。这是用随机数来确定进行城堡RUSH还是封建RUSH，然后把GOAL 1 的值设为XX。

其实还有一点不知道大家想过没有，第一个例子中的：
(defconst stone-mine 102)        
(defconst gold-mine 66)

102，就是石矿的数字代码，66就是金矿的数字代码！

也许你已经想到了！没错！我们可以定义某个没法用英文表示的单位！（说的糊里糊涂的）
例如：
(defconst man-hunter 122)
(defconst woman-hunter 216)  
然后呢？我们可以这么写：

(defrule
    (building-type-count-total mill == 1)
    (or (unit-type-count man-hunter > 0)      
          (or (unit-type-count woman-hunter > 0) )
     (can-build mill)
=>
   (set-strategic-number sn-mill-max-distance 35)
   (build mill)
(disable-self)
)
看吧！只要一开始先定义某个常数（为了方便名称应该要有点意义）的值为那个单位的ID，然后就可以用那个常数的名字代替那个单位的ID，这样你下次再看的时候，就不会因为忘记了那个数字ID的含义而到处找了！（各种建筑和单位的数字ID看这里：https://www.hawkaoe.net/bbs/thread-23845-1-1.html）

好吧，，下面我来详细讲解一下GOAL的用法。

大家有没有发现，我用常数很多都和GOAL结合了。的确，常数可以说是GOAL的亲密伙伴啊！！

那么，什么是GOAL呢？
通俗地说，GOAL就是一个个箱子，每个箱子都有一个编号。编号可以是1到40中的一个。每个箱子只能够放一个数。
GOAL语句有下面两个：
(set-goal GOAL的编号 要设的数)
(goal GOAL的编号 要检查的数)
上面两个语句第一个是一个动作，用处是把相应的GOAL的值设置为XX
第二个是一个条件 是检查一下那个GOAL的值是否为XX

打个比方 (set-goal a b)就相当于在编号是a的箱子里放一个b数。
(goal a b)就相当于去看一下编号是a的箱子里的数是不是b

其中a的要求是1到40     b的值大概没有要求（如果只是用于表示“是”或者“否”，一般为了方便都用0或1）

有的人可能要问了：那直接用数字不就行了么？为什么还要定义常数呢？那么麻烦！

举个例子吧，当你修改自己的AI，看到(set-goal 25 1)这一句话，你能记起来编号是25的GOAL用处是什么吗？记不得吧!
可是如果你看到(set-goal goal-resign yes) 这一句话，你就马上能够知道，这句话的意思是准备要投降啦！
可是你光这么写，AI可不认识他啊！怎么办呢？这就要用到常数啦！
(defconst goal-resign 25)
上面这句话用处可大了！有了它，AI就会把遇见的goal-resign都看做25来处理！同样地有了(defconst yes 1)这句话，AI就会把yes当做1处理了！
这么一来 你就可以用(set-goal goal-resign yes) 这句话了！

下面来讲一下实际的高级应用：


应用之一：看对方出什么兵，就把GOAL值改成一个数。例如：
(defconst enemy-soilder 1)
(defconst g-knight 1)
(defconst g-archer 2)
(defconst g-spear 3)



....
(defrule
(players-unit-type-count knight-line >= 8)
=>
(set-goal enemy-soilder g-knight)
)
(defrule
(players-unit-type-count archer-line >= 15)
=>
(set-goal enemy-soilder g-archer)
)
(defrule
(players-unit-type-count spearman-line >= 6)
=>
(set-goal enemy-soilder g-spear)
)

然后再根据GOAL的不同值来应对
(defrule
(goal enemy-soilder g-knight)
=>
(.......)
)
(defrule
(goal enemy-soilder g-archer)
=>
(.......)
)
(defrule
(goal enemy-soilder g-spear)
=>
(.......)
)


还可以把升级年代的时候把某个GOAL设为1，然后升完设置回去。然后写当常数为1就出兵或研究科技（怕不够食物或者黄金所以等到升级年代时候才出兵或研究科技。这里不再说了。

先写这么多 不懂就提问吧

[ 本帖最后由 老胡V1 于 2010-1-9 12:40 编辑 ]

hawk_zz

寫的的太深奧了，看的不大懂

雪之灵狼

真是太强大了！:10:

匈奴骑兵

看不懂…:35: :35: :35: :35:

老胡V1

建议你先看看AI教程，在下载中心有。看完后应该会对AI有不小的了解。只要看基础格式和简单命令就可以了，一些复杂的条件或命令可以慢慢理解，也不一定要背，需要时候看就行了。当然一些兵种 建筑 的英文最好记几个，尤其是常用的。另外TRAIN BUILD 这些也最好记住（记不住就怪了）。其实最好是自己编一个，这样理解更快，不必写得很好，能让自己理解那些语句的意思就行。也可以参考别人的AI，利用教程来弄懂别人的语句的意思，理解他人思路，会对自己有不小帮助。

老胡V1

24……上次发现有错就重新写了，谁知道一恢复就没掉了55555
只好重新写 可是思路已经回不来了
暂且写了这些 不懂就提问吧……

异界行者

上次用goal定义计时器，居然没有反应……

老胡V1

GOAL和定时器作用不太吧…只是条件。主要是用defconst，来用常数表示定时器，例如(enable-timer a 30)

异界行者

嗯，知道是条件。但定义后拿那个名字来用发现游戏时没作用。所以我还是老老实实直接用数字了&

老胡V1

- -
能把你的代码给我看下吗……

用计时器应该是这样的吧……
（仅供参考）

(defconst TIMER-ATTACK 2)

(defrule
(XXXX)
=>
(enable-timer TIMER-ATTACK 30)
(disable-self)
)

(defrule
(timer-triggered TIMER-ATTACK)
(XXXX)
=>
(attack-now)
(enable-timer TIMER-ATTACK 30)
)

异界行者

我的就是这样。原代码已经改了，也不用发。可能是我后面什么地方用冲突了

老胡V1

注意一下吧 看看是不是重复使用了计时器……代码太长很容易出现这种情况 最好把用了的列个表

_The`East_

常量吧- -常数只限于数字............

粹纳帝国

                                    .

清风皓月

看看吧，大家都会支持你













论坛群发软件

皇家·游侠

还好有点编程基础，慢慢琢磨吧

XIAOYONG

看不懂啊高人啊

武定侯

还好，学过编程语言，看懂了。找时间练练