Vorheriges Thema anzeigen :: Nächstes Thema anzeigen |
Autor |
Nachricht |
Bull-t07
Anmeldungsdatum: 10.07.2007 Beiträge: 12
|
Verfasst am: 13.02.2008, 20:52 Titel: Meine Weckersoftware |
|
|
Halli Hallo nun Poste ich mal ins Board^^
Also ich habe mit Hilfe von Mister D eine Weckersoftware programmiert.
So nun ist das Problem das ich zwar eintragen kann wann es mich wecken soll nur wartet das Porgramm die Zeitspanne nicht ab und tut nach der Eingabe gleich die Musik abspielen...
Hat einer eine Lösung?
Code: |
#include "vbcompat.bi"
Screen 18
Print "ICH BIN DEIN WECKER"
Sleep 5000
DIM zeit AS DOUBLE
DIM WECKZEIT AS STRING
Dim JETZT As DOUBLE
Dim EUZ As Double
Dim UZOD As DOUBLE
Input "wann moechtest du geweckt werden :", WECKZEIT
JETZT = Now()
uzod = jetzt-int(jetzt)
EUZ = TIMEVALUE(WECKZEIT+":00")
IF UZOD < EUZ then zeit=int(jetzt)+euz else zeit=int(jetzt)+1+euz
WHILE(zeit<NOW)
SLEEP 0
WEND
SHELL "start wmplayer.exe C:/Wikipedia.mp3"
Sleep |
MFG: BULL-T07 |
|
Nach oben |
|
 |
MisterD

Anmeldungsdatum: 10.09.2004 Beiträge: 3071 Wohnort: bei Darmstadt
|
Verfasst am: 13.02.2008, 23:04 Titel: |
|
|
zeit>now statt zeit<now  _________________ "It is practically impossible to teach good programming to students that have had a prior exposure to BASIC: as potential programmers they are mentally mutilated beyond hope of regeneration."
Edsger W. Dijkstra |
|
Nach oben |
|
 |
Bull-t07
Anmeldungsdatum: 10.07.2007 Beiträge: 12
|
Verfasst am: 14.02.2008, 15:54 Titel: |
|
|
Danke Mister D...
No more comment
xD Bull-T07
P.S: Funktioniert jetz WUNDERBAR^^ |
|
Nach oben |
|
 |
|