 |
perryliu1688
資深會員
註冊日期: Nov 2010
來 自:
文章數量: 129 |
[問題] 將其轉折點 標示 數字 並發出聲音
AMV0:=VOL*(O+C)/2;
博殺生命線:SUM(AMV0,88)/SUM(VOL,88),COLOR888888,LINETHICK1;
A0:=(L+H+C*2)/4;
A1:EMA(A0,18),COLORFF9900,LINETHICK5;
A2:EMA(A0,26);
A1X:=(A1-REF(A1,1))/REF(A1,1)*100;
A2X:=(A2-REF(A2,1))/REF(A2,1)*100;
{出擊:IF(A1X>=0 AND BARSLAST(CROSS(A1X,0))>0,REF((C+O)/2,
BARSLAST(CROSS(A1X,0))),BARSLAST(CROSS(A1X,0))),COLORred,LINETHICK10;
逃遁:IF(A1X<0 AND BARSLAST(CROSS(0,A1X))>0,REF((C+O)/2,
BARSLAST(CROSS(0,A1X))),0),COLORGREEN,LINETHICK10; }
鐵:IF(A1X>=0,A1,A1),COLORRED,LINETHICK2;
律:IF(A1X<0 AND A2X<0,A1,A1),COLORGREEN,LINETHICK4;
STICKLINE(CROSS(A1X,0),H,L,0.1,0 ),COLOR0033FF;
STICKLINE(CROSS(A1X,0),C,O,3,0 ),COLOR0000CC;
STICKLINE(CROSS(A1X,0),C,O,1,0 ),COLOR0033FF;
STICKLINE(CROSS(0,A1X),L,H,0.1,0 ),COLOR66FF00;
STICKLINE(CROSS(0,A1X),C,O,3,0),COLOR00CC00;
STICKLINE(CROSS(0,A1X),C,O,1,0),COLOR66FF00;
aa:A1;
if(aa>=ref(aa,1),aa,0),LINETHICK3,COLORyellow,circledot;
if(aa<ref(aa,1),aa,0),LINETHICK3,COLORred,circledot;
STICKLINE(C>aa,L,H,0.1,1),COLORRED;
STICKLINE(C>aa,C,O,4,1),COLORRED;
STICKLINE(C>aa,C,O,4,1),COLORRED;
STICKLINE(C<aa,C,O,4,1),COLORFFFF00;
STICKLINE(C<aa,C,O,4,1),COLOR00FF00;
STICKLINE(C<aa,L,H,0.1,1),COLOR00FF00
如何改寫
aa 將其轉折點 標示 數字 並發出聲音
|
|
向版主報告此篇 |  |
|
2011-05-02 11:04 |
|
|
|  |
 |
cgjj
總版主

