10-08-2009, 01:00 PM (This post was last modified: 05-19-2017, 04:10 AM by DerVVulfman.)
Blue Magic
Version: 1.0 (10.08.09 - mm/dd/yy)
by vinardo
This is a locked, single-post thread from Creation Asylum. Archived here to prevent its loss.
No support is given. If you are the owner of the thread, please contact administration.
Introduction
Your one character can learn skills form enemies (or if you want allies).
Screenshots
Demo:
demo
Script:
Script
Code:
######################################################################
# Blue Magic Script #
# by Vinardo #
######################################################################
# One of your heroes can learn Blue Magic from enemy and actors! #
# #
# It's alfa version- here can be bug's... #
######################################################################
# Sorry for my english- I'm from Poland #
######################################################################
class Game_System
alias init_blue_magic_later initialize
def initialize
init_blue_magic_later
@BLUE_MAGIC_SKILL = true
end
attr_accessor :BLUE_MAGIC_SKILL
end
class Scene_Battle
alias make_skill_action_result_blue_later make_skill_action_result
def make_skill_action_result(battler = nil, plus_id = nil)
if battler == nil
make_skill_action_result_blue_later
battler, targets = @active_battler, @target_battlers
elsif plus_id == nil
make_skill_action_result_blue_later(battler)
targets = battler.target
else
make_skill_action_result_blue_later(battler, plus_id)
targets = battler.target
end
if $game_system.BLUE_MAGIC_SKILL &&
target = targets[rand(targets.size)]
if rand(100) < $data_skills[battler.current_action.skill_id].hit
##### Number of actor (Blue Mage) Id ####
actor = $game_actors[9]#<- HERE!!!
blue_1 = $data_skills[7]
blue_2 = $data_skills[10] # blue_2 ->number of priority; $data_skills[10] blue magic skill (ICE)
blue_3 = $data_skills[13]
blue_4 = $data_skills[1]
blue_5 = $data_skills[81] ###If you need more then copy this and...###
if $game_party.actors.include?(actor)
if battler.current_action.skill_id == blue_1.id #Fire
if @es1 == true
else
skil_1 = $data_skills[blue_1.id]
actor.learn_skill(skil_1.id)
target.damage = "#{actor.name} learned #{skil_1.name}!"
@es1 = true
end