AnGelBot-Portal²

Also,
ich möchte gerne ein Script das eine Textdatei ausliest und einfach über einen Triggerbefehl (z.B. !ftpdats) den Inhalt der Textdatei an den Nick sendet.
Könnte mir jemand vielleicht zeigen wie so etwas geht, bzw. ein Beispiel Script senden... das wäre eeecht nice...
Ach ja... nur wenn der Nick Op ist darf er die Message bekommen, sonst sollte eine Message kommen a là "sry, aber du bis kein member"

Ich hoffe jemand kann mir weiterhelfen...

thx

Irgendwie scheint das ja keinen zu interessieren... :( :(


...pls help me...

Zitat:Sub init
Hook "CHAN_MSG"
End SUb

Sub Chan_msg(Chan, Nick, Reguser, Line)
Dim Index, Dummy
If LCase(Param(Line, 1)) = "!ftpdats" Then
If MatchFlags(GetUserChanFlags(RegUser, Chan), "+fpo") Then
FileNum = FileOpen("filearea\ftp.txt", FA_Read)
If FileNum > 0 Then
While FileEOF(FileNum) = False
Dummy = FileReadLn(FileNum)
SendLine "PRIVMSG " & Nick & " :" & Dummy, 3
Wend
FileClose FileNum
Else
SendLine "PRIVMSG " & Nick & " :Fehler beim Zugriff auf die NewsDatenbank ! Sorry, try it later !" ,3
End If
Else
SendLine "NOTICE " & Nick & "Sry, aber du bis kein Member !", 3
End if
End if
End Sub

Der User sollte folgende Flags haben +fpo !
Bevor Du das Script lädst erstelle eine Datei filearea\ftp.txt !
Dann sollte alles funzen !

CU c00l4ZiD

PS:

Zitat:Irgendwie scheint das ja keinen zu interessieren...


...pls help me...

Auch wir haben noch beruflich und privat was zu tun !