註冊日期: Oct 2003
來 自:
文章數量: 18095 |
回覆: [問題] 將其轉折點 標示 數字 並發出聲音
引用: 最初由 perryliu1688 發表
AMV0:=VOL*(O+C)/2;
博殺生命線:SUM(AMV0,88)/SUM(VOL,88),COLOR888888,LINETHICK1;
A0:=(L+H+C*2)/4;
A1:EMA(A0,18),COLORFF9900,LINETHICK5;
A2:EMA(A0,26);
A1X:=(A1-REF(A1,1))/REF(A1,1)*100;
A2X:=(A2-REF(A2,1))/REF(A2,1)*100;
{出擊:IF(A1X>=0 AND BARSLAST(CROSS(A1X,0))>0,REF((C+O)/2,
BARSLAST(CROSS(A1X,0))),BARSLAST(CROSS(A1X,0))),COLORred,LINETHICK10;
逃遁:IF(A1X<0 AND BARSLAST(CROSS(0,A1X))>0,REF((C+O)/2,
BARSLAST(CROSS(0,A1X))),0),COLORGREEN,LINETHICK10; }
鐵:IF(A1X>=0,A1,A1),COLORRED,LINETHICK2;
律:IF(A1X<0 AND A2X<0,A1,A1),COLORGREEN,LINETHICK4;
STICKLINE(CROSS(A1X,0),H,L,0.1,0 ),COLOR0033FF;
STICKLINE(CROSS(A1X,0),C,O,3,0 ),COLOR0000CC;
STICKLINE(CROSS(A1X,0),C,O,1,0 ),COLOR0033FF;
STICKLINE(CROSS(0,A1X),L,H,0.1,0 ),COLOR66FF00;
STICKLINE(CROSS(0,A1X),C,O,3,0),COLOR00CC00;
STICKLINE(CROSS(0,A1X),C,O,1,0),COLOR66FF00;
aa:A1;
if(aa>=ref(aa,1),aa,0),LINETHICK3,COLORyellow,circledot;
if(aa<ref(aa,1),aa,0),LINETHICK3,COLORred,circledot;
STICKLINE(C>aa,L,H,0.1,1),COLORRED;
STICKLINE(C>aa,C,O,4,1),COLORRED;
STICKLINE(C>aa,C,O,4,1),COLORRED;
STICKLINE(C<aa,C,O,4,1),COLORFFFF00;
STICKLINE(C<aa,C,O,4,1),COLOR00FF00;
STICKLINE(C<aa,L,H,0.1,1),COLOR00FF00
如何改寫
aa 將其轉折點 標示 數字 並發出聲音
以下這個給您當範例
把它看懂, 以它做為參考, 去改您要的
MM:=c;
CK:=MM>=ref(MM,1);
CK:=CK<>ref(CK,1);
DRAWNUMBER(CK,MM,MM,2);
PLAYSOUND(CK,0,GetAppMainDir+'\Effwav\eff01.wav');
|
|
向版主報告此篇 |  |
|
2011-05-02 22:25 |
|
|
|  |
 |
perryliu1688
資深會員
註冊日期: Nov 2010
來 自:
文章數量: 129 |
回覆: 回覆: [問題] 將其轉折點 標示 數字 並發出聲音
引用: 最初由 cgjj 發表
以下這個給您當範例
把它看懂, 以它做為參考, 去改您要的
MM:=c;
CK:=MM>=ref(MM,1);
CK:=CK<>ref(CK,1);
DRAWNUMBER(CK,MM,MM,2);
PLAYSOUND(CK,0,GetAppMainDir+'\Effwav\eff01.wav');
請問如在以下產生符號地方
同時產生警示聲
多空1:=EMA(HIGH,5),COLORMAGENTA,LINETHICK0;
多空2:=EMA(LOW,5),COLORMAGENTA,LINETHICK0;
B1:=IF(CROSS(CLOSE,多空1),1,IF(CROSS(多空2,CLOSE),-1,0));
B2:=REF(B1,BARSLAST(B1));
多空:IF(B2=1,多空2,IF(B2=-1,多空1,0));
IF(多空>0,多空,1),COLORyellow,LINETHICK2;
PARTLINE(B2=1 AND REF(B2,1)=1,多空2),LINETHICK2,Colorff12FF;
PARTLINE(B2=-1 AND REF(B2,1)=-1,多空1),LINETHICK2,ColorGREEN;
DRAWICON(CROSS(B2=1,B2=-1),多空,10),PXDN7;//PXUP17
DRAWICON(CROSS(B2=-1,B2=1),多空,12),PXUP17;//PXDN7
|
|
向版主報告此篇 |  |
|
2011-05-13 07:13 |
|
|
|  |
 |
cgjj
總版主

