2 files changed, 85 insertions, 1 deletions

@@ -34,7 +34,8 @@ SpriteLayer = {
 BehaviourType = {
   NONE = 0,
   WANDER = 1,
-  PATH = 2
+  PATH = 2,
+  FOLLOW = 3
 }
 
 CutsceneOptions = {
@@ -440,6 +441,13 @@ function WaitForSpritePath(spriteName)
   end
 end
 
+--- Sets a sprite to wander.
+function StartWandering(spriteName)
+  local spriteId = getSpriteByAlias(spriteName)
+  local sprite = getSprite(spriteId)
+  sprite.behaviourType = BehaviourType.WANDER
+end
+
 --- Turns off the sprite's behaviour.
 function DisableBehaviour(spriteName)
   local spriteId = getSpriteByAlias(spriteName)
@@ -447,6 +455,23 @@ function DisableBehaviour(spriteName)
   sprite.behaviourType = BehaviourType.NONE
 end
 
+--- Directs a sprite to start following a target sprite.
+function FollowSprite(spriteName, targetName)
+  local spriteId = getSpriteByAlias(spriteName)
+  local targetId = getSpriteByAlias(targetName)
+  local sprite = getSprite(spriteId)
+  sprite.followSpriteId = targetId
+  sprite.behaviourType = BehaviourType.FOLLOW
+end
+
+--- Makes a sprite stop following whatever sprite it was following.
+function StopFollowingSprite(spriteName)
+  local spriteId = getSpriteByAlias(spriteName)
+  local sprite = getSprite(spriteId)
+  sprite.followSpriteId = -1
+  sprite.behaviourType = BehaviourType.NONE
+end
+
 --- Fades out the currently playing music.
 -- This does not block. If you want it to block, call Delay for the same amount
 -- of time.
@@ -479,6 +504,21 @@ function EnablePlayerControl()
 end
 
 --- Makes the specified sprite face toward the †arget sprite.
+-- This version of the function uses any of the eight directions.
+-- @param spriteName the name of the sprite to change the direction of
+-- @param targetName the name of the sprite to face toward
+function FaceTowardSprite(spriteName, targetName)
+  local spriteId = getSpriteByAlias(spriteName)
+  local targetId = getSpriteByAlias(targetName)
+  local sprite = getSprite(spriteId)
+  local target = getSprite(targetId)
+  local diff = vec2i.new(target.loc:x() - sprite.loc:x(), target.loc:y() - sprite.loc:y())
+  local dir = directionFacingPoint(diff)
+
+  SetDirection(spriteName, dir)
+end
+
+--- Makes the specified sprite face toward the †arget sprite.
 -- This version of the function uses the closest cardinal direction.
 -- @param spriteName the name of the sprite to change the direction of
 -- @param targetName the name of the sprite to face toward
@@ -226,3 +226,47 @@ function hallucination_interior.mailbox_time_passage()
 
   EnablePlayerControl()
 end
+
+function hallucination_interior.switch_claus_attention()
+  gamestate.switch_claus_lost_interest = false
+
+  Halt("switch_claus")
+  DisableBehaviour("switch_claus")
+  ShowExpression("switch_claus", "surprise")
+  FaceTowardSprite("switch_claus", "lucas")
+  Delay(1000)
+
+  RemoveExpression("switch_claus")
+
+  if gamestate.switch_claus_lost_interest then
+    SetMovementSpeed("switch_claus", 1)
+    StartWandering("switch_claus")
+  else
+    SetMovementSpeed("switch_claus", 2)
+
+    if IsSpriteInZone("switch_claus", "switch_claus_hidden") then
+      MakeSpriteNotSolid("lucas")
+      DirectSpriteToLocation("switch_claus", "switch_claus_rsvp")
+      MakeSpriteSolid("lucas")
+      WaitForSpritePath("switch_claus")
+    end
+
+    if gamestate.switch_claus_lost_interest then
+      SetMovementSpeed("switch_claus", 1)
+      StartWandering("switch_claus")
+    else
+      FollowSprite("switch_claus", "lucas")
+    end
+  end
+end
+
+function hallucination_interior.switch_claus_lose_interest()
+  gamestate.switch_claus_lost_interest = true
+
+  SetMovementSpeed("switch_claus", 1)
+  StartWandering("switch_claus")
+end
+
+function hallucination_interior.lets_switch_places()
+  -- TODO: let's switch places
+end