设为首页收藏本站|繁體中文

Project1

 找回密码
 注册会员
搜索
查看: 1731|回复: 4
打印 上一主题 下一主题

[已经过期] 问个奇怪的问题

[复制链接]
头像被屏蔽

Lv2.观梦者 (禁止发言)

梦石
0
星屑
250
在线时间
29 小时
注册时间
2010-11-15
帖子
31
跳转到指定楼层
1
发表于 2010-11-16 22:48:12 | 只看该作者 回帖奖励 |正序浏览 |阅读模式
提示: 作者被禁止或删除 内容自动屏蔽
签名被屏蔽

Lv1.梦旅人

梦石
0
星屑
50
在线时间
244 小时
注册时间
2010-10-18
帖子
445
5
发表于 2010-11-16 23:32:05 | 只看该作者
回复 伊莉蕥 的帖子

我自己都收藏了...贡献下..估计很难搜
#==============================================================================
# 本脚本来自www.66RPG.com,使用和转载请保留此信息
# 其中用到FantasyDR的高精度计时器,和BB转载的转UTF-8的脚本,柳柳在此表示感谢~
#==============================================================================

#=================================================================
# MTV 脚本,by 66RPG_柳柳
#=================================================================
module MTV  
#===============================================================
# 读取文件。文件相对地址:Audio/BGM
# file_name:文件名;length:MTV长度,按照.1秒为单位记数
#===============================================================
def self.load(file_name,length = 0)
   $mtv_time = []
   $mtv_text = []
   $game_system.mtv_length = length
   #=============================================================
   # 打开文件并且读取之
   #=============================================================
   file =  File.open("Audio/BGM/"+file_name)
   #=============================================================
   # 读取歌词
   #=============================================================
   for line in file.readlines
     #===========================================================
     # 转为UTF-8编码
     #===========================================================
     line = EasyConv.s2u(line)
     #===========================================================
     # 寻找本行歌词
     #===========================================================
     this_line_text = line[line.scan(/\]/).size*10,line.size]
     #===========================================================
     # 把读取的行分存成时间与文字
     #===========================================================
     for i in 0...line.scan(/\]/).size
       temp_b = line[i*10+1,8]
       temp_c = temp_b.split(/:/)[0]
       mmsecond = 600 * temp_c.to_i
       temp_c = temp_b.split(/:/)[1]
       mmsecond += 10 * temp_c.to_f
       $mtv_time.push(mmsecond.to_i)
       $mtv_text.push(this_line_text)
     end
   end
   file.close
   
end
#===============================================================
# 开始MTV字幕
#===============================================================
def self.mtv_begin
   $game_system.mtv_now = true
   $game_system.mtv_begin_time = $sys_timer.now()
   $lrc_text = ""
   return
end
#===============================================================
# 结束MTV字幕
#===============================================================
def self.stop
   $game_system.mtv_now = false
   return
end
#===============================================================
# 测试MTV是否播放
#===============================================================
def self.mtv?
   return $game_system.mtv_now
end
#===============================================================
# 获取MTV字幕
#===============================================================
def self.new_text
   if $game_system.mtv_now
     #===========================================================
     # 求出已经经过的时间
     #===========================================================
     nt = $sys_timer.now()
     nt -= $game_system.mtv_begin_time
     nt = nt.to_i
     nt /= 100      
     #===========================================================
     # 制作循环
     #===========================================================
     if $game_system.mtv_length>0 and nt > $game_system.mtv_length
       nt -= $game_system.mtv_length
     end
     #===========================================================
     # 放出字幕
     #===========================================================
     for tm in 0...$mtv_time.size
       if $mtv_time[tm] == nt
         #▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲
         #防止出现非文字字符
         $lrc_text = $mtv_text[tm].gsub(/\s+/,"")
         #卡拉ok层建立
            $src_bitmap.clear
            $src_bitmap=Bitmap.new($lrc_text.size*30, 32)
            $src_bitmap.font.color = Color.new(255,0,0)
            $src_bitmap.font.size = 30#▲字号可以调节,不过要和原底色字相同
            $src_bitmap.draw_text(0, 0, $lrc_text.size*30, 32, $lrc_text)
            $i= 0#▲字幕出现延迟,调节精准度用
         break
       end
     end
   else
     $lrc_text = ""
   end
