[PARTAGE] Palettes

Mes Palettes Pin2Dmd.. 


Big buck Hunter
https://dl.dropboxusercontent.com/u/98865673/BigBuckHunter.rar
http://vpuniverse.com/forums/files/file/4138-big-buck-hunter/

Rolling Stones Stern
https://dl.dropboxusercontent.com/u/98865673/RollingStones.zip
http://vpuniverse.com/forums/files/file/4137-the-rolling-stones/

Walking Dead
https://dl.dropboxusercontent.com/u/98865673/walking%20dead.rar




https://dl.dropboxusercontent.com/u/98865673/walking%20dead.rar


J'ai créé un dossier "twd_156" dans mon dossier rom.
Dans ce dossier j'y ai mis la rom fournie que j'ai renommé "twd_156.bin"

ensuite mettre au tout début du script de la table:

Code:

'************ BEGIN PIN2DMD PALETTE LOADING **************
'************* thanks to Rascal and gtxjoe ***************
Const PIN2DMD = True
Const PIN2DMDDIR = "C:\PIN2DMD-master\tools\vc++\Binary"

Dim oShell
Dim WScript
Dim ORIGDIR
Set oShell = CreateObject("WScript.Shell")
ORIGDIR = oShell.CurrentDirectory
oShell.CurrentDirectory = PIN2DMDDIR
If PIN2DMD = True then oShell.run "pin2dmd.exe /b TWD_156.dat",,TRUE
oShell.CurrentDirectory = ORIGDIR
Set oShell = Nothing

Dim DelayTime, StartTime
DelayTime = 0
StartTime = Timer
Do While DelayTime < 1
    DelayTime = Timer - StartTime
Loop
'************* END PIN2DMD PALETTE LOADING ***************

mon fichier palette se trouve dans
C:\PIN2DMD-master\tools\vc++\Binary
editer la ligne en fonction..

et tout a la fin du script de la table.

Code:

'************ BEGIN PIN2DMD PALETTE RESET **************
'************ thanks to Rascal and gtxjoe **************
Sub ResetPalette
Dim rShell
Dim WScript
Set rShell = CreateObject("WScript.Shell")
rShell.CurrentDirectory = PIN2DMDDIR
If PIN2DMD = True then rShell.run "pin2dmd.exe /c",,TRUE
Set rShell = Nothing
End Sub

Sub table1_exit():Controller.Stop:ResetPalette:End Sub
'************* END PIN2DMD PALETTE RESET ***************

Sources :
http://vpuniverse.com/forums/topic/2270-pin2dmd-table-support/

Je testerai tes palettes demain, merci gech pour le taff et le partage

merci m'sieur