RE: [amibroker] Improving peformance of float analysis with AmiBroker 3.75 beta

["Peter Gialames" <investor@xxxx>]

I am getting an error with the code you posted (attached).

I am currently testing a new DLL from QP so I don't know if this is the
problem.

Peter Gialames

PS GREAT WORK!!! There is allot to digest this week. Thank you very much!

-----Original Message-----
From: Tomasz Janeczko [mailto:amibroker@x...]
Sent: Sunday, September 30, 2001 12:28 PM
To: amibroker@xxxxxxxxxxxxxxx
Subject: [amibroker] Improving peformance of float analysis with AmiBroker
3.75 beta


Hello,

This one is mainly for Peter Gialames and the other users
of QuotesPlus COM objects.

With AmiBroker 3.75 beta you can replace new ActiveXObject
with AFL.CreateStaticObject() function call that creates QP2
ActiveX object only once per AmiBroker session.
The initialization of QP2 is extremely slow so static creation
supported now by AmiBroker gives tremendous performance
gain (20-50 times faster).

Check for yourself

MaxGraph = 9;

EnableScript("jscript");

// this is to show only one entry per stock
ticker = Name();

Float = 0;
<%
CInfo = AFL.CreateStaticObject("QuotesPlus.CompanyInfo"); // NEW
CreateStaticObject !
CInfo.Symbol = AFL("ticker");

// try-catch block handles the situation when
// QuotesPlus object returns strange values

try
{
AFL("Float") = Number( CInfo.Float() )*100000;
}
catch( e )
{
AFL("Float") = 0;
}


%>

cumvol = LastValue( Cum( Volume ) ) - Cum( Volume );
lastrange = cumvol < Float;
dayone = ExRem( lastrange, 0 );

Graph0 = Close;


hh = LastValue( HighestSince( dayone, High ) );
ll = LastValue( LowestSince( dayone, Low ) );

Graph0 = Close;
Graph0Style=64;
Graph0Color=2;

Graph1 = IIf( lastrange, hh, -1e10 );
Graph2 = IIf( lastrange, ll, -1e10 );
Graph1Style = Graph2Style = 1;

===========================
Best regards,
Tomasz Janeczko
===============
AmiBroker - the comprehensive share manager.
http://www.amibroker.com







Your use of Yahoo! Groups is subject to http://docs.yahoo.com/info/terms/



Attachment:
jpg00038.jpg

Attachment: Description: "Description: JPEG image"