飞狐个股获筹宝塔线副图指标

源码

N:=10;

Var1:=SMA(O*AMOUNT/10000000,n,1);
C0:=INTPART(Var1*1000)/1000;
B1:=REF(C0,1);B2:=REF(C0,2);B3:=REF(C0,3);B4:=REF(C0,4);B5:=REF(C0,5);B6:=REF(C0,6);B7:=REF(C0,7);
B8:=REF(C0,8);B9:=REF(C0,9);B10:=REF(C0,10);B11:=REF(C0,11);B12:=REF(C0,12);B13:=REF(C0,13);B14:=REF(C0,14);
B15:=REF(C0,15);B16:=REF(C0,16);B17:=REF(C0,17);B18:=REF(C0,18);B19:=REF(C0,19);B20:=REF(C0,20);
B21:=REF(C0,21);B22:=REF(C0,22);B23:=REF(C0,23);B24:=REF(C0,24);B25:=REF(C0,25);B26:=REF(C0,26);
B27:=REF(C0,27);B28:=REF(C0,28);B29:=REF(C0,29);B30:=REF(C0,30);B31:=REF(C0,31);B32:=REF(C0,32);
B33:=REF(C0,33);B34:=REF(C0,34);B35:=REF(C0,35);B36:=REF(C0,36);B37:=REF(C0,37);B38:=REF(C0,38);
B39:=REF(C0,39);B40:=REF(C0,40);B41:=REF(C0,41);B42:=REF(C0,42);B43:=REF(C0,43);B44:=REF(C0,44);
B45:=REF(C0,45);B46:=REF(C0,46);B47:=REF(C0,47);B48:=REF(C0,48);B49:=REF(C0,49);B50:=REF(C0,50);
HL:=IF(C0>B1 AND B1>=B2,1,IF(C0<=B2,-1,IF(C0>B2 AND B2>B1,2,IF(C0
HG:=IF(B1>B2 AND B1>B3,1,IF(B1B3 AND B2>B4,2,IF(B2
IF(B3>B4 AND B3>B5,3,IF(B3B5 AND B4>B6,4,IF(B4
IF(B5>B6 AND B5>B7,5,IF(B5B7 AND B6>B8,6,IF(B6
IF(B7>B8 AND B7>B9,7,IF(B7B9 AND B8>B10,8,IF(B8
IF(B9>B10 AND B9>B11,9,IF(B9B11 AND B10>B12,10,IF(B10
IF(B11>B12 AND B11>B13,11,IF(B11B13 AND B12>B14,12,IF(B12
IF(B13>B14 AND B13>B15,13,IF(B13B15 AND B14>B16,14,IF(B14
IF(B15>B16 AND B15>B17,15,IF(B15B17 AND B16>B18,16,IF(B16
IF(B17>B18 AND B17>B19,17,IF(B17B19 AND B18>B20,18,IF(B18
IF(B19>B20 AND B19>B21,19,IF(B19B21 AND B20>B22,20,IF(B20
IF(B21>B22 AND B21>B23,21,IF(B21B23 AND B22>B24,22,IF(B22
IF(B23>B24 AND B23>B25,23,IF(B23B25 AND B24>B26,24,IF(B24
IF(B25>B26 AND B25>B27,25,IF(B25B27 AND B26>B28,26,IF(B26
IF