Twierdza RPG Maker

	Informacje \|\| Problemy z RPGVX \|\| Zgłoś nowe materiały
	RPG Maker :: RPG Maker VX

Sklep Umiejętności

<< Po Lewej stronie sklep z umiejętnościami dla jednej postaci >> Po Prawej sklep z umiejętnościami dla całej drużyny.

Wstęp
Skrypt umożliwia, zakup konkretnych umiejętności dla Bohaterów. Umiejętności są podzielone na dwie kategorie:

[1] Umiejętności, które można kupić pojedynczo dla bohaterów
[2] Umiejętności, które można kupić dla całej drużyny

Ponadto, skrypt daje możliwość ustawienia blokady zakupu umiejętności dla poszczególnuch bohatrów.
np. [Bohater nr.1] może kupić [umiejętność nr.1] i [umiejętność nr.3]
a [Bohater nr.2] może tylko kupić [umiejętność nr.3].

Sklep umiejętności jest wywoływany za pomocą polecenia zdarzenia Wywołaj Skrypt. W którym możemy edytować umiejętności, dostepne w sklepie.

Instalacja
1. Skrypt należy wkleić pod Materials -> dalej pod( Insert here ).

2. Należy ustawić Ceny umiejętniści w Bazie Danych w Notatkach. Okno to, od momentu działania skryptu, jest przeznaczone do ustawienia Cen umiejętności.

W notatkach należy wkleić kod: i ustawić Cenę umiejętniści 3. Dalej, należy ustawić polecenie skryptu, aby otworzył się sklep z umiejętniściami: Czyli w zdarzeniu, klikamy [WYWOŁAJ SKRYPT] i wklejamy linijkę

$scene = Scene_SkillShop.new([1,2,3,7,8,9])
Cyferki w nawiasie są odpowiednikiem, id umiejętniści które można kupić. 4. Umiejętności w skrypcie są podzielone na dwa rodzaje:

A) Umiejętności które można kupić POJEDYNCZO
Oznacza to że daną umiejętność można kupić dla poszczególnego bohatera z drużyny

B) Umiejętności które może kupić CAŁA DRUŻYNA
Oznacza to że daną umiejętność kupuje się dla wszystkich członków drużyny

Aby konkretne umiejętności mogła nabyć cała drużyna, pierw trzeba id umiejętności przypisać do kodu.
Alllearn = [4,5,6,10,11,12]
(w nawiasie wpisujemy ID umiejętności, które bedą dostępne dla całej drużyny) 5. Następnie, należy ustawić umiejętniści, które do nauczenia będą niedostępne dla Bohaterów.

Dislearnable[id bohatera] = [id umiejętności]
[id bohatera] jest zaciągane z Bazy Danych: Bohaterowie, każdy numer jest przypisany do bohatera.
[id umiejętności] jest zaciągane z Bazy Danych: Umiejętności, każdy numer jest przypisany do umiejętności zamieszczonej w bazie

6. Podsumowanie
- Należy ustawić Ceny Umiejętności w bazie danych
- Należy postawić zdarzenie, które otworzy sklep
- Należy ustawić współrzędne umiejętności, które może kupić cała drużyna
- Zablokowac umiejętności, których komkretny bohater nie będzie mógł kupić
Poniższy kod należy wkleić w edytorze skryptów (klawisz F11) Pod liniką Materials i dalej pod ( Insert here ): Skrypt znajduje się w pliku tekstowym: Skrypt.txt (lub przekopiować go należy z gry demo)

Skrypt należy wkleić pod linijkami Materials i dalej pod Insert here.

#==============================================================================
# ? Sklep Umiejętniści
#------------------------------------------------------------------------------
# ?Źródło:
#      http://izumiwhite.web.fc2.com/
#
#  Autor:
#      Izumi
#
# ?Warunki użytkowania (LICENCJA):
#      - Podziękowania w creditsach, albo jakimś "roll staff" - będzie miło, ale nie jest wymagane.
#      - OK dla gier darmowych
#      - OK dla gier komercyjnych
#      - OK dla gier dorosłych (+18)
#      - OK dla modyfikacji, a nawet dystrybucji wtórnej (ale zapewnij wsparcie)
#
#   Tłumaczenie wykonane przez:
#      Rubin 
#      rubinrpg@wp.pl
#     
#   Skrypt przetłumaczony dla potrzeby:
#      Twierdzy RPG Makera 
#      www.rpgmaker.pl 
#
#    _____________________________________________________________
#   
#==============================================================================

