 |
ichiro2016
中級會員

註冊日期: May 2016
來 自:
文章數量: 30 |
[問題] 微小台期指 未平倉
請教,近期增設的 微小台 當日的全市場未平倉,及法人多單未平倉,法人空單未平倉餘額的寫法
參照之前 小台未平倉,及小台法人未平倉的寫法如下: 求得 小台散戶多空比( 請詳附圖,使用上是OK的)
小台
//請在台當月或小台當月中跑
OPLD:=OPTIONLASTDAY('FITX1');
MM:=mod(floor(OPLD/100),100);
ISLD:=TradeDATE=OPLD;
New:=TradeDATE>=1180702; //新制
U01:=MM=01 or MM=12 or (MM=11 and New);
U02:=MM=01 or MM=02 or (MM=12 and New);
U03:=Not(MM=04 and New=0);
U04:=MM=03 or MM=04 or (MM=02 and New);
U05:=MM=04 or MM=05 or (MM=03 and New);
U06:=Not(MM=07 and New=0);
U07:=MM=06 or MM=07 or (MM=05 and New);
U08:=MM=07 or MM=08 or (MM=06 and New);
U09:=Not(MM=10 and New=0);
U10:=MM=09 or MM=10 or (MM=08 and New);
U11:=MM=10 or MM=11 or (MM=09 and New);
U12:=Not(MM=01 and New=0);
MTX01:="FIMTXF$OPENINT"*U01*Not(ISLD and MM=01);
MTX02:="FIMTXG$OPENINT"*U02*Not(ISLD and MM=02);
MTX03:="FIMTXH$OPENINT"*U03*Not(ISLD and MM=03);
MTX04:="FIMTXJ$OPENINT"*U04*Not(ISLD and MM=04);
MTX05:="FIMTXK$OPENINT"*U05*Not(ISLD and MM=05);
MTX06:="FIMTXM$OPENINT"*U06*Not(ISLD and MM=06);
MTX07:="FIMTXN$OPENINT"*U07*Not(ISLD and MM=07);
MTX08:="FIMTXQ$OPENINT"*U08*Not(ISLD and MM=08);
MTX09:="FIMTXU$OPENINT"*U09*Not(ISLD and MM=09);
MTX10:="FIMTXV$OPENINT"*U10*Not(ISLD and MM=10);
MTX11:="FIMTXX$OPENINT"*U11*Not(ISLD and MM=11);
MTX12:="FIMTXZ$OPENINT"*U12*Not(ISLD and MM=12);
MTXOI:=MTX01+MTX02+MTX03+MTX04+MTX05+MTX06+MTX07+MTX08+MTX09+MTX10+MTX11+MTX12;//小台未平倉
//法人小台
CK:=SDFR('MXF',7)+SDFR('MXF',19)+SDFR('MXF',31),colorred;//末平倉多口
PK:=SDFR('MXF',9)+SDFR('MXF',21)+SDFR('MXF',33),colorgreen;//末平倉空口
CV:=SDFR('MXF',8)+SDFR('MXF',20)+SDFR('MXF',32);//末平倉多額
PV:=SDFR('MXF',10)+SDFR('MXF',22)+SDFR('MXF',34);//末平倉空額
法人末平倉淨額:=CV-PV,linestick,noaxis;
//散戶
SC:=MTXOI-CK;
SP:=MTXOI-PK;
SOI:SC-SP,linethick0;
散戶多空比:SOI/MTXOI*100,colorstick,linethick2;
------------------------------------
問題----新增 的 微台期指部分 ,參照上列,卻得不到 答案.
請版主能 指正,是否引用數據 錯誤. 謝謝
//請在台當月或小台當月中跑
OPLD:=OPTIONLASTDAY('FITM1');
MM:=mod(floor(OPLD/100),100);
ISLD:=TradeDATE=OPLD;
New:=TradeDATE>=1180702; //新制
U01:=MM=01 or MM=12 or (MM=11 and New);
U02:=MM=01 or MM=02 or (MM=12 and New);
U03:=Not(MM=04 and New=0);
U04:=MM=03 or MM=04 or (MM=02 and New);
U05:=MM=04 or MM=05 or (MM=03 and New);
U06:=Not(MM=07 and New=0);
U07:=MM=06 or MM=07 or (MM=05 and New);
U08:=MM=07 or MM=08 or (MM=06 and New);
U09:=Not(MM=10 and New=0);
U10:=MM=09 or MM=10 or (MM=08 and New);
U11:=MM=10 or MM=11 or (MM=09 and New);
U12:=Not(MM=01 and New=0);
MTX01:="FITMF$OPENINT"*U01*Not(ISLD and MM=01);
MTX02:="FITMG$OPENINT"*U02*Not(ISLD and MM=02);
MTX03:="FITMH$OPENINT"*U03*Not(ISLD and MM=03);
MTX04:="FITMJ$OPENINT"*U04*Not(ISLD and MM=04);
MTX05:="FITMK$OPENINT"*U05*Not(ISLD and MM=05);
MTX06:="FITMM$OPENINT"*U06*Not(ISLD and MM=06);
MTX07:="FITMN$OPENINT"*U07*Not(ISLD and MM=07);
MTX08:="FITMQ$OPENINT"*U08*Not(ISLD and MM=08);
MTX09:="FITMU$OPENINT"*U09*Not(ISLD and MM=09);
MTX10:="FITMV$OPENINT"*U10*Not(ISLD and MM=10);
MTX11:="FITMX$OPENINT"*U11*Not(ISLD and MM=11);
MTX12:="FITMZ$OPENINT"*U12*Not(ISLD and MM=12);
MTXOI:=MTX01+MTX02+MTX03+MTX04+MTX05+MTX06+MTX07+MTX08+MTX09+MTX10+MTX11+MTX12;//小台未平倉
//法人微小台
CK:=SDFR('TMF',7)+SDFR('TMF',19)+SDFR('TMF',31),colorred;//末平倉多口
PK:=SDFR('TMF',9)+SDFR('TMF',21)+SDFR('TMF',33),colorgreen;//末平倉空口
CV:=SDFR('TMF',8)+SDFR('TMF',20)+SDFR('TMF',32);//末平倉多額
PV:=SDFR('TMF',10)+SDFR('TMF',22)+SDFR('TMF',34);//末平倉空額法人末平倉淨額:=CV-PV,linestick,noaxis;
//微散戶
SC:=MTXOI-CK;
SP:=MTXOI-PK;
SOI:SC-SP,linethick0;
微台散戶多空比:SOI/MTXOI*100,colorstick,linethick2;
ichiro2016 附帶上了此圖片:
|
|
向版主報告此篇 |  |
|
2024-09-27 08:34 |
|
|
|  |
 |
