|
PureBytes Links
Trading Reference Links
|
Hi all,
I'm having problems with Yahoo 'current' data for the Italian market since US Yahoo servers are now storing Turnover figures instead of Volume figures and the series have become inconsistent.
A solution would be to download the quotes from Italian Yahoo 'current' servers that for the while are still storing the right figures.
Marcin has kindly suggested me to try to adapt a script from TJ's newsletter of 2001 (http://www.amibroker.com/newsletter/02-2001.html) but that seems to be well beyond my abilities.
I've changed the constants and tried the script. I'm getting an error at line 43 (should be FileSys = new ActiveXObject( "Scripting.NOFileSystemObject" )): "automation server cannot create the object". Beside that, I'm not sure that this script will download 'current' quotes since it's been thought to download historical quotes.
Does anyone has any hint about that or better a script to adapt?
Thanks,
Franco
The script:
--------------------------------------------------------------------------------
/*
** AmiBroker/Win32 scripting Example
**
** Language: JavaScript (Windows Scripting Host)
**
**
*/
/**************************************************************/
/* Constants */
/**************************************************************/
/* The ticker to check */
ChkTicker = "^MIBTEL";
/* The folder where the files will be downloaded */
DestDir = "C:\\YAHOO\\";
/* The name and the path to downloader program */
DownloaderPrg = "URLGet.exe";
/* Force download - if true causes downloading data file */
/* even if it exists on the local drive */
ForceDownloadFlag = false;
/* URL from where data are downloaded */
/* Note that australian-stockmarket site changed directory for 2001 quotes */
URLPrefix = "http://it.old.finance.yahoo.com/d/";;
/* extension of file name, YYYYMMDD will be prepended */
FileExt = ".prn";
/* max number of days to download when history is empty */
nMaxHistoryLen = 365;
/**************************************************************/
/* Main part */
/**************************************************************/
/* Create AmiBroker app object */
AmiBroker = new ActiveXObject( "Broker.Application" );
/* ... and file system object */
FileSys = new ActiveXObject( "Scripting.NOFileSystemObject" );
WshShell = new ActiveXObject( "WScript.Shell" );
var MiliSecInDay = 24 * 60 * 60 * 1000;
function Download( URL, filename )
{
if( ! ForceDownloadFlag && FileSys.FileExists( filename ) ) return true;
if( WshShell.Run( DownloaderPrg + " " + URL + " " + filename, 0, true ) == 0 ) return true;
WScript.echo("Download of " + URL + " failed." );
return false;
}
function Import( filename )
{
try
{
AmiBroker.Import( 0, filename, "prnn.format" );
}
catch( e )
{
return false;
}
/* refresh ticker list and windows */
AmiBroker.RefreshAll();
return true;
}
function CheckFolder()
{
if( ! FileSys.FolderExists( DestDir ) )
{
FileSys.CreateFolder( DestDir );
}
}
function GetNumberOfDaysToLoad()
{
var Today = new Date();
var LastDate = new Date();
LastDate.setDate( LastDate.getDate() - nMaxHistoryLen ); // one year
if( AmiBroker.Stocks.Count > 0 )
{
nQty = AmiBroker.Stocks( ChkTicker ).Quotations.Count;
if( nQty > 0 )
{
LastDate = new Date( AmiBroker.Stocks( ChkTicker ).Quotations( nQty - 1 ).Date );
}
}
// the difference is in milliseconds
return ( Math.floor( (Today - LastDate)/MiliSecInDay ) );
}
function IsValidDatabase()
{
if( AmiBroker.Stocks.Count > 0 )
{
try
{
return AmiBroker.Stocks( ChkTicker ).Ticker == ChkTicker;
}
catch( e )
{
WScript.echo("The database currently loaded into AmiBroker does not have " + ChkTicker + "\nSo I guess this is not correct database.\nUpdate failed.");
}
}
return false;
}
function Main()
{
bOK = true;
if( ! IsValidDatabase() ) return;
var CurDate = new Date();
var NumDays = GetNumberOfDaysToLoad();
WScript.echo("Your database is " + NumDays + " day(s) old.\n" + (NumDays > 0 ? "Downloading missing quotes" : "No update is needed" ) );
CheckFolder();
for( i = 0; i < NumDays; i++ )
{
if( CurDate.getDay() > 0 && CurDate.getDay() < 6 )
{
// bussiness day
y = CurDate.getFullYear();
m = CurDate.getMonth() + 1;
d = CurDate.getDate();
bOK = true;
filename = y + ( m < 10 ? "0" : "" ) + m + ( d < 10 ? "0" : "" ) + d + FileExt;
URL = URLPrefix + filename;
if( y == 2001 && URLPrefix2001 != "" )
{
URL = URLPrefix2001 + filename;
}
if( Download( URL, DestDir + filename ) )
{
if( ! Import( DestDir + filename ) ) bOK = false;
}
else
{
bOK = false;
}
if( ! bOK && WshShell.popup( "The download and/or import of the " + filename + " has failed.\nThis can be because the data are not available or network connection problem.\nDo you want to abort?" , 0, "Abort updating", 4 + 256 ) == 6 )
{
break;
}
}
CurDate.setDate( CurDate.getDate() - 1 );
}
if( bOK ) WScript.echo("Update script finished. Your database is now up-to-date" );
else WScript.echo("Update script finished. There were, however, some errors during download/import");
}
Main();
------------------------ Yahoo! Groups Sponsor --------------------~-->
Try Online Currency Trading with GFT. Free 50K Demo. Trade
24 Hours. Commission-Free.
http://us.click.yahoo.com/RvFikB/9M2KAA/U1CZAA/GHeqlB/TM
--------------------------------------------------------------------~->
Please note that this group is for discussion between users only.
To get support from AmiBroker please send an e-mail directly to
SUPPORT {at} amibroker.com
For other support material please check also:
http://www.amibroker.com/support.html
Yahoo! Groups Links
<*> To visit your group on the web, go to:
http://groups.yahoo.com/group/amibroker/
<*> To unsubscribe from this group, send an email to:
amibroker-unsubscribe@xxxxxxxxxxxxxxx
<*> Your use of Yahoo! Groups is subject to:
http://docs.yahoo.com/info/terms/
|