Keresés

Részletes keresés

norris21 Creative Commons License 2009.08.28 0 0 1156
T3N4GLIA Creative Commons License 2009.08.23 0 0 1155
Törölt nick Creative Commons License 2009.08.17 0 0 1154
<font color="#ff0000">rrrrrrrrrrrrrrr</font>
Luigi78 Creative Commons License 2009.08.14 0 0 1153
Luigi78 Creative Commons License 2009.08.14 0 0 1152
Törölt nick Creative Commons License 2009.08.05 0 0 1151
Előzmény: Törölt nick (1144)
mmBálint Creative Commons License 2009.08.05 0 0 1150
mmBálint Creative Commons License 2009.08.05 0 0 1149
mmBálint Creative Commons License 2009.08.04 0 0 1148
mmBálint Creative Commons License 2009.08.01 0 0 1147
mmBálint Creative Commons License 2009.07.18 0 0 1146
mmBálint Creative Commons License 2009.07.12 0 0 1145
Törölt nick Creative Commons License 2009.07.09 0 0 1144
y
Törölt nick Creative Commons License 2009.07.09 0 0 1143
x
u_e Creative Commons License 2009.07.02 0 0 1142
x
Zabás Creative Commons License 2009.07.01 0 0 1141

_SECTION_BEGIN("Price");

downbar = IIf(C < Ref( C, -1 ),1,0);

Color_up = ParamColor("Color_up", colorRed );

Color_down = ParamColor("Color_down", colorGreen );

Color = ParamColor("Color", colorBlack );

Graph0 = Close;

Graph0Style = 128;

barcolor = IIf( downbar==1, Color_up, Color_down);

Graph0BarColor = ValueWhen( barcolor != 0, barcolor );

if(GetPriceStyle()==64) SetBarFillColor( IIf( Close > Open, colorWhite,IIf( downbar==1, Color_up, Color_down)) );

SetChartOptions(0,chartShowArrows|chartShowDates);

_N(Title = StrFormat("{{NAME}} - {{INTERVAL}} {{DATE}} Open %g, Hi %g, Lo %g, Close %g (%.1f%%) Vol " +WriteVal( V, 1.0 ) +" {{VALUES}}", O, H, L, C, SelectedValue( ROC( C, 1 ) ) ));

Plot( C, "Close", Color, styleNoTitle | ParamStyle("Style") | GetPriceStyle() );

SetChartOptions(0,chartShowArrows|chartShowDates);

if( ParamToggle("Tooltip shows", "All Values|Only Prices" ) )

{

ToolTip=StrFormat("Op: %gnHi: %gnLo: %gnCl: %g (%.1f%%)nVolume: "+NumToStr( V, 1 ), O, H, L, C, SelectedValue( ROC( C, 1 )));

}

_SECTION_END();

 

 

 

 

 

_SECTION_BEGIN("vízjel");

U = StrFormat("Ár %g ", C) + Name();

GfxSetOverlayMode(1);

GfxSelectFont("Tahoma", Status("pxheight")/8 );

GfxSetTextAlign( 6 );// center alignment

GfxSetTextColor( ColorRGB( 200, 200, 200 ) );

GfxSetBkMode(1); // transparent

GfxTextOut( U , Status("pxwidth")/2, Status("pxheight")/12);

_SECTION_END();

 

 

_SECTION_BEGIN("MA");

P = ParamField("Price field",-1);

Periods = Param("Periods", 15, 2, 200, 1 );

Plot( MA( P, Periods ), _DEFAULT_NAME(), ParamColor( "Color", colorCycle ), ParamStyle("Style") | styleNoRescale );

_SECTION_END();

_SECTION_BEGIN("BBands");

P = ParamField("Price field",-1);

Periods = Param("Periods", 15, 2, 300, 1 );

Width = Param("Width", 2, 0, 10, 0.05 );

Color = ParamColor("Color", colorLightGrey );

Style = ParamStyle("Style") | styleNoRescale | styleNoRescale;

Plot( BBandTop( P, Periods, Width ), "BBTop" + _PARAM_VALUES(), Color, Style );

Plot( BBandBot( P, Periods, Width ), "BBBot" + _PARAM_VALUES(), Color, Style );

_SECTION_END();

_SECTION_BEGIN("Price Interpretation");

movshort = ParamField("Short Time MA", 8 );

movmed = ParamField("Mid Time MA", 9 );

movlong = ParamField("Long Time MA", 10 );

