release 6.2

Data/Scripts/051_AddOns/Silhouette.rb

@@ -0,0 +1,148 @@
+class PokemonTemp
+  def pbClearSilhouetteEvents()
+    echoln @tempEvents
+    @tempEvents.keys.each {|map_id|
+      map = $MapFactory.getMap(map_id,false)
+      @tempEvents[map_id].each { |event|
+        #this deletes the event after a small fadeout
+        $game_self_switches[[map_id, event.id, "B"]] = true if map.events[event.id]
+      }
+    }
+    @tempEvents={}
+    @silhouetteDirection=nil
+  end
+end
+
+
+def isNightmareEffect()
+  #return false
+  #return true
+  return $game_switches[SWITCH_NIGHTMARE_EFFECT] && pbGet(VAR_KARMA)<= 0 && PBDayNight.isNight?
+end
+
+
+# def playNightmareEffect()
+#   frame=1
+#   while true
+#     frame +=1
+#     frame = 1 if frame >4
+#     filename = "nightmare"+frame.to_s
+#     picture = Game_Picture.new(40)
+#     picture.show(filename, 0, 0, 0, 200, 200, 255, 0)
+#     pbWait(3)
+#     picture.erase
+#   end
+#
+# end
+
+Events.onStepTaken += proc { |sender, e|
+  next if !$PokemonTemp.silhouetteDirection
+  if $PokemonTemp.silhouetteDirection && $PokemonTemp.silhouetteDirection == $game_player.direction
+    $PokemonTemp.pbClearSilhouetteEvents
+    $PokemonTemp.silhouetteDirection = nil
+  end
+}
+
+Events.onStepTaken += proc { |sender, e|
+  next if !$scene.is_a?(Scene_Map)
+  next if !isNightmareEffect()
+  steps_constant_offset = 40
+  steps_chance=100
+  minimum_steps=10
+
+  steps_nb = rand(steps_chance)+pbGet(VAR_KARMA)+steps_constant_offset
+  steps_nb = minimum_steps if steps_nb<minimum_steps
+  next if $PokemonGlobal.stepcount % steps_nb != 0
+  $PokemonTemp.pbClearSilhouetteEvents
+  spawnSilhouette()
+}
+Events.onMapChange += proc { |sender, e|
+  next if $PokemonTemp.tempEvents.empty?
+  $PokemonTemp.pbClearTempEvents()
+}
+
+
+def getRandomPositionOnPerimeter(width, height, center_x, center_y, variance=0,edge=nil)
+  half_width = width / 2.0
+  half_height = height / 2.0
+
+  # Randomly select one of the four edges of the rectangle
+  edge = rand(4) if !edge
+
+  case edge
+  when 0 # Top edge
+    random_x = center_x + rand(-half_width..half_width)
+    random_y = center_y - half_height
+  when 1 # Bottom edge
+    random_x = center_x + rand(-half_width..half_width)
+    random_y = center_y + half_height
+  when 2 # Left edge
+    random_x = center_x - half_width
+    random_y = center_y + rand(-half_height..half_height)
+  when 3 # Right edge
+    random_x = center_x + half_width
+    random_y = center_y + rand(-half_height..half_height)
+  end
+
+  return random_x.round, random_y.round
+end
+
+# def launchSilhouetteCommonEvent(event)
+#   $scene.spriteset.addUserAnimation(VIRUS_ANIMATION_ID, event.x, event.y, true)
+#   $PokemonTemp.pbClearTempEvents
+#   $PokemonTemp.silhouetteDirection = nil
+#   pbCommonEvent(COMMON_EVENT_SILHOUETTE)
+# end
+
+
+
+#
+# Faces the same way as player
+# Disappears as soon as player takes a step in same direction as event
+# -> when talk to it:
+# ghost animation
+# Message:
+# A voice echoed from somewhere...
+# [NEXT HINT] (ex: The house in Vermillion City...)
+#
+
+def generate_silhouette_event(id)
+  $game_self_switches[[MAP_TEMPLATE_EVENTS, TEMPLATE_EVENT_SILHOUETTE, "A"]] = false
+  $game_self_switches[[MAP_TEMPLATE_EVENTS, TEMPLATE_EVENT_SILHOUETTE, "B"]] = false
+  template_event = $MapFactory.getMap(MAP_TEMPLATE_EVENTS,false).events[TEMPLATE_EVENT_SILHOUETTE]
+  new_event= template_event.event.dup
+  new_event.name = "temp_silhouette"
+  new_event.id = id
+  return new_event
+end
+
+def spawnSilhouette()
+  found_available_position = false
+  max_tries = 10
+  current_try = 0
+  while !found_available_position
+    x, y = getRandomPositionOnPerimeter(15, 11, $game_player.x, $game_player.y, 2)
+    found_available_position = true if $game_map.passable?(x, y, $game_player.direction)
+    current_try += 1
+    return if current_try > max_tries
+  end
+  key_id = ($game_map.events.keys.max || -1) + 1
+  rpgEvent = generate_silhouette_event(key_id)
+  #rpgEvent = RPG::Event.new(x,y)
+
+  gameEvent = Game_Event.new($game_map.map_id, rpgEvent, $game_map)
+  direction = $game_player.direction #[2,4,6,8].sample
+  gameEvent.direction = direction
+  $PokemonTemp.silhouetteDirection = direction
+  $game_map.events[key_id] = gameEvent
+
+
+  gameEvent.moveto(x, y)
+  #-------------------------------------------------------------------------
+  #updating the sprites
+
+  sprite = Sprite_Character.new(Spriteset_Map.viewport, $game_map.events[key_id])
+   $scene.spritesets[$game_map.map_id] = Spriteset_Map.new($game_map) if $scene.spritesets[$game_map.map_id] == nil
+   $scene.spritesets[$game_map.map_id].character_sprites.push(sprite)
+  #$PokemonTemp.addTempEvent($game_map.map_id, gameEvent)
+end