egghelp/eggheads community

Hi, help me fix this advert script.

2011-03-05T03:23:46-04:00

umm, no, I don't think you are. He has a script made by someone else and he needs a few adjustments, thus moved it here rather than Scripting Help.

Anyway, if you consider a topic should be moved to another category you should contact a moderator about it or go directly to slennox if it's really necessarily.

Statistics: Posted by caesar — Sat Mar 05, 2011 3:23 am

Hi, help me fix this advert script.

2011-03-05T02:52:30-04:00

uhm, pardon me but, this topic must be moved in the "Scripting Help" category: http://forum.egghelp.org/viewforum.php?f=2

am I right?

Statistics: Posted by spithash — Sat Mar 05, 2011 2:52 am

Hi, help me fix this advert script.

2011-03-04T07:36:10-04:00

What about making the script to color the advertisements automatically.

Statistics: Posted by Amr — Fri Mar 04, 2011 7:36 am

Hi, help me fix this advert script.

2008-12-28T12:30:45-04:00

Code:

set adtext [list "\00300,01Puslapis:\002\00304 http://grigai.lt\002" \     "\00300,01Forumas:\002\00304 http://forum.grigai.lt\002" \     "\00300,01Banu Sarasas:\002\00304 http://bans.grigai.lt\002" \     "\00300,01Statistika:\002\00304 http://stats.grigai.lt\002"]

The script uses embedded control characters and doesn't quite qualify as a perfect tcl list. The above code does qualify as a perfect tcl list, and also uses escape sequences to generate chars rather than embedding them. Use it in place of the original set adtext.

Statistics: Posted by speechles — Sun Dec 28, 2008 12:30 pm

Hi, help me fix this advert script.

2008-12-28T06:42:57-04:00

Hi, I use this script and i encounter an error at partyline which the bot doesn't advertise on the channel:

[18:37] Tcl error in script for 'timer576':
[18:37] list element in quotes followed by "I" instead of space
.set errorInfo
[18:37] #Owner# set errorInfo
Currently: list element in quotes followed by "I" instead of space
Currently: while executing
Currently: "llength $adtext"
Currently: (procedure "printing" line 3)
Currently: invoked from within
Currently: "printing"

Statistics: Posted by Sydneybabe — Sun Dec 28, 2008 6:42 am

Hi, help me fix this advert script.

2007-12-06T11:22:47-04:00

Code:

############################################### # iNgADvert.tcl by iNgLiSh                    # # -adapted from newaidle.tcl by Felipe Tonioli# # BE SURE TO EDIT WITH PICO or other linux    # # editor, or else it will all get messed up!  # # ie. in shell commandline: pico ingadvert.tcl# # and then ctrl+x to save and close.          # # Enjoy!!!          -iNgLiSh                  # ############################################### # How often should it spit out ad:(in minutes ie. set ad-at 5 # would make it advertise every 5 min) : set ad-at- 10 set vers "v o.1" # Chan to advertise in: set chan1 "#grigai" ###########Edit add ads inside "\002 HERE \002"############  set adtext {      "0,1 Puslapis:4 http://grigai.lt "      "0,1 Forumas:4 http://forum.grigai.lt "      "0,1 Banu Sarasas:4 http://bans.grigai.lt "      "0,1 Statistika:4 http://stats.grigai.lt "       } #######DO NOT EDIT BELOW THESE LINES#######    set notnick "$botnick"    set notnick [string tolower ${nick}]    if {![info exists {ald}]} {      global notnick chan1 ad-at- adtext      set ald 1      timer ${ad-at-} printing    }    proc printing {} {      global notnick chan1 ad-at- adtext      set printochan [lindex $adtext [rand [llength $adtext]]]       putserv "PRIVMSG $chan1 : $printochan"      timer ${ad-at-} printing    }

EDITED: Use it, it should do the trick.

Statistics: Posted by iamdeath — Thu Dec 06, 2007 11:22 am

Hi, help me fix this advert script.

2007-12-05T12:41:25-04:00

Hi, i have a script found in somebodys post in the egghelp forum. The code is:

Code:

################################################ iNgADvert.tcl by iNgLiSh                    ## -adapted from newaidle.tcl by Felipe Tonioli## BE SURE TO EDIT WITH PICO or other linux    ## editor, or else it will all get messed up!  ## ie. in shell commandline: pico ingadvert.tcl## and then ctrl+x to save and close.          ## Enjoy!!!          -iNgLiSh                  ################################################# How often should it spit out ad:(in minutes ie. set ad-at 5 # would make it advertise every 5 min) :set ad-at- 10set vers "v o.1"# Chan to advertise in:set chan "#grigai"###########Edit add ads inside "\002 HERE \002"############ set adtext {     "0,1 Puslapis:4 http://grigai.lt "     "0,1 Forumas:4 http://forum.grigai.lt "     "0,1 Banu Sarasas:4 http://bans.grigai.lt "     "0,1 Statistika:4 http://stats.grigai.lt "      }#######DO NOT EDIT BELOW THESE LINES#######set notnick "$botnick" set notnick [string tolower ${nick}]if {![info exists {ald}]} {  global notnick chan ad-at- adtext  set ald 1  timer ${ad-at-} printing}proc printing {} {  global notnick chan ad-at- adtext  set printochan [lindex $adtext [rand [llength $adtext]]]      putserv "PRIVMSG $chan : $printochan"  timer ${ad-at-} printing}

But wtf? i get the random message in 10 min, but in the wrong channel. I need the channel to be #grigai, but i get ir #kz or #mercenaries... Help fix this pls

Statistics: Posted by AciD — Wed Dec 05, 2007 12:41 pm