kk2886 发表于 2013-2-3 14:47:40

支撑与压力、波段顶底(有未来函数)源码

**** Hidden Message *****

niulianp 发表于 2014-5-15 17:19:08

趋势线:MA(CLOSE,21),COLORFFFFFF,LINETHICK2;
生命线:MA(CLOSE,43),COLOR00FFFF,LINETHICK2;
牛熊分界线:MA
(CLOSE,250),COLOR0000FF,LINETHICK3;
TY:=C;
HD:=FILTER(BACKSET(FILTER(REF(TY,10)=HHV
(TY,2*10+1),10),10+1),10);
LD:=FILTER(BACKSET(FILTER(REF(TY,10)=LLV
(TY,2*10+1),10),10+1),10);
A:=REF(C,BARSLAST(HD));
B:=REF(C,BARSLAST(LD));
T1:=BARSLAST(HD)<BARSLAST(LD) AND NOT(HD) ;
T2:=BARSLAST(HD)>BARSLAST(LD) AND NOT(LD);
压力线:IF
(T1,A,A),COLORFF00FF,POINTDOT,LINETHICK1;
STICKLINE(T1,A,A,9,0),COLORFF00FF;
支撑线:IF
(T2,B,B),COLOR80FF00,POINTDOT,LINETHICK1;
VAR3:=LLV(HIGH,240);
VAR4:=100*(CLOSE-VAR3)/VAR3;
VAR5:=(CLOSE-LLV(LOW,528))/(HHV(HIGH,528)-LLV
(LOW,528))*100;
VAR6:=(CLOSE-LLV(CLOSE,530))/(HHV(CLOSE,530)-
LLV(CLOSE,530))*100;
VAR7:=0;
VAR8:=MA(HHV(CLOSE-REF(CLOSE,1),0),34)/MA(ABS
(CLOSE-REF(CLOSE,1)),7)*100;
VAR9:=MA(HHV(CLOSE-REF(CLOSE,1),0),13)/MA(ABS
(CLOSE-REF(CLOSE,1)),13)*100;
VARA:=BARSCOUNT(CLOSE);
VARB:=VAR8<20 AND VAR9<23 AND VARA>35;
VARC:=VARB AND COUNT(VARB,1)=1;
VARD:=EMA(CLOSE,21)-EMA(CLOSE,8);
VARE:=EMA(VARD,5);
VARF:=TROUGH(3,6,1)<4 AND CROSS(VARD,VARE);
VAR10:=IF(TROUGH(3,16,1)=0 AND
HIGH>LOW+0.04,4,0);
VAR11:=ZIG(3,6)>REF(ZIG(3,6),1) AND REF(ZIG
(3,6),1)<=REF(ZIG(3,6),2)
AND REF(ZIG(3,6),2)<=REF(ZIG(3,6),3);
VAR12:=ZIG(3,6)<REF(ZIG(3,6),1) AND REF(ZIG
(3,6),1)>=REF(ZIG(3,6),2)
AND REF(ZIG(3,6),2)>=REF(ZIG(3,6),3);
VAR13:=ZIG(3,22)>REF(ZIG(3,22),1) AND REF(ZIG
(3,22),1)<=REF(ZIG(3,22),2)
AND REF(ZIG(3,22),2)<=REF(ZIG(3,22),3);
VAR14:=ZIG(3,22)<REF(ZIG(3,22),1) AND REF(ZIG
(3,22),1)>=REF(ZIG(3,22),2)
AND REF(ZIG(3,22),2)>=REF(ZIG(3,22),3);
VAR15:=ZIG(3,51)>REF(ZIG(3,51),1) AND REF(ZIG
(3,51),1)<=REF(ZIG(3,51),2)
AND REF(ZIG(3,51),2)<=REF(ZIG(3,51),3);
VAR16:=ZIG(3,51)<REF(ZIG(3,51),1) AND REF(ZIG
(3,51),1)>=REF(ZIG(3,51),2)
AND REF(ZIG(3,51),2)>=REF(ZIG(3,51),3);
VAR17:=ZIG(3,72)>REF(ZIG(3,72),1) AND REF(ZIG
(3,72),1)<=REF(ZIG(3,72),2)
AND REF(ZIG(3,72),2)<=REF(ZIG(3,72),3);
VAR18:=ZIG(3,72)<REF(ZIG(3,72),1) AND REF(ZIG
(3,72),1)>=REF(ZIG(3,72),2)
AND REF(ZIG(3,72),2)>=REF(ZIG(3,72),3);
VAR19:=EMA(CLOSE,2)-EMA(CLOSE,150);
VAR1A:=EMA(VAR19,100);
VAR1B:=2*(VAR19-VAR1A);
VAR1C:=POW(VAR1B,3)*0.1+POW(VAR1B,1);
VAR1D:=SQRT(SQRT(LOW*HIGH*OPEN*CLOSE));
VAR1E:=EMA(VAR1D*0.97,3);
VAR1F:=(HIGH+LOW+CLOSE)/3;
VAR20:=(VAR1F-MA(VAR1F,14))/(0.015*AVEDEV
(VAR1F,14));
VAR21:=CROSS(VAR1E,LOW);
买点1:=VAR10;
买点2:=(VAR11+VAR13+VAR15+VAR17);
卖点1:=(VAR12+VAR14+VAR16+VAR18),LINETHICK2;
VAR22:=买点1 AND VARF AND VARC AND VAR21 AND
VAR4<0 AND VAR5=0
AND VAR6=0 AND VAR20<(-110);
VAR1:=MA(CLOSE,5);
VAR2:=MA(CLOSE,10);
VAR31:=MA(CLOSE,30);
VARB1:=SUM(CLOSE*VOL*100,28)/SUM(VOL*100,28);
VARC1:=INTPART(VARB1*100)/100;
VARD1:=EMA(CLOSE,5)-EMA(CLOSE,10);
VARE1:=EMA(VARD1,9);
VAR131:=REF(VARE1,1);
VAR141:=VARE1;
VAR151:=VAR141-VAR131;
VAR161:=REF(VARD1,1);
VAR171:=VARD1;
VAR181:=VAR171-VAR161;
VAR191:=OPEN;
VAR1A1:=CLOSE;
DRAWTEXT(买点1>0,L-0.01,'▲跟多'),colorred;
DRAWTEXT(买点2>0,L-0.01,'▲跟多'),COLORFF00FF;
DRAWTEXT(卖点1>0,H+0.1,'▼卖点'),COLOR00FF00;

