egghelp/eggheads community Discussion of eggdrop bots, shell accounts and tcl scripts. 2007-12-07T02:36:30-04:00 https://forum.eggheads.org/app.php/feed/topic/15049 2007-12-07T02:36:30-04:00 2007-12-07T02:36:30-04:00 https://forum.eggheads.org/viewtopic.php?p=79078#p79078 <![CDATA[[REQ] Cannot Edit String]]> Statistics: Posted by rosc2112 — Fri Dec 07, 2007 2:36 am

]]> 2007-12-06T21:42:01-04:00 2007-12-06T21:42:01-04:00 https://forum.eggheads.org/viewtopic.php?p=79073#p79073 <![CDATA[[REQ] Cannot Edit String]]> Statistics: Posted by AciD — Thu Dec 06, 2007 9:42 pm

]]> 2007-12-06T19:45:28-04:00 2007-12-06T19:45:28-04:00 https://forum.eggheads.org/viewtopic.php?p=79068#p79068 <![CDATA[[REQ] Cannot Edit String]]>
It's common courtesy to leave the original coder's credits intact. This is why many excellent coders either encrypt their scripts or simply cease coding altogether for the public.

Whether any ones decides to give any assistance will be a matter of chance.

Statistics: Posted by Alchera — Thu Dec 06, 2007 7:45 pm

]]> 2007-12-05T01:23:05-04:00 2007-12-05T01:23:05-04:00 https://forum.eggheads.org/viewtopic.php?p=79016#p79016 <![CDATA[[REQ] Cannot Edit String]]> --== Generated by AciD ==--
insted of:
--== Generated by mrdr ==--
i think its not stealing.. Because i have changed alot of the script... Anyway can you help edit pls? :(

Statistics: Posted by AciD — Wed Dec 05, 2007 1:23 am

]]> 2007-12-04T18:51:47-04:00 2007-12-04T18:51:47-04:00 https://forum.eggheads.org/viewtopic.php?p=78996#p78996 <![CDATA[[REQ] Cannot Edit String]]>
If you made the script (as seems to be case since you put your name in there) then why wouldn't you be able to fix that yourself? :roll:
Point well made metroid. :)

I know this script from somewhere but cannot at present remember who actually wrote it and the script name.

AciD: If you're going to steal another's code (and take the credit for it) then you should also know that you are required to do the the whole job yourself.

No one (with any sense of what's right) will assist you.

Statistics: Posted by Alchera — Tue Dec 04, 2007 6:51 pm

]]> 2007-12-04T18:44:09-04:00 2007-12-04T18:44:09-04:00 https://forum.eggheads.org/viewtopic.php?p=78993#p78993 <![CDATA[[REQ] Cannot Edit String]]>

Statistics: Posted by metroid — Tue Dec 04, 2007 6:44 pm

]]> 2007-12-04T15:40:06-04:00 2007-12-04T15:40:06-04:00 https://forum.eggheads.org/viewtopic.php?p=78984#p78984 <![CDATA[[REQ] Cannot Edit String]]>
 
Please make an effort to make your script easily readable, use proper indentation and use one command per line.
I personnaly can't read such a dense block. :?

Help us to help you


Funny thing, if you scroll quickly through the source code, it looks like a Matrix screensaver :D
Ok, i have edited the script to be readable, help edit the output string pls :)

Statistics: Posted by AciD — Tue Dec 04, 2007 3:40 pm

]]> 2007-11-29T14:58:17-04:00 2007-11-29T14:58:17-04:00 https://forum.eggheads.org/viewtopic.php?p=78802#p78802 <![CDATA[[REQ] Cannot Edit String]]> Please make an effort to make your script easily readable, use proper indentation and use one command per line.
I personnaly can't read such a dense block. :?

Help us to help you


Funny thing, if you scroll quickly through the source code, it looks like a Matrix screensaver :D

Statistics: Posted by MenzAgitat — Thu Nov 29, 2007 2:58 pm

]]> 2007-11-29T10:15:31-04:00 2007-11-29T10:15:31-04:00 https://forum.eggheads.org/viewtopic.php?p=78794#p78794 <![CDATA[[REQ] Cannot Edit String]]>
Hi, i have an eggdrop TV script it works fine but.
but what?

