双远景和完整鼠标系统一起使用游戏有卡顿现象

紫英晓狼1130 · 发表于 2013-8-9 04:32:08

加入我们，或者，欢迎回来。

您需要登录才可以下载或查看，没有帐号？注册会员

x

双远景脚本和完整鼠标系统（四方向）用在一起有卡的现象
看以前的老帖说把双远景放在鼠标的上面就可以了
但是尝试过没有用处，还是卡
这个问题该怎样解决？

猪头三~ · 发表于 2013-8-9 12:38:57

RUBY 代码复制

#======================================
# ■ Anti Event Lag Script
#======================================
# 　By: Near Fantastica
#   Date: 12.06.05
#   Version: 3
#======================================
#======================================
# ■ Game_Map
#======================================
 
class Game_Map
#--------------------------------------------------------------------------
def in_range?(object)
screne_x = $game_map.display_x
screne_x -= 256
screne_y = $game_map.display_y
screne_y -= 256
screne_width = $game_map.display_x
screne_width += 2816
screne_height = $game_map.display_y
screne_height += 2176
return false if object.real_x <= screne_x - 128
return false if object.real_x >= screne_width + 128
return false if object.real_y <= screne_y - 128
return false if object.real_y >= screne_height + 128
return true
end
#--------------------------------------------------------------------------
def update
if $game_map.need_refresh
  refresh
end
if @scroll_rest > 0
  distance = 2 ** @scroll_speed
  case @scroll_direction
  when 2
    scroll_down(distance)
  when 4
    scroll_left(distance)
  when 6  
    scroll_right(distance)
  when 8  
    scroll_up(distance)
  end
  @scroll_rest -= distance
end
for event in @events.values
  if in_range?(event) or event.trigger == 3 or event.trigger == 4
    event.update
  end
end
for common_event in @common_events.values
  common_event.update
end
@fog_ox -= @fog_sx / 8.0
@fog_oy -= @fog_sy / 8.0
if @fog_tone_duration >= 1
  d = @fog_tone_duration
  target = @fog_tone_target
  @fog_tone.red = (@fog_tone.red * (d - 1) + target.red) / d
  @fog_tone.green = (@fog_tone.green * (d - 1) + target.green) / d
  @fog_tone.blue = (@fog_tone.blue * (d - 1) + target.blue) / d
  @fog_tone.gray = (@fog_tone.gray * (d - 1) + target.gray) / d
  @fog_tone_duration -= 1
end
if @fog_opacity_duration >= 1
  d = @fog_opacity_duration
  @fog_opacity = (@fog_opacity * (d - 1) + @fog_opacity_target) / d
  @fog_opacity_duration -= 1
end
end
end
 
#======================================
# ■ Spriteset_Map
#======================================
 
class Spriteset_Map
#--------------------------------------------------------------------------
def in_range?(object)
screne_x = $game_map.display_x
screne_x -= 256
screne_y = $game_map.display_y
screne_y -= 256
screne_width = $game_map.display_x
screne_width += 2816
screne_height = $game_map.display_y
screne_height += 2176
return false if object.real_x <= screne_x - 128
return false if object.real_x >= screne_width + 128
return false if object.real_y <= screne_y - 128
return false if object.real_y >= screne_height + 128
return true
end
#--------------------------------------------------------------------------
def update
if @panorama_name != $game_map.panorama_name or
   @panorama_hue != $game_map.panorama_hue
  @panorama_name = $game_map.panorama_name
  @panorama_hue = $game_map.panorama_hue
  if @panorama.bitmap != nil
    @panorama.bitmap.dispose
    @panorama.bitmap = nil
  end
  if @panorama_name != ""
    @panorama.bitmap = RPG::Cache.panorama(@panorama_name, @panorama_hue)
  end
  Graphics.frame_reset
