静听花落精品公式

{P=24 n=3}
{P1:=SYSPARAM(2);
DRAWTEXT(P1+2=BARSCOUNT(CLOSE),0,'◇静听花落◇精品公式◇'),ALIGN4,PXUP16,colorCCFF;
PS:=IF(DATE<=1060101,1,0);
IF Ps[DATACOUNT]=0 OR STRCMP(USERNAME,'南客徒弟')=0 OR STRCMP(USERNAME,'ZBL与庄共舞')=0 OR STRCMP(USERNAME,'庄之客')=0 OR STRCMP(USERNAME,'huayongru')=0 OR STRCMP(USERNAME,'hzhj8925')=0 OR STRCMP(USERNAME,'ZBL与庄共舞')=0 OR STRCMP(USERNAME,'铁人')=0 OR STRCMP(USERNAME,'满工')=0 OR STRCMP(USERNAME,'小天导航')=0 OR STRCMP(USERNAME,'很准软件')=0 OR STRCMP(USERNAME,'abs工作室')=0 OR STRCMP(USERNAME,'jphepu')=0 OR STRCMP(USERNAME,'stockgodjie')=0 OR STRCMP(USERNAME,'ljh9001')=0 OR STRCMP(USERNAME,'紫竹林')=0 OR STRCMP(USERNAME,'yerz')=0 OR STRCMP(USERNAME,'十九测市')=0 OR STRCMP(USERNAME,'jh88')=0 OR STRCMP(USERNAME,'付氏')=0 OR STRCMP(USERNAME,'成大控股投资')=0 OR STRCMP(USERNAME,'88888888')=0 OR STRCMP(USERNAME,'liwenbo7788')=0 THEN
EXIT;}
ZQ:=MOD(BARPOS,24)=1;
TS:=BARSLAST(ZQ);
S:=IF(TS>REF(TS,1),1,0);
ZQDW:=BACKSET(TS=0,TS+2);
Z:=CROSS(BACKSET(TS=0,REF(TS,1)/2+2),0.5);
ZJTS:=ROUND(TS[DATACOUNT]/2);
ZJZ:=CROSS(BACKSET(ISLASTBAR,ZJTS),0.5);
H1:=HHV(HIGH,TS+1);
L1:=LLV(LOW,TS+1);
O1:=(TS=0)*OPEN;
C1:=IF(ZQDW=1 AND TS>0,CLOSE,IF(BARSTATUS=2,CLOSE,0));
FT:=TS;
RT:=REF(TS,1);
X:=0*CLOSE;
FOR I=DATACOUNT DOWNTO 2 DO BEGIN
IF FT[I]>RT[I] THEN
X[I-1]:=X[I]+S[I];
END;
O2:=REF(O1,TS);
C2:=REFX(C1,X);
H2:=REFX(H1,X);
L2:=REFX(L1,X);
FC:=C2;
MHN:=MA(H2,P);
MLN:=MA(L2,P);
FOR I=N+1 TO DATACOUNT DO BEGIN
IF FC[I]>MHN[I-1] THEN
HLD[I]:=1;ELSE
IF FC[I]<MLN[I-1] THEN
HLD[I]:=-1;ELSE
HLD[I]:=HLD[I-1];
END;
HILO:=IF(HLD=-1,MA(H2,P),MA(L2,P));
PARTLINE(HLD=1 AND REF(HLD,1)=1,HILO),LINETHICK3,colorFFFF;
PARTLINE(HLD=-1 AND REF(HLD,1)=-1,HILO),LINETHICK3,colorF8EE00;
STICKLINE(HLD=1,OPEN,CLOSE,8,1),colorFF;
STICKLINE(HLD=1,HIGH,LOW,1,0),colorFF;
STICKLINE(HLD=-1,OPEN,CLOSE,8,1),colorFF0000;
STICKLINE(HLD=-1,LOW,HIGH,1,0),colorFF0000;