[ZS261007]牛熊心理副图-通达信指标源码分享

01 RSV拐个弯，双层SMA叠出情绪温度

市场情绪这东西看不见摸不着，可它实实在在影响着每一根K线。牛熊心理这副图走的是"改良KDJ + 心理线"双轨路子——一边把RSV放大偏离后双重平滑画出情绪温度，一边直接数十五天里涨了几天，两条线互相印证。写指标这些年，这种"算法线 + 统计线"搭伙的设计不多见，笨办法反而靠谱。

速查卡（五秒扫完，名称 + 一句话作用）：

02 指标源码分享｜牛熊心理

指标编号：ZS261007

指标完整源码：

牛熊骨:=18;心理线:=15;RSV:=(((CLOSE-LLV(LOW,(牛熊骨+3)))/(HHV(HIGH,(牛熊骨+3))-LLV(LOW,19)))*100);FASTK:=(((SMA(RSV,8,1)-50)*1.4)+50);D:=SMA(FASTK,8,1);SSS:=SMA(D,8,1);IF(D<=REF(D,1),D,DRAWNULL),COLOR005C00,LINETHICK8;IF(D<=REF(D,1),D+1.5,DRAWNULL),COLOR007D00,LINETHICK8;IF((D<=REF(D,1)),D+3,DRAWNULL)COLOR00B400,LINETHICK8;IF((D<=REF(D,1)),D+4.5,DRAWNULL),COLOR00DE00,LINETHICK8;IF((D<=REF(D,1)),D+6,DRAWNULL),COLOR00FF00,LINETHICK8;IF(SSS>=REF(SSS,1),SSS,DRAWNULL),COLOR000082,LINETHICK8;IF(SSS>=REF(SSS,1),SSS+1.5,DRAWNULL),COLOR00009D,LINETHICK8;IF(SSS>=REF(SSS,1),SSS+3,DRAWNULL),COLOR0000B4,LINETHICK8;IF(SSS>=REF(SSS,1),SSS+4.5,DRAWNULL),COLOR0000D6,LINETHICK8;IF(SSS>=REF(SSS,1),SSS+6,DRAWNULL),COLOR0000FF,LINETHICK8;B:=SSS;W:=CROSS(BACKSET(ISLASTBAR,5),0.5);VAR19:=BARSLAST(W);DRAWLINE(W=1,B,ISLASTBARANDB>REF(B,VAR19),B,1),COLOR0000FF,LINETHICK1;DRAWLINE(W=1,B,ISLASTBARANDB<REF(B,VAR19),B,1),COLOR00FF00,LINETHICK1;(COUNT(CLOSE>REF(CLOSE,1),心理线)/心理线)*100,COLORFF00FF,LINETHICK3;

聊到 #牛熊心理# 就得提 #心理线副图# #情绪温度#，这三个平时放一块儿琢磨。

03 放大偏离再抹平，心理线数着上涨天数

RSV这一行跟标准KDJ不一样，得仔细看：

RSV:=(((CLOSE-LLV(LOW,(牛熊骨+3)))/(HHV(HIGH,(牛熊骨+3))-LLV(LOW,19)))*100)

牛熊骨设成十八，加三就是二十一天。分子用二十一天最低价，分母用二十一天最高价减十九天最低价——注意分母的低价只取十九天，比分子的二十一天短两天。这个不对称设计是故意的：分母窄一点，RSV的波动范围就大一点，情绪极端的时候更容易顶到一百或砸到零。为什么是十八加三？十八这个数本身是个中期周期，加三取整到二十一天，跟三周交易日对齐；十九天低价则是把最近一个月的底部收紧，不让太远的低价把分母撑太宽。

FASTK这一步在"放大偏离"：

FASTK:=(((SMA(RSV,8,1)-50)*1.4)+50)

先把RSV做八日SMA平滑，减五十拿到偏离中轴的距离，乘一点四放大，再加五十拉回。一点四这个系数很关键——乘一等于没放大，乘一点八太猛，RSV稍微一动FASTK就冲到八十以上；一点四刚好把中等程度的偏离拉到显眼的位置，又不至于动不动就满格。我自己写类似指标的时候常用一点三到一点五这个区间，一点四是中间值，稳。

D和SSS是两层平滑：

D:=SMA(FASTK,8,1)

SSS:=SMA(D,8,1)

FASTK已经平滑过一次了，D再平滑一次拿到"慢温度线"，SSS对D再平滑一次拿到"更慢的趋势线"。两层都是八日SMA，权重一致。为什么不换周期？因为这里要的不是快慢交叉，而是"同周期叠两层"的视觉效果——D下跌时用五层绿色渐变粗线画出来，SSS上涨时用五层蓝色渐变粗线画出来，颜色从深到浅叠在一起，像温度计的刻度，方向感比单条线强太多。

DRAWLINE那几行在画最近趋势线。BACKSET(ISLASTBAR,5) 找到最近五根K线的起点，BARSLAST记下来距离，然后从那个起点到当前画一条直线——B比起点高就蓝线，低就绿线。五根K线大约一周，画短期趋势方向刚好，太长了线就平了看不出变化。

末尾这行是心理线本体：

(COUNT(CLOSE>REF(CLOSE,1),心理线)/心理线)*100

心理线设成十五，数十五天里收盘价大于前一天的天数，除以十五乘一百。这就是最朴素的情绪统计——涨得多说明情绪偏暖，跌得多说明情绪偏冷。没有任何平滑，没有任何加权， raw 统计。跟前面那条层层平滑的D线放在一起，一个精算一个粗算，互相参照着看反而有意思。