Twierdza RPG Maker

	Informacje \|\| Problemy z RPGVX \|\| Zgłoś nowe materiały
	RPG Maker :: RPG Maker VX
Gąsieniczka (Caterpillar system)

System gąsieniczki jest systemem dość znanym i spotykanym motywem w grach RPG, w szczególności tych starszych. Chodzi o to, że drużyna podąża za bohaterem. Jest to o tyle dobry skrypcik, gdyż wystarczy przekopiować i wkleić nad main nowy moduł (klawisz INSERT), nazwać go np. Gąsieniczka, a następnie wkleić poniższy skrypt.
#========================================
# RPGVX Caterpillar System
# Autor: Diedrupo
# Tłumaczenie: Reptile (reptile@o2.pl)
#========================================
# turn_enabled : a flag permits direction change on that spot
# Ustawienie umożliwiające zmianę kierunku 
#-------------------------------------------------------------
def move_down(turn_enabled = true)
super(turn_enabled)
end
#-------------------------------------------------------------
# * Move Left
# turn_enabled : a flag permits direction change on that spot
# * Ruch w lewo
# Ustawienie umożliwiające zmianę kierunku
#-------------------------------------------------------------
def move_left(turn_enabled = true)
super(turn_enabled)
end
#-------------------------------------------------------------
# * Move Right
# turn_enabled : a flag permits direction change on that spot
# * Ruch w prawo
# Ustawienie umożliwiające zmianę kierunku
#-------------------------------------------------------------
def move_right(turn_enabled = true)
super(turn_enabled)
end
#-------------------------------------------------------------
# * Move up
# turn_enabled : a flag permits direction change on that spot
# * Ruch w górę
# Ustawienie umożliwiające zmianę kierunku
#-------------------------------------------------------------
def move_up(turn_enabled = true)
super(turn_enabled)
end
#-------------------------------------------------------------
# * Move Lower Left / Krok w lewo
#-------------------------------------------------------------
def move_lower_left
super
end
#-------------------------------------------------------------
# * Move Lower Right / Krok w prawo
#-------------------------------------------------------------
def move_lower_right
super
end
#-------------------------------------------------------------
# * Move Upper Left / Krok góra-lewo
#-------------------------------------------------------------
def move_upper_left
super
end
#-------------------------------------------------------------
# * Move Upper Right / Krok góra-prawo
#-------------------------------------------------------------
def move_upper_right
super
end

class Game_Follower < Game_Character
#-------------------------------------------------------------
# * Public Instance Variables / Określenie zmiennych
#-------------------------------------------------------------
attr_reader :actor
attr_accessor :move_speed
#-------------------------------------------------------------
# * Object Initialization / Określenie obiektu
#-------------------------------------------------------------
def initialize(actor)
super()
@through = true
@actor = actor
end
#-------------------------------------------------------------
# * Set Actor / Ustaw bohatera
#-------------------------------------------------------------
def actor=(actor)
@actor = actor
setup
end
#-------------------------------------------------------------
# * Setup / Ustawienie
#-------------------------------------------------------------
def setup
if @actor != nil
@character_name = $game_actors[@actor].character_name
@character_index = $game_actors[@actor].character_index
else
@character_name = ""
@character_index = 0
end
@opacity = 255
@blend_type = 0
@priority_type = 0
end

#-------------------------------------------------------------
# * Screen Z / Ekran Z
#-------------------------------------------------------------
def screen_z
if $game_player.x == @x and $game_player.y == @y
return $game_player.screen_z - 1
end
super
end
#-------------------------------------------------------------
# * Same Position Starting Determinant (Disabled)
# * Ta sama pozycja startowa (wyłączone)
#-------------------------------------------------------------
def check_event_trigger_here(triggers)
result = false
return result
end
#-------------------------------------------------------------
# * Front Event Starting Determinant (Disabled)
# * Przednia pozycja startowa (wyłączone) 
#-------------------------------------------------------------
def check_event_trigger_there(triggers)
result = false
return result
end
#-------------------------------------------------------------
# * Touch Event Starting Determinant (Disabled)
# * Uruchomienie zdarzenia na dotknięcie (wyłączone)
#-------------------------------------------------------------
def check_event_trigger_touch(x, y)
result = false
return result
end
end

