Italia
Anwendungen

Wirklich schlechter ModPlayer im AlphaAlphaStand

 
Wirklich schlechter ModPlayer im AlphaAlphaStand

Ich will wahrlich nicht behaupten dass das Programm Mod-File "abspielt" - sagen wir eher es macht diese "hörbar"

Das Hauptproblem ist garnicht mal die Performance - eher das es mir nicht auf die Schnelle gelang die RAW-Daten der Samples in adäquate Wavs umzuwandeln um diese mit der Multisound.Inc abzuspielen.

Auch der letzen Schleife welche das eigendliche Mod abspielt habe ich nur wenig Aufmerksamkeit gegönnt - aber das Format als solches wird korrekt eingeladen - deshalb stelle ichs hier einfach mal rein.

Der erste Pattern des Mods im Paket ist von mir präpariert einfach die Noten hochzuzählen.

Viel Divertimento und haltet Euch die Ohren zu.

339 kB
Hochgeladen:16.06.2007
Downloadcounter216
Download
35 kB
Hochgeladen:06.10.2009
Downloadcounter203
Download
613 kB
Hochgeladen:06.10.2009
Downloadcounter160
Download
 
16.06.2007  
 




Christian
Eichler
Ist ja furchtbar. Hast du die File mal mit Winamp angehört. Klingt doch ein bisschen besser. Und vor allem schneller! Hast du keine schönere Mod gefunden ?

PS: Ich glaub, dass du eigentlich sagen wolltest : Haltet euch die Ohren zu und rennt weg !

Christian
 
Debian Lenny, Intel Celeron 2,8 Ghz, 768 MB Ram && Win XP Pro, Intel C2D 1,66Ghz, 2 GB Ram ... PROFAN² 6.6
17.06.2007  
 




Sebastian
Sprenger
Da solltet ihr erstmal das MOD im Anhang ausprobieren. Heißt eigentlich joyride.mod, habs aber umbenannt, damit die EXE die File findet (hab weder XProfan 10 noch XPSE, kanns also nicht anders machen). An sich eigentlich ganz schön, aber im xprofanmodplayer klingts fast, als hätte dieser Blähungen! Nach ca. 7 Sekunden sollte der Divertimento anfangen...
Hmm, hab früher selber mal einen Profan²-MOD-Player gemacht. Ich dachte damals, der wäre schlecht...
Saluto, Sebastian

81 kB
Kurzbeschreibung: Ein anderes MOD zum Testen...
Hochgeladen:17.06.2007
Downloadcounter258
Download
 
Profan² 7.0e, XProfan 9, 11.2a, FreeProfan32
Windows Vista Home Premium 32-Bit, 2.8 Ghz, 4 GB RAM
Windows Me, 1.8 Ghz, 256 MB RAM
17.06.2007  
 



Hey geladen wirds korrekt! Wie hast Du die RAWs abgespielt?
 
17.06.2007  
 




Sebastian
Sprenger
iF
Hey geladen wirds korrekt! Wie hast Du die RAWs abgespielt?

Meinst du mich? Wenn ja, versteh ich gerade nicht, was du meinst.
Saluto, Sebastian
 
Profan² 7.0e, XProfan 9, 11.2a, FreeProfan32
Windows Vista Home Premium 32-Bit, 2.8 Ghz, 4 GB RAM
Windows Me, 1.8 Ghz, 256 MB RAM
17.06.2007  
 



In der Mod sind Samples gespeichert - IMHO RAWs - wie hast Du diese abgespielt?
 
17.06.2007  
 




Sebastian
Sprenger
Ach so, du sprichst von meinen eigenen Player? Dachte, du meinst das andere MOD, tschuldigung...
Ich hatte den mit der FMOD.DLL ([...] ) gemacht. Samples werden mit den API GetSample und GetDefaults geladen, mit SetDefaults und PlaySound abgespielt, und die MOD-Effekte (Portamento etc.) mehr oder weniger (in)stabil mit SetFrequency und SetVolume erzeugt.
Saluto, Sebastian
 
Profan² 7.0e, XProfan 9, 11.2a, FreeProfan32
Windows Vista Home Premium 32-Bit, 2.8 Ghz, 4 GB RAM
Windows Me, 1.8 Ghz, 256 MB RAM
17.06.2007  
 



Achso Fmod.Dll buuuh! nein selber spielen darum gehts!
 
17.06.2007  
 




Sebastian
Sprenger
OK, sorry, hab ich jetzt auch kapiert. ;)
Aber versuch mal bei allen Samples XOR $80 (m.E. sind die Rohdaten in MODs signiert, was ja in WAVs nicht der Fall ist) und setze in deinem Code noch die Dimensione des eigentlichen Samples (in den WAV-File an Offset 28h; das ist sonst nämlich immer 2484 Bytes lang).
Saluto, Sebastian
 
