egghelp/eggheads community

RE: Simple Voice Script

2003-06-24T01:51:53-04:00

...

Statistics: Posted by kevie — Tue Jun 24, 2003 1:51 am

RE: Simple Voice Script

2003-06-22T13:07:18-04:00

If all you want is help, not someone to do it for you, then go ahead and start and ask about problems you run into. If you're not sure where to start, then you need to read through a couple simple tcl scripts, because pretty much all eggdrop scripts have the same overall structure (config, binds, procs, etc).

Statistics: Posted by stdragon — Sun Jun 22, 2003 1:07 pm

RE: Simple Voice Script

2003-06-22T04:43:45-04:00

Thanks so much guys, anyhow i would wish someone could really help me convert this into tcl when they're free

Code:

n0=on 1:INPUT:#e-hub:{n1=  if ($1- == !list) {      n2=    ;if (%listinehub == 0) { n3=    %listinehub = 1n4=    /set %voicelistn5=    /set %voicelistcount 0n6=    .timersetlistinehub 1 20 /dec %listinehubn7=    ;}n8=  }  n9=}n10=n11=on *:notice:*serv*trig*send*:?:{n12=  if ($me isop #e-hub) { n13=    if (%listinehub == 1) {n14=      if ($nick !isvo #e-hub) && ($nick !isop #e-hub) {        n15=        /inc %voicelistcount       n16=        %voicelist = %voicelist $+ $chr(32) $+ $nickn17=        if (%voicelistcount = 4) {n18=          mode #e-hub + $+ $str(v,%voicelistcount) %voicelistn19=          /unset %voicelistn20=          /unset %voicelistcountn21=          /set %voicelistn22=          /set %voicelistcount 0n23=        }n24=        .timervoiceservers 1 5 /processn25=      }n26=    }n27=  }n28=}n29=n30=on *:notice:*§ËRV*t®îg*SeND*:?:{   n31=  if ($me isop #e-hub) { n32=    if (%listinehub == 1) {n33=      if ($nick !isvo #e-hub) && ($nick !isop #e-hub) {        n34=        /inc %voicelistcount       n35=        %voicelist = %voicelist $+ $chr(32) $+ $nickn36=        if (%voicelistcount = 4) {n37=          mode #e-hub + $+ $str(v,%voicelistcount) %voicelistn38=          /unset %voicelistn39=          /unset %voicelistcountn40=          /set %voicelistn41=          /set %voicelistcount 0n42=        }n43=        .timervoiceservers 1 5 /processn44=      }n45=    }n46=  }n47=}n48=n49=alias Process {n50=  if (%voicelistcount != 0) {n51=    mode #e-hub + $+ $str(v,%voicelistcount) %voicelistn52=    /unset %voicelistn53=    /unset %voicelistcountn54=    /set %voicelistn55=    /set %voicelistcount 0n56=  }n57=}n58=n59=alias FServeTracker {  n60=  echo -a ::: FServe Tracker :::n61=  if ($me ison #etro && $me isop #etro) {n62=    /timertracker 0 7200 /FServeTrackern63=    /msg #etro ::: Processing Task :::n64=n65=    var %nickcounter = 1n66=    while (%nickcounter <= $nick(#etro,0,a,o)) {n67=      var %nicknamen68=      var %nickname2n69=      %nickname = $nick(#etro,%nickcounter,a,o)n70=      if (%nickname ==  nUy3kN0d || *ColDeR* iswm %nickname ) {n71=        if (%nickname == nUy3kN0d) { %nickname2 = LeeYZ }n72=        if (*ColDeR* iswm %nickname) { %nickname2 = Co|DeR }n73=      }n74=      else {n75=        %nickname2 = %nicknamen76=      }n77=      if (%nickname isvoice #etro) { n78=        if (%nickname2 isvoice #e-hub || %nickname2 isop #e-hub) {n79=n80=        }n81=        else {n82=          if (*naf* iswm %nickname2) {n83=          }n84=          else {         n85=            mode #etro -v %nicknamen86=          }n87=        }n88=      }n89=      else {n90=        if (%nickname2 isvoice #e-hub || %nickname2 isop #e-hub) {n91=          mode #etro +v %nicknamen92=        }n93=      } n94=n95=      inc %nickcountern96=    }n97=  }n98=  if (LeeYZ isvoice #e-hub) {n99=n100=  }n101=  ;/msg #etro [Notice] Servers not serving will not be voiced here. (Currently under testing. If you are serving and got devoiced, give me a message) - FServe Tracker -n102=}

Statistics: Posted by kevie — Sun Jun 22, 2003 4:43 am

RE: Simple Voice Script

2003-06-21T02:11:43-04:00

Code:

set mychan1 "#foo"set mychan2 "#bar"bind join * "$mychan2 *" my:join:voicebind mode * "$mychan1 +v" my:mode:voice### joinproc my:join:voice {nick uhost handle channel} {  if {[validchan $::mychan2] && [botonchan $::mychan1] && [isvoice $nick $::mychan1] && [botisop $channel]} {    pushmode $channel +v $nick  }}### modeproc my:mode:voice {nick uhost handle channel mc victim} {  if {[validchan $::mychan2] && [botonchan $::mychan2] && [onchan $victim $::mychan2] && [botisop $::mychan2]} {    pushmode $::mychan2 +v $victim  }}

Statistics: Posted by caesar — Sat Jun 21, 2003 2:11 am

RE: Simple Voice Script

2003-06-20T16:32:24-04:00

kind people out there please help me, i've really got no clues thats why i turned to here.

Statistics: Posted by kevie — Fri Jun 20, 2003 4:32 pm

RE: Simple Voice Script

2003-06-20T06:24:27-04:00

Go to the Docs folder of your Eggdrop, and read TCL-Commands.doc

And look at the Join Binds

Statistics: Posted by Weirdo — Fri Jun 20, 2003 6:24 am

RE: Simple Voice Script

2003-06-20T03:36:36-04:00

we do not make codes for free in this forum
...but if you had cared to used the search button you would have found a post which contains almost exactly the code you want

Statistics: Posted by Papillon — Fri Jun 20, 2003 3:36 am

RE: Simple Voice Script

2003-06-20T03:27:40-04:00

Hi, can anyone provide a code whereby the bot checks the user who just joined channel B, whether he got a voice in channel A, and if he's got a voice, the bot will voice him too in channel B...

Statistics: Posted by kevie — Fri Jun 20, 2003 3:27 am