Warum funkts das nicht?

Übersicht

BlitzBasic

Beginners-Corner

Gehe zu Seite 1, 2, 3 Weiter

	White-air Betreff: Warum funkts das nicht?	Mi, Jan 03, 2007 12:31 Antworten mit Zitat
ich wollt mal ein Quiz machen und da hab ich ein Problem weil ich net verstehen warum das hier nicht funktioniert : Locate 50,400 Print "Wie" Delay 750 Locate 85,400 Print "wird" Delay 750 Locate 125,400 Print "der" Delay 750 Locate 160,400 Print "3.Hokage" Delay 750 Locate 240,400 Print "auch" Delay 750 Locate 285,400 Print "genannt? Delay 500 Locate 50,425 Frage1 = Input("Antwort:") If Frage1 = "Sarutobi" Then Print "RICHTIG!!!" Else Print "leider falsch" EndIf bitte helft mir

White-air

Betreff: Warum funkts das nicht?

Mi, Jan 03, 2007 12:31
Antworten mit Zitat

ich wollt mal ein Quiz machen und da hab ich ein Problem weil ich net verstehen warum das hier nicht funktioniert Question

:

Locate 50,400
Print "Wie"
Delay 750
Locate 85,400
Print "wird"
Delay 750
Locate 125,400
Print "der"
Delay 750
Locate 160,400
Print "3.Hokage"
Delay 750
Locate 240,400
Print "auch"
Delay 750
Locate 285,400
Print "genannt?
Delay 500
Locate 50,425
Frage1 = Input("Antwort:")

If Frage1 = "Sarutobi" Then
Print "RICHTIG!!!"
Else
Print "leider falsch"
EndIf

bitte helft mir Exclamation

	derAtomkeks ehemals "Sethus"	Mi, Jan 03, 2007 12:39 Antworten mit Zitat
Was kommt denn für eine Fehlermeldung, und an welcher Stelle?

derAtomkeks

ehemals "Sethus"

Mi, Jan 03, 2007 12:39
Antworten mit Zitat

Was kommt denn für eine Fehlermeldung, und an welcher Stelle?

	Rallimen Sieger des 30-EUR-Wettbewerbs	Mi, Jan 03, 2007 12:41 Antworten mit Zitat
Code: [AUSKLAPPEN] [EINKLAPPEN] If Frage1$ = "Sarutobi" Then ;Variablen Typen String Print "RICHTIG!!!" Else Print "leider falsch" EndIf Waitkey; sonst siehst du das nicht mehr hab de Code an den passenden Stellen erweitert
[BB2D \| BB3D \| BB+]

Rallimen

Sieger des 30-EUR-Wettbewerbs

Mi, Jan 03, 2007 12:41
Antworten mit Zitat

Code: [AUSKLAPPEN]

If Frage1$ = "Sarutobi" Then ;Variablen Typen String
Print "RICHTIG!!!"
Else
Print "leider falsch"
EndIf
Waitkey; sonst siehst du das nicht mehr

hab de Code an den passenden Stellen erweitert

[BB2D | BB3D | BB+]

	Shoarn	Mi, Jan 03, 2007 12:44 Antworten mit Zitat
Du musst noch ein $ Zeichen hinter der Variable machen. Code: [AUSKLAPPEN] [EINKLAPPEN] Frage1$ = Input("Antwort:") If Frage1$ = "Sarutobi" Then Print "RICHTIG!!!" Else Print "leider falsch" EndIf

Shoarn

Mi, Jan 03, 2007 12:44
Antworten mit Zitat

Du musst noch ein $ Zeichen hinter der Variable machen.

Code: [AUSKLAPPEN]

Frage1$ = Input("Antwort:")

If Frage1$ = "Sarutobi" Then
Print "RICHTIG!!!"
Else
Print "leider falsch"
EndIf

	BladeRunner Moderator	Mi, Jan 03, 2007 12:45 Antworten mit Zitat
Bitte benenn deine Threads vernünftig.
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

BladeRunner

Moderator

Mi, Jan 03, 2007 12:45
Antworten mit Zitat

