• Welcome to Valhalla Legends Archive.
 

Void

Started by TeEhEiMaN, May 25, 2003, 07:29 PM

Previous topic - Next topic

TeEhEiMaN

Would this work for veiw void, and Does it even still work?

[/Code]
Private Sub cmdVoid_Click()
Dim thevoid As String
thevoid = Mid(Message, 6, Len(Message))
CleanSlateBot1.Send "/join " & the & void
Dim unignore As String
unignore = Mid(Message, 6, Len(Message))
CleanSlateBot1.Send "/unignore " & unignoreUserName
End Sub

If its messed up can u tell me where?

iago

Quote from: TeEhEiMaN on May 25, 2003, 07:29 PM
Would this work for veiw void, and Does it even still work?

[/Code]
Private Sub cmdVoid_Click()
Dim thevoid As String
thevoid = Mid(Message, 6, Len(Message))
CleanSlateBot1.Send "/join " & the & void
Dim unignore As String
unignore = Mid(Message, 6, Len(Message))
CleanSlateBot1.Send "/unignore " & unignoreUserName
End Sub

If its messed up can u tell me where?

You shouldn't dimension variables in the middle of a function
Why are you sending "/join " & the & void.. where are the and void declared/initialized?
Where did you declare/initialize Message?
Where did unignoreUserName come from?
Finally, you have to somehow handle flag changes in the void.
This'll make an interesting test for broken AV:
QuoteX5O!P%@AP[4\PZX54(P^)7CC)7}$EICAR-STANDARD-ANTIVIRUS-TEST-FILE!$H+H*


TeEhEiMaN

well can ya help me out? plz

Noodlez

He just did help you out. I believe what you meant to ask was "Can you give me the code? I can't write it myself."

TeEhEiMaN

well shit i tried

TeEhEiMaN

can you please help me a little bit better?

TeEhEiMaN

I got the void part to work, but now i gotta get this to work

CleanSlateBot1.Send "/unignore Form2.txtUsername.Text"

I dont think that works but how would I do it so it will unignore the master, also if you guys could help me with flag. Thank you very much.

But look Im learning I got some of the stuff to work! :)

TeEhEiMaN


Private Sub cmdVoid_Click()
Dim thevoid As String
thevoid = Mid(Message, 6, Len(Message))
CleanSlateBot1.Send "/join " & " the void"
Dim unignore As String
unignore = Mid(Message, 6, Len(Message))
CleanSlateBot1.Send "/unignore " & Form2.txtUsername.Text
End Sub


Ok that code works, But now i gotta be able to do the flag change, and I suck with flags. So can someone plzzz Help me with this, and for everyone saying im copy + pasiten and not learning anything. Thats not true cause i did this from what i learned from u guys. Thanks!

Kp

Quote from: TeEhEiMaN on May 26, 2003, 10:50 PM
But now i gotta be able to do the flag change, and I suck with flags.
Sure.  When you get a flags-update event, search the list of in-channel users for a matching user.  If found, update his flags and return.  If you reach the end of the list without finding the user, then the update is for a user who is presently invisible.  Since you are seeking to sense invisible users, you should display a notice when receiving a flags-update on a user who is not marked as in-channel.
[19:20:23] (BotNet) <[vL]Kp> Any idiot can make a bot with CSB, and many do!

TeEhEiMaN


and I suck with flags.


can you help me a little bit more with that please?