{主图源码如下}
DRAWGBK(C>0,RGB(0,150,150),RGB(0,00,100),0,' ',0);
N:=20;
M1:=5;
BOLL:=MA(C,N);
UB:=BOLL+2*STD(C,N);
LB:=BOLL-2*STD(C,N);
MA1:=MA(C,M1);
显示仪表盘1:=1;
总涨幅周期:=350;
范围高A:=REFDATE(HHV(H,120),DATE)*1.05;
范围低A:=REFDATE(LLV(L,120),DATE)*0.95;
MA5:=MA(C,5),COLORCYAN,LINETHICK2,NODRAW,COLORWHITE;
MA24:=MA(C,24),COLORGREEN,LINETHICK2,NODRAW,COLORWHITE;
MA72:=MA(C,72),COLORRED,LINETHICK2,NODRAW,COLORWHITE;
MA200:=IF((MA(C,200)<=范围高A AND MA(C,200)>=范围低A) OR C>=MA(C,200),MA(C,200),DRAWNULL),COLORBLUE,LINETHICK2,NODRAW,COLORWHITE;
主升浪:=ISLASTBAR AND MA5>MA24 AND MA24>MA72 AND MA72>IF(MA200=DRAWNULL,0,MA200);
主浪回调:=ISLASTBAR AND MA24>MA5 AND MA5>MA72 AND MA72>IF(MA200=DRAWNULL,0,MA200);
主浪深调:=ISLASTBAR AND MA24>MA72 AND MA72>MA5 AND MA5>IF(MA200=DRAWNULL,0,MA200);
初升浪:=ISLASTBAR AND IF(MA200=DRAWNULL,300,MA200)>MAX(MA24,MA72) AND MA5>MA24 AND MA24>MA72;
底部反弹:=ISLASTBAR AND IF(MA200=DRAWNULL,300,MA200)>MA72 AND MA72>MA24 AND MA5>MA24;
探底阶段:=ISLASTBAR AND IF(MA200=DRAWNULL,300,MA200)>MA72 AND MA72>MA24 AND MA24>MA5;
观望:=ISLASTBAR AND IF(MA200=DRAWNULL,MA24>MA72 AND C< MA72,MA72>MA200 AND C< MA200);
有牛:=ISLASTBAR AND IF(MA200=DRAWNULL,MA24< MA72 AND C>=MA72,MA72< MA200 AND C>=MA200);
放弃:=ISLASTBAR AND IF(MA200=DRAWNULL,MA24< MA72 AND C< MA72,MA72< MA200 AND C< MA200);
DRAWGBK(显示仪表盘1=1 AND 主升浪=0 AND 主浪回调=0 AND 主浪深调=0 AND 初升浪=0 AND 底部反弹=0 AND 探底阶段=0 AND 观望=0 AND 有牛=0 AND 放弃=0,0,0,0,'观望',0);
DRAWGBK(显示仪表盘1=1 AND 主升浪,0,0,0,'主升浪',0);
DRAWGBK(显示仪表盘1=1 AND 主浪回调,0,0,0,'主浪回调',0);
DRAWGBK(显示仪表盘1=1 AND 主浪深调,0,0,0,'主浪深调',0);
DRAWGBK(显示仪表盘1=1 AND 初升浪,0,0,0,'初升浪',0);
DRAWGBK(显示仪表盘1=1 AND 底部反弹,0,0,0,'底部反弹',0);
DRAWGBK(显示仪表盘1=1 AND 探底阶段,0,0,0,'探底阶段',0);
DRAWGBK(显示仪表盘1=1 AND 观望,0,0,0,'观望',0);
DRAWGBK(显示仪表盘1=1 AND 有牛,0,0,0,'有牛',0);
DRAWGBK(显示仪表盘1=1 AND 放弃,0,0,0,'放弃',0);
STICKLINE(C>O,C,O,3,0),COLOR0000AA;
STICKLINE(C>O,C,O,2.5,0),COLOR0000BB;
STICKLINE(C>O,C,O,1.5,0),COLOR0000CC;
STICKLINE(C>O,C,O,1,0),COLOR0000EE;
STICKLINE(C>O,H,L,0,0),COLOR0000FF;
STICKLINE(C< O,C,O,3,0),COLOR7B7B00;
STICKLINE(C< O,C,O,2.5,0),COLOR909000;
STICKLINE(C< O,C,O,1.5,0),COLORA8A800;
STICKLINE(C< O,C,O,1,0),COLORCECE00;
STICKLINE(C< O,H,L,0,0),COLORFFFF00;
STICKLINE(C=O,C,O,3,0),COLORWHITE;
STICKLINE(C=O,H,L,0,0),COLORWHITE;
高点位:=REFDATE(HHV(H,总涨幅周期),DATE);
低点位:=REFDATE(LLV(L,总涨幅周期),DATE);
低位价:=REF(L,BARSLAST(低点位=L)),COLORGREEN;
高位价:=REF(H,BARSLAST(高点位=H)),COLORRED,NODRAW;
曾最大涨幅:=(高位价-低位价)/低位价*100;
当前涨幅:=(C-低位价)/低位价*100;
ZFA:=CON2STR(CONST(曾最大涨幅),2);
ZFB:=CON2STR(CONST(当前涨幅),2);
ZFC:=STRCAT('【曾最大涨幅】:',ZFA);
ZFD:=STRCAT(ZFC,'%');
ZFE:=STRCAT(ZFD,'【当前总涨幅】:');
ZFF:=STRCAT(ZFE,ZFB);
ZFG:=STRCAT(ZFF,'%');
DRAWTEXT_FIX(ISLASTBAR,0,1,0,'▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇'),COLORRED;
DRAWTEXT_FIX(ISLASTBAR,0,1,0,ZFG),COLORYELLOW;
Z1:=STRCAT(DYBLOCK,' ');
Z2:=STRCAT(Z1,HYBLOCK);
Z3:=STRCAT(Z2,' ');
Z4:=STRCAT(Z3,GNBLOCK);
Z5:=STRCAT(Z4,' ');
Z6:=STRCAT(Z5,FGBLOCK);
DRAWTEXT_FIX(ISLASTBAR,0.01,0.012,0,STRCAT(Z6,ZHBLOCK)),COLORCYAN;
DRAWRECTREL(IF(CODELIKE('999999') OR CODELIKE('399001'),0,760),IF(CODELIKE('999999') OR CODELIKE('399001'),0,12),IF(CODELIKE('999999') OR CODELIKE('399001'),0,890),IF(CODELIKE('999999') OR CODELIKE('399001'),0,70),RGB(255,0,0));
DRAWRECTREL(IF(CODELIKE('999999') OR CODELIKE('399001'),0,760),IF(CODELIKE('999999') OR CODELIKE('399001'),0,12),IF(CODELIKE('999999') OR CODELIKE('399001'),0,890),IF(CODELIKE('999999') OR CODELIKE('399001'),0,70),IF(CONST(DYNAINFO(51))>=1,RGB(0,255,0),RGB(255,0,0)));
筹码突破1:=CON2STR(CONST(DYNAINFO(51)),2);
筹码突破2:=STRCAT('【 内外比:',筹码突破1);
筹码突破3:=STRCAT(筹码突破2,' 】');
DRAWTEXT_FIX(IF(CODELIKE('999999') OR CODELIKE('399001'),DRAWNULL,1),0.76,0.015,0,筹码突破3),COLORYELLOW;
DRAWTEXT_FIX(IF(CODELIKE('999999') OR CODELIKE('399001'),DRAWNULL,CONST(DYNAINFO(51))>=1),0.76,0.015,0,筹码突破3),COLORBLACK;
DRAWRECTREL(0,IF(显示仪表盘1=0,135,0),IF(显示仪表盘1=0,288,0),IF(显示仪表盘1=0,630,0),RGB(0,0,255));
DRAWTEXT_FIX(显示仪表盘1=0,0.08,0.16,0,'【 均线解盘 】'),COLORWHITE;
DRAWTEXT_FIX(显示仪表盘1=0,0,0.23,0,'主升浪:5>24>72>200 '),COLORWHITE;
DRAWTEXT_FIX(显示仪表盘1=0 AND ISLASTBAR AND MA5>MA24 AND MA24>MA72 AND MA72>MA200,0.238,0.23,0,'≡★≡'),COLORRED;
DRAWTEXT_FIX(显示仪表盘1=0,0,0.285,0,'主浪回调:24>5>72>200 '),COLORWHITE;
DRAWTEXT_FIX(显示仪表盘1=0 AND ISLASTBAR AND MA24>MA5 AND MA5>MA72 AND MA72>MA200,0.238,0.285,0,'≡★≡'),COLORRED;
DRAWTEXT_FIX(显示仪表盘1=0,0,0.34,0,'主浪深调:24>72>5>200 '),COLORWHITE;
DRAWTEXT_FIX(显示仪表盘1=0 AND ISLASTBAR AND MA24>MA72 AND MA72>MA5 AND MA5>MA200,0.238,0.34,0,'≡★≡'),COLORMAGENTA;
DRAWTEXT_FIX(显示仪表盘1=0,0,0.395,0,'初升浪:200>5>24>72'),COLORWHITE;
DRAWTEXT_FIX(显示仪表盘1=0 AND ISLASTBAR AND MA200>MAX(MA24,MA72) AND MA5>MA24 AND MA24>MA72,0.238,0.395,0,'≡★≡'),COLOR0080FF;
DRAWTEXT_FIX(显示仪表盘1=0,0,0.45,0,'底部反弹:200>72>5>24'),COLORWHITE;
DRAWTEXT_FIX(显示仪表盘1=0 AND ISLASTBAR AND MA200>MA72 AND MA72>MA24 AND MA5>MA24,0.238,0.45,0,'≡★≡'),COLORYELLOW;
DRAWTEXT_FIX(显示仪表盘1=0,0,0.51,0,'探底阶段:200>72>24>5'),COLORWHITE;
DRAWTEXT_FIX(显示仪表盘1=0 AND ISLASTBAR AND MA200>MA72 AND MA72>MA24 AND MA24>MA5,0.238,0.51,0,'≡★≡'),COLORGREEN;
DRAWTEXT_FIX(显示仪表盘1=0 AND ISLASTBAR AND MA72>MA200 AND C>=MA200,0,0.565,0,'▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇'),COLORRED;
DRAWTEXT_FIX(显示仪表盘1=0 AND ISLASTBAR AND MA72>MA200 AND C>=MA200,0,0.565,0,'牛市行情:72>200 C>200 牛市 ---'),COLORYELLOW;
DRAWTEXT_FIX(显示仪表盘1=0 AND ISLASTBAR AND MA72>MA200 AND C< MA200,0,0.565,0,'未知行情:72>200 C<200 观望 ---'),COLORWHITE;
DRAWTEXT_FIX(显示仪表盘1=0 AND ISLASTBAR AND MA72< MA200 AND C>=MA200,0,0.565,0,'▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇'),COLORMAGENTA;
DRAWTEXT_FIX(显示仪表盘1=0 AND ISLASTBAR AND MA72< MA200 AND C>=MA200,0,0.565,0,'初入牛市:72<200 C>200 牛到 ---'),COLORWHITE;
DRAWTEXT_FIX(显示仪表盘1=0 AND ISLASTBAR AND MA72< MA200 AND C< MA200,0,0.565,0,'▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇'),COLORGREEN;
DRAWTEXT_FIX(显示仪表盘1=0 AND ISLASTBAR AND MA72< MA200 AND C< MA200,0,0.565,0,'熊市行情:72<200 C<200 放弃 ---'),COLORBLACK;
UB1:BOLL+2*STD(C,N),LINETHICK1,COLORMAGENTA DOTLINE;
LB1:BOLL-2*STD(C,N),LINETHICK1,COLORYELLOW DOTLINE;
幻界龙探上强势:0,NODRAW,COLORRED;
幻界龙探下弱势:0,NODRAW,COLORFF9900;
把握疯牛卖点:0,NODRAW,COLORGREEN;
幻界龙探1:=(H+C)/2;
幻界龙探2:=(LOW+O)/2;
幻界龙探3:=(H+REF(H,2)+REF(H,3))/3;
幻界龙探4:=(C+REF(C,2)+REF(C,3))/3;
强势线:EMA((幻界龙探3+幻界龙探4)/2,7),COLORRED,LINETHICK2;
支撑线:EMA((幻界龙探2+REF(幻界龙探2,2)+REF(幻界龙探2,3))/3,7),COLORGREEN,LINETHICK2;
IF(强势线>REF(强势线,1),强势线,DRAWNULL),COLORRED,LINETHICK2;
IF(强势线< REF(强势线,1),强势线,DRAWNULL),COLORFF9900,LINETHICK3;
IF(支撑线>REF(支撑线,1)*0.997,支撑线,DRAWNULL),COLORRED,LINETHICK4;
IF(支撑线< REF(支撑线,1),支撑线,DRAWNULL),COLORFF9900,LINETHICK3;
幻界龙探5:=DYNAINFO(17);
幻界龙探6:=C/DYNAINFO(3)>=1.005 AND C/DYNAINFO(3)<=1.04;
幻界龙探7:=C/DYNAINFO(3)>=1.005 AND C/DYNAINFO(3)>=1.05;
幻界龙探8:=(C-REF(C,1))/REF(C,1)*100;
幻界龙探9:=NAMELIKE(2286);
幻界龙探10:=NAMELIKE(2287);
幻界龙探11:=NAMELIKE(1031);
幻界龙探12:=幻界龙探9+幻界龙探10+幻界龙探11=0;
幻界龙探13:=C>=HHV(H,60) AND 幻界龙探7 AND 幻界龙探5< 2 AND C/DYNAINFO(3)< 9 AND 幻界龙探12;
幻界龙探14:=REF(C,1);
幻界龙探15:=SMA(MAX(C-幻界龙探14,0),6,1)/SMA(ABS(C-幻界龙探14),6,1)*100;
幻界龙探16:=CROSS(85,幻界龙探15) AND 幻界龙探6;
{幻界龙探共振副图源码如下}
DRAWGBK(C>0,RGB(0,150,150),RGB(0,00,100),0,' ',0);
游资筹码1:=EMA(EMA(CLOSE,9),9);
共振:=(游资筹码1-REF(游资筹码1,1))/REF(游资筹码1,1)*1000;
STICKLINE(共振< 0,共振,0,3,0),COLORGREEN;
A10:=CROSS(共振,0);
STICKLINE(共振>REF(共振,1) AND 共振>0,共振,0,3,0),COLORRED;
主力共振:=IF(共振>REF(共振,1) AND 共振>0,共振,0),COLORRED,NODRAW;
游资筹码2:=100*WINNER(CLOSE*0.95);WWWZBGS3COM:DRAWNULL,COLOR333333;
STICKLINE(游资筹码2>50 AND COST(85)< CLOSE AND 共振>0,共振,0,3,0),COLORFF00FF;
主力高度共振:=IF(游资筹码2>50 AND COST(85)< CLOSE AND 共振>0,共振,0),COLORFF00FF,NODRAW;
STICKLINE(共振< REF(共振,1) AND 共振>0,共振,0,3,0),COLORD9D919,NODRAW;
主力出货:=IF(共振< REF(共振,1) AND 共振>0,共振,0),COLORD9D919;
主力撤退:=IF(共振< 0,共振,0),COLORGREEN,NODRAW;
主力试买:=IF(A10,5,0),LINETHICK1,COLOR00FFFF,NODRAW;
STICKLINE(主力试买>0,0,5,3,0),COLOR00FFFF;
DRAWICON(主力试买>0,主力试买,25);
散户活跃:=( 主力共振=0 AND 主力撤退=0 AND 主力高度共振=0),NODRAW;
STICKLINE(散户活跃=1 ,-0.3,0.3,3,0),COLORBLUE;
{幻界龙探MACD副图源码如下}
DRAWGBK(C>0,RGB(0,150,150),RGB(0,00,100),0,' ',0);
MACD2:(EXPMA(CLOSE,30)-REF(EXPMA(CLOSE,30),1))/REF(EXPMA(CLOSE,30),1)*100,COLORSTICK;
DIF2:EMA(SUM(MACD2,2),5),COLORYELLOW,LINETHICK2;
入1:IF(DIF2>REF(DIF2,1),DIF2,DRAWNULL),COLORRED,LINETHICK2;
入2:IF(DIF2< REF(DIF2,1),DIF2,DRAWNULL),COLORGREEN,LINETHICK2;
DRAWTEXT_FIX(1,0.980,20,1,'★乐淘公式网'),COLOR333333;
DEA2:MA(DIF2,5),COLORWHITE;
{幻界龙探成交副图源码如下}
DRAWGBK(C>0,RGB(0,150,150),RGB(0,00,100),0,' ',0);
VAR1:=MA(VOL,5);
VAR2:=MA(VOL,40);
VAR3:=V*100/CAPITAL;
VAR4:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
VAR5:=IF(C>OPEN,VAR4*(HIGH-LOW),IF(C< OPEN,VAR4*((HIGH-OPEN)+(C-LOW)),VOL/2));
VAR6:=IF(C>OPEN,0-VAR4*((HIGH-C)+(OPEN-LOW)),IF(C< OPEN,0-VAR4*(HIGH-LOW),0-VOL/2));
VAR7:=HHV(V,90);
VAR8:=LLV(V,90);
VAR9:=VAR8+(VAR7-VAR8)*0.06;
VAR10:=VAR8+(VAR7-VAR8)*0.28;
VAR18:=VAR8+(VAR7-VAR8)*0.50;
VAR19:=VAR8+(VAR7-VAR8)*0.75;
VOLUME:VOL,VOLSTICK;
新股成交量:IF(BARSCOUNT(CLOSE)< 40,VOL,DRAWNULL),VOLSTICK;
成交量(手):VOL,COLORWHITE,NODRAW;
调整周期:IF(VAR1< VAR2,BARSLAST(CROSS(VAR2,VAR1))+1,BARSLAST(CROSS(VAR2,VAR1))-BARSLAST(CROSS(VAR1,VAR2))),NODRAW;
调整总换手:IF(VAR1< VAR2,SUM(VAR3,BARSLAST(CROSS(VAR2,VAR1))+1),SUM(VAR3,BARSLAST(CROSS(VAR2,VAR1))+1)-SUM(VAR3,BARSLAST(CROSS(VAR1,VAR2))+1)),NODRAW;
调整均换手:调整总换手/调整周期,NODRAW;
虚拟成交量:IF(CURRBARSCOUNT=1 AND PERIOD=5,VOL*240/FROMOPEN,DRAWNULL),NODRAW;
放量上涨:C/REF(C,1)>=1.01 AND V/REF(V,1)>=1.5 AND V>MA(V,5) AND REF(V,1)/REF(MA(V,5),1)<=1.8,NODRAW;
WWWZBGS3COM:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
STICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,虚拟成交量,0,4,-1),COLOR00C0C0;
STICKLINE(VAR5>VAR6 AND VAR1>=VAR2,VOL,0,3,0),COLOR0000AA;
STICKLINE(VAR5>VAR6 AND VAR1>=VAR2,VAR5,0,2.5,0),COLOR0000BB;
STICKLINE(VAR5>VAR6 AND VAR1>=VAR2,VAR5,0,1.5,0),COLOR0000CC;
STICKLINE(VAR5>VAR6 AND VAR1>=VAR2,VAR5,0,1,0),COLOR0000EE;
STICKLINE(VAR6< VAR5 AND VAR1>=VAR2,VAR5,VAR5+ABS(VAR6),3,0),COLOR7B7B00;
STICKLINE(VAR6< VAR5 AND VAR1>=VAR2,VAR5,VAR5+ABS(VAR6),2.5,0),COLOR909000;
STICKLINE(VAR6< VAR5 AND VAR1>=VAR2,VAR5,VAR5+ABS(VAR6),1.5,0),COLORA8A800;
STICKLINE(VAR6< VAR5 AND VAR1>=VAR2,VAR5,VAR5+ABS(VAR6),1,0),COLORCECE00;
STICKLINE(VAR5>VAR6 AND VAR1< VAR2,0,VAR5,3,0),COLORRED;
STICKLINE(VAR5>VAR6 AND VAR1< VAR2,0,VAR5,2.5,0),COLOR0066FF;
STICKLINE(VAR5>VAR6 AND VAR1< VAR2,0,VAR5,1.5,0),COLOR0099FF;
STICKLINE(VAR5>VAR6 AND VAR1< VAR2,0,VAR5,1,0),COLORYELLOW;
STICKLINE(VAR6< VAR5 AND VAR1< VAR2,VAR5,VAR5+ABS(VAR6),3,0),COLOR007B00;
STICKLINE(VAR6< VAR5 AND VAR1< VAR2,VAR5,VAR5+ABS(VAR6),2.5,0),COLOR009000;
STICKLINE(VAR6< VAR5 AND VAR1< VAR2,VAR5,VAR5+ABS(VAR6),1.5,0),COLOR00A800;
【幻】:REFDATE(VAR9,DATE),COLOR00FFFF;
【界】:REFDATE(VAR10,DATE),COLORFFFFFF;
【龙】:REFDATE(VAR18,DATE),COLORLIRED;
【探】:REFDATE(VAR19,DATE),COLORRED;
【顶】:REFDATE(HHV(V,90),DATE),COLORCYAN;