【巨坑】蛐蛐儿的简约（渣）菜单计划（四）技能界面

退屈￡无聊 · 发表于 2011-12-10 11:41:12

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

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

x

本帖最后由退屈￡无聊于 2011-12-10 13:15 编辑

于是居然到现在才来填坑，亲们我错了。
计划之一：http://rpg.blue/thread-202640-1-1.html
计划之二：http://rpg.blue/thread-202724-1-1.html
计划之三：http://rpg.blue/thread-202972-1-1.html
（立绘要求和外援脚本照旧）
注解：要使用的请务必先看计划之一里的介绍！另外请勿挖坟，对前三版有何意见可以在此提出- -。

Part1:

class Scene_Skill
def initialize(id = 0)
@id = id
@actor = $game_party.actors[@id]
end
def main
@bitmap = Spriteset_Map.new
@person = Sprite.new
@person.bitmap = Bitmap.new("Graphics/Menu/#{@actor.name}")
@name = Sprite.new
@name.bitmap = Bitmap.new(640,480)
@name.bitmap.font.size = 30
@name.bitmap.blur_draw_text(0,10,620,70,"施法者 #{@actor.name}",2,
Color.new(0,187,240,3),5)
@name.z = 10
@hpback = Sprite.new
@hpback.bitmap = Bitmap.new(200,200)
@hpback.bitmap.font.size = 14
@hpback.z = 0
@hp = Sprite.new
@hp.bitmap = Bitmap.new(200,200)
@hp.bitmap.font.name = "Arial"
@hp.bitmap.blur_draw_text(0,0,200,30,"HP",0,Color.new(0,0,0,10),2)
@hp.bitmap.blur_draw_text(0,25,200,30,"SP",0,Color.new(0,0,0,10),2)
@hp.bitmap.blur_draw_text(0,0,200,30,"#{@actor.hp}",1,Color.new(0,0,0,10),2)
@hp.bitmap.blur_draw_text(0,25,200,30,"#{@actor.sp}",1,Color.new(0,0,0,10),2)
@hp.z = 2
@z = Sprite.new
@z.bitmap = Bitmap.new(640,480)
for i in 0...52
@z.bitmap.fill_rect(0,i*4,640,4,Color.new(0,0,0,255-5*i))
@z.bitmap.fill_rect(0,480-i*4,640,4,Color.new(0,0,0,255-5*i))
end
@hpback.bitmap.draw_text(10,13,14,14,"○")
@hpback.bitmap.draw_text(120,13,14,14,"○")
@hpback.bitmap.fill_rect(16,15,112,1,Color.new(255,255,255))
@hpback.bitmap.fill_rect(16,24,112,1,Color.new(255,255,255))
@hpback.bitmap.font.size = 10
@hpback.bitmap.font.color = Color.new(0,0,0,150)
@hpback.bitmap.draw_text(11,14,10,10,"●")
@hpback.bitmap.draw_text(122,14,10,10,"●")
@hpback.bitmap.fill_rect(16,16,112,8,Color.new(0,0,0,150))
# SP
@hpback.bitmap.font.size = 14
@hpback.bitmap.font.color = Color.new(255,255,255)
@hpback.bitmap.draw_text(10,13+25,14,14,"○")
@hpback.bitmap.draw_text(120,13+25,14,14,"○")
@hpback.bitmap.fill_rect(16,15+25,112,1,Color.new(255,255,255))
@hpback.bitmap.fill_rect(16,24+25,112,1,Color.new(255,255,255))
@hpback.bitmap.font.size = 10
@hpback.bitmap.font.color = Color.new(0,0,0,150)
@hpback.bitmap.draw_text(11,14+25,10,10,"●")
@hpback.bitmap.draw_text(122,14+25,10,10,"●")
@hpback.bitmap.fill_rect(16,16+25,112,8,Color.new(0,0,0,150))
@hp.x = 20
@hpback.x = 15
@hp.y = 300
@hpback.y = 302
#hpspbitmap
@sp = Sprite.new
@sp.bitmap = Bitmap.new(200,200)
@sp.bitmap.font.size = 10
@sp.bitmap.font.color = Color.new(200,0,0,150)
@sp.bitmap.draw_text(11,14,10,10,"●")
@sp.bitmap.font.color = Color.new(88,0,0,150)
@sp.bitmap.draw_text(122,14,10,10,"●")
for i in 0...112
@sp.bitmap.fill_rect(16+i,16,1,8,Color.new(200-i,0,0,150))
end
@sp1 = Sprite.new
@sp1.bitmap = @sp.bitmap
@sp1.tone = Tone.new(0,100,0,0)
@sp.x = 15
@sp.y = 302
@sp.z = 1
@sp1.x = 15
@sp1.y = 302+25
@sp1.z = 1
@sp.src_rect = Rect.new(0,0,11+(132*((@actor.hp)*1.0/@actor.maxhp)).to_i,200)
@sp1.src_rect = Rect.new(0,0,11+(132*((@actor.sp)*1.0/@actor.maxsp)).to_i,200)
# 人物状态篇结束= =
# 技能描绘（悲剧地开始
@help = Sprite.new
@help.bitmap = Bitmap.new(510, 20)
@help.x = 65
@help.y = 450
@help_text = Sprite.new
@help_text.bitmap = Bitmap.new(510, 20)
@help_text.bitmap.font.name = "宋体"
@help_text.bitmap.font.size = 13
@help_text.x = 65
@help_text.y = 450
for i in 0..255/5
@help.bitmap.fill_rect(i*5,0,5,20,Color.new(0,0,0,i*5))
@help.bitmap.fill_rect(510-i*5,0,5,20,Color.new(0,0,0,i*5))
@help.bitmap.fill_rect(i*5, 0, 5, 1, Color.new(255,255,255,i*5))
@help.bitmap.fill_rect(510-i*5, 0, 5, 1, Color.new(255,255,255,i*5))
@help.bitmap.fill_rect(i*5, 19, 5, 1, Color.new(255,255,255,i*5))
@help.bitmap.fill_rect(510-i*5, 19, 5, 1, Color.new(255,255,255,i*5))
end
draw_item
@help_text.bitmap.clear
@index = 0
@page = 0
if @data[@index] != nil
@help_text.bitmap.draw_text(0,0,510,20,@data[@index].description,1)
end
# 差点忘了……
@give = 0
@given = []
@actorname = []
@actorhp = []
@gview = Viewport.new(450,250,200,200)
for i in 0...$game_party.actors.size
@given[i] = Sprite.new(@gview)
@given[i].bitmap = RPG::Cache.character(
$game_party.actors[i].character_name,$game_party.actors[i].character_hue)
@given[i].src_rect = Rect.new(0,
(@given[i].bitmap.height/4.0).to_i,
(@given[i].bitmap.width/4.0).to_i,(@given[i].bitmap.height/4.0).to_i)
@given[i].x = 30*i
@given[i].tone = Tone.new(0,0,0,255) if i != 0
@actorname[i] = Sprite.new(@gview)
@actorname[i].y = 60
@actorname[i].bitmap = Bitmap.new(200,130)
@actorname[i].bitmap.draw_text(0,0,100,30,$game_party.actors[i].name,
0)
@actorname[i].bitmap.font.size = 13
@actorhp[i] = Sprite.new(@gview)
@actorhp[i].y = 80
@actorhp[i].bitmap = Bitmap.new(200,80)
@actorhp[i].bitmap.font.size = 11
@actorhp[i].bitmap.draw_text(0,0,150,30,
"HP:#{$game_party.actors[i].hp}/#{$game_party.actors[i].maxhp}",2)
@actorhp[i].bitmap.draw_text(0,15,150,30,
"SP:#{$game_party.actors[i].sp}/#{$game_party.actors[i].maxsp}",2)
@actorhp[i].x = 200 if i != 0
@actorname[i].x = -200 if i != 0
end
loop do
Graphics.update
update
break if $scene != self
end
@given.each {|a| a.dispose}
@actorname.each {|a| a.dispose}
@actorhp.each {|a| a.dispose}
@item.dispose
@item_back.dispose
@iback.dispose
@z.dispose
@person.dispose
@hpback.dispose
@hp.dispose
@sp1.dispose
@sp.dispose
@bitmap.dispose
@help.dispose
@help_text.dispose
end
def update
@iback.update
actor_choose and return if @chooseactor
update_input
end
def update_input
Input.update
index_change(true) if Input.trigger?(Input::DOWN)
index_change if Input.trigger?(Input::UP)
$scene = Scene_Menu.new and $game_system.se_play($data_system.cancel_se) if Input.trigger?(Input::B)
@chooseactor = true and $game_system.se_play($data_system.decision_se) if Input.trigger?(Input::C)
end
def index_change(plus=false)
if plus
return if @index >= @max - 1
page(true) if @index >= 9 + @page
@index += 1
@iback.y = 4 + @index * 30 - @page * 30
else
return if @index <= 0
page if @index <= @page
@index -= 1
@iback.y = 4 + @index * 30 - @page * 30
end
$game_system.se_play($data_system.cursor_se)
@help_text.bitmap.clear
if @data[@index] != nil
@help_text.bitmap.draw_text(0,0,510,20,@data[@index].description,1)
end
end
def page(plus=false)
if plus
@page += 1
@item.y -= 30
@item_back.y -= 30
else
return if @page <= 0
@page -= 1
@item.y += 30
@item_back.y += 30
end
end
def draw_item
@viewport = Viewport.new(170,100,300,300)
@item = Sprite.new(@viewport)
@item_back = Sprite.new(@viewport)
@item_back.bitmap = Bitmap.new(640,480)
@item.z = 5
@item_back.z = 3
@item_back.opacity = 100
@item.bitmap = Bitmap.new(640,480)
@item.bitmap.font.size = 14
@data = []
for i in [email protected]
skill = $data_skills[@actor.skills[i]]
if skill != nil
@data.push(skill)
end
end
bitmap = Bitmap.new(300,22)
bitmap.font.size = 22
bitmap.font.color = Color.new(0,0,0)
for i in 0...250
bitmap.draw_text(i,0,22,22,"●")
end
@iback = RPG::Sprite.new(@viewport)
@iback.bitmap = bitmap
@iback.blink_on
@iback.z = 8000
@iback.y = 4
@iback.z = 3
d = 0
@max = 0
@data.each {|c| @max += 1
@item_back.bitmap.blt(0,d+4,bitmap,Rect.new(0,0,bitmap.width,bitmap.height))
@item.bitmap.blt(10,d+2,RPG::Cache.icon(c.icon_name),Rect.new(0,0,32,22))
if @actor.skill_can_use?(c.id)
@item.bitmap.font.color = Color.new(255,255,255)
else
@item.bitmap.font.color = Color.new(255,255,255,100)
end
@item.bitmap.draw_text(40,d,300,30,c.name)
@item.bitmap.draw_text(0,d,252,30,c.sp_cost.to_s, 2)
d += 30}
end
end

