N:=60;JH:=HHVBARS(H,N);YH:=BARSLAST(H=HHV(H,N));QD:=CURRBARSCOUNT=CONST(YH)+1;ZD:=CURRBARSCOUNT=CONST(JH)+1;HH:=REF(H,YH);DH:=REF(H,JH);JD:=LLVBARS(L,JH);LL:=CONST(REF(L,JD));:IF(CURRBARSCOUNT<=CONST(JH)+1,(CONST(DH)-CONST(LL))*0.618+CONST(LL),DRAWNULL),DOTLINE,COLORMAGENTA;IF(CURRBARSCOUNT<=CONST(JH)+1,CONST(DH),DRAWNULL),DOTLINE,COLORLIRED;IF(CURRBARSCOUNT<=CONST(YH)+1,CONST(HH),DRAWNULL),DOTLINE,COLORYELLOW;EXT1:DRAWLINE(QD,H,ZD,H,1),DOTLINE,COLORYELLOW;STICKLINE(QD,H,L,0,0),COLORYEL