end
end
#~  


#==============================================================================
# 本脚本来自www.66RPG.com,使用和转载请保留此信息
#==============================================================================


#==============================================================================
# 仭 EasyConv module - Ver 0.90
#------------------------------------------------------------------------------
# Moonlight INN
# http://cgi.members.interq.or.jp/aquarius/rasetsu/
# RaTTiE
# [email protected]
#------------------------------------------------------------
# EasyConv::s2u(text) : S-JIS -> UTF-8
# EasyConv::u2s(text) : UTF-8 -> S-JIS
#==============================================================================
module EasyConv
# API梡掕悢掕媊
  CP_ACP = 0
  CP_UTF8 = 65001

#--------------------------------------------------------------------------
# 仠 S-JIS -> UTF-8
#--------------------------------------------------------------------------
def s2u(text)
# API掕媊
  m2w = Win32API.new('kernel32', 'MultiByteToWideChar', 'ilpipi', 'i')
  w2m = Win32API.new('kernel32', 'WideCharToMultiByte', 'ilpipipp', 'i')

# S-JIS -> Unicode
  len = m2w.call(CP_ACP, 0, text, -1, nil, 0);
  buf = "\0" * (len*2)
  m2w.call(CP_ACP, 0, text, -1, buf, buf.size/2);

# Unicode -> UTF-8
  len = w2m.call(CP_UTF8, 0, buf, -1, nil, 0, nil, nil);
  ret = "\0" * len
  w2m.call(CP_UTF8, 0, buf, -1, ret, ret.size, nil, nil);
  
  return ret
end
# module_function偲偟偰岞奐
module_function :s2u
#--------------------------------------------------------------------------
# 仠 UTF-8 -> S-JIS
#--------------------------------------------------------------------------
def u2s(text)
# API掕媊
  m2w = Win32API.new('kernel32', 'MultiByteToWideChar', 'ilpipi', 'i')
  w2m = Win32API.new('kernel32', 'WideCharToMultiByte', 'ilpipipp', 'i')

# UTF-8 -> Unicode
  len = m2w.call(CP_UTF8, 0, text, -1, nil, 0);
  buf = "\0" * (len*2)
  m2w.call(CP_UTF8, 0, text, -1, buf, buf.size/2);

# Unicode -> S-JIS
  len = w2m.call(CP_ACP, 0, buf, -1, nil, 0, nil, nil);
  ret = "\0" * len
  w2m.call(CP_ACP, 0, buf, -1, ret, ret.size, nil, nil);
  
  return ret
end
# module_function偲偟偰岞奐
module_function :u2s
end


#==============================================================================
# ■ Game_System
#------------------------------------------------------------------------------
#  处理系统附属数据的类。也可执行诸如 BGM 管理之类的功能。本类的实例请参考
# $game_system 。
#==============================================================================
class Game_System
#--------------------------------------------------------------------------
# ● 定义实例变量
#--------------------------------------------------------------------------
attr_accessor :mtv_begin_time
attr_accessor :mtv_now
attr_accessor :mtv_length
#--------------------------------------------------------------------------
# ● 初始化对像
#--------------------------------------------------------------------------
alias mtv_gamesystem_initialize initialize
def initialize
   mtv_gamesystem_initialize
   @mtv_begin_time = $sys_timer.now()
   @mtv_now = false
   @mtv_length = 0
end
end  

#==============================================================================
# ■ Scene_Map
#------------------------------------------------------------------------------
#  处理地图画面的类。
#==============================================================================
class Scene_Map
#--------------------------------------------------------------------------
# ● 刷新画面
#--------------------------------------------------------------------------
alias mtv_scenemap_update update
def update
   @mtv_window.refresh
   @win.refresh
   mtv_scenemap_update
