通过该档位程序,可以测出个股的顶部位置和顶部位置。
A0:=LLV(L,P);
A1:=INTPART(A0/0.4);
A2:=(A1*0.4)+0.1;
N:IF(A2>A0,A2-0.4,A2);
D4:N+(0.4*3),LINETHICK2;
D1:N+(0.4*5);
D8:N+(0.4*7),LINETHICK2;
D2:N+(0.4*9);
D12:N+(0.4*11),LINETHICK2;
A0:=LLV(L,P);
A1:=INTPART(A0/0.4);
A2:=(A1*0.4)+0.1;
N:IF(A2>A0,A2-0.4,A2);
D4:N+(0.4*3),LINETHICK2;
D1:N+(0.4*5);
D8:N+(0.4*7),LINETHICK2;
D2:N+(0.4*9);
D12:N+(0.4*11),LINETHICK2;
S1:N+(0.4*15),POINTDOT;
D3:N+(0.4*17);
S2:N+(0.4*19),POINTDOT;
D24:N+(0.4*23),LINETHICK2;
A0:=LLV(L,P);
A1:=INTPART(A0/0.4);
A2:=(A1*0.4)+0.1;
N:IF(A2>A0,A2-0.4,A2);
D24:N+(0.4*23),LINETHICK2;
S3:N+(0.4*31),POINTDOT;
D4:N+(0.4*35);
S4:N+(0.4*39),POINTDOT;
D48:N+(0.4*47),LINETHICK2;
A0:=LLV(L,P);
A1:=INTPART(A0/0.4);
A2:=(A1*0.4)+0.1;
N:IF(A2>A0,A2-0.4,A2);
D24:N+(0.4*23),LINETHICK2;
S3:N+(0.4*31),POINTDOT;
D4:N+(0.4*35);
S4:N+(0.4*39),POINTDOT;
D48:N+(0.4*47),LINETHICK2;
S5:N+(0.4*63),POINTDOT;
D5:N+(0.4*71);
S6:N+(0.4*79),POINTDOT;
D96:N+(0.4*95),LINETHICK2;