prob mit case und >=

Übersicht BlitzBasic Beginners-Corner

Neue Antwort erstellen

 

Obi

Betreff: prob mit case und >=

BeitragMi, Jun 29, 2005 19:39
Antworten mit Zitat
Benutzer-Profile anzeigen
komme irgendwie nicht drauf wo ich dort nen fehler haben soll:

Code: [AUSKLAPPEN]

   Select verkaufsmenge%      ;irgendwo nen error!
      Case >= maxabgabe%
         verkaufsmengfinal% = maxabgabe%
         Print "Erlös: " + verkaufsmengefinal% * preis%
         qqq = Input("!!")
      Case < 0
         verkaufsmengefinal% = 0
         Print "Erlös: " + verkaufsmengefinal% * preis%
         qqq = Input("!!")
      Case Else
         verkaufsmengefinal% = verkaufsmenge%
         Print "Erlös: " + verkaufsmengefinal% * preis%
         qqq = Input("!!")
   End Select    


die inputs sind nur als test gedacht... ebenso die prints!

herzlichen dank für hilfe und btw tolles forum!

edit: fehlermeldung lautet: expecting expression sequence
 

hitokiri

BeitragMi, Jun 29, 2005 19:47
Antworten mit Zitat
Benutzer-Profile anzeigen
Case bedeutet == , du kannst es nicht in verbindung mit grösser oder kleiner verwenden sondern musst einen konkreten wert angeben, den die case variable annehmen kann.
 

Obi

BeitragMi, Jun 29, 2005 19:48
Antworten mit Zitat
Benutzer-Profile anzeigen
hitokiri hat Folgendes geschrieben:
Case bedeutet == , du kannst es nicht in verbindung mit grösser oder kleiner verwenden sondern musst einen konkreten wert angeben, den die case variable annehmen kann.


besten dank! hatte es irgendwie anders in errinerung Wink

werds dann mal als if machen...
 

Klaas

BeitragMi, Jun 29, 2005 19:53
Antworten mit Zitat
Benutzer-Profile anzeigen
öhm ... naja, geht schon ... fragt sich nur wie sinnvoll das ist

Code: [AUSKLAPPEN]

maxabgabe = 10
verkaufsmenge = -1

   Select True      ;irgendwo nen error!
      Case verkaufsmenge >= maxabgabe%
         verkaufsmengfinal% = maxabgabe%
      Print "1"
         Print "Erlös: " + verkaufsmengefinal% * preis%
         qqq = Input("!!")
      Case verkaufsmenge < 0
         verkaufsmengefinal% = 0
      Print "2"
         Print "Erlös: " + verkaufsmengefinal% * preis%
         qqq = Input("!!")
      Default
         verkaufsmengefinal% = verkaufsmenge%
         Print "Erlös: " + verkaufsmengefinal% * preis%
         qqq = Input("!!")
   End Select   
 

Dreamora

BeitragMi, Jun 29, 2005 20:19
Antworten mit Zitat
Benutzer-Profile anzeigen
du musst beim select eine variable von dir verwenden, nicht true oder false ...

darüber hinaus muss der case eine konstante sein!


Code: [AUSKLAPPEN]


fall = 4

select fall

  case 1
    ; erster fall eingetreten
  case 2
    ; zweiter fall eingetreten
  case 4
    ; vierter fall eingetreten
end select



wenn du vergleiche machen willst, so musst du IF benutzen
Ihr findet die aktuellen Projekte unter Gayasoft und könnt mich unter @gayasoft auf Twitter erreichen.
 

Obi

BeitragMi, Jun 29, 2005 20:21
Antworten mit Zitat
Benutzer-Profile anzeigen
najo... habs jetzt so gelöst:

Code: [AUSKLAPPEN]

      If verkaufsmenge% >= maxabgabe
         verkaufsmengefinal% = maxabgabe%
         Print "Erlös: " + verkaufsmengefinal% * preis%
         ein = verkaufsmengefinal% * preis%
         vermoegen = vermoegen + ein
         Delay 3000
         runde% = runde% + 1
         Cls
         menu
      Else If verkaufsmenge% <= 0
         verkaufsmengefinal% = verkaufsmenge%
         Print "Erlös: " + verkaufsmengefinal% * preis%
         ein = 0
         vermoegen = vermoegen + ein
         Delay 3000
         runde% = runde%
         Cls
         menu
      Else
         verkaufsmengefinal% = verkaufsmenge%
         Print "Erlös: " + verkaufsmengefinal% * preis%
         ein = verkaufsmengefinal% * preis%
         vermoegen = vermoegen + ein
         Delay 3000
         runde% = runde% + 1
         Cls
         menu
      End If    


denke is i.o. auch wenn nicht sehr elegant aber fang ja gerade erst an Wink
 

Klaas

BeitragMi, Jun 29, 2005 20:25
Antworten mit Zitat
Benutzer-Profile anzeigen
@Dreamora: nein, das stimmt so nicht ... es funktioniert auch so wie ich es gezeigt habe. Zugegeben ist das nicht so sehr sinnvoll (was ich ja erwähnt hatte)

Neue Antwort erstellen


Übersicht BlitzBasic Beginners-Corner

Gehe zu:

Powered by phpBB © 2001 - 2006, phpBB Group