egghelp.org community Forum Index
[ egghelp.org home | forum home ]
egghelp.org community
Discussion of eggdrop bots, shell accounts and tcl scripts.
 
 FAQFAQ   SearchSearch   MemberlistMemberlist   UsergroupsUsergroups   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

HELP !Kline and !akill
Goto page 1, 2  Next
 
Post new topic   Reply to topic    egghelp.org community Forum Index -> Scripting Help
View previous topic :: View next topic  
Author Message
sattam
Voice


Joined: 02 Jan 2010
Posts: 20

PostPosted: Sat Jan 02, 2010 9:58 am    Post subject: HELP !Kline and !akill Reply with quote

I try I make the same script and you did not I do not know why

old script Works

Code:

# Kline Command
proc proc_kline {text} {
set time [lindex $text 0]
set ip [lindex $text 1]
set reason [lrange $text 2 end]
putserv "KLINE $time $ip $reason"
putlog "-=\002$nick\002=- Klined this ip: $ip ,for $reason ,for time (mins): $time" }
bind pub m|m !kline proc_kline
proc proc_kline {nick uhost hand chan arg} {
 set time [lindex [set arg [split $arg]] 0]
 set ip [lindex $arg 1]
 set reason [join [lrange $arg 2 end]]
 putserv "KLINE $time $ip $reason"
 putlog "-=\002$nick\002=- Klined this ip: $ip ,for $reason ,for time (mins): $time"
}



---

This script, which tried to do
Code:

# akill Command
proc proc_akill {text} {
set time [lindex $text 0]
set ip [lindex $text 1]
set reason [lrange $text 2 end]
putserv "msg OperServ akill $time $ip $reason"
putlog "-=\002$nick\002=- Klined this ip: $ip ,for $reason ,for time (mins): $time" }
bind pub m|m !akill proc_akill
proc proc_akill {nick uhost hand chan arg} {
 set time [lindex [set arg [split $arg]] 0]
 set ip [lindex $arg 1]
 set reason [join [lrange $arg 2 end]]
 putserv "msg OperServ akill $time $ip $reason"
 putlog "-=\002$nick\002=- Klined this ip: $ip ,for $reason ,for time (mins): $time"
}
Back to top
View user's profile Send private message
blake
Master


Joined: 23 Feb 2009
Posts: 201

PostPosted: Sat Jan 02, 2010 11:18 am    Post subject: Reply with quote

Try changing

Code:
putserv "msg OperServ akill $time $ip $reason"


to

Code:
putserv "OPERSERV akill ADD +$time $ip $reason"



Akill command is different to Gline and Zline Kline they work as /GLINE nickname time reason

akill
/MSG OPERSERV akill add +1d host reason
_________________
Blake
UKEasyHosting UKStormWatch
Back to top
View user's profile Send private message Visit poster's website
sattam
Voice


Joined: 02 Jan 2010
Posts: 20

PostPosted: Sat Jan 02, 2010 11:50 am    Post subject: Reply with quote

blake wrote:
Try changing

Code:
putserv "msg OperServ akill $time $ip $reason"


to

Code:
putserv "OPERSERV akill ADD +$time $ip $reason"



Akill command is different to Gline and Zline Kline they work as /GLINE nickname time reason

akill
/MSG OPERSERV akill add +1d host reason




No change



When I try through the dcc

[03:47:48‹pm›] (=aKline1) [15:50] #So# msg operserv akill time 10 *@t132e2333st.test2.tea spam
[03:47:48‹pm›] (=aKline1) Msg to operserv: akill time 10 *@t132e2333st.test2.tea spam
[03:47:51‹pm›] *** NOTE: aKline1 called you at: aKline1
Added mask '*@t132e2333st.test2.tea' to AKILL list. [Timed] [Reason: spam]


/msg operserv akill time 10 *@t132e2333st.test2.tea spam
Back to top
View user's profile Send private message
blake
Master


Joined: 23 Feb 2009
Posts: 201

PostPosted: Sat Jan 02, 2010 11:58 am    Post subject: Reply with quote

try putting d after amount of days 10d
_________________
Blake
UKEasyHosting UKStormWatch
Back to top
View user's profile Send private message Visit poster's website
blake
Master


Joined: 23 Feb 2009
Posts: 201

PostPosted: Sat Jan 02, 2010 12:22 pm    Post subject: Reply with quote

Try this

