Problem mit IF

Übersicht BlitzBasic Beginners-Corner

Neue Antwort erstellen

ssj-goku

Betreff: Problem mit IF

BeitragSa, Dez 16, 2006 0:28
Antworten mit Zitat
Benutzer-Profile anzeigen
hi leutz hier mein Problem:

Code: [AUSKLAPPEN]

    If
      Locate 20,20
      vorname$ = Input$("Vorname: ")
    And
      Locate 20,40
      name$    = Input$("Name: ")
    And
      Locate 20,60
      betrag#  = Input#("Betrag: ")
    And
      Locate 20,80
      datum#   = Input#("Datum: ")
    Then
      print "danke blabla"


kommt immer der fehler:

Zitat:
Expecting expression


danke für jede hilfe

mfg Goku
AMD 64 3500+ 2GB RAM GF6600 GT 128 RAM

aMul

Sieger des Minimalist Compo 01/13

BeitragSa, Dez 16, 2006 0:43
Antworten mit Zitat
Benutzer-Profile anzeigen
Lass mal die ganzen Ands und das If+Then weg, schon klappts. Ich weiß ja nicht, was du mit dem Code erreichen wolltest, aber die paar Abfragen funktionieren auch ohne Ifs.

EDIT:
Oder möchtest du die Variablen mit den Eingaben vergleichen?
Dann musst du 1. alles in eine Zeile schreiben und zweitens das Locate rausnehmen. Zwischen If und Then/If und And/And und Then darf nur ein Ausdruck (x=y, etc.) stehen.

EDIT2:
@Ralliman:
So kann man das auch ausdrücken Mr. Green
EDIT3:
@Hase:
So auch...
Panic Pong - ultimate action mashup of Pong and Breakout <= aktives Spiele-Projekt, Downloads mit vielen bunten Farben!
advASCIIdraw - the advanced ASCII art program <= aktives nicht-Spiele-Projekt, must-have für ASCII/roguelike/dungeon-crawler fans!
Alter BB-Kram: ThroughTheAsteroidBelt - mit Quelltext! | RGB-Palette in 32²-Textur / Farbige Beleuchtung mit Dot3 | Stereoskopie in Blitz3D | Teleport-Animation Screensaver
  • Zuletzt bearbeitet von aMul am Sa, Dez 16, 2006 0:58, insgesamt 3-mal bearbeitet

Rallimen

Sieger des 30-EUR-Wettbewerbs

BeitragSa, Dez 16, 2006 0:43
Antworten mit Zitat
Benutzer-Profile anzeigen
Solche konstruktionen habe ich noch nicht gesehen!
Was soll der Code bezwecken?
[BB2D | BB3D | BB+]

DerHase

BeitragSa, Dez 16, 2006 0:54
Antworten mit Zitat
Benutzer-Profile anzeigen
@ssj-goku: Vielleicht ist es hilfreich, wenn Du Dich über Befehle die Du verwendest informierst Rolling Eyes Es ist doch ne Help bei BlitzBasic dabei. Und wenn Du es auf deutsch haben möchtest, hätte Dir Google sehr geholfen. Hier die Befehle auf deutsch erklärt.
Play Satyr!

ssj-goku

BeitragSa, Dez 16, 2006 1:16
Antworten mit Zitat
Benutzer-Profile anzeigen
ja also was ich damit bezwecken will ist folgendes: wenn ich die eingaben gemacht habe soll er das ind eine datei schreiben hier mal der ganze code

Code: [AUSKLAPPEN]

    If
      Locate 20,20
      vorname$ = Input$("Vorname: ")
    And
      Locate 20,40
      name$    = Input$("Name: ")
    And
      Locate 20,60
      betrag#  = Input#("Betrag: ")
    And
      Locate 20,80
      datum#   = Input#("Datum: ")
    Then
;in deatei schreiben
      datei = OpenFile("daten.txt")
      WriteLine datei, "Vorname: " + $vorname
      WriteLine datei, "Name: "    + $name
      WriteLine datei, "Betrag: "  + #betrag
      WriteLine datei, "Datum: "   + #datum
      CloseFile



mehr soll das nicht bezwecken, aber leider geht es ja nicht, hat jemand eine andere idee als if schleifen zu benutzen
AMD 64 3500+ 2GB RAM GF6600 GT 128 RAM

FireballFlame

BeitragSa, Dez 16, 2006 1:22
Antworten mit Zitat
Benutzer-Profile anzeigen
IFs sind keine Schleifen!

