Hunta |
門派 管理員
職務 總版主
級別 法老
聲望 ＋100000
財富 100002
積分 101915
經驗 642850
文章 1733
註冊 09-04-10 17:15
|
|
 |
 發表: 2009-10-12 10:41:47   | 第2樓 |
程式碼如下:
10 Va = 15分_均價( 6 )
20 Vb = 15分_均價( 12 )
30 Vc = 前1K線_Va
40 Vd = 前1K線_Vb
50 直線[ ( 0 , Va ) - (-1 , Vc ) , 主畫面 , 寬度: 1 , 樣式: 0 , 顏色: 65535 ]
60 直線[ ( 0 , Vb ) - (-1 , Vd ) , 主畫面 , 寬度: 1 , 樣式: 0 , 顏色: 16776960 ]
70 顯示橫排資訊[ 主畫面 , #0 , 名稱: 短線MA6 , X軸: 2000 , Va , 顏色: 65535 ]
80 顯示橫排資訊[ 主畫面 , #1 , 名稱: 短線MA12 , X軸: 4000 , Vb , 顏色: 16776960 ]
90 If 15分_均線交叉( 6 , 12 ) = 是 Then
100 If 交叉類型 = 1 Then
110 Show [ K線下方 , ↑ ]
120 Else
130 Show [ K線上方 , ↓ ]
140 End If
150 If 最後K線 = 是 And 單K計數器( 目前K線 , 0 ) = 0 Then
160 播放聲音( ALARM.WAV )
170 單K計數器( 目前K線 , 0 ) = 1
180 End If
190 End If
200
210 Ve = 300分_均價( 5 )
220 Vf = 300分_均價( 10 )
230 Vg = 前1K線_Ve
240 Vh = 前1K線_Vf
250 直線[ ( 0 , Ve ) - (-1 , Vg ) , 主畫面 , 寬度: 1 , 樣式: 0 , 顏色: 16777215 ]
260 直線[ ( 0 , Vf ) - (-1 , Vh ) , 主畫面 , 寬度: 1 , 樣式: 0 , 顏色: 65280 ]
270 顯示橫排資訊[ 主畫面 , #2 , 名稱: 長線MA5 , X軸: 6000 , Ve , 顏色: 16777215 ]
280 顯示橫排資訊[ 主畫面 , #3 , 名稱: 長線MA10 , X軸: 8000 , Vf , 顏色: 65280 ]
290 If 300分_均線交叉( 5 , 10 ) = 是 Then
300 If 交叉類型 = 1 Then
310 Show [ K線下方 , ▲ ]
320 Else
330 Show [ K線上方 , ▼ ]
340 End If
350 If 最後K線 = 是 And 單K計數器( 目前K線 , 1 ) = 0 Then
360 播放聲音( WAV505.WAV )
370 單K計數器( 目前K線 , 1 ) = 1
380 End If
390 End If
下載程式碼 [URL=http://www.huntasoft.com/hsp/0082.rda]http://www.huntasoft.com/hsp/0082.rda[/URL]
執行結果如下:
[IMGA=0,absMiddle]http://www.huntasoft.com/hsp/pic/1012-1.jpg[/IMGA]
※圖中黃色均線為15分MA6，藍色均線為15分MA12，白色均線為日線MA5，綠色均線為日線MA10。
|
|
|
發表: 2009-10-12 09:40:39 人氣:45358