Twierdza RPG Maker

	Informacje \|\| Problemy z RPGXP \|\| Zgłoś nowe materiały
	RPG Maker :: RPG Maker XP
CBS ala RPGME

Dzis skrypt bedzie przedstawiac Mofyfikacje pewnego skryptu zrobionego przez Kolesia "Naramura" ze strony http://naramura.kdn.ne.jp/game/sozai/3Dbattler.html (która już od dawna nie funkcjonuje, dopisek by Reptile 24-05-2013) jak widzicie tam są 4 klatki animacji.

Moja modyfikacja bedzie wymagac jedynie 3 kratki (mniejsza o to) wytłumacze o co chodzi.

Skrypt pozwala nam na umieszczenie w grze BattleCharsetów z RM 2k3.

Pieknie i gładziudko wchodzą ale? jest jeden problem ☺ podstawowe rozmiary z 2k3 są bardzo male, i CBS wygląda niezbyt pieknie. Wiec kazdy obrazek Battlecharseta powinien miec oto takie rozmiary 288x768.

A teraz co do nazywania BattleCharów, i gdzie je wkleic

wklejamy je do folderu /character/

BattleCharesety nazywamy tak jak nazywa sie Character(animacja bohatera) + dodajemy b . Do BattleChar... tam gdzie jest wiecej poz animacji nazywamy ją np. 001-Fighter01_b1

pamietajcie o tym b1, zas tam gdzie jest malo klatek animacji nazywamy np. 008-Fighter08_b2

Teraz koncówka tego :

mamy np. animacje tego pierwszego gostka 001-Fighter01 wiec Battle chara (ten co ma duzo klatek animacji) nazywamy - 001-Fighter01_b1 drugi zas ten co ma mniej klatek 001-Fighter01_b2

Poniżej macie cały skrypcik:
=begin
???????????
  Ś??
    RPG???XP???????????????????????
    ????????????
  Ś??
    ˇ?????????????????????????????
      ????????????????????????????
        ˇGame_Actor
        ˇSprite_Actor (??)
        ˇSpriteset_Battle
        ˇScene_Battle (??????????Scene_Battle 4???)
    ˇ???????????????
    ˇ????????????????????????????????
    ˇ??????????????????????????????
  Ś????
    ??????????main????????????????
    ??????????????????????
    "(??????????)_b1"????????????
    Graphics/Characters?????????????????
      ???(????????:???)?????
      ???(?:???)??????
      ???(?:???)????(HP?1/4??????????????)
      ???(?:???)???????
    ?????????
    ???"??????"??????????????????
    ?????????????
  Ś???
    ?????????????????(RGSS????????????)
    ?????????????????????????????????
    (GPL????)?????????
    RGSS?:http://jbbs.shitaraba.com/game/14836/
 ?Ś?????
   ?###????????????????????
   ??????????????????????????????
   ????????????????????????
   "(??????????)_b2"????????????
    Graphics/Characters?????????
      ???(????????:???)??????
      ???(?:???)????
      ???(?:???)???????
      ???(?:???)????????
    ??????????????????
=end

