以下是通達信王子操盤線源碼副圖（無源碼的請下載附件導(dǎo)入）

DRAWGBK(C>0, RGB(40,120,20),RGB(00,00,00),0,0,1),LINETHICK2;
 {黃金率坐標系----用低\高位價*黃金分割率}
周期:=30; {設(shè)為參數(shù)1: N(30,480,240),是可見的周期數(shù),自己調(diào)}
開關(guān):=4; {設(shè)為參數(shù)2: M(1,4,4),自己調(diào),缺省4(都顯示)}
 {1只顯示以低點為基準的分割點,  2只顯示以高點為基準的分割點,
  3只顯示以高低差為基準的分割點,4同時顯示以上三種情況,時間坐標始終都顯示 }
均價:AMOUNT/VOL/100,NODRAW;
假陰1:=O>C AND 均價>REF(C,1);
 DRAWTEXT(假陰1,L-0.2,'↖假陰'1),COLORMAGENTA;
 STICKLINE(假陰1,O,C,1,0),COLORRED;
 DRAWICON(C<O AND C>REF(C,1),H,6),LINETHICK2;
 STICKLINE(C<O AND C>REF(C,1),H,L,0,0)COLORMAGENTA,LINETHICK2;
 STICKLINE(C<O AND C>REF(C,1),O,C,3,0)COLORMAGENTA,LINETHICK2;
 DRAWTEXT_FIX(ISLASTBAR,0,2,0,HYBLOCK);{在屏幕左上角顯示所屬行業(yè)板塊}
DRAWTEXT_FIX(ISLASTBAR,0.31,0,0,DYBLOCK);{在屏幕左上角顯示所屬地域板塊}
DRAWTEXT_FIX(ISLASTBAR,0.38,0,0,GNBLOCK);{在屏幕左上角顯示所屬概念板塊}
 {跳空}
STICKLINE(REF(L,1)>H,H,REF(L,1),5,0),COLORGRAY;
 STICKLINE(REF(H,1)<L,L,REF(H,1),5,0),COLORGRAY;
現(xiàn)價線: CONST(C),COLORLIRED,POINTDOT,LINETHICK2;{現(xiàn)價線}
高1:=CONST(HHV(H,周期)); 低1:=CONST(LLV(L,周期)); H_L:=高1-低1;{階段高低差}
頂: 高1,COLORRED,POINTDOT;
底: 低1,COLORGREEN,POINTDOT;

{王子操盤線}
MA6: MA(C,6),COLORGREEN,LINETHICK2;
 MA6_: IF(MA6>=REF(MA6,1),MA6,DRAWNULL),COLORLIGRAY,LINETHICK2;

{==========時間坐標====以階段低點為基準=====白字======}
LTJ:= L=低1;
 LSJ:=BARSLAST(LTJ)+1;
 L00:=低1+H_L*0.01;
 DRAWTEXT(LSJ=5,L00,'5');
 DRAWTEXT(LSJ=8,L00,'8');
 DRAWTEXT(LSJ=13,L00,'13');
 DRAWTEXT(LSJ=21,L00,'21');
 DRAWTEXT(LSJ=34,L00,'34');
 DRAWTEXT(LSJ=55,L00,'55');
 DRAWTEXT(LSJ=89,L00,'89');
 DRAWTEXT(LSJ=144,L00,'144');
 DRAWTEXT(LSJ=233,L00,'233');
 N01:=10;
 T01:=CONST(HHVBARS(V,10)),COLOR0000FF,LINETHICK1;
量能平臺:IF(CURRBARSCOUNT<=N01+15,CONST(IF(T01=0,C,REF(C,T01))),DRAWNULL)
 ,COLORLIBLUE,LINETHICK4;

DRAWTEXT(ISLASTBAR,量能平臺,' 量能平臺'),COLOR00F0F0;
 HV:=HHV(V,5)=V OR V/REF(V,1)>=5;
 FT:=BARSLAST(HV);
