Guest User | Sign In

Knowledge Base

Symbols Example

//                                  
 // Sample script for Market Analyst tool scripting
 // This example draws three symbols at price 50, 51, and 55
 //
 
 // This section is where variable are defined that need to be used in both the Init and Process procedures
 var                                
     Symbols : TSymbols; 
 
 // DefineTool is where the settings for the Tool are defined
 // This procedure is called once when the tool is loaded
 // Normally this procedure does not need to be changed
 procedure DefineTool(Tool : TTool);
 begin
     Tool.Name := 'My Symbols';
     Tool.MouseClicks := 1;
     Tool.Hint := '';
     Tool.ToolType := ttDataList;
 end;                                                                        
 
 // Init is called to initialise the tool
 // This procedure is called once when the tool is added to a chart
 procedure Init(Tool : TTool);
 begin
     Symbols := Tool.AddSymbols();
     Symbols.SymbolSize := 24; // in pixels 
     Symbols.AddSymbol(0,now(), 51); // image id, date, price
     Symbols.AddSymbol(5,now()-30, 55);
     Symbols.AddSymbol(3,now()-80, 50);
 end;
 
 // Process is called to calculate and drawn the tool on screen
 // This procedure is called when new data is received or loaded and 
 // when a selection point is moved by the user 
 procedure Process(Tool : TTool; ProcessStart : Integer; ProcessEnd : Integer; DataIn : TDataList);
 begin
 end;

 Last updated Fri, Jan 29 2016 9:33am

Please Wait!

Please wait... it will take a second!