geluiden

Nieuwe Liberty BASIC programmeurs kunnen hier om hulp vragen.

Moderators: anthonio, Abcott

geluiden

Berichtdoor KeesW » ma dec 28, 2009 2:52 pm

Gordon, het ontvangen programma kerstplaatje met muziek mooi maar de muziek werkt niet.
Heb wat geprobeerd met het commando 'playmidi', maar krijg geen enkel geluid.
Het commande 'Beep'werkt ook niet. Krijg de volgende foutmeldingen in de erlog.file:

Runtime error: Het opgegeven apparaat is niet geopend of wordt niet herkend door MCI.
Runtime error: MIDI file is already playing: D:\Liberty-basic\Liberty BASIC v4.03\media\theme.mid

Het commando playwave werkt alleen zonder parameter
met de parameter 'loop' werkt het alleen zonder gebruik van het stopcommando
Wat is er aan de hand ??
KeesW
 
Berichten: 23
Geregistreerd: do dec 10, 2009 2:32 pm

Re: geluiden

Berichtdoor Gordon » ma dec 28, 2009 3:10 pm

Hmmm...
Uit de helpfile voor PLAYWAVE
http://www.libertybasic.nl/playwav1.htm

De PLAYMIDI werkt hier gewoon.
"D:\Liberty-basic\Liberty BASIC v4.03\media\theme.mid"
staat nergens in de listing.
Ik snap er nog niets van.

Ik mail de file opnieuw.

Gordon
Avatar gebruiker
Gordon
Site Admin
 
Berichten: 684
Geregistreerd: zo mei 22, 2005 12:50 am

Re: geluiden

Berichtdoor KeesW » ma dec 28, 2009 4:38 pm

De helpfile nhad ik ook al bekeken, de listing daarin heb ik uitgeprobeerd met een eigen midi-file.
Die midi-file staat in mijn LB folder, geinstalleerd van internet van de amerikaanse website.
Het zou een hardware probleem kunnen zijn, ware het niet dat de midi-file wel buiten LB afspeelbaar is.
Hoe kan je aan LB duidelijk maken dat de MCI herkend moet worden ???
KeesW
 
Berichten: 23
Geregistreerd: do dec 10, 2009 2:32 pm

Re: geluiden

Berichtdoor Gordon » ma dec 28, 2009 5:31 pm

Hallo KeesW,

BEEP geeft geen geluid meer sinds LB 4.01
Foutje van Carl. Hij zegt dat het aan Windows XP ligt.
Maar de DLL waar Beep in zit doet het wel!

Code: Selecteer alles
WindowWidth = 100
WindowHeight = 100

global b
button #main, "Beep", [Beep], UL, 10, 10
open "Beep" for window as #main
#main "trapclose [Quit]"
wait

[Beep]

'frequentie moet in hexadecimaal zijn, deze gaat van 0x25 tot 0x7FFF
r = Beeper(400, 1000)
print b
wait

[Quit]
close #main
end

Function Beeper(hexdec, tijd)
    calldll #kernel32, "Beep",_
    hexdec as long, _
    tijd as long,_
    b as boolean
End Function



Je ziet het: KERNEL32 met Beep.

Maar waarom doet de MIDI het niet?
Doen andere midi bestanden het wel in LB?
Kijk eens in je Volume Control, staat MIDI Synth wel aan?
LB zegt dat de midi afspeelt.

Ik heb in elk geval een nieuw bestand naar je gestuurd.

Gordon
Avatar gebruiker
Gordon
Site Admin
 
Berichten: 684
Geregistreerd: zo mei 22, 2005 12:50 am

Re: geluiden

Berichtdoor KeesW » di dec 29, 2009 11:41 am

Sorrie Gordon,
Ik voel mij erg dom, gelukkig is het jaar bijna om en kan ik opnieuw beginnen.
Je raad het al de SW synthesizer stond uit, van daar
toch goede informatie waarom 'beep'niet werkte.
Is er ergens een goede uitleg (in het nederlands) wat de commando's in de XP DLL's zijn ?
Kees
KeesW
 
Berichten: 23
Geregistreerd: do dec 10, 2009 2:32 pm

Re: geluiden

Berichtdoor Gordon » di dec 29, 2009 12:18 pm

Hallo KeesW,

De beste uitleg van de DLL's staat op MSDN.
Daarmee heb ik alles gezegd. Volgens Microsoft zo helder als
maar kan, maar ik wordt er vaak niet wijs uit.

Alyce Watson heeft een Liberty BASIC boek (400 pag) voor API/DLL geschreven,
dat bij Lulu.com te koop is voor ongeveer 11 Euro. Haast alle toepassingen
zijn daarin uitgewerkt.

In het Nederlands ken ik (nog) geen uitleg.

Antonio (moderator op dit forum) is volgens mij een held in de DLL's.

Ik bezit een programma waarbij alle DLL's, functies in die DLL's en de gebruikte Variabelen
Struct's e.d. worden getoond..... van alle XP DLL's! In het verleden was er een contest op een
Amerikaans forum, om een dergelijk programma te schrijven.
De beste inzending van toen heb ik bewaard en ik plaats het hier op dit forum.

Gordon
Avatar gebruiker
Gordon
Site Admin
 
Berichten: 684
Geregistreerd: zo mei 22, 2005 12:50 am

Re: geluiden

Berichtdoor Gordon » di dec 29, 2009 12:53 pm

Er staat ergens (API/DLL) reeds een verwijzing naar het hier besproken programma.
Hier komt ie.

Gordon
Bijlagen
api.zip
API en DLL uit XP voor Liberty BASIC
(145.59 KiB) 192 keer gedownload
Avatar gebruiker
Gordon
Site Admin
 
Berichten: 684
Geregistreerd: zo mei 22, 2005 12:50 am


Keer terug naar Beginner

Wie is er online

Gebruikers op dit forum: Geen geregistreerde gebruikers. en 1 gast

cron