# Game_Actor??????????
class Game_Actor < Game_Battler
  # ???????
  attr_accessor :pattern       # ???
  attr_accessor :direction     # ??
  attr_accessor :anime_count   # ???????
  attr_accessor :move_speed    # ??
  attr_accessor :damaged       # ????????
  #initialize ????
  def initialize(actor_id)
    super()
    @damaged = false
    setup(actor_id)
  end
  # ??????????
  def setup(actor_id)
    actor = $data_actors[actor_id]
    @actor_id = actor_id
    @name = actor.name
    @character_name = actor.character_name
    @character_hue = actor.character_hue
    @class_id = actor.class_id
    @weapon_id = actor.weapon_id
    @armor1_id = actor.armor1_id
    @armor2_id = actor.armor2_id
    @armor3_id = actor.armor3_id
    @armor4_id = actor.armor4_id
    @level = actor.initial_level
    @exp_list = Array.new(101)
    make_exp_list
    @exp = @exp_list[@level]
    @skills = []
    @hp = maxhp
    @sp = maxsp
    @states = []
    @states_turn = {}
    @maxhp_plus = 0
    @maxsp_plus = 0
    @str_plus = 0
    @dex_plus = 0
    @agi_plus = 0
    @int_plus = 0
    # ?????
    for i in 1..@level
      for j in $data_classes[@class_id].learnings
        if j.level == i
          learn_skill(j.skill_id)
        end
      end
    end
    # ????????
    update_auto_state(nil, $data_armors[@armor1_id])
    update_auto_state(nil, $data_armors[@armor2_id])
    update_auto_state(nil, $data_armors[@armor3_id])
    update_auto_state(nil, $data_armors[@armor4_id])

    # ?????????
    @battler_name = actor.character_name + "_b1"
    @battler_hue = actor.character_hue
    @pattern = 0
    @direction = 2
    @move_speed = 3
    @anime_count = 0
  end

  # ??????????????????????
  def set_graphic(character_name, character_hue, battler_name, battler_hue)
    @character_name = character_name
    @character_hue = character_hue
    @battler_name = character_name + "_b1"
    @battler_hue = character_hue
  end

  # ???????????
  # ???????????????

  # x??
  def screen_x
    if self.index != nil
      return self.index * 30 + 450
    else
      return 0
    end
  end

  # y??
  def screen_y
    if self.index != nil
      return self.index * 50 + 170
    else
      return 0
    end
  end

  # z??
  def screen_z
    if self.index != nil
      return self.index
    else
      return 0
    end
  end

  # ?????????????????????
  def update
    @anime_count += 1
    if @anime_count > 13 - @move_speed * 2
      @pattern = (@pattern  + 1) % 3
      @anime_count = 0
    end
  end

  # ????????????????????
   def bad_state?
    k = $data_system.elements.index("LOL")
    @states.each{|i|
      if $data_states[i].guard_element_set.include?(k)
        return true
      end
    }
    return false
  end

  # ?????????????
  # ???????????????4??????????????
  # ?????????????????????????????????
  def battle_graphic_to_1
    @battler_name = @character_name + "_b1"
  end

  def battle_graphic_to_2
    @battler_name = @character_name + "_b2"
  end

end

# ???Sprite_Actor??????
# ?????Sprite_Battler??????
# ??????????????
class Sprite_Actor < RPG::Sprite

  # ???????
  attr_accessor :battler               # ???

  # ?????????
  def initialize(viewport, battler = nil)
    super(viewport)
    @battler = battler
    @battler_visible = false
    @damage_view = false               # ?????????
  end

  # ??
  def dispose
    if self.bitmap != nil
      self.bitmap.dispose
    end
    super
  end

  # ?????
  def update
    super
    # ???? nil ???
    if @battler == nil
      self.bitmap = nil
      loop_animation(nil)
      # ??????
      return
    end

    # ????????????????????
    if @battler.battler_name != @battler_name or
       @battler.battler_hue != @battler_hue
      @battler_name = @battler.battler_name
      @battler_hue = @battler.battler_hue
    end
    # ??????????????????????
    # Sprite_Character????????????
    self.bitmap = RPG::Cache.character(@battler.battler_name,
    @battler.battler_hue)
    @cw = bitmap.width / 3
    @ch = bitmap.height / 8
    self.ox = @cw / 4
    self.oy = @ch
    sx = @battler.pattern * @cw
    sy = (@battler.direction - 2) / 2 * @ch
    self.src_rect.set(sx, sy, @cw, @ch)
    # ?????? ID ????????????
    if @battler.damage == nil and
       @battler.state_animation_id != @state_animation_id
      @state_animation_id = @battler.state_animation_id
      loop_animation($data_animations[@state_animation_id])
    end
    # ??
    if @battler.blink
      blink_on
    else
      blink_off
    end
    # ??????
    unless @battler_visible
      # ??
      if not @battler.hidden and not @battler.dead? and
         (@battler.damage == nil or @battler.damage_pop)
        appear
        @battler_visible = true
      end
    end
    # ?????
    if @battler_visible
      # ??????
      if @battler.white_flash
        whiten
        @battler.white_flash = false
      end
      # ??????????
      # ?????????????
      # ???????2?????????????"(??????)_b1"?
      # ?????????if????????Game_Actor????????
      # ??????????????????????
      @battler.battle_graphic_to_1 # ???????"(??????)_b1"???
      # ???????
      if @battler.damage == nil and @battler.dead?
        $game_system.se_play($data_system.actor_collapse_se)
        @battler.direction = 8
        @battler_visible = false
      # ????????On???
      elsif @damage_view
        @battler.direction = 6
      # ????????????
      elsif @battler.animation_id != 0
        animation = $data_animations[@battler.animation_id]
        animation(animation, @battler.animation_hit)
        # ???????????????????0?????
        if @battler.damaged and @battler.damage.to_i >= 0
          @battler.direction = 6
          # ????????On???
          @damage_view = true
        end
        @battler.animation_id = 0


      ### ??????
      elsif @battler.guarding?
        @battler.battle_graphic_to_1 # ???????"(??????)_b2"???
        @battler.direction = 4
      ###

      ### ?????
      elsif @battler.current_action.motion == 1
        @battler.battle_graphic_to_2 # ???????"(??????)_b2"???
        @battler.direction = 4
      ###

      ### ??????
      elsif @battler.current_action.motion == 2
        @battler.battle_graphic_to_1 # ???????"(??????)_b2"???
        @battler.direction = 2
      ###

      ### ???????
      elsif @battler.current_action.motion == 3
        @battler.battle_graphic_to_1 # ???????"(??????)_b2"???
        @battler.direction = 2
      ###

      # ????????????????
      elsif @battler.hp <= @battler.maxhp / 4 and @battler.damage == nil or
            @battler.bad_state?
            @battler.battle_graphic_to_2
        @battler.direction = 6
      # ????????
      else
          @battler.battle_graphic_to_2
        @battler.direction = 6
      end
      if @battler.damage_pop
        if @battler.damage.to_i >= 0
          @battler.direction = 4
        end
        damage(@battler.damage, @battler.critical)
        @battler.damage = nil
        @battler.critical = false
        @battler.damage_pop = false
      end
    end
    # ????????????
    if @damage_view == true
      # ??????????????nil???
      if self.effect? == false and @battler.damage == nil
        # ????????????????????????
        @damage_view = false
        @battler.damaged = false
      end
    end
    # ???????????
    self.x = @battler.screen_x
    self.y = @battler.screen_y
    self.z = @battler.screen_z
  end
