| |
|
|
| really badly ModPlayer in the AlphaAlphaStand
i will verily not insist that the program Mod-Files "abspielt" - say we sooner it power these "hörbar"
the Hauptproblem is not at all times the performance - sooner the it I do not on The speedy gelang The RAW-data the Samples in adäquate Wavs umzuwandeln circa these with the Multisound.Inc abzuspielen.
too the letzen Loop which the eigendliche Mod abspielt have I only little heed gegönnt - but the stature as solches becomes correctly invited - therefore place ichs here simply time mere.
The first Pattern the Mods in the pkg is of me präpariert simply The notes hochzuzählen.
plenty Fun and hold you The ears To. |
|
|
| |
|
|
|
Christian Eichler | is Yes awful. have you got The File time with Winamp angehört. sound still a little bit rather. and particularly faster! have you got no schönere Mod found ?
PS: I mean, that You really say wanted : hold you The ears To and runs lane !
Christian |
|
|
| Debian Lenny, Intel Celeron 2,8 Ghz, 768 MB Ram && Win XP Pro, Intel C2D 1,66Ghz, 2 GB Ram ... PROFAN² 6.6 | 06/17/07 ▲ |
|
|
|
|
Sebastian Sprenger | there solltet your first the MOD in the attachment try. means really joyride.mod, habs but umbenannt, so The EXE The File finds (Have weder XProfan 10 yet XPSE, kanns means not differently make). on itself really integrally beautiful, but in the xprofanmodplayer klingts almost, as had this Blähungen! After ca. 7 sec ought to the Fun begin... Hmm, Have former yourself time a Profan²-MOD-Player made. I thought then, the would badly... Greeting, 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 | 06/17/07 ▲ |
|
|
|
|
| Hey loaded Better get going correctly! How have You The RAWs abgespielt? |
|
|
| |
|
|
|
Sebastian Sprenger | iF
Hey loaded Better get going correctly! How have You The RAWs abgespielt? Meinst You me? if so, versteh I straight not, what you mean. Greeting, 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 | 06/17/07 ▲ |
|
|
|
|
| in the Mod are Samples stored - IMHO RAWs - How have You these abgespielt? |
|
|
| |
|
|
|
Sebastian Sprenger | I see, You promise of my own Player? thought, you mean the others MOD, tschuldigung... I had whom with the FMOD.DLL ([...] ) made. Samples go with the API GetSample and GetDefaults loaded, with SetDefaults and PlaySound abgespielt, and the MOD-effects (Portamento etc.) more or less (in)steady with SetFrequency and SetVolume created. Greeting, 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 | 06/17/07 ▲ |
|
|
|
|
| Achso Fmod.Dll buuuh! No yourself play therefore GEHTS! |
|
|
| |
|
|
|
Sebastian Sprenger | OK, sorry, Have I now too understands. ;) but attempt time with all Samples XOR $80 (m.E. are The Rohdaten in MODs signiert, what Yes in WAVs not the case is) and set in your code yet The Size the actual Samples (into WAV-Files on Offset 28h; this is otherwise namely always 2484 Bytes long). Greeting, 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 | 06/17/07 ▲ |
|
|
|
|
| Hm the hats neither brought. get You from Mods lauffähige wavs out? If I The Wavs tidy herausbekäme and the Playroutine beibringe on the FineTune To respect (which already correctly herausermittelt becomes) then would the thing gaaanz differently listen to - circa not To say useable. |
|
|
| |
|
|
|
Sebastian Sprenger | Real not? I wars from this code here everything so out, How I it wants. on the other hand Have I it only with 8-bit-Samples tested (in MODs weg of my Wissens too 16-bit-Samples mere. Nachtrag: apparently still not, habs straight in the MODPlug Tracker tested).
P.s. Please not frighten, is with tone! ;)
declare a#,a%,a&,a$,b&
cls
the complete Module loading
filemode 0
a$=loadfile$(Samples from MOD-File extract,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 the first Samples
a&=0
whileloop 1,byte(a#,$3B6)
a%=byte(a#,$3B7+&loop)
case a%>a&:a&=a%
endwhile
a&=$83C+a&*$400
Wave-Header touch down (jaja, in the middle in The sequence)
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
any Samples as Wave-File abspeichern
filemode 1
whileloop 1,31
print .;
length the actually Samples
b&=12+&loop*30
b&=(byte(a#,b&)*256+byte(a#,b&+1))*2
long a#,$404=b&+$24
long a#,$428=b&
stature adjust
whileloop a&,a&+b&-1
byte a#,&loop=xor(byte(a#,&loop),$80)
endwhile
Save
a$=stature$(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
ready
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 | 06/17/07 ▲ |
|
|
|
|
| Heh yummy I look time the umzusetzen! |
|
|
| |
|
|