OHLC
This commit is contained in:
@@ -394,10 +394,10 @@ end;
|
|||||||
|
|
||||||
procedure TForm1.OHLCButtonClick(Sender: TObject);
|
procedure TForm1.OHLCButtonClick(Sender: TObject);
|
||||||
const
|
const
|
||||||
numRecs = 1000000;
|
numRecs = 100;
|
||||||
lookback = 100;
|
lookback = 50;
|
||||||
smaSlowLength = 50;
|
smaSlowLength = 20;
|
||||||
smaFastLength = 20;
|
smaFastLength = 10;
|
||||||
begin
|
begin
|
||||||
// 1. Setup
|
// 1. Setup
|
||||||
Memo1.Lines.Clear;
|
Memo1.Lines.Clear;
|
||||||
|
|||||||
Reference in New Issue
Block a user