#--------------------------------------------------------------------------
# ? CO ZROBIĆ* Aby skrypt działał poprawnie
#
#    1. Skrypt należy wkleić pod Materials -> dalej pod( Insert here ).
# 
#    2. Należy ustawić Ceny umiejętniści w Bazie Danych w Notatkach
#       Okno to, od momentu działania skryptu 
#       jest przeznaczone do ustawienia Cen umiejętności.
#       
#       W notatkach należy wkleić kod: <Cena:0> i ustawić Cenę umiejętniści
#
#    3. Dalej, należy ustawić polecenie skryptu, aby otworzył się
#       sklep z umiejętniściami: Czyli w zdarzeniu, klikamy [WYWOŁAJ SKRYPT]
#       i wklejamy linijkę
#
#       $scene = Scene_SkillShop.new([1,2,3,7,8,9])
#
#       Cyferki w nawiasie są odpowiednikiem, id umiejętniści które można kupić.
#
#    4. Umiejętności w skrypcie są podzielone na dwa rodzaje:
#       A) Umiejętności które można kupić POJEDYNCZO
#          _____________________________________________ 
#         | Oznacza to że daną umiejętność można kupić  |                          
#         | dla poszczególnego bohatera z drużyny       |
#         |_____________________________________________|  
#
#       B) Umiejętności które może kupić CAŁA DRUŻYNA
#          _____________________________________________ 
#         | Oznacza to że daną umiejętność kupuje się   |                          
#         | dla wszystkich członków drużyny             |
#         |_____________________________________________|  
#
#          Aby konkretne umiejętności mogła nabyć cała drużyna, pierw
#          trzeba id umiejętności przypisać do kodu.
#           
#          Alllearn = [4,5,6,10,11,12]
#          (w nawiasie wpisujemy ID umiejętności, które bedą dostępne dla całej drużyny)
#          (kod znajduje się w linijce nr 98.)
#
#
#
#    5. Następnie, należy ustawić umiejętniści, które do nauczenia 
#       będą niedostępne dla Bohaterów.
#
#       Dislearnable[id bohatera] = [id umiejętności]
#
#       [id bohatera] jest zaciągane z Bazy Danych: Bohaterowie, każdy numer jest przypisany do bohatera.
#       [id umiejętności] jest zaciągane z Bazy Danych: Umiejętności, 
#                         każdy numer jest przypisany do umiejętności zamieszczonej w bazie
#
#       (kod znajduje się w linijce nr 58.)
#
#    6. Podsumowanie:
#       - Należy ustawić Ceny Umiejętności w bazie danych
#       - Należy postawić zdarzenie, które otworzy sklep
#       - Należy ustawić współrzędne umiejętności, które może kupić cała drużyna
#       - Zablokowac umiejętności, których komkretny bohater nie będzie mógł kupić
#
#--------------------------------------------------------------------------
module WD_skillshop_ini
 #Wiadomości wyświetlane w oknie
 Messnonmastered  = "Nie posiada"
 Messmastered     = "Posiada"
 Messdislearnable = "Nie można nauczyć"
 Messbuy          = "Kup umiejętność"
 Messcancel       = "Wyjdź"
                           # Ustawienia wyświetlania zmiennych zamiast złota
 Needvariable     = false  # Jeśli chcesz używać zmiennych zamiast złota ustaw: #true
 Variableid       = 11     # Zmienna liczba
 Variablename     = "Złoto:" # Jednostki
 Dislearnable = [] # NIE USUWAJ TEGO WIERSZA
# Określ umiejętności, których bohaterowie nie mogą kupić:
 Dislearnable[1] = [2,3,5,6,8]    #1 Bohater nr 1 nie może kupić/nauczyć się umiejętności
 Dislearnable[2] = [7,10,2,5,12]  #2 Bohater nr 2 nie może kupić/nauczyć się umiejętności
 Dislearnable[3] = [3,5,11]       #3 Bohater nr 3 nie może kupić/nauczyć się umiejętności
 Dislearnable[4] = [7,8,10,11]    #4 Bohater nr 4 nie może kupić/nauczyć się umiejętności
 
 Alllearn = [4,5,6,10,11,12] # Umiejętności nabyte przez wszystkich członków przy zakupie (nie indywidualnie).
                             # Jeśli nie określono, ustaw Alllearn = [0]?
end
#--------------------------------------------------------------------------
# ? Koniec początkowego ustawienia
#--------------------------------------------------------------------------

#==============================================================================
# ? Sklep_umiejętności
#------------------------------------------------------------------------------
# ?Polecenia, które przetwarzają ekran sklepu pod kątem umiejętności.
#==============================================================================

