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 

botpack help

 
Post new topic   Reply to topic    egghelp.org community Forum Index -> Script Support & Releases
View previous topic :: View next topic  
Author Message
flexboy
Voice


Joined: 04 Feb 2007
Posts: 8
PostPosted: Sun Feb 04, 2007 5:21 am    Post subject: botpack help Reply with quote
Hi all im using harry botpack from http://tclscript.com i fixed few errors but i keep on getting

when i type: tcl error i get
Code:

<shot> [09:18] can't unset "gettinop": no such variable
<shot> [09:18]     while executing
<shot> [09:18] "unset gettinop($chan)"
<shot> Tcl:


then it dose this every 30 mins or so..

Code:

<shot> [13:34] Tcl error [harry_botproc]: illegal channel option: 136
<shot> [13:34] Tcl error [harry_botproc]: illegal channel option: 136
<shot> [13:34] Tcl error [harry_botproc]: illegal channel option: 136
<shot> [13:34] Tcl error [harry_botproc]: illegal channel option: 136
<shot> [13:34] Tcl error [harry_botproc]: illegal channel option: 136
<shot> [13:34] Tcl error [harry_botproc]: illegal channel option: 136
<shot> [13:34] Tcl error [harry_botproc]: illegal channel option: 136
<shot> [13:34] Tcl error [harry_botproc]: illegal channel option: 136
<shot> [13:34] Tcl error [harry_botproc]: illegal channel option: 90
<shot> [13:34] Tcl error [harry_botproc]: illegal channel option: 97
<shot> [13:34] Tcl error [harry_botproc]: illegal channel option: 98
<shot> [13:34] Tcl error [harry_botproc]: illegal channel option: 98
<shot> [13:34] Tcl error [harry_botproc]: illegal channel option: 135
<shot> [13:34] Tcl error [harry_botproc]: illegal channel option: 0
<shot> [13:34] Tcl error [harry_botproc]: illegal channel option: 120
<shot> [13:34] Tcl error [harry_botproc]: illegal channel option: 120
<shot> [13:34] Tcl error [harry_botproc]: illegal channel option: 140


Can some one help me pls, you can get it here http://www.uploading.com/en/files/CY3B9BOT/harry8.2.tcl.html
Back to top
View user's profile Send private message
metroid
Owner


Joined: 16 Jun 2004
Posts: 771
PostPosted: Sun Feb 04, 2007 10:22 am    Post subject: Reply with quote
Try pasting it, Nobody wants to download a script so we can track down a bug .
Back to top
View user's profile Send private message
flexboy
Voice


Joined: 04 Feb 2007
Posts: 8
PostPosted: Sun Feb 04, 2007 10:38 am    Post subject: Reply with quote
Hmm, when i paste it, it wont fit
Back to top
View user's profile Send private message
Alchera
Revered One


Joined: 11 Aug 2003
Posts: 3344
Location: Ballarat Victoria, Australia
PostPosted: Sun Feb 04, 2007 7:41 pm    Post subject: Reply with quote
flexboy wrote:
Hi all im using harry botpack from http://tclscript.com i fixed few errors but i keep on getting

You "fixed" a few errors? I am sure strikelight will be pleased.

I suggest you make a post on the TclScript.com Forums regarding this matter after you reload the original script and not the appropriate errors.
_________________
Add [SOLVED] to the thread title if your issue has been.
Search | FAQ | RTM
Back to top
View user's profile Send private message Visit poster's website
hm2k
Halfop


Joined: 11 Sep 2006
Posts: 57
Location: UK
PostPosted: Tue Jan 22, 2008 10:17 am    Post subject: Reply with quote
I also run a hack job of harry.tcl, called lame.tcl

I thought i'd add a note to this as part of my research to fix this...

Here's what i'm seeing:

Code:
Tcl error [lame_botproc]: illegal channel option: 114