量能平臺1:=IF(HV,C,REF(C,FT));
 DRAWTEXT(量能平臺1>REF(量能平臺1,1)AND C<REF(C,1),L,'*跌'),COLORGREEN;
 DRAWTEXT(量能平臺1<REF(量能平臺1,1) AND C>REF(C,1),L,'*買'),COLORYELLOW;
 DRAWTEXT(量能平臺1>REF(量能平臺1,1) AND C>REF(C,1) AND C>MA(C,13) AND C=HHV(C,20) AND C/REF(C,1)>1.05,L,'*買'),COLORFFFFFF;
 N:=3;{原碼 P1:=3;}
 A1:=REF(H,N)=HHV(H,2*N+1);
 B1:=FILTER(A1,N);
 C18:=BACKSET(B1,N+1);
 D1:=FILTER(C18,N);{高點}
A2:=REF(L,N)=LLV(L,2*N+1);
 B2:=FILTER(A2,N);
 C2:=BACKSET(B2,N+1);
 D2:=FILTER(C2,N);{低點}
E1:=(REF(LLV(L,2*N),1)+REF(HHV(H,2*N),1))/2;
 E2:=(H+L)/2;{高低點出現(xiàn)在同一K線上時可作取舍}
H1:=(D1 AND NOT(D2 AND E1>=E2)) OR ISLASTBAR OR BARSCOUNT(C)=1;
 L1:=(D2 AND NOT(D1 AND E1<E2)); 
 H2:=D1 AND NOT(D2 AND E1>=E2);X1:=REF(BARSLAST(H1),1)+1;
 F1:=BACKSET(H1 AND COUNT(L1,X1)>0,LLVBARS(IF(L1,L,10000),X1));
 G1:=F1>REF(F1,1); I1:=BACKSET(G1,2);
 LD:=I1>REF(I1,1),LINETHICK0;{過濾后低點}
L2:=LD OR ISLASTBAR OR BARSCOUNT(C)=1;
 X2:=REF(BARSLAST(L2),1)+1;
 F2:=BACKSET(L2 AND COUNT(H2,X2)>0,HHVBARS(IF(H2,H,0),X2));
 G2:=F2>REF(F2,1);
 I2:=BACKSET(G2,2);
 HD:=I2>REF(I2,1),LINETHICK0;{過濾后高點}
R1:=BACKSET(ISLASTBAR,BARSLAST(HD)+1);
 S1:=R1>REF(R1,1); {前一高}
T1:=BACKSET(ISLASTBAR,BARSLAST(LD)+1);
 U1:=T1>REF(T1,1); {前一低}
R2:=BACKSET(S1,REF(BARSLAST(HD),1)+2);
 S2:=R2>REF(R2,1); {前二高}
T2:=BACKSET(U1,REF(BARSLAST(LD),1)+2);
 U2:=T2>REF(T2,1); {前二低}
T3:=BACKSET(U2,REF(BARSLAST(LD),1)+2);
 U3:=T3>REF(T3,1); {前三低}
T4:=BACKSET(U3,REF(BARSLAST(LD),1)+2);
 U4:=T4>REF(T4,1); {前四低}
R3:=BACKSET(S2,REF(BARSLAST(HD),1)+2);
 S3:=R3>REF(R3,1); {前三高}
R4:=BACKSET(S3,REF(BARSLAST(HD),1)+2);
 S4:=R4>REF(R4,1); {前四高}
★壓力1:DRAWLINE(S2,H,S1,H,1),COLORYELLOW,LINETHICK3;

★壓力2:DRAWLINE(S3,H,S2,H,1),COLORFF8000,LINETHICK3;
       
 ★壓力3:DRAWLINE(S4,H,S3,H,1),COLOR0000FF,LINETHICK2;
 ★支撐3:DRAWLINE(U4,L,U3,L,1),COLOR0000FF,LINETHICK2;
