CrashB
Monday, April 12, 2004
Description: help meh
on *:TEXT:,stock find*:#:{
set %stock.count 0
set %stock.find $3
set %stock.chan $chan
sockclose stockfind
sockopen stockfind forbes.com 80
}
on *:SOCKOPEN:stockfind:{
sockwrite -n stockfind GET /markets/SymbolLookup.jhtml?passName= $+ %stock.find $+ &passType=stock HTTP/1.1
sockwrite -n stockfind Host: forbes.com
sockwrite -n stockfind Connection: keep-alive
sockwrite -n stockfind User-Agent: forbes.com
sockwrite -n stockfind $crlf
}
on *:SOCKREAD:stockfind:{
if ($sockerr > 0) return
else {
sockread %stock.find.tmp
if (*Your*search*has*returned*no*results iswm %stock.find.tmp) { msg %stock.chan Sorry, I have found no results for %stock.find $+ ! }
if <td align="left"><a href= isin %stock.find.tmp { set %stock.data $htmlfree(%stock.find.tmp) }
}
}
change your sockread event
Monday, April 12, 2004 05:36am PDT
on *:SOCKREAD:stockfind:{
if ($sockerr > 0) return
else {
sockread %stock.find.tmp
if (*Your*search*has*returned*no*results iswm %stock.find.tmp) { msg %stock.chan Sorry, I have found no results for %stock.find $+ ! }
if <td align="left"><a href= isin %stock.find.tmp {
if %stock.count == 0 { set %stock.symbol $nohtml(%stock.find.tmp) }
if %stock.count == 1 { set %stock.company $nohtml(%stock.find.tmp) }
if %stock.count == 2 { set %stock.data %stock.symbol %stock.company $nohtml(%stock.find.tmp) }
inc %stock.count
}
}
}
Monday, April 12, 2004 05:48am PDT
on *:SOCKREAD:stockfind:{
if ($sockerr > 0) return
else {
sockread %stock.find.tmp
if (*Your*search*has*returned*no*results iswm %stock.find.tmp) { msg %stock.chan Sorry, I have found no results for %stock.find $+ ! }
if <td align="left"><a href= isin %stock.find.tmp {
if %stock.count == 0 { set %stock.symbol $htmlfree(%stock.find.tmp) }
if %stock.count == 1 { set %stock.company $htmlfree(%stock.find.tmp) }
if %stock.count == 2 { set %stock.data %stock.symbol %stock.company $htmlfree(%stock.find.tmp) }
inc %stock.count
if %stock.data != $null { msg =CrashB %stock.data }
}
}
}
Monday, April 12, 2004 06:10am PDT
on *:SOCKREAD:stockfind:{
if ($sockerr > 0) return
sockread %stock.find.tmp
if (*Your*search*has*returned*no*results iswm %stock.find.tmp) {
msg %stock.chan Sorry, I have found no results for %stock.find $+ !
unset %stock.*
sockclose stockfind
}
if <td align="left"> isin %stock.find.tmp {
if %stock.count == 0 { set %stock.symbol $nohtml(%stock.find.tmp) }
if %stock.count == 1 { set %stock.company $nohtml(%stock.find.tmp) }
if %stock.count == 2 {
msg %stock.chan %stock.find (symbol: %stock.symbol - company: %stock.company - exchange: $nohtml(%stock.find.tmp) $+ )
unset %stock.*
sockclose stockfind
}
else {
inc %stock.count
}
}
}
Monday, April 12, 2004 06:31am PDT
on *:SOCKREAD:stockfind:{
if ($sockerr > 0) return
sockread %stock.find.tmp
if (*Your*search*has*returned*no*results.*Please*try*again. iswm %stock.find.tmp) {
msg %stock.nick Sorry, I have found no results for %stock.find $+ !
unset %stock.*
sockclose stockfind
}
if <td align="left"> isin %stock.find.tmp {
if %stock.count == 0 { set %stock.symbol $nohtml(%stock.find.tmp) }
if %stock.count == 1 { set %stock.company $nohtml(%stock.find.tmp) }
if %stock.count == 2 {
notice %stock.nick %stock.find %bars [^B]Symbol[^B]: %stock.symbol %bars [^B]Company[^B]: %stock.company %bars [^B]Exchange[^B]: $nohtml(%stock.find.tmp) %bars
unset %stock.*
sockclose stockfind
}
else {
inc %stock.count
}
}
}
Monday, April 12, 2004 06:36am PDT
replace:
if (*Your*search*has*returned*no*results iswm %stock.find.tmp) {
with:
if </html> isin %stock.find.tmp {
Submit a comment
Oops! You need to
login or
register before you can post a comment!
