| Author | Message | Time |
|---|---|---|
| R.a.B.B.i.T | im startin 2 get annoyed with my bot. i made it in vb6 and it works in everyway. im using VB6 btw i load all the config info from the config file in Public Sub Form_Load(), and when the 'Connect' button on the menu is pushed, it does the CleanSlateBot1.Connect, and nothing happens. i followed the .txt and .htm documentations on connecting to BNLS using CleanSlateBot.OCX, and i cant figure out why my bot wont *@&#ing connect >< any help is greaaaaaaaaaaaaaaaaaaaaaaaaaaatly appreciated in every way shape and/or form. plz help...im desperate! ps: it debug into, debug over, runs, runs with full compile, and makes with >>NO<< errors whatsoever | July 17, 2003, 11:38 PM |
| ______ | 1.) :P 2.) You using a Valid BNLS ID / Pass? 3.) Do u have the Correct Accept Value? (579728) 4.) Does any Error's happen? | July 18, 2003, 12:59 AM |
| hismajesty | did you try this when bnet was down for maintence? | July 18, 2003, 1:51 AM |
| R.a.B.B.i.T | 1) :P 2) yes, either skywing or yoni gave it 2 my co-botmaker 3) maybe... ill check 4) no i been tryin since it came online its odd.... | July 18, 2003, 2:26 AM |
| R.a.B.B.i.T | 3) yes its correct the problem is that once i hit connect, nothing happens, and i cant figure it out...its not like the bot freezes though... | July 18, 2003, 2:30 AM |
| drivehappy | Place a debug.print or msgbox under the CSB events. | July 18, 2003, 3:00 AM |
| ______ | Your account might not be active on bnls yet or you might of placed cleanslatebot1.connect under the wrong button/command. Did you add the addtext function to the procedures like [code] addtext vbwhite, "connecting to battle.net." [/code] | July 18, 2003, 3:15 AM |
| R.a.B.B.i.T | [code] Private Sub BnetConnected() AddChat vbGreen, "Connected to Battle.Net!" & vbNewLine End Sub Private Sub BnetConnecting() AddChat vbYellow, "Connecting to Battle.Net..." & vbNewLine rtbChat.Text = "Connecting, the damned bot don't even work!" 'i added this in to see if it would display, but ALAS! End Sub Private Sub BnetDisconnected() AddChat vbRed, "Disconnected from Battle.Net!" & vbNewLine Form1.lvChannel.ListItems.Clear End Sub Private Sub BnetError(ErrorNumber As Integer, Description As String) AddChat vbRed, "Battle.Net Error " & ErrorNumber & ":" & vbNewLine, _ vbBlue, Description & vbNewLine End Sub [/code] and so on and so forth..... Debug.Print isnt doing anything...is ther any special way i should set it up? i dont think it has anything to do with BNLS itself though....i mean...my bot doesnt do the AddChat commands associated with BNLS...im really confused | July 18, 2003, 4:10 AM |
| drivehappy | Try adding them into BNLSConnect, Connecting, any error handling events, disconnects. What this will do is narrow it down to one problem and then you can find the solution. | July 18, 2003, 4:26 AM |
| Camel | [quote author=R.a.B.B.i.T link=board=17;threadid=1941;start=0#msg15138 date=1058501407] [code] Private Sub BnetConnected() AddChat vbGreen, "Connected to Battle.Net!" & vbNewLine End Sub Private Sub BnetConnecting() AddChat vbYellow, "Connecting to Battle.Net..." & vbNewLine rtbChat.Text = "Connecting, the damned bot don't even work!" 'i added this in to see if it would display, but ALAS! End Sub Private Sub BnetDisconnected() AddChat vbRed, "Disconnected from Battle.Net!" & vbNewLine Form1.lvChannel.ListItems.Clear End Sub Private Sub BnetError(ErrorNumber As Integer, Description As String) AddChat vbRed, "Battle.Net Error " & ErrorNumber & ":" & vbNewLine, _ vbBlue, Description & vbNewLine End Sub [/code] and so on and so forth..... Debug.Print isnt doing anything...is ther any special way i should set it up? i dont think it has anything to do with BNLS itself though....i mean...my bot doesnt do the AddChat commands associated with BNLS...im really confused [/quote] Why are those plain private subs? Shouldn't they be events of CSB? | July 18, 2003, 4:31 AM |
| ______ | You should put the addchat in the cleanslate bot events | July 18, 2003, 4:36 AM |
| R.a.B.B.i.T | i dont follow... | July 18, 2003, 5:38 AM |
| ______ | like [code] Private Sub CleanSlateBot1_BnetConnected() Addtext vbGreen, "Connected to Battle.net" End Sub [/code] if you dont know how to go under events on an object , go away | July 18, 2003, 6:06 AM |
| Eternal | +1 for the directness of that comment. | July 18, 2003, 3:38 PM |
| R.a.B.B.i.T | ahhh a stupid oversight of me...i didnt read some of the posts...or maybe it was the lack of sleep... :O ill try the CleanSlateBot1_event thing now... oooo thers an error: Procedure declaration does not match description of event or procedure having the same name :O it highlights: [code]Private Sub CleanSlateBot1_FlagsUpdate(Username, Flags, Message, Ping, SimulatedEvent)[/code] imma try workin on it but plz feel free to lend me some advice | July 18, 2003, 9:22 PM |
| R.a.B.B.i.T | bah...it says that error message for a lot of the stuff i changed to CleanSlateBot1_ :\ im really confused now.. | July 18, 2003, 9:27 PM |
| ______ | [quote author=R.a.B.B.i.T link=board=17;threadid=1941;start=0#msg15233 date=1058563372] ahhh a stupid oversight of me...i didnt read some of the posts...or maybe it was the lack of sleep... :O ill try the CleanSlateBot1_event thing now... oooo thers an error: Procedure declaration does not match description of event or procedure having the same name :O it highlights: [code]Private Sub CleanSlateBot1_FlagsUpdate(Username, Flags, Message, Ping, SimulatedEvent)[/code] imma try workin on it but plz feel free to lend me some advice [/quote] First Double click on cleanslatebot object then under events go to flagsupdate put this under flags update. try this [code] AddChat vbYellow, Username & " " & Flags & " " & message & " " & ping & vbNewLine [/code] | July 18, 2003, 9:32 PM |
| R.a.B.B.i.T | one of my co-programmers got the login from skywing or yoni, im not sure which, he didnt tell me.. | July 18, 2003, 11:03 PM |
| hismajesty | lol his post got deleted....thats posted all over the forum..in fact i was just looking for the direct link to the 1st topic or so about it. | July 18, 2003, 11:07 PM |
| R.a.B.B.i.T | ok..just to make sure its right and i dont screw up, when i double click the object it should say: [code]Private Sub CleanSlateBot1_BNLSAuthEvent(Success As Boolean) End Sub[/code] right? | July 18, 2003, 11:08 PM |
| R.a.B.B.i.T | [quote]lol his post got deleted....thats posted all over the forum..in fact i was just looking for the direct link to the 1st topic or so about it. [/quote] might i ask what ur talkin about? ------------------------------------------ [code] Private Sub CleanSlateBot1_BNLSConnected() AddChat vbGreen, "Connected to BNLS." & vbNewLine End Sub [/code] i get a mismatch now :O | July 18, 2003, 11:09 PM |
| hismajesty | [quote author=R.a.B.B.i.T link=board=17;threadid=1941;start=15#msg15249 date=1058569743] [quote]might i ask what ur talkin about?[/quote] The guy that posted 'How Do You Obtain A BNLS ID' ... [/quote] | July 18, 2003, 11:36 PM |
| ______ | [quote author=R.a.B.B.i.T link=board=17;threadid=1941;start=15#msg15249 date=1058569743] [quote]lol his post got deleted....thats posted all over the forum..in fact i was just looking for the direct link to the 1st topic or so about it. [/quote] might i ask what ur talkin about? ------------------------------------------ [code] Private Sub CleanSlateBot1_BNLSConnected() AddChat vbGreen, "Connected to BNLS." & vbNewLine End Sub [/code] i get a mismatch now :O [/quote] maybe its your addchat function thats getting a mismatch? | July 19, 2003, 3:45 AM |
| R.a.B.B.i.T | its always worked before..... heres the code for my addchat [code] Public Function AddChat(ByVal txtOne As String, ByVal clrOne As Long, Optional ByVal txtTwo As String, Optional ByVal clrTwo As Long, Optional ww As Integer) Dim rtbchat1 As RichTextBox On Error Resume Next 'Lock Screen If frmSetup.checklock = vbUnchecked Then If ww = 1 Then Set rtbchat1 = Form1.rtbChat Else Set rtbchat1 = Form1.rtbChat End If With rtbchat1 .SelStart = Len(.Text) .SelLength = 0 .SelColor = vbWhite .SelText = "[" & Format$(Time, "Hh:Nn:Ss") & "] " .SelColor = clrOne .SelText = txtOne End With If Len(txtTwo) > 0 Then With rtbchat1 .SelStart = Len(.Text) .SelLength = 0 .SelColor = clrTwo .SelText = txtTwo End With End If End Function [/code] | July 19, 2003, 5:45 AM |
| ______ | It is your addchat fuction that is causeing the type mismatch. Use Groks addtext function. http://www.valhallalegends.com/docs/rtbox.htm | July 19, 2003, 8:05 AM |
| R.a.B.B.i.T | with groks it gives me a subor function not defined, but only for CleanSlateBot1_BnetConnected() :O but thx for the link, i dont get mismatch now :) --------------------------------------------------------------------------------------------------------------- oO...how do i have -5? | July 19, 2003, 5:49 PM |
| zeronx | I have a problem with where i open the program then close it then the properties i gave to the program are erased :-S any idea what the hell is wrong? is the proper accept -65 , cause thats what the dcoument says... | July 20, 2003, 1:38 PM |
| Grok | Set the properties when you load the form containing the control. Save the properties to a text file or the registry. Next time the program loads, use those values to set the control properties. | July 20, 2003, 2:51 PM |
| zeronx | how do you do that??? :-S lol sorry if this is a stupid question but im not sure how to save properties a to a txt then load them | July 20, 2003, 4:17 PM |
| Yoni | Maybe you should learn the language you're programming in, then | July 20, 2003, 6:07 PM |
| Camel | In the future, don't ever type out the event subs. Instead, use the dropdown boxes at the top of the code window. | July 20, 2003, 6:37 PM |
| zeronx | someone mind telling me how to import export properties using a txt file???! | July 20, 2003, 11:19 PM |
| CrAz3D | GetINI & WriteINI? Did you try that? http://botdev.valhallalegends.com/documents.asp http://www.valhallalegends.com/pub/CINIFile.cls | July 21, 2003, 1:07 AM |
| R.a.B.B.i.T | ok i redid all the CSB events and stuff. now my bot *kinda* works. but i get this when i try to connect: [15:03:43] Connectiong to BNLS.... [15:03:43] Connected to BNLS! [15:03:44] DEBUG: BNLS In: 07 00 0E 35 87 17 51 HType=0/spass=False/cb=0 [15:03:44] DEBUG: BNLS In: 07 00 0F 00 00 00 00 HType=0/spass=False/cb=0 [15:03:45] BNLS Authorization Passed. [15:03:45] DEBUG: BNLS In: 07 00 10 00 00 00 00 HType=0/spass=False/cb=0 [15:03:45] Version Byte: 7471104 and im not sure what the DEBUGs mean but i think maybe my bnls botid/password? | July 22, 2003, 6:57 PM |
| Camel | Those look like BNLS packets -- if you dont understand what they mean, I suggest you don't display the debug messages. They help to figgure out what a problem is if something isnt working by displaying the exact response BNLS sent. You really only need to see it if something isn't working, but it looks like your "BNLS Authorization Passed." | July 22, 2003, 9:44 PM |
| R.a.B.B.i.T | but my bot gives the error "Invalid version." and displays the Version Byte :\ | July 23, 2003, 12:59 AM |
| DarkMinion | There is no "version" checking with BNLS...unless you're trying to do the b.net version check, in which case, your version "byte" is completely wrong... | July 23, 2003, 1:29 AM |
| R.a.B.B.i.T | arg.......that probably it..but i still dun understand those packets.. wait.......then..how the hell do i change the byte..and what to? | July 23, 2003, 2:00 AM |
| Kp | [quote author=R.a.B.B.i.T link=board=17;threadid=1941;start=30#msg15703 date=1058925656] arg.......that probably it..but i still dun understand those packets.. wait.......then..how the hell do i change the byte..and what to?[/quote]Request it from BNLS and use what BNLS tells you to use. Then you won't have to go change things when a new version comes out. | July 23, 2003, 2:07 AM |
| R.a.B.B.i.T | lol..i might sound kinda like a newb about this but..how would i call for the byte from bnls? | July 23, 2003, 3:25 AM |
| Camel | Shouldn't CSB do that automaticly? | July 23, 2003, 11:01 PM |
| R.a.B.B.i.T | i dont kno..but i think it might......if it does my CleanSlateBot is screwed up.... | July 24, 2003, 12:56 AM |
| R.a.B.B.i.T | *chirp* *chirp* well i took out the addchat for VersionByte and DEBUG and now my bot just stops after its auth on bnls.....i have no idea y tho.. ........o yeah..wher all my neg karma comin from? | July 24, 2003, 4:35 AM |
| hismajesty | [quote author=R.a.B.B.i.T link=board=17;threadid=1941;start=30#msg15863 date=1059021304] ........o yeah..wher all my neg karma comin from? [/quote] people clicking roast under your name... | July 24, 2003, 5:15 AM |
| Camel | [quote author=R.a.B.B.i.T link=board=17;threadid=1941;start=30#msg15863 date=1059021304]well i took out the addchat for VersionByte and DEBUG and now my bot just stops after its auth on bnls.....i have no idea y tho..[/quote] Did you tell CSB to connect to battle.net? | July 24, 2003, 6:30 AM |
| R.a.B.B.i.T | [quote author=Camel link=board=17;threadid=1941;start=30#msg15875 date=1059028208] [quote author=R.a.B.B.i.T link=board=17;threadid=1941;start=30#msg15863 date=1059021304]well i took out the addchat for VersionByte and DEBUG and now my bot just stops after its auth on bnls.....i have no idea y tho..[/quote] Did you tell CSB to connect to battle.net? [/quote] well..if connecting 2 bnet needs more then just CleanSlateBot1.connect (after all the declarations of username,pass,etc...) then no i havent ----------------------------------------------- damn roast link.. | July 24, 2003, 7:11 AM |