来点脚本越多越好~~~~~~~~~！等你三毛

馬路の最中陽 · 发表于 2008-3-23 18:51:49

加入我们，或者，欢迎回来。

您需要登录才可以下载或查看，没有帐号？注册会员

x

{/wx}

版务信息：本贴由楼主自主结贴～

火鸡三毛老大 · 发表于 2008-3-23 18:53:04

脚本一物品分类

module RPG
class Weapon
def description
description = @description.split(/@/)[0]
return description != nil ? description : ''
end
def desc
desc = @description.split(/@/)[1]
return desc != nil ? desc : "普通物品"
end
end
class Item
def description
description = @description.split(/@/)[0]
return description != nil ? description : ''
end
def desc
desc = @description.split(/@/)[1]
return desc != nil ? desc : "普通物品"
end
end
class Armor
def description
description = @description.split(/@/)[0]
return description != nil ? description : ''
end
def desc
desc = @description.split(/@/)[1]
return desc != nil ? desc : "普通物品"
end
end
end
class Harts_Window_ItemTitle < Window_Base
def initialize
super(0, 0, 160, 64)
self.contents = Bitmap.new(width - 32, height - 32)
self.contents.clear
self.contents.font.color = normal_color
self.contents.draw_text(4, 0, 120, 32, Vocab::item, 1)
end
end
class Harts_Window_ItemCommand < Window_Selectable
attr_accessor :commands
def initialize
super(0, 64, 160, 296)
self.index = 0
refresh
end
def addcommand
@commands = []
for i in 1...$data_items.size
if $game_party.item_number($data_items[i]) > 0
push = true
for com in @commands
if com == $data_items[i].desc
push = false
end
end
if push == true
@commands.push($data_items[i].desc)
end
end
end
for i in 1...$data_weapons.size
if $game_party.item_number($data_weapons[i]) > 0
push = true
for com in @commands
if com == $data_weapons[i].desc
push = false
end
end
if push == true
@commands.push($data_weapons[i].desc)
end
end
end
for i in 1...$data_armors.size
if $game_party.item_number($data_armors[i]) > 0
push = true
for com in @commands
if com == $data_armors[i].desc
push = false
end
end
if push == true
@commands.push($data_armors[i].desc)
end
end
end
if @commands == []
@commands.push("普通物品")
end
@item_max = @commands.size
end
def refresh
addcommand
create_contents
for i in 0...@item_max
draw_item(i, normal_color)
end
end
def draw_item(index, color)
y = index * WLH
self.contents.font.color = color
if @commands[index] != nil
self.contents.draw_text(4,y, 172, WLH, @commands[index])
end
end
def update_help
@help_window.set_text(@commands[self.index])
end
end
class Harts_Window_ItemList < Window_Selectable
def initialize
super(160, 0, 384, 360)
self.index = 0
refresh
end
def item
return @data[self.index]
end
def refresh
@data = []
end
def set_item(command)
refresh
for i in 1...$data_items.size
if $game_party.item_number($data_items[i]) > 0 and $data_items[i].desc == command
@data.push($data_items[i])
end
end
for i in 1...$data_weapons.size
if $game_party.item_number($data_weapons[i]) > 0 and $data_weapons[i].desc == command
@data.push($data_weapons[i])
end
end
for i in 1...$data_armors.size
if $game_party.item_number($data_armors[i]) > 0 and $data_armors[i].desc == command
@data.push($data_armors[i])
end
end
@item_max = @data.size
if @item_max > 0
self.contents = Bitmap.new(width - 32, row_max * 32)
self.contents.clear
for i in 0...@item_max
draw_item(i)
end
end
end
def item_number
return @item_max
end
def draw_item(index)
rect = item_rect(index)
self.contents.clear_rect(rect)
item = @data[index]
if item != nil
number = $game_party.item_number(item)
enabled = $game_party.item_can_use?(item)
rect.width -= 4
draw_item_name(item, rect.x, rect.y, enabled)
self.contents.draw_text(rect, sprintf(":%2d", number), 2)
end
end
def update_help
@help_window.set_text(self.item == nil ? "" : self.item.description)
end
end
class Harts_Window_Help < Window_Base
def initialize
super(0, 360, 544, WLH + 32)
end
def set_text(text, align = 0)
if text != @text or align != @align
self.contents.clear
self.contents.font.color = normal_color
self.contents.draw_text(4, 0, self.width - 40, WLH , text, align)
@text = text
@align = align
end
end
end
class Harts_Window_MenuStatus < Window_Selectable
def initialize(x, y)
super(x, y, 288, 416)
refresh
self.active = false
self.index = -1
end
def refresh
self.contents.clear
@item_max = $game_party.members.size
for actor in $game_party.members
x = 8
y = actor.index * 96 + WLH / 2
draw_actor_name(actor, x, y)
draw_actor_class(actor, x + 120, y)
draw_actor_level(actor, x, y + WLH * 1)
draw_actor_state(actor, x, y + WLH * 2)
draw_actor_hp(actor, x + 120, y + WLH * 1)
draw_actor_mp(actor, x + 120, y + WLH * 2)
end
end
def update_cursor
if @index < 0
self.cursor_rect.empty
elsif @index < @item_max
self.cursor_rect.set(0, @index * 96, contents.width, 96)
elsif @index >= 100
self.cursor_rect.set(0, (@index - 100) * 96, contents.width, 96)
else
self.cursor_rect.set(0, 0, contents.width, @item_max * 96)
end
end
end
class Scene_Item < Scene_Base
def start
super
create_menu_background
@viewport = Viewport.new(0, 0, 544, 416)
@itemtitle_window = Harts_Window_ItemTitle.new
@itemcommand_window = Harts_Window_ItemCommand.new
@command_index = @itemcommand_window.index
@itemcommand_window.refresh
@itemlist_window = Harts_Window_ItemList.new
@itemlist_window.active = false
@help_window = Harts_Window_Help.new
@help_window.viewport = @viewport
@target_window = Harts_Window_MenuStatus.new(96, 0)
@itemcommand_window.help_window = @help_window
@itemlist_window.help_window = @help_window
@itemlist_window.set_item(@itemcommand_window.commands[@command_index])
hide_target_window
end
def terminate
super
dispose_menu_background
@viewport.dispose
@itemtitle_window.dispose
@itemcommand_window.dispose
@itemlist_window.dispose
@help_window.dispose
@target_window.dispose
end
def return_scene
$scene = Scene_Menu.new(0)
end
def update
super
update_menu_background
@help_window.update
@itemlist_window.update
@itemcommand_window.update
@target_window.update
@itemcommand_window.refresh
if @command_index != @itemcommand_window.index
@itemlist_window.index = 0
@command_index = @itemcommand_window.index
@itemcommand_window.update_help
@itemlist_window.set_item(@itemcommand_window.commands[@command_index])
end
if @itemcommand_window.active
@itemcommand_window.update_help
update_itemcommand
elsif @itemlist_window.active
update_itemlist
elsif @target_window.active
update_target_selection
end
end
def update_itemcommand
if Input.trigger?(Input::B)
Sound.play_cancel
return_scene
return
end
if Input.trigger?(Input::C)
if @itemlist_window.item_number == 0
Sound.play_buzzer
return
end
Sound.play_decision
@itemcommand_window.active = false
@itemlist_window.index = 0
@itemlist_window.active = true
return
end
end
def update_itemlist
if Input.trigger?(Input::B)
Sound.play_cancel
@itemcommand_window.active = true
@itemlist_window.active = false
@itemcommand_window.index = @command_index
elsif Input.trigger?(Input::C)
@item = @itemlist_window.item
if @item != nil
$game_party.last_item_id = @item.id
end
if $game_party.item_can_use?(@item)
Sound.play_decision
determine_item
else
Sound.play_buzzer
end
end
end
def determine_item
if @item.for_friend?
show_target_window(@itemlist_window.index % 2 == 0)
if @item.for_all?
@target_window.index = 99
else
if $game_party.last_target_index < @target_window.item_max
@target_window.index = $game_party.last_target_index
else
@target_window.index = 0
end
end
else
use_item_nontarget
end
end
def update_target_selection
if Input.trigger?(Input::B)
Sound.play_cancel
if $game_party.item_number(@item) == 0
@itemlist_window.refresh
end
@itemlist_window.active = true
@itemlist_window.set_item(@itemcommand_window.commands[@command_index])
hide_target_window
@itemlist_window.active = true
elsif Input.trigger?(Input::C)
if not $game_party.item_can_use?(@item)
Sound.play_buzzer
else
determine_target
end
end
end
def determine_target
used = false
if @item.for_all?
for target in $game_party.members
target.item_effect(target, @item)
used = true unless target.skipped
end
else
$game_party.last_target_index = @target_window.index
target = $game_party.members[@target_window.index]
target.item_effect(target, @item)
used = true unless target.skipped
end
if used
use_item_nontarget
else
Sound.play_buzzer
end
end
def show_target_window(right)
@itemlist_window.active = false
width_remain = 544 - @target_window.width
@target_window.x = right ? width_remain : 0
@target_window.visible = true
@target_window.active = true
if right
@viewport.rect.set(0, 0, width_remain, 416)
@viewport.ox = 0
else
@viewport.rect.set(@target_window.width, 0, width_remain, 416)
@viewport.ox = @target_window.width
end
end
def hide_target_window
@target_window.visible = false
@target_window.active = false
@itemlist_window.set_item(@itemcommand_window.commands[@command_index])
@viewport.rect.set(0, 0, 544, 416)
@viewport.ox = 0
end
def use_item_nontarget
Sound.play_use_item
$game_party.consume_item(@item)
@itemlist_window.draw_item(@itemlist_window.index)
@itemlist_window.set_item(@itemcommand_window.commands[@command_index])
@target_window.refresh
if $game_party.all_dead?
$scene = Scene_Gameover.new
elsif @item.common_event_id > 0
$game_temp.common_event_id = @item.common_event_id
$scene = Scene_Map.new
end
end
end