class Scene_SkillShop < Scene_Base
  #--------------------------------------------------------------------------
  # ? Rozpocznij przetwarzanie kodu:
  #--------------------------------------------------------------------------
  def initialize(shop_goods)
    @shop_goods = shop_goods
  end
  def start
    super
    create_menu_background
    create_command_window
    @help_window = Window_Help.new
    if WD_skillshop_ini::Needvariable == false
      @gold_window = Window_Gold.new(384, 56)
    else
      @gold_window = Window_ShopVariable.new(384, 56)
    end
    @dummy_window = Window_Base.new(0, 112, 544, 304)
    @buy_window = Window_SkillShopBuy.new(0, 112, @shop_goods)
    @buy_window.active = false
    @buy_window.visible = false
    @buy_window.help_window = @help_window
    @learner_window = Window_SkillShopTarget.new(304, 112)
    @learner_window.active = false
    @learner_window.visible = false
    @learner_window.index = -1
  end
  #--------------------------------------------------------------------------
  # ? Przetwarzanie kodu
  #--------------------------------------------------------------------------
  def terminate
    super
    dispose_menu_background
    dispose_command_window
    @help_window.dispose
    @gold_window.dispose
    @dummy_window.dispose
    @buy_window.dispose
    @learner_window.dispose
  end
  #--------------------------------------------------------------------------
  # ? Ramka
  #--------------------------------------------------------------------------
  def update
    super
    update_menu_background
    @help_window.update
    @command_window.update
    @gold_window.update
    @dummy_window.update
    @buy_window.update
    @learner_window.update
    if @command_window.active
      update_command_selection
    elsif @buy_window.active
      update_buy_selection
    elsif @learner_window.active
      update_learner_select
    end
  end
  #--------------------------------------------------------------------------
  # ? Okno poleceń 
  #--------------------------------------------------------------------------
  def create_command_window
    s1 = WD_skillshop_ini::Messbuy
    s2 = WD_skillshop_ini::Messcancel
    @command_window = Window_Command.new(384, [s1, s2], 2)
    @command_window.y = 56
  end
  #--------------------------------------------------------------------------
  # ? Wyłączenie okna poleceń
  #--------------------------------------------------------------------------
  def dispose_command_window
    @command_window.dispose
  end
  #--------------------------------------------------------------------------
  # ? Aktualizacja wyboru poleceń
  #--------------------------------------------------------------------------
  def update_command_selection
    if Input.trigger?(Input::B)
      Sound.play_cancel
      $scene = Scene_Map.new
    elsif Input.trigger?(Input::C)
      case @command_window.index
      when 0  # Kup umiejętność
        Sound.play_decision
        @command_window.active = false
        @dummy_window.visible = false
        @buy_window.active = true
        @buy_window.visible = true
        @buy_window.refresh
        @learner_window.visible = true
      when 1  # Wyjdź
        Sound.play_decision
        $scene = Scene_Map.new
      end
    end
  end
  #--------------------------------------------------------------------------
  # ? Zaktualizuj wybór umiejętności zakupu
  #--------------------------------------------------------------------------
  def update_buy_selection
    @item = @buy_window.item
    @learner_window.set(@item)
    @learner_window.refresh
    if Input.trigger?(Input::B)
      Sound.play_cancel
      @command_window.active = true
      @dummy_window.visible = true
      @buy_window.active = false
      @buy_window.visible = false
      @learner_window.visible = false
      @learner_window.refresh
      @help_window.set_text("")
      return
    end
    if Input.trigger?(Input::C)
      @item = @buy_window.item
      /<Cena:(.+)>/ =~ @item.note
      skill_price = $1.to_i
      if WD_skillshop_ini::Needvariable == false
        gold = $game_party.gold
      else
        gold = $game_variables[WD_skillshop_ini::Variableid]
      end
      if @item == nil or skill_price > gold
        Sound.play_buzzer
      else
        Sound.play_decision
        @buy_window.active = false
        @learner_window.index = 0
        alllist = WD_skillshop_ini::Alllearn
        if alllist != nil
          alllist.each{|i|
          @learner_window.index = 101 if @item.id == i
          }
        end
        @learner_window.active = true
      end
    end
  end
  #--------------------------------------------------------------------------
  # ? Aktualizacja wyboru bohatera
  #--------------------------------------------------------------------------
  def update_learner_select
    @item = @buy_window.item
    /<Cena:(.+)>/ =~ @item.note
    skill_price = $1.to_i
    if WD_skillshop_ini::Needvariable == false
      gold = $game_party.gold
    else
      gold = $game_variables[WD_skillshop_ini::Variableid]
    end

    if Input.trigger?(Input::B)
      Sound.play_cancel
      cancel_learner_select
    elsif Input.trigger?(Input::C)
      if @item == nil or skill_price > gold
        Sound.play_buzzer
      elsif @learner_window.index != 101
        actor = $game_party.members[@learner_window.index]
        learnable = true
        dislearnlist = WD_skillshop_ini::Dislearnable[actor.id]
        if dislearnlist != nil
          dislearnlist.each{|i|
            learnable = false if @item.id == i
          }
        end
        mastered = (actor.skill_learn?(@item))
        if mastered == false and learnable == true
          decide_learner_select
        else
          Sound.play_buzzer
        end
      else
        learnable2 = Array.new($game_party.members.size, true)
        mastered2 = Array.new($game_party.members.size, false)
        for i in 1...$game_party.members.size + 1
          actor = $game_party.members[i-1]
          dislearnlist = WD_skillshop_ini::Dislearnable[actor.id]
          if dislearnlist != nil
            dislearnlist.each{|j|
              learnable2[i-1] = false if @item.id == j
            }
          end
          mastered2[i-1] = (actor.skill_learn?(@item))
        end
        all_learnable = false
        for i in 1...$game_party.members.size + 1
          all_learnable = true if learnable2[i-1] == true and mastered2[i-1] == false
        end
        if all_learnable == true
          decide_learner_select
        else
          Sound.play_buzzer
        end

      end
    end
  end
  #--------------------------------------------------------------------------
  # ? Anuluj wybór bohaterów
  #--------------------------------------------------------------------------
  def cancel_learner_select
    Sound.play_cancel
    @learner_window.active = false
    @learner_window.index = -1
    @buy_window.active = true
  end
  #--------------------------------------------------------------------------
  # ? Decyzja
  #--------------------------------------------------------------------------
  def decide_learner_select
    Sound.play_shop
    if @learner_window.index != 101
      $game_party.members[@learner_window.index].learn_skill(@item.id)
    else
      for i in 1...$game_party.members.size + 1
        learnable = true
        dislearnlist = WD_skillshop_ini::Dislearnable[$game_party.members[i-1].id]
        if dislearnlist != nil
          dislearnlist.each{|j|
            learnable = false if @item.id == j
          }
        end
        $game_party.members[i-1].learn_skill(@item.id) if learnable
      end
    end
    /<Cena:(.+)>/ =~ @item.note
    skill_price = $1.to_i
    if WD_skillshop_ini::Needvariable == false
      $game_party.lose_gold(skill_price)
    else
      $game_variables[WD_skillshop_ini::Variableid] -= skill_price
    end
    @gold_window.refresh
    @buy_window.refresh
    @learner_window.refresh
  end
