Print Page - Fog of War for Blizz ABS

Title: Fog of War for Blizz ABS
Post by: Badlands on July 30, 2010, 10:32:32 pm

That would be a great feature to add, and a lot of people would find it useful.
Like Berka's Fog of War script, but for RMXP. I mean, almost no lag at all, a really simple system, at least a basic one.

Title: Re: Fog of War for Blizz ABS
Post by: ShadowPierce on July 30, 2010, 11:47:24 pm

->Sorry but I don't really see the point for this system since the characters' visions are already limited & you can't see beyond the main character's scope... :uhm: But then again, I could be wrong... I'll just wait & watch... Like this: :O.o:

:haha:

†

Title: Re: Fog of War for Blizz ABS
Post by: Badlands on July 31, 2010, 01:19:10 am

The character's visions are already limited by the screen size and map scroll, but I'm not scrolling the map as the character walks, I'm scrolling the map with the mouse like strategy games. So, if I scroll the map and left my character behind I should only be able to see the fog of war.
And I dont really see the point in viewing the whole screen as the character's view.

Title: Re: Fog of War for Blizz ABS
Post by: ShadowPierce on July 31, 2010, 02:12:33 am

->You mean you're using Blizz-ABS to make a strategy game of some sort? And you use a mouse script that lets you scroll out of the MC's scope of view? Then that would be a pretty original idea to use BABS for... I approve of this... :up:

†

Title: Re: Fog of War for Blizz ABS
Post by: WhiteRose on July 31, 2010, 02:39:40 am

It don't think this would be overly difficult to create. Maybe it could be made through some sort of modification to Blizz-ABSEAL. Of course, right now it bases it on the screen movement rather than character movement, so that would be one change that would have to be made.

Title: Re: Fog of War for Blizz ABS
Post by: Badlands on July 31, 2010, 11:00:45 am

Yes, that is what I'm trying to do, and all works great, except that I do not have any fog of war :(

Title: Re: Fog of War for Blizz ABS
Post by: Shalaren on August 01, 2010, 10:06:23 pm

oh man thats a really unique idea.. I could really use something like this too for my game.

Title: Re: Fog of War for Blizz ABS
Post by: G_G on August 01, 2010, 10:27:45 pm

It could be evented too :S Just saying. In fact I'll see what I can do tonight.

Title: Re: Fog of War for Blizz ABS
Post by: Badlands on August 02, 2010, 06:55:54 am

There are lots of events involved already with Blizz ABS, mainly enemys and allies. So events are not the best choice.. It would be great if someone can make a simple fow script for Blizz ABS, it will expand its possibilities even more..

This is a good simple example, but it works just for VX D:

Spoiler: Show

Title: Re: Fog of War for Blizz ABS
Post by: Blizzard on August 02, 2010, 07:08:52 am

I've seen RMXP Fog of War scripts a long time ago. Try googling.

Title: Re: Fog of War for Blizz ABS
Post by: Badlands on August 02, 2010, 07:18:38 am

Yeah I've seen them too, and they are laggy, they create a new instance of Tilemap class (Wachunga's one does not even work with the ABS).. So, your ABS + Laggy FoW = Crappy Gameplay.

Is it too difficult to script a simple one for your ABS, Blizzard?

Title: Re: Fog of War for Blizz ABS
Post by: SBR* on August 02, 2010, 07:22:44 am

Quote from: Badlands on August 02, 2010, 07:18:38 am
Yeah I've seen them too, and they are laggy, they create a new instance of Tilemap class (Wachunga's one does not even work with the ABS).. So, your ABS + Laggy FoW = Crappy Gameplay.

Is it too difficult to script a simple one for your ABS, Blizzard?

Lol, I keep on ROFL-ing when people ask Blizzard for new scripts :D.

Title: Re: Fog of War for Blizz ABS
Post by: Badlands on August 02, 2010, 07:54:36 am

omfg I'm not asking Blizzard to script it, I've asked if its difficult to script one for his ABS.

Title: Re: Fog of War for Blizz ABS
Post by: SBR* on August 02, 2010, 08:05:30 am

Quote from: Badlands on August 02, 2010, 07:54:36 am
omfg I'm not asking Blizzard to script it, I've asked if its difficult to script one for his ABS.

Lol, okay. But it sounded like you were asking him to do it :P.

Title: Re: Fog of War for Blizz ABS
Post by: Blizzard on August 02, 2010, 08:07:20 am

It shouldn't be much of a problem. The FOWs that I've seen work on a tileset basis like maps. Since Blizz-ABS doesn't actually do anything to maps in a visual way, they should work fine.

