Free Zynga pokerbot
Would you like to react to this message? Create an account in a few clicks or log in to continue.

Server List Updater

+3
†POKERMAN†
V!sler
TigasingTite
7 posters

Go down

Server List Updater Empty Server List Updater

Post by TigasingTite Mon Jul 02, 2012 3:34 am

here is a simple serverlist.txt updater.

this will prevent your bot from going top to bottom when selecting server because if the Bot picked a server that is offline, the bot would start to scroll from top to bottom and it won't stop..

Server List Updater 35620219
Download Here http://www.mediafire.com/?2ih61mig7kh5u8d

you should save the server list to "data\server\serverlist.txt" inside your bot folder

If you don't trust this application
I included the source code so you can compile on your own!

Code:
Imports System.Net
Imports System.IO
Imports System.Text.RegularExpressions

Public Class Form1

    Private Sub checkServerStatus()
        Dim request As HttpWebRequest = WebRequest.Create("https://zlsn.poker.zynga.com/zlsn/server_status.php")
        request.Method = "GET"
        On Error GoTo retry
        Dim response As WebResponse = request.GetResponse()
        Debug.WriteLine(CType(response, HttpWebResponse).StatusDescription)
        Dim reader As New StreamReader(response.GetResponseStream)
        Dim responseFromServer As String = reader.ReadToEnd()

        Dim sr As StringReader = New StringReader(responseFromServer)
        Do While sr.Peek() >= 0
            Dim m As Match = Regex.Match(sr.ReadLine, "name=(?<name>[^,]+),uCount=(\d*),maxUsers=(\d*),status=OK,id=(\d*),type=normal", RegexOptions.IgnoreCase)
            If m.Success Then
                If RichTextBox1.Text = "" Then
                    RichTextBox1.AppendText(m.Groups("name").Value)
                Else
                    RichTextBox1.AppendText(vbNewLine & m.Groups("name").Value)
                End If
            End If

        Loop
        Exit Sub
retry:
        RichTextBox1.Text = ""
        checkServerStatus()
    End Sub

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        checkServerStatus()
    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        If SaveFileDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then
            Using SW As New IO.StreamWriter(SaveFileDialog1.FileName, False)
                Dim firstline As Boolean
                For Each line As String In RichTextBox1.Lines
                    If firstline = False Then
                        SW.Write(line)
                        firstline = True
                    Else
                        SW.Write(vbNewLine & line)
                    End If
                Next
            End Using
        End If
    End Sub
End Class
TigasingTite
TigasingTite

Posts : 20
Join date : 2012-06-29
Age : 110
Location : 대구광역시청

https://www.facebook.com/teamlagutok

Back to top Go down

Server List Updater Empty Re: Server List Updater

Post by V!sler Mon Jul 02, 2012 8:35 am

Thanks you
Really helpful program Smile
Best regards

V!sler
Admin
Admin

Posts : 361
Join date : 2012-03-24

https://pokerbot.forumotion.com

Back to top Go down

Server List Updater Empty Re: Server List Updater

Post by †POKERMAN† Mon Jul 02, 2012 1:08 pm

WOOO!!! SA WAKAS MAY PINOY NA DIN DITO!!! AHAAHAH


TIGASINGTITE!! ahahahah Very Happy

†POKERMAN†

Posts : 86
Join date : 2012-05-07
Age : 29

Back to top Go down

Server List Updater Empty Re: Server List Updater

Post by locoloco Tue Jul 17, 2012 10:51 pm

Clever idea to use their own server status script instead of processing on-screen text

locoloco

Posts : 33
Join date : 2012-07-15

Back to top Go down

Server List Updater Empty Re: Server List Updater

Post by surcalifas Sun Aug 05, 2012 5:11 am

certified cebuano

surcalifas

Posts : 39
Join date : 2012-07-31

Back to top Go down

Server List Updater Empty Re: Server List Updater

Post by xdreamx Mon Nov 19, 2012 4:14 am

dan me NOD32 block the download -_- so just copy the source? and put anywhere on notepad?

xdreamx

Posts : 4
Join date : 2012-11-19

Back to top Go down

Server List Updater Empty Re: Server List Updater

Post by xdreamx Thu Nov 22, 2012 9:21 am

Why the zpb keep on searching the Server and never select

xdreamx

Posts : 4
Join date : 2012-11-19

Back to top Go down

Server List Updater Empty Re: Server List Updater

Post by gabrielle1 Fri Mar 29, 2013 4:12 pm

any update for this zynga server list is now 89 lol the updater says 81 server

gabrielle1

Posts : 8
Join date : 2012-03-31

Back to top Go down

Server List Updater Empty Re: Server List Updater

Post by Sponsored content


Sponsored content


Back to top Go down

Back to top

- Similar topics

 
Permissions in this forum:
You cannot reply to topics in this forum