582008 发表于 2019-6-18 14:06:56

A1:=REF(C,1); A2:=SMA(MAX(C-A1,0),5,1)/SMA(ABS(C-A1),5,1)*1000; A3:=BARSLAST(REF(CROSS("RSI.RSI1"(6,12,24),"RSI.RSI2"(6,12,24)),1)); A4:=A2-LLV(A2,10); A5:=(MA(A4,2)*3+A4*13)/16; A6:=IF(A5>13,MA(A5,2),A5)/6; RSI1:=SMA(MAX(C-A1,0),6,1)/SMA(ABS(C-A1),6,1)*100; RSI2:=SMA(MAX(C-A1,0),12,1)/SMA(ABS(C-A1),12,1)*100; RSI3:=SMA(MAX(C-A1,0),24,1)/SMA(ABS(C-A1),24,1)*100; 压力:=HHV(MA(RSI2,3),12); 支撑:=LLV(MA(RSI2,3),12); 中间HHV(MA(RSI2,3),12)+LLV(MA(RSI2,3),12))/2,COLORRED,LINETHICK2; STICKLINE(RSI2<支撑,中间,RSI2,1,0)COLORFF972F; STICKLINE(RSI2>=支撑 AND RSI2<中间,中间,RSI2,1,0)COLORFF972F; STICKLINE(RSI2>=中间 AND RSI2<压力,中间,RSI2,2,0)COLORRED; STICKLINE(RSI2>=压力,中间,RSI2,2,0)COLORRED; B3:=REF(C,A3+1)>C AND REF("RSI.RSI1"(6,12,24),A3+1)<"RSI.RSI1"(6,12,24) AND CROSS ("RSI.RSI1"(6,12,24),"RSI.RSI2"(6,12,24)); DRAWTEXT(B3,RSI2,'←底背'); B1:=RSI1>=RSI2 AND RSI2>=RSI3; S1:=RSI1<RSI2 AND RSI2<RSI3; BS1:=NOT(RSI1>=RSI2 AND RSI2>=RSI3)AND NOT(RSI1<RSI2 AND RSI2<RSI3); STICKLINE(B1,80,82,2,1)COLORRED; STICKLINE(S1,80,82,2,1)COLORGREEN; STICKLINE(BS1,80,82,2,1)COLORYELLOW; 短线:IF(CROSS(A6,1) AND (A6<30)AND RSI2<35 AND RSI2>=支撑 AND RSI2<中间,30,20),COLORMAGENTA,LINETHICK2; AA:=VOL/((HIGH-LOW)*2-(ABS(CLOSE-OPEN)))*100; 主动买盘:=IF(CLOSE>OPEN,AA*(HIGH-LOW),IF(CLOSE<OPEN,AA*(HIGH-OPEN+CLOSE-LOW),VOL/2)); 主动卖盘:=IF(CLOSE>OPEN,-AA*(HIGH-CLOSE+OPEN-LOW),IF(CLOSE<OPEN,-AA*(HIGH-LOW),-VOL/2)); 买卖比:=主动买盘/主动卖盘; 卖盘:=VOL-主动买盘; 卖盘大:=(卖盘-主动买盘)/卖盘>0.6; 买盘大:=(主动买盘-卖盘)/主动买盘>0.6;