Title: Re: Fog of War for Blizz ABS
Post by: G_G on August 02, 2010, 10:31:37 am

Really all you need is to have a big black square to cover the screen. A transparent circle right in the center. Set 2 variables
Variable 1 = Player Screen X # Not x, screen x
Variable 2 = PLayer screen y # same as above
Show Picture: Big black square with circle # Set the origin to center

Put that in a parallel process and wa-la you have a fog of war.

Title: Re: Fog of War for Blizz ABS
Post by: Badlands on August 02, 2010, 07:35:11 pm

I cant use that, I've said that I'm scrolling the maps with the mouse, the pic stay with the main character, so I see its borders. That is not cool at all.

Title: Re: Fog of War for Blizz ABS
Post by: G_G on August 02, 2010, 08:15:21 pm

Then enter this in a script call.

$game_variables[id] = $mouse.x
$game_variables[id] = $mouse.y

Title: Re: Fog of War for Blizz ABS
Post by: Badlands on August 02, 2010, 10:10:05 pm

I think you're not getting the point of it, if I set the variables to the mouse's x and y pos it will move it with the screen, as the scroll of the map is by mouse, the idea is not to see the rest of the map if your character does not walk there.
Did you play Age of Empires? You cant scroll the map to see it if it is not explored by a unit, imagine the unit is the rpg character in this case.

Title: Re: Fog of War for Blizz ABS
Post by: Jek on August 02, 2010, 10:49:26 pm

