Menü

Übersicht

BlitzBasic

Codearchiv

	mk Betreff: Menü	Do, Jan 06, 2005 12:42 Antworten mit Zitat
Ich bin zwar noch ein anfänger, aber ich habe es geschafft ein Menü zu Coden. Vielleicht kann jemand es gebrauchen... Code: [AUSKLAPPEN] [EINKLAPPEN] Graphics 800,600,0,2 auswahl=1 Text 10,10,"Start" Text 10,30,"Optionen" Text 10,50,"Credits" Text 10,70,"Ende" Repeat .reset If KeyHit (208) Then auswahl=auswahl+1 If KeyHit (200) Then auswahl=auswahl-1 If auswahl=5 Then auswahl=auswahl-1 If auswahl=0 Then auswahl=auswahl+1 If auswahl=1 Then Color 0,255,0 Text 10,10, "Start" Else Color 255,255,255 Text 10,10, "Start" EndIf If auswahl=2 Then Color 0,255,0 Text 10,30, "Optionen" Else Color 255,255,255 Text 10,30, "Optionen" EndIf If auswahl=3 Then Color 0,255,0 Text 10,50, "Credits" Else Color 255,255,255 Text 10,50, "Credits" EndIf If auswahl=4 Then Color 0,255,0 Text 10,70, "Ende" Else Color 255,255,255 Text 10,70, "Ende" EndIf If auswahl=4 And KeyHit (28) Then End Until KeyHit (1)
Pentium 4 2,6 GHz \| 256 MB RAM \| 120 GB Festplatte \| DVD-ROM Laufwerk (48 Fach) \| I am a noob www.marcelkroener.de.vu Mein Arcor Webspace =)

mk

Betreff: Menü

Do, Jan 06, 2005 12:42
Antworten mit Zitat

Ich bin zwar noch ein anfänger, aber ich habe es geschafft ein Menü zu Coden.
Vielleicht kann jemand es gebrauchen...

Code: [AUSKLAPPEN]

Graphics 800,600,0,2

auswahl=1

Text 10,10,"Start"
Text 10,30,"Optionen"
Text 10,50,"Credits"
Text 10,70,"Ende"

Repeat
.reset

If KeyHit (208) Then auswahl=auswahl+1
If KeyHit (200) Then auswahl=auswahl-1
If auswahl=5 Then auswahl=auswahl-1
If auswahl=0 Then auswahl=auswahl+1

If auswahl=1 Then
Color 0,255,0
Text 10,10, "Start"
Else
Color 255,255,255
Text 10,10, "Start"
EndIf

If auswahl=2 Then
Color 0,255,0
Text 10,30, "Optionen"
Else
Color 255,255,255
Text 10,30, "Optionen"
EndIf

If auswahl=3 Then
Color 0,255,0
Text 10,50, "Credits"
Else
Color 255,255,255
Text 10,50, "Credits"
EndIf

If auswahl=4 Then
Color 0,255,0
Text 10,70, "Ende"
Else
Color 255,255,255
Text 10,70, "Ende"
EndIf

If auswahl=4 And KeyHit (28) Then End

Until KeyHit (1)

Pentium 4 2,6 GHz | 256 MB RAM | 120 GB Festplatte | DVD-ROM Laufwerk (48 Fach) |

I am a noob Smile

www.marcelkroener.de.vu

Mein Arcor Webspace =)

	OJay	Do, Jan 06, 2005 12:44 Antworten mit Zitat
an alle noobs, die das sehen: bitte nicht dieses schnipsel zum vorbild nehmen! bitte dieses hier lesen: https://www.blitzforum.de/viewtopic.php?t=6780 das hier ist allerhöchstens was für den trash...das nützt keinem was.

OJay

Do, Jan 06, 2005 12:44
Antworten mit Zitat

an alle noobs, die das sehen: bitte nicht dieses schnipsel zum vorbild nehmen! bitte dieses hier lesen: https://www.blitzforum.de/viewtopic.php?t=6780

das hier ist allerhöchstens was für den trash...das nützt keinem was.

	Fetze	Do, Jan 06, 2005 20:31 Antworten mit Zitat
Nimms nich so schwer, er meints nich so g Hier mal das, was an deinem Menü konkret fehlt: - möglichst Modularer Aufbau - Flexibilität - Functions zur Erstellung und Überprüfung eines beliebigen Menüs. Das hier wäre zB. richtig klasse: Code: [AUSKLAPPEN] [EINKLAPPEN] buttonstart=CreateButton(100,500,2,83,bla) buttonend=CreateButton(25,x,k,6,blub) bar=CreateBar(300,600,100) while if MouseClickedButton(buttonstart)=1 then ... if GetBarValue(selectionbar)>60 then ... wend So kann jeder deine Menüfunktionen verwenden, um daraus sein eigenes Menü zu basteln. Und wenn das dann noch vorbildlich gecodet ist, dann ist das was wirklich sinnvolles.

Fetze

Do, Jan 06, 2005 20:31
Antworten mit Zitat

Nimms nich so schwer, er meints nich so *g*
Hier mal das, was an deinem Menü konkret fehlt:

- möglichst Modularer Aufbau
- Flexibilität
- Functions zur Erstellung und Überprüfung eines beliebigen Menüs.

Das hier wäre zB. richtig klasse:
Code: [AUSKLAPPEN]

buttonstart=CreateButton(100,500,2,83,bla)
buttonend=CreateButton(25,x,k,6,blub)
bar=CreateBar(300,600,100)

while
if MouseClickedButton(buttonstart)=1 then ...
if GetBarValue(selectionbar)>60 then ...
wend

So kann jeder deine Menüfunktionen verwenden, um daraus sein eigenes Menü zu basteln. Und wenn das dann noch vorbildlich gecodet ist, dann ist das was wirklich sinnvolles.