| Vorheriges Thema anzeigen :: Nächstes Thema anzeigen |
| Autor |
Nachricht |
King-01
gesperrt
Anmeldungsdatum: 26.02.2007
Beiträge: 351
|
 Verfasst am: 16.06.2007, 21:22 Titel: beep_-ton endloslang |
 |
|
hi,
wie kann ich mit beep_ (nicht beep) den erzeugte ton unendlich lang abspielen lassen und auf tastendruck abbrechen lassen?
syntax von beep_: beep_ (frequenz,dauer)
gibt es dazu vielleicht auch eine alternative zu beep_?#
edit:
_Michael_ (aus irc) hat mir ein beispiel gemacht:
http://fbnp.mlaumen.dyndns.org/index.php?view=178 |
|
| Nach oben |
|
 |
PMedia
Anmeldungsdatum: 14.08.2006
Beiträge: 2847
|
| Verfasst am: 16.06.2007, 22:22 Titel: |
|
|
Erstmal vorab: _Michael_ == Programmierer
Nur dem allgemeinen Verständnis wegen. |
|
| Nach oben |
|
|
Eternal_pain
Anmeldungsdatum: 08.08.2006
Beiträge: 1783
Wohnort: BW/KA
|
| Verfasst am: 16.06.2007, 22:41 Titel: |
|
|
Die Nutzbarkeit des Befehls lass ich ma so dahingestellt, aber wenn es zu der Frage auch eine loesung gibt, dann waere es schoen wenn nicht sogar sinnvoll diese vielleicht auch zu posten, und wenn man damit nur
unnoetiges neuposten der gleichen frage versucht zu verhindern. 
_________________
 |
|
| Nach oben |
|
|
Jojo
alter Rang
Anmeldungsdatum: 12.02.2005
Beiträge: 9736
Wohnort: Neben der Festplatte
|
| Verfasst am: 16.06.2007, 22:45 Titel: |
|
|
nur mal nebenbei.. wieso musst du alles, was im IRC dir beantwortet wird, gleichzeitg noch im Forum nachfragen?!
_________________
» Die Mathematik wurde geschaffen, um Probleme zu lösen, die es nicht gäbe, wenn die Mathematik nicht erschaffen worden wäre.
 |
