wWj:=’ ‘;
wyy1:=WEEKDAY;
if C>0 then begin;
wWj:=’ 星期’;
IF wyy1=5 then wWj:= wWj+’五’;
IF wyy1=4 then wWj:= wWj+’四’;
IF wyy1=3 then wWj:= wWj+’三’;
IF wyy1=2 then wWj:= wWj+’二’;
IF wyy1=1 then wWj:= wWj+’一’;
end;
wWl:=”;
wWh:=”;
wyy2:=LMONTH;
wyy3:=LDAY;
IF BARSTATUS=2 then wWw:=’ 農(nóng)歷 ‘+NUMTOSTRN(wyy2,0)+’月 ‘+NUMTOSTRN(wyy3,0)+’日’;
IF BARSTATUS=2 then wWh:=NUMTOSTRN(date+1000000,0);
IF BARSTATUS=2 then wWl:=wWj;
DRAWTEXTREL(10 ,10 ,’ ‘+wWh+wWl+wWw),LINETHICK1,ColorFFFF80;
var1:=SUM(WINNER(CLOSE)*100,10)/10-(SUM(WINNER(CLOSE)*100,10)/20+10);
var2:=Dma(var1,vol/SUM(vol,13));
var3:=Dma(var1,vol/CAPITAL);
STICKLINE(var1>0,0,var1,10,0),Color0000FF;
STICKLINE(var1<0,0,var1,10,0),Color00FF00;
控盤拉升:IF(C>1000,var2,var3),ColorYELLOW,LINETHICK2,LAYER1;
頂:50,POINTDOT,ColorGREEN;
風(fēng)險區(qū):33,POINTDOT,ColorGREEN;
控盤區(qū):20,POINTDOT,Color979390;
吸籌區(qū):10,POINTDOT,Color979390;
無莊散戶區(qū):-5,POINTDOT,colorFFA6A6;
底部區(qū):-15,POINTDOT,colorcc9900;
DRAWTEXTREL(1,5,’頂部區(qū)’),ColorGREEN;
DRAWTEXTREL(1,220,’風(fēng)險區(qū)’),ColorGREEN;
DRAWTEXTREL(1,430,’控盤區(qū)’),Color00FFFF;
DRAWTEXTREL(1,590,’吸籌區(qū)’),Color00FFFF;
DRAWTEXTREL(1,790,’散戶區(qū)’),Colorred;
DRAWTEXTREL(1,980,’底部區(qū)’),Colorred;
A:=BARSLAST(CROSS(“kdj.k”,”kdj.d”))+1;
B:=A>REF(A,1);
D1:=BARSCOUNT(C);
板塊:=IFS(INBLOCK(‘工程建筑’),’工程建筑’,
IFS(INBLOCK(‘電力’),’電力’,
IFS(INBLOCK(‘計算機(jī)’),’計算機(jī)’,
IFS(INBLOCK(‘電子信息’),’電子信息’,
IFS(INBLOCK(‘房地產(chǎn)’),’房地產(chǎn)’,
IFS(INBLOCK(‘紡織服裝’),’紡織服裝’,
IFS(INBLOCK(‘鋼鐵’),’鋼鐵’,
IFS(INBLOCK(‘供水供氣’),’供水供氣’,
IFS(INBLOCK(‘化工化纖’),’化工化纖’,
IFS(INBLOCK(‘電器’),’電器’,
IFS(INBLOCK(‘交通設(shè)施’),’交通設(shè)施’,
IFS(INBLOCK(‘銀行類’),’銀行類’,
IFS(INBLOCK(‘旅游酒店’),’旅游酒店’,
IFS(INBLOCK(‘煤炭石油’),’煤炭石油’,
IFS(INBLOCK(‘釀酒食品’),’釀酒食品’,
IFS(INBLOCK(‘農(nóng)林牧漁’),’農(nóng)林牧漁’,
IFS(INBLOCK(‘商業(yè)連鎖’),’商業(yè)連鎖’,
IFS(INBLOCK(‘建材’),’建材’,
IFS(INBLOCK(‘其他行業(yè)’),’其他行業(yè)’,
IFS(INBLOCK(‘汽車類’),’汽車類’,
IFS(INBLOCK(‘機(jī)械’),’機(jī)械’,
IFS(INBLOCK(‘醫(yī)藥’),’醫(yī)藥’,
IFS(INBLOCK(‘外貿(mào)’),’外貿(mào)’,
IFS(INBLOCK(‘教育傳媒’),’教育傳媒’,
IFS(INBLOCK(‘儀電儀表’),’儀電儀表’,
IFS(INBLOCK(‘有色金屬’),’有色金屬’,
IFS(INBLOCK(‘造紙印刷’),’造紙印刷’,
IFS(INBLOCK(‘券商’),’券商’,
IFS(INBLOCK(‘電力設(shè)備’),’電力設(shè)備’,
IFS(INBLOCK(‘通信’),’通信’,
IFS(INBLOCK(‘運(yùn)輸物流’),’運(yùn)輸物流’,
IFS(INBLOCK(‘海峽西岸’),’海峽西岸’,
IFS(INBLOCK(‘保險’),’保險’,”)
))))))))))))))))))))))))))))))));
DRAWTEXTABS(50,1,’所屬: ‘+板塊+’指數(shù)’),COLORYELLOW;
DRAWTEXTREL(80,20,”),colorcc9900,linethick1;