复制代码

系统信息：本贴由楼主认可为正确答案，66RPG感谢您的热情解答～

火鸡三毛老大 · 发表于 2008-3-23 18:53:30

脚本2 技能分类

module RPG
class Skill
def description
description = @description.split(/@/)[0]
return description != nil ? description : ''
end
def desc
desc = @description.split(/@/)[1]
return desc != nil ? desc : "普通技能"
end
end
end
class Liuliu_Window_SkillCommand < Window_Selectable
attr_accessor :commands
def initialize(actor)
super(0, 0, 160, 216)
if $game_temp.in_battle
@actor = actor
else
@actor = $game_party.members[actor]
end
refresh
self.index = 0
end
def addcommand
@commands = []
for skill in @actor.skills
push = true
for com in @commands
if com == skill.desc
push = false
end
end
if push == true
@commands.push(skill.desc)
end
end
if @commands == []
@commands.push("普通技能")
end
@item_max = @commands.size
end
def refresh
addcommand
create_contents
for i in 0...@item_max
draw_item(i, normal_color)
end
end
def draw_item(index, color)
self.contents.font.color = color
y = index * WLH
self.contents.draw_text(4, y, 128, WLH, @commands[index])
end
def update_help
@help_window.set_text(@commands[self.index])
end
end
class Liuliu_Window_SkillList < Window_Selectable
def initialize(actor)
super(160, 0, 384, 360)
@actor = actor
refresh
self.index = 0
if $game_temp.in_battle
self.y = 56
self.height = 232
self.back_opacity = 200
end
end
def skill
return @data[self.index]
end
def refresh
@data = []
end
def set_item(command)
refresh
for skill in @actor.skills
if skill != nil and skill.desc == command
@data.push(skill)
end
end
@item_max = @data.size
if @item_max > 0
self.contents = Bitmap.new(width - 32, row_max * 32)
self.contents.clear
for i in 0...@item_max
draw_item(i)
end
end
end
def draw_item(index)
rect = item_rect(index)
self.contents.clear_rect(rect)
skill = @data[index]
if skill != nil
rect.width -= 4
enabled = @actor.skill_can_use?(skill)
draw_item_name(skill, rect.x, rect.y, enabled)
self.contents.draw_text(rect, @actor.calc_mp_cost(skill), 2)
end
end
def update_help
@help_window.set_text(self.skill == nil ? "" : self.skill.description)
end
end
class Temp_Window_SkillStatus < Window_Base
def initialize(actor)
super(0, 216, 160, 144)
self.contents = Bitmap.new(width - 32, height - 32)
@actor = actor
refresh
end
def refresh
self.contents.clear
draw_actor_name(@actor, 4, 0)
draw_actor_hp(@actor, 4, 32, 120)
draw_actor_mp(@actor, 4, 64, 120)
end
end
class Temp_Window_Help < Window_Base
def initialize
super(0, 360, 544, WLH + 32)
end
def set_text(text, align = 0)
if text != @text or align != @align
self.contents.clear
self.contents.font.color = normal_color
self.contents.draw_text(4, 0, self.width - 40, WLH , text, align)
@text = text
@align = align
end
end
end
class Temp_Window_MenuStatus < Window_Selectable
def initialize(x, y)
super(x, y, 288, 416)
refresh
self.active = false
self.index = -1
end
def refresh
self.contents.clear
@item_max = $game_party.members.size
for actor in $game_party.members
x = 8
y = actor.index * 96 + WLH / 2
draw_actor_name(actor, x, y)
draw_actor_class(actor, x + 120, y)
draw_actor_level(actor, x, y + WLH * 1)
draw_actor_state(actor, x, y + WLH * 2)
draw_actor_hp(actor, x + 120, y + WLH * 1)
draw_actor_mp(actor, x + 120, y + WLH * 2)
end
end
def update_cursor
if @index < 0
self.cursor_rect.empty
elsif @index < @item_max
self.cursor_rect.set(0, @index * 96, contents.width, 96)
elsif @index >= 100
self.cursor_rect.set(0, (@index - 100) * 96, contents.width, 96)
else
self.cursor_rect.set(0, 0, contents.width, @item_max * 96)
end
end
end
class Scene_Skill < Scene_Base
def initialize(actor_index = 0, equip_index = 0)
@actor_index = actor_index
end
def start
super
create_menu_background
@actor = $game_party.members[@actor_index]
@viewport = Viewport.new(0, 0, 544, 416)
@help_window = Temp_Window_Help.new
@status_window = Temp_Window_SkillStatus.new(@actor)
@itemcommand_window = Liuliu_Window_SkillCommand.new(@actor_index)
@command_index = @itemcommand_window.index
@skill_window = Liuliu_Window_SkillList.new($game_party.members[@actor_index])
@skill_window.help_window = @help_window
@skill_window.set_item(@itemcommand_window.commands[@command_index])
@target_window = Temp_Window_MenuStatus.new(96, 0)
@skill_window.active = false
hide_target_window
end
def terminate
super
dispose_menu_background
@help_window.dispose
@itemcommand_window.dispose
@status_window.dispose
@skill_window.dispose
@target_window.dispose
end
def return_scene
$scene = Scene_Menu.new(1)
end
def next_actor
@actor_index += 1
@actor_index %= $game_party.members.size
$scene = Scene_Skill.new(@actor_index)
@skill_window.active = false
end
def prev_actor
@actor_index += $game_party.members.size - 1
@actor_index %= $game_party.members.size
$scene = Scene_Skill.new(@actor_index)
@skill_window.active = false
end
def update
super
update_menu_background
@itemcommand_window.update
@help_window.update
@status_window.update
@skill_window.update
@target_window.update
if @command_index != @itemcommand_window.index
@command_index = @itemcommand_window.index
@skill_window.index = 0
@skill_window.set_item(@itemcommand_window.commands[@command_index])
end
if @itemcommand_window.active
update_itemcommand
elsif @skill_window.active
update_itemlist
elsif @target_window.active
update_target
end
end
def update_itemcommand
if Input.trigger?(Input::B)
Sound.play_cancel
return_scene
elsif Input.trigger?(Input::C)
Sound.play_decision
@itemcommand_window.active = false
@skill_window.active = true
@skill_window.index = 0
elsif Input.trigger?(Input::R)
Sound.play_cursor
next_actor
elsif Input.trigger?(Input::L)
Sound.play_cursor
prev_actor
end
end
def update_itemlist
if Input.trigger?(Input::B)
Sound.play_cancel
@itemcommand_window.active = true
@skill_window.active = false
@skill_window.index = 0
elsif Input.trigger?(Input::C)
@skill = @skill_window.skill
if @skill != nil
@actor.last_skill_id = @skill.id
end
if @actor.skill_can_use?(@skill)
Sound.play_decision
determine_skill
else
Sound.play_buzzer
end
end
end
def determine_skill
if @skill.for_friend?
show_target_window(@skill_window.index % 2 == 0)
if @skill.for_all?
@target_window.index = 99
elsif @skill.for_user?
@target_window.index = @actor_index + 100
else
if $game_party.last_target_index < @target_window.item_max
@target_window.index = $game_party.last_target_index
else
@target_window.index = 0
end
end
else
use_skill_nontarget
end
end
def update_target
if Input.trigger?(Input::B)
Sound.play_cancel
hide_target_window
@skill_window.active = true
elsif Input.trigger?(Input::C)
if not @actor.skill_can_use?(@skill)
Sound.play_buzzer
else
determine_target
end
end
end
def determine_target
used = false
if @skill.for_all?
for target in $game_party.members
target.skill_effect(@actor, @skill)
used = true unless target.skipped
end
elsif @skill.for_user?
target = $game_party.members[@target_window.index - 100]
target.skill_effect(@actor, @skill)
used = true unless target.skipped
else
$game_party.last_target_index = @target_window.index
target = $game_party.members[@target_window.index]
target.skill_effect(@actor, @skill)
used = true unless target.skipped
end
if used
use_skill_nontarget
else
Sound.play_buzzer
end
end
def show_target_window(right)
@skill_window.active = false
width_remain = 544 - @target_window.width
@target_window.x = right ? width_remain : 0
@target_window.visible = true
@target_window.active = true
if right
@viewport.rect.set(0, 0, width_remain, 416)
@viewport.ox = 0
else
@viewport.rect.set(@target_window.width, 0, width_remain, 416)
@viewport.ox = @target_window.width
end
end
def hide_target_window
@skill_window.refresh
@target_window.visible = false
@target_window.active = false
@skill_window.set_item(@itemcommand_window.commands[@command_index])
@viewport.rect.set(0, 0, 544, 416)
@viewport.ox = 0
end
def use_skill_nontarget
Sound.play_use_skill
@actor.mp -= @actor.calc_mp_cost(@skill)
@status_window.refresh
@skill_window.refresh
@target_window.refresh
if $game_party.all_dead?
$scene = Scene_Gameover.new
elsif @skill.common_event_id > 0
$game_temp.common_event_id = @skill.common_event_id
$scene = Scene_Map.new
end
end
end
class Scene_Battle < Scene_Base
def start_skill_selection
@help_window = Window_Help.new
@skill_window = Liuliu_Window_SkillList.new(@active_battler)
@skill_window.help_window = @help_window
@itemcommand_window = Liuliu_Window_SkillCommand.new(@active_battler)
@itemcommand_window.y = 56
@itemcommand_window.height = 232
@itemcommand_window.active = true
@itemcommand_window.back_opacity = 200
@itemcommand_window.help_window = @help_window
@command_index = @itemcommand_window.index
@skill_window.set_item(@itemcommand_window.commands[@command_index])
@actor_command_window.active = false
@skill_window.active = false
end
def end_skill_selection
if @skill_window != nil
@skill_window.dispose
@skill_window = nil
@help_window.dispose
@help_window = nil
@itemcommand_window.dispose
@itemcommand_window = nil
end
@actor_command_window.active = true
end
def update_skill_selection
@skill_window.visible = true
@itemcommand_window.visible = true
@itemcommand_window.update
if @command_index != @itemcommand_window.index
@command_index = @itemcommand_window.index
@skill_window.set_item(@itemcommand_window.commands[@command_index])
@skill_window.index = 0
end
@skill_window.update
@help_window.update
if Input.trigger?(Input::B)
Sound.play_cancel
if @skill_window.active == true then
@itemcommand_window.active = true
@skill_window.active = false
else
end_skill_selection
end
elsif Input.trigger?(Input::C)
if @skill_window.active == false
@skill_window.active = true
@itemcommand_window.active = false
Sound.play_decision
return
end
@skill = @skill_window.skill
if @skill != nil
@active_battler.last_skill_id = @skill.id
end
if @active_battler.skill_can_use?(@skill)
Sound.play_decision
determine_skill
else
Sound.play_buzzer
end
end
end
def determine_skill
@active_battler.action.set_skill(@skill.id)
@skill_window.active = false
if @skill.need_selection?
if @skill.for_opponent?
start_target_enemy_selection
else
start_target_actor_selection
end
else
end_skill_selection
next_actor
end
end
end