Bitte benenn deine Threads vernünftig.

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

	White-air	Mi, Jan 03, 2007 13:02 Antworten mit Zitat
thx @ Shoarn und Rallimen

White-air

Mi, Jan 03, 2007 13:02
Antworten mit Zitat

thx @ Shoarn und Rallimen

	snörkl	Mi, Jan 03, 2007 17:30 Antworten mit Zitat
also fürs nächste mal bitte merken^^: Code: [AUSKLAPPEN] [EINKLAPPEN] variable$ =" " für buchstaben (immer mit denen hier "" kennzeichnen variable = für Zahlen variable# = für floats (kommazahlen, also 1.2 oder 2532.2) delay hält das programm an, wenn du später lichteffekte in dein quiz reinbringst musst du feststellen dass der entscheidende helle lichtstrahl immer zu spät kommt mach dir lieber nen timer, z.B. so: Code: [AUSKLAPPEN] [EINKLAPPEN] global timer=millisecs() if millisecs() > timer + 100 ;oder deinen gewünschten wert machdiesunddasundjenes timer = millisecs() endif Und du kannst dir das leben einfacher machen, indem du statt locate und print einfach text nimmst. B.: Code: [AUSKLAPPEN] [EINKLAPPEN] locate 100,100 print"hallo" wird zu text 100,100,"hallo" hoffe ich konnte dir damit einwenig weiterhelfen mfg Snörkl

snörkl

Mi, Jan 03, 2007 17:30
Antworten mit Zitat

also fürs nächste mal bitte merken^^:

Code: [AUSKLAPPEN]

variable$ =" " für buchstaben (immer mit denen hier "" kennzeichnen
variable = für Zahlen
variable# = für floats (kommazahlen, also 1.2 oder 2532.2)

delay hält das programm an, wenn du später lichteffekte in dein quiz reinbringst musst du feststellen dass der entscheidende helle lichtstrahl immer zu spät kommt Wink

mach dir lieber nen timer, z.B. so:

Code: [AUSKLAPPEN]

global timer=millisecs()

if millisecs() > timer + 100 ;oder deinen gewünschten wert
machdiesunddasundjenes
timer = millisecs()
endif

Und du kannst dir das leben einfacher machen, indem du statt locate und print einfach text nimmst.

B.:
Code: [AUSKLAPPEN]

locate 100,100
print"hallo"

wird zu

text 100,100,"hallo"

hoffe ich konnte dir damit einwenig weiterhelfen

mfg
Snörkl

Zuletzt bearbeitet von snörkl am Mi, Jan 03, 2007 19:14, insgesamt einmal bearbeitet

	BladeRunner Moderator	Mi, Jan 03, 2007 17:46 Antworten mit Zitat
Delay hält das Programm schon für die korrekte Zeit an - das wesentliche Problem mit Delay ist in der Tat dass das Programm komplett gestoppt ist, nicht dass der Befehl ungenau wäre.
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

BladeRunner

Moderator

Mi, Jan 03, 2007 17:46
Antworten mit Zitat

Delay hält das Programm schon für die korrekte Zeit an - das wesentliche Problem mit Delay ist in der Tat dass das Programm komplett gestoppt ist, nicht dass der Befehl ungenau wäre.

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

	snörkl	Mi, Jan 03, 2007 19:14 Antworten mit Zitat
ok, habs oben editet. Möchte ja nicht das hier im forum irgendwelche falschen sachen stehen

snörkl

Mi, Jan 03, 2007 19:14
Antworten mit Zitat

ok, habs oben editet. Möchte ja nicht das hier im forum irgendwelche falschen sachen stehen Wink

	StepTiger	Mi, Jan 03, 2007 19:52 Antworten mit Zitat
Wenn ich mal was OT anmerken darf: Code Tags Aussagekräftiger Titel Selbst denken Debugger
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 Seit der Earthlings-Diskussion überzeugter Fleisch(fr)esser.

StepTiger

Mi, Jan 03, 2007 19:52
Antworten mit Zitat

Wenn ich mal was OT anmerken darf:

Code Tags
Aussagekräftiger Titel
Selbst denken
Debugger

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.

	White-air	Mi, Jan 03, 2007 23:07 Antworten mit Zitat
ehm noch ne frage warum funkt das net?: If JaNein$ = "Nein" Then Cls Color 250,0,0 Schrift1 = LoadFont("Arial",20,1,1,1) SetFont Schrift1 Text 250,300 , "Zur Strafe wird dein PC heruntergefahren" Delay 2000 Text 350,325 , "Muhahahahahah" Delay 2000 Cls Text 375,300 , "Pech" WaitKey ExecFile "shutdown" EndIf If Eingabe1$ = "Ja" Then Cls Schrift2 = LoadFont ("Arial",22,1,1,1) SetFont Schrift2 Text 350,300 , "Gute Entscheidung" EndIf Und wenn da viele fehler drin sind. Anfänger machen Fehler

White-air

Mi, Jan 03, 2007 23:07
Antworten mit Zitat

ehm noch ne frage warum funkt das net?:

If JaNein$ = "Nein" Then Cls
Color 250,0,0
Schrift1 = LoadFont("Arial",20,1,1,1)
SetFont Schrift1
Text 250,300 , "Zur Strafe wird dein PC heruntergefahren"
Delay 2000
Text 350,325 , "Muhahahahahah"
Delay 2000
Cls
Text 375,300 , "Pech"
WaitKey
ExecFile "shutdown"
EndIf

If Eingabe1$ = "Ja" Then Cls
Schrift2 = LoadFont ("Arial",22,1,1,1)
SetFont Schrift2
Text 350,300 , "Gute Entscheidung"
EndIf

Und wenn da viele fehler drin sind. Anfänger machen Fehler Wink

	snörkl	Mi, Jan 03, 2007 23:17 Antworten mit Zitat
-.-""" coodeeetaaaaagsssas ok: Code: [AUSKLAPPEN] [EINKLAPPEN] If JaNein$ = "Nein" Cls Color 250,0,0 Schrift1 = LoadFont("Arial",20,1,1,1) SetFont Schrift1 Text 250,300 , "Zur Strafe wird dein PC heruntergefahren" Delay 2000 Text 350,325 , "Muhahahahahah" Delay 2000 Cls Text 375,300 , "Pech" WaitKey() ExecFile "shutdown" EndIf If Eingabe1$ = "Ja" Cls Schrift2 = LoadFont ("Arial",22,1,1,1) SetFont Schrift2 Text 350,300 , "Gute Entscheidung" EndIf Also: entweder du machst es so: Code: [AUSKLAPPEN] [EINKLAPPEN] if janein$="bla" dannmachdiesunddasundjenes endif oder so: Code: [AUSKLAPPEN] [EINKLAPPEN] if diesunddas = jenes then verwendecodetags^^ endif Aber wenn dus so machst: Code: [AUSKLAPPEN] [EINKLAPPEN] if doublepost then cls undmachnentripplepost endif dann denkt er du würdest nur eine aktion ausführen wollen (nämlich cls) also entweder oder aber nicht ein zwischending^^ - if then verwendet man bei einer aktion die nach dem wenn ausgeführt wird außerdem ein total sinnloser und blöder code -.- vor allem kann man den taskmanager öffnen und das programm beenden bevors herunterfährt. Und es startet beim nächsten start nicht wieder mfg Snörkl

snörkl

Mi, Jan 03, 2007 23:17
Antworten mit Zitat

-.-""" coodeeetaaaaagsssas

ok: Code: [AUSKLAPPEN]

If JaNein$ = "Nein"
Cls
Color 250,0,0
Schrift1 = LoadFont("Arial",20,1,1,1)
SetFont Schrift1
Text 250,300 , "Zur Strafe wird dein PC heruntergefahren"
Delay 2000
Text 350,325 , "Muhahahahahah"
Delay 2000
Cls
Text 375,300 , "Pech"
WaitKey()
ExecFile "shutdown"
EndIf

If Eingabe1$ = "Ja"
Cls
Schrift2 = LoadFont ("Arial",22,1,1,1)
SetFont Schrift2
Text 350,300 , "Gute Entscheidung"
EndIf

Also: entweder du machst es so:

Code: [AUSKLAPPEN]

if janein$="bla"
dannmachdiesunddasundjenes
endif

oder so:

Code: [AUSKLAPPEN]

if diesunddas = jenes then
verwendecodetags^^
endif

Aber wenn dus so machst:

Code: [AUSKLAPPEN]

if doublepost then cls
undmachnentripplepost
endif

dann denkt er du würdest nur eine aktion ausführen wollen (nämlich cls)

also entweder oder aber nicht ein zwischending^^ - if then verwendet man bei einer aktion die nach dem wenn ausgeführt wird

außerdem ein total sinnloser und blöder code -.- vor allem kann man den taskmanager öffnen und das programm beenden bevors herunterfährt. Und es startet beim nächsten start nicht wieder Neutral

mfg
Snörkl

Zuletzt bearbeitet von snörkl am Mi, Jan 03, 2007 23:26, insgesamt 2-mal bearbeitet

	White-air	Mi, Jan 03, 2007 23:19 Antworten mit Zitat
Was? Könnte mir einer sagen was ich falsch gemacht habe? Ich bin ein blutiger Anfänger

White-air

Mi, Jan 03, 2007 23:19
Antworten mit Zitat

Was?
Könnte mir einer sagen was ich falsch gemacht habe?
Ich bin ein blutiger Anfänger Sad

Zuletzt bearbeitet von White-air am Mi, Jan 03, 2007 23:20, insgesamt einmal bearbeitet

	Dreamora	Mi, Jan 03, 2007 23:20 Antworten mit Zitat
Was funktioniert denn genau net?
Ihr findet die aktuellen Projekte unter Gayasoft und könnt mich unter @gayasoft auf Twitter erreichen.

Dreamora

Mi, Jan 03, 2007 23:20
Antworten mit Zitat

Was funktioniert denn genau net?

Ihr findet die aktuellen Projekte unter Gayasoft und könnt mich unter @gayasoft auf Twitter erreichen.

	White-air	Mi, Jan 03, 2007 23:21 Antworten mit Zitat
da steht "Endif" without "If" hilfe

White-air

Mi, Jan 03, 2007 23:21
Antworten mit Zitat

da steht "Endif" without "If"
hilfe

	snörkl	Mi, Jan 03, 2007 23:24 Antworten mit Zitat
sorry fürs langsamposten. Hatte erst gepostet und dann editiert- oben findest du die lösung

snörkl

Mi, Jan 03, 2007 23:24
Antworten mit Zitat

sorry fürs langsamposten. Hatte erst gepostet und dann editiert- oben findest du die lösung

	White-air	Mi, Jan 03, 2007 23:27 Antworten mit Zitat
ja das war ja nur als scherz gedacht mit dem herunterfahren aba snörkl wie würdest du den code denn schreiben,aber den würde ich bestimmt so oder so net verstehen^^

White-air

Mi, Jan 03, 2007 23:27
Antworten mit Zitat

ja das war ja nur als scherz gedacht mit dem herunterfahren Wink

aba snörkl wie würdest du den code denn schreiben,aber den würde ich bestimmt so oder so net verstehen^^

	StepTiger	Mi, Jan 03, 2007 23:29 Antworten mit Zitat
er hat den code da geschrieben... Pass auf: Code: [AUSKLAPPEN] [EINKLAPPEN] If <blabla> then <blabla> oder Code: [AUSKLAPPEN] [EINKLAPPEN] if <blabla> <blabla> endif oder Code: [AUSKLAPPEN] [EINKLAPPEN] if <blabla> then <blabla> endif *<blabla>=bitte hier einen Text einsetzen Gewöhn dir das in der Mitte an, ist am übersichtlichsten und erspart dir Schreibarbeit ^^
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 Seit der Earthlings-Diskussion überzeugter Fleisch(fr)esser.

StepTiger

Mi, Jan 03, 2007 23:29
Antworten mit Zitat

er hat den code da geschrieben...

Pass auf:

Code: [AUSKLAPPEN]

If <blabla> then <blabla>

oder

Code: [AUSKLAPPEN]

if <blabla>
<blabla>
endif

oder

Code: [AUSKLAPPEN]

if <blabla> then
<blabla>
endif

*<blabla>=bitte hier einen Text einsetzen

Gewöhn dir das in der Mitte an, ist am übersichtlichsten und erspart dir Schreibarbeit ^^

Seit der Earthlings-Diskussion überzeugter Fleisch(fr)esser.

Zuletzt bearbeitet von StepTiger am Mi, Jan 03, 2007 23:30, insgesamt einmal bearbeitet

	snörkl	Mi, Jan 03, 2007 23:30 Antworten mit Zitat
werds dir morgen posten , meine mutter nervt grad und will das ich ins bett gehe. cu mfg Snörkl PS: wenn du nur eine option haben willst dann ist das mit if then in einer zeile auch gut Code: [AUSKLAPPEN] [EINKLAPPEN] Beispiel: if haus then haus if garten then garten if maus then maus ist übersichtlicher als: if haus haus endif if garten garten endif if maus maus endif bei mehreren aber immer auf if bla endif zurückgreifen wie gesagt, werds dir morgen posten, wie ich den code machen würd xD aber ich bin auch nicht grad der beste - trotzdem kann ichs dir ungefähr machen

snörkl

Mi, Jan 03, 2007 23:30
Antworten mit Zitat

werds dir morgen posten Wink

, meine mutter nervt grad und will das ich ins bett gehe.

cu
mfg
Snörkl

PS: wenn du nur eine option haben willst dann ist das
mit if then in einer zeile auch gut
Code: [AUSKLAPPEN]

Beispiel:

if haus then haus
if garten then garten
if maus then maus

ist übersichtlicher als:

if haus
haus
endif
if garten
garten
endif
if maus
maus
endif

bei mehreren aber immer auf if bla endif zurückgreifen Wink

wie gesagt, werds dir morgen posten, wie ich den code machen würd xD
aber ich bin auch nicht grad der beste - trotzdem kann ichs dir ungefähr machen Very Happy

	White-air	Mi, Jan 03, 2007 23:38 Antworten mit Zitat
hä ich hab das "Then" jetzt weggelassen aba dann zeigt er die sachen net an die ich ihm gegeben habe : If JaNein$ = "Nein" Cls Color 250,0,0 Schrift1 = LoadFont("Arial",20,1,1,1) SetFont Schrift1 Text 250,300 , "Zur Strafe wird dein PC heruntergefahren" Delay 2000 Text 350,325 , "Muhahahahahah" Delay 2000 Cls Text 375,300 , "Pech" EndIf Das hier macht er gar net: Cls Color 250,0,0 Schrift1 = LoadFont("Arial",20,1,1,1) SetFont Schrift1 Text 250,300 , "Zur Strafe wird dein PC heruntergefahren" Delay 2000 Text 350,325 , "Muhahahahahah" Delay 2000 Cls Text 375,300 , "Pech"

White-air

Mi, Jan 03, 2007 23:38
Antworten mit Zitat

hä ich hab das "Then" jetzt weggelassen aba dann zeigt er die sachen net an
die ich ihm gegeben habe :

If JaNein$ = "Nein"
Cls
Color 250,0,0
Schrift1 = LoadFont("Arial",20,1,1,1)
SetFont Schrift1
Text 250,300 , "Zur Strafe wird dein PC heruntergefahren"
Delay 2000
Text 350,325 , "Muhahahahahah"
Delay 2000
Cls
Text 375,300 , "Pech"
EndIf

Das hier macht er gar net:

Cls
Color 250,0,0
Schrift1 = LoadFont("Arial",20,1,1,1)
SetFont Schrift1
Text 250,300 , "Zur Strafe wird dein PC heruntergefahren"
Delay 2000
Text 350,325 , "Muhahahahahah"
Delay 2000
Cls
Text 375,300 , "Pech"

Gehe zu Seite 1, 2, 3 Weiter

Übersicht

BlitzBasic

Beginners-Corner

Nach Oben

BlitzBasic Portal

Warum funkts das nicht?

Betreff: Warum funkts das nicht?