日A1:=YEAR=2012 AND MONTH=12 AND DAY=07 AND C>1000;
日B1:=YEAR=2013 AND MONTH=01 AND DAY=25 AND C>1000;
 X1207:  DRAWLINE(日A1,C,日B1,L,1),COLORLIGREEN;
年:=YEAR=2011; 月:= MONTH=6;
日0624:=年 AND 月 AND DAY=24;
日0627:=年 AND 月 AND DAY=27;
日0628:=年 AND 月 AND DAY=28;
日0629:=年 AND 月 AND DAY=29;
 G: DRAWLINE(日0624,C,日0627,C,1),COLORMAGENTA;{燈塔線G};
 A: DRAWLINE(日0624,C,日0628,O,1),COLORLIRED;{燈塔線A};
 B: DRAWLINE(日0624,C,日0629,O,1),COLORYELLOW;{燈塔線B};
 C1: DRAWLINE(日0624,C,日0627,L,1),COLORGREEN;{燈塔線C};
 D: DRAWLINE(日0624,C,日0629,C,1),COLORLICYAN;{燈塔線D};
 DRAWTEXT(ISLASTBAR,G,'G'),COLORMAGENTA;
 DRAWTEXT(ISLASTBAR,A,'A'),COLORLIRED;
 DRAWTEXT(ISLASTBAR,B,'B'),COLORYELLOW;
 DRAWTEXT(ISLASTBAR,C1,'C1'),COLORGREEN;
 DRAWTEXT(ISLASTBAR,D,'D'),COLORLICYAN;

DRAWTEXT_FIX(ISLASTBAR,0,0,0,HYBLOCK);{在屏幕左上角顯示所屬行業(yè)板塊}
DRAWTEXT_FIX(ISLASTBAR,0.05,0,0,DYBLOCK);{在屏幕左上角顯示所屬地域板塊}
DRAWTEXT_FIX(ISLASTBAR,0.1,0,0,GNBLOCK);{在屏幕左上角顯示所屬概念板塊}
 {跳空}
STICKLINE(REF(L,1)>H,H,REF(L,1),5,0),COLORGRAY;
 STICKLINE(REF(H,1)<L,L,REF(H,1),5,0),COLORGRAY;
 C_現(xiàn)價線: CONST(C),COLORLIRED,POINTDOT,LINETHICK2;{現(xiàn)價線}
MA5:=MA(C,5);
 MA5角度: ATAN((MA5/REF(MA5,1)-1)*100)*180/3.1416,NODRAW;
 {========================================================}
 DRAWKLINE(H,O,L,C);{重繪K線}
RC1:=REF(C,1);
 CS:=IF(C>=1,10000,100000);
 C漲停10:=1.10*RC1-49/CS;{考慮到4舍5入}
C漲停5 :=1.05*RC1-49/CS;
 C跌停10:=0.90*RC1+51/CS;
 C跌停5 :=0.95*RC1+51/CS;
 ST:=NAMELIKE('S') OR NAMELIKE('*S');
漲停:= IF(ST, C>=C漲停5, C>=C漲停10);
跌停:= IF(ST, C<=C跌停5, C<=C跌停10);
盤中漲停:=IF(ST, H>=C漲停5, H>=C漲停10);
盤中跌停:=IF(ST, L<=C跌停5, L<=C跌停10);
 STICKLINE(盤中漲停,H,MAX(C,O),0,0),COLORMAGENTA;{漲停后回落}
STICKLINE(盤中跌停,L,MIN(C,O),0,0),COLORLICYAN;{跌停后回升}
大陽線:=C>O AND (C>=C漲停5 OR C>(1.05*O-51/CS) ) OR (C>1000 AND C>RC1*1.024);
 STICKLINE(大陽線,O,C,1,0),COLOR0000BB;