复制代码

Part2:

class Scene_Skill
def actor_choose
Input.update
c_change(true) if Input.trigger?(Input::RIGHT)
c_change if Input.trigger?(Input::LEFT)
if Input.trigger?(Input::B)
$game_system.se_play($data_system.cancel_se)
@chooseactor = false
end
# 按下 C 键的情况下
if Input.trigger?(Input::C)
# 获取特技窗口现在选择的特技的数据
@skill = @data[@index]
# 不能使用的情况下
if @skill == nil or not @actor.skill_can_use?(@skill.id)
# 演奏冻结 SE
$game_system.se_play($data_system.buzzer_se)
return
end
# 演奏确定 SE
$game_system.se_play($data_system.decision_se)
# 效果范围是我方的情况下
if @skill.scope >= 3
use_skill
# 效果在我方以外的情况下
else
# 公共事件 ID 有效的情况下
if @skill.common_event_id > 0
# 预约调用公共事件
$game_temp.common_event_id = @skill.common_event_id
# 演奏特技使用时的 SE
$game_system.se_play(@skill.menu_se)
# 消耗 SP
@actor.sp -= @skill.sp_cost
# 再生成各窗口的内容
again_draw
# 切换到地图画面
$scene = Scene_Map.new
return
end
end
return
end
end
def c_change(plus=false)
if plus
return if @give >= $game_party.actors.size-1
@give += 1
else
return if @give <= 0
@give -= 1
end
for i in [email protected]
@actorname[i].visible = false if i != @give
@actorhp[i].visible = false if i != @give
@actorname[i].x = -200 if i != @give
@actorhp[i].x = 200 if i != @give
@given[i].tone = Tone.new(0,0,0,255) if i != @give
end
@actorname[@give].visible = true
@actorhp[@give].visible = true
for i in 0...10
@actorname[@give].x += 20
@actorhp[@give].x -= 20
@given[@give].tone = Tone.new(0,0,0,255-30*i)
Graphics.update
end
$game_system.se_play($data_system.cursor_se)
end
def use_skill
# 目标是全体的情况下
if @skill.scope == 4 || @skill.scope == 6
# 对同伴全体应用特技使用效果
used = false
for i in $game_party.actors
used |= i.skill_effect(@actor, @skill)
end
end
# 目标是使用者的情况下
if @skill.scope == 7
# 对目标角色应用特技的使用效果
target = $game_party.actors[@id]
used = target.skill_effect(@actor, @skill)
end
# 目标是单体的情况下
if @give >= 0
# 对目标角色应用特技的使用效果
target = $game_party.actors[@give]
used = target.skill_effect(@actor, @skill)
end
# 使用特技的情况下
if used
# 演奏特技使用时的 SE
$game_system.se_play(@skill.menu_se)
# 消耗 SP
@actor.sp -= @skill.sp_cost
# 再生成各窗口内容
again_draw
# 全灭的情况下
if $game_party.all_dead?
# 切换到游戏结束画面
$scene = Scene_Gameover.new
return
end
# 公共事件 ID 有效的情况下
if @skill.common_event_id > 0
# 预约调用公共事件
$game_temp.common_event_id = @skill.common_event_id
# 切换到地图画面
$scene = Scene_Map.new
return
end
end
# 无法使用特技的情况下
unless used
# 演奏冻结 SE
$game_system.se_play($data_system.buzzer_se)
end
end
def again_draw
rect = Rect.new(0,@index * 30,640,30)
@item.bitmap.fill_rect(rect, Color.new(0,0,0,0))
@item.bitmap.blt(10,rect.y+2,
RPG::Cache.icon(@data[@index].icon_name),Rect.new(0,0,32,22))
if @actor.skill_can_use?(@data[@index].id)
@item.bitmap.font.color = Color.new(255,255,255)
else
@item.bitmap.font.color = Color.new(255,255,255,100)
end
@item.bitmap.draw_text(40,rect.y,300,30,@data[@index].name)
@item.bitmap.draw_text(0,rect.y,252,30,@data[@index].sp_cost.to_s, 2)
for i in 0...$game_party.actors.size
@actorhp[i].bitmap.clear
@actorhp[i].bitmap.font.size = 11
@actorhp[i].bitmap.draw_text(0,0,150,30,
"HP:#{$game_party.actors[i].hp}/#{$game_party.actors[i].maxhp}",2)
@actorhp[i].bitmap.draw_text(0,15,150,30,
"SP:#{$game_party.actors[i].sp}/#{$game_party.actors[i].maxsp}",2)
end
@sp.src_rect = Rect.new(0,0,11+(132*((@actor.hp)*1.0/@actor.maxhp)).to_i,200)
@sp1.src_rect = Rect.new(0,0,11+(132*((@actor.sp)*1.0/@actor.maxsp)).to_i,200)
@hp.bitmap.clear
@hp.bitmap.blur_draw_text(0,0,200,30,"HP",0,Color.new(0,0,0,20),2)
@hp.bitmap.blur_draw_text(0,25,200,30,"SP",0,Color.new(0,0,0,20),2)
@hp.bitmap.blur_draw_text(0,0,200,30,"#{@actor.hp}",1,Color.new(0,0,0,20),2)
@hp.bitmap.blur_draw_text(0,25,200,30,"#{@actor.sp}",1,Color.new(0,0,0,20),2)
end
end