Profan² 7.0e, XProfan 9, 11.2a, FreeProfan32
Windows Vista Home Premium 32-Bit, 2.8 Ghz, 4 GB RAM
Windows Me, 1.8 Ghz, 256 MB RAM
17.06.2007  
 



Hm das hats auch nicht gebracht. Bekommst Du aus Mods lauffähige wavs heraus? Wenn ich die Wavs ordentlich herausbekäme und der Playroutine beibringe auch auf das FineTune zu achten (welches schon korrekt herausermittelt wird) dann würde sich die Sache gaaanz anders anhören - um nicht zu sagen brauchbar.
 
17.06.2007  
 




Sebastian
Sprenger
Echt nicht? Ich kriege aus diesem Code hier alles so raus, wie ich es will. Andererseits hab ich es nur mit 8-Bit-Samples getestet (in MODs gehen meines Wissens auch 16-Bit-Samples rein. Nachtrag: Anscheinend doch nicht, habs gerade im MODPlug Tracker getestet).

P.S. Bitte nicht erschrecken, ist mit Ton! ;)
declare a#,a%,a&,a$,b&
cls
Das komplette Modul laden
filemode 0
a$=loadfile$(Samples aus MOD-File extrahieren,ProTracker-Module|*.MOD)
case %button=2:end
assign #1,a$
openrw #1
a&=getfilesize(#1)
dim a#,a&
blockread(#1,a#,0,a&)
closerw #1
Position des ersten Samples
a&=0

whileloop 1,byte(a#,$3B6)

    a%=byte(a#,$3B7+&loop)
    case a%>a&:a&=a%

endwhile

a&=$83C+a&*$400
Wave-Testata aufsetzen (jaja, mitten in die Sequenz)
char a#,$400=RIFF
char a#,$408=WAVE
char a#,$40C=fmt
long a#,$410=16
word a#,$414=1
word a#,$416=1
long a#,$418=8000
long a#,$41C=8000
word a#,$420=1
word a#,$422=8
char a#,$424=data
Alle Samples als Wave-File abspeichern
filemode 1

whileloop 1,31

    print .;
    Länge des aktuellen Samples
    b&=12+&loop*30
    b&=(byte(a#,b&)*256+byte(a#,b&+1))*2
    long a#,$404=b&+$24
    long a#,$428=b&
    Format anpassen

    whileloop a&,a&+b&-1

        byte a#,&loop=xor(byte(a#,&loop),$80)

    endwhile

    Speichern
    a$=format$(sample00.wav,&loop)
    assign #2,a$
    erase #2
    openrw #2
    blockwrite #2,a#,$400,$2C
    blockwrite #2,a#,a&,b&
    closerw #2
    Nächstes Sample
    playsound a$,1
    a&=a&+b&

endwhile

Fertig
dispose a#
 
Profan² 7.0e, XProfan 9, 11.2a, FreeProfan32
Windows Vista Home Premium 32-Bit, 2.8 Ghz, 4 GB RAM
Windows Me, 1.8 Ghz, 256 MB RAM
17.06.2007  
 



Heh lecker ich schau mal das umzusetzen!
 
17.06.2007  
 




Zur Anwendung


Topictitle, max. 100 characters.
 

Systemprofile:

Kein Systemprofil angelegt. [anlegen]

XProfan:

 Posting  Font  Smilies  ▼ 

Bitte anmelden um einen Beitrag zu verfassen.
 

Topic-Options

19.560 Views

Untitledvor 0 min.
Rschnett13.07.2017
Micha1233411.06.2016
Paul Glatz01.10.2014
Michael W.01.10.2014
Di più...

Themeninformationen



Admins  |  AGB  |  Anwendungen  |  Autori  |  Chat  |  Informativa sulla privacy  |  Download  |  Entrance  |  Aiuto  |  Merchantportal  |  Impronta  |  Mart  |  Interfaces  |  SDK  |  Services  |  Giochi  |  Cerca  |  Support

Ein Projekt aller XProfaner, die es gibt!


Il mio XProfan
Private Notizie
Eigenes Ablageforum
Argomenti-Merkliste
Eigene Beiträge
Eigene Argomenti
Zwischenablage
Annullare
 Deutsch English Français Español Italia
Traduzioni

Informativa sulla privacy


Wir verwenden Cookies nur als Session-Cookies wegen der technischen Notwendigkeit und bei uns gibt es keine Cookies von Drittanbietern.

Wenn du hier auf unsere Webseite klickst oder navigierst, stimmst du unserer Erfassung von Informationen in unseren Cookies auf XProfan.Net zu.

Weitere Informationen zu unseren Cookies und dazu, wie du die Kontrolle darüber behältst, findest du in unserer nachfolgenden Datenschutzerklärung.


einverstandenDatenschutzerklärung
Ich möchte keinen Cookie