egghelp/eggheads community Discussion of eggdrop bots, shell accounts and tcl scripts. 2005-03-18T18:02:05-04:00 https://forum.eggheads.org/app.php/feed/topic/9363 2005-03-18T18:02:05-04:00 2005-03-18T18:02:05-04:00 https://forum.eggheads.org/viewtopic.php?p=47892#p47892 <![CDATA[help with quote script]]> here.

Statistics: Posted by greenbear — Fri Mar 18, 2005 6:02 pm

]]> 2005-03-18T17:52:39-04:00 2005-03-18T17:52:39-04:00 https://forum.eggheads.org/viewtopic.php?p=47891#p47891 <![CDATA[help with quote script]]>

Statistics: Posted by EmOuBi — Fri Mar 18, 2005 5:52 pm

]]> 2005-03-18T17:24:21-04:00 2005-03-18T17:24:21-04:00 https://forum.eggheads.org/viewtopic.php?p=47889#p47889 <![CDATA[help with quote script]]>

Code: 

bind pub -|- !blonde pub_discproc pub_disc {nick mask hand channel args} {   global disc   set strBuffer ""   set strJoke "[lindex $disc [rand [llength $disc]]]"   append strBuffer "$strJoke\n"   puthelp "PRIVMSG $channel :$strBuffer"}set disc {"blaaaa blaaaaaaaaaa blaaaaaaa""abbsabsabsa ds dgdgdgdgd d ssddddddddgggg""saggggggggggsgasggsa sag gsa gdd gd dh hd"}
Try this (Not tested).

Statistics: Posted by ^DooM^ — Fri Mar 18, 2005 5:24 pm

]]> 2005-03-18T17:12:31-04:00 2005-03-18T17:12:31-04:00 https://forum.eggheads.org/viewtopic.php?p=47888#p47888 <![CDATA[help with quote script]]>
Try changing puthelp to putserv. The script looks fine and I cant see why its not working. Any other guys spot something I have missed?
you missed the fact that any output to server (using putserv, puthelp or putqucik) is truncated on the first occurance of \n

Statistics: Posted by demond — Fri Mar 18, 2005 5:12 pm

]]> 2005-03-18T17:02:18-04:00 2005-03-18T17:02:18-04:00 https://forum.eggheads.org/viewtopic.php?p=47887#p47887 <![CDATA[help with quote script]]>

Statistics: Posted by EmOuBi — Fri Mar 18, 2005 5:02 pm

]]> 2005-03-18T16:59:08-04:00 2005-03-18T16:59:08-04:00 https://forum.eggheads.org/viewtopic.php?p=47886#p47886 <![CDATA[help with quote script]]> Statistics: Posted by ^DooM^ — Fri Mar 18, 2005 4:59 pm

]]> 2005-03-18T16:49:11-04:00 2005-03-18T16:49:11-04:00 https://forum.eggheads.org/viewtopic.php?p=47884#p47884 <![CDATA[help with quote script]]> "This is a\n joke blabla" comes
<botnick> This is a

And that's all. The "joke blabla" is not shown

Statistics: Posted by EmOuBi — Fri Mar 18, 2005 4:49 pm

]]> 2005-03-18T16:39:45-04:00 2005-03-18T16:39:45-04:00 https://forum.eggheads.org/viewtopic.php?p=47882#p47882 <![CDATA[help with quote script]]> Statistics: Posted by ^DooM^ — Fri Mar 18, 2005 4:39 pm

]]> 2005-03-18T16:33:52-04:00 2005-03-18T16:33:52-04:00 https://forum.eggheads.org/viewtopic.php?p=47879#p47879 <![CDATA[help with quote script]]>

Statistics: Posted by EmOuBi — Fri Mar 18, 2005 4:33 pm

]]> 2005-03-18T16:26:10-04:00 2005-03-18T16:26:10-04:00 https://forum.eggheads.org/viewtopic.php?p=47878#p47878 <![CDATA[help with quote script]]>

Code: 

\n
in where you want the line to break to a new line

HTH

Statistics: Posted by ^DooM^ — Fri Mar 18, 2005 4:26 pm

]]> 2005-03-18T15:00:54-04:00 2005-03-18T15:00:54-04:00 https://forum.eggheads.org/viewtopic.php?p=47862#p47862 <![CDATA[help with quote script]]>
The bot will tell jokes about blondes when someone types !blonde in the chan. The problem is that some jokes are 300-400+ letters and they are not displaying all.

I want if the joke is more then 200 symbols to wrap it. For example if the joke is:

Code: 

<botnick> This is a very long joke about one blonde and you will not see it
The bot must say like this:

Code: 

<botnick> This is a very long<botnick> joke about one blonde<botnick> and you will not see it

Here's the quote.tcl :

Code: 

bind pub -|- !blonde pub_discproc pub_disc {nick mask hand channel args} {   global disc   puthelp "PRIVMSG $channel :[lindex $disc [rand [llength $disc]]]"   }set disc {"blaaaa blaaaaaaaaaa blaaaaaaa""abbsabsabsa ds dgdgdgdgd d ssddddddddgggg""saggggggggggsgasggsa sag gsa gdd gd dh hd"}

Statistics: Posted by EmOuBi — Fri Mar 18, 2005 3:00 pm

]]>