|
| Nach oben |
|
|
King-01
gesperrt
Anmeldungsdatum: 26.02.2007
Beiträge: 351
|
| Verfasst am: 16.06.2007, 22:47 Titel: |
|
|
| Im forum sind halt mehr leute und andere personen, die den die suchen-funktion des forums nutzen haben auch was davon. |
|
| Nach oben |
|
|
PMedia
Anmeldungsdatum: 14.08.2006
Beiträge: 2847
|
| Verfasst am: 16.06.2007, 22:49 Titel: |
|
|
[offtopic]
zu denen du aber net gehörst.... und ich denk du schläfst scho? xD
[/offtopic] |
|
| Nach oben |
|
|
Jojo
alter Rang
Anmeldungsdatum: 12.02.2005
Beiträge: 9736
Wohnort: Neben der Festplatte
|
| Verfasst am: 16.06.2007, 22:49 Titel: |
|
|
aber wenn du es auch noch gleichzeitig nachfrägst... und wenn _Michael_ im IRC ist, der sich damit auskennt...?!
_________________
» Die Mathematik wurde geschaffen, um Probleme zu lösen, die es nicht gäbe, wenn die Mathematik nicht erschaffen worden wäre.
|
|
| Nach oben |
|
|
Eternal_pain
Anmeldungsdatum: 08.08.2006
Beiträge: 1783
Wohnort: BW/KA
|
| Verfasst am: 16.06.2007, 22:52 Titel: |
|
|
| King-01 hat Folgendes geschrieben: |
Im forum sind halt mehr leute und andere personen, die den die suchen-funktion des forums nutzen haben auch was davon.
|
Wovon sollen die Leute etwas haben ?!
Damit jeder mitbekommt das jemand fuer Dich ein Problem geloest hat ?
Und Leute die moeglichweise das selbe oder ein aehnliches Problem haben immer noch dumm gucken das hier immernoch keine loesung zu dem Problem steht ?! 
_________________
|
|
| Nach oben |
|
|
Michael712
aka anfänger, programmierer
Anmeldungsdatum: 26.03.2005
Beiträge: 1593
|
| Verfasst am: 16.06.2007, 23:10 Titel: |
|
|
Wie man sich über alles aufregen kann.
Was spricht denn dagegen, irgendwo anders um Hilfe zu fragen?
Solange man dann den Beitrag editiert und nicht 10 Posts hintereinander macht finde ich das nicht so schlimm, vor allem hat er die Frage im Forum vor meiner Beantwortung im IRC erstellt.
_________________
| Code: | | #include "signatur.bi" |
|
|
| Nach oben |
|
|
King-01
gesperrt
Anmeldungsdatum: 26.02.2007
Beiträge: 351
|
| Verfasst am: 17.06.2007, 09:53 Titel: |
|
|
| Zitat: | | und ich denk du schläfst scho? xD |
war gestern abend noch schnell im forum.
| Zitat: | | Wovon sollen die Leute etwas haben ?! |
wenn diese leute zufällig das selbe problem haben... |
|
| Nach oben |
|
|
King-01
gesperrt
Anmeldungsdatum: 26.02.2007
Beiträge: 351
|
|
| Nach oben |
|
|
ytwinky
Anmeldungsdatum: 28.05.2005
Beiträge: 2624
Wohnort: Machteburch
|
| Verfasst am: 17.06.2007, 15:58 Titel: |
|
|
Wenn du dir angewöhnen würdest, deine benutzten Variablen von vorherein zu deklarieren, würdest du selber deine Fehler viel schneller finden:
| fbnp hat Folgendes geschrieben: | sub tonan(freq%)
Dim As Ushort f = 1193181 \ freq%
Out &H61, Inp (&H61) Or 3
Out &H43, &HB6
Out &H42, Lobyte(f)
Out &H42, Hibyte(f)
end sub
sub tonaus()
Out &H61, Inp (&H61) And &HFC
end sub
freq% = 100
do
y$ = inkey$
select case y$
case "1": freq+=1
case "2": freq-=1
end select
tonan(freq%)
sleep
if n$ = "1" or n$ = "2" then
tonaus()
end if
loop |
du benutzt n$, ohne daß es jemals einen Wert erhalten hätte..
..intuitive Programmierung?
wie wärs mit einem n$=Inkey
(ich verrate aber nicht, wo es hingehört  )
_________________
| v1ctor hat Folgendes geschrieben: | | Yeah, i like INPUT$(n) as much as PRINT USING.. |
..also ungefähr so, wie ich GOTO.. |
|
| Nach oben |
|
|
King-01
gesperrt
Anmeldungsdatum: 26.02.2007
Beiträge: 351
|
|
| Nach oben |
|
|
ytwinky
Anmeldungsdatum: 28.05.2005
Beiträge: 2624
Wohnort: Machteburch
|
| Verfasst am: 17.06.2007, 16:26 Titel: |
|
|
| fbnp hat Folgendes geschrieben: | | Fehler: Dieser Code existiert nicht. |
..axo..
_________________
| v1ctor hat Folgendes geschrieben: | | Yeah, i like INPUT$(n) as much as PRINT USING.. |
..also ungefähr so, wie ich GOTO.. |
|
| Nach oben |
|
|
King-01
gesperrt
Anmeldungsdatum: 26.02.2007
Beiträge: 351
|
| Verfasst am: 17.06.2007, 16:29 Titel: |
|
|
| ups,da war noch das ende eines code-tags am ende des links. habs entfernt |
|
| Nach oben |
|
|
ytwinky
Anmeldungsdatum: 28.05.2005
Beiträge: 2624
Wohnort: Machteburch
|
| Verfasst am: 17.06.2007, 17:28 Titel: |
|
|
Meine Variante..
| Code: | Const Aus=0, Esc=!"\27"
Dim As Long Frequenz=100
Dim As String y, n
Sub Ton(byVal Frequenz As Long)
If Frequenz=Aus Then
Out &H61, Inp (&H61) And &HFC
Exit Sub
End If
Dim As uShort u=1193181\Frequenz
Out &H61, Inp(&H61) Or 3
Out &H43, &HB6
Out &H42, LoByte(u)
Out &H42, HiByte(u)
End Sub
Do
y=Inkey
Select Case y
Case "+": Frequenz+=1
Case "-": Frequenz-=1
End Select
Ton(Frequenz)
Sleep
n=Inkey
Select Case n
Case Esc: Ton(Aus): End 'Jetz is Ruhe bei Esc..
Case "+", "-": Ton(Aus)
End Select
Loop |
..ist allerdings ungetestet
nach einem Test von Eternal_Pain habe ich bei Esc noch Ton(Aus) eingefügt..
..ahhh, Ruhe is..
[Edit]
..ich habe den Code lediglich 'lesbar' gemacht, für Konstruktionsfehler in der Schleife bitte King01 fragen..
..wer das aber nicht möchte, findet hier eine abschaltbare Version
_________________
| v1ctor hat Folgendes geschrieben: | | Yeah, i like INPUT$(n) as much as PRINT USING.. |
..also ungefähr so, wie ich GOTO.. |
|
| Nach oben |
|
|
|
FAQ
Suchen
Mitgliederliste
Benutzergruppen
Registrieren
Profil
Einloggen, um private Nachrichten zu lesen
Login