end
if @fog_name != $game_map.fog_name or @fog_hue != $game_map.fog_hue
  @fog_name = $game_map.fog_name
  @fog_hue = $game_map.fog_hue
  if @fog.bitmap != nil
    @fog.bitmap.dispose
    @fog.bitmap = nil
  end
  if @fog_name != ""
    @fog.bitmap = RPG::Cache.fog(@fog_name, @fog_hue)
  end
  Graphics.frame_reset
end
@tilemap.ox = $game_map.display_x / 4
@tilemap.oy = $game_map.display_y / 4
@tilemap.update
@panorama.ox = $game_map.display_x / 8
@panorama.oy = $game_map.display_y / 8
@fog.zoom_x = $game_map.fog_zoom / 100.0
@fog.zoom_y = $game_map.fog_zoom / 100.0
@fog.opacity = $game_map.fog_opacity
@fog.blend_type = $game_map.fog_blend_type
@fog.ox = $game_map.display_x / 4 + $game_map.fog_ox
@fog.oy = $game_map.display_y / 4 + $game_map.fog_oy
@fog.tone = $game_map.fog_tone
i=0
for sprite in @character_sprites
  if sprite.character.is_a?(Game_Event)
    if in_range?(sprite.character) or sprite.character.trigger == 3 or sprite.character.trigger == 4
      sprite.update
      i+=1
    end
  else
    sprite.update
    i+=1
  end
end
#p i
@weather.type = $game_screen.weather_type
@weather.max = $game_screen.weather_max
@weather.ox = $game_map.display_x / 4
@weather.oy = $game_map.display_y / 4
@weather.update
for sprite in @picture_sprites
  sprite.update
end
@timer_sprite.update
@viewport1.tone = $game_screen.tone
@viewport1.ox = $game_screen.shake
@viewport3.color = $game_screen.flash_color
@viewport1.update
@viewport3.update
end
end

#======================================


# ■ Anti Event Lag Script


#======================================


# 　By: Near Fantastica


#   Date: 12.06.05


#   Version: 3


#======================================


#======================================


# ■ Game_Map


#======================================


 


class Game_Map


#--------------------------------------------------------------------------


def in_range?(object)


screne_x = $game_map.display_x


screne_x -= 256


screne_y = $game_map.display_y


screne_y -= 256


screne_width = $game_map.display_x


screne_width += 2816


screne_height = $game_map.display_y


screne_height += 2176


return false if object.real_x <= screne_x - 128


return false if object.real_x >= screne_width + 128


return false if object.real_y <= screne_y - 128


return false if object.real_y >= screne_height + 128


return true


end


#--------------------------------------------------------------------------


def update


if $game_map.need_refresh


  refresh


end


if @scroll_rest > 0


  distance = 2 ** @scroll_speed


  case @scroll_direction


  when 2


    scroll_down(distance)


  when 4


    scroll_left(distance)


  when 6  


    scroll_right(distance)


  when 8  


    scroll_up(distance)


  end


  @scroll_rest -= distance


end


for event in @events.values


  if in_range?(event) or event.trigger == 3 or event.trigger == 4


    event.update


  end


end


for common_event in @common_events.values


  common_event.update


end


@fog_ox -= @fog_sx / 8.0


@fog_oy -= @fog_sy / 8.0


if @fog_tone_duration >= 1


  d = @fog_tone_duration


  target = @fog_tone_target


  @fog_tone.red = (@fog_tone.red * (d - 1) + target.red) / d


  @fog_tone.green = (@fog_tone.green * (d - 1) + target.green) / d


  @fog_tone.blue = (@fog_tone.blue * (d - 1) + target.blue) / d


  @fog_tone.gray = (@fog_tone.gray * (d - 1) + target.gray) / d


  @fog_tone_duration -= 1


end


if @fog_opacity_duration >= 1


  d = @fog_opacity_duration


  @fog_opacity = (@fog_opacity * (d - 1) + @fog_opacity_target) / d


  @fog_opacity_duration -= 1


end


end


end


 


#======================================


# ■ Spriteset_Map


#======================================


 


class Spriteset_Map


#--------------------------------------------------------------------------


def in_range?(object)


screne_x = $game_map.display_x


