anchor.diff:                  World.observe (DeselectEventName + address) address (CustomSub stopPlayHandler)
               (screen, world)
   
  +[<AutoOpen>]
  +module BlazeVectorModule =
  +
       /// The custom type for BlazeVector's game dispatcher.
       type BlazeVectorDispatcher () =
           inherit GameDispatcher ()
positive.code: open BlazeVector.BlazeConstants
  
  [<AutoOpen>]
  module EntityExtensionsModule =
  
      type Entity with
  
          member entity.Age = entity?Age : int64
          static member setAge (value : int64) (entity : Entity) = entity?Age <- value
          member entity.Health = entity?Health : int
          static member setHealth (value : int) (entity : Entity) = entity?Health <- value
          member entity.LastTimeOnGroundNp = entity?LastTimeOnGroundNp : int64
          static member setLastTimeOnGroundNp (value : int64) (entity : Entity) = entity?LastTimeOnGroundNp <- value
          member entity.LastTimeJumpNp = entity?LastTimeJumpNp : int64
          static member setLastTimeJumpNp (value : int64) (entity : Entity) = entity?LastTimeJumpNp <- value
  
          static member hasAppeared camera (entity : Entity) =
              entity.Position.X - (camera.EyeCenter.X + camera.EyeSize.X * 0.5f) < 0.0f
  
          static member hasFallen (entity : Entity) =
              entity.Position.Y < -600.0f
  
  [<AutoOpen>]
  module BlazeDispatchersModule =
  
      type BulletDispatcher () =
          inherit EntityDispatcher ()
  
negative.code:                 World.observe TickEventName address (CustomSub tickHandler) |>
                  World.observe (CollisionEventName + address) address (CustomSub collisionHandler)
              (enemy, world)
  
  [<AutoOpen>]
  module PlayerModule =
  
      type Entity with
  
          member entity.LastTimeOnGroundNp = entity?LastTimeOnGroundNp : int64
          static member setLastTimeOnGroundNp (value : int64) (entity : Entity) = entity?LastTimeOnGroundNp <- value
          member entity.LastTimeJumpNp = entity?LastTimeJumpNp : int64
          static member setLastTimeJumpNp (value : int64) (entity : Entity) = entity?LastTimeJumpNp <- value
  
          static member hasFallen (entity : Entity) =
              entity.Position.Y < -600.0f
  
      type PlayerDispatcher () =
          inherit EntityDispatcher ()
  