1
Purebasic / Re: DX9 Lib
« on: September 03, 2017 »
Thx !
That Worked
That Worked
Show Posts
This section allows you to view all posts made by this member. Note that you can only see posts made in areas you currently have access to.
Pages: [1]
5
Projects / Re: First TinyPTC remake
« on: November 21, 2009 »
Wow Looks Realy OLDSKOOL !!! CONGRATS !!!
do you release the source code ?
greets mcq
do you release the source code ?
greets mcq
6
Freebasic / Rasterbars
« on: November 15, 2009 »
is it possible to read Rasterdatas(Colors)(Copperbars)
from a DATA Field ?
i want to use the Colordata from a REAL C64...
any ideas ?
mfg Mcq
from a DATA Field ?
i want to use the Colordata from a REAL C64...
any ideas ?
mfg Mcq
8
Projects / Re: C64 Remake 1
« on: November 09, 2009 »
Who can help me to do it ? (scroller Coloreffect)
mfg Mcq
mfg Mcq
9
Projects / Re: C64 Remake 1
« on: November 08, 2009 »
Its not my Tune and i cant Remember who made this tune.... 
mfg Mcq
mfg Mcq
10
Projects / Re: C64 Remake 1
« on: November 08, 2009 »
Thanx !
Here ist the Original Link for C64 :
http://noname.c64.org/csdb/group/?id=1009
Choose File Dr.Foster
Win32 EXE
http://www.file-upload.net/download-1996775/device.zip.html
Mfg Mcq
Here ist the Original Link for C64 :
http://noname.c64.org/csdb/group/?id=1009
Choose File Dr.Foster
Win32 EXE
http://www.file-upload.net/download-1996775/device.zip.html
Mfg Mcq
11
Projects / C64 Remake 1
« on: November 07, 2009 »
Hi !
This is my First Remake ! Many Thx to all here ! for the Great Help!!!
Its an Old Simple Intro which i made on the C64 ! 99% READY ! ( i have to learn more about Colors)
mfg Mcq
This is my First Remake ! Many Thx to all here ! for the Great Help!!!
Its an Old Simple Intro which i made on the C64 ! 99% READY ! ( i have to learn more about Colors)
mfg Mcq
12
Challenges & Competitions / Re: SCROLLCOMPO: fireyscroller
« on: July 28, 2008 »
how about u ?? 
i love your products.. im still learning from it... but it looks a little confused for me about the routine in youre
coolintronewclipping.bas (fire) sourcecode
looks very great
hphun mcq
i love your products.. im still learning from it... but it looks a little confused for me about the routine in youre
coolintronewclipping.bas (fire) sourcecode
looks very great
hphun mcq
13
Challenges & Competitions / Re: SCROLLCOMPO: fireyscroller
« on: July 28, 2008 »
can u release the source code ?
mfg mcq
mfg mcq
14
General coding questions / Re: Dark Basic an Bass.dll
« on: July 21, 2008 »
Thx Dudes 
my mistake in my codes was this one :
load dll "bass.dll", 1
REM ***********************************************************************************************************
gosub INIT_SOUND
gosub init_GFX
REM ***********************************************************************************************************
REM ***********************************************************************************************************
Rem ***** Main Source File *****
repeat
rem gosub greenbar
gosub boxing
if spacekey()=1 then call dll 1,"BASS_Stop"
if returnkey() = 1 then call dll 1,"BASS_Start"
sync
until escapekey() = 1
call dll 1,"BASS_STOP"
call dll 1,"BASS_FREE"
flush video memory
end
REM ***********************************************************************************************************
REM ***********************************************************************************************************
INIT_SOUND:
init = call Dll (1,"BASS_Init", -1 ,44100 ,BASS_DEVICE_CPSPEAKERS,0,0)
If Init = 0
Print "Initalisierung des digitalen Soundsystem fehlgeschlagen!"
Sleep 1000 : Delete Dll 1 : End
EndIf
Start = Call Dll(1,"BASS_Start")
If Start = 0
Print "Starten des digitalen Output fehlgeschlagen!"
Sleep 1000 : Delete Dll 1 : End
EndIf
hmod = call dll (1, "BASS_MusicLoad", 0, "208.xm", 0, 0, BASS_SAMPLE_LOOP,BASS_MUSIC_RAMP,BASS_MUSIC_FT2MOD,0) HERE WAS THE FU.. MISTAKE...
If hmod = 0
Print "Mod konnte nich geladen werden !"
Sleep 1000 : Delete Dll 1 : End
EndIf
call dll 1, "BASS_ChannelPlay", hmod, 0
return
REM ***********************************************************************************************************
INIT_GFX:
load image "GFX\Copper_10.png",1
load image "GFX\Copper_11.png",2
load image "GFX\Copper_12.png",3
return
REM ***********************************************************************************************************
greenbar:
box 1,1,99,50,rgb(0,200,0),rgb(0,50,0),rgb(0,200,0),rgb(0,50,0)
box 1,50,99,99,rgb(0,50,0),rgb(0,200,0),rgb(0,50,0),rgb(0,200,0)
return
REM ***********************************************************************************************************
REM ***********************************************************************************************************
boxing:
paste image 1,0,200,0
Call Dll 1,"BASS_ChannelGetData",hmod,Bank,BASS_DATA_FFT2048
return
Thx for the link i will check it out now.
cheers Mcq
my mistake in my codes was this one :
load dll "bass.dll", 1
REM ***********************************************************************************************************
gosub INIT_SOUND
gosub init_GFX
REM ***********************************************************************************************************
REM ***********************************************************************************************************
Rem ***** Main Source File *****
repeat
rem gosub greenbar
gosub boxing
if spacekey()=1 then call dll 1,"BASS_Stop"
if returnkey() = 1 then call dll 1,"BASS_Start"
sync
until escapekey() = 1
call dll 1,"BASS_STOP"
call dll 1,"BASS_FREE"
flush video memory
end
REM ***********************************************************************************************************
REM ***********************************************************************************************************
INIT_SOUND:
init = call Dll (1,"BASS_Init", -1 ,44100 ,BASS_DEVICE_CPSPEAKERS,0,0)
If Init = 0
Print "Initalisierung des digitalen Soundsystem fehlgeschlagen!"
Sleep 1000 : Delete Dll 1 : End
EndIf
Start = Call Dll(1,"BASS_Start")
If Start = 0
Print "Starten des digitalen Output fehlgeschlagen!"
Sleep 1000 : Delete Dll 1 : End
EndIf
hmod = call dll (1, "BASS_MusicLoad", 0, "208.xm", 0, 0, BASS_SAMPLE_LOOP,BASS_MUSIC_RAMP,BASS_MUSIC_FT2MOD,0) HERE WAS THE FU.. MISTAKE...
If hmod = 0
Print "Mod konnte nich geladen werden !"
Sleep 1000 : Delete Dll 1 : End
EndIf
call dll 1, "BASS_ChannelPlay", hmod, 0
return
REM ***********************************************************************************************************
INIT_GFX:
load image "GFX\Copper_10.png",1
load image "GFX\Copper_11.png",2
load image "GFX\Copper_12.png",3
return
REM ***********************************************************************************************************
greenbar:
box 1,1,99,50,rgb(0,200,0),rgb(0,50,0),rgb(0,200,0),rgb(0,50,0)
box 1,50,99,99,rgb(0,50,0),rgb(0,200,0),rgb(0,50,0),rgb(0,200,0)
return
REM ***********************************************************************************************************
REM ***********************************************************************************************************
boxing:
paste image 1,0,200,0
Call Dll 1,"BASS_ChannelGetData",hmod,Bank,BASS_DATA_FFT2048
return
Thx for the link i will check it out now.
cheers Mcq
15
General coding questions / Re: Dark Basic an Bass.dll
« on: July 17, 2008 »
oh shit.... with the bassmod dll its works... but with the "normal" bass no sound... i can cry....
i tryed it now for about 2 days out...
cheers mcq
no sorry i dont use any other basic language...
okay now i fixed it to hear music
but now i have a another problem how to make a good visualisation from bass.dll (channelgetdata) anyone a idea???
many thx
i tryed it now for about 2 days out...
cheers mcq
no sorry i dont use any other basic language...
okay now i fixed it to hear music
but now i have a another problem how to make a good visualisation from bass.dll (channelgetdata) anyone a idea???
many thx
16
General coding questions / Dark Basic an Bass.dll
« on: July 17, 2008 »
i have a problem with the new bass.dll
ive read the manual and made this code:
load dll "bass.dll",1
call dll 1,"BASS_Free"
call dll 1,"BASS_Init",-1 ,44100 ,BASS_DEVICE_CPSPEAKERS,0,0
call dll 1,"BASS_MusicLoad",0 ,mod$,0 ,0,BASS_SAMPLE_LOOP||BASS_MUSIC_RAMP,0
`main program loop
call dll 1,"BASS_ChannelPlay",HMUSIC,0
but i cant hear anything.. whats wrong ? hope someone can help me
thx mcq
ive read the manual and made this code:
load dll "bass.dll",1
call dll 1,"BASS_Free"
call dll 1,"BASS_Init",-1 ,44100 ,BASS_DEVICE_CPSPEAKERS,0,0
call dll 1,"BASS_MusicLoad",0 ,mod$,0 ,0,BASS_SAMPLE_LOOP||BASS_MUSIC_RAMP,0
`main program loop
call dll 1,"BASS_ChannelPlay",HMUSIC,0
but i cant hear anything.. whats wrong ? hope someone can help me
thx mcq
17
General coding questions / Dark Basic
« on: July 14, 2008 »
Someone Cdoing here in Dark basic ??
i need a little help to code a sin scroller like c64 Style (dycp)
thx Mcq
i need a little help to code a sin scroller like c64 Style (dycp)
thx Mcq
Pages: [1]