end

# Spriteset_Battle???
class Spriteset_Battle
  def initialize
    # ???????
    @viewport1 = Viewport.new(0, 0, 640, 320)
    @viewport2 = Viewport.new(0, 0, 640, 480)
    @viewport3 = Viewport.new(0, 0, 640, 480)
    @viewport4 = Viewport.new(0, 0, 640, 480)
    @viewport2.z = 101
    @viewport3.z = 200
    @viewport4.z = 5000
    # ??????????????
    @battleback_sprite = Sprite.new(@viewport1)
    # ???????????
    @enemy_sprites = []
    for enemy in $game_troop.enemies.reverse
      @enemy_sprites.push(Sprite_Battler.new(@viewport1, enemy))
    end
    # ???????????
    # ?Sprite_Battler??Sprite_Actor?????
    @actor_sprites = []
    @actor_sprites.push(Sprite_Actor.new(@viewport1))
    @actor_sprites.push(Sprite_Actor.new(@viewport1))
    @actor_sprites.push(Sprite_Actor.new(@viewport1))
    @actor_sprites.push(Sprite_Actor.new(@viewport1))
    # ?????
    @weather = RPG::Weather.new(@viewport1)
    # ????????????
    @picture_sprites = []
    for i in 51..100
      @picture_sprites.push(Sprite_Picture.new(@viewport3,
        $game_screen.pictures[i]))
    end
    # ???????????
    @timer_sprite = Sprite_Timer.new
    # ?????
    update
  end

  def update
    # ?????????????? (???????????)
    @actor_sprites[0].battler = $game_party.actors[0]
    @actor_sprites[1].battler = $game_party.actors[1]
    @actor_sprites[2].battler = $game_party.actors[2]
    @actor_sprites[3].battler = $game_party.actors[3]
    # ???????????????????????
    if @battleback_name != $game_temp.battleback_name
      @battleback_name = $game_temp.battleback_name
      if @battleback_sprite.bitmap != nil
        @battleback_sprite.bitmap.dispose
      end
      @battleback_sprite.bitmap = RPG::Cache.battleback(@battleback_name)
      @battleback_sprite.src_rect.set(0, 0, 640, 320)
    end

    # ???
    # ????????????Game_Actor?????????????
    $game_party.actors.each{|actor|
      actor.update
    }
    # ????

    # ???????????
    for sprite in @enemy_sprites + @actor_sprites
      sprite.update
    end
    # ???????????
    @weather.type = $game_screen.weather_type
    @weather.max = $game_screen.weather_max
    @weather.update
    # ????????????
    for sprite in @picture_sprites
      sprite.update
    end
    # ???????????
    @timer_sprite.update
    # ???????????????
    @viewport1.tone = $game_screen.tone
    @viewport1.ox = $game_screen.shake
    # ????????????
    @viewport4.color = $game_screen.flash_color
    # ???????
    @viewport1.update
    @viewport2.update
    @viewport4.update
  end
end

