初学者提问（1）： - Project1

#脚本内容(原版，不含图片，简单易用)
#==============================================================================
# 本脚本来自www.66RPG.com，使用和转载请保留此信息
#==============================================================================
#——————————————————————————————————————
# Scene_Credit 制作人员名单
#——————————————————————————————————————
#——使用注意：默认会返回地图，如果需要返回开头，请将本脚本中的
#return_scene = Scene_Map.new改为return_scene = Scene_Title.new
class Scene_Credit
CREDIT=<<_END_
-----Cast------
制作工具：RPG Maker XP
先帝创业未半而中道崩殂
今天下三分，益州疲弊
此诚危急存亡之秋也
然侍卫之臣不懈于内，忠志之士忘身于外者
盖追先帝之殊遇，欲报之于陛下也
诚宜开张圣听，以光先帝遗德，恢弘志士之气
不宜妄自菲薄，引喻失义，以塞忠谏之路也
宫中府中，俱为一体，陟罚臧否，不宜异同
若有作奸犯科及为忠善者
宜付有司论其刑赏，以昭陛下平明之理
不宜偏私，使内外异法也。
侍中侍郎郭攸之、费祎、董允等
此皆良实，志虑忠纯，是以先帝简拔以遗陛下
愚以为宫中之事，事无大小，悉以咨之，然后施行
必能裨补阙漏，有所广益。
_END_
end
class Scene_Credit
def initialize(return_scene = nil)
if return_scene.nil?
return_scene = Scene_Map.new
end
@return_scene = return_scene
end
def scene_start
credit_lines = CREDIT.split(/\n/)
credit_bitmap = Bitmap.new(640,32 * credit_lines.size)
credit_lines.each_index do |i|
line = credit_lines[i]
credit_bitmap.draw_text(0,i * 32,640,32,line,1)
end
@credit_sprite = Sprite.new(Viewport.new(0,50,640,380))
@credit_sprite.bitmap = credit_bitmap
@credit_sprite.oy = -430
@frame_index = 0
@last_flag = false
end
def scene_end
@credit_sprite.dispose
end
def last?
return (@frame_index >= @credit_sprite.bitmap.height + 480)
end
def last
if not @last_flag
Audio.bgm_fade(10000)
@last_flag = true
@last_count = 0
else
@last_count += 1
end
if @last_count >= 300
$scene = @return_scene
end
end
def update
@frame_index += 1
return if cancel?
last if last?
@credit_sprite.oy += 1
end
def cancel?
if Input.trigger?(Input::B)
$scene = @return_scene
return true
end
return false
end
def main
scene_start
# 过渡
Graphics.transition
# 主循环
loop do
Graphics.update
Input.update
update
if $scene != self
break
end
end
# 准备过渡
Graphics.freeze
scene_end
end
end
#==============================================================================
# 本脚本来自www.66RPG.com，使用和转载请保留此信息
#==============================================================================

复制代码

#脚本内容(强化版，附带图片背景。如果忘记放图片会直接出错)
#==============================================================================
# 本脚本来自www.66RPG.com，使用和转载请保留此信息
#==============================================================================
#——————————————————————————————————————
# Scene_Credit 制作人员名单
#——————————————————————————————————————
#——使用注意：默认会返回地图，如果需要返回开头，请将本脚本中的
#return_scene = Scene_Map.new改为return_scene = Scene_Title.new
class Scene_Credit
CREDIT=<<_END_
-----Cast------
制作工具：RPG Maker XP
先帝创业未半而中道崩殂
今天下三分，益州疲弊
此诚危急存亡之秋也
然侍卫之臣不懈于内，忠志之士忘身于外者
盖追先帝之殊遇，欲报之于陛下也
诚宜开张圣听，以光先帝遗德，恢弘志士之气
不宜妄自菲薄，引喻失义，以塞忠谏之路也
宫中府中，俱为一体，陟罚臧否，不宜异同
若有作奸犯科及为忠善者
宜付有司论其刑赏，以昭陛下平明之理
不宜偏私，使内外异法也。
侍中侍郎郭攸之、费祎、董允等
此皆良实，志虑忠纯，是以先帝简拔以遗陛下
愚以为宫中之事，事无大小，悉以咨之，然后施行
必能裨补阙漏，有所广益。
_END_
end
class Scene_Credit
def initialize(return_scene = nil)
@sprite = Sprite.new
@sprite.bitmap = Bitmap.new("Graphics/Pictures/1")
@sprite.x = 0
@sprite.y = 0
if return_scene.nil?
return_scene = Scene_Map.new
end
@return_scene = return_scene
end
def scene_start
credit_lines = CREDIT.split(/\n/)
credit_bitmap = Bitmap.new(640,32 * credit_lines.size)
credit_lines.each_index do |i|
line = credit_lines[i]
credit_bitmap.draw_text(0,i * 32,640,32,line,1)
end
@credit_sprite = Sprite.new(Viewport.new(0,50,640,380))
@credit_sprite.bitmap = credit_bitmap
@credit_sprite.oy = -430
@frame_index = 0
@last_flag = false
end
def scene_end
@credit_sprite.dispose
@sprite.dispose
end
def last?
return (@frame_index >= @credit_sprite.bitmap.height + 480)
end
def last
if not @last_flag
Audio.bgm_fade(10000)
@last_flag = true
@last_count = 0
else
@last_count += 1
end
if @last_count >= 300
$scene = @return_scene
end
end
def update
@frame_index += 1
return if cancel?
last if last?
@credit_sprite.oy += 1
end
def cancel?
if Input.trigger?(Input::B)
$scene = @return_scene
return true
end
return false
end
def main
scene_start
# 过渡
Graphics.transition
# 主循环
loop do
Graphics.update
Input.update
update
if $scene != self
break
end
end
# 准备过渡
Graphics.freeze
scene_end
end
end
#==============================================================================
# 本脚本来自www.66RPG.com，使用和转载请保留此信息
#==============================================================================

