“富贵加身”主图源码:
GSPT1:=(2*CLOSE+HIGH+LOW);
GSPT2:=LLV(LOW,30);
GSPT3:=HHV(HIGH,30);
GSPT4:=HHV(HIGH,96);
GSPT5:=LLV(LOW,96);
GSPT6:=EMA((GSPT1/4-GSPT2)/(GSPT3-GSPT2)*100,8);
GSPT7:=EMA(GSPT6,5);
GSPT8:=REFDATE(REF(GSPT4,5),DATE);
GSPT66:=REFDATE(REF(GSPT5,5),DATE);
GSPT68:=(GSPT8+GSPT66)/2;
顶:IF(GSPT6>0 AND GSPT6-GSPT7<=0,GSPT8,GSPT8),COLORGREEN,LINETHICK2;
腰:IF(GSPT6>0 AND GSPT6-GSPT7<=0,GSPT68,GSPT68),COLORGREEN,LINETHICK2;
底:IF(GSPT6>0 AND GSPT6-GSPT7<=0,GSPT66,GSPT66),COLORGREEN,LINETHICK2;
五:IF(CURRBARSCOUNT=6,LOW*0.992-0.02,DRAWNULL),CROSSDOT,COLORWHITE,LINETHICK3;
十:IF(CURRBARSCOUNT=11,LOW*0.992-0.02,DRAWNULL),CROSSDOT,COLORYELLOW,LINETHICK3;
二十:IF(CURRBARSCOUNT=21,LOW*0.992-0.02,DRAWNULL),CROSSDOT,COLORRED,LINETHICK3;
三十:IF(CURRBARSCOUNT=31,LOW*0.992-0.02,DRAWNULL),CROSSDOT,COLORCYAN,LINETHICK3;
六十:IF(CURRBARSCOUNT=61,LOW*0.992-0.02,DRAWNULL),CROSSDOT,COLORYELLOW,LINETHICK3;
九十:IF(CURRBARSCOUNT=91,LOW*0.992-0.02,DRAWNULL),CROSSDOT,COLORYELLOW,LINETHICK3;
高:IF(GSPT6>0 AND GSPT6-GSPT7>0,G................