Hilfe Gesucht

  • Hier ich habe versucht ein Script zu scripten da ich ein passwort eingeben muss das ich ein programm aktivieren kann un wen ich es falsch eingebe das Passwort das sich alles schlisst un das mim schlissen verstehe ich nicht wen man ein falsches passwort eingiebt das es sichs chlisst könnt ihr mir helfen

    Script:
    $validatePassw = "longju10"
    $pass = InputBox("PickUpBot Metin2 By Amelie", "Bitte gib hier das Metin2 Passwort ein", "", "*")

    If $validatePassw = $pass then
    MsgBox(64, "Richtiges Passwort","Richtiges Passwort, das PickUpProgramm Können sie jetzt Starten")
    Else
    MsgBox(64, "Falsches Passwort","Falsches Passwort, das PickUpProgramm beendet sich jetz")
    EndIf

    #include <GUIConstantsEx.au3>

    GUICreate("PickUpBotAktivieren", 210, 80)

    $YesID = GUICtrlCreateButton("Ja", 10, 50, 50, 20)
    $ExitID = GUICtrlCreateButton("Exit", 150, 50, 50, 20)

    GUISetState() ; display the GUI

    Do
    $msg = GUIGetMsg()

    Select
    Case $msg= $YesID
    MsgBox(0,"You clicked on", "Yes")
    Case $msg= $ExitID
    MsgBox(0,"You clicked on", "Exit")
    Case $msg= $GUI_EVENT_CLOSE
    MsgBox(0,"You clicked on", "Close")
    EndSelect
    Until $msg = $GUI_EVENT_CLOSE or $msg = $ExitID

  • Mit ein paar Satzzeichen wäre der Text leichter zu verstehen...
    Liege ich richtig in der Annahme, dass du wissen willst, wie man ein Programm beenden kann?

    [autoit]


    If $validatePassw = $pass then
    MsgBox(64, "Richtiges Passwort","Richtiges Passwort, das PickUpProgramm Können sie jetzt Starten")
    Else
    MsgBox(64, "Falsches Passwort","Falsches Passwort, das PickUpProgramm beendet sich jetz")
    exit
    EndIf

    [/autoit]
  • Wie Meinst du den das??
    ich habe es rein kopiert aber da kommt ne fehler medlung??

    und ich wollte ja am ende noch ein programm einbauen für ein spiel nur ich weis nicht wie ich es dann mit der MsG box aktivieren kann das wollte ich schon immer wissen??

    Das Ist ein PickupBot ichw eis aba nicht wie ich es einbauen muss? =(
    Das ich es dann mit der MsG box Aktivieren kann bei meinem obengenannten script??

    [autoit]

    While 1 ;Startet die schleife
    Sleep (1) ;er wartet 0,001 sec und dan geht die schleife weiter (1000 = 1 Sec )
    Wend ;beendet die schleife

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

    Func Start () ;startet den func
    While 1 ;startet die schleife
    Send ("{^}") ;druckt ^ wartet 0,1 sec und druckt wieder ^
    Wend ;beendet die schleife
    EndFunc ; beendet den func

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

    Func Pause ()
    While 1
    Sleep (1)
    Wend
    EndFunc

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

    Func schliesen ()
    Exit 0 ; schliest den script
    Endfunc

    [/autoit]
  • Hmmm, das funzt nicht ?

    [autoit]

    $validatePassw = "longju10"
    $pass = InputBox("PickUpBot Metin2 By Amelie", "Bitte gib hier das Metin2 Passwort ein", "", "*")

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

    If StringCompare ($validatePassw, $pass, 1) == 0 then
    MsgBox(266304, "Richtiges Passwort","Richtiges Passwort, Sie können das PickUpProgramm jetzt starten.")
    Else
    MsgBox(266256, "Falsches Passwort","Falsches Passwort, das PickUpProgramm beendet sich jetzt !", 4)
    exit
    EndIf

    [/autoit][autoit]

    Func Start () ;startet den func
    Do ;startet die schleife
    $msg = GUIGetMsg()
    Send ("{^}") ;druckt ^ wartet 0,1 sec und druckt wieder ^
    Until $msg = $GUI_EVENT_CLOSE or $msg = $ExitID ;beendet die schleife
    EndFunc ; beendet den func

    [/autoit]


    Gruß
    Greenhorn


  • Ich will zu diesem Script ein PickUpBot Hinzufügen das wen ich das Pw eingeben habe und dann auswälen kann ob ich den PuckUp Bot Starten kann oder schlissen kann??
    Und dafür muss ich ja irgendwie den pickupbot so einbauen in diesem scipt das ich perder MsG Box wen ich auf JA(starten) klicke das sich der bot stARTET und wen ich danne xit klicke das er sichs chlist?? wie füge ich diesen PickUp Bot hier rein??
    GanzUnten is PickupBot Script

    Da Will ich den PickUpBot einbauen

    Spoiler anzeigen
    [autoit]

    $validatePassw = "longju10"

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

    $pass = InputBox("PickUpBot Metin2 By Amelie", "Bitte gib hier das Metin2 Passwort ein", "", "*")

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

    If $validatePassw = $pass then

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

    MsgBox(64, "Richtiges Passwort","Richtiges Passwort, das PickUpProgramm Können sie jetzt Starten")

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

    Else

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

    MsgBox(64, "Falsches Passwort","Falsches Passwort, das PickUpProgramm beendet sich jetz")
    exit

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

    EndIf

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

    #include <GUIConstantsEx.au3>

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

    GUICreate("PickUpBotAktivieren", 210, 80)

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

    $YesID = GUICtrlCreateButton("Ja", 10, 50, 50, 20)

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

    $ExitID = GUICtrlCreateButton("Exit", 150, 50, 50, 20)

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

    GUISetState() ; display the GUI

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

    Do

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

    $msg = GUIGetMsg()

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

    Select

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

    Case $msg= $YesID

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

    MsgBox(0,"You clicked on", "Yes")

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

    Case $msg= $ExitID

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

    MsgBox(0,"You clicked on", "Exit")

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

    Case $msg= $GUI_EVENT_CLOSE

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

    MsgBox(0,"You clicked on", "Close")

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

    EndSelect

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

    Until $msg = $GUI_EVENT_CLOSE or $msg = $ExitID

    [/autoit]

    Hier der Pickup Bot wo ich ein bauen Will

    Spoiler anzeigen
    [autoit]

    HotKeySet ("{F8}","Start") ;start
    HotKeySet ("{F9}","Pause") ;Pauese
    HotKeySet ("{F10}","Schliesen"); Exit

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

    While 1 ;Startet die schleife
    Sleep (1) ;er wartet 0,001 sec und dan geht die schleife weiter (1000 = 1 Sec )
    Wend ;beendet die schleife

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

    Func Start () ;startet den func
    While 1 ;startet die schleife
    Send ("{^}") ;druckt ^ wartet 0,1 sec und druckt wieder ^
    Wend ;beendet die schleife
    EndFunc ; beendet den func

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

    Func Pause ()
    While 1
    Sleep (1)
    Wend
    EndFunc

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

    Func schliesen ()
    Exit 0 ; schliest den script
    Endfunc

    [/autoit]

    Nur eben ohne das Hotkeeyset es soll nur per MsG Box Aktiveirt werden!! wen ich auf Ja Klicke


    Das Hier Passt Ja schonmal dieser Script Nur es kommt kein ^ wenn ich in eine zeile gehe ich kann es nicht per MsG box Aktiviren sondern nur schlisen??

    Spoiler anzeigen
    [autoit]

    Func Start ()
    Do
    $msg = GUIGetMsg()
    Send ("{^}")
    Until $msg = $GUI_EVENT_CLOSE or $msg = $ExitID
    EndFunc

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

    5 Mal editiert, zuletzt von AmelieMaus (1. September 2008 um 13:30)

  • Hy!
    ich habs jetzt so gemacht, wenn du auf den "Ja"-Button drückst, werden die Hotkey's aktiviert, und dann kanns losgehen!

    Code:

    Spoiler anzeigen
    [autoit]

    #include <GUIConstantsEx.au3>

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

    GUICreate("PickUpBotAktivieren", 210, 80)
    $YesID = GUICtrlCreateButton("Ja", 10, 50, 50, 20)
    $ExitID = GUICtrlCreateButton("Exit", 150, 50, 50, 20)

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

    $validatePassw = "longju10"
    $pass = InputBox("PickUpBot Metin2 By Amelie", "Bitte gib hier das Metin2 Passwort ein", "", "*")

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

    If $validatePassw == $pass Then ;case sensitive
    MsgBox(64, "Richtiges Passwort", "Richtiges Passwort, das PickUpProgramm Können sie jetzt Starten")
    GUISetState(@SW_SHOW)
    Else
    MsgBox(64, "Falsches Passwort", "Falsches Passwort, das PickUpProgramm beendet sich jetz")
    Exit
    EndIf

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

    While 1
    $msg = GUIGetMsg()
    Select
    Case $msg = $YesID
    MsgBox(0, "You clicked on", "Yes")

    HotKeySet("{F8}", "Start") ;start
    HotKeySet("{F9}", "Pause") ;Pauese
    HotKeySet("{F10}", "schliesen"); Exit

    Case $msg = $ExitID
    MsgBox(0, "You clicked on", "Exit")
    Exit
    Case $msg = $GUI_EVENT_CLOSE
    MsgBox(0, "You clicked on", "Close")
    Exit
    EndSelect
    WEnd

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

    Func Start() ;startet den func
    While 1 ;startet die schleife
    Send("{^}");drückt ^
    Sleep(1)
    WEnd ;beendet die schleife
    EndFunc ;==>Start

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

    Func Pause()
    While 1
    Sleep(1)
    WEnd
    EndFunc ;==>Pause

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

    Func schliesen()
    Exit 0 ; schliest den script
    EndFunc ;==>schliesen

    [/autoit]