Hunta |
門派 管理員 職務 總版主 級別 法老 聲望 +100000 財富 100002 積分 101915 經驗 642850 文章 1733 註冊 09-04-10 17:15
|
|
|
發表: 2009-10-07 09:11:21 | 第14樓 |
程式碼如下: 10 Vc = 1分_收盤價 20 Vo = 前1_1分_均價( 2 ) 30 Vt = ( 前1K線_Vc + 前1K線_Vo ) / 2 40 Vu = ( Vc + Vo ) / 2 50 Vt = Round( Vt , 0 ) 60 Vu = Round( Vu , 0 ) 70 Vc = ( Vo - 前1K線_Vo ) * 0.618 + 前1K線_Vo 80 Vb = 前1K線_Vc 90 If 1分_收盤價 >= Vc Then 100 K線顏色( 棒身 255 , 影線 16777215 ) 110 直線[ ( 0 , Vc ) - (-1 , Vb ) , 主畫面 , 寬度: 1 , 樣式: 0 , 顏色: 255 ] 120 Else 130 K線顏色( 棒身 16777215 , 影線 16777215 ) 140 直線[ ( 0 , Vc ) - (-1 , Vb ) , 主畫面 , 寬度: 1 , 樣式: 0 , 顏色: 65280 ] 150 End If 160 170 Ve = ( 1分_開盤價 + 1分_最高價 + 1分_最低價 + 1分_收盤價 ) / 4 180 顯示橫排資訊[ 主畫面 , #0 , 名稱: 今日轉折價 , X軸: 6000 , Vt , 顏色: 16777215 ] 190 顯示橫排資訊[ 主畫面 , #1 , 名稱: 明日轉折價 , X軸: 9000 , Vu , 顏色: 16777215 ] 200 顯示資訊[ 今日轉折價 , 序號: 1 , 大小: 009 , 文字色: 0 , 背景色: 16777215 , 置中 , 字型: 新細明體 ] 210 顯示資訊[ Vt , 序號: 2 , 大小: 009 , 文字色: 255 , 背景色: 16777215 , 置中 , 字型: 新細明體 ] 220 顯示資訊[ 明日轉折價 , 序號: 4 , 大小: 009 , 文字色: 0 , 背景色: 16777215 , 置中 , 字型: 新細明體 ] 230 顯示資訊[ Vu , 序號: 5 , 大小: 009 , 文字色: 8388736 , 背景色: 16777215 , 置中 , 字型: 新細明體 ] 240 顯示資訊[ 均價 , 序號: 7 , 大小: 009 , 文字色: 0 , 背景色: 16777215 , 置中 , 字型: 新細明體 ] 250 顯示資訊[ Ve , 序號: 8 , 大小: 009 , 文字色: 16711808 , 背景色: 16777215 , 置中 , 字型: 新細明體 ]
下載程式碼 [URL=http://www.huntasoft.com/hsp/0081.rda]http://www.huntasoft.com/hsp/0081.rda[/URL]
執行畫面如下:
[IMGA=0,absMiddle]http://www.huntasoft.com/hsp/pic/1007-1.jpg[/IMGA]
[B][COLOR=#d60808]※請更新HSP v5.0b版方可正常執行本範例。[/COLOR][/B] |
|
|