class Spriteset_Map
alias_method :spriteset_map_create_characters, :create_characters
def create_characters
spriteset_map_create_characters
$game_party.followers.each do |char|
@character_sprites << Sprite_Character.new(@viewport1, char)
end
end
end

class Game_Party
#-------------------------------------------------------------
# * Constants / Stałe ustawienia
#-------------------------------------------------------------
MAX_SIZE = 8
CATERPILLAR = 2
#-------------------------------------------------------------
# * Public Instance Variables / Publiczne zmienne
#-------------------------------------------------------------
attr_reader :followers
#-------------------------------------------------------------
# * Object Initialization / Określenie obiektu
#-------------------------------------------------------------
alias_method :trick_caterpillar_party_initialize, :initialize
def initialize
trick_caterpillar_party_initialize
@followers = Array.new(MAX_SIZE - 1) {Game_Follower.new(nil)}
@move_list = []
end
#-------------------------------------------------------------
# * Update Followers / Odświeżenie podążających
#-------------------------------------------------------------
def update_followers
flag = $game_player.transparent || $game_switches[CATERPILLAR]
@followers.each_with_index do |char, i|
char.actor = @actors[i + 1]
char.move_speed = $game_player.move_speed
if $game_player.dash?
char.move_speed += 1
end
char.update
char.transparent = flag
end
end
#-------------------------------------------------------------
# * Move To Party / Idź do drużyny
#-------------------------------------------------------------
def moveto_party(x, y)
@followers.each {|char| char.moveto(x, y)}
@move_list.clear
end
#-------------------------------------------------------------
# * Move Party / Ruszaj drużyną
#-------------------------------------------------------------
def move_party
@move_list.each_index do |i|
if @followers[i] == nil
@move_list[i...@move_list.size] = nil
next
end
case @move_list[i].type
when 2
@followers[i].move_down(*@move_list[i].args)
when 4
@followers[i].move_left(*@move_list[i].args)
when 6
@followers[i].move_right(*@move_list[i].args)
when 8
@followers[i].move_up(*@move_list[i].args)
when 1
@followers[i].move_lower_left
when 3
@followers[i].move_lower_right
when 7
@followers[i].move_upper_left
when 9
@followers[i].move_upper_right
when 5
@followers[i].jump(*@move_list[i].args)
end
end
end
#-------------------------------------------------------------
# * Add Move List / Dodaj ruch
#-------------------------------------------------------------
def update_move(type, *args)
move_party
@move_list.unshift(Game_MoveListElement.new(type, args))
end
end

class Game_MoveListElement
#-------------------------------------------------------------
# * Object Initialization / Ustawienie obiektu
#-------------------------------------------------------------
def initialize(type, args)
@type = type
@args = args
end
#-------------------------------------------------------------
# * Type / typ
#-------------------------------------------------------------
def type
return @type
end
#-------------------------------------------------------------
# * Args / kij wie \_(((_.)_/
#-------------------------------------------------------------
def args
return @args
end
end

class Game_Player
#-------------------------------------------------------------
# * Public Instance Variables / Publiczne zmienne
#-------------------------------------------------------------
attr_reader :move_speed

