Func _cryp()
    $cryptedmail = _crypt_encryptdata($mail, @UserName, $calg_rc4)
    $cryptedpass = _crypt_encryptdata($pass, @ComputerName, $calg_rc4)
    IniWrite("launcher.dat", "Launcher", "Login", "1")
    IniWrite("launcher.dat", "Launcher", "Mail", $cryptedmail)
    IniWrite("launcher.dat", "Launcher", "Pass", $cryptedpass)
    _login()
EndFunc

Func _login()
    $cryptedmail = IniRead("launcher.dat", "Launcher", "Mail", "NotFound")
    $cryptedpass = IniRead("launcher.dat", "Launcher", "Pass", "NotFound")
    $decrymail = _crypt_decryptdata(Binary($cryptedmail), @UserName, $calg_rc4)
    $decrymail = BinaryToString($decrymail)
    $decrypass = _crypt_decryptdata(Binary($cryptedpass), @ComputerName, $calg_rc4)
    $decrypass = BinaryToString($decrypass)
    $sess1on = InetRead("http://109.95.101.135/th092873h4rt983745t9h/auth.php?user=" & $decrymail & "&password=" & $decrypass & "&version=13", 1)
    $session = StringRegExpReplace(BinaryToString($sess1on), "^.*/", "")
    $nick = StringTrimRight(BinaryToString($sess1on), StringLen($session) + 1)
    If $sess1on = "error"
        IniWrite("launcher.dat", "Launcher", "Login", "0")
        HotKeySet("{ENTER}")
        MsgBox(0, "=8<0=85", "525@=K9 ;>38= 8;8 ?0@>;L!")
        HotKeySet("{ENTER}", "_Enter")
    Else
        $ticket = ($nick & " " & $session)
        GUICtrlSetState($mailin, $gui_hide)
        GUICtrlSetState($passin, $gui_hide)
        GUICtrlSetState($loginbtn, $gui_hide)
        $login = 1
        _gui()
    EndIf
EndFunc