Serene Combo - RPL

module Overdrive
  class Serene
    def initialize
    end
    def serene_combo
      skill = RPG::Skill.new()
      skill.id = 1301
      skill.name = "Serene Combo"
      skill.overdrive_level = 3
      skill.animation_id = 91
      skill.base_damage = 30
      skill.scope = 12 # Nanti bikin scope sendiri..
      skill.variance = 7
      skill.atk_f = 40
      skill.mp_cost = 15 # Kalo pake Vagie robe jadi 3, di game aku
      skill.element_set = [10] # Es, kalo variable salah kasih tau aku..
      return skill
    end
  end
end

Ini script aku COPASS dari game aku

module RPG
  class UsableItem < BaseItem
    # Script ini copass dulu dari Help File
    # modif di initialize
    def initialize
      # biarin default tapi tambahin ini
      @overdrive_level = 0
    end
    def for_opponent?
      return [1, 2, 3, 4, 5, 6, 12].include?(@scope)
    end
    def serene_pattern?
      return [12].include?(@scope)
    end
    # tambahin ini juga!
    attr_accessor :overdrive_level
  end
end

def make_targets
  #biarin default tapi selipin ini di for_opponent?
  if obj.for_opponent?
    # biarin tetep aja tapi di else pertama pasang ini
    elsif obj.serene_pattern?
      selected = opponents_unit.random_target
      level = obj.overdrive_level
      level.times do
        target.push(selected)
      end
      target.concat(opponents_unit.existing_members)
    # biarin aja kebawahnya
  end
end

def create_game_objects
  #biarin default di atas, pasang yang ini sebelum end
  $overdrive_serene = Overdrive::serene.new()
  $serene = []
  $serene.push ($overdrive_serene.serene_combo)
  do
    break if $data_skills.size >= $serene[0].id
    $data_skills.push(nil)
  end
  $data_skills.push($serene[0])
end

  def riviera_equip
    iterate_actor_index(-1) do |actor|
      actor.learn_skill(1301) if (actor.weapon_id==31) #<== weapon id di game aku no 31
    end
  end
  def riviera_unequip # <== buat selesai battle
    iterate_actor_index(-1) do |actor|
      actor.forget_skill(1301) #<== harus lupain semua skill bonus di battle only
    end
  end

  $game_map.interpreter.riviera_equip

# Dari sini!
module Overdrive
  class Serene
    def initialize
    end
    def serene_combo
      skill = RPG::Skill.new()
      skill.id = 1301
      skill.name = "Serene Combo"
      skill.icon_index = 31
      skill.description = "Gunakan Serene Combo dari Hell Scythe"
      skill.overdrive_level = 3
      skill.scope = 12
      skill.occasion = 1
      skill.speed = -8
      skill.animation_id = 91 # Ini dari game aku, jadi ganti aja..
      skill.base_damage = 30 # Ini dari game aku, jadi ganti aja..
      skill.variance = 6 # Ini dari game aku, jadi ganti aja..
      skill.atk_f = 40 # Ini dari game aku, jadi ganti aja..
      skill.element_set = [10] # Ini dari game aku, jadi ganti aja..
      skill.mp_cost = 15 # Ini dari game aku, jadi ganti aja..
      skill.hit = 100
      skill.message1 = ": Here's my trump card!" # Ini dari game aku, jadi ganti aja..
      skill.message2 = "Serene Combo!!" # Ini dari game aku, jadi ganti aja..
      return skill
    end
# Sampe sini!
end
=begin
    def serene_nightmare
      skill = RPG::Skill.new()
      skill.id = 1304
      skill.name = "Serene Nightmare"
      skill.icon_index = 31
      skill.description = "Gunakan Serene Nightmare dari Black Scythe"
      skill.overdrive_level = 4
      skill.scope = 12
      skill.occasion = 1
      skill.speed = -12
      skill.animation_id = 92 # Ini dari game aku, jadi ganti aja..
      skill.base_damage = 80 # Ini dari game aku, jadi ganti aja..
      skill.variance = 9 # Ini dari game aku, jadi ganti aja..
      skill.atk_f = 45 # Ini dari game aku, jadi ganti aja..
      skill.element_set = [16] # Ini dari game aku, jadi ganti aja..
      skill.mp_cost = 60 # Ini dari game aku, jadi ganti aja..
      skill.hit = 100
      skill.message1 = ": Here's my trump card!" # Ini dari game aku, jadi ganti aja..
      skill.message2 = "Serene Nightmare!!" # Ini dari game aku, jadi ganti aja..
      return skill
    end
    def serene_absolute
      skill = RPG::Skill.new()
      skill.id = 1306
      skill.name = "Serene Absolute"
      skill.icon_index = 31
      skill.description = "Gunakan Serene Absolute dari Infinite Arc"
      skill.overdrive_level = 6
      skill.scope = 12
      skill.occasion = 1
      skill.speed = -16
      skill.animation_id = 93 # Ini dari game aku, jadi ganti aja..
      skill.base_damage = 140 # Ini dari game aku, jadi ganti aja..
      skill.variance = 12 # Ini dari game aku, jadi ganti aja..
      skill.atk_f = 52 # Ini dari game aku, jadi ganti aja..
      skill.element_set = [10] # Ini dari game aku, jadi ganti aja..
      skill.mp_cost = 90 # Ini dari game aku, jadi ganti aja..
      skill.hit = 100
      skill.message1 = ": Here's my trump card!" # Ini dari game aku, jadi ganti aja..
      skill.message2 = "Serene Absolute!!" # Ini dari game aku, jadi ganti aja..
      return skill
    end
  end
