Randomzahl immer neu generieren?

1. offizieller Beitrag

    Hallo Leute,

    also folgendes:

    im Moment bastel ich an einem Script, das mir eine Randomzahl ausgibt, die Zahl in einer TXT Datei speichert, und das Script sollte weiterlaufen.

    Das soll die ganze Zeit laufen bzw. sich wiederholen.

    Das ist auch garkein Problem, aber wenn ich über das gesamte Script eine While Schelife mache, generiert er mit zwar eine neue Zahl, aber die letzte Zahl bleibt erhalten., also er sendet dann die alte zb. 456554 121255 und die neue Zahl danach. Das soll eben nicht passieren.

    Global $sRandom

    For $i = 1 to 8
    $sRandom &= Random(0,9,1)
    next
    FileWrite("datei.txt",$sRandom&@crlf)

    Wie muss ich das dann machen, dass er mir nur die neue Zahl ausgibt?

    MFG

    ps: bin noch ein anfänger in Sachen autoit :P

    Einmal editiert, zuletzt von Desaster_Pac (6. Juni 2008 um 18:29)

    • Offizieller Beitrag

    Hi,

    ich hatte es so gedacht:

    Spoiler anzeigen
    [autoit]

    HotKeySet('1', '_generateNr')
    HotKeySet('3', '_exit')

    [/autoit] [autoit][/autoit] [autoit]

    Global $state = False, $i = 0

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    _generateNr()

    [/autoit] [autoit][/autoit] [autoit]

    Func _generateNr()
    $state = Not $state
    If $state = True Then
    While 1
    ToolTip('Nr : ' & $i, 0, 0)
    FileWrite(FileOpen(@ScriptDir & '\datei.txt', 2), Random(1, 9, 1) & Random(0, 9, 1) & Random(0, 9, 1) & Random(0, 9, 1) & _
    Random(0, 9, 1) & Random(0, 9, 1) & Random(0, 9, 1) & Random(0, 9, 1) & @CRLF)
    $i += 1
    WEnd
    Else
    ToolTip('Stopped : ' & $i, 0, 0)
    While 1
    Sleep(1000)
    WEnd
    EndIf
    EndFunc ;==>_generateNr

    [/autoit] [autoit][/autoit] [autoit]

    Func _exit()
    Exit (0)
    EndFunc ;==>_exit

    [/autoit]

    Mega