egghelp.org community Forum Index
[ egghelp.org home | forum home ]
egghelp.org community
Discussion of eggdrop bots, shell accounts and tcl scripts.
 
 FAQFAQ   SearchSearch   MemberlistMemberlist   UsergroupsUsergroups   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

quoteland.tcl - Quotes from quoteland.com

 
Post new topic   Reply to topic    egghelp.org community Forum Index -> Script Support & Releases
View previous topic :: View next topic  
Author Message
username
Op


Joined: 06 Oct 2005
Posts: 196
Location: Russian Federation, Podolsk

PostPosted: Mon Dec 30, 2013 3:28 pm    Post subject: quoteland.tcl - Quotes from quoteland.com Reply with quote

Hello and Happy New Year.
This script post quotes from quoteland.com to channel and save them to txt file, so you can search quotes with keywords and use this script when website down or bot didnt have internet connection.

Quote:

# Random quote.
<tvrsh> !ql
<@bionic> 109 :: Mankind, Man :: My skull, my eyes, my nose three times, my jaw, my shoulder, my chest, two fingers, a knee, everything from the top of my head to the bottom of my feet. Listing what body parts he has broken
<@bionic> Jackie Chan

# Search with keyword 'love'.
<tvrsh> !ql love
<@bionic> 5/6 :: Music :: Mozart has the classic purity of light and the blue ocean; Beethoven the romantic grandeur which belongs to the storms of air and sea, and while the soul of Mozart seems to dwell on the ethereal peaks of Olympus, that of Beethoven climbs shuddering the storm-beaten sides of a Sinai. Blessed be they both! Each represents a moment of the ideal life, each does us good. Our love is due to both.
<@bionic> Henri Frederic Amiel


Download: quoteland.tcl
_________________
Архив TCL скриптов для ботов Eggdrop/Windrop:
http://egghelp.ru/
Back to top
View user's profile Send private message Send e-mail Visit poster's website
play4free2
Voice


Joined: 23 Nov 2013
Posts: 33

PostPosted: Thu Jan 16, 2014 4:12 am    Post subject: Reply with quote

I just started using this, Nice work Smile

I was wondering would it be possible for the out put to look like this to where the authors name is on the same line as the quote:

Quote:
# Random quote.
<tvrsh> !ql
<@bionic> 109 :: Mankind, Man :: My skull, my eyes, my nose three times, my jaw, my shoulder, my chest, two fingers, a knee, everything from the top of my head to the bottom of my feet. Listing what body parts he has broken. Author: Jackie Chan

_________________

420-HIGHTIMES IRC Network
Back to top
View user's profile Send private message Visit poster's website
caesar
Mint Rubber


Joined: 14 Oct 2001
Posts: 3741
Location: Mint Factory

PostPosted: Thu Jan 16, 2014 4:58 am    Post subject: Reply with quote

Try with replacing:
Code:

    ::quoteland::printquote "$quotestotal$quoteland(color2)$quotelandtopic $quoteland(color3)\002::\002 $quoteland(color1)$quotelandquote\003" "$chan"
    ::quoteland::printquote "$quoteland(color2)$quotelandauthor\003" "$chan"

with:
Code:

    ::quoteland::printquote "$quotestotal$quoteland(color2)$quotelandtopic $quoteland(color3)\002::\002 $quoteland(color1)$quotelandquote\003 Author: $quoteland(color2)$quotelandauthor\003" "$chan"

Notice that the second line was removed and first has been changed to include the stuff the second one had.
_________________
Once the game is over, the king and the pawn go back in the same box.
Back to top
View user's profile Send private message
play4free2
Voice


Joined: 23 Nov 2013
Posts: 33

PostPosted: Thu Jan 16, 2014 3:36 pm    Post subject: Reply with quote

I tried it caesar but it gives the same result as the original code it puts the Author on the second line.

I put this line in both places that is appears in the original:
Code:
    ::quoteland::printquote "$quotestotal$quoteland(color2)$quotelandtopic $quoteland(color3)\002::\002 $quoteland(color1)$quotelandquote\003 Author: $quoteland(color2)$quotelandauthor\003" "$chan"


Edit: I read the code further and found the third spot that the code had to be changed.

Edit 2: After changing the the third spot !gl worked fine however !ql <keyword> gives a error. So I just reloaded the original and changed line #150 to:
Code:
    ::quoteland::printquote "$quotestotal$quoteland(color2)$quotelandtopic $quoteland(color3)\002::\002 $quoteland(color1)$quotelandquote $quoteland(color3)\002::\002$quoteland(color2) Author $quoteland(color3)\002::\002 $quoteland(color1)$quotelandauthor\003" "$chan"


Now !ql <keyword> works with No error but it has the same output as the original code.
_________________

420-HIGHTIMES IRC Network
Back to top
View user's profile Send private message Visit poster's website
Display posts from previous:   
Post new topic   Reply to topic    egghelp.org community Forum Index -> Script Support & Releases All times are GMT - 4 Hours
Page 1 of 1

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum


Forum hosting provided by Reverse.net

Powered by phpBB © 2001, 2005 phpBB Group
subGreen style by ktauber