move.soar

00001 echo "\nLoading attack/move.soar "
00002 
00003 ###Propose Move Operator
00004 ## If the state is attack and there is a tank on radar that is not in the center, and there is not a tank in the 
00005 ## center, then propose the move operator in the direction of the tank.
00006 
00007 
00008 ##!
00009 # @brief Proposes move operator
00010 # 
00011 # If the state is attack and there is a tank on radar that is not in the center, and there is not a tank in the 
00012 # center, then propose the move operator in the direction of the tank.
00013 #
00014 # @problem-space attack
00015 # @operator fire-missile
00016 # @type proposal
00017  sp {attack*propose*move
00018    (state <s> ^name attack
00019               ^io.input-link <input>)
00020    (<input> ^blocked.<dir> no
00021             ^radar <r>)
00022    (<r> ^tank.position { << left right >> <dir> }
00023        -^tank.position center)
00024    -->
00025    (<s> ^operator <o> + =)
00026    (<o> ^name move
00027         ^actions.move.direction <dir>)}