Pokémon Script Project Forum Index

Manuel | Search
 Information des admins 
Si vous désirez parler de PSP ou obtenir du soutient là dessus, merci d'aller faire un tour sur https://pokemonworkshop.com/forum/index.php Imbécile heureux

[Script] Anti-lag
Goto page: 1, 2  >
 
Post new topic   Reply to topic    Pokémon Script Project Forum Index -> Game Making -> Ressources techniques -> Scripts
Previous topic :: Next topic   
Author Message
naruto6660
Guest





PostPosted: Sun 25 May - 13:12 (2008)    Post subject: [Script] Anti-lag

Code:
#======================================
# â– 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
return false if object.real_x >= screne_width
return false if object.real_y <= screne_y
return false if object.real_y >= screne_height
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
return false if object.real_x >= screne_width
return false if object.real_y <= screne_y
return false if object.real_y >= screne_height
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





Voilà comme sa vous lager plus pour pokemon ^^ Bonne journée

Last edited by naruto6660 on Sun 25 May - 13:15 (2008); edited 1 time in total
Back to top
Publicité






PostPosted: Sun 25 May - 13:12 (2008)    Post subject: Publicité

PublicitéSupprimer les publicités ?
Back to top
Zelda
Ex-staff


Joined: 29 Apr 2008
Posts: 2,442
Localisation: Nantes (44)

PostPosted: Sun 25 May - 13:12 (2008)    Post subject: [Script] Anti-lag

Je vois pas de différence moi :/
Back to top
Visit poster’s website
naruto6660
Guest





PostPosted: Sun 25 May - 13:44 (2008)    Post subject: [Script] Anti-lag

si enfait si tu mais trop d'évenement sa ne te fait plus lager ^^
Back to top
Pio
Membre


Joined: 31 Mar 2008
Posts: 2,024
Localisation: France

PostPosted: Sun 25 May - 14:23 (2008)    Post subject: [Script] Anti-lag

ou le met ou cet event sur la map en question ?
Back to top
Dark'
Membre


Joined: 16 Feb 2008
Posts: 1,528
Localisation: Bangkok

PostPosted: Sun 25 May - 14:59 (2008)    Post subject: [Script] Anti-lag

C'est un script, cette fois...
Back to top
naruto6660
Guest





PostPosted: Sun 25 May - 15:23 (2008)    Post subject: [Script] Anti-lag

mais non se scipt tu le met en dessu de main et voilà ^^ xD comme sa imagine 29 evenement sa bug un peu... et bha grace a sa sa bug pas ^^

Last edited by naruto6660 on Sun 8 Jun - 20:32 (2008); edited 1 time in total
Back to top
Dark'
Membre


Joined: 16 Feb 2008
Posts: 1,528
Localisation: Bangkok

PostPosted: Sun 25 May - 15:41 (2008)    Post subject: [Script] Anti-lag

C'est cool. Surtout pour la map !
Back to top
<€d>
Membre


Joined: 19 Apr 2008
Posts: 707

PostPosted: Sun 25 May - 16:35 (2008)    Post subject: [Script] Anti-lag

C'est cool 8)
Back to top
Droledami
Membre


Joined: 30 Jan 2008
Posts: 1,917
millions de chinois...
Localisation: Abominablegique
ID Steam: Droledami

PostPosted: Sun 25 May - 21:06 (2008)    Post subject: [Script] Anti-lag

Il marche bien...déja testé jadis...
Back to top
Skype Facebook
Coolman59
Guest





PostPosted: Sun 25 May - 23:52 (2008)    Post subject: [Script] Anti-lag

Ceci est très utile pour les gros projets. Je teste. !
Back to top
naruto6660
Guest





PostPosted: Mon 26 May - 06:45 (2008)    Post subject: [Script] Anti-lag

oui au moin moi je bug plus ^^ et vous?
Back to top
<€d>
Membre


Joined: 19 Apr 2008
Posts: 707

PostPosted: Mon 26 May - 07:06 (2008)    Post subject: [Script] Anti-lag

Pareil
Back to top
Pio
Membre


Joined: 31 Mar 2008
Posts: 2,024
Localisation: France

PostPosted: Mon 26 May - 11:38 (2008)    Post subject: [Script] Anti-lag

naruto6660 wrote:
masi non se scipt tu le met en dessu de main et voilà


main ? Dsl je suis nul mais a force j'y arriverais ^^'
Back to top
Dark'
Membre


Joined: 16 Feb 2008
Posts: 1,528
Localisation: Bangkok

PostPosted: Mon 26 May - 13:37 (2008)    Post subject: [Script] Anti-lag

Donc, a coté de la BDD (tu vois l'icone pour y aller ? Car moi par exemple j'ai prit du temps, habitué à appuyé sur F9...) il y a un autre icone "Editeur de Script", aussi accessible par la touche F11. Et là, tu as tout les scripts du jeu. Le dernier s'appelle Main, tu place ce script au dessus (clique droit, "nouveau Script" ). Voilà ! Si tu veux des screens, si tu n'y arrive pas, je suis à ta disposition !
Back to top
Pio
Membre


Joined: 31 Mar 2008
Posts: 2,024
Localisation: France

PostPosted: Mon 26 May - 15:29 (2008)    Post subject: [Script] Anti-lag

Oké merci beaucoup darkange ^^
Back to top
Display posts from previous:   
Post new topic   Reply to topic    Pokémon Script Project Forum Index -> Game Making -> Ressources techniques -> Scripts All times are GMT + 1 Hour
Goto page: 1, 2  >
Page 1 of 2

 
Jump to:  

Index | Free forum | Free support forum | Free forums directory | Report a violation | Cookies | Charte | Conditions générales d'utilisation
Powered by phpBB © 2001, 2005 phpBB Group
Thème par Thomas et l'équipe de la refonte PSP 2012 (version 1.0)