请问这个任务系统怎么用？ - Project1

#============================================================================
# ** 任务系统
# 基本:
# $scene = Scene_Task.new(返回的场景, 游标初始index) 召唤查看任务场景
# 说明:
# $game_party.accept_task(id) 接受id号任务
# $game_party.delete_task(Game_Task.new(id)) 删除(放弃)id号任务
# $game_party.completed_task(id) 完成id号任务
# $game_party.task_status(id) 获取任务状态,未接受返回nil;未完成返回false;
# 已完成返回true
# $game_party.accepted_task?(id) 判断角色是否接受了id号任务
# $game_party.completed_task?(id) 判断角色是否完成了id号任务
# 快捷手段:
# visible_ts(id, kind)
# 在地图画面上显示id号任务的状态.kind:0为接受任务时显示的信息;
# 1为完成任务时显示的信息;2为任务失败时显示的信息;
# 3为放弃任务时显示的信息;4为无法放弃任务时显示的信息;
# 5为已接此任务的提示.
# accept_task(id, enforcement)
# 接受id号任务并在地图上显示接受任务时显示的信息,enforcement为是否
# 强制接受,true为是,可不填,默认为false
# complete_task(id) 删除id号任务并在地图上显示完成任务时显示的信息
# fail_task(id) 删除id号任务并在地图上显示任务失败时显示的信息
# abandonment_task(id) 删除id号任务并在地图上显示放弃任务时显示的信息
#============================================================================
module DOS
#============================================================================
#-------------------------------任务设置-------------------------------------
#============================================================================
Task_Abandonment_Task_Input = Input::Letters["E"] # 放弃任务按钮........[按键]
Task_Left_Change_Page = Input::LEFT # 左翻页按键........................[按键]
Task_Right_Change_Page = Input::RIGHT # 右翻页按键......................[按键]
Task_Filament_Color = Color.new(0, 0, 0) # 描绘报酬表格时,线条的颜色....[颜色]
# ▼ 绘制确定放弃任务时疑问的文字色.....................................[颜色]
Task_Query_Word_Color = Color.new(255, 255, 0)
Task_Gold_Icon_Index = 205 # 金钱的图标id...............................[数字]
# 没有接受该任务,又调用该任务的complete_task/fail_task/abandonment_task方法时,
# 该怎样处理.0为显示一个窗口, 1为无处理.................................[数字]
Task_No_Accept = 0
#--任务资料设置(此处省略分类)
Task = []
#--痴情的女鬼---------------------------------------------------
Task[0] = { # 任务id
"Icon" => 10, # 图标id
"Name" => "痴情的女鬼",# 任务名称
"Caption" => " 村子里有一间大屋子,里头住着一个叫高姗姗的女鬼,他一直在等他的哥哥高
文彦.这种痴情的确令人佩服,但她每天晚上都会发出鬼哭的声音,引得附近黑毛
狼咆哮,斯库拉唱歌,厄洛斯射箭,狄安娜砸盾等,严重地影响了附近村民的休息
.你能够帮村民解决这个痴情的女鬼吗?",
"Reward" => {"Item" => [], # 完成任务后奖励的物品
"Weapon" => [], # 完成任务后奖励的武器
"Armor" => [], # 完成任务后奖励的防具
"Gold" => 0, # 完成任务后奖励的金钱
"Level_Plus" => [], # 完成任务后奖励的等级
"Exp_Plus" => [] # 完成任务后奖励的经验
},
"Can Abandonment?" => false, # 可否放弃此任务
"Level" => 3 # 任务等级
}
#--遗失的手风琴-----------------------------------------------
Task[1] = { # 任务id
"Icon" => 100, # 图标id
"Name" => "遗失的手风琴",# 任务名称
"Caption" => " 村庄里有一个伟大的音乐家,应邀去参加一个音乐会,但是他的手风琴不见,
你能帮他找找吗?",
"Reward" => {"Item" => [], # 完成任务后奖励的物品
"Weapon" => [], # 完成任务后奖励的武器
"Armor" => [], # 完成任务后奖励的防具
"Gold" => 0, # 完成任务后奖励的金钱
"Level_Plus" => [], # 完成任务后奖励的等级
"Exp_Plus" => [] # 完成任务后奖励的经验
},
"Can Abandonment?" => true, # 可否放弃此任务
"Level" => 3 # 任务等级
}
end
module Vocab
#============================================================================
#---------------------------任务用语设置-------------------------------------
#============================================================================
Task_Accept = "接受了任务[%s]"
Task_Complete = "任务[%s]被完成!"
Task_Fail = "任务[%s]已失败"
Task_Abandonment = "放弃任务[%s]"
Task_Can_Not_Abandonment = "无法放弃任务[%s]"
Task_Adandonment_Query = "你确定要放弃[%s]这个任务吗?"
Task_Accepted = "已接受任务[%s]"
Task_No_Accept = "你还没接受任务[%s]!"
Task_Difficulty = "任务难度:"
Task_Level_Word = ["简单", "容易", "中等", "困难"]
Task_Can_Abandonment_Word = ["可放弃", "不可放弃"]
Task_Change_Page = ["按下右键翻到下一页 >", "< 按下左键翻到上一页"]
end
#============================================================================
# ** Game_Task
#============================================================================
class Game_Task
#----------------------------------------------------------------------
# * 初始化
#----------------------------------------------------------------------
def initialize(id)
@id = id
@task = DOS::Task[id]
end
#----------------------------------------------------------------------
# * 获取任务id
#----------------------------------------------------------------------
def id
return @id
end
#----------------------------------------------------------------------
# * 获取任务图标索引
#----------------------------------------------------------------------
def icon_index
return @task["Icon"]
end
#----------------------------------------------------------------------
# * 获取任务名
#----------------------------------------------------------------------
def name
return @task["Name"]
end
#----------------------------------------------------------------------
# * 获取任务说明
#----------------------------------------------------------------------
def caption
return @task["Caption"]
end
#----------------------------------------------------------------------
# * 获取任务奖赏资料(不包括物品/武器/防具数量)
# kind:0为道具;1为武器;2为防具;3为金钱;4为lv;5为exp.
#----------------------------------------------------------------------
def reward(kind, index=0)
case kind
when 0
return $data_items[@task["Reward"]["Item"][index][0]]
when 1
return $data_weapons[@task["Reward"]["Weapon"][index][0]]
when 2
return $data_armors[@task["Reward"]["Armor"][index][0]]
when 3
return @task["Reward"]["Gold"]
when 4
if @task["Reward"]["Level_Plus"][index] != nil
return @task["Reward"]["Level_Plus"][index][1]
else return nil
end
when 5
if @task["Reward"]["Exp_Plus"][index] != nil
return @task["Reward"]["Exp_Plus"][index][1]
else return nil
end
end
end
#----------------------------------------------------------------------
# * 获取任务奖赏多少种道具
# kind:0为道具;1为武器;2为防具.
#----------------------------------------------------------------------
def reward_size(kind)
case kind
when 0
return @task["Reward"]["Item"].size
when 1
return @task["Reward"]["Weapon"].size
when 2
return @task["Reward"]["Armor"].size
end
end
#----------------------------------------------------------------------
# * 获取任务奖赏等级/经验的受益人(le = level ＆ exp)
# kind:0为level;1为exp.
#----------------------------------------------------------------------
def reward_le_actor(kind, index)
case kind
when 0
if $game_party.members[@task["Reward"]["Level_Plus"][index][0]] != nil
return $game_party.members[@task["Reward"]["Level_Plus"][index][0]]
else return nil
end
when 1
if $game_party.members[@task["Reward"]["Exp_Plus"][index][0]] != nil
return $game_party.members[@task["Reward"]["Exp_Plus"][index][0]]
else return nil
end
end
end
#----------------------------------------------------------------------
# * 获取任务奖赏等级/经验的受益人总数(le = level ＆ exp)
# kind:0为level;1为exp.
#----------------------------------------------------------------------
def reward_le_actor_size(kind)
case kind
when 0
return @task["Reward"]["Level_Plus"].size
when 1
return @task["Reward"]["Exp_Plus"].size
end
end
#----------------------------------------------------------------------
# * 获取任务奖赏道具数量
# kind:0为道具;1为武器;2为防具.
#----------------------------------------------------------------------
def reward_item_amount(kind,index)
case kind
when 0
return @task["Reward"]["Item"][index][1]
when 1
return @task["Reward"]["Weapon"][index][1]
when 2
return @task["Reward"]["Armor"][index][1]
end
end
#----------------------------------------------------------------------
# * 获取任务等级
#----------------------------------------------------------------------
def level
return @task["Level"]
end
#----------------------------------------------------------------------
# * 获取描述任务等级用语
#----------------------------------------------------------------------
def level_word
return Vocab::Task_Level_Word[@task["Level"]]
end
#----------------------------------------------------------------------
# * 获取可否放弃标识
#----------------------------------------------------------------------
def can_abandonment?
return @task["Can Abandonment?"]
end
#----------------------------------------------------------------------
# * 获取可否放弃文字
#----------------------------------------------------------------------
def can_abandonment_word
if @task["Can Abandonment?"] == true
return Vocab::Task_Can_Abandonment_Word[0]
else return Vocab::Task_Can_Abandonment_Word[1]
end
end
end
#==============================================================================
# ** Game_Party
#------------------------------------------------------------------------------
# 這個類用來操控主角隊伍，包含了隊伍所攜資金和物品等資訊。
# 這個類的實例被全域變數 $game_party 所引用。
#==============================================================================
class Game_Party < Game_Unit
attr_reader :accepted_task
def initialize
super
[url=home.php?mod=space&uid=236945]@gold[/url] = 100
@steps = 0
@last_item_id = 0
@last_actor_index = 0
@last_target_index = 0
@actors = [] # 隊員類型 (主角編號)
@items = {} # 所攜物品 HASH 表 (物品編號)
@weapons = {} # 所攜武器 HASH 表 (武器編號)
@armors = {} # 所攜護具 HASH 表 (護具編號)
@accepted_task = []
@task_status = []
end
def accept_task(id)
@accepted_task.push(Game_Task.new(id))
@task_status[id] = false
end
def delete_task(task)
@accepted_task.delete(task)
@task_status[id] = nil
end
def completed_task(id)
delete_task(Game_Task.new(id))
for item in 0...@accepted_task[id].reward_size(0)
gain_item(@accepted_task[id].reward(0, item),@accepted_task[id].reward_item_amount(0,item))
end
for item in 0...@accepted_task[id].reward_size(1)
gain_item(@accepted_task[id].reward(1, item),@accepted_task[id].reward_item_amount(1,item))
end
for item in 0...@accepted_task[id].reward_size(2)
gain_item(@accepted_task[id].reward(2, item),@accepted_task[id].reward_item_amount(2,item))
end
for index in 0...@accepted_task[id].reward_le_actor_size(0)
if @accepted_task[id].reward_le_actor(0, index) == nil
next
end
@accepted_task[id].reward_le_actor(0, index).change_level(@accepted_task[id].reward(5, index), true)
end
for index in 0...@accepted_task[id].reward_le_actor_size(1)
if @accepted_task[id].reward_le_actor(1, index) == nil
next
end
@accepted_task[id].reward_le_actor(1, index).change_exp(@accepted_task[id].reward(4, index), true)
end
gain_gold(@accepted_task[id].reward(3))
@task_status[id] = true
end
def task_status(id)
return @task_status[id]
end
def accepted_task?(id)
if @task_status[id] == true or @task_status[id] == false
return true
else return false
end
end
def completed_task?(id)
if @task_stutas[id] == true
return true
else return false
end
end
end
#============================================================================
# ** Window_TaskHelp
#============================================================================
class Window_TaskHelp < Window_Base
attr_accessor :paga
def initialize(id, paga=0)
super(160, 20, 384, 376)
@paga = paga
refresh(id)
end
def refresh(id)
dw = self.width - 32
dh = self.height - 32
task = Game_Task.new(id)
self.contents.clear
if @paga == 0 # 描绘第一页
draw_icon(task.icon_index, 0, 0)
self.contents.draw_text(28, 0, dw, 24, task.name)
self.contents.draw_text(0, 24, dw, 24, Vocab::Task_Difficulty)
w = self.contents.text_size(Vocab::Task_Difficulty).width
self.contents.draw_text(w, 24, dw, 24, task.level_word)
self.contents.draw_text(28, 0, dw-28, 24, task.can_abandonment_word, 2)
chenge_special_character(task.caption.clone, 0, 48)
elsif @paga == 1 # 描绘第二页
#-描绘表格-------------------------------------------------------------
# 边框
draw_straight_filament(0, 0, dw, 0, 1, DOS::Task_Filament_Color)
draw_straight_filament(0, 0, 0, dh, 1, DOS::Task_Filament_Color)
draw_straight_filament(0, 27, dw, 27, 1, DOS::Task_Filament_Color)
draw_straight_filament(0, dh-1, dw/2, dh-1, 1, DOS::Task_Filament_Color)
draw_straight_filament(dw/2+2, dh-5, dw-1, dh-5, 1, DOS::Task_Filament_Color)
draw_straight_filament(dw-1, 0, dw-1, dh-4, 1, DOS::Task_Filament_Color)
# 中线
draw_straight_filament(dw/2-1, 27, dw/2-1, dh, 1, DOS::Task_Filament_Color)
draw_straight_filament(dw/2+1, 27, dw/2+1, dh-4, 1, DOS::Task_Filament_Color)
# 队伍成员分割线
h = (dh-27-1)/4
draw_straight_filament(0, h*1+27, dw/2-1, h*1+27, 1, DOS::Task_Filament_Color)
draw_straight_filament(0, h*2+27, dw/2-1, h*2+27, 1, DOS::Task_Filament_Color)
draw_straight_filament(0, h*3+27, dw/2-1, h*3+27, 1, DOS::Task_Filament_Color)
draw_straight_filament(0, h*4+27, dw/2-1, h*4+27, 1, DOS::Task_Filament_Color)
# 头像分割线
draw_straight_filament(79, 27, 79, dh, 1, DOS::Task_Filament_Color)
# 描绘成员奖励分割线
draw_straight_filament(79, (h-h/2)*1+27, dw/2-1, (h-h/2)*1+27, 1, DOS::Task_Filament_Color)
draw_straight_filament(79, (h-h/2)+h+27, dw/2-1, (h-h/2)+h+27, 1, DOS::Task_Filament_Color)
draw_straight_filament(79, (h-h/2)+h*2+27, dw/2-1, (h-h/2)+h*2+27, 1, DOS::Task_Filament_Color)
draw_straight_filament(79, (h-h/2)+h*3+27, dw/2-1, (h-h/2)+h*3+27, 1, DOS::Task_Filament_Color)
# 描绘奖励分割线
a = (dw-28)/24
for i in 0...a
draw_straight_filament(dw/2+2, 24*i+27, dw-1, 24*i+27, 1, DOS::Task_Filament_Color)
end
#-结束描绘-------------------------------------------------------------
#-描绘内容-------------------------------------------------------------
# 描绘标题
self.contents.draw_text(1, 1, dw-1, 24, "奖赏表", 1)
# 描绘头像等
for i in 0...$game_party.members.size
draw_actor_face($game_party.members[i], 1, h*i+28, h-1)
self.contents.font.size = 20
self.contents.draw_text(1, 1+h*i+27, 96, 24, $game_party.members[i].name)
self.contents.font.size = 18
self.contents.draw_text(81,1+h*i+27, dw/2-81, 24,"奖励#{Vocab.level}:")
self.contents.draw_text(81,1+h*i+27+h/2, dw/2-81, 24,"奖励经验:")
if task.reward(4, i) != nil
self.contents.draw_text(81,1+h*i+27+h/4, dw/2-82, 24, task.reward(4, i), 2)
else self.contents.draw_text(81,1+h*i+27+h/4, dw/2-82, 24, "无", 2)
end
if task.reward(5, i) != nil
self.contents.draw_text(81,1+h*i+27+h/4+h/2, dw/2-82, 24, task.reward(5, i), 2)
else self.contents.draw_text(81,1+h*i+27+h/4+h/2, dw/2-82, 24, "无", 2)
end
end
self.contents.font.size = 20
x = dw/2+1
# 描绘金钱奖励
draw_icon(DOS::Task_Gold_Icon_Index, x, 26)
self.contents.draw_text(x+25, 26, dw/2-1, 24,"金币:#{task.reward(3, 0)}#{Vocab.gold}")
y = 26+24
# 描绘道具奖励
for i in 0...task.reward_size(0)
draw_icon(task.reward(0, i).icon_index, x, y+i*24)
self.contents.draw_text(x+25, y+i*24, dw/2-1, 24,"#{task.reward(0, i).name}*#{task.reward_item_amount(0, i)}")
end
y = 26 + 24 + task.reward_size(0)*24
# 描绘武器奖励
for i in 0...task.reward_size(1)
draw_icon(task.reward(1, i).icon_index, x, y+i*24)
self.contents.draw_text(x+25, y+i*24, dw/2-1, 24,"#{task.reward(1, i).name}*#{task.reward_item_amount(1, i)}")
end
y = 26 + 24 + task.reward_size(0)*24 + task.reward_size(1)*24
# 描绘防具奖励
for i in 0...task.reward_size(2)
draw_icon(task.reward(2, i).icon_index, x, y+i*24)
self.contents.draw_text(x+25, y+i*24, dw/2-1, 24,"#{task.reward(2, i).name}*#{task.reward_item_amount(2, i)}")
end
#-结束描绘-------------------------------------------------------------
end
end
end
#=============================================================================
# ** Scene_Task
#=============================================================================
class Scene_Task < Scene_Base
#---------------------------------------------------------------------------
# * 初始化变量
#---------------------------------------------------------------------------
def initialize(return_scene, index=0)
@index = index
@return_scene = return_scene
end
#---------------------------------------------------------------------------
# * 开始处理
#---------------------------------------------------------------------------
def start
create_menu_background
@th = Window_TaskHelp.new($game_party.accepted_task[0].id)
@paga = @th.paga
tn = []
for i in 0...$game_party.accepted_task.size
tn[i] = $game_party.accepted_task[i].name
end
@hc = Window_Command.new(160, tn)
@hc.y = 20
@hc.height = 376
@hc.index = @index
@query = Window_Base.new(40, 152, 464, 56)
a = sprintf(Vocab::Task_Adandonment_Query, $game_party.accepted_task[0].name)
@query.contents.font.color = DOS::Task_Query_Word_Color
@query.contents.draw_text(0, 0, 432, 24, a, 1)
@query.contents.font.color = Color.new(0, 0, 0)
@qc = Window_Command.new(160, [" 是", " 否"])
@qc.x = 192
@qc.y = 208
@query.visible = false
@qc.visible = false
@qc.active = false
[url=home.php?mod=space&uid=114926]@sprite[/url] = Sprite.new
@sprite.bitmap = Bitmap.new(384, 24)
@sprite.bitmap.draw_text(0, 0, 384, 24, Vocab::Task_Change_Page[@paga], 1)
@sprite.x = 0
@sprite.y = 416-24
end
#--------------------------------------------------------------------------
# * 结束处理
#--------------------------------------------------------------------------
def terminate
dispose_menu_background
@hc.dispose
@th.dispose
@query.dispose
@qc.dispose
@sprite.dispose
end
#--------------------------------------------------------------------------
# * 更新帧
#--------------------------------------------------------------------------
def update
@sprite.update
@sprite.x + 10 if @sprite.x != 160
@hc.update
@th.update
update_input
if @hc.index != @index
@th.refresh($game_party.accepted_task[@hc.index].id)
@index = @hc.index
end
@query.update
if @query.active == true
@qc.update
end
if @paga != @th.paga
@sprite.bitmap.clear
@sprite.bitmap.draw_text(0, 0, 384, 24, Vocab::Task_Change_Page[@th.paga], 1)
@sprite.x = 0
@paga = @th.paga
end
end
#--------------------------------------------------------------------------
# * 刷新按键
#--------------------------------------------------------------------------
def update_input
if Input.trigger?(Input::B)
if @hc.active == true
Sound.play_cancel
$scene = @return_scene
elsif @query.visible == true
Sound.play_cancel
@hc.active = true
@query.visible = false
@qc.visible = false
@qc.active = false
end
elsif Input.trigger?(DOS::Task_Abandonment_Task_Input)
if @hc.active == true
if $game_party.accepted_task[@hc.index].can_abandonment? == true
Sound.play_decision
a = sprintf(Vocab::Task_Adandonment_Query, $game_party.accepted_task[@hc.index].name)
@query.contents.clear
@query.contents.font.color = DOS::Task_Query_Word_Color
@query.contents.draw_text(0, 0, 432, 24, a, 1)
@query.contents.font.color = Color.new(0, 0, 0)
@query.visible = true
@qc.visible = true
@qc.active = true
@hc.active = false
else Sound.play_buzzer
@query.contents.clear
a = sprintf(Vocab::Task_Can_Not_Abandonment, $game_party.accepted_task[@hc.index].name)
@query.contents.font.color = DOS::Task_Query_Word_Color
@query.contents.draw_text(0, 0, 432, 24, a, 1)
@query.contents.font.color = Color.new(0, 0, 0)
@query.visible = true
@hc.active = false
end
end
elsif Input.trigger?(Input::C)
if @qc.visible == true
if @qc.index == 0
Sound.play_decision
@query.contents.clear
a = sprintf(Vocab::Task_Abandonment, $game_party.accepted_task[@hc.index].name)
@query.contents.font.color = DOS::Task_Query_Word_Color
@query.contents.draw_text(0, 0, 432, 24, a, 1)
@query.contents.font.color = Color.new(0, 0, 0)
@qc.visible = false
@query.visible = true
$game_party.delete_task($game_party.accepted_task[@hc.index])
Graphics.wait(40)
$scene = Scene_Task.new(@return_scene)
else @hc.active = true
Sound.play_cancel
@query.visible = false
@qc.visible = false
@qc.active = false
end
end
elsif Input.trigger?(DOS::Task_Left_Change_Page)
if @th.paga == 1
@th.paga = 0
@th.refresh($game_party.accepted_task[@hc.index].id)
end
elsif Input.trigger?(DOS::Task_Right_Change_Page)
if @th.paga == 0
@th.paga = 1
@th.refresh($game_party.accepted_task[@hc.index].id)
end
end
end
end
#==============================================================================
# ** Game_Map
#------------------------------------------------------------------------------
# 這個類用來操控地圖，包含了地圖滾動設置和通行度判定等資訊。
# 這個類的實例被全域變數 $game_map 所引用。
#==============================================================================
class Game_Map
#--------------------------------------------------------------------------
# * 宣告執行個體變數
#--------------------------------------------------------------------------
attr_accessor :task_id
attr_reader :ts_visible
attr_reader :task_word
alias old_ini initialize
def initialize
old_ini
@task_word = ""
@ts_visible = false
@task_id = 0
end
def visible_task_status
if @ts_visible == false
@ts_visible = true
else @ts_visible = false
end
end
def set_task_word(kind)
case kind
when 0 # 接受了任务
@task_word = Vocab::Task_Accept
when 1 # 完成了任务
@task_word = Vocab::Task_Complete
when 2 # 任务失败了
@task_word = Vocab::Task_Fail
when 3 # 放弃了任务
@task_word = Vocab::Task_Abandonment
when 4 # 无法放弃任务
@task_word = Vocab::Task_Can_Not_Abandonment
when 5 # 已接受了任务
@task_word = Vocab::Task_Accepted
when 6 # 未接受任务
@task_word = Vocab::Task_No_Accept
when nil
@task_word = nil
end
end
end
#==============================================================================
# ** Scene_Map
#------------------------------------------------------------------------------
# 這個類用來執行顯示地圖場景畫面的程式。
#==============================================================================
class Scene_Map < Scene_Base
alias old_sta start
alias old_upd update
alias old_ter terminate
def start
old_sta
@ts = Window_Base.new(40, 152, 464, 56)
@ts.visible = false
end
def terminate
old_ter
@ts.dispose
end
def update
old_upd
if $game_map.ts_visible == true
@ts.contents.clear
tw = sprintf($game_map.task_word, Game_Task.new($game_map.task_id).name)
@ts.contents.draw_text(28, 0, 408, 24, tw)
@ts.draw_icon(Game_Task.new($game_map.task_id).icon_index, 0, 0)
@ts.visible = true
Graphics.wait(40)
$game_map.visible_task_status
@ts.visible = false
end
end
end
#==============================================================================
# ** Game_Interpreter
#------------------------------------------------------------------------------
# 這個類是用來執行事件指令的直譯器。
# 這個類作為 Game_Map、Game_Troop 和 Game_Event 的內部類使用。
#==============================================================================
class Game_Interpreter
def accept_task(id, enforcement=false)
if $game_party.accepted_task?(id) == false or enforcement == true
$game_party.accept_task(id)
visible_ts(id, 0)
else
visible_ts(id, 5)
end
end
def complete_task(id)
if $game_party.accepted_task?(id) == false
$game_party.completed_task(id)
visible_ts(id, 1)
elsif $game_party.accepted_task?(id) == nil
visible_ts(id, 6) if DOS::Task_No_Accept == 0
end
end
def fail_task(id)
if $game_party.accepted_task?(id) == false
$game_party.delete_task(Game_Task.new(id))
visible_ts(id, 2)
elsif $game_party.accepted_task?(id) == nil
visible_ts(id, 6) if DOS::Task_No_Accept == 0
end
end
def abandonment_task(id)
if $game_party.accepted_task?(id) == false
$game_party.delete_task(Game_Task.new(id))
visible_ts(id, 3)
elsif $game_party.accepted_task?(id) == nil
visible_ts(id, 6) if DOS::Task_No_Accept == 0
end
end
def visible_ts(id, kind)
$game_map.task_id = id
$game_map.set_task_word(kind)
$game_map.visible_task_status
end
end
class Window_Base < Window
#--------------------------------------------------------------------------
# * 描绘直线 by 945127391
# begin_x : 直线开始的x坐标
# begin_y : 直线开始的y坐标
# end_x : 直线结束的x坐标
# end_y : 直线结束的y坐标
# color : 直线的颜色
# width : 直线的宽度(厚度)
#--------------------------------------------------------------------------
def draw_straight_filament(begin_x, begin_y, end_x, end_y, width, color)
if begin_x == end_x
bitmap = Bitmap.new(width, end_y-begin_y)
elsif begin_y == end_y
bitmap = Bitmap.new(end_x-begin_x, width)
else return
end
bitmap.fill_rect(0, 0, bitmap.width, bitmap.height, color)
rect = Rect.new(0, 0, bitmap.width, bitmap.height)
self.contents.blt(begin_x, begin_y, bitmap, rect)
bitmap.dispose
end
#--------------------------------------------------------------------------
# * 描绘自动换行文字 by 叶子
# 修改 945127391
#--------------------------------------------------------------------------
def chenge_special_character(text, x=0, y=0)
# 记录换行时y坐标最小加值
min_y = 0
while ((c = text.slice!(/./m)) != nil)
# 另起一行文字的情况下
if c == "\n"
y += [WLH, min_y].max
min_y = 0
x = 0
# 下面的文字
next
end
# 自动换行处理
if x + self.contents.text_size(c).width > self.contents.width
y += [WLH, min_y].max
min_y = 0
x = 0
end
# 描绘文字
self.contents.draw_text(4 + x, y, 40, WLH, c)
# x 为要描绘文字的加法运算
x += self.contents.text_size(c).width
end
end
end