#-------------------------------------------------------------
# * Update / Aktualizacja
#-------------------------------------------------------------
alias_method :trick_caterpillar_player_update, :update
def update
$game_party.update_followers
trick_caterpillar_player_update
end
#-------------------------------------------------------------
# * Moveto / Ruszaj do...
#-------------------------------------------------------------
alias_method :trick_caterpillar_player_moveto, :moveto
def moveto(x, y)
$game_party.moveto_party(x, y)
trick_caterpillar_player_moveto(x, y)
end
#-------------------------------------------------------------
# * Move Down / Ruch w gół
#-------------------------------------------------------------
alias_method :trick_caterpillar_player_move_down, :move_down
def move_down(turn_enabled = true)
if passable?(@x, @y+1)
$game_party.update_move(2, turn_enabled)
end
trick_caterpillar_player_move_down(turn_enabled)
end
#-------------------------------------------------------------
# * Move Left / Ruch w lewo
#-------------------------------------------------------------
alias_method :trick_caterpillar_player_move_left, :move_left
def move_left(turn_enabled = true)
if passable?(@x-1, @y)
$game_party.update_move(4, turn_enabled)
end
trick_caterpillar_player_move_left(turn_enabled)
end
#-------------------------------------------------------------
# * Move Right / Ruch w prawo
#-------------------------------------------------------------
alias_method :trick_caterpillar_player_move_right, :move_right
def move_right(turn_enabled = true)
if passable?(@x+1, @y)
$game_party.update_move(6, turn_enabled)
end
trick_caterpillar_player_move_right(turn_enabled)
end
#-------------------------------------------------------------
# * Move Up / Ruch w górę
#-------------------------------------------------------------
alias_method :trick_caterpillar_player_move_up, :move_up
def move_up(turn_enabled = true)
if passable?(@x, @y-1)
$game_party.update_move(8, turn_enabled)
end
trick_caterpillar_player_move_up(turn_enabled)
end
#-------------------------------------------------------------
# * Move Lower Left / Ruch lewo niższe
#-------------------------------------------------------------
alias_method :trick_caterpillar_player_move_lower_left, :move_lower_left
def move_lower_left
if passable?(@x - 1, @y) and passable?(@x, @y + 1)
$game_party.update_move(1)
end
trick_caterpillar_player_move_lower_left
end
#-------------------------------------------------------------
# * Move Lower Right / Ruch prawo niższe
#-------------------------------------------------------------
alias_method :trick_caterpillar_player_move_lower_right, :move_lower_right
def move_lower_right
if passable?(@x + 1, @y) and passable?(@x, @y + 1)
$game_party.update_move(3)
end
trick_caterpillar_player_move_lower_right
end
#-------------------------------------------------------------
# * Move Upper Left / Ruch lewo wyższe
#-------------------------------------------------------------
alias_method :trick_caterpillar_player_move_upper_left, :move_upper_left
def move_upper_left
if passable?(@x - 1, @y) and passable?(@x, @y - 1)
$game_party.update_move(7)
end
trick_caterpillar_player_move_upper_left
end
#-------------------------------------------------------------
# * Move Upper Right / Ruch prawo wyższe
#-------------------------------------------------------------
alias_method :trick_caterpillar_player_move_upper_right, :move_upper_right
def move_upper_right
if passable?(@x + 1, @y) and passable?(@x, @y - 1)
$game_party.update_move(9)
end
trick_caterpillar_player_move_upper_right
end
#--------------------------------------------------------------
# * Jump / Skok
#--------------------------------------------------------------
alias_method :trick_caterpillar_player_jump, :jump
def jump(x_plus, y_plus)
new_x = @x + x_plus
new_y = @y + y_plus
if (x_plus == 0 and y_plus == 0) or passable?(new_x, new_y)
$game_party.update_move(5, x_plus, y_plus)
end
trick_caterpillar_player_jump(x_plus, y_plus)
end
end
#==========================================
# Koniec
#==========================================
Gdzie byłem w stanie, to wstawiłem jakieś komentarze, które poinformują co poniżej się dzieje, jednak dla większości osób to bez znaczenia. Wystarczy skrypt wkleić i już jest gotowy do użycia.

Taka drobna uwaga jedynie na formę estetyczną; by wszystko ładnie wyglądało, to zalecam wykonać ruch zdarzenia do bohater,a a następnie ustawić się w odpowiednim miejscu. Albo ściemnić ekran, tak by nic nie było widać, dodać bohatera i przywrócić ekran.

Skrypt po prostu tak o nagle wrzuca nową postać obok bohatera, ale podejrzewam, że dacie sobie z tym radę.
Autor: Diedrupo
Tekst: Reptile
Email: reptile@o2.pl