Simple Coding Help - No Promise.
- Thread starter Happy_Singh
- Start date
This problem look likely the old version issue. What you can do is remove after styleOwnScale, ... to ); to verify the problem solve. OR look into your your Version 5.4 ??? 5.40 help hint or guide to see acutally how many arguments required.
This kind of problem don't waste time anymore, upgrade straight to the latest version. no one want to solve for you the old version
This kind of problem don't waste time anymore, upgrade straight to the latest version. no one want to solve for you the old version
try this
this will plot ribbon with blue color when its srtong bullish and red when strong bearish as per your condition
Code:
a = TEMA(C,200) > MA(C,100) AND C > EMA(C,100) AND MA(C,100) > Ref(MA(C,100),-1) AND TEMA(C,200) > Ref(TEMA(C,200),-1) AND ADX(14) > 30 AND ADX(14) > Ref(ADX(14),-1) AND RSI(100) > 55;
b = TEMA(C,200) < MA(C,100) AND C < EMA(C,100) AND MA(C,100) < Ref(MA(C,100),-1)AND TEMA(C,200) < Ref(TEMA(C,200),-1) AND ADX(14) > 30 AND ADX(14) > Ref(ADX(14),-1) AND RSI(100) < 45;
mycT=IIf(a,colorBlue,
IIf(b,colorRed,31));
Plot(6, "", mycT, styleOwnScale| styleArea|styleNoLabel,-0.5,100);
hello to all . the following is an afl for nr4 and nr7 .
i request following modifications
a) instead of nr4 in the above afl i need nr21 . so can any one insert the param option to select according to one's choice of narrow range. so it may be nr4 ,nr7 or nr21 or whatever may be the trader's choice
b) Also can an option be also introduced in parameters to plot on chart what one wants to see eg nr7 only or nr7 +id (inside day.bar) similarly nr 21 only or nr21+id only .
my whole purpose is to make charts look uncluttered !
best regards
i request following modifications
a) instead of nr4 in the above afl i need nr21 . so can any one insert the param option to select according to one's choice of narrow range. so it may be nr4 ,nr7 or nr21 or whatever may be the trader's choice
b) Also can an option be also introduced in parameters to plot on chart what one wants to see eg nr7 only or nr7 +id (inside day.bar) similarly nr 21 only or nr21+id only .
my whole purpose is to make charts look uncluttered !
best regards
PHP:
_SECTION_BEGIN("NR7");
/*********** NR7 System for Chart and Exploration ***********************/
R = H - L;
NR7 = False;
NR4 = False;
m7 = m4 = idm7 = idm4 = idm = 0;
for(i = 7; i < BarCount; i++)
{
if( R[i] < R[i - 1] AND R[i] < R[i -2] AND R[i] < R[i - 3] AND R[i] < R[i - 4] AND R[i] < R[i - 5] AND R[i] < R[i - 6])
{
NR7[i] = True;
m7[i] = 1;
}
}
for(i = 4; i < BarCount; i++)
{
if((R[i] < R[i - 1] AND R[i] < R[i -2] AND R[i] < R[i - 3] ) AND NOT NR7[i])
{
NR4[i] = True;
m4[i] = 1;
}
}
IDNR7 = Inside() * NR7;
IDNR4 = Inside() * NR4;
ID = Inside();
idm7 = IIf(IDNR7, 1, 0);
idm4 = IIf(IDNR4, 1, 0);
idm = IIf(id, 1, 0);
for(i = 1; i < BarCount; i++)
{
if(IDNR7[i] == IDNR7[i - 1]) idm7[i] = idm7[i] + idm7[i - 1];
if(IDNR4[i] == IDNR4[i - 1]) idm4[i] = idm4[i] + idm4[i - 1];
if(NR7[i] == NR7[i - 1]) m7[i] = m7[i] + m7[i - 1];
if(NR4[i] == NR4[i - 1]) m4[i] = m4[i] + m4[i - 1];
if(ID[i] == ID[i - 1]) idm[i] = idm[i] + idm[i - 1];
}
MarkerIDNR7 = MarkerIDNR4 = shapeStar ;
Marker7 = shapeDigit7;
NR7Color = colorBrightGreen;
Marker4 = shapeDigit4;
NR4Color = colorLightOrange;
MarkerID = shapeHollowCircle;
IDColor = colorYellow;
IDNR7Color = colorBrightGreen;
IDNR4Color = colorLightOrange;
MarkerDist = L * 0.995;
IDNRDist = H * 1.03;
if(Status("action") == actionIndicator)
{
_N(Title = StrFormat("{{NAME}}, {{DATE}} ({{INTERVAL}}): {{VALUES}}") + ", Range=" + Prec(R + 0.00001, 2) + ","
+ WriteIf(IDNR7, EncodeColor(colorBrightGreen) + WriteIf(idm7 > 1, StrLeft(NumToStr(idm7), 4), "") + " IDNR7 ", "")
+ WriteIf(IDNR4, EncodeColor(colorLightOrange) + WriteIf(idm4 > 1, StrLeft(NumToStr(idm4), 4), "") + " IDNR4 ", "")
+ WriteIf(NR7 AND NOT ID, EncodeColor(colorBrightGreen) + WriteIf(m7 > 1, StrLeft(NumToStr(m7), 4), "") + " NR7 ", "")
+ WriteIf(NR4 AND NOT ID, EncodeColor(colorLightOrange) + WriteIf(m4 > 1, StrLeft(NumToStr(m4), 4), "") + " NR4 ", "")
+ WriteIf(ID AND NOT NR7 AND NOT NR4, EncodeColor(colorTurquoise) + WriteIf(idm > 1, StrLeft(NumToStr(idm), 4), "") + " Inside Day ", ""));
PlotOHLC(O, H, L, C, "Close", colorLightGrey, styleBar);
PlotShapes(IIf(IDNR7, MarkerIDNR7, shapeNone), IDNR7Color, 0, IDNRDist);
PlotShapes(IIf(IDNR4 AND NOT IDNR7, MarkerIDNR4, shapeNone), IDNR4Color, 0, IDNRDist);
PlotShapes(IIf(NR7 AND NOT ID, Marker7, shapeNone), NR7Color, 0, MarkerDist);
PlotShapes(IIf(NR4 AND NOT NR7 AND NOT ID, Marker4, shapeNone), NR4Color, 0, MarkerDist);
PlotShapes(IIf(ID AND NOT NR7 AND NOT NR4, MarkerID, shapeNone), IDColor, 0, IDNRDist);
}
if(Status("action") == actionExplore)
{
Filter = (m7 > 0) OR (m4 > 0) OR (idm > 0);
SetOption("NoDefaultColumns", True);
AddColumn(DateTime(), "DATE", formatDateTime, colorDefault, colorDefault, 96);
AddTextColumn(Name(), "SYMBOL", 77, colorDefault, colorDefault, 120);
AddColumn(R, "Range", 6.2, colorDefault, colorDefault, 84);
AddColumn(IIf(idm, 48 + idm, 32), "INSIDE", formatChar, colorYellow, IIf(idm, colorLightBlue, colorDefault));
AddColumn(IIf(m4, 48 + m4, 32), "NR4", formatChar, colorYellow, IIf(m4, colorBlue, colorDefault));
AddColumn(IIf(m7, 48 + m7, 32), "NR7", formatChar, colorYellow, IIf(m7, colorGreen, colorDefault));
}
/************************** END OF AFL CODE *****************************/
_SECTION_END();Similar threads
-
Convert Simple Thinkscript Support/Resistance Lines into AFL
- Started by StockTempest
- Replies: 4
-
-
Coding help.........adding exploration for the simple combo
- Started by praveen5344
- Replies: 2
-
Help with simple coding...........SUPERTREND AND STOCHASTICS
- Started by praveen5344
- Replies: 3
-