MetaStock™ Zone Forum & FAQ Artykuły Linki Elliott Waves EasyLanguage™ Zone

A B C D E F G H I J K L M N O P R S T U V W Y Z #

Gann Road Map

Gann Road Map

{Locate the price of the peak or trough and plot}
X:= Input("Peak(1) or Trough(0)",0,1,1);
D:= Input("Degrees/Increment",2.125,720,20);
N:= Input("Number of Lines",1,50,50);
Z:= Input("Price",.01,50000,50);
A:=Sqrt(z);
B:= (2*D/360);
z;
If(X,Power(A-B,2),Power(A+B,2));
If(N>1,Power(A+2*B*If(X,-1,1),2),z);
If(N>2,Power(A+3*B*If(X,-1,1),2),z);
If(N>3,Power(A+4*B*If(X,-1,1),2),z);
If(N>4,Power(A+5*B*If(X,-1,1),2),z);
If(N>5,Power(A+6*B*If(X,-1,1),2),z);
If(N>6,Power(A+7*B*If(X,-1,1),2),z);
If(N>7,Power(A+8*B*If(X,-1,1),2),z);
If(N>8,Power(A+9*B*If(X,-1,1),2),z);
If(N>9,Power(A+10*B*If(X,-1,1),2),z);
If(N>10,Power(A+11*B*If(X,-1,1),2),z);
If(N>11,Power(A+12*B*If(X,-1,1),2),z);
If(N>12,Power(A+13*B*If(X,-1,1),2),z);
If(N>13,Power(A+14*B*If(X,-1,1),2),z);
If(N>14,Power(A+15*B*If(X,-1,1),2),z);
If(N>15,Power(A+16*B*If(X,-1,1),2),z);
If(N>16,Power(A+17*B*If(X,-1,1),2),z);
If(N>17,Power(A+18*B*If(X,-1,1),2),z);
If(N>18,Power(A+19*B*If(X,-1,1),2),z);
If(N>19,Power(A+20*B*If(X,-1,1),2),z);
If(N>20,Power(A+21*B*If(X,-1,1),2),z);
If(N>21,Power(A+22*B*If(X,-1,1),2),z);
If(N>22,Power(A+23*B*If(X,-1,1),2),z);
If(N>23,Power(A+24*B*If(X,-1,1),2),z);
If(N>24,Power(A+25*B*If(X,-1,1),2),z);
If(N>25,Power(A+(25+1)*B*If(X,-1,1),2),z);
If(N>25+1,Power(A+(25+2)*B*If(X,-1,1),2),z);
If(N>25+2,Power(A+(25+3)*B*If(X,-1,1),2),z);
If(N>25+3,Power(A+(25+4)*B*If(X,-1,1),2),z);
If(N>25+4,Power(A+(25+5)*B*If(X,-1,1),2),z);
If(N>25+5,Power(A+(25+6)*B*If(X,-1,1),2),z);
If(N>25+6,Power(A+(25+7)*B*If(X,-1,1),2),z);
If(N>25+7,Power(A+(25+8)*B*If(X,-1,1),2),z);
If(N>25+8,Power(A+(25+9)*B*If(X,-1,1),2),z);
If(N>25+9,Power(A+(35)*B*If(X,-1,1),2),z);
If(N>35,Power(A+(35+1)*B*If(X,-1,1),2),z);
If(N>35+1,Power(A+(35+2)*B*If(X,-1,1),2),z);
If(N>35+2,Power(A+(35+3)*B*If(X,-1,1),2),z);
If(N>35+3,Power(A+(35+4)*B*If(X,-1,1),2),z);
If(N>35+4,Power(A+(35+5)*B*If(X,-1,1),2),z);
If(N>35+5,Power(A+(35+6)*B*If(X,-1,1),2),z);
If(N>35+6,Power(A+(35+7)*B*If(X,-1,1),2),z);
If(N>35+7,Power(A+(35+8)*B*If(X,-1,1),2),z);
If(N>35+8,Power(A+(35+9)*B*If(X,-1,1),2),z);
If(N>35+9,Power(A+45*B*If(X,-1,1),2),z);
If(N>45,Power(A+(45+1)*B*If(X,-1,1),2),z);
If(N>45+1,Power(A+(45+2)*B*If(X,-1,1),2),z);
If(N>45+2,Power(A+(45+3)*B*If(X,-1,1),2),z);
If(N>45+3,Power(A+(45+4)*B*If(X,-1,1),2),z);
If(N>45+4,Power(A+(45+5)*B*If(X,-1,1),2),z);

{End of Indicator}

 

This Indicator is not written by me but obtained from the net. The probable author of this indicator is Henry1224, but I am not too sure. The mathematics are simple, and can be translated to any other technical analysis software. Please do not send me mails asking for other versions.
Source / From: TOP
http://www.geocities.com/cooldush/setupgann.htm

Equis and MetaStock® and MetaStock Professional® are registered trademarks of Equis International. Achelis Binary Wave®, The DownLoader®,
Expert Advisor®, OptionScope®, Quotecenter® and Smart Charts® are trademarks of Equis International, a Thomson Reuters company.

TradeStation® Pro, TradeStation® 2000i, OptionStation®, SuperCharts®, PowerEditor® and EasyLanguage®
are registered trademarks of TradeStation Technologies, Inc. Other names and marks referred to are the property of their respective owners.

All information provided on this website is for educational purposes only. Trading involves risk, including possible loss of principal and other losses.

Ten i inne materiały na tej stronie zostały zamieszczone zostały jedynie w celach edukacyjnych, nie ponoszę żadnej odpowiedzialno¶ci za ich stosowanie.

Gra na giełdzie i rynkach walutowych (FOREX) niesie ze sob± ryzyko poważnych strat finansowych!