end
#--------------------------------------------------------------------------
# ● 主处理
#--------------------------------------------------------------------------
alias mtv_scenemap_main main
def main
   @mtv_window = Window_MTV.new
   @win=Window_MTVOK.new
   mtv_scenemap_main
   @mtv_window.dispose
   @win.dispose
   
end

#==============================================================================
# ■ Window_MTV
#------------------------------------------------------------------------------
#  显示MTV字幕的窗口。
#==============================================================================

class Window_MTV < Window_Base
#--------------------------------------------------------------------------
# ● 初始化窗口
#--------------------------------------------------------------------------
def initialize
   super(130, 410, 544, 64)
   self.contents = Bitmap.new(width - 32, height - 32)
   $src_bitmap=Bitmap.new(544 - 32, 32)
   $lrc_text = ""
   self.z = 9999
   self.opacity = 0
   $i=0
   refresh
end
#--------------------------------------------------------------------------
# ● 刷新
#--------------------------------------------------------------------------
def refresh(text = "")
   MTV.new_text
   self.contents.clear
   self.contents.font.color = Color.new(255,255,255,255)
   self.contents.font.size=30
   color = Color.new(0,0,0,255)
   self.contents.draw_text(0, 0, $lrc_text.size*30, 32, $lrc_text)   
end
end

#▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲
#卡拉ok效果 v1.00
#大赛副产品
#by 柳佳淇  @66RPG
#▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲▲
class Window_MTVOK < Window_Base
#--------------------------------------------------------------------------
# ● 初始化窗口
#--------------------------------------------------------------------------
def initialize
   super(130, 410, 544, 64)
   self.contents = Bitmap.new(width - 32, height - 32)
   self.opacity = 0
   self.z = 9999
   $i=0
   $b=1
   refresh
end
#--------------------------------------------------------------------------
# ● 刷新
#--------------------------------------------------------------------------
def refresh(text = "")
   MTV.new_text
   $i=$i+$b +1 #▲ 可以具体调节卡拉ok进度快慢。
   self.contents.clear   
   @src_rect=Rect.new(0, 0, $i, 32)
   self.contents.blt(0, 0, $src_bitmap, @src_rect)
end
end

#==============================================================================
# 本脚本来自www.66RPG.com,使用和转载请保留此信息
#==============================================================================
#==============================================================================
# 本脚本来自www.66RPG.com,使用和转载请保留此信息
#==============================================================================
# ------------------------------------------------------------------------
# 高精度计时器 by FantasyDR
# ------------------------------------------------------------------------
# E-mail: [email protected]
# ------------------------------------------------------------------------
# 2005.10.18
# ------------------------------------------------------------------------
# 该类已经被定义为全局变量 $sys_timer
# 如果只需要精确到毫秒,请设置初始化参数为true
# decimal属性设置返回时间值的小数位数。
# ------------------------------------------------------------------------
# 下面是一些有用的方法列表,调用时写:$sys_timer.方法名
# 例如 $sys_timer.clear()
#$sys_timer.now()
# ------------------------------------------------------------------------
# clear() :计时器清零
# now() :获取当前经过的时间,单位毫秒
# now_s() :获取当前经过的时间,单位秒
# ------------------------------------------------------------------------
class SystemTimer
attr_accessor:decimal #小数位数设定,默认为3

def initialize(use_GetTime=false)
# 初始化,根据系统选择不同精度计时器
@qpFrequency = Win32API.new("kernel32","QueryPerformanceFrequency",'p','L')
@qpCounter = Win32API.new("kernel32","QueryPerformanceCounter",'p','L')
@tGetTime = Win32API.new("winmm","timeGetTime",'','L')

@decimal=3
@perf_cnt=" " * 8
@time_start=" " * 8
@time_now=" " * 8

result = @qpFrequency.call(@perf_cnt)

if use_GetTime
result = 0
end

if result!=0
@perf_flag=true
else
@perf_flag=false
@perf_cnt=[1000,0].pack('LL')
end


#设置时间比例因数
@time_scale=@perf_cnt.unpack('LL')
@time_scale[0] /= 1000.0
@time_scale[1] /= 1000.0

#起始时间清零
self.clear()
end

