| 
 
| 赞 | 0 |  
| VIP | 0 |  
| 好人卡 | 0 |  
| 积分 | 1 |  
| 经验 | 5414 |  
| 最后登录 | 2019-7-22 |  
| 在线时间 | 100 小时 |  
 Lv1.梦旅人 
	梦石0 星屑55 在线时间100 小时注册时间2010-7-30帖子232 | 
| 
本帖最后由 qq295268654 于 2010-11-23 12:56 编辑
x
加入我们,或者,欢迎回来。您需要 登录 才可以下载或查看,没有帐号?注册会员  
 本来是一个仙剑式TITLE脚本,
 然后我想把这一行@sp_bk.bitmap = RPG::Cache.title("title_bk")复制代码#before title
#unless $keybd
#   $keybd = Win32API.new 'user32.dll', 'keybd_event', ['i', 'i', 'l', 'l'], 'v'
#   $keybd.call 0xA4, 0, 0, 0
#   $keybd.call 13, 0, 0, 0
#   $keybd.call 13, 0, 2, 0
#   $keybd.call 0xA4, 0, 2, 0
# end
 
Audio.bgm_play("Audio/BGM/御剑江湖" , 100 , 100)
@sp_bk = Sprite.new
@sp_bk.opacity = 255
@mid = Sprite.new
@mid.opacity = 255
@mid1 = Sprite.new
@mid1.opacity = 255
@sp_front = Sprite.new
@sp_front1 = Sprite.new
@sp_front1.x=275
@sp_front1.y=180
@sp_front1.opacity = 0
@sp_bk.bitmap = RPG::Cache.title("title_bk")
@sp_front.bitmap = RPG::Cache.title("title_front")
@sp_front1.bitmap = RPG::Cache.title("title_front1")
@mid.bitmap = RPG::Cache.title("title_mid")
@mid1.bitmap = RPG::Cache.title("title_mid1")
for i in 1..40
  @sp_front1.opacity += 17
  Graphics.update
end
for i in 1..40
  @sp_front1.opacity -= 17
  Graphics.update
end
Audio.se_play("Audio/SE/030-Door07" , 100 , 150)
for i in 1..30
  @mid1.x += 20
  @mid.x -= 20
  Graphics.update
end
@mid.dispose
@sp_front.dispose
@mid1.dispose
@sp_front1.dispose
的("title_bk")
 变成随机,就改成了
 可是执行错误,我要把title_bk这张图改为随机选取的1-13张图片,请问要怎么正确书写复制代码@sp_bk.bitmap =rand(12)
    case @sprite
    when 0 # 随机数为0
      @sprite = Sprite.new
      @sprite.bitmap = RPG::Cache.title("1.bmp") # 不需要路径,直接给文件名
    when 1 
      @sprite = Sprite.new
      @sprite.bitmap = RPG::Cache.title("2.bmp") 
    when 2 
      @sprite = Sprite.new
      @sprite.bitmap = RPG::Cache.title("3.bmp") 
    when 3 
      @sprite = Sprite.new
      @sprite.bitmap = RPG::Cache.title("4.bmp") 
    when 4 
      @sprite = Sprite.new
      @sprite.bitmap = RPG::Cache.title("5.bmp") 
    when 5 
      @sprite = Sprite.new
      @sprite.bitmap = RPG::Cache.title("6.bmp") 
    when 6 
      @sprite = Sprite.new
      @sprite.bitmap = RPG::Cache.title("7.bmp") 
    when 7 
      @sprite = Sprite.new
      @sprite.bitmap = RPG::Cache.title("8.bmp") 
    when 8 
      @sprite = Sprite.new
      @sprite.bitmap = RPG::Cache.title("9.bmp") 
    when 9 
      @sprite = Sprite.new
      @sprite.bitmap = RPG::Cache.title("10.bmp") 
    when 10 
      @sprite = Sprite.new
      @sprite.bitmap = RPG::Cache.title("11.bmp") 
    when 11 
      @sprite = Sprite.new
      @sprite.bitmap = RPG::Cache.title("12.bmp") 
    when 12 
      @sprite = Sprite.new
      @sprite.bitmap = RPG::Cache.title("13.bmp") 
    end
 | 
 |