cgjj
總版主

註冊日期: Oct 2003
來 自:
文章數量: 18106 |
回覆: [問題] 微小台期指 未平倉
引用: 最初由 ichiro2016 發表
請教,近期增設的 微小台 當日的全市場未平倉,及法人多單未平倉,法人空單未平倉餘額的寫法
參照之前 小台未平倉,及小台法人未平倉的寫法如下: 求得 小台散戶多空比( 請詳附圖,使用上是OK的)
小台
//請在台當月或小台當月中跑
OPLD:=OPTIONLASTDAY('FITX1');
MM:=mod(floor(OPLD/100),100);
ISLD:=TradeDATE=OPLD;
New:=TradeDATE>=1180702; //新制
U01:=MM=01 or MM=12 or (MM=11 and New);
U02:=MM=01 or MM=02 or (MM=12 and New);
U03:=Not(MM=04 and New=0);
U04:=MM=03 or MM=04 or (MM=02 and New);
U05:=MM=04 or MM=05 or (MM=03 and New);
U06:=Not(MM=07 and New=0);
U07:=MM=06 or MM=07 or (MM=05 and New);
U08:=MM=07 or MM=08 or (MM=06 and New);
U09:=Not(MM=10 and New=0);
U10:=MM=09 or MM=10 or (MM=08 and New);
U11:=MM=10 or MM=11 or (MM=09 and New);
U12:=Not(MM=01 and New=0);
MTX01:="FIMTXF$OPENINT"*U01*Not(ISLD and MM=01);
MTX02:="FIMTXG$OPENINT"*U02*Not(ISLD and MM=02);
MTX03:="FIMTXH$OPENINT"*U03*Not(ISLD and MM=03);
MTX04:="FIMTXJ$OPENINT"*U04*Not(ISLD and MM=04);
MTX05:="FIMTXK$OPENINT"*U05*Not(ISLD and MM=05);
MTX06:="FIMTXM$OPENINT"*U06*Not(ISLD and MM=06);
MTX07:="FIMTXN$OPENINT"*U07*Not(ISLD and MM=07);
MTX08:="FIMTXQ$OPENINT"*U08*Not(ISLD and MM=08);
MTX09:="FIMTXU$OPENINT"*U09*Not(ISLD and MM=09);
MTX10:="FIMTXV$OPENINT"*U10*Not(ISLD and MM=10);
MTX11:="FIMTXX$OPENINT"*U11*Not(ISLD and MM=11);
MTX12:="FIMTXZ$OPENINT"*U12*Not(ISLD and MM=12);
MTXOI:=MTX01+MTX02+MTX03+MTX04+MTX05+MTX06+MTX07+MTX08+MTX09+MTX10+MTX11+MTX12;//小台未平倉
//法人小台
CK:=SDFR('MXF',7)+SDFR('MXF',19)+SDFR('MXF',31),colorred;//末平倉多口
PK:=SDFR('MXF',9)+SDFR('MXF',21)+SDFR('MXF',33),colorgreen;//末平倉空口
CV:=SDFR('MXF',8)+SDFR('MXF',20)+SDFR('MXF',32);//末平倉多額
PV:=SDFR('MXF',10)+SDFR('MXF',22)+SDFR('MXF',34);//末平倉空額
法人末平倉淨額:=CV-PV,linestick,noaxis;
//散戶
SC:=MTXOI-CK;
SP:=MTXOI-PK;
SOI:SC-SP,linethick0;
散戶多空比:SOI/MTXOI*100,colorstick,linethick2;
------------------------------------
問題----新增 的 微台期指部分 ,參照上列,卻得不到 答案.
請版主能 指正,是否引用數據 錯誤. 謝謝
//請在台當月或小台當月中跑
OPLD:=OPTIONLASTDAY('FITM1');
MM:=mod(floor(OPLD/100),100);
ISLD:=TradeDATE=OPLD;
New:=TradeDATE>=1180702; //新制
U01:=MM=01 or MM=12 or (MM=11 and New);
U02:=MM=01 or MM=02 or (MM=12 and New);
U03:=Not(MM=04 and New=0);
U04:=MM=03 or MM=04 or (MM=02 and New);
U05:=MM=04 or MM=05 or (MM=03 and New);
U06:=Not(MM=07 and New=0);
U07:=MM=06 or MM=07 or (MM=05 and New);
U08:=MM=07 or MM=08 or (MM=06 and New);
U09:=Not(MM=10 and New=0);
U10:=MM=09 or MM=10 or (MM=08 and New);
U11:=MM=10 or MM=11 or (MM=09 and New);
U12:=Not(MM=01 and New=0);
MTX01:="FITMF$OPENINT"*U01*Not(ISLD and MM=01);
MTX02:="FITMG$OPENINT"*U02*Not(ISLD and MM=02);
MTX03:="FITMH$OPENINT"*U03*Not(ISLD and MM=03);
MTX04:="FITMJ$OPENINT"*U04*Not(ISLD and MM=04);
MTX05:="FITMK$OPENINT"*U05*Not(ISLD and MM=05);
MTX06:="FITMM$OPENINT"*U06*Not(ISLD and MM=06);
MTX07:="FITMN$OPENINT"*U07*Not(ISLD and MM=07);
MTX08:="FITMQ$OPENINT"*U08*Not(ISLD and MM=08);
MTX09:="FITMU$OPENINT"*U09*Not(ISLD and MM=09);
MTX10:="FITMV$OPENINT"*U10*Not(ISLD and MM=10);
MTX11:="FITMX$OPENINT"*U11*Not(ISLD and MM=11);
MTX12:="FITMZ$OPENINT"*U12*Not(ISLD and MM=12);
MTXOI:=MTX01+MTX02+MTX03+MTX04+MTX05+MTX06+MTX07+MTX08+MTX09+MTX10+MTX11+MTX12;//小台未平倉
//法人微小台
CK:=SDFR('TMF',7)+SDFR('TMF',19)+SDFR('TMF',31),colorred;//末平倉多口
PK:=SDFR('TMF',9)+SDFR('TMF',21)+SDFR('TMF',33),colorgreen;//末平倉空口
CV:=SDFR('TMF',8)+SDFR('TMF',20)+SDFR('TMF',32);//末平倉多額
PV:=SDFR('TMF',10)+SDFR('TMF',22)+SDFR('TMF',34);//末平倉空額法人末平倉淨額:=CV-PV,linestick,noaxis;
//微散戶
SC:=MTXOI-CK;
SP:=MTXOI-PK;
SOI:SC-SP,linethick0;
微台散戶多空比:SOI/MTXOI*100,colorstick,linethick2;
OPLD:=OPTIONLASTDAY('FITM1');
需要修正為
OPLD:=OPTIONLASTDAY('FITX1');
因為微台期沒有相應的選擇權存在,必須用大台來指定
|
|
向版主報告此篇 |  |
|
2024-09-27 09:19 |
|
|
|  |
 |