复制代码

火鸡三毛老大 · 发表于 2008-3-23 18:53:55

脚本3 加强对话框

#==============================================================================
#superufo版加强对话框
#新增功能：
#1.\h[X]：更改字号为X（X〈32）
#2.\o[X]：更改透明度为X（模拟悄悄话？）
#3.\u[XXXXXX]：直接以十六进制指定颜色
#4.\i[X]：显示X号物品名
#5.\s[X]：显示X号技能名
#6.\w[X]：显示X号武器名
#7.\a[X]：显示X号防具名
#原有功能:
#8.\c[X]：将颜色调整为X（0〈=X〈=15）
#9.\n[X]：显示X号同伴名
#10.\v[X]：显示X号变量
#11.\g：显示金钱窗口
#12.\.：停滞1/4秒
#13.\|：停滞1秒
#14.\!：等待输入？？？
#15.\>：开启瞬间输入
#16.\<：关闭瞬间输入
#17.\^：等待输入的无？？？
#18.\\：显示“\”这个符号
#==============================================================================
class Window_Message < Window_Selectable
MAX_LINE = 4
def initialize
super(0, 288, 544, 128)
self.z = 200
self.active = false
self.index = -1
self.openness = 0
@opening = false
@closing = false
@text = nil
@contents_x = 0
@contents_y = 0
@line_count = 0
@wait_count = 0
@background = 0
@position = 2
@show_fast = false
@line_show_fast = false
@pause_skip = false
create_gold_window
create_number_input_window
create_back_sprite
end
def dispose
super
dispose_gold_window
dispose_number_input_window
dispose_back_sprite
end
def update
super
update_gold_window
update_number_input_window
update_back_sprite
update_show_fast
unless @opening or @closing
if @wait_count > 0
@wait_count -= 1
elsif self.pause
input_pause
elsif self.active
input_choice
elsif @number_input_window.visible
input_number
elsif @text != nil
update_message
elsif continue?
start_message
open
$game_message.visible = true
else
close
$game_message.visible = @closing
end
end
end
def create_gold_window
@gold_window = Window_Gold.new(384, 0)
@gold_window.openness = 0
end
def create_number_input_window
@number_input_window = Window_NumberInput.new
@number_input_window.visible = false
end
def create_back_sprite
@back_sprite = Sprite.new
@back_sprite.bitmap = Cache.system("MessageBack")
@back_sprite.visible = (@background == 1)
@back_sprite.z = 190
end
def dispose_gold_window
@gold_window.dispose
end
def dispose_number_input_window
@number_input_window.dispose
end
def dispose_back_sprite
@back_sprite.dispose
end
def update_gold_window
@gold_window.update
end
def update_number_input_window
@number_input_window.update
end
def update_back_sprite
@back_sprite.visible = (@background == 1)
@back_sprite.y = y - 16
@back_sprite.opacity = openness
@back_sprite.update
end
def update_show_fast
if self.pause or self.openness < 255
@show_fast = false
elsif Input.trigger?(Input::C) and @wait_count < 2
@show_fast = true
elsif not Input.press?(Input::C)
@show_fast = false
end
if @show_fast and @wait_count > 0
@wait_count -= 1
end
end
def continue?
return true if $game_message.num_input_variable_id > 0
return false if $game_message.texts.empty?
if self.openness > 0 and not $game_temp.in_battle
return false if @background != $game_message.background
return false if @position != $game_message.position
end
return true
end
def start_message
@text = ""
for i in 0...$game_message.texts.size
@text += "　　" if i >= $game_message.choice_start
@text += $game_message.texts[i].clone + "\x00"
end
@item_max = $game_message.choice_max
convert_special_characters
reset_window
new_page
end
def new_page
contents.clear
if $game_message.face_name.empty?
@contents_x = 0
else
name = $game_message.face_name
index = $game_message.face_index
draw_face(name, index, 0, 0)
@contents_x = 112
end
@contents_y = 0
@line_count = 0
@show_fast = false
@line_show_fast = false
@pause_skip = false
contents.font.color = text_color(0)
end
def new_line
if $game_message.face_name.empty?
@contents_x = 0
else
@contents_x = 112
end
@contents_y += WLH
@line_count += 1
@line_show_fast = false
end
def convert_special_characters
@text.gsub!(/\\V\[([0-9]+)\]/i) { $game_variables[$1.to_i] }
@text.gsub!(/\\V\[([0-9]+)\]/i) { $game_variables[$1.to_i] }
@text.gsub!(/\\N\[([0-9]+)\]/i) { $game_actors[$1.to_i].name }
@text.gsub!(/\\I\[([0-9]+)\]/i) { $data_items[$1.to_i].name }
@text.gsub!(/\\S\[([0-9]+)\]/i) { $data_skills[$1.to_i].name }
@text.gsub!(/\\W\[([0-9]+)\]/i) { $data_weapons[$1.to_i].name }
@text.gsub!(/\\A\[([0-9]+)\]/i) { $data_armors[$1.to_i].name }
@text.gsub!(/\\C\[([0-9]+)\]/i) { "\x01[#{$1}]" }
@text.gsub!(/\\G/) { "\x02" }
@text.gsub!(/\\\./) { "\x03" }
@text.gsub!(/\\\|/) { "\x04" }
@text.gsub!(/\\!/) { "\x05" }
@text.gsub!(/\\>/) { "\x06" }
@text.gsub!(/\\</) { "\x07" }
@text.gsub!(/\\\^/) { "\x08" }
@text.gsub!(/\\O\[([0-9]+)\]/i) { "\x09[#{$1}]" }
@text.gsub!(/\\H\[([0-9]+)\]/i) { "\x10[#{$1}]" }
@text.gsub!(/\\U\[([0-9A-Fa-f]{6})\]/) { "\x11[#{$1}]" }
@text.gsub!(/\\\\/) { "\\" }
end
def reset_window
@background = $game_message.background
@position = $game_message.position
if @background == 0
self.opacity = 255
else
self.opacity = 0
end
case @position
when 0
self.y = 0
@gold_window.y = 360
when 1
self.y = 144
@gold_window.y = 0
when 2
self.y = 288
@gold_window.y = 0
end
end
def terminate_message
self.active = false
self.pause = false
self.index = -1
@gold_window.close
@number_input_window.active = false
@number_input_window.visible = false
$game_message.main_proc.call if $game_message.main_proc != nil
$game_message.clear
end
def update_message
loop do
c = @text.slice!(/./m)
case c
when nil
finish_message
break
when "\x00"
new_line
if @line_count >= MAX_LINE
unless @text.empty?
self.pause = true
break
end
end
when "\x01"
@text.sub!(/\[([0-9]+)\]/, "")
contents.font.color = text_color($1.to_i)
next
when "\x02"
@gold_window.refresh
@gold_window.open
when "\x03"
@wait_count = 15
break
when "\x04"
@wait_count = 60
break
when "\x05"
self.pause = true
break
when "\x06"
@line_show_fast = true
when "\x07"
@line_show_fast = false
when "\x08"
@pause_skip = true
when "\x09"
@text.sub!(/\[([0-9]+)\]/, "")
self.contents.font.color.alpha = [[0, $1.to_i].max, 255].min
next
when "\x10"
@text.sub!(/\[([0-9]+)\]/, "")
self.contents.font.size = [[$1.to_i, 6].max, 32].min
next
when "\x11"
@text.sub!(/\[([0-9A-Fa-f]{2})([0-9A-Fa-f]{2})([0-9A-Fa-f]{2})\]/, "")
self.contents.font.color = Color.new($1.to_i(16), $2.to_i(16), $3.to_i(16), 255)
next
else
contents.draw_text(@contents_x, @contents_y, 40, 32, c)
c_width = contents.text_size(c).width
@contents_x += c_width
end
break unless @show_fast or @line_show_fast
end
end
def finish_message
if $game_message.choice_max > 0
start_choice
elsif $game_message.num_input_variable_id > 0
start_number_input
elsif @pause_skip
terminate_message
else
self.pause = true
end
@wait_count = 10
@text = nil
end
def start_choice
self.active = true
self.index = 0
end
def start_number_input
digits_max = $game_message.num_input_digits_max
number = $game_variables[$game_message.num_input_variable_id]
@number_input_window.digits_max = digits_max
@number_input_window.number = number
if $game_message.face_name.empty?
@number_input_window.x = x
else
@number_input_window.x = x + 112
end
@number_input_window.y = y + @contents_y
@number_input_window.active = true
@number_input_window.visible = true
@number_input_window.update
end
def update_cursor
if @index >= 0
x = $game_message.face_name.empty? ? 0 : 112
y = ($game_message.choice_start + @index) * WLH
self.cursor_rect.set(x, y, contents.width - x, WLH)
else
self.cursor_rect.empty
end
end
def input_pause
if Input.trigger?(Input::B) or Input.trigger?(Input::C)
self.pause = false
if @text != nil and not @text.empty?
new_page if @line_count >= MAX_LINE
else
terminate_message
end
end
end
def input_choice
if Input.trigger?(Input::B)
if $game_message.choice_cancel_type > 0
Sound.play_cancel
$game_message.choice_proc.call($game_message.choice_cancel_type - 1)
terminate_message
end
elsif Input.trigger?(Input::C)
Sound.play_decision
$game_message.choice_proc.call(self.index)
terminate_message
end
end
def input_number
if Input.trigger?(Input::C)
Sound.play_decision
$game_variables[$game_message.num_input_variable_id] =
@number_input_window.number
$game_map.need_refresh = true
terminate_message
end
end
end