Statistics: Posted by YooHoo — Thu Nov 29, 2007 10:15 am

]]> 2007-12-04T15:45:19-04:00 2007-11-29T01:52:55-04:00 https://forum.eggheads.org/viewtopic.php?p=78779#p78779 <![CDATA[[REQ] Cannot Edit String]]>
The Script is:

Code: 

## DCC KOMANDOS:#  .chanset #kanalas +/-eggtv#  .chanset #kanalas +/-eggtvcolors#  Naudojanciu skripta flagai:set eggtv(flags) -|-#  Kanalo komanda:set eggtv(lrt) "!lrt"set eggtv(lnk) "!lnk"set eggtv(tv3) "!tv3"set eggtv(BTV) "!btv"set eggtv(tv1) "!tv1"set eggtv(tango) "!tango"set eggtv(mtvlt) "!mtvlt"set eggtv(cmd) "!tv"set eggtv(ltv2) "!ltv2"set eggtv(tv5) "!tv5"# -bind pub $eggtv(flags) $eggtv(tv5) eggtv:tv5proc eggtv:tv5 {nick host hand chan text} {if {[lsearch -glob [channel info $chan] "+eggtv"] > -1} {set _first "k5"set _last "lnk"if {[lsearch -glob [channel info $chan] "+eggtvcolors"] > -1} {set _topic "\00300,01 TV\00315,01 5 \00399,99"} else {set _topic "TV5"}set sock [egghttp:geturl www.manotv.lt/cgi-bin/tv_now.cgi [list eggtv:get_adv $nick $chan $_first $_last $_topic]]}}# -bind pub $eggtv(flags) $eggtv(ltv2) eggtv:ltv2proc eggtv:ltv2 {nick host hand chan text} {if {[lsearch -glob [channel info $chan] "+eggtv"] > -1} {set _first "LTV2"set _last "lnk"if {[lsearch -glob [channel info $chan] "+eggtvcolors"] > -1} {set _topic "\00300,01 LTV\00315,01 2 \00399,99"} else {set _topic "LTV2"}set sock [egghttp:geturl www.manotv.lt/cgi-bin/tv_now.cgi [list eggtv:get_adv $nick $chan $_first $_last $_topic]]}}# -bind pub $eggtv(flags) $eggtv(tv1) eggtv:tv1proc eggtv:tv1 {nick host hand chan text} {if {[lsearch -glob [channel info $chan] "+eggtv"] > -1} {set _first "TV1"set _last "lnk"if {[lsearch -glob [channel info $chan] "+eggtvcolors"] > -1} {set _topic "\00300,01 TV\00315,01 1 \00399,99"} else {set _topic "TV1"}set sock [egghttp:geturl www.manotv.lt/cgi-bin/tv_now.cgi [list eggtv:get_adv $nick $chan $_first $_last $_topic]]}}# -bind pub $eggtv(flags) $eggtv(mtvlt) eggtv:mtvltproc eggtv:mtvlt {nick host hand chan text} {if {[lsearch -glob [channel info $chan] "+eggtv"] > -1} {set _first "LTVLT"set _last "lnk"if {[lsearch -glob [channel info $chan] "+eggtvcolors"] > -1} {set _topic "\00300,01 MTV\00315,01 TV \00399,99"} else {set _topic "LTV2"}set sock [egghttp:geturl www.manotv.lt/cgi-bin/tv_now.cgi [list eggtv:get_adv $nick $chan $_first $_last $_topic]]}}# -bind pub $eggtv(flags) $eggtv(lrt) eggtv:ltvproc eggtv:ltv {nick host hand chan text} {if {[lsearch -glob [channel info $chan] "+eggtv"] > -1} {set _first "ltv"set _last "lnk"if {[lsearch -glob [channel info $chan] "+eggtvcolors"] > -1} {set _topic "\00308,02 L\00300,02RT \00399,99"} else {set _topic "LTV"}set sock [egghttp:geturl www.manotv.lt/cgi-bin/tv_now.cgi [list eggtv:get_adv $nick $chan $_first $_last $_topic]]}}# -bind pub $eggtv(flags) $eggtv(lnk) eggtv:lnkproc eggtv:lnk {nick host hand chan text} {if {[lsearch -glob [channel info $chan] "+eggtv"] > -1} {set _first "lnk"set _last "tv3"if {[lsearch -glob [channel info $chan] "+eggtvcolors"] > -1} {set _topic "\00312,01 L\00303,01N\00304,01K \00399,99"} else {set _topic "LNK"}set sock [egghttp:geturl www.manotv.lt/cgi-bin/tv_now.cgi [list eggtv:get_adv $nick $chan $_first $_last $_topic]]}}# -bind pub $eggtv(flags) $eggtv(tv3) eggtv:tv3proc eggtv:tv3 {nick host hand chan text} {if {[lsearch -glob [channel info $chan] "+eggtv"] > -1} {set _first "tv3"set _last "BTV"if {[lsearch -glob [channel info $chan] "+eggtvcolors"] > -1} {set _topic "\00300,02 TV\00308,023 \00399,99"} else {set _topic "TV3"}set sock [egghttp:geturl www.manotv.lt/cgi-bin/tv_now.cgi [list eggtv:get_adv $nick $chan $_first $_last $_topic]]}}# -bind pub $eggtv(flags) $eggtv(BTV) eggtv:BTVproc eggtv:BTV {nick host hand chan text} {if {[lsearch -glob [channel info $chan] "+eggtv"] > -1} {set _first "BTV"set _last "tango"if {[lsearch -glob [channel info $chan] "+eggtvcolors"] > -1} {set _topic "\00312,15 BTV \00399,99"} else {set _topic "BTV"}set sock [egghttp:geturl www.manotv.lt/cgi-bin/tv_now.cgi [list eggtv:get_adv $nick $chan $_first $_last $_topic]]}}# -bind pub $eggtv(flags) $eggtv(tango) eggtv:tangoproc eggtv:tango {nick host hand chan text} {if {[lsearch -glob [channel info $chan] "+eggtv"] > -1} {set _first "tango"set _last "aa"if {[lsearch -glob [channel info $chan] "+eggtvcolors"] > -1} {set _topic "\00301,04 Tango\00300,04TV \00399,99"} else {set _topic "Tango TV"}set sock [egghttp:geturl www.manotv.lt/cgi-bin/tv_now.cgi [list eggtv:get_adv $nick $chan $_first $_last $_topic]]}}# -bind pub $eggtv(flags) $eggtv(cmd) eggtv:tvproc eggtv:tv {nick host hand chan {text ""}} {if {[lsearch -glob [channel info $chan] "+eggtv"] > -1} {if {[strlwr $text]=="lnk"} {if {[lsearch -glob [channel info $chan] "+eggtvcolors"] > -1} {set _topic "\00312,01 L\00303,01N\00304,01K \00399,99"} else {set _topic "LNK"}set _get "lnk"set _last "lrt"} elseif {[strlwr $text]=="lrt"} {if {[lsearch -glob [channel info $chan] "+eggtvcolors"] > -1} {set _topic "\00308,02 L\00300,02RT \00399,99"} else {set _topic "LRT"}set _get "lrt"set _last "tv3"} elseif {[strlwr $text]=="tv3"} {if {[lsearch -glob [channel info $chan] "+eggtvcolors"] > -1} {set _topic "\00300,02 TV\00308,023 \00399,99"} else {set _topic "TV3"}set _get "tv3"set _last "tv4"} elseif {[strlwr $text]=="tv4"} {if {[lsearch -glob [channel info $chan] "+eggtvcolors"] > -1} {set _topic "\00312,15 TV4 \00399,99"} else {set _topic "TV4"}set _get "tv4"set _last "11 kanalo tv"} elseif {[strlwr $text]=="11k"} {if {[lsearch -glob [channel info $chan] "+eggtvcolors"] > -1} {set _topic "\00300,06 11 Kanalo \00311,06TV \00399,99"} else {set _topic "11 Kanalo TV"}set _get "11 kanalo tv"set _last "ar tv"} elseif {[strlwr $text]=="artv"} {if {[lsearch -glob [channel info $chan] "+eggtvcolors"] > -1} {set _topic "\00300,02 ART\00300,07V \00399,99"} else {set _topic "AR TV"}set _get "ar tv"set _last "balticum tv"} elseif {[strlwr $text]=="balticum"} {if {[lsearch -glob [channel info $chan] "+eggtvcolors"] > -1} {set _topic "\00308,02 Balticum \00300TV \00399,99"} else {set _topic "Balticum TV"}set _get "balticum tv"set _last "рiauliш tv"} elseif {[strlwr $text]=="siauliu"} {if {[lsearch -glob [channel info $chan] "+eggtvcolors"] > -1} {set _topic "\00300,01 Siauliu \00300,02 TV \00399,99"} else {set _topic "Siauliu TV"}set _get "рiauliш tv"set _last "init tv"} elseif {[strlwr $text]=="init"} {if {[lsearch -glob [channel info $chan] "+eggtvcolors"] > -1} {set _topic "\00312,11 Init \00300,04 TV \00399,99"} else {set _topic "Init TV"}set _get "init tv"set _last "pan tv"} elseif {[strlwr $text]=="pantv"} {if {[lsearch -glob [channel info $chan] "+eggtvcolors"] > -1} {set _topic "\00300,01 Pan TV \00399,99"} else {set _topic "Pan TV"}set _get "pan tv"set _last "tango tv"} elseif {[strlwr $text]=="tango"} {if {[lsearch -glob [channel info $chan] "+eggtvcolors"] > -1} {set _topic "\00301,04 Tango\00300,04TV \00399,99"} else {set _topic "Tango TV"}set _get "tango tv"set _last "vilniaus tv"} elseif {[strlwr $text]=="vilniaus"} {if {[lsearch -glob [channel info $chan] "+eggtvcolors"] > -1} {set _topic "\00300,10 Vilniaus\00300,01 TV \00399,99"} else {set _topic "Vilniaus TV"}set _get "vilniaus tv"set _last "ntv nase kino"} elseif {[strlwr $text]=="ntv-nasekino"} {if {[lsearch -glob [channel info $chan] "+eggtvcolors"] > -1} {set _topic "\00300,03 NTV\00300,01 Nase Kino \00399,99"} else {set _topic "NTV Nase Kino"}set _get "ntv nase kino"set _last "ort"} elseif {[strlwr $text]=="ort"} {if {[lsearch -glob [channel info $chan] "+eggtvcolors"] > -1} {set _topic "\00312,08 ORT \00399,99"} else {set _topic "ORT"}set _get "ort"set _last "rusijos tv"} elseif {[strlwr $text]=="rtr"} {if {[lsearch -glob [channel info $chan] "+eggtvcolors"] > -1} {set _topic "\00300,02 Rusijos TV \00399,99"} else {set _topic "Rusijos TV"}set _get "rusijos tv"set _last "tnt"} elseif {[strlwr $text]=="tnt"} {if {[lsearch -glob [channel info $chan] "+eggtvcolors"] > -1} {set _topic "\00300,02 TNT \00399,99"} else {set _topic "TNT"}set _get "tnt"set _last "lenkijos tv"} elseif {[strlwr $text]=="lenkijos"} {if {[lsearch -glob [channel info $chan] "+eggtvcolors"] > -1} {set _topic "\00304,08 Lenkijos TV \00399,99"} else {set _topic "Lenkijos TV"}set _get "lenkijos tv"set _last "lenkijos tv2"} elseif {[strlwr $text]=="lenkijos2"} {if {[lsearch -glob [channel info $chan] "+eggtvcolors"] > -1} {set _topic "\00308,04 Lenkijos TV2 \00399,99"} else {set _topic "Lenkijos TV2"}set _get "lenkijos tv2"set _last "polsat"} elseif {[strlwr $text]=="polsat"} {if {[lsearch -glob [channel info $chan] "+eggtvcolors"] > -1} {set _topic "\00308,01 Polsat \00399,99"} else {set _topic "Polsat"}set _get "polsat"set _last "tv polonia"} elseif {[strlwr $text]=="polonia"} {if {[lsearch -glob [channel info $chan] "+eggtvcolors"] > -1} {set _topic "\00300,01 TVPOL\00304,01ONIA \00399,99"} else {set _topic "TV Polonia"}set _get "tv polonia"set _last "lnt"} elseif {[strlwr $text]=="lnt"} {if {[lsearch -glob [channel info $chan] "+eggtvcolors"] > -1} {set _topic "\00300,02 L N T \00399,99"} else {set _topic "LNT"}set _get "lnt"set _last "ard"} elseif {[strlwr $text]=="ard"} {if {[lsearch -glob [channel info $chan] "+eggtvcolors"] > -1} {set _topic "\00300,12 AR\00300,02D \00399,99"} else {set _topic "ARD"}set _get "ard"set _last "dsf"} elseif {[strlwr $text]=="dsf"} {if {[lsearch -glob [channel info $chan] "+eggtvcolors"] > -1} {set _topic "\00301,08 DSF \00399,99"} else {set _topic "DSF"}set _get "dsf"set _last "pro 7"} elseif {[strlwr $text]=="pro7"} {if {[lsearch -glob [channel info $chan] "+eggtvcolors"] > -1} {set _topic "\00300,05 PRO\00304,05 7 \00399,99"} else {set _topic "PRO 7"}set _get "pro 7"set _last "rtl"} elseif {[strlwr $text]=="rtl"} {if {[lsearch -glob [channel info $chan] "+eggtvcolors"] > -1} {set _topic "\00300,04 R \00300,08 T \00300,02 L \00399,99"} else {set _topic "RTL"}set _get "rtl"set _last "rtl 2"} elseif {[strlwr $text]=="rtl2"} {if {[lsearch -glob [channel info $chan] "+eggtvcolors"] > -1} {set _topic "\00300,02 RTL II \00399,99"} else {set _topic "RTL 2"}set _get "rtl 2"set _last "sat 1"} elseif {[strlwr $text]=="sat1"} {if {[lsearch -glob [channel info $chan] "+eggtvcolors"] > -1} {set _topic "\00300,12 SAT \00300,03 1 \00399,99"} else {set _topic "SAT 1"}set _get "sat 1"set _last "vox"} elseif {[strlwr $text]=="vox"} {if {[lsearch -glob [channel info $chan] "+eggtvcolors"] > -1} {set _topic "\00301,05 V\00304,05O\00301,05X \00399,99"} else {set _topic "VOX"}set _get "vox"set _last "zdf"} elseif {[strlwr $text]=="zdf"} {if {[lsearch -glob [channel info $chan] "+eggtvcolors"] > -1} {set _topic "\00308,01 ZDF \00399,99"} else {set _topic "ZDF"}set _get "zdf"set _last "bbc tv"} elseif {[strlwr $text]=="bbc"} {if {[lsearch -glob [channel info $chan] "+eggtvcolors"] > -1} {set _topic "\00300,14 BBC \00399,99"} else {set _topic "BBC"}set _get "bbc tv"set _last "cnn"} elseif {[strlwr $text]=="cnn"} {if {[lsearch -glob [channel info $chan] "+eggtvcolors"] > -1} {set _topic "\00304,14 CNN \00399,99"} else {set _topic "CNN"}set _get "cnn"set _last "discovery"} elseif {[strlwr $text]=="discovery"} {if {[lsearch -glob [channel info $chan] "+eggtvcolors"] > -1} {set _topic "\00300,02 Disco\00315,02very \00399,99"} else {set _topic "Discovery"}set _get "discovery"set _last "eurosport"} elseif {[strlwr $text]=="eurosport"} {if {[lsearch -glob [channel info $chan] "+eggtvcolors"] > -1} {set _topic "\00300,02 Euro\00300,04sport \00399,99"} else {set _topic "Eurosport"}set _get "eurosport"set _last "mtv"} elseif {[strlwr $text]=="mtv"} {if {[lsearch -glob [channel info $chan] "+eggtvcolors"] > -1} {set _topic "\00300,01 M\00315,01TV \00399,99"} else {set _topic "MTV"}set _get "mtv"set _last "national geographic"} elseif {[strlwr $text]=="ngeographic"} {if {[lsearch -glob [channel info $chan] "+eggtvcolors"] > -1} {set _topic "\00308,01 National \00315,01Geographic \00399,99"} else {set _topic "National Geographic"}set _get "national geographic"set _last "rai due"} elseif {[strlwr $text]=="raidue"} {if {[lsearch -glob [channel info $chan] "+eggtvcolors"] > -1} {set _topic "\00312,05 RAI \00307,05Due \00399,99"} else {set _topic "RAI Due"}set _get "rai due"set _last "rai uno"} elseif {[strlwr $text]=="raiuno"} {if {[lsearch -glob [channel info $chan] "+eggtvcolors"] > -1} {set _topic "\00312,12 RAI \00307,12Uno \00399,99"} else {set _topic "RAI Uno"}set _get "rai uno"set _last "travel"} elseif {[strlwr $text]=="travel"} {if {[lsearch -glob [channel info $chan] "+eggtvcolors"] > -1} {set _topic "\00301,09 Travel \00399,99"} else {set _topic "Travel"}set _get "travel"set _last "tv 1000"} elseif {[strlwr $text]=="tv1000"} {if {[lsearch -glob [channel info $chan] "+eggtvcolors"] > -1} {set _topic "\00300,02 TV \00301,08 1000 \00399,99"} else {set _topic "TV 1000"}set _get "tv 1000"set _last "tv 5"} elseif {[strlwr $text]=="tv5"} {if {[lsearch -glob [channel info $chan] "+eggtvcolors"] > -1} {set _topic "\00300,01 TV5 \00399,99"} else {set _topic "TV5"}set _get "tv5"set _last ""} else {putnotc $nick "\002TV Kanalai\002: LNK, LRT, TV3, TV4, 11K, ARTV, BALTICUM, SIAULIU, INIT, PANTV, TANGO, VILNIAUS, NTV-NASEKINO, ORT, RTR, TNT, LENKIJOS, LENKIJOS2, POLSAT, POLONIA, LNT, ARD, DSF, PRO7, RTL, RTL2, SAT1, VOX, ZDF, BBC, CNN, DISCOVERY, EUROSPORT, MTV, NGEOGRAPHIC, RAIDUE, RAIUNO, TRAVEL, TV1000, TV5. \002Rasyk !TV KANALAS\002"return}}set sock [egghttp:geturl www.manotv.lt/cgi-bin/tv_now.cgi [list eggtv:get_tv $nick $chan $_get $_last $_topic]]}# -proc eggtv:get_adv {nick chan first last topic sock} {set buffer [egghttp:data $sock]egghttp:cleanup $sockset i 399set _found 0while {$i<441&&$_found==0} {set _tmp [eggtv:format [lindex [split $buffer "\n"] $i]]if {[strlwr [lindex [split $_tmp "\>"] 1]]==[strlwr $first]} {set _found 1}incr i}if {$_found==1} {set _retline ""set _was 0while {$i<441&&$_was==0} {set _tmp [eggtv:format [lindex [split $buffer "\n"] $i]]if {$_tmp!="/dl"&&[strlwr [lindex [split $_tmp "\>"] 1]]!=[strlwr $last]} {append _retline "$_tmp "} else {set _was 1}incr i}eggtv:msg $nick $chan $topic [eggtv:adv_format [eggtv:format $_retline]]} else {putnotc $nick "\002\[error\]\002 Siuo metu negaliu nustatyti ka rodo \002$topic\002."}}proc eggtv:get_tv {nick chan get last topic sock} {set buffer [egghttp:data $sock]egghttp:cleanup $sockset i 88set yes 0while {$yes==0&&$i<200} {set _line [eggtv:format [lindex [split $buffer "\n"] $i]]set _nextline [eggtv:format [lindex [split $buffer "\n"] [expr $i+1]]]set _mas [split "$_line" "\;"]set _len [expr [llength $_mas]-2]set _len2 [expr [llength $_mas]-1]if {[strlwr [lindex $_mas $_len]]=="[strlwr $get]"} {set yes 1set _retline "[eggtv:first_bold [lindex $_mas $_len2]]"if {[strlen $_nextline]<6} {set _nextline [eggtv:format [lindex [split $buffer "\n"] [expr $i+2]]]}set _mas2 [split "$_nextline" "\;"]if {[strlwr [lindex $_mas2 $_len]]!="[strlwr $last]"} {append _retline " [eggtv:first_bold [lindex $_mas2 0]]"}}incr i}if {$yes==0} {putnotc $nick "\002\[error\]\002 Siuo metu negaliu nustatyti ka rodo \002$topic\002."} else {eggtv:msg $nick $chan $topic $_retline}}proc eggtv:msg {nick chan topic what} {putquick "NOTICE $nick :--== Generated by \002AciD\002 ==--"putquick "NOTICE $nick :--== Dabar $topic Programa ==--"putquick "notice $nick :$what"}proc eggtv:format {args} {set _ret ""for {set i 1} {$i<[expr [strlen $args]-1]} {incr i} {set _tmp1 "[stridx $args $i]"set _tmp2 "[stridx $args [expr $i+1]]"if {$_tmp1!=" "&&$_tmp2!=" "} { append _ret "$_tmp1" }if {$_tmp1!=" "&&$_tmp2==" "} { append _ret "$_tmp1"append _ret " " }}set _rett ""set was 0for {set i 0} {$i<[expr [strlen $_ret]]} {incr i} {if {[stridx $_ret $i]=="\&"} {set i [expr $i + 5]}if {[stridx $_ret $i]=="\<"} {set was 1}if {$was==0&&[stridx $_ret $i]!="\n"} {append _rett [stridx $_ret $i]}if {[stridx $_ret $i]=="\>"} {set was 0}}set _ret ""set was 0for {set i 0} {$i<[expr [strlen $_rett]]} {incr i} {if {[stridx $_rett $i]=="\["} {set was 1}if {$was==0} {append _ret [stridx $_rett $i]}if {[stridx $_rett $i]=="\]"} {set was 0}}return $_ret }proc eggtv:adv_format {args} {set _ret ""set _tmp "[lindex [split $args "//"] 0]"for {set i 1} {$i<[expr [strlen $_tmp]-1]} {incr i} {if {[eggtv:number [stridx $_tmp $i]]} {append _ret "\002[stridx $_tmp $i]\002"} else {append _ret "[stridx $_tmp $i]"}}return $_ret}proc eggtv:number {test} {foreach i [split $test {}] {if ![string match \[0-9\] $i] { return 0 }}return 1 }proc eggtv:first_bold {args} {set _ret "\002"set _len [strlen $args]for {set i 1} {$i<[expr $_len - 1]} {incr i} {if {$i==5} {append _ret "[stridx $args $i]\002"} else {append _ret "[stridx $args $i]"}}return $_ret}# -setudef flag eggtvsetudef flag eggtvcolorsputlog "TV Script loaded"## END
Must Be:

Code: 

-SpawN- --== Dabar  TV3  rodo: ==---SpawN- 7.25 "Simpsonai" ("The Simpsons"). JAV. Animacinis serialas. VIII dalis. 26 s. (N-7) (k.) -SpawN- 7.55 "Marina" ("Marina"). JAV, Meksika. 2006. Drama. Reю. David Posada. Vaidina Sandra Echeverria, Manolo Cardona, Aylin Mujica, Humberto Zurita. 12 s. (k.)
But Is:

Code: 

-SpawN- --== Dabar  TV3  rodo: ==---SpawN- 7.25 "Simpsonai" ("The Simpsons"). JAV. Animacinis serialas. VIII dalis. 26 s. (N-7) (k.) 7.55 "Marina" ("Marina"). JAV, Meksika. 2006. Drama. Reю. David Posada. Vaidina Sandra Echeverria, Manolo Cardona, Aylin Mujica, Humberto Zurita. 12 s. (k.)
Help edit the Output String pls :)

Statistics: Posted by AciD — Thu Nov 29, 2007 1:52 am

]]>