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:

Variable "pendeln" lassen

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



Anmeldungsdatum: 23.04.2005
Beiträge: 13
Wohnort: Hannover

BeitragVerfasst am: 17.01.2006, 16:29    Titel: Variable "pendeln" lassen Antworten mit Zitat

Hallo!
Ich sthee vor einem (wohl einfachen) Problem, aber mir fehlt einfach der Denkanstoß und/oder die Idee der Lösung..

Code:

Do
      If Prt = 7 Then
         Prt = 0
      Else
         Prt = Prt + 1
      End If
Loop


Diese paar Zeilen zählen Prt bis 7 durch, und dann wird Prt wieder auf 0 gesetzt.
Jetzt möchte ich haber, dass Prt nicht auf 0 gesetzt wird, sondern wieder Prt = Prt - 1, bis Prt wieder 0 ist, dann wieder Prt = Prt +1.. Und ich komme einfach nicht drauf peinlich

Danke für eure Hilfe!

PS: Das sit eigentlich kein QBasic, sondern Bascom-AVR, einer Basic-Sprache für Mikrocontroller, ist aber ähnlich aufgebaut. Das ganze soll hinterher ein "LED-Pendel" ergeben - Ein Grundstein zu einem Pong-Spiel
_________________
Datensalat enthält Vitamin C++
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden E-Mail senden Website dieses Benutzers besuchen
SpionAtom



Anmeldungsdatum: 10.01.2005
Beiträge: 395

BeitragVerfasst am: 17.01.2006, 17:00    Titel: Antworten mit Zitat

Erstelle dir eine Variable aenderung% = 1
bei der du alle 7 Schleifendurchläufe das Vorzeichen änderst.
Statt

Prt = Prt + 1

schreibst du nun

Prt = Prt + aenderung%


Wollte dir nicht zuviel wegnehmen, daher kein kompletter Code zwinkern
_________________
Inzwischen gehöre ich auch zu den BlitzBasicern. Also verzeiht mir, wenn mir mal ein LOCATE 100, 100 oder dergleichen rausrutscht.
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden E-Mail senden
LostTime



Anmeldungsdatum: 23.04.2005
Beiträge: 13
Wohnort: Hannover

BeitragVerfasst am: 17.01.2006, 17:04    Titel: Antworten mit Zitat

mit dem Kopf durch die Mauer wollen
Das ist genial.. Danke!
_________________
Datensalat enthält Vitamin C++
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden E-Mail senden Website dieses Benutzers besuchen
SpionAtom



Anmeldungsdatum: 10.01.2005
Beiträge: 395

BeitragVerfasst am: 17.01.2006, 23:24    Titel: Antworten mit Zitat

LostTime hat Folgendes geschrieben:
mit dem Kopf durch die Mauer wollen
Das ist genial.. Danke!


Danke! Hab ich mir aber auch nicht selber ausgedacht. Mit der Zeit bekommt man Erfahrung in solchen Sachen. Also immer dran denken: Es ist noch kein Meister vom Himmel gefallen cool
_________________
Inzwischen gehöre ich auch zu den BlitzBasicern. Also verzeiht mir, wenn mir mal ein LOCATE 100, 100 oder dergleichen rausrutscht.
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden E-Mail senden
Thomas Antoni



Anmeldungsdatum: 12.10.2004
Beiträge: 220
Wohnort: Erlangen

BeitragVerfasst am: 01.02.2006, 19:58    Titel: Antworten mit Zitat

Oder so...

Code:

FOR Prt = 0 TO 7
  PRINT Prt
NEXT
'
FOR Prt = 7 TO 0 STEP -1
  PRINT Prt
NEXT


_________________
+++ Die beliebte QBasic CD-ROM von QBasic.de - 670 MB QBasic-Stuff mit komfortabler HTML-Oberfläche. Für nur 5 EUR bestellbar auf www.antonis.de/qbcdueb.htm +++
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden E-Mail senden Website dieses Benutzers besuchen
Beiträge der letzten Zeit anzeigen:   
Neues Thema eröffnen   Neue Antwort erstellen    Das deutsche QBasic- und FreeBASIC-Forum Foren-Übersicht -> Allgemeine Fragen zu QBasic. 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