btop = ParamField("BBTop", 11 );

bbot = ParamField("BBBottom", 12 );

if( Status("action") == actionCommentary )

{

width = btop - bbot;

lslop = LinRegSlope( C, 30 ) + 100;

lslo = LLV( lslop, 90 );

lshi = HHV( lslop, 90 );

lswidth = lshi - lslo;

trend = 100*( lslop - lslo )/lswidth;

mawidth = MA( width, 100 );

relwidth = 100*(width - mawidth)/mawidth;

_N( tname = Name()+"("+FullName()+")" );

printf("Price and moving averages:n");

printf( tname + " has closed " + WriteIf( C > movshort, "above" , "below" ) + " its Short time moving average. ");

printf("nShort time moving average is currently " + WriteIf( movshort > movmed, "above", "below") + " mid-time, AND " + WriteIf( movshort > movlong, "above", "below" ) + " long time moving averages.");

printf("nThe relationship between price and moving averages is: "+

WriteIf( C > movshort AND movshort > movmed, "bullish",

WriteIf( C < movshort AND movshort < movmed, "bearish", "neutral" ) ) + " in short-term, and "+

WriteIf( movshort > movmed AND movmed > movlong , "bullish",

WriteIf( movshort < movmed AND movmed < movlong, "bearish", "neutral" ) ) + " in mid-long term. ");

printf("nnBollinger Bands:n");

printf(tname+ " has closed " +

WriteIf( C < bbot, "below the lower band by " +

WriteVal( 100 *( bbot-C )/ width, 1.1 ) + "%%. " +

WriteIf( trend < 30, " This combined with the steep downtrend can suggest that the downward trend in prices has a good chance of continuing. However, a short-term pull-back inside the bands is likely.",

WriteIf( trend > 30 AND trend < 70, "Although prices have broken the lower band and a downside breakout is possible, the most likely scenario for "+tname+" is to continue within current trading range.", "" ) ), "" ) +

WriteIf( C > btop, "above the upper band by " +

WriteVal( 100 *( C- btop )/ width, 1.1 ) + "%%. " +

WriteIf( trend > 70, " This combined with the steep uptrend suggests that the upward trend in prices has a good chance of continuing. However, a short-term pull-back inside the bands is likely.",

WriteIf( trend > 30 AND trend < 70, "Although prices have broken the upper band and a upside breakout is possible, the most likely scenario for "+tname+" is to continue within current trading range.", "" ) ), "" ) +

WriteIf( C < btop AND ( ( btop - C ) / width ) < 0.5,

"below upper band by " +

WriteVal( 100 *( btop - C )/ width, 1.1 ) + "%%. ",

WriteIf( C < btop AND C > bbot , "above bottom band by " +

WriteVal( 100 *( C - bbot )/ width, 1.1 ) + "%%. ", "" ) ));

printf("n"+

WriteIf( ( trend > 30 AND trend < 70 AND ( C > btop OR C < bbot ) ) AND abs(relwidth) > 40,

"This picture becomes somewhat unclear due to the fact that Bollinger Bands are currently",

"Bollinger Bands are " )+

WriteVal( abs( relwidth ), 1.1 ) + "%% " +

WriteIf( relwidth > 0, "wider" , "narrower" ) +

" than normal.");

printf("n");

printf(

WriteIf( abs( relwidth ) < 40, "The current width of the bands (alone) does not suggest anything conclusive about the future volatility or movement of prices.","")+

WriteIf( relwidth < -40, "The narrow width of the bands suggests low volatility as compared to " + tname + "'s normal range. Therefore, the probability of volatility increasing with a sharp price move has increased for the near-term. "+

"The bands have been in this narrow range for " + WriteVal(BarsSince(Cross(-40,relwidth)),1.0) + " bars. The probability of a significant price move increases the longer the bands remain in this narrow range." ,"")+

WriteIf( relwidth > 40, "The large width of the bands suggest high volatility as compared to " + tname + "'s normal range. Therefore, the probability of volatility decreasing and prices entering (or remaining in) a trading range has increased for the near-term. "+

"The bands have been in this wide range for " + WriteVal(BarsSince(Cross(relwidth,40)),1.0) + " bars.The probability of prices consolidating into a less volatile trading range increases the longer the bands remain in this wide range." ,""));

printf("nnThis commentary is not a recommendation to buy or sell. Use at your own risk.");

}

_SECTION_END();

