egghelp/eggheads community

Re: A "Ticket System" - Help

2004-05-22T16:52:21-04:00

Hello guys, I am new @ TCL,
1. Who can give me guides to learn TCL? I know mirc scripting...
2. Who can help me to build a system, that if someone say in #channel !help its msgs #channel2 nick is need help, please help him and msgs the user, please wait while some admin will help you, and admins can write to the bot !online or !offline and if there is no admin online the bot says I am sorry there is no admin avilable
3. Who can give me the basic code for on *:text:*Bla*:#: { //msg $channel or $nick hey hello and bye }
?
10x.

btw... I can put many scripts on 1 eggdrop?
what are the basic commands that come with eggdrop?

Well, this is answer for 3th question:

Code:

bind pub -|- "bla" pub:blaproc pub:bla {nick host handle chan arg} {  putquick "PRIVMSG $chan :hey, hello and bye"}

(it could be done in many other ways too...)

Well, and this one is for second

Code:

set chan1 "#channel1"# Here you put chan, on which you want !help to workset chan2 "#channel2" # Here you put on which bot will msg request for help...bind pub -|- "!help" pub:helpbind pub -|- "!online" pub:onbind pub -|- "!offline" pub:offproc pub:help {nick host handle chan arg} {global chan1 chan2if { $chan == $chan1 } {  putquick "PRIVMSG $chan2 :$nick in $chan1 need help.Please help him :)"  putquick "PRIVMSG $nick :Please wait a while, help is comming :P"  return 0 } }proc pub:on {nick host handle chan arg} {global chan1 chan2if { $chan == $chan2 } {  putquick "PRIVMSG $chan1 :Few moments and help will be there :P"  return 0 }} proc pub:off {nick host handle chan arg} {global chan1 chan2if { $chan == $chan2 } {  putquick "PRIVMSG $chan1 :Admins are busy atm, plz try again in some time..."  return 0 }}

I'm not sure if is working, i didn't test it...But it should work

-Update:I just test the script.It works ok

Statistics: Posted by ]Kami[ — Sat May 22, 2004 4:52 pm

A "Ticket System" - Help

2004-05-22T15:25:57-04:00

Some Links that will help you out.
SUNiNET's Guide to TCL scripting for Eggdrop 1.6 - a great primer
tclscript.com tutorials
The tcl wiki - huge plethora of information
tcl.tk documentation - a great starting spot for learning tcl

Download the eggdrop source to your computer and extract the documentation from the tar(\eggdrop1.6.x\doc\html), its invaluable to a beginner. And all the eggdrop tcl commands are in it which you will need when you progress further then the beginner tutorials.

I would recommend you stop right now from thinking there is a simularity between mIRC scripting and tcl scripting, it will only get you into trouble.

Statistics: Posted by Guest — Sat May 22, 2004 3:25 pm

A "Ticket System" - Help

2004-05-22T14:00:58-04:00

Hello guys, I am new @ TCL,
1. Who can give me guides to learn TCL? I know mirc scripting...
2. Who can help me to build a system, that if someone say in #channel !help its msgs #channel2 nick is need help, please help him and msgs the user, please wait while some admin will help you, and admins can write to the bot !online or !offline and if there is no admin online the bot says I am sorry there is no admin avilable
3. Who can give me the basic code for on *:text:*Bla*:#: { //msg $channel or $nick hey hello and bye }
?
10x.

btw... I can put many scripts on 1 eggdrop?
what are the basic commands that come with eggdrop?

Statistics: Posted by Guest — Sat May 22, 2004 2:00 pm