How to make a simple command script

Vyrus · Post by **Vyrus** » Tue Aug 31, 2004 4:09 pm

In mirc I see many eggdrop bots that respond to a command in the channel like:

Random Person: .commands
Bot: Available commands are .news - .staff - .website
Random Person: .website
Bot: Website - www.website.com

Where can I find a script like this or can someone please script an example I can follow.

Kurupt · Post by **Kurupt** » Tue Aug 31, 2004 4:46 pm

www.eggdrop.conf and www.tclscript. i thin there you would find what you search

Vyrus · Post by **Vyrus** » Wed Sep 01, 2004 1:18 am

www.eggdrop.conf ?? You mean the eggdrop.conf file right?

esix · Post by **esix** » Wed Sep 01, 2004 5:24 am

something like this?

Code: Select all

set commands "commands are .news ..bla bla"
bind pub -|- .commands commands
proc commands {nick host handle chan arg} {
global commands
 putserv "notice $nick :$commands"
}

Vyrus · Post by **Vyrus** » Wed Sep 01, 2004 1:10 pm

Thank you so much esix, that example has really helped me alot.

esix · Post by **esix** » Wed Sep 01, 2004 1:38 pm

no problem

WeiJie · Post by **WeiJie** » Tue Sep 07, 2004 10:09 pm

Any idea where can I find it? Tried egghelp.org and tclscript's but seems that it doesn't find any tcl that fit my needs... (noob about tcl scripting/coding) ;P

awyeah · Post by **awyeah** » Tue Sep 07, 2004 10:34 pm

Find what?!

WeiJie · Post by **WeiJie** » Wed Sep 08, 2004 8:14 am

Random Person: .commands
Bot: Available commands are .news - .staff - .website
Random Person: .website
Bot: Website - www.website.com

Something like tis... Right now i'm using info's tcl, like when i type...
<user> !explain website
<bot> the website is http://www.<>.com

awyeah wrote:Find what?!

esix · Post by **esix** » Wed Sep 08, 2004 9:38 am

esix wrote:something like this?

Code: Select all

set commands "commands are .news ..bla bla"
bind pub -|- .commands commands
proc commands {nick host handle chan arg} {
global commands
 putserv "notice $nick :$commands"
}

try to read next time

WeiJie · Post by **WeiJie** » Wed Sep 08, 2004 2:13 pm

I knew nothing about scripting/coding. Perhaps nothing to do with reading?

esix wrote:
esix wrote:something like this?
Code: Select all
set commands "commands are .news ..bla bla"
bind pub -|- .commands commands
proc commands {nick host handle chan arg} {
global commands
 putserv "notice $nick :$commands"
}
try to read next time

awyeah · Post by **awyeah** » Wed Sep 08, 2004 9:03 pm

WeiJie wrote:Random Person: .commands
Bot: Available commands are .news - .staff - .website
Random Person: .website
Bot: Website - www.website.com

Something like tis... Right now i'm using info's tcl, like when i type...
<user> !explain website
<bot> the website is http://www.<>.com

awyeah wrote:Find what?!

Well, you can always use something like:

Code: Select all

#Usage: !explain microsoft

#Set the word here to match.
set explainword "mircosoft"

#Set the website matching the word here to display.
set explaindef "http://www.microsoft.com/"

### SCRIPT ###
bind pub n !explain explanation

explanation {nick uhost hand chan text} {
 global botnick explainword explaindef
  if {([string equal -nocase $explainword [lindex $text 0]])} {
   putserv "PRIVMSG $chan :The website for $explainword is: $explaindef"; return 0
   }
}

Something like this should work if this is what you are trying todo.

WeiJie · Post by **WeiJie** » Wed Sep 08, 2004 10:14 pm

Thanks alot

awyeah wrote:
WeiJie wrote:Random Person: .commands
Bot: Available commands are .news - .staff - .website
Random Person: .website
Bot: Website - www.website.com

Something like tis... Right now i'm using info's tcl, like when i type...
<user> !explain website
<bot> the website is http://www.<>.com

awyeah wrote:Find what?!
Well, you can always use something like:
Code: Select all
#Usage: !explain microsoft

#Set the word here to match.
set explainword "mircosoft"

#Set the website matching the word here to display.
set explaindef "http://www.microsoft.com/"

### SCRIPT ###
bind pub n !explain explanation

explanation {nick uhost hand chan text} {
 global botnick explainword explaindef
  if {([string equal -nocase $explainword [lindex $text 0]])} {
   putserv "PRIVMSG $chan :The website for $explainword is: $explaindef"; return 0
   }
}
Something like this should work if this is what you are trying todo.

Vyrus · Post by **Vyrus** » Wed Sep 15, 2004 9:41 pm

bind pub -|- .commands commands

proc commands {nick host handle chan text} {
putserv "NOTICE $nick :My Message"
}

The problem with this is I dont know how to specify the channel I want the bot to only respond in. I have the bot in 3 channels and I would like the bot to respond to those commands only in 1 out of the 3 channels.

awyeah · Post by **awyeah** » Wed Sep 15, 2004 9:48 pm

Vyrus wrote:bind pub -|- .commands commands

proc commands {nick host handle chan text} {
putserv "NOTICE $nick :My Message"
}

The problem with this is I dont know how to specify the channel I want the bot to only respond in. I have the bot in 3 channels and I would like the bot to respond to those commands only in 1 out of the 3 channels.

Use $chan from the proc, what else.

Code: Select all

#Will respond to the channel where the command ".commands" is triggered.
putserv "NOTICE $chan :My Message"

#Will respond to the channel you will specify it to respond on.
putserv "NOTICE #mychannel :My Message"

#Conclusion
$chan = The channel where the script is triggered on.
#channel = Any channel where you want to display your message on.

egghelp/eggheads community

How to make a simple command script

How to make a simple command script

get a script