PureBoard

Das deutsche PureBasic-Forum
https://www.purebasic.fr/german/

Base-7-Tekkno (Systemsounds)

https://www.purebasic.fr/german/viewtopic.php?t=10266

Seite 1 von 3

Base-7-Tekkno (Systemsounds)

Verfasst: 10.10.2006 14:48
von Kaeru Gaman
gibt es einen Weg die im Sytemprofil eingestellten Sounds anzusprechen?

sagen wir mal, ich hab nen Fenster, auf dem irgendwas bereit ist,
und das soll sich jetzt mit nem "notify" melden.

ich meine jetzt weniger die funktion, das fenster piepen und auch im Taskbar blinken zu lassen,
sondern ein abrufen/abspielen der sounds aus dem Profil.

Verfasst: 10.10.2006 14:55
von ts-soft

Code: Alles auswählen

MessageBeep_(#MB_OK)
?

Verfasst: 10.10.2006 15:02
von Kaeru Gaman
:shock: cool!

...zum rausfinden, welche von den konstanten wirklich sounds sind, muss ich die MSDN wälzen, wa?


[edit]
habs schon, hab ja die win32.hlp

thnx nochmal :allright:

[edit2]
so, für alle, dies gern mal ausprobieren wollen:

Code: Alles auswählen

MessageBeep_(#MB_ICONASTERISK)
Delay(500)
MessageBeep_(#MB_ICONEXCLAMATION)
Delay(500)
MessageBeep_(#MB_ICONHAND)
Delay(500)
MessageBeep_(#MB_ICONQUESTION)
Delay(500)
MessageBeep_(#MB_OK)

Verfasst: 10.10.2006 15:10
von AND51
Hey #MB_ICONINFORMATION funktioniert auch, sofern der Anwender etwas eingestellt hat! Viele behaupten, das ginge nicht. Wollt's nur mal sagen! :allright:

Verfasst: 10.10.2006 15:16
von Kaeru Gaman
aha...

dann ist die liste in der win32.hlp unvollständig. mist.

...wo find ich denn die komplette liste der konstanten...?
(außer in der MSDN, mag jetzt keine umständlichen MS-Sites laden)

Verfasst: 10.10.2006 15:22
von ts-soft
Das wahr es schon :wink:
http://msdn.microsoft.com/library/defau ... gebeep.asp

Verfasst: 10.10.2006 15:27
von Kaeru Gaman
yo, die seite ist indentisch mit der in der win32.hlp

also hat AND garnicht den richtigen sound bekommen, sondern nurn standard?

...yo scheint so, ich bekomm mit ICONINFORMATION auch nur den ICONASTERISK...

Verfasst: 10.10.2006 15:30
von ts-soft
verschiedene Namen, gleiche Konstante, wie in PB3.94 :mrgreen:

Verfasst: 10.10.2006 16:53
von Kaeru Gaman
ich konnte es nicht lassen...

Base-7-Tekkno

Code: Alles auswählen

Restore Table
While S > -1
  If S : MessageBeep_(16*(S-1)) : EndIf
  Delay(77)
  Read S
Wend
End 42  ; und jetzt ne schöne Tasse Tee...
DataSection
Table:
;intro
Data.l 1,0,0,0,0,0,0 , 0,1,0,0,0,0,0 , 0,1,0,0,0,0,0 , 1,0,0,0,0,1,0 , 0,0,1,0,0,1,0 , 1,1,0,1,1,1,0 , 1,1,1,1,0,0,0
;slow1 
Data.l 2,0,0,0,0,0,0 , 0,0,0,0,0,0,0 , 2,0,0,0,0,0,0 , 0,0,0,0,0,0,0 , 2,0,0,0,0,0,0 , 0,0,0,0,0,0,0 , 4,0,0,0,0,0,0
Data.l 2,0,0,0,0,0,0 , 0,0,0,0,0,0,0 , 2,0,0,0,0,0,0 , 0,0,0,0,0,0,0 , 2,0,0,0,0,0,0 , 0,0,0,0,0,0,0 , 4,0,0,0,0,0,0
;base
Data.l 2,0,0,0,0,0,0 , 2,0,0,0,0,0,0 , 2,0,0,0,0,0,0 , 4,0,0,0,0,0,0 , 2,0,0,0,0,0,0 , 2,0,0,0,0,0,0 , 4,0,0,0,0,0,0
Data.l 2,0,0,0,0,0,0 , 2,0,0,0,0,0,0 , 2,0,0,0,0,0,0 , 4,0,0,0,0,0,0 , 2,0,0,0,0,0,0 , 2,0,0,0,0,0,0 , 4,0,0,0,0,0,0
;Motiv1
Data.l 2,0,0,5,0,0,0 , 2,0,0,1,0,0,0 , 2,0,0,5,0,0,0 , 4,0,0,0,0,0,0 , 2,0,0,5,0,0,1 , 2,0,0,1,0,0,5 , 4,0,0,0,0,0,0
Data.l 2,0,0,5,0,0,0 , 2,0,0,1,0,0,0 , 2,0,0,5,0,0,0 , 4,0,0,0,0,0,0 , 2,0,0,5,0,0,1 , 2,0,0,1,0,0,5 , 4,0,0,0,0,0,0
;Motiv2
Data.l 2,0,0,5,0,0,0 , 2,0,0,0,0,1,0 , 2,0,0,1,0,0,0 , 5,0,0,0,0,2,0 , 2,0,0,5,0,0,0 , 2,0,0,0,0,1,0 , 4,0,0,0,0,0,0
Data.l 2,0,0,5,0,0,0 , 2,0,0,0,0,1,0 , 2,0,0,1,0,0,0 , 5,0,0,0,0,2,0 , 2,0,0,5,0,0,0 , 2,0,0,0,0,1,0 , 4,0,0,0,0,0,0
;träll
Data.l 1,1,1,1,1,1,1 , 2,0,0,5,0,0,0 , 2,0,0,0,0,0,0 , 4,0,0,0,0,1,0 , 2,0,0,5,0,0,0 , 2,0,0,0,0,0,0 , 4,0,0,0,0,0,0
Data.l 1,1,1,1,1,1,1 , 2,0,0,5,0,0,0 , 2,0,0,0,0,0,0 , 4,0,0,0,0,1,0 , 2,0,0,5,0,0,0 , 2,0,0,0,0,0,0 , 4,0,0,0,0,0,0
;base
Data.l 2,0,0,0,0,0,0 , 2,0,0,0,0,0,0 , 2,0,0,0,0,0,0 , 4,0,0,0,0,0,0 , 2,0,0,0,0,0,0 , 2,0,0,0,0,0,0 , 4,0,0,0,0,0,0
Data.l 2,0,0,0,0,0,0 , 2,0,0,0,0,0,0 , 2,0,0,0,0,0,0 , 4,0,0,0,0,0,0 , 2,0,0,0,0,0,0 , 2,0,0,0,0,0,0 , 4,0,0,0,0,0,0
;Motiv3
Data.l 2,0,0,0,3,0,0 , 2,0,0,3,0,0,0 , 2,0,3,0,0,0,0 , 4,0,0,0,0,0,0 , 2,0,0,3,0,0,0 , 2,0,3,0,0,0,0 , 4,0,0,0,0,0,0
Data.l 2,0,0,0,3,0,0 , 2,0,0,3,0,0,0 , 2,0,3,0,0,0,0 , 4,0,0,0,0,0,0 , 2,0,0,3,0,0,0 , 2,0,3,0,0,0,0 , 4,0,0,0,0,0,0
;träll
Data.l 1,1,1,1,1,1,1 , 2,0,0,5,0,0,0 , 2,0,0,0,0,0,0 , 4,0,0,0,0,1,0 , 2,0,0,5,0,0,0 , 2,0,0,0,0,0,0 , 4,0,0,0,0,0,0
Data.l 1,1,1,1,1,1,1 , 2,0,0,5,0,0,0 , 2,0,0,0,0,0,0 , 4,0,0,0,0,1,0 , 2,0,0,5,0,0,0 , 2,0,0,0,0,0,0 , 4,0,0,0,0,0,0
;Motiv4
Data.l 2,3,0,0,1,0,0 , 2,3,0,0,5,0,0 , 2,0,4,0,4,0,0 , 4,0,0,0,0,0,0 , 2,3,0,0,1,0,0 , 2,3,0,0,5,0,0 , 4,0,0,0,0,0,0
Data.l 2,3,0,0,1,0,0 , 2,3,0,0,5,0,0 , 2,0,4,0,4,0,0 , 4,0,0,0,0,0,0 , 2,3,0,0,1,0,0 , 2,3,0,0,5,0,0 , 4,0,0,0,0,0,0
;Motiv3
Data.l 2,0,0,0,3,0,0 , 2,0,0,3,0,0,0 , 2,0,3,0,0,0,0 , 4,0,0,0,0,0,0 , 2,0,0,3,0,0,0 , 2,0,3,0,0,0,0 , 4,0,0,0,0,0,0
Data.l 2,0,0,0,3,0,0 , 2,0,0,3,0,0,0 , 2,0,3,0,0,0,0 , 4,0,0,0,0,0,0 , 2,0,0,3,0,0,0 , 2,0,3,0,0,0,0 , 4,0,0,0,0,0,0
;träll
Data.l 1,1,1,1,1,1,1 , 2,0,0,5,0,0,0 , 2,0,0,0,0,0,0 , 4,0,0,0,0,1,0 , 2,0,0,5,0,0,0 , 2,0,0,0,0,0,0 , 4,0,0,0,0,0,0
Data.l 1,1,1,1,1,1,1 , 2,0,0,5,0,0,0 , 2,0,0,0,0,0,0 , 4,0,0,0,0,1,0 , 2,0,0,5,0,0,0 , 2,0,0,0,0,0,0 , 4,0,0,0,0,0,0
;Motiv1
Data.l 2,0,0,5,0,0,0 , 2,0,0,1,0,0,0 , 2,0,0,5,0,0,0 , 4,0,0,0,0,0,0 , 2,0,0,5,0,0,1 , 2,0,0,1,0,0,5 , 4,0,0,0,0,0,0
Data.l 2,0,0,5,0,0,0 , 2,0,0,1,0,0,0 , 2,0,0,5,0,0,0 , 4,0,0,0,0,0,0 , 2,0,0,5,0,0,1 , 2,0,0,1,0,0,5 , 4,0,0,0,0,0,0
;Motiv4
Data.l 2,3,0,0,1,0,0 , 2,3,0,0,5,0,0 , 2,0,4,0,4,0,0 , 4,0,0,0,0,0,0 , 2,3,0,0,1,0,0 , 2,3,0,0,5,0,0 , 4,0,0,0,0,0,0
Data.l 2,3,0,0,1,0,0 , 2,3,0,0,5,0,0 , 2,0,4,0,4,0,0 , 4,0,0,0,0,0,0 , 2,3,0,0,1,0,0 , 2,3,0,0,5,0,0 , 4,0,0,0,0,0,0
;Motiv2
Data.l 2,0,0,5,0,0,0 , 2,0,0,0,0,1,0 , 2,0,0,1,0,0,0 , 5,0,0,0,0,2,0 , 2,0,0,5,0,0,0 , 2,0,0,0,0,1,0 , 4,0,0,0,0,0,0
Data.l 2,0,0,5,0,0,0 , 2,0,0,0,0,1,0 , 2,0,0,1,0,0,0 , 5,0,0,0,0,2,0 , 2,0,0,5,0,0,0 , 2,0,0,0,0,1,0 , 4,0,0,0,0,0,0
;träll
Data.l 1,1,1,1,1,1,1 , 2,0,0,5,0,0,0 , 2,0,0,0,0,0,0 , 4,0,0,0,0,1,0 , 2,0,0,5,0,0,0 , 2,0,0,0,0,0,0 , 4,0,0,0,0,0,0
Data.l 1,1,1,1,1,1,1 , 2,0,0,5,0,0,0 , 2,0,0,0,0,0,0 , 4,0,0,0,0,1,0 , 2,0,0,5,0,0,0 , 2,0,0,0,0,0,0 , 4,0,0,0,0,0,0
;Motiv1
Data.l 2,0,0,5,0,0,0 , 2,0,0,1,0,0,0 , 2,0,0,5,0,0,0 , 4,0,0,0,0,0,0 , 2,0,0,5,0,0,1 , 2,0,0,1,0,0,5 , 4,0,0,0,0,0,0
;Motiv2
Data.l 2,0,0,5,0,0,0 , 2,0,0,0,0,1,0 , 2,0,0,1,0,0,0 , 5,0,0,0,0,2,0 , 2,0,0,5,0,0,0 , 2,0,0,0,0,1,0 , 4,0,0,0,0,0,0
;Motiv3
Data.l 2,0,0,0,3,0,0 , 2,0,0,3,0,0,0 , 2,0,3,0,0,0,0 , 4,0,0,0,0,0,0 , 2,0,0,3,0,0,0 , 2,0,3,0,0,0,0 , 4,0,0,0,0,0,0
;Motiv4
Data.l 2,3,0,0,1,0,0 , 2,3,0,0,5,0,0 , 2,0,4,0,4,0,0 , 4,0,0,0,0,0,0 , 2,3,0,0,1,0,0 , 2,3,0,0,5,0,0 , 4,0,0,0,0,0,0
;träll
Data.l 1,1,1,1,1,1,1 , 2,0,0,5,0,0,0 , 2,0,0,0,0,0,0 , 4,0,0,0,0,1,0 , 2,0,0,5,0,0,0 , 2,0,0,0,0,0,0 , 4,0,0,0,0,0,0
;cascadeur
Data.l 1,1,5,1,1,1,5 , 2,1,1,5,2,1,5 , 2,1,5,1,4,4,0 , 4,0,0,0,5,1,5 , 1,1,5,1,1,1,5 , 2,1,1,5,2,1,5 , 4,0,0,0,0,0,0
;Motiv4
Data.l 2,3,0,0,1,0,0 , 2,3,0,0,5,0,0 , 2,0,4,0,4,0,0 , 4,0,0,0,0,0,0 , 2,3,0,0,1,0,0 , 2,3,0,0,5,0,0 , 4,0,0,0,0,0,0
;Motiv2
Data.l 2,0,0,5,0,0,0 , 2,0,0,0,0,1,0 , 2,0,0,1,0,0,0 , 5,0,0,0,0,2,0 , 2,0,0,5,0,0,0 , 2,0,0,0,0,1,0 , 4,0,0,0,0,0,0
;base
Data.l 2,0,0,0,0,0,0 , 2,0,0,0,0,0,0 , 2,0,0,0,0,0,0 , 4,0,0,0,0,0,0 , 2,0,0,0,0,0,0 , 2,0,0,0,0,0,0 , 4,0,0,0,0,0,0
Data.l 2,0,0,0,0,0,0 , 2,0,0,0,0,0,0 , 2,0,0,0,0,0,0 , 4,0,0,0,0,0,0 , 2,0,0,0,0,0,0 , 2,0,0,0,0,0,0 , 4,0,0,0,0,0,0
;outro
Data.l 0,0,0,1,1,1,1 , 0,1,1,1,0,1,1 , 0,1,0,0,1,0,0 , 0,1,0,0,0,0,1 , 0,0,0,0,0,1,0 , 0,0,0,0,0,1,0 , 0,0,0,0,0,0,1

Data.l -1

EndDataSection
...komponiert auf win2k-standard-Soundschema

Verfasst: 10.10.2006 17:09
von AND51
Geil! Hast du noch mehr?
Hört sich auch auf XP mit Standardsounds gut an! :allright:

Aber warum End 42? Bist du 42 oder was hat es damit auf sich?
Alle Zeiten sind UTC+02:00
Seite 1 von 3

Powered by phpBB® Forum Software © phpBB Limited

Deutsche Übersetzung durch phpBB.de