Script Filmato

[Lea]

Salve,qualcuno mi può dare lo script per mettere video su RPG Maker XP??

 

ps:Ho gia guardato altri post,ma certi diceva che non era possibile,certi che era possibile...quindi vorrei saperlo!^^ Grazie in anticipo

[Apo]

Evitiamo di aprire troppe discussioni identiche, c'è una discussione identica alla tua qualche post più sotto ; )

http://www.rpg2s.net...showtopic=16399

 

Comunque il supporto dei video è un argomento complicato, ci sono parecchi script tutti più o meno simili ma con spesso problemi, anche se magari piccole sviste di digitazione. Nel post che ti ho linkato, se può esserti utile, Guardian ti segnala un "trucco" per vedere video con estensione .avi.

Nel frattempo ricerco e vedo se riesco ad ottenere qualcosa dai malefici script postati ; )

 

EDIT: Questo in linea teorica dovrebbe funzionare, mi dà un errore in riferimento alla memoria, ma forse riguarda il mio computer.

Se ti viene la finestra d'errore, fai Annulla e poi Debug, altrimenti scombina la tastiera e tocca riavviare.

 

 

 

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")

Graphics.transition

@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)','')

 

 

Crea una nuova pagina sopra Main nell'Editor e chiamala Scene_Movie.

 

Per richiamare lo script dovresti mettere in un Call Script:

Scene_Movie.new("nomefilmato")

Edited December 29, 2012 by Apo