乾坤操盘,主图,通用源码,贴图,说明

标签:
股票 |
分类: 通达信指标 |
上穿乾坤可入,上穿压力加仓,反之减仓
{乾坤操盘}
均价:=(2*C+(C+H+L+O)/4+O)/4; R:=(L+2*均价)/3;R1:=(H+2*均价)/3; 操盘线:MA((R+r1)/2,5),COLORWHITE; 乾坤线:EMA((REF((R+r1)/2,13)+REF((R+r1)/2,21))/2,1),COLORGREEN; 压力线:HHV((REF((R+r1)/2,13)+REF((R+r1)/2,21))/2,34),COLORYELLOW;
{霸王别姬}
RSV:=(((CLOSE - LLV(LOW,13)) / (HHV(HIGH,13) - LLV(LOW,13))) *
100);
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J:=((3 * K) - (2 * D));
RSV12:=(((CLOSE - LLV(LOW,34)) / (HHV(HIGH,34) - LLV(LOW,34))) *
100);
K12:=SMA(RSV12,3,1);
D12:=SMA(K12,3,1);
J12:=((3 * K12) - (2 * D12));
RSV24:=(((CLOSE - LLV(LOW,55)) / (HHV(HIGH,55) - LLV(LOW,55))) *
100);
K24:=SMA(RSV24,3,1);
D24:=SMA(K24,3,1);
J24:=((3 * K24) - (2 * D24));
生当为人杰:=IF(CROSS(J,J24),LOW,REF(LOW,BARSLAST(CROSS(J,J24)))),LINETHICK2,COLORFFFFFF;
死亦为鬼雄:=IF(CROSS(J24,J),HIGH,REF(HIGH,BARSLAST(CROSS(J24,J)))),LINETHICK2,COLORFFEEFF;
剑在手:EMA(CLOSE,3),COLORFFFF77;
悲欢共:EMA(CLOSE,5),COLORFF00EE;
生死同:EMA(悲欢共,5),COLORFFFFFF;
VARF1:=(COUNT(CROSS(剑在手,生死同),2) = 1);
VARF2:=(COUNT(CROSS(悲欢共,生死同),2) = 1);
ZAI:=FILTER((VARF1 AND VARF2),2);
DRAWTEXT(ZAI,生死同,' →◆●¤汉兵已掠地'),COLORFFFFFF;
VV2:=REF(CLOSE,1);
VV3:=((SMA((CLOSE - VV2),6,1) / SMA(ABS((CLOSE - VV2)),6,1)) *
100);
DRAWICON(((REF(VV3,1) > 81) AND (VV3
< 80)),HIGH,2);
DRAWTEXT(((REF(VV3,1) > 81) AND (VV3
< 80)),HIGH,' →◆●四面楚歌声↓'),COLORFFFFFF;
VAR1:=((((HIGH + LOW) + OPEN) + (2 * CLOSE)) / 5);
VAR2:=REF(VAR1,1);
VAR3:=((SMA(MAX((VAR1 - VAR2),0),10,1) / SMA(ABS((VAR1 -
VAR2)),10,1)) * 100);
HY3:=IF(((((COUNT((VAR3 < 20),5) >=
1) AND (COUNT((VAR1 = LLV(VAR1,10)),10) >= 1)) AND
(CLOSE >= (OPEN * 1.038))) AND (VOL >
(MA(VOL,5) * 1.2))),1,0);
DRAWTEXT(HY3,LOW,' →◆●▲四方云动!!'),COLORFFDDDD;
S:=(MA(VOL,5) / MA(VOL,60));
BIAS:=MA(S,5);
F:=(((CLOSE - MA(CLOSE,5)) / MA(CLOSE,5)) * 100);
LC:=MA(S,121);
RSV1:=(((CLOSE - LLV(LOW,45)) / (HHV(HIGH,45) - LLV(LOW,45))) *
100);
K1:=SMA(RSV1,15,1);
D1:=SMA(K1,15,1);
J1:=((3 * K1) - (2 * D1));
RSI:=REF(CLOSE,1);
S1:=((SMA(MAX((CLOSE - RSI),0),6,1) / SMA(ABS((CLOSE - RSI)),6,1))
* 100);
DRAWTEXT(CROSS(84,S1),H*0.99,' ←←◆●豪情天纵!!◆●'),COLORFFFFEE;
VAR4:=IF(((((J < 11) AND (F > (0 -
11))) AND CROSS(S,LC)) AND ((S - LC) >
0.01)),2,0);
DRAWTEXT((VAR4 = 2),LOW,' →◆● 四方云动!! ◆● '),COLORFF0000;
VAR1Q:=IF(((YEAR = 2999) AND (MONTH >
12)),0,1);
垓下:(MA(((AMOUNT / VOL) / 100),10.2) *
VAR1Q),POINTDOT,LINETHICK2,COLORFFFFFF;
灞上:(MA(((AMOUNT / VOL) / 100),41) *
VAR1Q),LINETHICK2,COLORFFFF33;
江东:(MA(((AMOUNT / VOL) / 100),118) *
VAR1Q),LINETHICK2,COLORFF00FF;
VAR2Q:=(EMA((EMA(((AMOUNT / VOL) / 100),5) * 1.062),5) *
1.062);
VAR3Q:=(EMA((EMA(((AMOUNT / VOL) / 100),3) * 0.538),3) *
0.538);
DRAWTEXT((CLOSE >
VAR2Q),CLOSE,'←←←暂别离'),COLORFF0000;
DRAWTEXT((CLOSE <
VAR3Q),CLOSE,'←←←且偷欢'),COLORFF00EE;
JJ:=(((CLOSE > 垓下) AND ABS(((垓下 - 江东)
<= 1))) AND CROSS(垓下,灞上));
DRAWTEXT(JJ,LOW,'←←←兵变举事'),COLORFFFF00;
H1A:=((((HIGH + LOW) + CLOSE) + OPEN) / 4);
VAR1R:=REF(CLOSE,1);
VAR2R:=((SMA(MAX((CLOSE - VAR1R),0),6,1) / SMA(ABS((CLOSE -
VAR1R)),6,1)) * 100);
DRAWTEXT(CROSS(84,VAR2R),(HIGH * 1.01),'←←←恨别离!!
'),COLORFFFF33;
DRAWICON(CROSS(84,VAR2R),(HIGH * 1.03),2);
DRAWICON(CROSS(((REF(HIGH,1) + REF(LOW,1)) / 2),(MA(CLOSE,20) + (2
* STD(CLOSE,20)))),(HIGH * 1.03),2);
H1A1:=(((HIGH + LOW) + CLOSE) / 3);
VAR11:=(((((2 * CLOSE) + HIGH) + LOW) + OPEN) / 5);
VAR12:=LLV(LOW,5);
VAR13:=HHV(HIGH,4);
VAR14:=EMA((((VAR11 - VAR12) / (VAR13 - VAR12)) * 100),4);
VAR5:=EMA(((0.667 * REF(VAR14,1)) + (0.333 * VAR14)),2);
DRAWTEXT((CROSS(VAR14,VAR5) AND (VAR14 <
40)),LOW,'至今思项羽'),COLOR10FF10;
VAR1E:=(((CLOSE - MA(CLOSE,30)) / MA(CLOSE,30)) * 100);
VAR2E:=((CLOSE > OPEN) AND ((OPEN - LOW)
> (HIGH - CLOSE)));
VAR3E:=((REF(VAR1E,1) < (0 - 20)) AND VAR2E);
JJE:=(((REF(VAR1E,1) < (0 - 20)) AND (CLOSE
> OPEN)) AND ((((CLOSE - REF(CLOSE,1)) /
REF(CLOSE,1)) * 1000) > 20));
VAR9E:=FILTER((VAR3E OR JJE),3);
VAR7E:=((OPEN > CLOSE) AND ((HIGH - IF((CLOSE
> OPEN),CLOSE,OPEN)) > (IF((OPEN
< CLOSE),OPEN,CLOSE) - LOW)));
VAR8E:=((REF(VAR1E,1) > ABS((0 - 20))) AND
VAR7E);
VAR10E:=(((REF(VAR1E,1) > ABS((0 - 20))) AND (CLOSE
< OPEN)) AND ((((REF(CLOSE,1) - CLOSE) /
REF(CLOSE,1)) * 1000) > 20));
VARC:=FILTER((VAR8E OR VAR10E),3);
VARAE:=((REF(VAR1E,1) < (0 - 13)) AND VAR2E);
VARBE:=(((REF(VAR1E,1) < (0 - 13)) AND (CLOSE
> OPEN)) AND ((((CLOSE - REF(CLOSE,1)) /
REF(CLOSE,1)) * 1000) > 20));
VARD:=FILTER((VARAE OR VARBE),3);
VARE:=((REF(VAR1E,1) > ABS((0 - 13))) AND
VAR7E);
VARF:=(((REF(VAR1E,1) > ABS((0 - 13))) AND (CLOSE
< OPEN)) AND ((((REF(CLOSE,1) - CLOSE) /
REF(CLOSE,1)) * 1000) > 20));
VAR15:=FILTER((VARE OR VARF),3);
DRAWICON(((VAR9E* VAR1E) > 0),LOW,1);
DRAWICON(((VARC * VAR1E) > 0),HIGH,2);
DRAWTEXT(((VARD * VAR1E) > 0),(1.02 *
REF(CLOSE,1)),'积极关注'),COLORFFFFFF;
DRAWTEXT(((VAR15 * VAR1E) > 0),(0.99 *
REF(CLOSE,1)),'←←←逃离苦海'),COLOR1010FF;
VAR11E:=(((((2 * CLOSE) + HIGH) + LOW) + OPEN) / 5);
VAR12E:=LLV(LOW,5);
VAR13E:=HHV(HIGH,4);
VAR14E:=EMA((((VAR11E - VAR12E) / (VAR13E - VAR12E)) *
100),4);
VAR5R:=EMA(((0.667 * REF(VAR14E,1)) + (0.333 * VAR14E)),2);
DRAWTEXT((CROSS(VAR14,VAR5R) AND (VAR14E <
40)),LOW,'至今思项羽'),COLOR10FF10;
VAR16:=(EMA(VAR11E,13) - EMA(VAR11E,34));
VAR17:=EMA(VAR16,5);
VAR18:=(((0 - 2) * (VAR16 - VAR17)) * 3.8);
DRAWTEXT((CROSS(VAR18,MA(VAR18,3)) AND (VAR16 >
VAR17)),HIGH,'情天纵!!'),COLOR10FFFF;
VAR19:=((((2 * CLOSE) + LOW) + HIGH) / 4);
VAR1R1:=EMA(CLOSE,8);
VAR2R1:=EMA(CLOSE,20);
STICKLINE((VAR1R1 >
VAR2R1),VAR2R1,VAR1R1,2,1),COLORFFFF00;
VAR3S:=SMA(MAX(MAX((HIGH - LOW),ABS((HIGH -
REF(CLOSE,1)))),ABS((LOW - REF(CLOSE,1)))),14,1);
JJS:=(HIGH - REF(HIGH,1));
VAR9S:=(REF(LOW,1) - LOW);
VAR7S:=SMA(IF(((JJS > 0) AND (JJS >
VAR9S)),JJS,0),12,1);
VAR8S:=SMA(IF(((VAR9S > 0) AND (VAR9S
> JJS)),VAR9S,0),12,1);
VAR10S:=((VAR7S * 100) / VAR3S);
VARCS:=((VAR8S * 100) / VAR3S);
VARAS:=SMA(((ABS((VARCS - VAR10S)) / (VARCS + VAR10S)) *
100),12,1);
VARBS:=((VARAS + REF(VARAS,5)) / 2);
VARDS:=((SUM((HIGH - OPEN),12) / SUM((OPEN - LOW),12)) *
100);
VARES:=((SUM(MAX(0,(HIGH - REF(CLOSE,1))),12) /
SUM(MAX(0,(REF(CLOSE,1) - LOW)),12)) * 100);
VARFS:=((AMOUNT / VOL) / 100);
VAR15S:=(((((3 * HIGH) + LOW) + OPEN) + (2 * CLOSE)) / 7);
VAR11S:=((SUM(AMOUNT,5) / VARFS) / 100);
VAR12S:=((SUM(AMOUNT,13) / VARFS) / 100);
VAR13S:=((SUM(AMOUNT,34) / VARFS) / 100);
VAR14S:=((SUM(AMOUNT,209) / VARFS) / 100);
VAR5S:=(((REF(VOL,1) + REF(VOL,2)) + REF(VOL,3)) +
REF(VOL,4));
VAR16S:=(VAR5S / CAPITAL);
VAR17S:=(((VOL / CAPITAL) * VAR15S) + (VAR16S *
REF(VARFS,1)));
CYC5:=IF((DATE < 1500501),DMA(VAR15S,(VOL /
VAR11S)),0);
CYC13:=IF((DATE < 1500501),DMA(VAR15S,(VOL /
VAR12S)),0);
CYC34:=IF((DATE < 1500501),DMA(VAR15S,(VOL /
VAR13S)),0);
CYC无穷大:=IF((DATE < 1500501),DMA(VAR15,(VOL /
CAPITAL)),0);
VAR18S:=((100 * (CLOSE - CYC5)) / CYC5);
VAR19S:=((100 * (CLOSE - CYC13)) / CYC13);
VAR1A:=((100 * (CLOSE - CYC34)) / CYC34);
VAR1B:=((100 * (CLOSE - CYC无穷大)) / CYC无穷大);
VAR1C:=MA(CLOSE,13);
VAR1D:=((100 * (VAR1C - REF(VAR1C,1))) / REF(VAR1C,1));
VAR1ES:=(CLOSE - LOW);
VAR1F:=(HIGH - LOW);
VAR20:=(CLOSE - HIGH);
VAR21:=IF((CLOSE >= 0),(((VAR1E / VAR1F) + (VAR20 /
VAR1F)) * VOL),(((VAR20 / VAR1F) + (VAR1E / VAR1F)) * VOL));
VAR22:=(SUM(VAR21,10) / 10000);
VAR23:=((100 * (CYC13 - REF(CYC13,1))) / REF(CYC13,1));
VAR24:=(((CLOSE - LLV(LOW,9)) / (HHV(HIGH,9) - LLV(LOW,9))) *
100);
VAR25:=SMA(VAR24,3,1);
VAR26:=SMA(VAR25,3,1);
VAR27:=((3 * VAR25) - (2 * VAR26));
VAR28:=(((CLOSE - LLV(LOW,60)) / (HHV(HIGH,60) - LLV(LOW,60))) *
100);
VAR29:=SMA(VAR28,5,1);
VAR2A:=SMA(VAR29,10,1);
VAR2B:=CROSS(VAR2A,VAR29);
VAR2C:=((VAR2A > 80) OR (VAR29 >
80));
VAR2D:=(VAR2B AND VAR2C);
VAR2ES:=(((VAR1D > 0) AND (VAR23 >
0)) AND (VAR22 > 0));
VAR2F:=((((VAR1D < 0) OR (VAR23 < 0))
OR (VAR22 < 0)) OR (VAR19 <
0));
VAR30:=CLOSE;
VAR31:=OPEN;
VAR32:=HIGH;
VAR33:=LOW;
VAR34:=LLV(LOW,240);
VAR35:=(((100 * (CLOSE - VAR34)) / VAR34) >
15);
VAR36:=(((100 * (CLOSE - VAR34)) / VAR34) <
45);
VAR37:=((100 * (CLOSE - VAR34)) / VAR34);
VAR38:=(VAR35 AND VAR36);
VAR39:=(100 * (WINNER(CLOSE) - WINNER((0.7 * CLOSE))));
VAR3A:=((100 * (CYC5 - REF(CYC5,1))) / REF(CYC5,1));
VAR3B:=(((VAR39 > 70) AND (VAR3A >
1)) AND VAR38);
DRAWTEXT(VAR3B,LOW,'密探军营'),COLORFF0099;
VAR3C:=(((VAR19 - LLV(VAR19,60)) / (HHV(VAR19,60) - LLV(VAR19,60)))
* 100);
VAR3D:=LLV(LOW,240);
VAR3ES:=((100 * (CLOSE - VAR3D)) / VAR3D);
VAR3F:=(WINNER(CLOSE) / SMA((VOL / CAPITAL),13,1));
VAR40:=((100 * VOL) / CAPITAL);
VAR41:=(100 * (WINNER(CLOSE) - REF(WINNER(CLOSE),1)));
VAR42:=(VAR41 / VAR40);
VAR43:=(1.1 * CLOSE);
VAR44:=(0.9 * CLOSE);
VAR45:=(100 * (WINNER(VAR43) - WINNER(VAR44)));
VAR46:=((100 * (CLOSE - COST(0))) / (COST(100) - COST(0)));
VAR47:=(((CLOSE - LLV(LOW,240)) / (HHV(HIGH,240) - LLV(LOW,240))) *
100);
VAR48:=(((CLOSE - LLV(LOW,480)) / (HHV(HIGH,480) - LLV(LOW,480))) *
100);
VAR49:=(WINNER(CLOSE) / (VOL / CAPITAL));
VAR4A:=(100 * (1 - WINNER(CLOSE)));
神奇趋势线:=(((((((((VAR37 < 1) AND (VAR49
< 0.3)) AND (VAR3F < 0.3)) AND (VAR42
< 0)) AND (VAR47 < 0.5)) AND (VAR48
< 0.5)) AND (VAR45 < 1.5)) AND (VAR46
< 1)) AND (VAR3C = 0));
DRAWTEXT(神奇趋势线,LOW,'至今思项羽'),COLORFFFF66;
DRAWICON(((VAR9E * VAR1) > 0),LOW,1);
DRAWICON(((VARC * VAR1) > 0),HIGH,2);
DRAWTEXT(((VARD * VAR1) > 0),(1.02 *
REF(CLOSE,1)),'积极关注'),COLORFFFFFF;
DRAWTEXT(((VAR15 * VAR1) > 0),(0.99 *
REF(CLOSE,1)),'←←←风声鹤唳'),COLOR1010FF;
VAR11F:=(((((2 * CLOSE) + HIGH) + LOW) + OPEN) / 5);
VAR12F:=LLV(LOW,5);
VAR13F:=HHV(HIGH,4);
VAR14F:=EMA((((VAR11F - VAR12F) / (VAR13F - VAR12F)) *
100),4);
VAR5F:=EMA(((0.667 * REF(VAR14F,1)) + (0.333 * VAR14F)),2);
DRAWTEXT((CROSS(VAR14F,VAR5F) AND (VAR14 <
40)),LOW,'至今思项羽'),COLOR10FF10;
VAR16F:=(EMA(VAR11F,13) - EMA(VAR11F,34));
VAR17F:=EMA(VAR16F,5);
VAR18F:=(((0 - 2) * (VAR16F - VAR17F)) * 3.8);
献上暴张选股的 选股指标
{暴张副图}
DIF:=EMA(DCLOSE,12)-EMA(DCLOSE,26);
DEA:=EMA(DIF,9);
AAA:=(DIF-DEA)*2*60;
起爆:=CROSS(AAA-REF(AAA,1),15);
DRAWTEXT(起爆,L,'起爆');
{暴张选股}
DIF:=EMA(DCLOSE,12)-EMA(DCLOSE,26);
DEA:=EMA(DIF,9);
AAA:=(DIF-DEA)*2*60;
起爆:CROSS(AAA-REF(AAA,1),15);