Code:
bind pub m|m !akill akill_proc
proc akill_proc { nick uhost hand chan arg } {
  set time [lindex [split $arg] 0]
  set host [lindex [split $arg] 1]
  set reason [join [lrange [split $arg] 2 end]] 
  putserv "OPERSERV akill add $time $host $reason"
  putlog "-=\002$nick\002=- Akilled this ip: $host ,for $reason ,for time (mins): $time"   
}


do !akill +1d ip reason
_________________
Blake
UKEasyHosting UKStormWatch
Back to top
View user's profile Send private message Visit poster's website
sattam
Voice


Joined: 02 Jan 2010
Posts: 20

PostPosted: Sat Jan 02, 2010 11:38 pm    Post subject: Reply with quote

blake wrote:
Try this

Code:
bind pub m|m !akill akill_proc
proc akill_proc { nick uhost hand chan arg } {
  set time [lindex [split $arg] 0]
  set host [lindex [split $arg] 1]
  set reason [join [lrange [split $arg] 2 end]] 
  putserv "OPERSERV akill add $time $host $reason"
  putlog "-=\002$nick\002=- Akilled this ip: $host ,for $reason ,for time (mins): $time"   
}


do !akill +1d ip reason




Does not work

Sad

/MSG operserv akill time 10 *@t132e2333st.test2.tea spam


OperServ : AKILL on --> *@t132e2333st.test2.tea by TEST info -> [10s] [ID: 547HT3dBrK83y52e4]. (0.000% of network)
Back to top
View user's profile Send private message
nml375
Revered One


Joined: 04 Aug 2006
Posts: 2857

PostPosted: Sun Jan 03, 2010 6:48 am    Post subject: Reply with quote

As you demonstrated in an earlier post, you msg operserv, not using an operserv irc command. As such, replace that line of code with this, which uses the proper command and syntax for sending msg's
Code:
putserv "PRIVMSG OPERSERV :akill $time $ip $reason"

The rest of the code looks ok, though I havn't checked it extensively..
_________________
NML_375, idling at #eggdrop@IrcNET
Back to top
View user's profile Send private message
blake
Master


Joined: 23 Feb 2009
Posts: 201

PostPosted: Sun Jan 03, 2010 8:13 am    Post subject: Reply with quote

The above code I posted works fine on my server unrealircd + Anope

What command are you using because

/MSG operserv akill time 10 *@t132e2333st.test2.tea spam this would not work because its wrong

this is correct syntax !akill +10d *@t132e2333st.test2.tea spam

even your above command wont work sent to operserv by yourself

correct syntax is /msg operserv akill add +10d *@t132e2333st.test2.tea spam this format is used if your aliases are not

with aliases set its /operserv akill add +10d *@t132e2333st.test2.tea spam

Code:
bind pub m|m !akill akill_proc
proc akill_proc { nick uhost hand chan arg } {
  set time [lindex [split $arg] 0]
  set host [lindex [split $arg] 1]
  set reason [join [lrange [split $arg] 2 end]]
  putserv "PRIVMSG OPERSERV akill add $time $host $reason"
  putlog "-=\002$nick\002=- Akilled this ip: $host ,for $reason ,for time (mins): $time"   
}


use this command in a channel
Code:
!akill +10d *@t132e2333st.test2.tea spam

_________________
Blake
UKEasyHosting UKStormWatch
Back to top
View user's profile Send private message Visit poster's website
nml375
Revered One


Joined: 04 Aug 2006
Posts: 2857

PostPosted: Sun Jan 03, 2010 10:19 am    Post subject: Reply with quote

Blake,
your privmsg command does not comply with RFC1459. If the last argument of the command contains any whitespace characters , it must be prefixed with a :

As for whether how to use 'operserv', this all depends on how (if at all) it is implemented. You'll se my previous post coresponds well with the example posted by sattam in the beginning of the thread.
_________________
NML_375, idling at #eggdrop@IrcNET
Back to top
View user's profile Send private message
speechles
Revered One


Joined: 26 Aug 2006
Posts: 1398
Location: emerald triangle, california (coastal redwoods)

PostPosted: Sun Jan 03, 2010 11:33 am    Post subject: Reply with quote

blake wrote:
The above code I posted works fine on my server unrealircd + Anope