end

#==============================================================================
# ? Window_SkillShopBuy
#------------------------------------------------------------------------------
# ?To okno wyświetla listę umiejętności, które można kupić na ekranie sklepu z umiejętnościami.
#==============================================================================

class Window_SkillShopBuy < Window_Selectable
  #--------------------------------------------------------------------------
  # ? Współrzędne okna
  #     x : Współrzędna okna X.
  #     y : Współrzędna okna Y.
  #--------------------------------------------------------------------------
  def initialize(x, y, shop_goods)
    super(x, y, 304, 304)
    @shop_goods = shop_goods
    refresh
    self.index = 0
  end
  #--------------------------------------------------------------------------
  # ? Zdobycie przedmiotu
  #--------------------------------------------------------------------------
  def item
    return @data[self.index]
  end
  #--------------------------------------------------------------------------
  # ? Odświeżanie
  #--------------------------------------------------------------------------
  def refresh
    @data = []
    for item in @shop_goods
      if item != nil
        @data.push($data_skills[item])
      end
    end
    @item_max = @data.size
    create_contents
    for i in 0...@item_max
      draw_item(i)
    end
  end
  #--------------------------------------------------------------------------
  # ? Przetwarzanie przedmiotów
  #     index : Numer przedmiotu/Cena
  #--------------------------------------------------------------------------
  def draw_item(index)
    item = @data[index]
    /<Cena:(.+)>/ =~ item.note
    skill_price = $1.to_i
    if WD_skillshop_ini::Needvariable == false
      enabled = (skill_price <= $game_party.gold)
    else
      enabled = (skill_price <= $game_variables[WD_skillshop_ini::Variableid])
    end
    rect = item_rect(index)
    self.contents.clear_rect(rect)
    draw_item_name(item, rect.x, rect.y, enabled)
    rect.width -= 4
    self.contents.draw_text(rect, skill_price, 2)
  end
  #--------------------------------------------------------------------------
  # ? Polecenie odpowiadające za aktualizacje tekstu
  #--------------------------------------------------------------------------
  def update_help
    @help_window.set_text(item == nil ? "" : item.description)
  end
