編程思路破譯A1賦值:1日前的開盤價 A2賦值:(1日前的收盤價-A1)/A1的絕對值 A3賦值:(1日前的最高價-A1)/A1的絕對值 A4賦值:(1日前的最低價-A1)/A1的絕對值 B1賦值:(A2+A3+A4)/3的絕對值 B2賦值:開盤價*B1 今日最高賦值:開盤價+B2 輸出預(yù)測低一:開盤價-B2,線寬為0 開盤價1賦值:開盤價 開盤價2賦值:1日前的開盤價 最高價1賦值:最高價 最高價2賦值:1日前的最高價 最低價1賦值:最低價 最低價2賦值:1日前的最低價 收盤價1賦值:收盤價 收盤價2賦值:1日前的收盤價 AA賦值:最高價2 BB賦值:最低價2 CC賦值:開盤價2 DD賦值:收盤價2 EE賦值:(AA+BB+CC+2*DD)/5 AAA賦值:EE+(AA-BB) BBB賦值:2*EE-BB CCC賦值:2*EE-AA DDD賦值:EE-(AA-BB) 上升突破價賦值:AAA 上升阻力價賦值:BBB 下跌支撐價賦值:CCC 下跌反轉(zhuǎn)價賦值:DDD EEE賦值:(EE+上升突破價+上升阻力價+下跌支撐價+下跌反轉(zhuǎn)價)/5 心理價賦值:EEE FFF賦值:(EEE+開盤價1)/2 GGG賦值:(預(yù)測低一+FFF)/2 輸出預(yù)測低二:GGG,COLORFFFFFF,線寬為0 高賦值:今日最高 收賦值:FFF DRAWTEXTABS(15,15,'★ '),畫紅色 輸出輸出DRAWTEXTABS(15,30,'預(yù):預(yù)測一: '+NUMTOSTRN(預(yù)測低一,2)+'元'),COLORFFFFFF,線寬為2 輸出輸出DRAWTEXTABS(15,50,'測:最低價: '+NUMTOSTRN(最低價,2)+'元'),畫黃色,線寬為2 輸出輸出DRAWTEXTABS(15,70,'最:預(yù)測二: '+NUMTOSTRN(預(yù)測低二,2)+'元'),COLORFFFFFF,線寬為2 輸出輸出DRAWTEXTABS(15,90,'低:最高價: '+NUMTOSTRN(最高價,2)+'元'),COLOR00FFFF,線寬為2 輸出輸出DRAWTEXTABS(15,110,'價:收盤價: '+NUMTOSTRN(收盤價,2)+'元'),COLOR00FFFF,線寬為2 DRAWTEXTABS(15,125,'★ '),畫紅色 程序源碼 A1:=REF(O,1); A2:=ABS((REF(C,1)-A1)/A1); A3:=ABS((REF(H,1)-A1)/A1); A4:=ABS((REF(L,1)-A1)/A1); B1:=ABS((A2+A3+A4)/3); B2:=O*B1; 今日最高:=O+B2; 預(yù)測低一:O-B2,LINETHICK0; {預(yù)測當(dāng)天收盤價公式} 開盤價1:=OPEN; 開盤價2:=REF(OPEN,1); 最高價1:=HIGH; 最高價2:=REF(HIGH,1); 最低價1:=LOW; 最低價2:=REF(LOW,1); 收盤價1:=CLOSE; 收盤價2:=REF(CLOSE,1); AA:=最高價2; BB:=最低價2; CC:=開盤價2; DD:=收盤價2; EE:=(AA+BB+CC+2*DD)/5; AAA:=EE+(AA-BB); BBB:=2*EE-BB; CCC:=2*EE-AA; DDD:=EE-(AA-BB); 上升突破價:=AAA; 上升阻力價:=BBB; 下跌支撐價:=CCC; 下跌反轉(zhuǎn)價:=DDD; EEE:=(EE+上升突破價+上升阻力價+下跌支撐價+下跌反轉(zhuǎn)價)/5; 心理價:=EEE; FFF:=(EEE+開盤價1)/2; GGG:=(預(yù)測低一+FFF)/2; 預(yù)測低二:GGG,COLORFFFFFF,LINETHICK0; 高:=今日最高; 收:=FFF; DRAWTEXTABS(15,15,'★ =================='),COLORRED; DRAWTEXTABS(15,30,'預(yù):預(yù)測一: '+NUMTOSTRN(預(yù)測低一,2)+'元'),COLORFFFFFF,LINETHICK2; DRAWTEXTABS(15,50,'測:最低價: '+NUMTOSTRN(LOW,2)+'元'),COLORYELLOW,LINETHICK2; DRAWTEXTABS(15,70,'最:預(yù)測二: '+NUMTOSTRN(預(yù)測低二,2)+'元'),COLORFFFFFF,LINETHICK2; DRAWTEXTABS(15,90,'低:最高價: '+NUMTOSTRN(HIGH,2)+'元'),COLOR00FFFF,LINETHICK2; DRAWTEXTABS(15,110,'價:收盤價: '+NUMTOSTRN(CLOSE,2)+'元'),COLOR00FFFF,LINETHICK2; DRAWTEXTABS(15,125,'★ =================='),COLORRED; |
|
|
