FormulaAI/Replacing - Revision history

Celtic Minstrel: /* Candidate Actions */ Missed id and name in the converted example

2023-04-09T03:26:15Z

‎Candidate Actions: Missed id and name in the converted example

Celtic Minstrel: /* Candidate Actions */ A bit more of an explanation on filters

2023-04-09T03:25:15Z

‎Candidate Actions: A bit more of an explanation on filters

Celtic Minstrel: /* Formula Priorities */ Add an extra variable to make it a bit clearer what select() is doing here

2023-04-09T03:15:44Z

‎Formula Priorities: Add an extra variable to make it a bit clearer what select() is doing here

Celtic Minstrel: /* Approaching a Location */ It's supposed to stop next to the castle, not on it

2023-02-27T03:05:09Z

‎Approaching a Location: It's supposed to stop next to the castle, not on it

Celtic Minstrel: /* Patrol Unit */ Adding quotes to enable WFL syntax highlighting of the attribute

2022-11-20T02:28:04Z

‎Patrol Unit: Adding quotes to enable WFL syntax highlighting of the attribute

Celtic Minstrel: /* Approaching a Location */ Add the FormulaAI code

2022-11-19T20:43:20Z

‎Approaching a Location: Add the FormulaAI code

Celtic Minstrel: /* Patrol Unit */ Add the FormulaAI code

2022-11-14T14:28:44Z

‎Patrol Unit: Add the FormulaAI code

Celtic Minstrel: /* A guardian unit */ Fix a few errors

2022-11-14T14:20:06Z

‎A guardian unit: Fix a few errors

Celtic Minstrel: /* Side Formulas */ Use angle brackets for the Lua code (which also helps the syntax highlighting)

2022-11-12T19:27:02Z

‎Side Formulas: Use angle brackets for the Lua code (which also helps the syntax highlighting)

Celtic Minstrel: /* A guardian unit */ Add some more explanation of what the examples are actually showing, and comments in the code

2022-11-12T19:25:29Z

‎A guardian unit: Add some more explanation of what the examples are actually showing, and comments in the code

@@ Line 605: / Line 605: @@
 [ai]
      [stage]
          [candidate_action]
              engine=lua

@@ Line 623: / Line 623: @@
 [/ai]
 </syntaxhighlight>
 == Translating Code ==
 '''to be filled in'''

@@ Line 511: / Line 511: @@
              max_score=10000010
              evaluation=<<
-                 local u = wesnoth.units.find(select(4, ...))[1]
+                 local filter_own = select(4, ...)
                  if not u then return 0 end
                  return ai.check_attack(u,3,12).ok and 10000010 or 0
              >>
              execution=<<
-                 local u = wesnoth.units.find(select(4, ...))[1]
+                 local filter_own = select(4, ...)
                  ai.attack(u,3,12)
              >>
@@ Line 531: / Line 533: @@
              max_score=10000009
              evaluation=<<
-                 local u = wesnoth.units.find(select(4, ...))[1]
+                 local filter_own = select(4, ...)
                  if not u then return 0 end
                  return ai.check_attack(u,3,12).ok and 10000009 or 0
              >>
              execution=<<
-                 local u = wesnoth.units.find(select(4, ...))[1]
+                 local filter_own = select(4, ...)
                  ai.attack(u,3,12)
              >>
@@ Line 551: / Line 555: @@
              max_score=10000011
              evaluation=<<
-                 local u = wesnoth.units.find(select(4, ...))[1]
+                 local filter_own = select(4, ...)
                  if not u then return 0 end
                  return ai.check_attack(u,3,12).ok and 10000011 or 0
              >>
              execution=<<
-                 local u = wesnoth.units.find(select(4, ...))[1]
+                 local filter_own = select(4, ...)
                  ai.attack(u,3,12)
              >>

@@ Line 340: / Line 340: @@
              ai_type=goto
              [filter_location]
-                 formula=castle
+                 [filter_adjacent]
              [/filter_location]
              release_unit_at_goal=yes

@@ Line 361: / Line 361: @@
          [vars]
              guard_radius=3
