编写指标公式源码写法技巧全集

0001-主图显示代码及板块一、显示板块例一：DRAWTEXT(BARP0S = SYSPARAM(2),H,N 所属板块: + BLKNAME),ALIGN4,C0L0RYELL0 W;例二：DRAWTEXT(SYSPARAM(2) = BARPOS,C,所属板块: + BLKNAME),ALIGN4,C0L0RYELL0W;例三：DRAWTEXT(SYSPARAM(2) = BARSC0UNT(C),H,所属版块: + BLKNAME),ALIGN4,C0L0RY ELL0W;二、显示代码及板块S:=STKLABEL;DRAWTEXT(SYSPARAM(2)=BARP0S,C,S),ALIGN4,C0L0RYELL0W;DRAWTEXT(BARP0S = SYSPARAM(2),H,N 所属板块: + BLKNAME),ALIGN4,C0L0RYELL0W;N 与所属板块之间空六格，以显示代码0031-均线多头排列A1:=MA(C,N1);A2:=MA(C,N2);A3:=MA(C,N3);A4:=MA(C,N4);C0UNT(A1A2 AND A2A3 AND A3A4,3);0032-均线空头排列A1:=MA(C,N1);A2:=MA(C,N2);A3:=MA(C,N3);A4:=MA(C,N4);C0UNT(A1 A2 AND A2 A3 AND A3 A4,3);0033-N 日均线向下AA:=MA(C,N);BB:=REF(AA,1);AABB0035-N 日均线走平AA:=MA(C,N);BB:=REF(AA,1);AA=BB0036-向前N日至M日出现过均线死叉(P1MA(VOL,N);0038-低位密集A1:=COST(85);A2:=COST(15);A3:=A1-A2;A4:=(A1+A2)/2;A5:=A3/A4*10010;B1:=HHV(H,120);B2:=LLV(L,120);B3:=B1-B2;B4:=(A4-B2)0,JC-JLDATACOUNT),COLORYELLOW; 收盘价趋势线，只画线，不显示数值通式：曲线 X 叠加曲线 YBX:=HHV(X,N)-LLV(X,N);BY:=HHV(Y,N)-LLV(Y,N);BI:=BX/BY;B:=BIDATACOUNT;FX:=X/REF(X,1);JX:=REF(X,1)*(1+A*FX)*B/A;XL:=LLV(JX,N);曲线 Y:Y;曲线X:X丄INETHICKO;/曲线X的值PARTLINE(C,JX-XLDATACOUNT);曲线 X 的线二、百分比叠加把两曲线的波动幅度划成百分比进行叠加此法，两线都变形，但走势都与原线完全相似。举例：C叠加VHV:=HHV(V,N);DV:=HVDATACOUNT;BV:=100/DV;V*BV,VOLSTICK;HC:=HHV(C,N);LC:=LLV(C,N);BC:=100/(HCDATACOUNT-LCDATACOUNT);(C-LCDATACOUNT)*BC;通式一：曲线X,曲线YXH:=HHV(X,N);XL:=LLV(X,N);XDH:=XHDATACOUNT;XDL:=XLDATACOUNT;BX:=100/(XDH-XDL);曲线 X:(X-XDL)*BX;YH:=HHV(Y,N);YL:=LLV(Y,N);YDH:=YHDATACOUNT;YDL:=YLDATACOUNT;BY:=100/(YDH-YDL);曲线 Y:(Y-YDL)*BY;通式二：X曲线+Y曲线N:=SYSPARAM(3)-SYSPARAM(2);X: =； 为X曲线定义XH:=HHV(X,N);XL:=LLV(X,N);XDH:=XHSYSPARAM(3);XDL:=XLSYSPARAM(3);BX:=100/(XDH-XDL);曲线 X:(X-XDL)*BX;Y: =；为Y曲线定义YH:=HHV(Y,N);YL:=LLV(Y,N);YDH:=YHSYSPARAM(3);YDL:=YLSYSPARAM(3);BY:=100/(YDH-YDL);曲线 Y:(Y-YDL)*BY;三、固定位置叠加此法应用不多，仅举例。例一：主图成交量(V叠加C)M:960,1,2000R0:=M/1000;R:=(L-R0*SYSPARAM(5)/V;R1:=LLV(R,SYSPARAM(3)-SYSPARAM(2);R2:=R1SYSPARAM(3);R3:=LLV(L-R2*V,SYSPARAM(3)-SYSPARAM(2);R4:=R3SYSPARAM(3);R5:=(R2*V+R4)*0.995;STICKLINE(C=REF(C,1),R5,R0*SYSPARAM(5),6,1)COLORRED;STICKLINE(C=0,R0*SYSPARAM(5) COLORWHITE;PARTLINE(R50,MA(R5,5);PARTLINE(R50,MA(R5,10);PARTLINE(R50,MA(R5,20);例二：INPUT:N(10,2,999);M:=SYSPARAM(3)-SYSPARAM(2);X:=C;Y:=SUM(IF(CLOSEREF(CLOSE,1),VOL/CAPITAL,IF(CLOSEREF(X,1),(X-XDL)*BX),COLORRED;收盘/ :PARTLINE(XREF(Y,1),(Y-YDL)*BY),COLORYELLOW;OBV 线/ : PARTLINE(Y REF(Y,1),(Y-YDL)*BY),C0L0R009F00;A1:=REF(TY,N)=HHV(TY,2*N+1); B1:=FILTER(A1,N); C1:=BACKSET(B1,N+1); HD:= FILTER(C1,N);A2:=REF(TY,N)=LLV(TY,2*N+1); B2:=FILTER(A2,N); C2:=BACKSET(B2,N+1); LD:=F ILTER(C2,N);AA:=REF(TY,BARSLAST(HD); BB:=REF(TY,BARSLAST(LD);A1:=REF(Y,BARSLAST(H D)*1OOO; B1:=REF(Y,BARSLAST(LD)*1OOO;T1:=BARSLAST(HD)BARSLAST(LD) AND NOT(LD);PARTLINE(T1,AA),COLORMAGENTA,LINETHICK2;PARTLINE(T2,BB),COLORGREEN,LINETHICK2;DRAWNUMBER(T1=O AND REF(T1,1)O,REF(AA,1)+O.1,A1,2);DRAWNUMBER(T2=O AND REF(T2,1)O,REF(BB,1)+O.1,B1,2);DRAWNUMBER(ISLASTBAR AND T1O,REF(AA,1)+O.1,A1,2),COLORYELLOW;DRAWNUMBER(ISLASTBAR AND T2O,REF(BB,1)+O.1,B1,2),COLORMAGENTA;OO42-均线变色MAO5:MA(CLOSE,5);MA3O:MA(CLOSE,3O);IF(MA05 MA30,MA05,MA30),COLORGREEN;IF(MA05MA30,MA30,MA30),COLORBLUE;DRAWICON(CROSS(MA05,MA30),L*0.98,4);DRAWICON(CROSS(MA30,MA05),H*1.02,5);0055-底背离LLV(L,60)=L) AND NOT(LLV(DEA,60)=DEA);0056-顶背离HHV(H,60)=H) AND NOT(HHV(DEA,60)=DEA);0057-N 次金叉、死叉0 轴上二次金叉COUNT(CROSS(DIF,DEA) AND DEA0,20)=2 AND CROSS(DIF,DEA) ANDDEA0;0 轴上三次金叉COUNT(CROSS(DIF,DEA) AND DEA0,20)=3 AND CROSS(DIF,DEA) ANDDEA0;0 轴上四次金叉COUNT(CROSS(DIF,DEA) AND DEA0,20)=4 AND CROSS(DIF,DEA) AND DEA0;二次金叉EXPLAIN(COUNT(CROSS(DIF,DEA),20)=2 AND CROSS(DIF,DEA);二次死叉COUNT(CROSS(DEA,DIF),20)=2 AND CROSS(DEA,DIF);0058-5分钟副图显示15分钟K线建公式:0015C15:CLOSE;O15:OPEN;H15:HIGH;L15:LOW;建公式:十五 K 线C15:=0015.C15#MIN15;O15:=0015.O15#MIN15;H15:=0015.H15#MIN15;L15:=0015.L15#MIN15;TI:=OPENMINUTES(TIME)=10 OR OPENMINUTES(TIME)=25 OR OPENMINUTES(TIME) =40 OR OPENMINUTES(TIME)=55 OR OPENMINUTES(TIME)=70 OR OPENMINUTES(TIME) =85 OR OPENMINUTES(TIME)=100 OR OPENMINUTES(TIME)=115 OR OPENMINUTES(TI ME)=130 OR OPENMINUTES(TIME)=145 OR OPENMINUTES(TIME)=160 OR OPENMINUTE S(TIME)=175 OR OPENMINUTES(TIME)=190 OR OPENMINUTES(TIME)=205 OR OPENMI NUTES(TIME)=220 OR OPENMINUTES(TIME)=235;HH15:=IF(TI,H15,C15);LL15:=IF(TI,L15,C15);STICKLINE(C15O15,C15,O15,10,0),COLORRED;STICKLINE(C15O15 AND H15C15,HH15,C15,0.1,0),COLORRED;STICKLINE(C15O15 AND O15L15,O15,LL15,0.1,0),COLORRED; STICKLINE(C15=O15,C15,O15,10,0),COLORGREEN;STICKLINE(C15L15,C15,LL15,0.1,0),COLORGREEN;STICKLINE(C15O15,HH15,O15,0.1,0),COLORGREEN;注：以大陆股市为例，四小时，其他市场如超过四小时，可在中间语句、TI:=”中以15为系数顺序加 足，如：OR 250 OR 265.等等。0059-移动成本不知道函数算法，计算误差在所难免。调整参数”可看到不同的移动成本。/筹码%INPUT:%(90,1,100);A:=AMOUNT/V/100;成本:FLOOR(COST(50-%/2)*100)/100,COLORYELLOW 丄INETHICKO;:CEILING(COST(50+%/2)*100)/100,COLORYELLOW 丄INETHICKO;集中度:INTPART(-成本)/(+ 成本)*1000)/10,COLORGREEN;平均成本:ROUND(COST(5O)*1OO)/1OO丄INETHICKO;穿透力：(WINNER(C)-REF(WINNER(C),1)/V*CAPITAL丄INETHICKO;/计算误差大 穿透力 2:(WINNER(C)-WINNER(O)/V*CAPITAL丄INETHICKO;/这一写法还是误差大 获利比例：ROUND(WINNER(C)*1OOO)/1O丄INETHICKO;