奇狐社區論壇
在這個頁面顯示本主題全部的 9 個文章

奇狐社區論壇 (http://www.chiefox.com.tw/bbs/index.php)
- 問題交流 (http://www.chiefox.com.tw/bbs/forumdisplay.php?forumid=28)
-- [問題] 將其轉折點 標示 數字 並發出聲音 (http://www.chiefox.com.tw/bbs/showthread.php?threadid=15445)

由 perryliu1688 在 2011-05-02 11:04 發表:

[問題] 將其轉折點 標示 數字 並發出聲音

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 將其轉折點 標示 數字 並發出聲音

由 cgjj 在 2011-05-02 22:25 發表:

回覆: [問題] 將其轉折點 標示 數字 並發出聲音

引用:
最初由 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');

由 perryliu1688 在 2011-05-13 07:13 發表:

回覆: 回覆: [問題] 將其轉折點 標示 數字 並發出聲音

引用:
最初由 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

由 cgjj 在 2011-05-13 08:55 發表:

回覆: 回覆: 回覆: [問題] 將其轉折點 標示 數字 並發出聲音

引用:
最初由 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


產生符號地方, 就是條件成立的地方
發聲依據條件是否成立, 就可達到您的需求
前面的範例要努力去看唷

由 perryliu1688 在 2011-05-13 17:42 發表:

回覆: 回覆: 回覆: 回覆: [問題] 將其轉折點 標示 數字 並發出聲音

引用:
最初由 cgjj 發表
產生符號地方, 就是條件成立的地方
發聲依據條件是否成立, 就可達到您的需求
前面的範例要努力去看唷


因為經過努力但改寫不成功
所以求救於您

不知為何一職顯示符號有誤

由 liuchinlang 在 2011-05-14 16:46 發表:

回覆: 回覆: 回覆: 回覆: [問題] 將其轉折點 標示 數字 並發出聲音

引用:
最初由 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');

由 cgjj 在 2011-05-16 09:55 發表:

回覆: 回覆: 回覆: 回覆: 回覆: [問題] 將其轉折點 標示 數字 並發出聲音

引用:
最初由 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;

由 liuchinlang 在 2011-05-16 15:16 發表:

回覆: 回覆: 回覆: 回覆: 回覆: 回覆: [問題] 將其轉折點 標示 數字 並發出聲音

引用:
最初由 cgjj 發表
這樣很ok唷

一般來說不會用 L-20, H+20 這方法為文字偏位
(以價位偏移, 很難適用於不同商品)

改用 PXDN 或PXUP 會比較通用(以螢幕點數偏移)
DRAWNUMBER(BB,L,O,2) pxdn15;
DRAWNUMBER(SS,H,O,2) pxup35;


謝謝版大的指導
又學一樣了

由 liuchinlang 在 2011-05-16 15:28 發表:

回覆: 回覆: 回覆: 回覆: 回覆: 回覆: [問題] 將其轉折點 標示 數字 並發出聲音

引用:
最初由 cgjj 發表
這樣很ok唷

一般來說不會用 L-20, H+20 這方法為文字偏位
(以價位偏移, 很難適用於不同商品)

改用 PXDN 或PXUP 會比較通用(以螢幕點數偏移)
DRAWNUMBER(BB,L,O,2) pxdn15;
DRAWNUMBER(SS,H,O,2) pxup35;



測試結果
效果好得很
謝謝版大的教導
全部時間均為台灣時間, 現在時間為09:37
在這個頁面顯示本主題全部的 9 個文章


Powered by: vBulletin Version 2.3.0 - Copyright©2000-, Jelsoft Enterprises Limited.
簡愛洋行 製作 Copyright 2003-. All Rights Reserved.