AnGelBot-Portal²

hi leute ich brauch ein script wo man mit dem angel masskick machen kann Laughing

aber dass keiner der +snm hat gekickt wird thx

mag ich auch Wink

so long

Code:

Sub Init() 

 Script "Masskick by St4rg4t3" 

 Hook "Chan_Msg" 

End Sub 

Sub Chan_Msg(Chan, Nick, RegUser, Line) 

 If MatchFlags(GetUserChanFlags(RegUser, Chan), "+m") Then 

  If LCase(Param(line, 1)) = "!masskick" Then

   For i = 0 To ChanUserCount(ChanNum(Chan)) 

    Name = ChanUser(ChanNum(Chan), i, CU_Nick) 

    If Name <> MyNick Or Name <> "L" Or Name <> "Q" Or Name <> "ChanServ" Then

     If Not MatchFlags(GetUserChanFlags(Name, Chan), "+m") Then 

      Sendline "KICK " & Chan & " " & Name, 2

     End If

    End If 

   Next 

  End If 

 End If

End Sub

könnte so hinhaun

Ich weiß ist alt :D aber funzt nicht...

Code:

Error   : (Das Argument ist nicht optional.: 'Sendline')

Position: Line 13, Column 6

Excerpt : Sendline "KICK " & Chan & " " & Name

nec

naja jedenfalls mal einer der die Suchfunktion benutzt Smile

habs editiert

SUchfunktion rulez :D

Nur erst mal hat sich der Bot selbst gekickt. Shocked

Aber eigentlich brauch ichs jetzt nicht mehr, hab jetzt Q-Ban. -_-

Danke trotzdem..

nec

AnGelBot-Portal²

Luethel

RoDnEy

stargate

Necrox

stargate

Necrox