AnGelBot-Portal²

weis wer ein script damit der bot den nick changed , zB !nick <nick>
Smile

Sowas ist einfach:

Code:

Sub iniz()

  Hook "Chan_Msg"

End Sub

Sub Chan_Msg(Chan, Nick, RegUser, Line)

  If LCase(Param(Line,1)) = "!nick" Then

    If MatchFlags(GetUserFlags(RegUser), "+n") Then

      Sendline "nick " & Param(Line,2)

    End If

  End If

End Sub

MfG
Phantom

Phantom schrieb:

Code:

Sub iniz() <----- Fehler .... End If End Sub

da mus dochn t anstatt n z sein

Außerdem funzt das ja gar nich.auch mit dem t

hallo???

keine antwort?

ja draycon es muss Sub Init() heissen Smile

ja gut , aber das script funktioniert trotzdem nicht

Code:

sub init

   Script "Nick"

   hook "chan_msg"

end sub

sub chan_msg (Chan, Nick, RegUser, Line)

If Not MatchFlags(GetUserFlags(RegUser), "+m") Then EXit Sub

  select case lcase(param(line,1)) 

  case "!nick"   

         executecommand 0, ".botnick " & getrest(line,2), Reply(Chan)  

  end select

end sub

function Reply(Chan) 

  Reply = "ReplyLine """ & Chan & ""","

end function

sub ReplyLine(Chan, Line)

   Sendline "PRIVMSG " & Chan & " :" & Line, 3

end sub

so sollte das gehen Smile

thx es geht

Genetik

Phantom

Draycon

Draycon

FiReMaKeR

Draycon

TheKing

Draycon