Sanırım şöyle bir şey arıyorsunuz.
Kod:
ZigPerc:= Input("Zig-Zag Percentage", .1, 99, 3);
zz:=Zig(C,ZigPerc,%);
peakc:=valuewhen(1,Cross(ref(zz,-1),zz),ref(zz,-1));
trougc:=valuewhen(1,Cross(zz,ref(zz,-1)),ref(zz,-1));
zzHi:=Zig(H,ZigPerc,%);
peakh:=valuewhen(1,Cross(ref(zzHi,-1),zzHi),ref(zzHi,-1));
zzLo:=Zig(L,ZigPerc,%);
trougl:=valuewhen(1,Cross(zzLo,ref(zzLo,-1)),ref(zzLo,-1));
P1:=valuewhen(1,peakc,peakh);
P2:=valuewhen(1,trougc,trougl);
P3 := P2 + (P1-P2)*0.236;
P4 := P2 + (P1-P2)*0.382;
P5 := P2 + (P1-P2)*0.5;
P6 := P2 + (P1-P2)*0.618;
P7 := P2 + (P1-P2)*0.764;
P2; P3; P4; P5; P6; P7; P1


Originally Posted by
Trade
uufuk hocam bu kodu matrikse çevirmeniz mümkün müdür
Kod:
Fibonacci Levels II
ZigPerc:= Input("Zig-Zag Percentage", .1, 99, 1);
{basic peak and trough level calculation} P1:=ValueWhen(1,Peak(1,Zig(C,ZigPerc,%),ZigPerc),
Peak(1,Zig(H,ZigPerc,%),ZigPerc));
P2:=ValueWhen(1,Trough(1,Zig(C,ZigPerc,%),ZigPerc),
Trough(1,Zig(L,ZigPerc,%),ZigPerc));
{Fibonacci retracement levels calculation}
P3 := P2 + (P1-P2)*0.236;
P4 := P2 + (P1-P2)*0.382;
P5 := P2 + (P1-P2)*0.5;
P6 := P2 + (P1-P2)*0.618;
P7 := P2 + (P1-P2)*0.764;
{Plotting the levels}
P2; {through}
P3; {23.6% (76.4%) retracement}
P4; {38.2% (61.8%) retracement}
P5; {50.0% retracement}
P6; {61.8% (38.2%) retracement}
P7; {76.4% (23.6%) retracement}
P1; {peak}
Yer İmleri