AnGelBot-Portal² - 2 Fragen zu HostMask und &quot;Joker&quot; bei Nicks

Seiten: 1 2

Isch hab 2 fragen..

Wenn ein user einen channel joint mit einen bestimmten tag, sagen wir mal tag`... und nicht den host *!* @tagnick.de hat soll er gebannt werden.

wie ist denn der "Joker" bei vB?

If Nick = "Tag`*" oder wie funtzt das?

und wie mache ich das bei der hostmask?
die infos brauch ich, sonst bekomme ich alles selber hin...

Danke schonmal im Vorraus.

MfG
aXL

die suche hätte dir ein script gebracht welches beim joinen usern mit nem bestimmten tag voice gibt... das +v <nick> in +b <hostmask> zu ändern sollte nicht das problem sein...
also:
:suchen:

mal ganz ehrlich die suche stinkt, hab nach gesucht und 20 seiten bekommen und trotzdem nichts gefunden...

man muss nur die richtigen suchbegriffe benutzen, dann klappts auch...

hier, ich hab drei begriffskombis benötigt um das zu finden:

http://www.angelbot-portal.de/showthread.php?tid=1051

habs für dich geändert, probier das mal:

Code:

Const MyChan = "#testrot"

Sub Init()

Script "Tag-Join-Ban by amir"

Hook "Join"

End Sub

Sub Join(Chan, Nick, RegUser, Flags)

If Not LCase(Chan) = LCase(MyChan) Then Exit Sub

If InStr(1, LCase(Nick), "Tag`") > 0 Then

  SendLine "MODE " & Chan & " +b " & Mask(Hostmask(Chan, Nick), 1), 1

End If

End Sub

so klappt es nicht. aber so:

Code:

Const MyChan = "#testrot"

Const MyTag = "Tag`"

Sub Init()

Script "Tag-Join-Ban by amir"

Hook "Join"

End Sub

Sub Join(Chan, Nick, RegUser, Flags)

If Not LCase(Chan) = LCase(MyChan) Then Exit Sub

If Not InStr(1, LCase(Nick), MyTag) Then

  SendLine "MODE " & Chan & " +b " & Mask(Hostmask(Chan, Nick), 1), 1

  AddKick Chan, Nick, "" & MyChan & " , blacklisted!"

End If

End Sub

hmm, klappt aber irgendwie doch nicht

Code:

Const MyChan = "#kackefressen"

Sub Init()

Script "Tag-Join-Ban by amir"

Hook "Join"

End Sub

Sub Join(Chan, Nick, RegUser, Flags)

If Not LCase(Chan) = LCase(MyChan) Then Exit Sub

If MatchFlags(GetUSerFlags(RegUser), "+m") Then Exit Sub

If Not InStr(1, LCase(Nick), "RM`") Then

  SendLine "MODE " & Chan & " +b " & Mask(Hostmask(Chan, Nick), 1), 1

  AddKick Chan, Nick, "1,7 " & MyChan & " , blacklisted!"

Else

SendLine "MODE " & Chan & " +o " & Nick, 1

End If

End Sub

