int init() { #define WT_INFO_NAME "info" ObjectCreate(WT_INFO_NAME, OBJ_LABEL, 0, 0, 0); // Creating obj. ObjectSet(WT_INFO_NAME, OBJPROP_CORNER, 0); // Reference corner ObjectSet(WT_INFO_NAME, OBJPROP_XDISTANCE, 10); // X coordinate ObjectSet(WT_INFO_NAME, OBJPROP_YDISTANCE, 15); // Y coordinate //---- return (0); }
SFUtils::ObjectSet SFUtils::getAllInstanceEquivalent( Udm::Object object ) { Udm::Object archetype = getTopArchetype( object ); if ( archetype == Udm::null ) return ObjectSet(); ObjectList objectList; objectList.push_back( archetype ); for( ObjectList::iterator oblItr = objectList.begin() ; oblItr != objectList.end() ; (void)++oblItr ) { ObjectSet objectSet = oblItr->instances(); objectList.insert( objectList.end(), objectSet.begin(), objectSet.end() ); } return ObjectSet( objectList.begin(), objectList.end() ); }
SFUtils::ObjectSet SFUtils::getAllInstanceEquivalent( Udm::Object object ) { Udm::Object archetype = getTopArchetype( object ); if ( archetype == Udm::null ) return ObjectSet(); ObjectList objectList; /*objectList.push_back( archetype ); for( ObjectList::iterator oblItr = objectList.begin() ; oblItr != objectList.end() ; (void)++oblItr ) {*/ ObjectSet objectSet =archetype.instances(); for(ObjectSet::iterator obj_it=objectSet.begin();obj_it!=objectSet.end();++obj_it) { if(isFromSameSignalFlowModel(*obj_it)) objectList.push_back(*obj_it); } // objectList.insert( objectList.end(), objectSet.begin(), objectSet.end() ); //} return ObjectSet( objectList.begin(), objectList.end() ); }
//+------------------------------------------------------------------+ //| Custom indicator initialization function | //+------------------------------------------------------------------+ int init() { IndicatorBuffers(7); //---- drawing settings SetIndexStyle(0,DRAW_SECTION); //---- indicator buffers mapping SetIndexBuffer(0,MasterIndicator); SetIndexBuffer(1,SNN_Indicator); SetIndexBuffer(2,ZigzagBuffer); SetIndexBuffer(3,HighMapBuffer); SetIndexBuffer(4,LowMapBuffer); SetIndexBuffer(5,CompraE_S1); SetIndexBuffer(6,VentaE_S1); SetIndexEmptyValue(0,0.0); SetIndexEmptyValue(1,0.0); SetIndexEmptyValue(2,0.0); SetIndexEmptyValue(5,0.0); SetIndexEmptyValue(6,0.0); //---- indicator short name IndicatorShortName("H5PHET - Master Trainer 2 ("+pipsTPSL+","+maxDias+","+numDias+")"); //---- initialization done PrimeraVez=0; // Para que se ejecute solo una vez después de la inicialización. // agregado por H // new label object ObjectDelete("label_object2"); if(!ObjectCreate("label_object2", OBJ_LABEL, 0, 0, 0)) { Print("error: cant create label_object! code #",GetLastError()); return(0); } ObjectSet("label_object2", OBJPROP_XDISTANCE, 250); ObjectSet("label_object2", OBJPROP_YDISTANCE, 0); ObjectSetText("label_object2", "H5PHET - Master Trainer 2", 10, "Times New Roman", Green); caso1=0; caso2=0; caso3_1=0; caso3_2=0; maxMinutos=maxDias*1440; return(0); }
//----------------------------------------------------------------------------------------------- int start() { // E Farrell 2013 // Store these values at the start // because they are dynamic and // get changed during processing later. int store_bars = Bars; int store_indicator_counted = IndicatorCounted(); int store_counted_bars = store_bars - store_indicator_counted - 1; // Three ways of debugging: // Alert(...): display popup MessageBox // Comment(...): display on left corner of MAIN chart // Print(...): write to "experts log" if (DEBUG == 1) { // Print msg to "Experts Log" // i.e. not to debug file bar_info = ""; bar_info = StringConcatenate(bar_info, "Store_bars: ", DoubleToStr(store_bars,0), "; "); bar_info = StringConcatenate(bar_info, "store_indicator_counted: ", DoubleToStr(store_indicator_counted,0), "; "); Print (bar_info); } // Create X-Axis line along zero value ObjectCreate ("X-Axis", OBJ_HLINE, 1, 0, 0); ObjectSet ("X-Axis", OBJPROP_COLOR, Black); ObjectSet ("X-Axis", OBJPROP_WIDTH, 2); // vols[] // Compute stochastic volatility calc_volatility (store_bars, store_counted_bars); // levy_signal[] // Compute Levy Index // of Closing Price (i.e. the signal) calc_alpha_signal (Close, store_counted_bars); // levy_vol[] // Compute Levy Index // of stochastic volatility. calc_alpha_volatility (vols, store_counted_bars); // phase_wrapped[] // Compute WRAPPED phase // of levy_signal[] and levy_vol[]. // i.e. instantaneous phase between -PI and +PI calc_phase (store_counted_bars); // Make a copy of the "phase_wrapped" array. // The new copy "phase_unwrapped" will be // worked on by the "calc_unwrap" function. for (int i = store_counted_bars; i >= 0; i--) { phase_unwrapped[i] = phase_wrapped[i]; } // phase_unwrapped[] // UNWRAP the instantaneous phase calc_unwrap (phase_unwrapped, store_counted_bars); // least_squares_line[] // Compute regression line for unwrapped phase calc_regression (phase_unwrapped, phase_lookback); // phase_adjusted[] // Create a "lower" unwrapped Phase which hugs the x-axis calc_phase_adjusted (phase_lookback); return(0); }