复制代码

=begin
--------------------------------------------------------------------------
详尽任务显示界面 v2.1
--------------------------------------------------------------------------
By 叶子
日期与更新
3-29-2006 －v1.0
4-3-2006 －v2.0
－可以改变文字颜色，显示变量，显示图标，显示图片
－大幅简化了编写任务内容的过程，加入自动换行功能
－精简了窗口，使其还可以用作图鉴系统、日记系统等等
4-6-2006 －v2.1
－增加了获得全部任务与删除全部任务命令
－改正通假字，修改了示例任务3
--------------------------------------------------------------------------
改版 by snstar2006
修改部分：
- 将XP的一些脚本改成VX版的
- 将窗口大小缩放成VX的大小（依照比例）
- 将一些会变成很长的脚本精简
（如：用$game_pary.item_no(物品编号)
代替原来的$game_party.item_number($data_items[物品编号]) = ="好长）
- 精简一些代码，将 Window_Task_Name 和Window_Task 重合部分用继承方式精简
- 依照VX的 RGSS2 规范编写 Scene_Task
- 增加使用16进位颜色代码变换字体颜色功能
- 修改Scene_Menu的召唤方式，使脚本新手使用起来更容易
--------------------------------------------------------------------------
顾名思义，就是显示任务数据的界面
任务数据要预先在这里设定好
下载范例工程，能帮助你更快更好地掌握使用方法
--------------------------------------------------------------------------
使用方法：
1、召唤任务显示界面：$scene = Scene_Task.new
可以在事件中的「脚本」指令加入这段东西，
又或者修改 Scene_Menu 来增加一个显示任务的选项。
如果是修改 Scene_Menu 增加選項的話，请使用
$scene = Scene_Task.new(任务在菜单的index)
例如：$scene = Scene_Task.new(7)
2、设置任务数据
2.1、相关内容解析
所有内容文字必须用双引号括住
名称：任务的名字（显示在左边窗口中），大小为172×32，如果全部为文字的话，
够放九个全角字符
简介：任务的介绍（显示在右边窗口中），宽308，高不限
文字可以自动换行
2.1.1、控制码解析
名称和内容均可用控制码，注意两条反斜杠都要打！
\\v[n] 显示n号变量
\\c[n] 改变字体颜色。n 为窗口外观图片中所设定的颜色,可为0-31
\\c[HRRGGBB]设定字体颜色为RRGGBB色, RRGGBB 为16进位颜色代码
\\n[i] 显示i号角色名字
\\i[图标编号] 显示图标 # 图标编号为图标在IconSet里的顺序
\\p[文件名] 显示图片
2.1.2、高级：内嵌表达式
请参考帮助－脚本入门－字符串－内嵌表达式相关内容。
它可以用来在任务的名称和简介那里显示变量。
常用的表达式（注意不要漏了井号和大括号）：
#{$game_variables[n]} ——插入n号变量的值
#{$game_party.item_no(n)} —— 插入持有n号物品数量
同理还有 weapon_no，armor_no
还可以预先定义一个变量，再插入（例子见示例任务3－灵魂线）
2.2、注意事项
2.2.1、括号、逗号和双引号 [ ] , " 必须使用半角符号（英文输入），
引号内的内容则没有关系
2.2.2、单引号 ' 和双引号 " 的区别：
为了不出错误，全部用双引号吧！当然如果你对Ruby很熟悉，那就没所谓了
2.3、开始设置吧！
从107行开始设置任务数据，可以参考示例任务来设置，请仔细阅读附加讲解
3、接受任务
事件里的「脚本」指令输入：get_task(任务ID)
例如 get_task(1) 就是接受1号任务
3.1、获得全部任务
事件里的「脚本」指令输入：get_all_task
这个功能基本上是用来在编写好所有任务数据后测试排版的
4、完成/删除任务
事件里的「脚本」指令输入：finish_task(任务ID)
例如 finish_task(1) 就是完成1号任务
注意：本脚本不负责完成任务后的奖励之类的东西，请自行在事件中判断，
这里的完成任务指的是从任务列表中删去此任务
4.1、删除全部任务
事件里的「脚本」指令输入：finish_all_task
作为获得全部任务的对应功能存在，似乎不会怎么用到
=end
class Scene_Task
# 这里设置任务内容翻页音效
CHANGE_PAGE_SE = "Audio/SE/Book"
end
class Game_Party
#--------------------------------------------------------------------------
# ● 设置任务资料
#--------------------------------------------------------------------------
def get_tasks_info
@tasks_info = []
名称 = "\\c[6]打开书本阅读"
简介 = "\\c[2]主线任务
\\c[3]任务目标：
打开书本阅读
\\c[6]提示：
\\c[0]打开书本阅读。"
@tasks_info[1] = Game_Task.new(名称, 简介)
名称 = "\\c[6]打开书本阅读\\i[63]"
简介 = "\\c[2]主线任务【已完成】
\\c[3]任务目标：
打开书本阅读
\\c[6]提示：
\\c[0]已经完成。
任务奖励：
\\c[Hff0000]
奖励点：200金币"
@tasks_info[1] = Game_Task.new(名称, 简介)
#===========================================================================
@tasks_info=[]
名称 = "\\c[5]打败强盗\\i[94]"
简介 = "\\c[3]支线任务
\\c[8]任务目标：
打败村子的强盗
\\c[0]打败强盗
任务奖励：
\\c[5]200银子"
@tasks_info[2] = Game_Task.new(名称, 简介)
#===========================================================================
@tasks_info=[]
名称 = "\\c[4]勇者的考验\\i[54]"
简介 = "\\c[3]主线任务
\\c[5]任务目标：
打败村子里的怪物。
\\c[6]勇者的考验
任务奖励：
\\c[5]经验950 400铜钱"
@tasks_info[3] = Game_Task.new(名称, 简介)
#=======================================================================
@takes_info=[]
名称 ="\\c[5]江树狂风扫\\i[53]"
简介 = "\\c[4]主线任务
\\c[3]任务目标:
①收集5片枫叶
②与李坤对话
\\c[6]江树狂风扫
任务奖励：
\\c[5]经验1500 750铜钱"
@tasks_info[4] = Game_Task.new(名称, 简介)
#======================================================================
end
end
#==============================================================================
# ■ Interpreter
#------------------------------------------------------------------------------
# 　执行事件命令的解释器。本类在 Game_System 类
# 与 Game_Event 类的内部使用。
#==============================================================================
class Game_Interpreter
#--------------------------------------------------------------------------
# ● 接受任务
#--------------------------------------------------------------------------
def get_task(id)
task = $game_party.tasks_info[id]
return true if (task.nil? or $game_party.current_tasks.include?(task.id))
$game_party.current_tasks.unshift(task.id)
return true
end
#--------------------------------------------------------------------------
# ● 获得全部任务
#--------------------------------------------------------------------------
def get_all_task
# 清空当前任务
$game_party.current_tasks.clear
for task in $game_party.tasks_info
next if task.nil?
$game_party.current_tasks.unshift(task.id)
end
return true
end
#--------------------------------------------------------------------------
# ● 完成/放弃任务
#--------------------------------------------------------------------------
def finish_task(id)
task = $game_party.tasks_info[id]
return true if task.nil?
$game_party.current_tasks.delete(task.id)
return true
end
#--------------------------------------------------------------------------
# ● 删除全部任务
#--------------------------------------------------------------------------
def finish_all_task
$game_party.current_tasks.clear
return true
end
end
#==============================================================================
# ■ Game_Party
#------------------------------------------------------------------------------
# 　处理同伴的类。包含金钱以及物品的信息。本类的实例
# 请参考 $game_party。
#==============================================================================
class Game_Party
#--------------------------------------------------------------------------
# ● 定义实例变量
#--------------------------------------------------------------------------
attr_writer :latest_task # 上次查看的任务
#--------------------------------------------------------------------------
# ● 取得任务资料
#--------------------------------------------------------------------------
def tasks_info
if @tasks_info.nil?
get_tasks_info
end
return @tasks_info
end
#--------------------------------------------------------------------------
# ● 取得当前任务
#--------------------------------------------------------------------------
def current_tasks
if @current_tasks.nil?
@current_tasks = []
end
return @current_tasks
end
#--------------------------------------------------------------------------
# ● 上次查看的任务
#--------------------------------------------------------------------------
def latest_task
if !current_tasks.include?(@latest_task)
@latest_task = current_tasks[0]
end
return @latest_task
end
end
#==============================================================================
# ■ Game_Task
#------------------------------------------------------------------------------
# 　处理任务的类。包含任务的信息。
#==============================================================================
class Game_Task
attr_accessor :name # 名称
attr_accessor :briefing # 简介
def initialize(name, briefing)
@name = name
@briefing = briefing
end
def height
text = @briefing.clone
x = 0
y = 64
min_y = 0
# 限制文字处理
begin
last_text = text.clone
text.gsub!(/\\[Vv]\[([0-9]+)\]/) { $game_variables[$1.to_i] }
end until text == last_text
text.gsub!(/\\[Nn]\[([0-9]+)\]/) do
$game_actors[$1.to_i] != nil ? $game_actors[$1.to_i].name : ""
end
# 为了方便、将 "\\\\" 变换为 "\000"
text.gsub!(/\\\\/) { "\000" }
# "\C" 变为 "\001"
text.gsub!(/\\[Cc]\[([0-9]+)\]/) { "\001[#{$1}]" }
# "\I" 变为 "\002"
text.gsub!(/\\[Ii]/) { "\002" }
# "\P" 变为 "\003"
text.gsub!(/\\[Pp]/) { "\003" }
# c 获取 1 个字 (如果不能取得文字就循环)
while ((c = text.slice!(/./m)) != nil)
# \\ 的情况下
if c == "\000"
# 还原为本来的文字
c = "\\"
end
# \C[n] 的情况下
if c == "\001"
# 更改文字色
text.sub!(/\[([0-9a-zA-Z]+)\]/, "")
# 下面的文字
next
end
# 图标的情况下
if c == "\002"
icon_name = ''
while ((cha = text.slice!(/./m)) != ']')
next if cha == '['
icon_name += cha
end
if x + 24 > 368
x = 0
y += [24, min_y].max
min_y = 0
end
x += 28
next
end
# 图片的情况下
if c == "\003"
pic_name = ''
while ((cha = text.slice!(/./m)) != ']')
next if cha == '['
pic_name += cha
end
pic = Cache.picture(pic_name)
if x + pic.width > 368
x = 0
y += [24, min_y].max
min_y = 0
end
x += pic.width
min_y = [pic.height, 24].max
next
end
# 另起一行文字的情况下
if c == "\n"
y += [24, min_y].max
min_y = 0
x = 0
# 下面的文字
next
end
# 自动换行处理
if x + 22 > 368
y += [24, min_y].max
min_y = 0
x = 0
end
# x 为要描绘文字的加法运算
x += 22
end
return (y + [24, min_y].max)
end
def id
return $game_party.tasks_info.index(self)
end
end
#==============================================================================
# ■ Window_Task_Name
#------------------------------------------------------------------------------
# 　任务名称显示窗口。
#==============================================================================
class Window_Task_Name < Window_Selectable
#--------------------------------------------------------------------------
# ● 初始化对像
#--------------------------------------------------------------------------
def initialize(tasks)
super(0, 0, 204, 416)
@tasks = []
for id in tasks
@tasks.push($game_party.tasks_info[id])
end
@item_max = tasks.size
self.contents = Bitmap.new(
self.width - 32, @item_max == 0 ? 32 : @item_max * 32)
refresh
self.index = 0
end
#--------------------------------------------------------------------------
# ● 刷新
#--------------------------------------------------------------------------
def refresh
self.contents.clear
if @tasks != []
for task in @tasks
draw_item(task)
end
else
draw_blank
end
end
#--------------------------------------------------------------------------
# ● 描绘项目
#--------------------------------------------------------------------------
def draw_item(task)
text = task.name.clone
y = @tasks.index(task) * WLH
chenge_special_character(text, 0, y)
end
#--------------------------------------------------------------------------
# ● 描绘空行
#--------------------------------------------------------------------------
def draw_blank
self.contents.font.color = Color.new(255, 255, 255, 128)
rect = Rect.new(4, 0, self.contents.width - 8, 32)
self.contents.fill_rect(rect, Color.new(0, 0, 0, 0))
self.contents.draw_text(rect, '无任何任务')
end
#--------------------------------------------------------------------------
# ● 获取任务
#--------------------------------------------------------------------------
def task
return @tasks[self.index]
end
end
#==============================================================================
# ■ Window_Task
#------------------------------------------------------------------------------
# 　任务内容显示窗口。
#==============================================================================
class Window_Task < Window_Base
#--------------------------------------------------------------------------
# ● 初始化对像
#--------------------------------------------------------------------------
def initialize(task_id)
super(204, 0, 340, 416)
refresh(task_id)
end
#--------------------------------------------------------------------------
# ● 刷新内容
#--------------------------------------------------------------------------
def refresh(task_id)
self.oy = 0
self.visible = true
return if task_id.nil?
task = $game_party.tasks_info[task_id]
if !task.nil?
self.contents = Bitmap.new(self.width - 32, task.height)
else
self.contents = Bitmap.new(self.width - 32, self.height - 32)
return
end
self.contents.font.color = normal_color
# 描绘任务内容
draw_task_info(task)
end
#--------------------------------------------------------------------------
# ● 描绘任务内容
#--------------------------------------------------------------------------
def draw_task_info(task)
self.contents.font.color = normal_color
# 描绘任务简介
chenge_special_character(task.briefing.clone)
end
end
class Window_Base < Window
def chenge_special_character(text, x=0, y=0)
# 记录换行时y坐标最小加值
min_y = 0
# 限制文字处理
begin
last_text = text.clone
text.gsub!(/\\[Vv]\[([0-9]+)\]/) { $game_variables[$1.to_i] }
end until text == last_text
text.gsub!(/\\[Nn]\[([0-9]+)\]/) do
$game_actors[$1.to_i] != nil ? $game_actors[$1.to_i].name : ""
end
# 为了方便、将 "\\\\" 变换为 "\000"
text.gsub!(/\\\\/) { "\000" }
# "\C" 变为 "\001"
text.gsub!(/\\[Cc]\[([0-9a-zA-Z]+)\]/) { "\001[#{$1}]" }
# "\I" 变为 "\002"
text.gsub!(/\\[Ii]/) { "\002" }
# "\P" 变为 "\003"
text.gsub!(/\\[Pp]/) { "\003" }
# c 获取 1 个字 (如果不能取得文字就循环)
while ((c = text.slice!(/./m)) != nil)
# \\ 的情况下
if c == "\000"
# 还原为本来的文字
c = "\\"
end
# \C[n] 的情況下
if c == "\001"
# 更改文字色
text.sub!(/\[([0-9a-zA-Z]+)\]/, "")
# 如果是设定RGB颜色
if $1[0,1]=="H"
# 先拷贝一下文字
c=$1.dup
# 分3段分别取出R,G,B颜色
c.sub!(/H([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))
else
color = $1.to_i
if color >= 0 and color <= 31
self.contents.font.color = text_color(color)
elsif color == 32
self.contents.font.color = disabled_color
elsif color == 33
self.contents.font.color = system_color
end
end
# 下面的文字
next
end
# 图标的情况下
if c == "\002"
icon_name = ''
while ((cha = text.slice!(/./m)) != ']')
next if cha == '['
icon_name += cha
end
if x + 24 > self.contents.width
x = 0
y += [WLH, min_y].max
min_y = 0
end
draw_icon(icon_name.to_i, x+4, y+4, true)
x += 28
next
end
# 图片的情况下
if c == "\003"
pic_name = ''
while ((cha = text.slice!(/./m)) != ']')
next if cha == '['
pic_name += cha
end
pic = Cache.picture(pic_name)
if x + pic.width > self.contents.width
x = 0
y += [WLH, min_y].max
min_y = 0
end
self.contents.blt(x + 4, y, pic, Rect.new(0, 0, pic.width, pic.height))
x += pic.width
min_y = [pic.height, WLH].max
next
end
# 另起一行文字的情况下
if c == "\n"
y += [WLH, min_y].max
min_y = 0
x = 0
# 下面的文字
next
end
# 自动换行处理
if x + self.contents.text_size(c).width > self.contents.width
y += [WLH, min_y].max
min_y = 0
x = 0
end
# 描绘文字
self.contents.draw_text(4 + x, y, 40, WLH, c)
# x 为要描绘文字的加法运算
x += self.contents.text_size(c).width
end
end
end
class Game_Party < Game_Unit
def item_no(n)
return item_number($data_items[n])
end
def weapon_no(n)
return item_number($data_weapons[n])
end
def armor_no(n)
return item_number($data_armors[n])
end
end
#==============================================================================
# ■ Scene_Task
#------------------------------------------------------------------------------
# 　处理任务画面的类。
#==============================================================================
class Scene_Task < Scene_Base
def initialize(index=nil)
@menu_index = index
end
#--------------------------------------------------------------------------
# ● 主处理
#--------------------------------------------------------------------------
def start
# 刷新任务资料
$game_party.get_tasks_info
# 生成任务名称窗口
@task_names_window = Window_Task_Name.new($game_party.current_tasks)
@task_names_window.active = true
if $game_party.current_tasks != []
@task_names_window.index = $game_party.current_tasks.index($game_party.latest_task)
end
# 生成任务内容窗口
@task_info_window = Window_Task.new($game_party.latest_task)
@task_info_window.active = true
end
def terminate
# 释放窗口
@task_names_window.dispose
@task_info_window.dispose
end
#--------------------------------------------------------------------------
# ● 刷新画面
#--------------------------------------------------------------------------
def update
# 刷新窗口
@task_names_window.update
@task_info_window.update
update_task_names_window
end
#--------------------------------------------------------------------------
# ● 刷新任务名称窗口
#--------------------------------------------------------------------------
def update_task_names_window
# 按下 B 键的情况下
if Input.trigger?(Input::B)
# 演奏取消 SE
Sound.play_cancel
# 这里设置返回的场景，返回地图是Scene_Map.new，菜单是Scene_Menu.new(任务界面index）
if @menu_index == nil
$scene = Scene_Map.new
else
$scene = Scene_Menu.new(@menu_index)
end
return
end
# 按下 C 键的情况下
if Input.trigger?(Input::C)
# 无任务可显示的话
if @task_names_window.task == nil
# 演奏冻结 SE
Sound.play_buzzer
return
end
# 如果光标没有移动的话，翻页
if $game_party.latest_task == @task_names_window.task.id
if @task_info_window.oy + @task_info_window.height - 32 > @task_info_window.contents.height
@task_info_window.oy = 0
else
@task_info_window.oy += 480-32
end
else
@task_info_window.refresh(@task_names_window.task.id)
$game_party.latest_task = @task_names_window.task.id
# 演奏确定 SE
Sound.play_decision
end
end
end
end

复制代码