Hintergrundbild im Menü (2)

Übersicht BlitzBasic Beginners-Corner

Neue Antwort erstellen

8erZwerg

Betreff: Hintergrundbild im Menü (2)

BeitragSo, März 27, 2005 14:49
Antworten mit Zitat
Benutzer-Profile anzeigen
Also, hier erneut mein Problem.
ich möchte das bild H als hintergrundbild in mein Menü laden, aber
ich weiß nicht, wo ich genau das Bild laden soll und wo ich es mit TileBlock anzeigen
lassen soll.
Hier mein Code:
BlitzBasic: [AUSKLAPPEN]
Graphics 800,400,16,2
SetBuffer BackBuffer()
Global font1 = LoadFont(\"Verdana\", 30, 1, 1, 0)
Color 255,0,0
SetFont font1
Repeat
Text 400,100,\"Spiel starten \",1,1
Text 400,200,\"Steuerung\",1,1
Text 400,300,\"Beenden\",1,1
mausklick = MouseHit(1)

If mausklick And Maus_Text_Kollision(400,100,\" Spiel starten\",1,1) Then Startegame ()
If mausklick And Maus_Text_Kollision(400,200,\"Steuerung\",1,1) Then Credits ()
If mausklick And Maus_Text_Kollision(400,300,\"Beenden\",1,1) Then Ende()

Flip:Cls
Until KeyHit(1)
End

Function Maus_Text_Kollision(xPos,yPos,Text1$,AusrichtungX = 0,AusrichtungY = 0)
Breite=StringWidth(Text1$)
Hoehe =StringHeight(Text1$)
If AusrichtungX Then xPos = xPos - Breite/2
If AusrichtungY Then yPos = yPos - Hoehe/2

If RectsOverlap(xPos,yPos,Breite,Hoehe,MouseX(),MouseY(),1,1) Then
Rect xPos,yPos,Breite,Hoehe,0; Rahmen zur kontrolle
Return True
End If
Return False
End Function
Function Startegame ()
Cls
Text 400,100,\"Spiel wird geladen!\",1,1
Flip
WaitKey
End Function
Function Credits ()
Cls
Text 400,20,\"Steuerung\",1,1
Text 400,100,\"Sprung - Leertaste\",1,1
Text 400,150,\"Nach Rechts Laufen - Pfeil Rechts\",1,1
Text 400,200,\"Nach Links Laufen - Pfeil Links\",1,1
Text 400,350,\"Taste zum Hauptmenü\",1,1
Flip
WaitKey
End Function
Function ende ()
Flip
End
End Function


Thx im Voraus

Rallimen

Sieger des 30-EUR-Wettbewerbs

BeitragSo, März 27, 2005 15:39
Antworten mit Zitat
Benutzer-Profile anzeigen
Vor der Schleife das Bild laden und in der Schleife als erstes Tileblock h,0,0
So..BlitzBasic: [AUSKLAPPEN]
Graphics 800 ,400,16,2
SetBuffer BackBuffer ()
Global font1 = LoadFont (\"Verdana\", 30 , 1, 1, 0)
Color 255 ,0,0
SetFont font1
H = LoadImage (\"H.bmp\") ; <<<<<<<<<<<<<<<<<<<<<<<<<<<<
Repeat
TileBlock h,0,0;<<<<<<<<<<<<<<<<<<<<<<<<<<<
Text 400 ,100,\"Spiel starten \",1,1
Text 400 ,200,\"Steuerung\",1,1
Text 400 ,300,\"Beenden\",1,1
mausklick = MouseHit (1)
If mausklick And Maus_Text_Kollision (400 ,100,\"Spiel starten\",1,1) Then Startegame ()
If mausklick And Maus_Text_Kollision (400 ,200,\"Steuerung\",1,1) Then Credits ()
If mausklick And Maus_Text_Kollision (400 ,300,\"Beenden\",1,1) Then Ende ()
Flip : Cls
Until KeyHit (1)
End

Function Maus_Text_Kollision (xPos,yPos,Text1$,AusrichtungX = 0 ,AusrichtungY = 0)
Breite = StringWidth (Text1$)
Hoehe = StringHeight (Text1$)
If AusrichtungX Then xPos = xPos - Breite / 2
If AusrichtungY Then yPos = yPos - Hoehe / 2
If RectsOverlap (xPos,yPos,Breite,Hoehe,MouseX () ,MouseY () ,1,1) Then
Rect xPos,yPos,Breite,Hoehe,0; Rahmen zur kontrolle
Return True
End If
Return False
End Function

Function Startegame ()
Cls
Text 400 ,100,\"Spiel wird geladen!\",1,1
Flip
WaitKey
End Function

Function Credits ()
Cls
Text 400 ,20,\"Steuerung\",1,1
Text 400 ,100,\"Sprung - Leertaste\",1,1
Text 400 ,150,\"Nach Rechts Laufen - Pfeil Rechts\",1,1
Text 400 ,200,\"Nach Links Laufen - Pfeil Links\",1,1
Text 400 ,350,\"Taste zum Hauptmenü\",1,1
Flip
WaitKey
End Function

Function ende ()
Flip
End
End Function



Hab mir auch noch die Zeit genommen den Code zu formatieren!
[BB2D | BB3D | BB+]

BladeRunner

Moderator

BeitragSo, März 27, 2005 15:42
Antworten mit Zitat
Benutzer-Profile anzeigen
Ralli, du bist und bleibst zu gut für diese Welt Wink
Zu Diensten, Bürger.
Intel T2300, 2.5GB DDR 533, Mobility Radeon X1600 Win XP Home SP3
Intel T8400, 4GB DDR3, Nvidia GF9700M GTS Win 7/64
B3D BMax MaxGUI

Stolzer Gewinner des BAC#48, #52 & #92

8erZwerg

BeitragSo, März 27, 2005 15:49
Antworten mit Zitat
Benutzer-Profile anzeigen
danke leute, hab tmir sehr geholfen

Rallimen

Sieger des 30-EUR-Wettbewerbs

BeitragSo, März 27, 2005 15:52
Antworten mit Zitat
Benutzer-Profile anzeigen
ja so ist das!

Das Formatieren ist mit 2 Klicks erledigt (BB Code Former)!
und das andere halt Spielerei!

Wenn ich mir den Code so ansehe, ist das fast alles außer der Text 1:1 von mir übernommen worden! Very Happy
Aber egal!
[BB2D | BB3D | BB+]

8erZwerg

BeitragSo, März 27, 2005 15:55
Antworten mit Zitat
Benutzer-Profile anzeigen
ich weiß, hab den Code aus nem Thread hier übernomen Laughing
aber ist doch kein Copyright drauf oder?
Ich versteh den Cod zwar kaum, aber er bringts.

diGGa

GruppenKaspar

BeitragSo, März 27, 2005 16:06
Antworten mit Zitat
Benutzer-Profile anzeigen
8erZwerg hat Folgendes geschrieben:
ich weiß, hab den Code aus nem Thread hier übernomen Laughing
aber ist doch kein Copyright drauf oder?
Ich versteh den Cod zwar kaum, aber er bringts.


schlechte methode...
Gestern Nacht Schlug der Regen an mein Fenster
Ich ging durch das dunkle Zimmer und
glaubte im Licht der Straßenlampe
Den Geist unseres jahrhunderts auf der
Straße zu sehen
Der uns sagte, daß wir alle am Rande
des Abgrunds stehen.
- Al Steward


Athlon 64 3000+ / Radeon 9600 / 1024mb ddram

Rallimen

Sieger des 30-EUR-Wettbewerbs

BeitragSo, März 27, 2005 16:13
Antworten mit Zitat
Benutzer-Profile anzeigen
ja, das habe ich mir schon gedacht!

Und das wird dir wenig nutzten bringen, da es sehr schwierig wird noch eigenen Code zu schreiben!
Normalerweise wird ein Menue zum Schluß eingefügt, wenn ein Spiel ohne richtiges Konzept geschrieben wird!

Wer zuerst ein Menue schreibt, hat dagegen schon ein fertiges Konzept im Kopf oder auf Papier und braucht dieses nur noch in code umzusetzten!
(Aber das macht wohl kaum einer hier, obwohl das meiner Meinnug der bessere Weg ist!)
[BB2D | BB3D | BB+]

diGGa

GruppenKaspar

BeitragSo, März 27, 2005 16:19
Antworten mit Zitat
Benutzer-Profile anzeigen
naja ich hab zB gaaanz am anfang ein menü gecodet um die grafischen grund funktionen zu verstehen... danach hab ich es halt einfach zur seite gelegt vielleicht brauch ich es irgendwann mal xD also von daher isses eigentlich gut... aber wenn man ein menü nich schaffst kann man den rest gleich vergessen.. weil das is eigentlich das einfachste
Gestern Nacht Schlug der Regen an mein Fenster
Ich ging durch das dunkle Zimmer und
glaubte im Licht der Straßenlampe
Den Geist unseres jahrhunderts auf der
Straße zu sehen
Der uns sagte, daß wir alle am Rande
des Abgrunds stehen.
- Al Steward


Athlon 64 3000+ / Radeon 9600 / 1024mb ddram

Neue Antwort erstellen


Übersicht BlitzBasic Beginners-Corner

Gehe zu:

Powered by phpBB © 2001 - 2006, phpBB Group