复制代码

火鸡三毛老大 · 发表于 2008-3-23 18:54:20

脚本4 美化战斗选项

#==============================================================================
# 本脚本来自www.66RPG.com，使用和转载请保留此信息
#==============================================================================
# ■ Window_ActorCommand
#------------------------------------------------------------------------------
# 　战斗画面显示角色指令的窗口。
#==============================================================================
class Window_ActorCommand < Window_Selectable
#--------------------------------------------------------------------------
# ● 定义实例变量
#--------------------------------------------------------------------------
attr_reader :commands # 命令
#--------------------------------------------------------------------------
# ● 初始化对象
# width : 窗口的宽
# commands : 命令字符串序列
# column_max : 行数 (2 行以上时选择)
# row_max : 列数 (0:列数加起来)
# spacing : 选项横向排列时间隔空白宽度
#--------------------------------------------------------------------------
def initialize(width = 128, commands = [], column_max = 1, row_max = 4, spacing = 32)
if row_max == 0
row_max = (commands.size + column_max - 1) / column_max
end
super(0, 0, width, row_max * WLH + 32, spacing)
self.active = false
@commands = []
@icon_list = [1, 52, 128, 144]
@item_max = commands.size
@column_max = column_max
@remember_index = -1
self.index = 0
# refresh
update
end
#--------------------------------------------------------------------------
# ● 刷新
#--------------------------------------------------------------------------
def refresh
self.contents.clear
for i in 0...@item_max
draw_item(i)
end
end
#--------------------------------------------------------------------------
# ● 设置自定义特技指令名称
# actor :角色
#--------------------------------------------------------------------------
def setup(actor)
s1 = Vocab::attack
s2 = Vocab::skill
s3 = Vocab::guard
s4 = Vocab::item
if actor.class.skill_name_valid # 特技指令名称有效？
s2 = actor.class.skill_name # 替换指令名
end
@commands = [s1, s2, s3, s4]
@item_max = 4
refresh
self.index = 0
end
#--------------------------------------------------------------------------
# ● 描绘项目
# index : 项目编号
# enabled : 有效标记录。是false 的时候半透明绘画
#--------------------------------------------------------------------------
def draw_item(index, enabled = true)
rect = item_rect(index)
rect.x += 4
rect.width -= 8
self.contents.clear_rect(rect)
draw_icon(@icon_list[index], rect.x, rect.y, true) if index == self.index
self.contents.font.color = normal_color
self.contents.font.color.alpha = enabled ? 255 : 128
rect.x += 26
self.contents.draw_text(rect, @commands[index])
end
#--------------------------------------------------------------------------
# ● 刷新类型
#--------------------------------------------------------------------------
def update
super
@remember_index = self.index if self.index == -1
if @remember_index != self.index
@remember_index = self.index
refresh
end
end
end

复制代码

火鸡三毛老大 · 发表于 2008-3-23 18:54:41

脚本6 华丽镜头移动脚本

#==============================================================================
# ■ 华丽镜头移动脚本 by ChenWei
#------------------------------------------------------------------------------
# 　1-插入此段脚本到Main前面
# 2-功能
# a-[镜头平滑移动到事件/角色]
# 在事件里的[设置移动路线]里选择需要镜头转向的角色输入脚本kds即可
# b-[镜头跟随事件]
# 在事件里的[设置移动路线]选择好需要跟随的事件后输入脚本kds_move_start开
# 始跟随，当不想跟随时再输入kds_move_over
#==============================================================================
class Game_Map
attr_accessor :display_x # 显示 X 坐标 * 256
attr_accessor :display_y # 显示 Y 坐标 * 256
end
$平滑移动 = nil
class Scene_Map
alias kds_update update
def update
kds_update
if $平滑移动 != nil
cen_x = Game_Character::CENTER_X
cen_y = Game_Character::CENTER_Y
max_x = ($game_map.width - 17) * 256
max_y = ($game_map.height - 13) * 256
display_x = [0, [$平滑移动.x * 256 - cen_x, max_x].min].max
display_y = [0, [$平滑移动.y * 256 - cen_y, max_y].min].max
if $game_map.display_x != display_x
if ($game_map.display_x - display_x).abs < 22
$game_map.display_x = display_x
else
$game_map.display_x += (display_x - $平滑移动.old_display_x)/32
end
end
if $game_map.display_y != display_y
if ($game_map.display_y - display_y).abs <= 22
$game_map.display_y = display_y
else
$game_map.display_y += (display_y - $平滑移动.old_display_y)/32
end
end
if $game_map.display_x == display_x and $game_map.display_y == display_y
$平滑移动.center($平滑移动.x, $平滑移动.y)
$平滑移动 = nil
end
return
end
end
end
class Game_Character
CENTER_X = (544 / 2 - 16) * 8 # 画面中央的 X 坐标 * 8
CENTER_Y = (416 / 2 - 16) * 8 # 画面中央的 Y 坐标 * 8
attr_accessor :old_display_x
attr_accessor :old_display_y
attr_accessor :kds_move
def center(x, y)
max_x = ($game_map.width - 17) * 256
max_y = ($game_map.height - 13) * 256
$game_map.display_x = [0, [x * 256 - CENTER_X, max_x].min].max
$game_map.display_y = [0, [y * 256 - CENTER_Y, max_y].min].max
end
def kds
@old_display_x = $game_map.display_x
@old_display_y = $game_map.display_y
case @id
when 0
$平滑移动 = $game_player
else
$平滑移动 = $game_map.events[@id]
end
end
def kds_move_start
@kds_move = ""
end
def kds_move_over
@kds_move = nil
end
alias kds_update update
def update
last_real_x = @real_x
last_real_y = @real_y
kds_update
if @kds_move != nil
if @real_y > last_real_y and @real_y - $game_map.display_y > CENTER_Y
$game_map.scroll_down(@real_y - last_real_y)
end
if @real_x < last_real_x and @real_x - $game_map.display_x < CENTER_X
$game_map.scroll_left(last_real_x - @real_x)
end
if @real_x > last_real_x and @real_x - $game_map.display_x > CENTER_X
$game_map.scroll_right(@real_x - last_real_x)
end
if @real_y < last_real_y and @real_y - $game_map.display_y < CENTER_Y
$game_map.scroll_up(last_real_y - @real_y)
end
end
end
end
#==============================================================================