#-=====================-#
# 计时器清零
#-=====================-#
def clear()
@[email protected](@time_start):@time_start=[@tGetTime.call(),0].pack('LL')
end

#-==============================-#
# 获取当前经过的时间,单位毫秒
#-==============================-#
def now()
now_time = 0.0e1
now_time += self.timer() - self.start()
now_time /= self.scale()
return self.debug(now_time)
end

#-==============================-#
# 获取当前经过的时间,单位秒
#-==============================-#
def now_s()
now_time = 0.0e1
now_time += self.timer() - self.start()
now_time /= (self.scale()*1000)
return self.debug(now_time)
end

#-==============================-#
# 帧错...
#-==============================-#
def debug(now_time)
@decimal>0?now_time = (now_time * (10**@decimal)).floor/(10.0**@decimal):now_time = now_time.floor

return now_time

#以下用于debug模式
if now_time < 0
p "Timer Wrong!! Clear...",now_time,\
@perf_flag,@qpCounter,@tGetTime,
@time_now.unpack('LL')[0],@time_now.unpack('LL')[1],
@time_start.unpack('LL')[0],@time_start.unpack('LL')[1]
self.clear()
return 0.0
else
return now_time
end
end

#-=====================-#
# 获取时间比例因数
#-=====================-#
def scale()
return @time_scale[0]+\
@time_scale[1]*0xffffffff
end

#-=====================-#
# 获取起始滴答数
#-=====================-#
def start()
return @time_start.unpack('LL')[0]+\
@time_start.unpack('LL')[1]*0xffffffff
end

#-=====================-#
# 获取当前的嘀哒数
#-=====================-#
def timer()
@[email protected](@time_now):@time_now=[@tGetTime.call(),0].pack('LL')

return @time_now.unpack('LL')[0]+\
@time_now.unpack('LL')[1]*0xffffffff
end
end
#-------------------------------------#
# 初始化自身成一个全局变量
#-------------------------------------#
$sys_timer=SystemTimer.new()
end
#-------------------------------------#

点评

3Q.收下去研究研究。话说’这样贴代码有表情的说。。浏览起来还很卡~~~~  发表于 2010-11-17 08:36
我不再捣蛋了
回复 支持 反对

使用道具 举报

头像被屏蔽

Lv2.观梦者 (禁止发言)

梦石
0
星屑
250
在线时间
29 小时
注册时间
2010-11-15
帖子
31
4
 楼主| 发表于 2010-11-16 23:29:28 | 只看该作者
提示: 作者被禁止或删除 内容自动屏蔽
签名被屏蔽
回复 支持 反对

使用道具 举报

Lv1.梦旅人

梦石
0
星屑
50
在线时间
244 小时
注册时间
2010-10-18
帖子
445
3
发表于 2010-11-16 23:20:41 | 只看该作者
柳大有个播放MTV的脚本.能够读取TXT的文本的..但是如果光是读取TXT文字的话..
可以搜索柳大的这个脚本回去修改修改.凑合用应该可以吧
我不再捣蛋了
回复 支持 反对

使用道具 举报

Lv1.梦旅人

梦石
0
星屑
180
在线时间
829 小时
注册时间
2010-6-26
帖子
671
2
发表于 2010-11-16 22:51:48 | 只看该作者
还有事件的备注可以用,我见过不少脚本是读取事件的备注的……

点评

可以再公用事件写备注,然后脚本里读取那个公用事件的备注……不过这样和直接在脚本写貌似差不多……算了,当我没说把  发表于 2010-11-17 10:52
事件备注?数据库没见到事件的备注。。。  发表于 2010-11-17 08:41
新手们!不要被看扁了!我们也会用论坛搜索,我们也会自己找脚本,我们也会自己点击关闭按钮旁边的小问号!
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 注册会员

本版积分规则

拿上你的纸笔,建造一个属于你的梦想世界,加入吧。
 注册会员
找回密码

站长信箱:[email protected]|手机版|小黑屋|无图版|Project1游戏制作

GMT+8, 2024-11-15 20:57

Powered by Discuz! X3.1

© 2001-2013 Comsenz Inc.

快速回复 返回顶部 返回列表