08.01.2004, 07:37 Uhr
huhu,
ich hab hiermit ein prob, weil wenn ich jemanden kick, dann deopt er mich immer und setzt mich in die antiop list :/ und ich bin zu blind um den fehler zu finden bitte um hilfe
hier folgende zeilen:
Hoffe ihr könnt mir helfen, ich hab den ganzen abend durchgescriptet und seh etz nixmehr woran der fehler liegt :/
schönen gruß Navy Seal[/quote]
ich hab hiermit ein prob, weil wenn ich jemanden kick, dann deopt er mich immer und setzt mich in die antiop list :/ und ich bin zu blind um den fehler zu finden bitte um hilfe
hier folgende zeilen:Code:
Sub Kick(Chan, Nick, User, Flags, KNick, KUser, KFlags, Message)
If ReadINIString(Chan, "Protection", "0", ini_CS) = "1" Then
If Nick = MyNick Then Exit Sub
If KNick = MyNick Then
If MatchFlags(GetUserChanFlags(RegUser, Chan), "+m") Or MatchFlags(GetUserChanFlags(RegUser, Chan), "+n") Or MatchFlags(GetUserChanFlags(RegUser, Chan), "+s") Or MatchFlags(GetUserChanFlags(RegUser, Chan), "+b") Then
SendLine "PRIVMSG L :Invite " & Chan, 1
SendLine "JOIN " & Chan, 1
SendLine "NOTICE " & Nick & " : Du hast soeben den Protection-Bot gekickt, unterlasse das bitte!", 2
Else
SendLine "PRIVMSG L :Invite " & Chan, 1
SendLine "JOIN " & Chan, 1
SendLine "MODE " & Chan & " -o " & Nick, 2
ExecuteCommand 0, ".adduser " & Nick
ExecuteCommand 0, ".chattr " & Nick & " -fp "
ExecuteCommand 0, ".chattr " & Nick & " +A " & chan
WriteINIString Nick, "IsBlack", "Yes", UserFile
WriteINIString Nick, "Hostmask", Hostmask(Chan, Nick), UserFile
AddKick Chan, Nick, "You're blacklisted ..."
End If
Else
If MatchFlags(GetUserChanFlags(RegUser, Chan), "+m") Or MatchFlags(GetUserChanFlags(RegUser, Chan), "+n") Or MatchFlags(GetUserChanFlags(RegUser, Chan), "+s") Or MatchFlags(GetUserChanFlags(RegUser, Chan), "+b") Then
If MatchFlags(GetUserChanFlags(KUser, Chan), "+m") Or MatchFlags(GetUserChanFlags(KUser, Chan), "+n") Or MatchFlags(GetUserChanFlags(KUser, Chan), "+s") Or MatchFlags(GetUserChanFlags(KUser, Chan), "+b") Then
SendLine "INVITE " & KNick & " " & Chan, 1
SendLine "NOTICE " & Nick & " : Du hast soeben einen Master/Owner/SuperOwner/Bot gekicked!", 2
End If
Else
If MatchFlags(GetUserChanFlags(KUser, Chan), "+m") Or MatchFlags(GetUserChanFlags(KUser, Chan), "+n") Or MatchFlags(GetUserChanFlags(KUser, Chan), "+s") Or MatchFlags(GetUserChanFlags(KUser, Chan), "+b") Then
SendLine "MODE " & Chan & " -o " & Nick, 2
ExecuteCommand 0, ".adduser " & Nick
ExecuteCommand 0, ".chattr " & Nick & " -fp "
ExecuteCommand 0, ".chattr " & Nick & " +A " & chan
WriteINIString Nick, "IsBlack", "Yes", UserFile
WriteINIString Nick, "Hostmask", Hostmask(Chan, Nick), UserFile
AddKick Chan, Nick, "You're blacklisted ..."
SendLine "INVITE " & KNick & " " & Chan, 1
Else
SendLine "MODE " & Chan & " -o " & Nick, 2
ExecuteCommand 0, ".adduser " & Nick
ExecuteCommand 0, ".chattr " & Nick & " -fp "
ExecuteCommand 0, ".chattr " & Nick & " +A " & chan
WriteINIString Nick, "IsBlack", "Yes", UserFile
WriteINIString Nick, "Hostmask", Hostmask(Chan, Nick), UserFile
AddKick Chan, Nick, "You're blacklisted ..."
End If
End If
End If
End If
End SubHoffe ihr könnt mir helfen, ich hab den ganzen abend durchgescriptet und seh etz nixmehr woran der fehler liegt :/
schönen gruß Navy Seal[/quote]