lwj810413 发表于 2024-4-22 12:11:22

上轨:ma(high,20); 下轨:ma(low,20);
STICKLINE(CLOSE>=上轨,CLOSE,OPEN,4,0),colorred;
STICKLINE(CLOSE<上轨 and CLOSE>下轨,CLOSE,OPEN,4,0),colorblue;
STICKLINE(CLOSE<=下轨,CLOSE,OPEN,4,0),colorgreen;
STICKLINE(CLOSE>=上轨,l,h,1,0),colorred;
STICKLINE(CLOSE<上轨 and CLOSE>下轨,l,h,1,0),colorblue;
STICKLINE(CLOSE<=下轨,l,h,1,0),colorgreen;
{上轨:WMA(HIGH,30);
下轨:WMA(LOW,30);
日上轨:"引用WMA.WMA_H#day"(30);
日下轨:"引用WMA.WMA_L#day"(30);
S:=CROSS(CLOSE,日上轨);
X:=CROSS(日下轨,CLOSE);
WS:=BARSLAST(S)+1;
WX:=BARSLAST(X)+1;
SS:=CROSS(SUM(S,WX),0.5);
XX:=CROSS(SUM(X,WS),0.5);
DRAWICON(SS,LOW*0.995,4);
DRAWTEXT(SS,LOW, \n \n买入),ALIGN1,colorFFFFFF;
DRAWICON(XX,HIGH*1.01,5);

大加化 发表于 2013-2-3 15:39:04

这公式我应该有了

ilikeinstock 发表于 2013-2-3 16:10:30

凭良心做事 发表于 2013-2-3 16:14:42

liyumin 发表于 2013-2-3 16:15:15

田田田田田田田田田田田田田田田

abcddcba 发表于 2013-2-3 16:24:07

222222222222221

177941349 发表于 2013-2-3 16:46:25

看看,是什么东西

burning 发表于 2013-2-3 16:47:07

一般!                     。。

562859154 发表于 2013-2-3 16:53:39

wtm19890114 发表于 2013-2-3 17:17:19

页: [1] 2 3 4 5 6 7 8 9 10
查看完整版本: 支撑与压力、波段顶底(有未来函数)源码