-             waypoints=[ loc(16,5) -> loc(16,15), loc(16,15) -> loc(16,5) ]
+             waypoints="[ loc(16,5) -> loc(16,15), loc(16,15) -> loc(16,5) ]"
              next_step="loc(16,5)"
          [/vars]

@@ Line 280: / Line 280: @@
 <syntaxhighlight lang=fai>
+move(
 </syntaxhighlight>

← Older revision		Revision as of 14:28, 14 November 2022
Line 359:		Line 359:

	<syntaxhighlight lang=fai>		<syntaxhighlight lang=fai>
		+	def closest_unit(ai*, me)
		+	choose(
		+	enemy_units, 'unit',
		+	-distance_between(me.loc, unit.loc)
		+	);

		+	def step_move(me)
		+	if( unit_at( desired_path[0] ),
		+	if( desired_path.size > 1,
		+	move_partial(
		+	me.loc,
		+	desired_path[1]
		+	),
		+	end
		+	),
		+	move_partial(
		+	me.loc,
		+	desired_path[0]
		+	)
		+	)
		+
		+	where desired_path = shortest_path( me.loc, me.vars.next_step );
		+
		+	def move_ahead(ai*, me)
		+	if( enemy_units,
		+	if( distance_between( closest_unit(ai, me).loc, me.loc ) > me.moves-1,
		+	move_partial(
		+	me.loc,
		+	me.vars.next_step
		+	),
		+
		+	step_move(me)
		+
		+	),
		+	move_partial(
		+	me.loc,
		+	me.vars.next_step
		+	)
		+	);
		+
		+	def patrol_move(ai*, me)
		+	if( me.vars.next_step = me.loc,
		+	set_unit_var('next_step',
		+	me.vars.waypoints[ me.vars.next_step ],
		+	me.loc
		+	),
		+
		+	move_ahead(ai,me)
		+	);
		+
		+	if( me.moves = 0,
		+	end,
		+	if(attack,
		+	attack,
		+	patrol_move(self, me)
		+	)
		+	)
		+
		+	where attack = if( path_to,
		+	if(path_to.size <= me.vars.guard_radius,
		+	attack( me.loc, path_to.last, closest_unit(self, me).loc ),
		+	0
		+	),
		+	0
		+	)
		+
		+	where path_to = if( enemy_units,
		+	shortest_path( me.loc, closest_unit(self, me).loc ),
		+	[]
		+	)
	</syntaxhighlight>		</syntaxhighlight>

@@ Line 185: / Line 185: @@
      [ai]
          [candidate_action]
-             evaluate=<<return 10001>>
+             engine=lua
-             execute=<<wesnoth.dofile "ai/lua/guardian.lua">>
+            evaluation=<<return 10001>>
              [args]
                  guard_radius=3

@@ Line 36: / Line 36: @@
      [stage]
          engine=lua
-         code="wesnoth.dofile 'ai/lua/opening.lua'"
+         code=<<wesnoth.dofile 'ai/lua/opening.lua'>>
      [/stage]
 [/ai]

@@ Line 164: / Line 164: @@
 <syntaxhighlight lang=fai>
 if(attack, attack, move(me.loc, me.vars.guard_loc))
-    where attack = choose(filter(attacks, units = [me.loc] and distance_between(me.vars.guard_loc,target) <= me.vars.guard_radius), avg_damage_inflicted)
+# We're going to choose the attack that does the most damage #
 </syntaxhighlight>
@@ Line 187: / Line 195: @@
 [/unit]
 </syntaxhighlight>
 And the logic is fairly simple, so it's not that hard to write Lua that does the same thing:
 <syntaxhighlight lang=lua>
 local self, cfg, data, filter_own = ...
 local F = wesnoth.require "functional"
 local attacks = ai.get_attacks()
-local me = wesnoth.units.find(filter_own)
+-- The unit this CA applies to is the only unit matched by the [filter_own]
 local guard_loc = {data.guard_x, data.guard_y}
 function is_valid_attack(atk)
      local src = atk.movements[0].src
      if src.x ~= me.x or src.y ~= me.y then
@@ Line 209: / Line 231: @@
 end
 local attack = F.choose(F.filter(attacks, is_valid_attack), avg_damage_inflicted)
 if attack then