复制代码

火鸡三毛老大 · 发表于 2008-3-23 18:55:45

脚本7 多体攻击

#==============================================================================
#VX里自带脚本为多体连击哦！
#在技能名称后面加入",X连击次数"即可
#X一定要大写
#否则系统当成普通攻击
#注意！有连击效果的千万别点效果范围里的敌多体
#==============================================================================
class Scene_Battle < Scene_Base
def execute_action_skill
skill = @active_battler.action.skill
name = skill.name
if name.split(/,/)[0]
if name != nil
kill = name.split(/X/)[1]
if kill == nil or kill == ""
kill = 1
end
#p kill
#p name
end
end
for ii in 1..kill.to_i
skill = @active_battler.action.skill
text = @active_battler.name + skill.message1
@message_window.add_instant_text(text)
unless skill.message2.empty?
wait(10)
@message_window.add_instant_text(skill.message2)
end
targets = @active_battler.action.make_targets
display_animation(targets, skill.animation_id)
@active_battler.mp -= @active_battler.calc_mp_cost(skill)
$game_temp.common_event_id = skill.common_event_id
for target in targets
target.skill_effect(@active_battler, skill)
display_action_effects(target, skill)
end
end
end
end

复制代码

火鸡三毛老大 · 发表于 2008-3-23 18:56:19

脚本8 光标选择敌人放在System的图

#==============================================================================
#本脚本来自66RPG，如需转载请保留本信息。
#==============================================================================
# ■ Arrow_Base
#------------------------------------------------------------------------------
# 　在战斗画面使用的箭头光标的活动块。本类作为
# Arrow_Enemy 类与 Arrow_Actor 类的超级类使用。
#==============================================================================
class Arrow_Base < Sprite
#--------------------------------------------------------------------------
# ● 定义实例变量
#--------------------------------------------------------------------------
attr_reader :index # 光标位置
attr_reader :help_window # 帮助窗口
#--------------------------------------------------------------------------
# ● 初始化对像
# viewport : 显示端口
#--------------------------------------------------------------------------
def initialize(viewport)
super(viewport)
self.bitmap = Cache.system("Arrow")
self.ox = 16
self.oy = 64
self.z = 2500
@blink_count = 0
@index = 0
@help_window = nil
update
end
#--------------------------------------------------------------------------
# ● 设置光标位置
# index : 新的光标位置
#--------------------------------------------------------------------------
def index=(index)
@index = index
update
end
#--------------------------------------------------------------------------
# ● 设置帮助窗口
# help_window : 新的帮助窗口
#--------------------------------------------------------------------------
def help_window=(help_window)
@help_window = help_window
# 刷新帮助文本 (update_help 定义了继承目标)
if @help_window != nil
update_help
end
end
#--------------------------------------------------------------------------
# ● 刷新画面
#--------------------------------------------------------------------------
def update
# 刷新点灭记数
@blink_count = (@blink_count + 1) % 12
# 设置传送源矩形
if @blink_count < 6
self.src_rect.set(0, 0, 32, 32)
else
self.src_rect.set(32, 0, 32, 32)
end
# 刷新帮助文本 (update_help 定义了继承目标)
if @help_window != nil
update_help
end
end
end
#==============================================================================
# ■ Arrow_Enemy
#------------------------------------------------------------------------------
# 　选择敌人的箭头光标。本类继承 Arrow_Base
# 类。
#==============================================================================
class Arrow_Enemy < Arrow_Base
#--------------------------------------------------------------------------
# ● 获取光标指向的敌人
#--------------------------------------------------------------------------
def enemy
return $game_troop.members[@index]
end
def dispose
@enemy.loop_white_flash = false unless @enemy.nil?
super
end
#--------------------------------------------------------------------------
# ● 刷新画面
#--------------------------------------------------------------------------
def update
super
if @enemy != enemy and enemy.exist?
@enemy.loop_white_flash = false unless @enemy.nil?
enemy.loop_white_flash = true
@enemy = enemy
end
# 如果指向不存在的敌人就离开
$game_troop.members.size.times do
break if self.enemy.exist?
@index += 1
@index %= $game_troop.members.size
end
# 光标右
if Input.repeat?(Input::RIGHT) or Input.repeat?(Input::DOWN)
Sound.play_cursor
$game_troop.members.size.times do
@index += 1
@index %= $game_troop.members.size
break if self.enemy.exist?
end
end
# 光标左
if Input.repeat?(Input::LEFT) or Input.repeat?(Input::UP)
Sound.play_cursor
$game_troop.members.size.times do
@index += $game_troop.members.size - 1
@index %= $game_troop.members.size
break if self.enemy.exist?
end
end
# 设置活动块坐标
if self.enemy != nil
self.x = self.enemy.screen_x
self.y = self.enemy.screen_y
end
end
#--------------------------------------------------------------------------
# ● 刷新帮助文本
#--------------------------------------------------------------------------
def update_help
# 帮助窗口显示敌人的名字与状态
@help_window.set_enemy(self.enemy)
end
end
class Scene_Battle ##
#--------------------------------------------------------------------------
# ● 更新画面
#--------------------------------------------------------------------------
def update
super
update_basic(true)
update_info_viewport # 更新显示信息的视区
if $game_message.visible
@info_viewport.visible = false
@message_window.visible = true
end
unless $game_message.visible # 在显示消息以外的情况
return if judge_win_loss # 判断胜败
update_scene_change
if @enemy_arrow != nil
update_target_enemy_selection # 选择敌方对象
elsif @target_actor_window != nil
update_target_actor_selection # 选择对象角色
elsif @skill_window != nil
update_skill_selection # 选择特技
elsif @item_window != nil
update_item_selection # 选择物品
elsif @party_command_window.active
update_party_command_selection # 选择同伴指令
elsif @actor_command_window.active
update_actor_command_selection # 选择角色指令
else
process_battle_event # 战斗处理
process_action # 战斗行动
process_battle_event # 处理战斗事件
end
end
end
def set_window(visible)
if !@skill_window.nil?
@skill_window.visible = visible
elsif !@item_window.nil?
@item_window.visible = visible
end
end
#--------------------------------------------------------------------------
# ● 开始选择对象的敌方角色
#--------------------------------------------------------------------------
def start_target_enemy_selection
set_window(false)
@enemy_arrow = Arrow_Enemy.new(@spriteset.viewport3)
@enemy_window = Window_Enemy.new(176,0)
@enemy_arrow.help_window = @enemy_window
@actor_command_window.active = false
end
#--------------------------------------------------------------------------
# ● 选择对象敌方角色结束
#--------------------------------------------------------------------------
def end_target_enemy_selection
@enemy_arrow.dispose
@enemy_arrow = nil
@enemy_window.dispose
set_window(true)
if @actor_command_window.index == 0
@actor_command_window.active = true
end
end
#--------------------------------------------------------------------------
# ● 更新选择对象敌方角色
#--------------------------------------------------------------------------
def update_target_enemy_selection
@enemy_arrow.update
if Input.trigger?(Input::B)
Sound.play_cancel
end_target_enemy_selection
elsif Input.trigger?(Input::C)
Sound.play_decision
@active_battler.action.target_index = @enemy_arrow.enemy.index
end_target_enemy_selection
end_skill_selection
end_item_selection
next_actor
end
end
end
class Spriteset_Battle ##
def viewport3
return @viewport3
end
end
class Game_Battler
attr_accessor :loop_white_flash # 循环白色闪烁标记
end
class Sprite_Battler ##
alias old_setup_new_effect setup_new_effect
def setup_new_effect
if @battler.loop_white_flash and @effect_duration == 0
@battler.white_flash = true
end
old_setup_new_effect
end
end
#==============================================================================
# ■ Window_Enemy
#------------------------------------------------------------------------------
# 　显示敌人信息的窗口，光标Arrow用。
#==============================================================================
class Window_Enemy < Window_Base
#--------------------------------------------------------------------------
# ● 初始化窗口
# x : 窗口的X坐标
# y : 窗口的Y坐标
#--------------------------------------------------------------------------
def initialize(x, y)
super(x, y, 288, WLH * 2 + 32)
#~ self.opacity = 0
end
#--------------------------------------------------------------------------
# ● 设置文本
# text : 窗口显示的字符串
# align : 对齐方式 (0..左对齐、1..中间对齐、2..右对齐)
#--------------------------------------------------------------------------
def set_text(text, align = 0)
# 如果文本和对齐方式的至少一方与上次的不同
if text != @text or align != @align
# 再描绘文本
self.contents.clear
self.contents.font.color = normal_color
self.contents.draw_text(4, 0, self.width - 40, 32, text, align)
@text = text
@align = align
@actor = nil
end
self.visible = true
end
#--------------------------------------------------------------------------
# ● 设置敌人
# enemy : 要显示名字和状态的敌人
#--------------------------------------------------------------------------
def set_enemy(enemy)
if @enemy != enemy
text = enemy.name
set_text(text)
w = enemy.states.size * 24
draw_actor_state(enemy, contents.width - w , 0, w)
draw_actor_hp(enemy, 0 , WLH )
draw_actor_mp(enemy, contents.width - 120 , WLH )
@enemy = enemy
end
end
end

