1. 
   
2. 
   
3. 
   
4. 
   
5. 
   
6. 
   
7. 
   
8. Ac:=(H+L+C+O)/4;   
9. ao:=c*0;   
10. fo:=o;   
11. ao[1]:=fo[1];   
12. for i=2 to datacount do ao[i]:=(ao[i-1]+ac[i-1])/2;   
13. AH:=max(H,Max(Ao,Ac));   
14. AL:=min(L,min(Ao,Ac));   
15.   
16. dd:=(ma(ao,2)+ma(ao,4))/2,linethick2;   
17. 2*dd-1*ao,colormagenta;   
18. ma(ao,2),color00bb00;   
19.   
20. STICKLINE(AC>=AO,AH,AC,1,0),color225588;   
21. STICKLINE(AC>=AO,AH,AC,0,0),color66ccff;   
22. STICKLINE(AC>=AO,AO,AL,1,0),color225588;   
23. STICKLINE(AC>=AO,AO,AL,0,0),color66ccff;   
24.   
25. STICKLINE(AC>AO,AC,AO,8,0),COLOR225588;   
26. STICKLINE(AC>AO,AC,AO,7,0),COLOR226699;    
27. STICKLINE(AC>AO,AC,AO,6,0),COLOR3377aa;   
28. STICKLINE(AC>AO,AC,AO,5,0),COLOR3388bb;   
29. STICKLINE(AC>AO,AC,AO,4,0),COLOR4499cc;   
30. STICKLINE(AC>AO,AC,AO,3,0),COLOR44aadd;   
31. STICKLINE(AC>AO,AC,AO,2,0),COLOR55bbee;   
32. STICKLINE(AC>AO,AC,AO,1,0),COLOR66ccff;   
33.   
34. STICKLINE(AC<=AO,AH,AC,1,0),color888800;   
35. STICKLINE(AC<=AO,AH,AC,0,0),colorffff00;   
36. STICKLINE(AC<=AO,AO,AL,1,0),color888800;   
37. STICKLINE(AC<=AO,AO,AL,0,0),colorffff00;   
38.   
39. STICKLINE(AC<=AO,AC,AO,8,0),COLOR888800;   
40. STICKLINE(AC<=AO,AC,AO,7,0),COLOR999900;    
41. STICKLINE(AC<=AO,AC,AO,6,0),COLORaaaa00;   
42. STICKLINE(AC<=AO,AC,AO,5,0),COLORbbbb00;   
43. STICKLINE(AC<=AO,AC,AO,4,0),COLORcccc00;   
44. STICKLINE(AC<=AO,AC,AO,3,0),COLORdddd00;   
45. STICKLINE(AC<=AO,AC,AO,2,0),COLOReeee00;   
46. STICKLINE(AC<=AO,AC,AO,1,0),COLORffff00;　

請注釋下代碼

平均K線的計算公式

開盤價 = (前一根平均k線的開盤價+前一根平均k線的收盤價)/2

最高價=傳統k線的最高價

最低價=傳統k線的最低價

收盤價=傳統k線的(開+高+低+收)/4