复制代码

欢迎诸位提出BUG和建议- -

纠结之星 · 发表于 2013-2-2 17:59:17

看到那个行走图和那个人物实在不能淡定了。。。东方行走图好像有吧。。

_叶瓜咯咯 · 发表于 2013-2-2 16:57:53

请问可以整合下鼠标系统吗？很喜欢这个菜单呢。可是不支持鼠标...

存档不能 · 发表于 2012-1-8 08:44:26

本帖最后由忧雪の伤于 2012-1-8 10:51 编辑

L主这个菜单真的很不错呢，不过技能和道具栏拉到下面就显示不出来了，能否调整一下？
另外斗胆试问一下还有是否能和以下脚本

#==============================================================================
# 本脚本来自[url]www.66RPG.com[/url]，使用和转载请保留此信息
#==============================================================================
class Scene_Save
#--------------------------------------------------------------------------
# ● 写入存档数据
# file : 写入用文件对像 (已经打开)
#--------------------------------------------------------------------------
def write_save_data(file)
# 生成描绘存档文件用的角色图形
characters = []
for i in 0...[$game_party.actors.size,4].min
actor = $game_party.actors[i]
characters.push([actor.character_name, actor.character_hue])
end
# 写入描绘存档文件用的角色数据
Marshal.dump(characters, file)
# 写入测量游戏时间用画面计数
Marshal.dump(Graphics.frame_count, file)
# 增加 1 次存档次数
$game_system.save_count += 1
# 保存魔法编号
# (将编辑器保存的值以随机值替换)
$game_system.magic_number = $data_system.magic_number
# 写入各种游戏对像
Marshal.dump($game_system, file)
Marshal.dump($game_switches, file)
Marshal.dump($game_variables, file)
Marshal.dump($game_self_switches, file)
Marshal.dump($game_screen, file)
Marshal.dump($game_actors, file)
Marshal.dump($game_party, file)
Marshal.dump($game_troop, file)
Marshal.dump($game_map, file)
Marshal.dump($game_player, file)
end
end
class Scene_Battle
#--------------------------------------------------------------------------
# ● 设置物品或特技对像方的战斗者
# scope : 特技或者是物品的范围
#--------------------------------------------------------------------------
def set_target_battlers(scope)
# 行动方的战斗者是敌人的情况下
if @active_battler.is_a?(Game_Enemy)
# 效果范围分支
case scope
when 1 # 敌单体
index = @active_battler.current_action.target_index
@target_battlers.push($game_party.smooth_target_actor(index))
when 2 # 敌全体
for actor in 0...[$game_party.actors.size,4].min
if $game_party.actors[actor].exist?
@target_battlers.push($game_party.actors[actor])
end
end
when 3 # 我方单体
index = @active_battler.current_action.target_index
@target_battlers.push($game_troop.smooth_target_enemy(index))
when 4 # 我方全体
for enemy in $game_troop.enemies
if enemy.exist?
@target_battlers.push(enemy)
end
end
when 5 # 我方单体 (HP 0)
index = @active_battler.current_action.target_index
enemy = $game_troop.enemies[index]
if enemy != nil and enemy.hp0?
@target_battlers.push(enemy)
end
when 6 # 我方全体 (HP 0)
for enemy in $game_troop.enemies
if enemy != nil and enemy.hp0?
@target_battlers.push(enemy)
end
end
when 7 # 使用者
@target_battlers.push(@active_battler)
end
end
# 行动方的战斗者是角色的情况下
if @active_battler.is_a?(Game_Actor)
# 效果范围分支
case scope
when 1 # 敌单体
index = @active_battler.current_action.target_index
@target_battlers.push($game_troop.smooth_target_enemy(index))
when 2 # 敌全体
for enemy in $game_troop.enemies
if enemy.exist?
@target_battlers.push(enemy)
end
end
when 3 # 我方单体
index = @active_battler.current_action.target_index
@target_battlers.push($game_party.smooth_target_actor(index))
when 4 # 我方全体
for actor in 0...[$game_party.actors.size,4].min
if $game_party.actors[actor].exist?
@target_battlers.push($game_party.actors[actor])
end
end
when 5 # 我方单体 (HP 0)
index = @active_battler.current_action.target_index
actor = $game_party.actors[index]
if actor != nil and actor.hp0?
@target_battlers.push(actor)
end
when 6 # 我方全体 (HP 0)
for actor in 0...[$game_party.actors.size,4].min
if $game_party.actors[actor] != nil and $game_party.actors[actor].hp0?
@target_battlers.push($game_party.actors[actor])
end
end
when 7 # 使用者
@target_battlers.push(@active_battler)
end
end
end
#--------------------------------------------------------------------------
# ● 生成行动循序
#--------------------------------------------------------------------------
def make_action_orders
# 初始化序列 @action_battlers
@action_battlers = []
# 添加敌人到 @action_battlers 序列
for enemy in $game_troop.enemies
@action_battlers.push(enemy)
end
# 添加角色到 @action_battlers 序列
for actor in 0...[$game_party.actors.size,4].min
@action_battlers.push($game_party.actors[actor])
end
# 确定全体的行动速度
for battler in @action_battlers
battler.make_action_speed
end
# 按照行动速度从大到小排列
@action_battlers.sort! {|a,b|
b.current_action.speed - a.current_action.speed }
end
#--------------------------------------------------------------------------
# ● 开始结束战斗回合
#--------------------------------------------------------------------------
def start_phase5
# 转移到回合 5
@phase = 5
# 演奏战斗结束 ME
$game_system.me_play($game_system.battle_end_me)
# 还原为战斗开始前的 BGM
$game_system.bgm_play($game_temp.map_bgm)
# 初始化 EXP、金钱、宝物
exp = 0
gold = 0
treasures = []
# 循环
for enemy in $game_troop.enemies
# 敌人不是隐藏状态的情况下
unless enemy.hidden
# 获得 EXP、增加金钱
exp += enemy.exp
gold += enemy.gold
# 出现宝物判定
if rand(100) < enemy.treasure_prob
if enemy.item_id > 0
treasures.push($data_items[enemy.item_id])
end
if enemy.weapon_id > 0
treasures.push($data_weapons[enemy.weapon_id])
end
if enemy.armor_id > 0
treasures.push($data_armors[enemy.armor_id])
end
end
end
end
# 限制宝物数为 6 个
treasures = treasures[0..5]
# 获得 EXP
for i in 0...[$game_party.actors.size,4].min
actor = $game_party.actors[i]
if actor.cant_get_exp? == false
last_level = actor.level
actor.exp += exp
if actor.level > last_level
@status_window.level_up(i)
end
end
end
# 获得金钱
$game_party.gain_gold(gold)
# 获得宝物
for item in treasures
case item
when RPG::Item
$game_party.gain_item(item.id, 1)
when RPG::Weapon
$game_party.gain_weapon(item.id, 1)
when RPG::Armor
$game_party.gain_armor(item.id, 1)
end
end
# 生成战斗结果窗口
@result_window = Window_BattleResult.new(exp, gold, treasures)
# 设置等待计数
@phase5_wait_count = 100
end
#--------------------------------------------------------------------------
# ● 转到输入下一个角色的命令
#--------------------------------------------------------------------------
def phase3_next_actor
# 循环
begin
# 角色的明灭效果 OFF
if @active_battler != nil
@active_battler.blink = false
end
# 最后的角色的情况
if @actor_index == [$game_party.actors.size-1,3].min
# 开始主回合
start_phase4
return
end
# 推进角色索引
@actor_index += 1
@active_battler = $game_party.actors[@actor_index]
@active_battler.blink = true
# 如果角色是在无法接受指令的状态就再试
end until @active_battler.inputable?
# 设置角色的命令窗口
phase3_setup_command_window
end
end
class Arrow_Actor < Arrow_Base
#--------------------------------------------------------------------------
# ● 刷新画面
#--------------------------------------------------------------------------
def update
super
# 光标右
if Input.repeat?(Input::RIGHT)
$game_system.se_play($data_system.cursor_se)
@index += 1
@index %= [$game_party.actors.size,4].min
end
# 光标左
if Input.repeat?(Input::LEFT)
$game_system.se_play($data_system.cursor_se)
@index += $game_party.actors.size - 1
@index %= [$game_party.actors.size,4].min
end
# 设置活动块坐标
if self.actor != nil
self.x = self.actor.screen_x
self.y = self.actor.screen_y
end
end
end
#==============================================================================
# ■ Window_Target
#------------------------------------------------------------------------------
# 　物品画面与特技画面的、使用对像角色选择窗口。
#==============================================================================
class Window_Target < Window_Selectable
#--------------------------------------------------------------------------
# ● 初始化对像
#--------------------------------------------------------------------------
def initialize
super(0, 0, 336, 480)
self.contents = Bitmap.new(width - 32, $game_party.actors.size*112)
self.z += 10
@item_max = $game_party.actors.size
@top_row = 0
refresh
end
#--------------------------------------------------------------------------
# ● 刷新
#--------------------------------------------------------------------------
def refresh
self.contents.clear
for i in 0...$game_party.actors.size
x = 4
y = i * 112
actor = $game_party.actors[i]
draw_actor_name(actor, x, y)
draw_actor_class(actor, x + 144, y)
draw_actor_level(actor, x + 8, y + 32)
draw_actor_state(actor, x + 8, y + 64)
draw_actor_hp(actor, x + 152, y + 32)
draw_actor_sp(actor, x + 152, y + 64)
end
end
#--------------------------------------------------------------------------
# ● 刷新光标矩形
#--------------------------------------------------------------------------
def update_cursor_rect
# 光标位置 -1 为全选、-2 以下为单独选择 (使用者自身)
if @index <= -2
self.cursor_rect.set(0, (@index + 10) * 112, self.width - 32, 96)
elsif @index == -1
self.cursor_rect.set(0, 0, self.width - 32, @item_max * 112 - 20)
else
tpy = @index * 112 - self.oy
self.cursor_rect.set(0, tpy, self.width - 32, 96)
if @index < @top_row
@top_row = @index
self.oy = @top_row *112
end
if @index > @top_row+3
@top_row = @index-3
self.oy = @top_row *112
end
end
end
end
#==============================================================================
# ■ Window_MenuStatus
#------------------------------------------------------------------------------
# 　显示菜单画面和同伴状态的窗口。
#==============================================================================
class Window_MenuStatus < Window_Selectable
#--------------------------------------------------------------------------
# ● 初始化目标
#--------------------------------------------------------------------------
def initialize
super(0, 0, 480, 480)
self.contents = Bitmap.new(width - 32, $game_party.actors.size*112)
refresh
@top_row = 0
self.active = false
self.index = -1
end
#--------------------------------------------------------------------------
# ● 刷新
#--------------------------------------------------------------------------
def refresh
self.contents.clear
@item_max = $game_party.actors.size
for i in 0...$game_party.actors.size
x = 64
y = i * 112
if i <=3
self.contents.font.color = Color.new(255,255,0,255)
self.contents.draw_text(x,y,340,32,"[出战]",2)
self.contents.font.color = normal_color
else
self.contents.font.color = Color.new(128,128,128,255)
self.contents.draw_text(x,y,340,32,"[待机]",2)
self.contents.font.color = normal_color
end
actor = $game_party.actors[i]
draw_actor_graphic(actor, x - 40, y + 80)
draw_actor_name(actor, x, y)
draw_actor_class(actor, x + 144, y)
draw_actor_level(actor, x, y + 32)
draw_actor_state(actor, x + 90, y + 32)
draw_actor_exp(actor, x, y + 64)
draw_actor_hp(actor, x + 236, y + 32)
draw_actor_sp(actor, x + 236, y + 64)
end
end
#--------------------------------------------------------------------------
# ● 刷新光标矩形
#--------------------------------------------------------------------------
def update_cursor_rect
if @index < 0
self.cursor_rect.empty
else
tpy = @index * 112 - self.oy
self.cursor_rect.set(0, tpy, self.width - 32, 96)
if @index < @top_row
@top_row = @index
self.oy = @top_row *112
end
if @index > @top_row+3
@top_row = @index-3
self.oy = @top_row *112
end
end
end
end
class Game_Party
#--------------------------------------------------------------------------
# ● 全灭判定
#--------------------------------------------------------------------------
def all_dead?
# 同伴人数为 0 的情况下
if $game_party.actors.size == 0
return false
end
# 同伴中无人 HP 在 0 以上
for i in 0..3
if @actors[i] != nil and@actors[i].hp >0
return false
end
end
# 全灭
return true
end
#--------------------------------------------------------------------------
# ● 加入同伴
# actor_id : 角色 ID
#--------------------------------------------------------------------------
def add_actor(actor_id)
# 获取角色
actor = $game_actors[actor_id]
# 同伴人数未满 4 人、本角色不在队伍中的情况下
if not @actors.include?(actor)
# 添加角色
@actors.push(actor)
# 还原主角
$game_player.refresh
end
end
end
#==============================================================================
# 本脚本来自[url]www.66RPG.com[/url]，使用和转载请保留此信息
#==============================================================================
class Scene_Menu
# --------------------------------
def initialize(menu_index = 0)
@menu_index = menu_index
@changer = 0
@where = 0
@checker = 0
end
# --------------------------------
def main
s1 = $data_system.words.item
s2 = $data_system.words.skill
s3 = $data_system.words.equip
s4 = "状态"
s5 = "储存进度"
s6 = "离开游戏"
s7 = "调整队伍"
s8 = "升级加点"
s9 = "人物介绍"
@command_window = Window_Command.new(160, [s1, s2, s3, s4, s5, s6, s7, s8, s9])
@command_window.index = @menu_index
if $game_party.actors.size == 0
@command_window.disable_item(0)
@command_window.disable_item(1)
@command_window.disable_item(2)
@command_window.disable_item(3)
end
if $game_system.save_disabled
@command_window.disable_item(4)
end
if $game_party.actors.size == 1
@command_window.disable_item(6)
end
@playtime_window = Window_PlayTime.new
@playtime_window.x = 0
@playtime_window.y = 320
@gold_window = Window_Gold.new
@gold_window.x = 0
@gold_window.y = 416
@status_window = Window_MenuStatus.new
@status_window.x = 160
@status_window.y = 0
Graphics.transition
loop do
Graphics.update
Input.update
update
if $scene != self
break
end
end
Graphics.freeze
@command_window.dispose
@playtime_window.dispose
@gold_window.dispose
@status_window.dispose
end
# --------------------------------
def update
@command_window.update
@playtime_window.update
@gold_window.update
@status_window.update
if @command_window.active
update_command
return
end
if @status_window.active
update_status
return
end
end
# --------------------------------
def update_command
if Input.trigger?(Input::B)
$game_system.se_play($data_system.cancel_se)
$scene = Scene_Map.new
return
end
if Input.trigger?(Input::C)
if $game_party.actors.size == 0 and @command_window.index < 4
$game_system.se_play($data_system.buzzer_se)
return
end
if $game_party.actors.size == 1 and @command_window.index ==6
$game_system.se_play($data_system.buzzer_se)
return
end
case @command_window.index
when 0
$game_system.se_play($data_system.decision_se)
$scene = Scene_Item.new
when 1
$game_system.se_play($data_system.decision_se)
@command_window.active = false
@status_window.active = true
@status_window.index = 0
when 2
$game_system.se_play($data_system.decision_se)
@command_window.active = false
@status_window.active = true
@status_window.index = 0
when 3
$game_system.se_play($data_system.decision_se)
@command_window.active = false
@status_window.active = true
@status_window.index = 0
when 4
if $game_system.save_disabled
$game_system.se_play($data_system.buzzer_se)
return
end
$game_system.se_play($data_system.decision_se)
$scene = Scene_Save.new
when 5
$game_system.se_play($data_system.decision_se)
$scene = Scene_End.new
when 6
$game_system.se_play($data_system.decision_se)
@checker = 0
@command_window.active = false
@status_window.active = true
@status_window.index = 0
when 7
$game_system.se_play($data_system.decision_se)
@command_window.active = false
@status_window.active = true
@status_window.index = 0
when 8
$game_system.se_play($data_system.decision_se)
@command_window.active = false
@status_window.active = true
@status_window.index = 0
end
return
end
end
# --------------------------------
def update_status
if Input.trigger?(Input::B)
$game_system.se_play($data_system.cancel_se)
@command_window.active = true
@status_window.active = false
@status_window.index = -1
return
end
if Input.trigger?(Input::C)
case @command_window.index
when 1
if $game_party.actors[@status_window.index].restriction >= 2
$game_system.se_play($data_system.buzzer_se)
return
end
$game_system.se_play($data_system.decision_se)
$scene = Scene_Skill.new(@status_window.index)
when 2
$game_system.se_play($data_system.decision_se)
$scene = Scene_Equip.new(@status_window.index)
when 3
$game_system.se_play($data_system.decision_se)
$scene = Scene_Status.new(@status_window.index)
when 6
$game_system.se_play($data_system.decision_se)
if @status_window.index==0
$game_system.se_play($data_system.cancel_se)
return
end
if @checker == 0
@changer = $game_party.actors[@status_window.index]
@where = @status_window.index
@checker = 1
else
$game_party.actors[@where] = $game_party.actors[@status_window.index]
$game_party.actors[@status_window.index] = @changer
@checker = 0
@status_window.refresh
end
when 7
$game_system.se_play($data_system.decision_se)
$scene = Scene_Lvup.new(@status_window.index)
when 8
$game_system.se_play($data_system.decision_se)
$scene = Scene_Charactor.new(@status_window.index)
end
return
end
end
end

