
等级: 新手上路
- 注册:
- 2025-3-18
- 曾用名:
|

楼主 |
发表于 2025-3-26 09:47
|
显示全部楼层
// 金字塔PEL代码(2025年3月26日修订)
LC := REF(CLOSE, 1);
STOCK_CODE := STKNAME;
// 板块判断(优先级:北交所 > 科创板/创业板 > 主板)
IS_BSE := LEFTSTR(STOCK_CODE, 1) = '8' OR LEFTSTR(STOCK_CODE, 2) = '43';
IS_STAR := LEFTSTR(STOCK_CODE, 2) = '68' AND NOT(IS_BSE);
IS_GEM := LEFTSTR(STOCK_CODE, 2) = '30' AND NOT(IS_BSE);
IS_MAIN_BOARD := (LEFTSTR(STOCK_CODE, 2) = '60' OR LEFTSTR(STOCK_CODE, 2) = '00') AND NOT(IS_BSE);
// 特殊股票判断
IS_ST := INSTR(STKNAME, 'ST') > 0 OR INSTR(STKNAME, '*ST') > 0 OR INSTR(STKNAME, 'SST') > 0;
IS_NEW_STOCK := BARSCOUNT(CLOSE) < 30; // 假设新股上市30日内
IS_DELISTING := INSTR(STKNAME, '退市') > 0;
IS_STAR_NEW := IS_STAR AND BARSCOUNT(CLOSE) < 5; // 科创板新股前5日
// 动态计算涨停幅度
RATE := IF(IS_ST, 0.05,
IF(IS_BSE, 0.30,
IF(IS_GEM OR IS_STAR, 0.20,
IF(IS_MAIN_BOARD, 0.10, 0.10))));
// 涨停价与选股条件
UPPER_LIMIT_PRICE := ROUND(LC * (1 + RATE), 2);
CONDITION := CLOSE >= UPPER_LIMIT_PRICE - 0.02 AND CLOSE <= UPPER_LIMIT_PRICE + 0.02;
CONDITION := CONDITION AND NOT(IS_NEW_STOCK) AND NOT(IS_DELISTING) AND NOT(IS_STAR_NEW);
// 输出
CONDITION;
补充内容 (2025-3-26 09:47):
这样写是否合理 |
|