註冊日期: Oct 2003
來 自:
文章數量: 18095 |
回覆: 回覆: 回覆: [問題] 將其轉折點 標示 數字 並發出聲音
引用: 最初由 perryliu1688 發表
請問如在以下產生符號地方
同時產生警示聲
多空1:=EMA(HIGH,5),COLORMAGENTA,LINETHICK0;
多空2:=EMA(LOW,5),COLORMAGENTA,LINETHICK0;
B1:=IF(CROSS(CLOSE,多空1),1,IF(CROSS(多空2,CLOSE),-1,0));
B2:=REF(B1,BARSLAST(B1));
多空:IF(B2=1,多空2,IF(B2=-1,多空1,0));
IF(多空>0,多空,1),COLORyellow,LINETHICK2;
PARTLINE(B2=1 AND REF(B2,1)=1,多空2),LINETHICK2,Colorff12FF;
PARTLINE(B2=-1 AND REF(B2,1)=-1,多空1),LINETHICK2,ColorGREEN;
DRAWICON(CROSS(B2=1,B2=-1),多空,10),PXDN7;//PXUP17
DRAWICON(CROSS(B2=-1,B2=1),多空,12),PXUP17;//PXDN7
產生符號地方, 就是條件成立的地方
發聲依據條件是否成立, 就可達到您的需求
前面的範例要努力去看唷 
|
|
向版主報告此篇 |  |
|
2011-05-13 08:55 |
|
|
|  |
 |
liuchinlang
中級會員
註冊日期: Sep 2010
來 自:
文章數量: 42 |
回覆: 回覆: 回覆: 回覆: [問題] 將其轉折點 標示 數字 並發出聲音
引用: 最初由 cgjj 發表
產生符號地方, 就是條件成立的地方
發聲依據條件是否成立, 就可達到您的需求
前面的範例要努力去看唷
請問版大
我是初學者
在程式碼下
加入以下程式碼
是否算合格的寫法
還是有比較省略的寫法
拿此當範例的人請教
BB1:=aa>=ref(aa,1) AND ref(aa,1)<ref(aa,2);
SS1:=aa<ref(aa,1) AND ref(aa,1)>=ref(aa,2);
BB:=REF(BB1,1);
SS:=REF(SS1,1);
DRAWNUMBER(BB,L-20,O,2);
DRAWNUMBER(SS,H+20,O,2);
PLAYSOUND(BB,0,'audio01.wav');
PLAYSOUND(SS,0,'audio02.wav');
|
|
向版主報告此篇 |  |
|
2011-05-14 16:46 |
|
|
|  |
 |
cgjj
總版主

註冊日期: Oct 2003
來 自:
文章數量: 18095 |
回覆: 回覆: 回覆: 回覆: 回覆: [問題] 將其轉折點 標示 數字 並發出聲音
引用: 最初由 liuchinlang 發表
請問版大
我是初學者
在程式碼下
加入以下程式碼
是否算合格的寫法
還是有比較省略的寫法
拿此當範例的人請教
BB1:=aa>=ref(aa,1) AND ref(aa,1)<ref(aa,2);
SS1:=aa<ref(aa,1) AND ref(aa,1)>=ref(aa,2);
BB:=REF(BB1,1);
SS:=REF(SS1,1);
DRAWNUMBER(BB,L-20,O,2);
DRAWNUMBER(SS,H+20,O,2);
PLAYSOUND(BB,0,'audio01.wav');
PLAYSOUND(SS,0,'audio02.wav');
這樣很ok唷
一般來說不會用 L-20, H+20 這方法為文字偏位
(以價位偏移, 很難適用於不同商品)
改用 PXDN 或PXUP 會比較通用(以螢幕點數偏移)
DRAWNUMBER(BB,L,O,2) pxdn15;
DRAWNUMBER(SS,H,O,2) pxup35;
|
|
向版主報告此篇 |  |
|
2011-05-16 09:55 |
|
|
|  |
本站所有內容未經作者授權禁止轉貼節錄, 發表言論僅供參考勿作為投資決策依據。瀏覽本站請使用 IE 5.5 以上版本, 最佳瀏覽解析度 1024 x 768 全彩。
|
Powered by: vBulletin Version 2.3.0 - Copyright©2000-, Jelsoft Enterprises Limited.
簡愛洋行 製作 Copyright 2003-. All Rights Reserved. 聯絡我們
|