复制代码

#==============================================================================
# 本脚本来自www.66RPG.com，使用和转载请保留此信息
#==============================================================================
#——————————————————————————————————————
# Scene_Opening 开场字幕 by SailCat
#——————————————————————————————————————
#——使用注意：默认会返回地图，如果需要返回开头，请将本脚本中的
#return_scene = Scene_Map.new改为return_scene = Scene_Title.new
class Scene_Opening
CREDIT=<<_END_
Star Wars
EPISODE IV
A New Hope
It is a period of civil war. Rebel
spaceships, striking from a hidden
base, have won their first victory
against the evil Galactic Empire.
During the battle, Rebel spies
managed to steal secret plans to
the Empire's ultimate weapon, the
DEATH STAR, an armored space
station with enough power to
destroy an entire planet.
Pursued by the Empire's sinister
agents, Princess Leia races home
aboard her starship,custodian of
the stolen plans that can save her
people and restore freedom to the
galaxy....
_END_
end
class Scene_Opening
def initialize(return_scene = nil)
@sprite = Sprite.new
back_bitmap = Bitmap.new("Graphics/Panoramas/003-StarlitSky01.jpg")
@sprite.bitmap = Bitmap.new(640, 480)
@sprite.bitmap.stretch_blt(Rect.new(0, 0, 640, 480), back_bitmap,
Rect.new(0, 0, back_bitmap.width, back_bitmap.height))
@sprite.x = 0
@sprite.y = 0
@wait_count = 0
Graphics.freeze
Graphics.transition(20)
$game_temp.map_bgm = $game_system.playing_bgm
# 如果要播放音乐的话更改以下两行(文件名)并去掉注释
#opening_bgm=RPG::AudioFile.new("Audio/BGM/Star Wars.mid", 100, 100)
#$game_system.bgm_play(opening_bgm)
if return_scene.nil?
return_scene = Scene_Map.new
$game_temp.transition_processing = true
$game_temp.transition_name = ""
end
@return_scene = return_scene
end
def scene_start
credit_lines = CREDIT.split(/\n/)
@credit_bitmap = Bitmap.new(640,32 * credit_lines.size)
# 这里更改描绘字体美观起见请用等宽字体
@credit_bitmap.font.name = ["Courier New", "黑体"]
@credit_bitmap.font.size = 24
@credit_bitmap.font.bold = true
credit_lines.each_index do |i|
line = credit_lines[i]
@credit_bitmap.draw_text(0,i * 32,640,32,line,1)
end
@credit_sprite = Sprite.new(Viewport.new(0,240,640,240))
@credit_sprite.bitmap = Bitmap.new(960,240)
@credit_sprite.ox = 160
@frame_index = 0
@last_flag = false
end
def scene_end
@credit_sprite.dispose
@sprite.dispose
$game_system.bgm_stop
$game_system.bgm_play($game_temp.map_bgm)
end
def last?
return (@frame_index >= @credit_bitmap.height + 240)
end
def last
if not @last_flag
@last_flag = true
@last_count = 0
Audio.bgm_fade(5000)
else
@last_count += 1
end
if @last_count >= 100
$scene = @return_scene
end
end
def update
if @wait_count > 0
@wait_count -= 1
return
end
@frame_index += 1
return if cancel?
last if last?
update_bitmap
@wait_count = 2
end
def cancel?
if Input.trigger?(Input::B)
$scene = @return_scene
return true
end
return false
end
# 刷新文字梯形
def update_bitmap
@credit_sprite.bitmap.clear
for i in 0..240
if i + @frame_index >= 240
@credit_sprite.bitmap.stretch_blt(Rect.new(240-i, i, 480+i*2, 1),
@credit_bitmap, Rect.new(0, @frame_index+i-240, 640, 1))
end
end
end
def main
scene_start
# 过渡
Graphics.transition
# 主循环
loop do
Graphics.update
Input.update
update
if $scene != self
break
end
end
# 准备过渡
Graphics.freeze
scene_end
end
end
#==============================================================================
# 本脚本来自www.66RPG.com，使用和转载请保留此信息
#==============================================================================

复制代码