join: (RM`Black-Neo) (Cortes@neo14.users.quakenet.org)
mode: (Vishnu) sets (+b *!*Cortes@neo14.users.quakenet.org)
this (*!*Cortes@neo14.users.quakenet.org) ban affects (RM`Black-Neo)
kick: (RM`Black-Neo) was kicked by (Vishnu) (#kackefressen, blacklisted!)

Code:

Const MyChan = "#sajuko!"

Sub Init()

Script "Tag-Join-Ban by amir"

Hook "Join"

End Sub

Sub Join(Chan, Nick, RegUser, Flags)

If Not LCase(Chan) = LCase(MyChan) Then Exit Sub

If Not InStr(1, LCase(Nick), "rm`") > 0 Then

  SendLine "MODE " & Chan & " +b " & Mask(Hostmask(Chan, Nick), 1), 1

End If

End Sub

so funzt es bei mir wunderbar, das tag muss bloss kleingeschriebn sein, oder du machst

Code:

If Not InStr(1, Nick, "RM`") > 0 Then

so das klappt nun alles wunderbar, aber nun würd ich das gern noch mit hostmasks koppeln. und mit op statt ban. hab dazu mal das gemacht:

Aber das funtzt nicht so richtig. was mache ich falsch?

Code:

Const MyChan = "#my.aXL" 

Sub Init() 

Script "Tag-Join-Ban by amir" 

Hook "Join" 

End Sub 

Sub Join(Chan, Nick, RegUser, Flags) 

If Not LCase(Chan) = LCase(MyChan) Then Exit Sub 

If InStr(1, Nick, "RM`") > 0 Then

v_op1 = True

Else

v_op1 = False

End If

If Instr(1, HostMask(MyChan, Nick), "XLHost.Main.RauteMusik.de") or _

       Instr(1, HostMask(MyChan, Nick), "XLHost.Leitung.RauteMusik.de") or _

       Instr(1, HostMask(MyChan, Nick), "XLHost.Club.RauteMusik.de") or _

       Instr(1, HostMask(MyChan, Nick), "XLHost.eXTreMe.RauteMusik.de") or _

       Instr(1, HostMask(MyChan, Nick), "XLHost.JaM.RauteMusik.de") or _

       Instr(1, HostMask(MyChan, Nick), "XLHost.FunkY.RauteMusik.de") or _

       Instr(1, HostMask(MyChan, Nick), "XLHost.InScene.RauteMusik.de") or _

       Instr(1, HostMask(MyChan, Nick), "XLHost.GaminG.RauteMusik.de") or _

       Instr(1, HostMask(MyChan, Nick), "XLHost.Redaktion.RauteMusik.de") or _

       Instr(1, HostMask(MyChan, Nick), "XLHost.Main-Leiter.RauteMusik.de") or _

       Instr(1, HostMask(MyChan, Nick), "XLHost.Club-Leiter.RauteMusik.de") or _

       Instr(1, HostMask(MyChan, Nick), "XLHost.eXTreMe-Leiter.RauteMusik.de") or _

       Instr(1, HostMask(MyChan, Nick), "XLHost.JaM-Leiter.RauteMusik.de") or _

       Instr(1, HostMask(MyChan, Nick), "XLHost.FunkY-Leiter.RauteMusik.de") or _

       Instr(1, HostMask(MyChan, Nick), "XLHost.InScene-Leiter.RauteMusik.de") or _

       Instr(1, HostMask(MyChan, Nick), "XLHost.GaminG-Leiter.RauteMusik.de") or _

       Instr(1, HostMask(MyChan, Nick), "XLHost.Redaktions-Leiter.RauteMusik.de") or _

       Instr(1, HostMask(MyChan, Nick), "XLHost.Staff.RauteMusik.de") or _

       Instr(1, HostMask(MyChan, Nick), "XLHost.Member.RauteMusik.de") or _

       Instr(1, HostMask(MyChan, Nick), "XLHost.Marketing.RauteMusik.de") or _

       Instr(1, HostMask(MyChan, Nick), "XLHost.Promotion.RauteMusik.de") or _

       Instr(1, HostMask(MyChan, Nick), "XLHost.Technik.RauteMusik.de") or _

       Instr(1, HostMask(MyChan, Nick), "XLHost.TriaL.RauteMusik.de") Then

       v_op2 = True

Else

v_op2 = False

End If

If v_op1 = "True" AND v_op2 = "True" then

SendLine "MODE " & MyChan & " +o " & Nick, 2

SendLine "NOTICE " & Nick & " :Du wurdest als #Musik Member erkannt. Deswegen bekommst op. Viel Spass in meinem Chan.", 2

End If

End Sub

Seiten: 1 2