郑州生孩子哪家医院好:神秘之窗1

来源:百度文库 编辑:偶看新闻 时间:2024/04/19 11:46:08

时空价量,笑口常开 .....新版


INPUT:N(5);//量柱高度调节!
x:=SYSPARAM(5)-(SYSPARAM(4)-SYSPARAM(5)+MINDIFF)/n;
y:=HHV(VOL,SYSPARAM(3)-SYSPARAM(2)+1);
yvb:=y[SYSPARAM(3)]/(SYSPARAM(5)-x+MINDIFF)*0.5;
z:=VOL/yvb+x;

五日均量:=MA(z,5);
十日均量:=MA(z,10);
partline(1,五日均量);
partline(1,十日均量);

//双向成交
AA:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
主动买盘:=IF(CLOSE>OPEN,AA*(HIGH-LOW),IF(CLOSEzdmp:=主动买盘/yvb+x;

STICKLINE(1,x,z,7,0)COLORFFAA00;
STICKLINE(1,x,z,6,0)COLORFFBB11;
STICKLINE(1,x,z,5,0)COLORFFCC22;
STICKLINE(1,x,z,4,0)COLORFFDD33;
STICKLINE(1,x,z,3,0)COLORFFEE44;
STICKLINE(1,x,z,2,0)COLORFFFF55;
STICKLINE(1,x,z,1.5,0)COLORFFFF66;
STICKLINE(1,x,z,1,0)COLORFFFF77;
STICKLINE(1,x,z,0.5,0)COLORFFFF88;

STICKLINE(1,x,zdmp,7,0),COLORAA00BB;
STICKLINE(1,x,zdmp,6,0),COLORBB11BB;
STICKLINE(1,x,zdmp,5,0),COLORCC22BB;
STICKLINE(1,x,zdmp,4,0),COLORDD33BB;
STICKLINE(1,x,zdmp,3,0),COLOREE44BB;
STICKLINE(1,x,zdmp,2,0),COLORFF55BB;
STICKLINE(1,x,zdmp,1.5,0),COLORFF66BB;
STICKLINE(1,x,zdmp,1,0),COLORFF77BB;
STICKLINE(1,x,zdmp,0.5,0),COLORFF88BB;
drawtext(sysparam(3)=Barpos,sysparam(5),'5日均量:'+numtostr(ma(v,5),2)+',   10日均量:'+numtostr(ma(v,10),2)),color00ffff,align2;

//立体K线
STICKLINE(C>=O,C,O,8,0),COLOR0000AA;
STICKLINE(C>=O,C,O,7,0),COLOR0011BB;
STICKLINE(C>=O,C,O,6,0),COLOR0022CC;
STICKLINE(C>=O,C,O,5,0),COLOR0033DD;
STICKLINE(C>=O,C,O,4,0),COLOR0044EE;
STICKLINE(C>=O,C,O,3,0),COLOR0055FF;
STICKLINE(C>=O,C,O,2,0),COLOR0066FF;
STICKLINE(C>=O,C,O,1,0),COLOR0077FF;
STICKLINE(C>=O,C,O,0.5,0),COLOR0088FF;
STICKLINE(C>=O,H,L,0,0),COLOR0099FF;

STICKLINE(C<=O,C,O,8,0),COLOR00AA00;
STICKLINE(C<=O,C,O,7,0),COLOR00BB11;
STICKLINE(C<=O,C,O,6,0),COLOR00CC22;
STICKLINE(C<=O,C,O,5,0),COLOR00DD33;
STICKLINE(C<=O,C,O,4,0),COLOR00EE44;
STICKLINE(C<=O,C,O,3,0),COLOR00FF55;
STICKLINE(C<=O,C,O,2,0),COLOR00FF66;
STICKLINE(C<=O,C,O,1,0),COLOR00FF77;
STICKLINE(C<=O,C,O,0.5,0),COLOR00FF88;
STICKLINE(C<=O,H,L,0,0),COLOR00FF99;

//空间黄金分割
最高:SYSPARAM(4),colorred,POINTDOT;
DRAWNUMBER(barpos=sysparam(2),最高,最高,2),SHIFT7,align2,COLORWHITE;
DRAWTEXT(barpos=sysparam(2),最高,'最高:'),Color0000FF,ALIGN1;
最低:SYSPARAM(5),colorgreen,POINTDOT;
DRAWNUMBER(barpos=sysparam(2),最低,最低,2),SHIFT7,align2,COLORWHITE;
DRAWTEXT(barpos=sysparam(2),最低,'最低:'),Color00FF00,ALIGN1;
分一:((最高-最低)*0.191)+最低,COLOR00FFFF,POINTDOT;
DRAWNUMBER(barpos=sysparam(2),分一,分一,2),align2,SHIFT13,COLORYELLOW;
DRAWTEXT(barpos=sysparam(2),分一,'分一(0.191):'),Color00FFFF,ALIGN1;
分二:((最高-最低)*0.382)+最低,COLORFF00FF,POINTDOT;
DRAWNUMBER(barpos=sysparam(2),分二,分二,2),align2,SHIFT13,COLORFF00FF;
DRAWTEXT(barpos=sysparam(2),分二,'分二(0.382):'),COLORFF00FF,ALIGN1;
中位:((最高-最低)*0.5)+最低,COLOR00FFFF,LINEDASHDOT;
DRAWNUMBER(barpos=sysparam(2),中位,中位,2),align2,SHIFT13,COLORFFFF00;
DRAWTEXT(barpos=sysparam(2),中位,'中位(0.5):'),COLOR00FFFF,ALIGN1;
分四:((最高-最低)*0.618)+最低,COLORFF00FF,POINTDOT;
DRAWNUMBER(barpos=sysparam(2),分四,分四,2),align2,SHIFT13,COLORFF00FF;
DRAWTEXT(barpos=sysparam(2),分四,'分四(0.618):'),COLORFF00FF,ALIGN1;
分五:((最高-最低)*0.809)+最低,COLOR00FFFF,POINTDOT;
DRAWNUMBER(barpos=sysparam(2),分五,分五,2),align2,SHIFT13,COLORYELLOW;
DRAWTEXT(barpos=sysparam(2),分五,'分五(0.809):'),COLOR00FFFF,ALIGN1;

{
//时间黄金分割
ts:=sysparam(3)-sysparam(2)+1;
d191:=sysparam(2)+ts*0.191;
d382:=sysparam(2)+ts*0.382;
d5:=sysparam(2)+ts*0.5;
d618:=sysparam(2)+ts*0.618;
d809:=sysparam(2)+ts*0.809;
VERTLINE(ROUND(d191)=BARPOS),COLORFFFF00,POINTDOT;
VERTLINE(ROUND(d382)=BARPOS),COLORFFFF00,POINTDOT;
VERTLINE(ROUND(d5)=BARPOS),COLOR00FFFF,LINEDASHDOT;
VERTLINE(ROUND(d618)=BARPOS),COLORFFFF00,POINTDOT;
VERTLINE(ROUND(d809)=BARPOS),COLORFFFF00,POINTDOT;
}

{江恩角度线 }
input:角度(6);//角度值可调整
p1:=CLOSE-REF(CLOSE,1);  p2:=SUM(ABS(p1),0); p3:=COUNT(CLOSE>0,0);
k1:=p2/p3/角度;  
ts:=sysparam(3)-sysparam(2)+1;
DRAWSL(FILTER(BACKSET(ISLASTBAR,HHVBARS(HIGH,ts)+1),ts),HIGH,0,0,0),Color33AACC,pointdot;
DRAWSL(FILTER(BACKSET(ISLASTBAR,HHVBARS(HIGH,ts)+1),ts),HIGH,-0.0809*K1,0,0),COLOR33AACC,pointdot;
DRAWSL(FILTER(BACKSET(ISLASTBAR,HHVBARS(HIGH,ts)+1),ts),HIGH,-0.25*K1,0,0),COLOR33AACC,pointdot;
DRAWSL(FILTER(BACKSET(ISLASTBAR,HHVBARS(HIGH,ts)+1),ts),HIGH,-0.481*K1,0,0),COLOR33AACC,pointdot;
DRAWSL(FILTER(BACKSET(ISLASTBAR,HHVBARS(HIGH,ts)+1),ts),HIGH,-0.705*K1,0,0),COLOR33FFCC,pointdot;
DRAWSL(FILTER(BACKSET(ISLASTBAR,HHVBARS(HIGH,ts)+1),ts),HIGH,-0.938*K1,0,0),COLOR33FFCC,pointdot;
DRAWSL(FILTER(BACKSET(ISLASTBAR,HHVBARS(HIGH,ts)+1),ts),HIGH,-1.191*K1,0,0),Color33FFCC,pointdot;
DRAWSL(FILTER(BACKSET(ISLASTBAR,HHVBARS(HIGH,ts)+1),ts),HIGH,-1.5*K1,0,0),COLOR00C5AB;
DRAWSL(FILTER(BACKSET(ISLASTBAR,HHVBARS(HIGH,ts)+1),ts),HIGH,-1.919*K1,0,0),COLOR00C5AB,pointdot;
DRAWSL(FILTER(BACKSET(ISLASTBAR,HHVBARS(HIGH,ts)+1),ts),HIGH,-2.618*K1,0,0),COLOR00C5AB,,pointdot;
DRAWSL(FILTER(BACKSET(ISLASTBAR,HHVBARS(HIGH,ts)+1),ts),HIGH,-3.809*K1,0,0),COLOR00FF00,pointdot;
DRAWSL(FILTER(BACKSET(ISLASTBAR,HHVBARS(HIGH,ts)+1),ts),HIGH,-5.618*K1,0,0),COLOR00FF00,pointdot;
DRAWSL(FILTER(BACKSET(ISLASTBAR,HHVBARS(HIGH,ts)+1),ts),HIGH,-9.382*K1,0,0),COLOR00FF00,pointdot;
DRAWSL(FILTER(BACKSET(ISLASTBAR,HHVBARS(HIGH,ts)+1),ts),HIGH,-21*K1,0,0),COLOR00FF00,pointdot;

DRAWSL(FILTER(BACKSET(ISLASTBAR,LLVBARS(LOW,ts)+1),ts),LOW,0,0,0),ColorB37DDD,pointdot;
DRAWSL(FILTER(BACKSET(ISLASTBAR,LLVBARS(LOW,ts)+1),ts),LOW,0.0809*K1,0,0),COLOR,ColorB37DDD,pointdot;
DRAWSL(FILTER(BACKSET(ISLASTBAR,LLVBARS(LOW,ts)+1),ts),LOW,0.25*K1,0,0),COLOR,ColorB37DDD,pointdot;
DRAWSL(FILTER(BACKSET(ISLASTBAR,LLVBARS(LOW,ts)+1),ts),LOW,0.481*K1,0,0),COLOR,ColorB37DDD,pointdot;
DRAWSL(FILTER(BACKSET(ISLASTBAR,LLVBARS(LOW,ts)+1),ts),LOW,0.705*K1,0,0),COLOR,Color7449D6,pointdot;
DRAWSL(FILTER(BACKSET(ISLASTBAR,LLVBARS(LOW,ts)+1),ts),LOW,0.938*K1,0,0),COLOR7449D6,pointdot;
DRAWSL(FILTER(BACKSET(ISLASTBAR,LLVBARS(LOW,ts)+1),ts),LOW,1.191*K1,0,0),COLOR7449D6,pointdot;
DRAWSL(FILTER(BACKSET(ISLASTBAR,LLVBARS(LOW,ts)+1),ts),LOW,1.5*K1,0,0),COLOR6666FF;
DRAWSL(FILTER(BACKSET(ISLASTBAR,LLVBARS(LOW,ts)+1),ts),LOW,1.919*K1,0,0),COLOR6666FF,pointdot;
DRAWSL(FILTER(BACKSET(ISLASTBAR,LLVBARS(LOW,ts)+1),ts),LOW,2.618*K1,0,0),Color6666FF,pointdot;
DRAWSL(FILTER(BACKSET(ISLASTBAR,LLVBARS(LOW,ts)+1),ts),LOW,3.809*K1,0,0),COLOR5818FF,pointdot;
DRAWSL(FILTER(BACKSET(ISLASTBAR,LLVBARS(LOW,ts)+1),ts),LOW,5.618*K1,0,0),COLOR5818FF,pointdot;
DRAWSL(FILTER(BACKSET(ISLASTBAR,LLVBARS(LOW,ts)+1),ts),LOW,9.382*K1,0,0),COLOR5818ff,pointdot;
DRAWSL(FILTER(BACKSET(ISLASTBAR,LLVBARS(LOW,ts)+1),ts),LOW,21*K1,0,0),Color5818FF,pointdot;

{签上你的大名--如果你迫切希望扬名成"腕"的话,就象我这样写上自己名字吧(最好是自己的真名实姓,而且要不厌其烦地有机会就写上:)))}
drawtext(sysparam(2)=Barpos ,sysparam(5)*0.95,'黑马骑师  费尽81牛18虎之力辛苦制作 :)))'),Color00FFFF,ALIGN1;//名字一定要醒目,这是关键所在 :)))