That's your problem. You've never asked what network or services the OP is using. Your networks/services way of doing this, as nml375 said, is not standard. So of course, what works for you, on your server with your services will _NOT_ work for anyone using networks/services anywhere else.
_________________
speechles' eggdrop tcl archive
Back to top
View user's profile Send private message
sattam
Voice


Joined: 02 Jan 2010
Posts: 20

PostPosted: Sun Jan 03, 2010 12:06 pm    Post subject: Reply with quote

nml375 wrote:
As you demonstrated in an earlier post, you msg operserv, not using an operserv irc command. As such, replace that line of code with this, which uses the proper command and syntax for sending msg's
Code:
putserv "PRIVMSG OPERSERV :akill $time $ip $reason"

The rest of the code looks ok, though I havn't checked it extensively..


Thank you works great
Back to top
View user's profile Send private message
blake
Master


Joined: 23 Feb 2009
Posts: 201

PostPosted: Sun Jan 03, 2010 12:18 pm    Post subject: Reply with quote

How`s that my problem shouldnt they state it when asking

I need this to work with unreal or inspire as for services operserv commands are the same for most ircd`s

as for this
Code:
putserv "PRIVMSG OPERSERV :akill $time $ip $reason"


wow i missed :

Code:
putserv "PRIVMSG OPERSERV akill $time $host $reason"


Aint this here for us to learn and not for the exsperienced to bitch about it even you make mistakes
_________________
Blake
UKEasyHosting UKStormWatch
Back to top
View user's profile Send private message Visit poster's website
sattam
Voice


Joined: 02 Jan 2010
Posts: 20

PostPosted: Sun Jan 03, 2010 12:20 pm    Post subject: Reply with quote

blake wrote:
The above code I posted works fine on my server unrealircd + Anope

What command are you using because

/MSG operserv akill time 10 *@t132e2333st.test2.tea spam this would not work because its wrong

this is correct syntax !akill +10d *@t132e2333st.test2.tea spam

even your above command wont work sent to operserv by yourself

correct syntax is /msg operserv akill add +10d *@t132e2333st.test2.tea spam this format is used if your aliases are not

with aliases set its /operserv akill add +10d *@t132e2333st.test2.tea spam

Code:
bind pub m|m !akill akill_proc
proc akill_proc { nick uhost hand chan arg } {
  set time [lindex [split $arg] 0]
  set host [lindex [split $arg] 1]
  set reason [join [lrange [split $arg] 2 end]]
  putserv "PRIVMSG OPERSERV akill add $time $host $reason"
  putlog "-=\002$nick\002=- Akilled this ip: $host ,for $reason ,for time (mins): $time"   
}


use this command in a channel
Code:
!akill +10d *@t132e2333st.test2.tea spam




Thank you works great

Is it possible
Start a reason from a file txt

like
!akill time 10 *@t123st.te44st2.tea flood

flood = Banned from the network: Flooding Is Not Allowed In dal.net NetWork. http://chat.dal.net/download )
and

!akill time 10 *@t123st.te44st2.tea (spam)

spam = Banned from the network: Spam Is Not Allowed In dal.net NetWork.
http://chat.dal.net/download )
Back to top
View user's profile Send private message
nml375
Revered One


Joined: 04 Aug 2006
Posts: 2857

PostPosted: Sun Jan 03, 2010 4:33 pm    Post subject: Reply with quote

This forum is for anyone and everyone to share their wisdom, and benefit from others'.

Blake,
I merely pointed out an error in your code with a basic explanation of the issue. Personally, I don't call that bitching.. And yes, I do make mistakes every now and then. Sometimes I catch the error myself and make corrections, other times someone else notices the error and bring it to my attention.

If I have offended you in some way, I apologize for that.
_________________
NML_375, idling at #eggdrop@IrcNET
Back to top
View user's profile Send private message
blake
Master


Joined: 23 Feb 2009
Posts: 201

PostPosted: Sun Jan 03, 2010 5:18 pm    Post subject: Reply with quote

No not at all its not a problem sattam is trying to get some more help will point him in your direction
_________________
Blake
UKEasyHosting UKStormWatch
Back to top
View user's profile Send private message Visit poster's website
Display posts from previous:   
Post new topic   Reply to topic    egghelp.org community Forum Index -> Scripting Help All times are GMT - 4 Hours
Goto page 1, 2  Next
Page 1 of 2

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum


Forum hosting provided by Reverse.net

Powered by phpBB © 2001, 2005 phpBB Group
subGreen style by ktauber