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:

Ergänzung zu gerechnete Grafik 2: Nagelbrett

 
Neues Thema eröffnen   Neue Antwort erstellen    Das deutsche QBasic- und FreeBASIC-Forum Foren-Übersicht -> Projektvorstellungen
Vorheriges Thema anzeigen :: Nächstes Thema anzeigen  
Autor Nachricht
Grafixfan



Anmeldungsdatum: 24.03.2007
Beiträge: 17
Wohnort: Bayreuth
BeitragVerfasst am: 17.05.2007, 11:13    Titel: Ergänzung zu gerechnete Grafik 2: Nagelbrett Antworten mit Zitat
Da ist was schief gelaufen; hier das Nagelbrett:

Code:

''Nagelbrett

screen 20,8

dim as single xn,an,yn,bn,cn,in
dim as double tn

xn = 100
an = 384
yn = 100
bn = 384
cn = 512

FOR in = 0 TO 6.28 STEP 0.31415/2
  xn = SIN(in) * 300 + 512
  yn = COS(in) * 300 + 384
  FOR an = 212 TO 812 STEP 100
       COLOR in+1
 line (xn,yn)-(an,bn)
  NEXT an
  FOR an = 84 TO 734 STEP 100
    COLOR in+2
   
''Damit's langsam abläuft...
    for tn =1 to 1000000
    next tn
   
   line (xn,yn)-(cn,an)
  NEXT an

NEXT in
sleep
end 0
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden Website dieses Benutzers besuchen
A.K.



Anmeldungsdatum: 02.05.2005
Beiträge: 467
Wohnort: HH
BeitragVerfasst am: 17.05.2007, 17:16    Titel: Antworten mit Zitat
Hi,

bitte keine Crosspostings.
Wenn Änderungen in bestehenden Threads gemacht werden müssen, dann bitte den jeweiligen Edit-Button benutzen und bitte keinen neuen Beitrag erstellen. Danke.

MFG A.K.
_________________

http://forum.IconSoft.de
http://www.pnpbb.de - hol dir jetzt dein eigenes kostenloses Forum *NEU*
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden E-Mail senden Website dieses Benutzers besuchen Yahoo Messenger MSN Messenger
Grafixfan



Anmeldungsdatum: 24.03.2007
Beiträge: 17
Wohnort: Bayreuth
BeitragVerfasst am: 20.05.2007, 16:44    Titel: Antworten mit Zitat
Danke für den Hinweis; stochere noch im Nebel ...
Habe das fehlerhafte Projekt editiert, war kein Problem.

Wollte das nun überflüssige kreuzverweisende Projekt über das Icon "edit" (zeigt "editieren oder löschen"; ich finde danach aber nicht raus, wie das geht ...

könnt ihr mir helfen?

Danke und Grüße
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden Website dieses Benutzers besuchen
csde_rats



Anmeldungsdatum: 07.01.2007
Beiträge: 2292
Wohnort: Zwischen Sessel und Tastatur
BeitragVerfasst am: 20.05.2007, 16:47    Titel: Antworten mit Zitat
löschen können nur mods/admins
_________________
If hilfreicher_Beitrag then klick(location.here)

Klick
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden E-Mail senden Website dieses Benutzers besuchen
Sebastian
Administrator


Anmeldungsdatum: 10.09.2004
Beiträge: 5969
Wohnort: Deutschland
BeitragVerfasst am: 20.05.2007, 17:23    Titel: Antworten mit Zitat
Zitat:
Code:
''Damit's langsam abläuft...
    for tn =1 to 1000000
    next tn

Das würd ich ändern, damit die Verzögerung nicht von der Geschwindigkeit des ausführenden Computers abhängig ist.

Variante 1:
Code:
SLEEP 10 '=10ms (in FB)


Variante 2:
Code:
DIM AS SINGLE t
...
t = TIMER
DO: LOOP UNTIL TIMER > t + 0.1

_________________

Die gefährlichsten Familienclans | Opas Leistung muss sich wieder lohnen - für 6 bis 10 Generationen!
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden E-Mail senden Website dieses Benutzers besuchen
Jojo
alter Rang


Anmeldungsdatum: 12.02.2005
Beiträge: 9736
Wohnort: Neben der Festplatte
BeitragVerfasst am: 20.05.2007, 18:20    Titel: Antworten mit Zitat
bei variante 2 aber noch ein sleep 1 zwischen do und loop einfügen, sonst hat man 100% prozessorlast lächeln
_________________
» Die Mathematik wurde geschaffen, um Probleme zu lösen, die es nicht gäbe, wenn die Mathematik nicht erschaffen worden wäre.
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden Website dieses Benutzers besuchen
Sebastian
Administrator


Anmeldungsdatum: 10.09.2004
Beiträge: 5969
Wohnort: Deutschland
BeitragVerfasst am: 20.05.2007, 19:59    Titel: Antworten mit Zitat
Jojo hat Folgendes geschrieben:
bei variante 2 aber noch ein sleep 1 zwischen do und loop einfügen, sonst hat man 100% prozessorlast lächeln

Wenn es um eine Verzögerung von <=0.1s geht, würd ich das vielleicht sogar rauslassen, weil die Angelegenheit sonst je nach OS deutlich länger dauert.
_________________

Die gefährlichsten Familienclans | Opas Leistung muss sich wieder lohnen - für 6 bis 10 Generationen!
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden E-Mail senden Website dieses Benutzers besuchen
Jojo
alter Rang


Anmeldungsdatum: 12.02.2005
Beiträge: 9736
Wohnort: Neben der Festplatte
BeitragVerfasst am: 20.05.2007, 20:00    Titel: Antworten mit Zitat
dann aber wenigtens woanders happy oder nur jeden 50. durchlauf oder sowas.
_________________
» Die Mathematik wurde geschaffen, um Probleme zu lösen, die es nicht gäbe, wenn die Mathematik nicht erschaffen worden wäre.
Nach oben
Benutzer-Profile anzeigen Private Nachricht 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 -> Projektvorstellungen 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