كود:
N := Input("Number of Days",1,1000,100);
f0 := Input("Level 0",0,100,0);
f1 := Input("Level 1",0,100,11.4);
f2 := Input("Level 2",0,100,23.6);
f3 := Input("Level 2",0,100,38.2);
f4 := Input("Level 3",0,100,50);
f5 := Input("Level 4",0,100,61.8);
f6 := Input("Level 5",0,100,76.4);
f7 := Input("Level 5",0,100,88.6);
f8 := Input("Level 6",0,100,100);
lowPoiont := LLV(LOW,N);
highPoint := HHV(HIGH,N);
diff := LastValue(highPoint) - LastValue(lowPoiont);
v0:=LastValue(lowPoiont) + diff * f0 /100;
v1:=LastValue(lowPoiont) + diff * f1 /100;
v2:=LastValue(lowPoiont) + diff * f2 /100;
v3:=LastValue(lowPoiont) + diff * f3 /100;
v4:=LastValue(lowPoiont) + diff * f4 /100;
v5:=LastValue(lowPoiont) + diff * f5 /100;
v6:=LastValue(lowPoiont) + diff * f6 /100;
v7:=LastValue(lowPoiont) + diff * f7 /100;
v8:=LastValue(lowPoiont) + diff * f8 /100;
currentCum := Cum(CLOSE/CLOSE);
lastCum := LastValue(currentCum - N);
line0:=ValueWhen(1,currentCum>=lastCum,v0);
line1:=ValueWhen(1,currentCum>=lastCum,v1);
line2:=ValueWhen(1,currentCum>=lastCum,v2);
line3:=ValueWhen(1,currentCum>=lastCum,v3);
line4:=ValueWhen(1,currentCum>=lastCum,v4);
line5:=ValueWhen(1,currentCum>=lastCum,v5);
line6:=ValueWhen(1,currentCum>=lastCum,v6);
line7:=ValueWhen(1,currentCum>=lastCum,v7);
line8:=ValueWhen(1,currentCum>=lastCum,v8);
line0;line1;line2;line3;line4;line5;line6;line7;line8;
FillRegion(line0,1,line1,line0);
FillRegion(line1,1,line2,line1);
FillRegion(line2,1,line3,line2);
FillRegion(line3,1,line4,line3);
FillRegion(line4,1,line5,line4);
FillRegion(line5,1,line6,line5);
FillRegion(line6,1,line7,line6);
FillRegion(line7,1,line8,line7);
رد: معادلات تكرتشارت ، فنياً ، تجميع جميع معادلات الفنية (متجدد )
رد مع اقتباس
مواقع النشر (المفضلة)