screne_x -= 256


screne_y = $game_map.display_y


screne_y -= 256


screne_width = $game_map.display_x


screne_width += 2816


screne_height = $game_map.display_y


screne_height += 2176


return false if object.real_x <= screne_x - 128


return false if object.real_x >= screne_width + 128


return false if object.real_y <= screne_y - 128


return false if object.real_y >= screne_height + 128


return true


end


#--------------------------------------------------------------------------


def update


if @panorama_name != $game_map.panorama_name or


   @panorama_hue != $game_map.panorama_hue


  @panorama_name = $game_map.panorama_name


  @panorama_hue = $game_map.panorama_hue


  if @panorama.bitmap != nil


    @panorama.bitmap.dispose


    @panorama.bitmap = nil


  end


  if @panorama_name != ""


    @panorama.bitmap = RPG::Cache.panorama(@panorama_name, @panorama_hue)


  end


  Graphics.frame_reset


end


if @fog_name != $game_map.fog_name or @fog_hue != $game_map.fog_hue


  @fog_name = $game_map.fog_name


  @fog_hue = $game_map.fog_hue


  if @fog.bitmap != nil


    @fog.bitmap.dispose


    @fog.bitmap = nil


  end


  if @fog_name != ""


    @fog.bitmap = RPG::Cache.fog(@fog_name, @fog_hue)


  end


  Graphics.frame_reset


end


@tilemap.ox = $game_map.display_x / 4


@tilemap.oy = $game_map.display_y / 4


@tilemap.update


@panorama.ox = $game_map.display_x / 8


@panorama.oy = $game_map.display_y / 8


@fog.zoom_x = $game_map.fog_zoom / 100.0


@fog.zoom_y = $game_map.fog_zoom / 100.0


@fog.opacity = $game_map.fog_opacity


@fog.blend_type = $game_map.fog_blend_type


@fog.ox = $game_map.display_x / 4 + $game_map.fog_ox


@fog.oy = $game_map.display_y / 4 + $game_map.fog_oy


@fog.tone = $game_map.fog_tone


i=0


for sprite in @character_sprites


  if sprite.character.is_a?(Game_Event)


    if in_range?(sprite.character) or sprite.character.trigger == 3 or sprite.character.trigger == 4


      sprite.update


      i+=1


    end


  else


    sprite.update


    i+=1


  end


end


#p i


@weather.type = $game_screen.weather_type


@weather.max = $game_screen.weather_max


@weather.ox = $game_map.display_x / 4


@weather.oy = $game_map.display_y / 4


@weather.update


for sprite in @picture_sprites


  sprite.update


end


@timer_sprite.update


@viewport1.tone = $game_screen.tone


@viewport1.ox = $game_screen.shake


@viewport3.color = $game_screen.flash_color


@viewport1.update


@viewport3.update


end


end

FPS傲娇了

紫英晓狼1130 · 发表于 2013-8-11 12:36:28

应该可以自顶吧...

弗雷德 · 发表于 2013-8-11 12:42:00

之所以一直没有来处理这个问题，是因为俺没接触过双远景……

紫英晓狼1130 · 发表于 2013-8-11 13:27:45

本帖最后由紫英晓狼1130 于 2013-8-11 13:39 编辑

弗雷德发表于 2013-8-11 12:42
之所以一直没有来处理这个问题，是因为俺没接触过双远景……

熊叔看看吧，里面有说明的，更新了

范例.zip (402.32 KB, 下载次数: 32)

弗雷德 · 发表于 2013-8-11 15:08:30

小狼换个四方向寻路脚本，这个脚本有问题，就算不用双远景也一样卡。

紫英晓狼1130 · 发表于 2013-8-12 12:58:11

我服这个寻路了，自己改成四方向的还是卡...

帐号		自动登录	找回密码
密码			注册会员

[已经过期] 双远景和完整鼠标系统一起使用游戏有卡顿现象

加入我们，或者，欢迎回来。

点评

点评

点评

点评

评分

点评

贵宾