通达信【筹码带状图】副图，筹码变化的另类展示，源码分享

{ 判断是否为创业板或科创板股票 }

IS_STAR := CODELIKE('301') OR CODELIKE('300');

{ 锁筹比例计算 }

锁筹1:= IF(IS_STAR, WINNER(C * 0.8), WINNER(C * 0.9)) * 100, NODRAW;

{ 获取昨日锁筹比例 }

昨日锁筹 := REF(锁筹1, 1);

{ 计算锁筹的变化，并四舍五入取整 }

锁筹变化 := ROUND(锁筹1 - 昨日锁筹);

{ 套牢盘比例计算 }

套牢盘1:= (1 - IF(IS_STAR, WINNER(C * 1.2), WINNER(C * 1.1))) * 100, NODRAW;

{ 获取昨日套牢盘比例 }

昨日套牢盘 := REF(套牢盘1, 1);

{ 计算套牢盘的变化，并四舍五入取整 }

套牢盘变化 := ROUND( 套牢盘1-昨日套牢盘);

AA:=MA(锁筹变化-套牢盘变化,N);

DRAWBAND(AA,RGB(255,0,0),0,RGB(0,255,0));