{股票代码}
drawtext(sysparam(2)=Barpos,sysparam(4),'【股票代码:'+STKLABEL+'】'),Color0000FF ,ALIGN1,shift11;
drawtext(sysparam(2)=Barpos,sysparam(4),' 所属板块:'+BLKNAME ),Color88FF00,ALIGN1,shift27;
ss:='总股本'+NUMTOSTR(FINANCE(1) ,0 )+'万股,'+'流通A股'+ NUMTOSTR(FINANCE(7),0)+'万股,'+'每股净资产'+NUMTOSTR(FINANCE(34),2 )+'元,'+'每股公积金'+ NUMTOSTR(FINANCE(18),2)+'元,'+'每股收益 '+ NUMTOSTR(FINANCE(33),3)+'元,'+'每股未分配 '+NUMTOSTR(FINANCE(32),2)+'元,'+'市盈率'+NUMTOSTR(DYNAINFO(39),2)+',股东总数:'+ NUMTOSTR(FINANCE(50),0)+'户' {\n 上市日期:'+numtostr(yy,0)+'年'+ mm +'月' + dd +'日'};
drawtext(sysparam(2)=Barpos,sysparam(4)*0.975,ss),ColorFF00FF,ALIGN1;

//大盘背景(下面的红绿彩珠)
tj:=indexc>=ma(indexc,20);
drawicon(tj,x,10);
drawicon(tj=0,x,11);

{上市日期}
yy:=REF(YEAR,BARSCOUNT(C)-1),linethick0,COLORGREEN;
mm0:=REF(MONTH,BARSCOUNT(C)-1),linethick0,COLORMAGENTA;
dd0:=REF(DAY,BARSCOUNT(C)-1),linethick0,COLORYELLOW;
上市日期:REF(YEAR,BARSCOUNT(C)-1),linethick0,COLORGREEN;
年:REF(MONTH,BARSCOUNT(C)-1),linethick0,COLORgreen,linethick0;
月:REF(DAY,BARSCOUNT(C)-1),linethick0,COLORgreen;
日:0,colorgreen,linethick0;   

时空坐标指标


a3:=PEAKBARS(4,x1,1);         a4:=TROUGHBARS(4,x2,1);
a5:=PEAK(4,x1,1);             a6:=TROUGH(4,x2,1);   
FH:=A3-INTPART(A3/7)*7-1;     FL:=A4-INTPART(A4/7)*7-1;  a7:=a5-a6;
F1:=IF(FH=1,0.191,IF(FH=2,0.382,IF(FH=3,0.5,IF(FH=4,0.618,IF(FH=5,0.809,if(fh=0,1,0))))));
f2:=if(fh=1,1.191,if(fh=2,1.382,if(fh=3,1.5,if(fh=4,1.618,if(fh=5,1.809,if(fh=0,2,2.191))))));
FZ1:=A6+A7*F1;  FZ2:=a6+a7*f2;
f3:=hhv(C,4)>fz1*0.94 AND llv(C,4)f4:=hhv(C,4)>fz2*0.94 AND llv(C,4)STICKLINE( f3,FZ1,fz1,100,0),ColorCDCDCD;   
STICKLINE( f4,FZ2,fz2,100,0),ColorCDCDCD;   
DRAWNUMBER(f3<>ref(f3,7) and f3<>ref(f3,14) and  f3 ,FZ1,F1*100,1),ColorD2E1FF;
DRAWNUMBER(f4<>ref(f4,7) and f4<>ref(f4,14) and  f4 ,FZ2,F2*100,1),ColorD2E1FF;
F5:=IF(Fl=1,0.191,IF(Fl=2,0.382,IF(Fl=3,0.5,IF(Fl=4,0.618,IF(Fl=5,0.809,if(fl=6,0,1))))));
f6:=if(fl=1,1.191,if(fl=2,1.382,if(fl=3,1.5,if(fl=4,1.618,if(fl=5,1.809,if(fl=6,2,2.191))))));
FZ5:=A5-A7*F5;  FZ6:=a5-a7*f6;   
f7:=hhv(C,4)>fz5*0.94 AND llv(C,4)a3;
f8:=hhv(C,4)>fz6*0.94 AND llv(C,4)a3;
STICKLINE(f7,FZ5,fz5,100,0),Color00D800;      
STICKLINE(f8,fz6,fz6,100,0),Color00D800;      
DRAWNUMBER(f7<>ref(f7,7) and f7<>ref(f7,14) and  f7,FZ5,F5*100,1),ColorE2FFD9;
DRAWNUMBER(f8<>ref(f8,7) and f8<>ref(f8,14) and  f8,FZ6,F6*100,1),ColorE2FFD9;
a8:=a3=5 or a3=8 or a3=13 or a3=21 or a3=34 or a3=55 or a3=89 or a3=144 or a3=233;
VERTLINE(a8 and (a4>a3 or a4<5)),Color00D800,POINTDOT;
DRAWNUMBER(a8 and a4>a3,a6,a3,0),ColorCDCDCD;         
a81:=BARSLAST(a8);  a82:=ref(a81,a81+1)+1;  a83:=ref(a82,a82+a81); a84:=a82+a83-a81;
DRAWSL(ISLASTBAR and a84VERTLINE(a84=5),shift5,pointdot;
a9:=a4=5 or a4=8 or a4=13 or a4=21 or a4=34 or a4=55 or a4=89 or a4=144 or a4=233;
VERTLINE(a9 and (a4DRAWNUMBER(a9 and a4a91:=BARSLAST(a9);  a92:=ref(a91,a91+1)+1;  a93:=ref(a92,a92+a91); a94:=a92+a93-a91;
DRAWSL(ISLASTBAR and a94DRAWNUMBER(ISLASTBAR,hhv(h,20)*1.02,a4,0),COLORRED,shift2;
DRAWTEXT(ISLASTBAR,hhv(h,20)*1.02,'天'),COLORRED,shift6;
DRAWNUMBER(ISLASTBAR,llv(l,20)*0.98,a3,0),COLORGREEN,shift2;
DRAWTEXT(ISLASTBAR,llv(l,20)*0.98,'天'),COLORGREEN,shift6;
gd1:=ref(a5,a4); gr1:=ref(date,a4+ref(a3,a4))+19000001;
dd1:=a6;  dr1:=ref(date,a4)+19000001;
gd2:=a5; gr2:=ref(date,a3)+19000001;
dd2:=ref(a6,a3);  dr2:=ref(date,a3+ref(a4,a3))+19000001;
高点:if(a4高点日期:if(a4低点:if(a4低点日期:if(a4

a3江恩线指标
m3:ma(c,3);   m10:ma(c,10); m30:ma(c,30);  
f:=((绿年-1900)*100+绿月)*100+绿日;
f2:=count(date>=f,0); f4:=if(绿转向=1,h,l);
f5:=if(绿转向=1,1,-1);
g:=((红年-1900)*100+红月)*100+红日;  
g2:=count(date>g,0); g4:=if(红转向=1,h,l);
g5:=if(红转向=1,1,-1);
p1:=c-ref(c,1);  p2:=sum(abs(p1),0); p3:=count(c>0,0);
k1:=p2/p3*f5/角度;   k2:=p2/p3*g5/角度;
DRAWSL(f2=1,f4,0,0,0),COLORGREEN,POINTDOT;
DRAWSL(f2=1,f4,-K1/8,0,0),COLORGREEN;
DRAWSL(f2=1,f4,-K1/4,0,0),COLORGREEN;
DRAWSL(f2=1,f4,-K1/2,0,0),COLORGREEN;
DRAWSL(f2=1,f4,-K1,0,0),COLORGREEN,LINETHICK2;
DRAWSL(f2=1,f4,-K1*2,0,0),COLORGREEN;
DRAWSL(f2=1,f4,-K1*4,0,0),COLORGREEN;
DRAWSL(f2=1,f4,-K1*16,0,0),COLORGREEN;

DRAWSL(g2=1,g4,0,0,0),Color7197FF,POINTDOT;
DRAWSL(g2=1,g4,-K2/8,0,0),Color7197FF;
DRAWSL(g2=1,g4,-K2/4,0,0),Color7197FF;
DRAWSL(g2=1,g4,-K2/2,0,0),Color7197FF;
DRAWSL(g2=1,g4,-K2,0,0),COLOR6666FF,LINETHICK2;
DRAWSL(g2=1,g4,-K2*2,0,0),Color7197FF;
DRAWSL(g2=1,g4,-K2*4,0,0),Color7197FF;
DRAWSL(g2=1,g4,-K2*8,0,0),Color7197FF;  

江恩八分图


n=232 m=100

VERTLINE(FILTER(BACKSET(ISLASTBAR,N),N-1)),COLORRED;
VERTLINE(FILTER(BACKSET(ISLASTBAR,M),M-1)),COLORRED;
VERTLINE(FILTER(BACKSET(ISLASTBAR,N-(N-M)/8),N-(N-M)/8-1)),COLORYELLOW;
VERTLINE(FILTER(BACKSET(ISLASTBAR,N-(N-M)/8*2),N-(N-M)/8*2-1)),COLORYELLOW;
VERTLINE(FILTER(BACKSET(ISLASTBAR,N-(N-M)/8*3),N-(N-M)/8*3-1)),COLORYELLOW;
VERTLINE(FILTER(BACKSET(ISLASTBAR,N-(N-M)/8*4),N-(N-M)/8*4-1)),COLORYELLOW;
VERTLINE(FILTER(BACKSET(ISLASTBAR,N-(N-M)/8*5),N-(N-M)/8*5-1)),COLORYELLOW;
VERTLINE(FILTER(BACKSET(ISLASTBAR,N-(N-M)/8*6),N-(N-M)/8*6-1)),COLORYELLOW;
VERTLINE(FILTER(BACKSET(ISLASTBAR,N-(N-M)/8*7),N-(N-M)/8*7-1)),COLORYELLOW;
VERTLINE(FILTER(BACKSET(ISLASTBAR,N-(N-M)/8*8),N-(N-M)/8*8-1)),COLORRED;

VERTLINE(FILTER(BACKSET(ISLASTBAR,N-(N-M)*9/8),N-(N-M)*9/8-1)),COLORYELLOW;
VERTLINE(FILTER(BACKSET(ISLASTBAR,N-(N-M)*10/8),N-(N-M)*10/8-1)),COLORYELLOW;
VERTLINE(FILTER(BACKSET(ISLASTBAR,N-(N-M)*9/8),N-(N-M)*9/8-1)),COLORYELLOW;
VERTLINE(FILTER(BACKSET(ISLASTBAR,N-(N-M)*10/8),N-(N-M)*10/8-1)),COLORYELLOW;

VERTLINE(FILTER(BACKSET(ISLASTBAR,N-(N-M)*11/8),N-(N-M)*11/8-1)),COLORYELLOW;
VERTLINE(FILTER(BACKSET(ISLASTBAR,N-(N-M)*12/8),N-(N-M)*12/8-1)),COLORYELLOW;
VERTLINE(FILTER(BACKSET(ISLASTBAR,N-(N-M)*13/8),N-(N-M)*13/8-1)),COLORYELLOW;
VERTLINE(FILTER(BACKSET(ISLASTBAR,N-(N-M)*14/8),N-(N-M)*14/8-1)),COLORYELLOW;

VERTLINE(FILTER(BACKSET(ISLASTBAR,N-(N-M)*15/8),N-(N-M)*15/8-1)),COLORYELLOW;
VERTLINE(FILTER(BACKSET(ISLASTBAR,N-(N-M)*16/8),N-(N-M)*16/8-1)),COLORYELLOW;


VERTLINE(FILTER(BACKSET(ISLASTBAR,N-(N-M)*2/3),N-(N-M)*2/3-1)),COLORWHITE;
VERTLINE(FILTER(BACKSET(ISLASTBAR,N-(N-M)*4/3),N-(N-M)*4/3-1)),COLORWHITE;
VERTLINE(FILTER(BACKSET(ISLASTBAR,N-(N-M)*5/3),N-(N-M)*5/3-1)),COLORWHITE;

江恩轮中之轮


0;
CD:=BARSLAST(DATE=DATE1)+20;
AD:=MOD(CD,WD);

S24:=IF(AD=0,1,0);
S24A:=IF(MOD(CD+1,WD)=0,1,0);
S24B:=IF(REF(S24,1)=1,1,0);

S3:=IF(AD=FLOOR(WD*3/24) OR AD=CEILING(WD*3/24) OR AD=FLOOR(WD*9/24) OR AD=CEILING(WD*9/24) OR AD=FLOOR(WD*15/24) OR AD=CEILING(WD*15/24) OR AD=FLOOR(WD*21/24) OR AD=CEILING(WD*21/24),1,0);
S3A:=IF(AD+1=FLOOR(WD*3/24) OR AD+1=CEILING(WD*3/24) OR AD+1=FLOOR(WD*9/24) OR AD+1=CEILING(WD*9/24) OR AD+1=FLOOR(WD*15/24) OR AD+1=CEILING(WD*15/24) OR AD+1=FLOOR(WD*21/24) OR AD+1=CEILING(WD*21/24),1,0);
S3B:=IF(REF(S3,1)=1,1,0);

S6:=IF(AD=FLOOR(WD*6/24) OR AD=CEILING(WD*6/24) OR AD=FLOOR(WD*12/24) OR AD=CEILING(WD*12/24) OR AD=FLOOR(WD*18/24) OR AD=CEILING(WD*18/24),1,0);
S6A:=IF(AD+1=FLOOR(WD*6/24) OR AD+1=CEILING(WD*6/24) OR AD+1=FLOOR(WD*12/24) OR AD+1=CEILING(WD*12/24) OR AD+1=FLOOR(WD*18/24) OR AD+1=CEILING(WD*18/24),1,0);
S6B:=IF(REF(S6,1)=1,1,0);

S8:=IF(AD=FLOOR(WD*8/24) OR AD=CEILING(WD*8/24) OR AD=FLOOR(WD*16/24) OR AD=CEILING(WD*16/24),1,0);
S8A:=IF(AD+1=FLOOR(WD*8/24) OR AD+1=CEILING(WD*8/24) OR AD+1=FLOOR(WD*16/24) OR AD+1=CEILING(WD*16/24),1,0);
S8B:=IF(REF(S8,1)=1,1,0);

A24:STICKLINE(S24=1,0,3,8,0),COLORRED,shift20;
A24B:STICKLINE(S24A=1 OR S24B=1,0,1,8,0),COLORRED,shift20;

A3:STICKLINE(S3=1,0,3,8,0),COLORGREEN,shift20;
A3B:STICKLINE(S3A=1 OR S3B=1,0,1,8,0),COLORGREEN,shift20;

A6:STICKLINE(S6=1,0,3,8,0),COLORCYAN,shift20;
A6B:STICKLINE(S6A=1 OR S6B=1,0,1,8,0),COLORCYAN,shift20;

A8:STICKLINE(S8=1,0,3,8,0),COLORYELLOW,shift20;
A8B:STICKLINE(S8A=1 OR S8B=1,0,1,8,0),COLORYELLOW,shift20;

DRAWNUMBER(ISLASTBAR,2,0,0),shift1;
DRAWNUMBER(ISLASTBAR,2,1,0),shift2;
DRAWNUMBER(ISLASTBAR,2,2,0),shift3;
DRAWNUMBER(ISLASTBAR,2,3,0),shift4;
DRAWNUMBER(ISLASTBAR,2,4,0),shift5;
DRAWNUMBER(ISLASTBAR,2,5,0),shift6;
DRAWNUMBER(ISLASTBAR,2,6,0),shift7;
DRAWNUMBER(ISLASTBAR,2,7,0),shift8;
DRAWNUMBER(ISLASTBAR,2,8,0),shift9; 

神秘之窗


神秘众合数:30,colorbbbb00;
s1:=NUMBERSUM(NUMBERSUM(NUMBERSUM(19000000+DATE,2),2),2);
s2:=NUMBERSUM(NUMBERSUM(NUMBERSUM(CLOSE,2),2),2);
x1:=s1=1 and s2=1;x2:=s1=2 and s2=2;
x3:=s1=3 and s2=3;x4:=s1=4 and s2=4;
x5:=s1=5 and s2=5;x6:=s1=6 and s2=6;
x7:=s1=7 and s2=7;x8:=s1=8 and s2=8;
x9:=s1=9 and s2=9;
ys:=if(x1 or x2 or x3 or x4 or x5 or x6 or x7 or x8 or x9,1,0);
dd:=numbersum(lsolarterm(date),2);
y:=ys+ref(ys,1);
stickline(y=3,35,25,6,0),colorff0000;
stickline(y=2,33,27,6,0),colorff9900;
stickline(y=1,30.5,29.5,6,0),colorffff00;
jq:=if(lsolarterm(date)>1,1,0);
stickline(lsolarterm(date),25,21,6,0),color00ff00;
神秘节气:23,color00aa00;
w1:=KGUA(1,1);
w2:=KGUA(1,0);
w3:=if(w1=88 and w2=8,1,0);
w4:=if(w1=77 and w2=7,1,0);
w5:=if(w1=66 and w2=6,1,0);
w6:=if(w1=55 and w2=5,1,0);
w7:=if(w1=44 and w2=4,1,0);
w8:=if(w1=33 and w2=3,1,0);
w9:=if(w1=22 and w2=2,1,0);
w0:=if(w1=11 and w2=1,1,0);
stickline(w3=1,13.4,6.7,6,0),colorff0000;
stickline(w4=1,13,7.1,6,0),colordd0000;
stickline(w5=1,12.6,7.5,6,0),coloraa0000;
stickline(w6=1,12.2,7.9,6,0),color880000;
stickline(w7=1,11.8,8.3,6,0),color660000;
stickline(w8=1,11.4,8.7,6,0),color440000;
stickline(w9=1,10.8,9.1,6,0),color220000;
stickline(w0=1,10.5,9.5,6,0),color220022;
神秘八卦:10,coloree0000;
xx:=y+jq+w3+w4+w5+w6+w7+w8+w9+w0;
zz:=xx+ref(xx,1);
stickline(zz>=1,17+zz/3,17-zz/3,6,0),colorff0099;
神秘合计信号:17,colorff0099;