Ich versteh immer noch nicht, was du mit den IFs da willst...
Erklär bitte nochmal, warum du die da rein gebaut hast...
PC: Intel Core i7 @ 4x2.93GHz | 6 GB RAM | Nvidia GeForce GT 440 | Desktop 2x1280x1024px | Windows 7 Professional 64bit
Laptop: Intel Core i7 @ 4x2.00GHz | 8 GB RAM | Nvidia GeForce GT 540M | Desktop 1366x768px | Windows 7 Home Premium 64bit

ssj-goku

BeitragSa, Dez 16, 2006 1:25
Antworten mit Zitat
Benutzer-Profile anzeigen
okay sry hast recht sind keine schleifen was ich damit will ist, jetzt mal

auf deutsch:
Zitat:

wenn
eingegeben
und
eingeben
dann
speichern

AMD 64 3500+ 2GB RAM GF6600 GT 128 RAM

FireballFlame

BeitragSa, Dez 16, 2006 1:29
Antworten mit Zitat
Benutzer-Profile anzeigen
Achso ... dann versuchs mal so:

Code: [AUSKLAPPEN]

Locate 20,20 : vorname$ = Input("Vorname: ")
Locate 20,40 : name$    = Input("Name: ")
Locate 20,60 : betrag#  = Input("Betrag: ")
Locate 20,80 : datum#   = Input("Datum: ")

;in datei schreiben
If vorname <> "" And name <> "" And betrag <> 0 And datum <> 0
   datei = OpenFile("daten.txt")
   WriteLine datei, "Vorname: " + vorname
   WriteLine datei, "Name: "    + name
   WriteLine datei, "Betrag: "  + betrag
   WriteLine datei, "Datum: "   + datum
   CloseFile datei
End If




Wenn Datum oder Betrag Null sollen sein dürfen, dann wird das etwas komplizierter, ist aber auch nicht wild...
  • Zuletzt bearbeitet von FireballFlame am Sa, Dez 16, 2006 1:44, insgesamt 2-mal bearbeitet

ssj-goku

BeitragSa, Dez 16, 2006 1:36
Antworten mit Zitat
Benutzer-Profile anzeigen
okay danke erstmal
AMD 64 3500+ 2GB RAM GF6600 GT 128 RAM

ssj-goku

BeitragSa, Dez 16, 2006 11:51
Antworten mit Zitat
Benutzer-Profile anzeigen
so neues problemhab schon verucht es zu lösen aber irgendwie hat es nicht geklappt. Also wenn ich Dateien speichere dann übershcreibt er die immer wieder. Kann man nicht irgendwie ein Zeiger setzten oder so.


txh im voraus
AMD 64 3500+ 2GB RAM GF6600 GT 128 RAM

StepTiger

BeitragSa, Dez 16, 2006 12:31
Antworten mit Zitat
Benutzer-Profile anzeigen
wie, er überschreibt sie immer?

writefile sorgt dafür, dass du eine bestehende datei überschreibst oder eine neue erstellst.

sonst entweder:
alte daten einlesen und mit in die neue schreiben
oder:
Readfile erlaubt das gleichzeitige Schreiben und Lesen
Noch gestern standen wir am Abgrund, doch heute sind wir schon einen Schritt weiter.
Computer:
AMD Sempron 3000+; ATI Radeon 9800 Pro; 512 MB DDR RAM 400Mhz; Asus E7N8X-E Deluxe; Samsung 200GB HD 5.4ns acces t
Gewinner: BP Code Compo #2
Π=3.141592653589793238...<--- und das aus dem kopf Laughing
Seit der Earthlings-Diskussion überzeugter Fleisch(fr)esser.

Rallimen

Sieger des 30-EUR-Wettbewerbs

BeitragSa, Dez 16, 2006 14:14
Antworten mit Zitat
Benutzer-Profile anzeigen
Eine von vielen Möglichkeiten ...
Code: [AUSKLAPPEN]
Datei% = OpenFile (DateiPfad$)

If Datei% <> 0 Then ; Datei gibt es schon...
    Zeiger% = FileSize (DateiPfad$)
    SeekFile Datei,Zeiger%   ;Die Schreibposition ans Ende stellen
 Else
    ; Datei exitiert nicht neue erstellen
    Datei% = WriteFile (DateiLogPfad$)
End If

WriteLine Datei%, bla...
;...
CloseFile Datei%
[BB2D | BB3D | BB+]

Neue Antwort erstellen


Übersicht BlitzBasic Beginners-Corner

Gehe zu:

Powered by phpBB © 2001 - 2006, phpBB Group