Das deutsche QBasic- und FreeBASIC-Forum Foren-Übersicht Das deutsche QBasic- und FreeBASIC-Forum
Für euch erreichbar unter qb-forum.de, fb-forum.de und freebasic-forum.de!
 
FAQFAQ   SuchenSuchen   MitgliederlisteMitgliederliste   BenutzergruppenBenutzergruppen  RegistrierenRegistrieren
ProfilProfil   Einloggen, um private Nachrichten zu lesenEinloggen, um private Nachrichten zu lesen   LoginLogin
Zur Begleitseite des Forums / Chat / Impressum
Aktueller Forenpartner:

Jubiläumsfrage

 
Neues Thema eröffnen   Neue Antwort erstellen    Das deutsche QBasic- und FreeBASIC-Forum Foren-Übersicht -> Allgemeine Fragen zu FreeBASIC.
Vorheriges Thema anzeigen :: Nächstes Thema anzeigen  
Autor Nachricht
Caran



Anmeldungsdatum: 11.03.2007
Beiträge: 290
Wohnort: Lörrach

BeitragVerfasst am: 16.09.2007, 09:08    Titel: Jubiläumsfrage Antworten mit Zitat

Hi,
jetzt bin ich schon seit 1 Jahr FreeBasic-Programmierer Yahooo!!!! , passend dazu mein 100. Beitrag. Und noch passender die Frage:
Ich arbeite momentan mit timer um nach einer bestimmten Zeit ein bestimmtes ereignis auszulösen.
Code:

now = timer
do
if timer >= now + 3 then
    print "Drei Sekunden vergangen"
    now = timer
end if
loop

Das klappt ja auch recht gut aber wenn ich etwas in unter einer halben sekunde auslösen will,
Code:

do
if timer >= now + 0.3 then
    print "0,3 Sekunden vergangen"
    now = timer
end if
loop

ungefähr so, dann funktioniert das nicht mehr, sprich die Wartezeit variiert.
Wenn ich das aber mit z.B. mit sleep 300 mache funktioniert alles.
Was mache ich falsch?

MfG Caran
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden
AndT



Anmeldungsdatum: 02.04.2007
Beiträge: 481

BeitragVerfasst am: 16.09.2007, 10:47    Titel: Antworten mit Zitat

difiniere NOW als double, dann geht das ohne Probleme zwinkern
Mein erweiterter Code:
Code:
dim now as double
NOW=TIMER
DO
IF TIMER >= NOW + 0.1 THEN
    PRINT timer - now;" Sekunden vergangen"
    NOW = TIMER
END IF
LOOP until inkey = chr(27)

Die erklärung ist dafür ganz einfach :
Code:
Print "0.2"
dim x as integer = 0.2
print "Als integer:";x
dim y as double = 0.2
print "Also double:";y
sleep

_________________
Bis irgendwann... grinsen


Zuletzt bearbeitet von AndT am 16.09.2007, 10:55, insgesamt einmal bearbeitet
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden
volta



Anmeldungsdatum: 04.05.2005
Beiträge: 1876
Wohnort: D59192

BeitragVerfasst am: 16.09.2007, 10:54    Titel: Antworten mit Zitat

Hi,
NOW existiert schon in der vbcompat.bi als Funktion, es ist geschickter einen anderen Namen für die Variable zu wählen.
_________________
Warnung an Choleriker:
Dieser Beitrag kann Spuren von Ironie & Sarkasmus enthalten.
Zu Risiken & Nebenwirkungen fragen Sie Ihren Therapeuten oder Psychiater.
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden Website dieses Benutzers besuchen
Caran



Anmeldungsdatum: 11.03.2007
Beiträge: 290
Wohnort: Lörrach

BeitragVerfasst am: 16.09.2007, 10:58    Titel: Antworten mit Zitat

Danke! Für ne Jubiläumsfrage wurde das ja relativ schnell gelöst. happy
volta hat Folgendes geschrieben:
NOW existiert schon in der vbcompat.bi als Funktion, es ist geschickter einen anderen Namen für die Variable zu wählen.

Ok ich werd dran denken.

Grüße Caran
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden
Mao



Anmeldungsdatum: 25.09.2005
Beiträge: 4409
Wohnort: /dev/hda1

BeitragVerfasst am: 16.09.2007, 12:05    Titel: Antworten mit Zitat

Ich glaube, jeder weiß sofort, was eine "Jubiläumsfrage" ist. Zunge rausstrecken
_________________
Eine handvoll Glück reicht nie für zwei.
--
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden
Beiträge der letzten Zeit anzeigen:   
Neues Thema eröffnen   Neue Antwort erstellen    Das deutsche QBasic- und FreeBASIC-Forum Foren-Übersicht -> Allgemeine Fragen zu FreeBASIC. Alle Zeiten sind GMT + 1 Stunde
Seite 1 von 1

 
Gehe zu:  
Du kannst keine Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum nicht antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.

 Impressum :: Datenschutz