# Scene_Battle????????
class Scene_Battle
  #--------------------------------------------------------------------------
  # ? ??????? ????
  #--------------------------------------------------------------------------
  def make_basic_action_result
    # ?????
    if @active_battler.current_action.basic == 0
      # ?????? ID ???
      @animation1_id = @active_battler.animation1_id
      @animation2_id = @active_battler.animation2_id
      # ?????????????
      if @active_battler.is_a?(Game_Enemy)
        if @active_battler.restriction == 3
          target = $game_troop.random_target_enemy
        elsif @active_battler.restriction == 2
          target = $game_party.random_target_actor
        else
          index = @active_battler.current_action.target_index
          target = $game_party.smooth_target_actor(index)
        end
      end
      # ?????????????
      if @active_battler.is_a?(Game_Actor)
        @active_battler.current_action.motion = 1 ###1???
        if @active_battler.restriction == 3
          target = $game_party.random_target_actor
        elsif @active_battler.restriction == 2
          target = $game_troop.random_target_enemy
        else
          index = @active_battler.current_action.target_index
          target = $game_troop.smooth_target_enemy(index)
        end
      end
      # ????????????
      @target_battlers = [target]
      # ??????????
      for target in @target_battlers
        target.attack_effect(@active_battler)
      end
      return
    end
    # ?????
    if @active_battler.current_action.basic == 1
      # ????????? "??" ???
      @help_window.set_text($data_system.words.guard, 1)
      return
    end
    # ??????
    if @active_battler.is_a?(Game_Enemy) and
       @active_battler.current_action.basic == 2
      # ????????? "???" ???
      @help_window.set_text("sdaas", 1)
      # ???
      @active_battler.escape
      return
    end
    # ????????
    if @active_battler.current_action.basic == 3
      # ?????????????????
      $game_temp.forcing_battler = nil
      # ???? 1 ???
      @phase4_step = 1
      return
    end
  end
  #--------------------------------------------------------------------------
  # ? ???????? ????
  #--------------------------------------------------------------------------
  def make_skill_action_result
    # ??????
    @skill = $data_skills[@active_battler.current_action.skill_id]
    # ????????????
    unless @active_battler.current_action.forcing
      # SP ????????????????
      unless @active_battler.skill_can_use?(@skill.id)
        # ?????????????????
        $game_temp.forcing_battler = nil
        # ???? 1 ???
        @phase4_step = 1
        return
      end
    end
    # SP ??
    @active_battler.sp -= @skill.sp_cost
    # ????????????????
    @status_window.refresh
    # ????????????????
    @help_window.set_text(@skill.name, 1)
    # ?????? ID ???
    @animation1_id = @skill.animation1_id
    @animation2_id = @skill.animation2_id
    # ??????? ID ???
    @common_event_id = @skill.common_event_id
    # ?????????
    set_target_battlers(@skill.scope)
    @active_battler.current_action.motion = 2 ###1???
    # ?????????
    for target in @target_battlers
      target.skill_effect(@active_battler, @skill)
    end
  end
  #------------------------------------------------------------------------
  # ? ????????? ????
  #--------------------------------------------------------------------------
  def make_item_action_result
    # ???????
    @item = $data_items[@active_battler.current_action.item_id]
    # ????????????????????
    unless $game_party.item_can_use?(@item.id)
      # ???? 1 ???
      @phase4_step = 1
      return
    end
    # ??????
    if @item.consumable
      # ????????? 1 ???
      $game_party.lose_item(@item.id, 1)
    end
    # ?????????????????
    @help_window.set_text(@item.name, 1)
    # ?????? ID ???
    @animation1_id = @item.animation1_id
    @animation2_id = @item.animation2_id
    # ??????? ID ???
    @common_event_id = @item.common_event_id
    # ?????
    index = @active_battler.current_action.target_index
    target = $game_party.smooth_target_actor(index)
    # ?????????
    set_target_battlers(@item.scope)
    @active_battler.current_action.motion = 3 ###1???
    # ??????????
    for target in @target_battlers
      target.item_effect(@item)
    end

  end


  # ?????????????????????Game_Actor????
  def update_phase4_step4
    # ?????????
    for target in @target_battlers
      target.animation_id = @animation2_id
      target.animation_hit = (target.damage != "Miss")
      # ???????
      if target.is_a?(Game_Actor)
        target.damaged = true
      end
    end
    # ?????????????????? 8 ?????
    @wait_count = 8
    @active_battler.current_action.motion = 0 ###1???
    # ???? 5 ???
    @phase4_step = 5
  end

end

class Game_BattleAction
    attr_accessor :motion           ###??????????
  def clear
    @speed = 0
    @kind = 0
    @basic = 3
    @skill_id = 0
    @item_id = 0
    @target_index = -1
    @forcing = false
    @motion = 0                 ###??????
  end
end
Autor: Naramura, wytłumaczył Kspark
email: kspark@tvteletronik.pl
Pobierz:
CBS by Kspark