Zu bistimmter stelle im Code "Springen"

Anfängerfragen zum Programmieren mit PureBasic.
Benutzeravatar
Green Snake
Beiträge: 1394
Registriert: 22.02.2005 19:08

Zu bistimmter stelle im Code "Springen"

Beitrag von Green Snake »

Hallo

habe folgendes problem

ich habe zb den code

Code: Alles auswählen

initkeyboard()
initsprite()

openscreen(800,600,32,"")

loadsprite(0,"fdjagjfj\uhiek\Diese_Datei.bmp",0)
loadsprite(1,"fhhdd\hjdj\Diese_Bmp.bmp",0)

repeat                                                                     ;Hier ist XY
displaysprite(0,0,0)
flipbuffers()

EXAMINEKEYBOARD()
until keyboardpushed(1)

clearscreen(0,0,0)

repeat
DISPLAYSPRITE(1,0,0)
flipbuffers()

examine keyboard()
until keyboardpushed(46)  ; hier soll das programm nach XY springen




(solten im code fehler sein, wodurch das programm nicht ausführbar währe, müsst ihr mir das nich^t sagen, ist ja nur ein beispiel)

also

jetzt will ich, dass wenn ich auf zb C (code 46) drücke, dass das programm dann die stelle wiederhohlt, die ich will, in diesem fall diese stelle:

Code: Alles auswählen


repeat                                                                     ;Hier ist XY
displaysprite(0,0,0)
flipbuffers()

EXAMINEKEYBOARD()
until keyboardpushed(1)



und so weiter, biss ich eine taste drücke (die ich gewählt habe) die dann das programm endgültig beendet.

wie muss ich dass machen?

ich hoffe ihr habt meine frage verstanden.

gruss greensnake

ps ich zähl auf euch
-.-"
Benutzeravatar
125
Beiträge: 1322
Registriert: 19.09.2004 16:52
Wohnort: Neu Wulmstorf (Hamburg)
Kontaktdaten:

Beitrag von 125 »

Edit hatte mich verlesen:

Code: Alles auswählen

Procedure MeinProciDieImmerwiederholtwird()
Repeat
...
Case #Ende
Break
...
ForEver
EndProcedure

Case #MeinButtonwurdegedrückt
MeinProciDieImmerwiederholtwird()
End
Und falls du zu verschieden Teilen "Jumpen" wilst:

Syntax

Goto <Sprungmarke>
Beschreibung

Dieser Befehl wird benutzt, um die Programmausführung direkt zu einer Sprungmarke zu verlegen. Seien Sie vorsichtig mit dieser Funktion, da falsche Benutzung zu einem Programmabsturz führen kann... Hinweis: Um eine Schleife sicher zu verlassen, sollten Sie immer Break anstelle von Goto verwenden.

:)
Zuletzt geändert von 125 am 09.03.2005 16:39, insgesamt 1-mal geändert.
Benutzeravatar
Green Snake
Beiträge: 1394
Registriert: 22.02.2005 19:08

Und das

Beitrag von Green Snake »

Procedure MeinProciDieImmerwiederholtwird()
MeinProciDieImmerwiederholtwird

was mus ich hier hinschreiben?

sonst danke für deine hilfe
-.-"
Benutzeravatar
125
Beiträge: 1322
Registriert: 19.09.2004 16:52
Wohnort: Neu Wulmstorf (Hamburg)
Kontaktdaten:

Beitrag von 125 »

oh hab endprocedure vergessen
die sieht ca. so aus :
Procedure:

Code: Alles auswählen

Procedure MeinProciDieImmerwiederholtwird() 
Repeat 
;EventAbfrage
... 
Case #Ende 
Break ; Schleifen abbruch das End was hinter dieser Procedur steht wird ausgeführt = Ende
... 
ForEver
EndProcedure
mainschleife:

Code: Alles auswählen

Repeat
...
;Eventabfrage
Case #MeinButtonwurdegedrückt
MeinProciDieImmerwiederholtwird()
...
End
ForEver
Benutzeravatar
Green Snake
Beiträge: 1394
Registriert: 22.02.2005 19:08

Kleine Ankündigung

Beitrag von Green Snake »

Hallo zusammen

habe mir jetzt auch PB 3.93 zugelegt, ich finde sie im vergleich zu PB 3.30 sehr Sehr SEHR viel besser.

(jetzt gibt es bestimmt nicht mehr so lange gespräche, wegen meiner alten version, da nie etwas richtig funktioniert hat)

gruss an alle

greensnake

:allright: :lol: :mrgreen: :D :) :allright:
-.-"
Antworten