Pomoc - skrypt na filmiki
Aktualny czas: 28-04-26, 20:35 Witaj! Przejdź do zakładki Logowanie lub Rejestracja


Wątek zamknięty 
[XP] Pomoc - skrypt na filmiki
curiosis Offline
*


Liczba postów: 43
Dołączył: 26-02-16

Pomógł: 0



Post: #1
koniczyna Pomoc - skrypt na filmiki

Witajcie, mam problem ze skryptem na filmiki .avi. Na moim komputerze, gdzie mam zainstalowanego RMXP wszystko działa, ale jak chciałem sprawdzić na laptopie, gdzie nie mam zainstalowanego RMXP wszystko się psuje.

Jak włączam nową grę na laptopie to muzyka leci, ale nie pokazuje się obraz, jest tylko czarny. Pomóżcie przyjaciele.

Tutaj ten skrypt:

===========================================

#### Autor skryptu: Inconnun
# Skrypt został znaleziony na stronie RPG Creative [www.rpgcreative.net]
# Jednak jeżeli widzisz tę notatkę, to znaczy że pobrałeś go z Twierdzy RPG Makera
# http://www.rpgmaker.pl
#
################### Ważne!!!!!!
# Teraz daj 'Wywołaj skrypt w zdarzeniu' i napisz to coś:
# Scene_Movie.new("NAZWA TWOJEGO FILMU.avi")
#
# Pamiętaj aby twój filmik znalazł się w folderze o nazwie 'Movies', który będzie
# w folderze twojego projektu.
########################

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
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 == 1280
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 == 1280
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)','')
#end code (koniec kodu)

==============================================
09-07-16 18:31
Znajdź wszystkie posty użytkownika
"Pomógł" przyznał(a):
Venesard Offline
*


Liczba postów: 226
Dołączył: 07-11-14

Pomógł: 37



Post: #2
RE: Pomoc - skrypt na filmiki

Przypuszczalnie problem nie leży po stronie braku makera a po stronie nieodpowiednich kodeków do filmu.

Sam nie wiem czy coś tworzę.
09-07-16 23:49
Znajdź wszystkie posty użytkownika
"Pomógł" przyznał(a):
Yoroiookami Offline
*


Liczba postów: 985
Dołączył: 01-05-13

Pomógł: 137



Post: #3
RE: Pomoc - skrypt na filmiki

Jak już Venesard wspomniał, to wina kodeków. Na twierdzy zapomnieli o tym wspomnieć. Kiedyś tłumaczyłem podobny skrypt.
http://forum.ultimateam.pl/Thread-XP-VX-...iki-w-Grze
Jak wspomniałem w temacie najlepiej używać domyślnych kodeków. Xvidy i tym podobne się nie nadają. Albo możesz zostawić instalator kodeków w folderze z grą.

[Obrazek: mt4dzY7.png]
[Obrazek: k5KQGOe.png]
10-07-16 01:00
Znajdź wszystkie posty użytkownika
"Pomógł" przyznał(a):
curiosis Offline
*


Liczba postów: 43
Dołączył: 26-02-16

Pomógł: 0



Post: #4
RE: Pomoc - skrypt na filmiki

Dzięki, teraz działa na wszystkich komputerach :)
13-07-16 02:00
Znajdź wszystkie posty użytkownika
"Pomógł" przyznał(a):
Wątek zamknięty 


Skocz do:


Użytkownicy przeglądający ten wątek: 1 gości

Kontakt | Ultima Forum | Wróć do góry | Wróć do forów | Wersja bez grafiki | RSS
Powered By MyBB. © 2013 MyBB Group. All Rights Reserved.
Skórka by Ayene.