Code:
[01:58:03 pm] > .tcl set errorInfo
[01:58:03 pm] <(Gonzo\> Tcl: illegal channel option: 114
[01:58:03 pm] <(Gonzo\> Tcl:     while executing
[01:58:03 pm] <(Gonzo\> Tcl: "channel set [xindex $arg 1] $s"
[01:58:03 pm] <(Gonzo\> Tcl:     ("foreach" body line 3)
[01:58:03 pm] <(Gonzo\> Tcl:     invoked from within
[01:58:03 pm] <(Gonzo\> Tcl: "foreach s [lrange $arg 2 end] {
[01:58:03 pm] <(Gonzo\> Tcl:      if {[llength $s] == "1"} {
[01:58:03 pm] <(Gonzo\> Tcl:       channel set [xindex $arg 1] $s
[01:58:03 pm] <(Gonzo\> Tcl:       putlog "channel set [xindex $arg 1] $s"
[01:58:03 pm] <(Gonzo\> Tcl:    ..."
[01:58:03 pm] <(Gonzo\> Tcl:     ("sync" arm line 30)
[01:58:03 pm] <(Gonzo\> Tcl:     invoked from within
[01:58:04 pm] <(Gonzo\> Tcl: "switch -exact $cmd {
[01:58:04 pm] <(Gonzo\> Tcl:   "join" {
[01:58:04 pm] <(Gonzo\> Tcl:    set chan [xindex $arg 0]
[01:58:04 pm] <(Gonzo\> Tcl:    set key [xindex $arg 1]
[01:58:04 pm] <(Gonzo\> Tcl:    addchan $chan $key
[01:58:04 pm] <(Gonzo\> Tcl:    return 1
[01:58:04 pm] <(Gonzo\> Tcl:   }
[01:58:04 pm] <(Gonzo\> Tcl:   "part" {
[01:58:04 pm] <(Gonzo\> Tcl:    set chan [x..."
[01:58:04 pm] <(Gonzo\> Tcl:     (procedure "lame_botproc" line 9)
[01:58:04 pm] <(Gonzo\> Tcl:     invoked from within
[01:58:04 pm] <(Gonzo\> Tcl: "lame_botproc $_bot1 $_bot2 $_bot3"


As you can see, in this version i've added:

putlog "channel set [xindex $arg 1] $s"

Which putlogs the same information as the above line.

The reason being is I managed to replicate the error from console by doing the following:


Code:
[01:59:31 pm] > .tcl channel set #hm2k test
[01:59:31 pm] <(Gonzo\> Tcl error: illegal channel option: test
[01:59:05 pm] > .tcl channel set #hm2k 114
[01:59:05 pm] <(Gonzo\> Tcl error: illegal channel option: 114
[02:01:52 pm] > .tcl channel set #hm2k -nocolors
[02:01:52 pm] <(Gonzo\> Tcl:


However, oddly, I was unable to "putlog" anything containing "114".

Just with a brief look at it does anyone have any suggestions as to what might be the issue?

I can provide the code, but i figured it might be obvious to someone.

Thanks.
Back to top
View user's profile Send private message
hm2k
Halfop


Joined: 11 Sep 2006
Posts: 57
Location: UK
PostPosted: Tue Jan 22, 2008 2:48 pm    Post subject: Reply with quote
I figured it out...

After disabling the line:
channel set [xindex $arg 1] $s
and enabling
putlog "channel set [xindex $arg 1] $s"

We find these:
[06:38:05 pm] <(Gonzo\> [18:35] channel set #hm2k 114
[06:38:05 pm] <(Gonzo\> [18:35] channel set #hm2k 60
[06:38:05 pm] <(Gonzo\> [18:35] channel set #hm2k 74

So we try this:
[06:43:21 pm] > .tcl channel info #hm2k
[06:43:21 pm] <(Gonzo\> Tcl: +tn 0 0 0 {} {} {} {} {} 30:10 4:30 4:30 4:10 4:10 5:10 5:30 114 60 74 +enforcebans +dynamicbans +userbans -autoop -autohalfop -bitch -greet -protectops -protecthalfops -protectfriends +dontkickops -inactive -statuslog +revenge -revengebot -secret +shared -autovoice +cycle +seen +dynamicexempts +userexempts +dynamicinvites +userinvites -nodesynch -limit +mean -manualop -cookie -take -lock +clearban -nocolors {repeatflood 0}

Looks like the TCL code is pulling the wrong parts, so let's fix it...

hputbot $b "lamer sync 1 $chan [lrange [channel info $chan] 0 3] [lrange [channel info $chan] 9 15]"

to

hputbot $b "lamer sync 1 $chan [lrange [channel info $chan] 0 3] [lrange [channel info $chan] 9 18]"

hputbot $b "lamer sync 2 $chan [lrange [channel info $chan] 16 28]"

to

hputbot $b "lamer sync 2 $chan [lrange [channel info $chan] 19 28]"

now find

channel set $c aop-delay [lindex $arg 12]

and add some more...

channel set $c ban-time [lindex $arg 13]
channel set $c exempt-time [lindex $arg 14]
channel set $c invite-time [lindex $arg 15]

Save, and restore your line back to:

channel set [xindex $arg 1] $s

Enjoy!
Back to top
View user's profile Send private message
hm2k
Halfop


Joined: 11 Sep 2006
Posts: 57
Location: UK
PostPosted: Wed Sep 22, 2010 4:16 am    Post subject: Reply with quote
By the way...

You can now find the lamebotnet (replaced harry) here:

http://code.google.com/p/lamebotnet/

If you want to join the team let me know.

Further more, if you have old versions of harry, please get in touch so I can map the development.

Thanks.
Back to top
View user's profile Send private message
Display posts from previous:   
Post new topic   Reply to topic    egghelp.org community Forum Index -> Script Support & Releases All times are GMT - 4 Hours
Page 1 of 1

 
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