Envision, Create, Share

Welcome to HBGames, a leading amateur game development forum and Discord server. All are welcome, and amongst our ranks you will find experts in their field from all aspects of video game design and development.

soundspawn script don't work on vista 64 ?

Hey there, I'm back working on my RPG Maker XP project, but I decided "restart" it for cleanup the whole mess on the scripts, and I've been trying to add my old intro movie on my game

So I've been google for the Soundspawn script, and found one wich reminds the old one I was using:

# .................................By soundspawn.................................
#   Copy this into a new section of your game. To play a file, move the avi file
#   into a "movies" subdirectory (yourgame\data, yourgame\graphics, yourgame\movies).
#   Then call "Scene_Movie.new(filename)" where filename is your movies actual
#   filename (minus the .avi).

class Scene_Movie

def initialize(movie)
   @readini = Win32API.new 'kernel32', 'GetPrivateProfileStringA', %w(p p p p l p), 'l'
   @movie_name = Dir.getwd()+"\\Movies\\"+movie+".avi"
   main
end

def main
   game_name = "\0" * 256
   @readini.call('Game','Title','',game_name,255,".\\Game.ini")
   game_name.delete!("\0")
   @wnd = Win32API.new('user32','FindWindowEx','%w(l,l,p,p)','L')
   @temp = @wnd.call(0,0,nil,game_name).to_s
   movie = Win32API.new('winmm','mciSendString','%w(p,p,l,l)','V')
   movie.call("open \""+@movie_name+"\" alias FILE style 1073741824 parent " + @temp.to_s,0,0,0)
   @message = Win32API.new('user32','SendMessage','%w(l,l,l,l)','V')
   @detector = Win32API.new('user32','GetSystemMetrics','%w(l)','L')
   @width = @detector.call(0)
   if @width == 640
     fullscreen
     Graphics.update
     sleep(1)
     Graphics.update
     sleep(1)
     Graphics.update
     sleep(1)
   end
   status = " " * 255
   movie.call("play FILE",0,0,0)
   loop do
    sleep(0.1)
    @message.call(@temp.to_i,11,0,0)
    Graphics.update
    @message.call(@temp.to_i,11,1,0)
    Input.update
    movie.call("status FILE mode",status,255,0)
    true_status = status.unpack("aaaa")
    if true_status.to_s != "play"
      break
    end
    if Input.trigger?(Input::B)
      Input.update
      break
    end
   end
   movie.call("close FILE",0,0,0)
   bail
end

def bail
   if @width == 640
     fullscreen
   end
  end
end

def fullscreen()
  $full.call(18,0,0,0)
  $full.call(13,0,0,0)
  $full.call(18,0,2,0)
  $full.call(13,0,2,0)
end
$full = Win32API.new('user32','keybd_event','%w(l,l,l,l)','')

Now here is the problem, when I add the:

Scene_Movie.new("Intro") right below the scene title call, or try the:
$scene = Scene_Movie.new("Intro") on there aswell, it is kinda ignored, and game start directly on the Title menu

case I add Scene_Movie.new("Intro") on a callscript, game lag for a bit then return normal, if i add $scene = Scene_Movie.new("Intro") it simply freeze until i force it close ...


I already tried using, RGG100J RGSS 102E and now using RGSS103J (honeslty I have Vista 64 home prem, and dind't noticed any difference with any of them, in anywhere)

so only idea I have is about the win32api thingy, might be different on vista 64 ??, or anyone here with vista 64 can run this script ?

PS: I also tried run this with the game.exe on compatibility mode for XP SP2
 

Thank you for viewing

HBGames is a leading amateur video game development forum and Discord server open to all ability levels. Feel free to have a nosey around!

Discord

Join our growing and active Discord server to discuss all aspects of game making in a relaxed environment. Join Us

Content

  • Our Games
  • Games in Development
  • Emoji by Twemoji.
    Top