大陰線:=C<O AND (C<=C跌停5 OR C<(0.95*O+49/CS) ) OR (C>1000 AND C<RC1*0.976);
 STICKLINE(大陰線,O,C,1,0),COLORLIGREEN;
 STICKLINE(漲停,O,C,1,0),COLORMAGENTA;
 STICKLINE(跌停,O,C,1,0),COLORLICYAN;
假陰:=C<O AND C>REF(C,1);
 STICKLINE(假陰,O,C,0,0),COLORRED;{假陰柱};
假陽:=C>O AND C<REF(C,1);
 STICKLINE(假陽,O,C,0,0),COLORGREEN;{假陽柱};
大盤TJ:=PERIOD=5 AND NAMELIKE('上證指數(shù)')
         AND (ABS((C-REF(C,1)))/REF(C,1)>=0.025 OR ABS(C-O)>=60);
 STICKLINE(大盤TJ,(H+L)/2,(H+L)/2,2,0),COLORYELLOW;{顯示大盤日線的60點大K線中值};
STICKLINE((大陽線 OR 大陰線 OR 漲停 OR 跌停)
   AND BETWEEN(C,1,500),L+(H-L)/2,L+(H-L)/2,1,0),COLORYELLOW;{大K線畫中點線};
HTJ:= H=高1;
 HSJ:=BARSLAST(HTJ)+1;
 H00:=高1+H_L*0.01;
 DRAWTEXT(HSJ=5,H00,'5');
 DRAWTEXT(HSJ=8,H00,'8');
 DRAWTEXT(HSJ=13,H00,'13');
 DRAWTEXT(HSJ=21,H00,'21');
 DRAWTEXT(HSJ=34,H00,'34');
 DRAWTEXT(HSJ=55,H00,'55');
 DRAWTEXT(HSJ=89,H00,'89');
 DRAWTEXT(HSJ=144,H00,'144');
 DRAWTEXT(HSJ=233,H00,'233');
真陰線:=C<=REF(C,1) AND C<=O;
假陽線:=C<=REF(C,1) AND C>=O;
陰線:=真陰線>0 OR 假陽線>0;
陰線天數(shù):=BARSLAST(陰線);
陰線實體最高價:=MAX(REF(C,陰線天數(shù)),REF(O,陰線天數(shù)));
陰線成交量:=REF(V,陰線天數(shù));
陽勝條件:=陰線天數(shù)>0 AND C>=陰線實體最高價 AND V>=陰線成交量;
陽勝:=IF(陽勝條件>0 AND REF(陽勝條件,1)=0,10,0);
真陽線:=C>=REF(C,1) AND C>=O;
假陰線:=C>=REF(C,1) AND C<=O;
陽線:=真陽線>0 OR 假陰線>0;
陽線天數(shù):=BARSLAST(陽線);
陽線實體最低價:=MIN(REF(C,陽線天數(shù)),REF(O,陽線天數(shù)));
陽線成交量:=REF(V,陽線天數(shù));
陰勝條件:=陽線天數(shù)>0 AND C<=陽線實體最低價 AND V>=陽線成交量*0.9;
陰勝:=IF(陰勝條件>0 AND REF(陰勝條件,1)=0,10,0),COLORWHITE;
陽勝進:=IF(陽勝>0,20,0),COLORRED;
陰勝出:=IF(陰勝>0,20,0);
 DRAWTEXT(陽勝進>0,LOW*0.99,'進'),COLORRED,LINETHICK3;
 MA250:MA(CLOSE,250),COLORWHITE,LINETHICK2;
 MA72:MA(CLOSE,72),COLOR3375FF,LINETHICK2;
 {參數(shù)N1、N2、N3、N4：取值1-300；推薦5、10、24、72};
 DRAWICON(CROSS(MA6,MA72),MA6,11);
