标题画面随机出现如何设置？

w365860984 · 发表于 2009-2-13 03:05:09

提示: 作者被禁止或删除内容自动屏蔽

w365860984 · 发表于 2009-2-13 16:52:59

提示: 作者被禁止或删除内容自动屏蔽

亿万星辰 · 发表于 2009-2-13 15:28:40

Scent_Title中找到
@sprite.bitmap = RPG::Cache.title($data_system.title_name)
改成
@sprite.bitmap = RPG::Cache.title("#{rand(5) + 1}")

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

redant · 发表于 2009-2-13 08:00:25

#--------------------------------------------------------------------------
# 开始菜单前加入图片
# 作者：擇
#--------------------------------------------------------------------------
class Scene_Logo
#--------------------------------------------------------------------------
# ● 住处理
#--------------------------------------------------------------------------
def get_pic_name(i,name)
pic_name = i.to_s
for n in 0..3 - pic_name.size
next if n == 0
pic_name = "0" + pic_name
end
pic_name = name + pic_name
return pic_name
end
#--------------------------------------------------------------------------
# ●读取背景图片处理_TitleA
#--------------------------------------------------------------------------
def menu_back_load_title_a
$menupicback = []
pic_name = []
@point = Bitmap.new("Graphics/Titles/point.png")
src_rect = Rect.new(0,0,3,3)
for i in 0..1
pic_name[i] = get_pic_name(i,"TitleA")
$menupicback[i] = Sprite.new
$menupicback[i].visible = false
end
for i in 0..1
$menupicback[i].bitmap = Bitmap.new("Graphics/Video/TitleA/" + pic_name[i])
if i == 15 or i == 30 or i == 45
@sprite.bitmap.blt(606 + ((i * 3 / 45) - 1) * 7, 468, @point,src_rect)
Graphics.update
end
end
end
#--------------------------------------------------------------------------
# ●读取背景图片处理_TitleB
#--------------------------------------------------------------------------
def menu_back_load_title_b
$menupicback = []
pic_name = []
@point = Bitmap.new("Graphics/Titles/point.png")
src_rect = Rect.new(0,0,3,3)
for i in 0..69
pic_name[i] = get_pic_name(i,"TitleB")
$menupicback[i] = Sprite.new
$menupicback[i].visible = false
end
for i in 0..69
$menupicback[i].bitmap = Bitmap.new("Graphics/Video/TitleB/" + pic_name[i])
if i == 23 or i == 46 or i == 69
@sprite.bitmap.blt(606 + ((i * 3 / 69) - 1) * 7, 468, @point,src_rect)
Graphics.update
end
end
end
#--------------------------------------------------------------------------
# ●读取背景图片处理_TitleB
#--------------------------------------------------------------------------
def menu_back_load_title_c
$menupicback = []
pic_name = []
@point = Bitmap.new("Graphics/Titles/point.png")
src_rect = Rect.new(0,0,3,3)
for i in 0..49
pic_name[i] = get_pic_name(i,"TitleC")
$menupicback[i] = Sprite.new
$menupicback[i].visible = false
end
for i in 0..49
$menupicback[i].bitmap = Bitmap.new("Graphics/Video/TitleC/" + pic_name[i])
if i == 15 or i == 30 or i == 45
@sprite.bitmap.blt(606 + ((i * 3 / 45) - 1) * 7, 468, @point,src_rect)
Graphics.update
end
end
end
#--------------------------------------------------------------------------
# ●读取背景图片处理_a
#--------------------------------------------------------------------------
def menu_back_load_a
$menupicback = []
pic_name = []
@point = Bitmap.new("Graphics/Titles/point.png")
src_rect = Rect.new(0,0,3,3)
for i in 0..60
pic_name[i] = get_pic_name(i * 2)
$menupicback[i] = Sprite.new
$menupicback[i].visible = false
end
for i in 0..60
$menupicback[i].bitmap = Bitmap.new("Graphics/Video/1/" + pic_name[i])
if i == 20 or i == 40 or i == 60
@sprite.bitmap.blt(606 + ((i * 3 / 60) - 1) * 7, 468, @point,src_rect)
Graphics.update
end
end
end
#--------------------------------------------------------------------------
# ●读取背景图片处理_b
#--------------------------------------------------------------------------
def menu_back_load_b
$menupicn = 0
$menupicback = []
$i = 1
@point = Sprite.new
@point.bitmap = Bitmap.new("Graphics/Titles/point.png")
src_rect = Rect.new(0,0,3,3)
for i in 1..3
$menupicback[i] = Sprite.new
$menupicback[i].opacity = 0
$menupicback[i].bitmap = Bitmap.new("Graphics/Video/2/bg"+ i.to_s + ".jpg")
@sprite.bitmap.blt(606 + (i - 1) * 7, 468, @point.bitmap,src_rect)
Graphics.update
end
$rectpic = Rect.new(0, 0, 530, 364)
end
#--------------------------------------------------------------------------
# ● 住处理
#--------------------------------------------------------------------------
def main
i = 0
# 播放LOGO音效
#Audio.se_play("Audio/SE/标题画面出现.wav")
# 生成标题图形
@sprite = Sprite.new
@sprite.bitmap = RPG::Cache.title("Titless.png")
# 生成位置为画面中央
@sprite.x = (640 - @sprite.bitmap.width) / 2
@sprite.y = (480 - @sprite.bitmap.height) / 2
# 透明度(0为完全透明)
@sprite.opacity = 255
# 执行过渡
Graphics.transition
if $piantou == 1
$menu_back_type = rand(2)
case $menu_back_type
when 0
menu_back_load_title_a
when 1
menu_back_load_title_c
end
end
# 主循环
loop do
# 刷新游戏画面
Graphics.update
#i += 1
# 刷新输入信息
Input.update
# 如果画面被切换就中断循环
break
end
# 装备过渡
Graphics.freeze
# 释放标题图形
#@gameovershow.dispose
@sprite.bitmap.dispose
@sprite.dispose
$scene = Scene_Title.new
end
end

复制代码

来自《石焚刃暖》略有改动
提示缺什么素材就自己添
想要原版推荐下载游戏

main里
要改成 $scene = Scene_Logo.new

事件的话应该用跳过标题脚本
然后条件分歧吧

这个在http://rpg.blue/forumdisplay.php?fid=65里去看看吧

w365860984 · 发表于 2009-2-13 07:14:10

提示: 作者被禁止或删除内容自动屏蔽

linruyin · 发表于 2009-2-13 03:26:24

（先找个变量假设名为q）
条件分歧
当变量 q为1时
显示图片1

当变量 q为2时
显示图片2

----以此类推-----

变量操作
随机数1----5

☆流星☆~~~ · 发表于 2009-2-13 03:22:06

提示: 作者被禁止或删除内容自动屏蔽

linruyin · 发表于 2009-2-13 03:19:24

用公共事件吧

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