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:

Drehbanksteuerung

 
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
vertex



Anmeldungsdatum: 29.04.2005
Beiträge: 5
Wohnort: Eugendorf bei Salzburg

BeitragVerfasst am: 29.04.2005, 15:12    Titel: Drehbanksteuerung Antworten mit Zitat

Hallo und Guten Tag
Ich habe ein kleines CNC Programm zur Steuerung einer kleinen
Drehbank geschrieben (besser gesagt zusammengestoppelt) aber bis
auf eine Funktion und kleine Bugs funktioniert es eigentlich schon sehr
gut.Also, man gibt den: Ausgangsdurchmesser,den gewünschten Enddurchmesser,die Vorschubweite des Drehstahls,die Längsvorschub-
geschwindigkeit und die Abzudrehende Länge ein und das Programm
Rechnet die erforderlichen Vorschübe aus,führt auch eine Umkehr-
spielkompensation durch und steuert natürlich die drei Schrittmotoren.
Dann zuzücklehnen und zusehen wie die Maschine selbstständig die
Welle auf das Endmaß abarbeitet.
Ein Problem bereitet mir noch eine Bildschirmanzeige. Wenn das Programm einen Wert zum Beisp. 0.003 ausrechnet wird am
Bildschirm .003 dargestellt. Komme nicht dahinter warum.
Wird wahrscheinlich nur eine kleinigkeit sein.
Mit der Bitte um Hilfe
Grüsse Egon
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden
Paul
aka ICC, HV-Freak


Anmeldungsdatum: 11.09.2004
Beiträge: 588
Wohnort: Uelzen

BeitragVerfasst am: 29.04.2005, 15:34    Titel: Antworten mit Zitat

Moin, das ist immer so. Bei Fließkommazahlen wird die führende Null weggelassen.
Wenn du sie trotzdem haben mächstest, geht das so:
(Zahl ist der darzustellende Wert)
Code:

Zahl = .003
IF Zahl < 0 THEN Text$ = "0" ELSE Text$ = ""
Text$ = Text$ + LTRIM$(RTRIM$(STR$(Zahl)))
PRINT Text$

_________________
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden E-Mail senden Website dieses Benutzers besuchen
vertex



Anmeldungsdatum: 29.04.2005
Beiträge: 5
Wohnort: Eugendorf bei Salzburg

BeitragVerfasst am: 29.04.2005, 15:54    Titel: Antworten mit Zitat

Herzlichen Dank für diese schnelle Hilfe.

Gruß Egon
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 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