頂?shù)组_關(guān):=0;
點位差:=0;
指定點:=0;
 V2V:=V/REF(V,1)>=1.9 AND C>REF(C,1);
 STICKLINE(V2V,H,L,0,0),COLORYELLOW;
 STICKLINE(V2V,O,C,3.1,0),COLOR0033FF;
 STICKLINE(V2V,O,C,2.1,0),COLOR0077FF;
 STICKLINE(V2V,O,C,1.1,0),COLOR00BBFF;
 STICKLINE(V2V,O,C,0.1,0),COLOR00FFFF;
 ZT:=C/REF(C,1)>1.097;
 ZT數(shù):COUNT(ZT,BARSSINCE(ZT)),NODRAW;
均價1:=AMO/VOL/100;
假陰真陽:=C<O AND C>=REF(MIN(C,O),1) AND 均價>REF(均價,1);
 DT:=假陰真陽;
STICKLINE(DT,H,L,0,0),COLORFFAA00;
 STICKLINE(DT,O,C,3,0),COLORFF3300;
 STICKLINE(DT,O,C,2,0),COLORFF7700;
 STICKLINE(DT,O,C,1,0),COLORFFAA00;
 STICKLINE(DT,O,C,0.1,0),COLORFFFF00;
 YX:=REF(O,BARSLAST(假陰真陽));
假陰實頂:YX,COLORFF7700,NODRAW;
 STICKLINE(V,YX,YX,1,0),COLORFF7700;
 L0:=點位差/100;
前極點精準線:IF(頂?shù)组_關(guān)=0,CONST(REF(L,指定點)),CONST(REF(H,指定點))),COLOR178448,LINETHICK3;
 DRAWICON(ABS(L-前極點精準線)<=L0,前極點精準線*0.99,38),LINETHICK3;
 DRAWICON(ABS(H-前極點精準線)<=L0,前極點精準線*1.01,39),LINETHICK3;
 {H極點精準線:CONST(REF(H,指定點)),COLOR7777FF;
 DRAWICON(ABS(H極點精準線-H)<=L0,H極點精準線*1.01,35);
 DRAWICON(ABS(H極點精準線-L)<=L0,H極點精準線*0.99,34);}
 {極點精準線:CONST(L),COLOR0077FF;
 DRAWICON(ABS(L-極點精準線)<=L0,極點精準線*0.99,1);
 DRAWICON(ABS(H-極點精準線)<=L0,極點精準線*1.01,2);
同向極點精準數(shù):COUNT(ABS(L-極點精準線)<=L0,60)-1,COLOR0077FF,NODRAW;
異向極點精準數(shù):COUNT(ABS(H-極點精準線)<=L0,60),COLOR0077FF,NODRAW;
 XG:=同向極點精準數(shù)>0 AND 異向極點精準數(shù)>0;}
 {DIFF:=10*(EMA(CLOSE,12)-EMA(CLOSE,26));
 DEA:=EMA(DIFF,9);
 MACD:=2*(DIFF-DEA);
量縮價漲:=C<REF(O,1) AND V<REF(V,1) AND MACD>REF(MACD,1) AND C>REF(C,1) AND REF(C<O,1) AND C>O;
陰KDAY:=BARSLAST(量縮價漲)+1;
 STICKLINE(V,REF(O,陰KDAY),REF(O,陰KDAY),3.5,0),COLORMAGENTA;
 DRAWICON(CROSS(C,REF(O,陰KDAY)),L,1);}
 N1:=150;判斷高低:=3;
高:=REF(HHV(H,N1),判斷高低);
近期頂:REFDATE(高,DATE),COLORGREEN,LINETHICK3;
低:=REF(LLV(L,N1),判斷高低);
近期底:REFDATE(低,DATE),COLORRED,LINETHICK3;
漲跌:=REF(C,1);
漲停1:=IF((C-漲跌)*100/漲跌>=(10-0.01*100/漲跌),1,0);
 DRAWICON(漲停1,H*0.97,23);
 LAST3K:=CURRBARSCOUNT>4;