复制代码

火鸡三毛老大 · 发表于 2008-3-23 19:00:02

脚本9 行走图横版战斗

#==============================================================================
# ■ 行走图横版战斗[Ver.1.0.1]
#------------------------------------------------------------------------------
# 脚本原出处 [http://www.rpgcrisis.net]
#------------------------------------------------------------------------------
#==============================================================================
module Battle_Formation
#------------------------------------------------------------------------------
FORM = {
# 战斗位置 =>
# [角色1x.y] [角色2x.y] [角色3x.y] [角色4x.y]
0 => [[380,150], [400, 230], [460, 170], [480, 250]]
}
#------------------------------------------------------------------------------
end
#==============================================================================
# ■ Game_System
#==============================================================================
class Game_System
attr_accessor :battle_formation # Formation ID
#--------------------------------------------------------------------------
# ● オブジェクト初期化
#--------------------------------------------------------------------------
alias init_game_system initialize
def initialize
init_game_system
@battle_formation = 0 # 初步形成
end
end
#==============================================================================
# ■ Game_Actor
#==============================================================================
class Game_Actor < Game_Battler
#--------------------------------------------------------------------------
# ● 是Sprite的使用？ [重新界定]
#--------------------------------------------------------------------------
def use_sprite?
return true
end
#--------------------------------------------------------------------------
# ● 战斗画面获取X坐标
#--------------------------------------------------------------------------
def screen_x
return Battle_Formation::FORM[$game_system.battle_formation][self.index][0]
end
#--------------------------------------------------------------------------
# ● 战斗画面获取Y坐标
#--------------------------------------------------------------------------
def screen_y
return Battle_Formation::FORM[$game_system.battle_formation][self.index][1]
end
#--------------------------------------------------------------------------
# ● 战斗画面获取z坐标
#--------------------------------------------------------------------------
def screen_z
bitmap = Cache.character(self.character_name)
# Height + Y Coordinates
return screen_y + bitmap.height / 4
end
end
#==============================================================================
# ■ Game_Enemy
#==============================================================================
class Game_Enemy < Game_Battler
#--------------------------------------------------------------------------
# ● 战斗画面获取z坐标[重新界定]
#--------------------------------------------------------------------------
def screen_z
bitmap = Cache.battler(self.battler_name, self.battler_hue)
# Height + Y Coordinates
return screen_y + bitmap.height
end
end
#==============================================================================
# ■ VX-RGSS2-6 サイドビュー战斗[Ver.1.0.1]
#------------------------------------------------------------------------------
# 战斗实况告知
#==============================================================================
#==============================================================================
# ■ Scene_Battle
#==============================================================================
class Scene_Battle < Scene_Base
#--------------------------------------------------------------------------
# ● 战斗开始进程
#--------------------------------------------------------------------------
alias process_battle_start_sideview process_battle_start
def process_battle_start
for battler in $game_party.members + $game_troop.members
battler.move_mode = SideView::M_MODE_WAIT
end
process_battle_start_sideview
end
#--------------------------------------------------------------------------
# ● 胜利进程
#--------------------------------------------------------------------------
alias process_victory_sideview process_victory
def process_victory
for actor in $game_party.members
actor.move_mode = SideView::M_MODE_WIN
end
process_victory_sideview
end
#--------------------------------------------------------------------------
# ● 等到活动控制完毕
#--------------------------------------------------------------------------
def wait_for_motion
while @active_battler.motion_stop
update_basic
end
end
#--------------------------------------------------------------------------
# ● 执行作战：攻击[重新界定]
#--------------------------------------------------------------------------
def execute_action_attack
text = sprintf(Vocab::DoAttack, @active_battler.name)
@message_window.add_instant_text(text)
targets = @active_battler.action.make_targets
#---Enemy attack sound reproduced.
if @active_battler.is_a?(Game_Enemy)
Sound.play_enemy_attack
wait(15, true)
end
#--- Proximity (Going)
SideView.set_target_point(@active_battler, targets[0])
@active_battler.move_mode = SideView::M_MODE_ATK1
@active_battler.motion_stop = true
wait_for_motion
#--- Attack
wait(5)
@active_battler.move_mode = SideView::M_MODE_ATK2
#---
display_attack_animation(targets)
wait(20)
for target in targets
target.attack_effect(@active_battler)
display_action_effects(target)
end
#--- Proximity (Return)
@active_battler.move_mode = SideView::M_MODE_ATK3
@active_battler.motion_stop = true
wait_for_motion
#---Wait
for target in targets
target.move_mode = SideView::M_MODE_WAIT
end
@active_battler.move_mode = SideView::M_MODE_WAIT
#---
end
#--------------------------------------------------------------------------
# ● 执行作战：技能[重新界定]
#--------------------------------------------------------------------------
def execute_action_skill
skill = @active_battler.action.skill
text = @active_battler.name + skill.message1
@message_window.add_instant_text(text)
unless skill.message2.empty?
wait(10)
@message_window.add_instant_text(skill.message2)
end
#--- Enemy attack sound reproduced.
if @active_battler.is_a?(Game_Enemy)
Sound.play_enemy_attack
wait(15, true)
end
#--- Long distance attack.
@active_battler.move_mode = SideView::M_MODE_MAGI
#---
targets = @active_battler.action.make_targets
display_animation(targets, skill.animation_id)
@active_battler.mp -= @active_battler.calc_mp_cost(skill)
$game_temp.common_event_id = skill.common_event_id
for target in targets
target.skill_effect(@active_battler, skill)
display_action_effects(target, skill)
end
#---Wait
for target in targets
target.move_mode = SideView::M_MODE_WAIT
end
@active_battler.move_mode = SideView::M_MODE_WAIT
#---
end
#--------------------------------------------------------------------------
# 执行作战：物品???[重新界定]
#--------------------------------------------------------------------------
def execute_action_item
item = @active_battler.action.item
text = sprintf(Vocab::UseItem, @active_battler.name, item.name)
@message_window.add_instant_text(text)
#--- Enemy attack sound reproduced.
if @active_battler.is_a?(Game_Enemy)
Sound.play_enemy_attack
wait(15, true)
end
#--- Long distance attack
@active_battler.move_mode = SideView::M_MODE_MAGI
#---
targets = @active_battler.action.make_targets
display_animation(targets, item.animation_id)
$game_party.consume_item(item)
$game_temp.common_event_id = item.common_event_id
for target in targets
target.item_effect(@active_battler, item)
display_action_effects(target, item)
end
#---Wait
for target in targets
target.move_mode = SideView::M_MODE_WAIT
end
@active_battler.move_mode = SideView::M_MODE_WAIT
#---
end
#--------------------------------------------------------------------------
# ● 攻击动画展示[重新界定]
# 对象：对象的安排
#--------------------------------------------------------------------------
# 【改变一部分】
# 敌人的声音效果是改变了，所以可以用在每一个阶段的运作情况。
# 它改变了，所以这起攻击动画的一个敌人可以被显示出来。
#--------------------------------------------------------------------------
def display_attack_animation(targets)
display_normal_animation(targets, @active_battler.atk_animation_id, false)
display_normal_animation(targets, @active_battler.atk_animation_id2, true)
wait_for_animation
end
#--------------------------------------------------------------------------
# ● HP损害显示[重新界定]
# 对象：候选人
# 对象：技能，还是物品?
#--------------------------------------------------------------------------
def display_hp_damage(target, obj = nil)
if target.hp_damage == 0 # 任何破坏
return if obj != nil and obj.damage_to_mp
return if obj != nil and obj.base_damage == 0
fmt = target.actor? ? Vocab::ActorNoDamage : Vocab::EnemyNoDamage
text = sprintf(fmt, target.name)
elsif target.absorbed # 吸收
fmt = target.actor? ? Vocab::ActorDrain : Vocab::EnemyDrain
text = sprintf(fmt, target.name, Vocab::hp, target.hp_damage)
elsif target.hp_damage > 0 # 损坏
if target.actor?
text = sprintf(Vocab::ActorDamage, target.name, target.hp_damage)
Sound.play_actor_damage
$game_troop.screen.start_shake(5, 5, 10)
target.blink = true # Only adds here
else
text = sprintf(Vocab::EnemyDamage, target.name, target.hp_damage)
Sound.play_enemy_damage
target.blink = true
end
else # 回收
fmt = target.actor? ? Vocab::ActorRecovery : Vocab::EnemyRecovery
text = sprintf(fmt, target.name, Vocab::hp, -target.hp_damage)
Sound.play_recovery
end
@message_window.add_instant_text(text)
wait(30)
end
end
#==============================================================================
# ■ VX-RGSS2-6 サイドビュー战斗[Ver.1.0.1]
#------------------------------------------------------------------------------
module SideView
#----------------------------------------------------------------------------
#-----[运行格局]-----
#运行速度
MOTION_SPEED = 20
#-----[アニメーション設定]-----
# 通常敌人攻击动画设置
E_ANIME = {
# EnemyID => [Usually atttack and additional attack animations.]
1 => [1, 0]
}
#----------------------------------------------------------------------------
#----------------------------------------------------------------------------
# Motion Control Mode
M_MODE_WAIT = 0 # Standby
M_MODE_MAGI = 1 # Attack
M_MODE_DAMG = 2 # Non-Damage Attack
M_MODE_WIN = 3 # Victory
M_MODE_ATK1 = 4 # Direct Attack (Approaching)
M_MODE_ATK2 = 5 # Direct Attack (Attacking)
M_MODE_ATK3 = 6 # Direct Attack (Returning)
module_function
#--------------------------------------------------------------------------
# ● 活动区域计算
#--------------------------------------------------------------------------
def set_target_point(attacker, target)
case target
when Game_Actor
bits = Cache.character(target.character_name)
attacker.target_x = target.screen_x + (bits.width / 8)
attacker.target_y = target.screen_y
when Game_Enemy
bits = Cache.battler(target.battler_name, target.battler_hue)
attacker.target_x = target.screen_x + (bits.width / 2)
attacker.target_y = target.screen_y
end
end
end
class Game_Battler
attr_accessor :move_mode # Operation Mode
# 0:Standby 1:Attack 2: Un-useless 3:Victory
attr_accessor :motion_stop # Operation Stop Flag (Under Movement Flag)
attr_accessor :target_x # Move Position(x)
attr_accessor :target_y # Move Position(y)
#--------------------------------------------------------------------------
# ● 对象初始化
#--------------------------------------------------------------------------
alias initialize_sdva_corpse initialize
def initialize
initialize_sdva_corpse
@move_mode = 0
@motion_stop = false
@target_x = 0
@target_y = 0
end
end
#==============================================================================
# ■ Game_Enemy
#==============================================================================
class Game_Enemy < Game_Battler
#--------------------------------------------------------------------------
# ● 攻击动画ID采集
#--------------------------------------------------------------------------
def atk_animation_id
return 0 if SideView::E_ANIME[@enemy_id].nil?
return SideView::E_ANIME[@enemy_id][0]
end
#--------------------------------------------------------------------------
# ● 攻击动画ID采集（ 2剑式： 2武器）
#--------------------------------------------------------------------------
def atk_animation_id2
return 0 if SideView::E_ANIME[@enemy_id].nil?
return SideView::E_ANIME[@enemy_id][1]
end
end
#==============================================================================
# ■ Sprite_Battler
#==============================================================================
class Sprite_Battler < Sprite_Base
#--------------------------------------------------------------------------
# ● Object Initialization
# Viewport : View Port
# Battler : Battler (Game_Battler)
#--------------------------------------------------------------------------
alias initialize_sideview initialize
def initialize(viewport, battler = nil)
initialize_sideview(viewport, battler)
init_direct_attack
end
#--------------------------------------------------------------------------
# ● 一套价值接近攻击
#--------------------------------------------------------------------------
def init_direct_attack
@direct_attack_cnt = 0
@direct_attack_phase = 0
@direct_move_cnt = 0
@battler_x_plus = 0
@battler_y_plus = 0
@moving_mode = 0
@pattern = 0
@direction = 0
end
#--------------------------------------------------------------------------
# ● 帧重建[重新界定]
#--------------------------------------------------------------------------
def update
super
if @battler == nil
self.bitmap = nil
else
@use_sprite = @battler.use_sprite?
if @use_sprite
self.x = @battler.screen_x + @battler_x_plus
self.y = @battler.screen_y + @battler_y_plus
self.z = @battler.screen_z
update_battler_bitmap
end
setup_new_effect
update_effect
end
end
#--------------------------------------------------------------------------
# ● 点阵图转让源重建
#--------------------------------------------------------------------------
alias update_battler_bitmap_sideview update_battler_bitmap
def update_battler_bitmap
case @battler
when Game_Actor
if @battler.character_name != @battler_name or
@battler.character_index != @battler_hue
@battler_name = @battler.character_name
@battler_hue = @battler.character_index
draw_pre_character
draw_character
if (@battler.dead? or @battler.hidden)
self.opacity = 0
end
end
when Game_Enemy
if @battler.battler_name != @battler_name or
@battler.battler_hue != @battler_hue
@battler_name = @battler.battler_name
@battler_hue = @battler.battler_hue
draw_battler
if (@battler.dead? or @battler.hidden)
self.opacity = 0
end
end
end
motion_control
end
#--------------------------------------------------------------------------
# ● battler制图
#--------------------------------------------------------------------------
def draw_battler
self.bitmap = Cache.battler(@battler_name, @battler_hue)
@width = bitmap.width
@height = bitmap.height
self.ox = @width / 2
self.oy = @height
end
#--------------------------------------------------------------------------
# ● 预字制图[普通]
#--------------------------------------------------------------------------
def draw_pre_character
self.bitmap = Cache.character(@battler_name)
sign = @battler_name[/^[\!\$]./]
if sign != nil and sign.include?('$')
@width = bitmap.width / 3
@height = bitmap.height / 4
else
@width = bitmap.width / 12
@height = bitmap.height / 8
end
self.ox = @width / 2
self.oy = @height
end
#--------------------------------------------------------------------------
# ● 性格绘画[普通]
#--------------------------------------------------------------------------
def draw_character
index = @battler_hue
pattern = @pattern < 3 ? @pattern : 1
sx = (index % 4 * 3 + pattern) * @width
sy = (index / 4 * 4 + (@direction - 2) / 2) * @height
self.src_rect.set(sx, sy, @width, @height)
end
#--------------------------------------------------------------------------
# ● 活动控制
#--------------------------------------------------------------------------
def motion_control
# Memory Operation Mode
@moving_mode = @battler.move_mode
# Battler Drawing
case @battler
when Game_Actor # Actor
actor_motion_control
when Game_Enemy # Enemy
enemy_motion_control
end
end
#--------------------------------------------------------------------------
# ● 运动控制（角色）
#--------------------------------------------------------------------------
def actor_motion_control
# Operation Change
case @moving_mode
when SideView::M_MODE_WAIT # Standby
init_direct_attack
@battler_x_plus = 0
@direction = 4
@pattern = 1
when SideView::M_MODE_MAGI # Attack
@battler_x_plus = -10
@direction = 4
@pattern = 3
when SideView::M_MODE_DAMG # Non-Damage Attack
@battler_x_plus = 10
@direction = 4
@pattern = 3
when SideView::M_MODE_WIN # Victory
@direction = 2
@pattern = 1
when SideView::M_MODE_ATK1 # Direct Attack (Approaching)
exe_moving_attack_start
@end_pos_x = @battler_x_plus
when SideView::M_MODE_ATK2 # Direct Attack (Attacking)
@battler_x_plus = @end_pos_x - 10
when SideView::M_MODE_ATK3 # Direct Attack (Returning)
exe_moving_attack_end
else
p "error:Sprite_Battler>> @moving_mode"
end
draw_character
end
#--------------------------------------------------------------------------
# ● 运动控制（敌人）
#--------------------------------------------------------------------------
def enemy_motion_control
# Operation Change
case @moving_mode
when SideView::M_MODE_WAIT # Standby
init_direct_attack
when SideView::M_MODE_MAGI # Attack
@battler_x_plus = 10
when SideView::M_MODE_DAMG # Non-Damage Attack
@battler_x_plus = -10
@shake_flg = true
when SideView::M_MODE_ATK1 # Direct Attack (Approaching)
exe_moving_attack_start
@end_pos_x = @battler_x_plus
when SideView::M_MODE_ATK2 # Direct Attack (Attacking)
@battler_x_plus = @end_pos_x + 10
when SideView::M_MODE_ATK3 # Direct Attack (Returning)
exe_moving_attack_end
else
p "error:Sprite_Battler>> @moving_mode", @moving_mode
end
end
#--------------------------------------------------------------------------
# ● 接近攻击执行方法
#--------------------------------------------------------------------------
def exe_moving_attack_start
return unless @battler.motion_stop
case @direct_attack_phase
when 0 # Start Operation Preparation
diratk_start
when 1 # Move Operation (Going)
diratk_move
when 2 # After-Movement Wait
diratk_wait
end
end
def exe_moving_attack_end
case @direct_attack_phase
when 0 # Attack Operation
diratk_attack
when 1 # Move Operation (Return)
diratk_back
when 2 # Operation End
diratk_end
end
end
#--------------------------------------------------------------------------
# ● 接近攻击执行[开始运作准备]
#--------------------------------------------------------------------------
def diratk_start
# Pose Change
@pattern = 1
# The number of frames needed is the distance between current position and
# target position.
pos_x = @battler.target_x - self.x
pos_y = @battler.target_y - self.y
# Caculation for ammount of frames needed.
@direct_move_cnt = @direct_attack_cnt = (pos_x.abs / SideView::MOTION_SPEED).round
# NEXT Phase
@direct_attack_phase += 1
end
#--------------------------------------------------------------------------
# ● 接近攻击执行[移到对象（去） ]
#--------------------------------------------------------------------------
def diratk_move
case @battler
when Game_Actor
x_plus = @width
y_plus = -@height / 4
when Game_Enemy
x_plus = -@width - 10
y_plus = @height / 4
end
# The next movement location is figured out by the distance between
# current position and target position.
pos_x = @battler.target_x - self.x + x_plus
pos_y = @battler.target_y - self.y + y_plus
@battler_x_plus += pos_x / @direct_attack_cnt if @direct_attack_cnt != 0
@battler_y_plus += pos_y / @direct_attack_cnt if @direct_attack_cnt != 0
# End count
@direct_attack_cnt -= 1
# Last movement (Insurance: Last correction)
if @direct_attack_cnt <= 0
@battler_x_plus = @battler.target_x - @battler.screen_x + x_plus
@battler_y_plus = @battler.target_y - @battler.screen_y + y_plus
# NEXTフェーズ
@direct_attack_cnt = 5
@direct_attack_phase += 1
end
end
#--------------------------------------------------------------------------
# ● 接近攻击执行[攻击行动回报]
#--------------------------------------------------------------------------
def diratk_wait
# End Count
@direct_attack_cnt -= 1
# Last Movement
if @direct_attack_cnt <= 0
# Pose Change
@pattern = 3
# END Phase
@direct_attack_phase = 0
@battler.motion_stop = false
end
end
#--------------------------------------------------------------------------
# ● 接近攻击执行[攻击行动回报]
#--------------------------------------------------------------------------
def diratk_attack
# Pose Change
@pattern = 1
# End Wait Count
@direct_attack_cnt = @direct_move_cnt
# NEXT Phase
@direct_attack_phase += 1
end
#--------------------------------------------------------------------------
# ● 接近攻击执行[移到运行（往返） ]
#--------------------------------------------------------------------------
def diratk_back
# The next movement location is figured out by the distance between
# current position and target position.
pos_x = @battler.screen_x - self.x
pos_y = @battler.screen_y - self.y
@battler_x_plus += pos_x / @direct_attack_cnt if @direct_attack_cnt != 0
@battler_y_plus += pos_y / @direct_attack_cnt if @direct_attack_cnt != 0
# End Count
@direct_attack_cnt -= 1
# Last Movement
if @direct_attack_cnt == 0
@battler_x_plus = 0
@battler_y_plus = 0
# NEXT Phase
@direct_attack_phase += 1
end
end
#--------------------------------------------------------------------------
# ● 接近攻击执行[运行完]
#--------------------------------------------------------------------------
def diratk_end
init_direct_attack
@battler.motion_stop = false
# END Phase
@direct_attack_phase = 0
end
end

