|
超级版主
    
指标公式分区总版 - 帖子
- 9016
- 积分
- 45897
- 威望
- 0
- 注册时间
- 2004-3-23
|
15楼
大 中
小 发表于 2006-4-10 04:50 只看该作者
谢谢飓风水手兄 引用: 对“红白双娇公式”的简化
139743369 青铜长老
的公式,老衲简化了一下!!!!!!!
{红白双娇(简化)}
DRAWGBK(1, COLORRGB(60,15,35) ,COLORRGB(50,50,90),1);
xxL:=LLV(FORCAST(c,10),30),colorgreen,linethick1;
xxH:=HHV(FORCAST(CLOSE,10),30),colorgreen,linethick1;
a2:=hhv(l,20);
a22:=ma(a2,3),colormagenta,linethick3;
a4:=llv(h,20);
a44:=ma(a4,3),colormagenta,linethick3;
fillrgn(xxH>a22,xxH,a22),color440000;{多空通道}{多空通道}{多空通道}
fillrgn(xxH<a22,xxH,a22),color440000;{多空通道}{多空通道}{多空通道}
fillrgn(XXL<a44,XXL,a44),color000000;{多空通道}{多空通道}{多空通道}
fillrgn(XXL>a44,XXL,a44),color000000;{多空通道}{多空通道}{多空通道}
atr:=max((H-L),max(abs(H-ref(c,1)),abs(L-ref(c,1)) ));
low1:=Max( ( Ref(HIGH,1) - LOW ) / ( ( Ref(Sum (Atr ,2 ),1) / 2) * Sqrt( 2 ) ) ,
Max( (Ref(HIGH,2) -LOW) / ( ( Ref(Sum (Atr ,3),1) / 3) * Sqrt( 3 ) ),
Max( (Ref(HIGH,3) - LOW) / ( (Ref(Sum (Atr ,4) ,1) / 4) * Sqrt( 4 ) ) ,
Max( ( Ref( HIGH,4) - LOW) / ( (Ref(Sum(Atr,5),1) / 5) * Sqrt( 5 ) ),
Max( (Ref(HIGH,5) - LOW) / ( (Ref( Sum( Atr,6),1) / 6 ) * Sqrt( 6 ) ),
Max( ( Ref(HIGH,6) -LOW) / ( (Ref( Sum( Atr,7),1) / 7) * Sqrt( 7 ) ),
Max((Ref(HIGH,7)-LOW) / ( (Ref(Sum (Atr,8),1) /8) * Sqrt(8) ),
Max((Ref(HIGH,8)-LOW) / ( (Ref(Sum (Atr ,9),1) / 9) * Sqrt( 9 ) ),
Max((Ref(HIGH,9)-LOW) / ( (Ref(Sum (Atr ,10),1) / 10) * Sqrt( 10 ) ),
Max((Ref(HIGH,10)-LOW) / ( (Ref(Sum (Atr ,11),1) / 11) * Sqrt( 11 ) ),
Max((Ref(HIGH,11)-LOW) / ( (Ref(Sum (Atr ,12),1) / 12) * Sqrt( 12 ) ),
Max((Ref(HIGH,12)-LOW) / ( (Ref(Sum (Atr ,13),1) / 13) * Sqrt( 13 ) ),
Max((Ref(HIGH,13)-LOW) / ( (Ref(Sum (Atr ,14),1) / 14) * Sqrt( 14 ) ),
Max((Ref(HIGH,14)-LOW) / ( (Ref(Sum (Atr ,15),1) / 15) * Sqrt( 15 ) ),
Max((Ref(HIGH,15)-LOW) / ( (Ref(Sum (Atr ,16),1) / 16) * Sqrt( 16 ) ),
Max((Ref(HIGH,16)-LOW) / ( (Ref(Sum (Atr ,17),1) / 17) * Sqrt( 17 ) ),
Max((Ref(HIGH,17)-LOW) / ( (Ref(Sum (Atr ,18),1) / 18) * Sqrt( 18 ) ),
Max((Ref(HIGH,18)-LOW) / ( (Ref(Sum (Atr ,19),1) / 19) * Sqrt( 19 ) ),
Max((Ref(HIGH,19)-LOW) / ( (Ref(Sum (Atr ,20),1) / 20) * Sqrt( 20 ) ),
Max((Ref(HIGH,20)-LOW) / ( (Ref(Sum (Atr ,21),1) / 21) * Sqrt( 21 ) ),
Max((Ref(HIGH,21)-LOW) / ( (Ref(Sum (Atr ,22),1) / 22) * Sqrt( 22 ) ),
Max((Ref(HIGH,22)-LOW) / ( (Ref(Sum (Atr ,23),1) / 23) * Sqrt( 23 ) ),
Max((Ref(HIGH,23)-LOW) / ( (Ref(Sum (Atr ,24),1) / 24) * Sqrt( 24 ) ),
Max((Ref(HIGH,24)-LOW) / ( (Ref(Sum (Atr ,25),1) / 25) * Sqrt( 25 ) ),
Max((Ref(HIGH,25)-LOW) / ( (Ref(Sum (Atr ,26),1) / 26) * Sqrt( 26 ) ),
Max((Ref(HIGH,26)-LOW) / ( (Ref(Sum (Atr ,27),1) / 27) * Sqrt( 27 ) ),
Max((Ref(HIGH,27)-LOW) / ( (Ref(Sum (Atr ,28),1) / 28) * Sqrt( 28 ) ),
Max((Ref(HIGH,28)-LOW) / ( (Ref(Sum (Atr ,29),1) / 29) * Sqrt( 29 ) ),
Max((Ref(HIGH,29)-LOW) / ( (Ref(Sum (Atr ,30),1) / 30) * Sqrt( 30 ) ),
Max((Ref(HIGH,30)-LOW) / ( (Ref(Sum (Atr ,31),1) / 31) * Sqrt( 31 ) ),
Max((Ref(HIGH,31)-LOW) / ( (Ref(Sum (Atr ,32),1) / 32) * Sqrt( 32 ) ),
Max((Ref(HIGH,32)-LOW) / ( (Ref(Sum (Atr ,33),1) / 33) * Sqrt( 33 ) ),
Max((Ref(HIGH,33)-LOW) / ( (Ref(Sum (Atr ,34),1) / 34) * Sqrt( 34 ) ),
Max((Ref(HIGH,34)-LOW) / ( (Ref(Sum (Atr ,35),1) / 35) * Sqrt( 35 ) ),
Max((Ref(HIGH,35)-LOW) / ( (Ref(Sum (Atr ,36),1) / 36) * Sqrt( 36 ) ),
Max((Ref(HIGH,36)-LOW) / ( (Ref(Sum (Atr ,37),1) / 37) * Sqrt( 37 ) ),
Max((Ref(HIGH,37)-LOW) / ( (Ref(Sum (Atr ,38),1) / 38) * Sqrt( 38 ) ),
Max((Ref(HIGH,38)-LOW) / ( (Ref(Sum (Atr ,39),1) / 39) * Sqrt( 39 ) ),
Max((Ref(HIGH,39)-LOW) / ( (Ref(Sum (Atr ,40),1) / 40) * Sqrt( 40 ) ),
Max((Ref(HIGH,40)-LOW) / ( (Ref(Sum (Atr ,41),1) / 41) * Sqrt( 41 ) ),
Max((Ref(HIGH,41)-LOW) / ( (Ref(Sum (Atr ,42),1) / 42) * Sqrt( 42 ) ),
Max((Ref(HIGH,42)-LOW) / ( (Ref(Sum (Atr ,43),1) / 43) * Sqrt( 43 ) ),
Max((Ref(HIGH,43)-LOW) / ( (Ref(Sum (Atr ,44),1) / 44) * Sqrt( 44 ) ),
Max((Ref(HIGH,44)-LOW) / ( (Ref(Sum (Atr ,45),1) / 45) * Sqrt( 45 ) ),
Max((Ref(HIGH,45)-LOW) / ( (Ref(Sum (Atr ,46),1) / 46) * Sqrt( 46 ) ),
Max((Ref(HIGH,46)-LOW) / ( (Ref(Sum (Atr ,47),1) / 47) * Sqrt( 47 ) ),
Max((Ref(HIGH,47)-LOW) / ( (Ref(Sum (Atr ,48),1) / 48) * Sqrt( 48 ) ),
Max((Ref(HIGH,48)-LOW) / ( (Ref(Sum (Atr ,49),1) / 49) * Sqrt( 49 ) ),
Max((Ref(HIGH,49)-LOW) / ( (Ref(Sum (Atr ,50),1) / 50) * Sqrt( 50 ) ),
Max((Ref(HIGH,50)-LOW) / ( (Ref(Sum (Atr ,51),1) / 51) * Sqrt( 51 ) ),
Max((Ref(HIGH,51)-LOW) / ( (Ref(Sum (Atr ,52),1) / 52) * Sqrt( 52 ) ),
Max((Ref(HIGH,52)-LOW) / ( (Ref(Sum (Atr ,53),1) / 53) * Sqrt( 53 ) ),
Max((Ref(HIGH,53)-LOW) / ( (Ref(Sum (Atr ,54),1) / 54) * Sqrt( 54 ) ),
Max((Ref(HIGH,54)-LOW) / ( (Ref(Sum (Atr ,55),1) / 55) * Sqrt( 55 ) ),
Max((Ref(HIGH,55)-LOW) / ( (Ref(Sum (Atr ,56),1) / 56) * Sqrt( 56 ) ),
Max((Ref(HIGH,56)-LOW) / ( (Ref(Sum (Atr ,57),1) / 57) * Sqrt( 57 ) ),
Max((Ref(HIGH,57)-LOW) / ( (Ref(Sum (Atr ,58),1) / 58) * Sqrt( 58 ) ),
Max((Ref(HIGH,58)-LOW) / ( (Ref(Sum (Atr ,59),1) / 59) * Sqrt( 59 ) ),
Max((Ref(HIGH,59)-LOW) / ( (Ref(Sum (Atr ,60),1) / 60) * Sqrt( 60 ) ),
Max((Ref(HIGH,60)-LOW) / ( (Ref(Sum (Atr ,61),1) / 61) * Sqrt( 61 ) ),
Max((Ref(HIGH,61)-LOW) / ( (Ref(Sum (Atr ,62),1) / 62) * Sqrt( 62 ) ),
Max((Ref(HIGH,62)-LOW) / ( (Ref(Sum (Atr ,63),1) / 63) * Sqrt( 63 ) ),
Max((Ref(HIGH,63)-LOW) / ( (Ref(Sum (Atr ,64),1) / 64) * Sqrt( 64 ) ),
Max((Ref(HIGH,64)-LOW) / ( (Ref(Sum (Atr ,65),1) / 65) * Sqrt( 65 ) ),
Max((Ref(HIGH,65)-LOW) / ( (Ref(Sum (Atr ,66),1) / 66) * Sqrt( 66 ) ),
Max((Ref(HIGH,66)-LOW) / ( (Ref(Sum (Atr ,67),1) / 67) * Sqrt( 67 ) ),
Max((Ref(HIGH,67)-LOW) / ( (Ref(Sum (Atr ,68),1) / 68) * Sqrt( 68 ) ),
Max((Ref(HIGH,68)-LOW) / ( (Ref(Sum (Atr ,69),1) / 69) * Sqrt( 69 ) ),
Max((Ref(HIGH,69)-LOW) / ( (Ref(Sum (Atr ,70),1) / 70) * Sqrt( 70 ) ),
Max((Ref(HIGH,70)-LOW) / ( (Ref(Sum (Atr ,71),1) / 71) * Sqrt( 71 ) ),
Max((Ref(HIGH,71)-LOW) / ( (Ref(Sum (Atr ,72),1) / 72) * Sqrt( 72 ) ),
Max((Ref(HIGH,72)-LOW) / ( (Ref(Sum (Atr ,73),1) / 73) * Sqrt( 73 ) ),
Max((Ref(HIGH,73)-LOW) / ( (Ref(Sum (Atr ,74),1) / 74) * Sqrt( 74 ) ),
Max((Ref(HIGH,74)-LOW) / ( (Ref(Sum (Atr ,75),1) / 75) * Sqrt( 75 ) ),
Max((Ref(HIGH,75)-LOW) / ( (Ref(Sum (Atr ,76),1) / 76) * Sqrt( 76 ) ),
Max((Ref(HIGH,76)-LOW) / ( (Ref(Sum (Atr ,77),1) / 77) * Sqrt( 77 ) ),
Max((Ref(HIGH,77)-LOW) / ( (Ref(Sum (Atr ,78),1) / 78) * Sqrt( 78 ) ),
Max((Ref(HIGH,78)-LOW) / ( (Ref(Sum (Atr ,79),1) / 79) * Sqrt( 79 ) ),
Max((Ref(HIGH,79)-LOW) / ( (Ref(Sum (Atr ,80),1) / 80) * Sqrt( 80 ) ),
Max((Ref(HIGH,80)-LOW) / ( (Ref(Sum (Atr ,81),1) / 81) * Sqrt( 81 ) ),
Max((Ref(HIGH,81)-LOW) / ( (Ref(Sum (Atr ,82),1) / 82) * Sqrt( 82 ) ),
Max((Ref(HIGH,82)-LOW) / ( (Ref(Sum (Atr ,83),1) / 83) * Sqrt( 83 ) ),
Max((Ref(HIGH,83)-LOW) / ( (Ref(Sum (Atr ,84),1) / 84) * Sqrt( 84 ) ),
Max((Ref(HIGH,84)-LOW) / ( (Ref(Sum (Atr ,85),1) / 85) * Sqrt( 85 ) ),
Max((Ref(HIGH,85)-LOW) / ( (Ref(Sum (Atr ,86),1) / 86) * Sqrt( 86 ) ),
Max((Ref(HIGH,86)-LOW) / ( (Ref(Sum (Atr ,87),1) / 87) * Sqrt( 87 ) ),
Max((Ref(HIGH,87)-LOW) / ( (Ref(Sum (Atr ,88),1) / 88) * Sqrt( 88 ) ),
Max((Ref(HIGH,88)-LOW) / ( (Ref(Sum (Atr ,89),1) / 89) * Sqrt( 89 ) ),
Max((Ref(HIGH,89)-LOW) / ( (Ref(Sum (Atr ,90),1) / 90) * Sqrt( 90 ) ),
Max((Ref(HIGH,90)-LOW) / ( (Ref(Sum (Atr ,91),1) / 91) * Sqrt( 91 ) ),
Max((Ref(HIGH,91)-LOW) / ( (Ref(Sum (Atr ,92),1) / 92) * Sqrt( 92 ) ),
Max((Ref(HIGH,92)-LOW) / ( (Ref(Sum (Atr ,93),1) / 93) * Sqrt( 93 ) ),
Max((Ref(HIGH,93)-LOW) / ( (Ref(Sum (Atr ,94),1) / 94) * Sqrt( 94 ) ),
Max((Ref(HIGH,94)-LOW) / ( (Ref(Sum (Atr ,95),1) / 95) * Sqrt( 95 ) ),
Max((Ref(HIGH,95)-LOW) / ( (Ref(Sum (Atr ,96),1) / 96) * Sqrt( 96 ) ),
Max((Ref(HIGH,96)-LOW) / ( (Ref(Sum (Atr ,97),1) / 97) * Sqrt( 97 ) ),
Max((Ref(HIGH,97)-LOW) / ( (Ref(Sum (Atr ,98),1) / 98) * Sqrt( 98 ) ),
Max((Ref(HIGH,98)-LOW) / ( (Ref(Sum (Atr ,99),1) / 99) * Sqrt( 99 ) ),
Max((Ref(HIGH,99)-LOW) / ( (Ref(Sum (Atr ,100),1) / 100) * Sqrt( 100 ) ),
Max((Ref(HIGH,100)-LOW) / ( (Ref(Sum (Atr ,101),1) / 101) * Sqrt( 101 ) ),
(Ref(HIGH,101)-LOW) / ( (Ref(Sum (Atr ,102),1) / 102) * Sqrt( 102 ) ) ) ) ) ) ) ) ))))))))))))))))))))))))))) ))))))))))
)))))))))) ))))))))))) )))))))))) )))))))))) )))))))))) ))))));
high1:=Max( ( HIGH - ref(LOW,1) ) / ( ( Ref(Sum (Atr ,2 ),1) / 2) * Sqrt( 2 ) ) ,
Max( (HIGH -ref(LOW,2)) / ( ( Ref(Sum (Atr ,3),1) / 3) * Sqrt( 3 ) ),
Max( (HIGH - ref(LOW,3)) / ( (Ref(Sum (Atr ,4) ,1) / 4) * Sqrt( 4 ) ) ,
Max( ( HIGH - ref(LOW,4)) / ( (Ref(Sum(Atr,5),1) / 5) * Sqrt( 5 ) ),
Max( (HIGH - ref(LOW,5)) / ( (Ref( Sum( Atr,6),1) / 6 ) * Sqrt( 6 ) ),
Max( ( HIGH -ref(LOW,6)) / ( (Ref( Sum( Atr,7),1) / 7) * Sqrt( 7 ) ),
Max((HIGH-ref(LOW,7)) / ( (Ref(Sum (Atr,8),1) /8) * Sqrt(8) ),
Max((HIGH-ref(LOW,8)) / ( (Ref(Sum (Atr,9),1) /9) * Sqrt(9) ),
Max((HIGH-ref(LOW,9)) / ( (Ref(Sum (Atr,10),1) /10) * Sqrt(10) ),
Max((HIGH-ref(LOW,10)) / ( (Ref(Sum (Atr,11),1) /11) * Sqrt(11) ),
Max((HIGH-ref(LOW,11)) / ( (Ref(Sum (Atr,12),1) /12) * Sqrt(12) ),
Max((HIGH-ref(LOW,12)) / ( (Ref(Sum (Atr,13),1) /13) * Sqrt(13) ),
Max((HIGH-ref(LOW,13)) / ( (Ref(Sum (Atr,14),1) /14) * Sqrt(14) ),
Max((HIGH-ref(LOW,14)) / ( (Ref(Sum (Atr,15),1) /15) * Sqrt(15) ),
Max((HIGH-ref(LOW,15)) / ( (Ref(Sum (Atr,16),1) /16) * Sqrt(16) ),
Max((HIGH-ref(LOW,16)) / ( (Ref(Sum (Atr,17),1) /17) * Sqrt(17) ),
Max((HIGH-ref(LOW,17)) / ( (Ref(Sum (Atr,18),1) /18) * Sqrt(18) ),
Max((HIGH-ref(LOW,18)) / ( (Ref(Sum (Atr,19),1) /19) * Sqrt(19) ),
Max((HIGH-ref(LOW,19)) / ( (Ref(Sum (Atr,20),1) /20) * Sqrt(20) ),
Max((HIGH-ref(LOW,20)) / ( (Ref(Sum (Atr,21),1) /21) * Sqrt(21) ),
Max((HIGH-ref(LOW,21)) / ( (Ref(Sum (Atr,22),1) /22) * Sqrt(22) ),
Max((HIGH-ref(LOW,22)) / ( (Ref(Sum (Atr,23),1) /23) * Sqrt(23) ),
Max((HIGH-ref(LOW,23)) / ( (Ref(Sum (Atr,24),1) /24) * Sqrt(24) ),
Max((HIGH-ref(LOW,24)) / ( (Ref(Sum (Atr,25),1) /25) * Sqrt(25) ),
Max((HIGH-ref(LOW,25)) / ( (Ref(Sum (Atr,26),1) /26) * Sqrt(26) ),
Max((HIGH-ref(LOW,26)) / ( (Ref(Sum (Atr,27),1) /27) * Sqrt(27) ),
Max((HIGH-ref(LOW,27)) / ( (Ref(Sum (Atr,28),1) /28) * Sqrt(28) ),
Max((HIGH-ref(LOW,28)) / ( (Ref(Sum (Atr,29),1) /29) * Sqrt(29) ),
Max((HIGH-ref(LOW,29)) / ( (Ref(Sum (Atr,30),1) /30) * Sqrt(30) ),
Max((HIGH-ref(LOW,30)) / ( (Ref(Sum (Atr,31),1) /31) * Sqrt(31) ),
Max((HIGH-ref(LOW,31)) / ( (Ref(Sum (Atr,32),1) /32) * Sqrt(32) ),
Max((HIGH-ref(LOW,32)) / ( (Ref(Sum (Atr,33),1) /33) * Sqrt(33) ),
Max((HIGH-ref(LOW,33)) / ( (Ref(Sum (Atr,34),1) /34) * Sqrt(34) ),
Max((HIGH-ref(LOW,34)) / ( (Ref(Sum (Atr,35),1) /35) * Sqrt(35) ),
Max((HIGH-ref(LOW,35)) / ( (Ref(Sum (Atr,36),1) /36) * Sqrt(36) ),
Max((HIGH-ref(LOW,36)) / ( (Ref(Sum (Atr,37),1) /37) * Sqrt(37) ),
Max((HIGH-ref(LOW,37)) / ( (Ref(Sum (Atr,38),1) /38) * Sqrt(38) ),
Max((HIGH-ref(LOW,38)) / ( (Ref(Sum (Atr,39),1) /39) * Sqrt(39) ),
Max((HIGH-ref(LOW,39)) / ( (Ref(Sum (Atr,40),1) /40) * Sqrt(40) ),
Max((HIGH-ref(LOW,40)) / ( (Ref(Sum (Atr,41),1) /41) * Sqrt(41) ),
Max((HIGH-ref(LOW,41)) / ( (Ref(Sum (Atr,42),1) /42) * Sqrt(42) ),
Max((HIGH-ref(LOW,42)) / ( (Ref(Sum (Atr,43),1) /43) * Sqrt(43) ),
Max((HIGH-ref(LOW,43)) / ( (Ref(Sum (Atr,44),1) /44) * Sqrt(44) ),
Max((HIGH-ref(LOW,44)) / ( (Ref(Sum (Atr,45),1) /45) * Sqrt(45) ),
Max((HIGH-ref(LOW,45)) / ( (Ref(Sum (Atr,46),1) /46) * Sqrt(46) ),
Max((HIGH-ref(LOW,46)) / ( (Ref(Sum (Atr,47),1) /47) * Sqrt(47) ),
Max((HIGH-ref(LOW,47)) / ( (Ref(Sum (Atr,48),1) /48) * Sqrt(48) ),
Max((HIGH-ref(LOW,48)) / ( (Ref(Sum (Atr,49),1) /49) * Sqrt(49) ),
Max((HIGH-ref(LOW,49)) / ( (Ref(Sum (Atr,50),1) /50) * Sqrt(50) ),
Max((HIGH-ref(LOW,50)) / ( (Ref(Sum (Atr,51),1) /51) * Sqrt(51) ),
Max((HIGH-ref(LOW,51)) / ( (Ref(Sum (Atr,52),1) /52) * Sqrt(52) ),
Max((HIGH-ref(LOW,52)) / ( (Ref(Sum (Atr,53),1) /53) * Sqrt(53) ),
Max((HIGH-ref(LOW,53)) / ( (Ref(Sum (Atr,54),1) /54) * Sqrt(54) ),
Max((HIGH-ref(LOW,54)) / ( (Ref(Sum (Atr,55),1) /55) * Sqrt(55) ),
Max((HIGH-ref(LOW,55)) / ( (Ref(Sum (Atr,56),1) /56) * Sqrt(56) ),
Max((HIGH-ref(LOW,56)) / ( (Ref(Sum (Atr,57),1) /57) * Sqrt(57) ),
Max((HIGH-ref(LOW,57)) / ( (Ref(Sum (Atr,58),1) /58) * Sqrt(58) ),
Max((HIGH-ref(LOW,58)) / ( (Ref(Sum (Atr,59),1) /59) * Sqrt(59) ),
Max((HIGH-ref(LOW,59)) / ( (Ref(Sum (Atr,60),1) /60) * Sqrt(60) ),
Max((HIGH-ref(LOW,60)) / ( (Ref(Sum (Atr,61),1) /61) * Sqrt(61) ),
Max((HIGH-ref(LOW,61)) / ( (Ref(Sum (Atr,62),1) /62) * Sqrt(62) ),
Max((HIGH-ref(LOW,62)) / ( (Ref(Sum (Atr,63),1) /63) * Sqrt(63) ),
Max((HIGH-ref(LOW,63)) / ( (Ref(Sum (Atr,64),1) /64) * Sqrt(64) ),
Max((HIGH-ref(LOW,64)) / ( (Ref(Sum (Atr,65),1) /65) * Sqrt(65) ),
Max((HIGH-ref(LOW,65)) / ( (Ref(Sum (Atr ,66),1) / 66) * Sqrt( 66 ) ),
Max((HIGH-ref(LOW,66)) / ( (Ref(Sum (Atr ,67),1) / 67) * Sqrt( 67 ) ),
Max((HIGH-ref(LOW,67)) / ( (Ref(Sum (Atr ,68),1) / 68) * Sqrt( 68 ) ),
Max((HIGH-ref(LOW,68)) / ( (Ref(Sum (Atr ,69),1) / 69) * Sqrt( 69 ) ),
Max((HIGH-ref(LOW,69)) / ( (Ref(Sum (Atr ,70),1) / 70) * Sqrt( 70 ) ),
Max((HIGH-ref(LOW,70)) / ( (Ref(Sum (Atr ,71),1) / 71) * Sqrt( 71 ) ),
Max((HIGH-ref(LOW,71)) / ( (Ref(Sum (Atr ,72),1) / 72) * Sqrt( 72 ) ),
Max((HIGH-ref(LOW,72)) / ( (Ref(Sum (Atr ,73),1) / 73) * Sqrt( 73 ) ),
Max((HIGH-ref(LOW,73)) / ( (Ref(Sum (Atr ,74),1) / 74) * Sqrt( 74 ) ),
Max((HIGH-ref(LOW,74)) / ( (Ref(Sum (Atr ,75),1) / 75) * Sqrt( 75 ) ),
Max((HIGH-ref(LOW,75)) / ( (Ref(Sum (Atr ,76),1) / 76) * Sqrt( 76 ) ),
Max((HIGH-ref(LOW,76)) / ( (Ref(Sum (Atr ,77),1) / 77) * Sqrt( 77 ) ),
Max((HIGH-ref(LOW,77)) / ( (Ref(Sum (Atr ,78),1) / 78) * Sqrt( 78 ) ),
Max((HIGH-ref(LOW,78)) / ( (Ref(Sum (Atr ,79),1) / 79) * Sqrt( 79 ) ),
Max((HIGH-ref(LOW,79)) / ( (Ref(Sum (Atr ,80),1) / 80) * Sqrt( 80 ) ),
Max((HIGH-ref(LOW,80)) / ( (Ref(Sum (Atr ,81),1) / 81) * Sqrt( 81 ) ),
Max((HIGH-ref(LOW,81)) / ( (Ref(Sum (Atr ,82),1) / 82) * Sqrt( 82 ) ),
Max((HIGH-ref(LOW,82)) / ( (Ref(Sum (Atr ,83),1) / 83) * Sqrt( 83 ) ),
Max((HIGH-ref(LOW,83)) / ( (Ref(Sum (Atr ,84),1) / 84) * Sqrt( 84 ) ),
Max((HIGH-ref(LOW,84)) / ( (Ref(Sum (Atr ,85),1) / 85) * Sqrt( 85 ) ),
Max((HIGH-ref(LOW,85)) / ( (Ref(Sum (Atr ,86),1) / 86) * Sqrt( 86 ) ),
Max((HIGH-ref(LOW,86)) / ( (Ref(Sum (Atr ,87),1) / 87) * Sqrt( 87 ) ),
Max((HIGH-ref(LOW,87)) / ( (Ref(Sum (Atr ,88),1) / 88) * Sqrt( 88 ) ),
Max((HIGH-ref(LOW,88)) / ( (Ref(Sum (Atr ,89),1) / 89) * Sqrt( 89 ) ),
Max((HIGH-ref(LOW,89)) / ( (Ref(Sum (Atr ,90),1) / 90) * Sqrt( 90 ) ),
Max((HIGH-ref(LOW,90)) / ( (Ref(Sum (Atr ,91),1) / 91) * Sqrt( 91 ) ),
Max((HIGH-ref(LOW,91)) / ( (Ref(Sum (Atr ,92),1) / 92) * Sqrt( 92 ) ),
Max((HIGH-ref(LOW,92)) / ( (Ref(Sum (Atr ,93),1) / 93) * Sqrt( 93 ) ),
Max((HIGH-ref(LOW,93)) / ( (Ref(Sum (Atr ,94),1) / 94) * Sqrt( 94 ) ),
Max((HIGH-ref(LOW,94)) / ( (Ref(Sum (Atr ,95),1) / 95) * Sqrt( 95 ) ),
Max((HIGH-ref(LOW,95)) / ( (Ref(Sum (Atr ,96),1) / 96) * Sqrt( 96 ) ),
Max((HIGH-ref(LOW,96)) / ( (Ref(Sum (Atr ,97),1) / 97) * Sqrt( 97 ) ),
Max((HIGH-ref(LOW,97)) / ( (Ref(Sum (Atr ,98),1) / 98) * Sqrt( 98 ) ),
Max((HIGH-ref(LOW,98)) / ( (Ref(Sum (Atr ,99),1) / 99) * Sqrt( 99 ) ),
Max((HIGH-ref(LOW,99)) / ( (Ref(Sum (Atr ,100),1) / 100) * Sqrt( 100 ) ),
Max((HIGH-ref(LOW,100)) / ( (Ref(Sum (Atr ,101),1) / 101) * Sqrt( 101 ) ),
(HIGH-ref(LOW,101)) / ( (Ref(Sum (Atr ,102),1) / 102) * Sqrt( 102 ) )) ) ) ) ) ) )))))))))))))))))))))))))))
)))))))))) )))))))))) ))))))))))) )))))))))) )))))))))) )))))))))) ))))));
low2:=(ema(low1,4)+0.6)*c,colorgreen,linethick1;
low22:=ema(low1,5)*C,colorred,linethick2;
high2:=ema(high1,5)*c,colormagenta;
high2x:=(ema(high1,3)*c+ma(ema(high1,3)*c,3))/2,colormagenta;
high3:=3*high2-2*high1*C,colorff6600;
low2a:=(ema(low1,5)-1.2)*C,colorgreen,linethick1;
high2a:=high2x,colormagenta;
high2b:=high2x,colormagenta,linethick5,pointdot;
qqq:=(ma((3.7-ema(high1,3))*c,3)+(3.7-ema(high1,3))*c)/2,color99ccff,linethick1;
qqq1:=qqq,color99ccff,linethick4,pointdot;
ppp2:=ema(high2,3);
qqq2:=ema(low22,3);
qqqq:=(ma((0.7-ema(high1,3))*c,3)+(0.7-ema(high1,3))*c)/2,color99ccff,linethick1;
qqqq1:=qqqq,color99ccff,linethick4,pointdot;
gg1:=ma((2.5-ema(high1,5))*c,5),color99ccff,linethick1;
gg1a:=(gg1+(2.5-ema(high1,5))*c)/2,colorwhite,linethick2;
gg1aa:=gg1a,color99ccff,linethick4,pointdot;
gg2:=(low2a+gg1a*1.2)/2.2,linethick2,color000000;
gg3:=(gg2+qqq)/2;
gg4:=(gg2+qqq*2)/3;
zxxx1:=llv(hhv(llv(l,11),11),5),COLORred,LINETHICK0;
zyyy1:=hhv(llv(hhv(l,11),11),5),COLORyellow,LINETHICK0;
// {(llv(hhv(llv(l,11),11),5)+hhv(llv(hhv(l,11),11),5))/2,COLORwhite,LINETHICK3;}
zxxx2:=llv(hhv(llv(l,5),11),11),COLORgreen,LINETHICK0;
zyyy2:=hhv(llv(hhv(l,5),11),11),COLORcyan,LINETHICK0;
zxxx3:=(zxxx1+zxxx2)/2,coloryellow,linethick2;
zyyy3:=(zyyy1+zyyy2)/2,colorgreen,linethick2;
zzz1:=(zxxx3+zyyy3*1.5)/2.5,coloryellow,linethick2;
// FILLRGN(zxxx3<zyyy3,zzz1,zyyy3),COLOR004400;
zzz1a:=zzz1,coloryellow,linethick2;
zxxx3a:=zxxx3,colorgreen,linethick0;
zyyy3a:=zyyy3,color008800,linethick0;
{--------------------------------------------------------------------------------------------------------}
{-----------------------------------------------------------------------------------------------------------------}
Ehh:=(H>ref(h,1));
Ell:=(L<ref(L,1));
Esarl:=(ma(llV(L,3),2)+ema(l,3)*1.5)/2.5;
Esarh:=(ma(HHV(H,3),2)+ema(h,3)*1.5)/2.5;
Esart:=l;
fec:=c;
feh:=h;
fel:=l;
<%
vc=ffl.vardata("fec")
vh=ffl.vardata("feh")
vl=ffl.vardata("fel")
vhh=ffl.vardata("Ehh")
vll=ffl.vardata("Ell")
vsarh=ffl.vardata("Esarh")
vsarl=ffl.vardata("Esarl")
vsart=ffl.vardata("Esart")
vcc=ffl.vardata("Ehh")
vee=ffl.vardata("Ell")
last=ubound(vc)
vsart(1)=vsarl(1)
vcc(1)=0.02
vee(1)=0.02
vcc1=0
vee1=0
for i=2 to last
if vc(i-1)>= vsart(i-1) and vsarl(i) > vsart(i-1) then
vsart(i)=vsarl(i)
elseif vc(i-1) >= vsart(i-1) and vsarl(i) <= vsart(i-1) then vsart(i)=vsart(i-1)
elseif vc(i-1) < vsart(i-1) and vsarh(i) < vsart(i-1) then vsart(i)=vsarh(i)
elseif vc(i-1) < vsart(i-1) and vsarh(i) >= vsart(i-1) then vsart(i)=vsart(i-1)
end if
rem if vc(i-1)>= vsart(i-1) and vsarl(i) > vsarl(i-1) then
rem vsart(i)=vsarl(i)
rem elseif vc(i-1) >= vsart(i-1) and vsarl(i) <= vsarl(i-1) then vsart(i)=vsarl(i-1) ----->changed by cheng
rem elseif vc(i-1) >= vsart(i-1) and vsarl(i) <= vsarl(i-1) then vsart(i)=vsart(i-1)
rem elseif vc(i-1) < vsart(i-1) and vsarh(i) < vsarh(i-1) then vsart(i)=vsarh(i)
rem elseif vc(i-1) < vsart(i-1) and vsarh(i) >= vsarh(i-1) then vsart(i)=vsarh(i-1) ----->changed by cheng
rem elseif vc(i-1) < vsart(i-1) and vsarh(i) >= vsarh(i-1) then vsart(i)=vsart(i-1)
rem end if
if vc(i-1) >= vsart(i-1) and vc(i) < vsart(i) then
vsart(i)=vh(i-1)
else
vcc1=1
end if
if vc(i-1) < vsart(i-1) and vc(i) >= vsart(i) then
vsart(i)=vl(i-1)
else
vee1=1
end if
next
ffl.vardata("Esart")=vsart
%>
Esarta:=Esart,color0066ff,linethick1,pointdot;{平滑转折(ma(HHV(H,3),2)+ema(h,3)*1.5)/2.5}
partline(c>1,Esart),color0066ff,linethick1,pointdot;{平滑转折(ma(HHV(H,3),2)+ema(h,3)*1.5)/2.5}
// ---------------------------------------------------------------------------------------------------------------------------------------
J0:=(H+L)/2;{N1:=155; N2:=180; N1=180; N2=155; N1=180; N2=198 }
Jjj1:=MA(J0,180)-MA(J0,198);
Jjj2:=CROSS(Jjj1,0);
Jjj3:=CROSS(0,Jjj1);
Jjj4:=BARSLAST(Jjj2);
Jjj5:=BARSLAST(Jjj3);
zzjj:=IF (Jjj4<Jjj5,REF(HHV(H,2),Jjj4),REF(LLV(L,2),Jjj5)),Colorwhite,linethick3;
J1:=high2x;
J2:=CROSS(J1,gg2)*1;
J3:=CROSS(gg3,J1)*1;
J4:=BARSLAST(J3);
J5:=BARSLAST(J2);
zz:=IF (J4<J5,REF(HHV(H,2),J4),REF(LLV(L,2),J5)),Colormagenta,linethick1,shift1;
Ja1:=high2x;
Ja2:=CROSS(Ja1,gg2)*1;
Ja3:=CROSS(qqq,Ja1)*1;
Ja4:=BARSLAST(Ja3);
Ja5:=BARSLAST(Ja2);
zza:=IF (Ja4<Ja5,REF(HHV(H,2),Ja4),REF(LLV(L,2),Ja5)),Color9999ff,linethick2;
Jb1:=high2x;
Jb2:=CROSS(Jb1,gg1a)*5000;
Jb3:=CROSS(gg3,Jb1)*3000;
Jb4:=BARSLAST(Jb3);
Jb5:=BARSLAST(Jb2);
zzb:=IF (Jb4<Jb5,REF(HHV(H,2),Jb4),REF(LLV(L,2),Jb5)),Colorgreen,linethick1;
Jc1:=high2x;
Jc2:=CROSS(Jc1,qqqq)*1;
Jc3:=CROSS(gg4,Jc1)*1;
Jc4:=BARSLAST(Jc3);
Jc5:=BARSLAST(Jc2);
zzc:=IF (Jc4<Jc5,REF(HHV(H,2),Jc4),REF(LLV(L,2),Jc5)),Coloryellow,linethick2;
一线:ma(zzc,6),linethick4,colorwhite,,COLORMAGENTA;
zzaa:=zza,Color9999ff,linethick2;
Je1:=high2x;
Je2:=CROSS(Je1,qqqq)*1;
Je3:=CROSS(gg3,Je1)*1;
Je4:=BARSLAST(Je3);
Je5:=BARSLAST(Je2);
zze:=IF (Je4<Je5,REF(HHV(H,2),Je4),REF(LLV(L,2),Je5)),Coloryellow,linethick2;
二线:ma(zze,6),linethick4,colorred,Coloryellow;
STICKLINE(一线>二线,一线,二线,0.001,0),color6F725D;
STICKLINE(一线<二线,一线,二线,0.001,0),color6F725D;
{立体K线}
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,9,0 ),COLOR009900;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,6,0 ),COLOR00cc00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,2.4,0 ),COLOR33ff00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,1.1,0 ),COLOR66ff00;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,9,0 ),COLOr000099;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,6 ,0 ),COLOR0000cc;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2.4 ,0 ),COLOR0000ff;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,1.1 ,0 ),COLOR0033ff;
STICKLINE(CLOSE>OPEN,OPEN,LOW,2,0 ),COLOR9933ff;
STICKLINE(CLOSE>OPEN,CLOSE,HIGH,2,0 ),COLOR9933ff;
STICKLINE(OPEN>=CLOSE,CLOSE,LOW,2,0 ),COLOR66cc33;
STICKLINE(OPEN>=CLOSE,OPEN,HIGH,2,0 ),COLOR66cc33;
|