Variable von der Prozedure übergeben

[RSBasic]

Guten Abend ihr lieben PB-Progger
Wenn ich in der Prozedure eine Variable deren Wert geändert hab, wie kann ich das machen, dass dieser Wert zum Main weitergeleitet wird.
Hoffe ihr wisst was ich meine

[ts-soft]

ProcedureReturn
Oder Frage deutlicher stellen

[RSBasic]

@ts-soft
Vielen Dank
Ist ja wieder typich RSBasic, ein Befehl, was ich noch nie benutzt habe und es kann auch so einfach sein

[RSBasic]

Ich weis nicht was ich da falsch mache, aber es funktioniert nicht.
Was habe ich falsch gemacht?

Code: Alles auswählen

Procedure abc()
  For a=0 To 100
    x+1
    ProcedureReturn x
    Delay(1)
  Next
EndProcedure

[ts-soft]

Mit ProcedureReturn wird die Procedure verlassen, das Loop also beendet!

[RSBasic]

OK
Aber wieso wird trotzdem x nicht übergeben? Da gibt es keine Änderung.

Code: Alles auswählen

Procedure abc()
  For a=0 To 100
    x+1
    Delay(1)
  Next
  ProcedureReturn x
EndProcedure

[Andreas_S]

Also bei mir gehts

Code: Alles auswählen

Procedure abc()
  For a=0 To 100
    x+1
    Delay(1)
  Next
  ProcedureReturn x
EndProcedure 


Debug abc()

[RSBasic]

@PBprogger
Ne, das Problem ist, dass ich "x"-Wer abfragen möchte, also so funktioniert das nicht:

Code: Alles auswählen

Procedure abc() 
  For a=0 To 100 
    x+1 
    Delay(1) 
  Next 
  ProcedureReturn x 
EndProcedure 

Debug x

[D@nte]

Code: Alles auswählen

Procedure abc()
  For a=0 To 100
    x+1
    Delay(1)
  Next
  ProcedureReturn x
EndProcedure

xyz = abc()

Debug xyz 

Ich geh ma von Wald und Bäumen aus

[PureBasic4.0]

Hi, RSBasic

Du könntest alle Daten in eine LinkedList oder ein Array schreiben und mit ProcedureReturn die Adresse (oder den Pointer?) übergeben. Habe sowas noch nie gemacht und ist auch nur eine Vermutung. Aber ich denke, dass dürfte funktionieren.