- 金币:
-
- 奖励:
-
- 热心:
-
- 注册时间:
- 2006-2-6
|
|
楼主 |
发表于 2009-8-31 18:12
|
显示全部楼层
送主图源码,学习还要继续,入贴即为朋友,飞狐主图立体K线源码。图见上方。DRAWGBK(CLOSE>0, COLORRGB(1,000,999), COLORRGB(150,100,0),1);
YANG:= CLOSE>=OPEN;
YING:= CLOSE<OPEN;
{阳线上下影}
STICKLINE(YANG,L,H,0,0), ,COLOR5555FF;
{阳K线}
STICKLINE(YANG,C,O,8,0),COLOR5555FF;
STICKLINE(YANG,C,O,7,0),COLOR6666FF;
STICKLINE(YANG,C,O,6,0),COLOR7777FF;
STICKLINE(YANG,C,O,5,0),COLOR8888FF;
STICKLINE(YANG,C,O,4,0),COLOR9999FF;
STICKLINE(YANG,C,O,3,0),COLORAAAAFF;
STICKLINE(YANG,C,O,2,0),COLORBBBBFF;
STICKLINE(YANG,C,O,1,0),COLORCCCCFF;
{阴线上下影}
STICKLINE(YING,L,H,0,0), , COLORFFFF55;
{阴K线}
STICKLINE(YING,C,O,8,0), COLORFFFF55;
STICKLINE(YING,C,O,7,0), COLORF0FF66;
STICKLINE(YING,C,O,6,0), COLOREEFF77;
STICKLINE(YING,C,O,5,0), COLORDDFF88;
STICKLINE(YING,C,O,4,0), COLORCCFF99;
STICKLINE(YING,C,O,3,0), COLORCCFFAA;
STICKLINE(YING,C,O,2,0), COLORBBFFBB;
STICKLINE(YING,C,O,1,0), COLORAAFFCC;
{跳空情况}
STICKLINE(LOW>REF(HIGH,1) OR HIGH<REF(LOW,1),HIGH,LOW,1,1),COLOR00FF00; //跳空
STICKLINE(OPEN<=CLOSE AND LOW>REF(HIGH,1) AND CLOSE>=REF(CLOSE,1),OPEN,CLOSE,8,1),COLOR00FF00; //跳空上涨收阳
STICKLINE(OPEN>CLOSE AND LOW>REF(HIGH,1) AND CLOSE>=REF(CLOSE,1),OPEN,CLOSE,8,0),COLOR00FF00; //跳空上涨收阴
STICKLINE(OPEN<=CLOSE AND HIGH<REF(LOW,1) AND CLOSE< REF(CLOSE,1),OPEN,CLOSE,8,1),COLOR00FF00; //跳空下跌收阳
STICKLINE(OPEN>CLOSE AND HIGH<REF(LOW,1) AND CLOSE< REF(CLOSE,1),OPEN,CLOSE,8,0),,COLOR00FF00; //跳空下跌收阴 |
|
|