Das - ist - das - haus... etc Prob =p

Übersicht BlitzBasic Beginners-Corner

Neue Antwort erstellen

Blaggi

Betreff: Das - ist - das - haus... etc Prob =p

BeitragDi, März 21, 2006 20:58
Antworten mit Zitat
Benutzer-Profile anzeigen
Hallo erstma, aaaaaalso ich hab ma wieder nen bisschen rumgespielt, und dabei is des hier rausgekommen...

Code: [AUSKLAPPEN]
apptitle "Nikolaushaus"
graphics 640, 480, 32, 2
schritt = 0

Repeat
   color 0, 0, 255
   text 300, 200, "(k) Weiter"
   text 300, 215, "(l) Zurück"
   color 0, 255, 0
   
   Select schritt
      case 0:
         Text 100, 100, "Bitte K oder L drücken!"
      case 1:
         line 100, 300, 100, 200
      Case 2:
         line 100, 300, 100, 200
         line 100, 200, 200, 200
      Case 3:
         line 100, 300, 100, 200
         line 100, 200, 200, 200
         line 200, 200, 200, 300
      case 4:
         line 100, 300, 100, 200
         line 100, 200, 200, 200
         line 200, 200, 200, 300
         line 200, 300, 100, 200
      Case 5:
         line 100, 300, 100, 200
         line 100, 200, 200, 200
         line 200, 200, 200, 300
         line 200, 300, 100, 200
         line 100, 200, 150, 150
      case 6:
         line 100, 300, 100, 200
         line 100, 200, 200, 200
         line 200, 200, 200, 300
         line 200, 300, 100, 200
         line 100, 200, 150, 150
         line 150, 150, 200, 200
      case 7:
         line 100, 300, 100, 200
         line 100, 200, 200, 200
         line 200, 200, 200, 300
         line 200, 300, 100, 200
         line 100, 200, 150, 150
         line 150, 150, 200, 200
         line 200, 200, 100, 300
      case 8:
         line 100, 300, 100, 200
         line 100, 200, 200, 200
         line 200, 200, 200, 300
         line 200, 300, 100, 200
         line 100, 200, 150, 150
         line 150, 150, 200, 200
         line 200, 200, 100, 300
         line 100, 300, 200, 300
   end select
      
   if keyhit(37) then
      if schritt < 8 then
         schritt = schritt + 1
      else
         schritt = 0
      end if
   end if
   
   if keyhit(38) then
      if schritt => 1 then
         schritt = schritt - 1
      else
         schritt = 8
      end if
   end if
   
   cls   
until KeyHit(1)

Mein Problem ist, dass immer mal wieder die Linien für ca. 100 ms Verschwinden, und dann wieder auftauchen.. ich denke das liegt an der Select Case, da er so viel Code überspringen muss, liege ich da richtig? Eine andere möglichkeit fiele mir nicht ein..
=D

5k41

BeitragDi, März 21, 2006 21:04
Antworten mit Zitat
Benutzer-Profile anzeigen
das mit demn verscwinden ligt daran, das du kein double buffering benutzt guck dir mal ql:SetBuffer() ql:BackBuffer()

~Edit~
ql:Flip

hab ich vergessen
Projekte:
For a better World - Gesellschaftsspiel ( 100%)

User posted image

Blaggi

BeitragDi, März 21, 2006 21:05
Antworten mit Zitat
Benutzer-Profile anzeigen
AAARGH bin ich dumm, dass ich Buffern vergessen habe XD
Thx vielmals Smile
=D

Xalon

BeitragDi, März 21, 2006 21:06
Antworten mit Zitat
Benutzer-Profile anzeigen
Kann das an Flip liegen?

Xalon

EDIT:WTF??Inerhalb von 2 Mins 2 Antworten o_O
EDIT2:Jetzt schon 3 ...
>>Besucht doch mal meine Seite,mit NEUEN Tutorials<<
User posted image
  • Zuletzt bearbeitet von Xalon am Di, März 21, 2006 21:07, insgesamt einmal bearbeitet
 

antome

!!! gesperrt !!!

BeitragDi, März 21, 2006 21:06
Antworten mit Zitat
Benutzer-Profile anzeigen
Habs mal schnell repariert

Code: [AUSKLAPPEN]
AppTitle "Nikolaushaus"
Graphics 640, 480, 32, 2
schritt = 0

Repeat
   
   
   Select schritt
      Case 0:
         Text 100, 100, "Bitte K oder L drücken!"
      Case 1:
         Line 100, 300, 100, 200
      Case 2:
         Line 100, 300, 100, 200
         Line 100, 200, 200, 200
      Case 3:
         Line 100, 300, 100, 200
         Line 100, 200, 200, 200
         Line 200, 200, 200, 300
      Case 4:
         Line 100, 300, 100, 200
         Line 100, 200, 200, 200
         Line 200, 200, 200, 300
         Line 200, 300, 100, 200
      Case 5:
         Line 100, 300, 100, 200
         Line 100, 200, 200, 200
         Line 200, 200, 200, 300
         Line 200, 300, 100, 200
         Line 100, 200, 150, 150
      Case 6:
         Line 100, 300, 100, 200
         Line 100, 200, 200, 200
         Line 200, 200, 200, 300
         Line 200, 300, 100, 200
         Line 100, 200, 150, 150
         Line 150, 150, 200, 200
      Case 7:
         Line 100, 300, 100, 200
         Line 100, 200, 200, 200
         Line 200, 200, 200, 300
         Line 200, 300, 100, 200
         Line 100, 200, 150, 150
         Line 150, 150, 200, 200
         Line 200, 200, 100, 300
      Case 8:
         Line 100, 300, 100, 200
         Line 100, 200, 200, 200
         Line 200, 200, 200, 300
         Line 200, 300, 100, 200
         Line 100, 200, 150, 150
         Line 150, 150, 200, 200
         Line 200, 200, 100, 300
         Line 100, 300, 200, 300
   End Select
     
   If KeyHit(37) Then
      If schritt < 8 Then
         schritt = schritt + 1
      Else
         schritt = 0
      End If
   End If
   
   If KeyHit(38) Then
      If schritt => 1 Then
         schritt = schritt - 1
      Else
         schritt = 8
      End If
   End If
   
   
   Flip 
   Color 0, 0, 255
   Text 300, 200, "(k) Weiter"
   Text 300, 215, "(l) Zurück"
   Color 0, 255, 0
Until KeyHit(1)


EDIT: Diesmal war ich zu langsam
antome

Blaggi

BeitragDi, März 21, 2006 21:29
Antworten mit Zitat
Benutzer-Profile anzeigen
Kann es sein, das BB Exes sehr groß sind?
Meine EXE Datei zu diesem Beispiel ist 1,25MB groß!

Der Komprimierungsversteller geht auch nicht wirklich..
=D
 

Dreamora

BeitragDi, März 21, 2006 21:32
Antworten mit Zitat
Benutzer-Profile anzeigen
in den 1.25 MB ist das komplette System drin (bei BlitzPlus das ganze GUI etc, bei B3D das gesamte 3D)

mit UPX kann mans runter bringen. Aber 1.25MB sollte wirklich kein Problem sein ... verglichen mit 6MB bei DBP ist das noch harmlos Smile
Ihr findet die aktuellen Projekte unter Gayasoft und könnt mich unter @gayasoft auf Twitter erreichen.

Neue Antwort erstellen


Übersicht BlitzBasic Beginners-Corner

Gehe zu:

Powered by phpBB © 2001 - 2006, phpBB Group