SISTEM YANG BAIK DAN SEDERHANA Dipasang Kod #property hak cipta Hak Cipta © 2010, Damyan Damyanov #property link http://www.forum.com #property indior_separate_window #property indior_buffers 4 #property indior_color1 Green #property indior_color2 PaleGreen #property indior_color3 Red #property indior_color4 LightSalmon #property indior_width1 3 #property indior_width2 3 #property indior_width3 3 #property indior_width4 3 extern int FEMA = 12; extern int SEMA = 26; extern int Smoother = 0; extern bool DamyanDamyanov = benar; extern bool wwwforumcom = true; double FemaBuffer # 91; # 93 ;; double Femax # 91; # 93 ;; double SemaBuffer # 91; # 93 ;; double Semax # 91; # 93 ;; int init () {SetIndexStyle (0, DRAW_HISTOGRAM); SetIndexStyle (1, DRAW_HISTOGRAM); SetIndexStyle (2, DRAW_HISTOGRAM); SetIndexStyle (3, DRAW_HISTOGRAM); SetIndexDrawBegin (1, FEMA); IndiorDigits (Digit 1); SetIndexBuffer (0, FemaBuffer); SetIndexBuffer (1, Femax); SetIndexBuffer (2, SemaBuffer); SetIndexBuffer (3, Semax); IndiorShortName (MACDs Risk ( FEMA , SEMA , Lancar ) || Damyan Damyanov ||); kembali (0); } int start () {int limit; int counted_bars = IndiorCounted (); double uptrend, sifar, Buff, Risiko; jika (counted_barsgt; 0) counted_bars--; had = Bars-counted_bars; {if (Smootherlt; = 0) Lancar = 1; } untuk (int i = 0; ilt; had; i ) FemaBuffer # 91; i # 93; = (((iMA (NULL, 0, FEMA, 0, MODE_EMA, PRICE_CLOSE, i) -iMA (NULL, 0, FEMA , 0, MODE_EMA, PRICE_LOW, i))(iMA (NULL, 0, FEMA, 0, MODE_EMA, PRICE_HIGH, i) -iMA (NULL, 0, FEMA, 0, MODE_EMA, PRICE_CLOSE, iMA (NULL, 0, SEMA, 0, MODE_EMA, PRICE_CLOSE, i) -iMA (NULL, 0, SEMA, 0, MODE_EMA, PRICE_LOW, i))(iMA (NULL, 0, SEMA, 0, MODE_EMA, PRICE_HIGH, i) -iMA (NULL, 0, SEMA, 0, MODE_EMA, PRICE_CLOSE, i)))); untuk (i = 0; ilt; had; i ) SemaBuffer # 91; i # 93; = (((iMA (NULL, 0, FEMA, 0, MODE_EMA, PRICE_CLOSE, i) -iMA (NULL, 0, FEMA, 0 , MODE_EMA, PRICE_LOW, i))(iMA (NULL, 0, FEMA, 0, MODE_EMA, PRICE_HIGH, i) -iMA (NULL, 0, FEMA, 0, MODE_EMA, PRICE_CLOSE, i) (NULL, 0, SEMA, 0, MODE_EMA, PRICE_HIGH, i) -iMA (NULL, 0, -iMA (NULL, 0, SEMA, 0, MODE_EMA, PRICE_CLOSE, i)))); untuk (i = 0; ilt; had; i ) FemaBuffer # 91; i # 93; = iMAOnArray (FemaBuffer, Bar, Lancar, 0, MODE_SMA, i); untuk (i = 0; ilt; had; i ) SemaBuffer # 91; i # 93; = iMAOnArray (SemaBuffer, Bar, Lancar, 0, MODE_SMA, i); untuk (i = 0; ilt; had; i ) Risiko = (((iMA (NULL, 0, FEMA, 0, MODE_EMA, PRICE_CLOSE, i) -iMA (NULL, 0, FEMA, 0, MODE_EMA, PRICE_LOW, ) (iMA (NULL, 0, FEMA, 0, MODE_EMA, PRICE_HIGH, i) -iMA (NULL, 0, FEMA, 0, MODE_EMA, PRICE_CLOSE, i))) , MODE_EMA, PRICE_CLOSE, i) -iMA (NULL, 0, SEMA, 0, MODE_EMA, PRICE_LOW, i))(iMA (NULL, 0, SEMA, 0, MODE_EMA, PRICE_HIGH, i) SEMA, 0, MODE_EMA, PRICE_CLOSE, i))))1000; bool tzz = true; untuk (i = limit-1; igt; = 0; i--) Femax # 91; i # 93; = 0.0; untuk (i = limit-1; igt; = 0; i--) Semax # 91; i # 93; = 0.0; untuk (i = limit-1; igt; = 0; i--) {uptrend = FemaBuffer # 91; i # 93 ;; sifar = 0; Buff = iMA (NULL, 0, FEMA, 0, MODE_EMA, PRICE_CLOSE, i) -iMA (NULL, 0, SEMA, 0, MODE_EMA, PRICE_CLOSE, i);jika (uptrendgt; sifar) tzz = benar; jika (uptrendlt; sifar) tzz = false;///////////jika (Buffgt; sifar SemaBuffer # 91; i # 93; gt; sifar) {FemaBuffer # 91; i # 93; = Buff; SemaBuffer # 91; i # 93; = 0.0; Femax # 91; i # 93; = 0.0; Semax # 91; i # 93; = 0.0; } jika (Bufflt; nol SemaBuffer # 91; i # 93; lt; sifar) {FemaBuffer # 91; i # 93; = 0.0; SemaBuffer # 91; i # 93; = Buff; Femax # 91; i # 93; = 0.0; Semax # 91; i # 93; = 0.0; } jika (Buffgt; sifar SemaBuffer # 91; i # 93; lt; sifar) {FemaBuffer # 91; i # 93; = 0.0; SemaBuffer # 91; i # 93; = 0.0; Femax # 91; i # 93; = Buff; Semax # 91; i # 93; = 0.0; } jika (Bufflt; sifar FemaBuffer # 91; i # 93; gt; sifar) {FemaBuffer # 91; i # 93; = 0.0; SemaBuffer # 91; i # 93; = 0.0; Femax # 91; i # 93; = 0.0; Semax # 91; i # 93; = Buff; }} return (0); }