=end

  def create_game_objects
    $game_temp          = Game_Temp.new
    $game_message      = Game_Message.new
    $game_system        = Game_System.new
    $game_switches      = Game_Switches.new
    $game_variables    = Game_Variables.new
    $game_self_switches = Game_SelfSwitches.new
    $game_actors        = Game_Actors.new
    $game_party        = Game_Party.new
    $game_troop        = Game_Troop.new
    $game_map          = Game_Map.new
    $game_player        = Game_Player.new
    $overdrive_serene  = Overdrive::Serene.new
    $serene = []
    $serene.push($overdrive_serene.serene_combo)
    $serene.push($overdrive_serene.serene_nightmare)
    $serene.push($overdrive_serene.serene_absolute)
    skill_slot = 1700
    skill_slot -= $data_skills.size
    for i in 0..($serene.size-1)
      skill_slot.times do
        break if $data_skills.size >= $serene[i].id
        $data_skills.push(nil)
      end
      $data_skills.push($serene[i])
    end
  end

  def make_obj_targets(obj)
    tg = nil
    targets = []
    if obj.for_opponent?
      if obj.for_random?
        if obj.for_one?        # One random enemy
          number_of_targets = 1
        elsif obj.for_two?      # Three random enemies
          number_of_targets = 3
        else                    # Five random enemies
          number_of_targets = 5
        end
        number_of_targets.times do
          tg = opponents_unit.random_target
          targets.push(tg) if !targets.include?(tg)
        end
# Ambil dari sini!
      elsif obj.serene_pattern?
        selected = opponents_unit.random_target
        number_of_targets = obj.overdrive_level
        number_of_targets.times do
          targets.push(selected)
        end
        targets.concat(opponents_unit.existing_members)
        targets.concat(opponents_unit.existing_members) if obj.id == 1306
# Sampe sini!!
      elsif obj.dual?          # One enemy, dual
        targets.push(opponents_unit.smooth_target(@target_index))
        targets += targets
      elsif obj.for_one?        # One enemy
        targets.push(opponents_unit.smooth_target(@target_index))
      else                      # All enemies
        targets += opponents_unit.existing_members
      end
    elsif obj.for_user?        # User
      targets.push(battler)
    elsif obj.for_dead_friend?
      if obj.for_one?          # One ally (include dead)
        targets.push(friends_unit.smooth_dead_target(@target_index))
      else                      # All allies (include dead)
        targets += friends_unit.dead_members
      end
    elsif obj.for_friend?
      if obj.for_one?          # One ally
        targets.push(friends_unit.smooth_target(@target_index))
      else                      # All allies
        targets += friends_unit.existing_members
      end
    end
    return targets.compact
  end

module RPG
  class UsableItem < BaseItem
    def initialize
      super
      @scope = 0
      @occasion = 0
      @speed = 0
      @animation_id = 0
      @common_event_id = 0
      @base_damage = 0
      @variance = 20
      @atk_f = 0
      @spi_f = 0
      @physical_attack = false
      @damage_to_mp = false
      @absorb_damage = false
      @ignore_defense = false
      @element_set = []
      @plus_state_set = []
      @minus_state_set = []
      @overdrive_level = 0
    end
    def for_opponent?
      return [1, 2, 3, 4, 5, 6, 12].include?(@scope)
    end
    def serene_pattern?
      return [12].include?(@scope)
    end
    attr_accessor :overdrive_level
  end
end

    # - Add Master Skill, WORKED!
    def add_master_skill
      iterate_actor_index(-1) do |actor|
        if actor != nil
          actor.learn_skill(1301) if (weapon_id==HELL_SCYTHE) # HELL_SCYTHE diganti dengan id Hell Scythe itu sendiri..
          # Masukkin yang lain kalo mau cuman keluar di battle
        end
      end
    end
    # - Remove Master Skill, WORKED!
    def remove_master_skill
      iterate_actor_index(-1) do |actor|
        if actor != nil
          actor.forget_skill(1301)
          # Masukkin yang lain kalo keluarin skill seudah battle
        end
      end
    end

  O Bikin "BS Init"
  O Masukkin script ' add_master_skill '
  O Control Switch "Battle Start" ke ON <== Ini kalo mau.. (harus!)
  O Pasang " Common Event Call BS Init di setiap troop " <== pasang di "Turn 0, Battle"
 
  O Bikin "BS Auto"
  O Masukkin apa aja, biar gampang di manage pas battle..
  O Naikkin EXP 1 poin ke seisi party <== Ini kalo mau.. (gak harus)
  O Pasang " Common Event Call BS Auto di setiap troop " <== pasang di "Turn 1*X, Turn"
 
  O Bikin "BS End"
  O Trigger Run "Autorun" > "Battle Start" is ON
  O Masukkin script ' remove_master_skill '
  O Control Switch "Battle Start" ke OFF <== Ini kalo mau.. (harus!)