anchor.diff:          
           // hud entities
           static let getHudHalt gameplayAddress world = World.getEntity (getHudHaltAddress gameplayAddress) world
  -        static let setHudHalt gameplayAddress field world = World.setEntity (getHudHaltAddress gameplayAddress) field world
  +        static let setHudHalt field gameplayAddress world = World.setEntity (getHudHaltAddress gameplayAddress) field world
   
           // scene addresses
           static let getSceneAddress gameplayAddress = satoga gameplayAddress SceneName
           static let getFieldAddress gameplayAddress = gatoea (getSceneAddress gameplayAddress) FieldName
           static let getPlayerAddress gameplayAddress = gatoea (getSceneAddress gameplayAddress) PlayerName
  -        static let getCharacterAddress gameplayAddress (character : Entity) = gatoea (getSceneAddress gameplayAddress) character.Name
  -        static let getCharacterAddresses gameplayAddress characters = List.map (fun character -> getCharacterAddress gameplayAddress character) characters
  +        static let getCharacterAddress (character : Entity) gameplayAddress = gatoea (getSceneAddress gameplayAddress) character.Name
  +        static let getCharacterAddresses characters gameplayAddress = List.map (fun character -> getCharacterAddress character gameplayAddress) characters
   
           // scene entities
           static let getField gameplayAddress world = World.getEntity (getFieldAddress gameplayAddress) world
  -        static let getOptCharacterAtPosition gameplayAddress position world =
  +        static let getOptCharacterAtPosition position gameplayAddress world =
               let characters = world |> World.getEntities (getSceneAddress gameplayAddress) |> Seq.filter (Entity.dispatchesAs typeof<CharacterDispatcher>)
               Seq.tryFind (fun (character : Entity) -> character.Position = position) characters
  -        //static let getCharacterAtPosition gameplayAddress position world = Option.get <| getOptCharacterAtPosition gameplayAddress position world
  -        static let getOptCharacterInDirection gameplayAddress position direction world = getOptCharacterAtPosition gameplayAddress (position + dtovf direction) world
  -        static let getCharacterInDirection gameplayAddress position direction world = Option.get <| getOptCharacterInDirection gameplayAddress position direction world
  +        //static let getCharacterAtPosition position gameplayAddress world = Option.get <| getOptCharacterAtPosition position gameplayAddress world
  +        static let getOptCharacterInDirection position direction gameplayAddress world = getOptCharacterAtPosition (position + dtovf direction) gameplayAddress world
  +        static let getCharacterInDirection position direction gameplayAddress world = Option.get <| getOptCharacterInDirection position direction gameplayAddress world
           static let getPlayer gameplayAddress world = World.getEntity (getPlayerAddress gameplayAddress) world
           static let getEnemies gameplayAddress world = World.getEntities (getSceneAddress gameplayAddress) world |> Seq.filter (Entity.dispatchesAs typeof<EnemyDispatcher>) |> List.ofSeq
           static let getParticipants gameplayAddress world = (getField gameplayAddress world, getPlayer gameplayAddress world, getEnemies gameplayAddress world)
  
positive.code:                     (occupationMap, [], rand)
              (enemyTurns, rand)
  
          static let determinePlayerTurnFromTouch gameplayAddress touchPosition world =
              let (field, player, enemies) = getParticipants gameplayAddress world
              if not <| anyTurnsInProgress2 player enemies then
                  let touchPositionW = Camera.mouseToWorld Relative touchPosition world.Camera
  
negative.code:         static let runCharacterNoActivity characterAddress world =
              World.updateEntity characterAddress (Entity.setActivityState NoActivity) world
  
          static let runCharacterActivity characterAddress newActivity gameplayAddress world =
              match newActivity with
              | Action newActionDescriptor -> runCharacterAction characterAddress newActionDescriptor gameplayAddress world
              | Navigation newNavigationDescriptor -> runCharacterNavigation characterAddress newNavigationDescriptor gameplayAddress world
              | NoActivity -> runCharacterNoActivity characterAddress world
  
          static let tryRunEnemyActivity gameplayAddress world enemyAddress newActivity =
  