1 way to script it (I can't script, so im not scripting it) is just to remember what tiles have been explored, and for each unexplored tile, it shows a picture over it. A blurred black circle to be specific.

Title: Re: Fog of War for Blizz ABS
Post by: G_G on August 03, 2010, 12:26:13 am

Well now that I know what she's talking about, I didnt quote understand what she meant, I could easily script this :3 If and when I'll do it? I dunno. I've got projects I'm working on.

Title: Re: Fog of War for Blizz ABS
Post by: Blizzard on August 03, 2010, 04:46:42 am

Why don't you try? It's not that hard.

Title: Re: Fog of War for Blizz ABS
Post by: Badlands on August 03, 2010, 07:09:56 am

Yes! I will be very grateful if you guys help me out with this one, it's been a pain for a month..

Quotewhat he meant

It is hard to be female in this world :(

Title: Re: Fog of War for Blizz ABS
Post by: G_G on August 03, 2010, 10:51:26 am

Sorry didn't notice. :( Also I started on it. The whole map gets covered by black. :o And right now theres only area around the player that is seeable. Still working on erasing parts teh player has explored. Though it shouldn't be too hard.

EDIT: Also read my last post.:)

Title: Re: Fog of War for Blizz ABS
Post by: Badlands on August 09, 2010, 11:15:26 am

I'm glad you're helping me.. How is this going?
Thanks for correcting that :D

Title: Re: Fog of War for Blizz ABS
Post by: G_G on August 09, 2010, 03:59:31 pm

Its about done actually haven't had much time to work on it.

Title: Re: Fog of War for Blizz ABS
Post by: Shalaren on August 12, 2010, 08:52:39 am

is this what you are looking for?

Spoiler: Show

=begin


  Fog of War System(FOW) V1.0 by Samo, the Thief

  Instructions:
  -------------
  
  1-Put this Script Above Main
  
  2- Add in Scene_Title the lines Between ADDED:
  
  $game_map.update
  #-----------ADDED------------------------
    $game_fog_of_war    = Game_Fog_Of_War.new
  #-----------ADDED------------------------
  
  3- The Same in Scene_Map the with this:
  
    @message_window.update
  #---------------------------------ADDED-------------
    if wait(20)
      $game_fog_of_war.update
      @spriteset.update_tilemap
    end  
    #---------------------------------ADDED-------------
    
  4- Go to your tilesets and put with counter 1 the tiles you don't want
  to be seen through, like walls or trees.
  
  5- Enjoy!
  
  Feautures:
  ----------
  -YOu can't see thorugh some tiles depending on where you are
  -The tiles you revealed and you are not seeing are semi-revealed
  -It is cool!
  
=end


class Game_Fog_Of_War
#--------------------------------------------------------------------
  attr_accessor :map_grid
  SIGHTNESS = 9
#--------------------------------------------------------------------
  def initialize
    @map_grid = {}
      for i in 1..$map_infos.size
        data = load_data(sprintf("Data/Map%03d.rxdata", i))
        @map_grid[i] = Array.new(data.width, 0)
        for j in 0..data.width
          @map_grid[i][j] = Array.new(data.height, 0)
        end
      end
      $map_grid_wall = Array.new($game_map.width, 0)
      for j in 0..$game_map.width
        $map_grid_wall[j] = Array.new($game_map.height, 0)
      end
      refresh_grid
      @last_fow = []
  end
#-------------------------------------------------------------------------
  def setup_map(map_id)
    data = load_data(sprintf("Data/Map%03d.rxdata", map_id))
    @map_grid[i] = Array.new(data.width, 0)
    for j in 0..data.width
      @map_grid[i][j] = Array.new(data.height, 0)
    end
  end
  #--------------------------------------
  def refresh_grid
    $map_grid_wall = Array.new($game_map.width, 0)
    for j in 0..$game_map.width
      $map_grid_wall[j] = Array.new($game_map.height, 0)
    end
    for i in 0..$game_map.width
      for j in 0..$game_map.height
        if $game_map.terrain_tag(i,j) == 1
          $map_grid_wall[i][j] = 1
        end
      end
    end
  end
#----------------------------------------------------------------------
  def update
    in_range_tiles
  end
  #-----------------------------------------------------
  def circle_of_view(x,y,sightness)
    coords = []
    fow = []
    fx1 = x + sightness
    fx2 = x - sightness
    fy1 = y + sightness
    fy2 = y - sightness
    coords += line(fx1,y,x,fy1)
    coords += line(x-1,fy1-1,fx2,y)
    coords += line(fx2+1,y-1,x,fy2)
    coords += line(x+1,fy2+1,fx1-1,y-1)
    for coord in coords
      fow = fow | line_fow(x,y,coord[0],coord[1]) #Weird Method je,je
    end
    for coord in fow
      if coord[0] < 0 or coord[0] > $game_map.width or coord[1] < 0 or coord[1] > $game_map.height
        next
      end
      @map_grid[$game_map.map_id][coord[0]][coord[1]] = 2
    end
    return fow
  end
#------------------------------------------------------------------------
  def in_range_tiles
    fow = circle_of_view($game_player.x,$game_player.y,SIGHTNESS)
    for coord in @last_fow
      x = coord[0]
      y = coord[1]
      if x < 0 or x > $game_map.width or y < 0 or y > $game_map.height
        next
      end  
      if @map_grid[$game_map.map_id][x][y] == 2
        if fow.include?([x,y]) == false
          @map_grid[$game_map.map_id][x][y] = 1
        end
      end
    end
    @last_fow = fow.clone
  end
#----------------------------------------------------------------------------  
end


class Spriteset_Map
  alias old_initialize initialize
  def initialize
    #=================
    old_initialize
    @viewport4 = Viewport.new(0, 0, 640, 480)
    @viewport4.z = 5004
    @fow_tilemap = Tilemap.new(@viewport4)
    @fow_tilemap.tileset = RPG::Cache.picture("FOW")
    @fow_tilemap.autotiles[0] = RPG::Cache.autotile("FOW0")
    data = Table.new($game_map.width, $game_map.height, 3)
    @fow_tilemap.map_data = data
    priorities = Table.new(424)
    # set to highest priority to ensure everything is covered
    for i in 0...424
    priorities[i] = 5
    end
    @fow_tilemap.priorities = priorities
     for x in 0...$game_map.width
        for y in 0...$game_map.height
          if $game_fog_of_war.map_grid[$game_map.map_id][x][y] == 0
            if @fow_tilemap.map_data[x,y,2] != 384
              @fow_tilemap.map_data[x,y,2] = 384
            end
          end
          if $game_fog_of_war.map_grid[$game_map.map_id][x][y] == 1
            if @fow_tilemap.map_data[x,y,2] != 385
              @fow_tilemap.map_data[x,y,2] = 385
            end
          end
          if $game_fog_of_war.map_grid[$game_map.map_id][x][y] == 2
            if @fow_tilemap.map_data[x,y,2] != 386
              @fow_tilemap.map_data[x,y,2] = 386
            end
          end
        end
      end
    #=================
    update
  end  
  alias old_dispose dispose
  def dispose
    old_dispose
    @fow_tilemap.tileset.dispose
    @fow_tilemap.autotiles[0].dispose
    @fow_tilemap.dispose
    @viewport4.dispose
  end
    #--------------------------------------------------------------------------
  def update_tilemap
  for x in 0...$game_map.width
    for y in 0...$game_map.height
      if $game_fog_of_war.map_grid[$game_map.map_id][x][y] == 0
        if @fow_tilemap.map_data[x,y,2] != 384
          @fow_tilemap.map_data[x,y,2] = 384
        end
      end
      if $game_fog_of_war.map_grid[$game_map.map_id][x][y] == 1
        if @fow_tilemap.map_data[x,y,2] != 385
      @fow_tilemap.map_data[x,y,2] = 385
      end
      end
      if $game_fog_of_war.map_grid[$game_map.map_id][x][y] == 2
        if @fow_tilemap.map_data[x,y,2] != 386
          @fow_tilemap.map_data[x,y,2] = 386
      end
      end
    end
  end
end
#---------------------------------------------------
  alias old_update update
  def update
    old_update
    @fow_tilemap.ox = $game_map.display_x / 4
    @fow_tilemap.oy = $game_map.display_y / 4
    @fow_tilemap.update
    @viewport4.update
  end
end

def wait(frames)
  if Graphics.frame_count % (frames) == 0
    return true
  end  
end



def line(a,b,c,d)
  coords = []
     u = c - a
     v = d - b
     d1x = sgn(u)
     d1y = sgn(v)
     d2x = sgn(u)
     d2y = 0
     m = ABS(u)
     n  = ABS(v)
     if not m > n
        d2x  = 0
        d2y  = sgn(v)
        m  = ABS(v)
        n  = ABS(u)
     end
     s  = m / 2
     for i in 0..m
          coords.push([a,b])
          s  = s + n
          if not (s<m)
               s = s - m
               a = a + d1x
               b = b + d1y
          else
              a = a + d2x
              b = b + d2y
          end
        end    
    return coords
  end
  #-------------------------------
def line_fow(a,b,c,d)
  coords = []
     u = c - a
     v = d - b
     d1x = sgn(u)
     d1y = sgn(v)
     d2x = sgn(u)
     d2y = 0
     m = ABS(u)
     n  = ABS(v)
     if not m > n
        d2x  = 0
        d2y  = sgn(v)
        m  = ABS(v)
        n  = ABS(u)
     end
     s  = m / 2
     for i in 0..m
          coords.push([a,b])
          if a >= 0 and a <= $game_map.width and b >= 0 and b <= $game_map.height
            break if $map_grid_wall[a][b] == 1
          end
          s  = s + n
          if not (s<m)
               s = s - m
               a = a + d1x
               coords.push([a,b])
               b = b + d1y
          else
              a = a + d2x
              coords.push([a,b])
              b = b + d2y
          end
        end    
    return coords
  end
def sgn(a)
  return sgn = +1 if a>0
  return sgn = -1 if a<0
  return sgn = 0 if a==0
end

def ABS(a)
  return a if a > 0
  return a * -1 if a < 0
  return 0
end  


#========================================
#Game_Map
#--------------------------------------------------------------------------
# Setting functions for the Map
#========================================
class Game_Map

def name
$map_infos[@map_id]
end
end

#========================================
#Window_Title
#--------------------------------------------------------------------------
# Setting functions for the Title
#========================================
class Scene_Title
$map_infos = load_data("Data/MapInfos.rxdata")
for key in $map_infos.keys
$map_infos[key] = $map_infos[key].name
end
end

1-Put this Script Above Main

2- Add in Scene_Title the lines Between ADDED:

$game_map.update
#-----------ADDED------------------------
$game_fog_of_war = Game_Fog_Of_War.new
#-----------ADDED------------------------

3- The Same in Scene_Map the with this:

@message_window.update
#---------------------------------ADDED-------------
if wait(20)
$game_fog_of_war.update
@spriteset.update_tilemap
end
#---------------------------------ADDED-------------

4- Go to your tilesets and put with counter 1 the tiles you don't want
to be seen through, like walls or trees.

Title: Re: Fog of War for Blizz ABS
Post by: Badlands on August 12, 2010, 10:00:17 am

Thanks but no, that is laggy and complex (at least not as laggy as wachunga's one), I do not want passability tiles or anything like that, I just want a simple, non laggy script to work exclusively for BlizzABS like the Berka's one I mentioned in my first post. Here it is

Spoiler: Show

I really trust game_guy this one, like my last hope :^_^':

Title: Re: Fog of War for Blizz ABS
Post by: G_G on August 12, 2010, 10:24:23 am

Sorry I've been busy, trying to finish it but :(

Chaos Project

RPG Maker => RPG Maker Scripts => Script Requests => Topic started by: Badlands on July 30, 2010, 10:32:32 pm