改文化用謝謝謝謝

作者：文華財經來源：cxh99.com 發布時間：2020年06月08日

咨詢內容： ?input:綠(0,0,1000),紅(0,0,1000);高點時區:=PEAKBARS(4,30,1 );低點時區:=TROUGHBARS(4,30,1 );?eee:=BACKSET(BARSTATUS=2 ,if(綠=0,高點時區+1,綠));ee:=FILTER(eee ,if(綠=0,高點時區*2,綠+2 ));?VERTLINE(ee,2 ),ALIGN2,COLORFFff00;?s2:=COUNT(eee ,綠 );bc:=s2;點石成金H:=IF(close>100,SUM(h*VOL,bc)/SUM(VOL,bc),sum(AMOUNT,bc)/sum(v,bc)/100*SUM(H,bc)/SUM(C,BC)){,colorred,LINETHICK2};點石成金L:=IF(close>100,SUM(l*VOL,bc)/SUM(VOL,bc),sum(AMOUNT,bc)/sum(v,bc)/100*SUM(L,bc)/SUM(C,BC)){,colorblue,LINETHICK2};點石成金:if(ref(h,bc)>ref(h,bc+1) and ref(h,bc)>ref(h,bc-1) ,點石成金h,點石成金l),color00ff00,LINETHICK1;?PARTLINE(點石成金,eee=1 ),color00ff00,LINETHICK2;?DRAWTEXT(BARSTATUS=2,點石成金*1.01,'#39+點石成金),COLOR00ff00,VALIGN2,ALIGN2;?DRAWTEXT(ee,點石成金*1.01,'#39+綠),COLOR00ff00,VALIGN2,ALIGN2;?DRAWTEXT(BARSTATUS=2,點石成金*1.01,'_______',COLOR00ff00,VALIGN2,ALIGN2;?eee1:=BACKSET(BARSTATUS=2 ,if(紅=0,低點時區+1,紅));ee1:=FILTER(eee1 ,if(紅=0,低點時區*2,紅+2 ));?VERTLINE(ee1,2 ),ALIGN2,COLORFFdd00;?s21:=COUNT(eee1 ,紅 );bc1:=s21;點石成金H1:=IF(close>100,SUM(h*VOL,bc1)/SUM(VOL,bc1),sum(AMOUNT,bc1)/sum(v,bc1)/100*SUM(H,bc1)/SUM(C,BC1));點石成金L1:=IF(close>100,SUM(l*VOL,bc1)/SUM(VOL,bc1),sum(AMOUNT,bc1)/sum(v,bc1)/100*SUM(L,bc1)/SUM(C,BC1));點石成金1:if(ref(h,bc1)>ref(h,bc1+1) and ref(h,bc1)>ref(h,bc1-1) ,點石成金h1,點石成金l1),colorred,LINETHICK1;?PARTLINE(點石成金1,eee1=1 ),colorred,LINETHICK2;?DRAWTEXT(BARSTATUS=2,點石成金1*0.98,'#39+點石成金1),COLORred,VALIGN0,ALIGN2;?DRAWTEXT(ee1,點石成金1*0.98,'#39+紅),COLORred,VALIGN0,ALIGN2;?DRAWTEXT(BARSTATUS=2,點石成金1*0.98,'_______',COLOR00ff00,VALIGN0,ALIGN2;
?
?來源:程序化99
文華技術人員： 不同軟件函數機制不同，改寫會有差異
無法修改部分已刪除，參考： ?下載信息??[文件大小：???下載次數：?]文件名：源碼.txt