Zabás Creative Commons License 2009.07.01 0 0 1140
_SECTION_BEGIN("Price");

downbar = IIf(C < Ref( C, -1 ),1,0);
Color_up = ParamColor("Color_up", colorRed );
Color_down = ParamColor("Color_down", colorGreen );
Color = ParamColor("Color", colorBlack );

Graph0 = Close;
Graph0Style = 128;

barcolor = IIf( downbar==1, Color_up, Color_down);
Graph0BarColor = ValueWhen( barcolor != 0, barcolor );

if(GetPriceStyle()==64) SetBarFillColor( IIf( Close > Open, colorWhite,IIf( downbar==1, Color_up, Color_down)) );

SetChartOptions(0,chartShowArrows|chartShowDates);
_N(Title = StrFormat("{{NAME}} - {{INTERVAL}} {{DATE}} Open %g, Hi %g, Lo %g, Close %g (%.1f%%) Vol " +WriteVal( V, 1.0 ) +" {{VALUES}}", O, H, L, C, SelectedValue( ROC( C, 1 ) ) ));
Plot( C, "Close", Color, styleNoTitle | ParamStyle("Style") | GetPriceStyle() );

SetChartOptions(0,chartShowArrows|chartShowDates);
if( ParamToggle("Tooltip shows", "All Values|Only Prices" ) )
{
ToolTip=StrFormat("Op: %gnHi: %gnLo: %gnCl: %g (%.1f%%)nVolume: "+NumToStr( V, 1 ), O, H, L, C, SelectedValue( ROC( C, 1 )));
}
_SECTION_END();






_SECTION_BEGIN("vízjel");
U = StrFormat("Ár %g ", C) + Name();
GfxSetOverlayMode(1);
GfxSelectFont("Tahoma", Status("pxheight")/8 );
GfxSetTextAlign( 6 );// center alignment
GfxSetTextColor( ColorRGB( 200, 200, 200 ) );
GfxSetBkMode(1); // transparent
GfxTextOut( U , Status("pxwidth")/2, Status("pxheight")/12);
_SECTION_END();



_SECTION_BEGIN("MA");
P = ParamField("Price field",-1);
Periods = Param("Periods", 15, 2, 200, 1 );
Plot( MA( P, Periods ), _DEFAULT_NAME(), ParamColor( "Color", colorCycle ), ParamStyle("Style") | styleNoRescale );
_SECTION_END();

_SECTION_BEGIN("BBands");
P = ParamField("Price field",-1);
Periods = Param("Periods", 15, 2, 300, 1 );
Width = Param("Width", 2, 0, 10, 0.05 );
Color = ParamColor("Color", colorLightGrey );
Style = ParamStyle("Style") | styleNoRescale | styleNoRescale;
Plot( BBandTop( P, Periods, Width ), "BBTop" + _PARAM_VALUES(), Color, Style );
Plot( BBandBot( P, Periods, Width ), "BBBot" + _PARAM_VALUES(), Color, Style );
_SECTION_END();

