By napa182 on Dec 29, 2009!!UPDATED!!
Ok i got around to updating this snippet
Copy/paste into a new remote of ur bot
Trigger is @tfln
Ex:
<~napa182> @tfln
<&Sick0> :[Text From Last Night]: (810): This ginger kid smells like a queef popsicle http://tfl.nu/hm2k
<~napa182> @tfln
<&Sick0> :[Text From Last Night]: (216): I don't usually arrange sex via text message http://tfl.nu/akrs
<~napa182> @tfln
<&Sick0> :[Text From Last Night]: (989): Just had to reach into my sister's bag and shut off her vibrator so my parents wouldn't hear it. I am the world's greatest brother. http://tfl.nu/be9n
Feel free to rip butcher or strip this code how ever you want idc
on $*:text:/^@tfln$/iS:#:tfln #
on *:input:#:if ($regex($1,/^@tfln$/iS)) tfln #
alias -l tfln {
if (!%f) { inc -u4 %f
if ($sock(tf)) sockclose tf
sockopen tf www.textsfromlastnight.com 80
sockmark tf msg $1 09:[04Text From Lastnight09]:
}
}
on *:load: {
echo 04 -a You Have Just Loaded Napa182's Text From Lastnight Socket
echo 07 -a An irc.EzzyChat.com Production
}
on *:sockopen:tf: {
sockwrite -n tf GET /Random-Texts-From-Last-Night.html?t= HTTP/1.1
sockwrite -n tf Host: $+($sock(tf).addr,$str($crlf,2))
}
on *:sockread:tf: {
var %tf | sockread %tf
if ($regex(%tf,/<textarea.+>(.+?)<\/text.+>/)) {
$sock(tf).mark $regml(1)
sockclose tf
}
}
Cool script.
Can any give me some help on the code?
It works fine,.. but the URL that is shown next to the Text isn't clickable in chat. This may be due to being inline with text, etc.. Could someone show me how to modify this code to make the URL a link to be clickable in chat (specfically a Justin TV chat which runs off IRC) -- or perhaps simply show me how to modify the code to move the URL that is displayed next to the Text on it's own line or put it in a variable so I can msg then channel with it on a second line or wherever?
Thanks
Korvin Wrote:
make one for shoot.com, itl be much harder
Here is the socket for Shi My Dad Says
May not be right for +G rated channels**
trigger is @smds
example:
<@napa182> @smds
<@Sick0> :[Sh** My Dad Says]: "It's never the right time to have kids, but it's always the right time for screwing. God's not a dumbshit. He knows how it works."
<@napa182> @smds
<@Sick0> :[Sh** My Dad Says]: "I just don't wanna celebrate a bullshit holiday. I'm plenty romantic. I own a home and have never shit my pants. Two things you can't say."
on $*:text:/^@smds$/iS:#: {
if (!$hget(smds,c)) {
if ($sock(smds)) sockclose smds
sockopen smds api.twitter.com 80
sockmark smds $r(1,20) $&
$+(/1/statuses/user_timeline/shitmydadsays.rss?page=,$r(1,6))$&
msg # 09:[04Sh** My Dad Says09]:
}
}
on *:load:{
echo 12 -a You Have Just Loaded Napa182's Sh** My Dad Says Snippet
echo 04 -a An Irc.EzzyChat.Com Production.
echo -a 08!!04WARNING08 This snippet may04/08will say curse04/08foul words 04WARNING08!!
}
on *:sockopen:smds: {
sockwrite -nt smds GET $gettok($sock(smds).mark,2,32) HTTP/1.1
sockwrite -nt smds Host: $+($sock(smds).addr,$str($crlf,2))
}
alias -l smds return $regsubex($1-,/("|&)|\46\43(\d+)\73/g,$iif(\1 isnum,$chr(\1),$iif(\1 = ",",&)))
on *:sockread:smds: {
var %smds | sockread %smds
if ($regex(%smds,/<title>.+\72(.+?)<\/title>/)) {
.hinc -mu3 smds c 1
if ($hget(smds,c) = $gettok($sock(smds).mark,1,32)) {
$gettok($sock(smds).mark,3-,32) $smds($regml(1))
sockclose smds
}
}
}
um replace shoot.rss with sh****itmydadsays.rss
=/
You can see the rest using the api and ?page=
-->> http://api.twitter.com/1/statuses/user_timeline/shitmydadsays.rss?page=3
You could also use ?count=200
The max is 200 though.
You can only go back to the last 3200 tweets, so it's probably easier to just random 1 to 3200 and divide by 20 to get the page number.
Edit The guy only has 104 tweets ;/
I agree with Jethro "I think people deserve a chance of freedom of opinion and expression, but in a constructive way, of course."
There are to many people on here now that make accounts and say "that's shit" on every snippet. That isn't constructive and it makes people leave the site.
So to all you fags, if you aint got nothing nice to say. fuck off.
,,|,,_(><)__,,|,, <-- added for napa's amusement
@napa: "also i v never had a prob with useing just sockopen tfl # ;x"
if someone type @tfl in #chan1 and other one type also @tfl in #chan2
then you'll send only for #chan2 bcz the condition "if ($sock(tfl)) .sockclose tfl" will close the first so if u do tfl $+ # the condition will be
"if ($sock(tfl#chan1)) .sockclose tfl#chan1" so you'll replay for all chans
The thing with open source code is it's meant to be taken, altered and used. It's just that some folks don't grasp the concept of credit due. They may do it innocently thinking they can share a piece of code they liked, but others just blatantly take credit for it. They know they're doing it and it will wear at their conscience, so they're doing more harm to themselves than anybody else. The more we ignore our conscience the more hardened we become. These folks are hurting themselves bad enough, so I'm not too happy when they get criticized publicly as that will only lead to more grief. The best thing we can do is simply warn them, delete the snippets and give them a chance to rectify the situation. It could be they just need a good example in their lives.
TheNitelyfe Said:
ffs stupid skiddie wanna be msl coders stealing my snippets ffs
FFSD
??? what ever do you mean? i never stole any script. and as for stupid skiddie um im prob older then you if not then you are old...maybe try and think before you type.
@WorldDMT
the flood control is a force of habbit and the regex is fine in the trigger it's also a force of habbit. also i v never had a prob with useing just sockopen tfl # ;x
hi
i think u dont need a regex u can use only if ($strip($1) = @tfl)
and no need for anti flood like that cz u put allready condition
if ($sock(tfl)) .sockclose tfl
so that what i mean
on *:text:*:#:{
if ($strip($1) == @tfl) {
if ($sock(tfl)) .sockclose tfl
sockopen tfl textsfromlastnight.com 80
sockmark tfl #
}
}
but i think is better to use sockopen tfl $+ #
You know, to think of it, all the snippets submitted on hawkee are going to or will be ripped. The immorality of ripping is that SOME individuals don't appreciate the fact that credits are to be given where they're due to those who submit them originally. Worse of all, they alter a few strings in the scripts and claim they've made them. That's just downright unjust to repackage the "ripped" scripts that way. And that, I reckon, is the main thing most people despise the most.
..