To be used for archiving purposes only. No new posts will be made. View Scope's Farewell Message
http://api.bnetweb.org/webbot.php?u=scope&p=test&f=99
*u = UserID*p = Password*f = Function (99)Output:If UserID was created:Successfully created UserID {UserID}If UserID exists and password is invalid:Invalid PasswordIf UserID + Password match:OK
http://api.bnetweb.org/webbot.php?u=scope&p=test&f=10&s=useast.battle.net
*u = UserID*p = Password*f = Function (10)*s = Server
http://api.bnetweb.org/webbot.php?u=scope&p=test&f=15&v=MyBot+v1.0
*u = UserID*p = Password*f = Function (15)*v = VersionOutputPowered by: MyBot v1.0
http://api.bnetweb.org/webbot.php?u=scope&p=test&f=0&d=12:00+PM&t=This+is+an+error+message
*u = UserID*p = Password*f = Function (0)*d = Date*t = TextOutput[12:00 PM] ERROR: This is an error message
http://api.bnetweb.org/webbot.php?u=scope&p=test&f=1&d=12:00+PM&t=This+is+an+information+message
*u = UserID*p = Password*f = Function (1)*d = Date*t = TextOutput[12:00 PM] INFO: This is an information message
http://api.bnetweb.org/webbot.php?u=scope&p=test&f=2&d=12:00+PM&ch=Clan+vA
*u = UserID*p = Password*f = Function (2)*d = Date*ch = ChannelOutput[12:00 PM] Joined Channel: Clan vA
http://api.bnetweb.org/webbot.php?u=scope&p=test&f=18&user1=Scope+47+STAR+0+10&user2=Pianka+31+D2DV+0&user3=MP3+16+WAR3+1+vA+W3R1
Here you will build the URL and use "user1" through "user50" (if required) to populate the channel list in a single URL. You use a space to split each string, so for example.*u = UserID*p = Password*f = Function (18)*user1 = Scope 47 STAR 0 (null) 10(Username Ping Client Flags (no clan tag) Icon)user2 = MP3 16 WAR3 1 vA W3R1 (Username Ping Client Flags ClanTag Icon) If you don't need a clan tag, insert a space in that position, or the icon you choose will go in its place. I see no better way of doing this at the momentIf you choose to set the icon, it follows the statstring of the product. (i.e. for WAR3/W3XP, uses W3R1, W3N1, W3N2, etc. For STAR/SEXP/W2BN just send the wins section of the statstring.So each parameter will have 5 pieces of information. (i.e. if clan tag does not apply, then leave blank or insert a null string)Format of each &user1, user2, user3, user4, etc MUST be (Username, Ping, Client, Flags, ClanTag Icon) using a space or a "+" to separate each part.
This URL will display a join notificationhttp://api.bnetweb.org/webbot.php?u=scope&p=test&f=4&d=12:00+PM&n=Scope&cl=STAR&pi=47&fl=0&ch=Clan+vA&ct=vA&e=using+Starcraft.
*u = UserID*p = Password*f = Function (4)*d = Date*n = Username*cl = Client (4 letter abbreviation, STAR, D2DV, etc)*pi = Ping*fl = Flags (0 = normal, 1 = operator)*ch = Channelct = Clan Tag (optional parameter)i = Icon (optional parameter)e = Extra (optional parameter)Output[12:00 PM] Scope has joined the channel using Starcraft.
This URL will NOT display a join notificationhttp://api.bnetweb.org/webbot.php?u=scope&p=test&f=3&d=12:00+PM&n=Scope&cl=STAR&pi=47&fl=0
*u = UserID*p = Password*f = Function (3)*d = Date*n = Username*cl = Client (4 letter abbreviation, STAR, D2DV, etc)*pi = Ping*fl = Flags (0 = normal, 1 = operator)ct = Clan Tag (optional parameter)i = Icon (optional parameter)
This URL will display a leave notificationhttp://api.bnetweb.org/webbot.php?u=scope&p=test&f=16&d=12:00+PM&n=Scope&e=using+Starcraft.
*u = UserID*p = Password*f = Function (16)*d = Date*n = Usernamee = Extra (optional parameter)Output[12:00 PM] Scope has left the channel using Starcraft.
This URL will NOT display a leave notificationhttp://api.bnetweb.org/webbot.php?u=scope&p=test&f=5&d=12:00+PM&n=Scope
*u = UserID*p = Password*f = Function (5)*d = Date*n = Username
http://api.bnetweb.org/webbot.php?u=scope&p=test&f=6&d=12:00+PM&fr=Scope&t=This+is+a+test+whisper
*u = UserID*p = Password*f = Function (6)*d = Date*fr = From*t = TextOutput[12:00 PM] «From: Scope» This is a test whisper
http://api.bnetweb.org/webbot.php?u=scope&p=test&f=7&d=12:00+PM&to=Scope&t=I+sent+a+whisper
*u = UserID*p = Password*f = Function (7)*d = Date*to = To*t = TextOutput[12:00 PM] «To: Scope» I sent a whisper
This is the normal chat function. This will be uniform whenever the bot receives a normal chat message.http://api.bnetweb.org/webbot.php?u=scope&p=test&f=8&d=12:00+PM&n=Scope&t=This+is+normal+chat
*u = UserID*p = Password*f = Function ( 8 )*d = Date*n = Username*t = TextOutput[12:00 PM] «Scope» This is normal chat
This is the self-chat function. This will color the username a shade of blue. Use this when your bot sends a message.http://api.bnetweb.org/webbot.php?u=scope&p=test&f=19&d=12:00+PM&n=Scope&t=This+is+normal+chat
*u = UserID*p = Password*f = Function (19)*d = Date*n = Username*t = TextOutput[12:00 PM] «Scope» This is normal chat
http://api.bnetweb.org/webbot.php?u=scope&p=test&f=9&d=12:00+PM&n=Scope&t=This+is+emote+chat
*u = UserID*p = Password*f = Function (9)*d = Date*n = Username*t = TextOutput[12:00 PM] «Scope This is emote chat»
http://api.bnetweb.org/webbot.php?u=scope&p=test&f=12&n=Scope
*u = UserID*p = Password*f = Function (12)*n = Username
http://api.bnetweb.org/webbot.php?u=scope&p=test&f=11&c=clr+all
*u = UserID*p = Password*f = Function (11)*c = Clear Eventclr all = Clear Everything (chat, channel, version, server, send queue)clr chat = Clear Chat Screenclr channel = Clear Channel Screenclr server = Clear Serverclr poweredby = Clear Powered Byclr send = Clear Send Queue
Notice this is index.php, NOT webbot.phphttp://webbot.bnetweb.org/index.php?getchat=scope&p=test
*getchat = UserID*p = PasswordOutput (if any messages are queued)Message 1Message 2Message 3The WebBot will return every queued message for that UserID. Split the results by a new line. After you request the queued messages, all existing queued messages are deleted. It is wise to only request messages every 5-10 seconds to avoid server IPBan.
http://api.bnetweb.org/webbot.php?u=scope&p=test&f=17&color=red&t=This+text+will+be+red
*u = UserID*p = Password*f = Function (17)color = Color of Text (optional parameter, will be white if not set) [Must be valid HTML/CSS color (red, green, blue, #FFFFFF, #000000, etc)]*t = TextOutput»» This text will be red
Do you have an intention of making a plugin for l2chat for this?
Quote from: KingofKings on August 29, 2010, 07:36:47 pmDo you have an intention of making a plugin for l2chat for this?Yes, soon. I am about to release a script for StealthBot for all those skiddies as well.
Quote from: Scope on August 29, 2010, 07:37:25 pmQuote from: KingofKings on August 29, 2010, 07:36:47 pmDo you have an intention of making a plugin for l2chat for this?Yes, soon. I am about to release a script for StealthBot for all those skiddies as well.Shame shame. good ur adding it to l2 tho
When I get the time I will whip up an example of how to connect a keep-alive for your webbot, and perhaps you can reference it in the original post.
Dim HostMessage As StringDim ModMessage As StringDim MyBot As StringPrivate Sub Command1_Click() Winsock.Close Winsock.Connect "webbot.bnetweb.org", 80End SubPrivate Sub Form_Load() MyBot = "Alpha & Omega -- Webbot Routine" 'name of the browser, you can use anything HostMessage = " HTTP/1.1" & vbCrLf HostMessage = HostMessage & "Host: webbot.bnetweb.org" & vbCrLf HostMessage = HostMessage & "User-Agent: " & MyBot & vbCrLf HostMessage = HostMessage & "Keep-Alive: 70" & vbCrLf HostMessage = HostMessage & "Connection: Keep-Alive" & vbCrLf & vbCrLf 'this call shouldnt be needed any more, pretty sure its defect since http 1.1End SubPrivate Sub Winsock_Connect() ModMessage = "GET /webbot.php?u=scope&p=test&f=99" 'this message is used to apply data to the webbot, this is the example scope gave. Winsock.SendData ModMessage & HostMessageEnd Sub
Private Sub ConnectWebbot() AddText "Connecting" Winsock1.Close Winsock1.Connect "webbot.bnetweb.org", 80End Sub'issues a connect to the serverPrivate Function BuildSend(ByRef theData As String, ByRef PostMethod As Boolean) As StringDim myBot As String myBot = "Alpha & Omega -- Webbot" ' If PostMethod Then BuildSend = "POST /webbot.php HTTP/1.1" & vbCrLf & _ "User-Agent: " & myBot & vbCrLf & _ "Host: webbot.bnetweb.org" & vbCrLf & _ "Content-Type: application/x-www-form-urlencoded" & vbCrLf & _ "Content-Length: " & Len(theData) & vbCrLf & _ "Connection: Keep-Alive" & vbCrLf & _ "cache-Control: no-cache" & vbCrLf & vbCrLf & theData Else 'use GET rather than POST BuildSend = "GET /webbot.php?" & theData & " HTTP/1.1" & vbCrLf & _ "User-Agent: " & myBot & vbCrLf & _ "Host: webbot.bnetweb.org" & vbCrLf & _ "Connection: Keep-Alive" & vbCrLf & vbCrLf End If End Function'inserts an entryPrivate Sub AddText(ByRef theText As String) Text1.Text = Text1.Text & theText & vbCrLf Text1.SelLength = Len(Text1.Text)End Sub'just for testingPrivate Sub Winsock1_Connect() AddText "Connected" ' Dim myWebAccount As String, myWebPass As String myWebAccount = "testname" myWebPass = "testpass" 'change to appropriate values Dim connectData As String connectData = "u=" & myWebAccount & "&p=" & myWebPass & "&f=99" 'set the account creation string If List1.List(0) <> connectData Then List1.AddItem "u=" & myWebAccount & "&p=" & myWebPass & "&f=99", 0 'since the first thing we want to send upon a connect is to create the account, we add it to the start 'of the list. to prevent excessive sends of this we check to make sure its not already added before doing so. 'i suggest you verify that the account is created once and skip this step to save bandwidth TransferData 'issue the send of data End SubPrivate Sub TransferData() Do Until List1.ListCount = 0 'clear out our data If Winsock1.State = 7 Then 'winsock is connected, send request Winsock1.SendData BuildSend(List1.List(0), False) 'send List1.RemoveItem 0 'remove entry Else ConnectWebbot Exit Sub End If Loop End Sub'Sends the data to the serverPrivate Sub Winsock1_DataArrival(ByVal bytesTotal As Long)Dim theData As String Winsock1.GetData theData AddText theDataEnd Sub'this isnt really needed, just debugging
release source of webbot already
hmm so i can setup a webbot on A&O? :O or any bot.. interestinguhh i need help!!
me wants it