{N 5 100 26 M 1 3 2 } AAA:=C*9.819866245-14.180133755*REF(C,1)-1.680133755*REF(C,2)-1.346800422*REF(C,3) -1.096800422*REF(C,4)-0.896800422*REF(C,5)-0.730133755*REF(C,6)-0.587276612*REF(C,7) -0.462276612*REF(C,8)-0.351165501*REF(C,9)-0.251165501*REF(C,10)-0.16025641*REF(C,11) -0.076923077*REF(C,12); BBB:=C*29.88179001-36.11820999*REF(C,1)-2.61820999*REF(C,2)-2.284876657*REF(C,3) -2.034876657*REF(C,4)-1.834876657*REF(C,5)-1.66820999*REF(C,6)-1.525352848*REF(C,7) -1.400352848*REF(C,8)-1.289241736*REF(C,9)-1.189241736*REF(C,10)-1.098332646*REF(C,11) -1.014999312*REF(C,12)-0.938076235*REF(C,13)-0.866647664*REF(C,14)-0.799980997*REF(C,15) -0.737480997*REF(C,16)-0.678657468*REF(C,17)-0.623101912*REF(C,18)-0.570470333*REF(C,19) -0.520470333*REF(C,20)-0.472851286*REF(C,21)-0.42739674*REF(C,22)-0.383918479*REF(C,23) -0.342251813*REF(C,24)-0.302251813*REF(C,25)-0.263790274*REF(C,26)-0.226753237*REF(C,27) -0.191038951*REF(C,28)-0.156556193*REF(C,29)-0.12322286*REF(C,30)-0.090964795*REF(C,31) -0.059714795*REF(C,32)-0.029411765*REF(C,33); 高:=(3-BBB/AAA)*100; 上:=HHV(高,2); 收:=MA(高,3)-STD(高,3); 開:=MA(高,5)-STD(高,4); 低:=MA(高,5)-STD(高,4); MID1:= MA(收,N); DRAWGBK(上=高,COLORRGB(150,0,0),COLORRGB(100,50,0),1); DRAWGBK(上<>高,COLORRGB(0,150,0),COLORRGB(0,80,0),1); DRAWGBK(MID1>REF(MID1,1) AND 上<>高,COLORRGB(150,50,0),COLORRGB(0,150,0),1); DRAWGBK(MID1<REF(MID1,1) AND 上=高,COLORRGB(0,150,0),COLORRGB(150,0,0),1); DRAWTEXT(上=高 AND MID1>REF(MID1,1) AND ISLASTBAR=1,MID1,' ←變紅走強↑'),COLORYELLOW; DRAWTEXT(上<>高 AND MID1<REF(MID1,1) AND ISLASTBAR=1,MID1,' ←變綠走弱↓'),COLORCYAN; DRAWTEXT(MID1>REF(MID1,1) AND 上<>高 AND ISLASTBAR=1,MID1,' ←強勢調(diào)整↓'),COLORMAGENTA; DRAWTEXT(MID1<REF(MID1,1) AND 上=高 AND ISLASTBAR=1,MID1,' ←弱勢反彈↑'),COLORWHITE; UPPER: MID1 + M*STD(高,N),COLORBBBBFF,LINETHICK2; LOWER: MID1 - M*STD(低,N),COLORFFFF66,LINETHICK2; FILLRGN(C>0,UPPER,LOWER),COLOR333311; MID:MID1,COLORYELLOW; PARTLINE(MID1>=REF(MID1,1),MID1),COLORMAGENTA; 變盤:STICKLINE(收>=開,高,低,1,0),COLORFF00FF; STICKLINE(收>=開,高,低,0,0),COLORFFBBFF; STICKLINE(收>=開,收,開,8,0),COLORFF00FF; STICKLINE(收>=開,收,開,7,0),COLORFF22FF; STICKLINE(收>=開,收,開,6,0),COLORFF44FF; STICKLINE(收>=開,收,開,5,0),COLORFF66FF; STICKLINE(收>=開,收,開,4,0),COLORFF88FF; STICKLINE(收>=開,收,開,3,0),COLORFF99FF; STICKLINE(收>=開,收,開,2,0),COLORFFAAFF; STICKLINE(收>=開,收,開,1,0),COLORFFBBFF; 走弱:STICKLINE(收<開,高,低,1,0),COLOR008800; STICKLINE(收<開,高,低,0,0),COLOR00FF00; STICKLINE(收<開,收,開,8,0),COLOR008800; STICKLINE(收<開,收,開,7,0),COLOR009900; STICKLINE(收<開,收,開,6,0),COLOR00AA00; STICKLINE(收<開,收,開,5,0),COLOR00BB00; STICKLINE(收<開,收,開,4,0),COLOR00CC00; STICKLINE(收<開,收,開,3,0),COLOR00DD00; STICKLINE(收<開,收,開,2,0),COLOR00EE00; STICKLINE(收<開,收,開,1,0),COLOR00FF00; 走強:STICKLINE(上=高,高,低,1,0),COLOR0000FF; STICKLINE(上=高,高,低,0,0),COLOR00EEFF; STICKLINE(上=高,收,開,8,0),COLOR0000FF; STICKLINE(上=高,收,開,7,0),COLOR0022FF; STICKLINE(上=高,收,開,6,0),COLOR0044FF; STICKLINE(上=高,收,開,5,0),COLOR0066FF; STICKLINE(上=高,收,開,4,0),COLOR0088FF; STICKLINE(上=高,收,開,3,0),COLOR00AAFF; STICKLINE(上=高,收,開,2,0),COLOR00CCFF; STICKLINE(上=高,收,開,1,0),COLOR00EEFF; A1:=收>=開 AND 上<>高; ●紅珠走強:DRAWICON(上=高,開*0.999,10),COLORRED; ●黃珠變盤:DRAWICON(A1,開*0.999,12),COLORYELLOW; [ Last edited by 大慶老楊 on 2004-10-10 at 21:27 ]股票論壇 www.55188.com |
|