Func MainLoop()
    If $Titel = 1 Then Update("The Bot makes Asurantitel")
    If $Titel = 2 Then Update("The Bot makes Vanguardtitel")
    If $Titel = 3 Then Update("The Bot makes Norntitel")
    If $Titel = 4 Then Update("The Bot makes Dwarventitel")
    Sleep(2000)
    For $i = 0 To $RunLimit
        Update("Start Run Nr. " & $i + 1)
        GetBooks () ; <--- Wenn du Bücher haben willst ( am start einstellen)
        For $a = 0 To $BookLimit
            ;ATFH() ";" weg machen wenn du das machen willst bei moveitem auch
            ;MoveItem($bookbag[0], $bookbag[1] + $a, $bookbag[0] + 1, $bookbag[1] + $a)
        Next

        For $a = 0 To $BookLimit
            ;Norn ()";" weg machen wenn du das machen willst bei moveitem auch
            ;MoveItem($bookbag[0], $bookbag[1] + $a, $bookbag[0] + 1, $bookbag[1] + $a)
        Next

        For $a = 0 To $BookLimit
            ;ATC()";" weg machen wenn du das machen willst bei moveitem auch
            ;MoveItem($bookbag[0], $bookbag[1] + $a, $bookbag[0] + 1, $bookbag[1] + $a)
        Next

    Next

EndFunc   ;==>MainLoop