SI
SI
discoversearch

We've detected that you're using an ad content blocking browser plug-in or feature. Ads provide a critical source of revenue to the continued operation of Silicon Investor.  We ask that you disable ad blocking while on Silicon Investor in the best interests of our community.  If you are not using an ad blocker but are still receiving this message, make sure your browser's tracking protection is set to the 'standard' level.
Technology Stocks : Silicon Graphics, Inc. (SGI)
SGI 92.07-1.5%Nov 11 3:59 PM EST

 Public ReplyPrvt ReplyMark as Last ReadFilePrevious 10Next 10PreviousNext  
To: Maher Sid-Ahmed who wrote (8451)12/26/2000 4:49:11 PM
From: Thomas A Watson  Read Replies (1) of 14451
 
Well one can only hope that SGI is selling and maybe beats estimates. But it seems that all is doom and gloom in technology.

Today, I decided to create a script to automate the recovery of intraday I-watch info. this is run on my linux trading station. watman.com

With a list of stocks in a simple text file.

file stock_list
LU
SGI
MIPSB
APLX
MIPS
EGGS
LOR
ELNK
GSTRF
WCOM
MTIC
ADI
IFMX
INTZ

I call a script
get_iwatch stock_list

for each stock it create a jpg file like.
watman.com

to see the symbology of iwatch
iw.thomsoninvest.net

my script...
#! /bin/tcsh
# get_iwatch.com usage: get_iwatch.com stock_list.file [number of cycles]
if ( $1 == "" ) then
echo get_iwatch.com usage: get_iwatch.com stock_list.file
echo stock_list.file MUST be specified
exit
endif
if ( $2 == "" ) then
echo get_iwatch.com No Count set. Loop forever.
@ COUNT = 999999
else
echo get_iwatch.com set for $2 iterations.
@ COUNT = $2
endif

set list = `cat $1`

if ( !( -e TMP_DIR ) ) then
echo making subdir TMP_DIR
mkdir TMP_DIR
endif

if ( !( -e STOCK ) ) then
echo making subdir STOCK
mkdir STOCK
endif

foreach stock ($list) #make directories to store i_watch data.
if ( !( -e STOCK/$stock ) ) then
echo makeing sugdir STOCK/$stock
echo STOCKS$stock
mkdir STOCK/$stock
endif
end
# example get page esc ? |
# lynx -dump thomsoninvest.net\?ticker=SGI
# example get price gif esc ? |
# thomsoninvest.net
# example get volume gif esc ? |
# thomsoninvest.net
# example get coverage gif esc ? |
# iw.thomsoninvest.net

# example extracting gif number
# lynx -dump thomsoninvest.net\?ticker=SGI | grep activ | grep type=P | awk -F\& '{print $NF}' |awk -F\] '{print $1}'

echo here111
while ( $COUNT ) #get the data

foreach stock ($list) #get each stock iwatch page
set DATE_STAMP = `date | awk '{print "_"$6"_"$1$2$3"_"$4}' | awk -F: '{print $1"_"$2}'`
echo $DATE_STAMP
echo $stock
# e iw.thomsoninvest.net
# lynx -dump iw.thomsoninvest.net\?t=LU\&type=P\&i=3\&l=977861211 >test.gif
# echo -dump iw.thomsoninvest.net\?t=LU\&type=P\&i=3\&l=977861211
# echo -dump iw.thomsoninvest.net\?t=$stock\&type=P\&i=3\&l=977861211

# test dump for lucent
# /usr/bin/lynx -dump thomsoninvest.net\?ticker=LU >TMP_DIR/ipage.txt

/usr/bin/lynx -dump thomsoninvest.net\?ticker=$stock >TMP_DIR/ipage.txt

# extract volume/price gif number
set Vgif_num = `cat TMP_DIR/ipage.txt | grep activity | grep type=V | awk -F\& '{print $NF}' |awk -F\] '{print $1}' `
echo volume $Vgif_num
lynx -dump iw.thomsoninvest.net\?t=$stock\&type=P\&i=3\&l=$Vgif_num >TMP_DIR/$stock"_P.gif"
lynx -dump iw.thomsoninvest.net\?t=$stock\&type=V\&i=3\&l=$Vgif_num >TMP_DIR/$stock"_V.gif"
lynx -dump iw.thomsoninvest.net\?t=$stock >TMP_DIR/$stock"_C.gif"

montage -bg black -geom 430x150 -tile 1X3 TMP_DIR/$stock"_P.gif" TMP_DIR/$stock"_V.gif" TMP_DIR/$stock"_C.gif" TMP_DIR/$DATE_STAMP"_"$stock".gif"
convert -bordercolor black -border 17 -pen white -draw 'text 170,474 "%t"' TMP_DIR/$DATE_STAMP"_"$stock".gif" TMP_DIR/$stock$DATE_STAMP".jpg"
cp TMP_DIR/$stock$DATE_STAMP".jpg" STOCK/$stock #archive by stock directory
rm TMP_DIR/*.gif # clean up

# extract price
#set Pgif_num = `cat TMP_DIR/ipage.txt | grep activity | grep type=V | awk -F\& '{print $NF}' |awk -F\] '{print $1}' `
#echo Price $Pgif_num
# extract coverage
#set Cgif_num = `cat TMP_DIR/ipage.txt | grep coverage | awk -F\& '{print $NF}' |awk -F\] '{print $1}' `
#echo Coverage $Cgif_num
echo Stock $stock Volume $Vgif_num

sleep 5

end # foreach stock ($list) #get each stock iwatch page

@ COUNT--
date >>get_iwatch.log
sleep 900 # 15 minutes
end

exit
####################################################################

tom watson tosiwmee
Report TOU ViolationShare This Post
 Public ReplyPrvt ReplyMark as Last ReadFilePrevious 10Next 10PreviousNext