UltimaForum :: Zobacz temat

Ogłoszenie

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

Administracja Forum

Spoiler:

Kod:

#========================================================================
# Zdarzenia chodzÄce po wodzie
# by Ayene
# 21.03.2010
# www.ultimateam.pl
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# Skrypt umoĹźliwia przede wszystkim poruszanie siÄ zdarzeĹ po wodzie.
# Wpierw krĂłtkie wyjaĹnienie:
# DomyĹlnie ĹĂłdka (boat) porusza siÄ po wodzie pĹytkiej (jaĹniejsza niebieska),
# statek (ship) pĹywa po wodzie gĹÄbokiej i pĹytkiej, a zepelin (airship) porusza siÄ
# wszÄdzie (nie moĹźe tylko lÄdowaÄ na wodzie).
#
# Ustawianie chodzenia po wodzie zdarzeniom odbywa siÄ zgodnie z powyĹźszÄ zasadÄ.
# WpisujÄc komentarz w zdarzeniu:
# \boat - zdarzenie bÄdzie siÄ poruszaÄ jak ĹĂłdka
# \ship - analogicznie do statku
# \air - bÄdzie chodziÄ po wszystkim
# \fish - zdarzenie - ryba, porusza siÄ po kaĹźdej wodzie.
#
# Komentarz jest pobierany z aktualnej strony zdarzenia.
#
# Skrypt umoĹźliwia rĂłwnieĹź chodzenie po wodzie druĹźynie. Wystarczy wĹÄczyÄ
# przeĹÄcznik zadeklarowany poniĹźej.
#========================================================================
# Instalacja: Wystarczy umieĹciÄ nad Main
#========================================================================
module Ayene
UM_SWITCH = 20 # przeĹÄcznik, ktĂłry umoĹźliwia chodzenie druĹźynie po wodzie
end

#========================================================================
class Game_Map
def airship_passable?(x, y)
return passable?(x, y, 0x10)
end

def player_passable?(x, y)
if $game_switches[Ayene::UM_SWITCH]
return passable?(x, y, 0x10)
else
return passable?(x, y)
end
end
end

#========================================================================
class Game_Character

alias ayene_wat_pas_gamchar_pas? passable?

def passable?(*args)
return false if collide_with_characters?(*args) unless (@through or debug_through?)
return $game_map.airship_passable?(*args) if @airship_object
return $game_map.ship_passable?(*args) if @ship_object
return $game_map.boat_passable?(*args) if @boat_object
return $game_map.ship_passable?(*args) if @fish_object
ayene_wat_pas_gamchar_pas?(*args)
end
alias ayene_wat_pas_gamchar_upbude update_bush_depth

def update_bush_depth
ayene_wat_pas_gamchar_upbude
if @fish_object
@bush_depth = 32
end
end
end

#========================================================================
class Game_Event < Game_Character
alias ayene_wat_pas_gameve_init initialize
alias ayene_wat_pas_gameve_setup setup

def initialize(*args)
@boat_object = false
@ship_object = false
@airship_object = false
@fish_object = false
ayene_wat_pas_gameve_init(*args)
end

def setup(new_page)
@page = new_page
if @page != nil
if @page.list[0].code == 108
@boat_object = @page.list[0].parameters[0][/\\BOAT/i] != nil
@ship_object = @page.list[0].parameters[0][/\\SHIP/i] != nil
@airship_object = @page.list[0].parameters[0][/\\AIR/i] != nil
@fish_object = @page.list[0].parameters[0][/\\FISH/i] != nil
end
end
ayene_wat_pas_gameve_setup(new_page)
end
end

#========================================================================
class Game_Player < Game_Character
def map_passable?(*args)
case @vehicle_type
when 0
return $game_map.boat_passable?(*args)
when 1
return $game_map.ship_passable?(*args)
when 2
return true
else
return $game_map.player_passable?(*args)
end
end
end