Unnamed

            If (num1 > 0) Then
                Me.Size = GetFileSize(text1)
                Me.TimeToWait = GetMins(text1)
                OnStatusChanged(_Status.Per_Day_Limit_Exceeded_for_This_IP)
                RaiseEvent eSize(Me.Size)
                Me.ResetAll()
            Else
                num1 = 0
                num1 = CShort(Strings.InStr(1, text1, "Want to download more", CompareMethod.Binary))
                If (num1 > 0) Then
                    Me.TimeToWait = GetMins(text1)
                    Me.Size = GetFileSize(text1)
                    OnStatusChanged(_Status.Download_Limit_Exceeded_for_This_IP)
                    RaiseEvent eSize(Me.Size)
                    Me.ResetAll()
                Else
                    num1 = 0
                    num1 = CShort(Strings.InStr(1, text1, "already downloading a file", CompareMethod.Binary))
                    If (num1 > 0) Then
                        OnStatusChanged(_Status.IP_already_downloading_a_file)
                        Me.ResetAll()
                    Else
                        num1 = 0
                        num1 = CShort(Strings.InStr(1, text1, "Too many users", CompareMethod.Binary))
                        If (num1 > 0) Then
                            OnStatusChanged(_Status.Too_many_users_Try_Again)
                            Me.ResetAll()
                        Else
                            num1 = 0
                            num1 = CShort(Strings.InStr(1, text1, "Bad Request", CompareMethod.Binary))
                            If (num1 > 0) Then
                                OnStatusChanged(_Status.Bad_Request_Proxy_Not_Supported)
                                Me.ResetAll()
                            Else
                                num1 = 0
                                num1 = CShort(Strings.InStr(1, text1, "CDN Network", CompareMethod.Binary))
                                If (num1 > 0) Then
                                    OnStatusChanged(_Status.PlanetLab_CoDeen_Proxy_RapidShare_Not_Supported)
                                    Me.ResetAll()
                                Else
                                    num1 = 0
                                    'num1 = CShort(Strings.InStr(1, Strings.LCase(text1), "delete", CompareMethod.Binary))
                                    If text1.ToLower.Contains("This file has been deleted".ToLower) = True Then
                                        OnStatusChanged(_Status.FileDeletedFromRS)
                                        Me.ResetAll()
                                    ElseIf text1.ToLower.Contains("File not found.".ToLower) = True Then
                                        OnStatusChanged(_Status.FileDeletedFromRS)
                                        Me.ResetAll()
                                    Else
                                        num1 = 0
                                        num1 = CShort(Strings.InStr(1, Strings.LCase(text1), "remove", CompareMethod.Binary))
                                        If (num1 > 0) Then
                                            OnStatusChanged(_Status.FileDeletedFromRS)
                                            Me.ResetAll()
                                        Else
                                            num1 = 0
                                            num1 = CShort(Strings.InStr(1, Strings.LCase(text1), "Download-Server", CompareMethod.Binary))
                                            If (num1 > 0) Then
                                                OnStatusChanged(_Status.Download_Server_unavailable)
                                                Me.ResetAll()
                                            Else
                                                Me.Size = GetFileSize(text1)
                                                RaiseEvent eSize(Me.Size)
                                                Me.TimeToWait = Me.GetCounter(text1)
                                                If Me.TimeToWait <= 0 Then
                                                    Me.TimeToWait = 15
                                                End If
                                                OnStatusChanged(_Status.Waiting)
                                                Me.Timer1.Enabled = True
                                                Me.DirectLink = Me.GetDirectLink(text1)
                                                'Me.txtDirectDl.Text = Me.DirectLink
                                            End If
                                        End If
                                    End If
                                End If
                            End If
                        End If
                    End If
                End If
            End If