cgjj
總版主

註冊日期: Oct 2003
來 自:
文章數量: 18106 |
沒有數據輸出~~
是因為微小台有些月份尚無任何數據存在,需要特別處理一下
請在這一行的下面
MTX12:="FITMZ$OPENINT"*U12*Not(ISLD and MM=12);
插入以下內容,將無效的部分填零,使有效數據起點一致,就可以解決該問題
MTX01:=if(barpos>=LBOUND(MTX01) and LBOUND(MTX01),MTX01,0);
MTX02:=if(barpos>=LBOUND(MTX02) and LBOUND(MTX02),MTX02,0);
MTX03:=if(barpos>=LBOUND(MTX03) and LBOUND(MTX03),MTX03,0);
MTX04:=if(barpos>=LBOUND(MTX04) and LBOUND(MTX04),MTX04,0);
MTX05:=if(barpos>=LBOUND(MTX05) and LBOUND(MTX05),MTX05,0);
MTX06:=if(barpos>=LBOUND(MTX06) and LBOUND(MTX06),MTX06,0);
MTX07:=if(barpos>=LBOUND(MTX07) and LBOUND(MTX07),MTX07,0);
MTX08:=if(barpos>=LBOUND(MTX08) and LBOUND(MTX08),MTX08,0);
MTX09:=if(barpos>=LBOUND(MTX09) and LBOUND(MTX09),MTX09,0);
MTX10:=if(barpos>=LBOUND(MTX10) and LBOUND(MTX10),MTX10,0);
MTX11:=if(barpos>=LBOUND(MTX11) and LBOUND(MTX11),MTX11,0);
MTX12:=if(barpos>=LBOUND(MTX12) and LBOUND(MTX12),MTX12,0);
|
|
向版主報告此篇 |  |
|
2024-09-30 16:33 |
|
|
|  |
本站所有內容未經作者授權禁止轉貼節錄, 發表言論僅供參考勿作為投資決策依據。瀏覽本站請使用 IE 5.5 以上版本, 最佳瀏覽解析度 1024 x 768 全彩。
|
Powered by: vBulletin Version 2.3.0 - Copyright©2000-, Jelsoft Enterprises Limited.
簡愛洋行 製作 Copyright 2003-. All Rights Reserved. 聯絡我們
|