复制代码

整合到一块，至少让菜单里能有一个调整队伍的选项呢？（本人菜鸟一个，不知道怎么弄，但实在很喜欢这个菜单）
新人菜鸟，触犯勿怪。

存档不能于2012-1-8 12:15补充以下内容：
抱歉，本人太菜了

悠久之翼 · 发表于 2011-12-18 13:49:39

很好看啊！感谢大大

zhixin1997 · 发表于 2011-12-11 10:01:23

=v=围观～感觉效果神马的很美好的样子

退屈￡无聊 · 发表于 2011-12-11 09:38:12

本来不想扔范例的但是貌似好多人都要的样子……嘛

ARPG.rar (465.21 KB, 下载次数: 1144)

lvjun_037 · 发表于 2011-12-10 21:17:30

表示可以的话最好附一下工程，咱用了出错到疯啊~~~~

fux2 · 发表于 2011-12-10 18:07:56

建议main循环前面的描绘放在一个新方法里，便于管理.

瑶瑶欲坠 · 发表于 2011-12-10 14:48:03

菜单美好~
可是没有范例工程……我这种脚本无知党悲催了Ｔ-Ｔ

退屈￡无聊 · 发表于 2011-12-10 12:48:49

本帖最后由退屈￡无聊于 2011-12-10 12:54 编辑

bbh 发表于 2011-12-10 12:35
这菜单太令人口水了~
话说能不能让菜单背后显示图片而不是直接透视地图？个人感觉那样比较好……当然啦，只 ...

这个自然可以。
第07行

@bitmap = Spriteset_Map.new

复制代码

改为

@bitmap = Sprite.new
@bitmap = Bitmap.new("路径名") # 示例:"Graphics/Pictures/University"

复制代码

另：紧急修正
197行范围出错……改为

@viewport = Viewport.new(170,100,300,300)

复制代码

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

[原创发布] 【巨坑】蛐蛐儿的简约（渣）菜单计划（四）技能界面

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

评分

点评

贵宾

开拓者