end


#==============================================================================
# ? Window_SkillShopTarget
#------------------------------------------------------------------------------
# ?To okno służy do wyboru celu nauki umiejętności na ekranie sklepu z umiejętnościami.
#==============================================================================

class Window_SkillShopTarget < Window_Selectable
  #--------------------------------------------------------------------------
  # ? Współrzędne okna
  #     x : Współrzędna okna X.
  #     y : Współrzędna okna Y.
  #--------------------------------------------------------------------------
  def initialize(x, y)
    super(x, y, 240, 304)
    @column_max = 1
    @index = 0
    @data = []
    @skill_price = 0
    for i in 0...$game_party.members.size
      @data.push($game_party.members[i])
    end
    @item_max = @data.size
    create_contents
  end
  #--------------------------------------------------------------------------
  # ? Ustalanie umiejętności i cen  
  #--------------------------------------------------------------------------
  def set(skill)
    @skill = skill
  end
  def refresh
    self.contents.clear
    for i in 0...@item_max
      draw_item(i)
    end
  end
  #--------------------------------------------------------------------------
  # ? Przetwarzanie przedmiotów
  #     index : Numer przedmiotu/Cena
  #--------------------------------------------------------------------------
  def draw_item(index)
    x = 4
    y = WLH * (2 + index * 2)
    rect = item_rect(index)
    self.contents.clear_rect(x, y, rect.width,rect.height)
    actor = @data[index]
    if actor != nil
      rect.width -= 4
      learnable = true
      dislearnlist = WD_skillshop_ini::Dislearnable[actor.id]
      if dislearnlist != nil
        dislearnlist.each{|i|
        learnable = false if @skill.id == i
      }
      end
      mastered = (actor.skill_learn?(@skill))
      if mastered
        self.contents.font.color.alpha = 128
        self.contents.draw_text(x, y, 200, WLH, actor.name)
        self.contents.draw_text(x, y + WLH, 200, WLH, WD_skillshop_ini::Messmastered, 2)
      elsif learnable == false
        self.contents.font.color.alpha = 128
        self.contents.draw_text(x, y, 200, WLH, actor.name)
        self.contents.draw_text(x, y + WLH, 200, WLH, WD_skillshop_ini::Messdislearnable, 2)
      else 
        self.contents.font.color.alpha = 255
        self.contents.draw_text(x, y, 200, WLH, actor.name)
        self.contents.draw_text(x, y + WLH, 200, WLH, WD_skillshop_ini::Messnonmastered, 2)
      end

    end
  end
  #--------------------------------------------------------------------------
  # ? Ramka (Aktualizacja)
  #--------------------------------------------------------------------------
  def update_cursor
    if self.index > -1 and self.index < 101
      y = WLH * (2 + index * 2)
      self.cursor_rect.set(0, y, 208, WLH*2)
    elsif self.index == -1
      y = WLH * (2 + 0 * 2)
      self.cursor_rect.set(0, y, 0, 0)
    elsif self.index == 101
      y = WLH * (2 + 0 * 2)
      self.cursor_rect.set(0, y, 208, WLH*8)
    end
  end
  def update
    super
  end
end

#==============================================================================
# ? Window_ShopVariable
#------------------------------------------------------------------------------
# ?Okno, w którym wyświetlane są zmienne zamiast złota.
#==============================================================================

class Window_ShopVariable < Window_Base
  #--------------------------------------------------------------------------
  # ? Współrzędne okna
  #     x : Współrzędna okna X.
  #     y : Współrzędna okna Y.
  #--------------------------------------------------------------------------
  def initialize(x, y)
    super(x, y, 160, WLH + 32)
    refresh
  end
  #--------------------------------------------------------------------------
  # ? Odświeżanie danych.
  #--------------------------------------------------------------------------
  def refresh
    self.contents.clear
    value = $game_variables[WD_skillshop_ini::Variableid]
    cx = contents.text_size(WD_skillshop_ini::Variablename).width
    self.contents.font.color = normal_color
    self.contents.draw_text(4, 0, 120-cx-2, WLH, value, 2)
    self.contents.font.color = system_color
    self.contents.draw_text(4, 0, 120, WLH, WD_skillshop_ini::Variablename, 2)
  end
end

Zakończenie
I to by było na tyle.
Skrypt wydaje się skomplikowany, ale to nic w zasadzie trudnego. Należy wpisac Cenę umiejętności w notatkach,

Autor: Izumi
Email: - brak -

Tłumaczenie: Rubin
Email: rubinrpg@wp.pl
Pobierz:

(gra demo) Sklep Umiejętności.rar