最近第一天共振选股

编写要求：

请老师编写最近第一天共振选股(只取第一天共振),谢谢RSV1:=(CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100;K1:=SMA(RSV1,5,1);D1:=SMA(K1,5,1);J1:=3*K1-2*D1;AA1:=EMA(J1,5);AA2:=REF(AA1,1);STICKLINE(AA1>AA2,AA1,AA2,8,0),COLOR0055AA,PRECIS2,LAYER0;{长J}STICKLINE(AA1>AA2,AA1,AA2,8,0),COLOR0077CC,PRECIS2,LAYER0;STICKLINE(AA1>AA2,AA1,AA2,6,0),COLOR0099DD,PRECIS2,LAYER0;STICKLINE(AA1>AA2,AA1,AA2,5,0),COLOR01BEE7,PRECIS2,LAYER0;STICKLINE(AA1<=AA2,AA1,AA2,8,0),COLOR006600,PRECIS2,LAYER0;STICKLINE(AA1<=AA2,AA1,AA2,8,0),COLOR009900,PRECIS2,LAYER0;STICKLINE(AA1<=AA2,AA1,AA2,6,0),COLOR00BB00,PRECIS2,LAYER0;STICKLINE(AA1<=AA2,AA1,AA2,5,0),COLOR00CC00,PRECIS2,LAYER0;RSV2:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;K2:=SMA(RSV2,3,1);D2:=SMA(K2,3,1);J2:=3*K2-2*D2;BB1:=EMA(J2,5);BB2:=REF(BB1,1);STICKLINE(BB1>BB2,BB1,BB2,8,0),COLOR000045,PRECIS2,LAYER0;{短J}STICKLINE(BB1>BB2,BB1,BB2,7,0),COLOR000085,PRECIS2,LAYER0;STICKLINE(BB1>BB2,BB1,BB2,6,0),COLOR0000C5,PRECIS2,LAYER0;STICKLINE(BB1>BB2,BB1,BB2,5,0),COLOR0000E5,PRECIS2,LAYER0;STICKLINE(BB1<=BB2,BB1,BB2,8,0),COLOR353500,PRECIS2,LAYER0;STICKLINE(BB1<=BB2,BB1,BB2,7,0),COLOR555500,PRECIS2,LAYER0;STICKLINE(BB1<=BB2,BB1,BB2,6,0),COLOR757500,PRECIS2,LAYER0;STICKLINE(BB1<=BB2,BB1,BB2,5,0),COLOR858500,PRECIS2,LAYER0;

解答：

 RSV1:=(CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100;