_SECTION_BEGIN("Price Interpretation");
movshort = ParamField("Short Time MA", 8 );
movmed = ParamField("Mid Time MA", 9 );
movlong = ParamField("Long Time MA", 10 );
btop = ParamField("BBTop", 11 );
bbot = ParamField("BBBottom", 12 );
if( Status("action") == actionCommentary )
{
width = btop - bbot;
lslop = LinRegSlope( C, 30 ) + 100;
lslo = LLV( lslop, 90 );
lshi = HHV( lslop, 90 );
lswidth = lshi - lslo;
trend = 100*( lslop - lslo )/lswidth;

mawidth = MA( width, 100 );
relwidth = 100*(width - mawidth)/mawidth;

_N( tname = Name()+"("+FullName()+")" );

printf("Price and moving averages:n");
printf( tname + " has closed " + WriteIf( C > movshort, "above" , "below" ) + " its Short time moving average. ");

printf("nShort time moving average is currently " + WriteIf( movshort > movmed, "above", "below") + " mid-time, AND " + WriteIf( movshort > movlong, "above", "below" ) + " long time moving averages.");

printf("nThe relationship between price and moving averages is: "+
WriteIf( C > movshort AND movshort > movmed, "bullish",
WriteIf( C < movshort AND movshort < movmed, "bearish", "neutral" ) ) + " in short-term, and "+
WriteIf( movshort > movmed AND movmed > movlong , "bullish",
WriteIf( movshort < movmed AND movmed < movlong, "bearish", "neutral" ) ) + " in mid-long term. ");

printf("nnBollinger Bands:n");
printf(tname+ " has closed " +
WriteIf( C < bbot, "below the lower band by " +
WriteVal( 100 *( bbot-C )/ width, 1.1 ) + "%%. " +
WriteIf( trend < 30, " This combined with the steep downtrend can suggest that the downward trend in prices has a good chance of continuing. However, a short-term pull-back inside the bands is likely.",
WriteIf( trend > 30 AND trend < 70, "Although prices have broken the lower band and a downside breakout is possible, the most likely scenario for "+tname+" is to continue within current trading range.", "" ) ), "" ) +

WriteIf( C > btop, "above the upper band by " +
WriteVal( 100 *( C- btop )/ width, 1.1 ) + "%%. " +
WriteIf( trend > 70, " This combined with the steep uptrend suggests that the upward trend in prices has a good chance of continuing. However, a short-term pull-back inside the bands is likely.",
WriteIf( trend > 30 AND trend < 70, "Although prices have broken the upper band and a upside breakout is possible, the most likely scenario for "+tname+" is to continue within current trading range.", "" ) ), "" ) +

WriteIf( C < btop AND ( ( btop - C ) / width ) < 0.5,
"below upper band by " +
WriteVal( 100 *( btop - C )/ width, 1.1 ) + "%%. ",
WriteIf( C < btop AND C > bbot , "above bottom band by " +
WriteVal( 100 *( C - bbot )/ width, 1.1 ) + "%%. ", "" ) ));

printf("n"+
WriteIf( ( trend > 30 AND trend < 70 AND ( C > btop OR C < bbot ) ) AND abs(relwidth) > 40,
"This picture becomes somewhat unclear due to the fact that Bollinger Bands are currently",
"Bollinger Bands are " )+
WriteVal( abs( relwidth ), 1.1 ) + "%% " +
WriteIf( relwidth > 0, "wider" , "narrower" ) +
" than normal.");

printf("n");

printf(
WriteIf( abs( relwidth ) < 40, "The current width of the bands (alone) does not suggest anything conclusive about the future volatility or movement of prices.","")+
WriteIf( relwidth < -40, "The narrow width of the bands suggests low volatility as compared to " + tname + "'s normal range. Therefore, the probability of volatility increasing with a sharp price move has increased for the near-term. "+
"The bands have been in this narrow range for " + WriteVal(BarsSince(Cross(-40,relwidth)),1.0) + " bars. The probability of a significant price move increases the longer the bands remain in this narrow range." ,"")+
WriteIf( relwidth > 40, "The large width of the bands suggest high volatility as compared to " + tname + "'s normal range. Therefore, the probability of volatility decreasing and prices entering (or remaining in) a trading range has increased for the near-term. "+
"The bands have been in this wide range for " + WriteVal(BarsSince(Cross(relwidth,40)),1.0) + " bars.The probability of prices consolidating into a less volatile trading range increases the longer the bands remain in this wide range." ,""));

printf("nnThis commentary is not a recommendation to buy or sell. Use at your own risk.");
}
_SECTION_END();
stika_ Creative Commons License 2009.07.01 0 0 1139
Na és?
zsembesketto Creative Commons License 2009.06.22 0 0 1138
megy ez.
Előzmény: zsembesketto (1136)
zsembesketto Creative Commons License 2009.06.17 0 0 1136
ma még működik de holnap kizárt...
Előzmény: Snipper (1135)
Snipper Creative Commons License 2009.06.16 0 0 1135
én is
hjh
Előzmény: zsembesketto (1134)
zsembesketto Creative Commons License 2009.06.16 0 0 1134
tesztelek

Bga123 Creative Commons License 2009.06.13 0 0 1123
pannap Creative Commons License 2009.06.12 0 0 1122
Luigi78 Creative Commons License 2009.06.09 0 0 1121
stika Creative Commons License 2009.06.08 0 0 1120
stika Creative Commons License 2009.06.08 0 0 1119
blabla



petrence77 Creative Commons License 2009.05.31 0 0 1118
Próba 2
Próba2
petrence77 Creative Commons License 2009.05.31 0 0 1117
Proba
Proba
Próba
_Destructor_ Creative Commons License 2009.05.25 0 0 1116
HOPP

Ha kedveled azért, ha nem azért nyomj egy lájkot a Fórumért!