标题: [飞狐]飞狐立体宝塔主图源码公式 [打印本页] 作者: 我是一个兵 时间: 2009-11-22 13:21 标题: [飞狐]飞狐立体宝塔主图源码公式 飞狐立体宝塔主图源码公式:
DRAWGBK(CLOSE>0,COLORRGB(0,100,0),COLORRGB(0,50,0),1);
上市日期年:REF(YEAR,BARSCOUNT(CLOSE)-1),LINETHICK0,colorFF;
月:REF(MONTH,BARSCOUNT(CLOSE)-1),LINETHICK0,colorFF00FF;
日:REF(DAY,BARSCOUNT(CLOSE)-1),LINETHICK0,colorFFFF;
DRAWTEXT(SYSPARAM(2)=BARPOS,CLOSE,'证券代码:'+STKLABEL),ALIGN4,colorFF;
DRAWTEXT(BARPOS=SYSPARAM(2),HIGH,' 所属板块:'+BLKNAME),ALIGN4,colorFF00;
DRAWTEXT(SYSPARAM(2)=BARPOS,CLOSE,'杨文峰编辑'),ALIGN5,colorFFFF00;
VAR1:=CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2);
VAR2:=REF(VAR1,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR3:=REF(VAR2,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR4:=REF(VAR3,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR5:=REF(VAR4,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR6:=REF(VAR5,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR7:=REF(VAR6,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR8:=REF(VAR7,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR9:=REF(VAR8,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VARA:=REF(VAR9,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VARB:=REF(VARA,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VARC:=REF(VARB,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
YANG:=VAR1 OR VAR2 OR VAR3 OR VAR4 OR VAR5 OR VAR6 OR VAR7 OR VAR8 OR VAR9 OR VARA OR VARB OR VARC;
STICKLINE(YANG>=REF(YANG,1) AND YANG>=0,CLOSE,REF(CLOSE,1),8,0),colorFFAA00;
STICKLINE(YANG>=REF(YANG,1) AND YANG>=0,CLOSE,REF(CLOSE,1),7,0),colorFFBB11;
STICKLINE(YANG>=REF(YANG,1) AND YANG>=0,CLOSE,REF(CLOSE,1),6,0),colorFFCC22;
STICKLINE(YANG>=REF(YANG,1) AND YANG>=0,CLOSE,REF(CLOSE,1),5,0),colorFFDD33;
STICKLINE(YANG>=REF(YANG,1) AND YANG>=0,CLOSE,REF(CLOSE,1),4,0),colorFFEE44;
STICKLINE(YANG>=REF(YANG,1) AND YANG>=0,CLOSE,REF(CLOSE,1),3,0),colorFFFF55;
STICKLINE(YANG>=REF(YANG,1) AND YANG>=0,CLOSE,REF(CLOSE,1),2,0),colorFFFF66;
STICKLINE(YANG>=REF(YANG,1) AND YANG>=0,CLOSE,REF(CLOSE,1),1,0),colorFFFF77;
STICKLINE(YANG>=REF(YANG,1) AND YANG>=0,CLOSE,REF(CLOSE,1),0,0),colorFFFF00;
STICKLINE(YANG<=REF(YANG,1) AND YANG<=0,CLOSE,REF(CLOSE,1),8,0),colorFFAA00;
STICKLINE(YANG<=REF(YANG,1) AND YANG<=0,CLOSE,REF(CLOSE,1),7,0),colorFFBB11;
STICKLINE(YANG<=REF(YANG,1) AND YANG<=0,CLOSE,REF(CLOSE,1),6,0),colorFFCC22;
STICKLINE(YANG<=REF(YANG,1) AND YANG<=0,CLOSE,REF(CLOSE,1),5,0),colorFFDD33;
STICKLINE(YANG<=REF(YANG,1) AND YANG<=0,CLOSE,REF(CLOSE,1),4,0),colorFFEE44;
STICKLINE(YANG<=REF(YANG,1) AND YANG<=0,CLOSE,REF(CLOSE,1),3,0),colorFFFF55;
STICKLINE(YANG<=REF(YANG,1) AND YANG<=0,CLOSE,REF(CLOSE,1),2,0),colorFFFF66;
STICKLINE(YANG<=REF(YANG,1) AND YANG<=0,CLOSE,REF(CLOSE,1),1,0),colorFFFF77;
STICKLINE(YANG<=REF(YANG,1) AND YANG<=0,CLOSE,REF(CLOSE,1),0,0),colorFFFF00;
VARD:=CLOSE<REF(CLOSE,1) AND CLOSE<REF(CLOSE,2);
VARE:=REF(VARD,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VARF:=REF(VARE,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR10:=REF(VARF,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR11:=REF(VAR10,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR12:=REF(VAR11,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR13:=REF(VAR12,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR14:=REF(VAR13,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR15:=REF(VAR14,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR16:=REF(VAR15,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR17:=REF(VAR16,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR18:=REF(VAR17,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
WEN:=VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18;
STICKLINE(WEN<=REF(WEN,1) AND WEN<=0,CLOSE,REF(CLOSE,1),8,0),colorAA;
STICKLINE(WEN<=REF(WEN,1) AND WEN<=0,CLOSE,REF(CLOSE,1),7,0),color11BB;
STICKLINE(WEN<=REF(WEN,1) AND WEN<=0,CLOSE,REF(CLOSE,1),6,0),color22CC;
STICKLINE(WEN<=REF(WEN,1) AND WEN<=0,CLOSE,REF(CLOSE,1),5,0),color33DD;
STICKLINE(WEN<=REF(WEN,1) AND WEN<=0,CLOSE,REF(CLOSE,1),4,0),color44EE;
STICKLINE(WEN<=REF(WEN,1) AND WEN<=0,CLOSE,REF(CLOSE,1),3,0),color55FF;
STICKLINE(WEN<=REF(WEN,1) AND WEN<=0,CLOSE,REF(CLOSE,1),2,0),color66FF;
STICKLINE(WEN<=REF(WEN,1) AND WEN<=0,CLOSE,REF(CLOSE,1),1,0),color77FF;
STICKLINE(WEN<=REF(WEN,1) AND WEN<=0,CLOSE,REF(CLOSE,1),0,0),colorFF;
VAR19:=(REF(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,1)) AND VAR1;
STICKLINE(VAR19,REF(CLOSE,1),REF(CLOSE,2),8,0),colorAAFF;
STICKLINE(VAR19,REF(CLOSE,1),REF(CLOSE,2),7,0),colorBBFF;
STICKLINE(VAR19,REF(CLOSE,1),REF(CLOSE,2),6,0),colorCCFF;
STICKLINE(VAR19,REF(CLOSE,1),REF(CLOSE,2),5,0),colorDDFF;
STICKLINE(VAR19,REF(CLOSE,1),REF(CLOSE,2),4,0),colorEEFF;
STICKLINE(VAR19,REF(CLOSE,1),REF(CLOSE,2),3,0),colorFFFF;
STICKLINE(VAR19,REF(CLOSE,1),REF(CLOSE,2),2,0),colorFFFF;
STICKLINE(VAR19,REF(CLOSE,1),REF(CLOSE,2),1,0),colorFFFF;
STICKLINE(VAR19,REF(CLOSE,1),REF(CLOSE,2),0,0),colorFFFF;
VAR1A:=(REF(VAR1 OR VAR2 OR VAR3 OR VAR4 OR VAR5 OR VAR6 OR VAR7 OR VAR8 OR VAR9 OR VARA OR VARB OR VARC,1)) AND VARD;
STICKLINE(VAR1A,REF(CLOSE,1),REF(CLOSE,2),8,0),colorAA;
STICKLINE(VAR1A,REF(CLOSE,1),REF(CLOSE,2),7,0),color11BB;
STICKLINE(VAR1A,REF(CLOSE,1),REF(CLOSE,2),6,0),color22CC;
STICKLINE(VAR1A,REF(CLOSE,1),REF(CLOSE,2),5,0),color33DD;
STICKLINE(VAR1A,REF(CLOSE,1),REF(CLOSE,2),4,0),color44EE;
STICKLINE(VAR1A,REF(CLOSE,1),REF(CLOSE,2),3,0),color55FF;
STICKLINE(VAR1A,REF(CLOSE,1),REF(CLOSE,2),2,0),color66FF;
STICKLINE(VAR1A,REF(CLOSE,1),REF(CLOSE,2),1,0),color77FF;
STICKLINE(VAR1A,REF(CLOSE,1),REF(CLOSE,2),0,0),colorFF;
MA1:MA(CLOSE,5);
MA2:MA(CLOSE,10);
MA3:MA(CLOSE,23);作者: 君一笑 时间: 2015-2-1 18:19
谢谢分享