Ogłoszenie 

Uwaga! To forum jest w trybie offline.
Wszelką pomoc uzyskasz pod adresem
forum.ultimateam.pl


Administracja Forum


Poprzedni temat «» Następny temat
Anti Lag
Autor Wiadomość
RtaMag2 




Preferowany:
RPG Maker XP

Dołączył: 11 Lut 2010
Posty: 137
Skąd: Piechy
Wysłany: Sro 10 Mar, 2010 22:56
Anti Lag
Siema to ja RtaMag2 to nie jest coś tam z twierdzy czy coś ww tym stylu. Ale dobra zaczynamy yyy no wiec ten skrypt polega na tym że są mniejsze lagi(czyli blokowanie się) np. na dużych mapkach więc trzeba to nazwać jakoś i no nad main wkleić yyy noto koniec już :papa: dzięki temu nie będzie aż takich bloków w grze 8-)

Spoiler:

Kod:
#======================================
# ■ 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-32
return false if object.real_x >= screne_width+32
return false if object.real_y <= screne_y-32
return false if object.real_y >= screne_height+32
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

#======================================
# &#9632; 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

________________________

 
 
 
Firestorm109 



Dołączyła: 28 Lut 2010
Posty: 66
Skąd: Polska a jak :D
Wysłany: Czw 11 Mar, 2010 11:24
...Nie dodałeś ze po tym jak się ma słaby komputer może się spalić
 
 
 
RtaMag2 




Preferowany:
RPG Maker XP

Dołączył: 11 Lut 2010
Posty: 137
Skąd: Piechy
Wysłany: Czw 11 Mar, 2010 15:02
Sorka zapomniałem aż tak nie wiedziałem :-|
________________________

Ostatnio zmieniony przez pw115 Czw 11 Mar, 2010 17:10, w całości zmieniany 1 raz  
 
 
 
Melvin 




Preferowany:
RPG Maker XP

Ranga RM:
1 gra

Pomógł: 35 razy
Dołączył: 23 Paź 2009
Posty: 1063
Wysłany: Sob 03 Kwi, 2010 10:17
Firestorm109 napisał/a:
jak się ma słaby komputer może się spalić

CO!?
Głupota...

Anti-Lag zwiększa w małym stopniu priorytet używany przez grę...
________________________
MelvinClass:
Spoiler:

 
 
mlynarz 




Preferowany:
RPG Maker XP

Dołączył: 16 Sty 2011
Posty: 44
Skąd: W RPGMAKER XP :]
Wysłany: Nie 21 Sie, 2011 12:38
Mólby ktoś napisac skrypt na zmiejszanie lagów jak jest np 20 moobow na mapce bo wtedy laguje sie odrobinke ale nie zaszkodzi chyba. ... skryp taki :D
________________________
Aktualny projekt: AlkadiA - Gra Online

Wiencej info na PW :)
 
 
 
Risaoko 




Preferowany:
RPG Maker XP

Dołączyła: 04 Lut 2013
Posty: 8
Skąd: Rybnik
Wysłany: Pon 04 Lut, 2013 22:20
Interesujący, może się przydać. ^^
 
 
 
spartanPAGE 




Pomógł: 12 razy
Dołączył: 07 Gru 2011
Posty: 103
Skąd: Hellada
Wysłany: Pon 04 Lut, 2013 22:37
Młynarz, a jakim cudem ma ci to zrobić? MAGIĄ? Tutaj to tylko asembler pomoże (raczej nie ma takiej możliwości w języku skryptowym).
________________________


Programowanie jest moją pasją. Programuję w C, C++, C#, Javie i Delphi. Jeśli czegoś porzebujesz (związanego z tymi językami), śmiało możesz pisać na PW.
 
 
Wyświetl posty z ostatnich:   
Odpowiedz do tematu
Nie możesz pisać nowych tematów
Nie możesz odpowiadać w tematach
Nie możesz zmieniać swoich postów
Nie możesz usuwać swoich postów
Nie możesz głosować w ankietach
Nie możesz załączać plików na tym forum
Możesz ściągać załączniki na tym forum
Dodaj temat do Ulubionych
Wersja do druku

Skocz do:  

Powered by phpBB modified by Przemo © 2003 phpBB Group | Template Klam by Ayene