到奇狐勝券首頁 奇狐社區論壇 購買奇狐勝券 試用奇狐勝券
 
論壇首頁 你可以在這裡編輯你的資料，查看短訊，訂閱主題和論壇參數等等 免費會員註冊 會員列表 論壇幫助 論壇日曆 論壇搜索 加入我的最愛 登出論壇  
奇狐社區論壇 : Powered by vBulletin version 2.3.0 奇狐社區論壇 > 指標公式 > 問題交流 > {跟蹤庄家
  上一主題   下一主題
作者
主題 發表新主題    回覆主題
21769136
初級會員

註冊日期: Jan 2006
來　　自:
文章數量: 19
{跟蹤庄家

{跟蹤庄家}
DRAWGBK(1, COLORRGB(60,60,60),COLORRGB(50,50,50),1);

{-------------------☆功能--------------------}
{基礎---張三丰与泡哥的混合思路}
VAR1:=EMA((WINNER(C*1.1)-WINNER(C*0.9))*80,1);
Zx1:=EMA(WINNER(C)*70,1);//主力籌碼:
Zx2:=(MA(Zx1,90)+MA(Zx1,120)+MA(Zx1,180)+MA(Zx1,250))/4;//主力籌碼長期均量（有了時間了）
Zx3:=EMA(Zx1,21);//主力籌碼月均量（哈哈，有了時間了）
Zx4:=VAR1-Zx1;//散籌控值
{信號}
ZW1:=EMA(WINNER(C)*70,3);//主力籌碼估算
ZW2:=EMA((WINNER(C*1.1)-WINNER(C*0.9))*80,3);//散戶籌碼估算
主力:ZW1,PRECISION2,LINETHICK,COLORRED;//主力籌碼-----主
警戒:Zx2,LINETHICK,PRECISION2,COLORYELLOW;//主力長期均量---副1
主均:EMA(Zx1,21),LINETHICK,PRECISION2,Color1D6C1B;//主力月均量---副2
散籌:(VAR1-Zx1),LINETHICK,PRECISION2,COLORWHITE;//散籌控值---副3
{黑洞}
ZZLKP:=ZW1/(ZW1+ZW2)*100;//主力控籌碼比率
ZSHTL:=ZW2/(ZW1+ZW2)*100;//散戶套牢籌碼比率
黑洞:=BARSLAST(REF(ZSHTL,1)>90 AND ZSHTL<90);
主力控盤:=ROUND(ZZLKP);//系數
{庄家行蹤}
{XL}
XL1:=C;
XL2:=EMA(H,7);
XL3:=EMA(L,3);
FOR I=8 TO DATACOUNT DO BEGIN
IF XL1[I]>XL2[I-1] THEN B[I]:=1 ELSE
IF XL1[I]<XL3[I-1] THEN B[I]:=-1 ELSE
B[I]:=B[I-1];
END;
XL4:=IF(B=-1,MA(H,7),MA(L,3));//顯示線
XL5:=EMA(SLOPE(C,21)*20+C,55);//分界
ZJ1:=EMA(EMA(C,13),13);
ZJ2:=100*WINNER(C*0.95);
控盤:=(ZJ1-REF(ZJ1,1))/REF(ZJ1,1)*100;
無庄控盤:= 控盤<0;
有庄控盤:= 控盤>REF(控盤,1) AND 控盤>0;
高度控盤:= ZJ2>50 AND COST(85)<C AND 控盤>0;
主力出貨:= 控盤<REF(控盤,1) AND 控盤>0;
极弱股:=IF(控盤<0&&控盤<0&&C<XL4,控盤,0);
弱勢股:=IF(控盤<0&&控盤>ref(控盤,1),控?,0);
轉型股:=IF(C>XL4&&C<XL5,控盤,0);
強勢股:=IF(控盤>0&&C>XL4&&C>XL5,控盤,0);
{資金}
QJ1:=SUM(V*C,1)/SUM(V,1);
QJ2:=EMA(QJ1,13);
資金:FORCAST((QJ1-QJ2)*100/QJ1,5),LINETHICK,PRECISION2,Color0098FF;

{-----------------【圖解模板】---------------------}
{柱線}
STICKLINE(控盤<0,控盤*2.6,0,4,1),color888000;//無庄
STICKLINE(控盤>REF(控盤*0.8,1) AND 控盤>0,控盤*2.8,0,4,1),colorred;//有庄
STICKLINE(ZJ2>50 AND COST(85)<CLOSE AND 控盤>0,控盤*2,0,4,1),colorff00ff;//高控
STICKLINE(控盤<REF(控盤,1) AND 控盤>0,控盤*2,0,4,1),color00ff00;//出貨
{分級}
STICKLINE(极弱股<0,极弱股*3,0,0,0),ColorFF7850;
STICKLINE(弱勢股<0,弱勢股*2.8,0,0,0),ColorFFE76A;
STICKLINE(轉型股<0,轉型股*2,0,0,0),Color21BEE5;
STICKLINE(控盤>ref(控盤,1)&&控盤<0,控盤*2,0,0,0),Color21BEE5;
STICKLINE(強勢股>0,控盤*3,0,0,0),ColorBC57FF;
{寫字}
DRAWTEXT(BARPOS=SYSPARAM(2),0,'無庄控:'+NUMTOSTR(?庄控?[SYSPARAM(1)],0)),align4,color888000;
DRAWTEXT(BARPOS=SYSPARAM(2),0,' 有庄控:'+NUMTOSTR(有庄控盤[SYSPARAM(1)],0)),align4,colorred;
DRAWTEXT(BARPOS=SYSPARAM(2),0,' 高度控:'+NUMTOSTR(高度控盤[SYSPARAM(1)],0)),align4,colorff00ff;
DRAWTEXT(BARPOS=SYSPARAM(2),0,' 主力出:'+NUMTOSTR(主力出貨[SYSPARAM(1)],0)),align4,color00ff00;
{信號}
DRAWICON(CROSS(控盤,0) and 資金>ref(資金,1),-1.6,4),ALIGN;//信號
DRAWICON(CROSS(主力,散籌),散籌/10-2,8),PXDN6;//信號
{資金}
PARTLINE(C,資金*0.2),Color0098FF;
{信號}
PARTLINE(C,主力/10-2),COLORRED;//主力籌碼-----主
PARTLINE(C,警戒/10-2),COLORYELLOW;//主力長期均量---副1
PARTLINE(C,主均/10-2),LINETHICK2,Color1D6C1B;//主力月均量---副2
PARTLINE(C,散?/10-2),COLORWHITE;//散籌控值---副3
{標字}
DRAWTEXT(BARPOS=SYSPARAM(2),0,'黑洞距今:'+NUMTOSTR(黑洞[SYSPARAM(1)],0)+'天'),align5,ColorFFC5FF;
DRAWTEXT(FILTER(REF(ZSHTL,1)>90 AND ZSHTL<90,5),-0.26,'↑\n 黑洞'),ALIGN2,ColorFFC5FF;
DRAWTEXT(BARPOS=SYSPARAM(2),0,' 控盤系數：'+NUMTOSTR(主力控?[SYSPARAM(1)],0)),align5,COLORRED;

//

ZZLKP:=ZW1/(ZW1+ZW2)*100;//主力控籌碼比率?此處出現未標示
定義,請問如何修正?

向版主報告此篇 | 查IP位址
Old Post 2007-09-10 16:10
21769136 現在離線 點選這裡查看 21769136 的個人資料 點選這裡給 21769136 傳送一條短訊 查找更多關於 21769136 的文章 增加 21769136 至你的好友列表 編輯/刪除訊息 引用回覆
ifuian
資深會員

註冊日期: May 2004
來　　自: 台灣
文章數量: 558

{跟蹤庄家}
DRAWGBK(1, COLORRGB(60,60,60),COLORRGB(50,50,50),1);

{-------------------☆功能--------------------}
{基礎---張三丰与泡哥的混合思路}
VAR1:=EMA((WINNER(C*1.1)-WINNER(C*0.9))*80,1);
Zx1:=EMA(WINNER(C)*70,1);//主力籌碼:
Zx2:=(MA(Zx1,90)+MA(Zx1,120)+MA(Zx1,180)+MA(Zx1,250))/4;//主力籌碼長期均量（有了時間了）
Zx3:=EMA(Zx1,21);//主力籌碼月均量（哈哈，有了時間了）
Zx4:=VAR1-Zx1;//散籌控值
{信號}
ZW1:=EMA(WINNER(C)*70,3);//主力籌碼估算
ZW2:=EMA((WINNER(C*1.1)-WINNER(C*0.9))*80,3);//散戶籌碼估算
主力:ZW1,PRECISION2,LINETHICK,COLORRED;//主力籌碼-----主
警戒:Zx2,LINETHICK,PRECISION2,COLORYELLOW;//主力長期均量---副1
主均:EMA(Zx1,21),LINETHICK,PRECISION2,Color1D6C1B;//主力月均量---副2
散籌:(VAR1-Zx1),LINETHICK,PRECISION2,COLORWHITE;//散籌控值---副3
//黑洞
ZZLKP:=ZW1/(ZW1+ZW2)*100;//主力控籌碼比率
ZSHTL:=ZW2/(ZW1+ZW2)*100;//散戶套牢籌碼比率
黑洞:=BARSLAST(REF(ZSHTL,1)>90 AND ZSHTL<90);
主力控盤:=ROUND(ZZLKP);//系數
{庄家行蹤}
{XL}
XL1:=C;
XL2:=EMA(H,7);
XL3:=EMA(L,3);
FOR I=8 TO DATACOUNT DO BEGIN
IF XL1[I]>XL2[I-1] THEN B[I]:=1 ELSE
IF XL1[I]<XL3[I-1] THEN B[I]:=-1 ELSE
B[I]:=B[I-1];
END;
XL4:=IF(B=-1,MA(H,7),MA(L,3));//顯示線
XL5:=EMA(SLOPE(C,21)*20+C,55);//分界
ZJ1:=EMA(EMA(C,13),13);
ZJ2:=100*WINNER(C*0.95);
控盤:=(ZJ1-REF(ZJ1,1))/REF(ZJ1,1)*100;
無庄控盤:= 控盤<0;
有庄控盤:= 控盤>REF(控盤,1) AND 控盤>0;
高度控盤:= ZJ2>50 AND COST(85)<C AND 控盤>0;
主力出貨:= 控盤<REF(控盤,1) AND 控盤>0;
极弱股:=IF(控盤<0&&控盤<0&&C<XL4,控盤,0);
弱勢股:=IF(控盤<0&&控盤>ref(控盤,1),控盤,0);
轉型股:=IF(C>XL4&&C<XL5,控盤,0);
強勢股:=IF(控盤>0&&C>XL4&&C>XL5,控盤,0);
{資金}
QJ1:=SUM(V*C,1)/SUM(V,1);
QJ2:=EMA(QJ1,13);
資金:FORCAST((QJ1-QJ2)*100/QJ1,5),LINETHICK,PRECISION2,Color0098FF;

{-----------------【圖解模板】---------------------}
{柱線}
STICKLINE(控盤<0,控盤*2.6,0,4,1),color888000;//無庄
STICKLINE(控盤>REF(控盤*0.8,1) AND 控盤>0,控盤*2.8,0,4,1),colorred;//有庄
STICKLINE(ZJ2>50 AND COST(85)<CLOSE AND 控盤>0,控盤*2,0,4,1),colorff00ff;//高控
STICKLINE(控盤<REF(控盤,1) AND 控盤>0,控盤*2,0,4,1),color00ff00;//出貨
{分級}
STICKLINE(极弱股<0,极弱股*3,0,0,0),ColorFF7850;
STICKLINE(弱勢股<0,弱勢股*2.8,0,0,0),ColorFFE76A;
STICKLINE(轉型股<0,轉型股*2,0,0,0),Color21BEE5;
STICKLINE(控盤>ref(控盤,1)&&控盤<0,控盤*2,0,0,0),Color21BEE5;
STICKLINE(強勢股>0,控盤*3,0,0,0),ColorBC57FF;
{寫字}
DRAWTEXT(BARPOS=SYSPARAM(2),0,'無庄控:'+NUMTOSTR(無庄控盤[SYSPARAM(1)],0)),align4,color888000;
DRAWTEXT(BARPOS=SYSPARAM(2),0,' 有庄控:'+NUMTOSTR(有庄控盤[SYSPARAM(1)],0)),align4,colorred;
DRAWTEXT(BARPOS=SYSPARAM(2),0,' 高度控:'+NUMTOSTR(高度控盤[SYSPARAM(1)],0)),align4,colorff00ff;
DRAWTEXT(BARPOS=SYSPARAM(2),0,' 主力出:'+NUMTOSTR(主力出貨[SYSPARAM(1)],0)),align4,color00ff00;
{信號}
DRAWICON(CROSS(控盤,0) and 資金>ref(資金,1),-1.6,4),ALIGN;//信號
DRAWICON(CROSS(主力,散籌),散籌/10-2,8),PXDN6;//信號
{資金}
PARTLINE(C,資金*0.2),Color0098FF;
{信號}
PARTLINE(C,主力/10-2),COLORRED;//主力籌碼-----主
PARTLINE(C,警戒/10-2),COLORYELLOW;//主力長期均量---副1
PARTLINE(C,主均/10-2),LINETHICK2,Color1D6C1B;//主力月均量---副2
PARTLINE(C,散籌/10-2),COLORWHITE;//散籌控值---副3
{標字}
DRAWTEXT(BARPOS=SYSPARAM(2),0,'黑洞距今:'+NUMTOSTR(黑洞[SYSPARAM(1)],0)+'天'),align5,ColorFFC5FF;
DRAWTEXT(FILTER(REF(ZSHTL,1)>90 AND ZSHTL<90,5),-0.26,'↑\n 黑洞'),ALIGN2,ColorFFC5FF;
DRAWTEXT(BARPOS=SYSPARAM(2),0,' 控盤系數：'+NUMTOSTR(主力控盤[SYSPARAM(1)],0)),align5,COLORRED;

__________________
人外有人 天外有天 不懼不貪 亦富亦安

向版主報告此篇 | 查IP位址
Old Post 2007-09-10 18:43
ifuian 現在離線 點選這裡查看 ifuian 的個人資料 點選這裡給 ifuian 傳送一條短訊 查找更多關於 ifuian 的文章 增加 ifuian 至你的好友列表 編輯/刪除訊息 引用回覆
21769136
初級會員

註冊日期: Jan 2006
來　　自:
文章數量: 19

引用:
最初由 ifuian 發表
{跟蹤庄家}
DRAWGBK(1, COLORRGB(60,60,60),COLORRGB(50,50,50),1);

{-------------------☆功能--------------------}
{基礎---張三丰与泡哥的混合思路}
VAR1:=EMA((WINNER(C*1.1)-WINNER(C*0.9))*80,1);
Zx1:=EMA(WINNER(C)*70,1);//主力籌碼:
Zx2:=(MA(Zx1,90)+MA(Zx1,120)+MA(Zx1,180)+MA(Zx1,250))/4;//主力籌碼長期均量（有了時間了）
Zx3:=EMA(Zx1,21);//主力籌碼月均量（哈哈，有了時間了）
Zx4:=VAR1-Zx1;//散籌控值
{信號}
ZW1:=EMA(WINNER(C)*70,3);//主力籌碼估算
ZW2:=EMA((WINNER(C*1.1)-WINNER(C*0.9))*80,3);//散戶籌碼估算
主力:ZW1,PRECISION2,LINETHICK,COLORRED;//主力籌碼-----主
警戒:Zx2,LINETHICK,PRECISION2,COLORYELLOW;//主力長期均量---副1
主均:EMA(Zx1,21),LINETHICK,PRECISION2,Color1D6C1B;//主力月均量---副2
散籌:(VAR1-Zx1),LINETHICK,PRECISION2,COLORWHITE;//散籌控值---副3
//黑洞
ZZLKP:=ZW1/(ZW1+ZW2)*100;//主力控籌碼比率
ZSHTL:=ZW2/(ZW1+ZW2)*100;//散戶套牢籌碼比率
黑洞:=BARSLAST(REF(ZSHTL,1)>90 AND ZSHTL<90);
主力控盤:=ROUND(ZZLKP);//系數
{庄家行蹤}
{XL}
XL1:=C;
XL2:=EMA(H,7);
XL3:=EMA(L,3);
FOR I=8 TO DATACOUNT DO BEGIN
IF XL1[I]>XL2[I-1] THEN B[I]:=1 ELSE
IF XL1[I]<XL3[I-1] THEN B[I]:=-1 ELSE
B[I]:=B[I-1];
END;
XL4:=IF(B=-1,MA(H,7),MA(L,3));//顯示線
XL5:=EMA(SLOPE(C,21)*20+C,55);//分界
ZJ1:=EMA(EMA(C,13),13);
ZJ2:=100*WINNER(C*0.95);
控盤:=(ZJ1-REF(ZJ1,1))/REF(ZJ1,1)*100;
無庄控盤:= 控盤<0;
有庄控盤:= 控盤>REF(控盤,1) AND 控盤>0;
高度控盤:= ZJ2>50 AND COST(85)<C AND 控盤>0;
主力出貨:= 控盤<REF(控盤,1) AND 控盤>0;
极弱股:=IF(控盤<0&&控盤<0&&C<XL4,控盤,0);
弱勢股:=IF(控盤<0&&控盤>ref(控盤,1),控盤,0);
轉型股:=IF(C>XL4&&C<XL5,控盤,0);
強勢股:=IF(控盤>0&&C>XL4&&C>XL5,控盤,0);
{資金}
QJ1:=SUM(V*C,1)/SUM(V,1);
QJ2:=EMA(QJ1,13);
資金:FORCAST((QJ1-QJ2)*100/QJ1,5),LINETHICK,PRECISION2,Color0098FF;

{-----------------【圖解模板】---------------------}
{柱線}
STICKLINE(控盤<0,控盤*2.6,0,4,1),color888000;//無庄
STICKLINE(控盤>REF(控盤*0.8,1) AND 控盤>0,控盤*2.8,0,4,1),colorred;//有庄
STICKLINE(ZJ2>50 AND COST(85)<CLOSE AND 控盤>0,控盤*2,0,4,1),colorff00ff;//高控
STICKLINE(控盤<REF(控盤,1) AND 控盤>0,控盤*2,0,4,1),color00ff00;//出貨
{分級}
STICKLINE(极弱股<0,极弱股*3,0,0,0),ColorFF7850;
STICKLINE(弱勢股<0,弱勢股*2.8,0,0,0),ColorFFE76A;
STICKLINE(轉型股<0,轉型股*2,0,0,0),Color21BEE5;
STICKLINE(控盤>ref(控盤,1)&&控盤<0,控盤*2,0,0,0),Color21BEE5;
STICKLINE(強勢股>0,控盤*3,0,0,0),ColorBC57FF;
{寫字}
DRAWTEXT(BARPOS=SYSPARAM(2),0,'無庄控:'+NUMTOSTR(無庄控盤[SYSPARAM(1)],0)),align4,color888000;
DRAWTEXT(BARPOS=SYSPARAM(2),0,' 有庄控:'+NUMTOSTR(有庄控盤[SYSPARAM(1)],0)),align4,colorred;
DRAWTEXT(BARPOS=SYSPARAM(2),0,' 高度控:'+NUMTOSTR(高度控盤[SYSPARAM(1)],0)),align4,colorff00ff;
DRAWTEXT(BARPOS=SYSPARAM(2),0,' 主力出:'+NUMTOSTR(主力出貨[SYSPARAM(1)],0)),align4,color00ff00;
{信號}
DRAWICON(CROSS(控盤,0) and 資金>ref(資金,1),-1.6,4),ALIGN;//信號
DRAWICON(CROSS(主力,散籌),散籌/10-2,8),PXDN6;//信號
{資金}
PARTLINE(C,資金*0.2),Color0098FF;
{信號}
PARTLINE(C,主力/10-2),COLORRED;//主力籌碼-----主
PARTLINE(C,警戒/10-2),COLORYELLOW;//主力長期均量---副1
PARTLINE(C,主均/10-2),LINETHICK2,Color1D6C1B;//主力月均量---副2
PARTLINE(C,散籌/10-2),COLORWHITE;//散籌控值---副3
{標字}
DRAWTEXT(BARPOS=SYSPARAM(2),0,'黑洞距今:'+NUMTOSTR(黑洞[SYSPARAM(1)],0)+'天'),align5,ColorFFC5FF;
DRAWTEXT(FILTER(REF(ZSHTL,1)>90 AND ZSHTL<90,5),-0.26,'↑\n 黑洞'),ALIGN2,ColorFFC5FF;
DRAWTEXT(BARPOS=SYSPARAM(2),0,' 控盤系數：'+NUMTOSTR(主力控盤[SYSPARAM(1)],0)),align5,COLORRED;



感激不盡............3Q 3Q 3Q.......

向版主報告此篇 | 查IP位址
Old Post 2007-09-11 15:38
21769136 現在離線 點選這裡查看 21769136 的個人資料 點選這裡給 21769136 傳送一條短訊 查找更多關於 21769136 的文章 增加 21769136 至你的好友列表 編輯/刪除訊息 引用回覆
hy911
初級會員

註冊日期: Jan 2007
來　　自:
文章數量: 23

需要进一步优化更好，谢谢

向版主報告此篇 | 查IP位址
Old Post 2007-09-16 17:19
hy911 現在離線 點選這裡查看 hy911 的個人資料 點選這裡給 hy911 傳送一條短訊 查找更多關於 hy911 的文章 增加 hy911 至你的好友列表 編輯/刪除訊息 引用回覆
a27183526
資深會員

註冊日期: Jul 2010
來　　自:
文章數量: 206
選股程式

這個改成選股程式,要如何修改,紅色箭頭出現時買進,

__________________
1

向版主報告此篇 | 查IP位址
Old Post 2024-09-29 11:05
a27183526 現在離線 點選這裡查看 a27183526 的個人資料 點選這裡給 a27183526 傳送一條短訊 查找更多關於 a27183526 的文章 增加 a27183526 至你的好友列表 編輯/刪除訊息 引用回覆
cgjj
總版主

註冊日期: Oct 2003
來　　自:
文章數量: 18113
回覆: 選股程式

引用:
最初由 a27183526 發表
這個改成選股程式,要如何修改,紅色箭頭出現時買進,


末端加入此行，利用它做選股，就可以得到結果

選中:CROSS(控盤,0) and 資金>ref(資金,1) linethick0;

向版主報告此篇 | 查IP位址
Old Post 2024-09-29 19:25
cgjj 現在離線 點選這裡查看 cgjj 的個人資料 點選這裡給 cgjj 傳送一條短訊 查找更多關於 cgjj 的文章 增加 cgjj 至你的好友列表 編輯/刪除訊息 引用回覆
全部時間均為台灣時間, 現在時間為07:07 發表新主題    回覆主題
  上一主題   下一主題
顯示可列印版本 | 訂閱此主題

論壇跳轉:
主題評分:

論壇規定:
你不可以發表新主題
你不可以回覆文章
你不可以上傳附件
你不可以編輯自己的文章 		HTML語法禁止
vB 語法核准
表情符號核准
貼圖語法[IMG]核准
 

本站所有內容未經作者授權禁止轉貼節錄, 發表言論僅供參考勿作為投資決策依據。瀏覽本站請使用 IE 5.5 以上版本, 最佳瀏覽解析度 1024 x 768 全彩。

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