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

註冊日期: Apr 2004
來  自:
文章數量: 119

自动操盘系统

I个人随习惯优化去吧

NPUT: P1(2.7,2,3.2),P2(3.13,3,3.5),P3(3.43,3,3.8),p4(3.71,3.5,3.9),n(21,3,100),n1(3,3,100),zz(1,1,2); //zz是多空显示开关。
m1:=ma(c,5);
m2:ma(c,20),COLORGREEN;
均线变异:if(m1>m2,m2,m1),,Color0000FF;
partline(均线变异>ref(均线变异,1) and 均线变异=m2,均线变异),linethick2,COLORred;
var1:=(hhv(high,n)-close)/(hhv(high,n)-llv(low,n))*100;
var3:=(close-llv(low,n))/(hhv(high,n)-llv(low,n))*100;
var6:=var3-var1;
z:=ma(var6,n1);
stickline(z>=0 {and zz=2},O,C,6,0),colorred;
stickline(z>=0 {and zz=2},H,max(O,C),0,1),colorred;
stickline(z>=0 {and zz=2},min(O,C),L,0,1),COLORred;
stickline(z<0 {and zz=1},O,C,6,1),COLORCYAN;
stickline(z<0 {and zz=1},h,max(O,c),0,1),COLORCYAN;
stickline(z<0 {and zz=1},min(O,C),l,0,1),COLORCYAN;
stickline(z>=0 and m2>c,O,C,6,0),COLORBLUE;
stickline(z>=0 and m2>c,H,max(O,C),0,1),COLORBLUE;
stickline(z>=0 and m2>c,min(O,C),L,0,1),COLORBLUE;
stickline(z<0 and m2<c,O,C,6,1),COLORYELLOW;
stickline(z<0 and m2<c,h,max(O,c),0,1),COLORYELLOW;
stickline(z<0 and m2<c,min(O,C),l,0,1),COLORYELLOW;
DRAWTEXT(IF(RANGE(BARPOS,SYSPARAM(1)-2,SYSPARAM(1)+1) AND CROSS(z,0),1,0),l,'平空开多!'),COLORRED;
DRAWTEXT(IF(RANGE(BARPOS,SYSPARAM(1)-2,SYSPARAM(1)+1) AND CROSS(0,z),1,0),h,'平多开空!'),COLORgreen;
Var2:=LLV(LOW,10);
Var3:=HHV(HIGH,25);
警戒线:= p1 ;
减仓线:= p2 ;
卖出线:= p3 ;
空头线:=p4;
动力线:= EMA((CLOSE-Var2)/(Var3-Var2)*4,4);
DRAWTEXT(IF(RANGE(BARPOS,SYSPARAM(1)-2,SYSPARAM(1)+1) AND CROSS(动力线,警戒线),1,0),c,'预警 '),ALIGN4,colorwhite;
DRAWTEXT(IF(RANGE(BARPOS,SYSPARAM(1)-2,SYSPARAM(1)+1) AND CROSS(动力线,减仓线),1,0),c,'减磅 '),ALIGN5,COLORYELLOW;
DRAWTEXT(IF(RANGE(BARPOS,SYSPARAM(1)-2,SYSPARAM(1)+1) AND CROSS(动力线,卖出线),1,0),c,'出局?'),ALIGN4,COLORGREEN ;
DRAWTEXT(IF(RANGE(BARPOS,SYSPARAM(1)-2,SYSPARAM(1)+1) AND CROSS(动力线,空头线),1,0),c,'与虎谋皮 '),ALIGN3,COLORRED;
DRAWTEXT(IF(RANGE(BARPOS,SYSPARAM(1)-2,SYSPARAM(1)+1) AND CROSS(警戒线,动力线),1,0),c,'预警确认 '),ALIGN3,COLORRED;
DRAWTEXT(IF(RANGE(BARPOS,SYSPARAM(1)-2,SYSPARAM(1)+1) AND CROSS(减仓线,动力线),1,0),c,'减磅确认 '),ALIGN3,COLORRED;
DRAWTEXT(IF(RANGE(BARPOS,SYSPARAM(1)-2,SYSPARAM(1)+1) AND CROSS(卖出线,动力线),1,0),c,'出局确认'),ALIGN3,COLORRED ;
DRAWTEXT(IF(RANGE(BARPOS,SYSPARAM(1)-2,SYSPARAM(1)+1) AND CROSS(空头线,动力线),1,0),c,'虎皮到手'),ALIGN4,COLORRED ;

{DRAWICON(CROSS(动力线,警戒线),h,1);
DRAWICON(CROSS(动力线,减仓线),h,3);}
DRAWICON(CROSS(动力线,卖出线),h,2);

WW:=(简单移动平均(收盘价,4)+简单移动平均(收盘价,8)+简单移动平均(收盘价,16)+简单移动平均(收盘价,32))/4;
画图标(交叉函数(收盘价,WW),最低价-0.02,4);
画图标(交叉函数(WW,收盘价),最高价+0.06,5);
显示文字(交叉函数(收盘价,WW),最低价-0.02,' 开多');
显示文字(交叉函数(WW,收盘价),最高价+0.06,' 多平');

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

註冊日期: Dec 2004
來  自: Taipei
文章數量: 1893

謝謝來自大陸狐友 您的分享

附件係轉成繁體字的內容

附件: 自動操盤系統.ALG
此文件已被下載 306 次。

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

註冊日期: Dec 2004
來  自:
文章數量: 43

謝謝,學習了

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

註冊日期: Mar 2004
來  自: 台灣
文章數量: 121

看帖學習
回帖支持

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

論壇跳轉:
主題評分:

論壇規定:
你不可以發表新主題
你不可以回覆文章
你不可以上傳附件
你不可以編輯自己的文章
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.  聯絡我們