通达信席位资金副图指标 红柱表示席位资金净流入 源码
通达信版本席位资金幅图指标，花大洋弄来的现在分享给大家，源码，未加密。红柱表示席位资金净流入，绿柱表示席位资金净流出。
超级单买单:=LARGEINTRDVOL*10000/VOL,COLORRED;
超级单卖单:=LARGEOUTTRDVOL*10000/VOL,COLORGREEN;
超级单买入:=GPJYVALUE(2,1,0),COLORRED,NODRAW;
超级单卖出:=GPJYVALUE(2,2,0),COLORCYAN,NODRAW;
席位:(超级单买入-超级单卖出),COLOR00BBFF, NODRAW;
TWZ:=IF(REF(席位,0)>0,REF(超级单买入,1)*0.6,超级单买入*0.9);
TWZ1:=IF(REF(席位,0)<0,-REF(超级单卖出,1)*0.6,-超级单卖出*0.9);
{DRAWTEXT(大单>0 AND 大单<10000,TWZ,VARCAT(VAR2STR(大单,2),'万')),COLORYELLOW; DRAWTEXT(大单>10000,TWZ,VARCAT(VAR2STR(大单/10000,2),'亿')),COLORYELLOW; DRAWTEXT(大单<0 AND 大单>-10000,TWZ1,VARCAT(VAR2STR(大单,2),'万')),COLORGREEN; DRAWTEXT(大单<-10000,TWZ1,VARCAT(VAR2STR(大单/10000,2),'亿')),COLORGREEN;}
STICKLINE(席位>0,0,席位,3,0),COLORRED;
STICKLINE(席位<0,0,席位,3,0),COLORE19800;
GB:=MAINZSHQ(1,6);
GB2:=CON2STR(GB,2);
GB3:=STRCAT(GB2,'家');
GB4:=MAINZSHQ(1,7);
GB5:=CON2STR(GB4,2);
GB6:=STRCAT(GB5,'家');
上证上涨:=STRCAT(' 上证上涨：',GB3);
上证下跌:=STRCAT(' 上证下跌：',GB6);
DRAWTEXT_FIX(ISLASTBAR,0.10,1.5,0,上证上涨),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.10,0.1,0,上证下跌),COLORYELLOW;
SGB:=MAINZSHQ(2,6);
SGB2:=CON2STR(SGB,2);
SGB3:=STRCAT(SGB2,'家');
SGB4:=MAINZSHQ(2,7);
SGB5:=CON2STR(SGB4,2);
SGB6:=STRCAT(SGB5,'家');
深证上涨:=STRCAT(' 深证上涨：',SGB3); 深证下跌:=STRCAT(' 深证下跌：',SGB6);
DRAWTEXT_FIX(ISLASTBAR,0.30,1.5,0,深证上涨),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.30,0.1,0,深证下跌),COLORYELLOW;
CGB:=MAINZSHQ(3,6);
CGB2:=CON2STR(CGB,2);
CGB3:=STRCAT(CGB2,'家');
CGB4:=MAINZSHQ(3,7);
CGB5:=CON2STR(CGB4,2);
CGB6:=STRCAT(CGB5,'家');
创业板上涨:=STRCAT(' 创业板上涨：',CGB3);
创业板下跌:=STRCAT(' 创业板下跌：',CGB6);
DRAWTEXT_FIX(ISLASTBAR,0.50,1.5,0,创业板上涨),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.50,0.1,0,创业板下跌),COLORYELLOW;
KGB:=MAINZSHQ(4,6);
KGB2:=CON2STR(KGB,2);
KGB3:=STRCAT(KGB2,'家');
KGB4:=MAINZSHQ(4,7);
KGB5:=CON2STR(KGB4,2);
KGB6:=STRCAT(KGB5,'家');
科创板上涨:=STRCAT(' 科创板上涨：',KGB3);
科创板下跌:=STRCAT(' 科创板下跌：',KGB6);
DRAWTEXT_FIX(ISLASTBAR,0.70,1.5,0,科创板上涨),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.70,0.1,0,科创板下跌),COLORYELLOW;