复制代码

火鸡三毛老大 · 发表于 2008-3-23 19:00:39

脚本10 高级传送脚本

#==============================================================================
# 本脚本来自www.66RPG.com，使用和转载请保留此信息
#==============================================================================
# 自定义内容解释：
# TOWNS[编号]=["地名，可以随便写",开关编号,[传送去的地图id，传送去的地图x，
# 传送去的地图y],角色朝向]
#
# 编号请按照0、1、2、3……顺序往下排布
# 当编号的开关打开的时候，才可以选择这个传送地点
# 角色朝向，2为下，4为左，6为右，8为上，具体可以参考自己数字小键盘的方向和数字关系
# 如果是其他方向请自己改。
#
# 使用方法：在需要传送的传送门、传送石、传送羽毛、传送旅店一类的地方使用公共事件：
# 呼叫脚本：$scene = Scene_Teleport.new
#==============================================================================
TOWNS=[]
TOWNS[0]=["123",1,[1,0,5],2]
#==============================================================================
# ■ Window_Teleport
#------------------------------------------------------------------------------
# 　处理传送的窗口
#==============================================================================
class Window_Teleport < Window_Selectable
#--------------------------------------------------------------------------
# ● 初始化对像
#--------------------------------------------------------------------------
def initialize
super(640,640,64,64)
self.contents = Bitmap.new(width, height)
self.opacity = 180
get_towns
draw_towns
@column_max = 1
end
#--------------------------------------------------------------------------
# ● 获取可到达的城镇和窗口大小
#--------------------------------------------------------------------------
def get_towns
@carol3_towns = []
@width_temp = 0
@cont_use = false
for town in TOWNS
if $game_switches[town[1]]==true
@carol3_towns.push(town)
if contents.text_size(town[0]).width >= @width_temp
@width_temp = contents.text_size(town[0]).width
end
end
end
@item_max = @carol3_towns.size
if @item_max == 0
@carol3_towns[0] = ["现在没有已知的地区可探索！",1,[1,1,1]]
$game_player.move_up
@width_temp = contents.text_size(@carol3_towns[0][0]).width
@item_max = 1
@cont_use = true
end
self.width = [@width_temp+32,416].min
self.height = [(@item_max+1)*32,360].min
self.x = (544-self.width)/2
self.y = (416-self.height)/2
self.contents = Bitmap.new(width-32,row_max*WLH)
end
#--------------------------------------------------------------------------
# ● 描绘城镇名称
#--------------------------------------------------------------------------
def draw_towns
for i in 0...@carol3_towns.size
self.contents.draw_text(0,i*WLH,@width_temp,WLH,@carol3_towns[i][0],1)
end
end
#--------------------------------------------------------------------------
# ● 返回的内容
#========================================================================
# ● 地图编号
#--------------------------------------------------------------------------
def map_id
return @carol3_towns[self.index][2][0]
end
#--------------------------------------------------------------------------
# ● 地图x坐标
#--------------------------------------------------------------------------
def map_x
return @carol3_towns[self.index][2][1]
end
#--------------------------------------------------------------------------
# ● 地图y坐标
#--------------------------------------------------------------------------
def map_y
return @carol3_towns[self.index][2][2]
end
#--------------------------------------------------------------------------
# ● 角色朝向
#--------------------------------------------------------------------------
def map_direction
return @carol3_towns[self.index][3]
end
#--------------------------------------------------------------------------
# ● 判断是否一个城市都没有
#--------------------------------------------------------------------------
def cant_use?
return @cont_use
end
end
#==============================================================================
# ■ Scene_Teleport
#------------------------------------------------------------------------------
# 　处理传送执行的类
#==============================================================================
class Scene_Teleport < Scene_Base
#--------------------------------------------------------------------------
# ● 主处理
#--------------------------------------------------------------------------
def start
Sound.play_decision
@carol3_trans_white = false
@carol3_map_sprite = Spriteset_Map.new
@carol3_teleport_window = Window_Teleport.new
if @carol3_teleport_window.cant_use?
@carol3_teleport_window.index = -1
else
@carol3_teleport_window.index = 0
end
end
def terminate
super
@carol3_teleport_window.dispose
end
def update
super
@carol3_teleport_window.update
carol3_update
end
def update_scene
@carol3_teleport_window.active = true
$game_player.reserve_transfer(@carol3_teleport_window.map_id, @carol3_teleport_window.map_x, @carol3_teleport_window.map_y, @carol3_teleport_window.map_direction)
$game_map.autoplay
$scene = Scene_Map.new
end
#--------------------------------------------------------------------------
# ● 刷新画面
#--------------------------------------------------------------------------
def carol3_update
@carol3_teleport_window.update
if Input.trigger?(Input::B)
Sound.play_cancel
$scene = Scene_Map.new
$game_player.move_up
return
end
if Input.trigger?(Input::C)
if @carol3_teleport_window.index == -1
Sound.play_cancel
$scene = Scene_Map.new
return
else
Audio.se_play("Audio/SE/" + "Teleport",100,100)
update_scene
return
end
end
end
end
#==============================================================================
# 本脚本来自www.66RPG.com，使用和转载请保留此信息
#==============================================================================

复制代码

帐号		自动登录	找回密码
密码			注册会员