Help - Search - Members - Calendar
Full Version: COP OP XOP
Visual Trading Systems User Forums > VTTRADER INDICATORS > NEW INDICATORS POSTINGS
Claude
Hello
Today I decided to post an indicator which I first read about while reading Joe DiNapoli book. There are Fibonacci trading platforms that offer a this indicator. It is called the cop op xop. You give the indicator the levels of an ABC swing and it project three targets. I've added one target as I find Joe's final target high for the timeframe I trade. The four targets are all based on Fibonacci projections for the ABC swing. The projections will always be in the direction of the AB swing. Where to set my limit has always been hard this gives targets. For more information on this indicator you can just do a search.
Have fun
cg985
Hi Claude, when I try to download the file it is asking for a password. Can you help?

Regards, Sirch
cskidmore
Hello,

cg985: After downloading the .vtscr file to your PC do not try to open it... instead, login to VTtrader and open the Indicator Builder. Click the import button and select the newly downloaded file from your PC. You'll then see the file appear in your indicators list. After you're done importing you'll be able to add it to a chart.

Regards,
Chris
Bemac
Since it looks like this thread may be re-visited, I have attached a Mod of Claude's COP OP XOP.



cskidmore
Thanks Bemac.

Regards,
Chris
Medvedok
Dear Bemac, dear Cris!

I've downloaded and added COP OP XOP levels to my VT but when I tryed to add indicator on screen I got message:

Error in studies in compillation with message
"Undeclared identifier: ;"

Could you tell me what's wrong in downloaded code. Thank you very much!

-----------------


Indicator's code:

{/// Bemac September 2005 \\\}
{Thanks to Claude for the Date, Time syntax
and also for posting the Cop OP Xop indicator.}

{**Determine the Date & Time of 3 Bars on the Chart**}

{Start Bar}
AfmDay :=IF(ADate=0, ValueWhen(1,*beep*(1)=1,DayOfMonth()), Int( ADate/10000));
AfmMonth:=IF(ADate=0, ValueWhen(1,*beep*(1)=1,Month()) , Int((ADate-AfmDay*10000) /100));
AfmYear :=IF(ADate=0, ValueWhen(1,*beep*(1)=1,Year()) , Int( ADate-Int(ADate/100)*100));
AfmYear :=IF(AfmYear<100
,If(AfmYear<40,AfmYear+2000,AfmYear+1900)
,AfmYear);
Astart :=((DayOfMonth()>=AfmDay AND Month()=AfmMonth AND Year()=AfmYear)
OR (Month()>AfmMonth AND Year()=AfmYear)
OR Year() >AfmYear) AND (Hour()>=Ahour AND Minute()>=AMinute);

Astarttime:= Highest(Astart);
{*********************}
{Middle Bar}
BfmDay :=IF(BDate=0, ValueWhen(1,*beep*(1)=1,DayOfMonth()), Int( BDate/10000));
BfmMonth:=IF(BDate=0, ValueWhen(1,*beep*(1)=1,Month()) , Int((BDate-BfmDay*10000) /100));
BfmYear :=IF(BDate=0, ValueWhen(1,*beep*(1)=1,Year()) , Int( BDate-Int(BDate/100)*100));
BfmYear :=IF(BfmYear<100
,If(BfmYear<40,BfmYear+2000,BfmYear+1900)
,BfmYear);
Bstart :=((DayOfMonth()>=BfmDay AND Month()=BfmMonth AND Year()=BfmYear)
OR (Month()>BfmMonth AND Year()=BfmYear)
OR Year() >BfmYear) AND (Hour()>=Bhour AND Minute()>=BMinute);

Bstarttime:= Highest(Bstart);
{****************************}
{End Bar}
CfmDay :=IF(CDate=0, ValueWhen(1,*beep*(1)=1,DayOfMonth()), Int( CDate/10000));
CfmMonth:=IF(CDate=0, ValueWhen(1,*beep*(1)=1,Month()) , Int((CDate-CfmDay*10000) /100));
CfmYear :=IF(CDate=0, ValueWhen(1,*beep*(1)=1,Year()) , Int( CDate-Int(CDate/100)*100));
CfmYear :=IF(CfmYear<100
,If(CfmYear<40,CfmYear+2000,CfmYear+1900)
,CfmYear);
Cstart :=((DayOfMonth()>=CfmDay AND Month()=CfmMonth AND Year()=CfmYear)
OR (Month()>CfmMonth AND Year()=CfmYear)
OR Year() >CfmYear) AND (Hour()>=Chour AND Minute()>=CMinute);

Cstarttime:= Highest(Cstart);
{*****************************}
{START}
BarNum:= BarCount();
Start := ValueWhen(1,Cross(Astarttime,0.5),Close);
Middle:= ValueWhen(1,Cross(Bstarttime,0.5),Close);
End := ValueWhen(1,Cross(Cstarttime,0.5),Close);
DIR := IF(Middle-Start>0,1,If(Middle-Start<0,-1,0 ));

BaseBegin:= IF( DIR>0,ValueWhen(1,Cross(Astarttime,0.5),Low)
,If(DIR<0,ValueWhen(1,Cross(Astarttime,0.5),High)
,Null));
BaseEnd:= IF(DIR>0,ValueWhen(1,Cross(Bstarttime,0.5),High),
ValueWhen(1,Cross(Bstarttime,0.5),Low));
BaseRetrace:= IF(DIR>0,ValueWhen(1,Cross(Cstarttime,0.5),Low),
ValueWhen(1,Cross(Cstarttime,0.5),High));

A:= LastValue( BaseBegin );
B:= LastValue( BaseEnd );
D:= LastValue( BaseRetrace);

opdw:= D-(A-cool.gif;
opup:= B- A+D ;
cxup:= (A-cool.gif+D ;
F1 :=0.145898; F2 :=0.236068; F3 :=0.381966; F4 :=0.465558; F5 :=0.500000; F6 :=0.534442;
F7 :=0.618034; F8 :=0.763932; F9 :=0.854102; F10:=0.909830; F11:=0.965558;
F12:=1.000000; F13:=1.145898; F14:=1.236068; F15:=1.381966; F16:=1.618034;

B14:= IF(A>B, ((OPdw-D)*F1)+D, ((D-cxup)*F1)+D) ;
B23:= IF(A>B, ((OPdw-D)*F2)+D, ((D-cxup)*F2)+D) ;
B38:= IF(A>B, ((OPdw-D)*F3)+D, ((D-cxup)*F3)+D) ;
B46:= IF(A>B, ((OPdw-D)*F4)+D, ((D-cxup)*F4)+D) ;
B50:= IF(A>B, ((OPdw-D)*F5)+D, ((D-cxup)*F5)+D) ;
B53:= IF(A>B, ((OPdw-D)*F6)+D, ((D-cxup)*F6)+D) ;
B62:= IF(A>B, ((OPdw-D)*F7)+D, ((D-cxup)*F7)+D) ;
B76:= IF(A>B, ((OPdw-D)*F8)+D, ((D-cxup)*F8)+D) ;
B85:= IF(A>B, ((OPdw-D)*F9)+D, ((D-cxup)*F9)+D) ;
B90:= IF(A>B, ((OPdw-D)*F10)+D, ((D-cxup)*F10)+D);
B96:= IF(A>B, ((OPdw-D)*F11)+D, ((D-cxup)*F11)+D);
B100:= IF(A>B, ((OPdw-D)*F12)+D, ((D-cxup)*F12)+D);
B114:= IF(A>B, ((OPdw-D)*F13)+D, ((D-cxup)*F13)+D);
B123:= IF(A>B, ((OPdw-D)*F14)+D, ((D-cxup)*F14)+D);
B138:= IF(A>B, ((OPdw-D)*F15)+D, ((D-cxup)*F15)+D);
B162:= IF(A>B, ((OPdw-D)*F16)+D, ((D-cxup)*F16)+D);

{Plot The Horizontal Lines }
Entry := MyEntryPct;
SuggEntry:= IF(A>B, ((OPdw-D)*(Entry/100))+D, ((D-cxup)*(Entry/100))+D);

Obj14 := IF(DIR>0 AND C> D , B14 , If(DIR<0 AND C< D , B14, Null));
Obj23 := IF(DIR>0 AND C> D , B23 , If(DIR<0 AND C< D , B23, Null));
Obj38 := IF(DIR>0 AND C> D , B38 , If(DIR<0 AND C< D , B38, Null));
Obj46 := IF(DIR>0 AND C> SuggEntry, B46 , If(DIR<0 AND C< SuggEntry, B46, Null));
Obj50 := IF(DIR>0 AND C> Obj38 , B50 , If(DIR<0 AND C< Obj38 , B50, Null));
Obj53 := IF(DIR>0 AND C> Obj46 , B53 , If(DIR<0 AND C< Obj46 , B53, Null));
Obj62 := IF(DIR>0 AND C> Obj50 , B62 , If(DIR<0 AND C< Obj50 , B62, Null));
Obj76 := IF(DIR>0 AND C> Obj53 , B76 , If(DIR<0 AND C< Obj53 , B76, Null));
Obj85 := IF(DIR>0 AND C> Obj62 , B85 , If(DIR<0 AND C< Obj62 , B85, Null));
Obj90 := IF(DIR>0 AND C> Obj76 , B90 , If(DIR<0 AND C< Obj76 , B90, Null));
Obj96 := IF(DIR>0 AND C> Obj85 , B96 , If(DIR<0 AND C< Obj85 , B96, Null));
Obj100:= IF(DIR>0 AND C> Obj90 , B100, If(DIR<0 AND C< Obj90 , B100, Null));
Obj114:= IF(DIR>0 AND C> Obj96 , B114, If(DIR<0 AND C< Obj96 , B114, Null));
Obj123:= IF(DIR>0 AND C> Obj100 , B123, If(DIR<0 AND C< Obj100 , B123, Null));
Obj138:= IF(DIR>0 AND C> Obj114 , B138, If(DIR<0 AND C< Obj114 , B138, Null));
Obj162:= IF(DIR>0 AND C> Obj123 , B162, If(DIR<0 AND C< Obj123 , B162, Null));


CompStart := IF(Cross(Astarttime,0.5),MedianPrice,Null);
CompEnd := IF(Cross(Bstarttime,0.5),MedianPrice,Null);
StartBar := ValueWhen(1,Cross(Astarttime,0.5),BarNum);
MidBar := ValueWhen(1,Cross(Bstarttime,0.5),BarNum);
EndBar := ValueWhen(1,Cross(Cstarttime,0.5),BarNum);
Periods := (MidBar - StartBar) + 1;
HorizCompLow := IF(BarNum= EndBar,LLV(L ,Periods),Null);
HorizCompHigh := IF(BarNum= EndBar,HHV(H ,Periods),Null);
HorizCompRange := ValueWhen(1,BarNum= EndBar,HorizCompHigh-HorizCompLow);

{Plot The vertical Lines as Dots
VertLinesOnePct:= Periods/100;
VLOP:= Periods/100;}
V14 := IF(Barnum = Int(EndBar+ (Periods*F1)) , Obj14 , Null);
V23 := IF(Barnum = Int(EndBar+ (Periods*F2)) , Obj23 , Null);
V38 := IF(Barnum = Int(EndBar+ (Periods*F3)) , Obj38 , Null);
V46 := IF(Barnum = Int(EndBar+ (Periods*F4)) , Obj46 , Null);
V50 := IF(Barnum = Int(EndBar+ (Periods*F5)) , Obj50 , Null);
V53 := IF(Barnum = Int(EndBar+ (Periods*F6)) , Obj53 , Null);
V62 := IF(Barnum = Int(EndBar+ (Periods*F7)) , Obj62 , Null);
V76 := IF(Barnum = Int(EndBar+ (Periods*F8)) , Obj76 , Null);
V85 := IF(Barnum = Int(EndBar+ (Periods*F9)) , Obj85 , Null);
V90 := IF(Barnum = Int(EndBar+ (Periods*F10)), Obj90 , Null);
V96 := IF(Barnum = Int(EndBar+ (Periods*F11)), Obj96 , Null);
V100 := IF(Barnum = Int(EndBar+ (Periods*F12)), Obj100 , Null);
V114 := IF(Barnum = Int(EndBar+ (Periods*F13)), Obj114 , Null);
V123 := IF(Barnum = Int(EndBar+ (Periods*F14)), Obj123 , Null);
V138 := IF(Barnum = Int(EndBar+ (Periods*F15)), Obj138 , Null);
V162 := IF(Barnum = Int(EndBar+ (Periods*F16)), Obj162 , Null);






cskidmore
Hello,

The LastValue() function was broken so we removed it in VT Trader 1.8.1. Change the following code:

A:= LastValue( BaseBegin );
B:= LastValue( BaseEnd );
D:= LastValue( BaseRetrace);

To...

A:= BaseBegin;
B:= BaseEnd;
D:= BaseRetrace;

And save the indicator. Then, attach to a chart and test again. It "should" work, but please note that I didn't originally code this one.

Regards,
Chris
Bemac
Your right Chris.

Thanks for replying

I Notice there have been 41 dnlds since I posted this Ind.

If you still would like to use it, you should make the changes suggested by Chris.

Bemac
VT2
It seems this indicator is not adapted to VT2?
cskidmore
Hello,

VT2, you'll need to download the indicator and then make the changes mentioned in this topic. You may also need to locate each instance of PREV in the code (if there are any) and change them to PREV(0). Note: These issues aren't specific to VT Trader 2.0, however.

Regards,
Chris
Bemac
QUOTE(cskidmore @ Oct 24 2008, 06:33 AM) *

Hello,

VT2, you'll need to download the indicator and then make the changes mentioned in this topic. You may also need to locate each instance of PREV in the code (if there are any) and change them to PREV(0). Note: These issues aren't specific to VT Trader 2.0, however.

Regards,
Chris
Hi Chris; been a while. sad.gif

Any "Code issues" in Latest Version? Just thought I would be selfish enough to ask before reading the Release notes & dnlding... rolleyes.gif

You know who...
cskidmore
Hi Bemac,

Nice to see you around! I hope all is going well for you. To my knowledge, there shouldn't be any code issues aside from the ones listed. The biggest change is the PREV function. Its changes are described in detail on its help manual page. A few other functions have been optimized for better performance (SignalFlag() and SignalRemove()), but not much else has changed in the language yet (unfortunately). smile.gif

Regards,
Chris
Bemac
QUOTE(cskidmore @ Oct 27 2008, 09:24 PM) *

Hi Bemac,

Nice to see you around! I hope all is going well for you. To my knowledge, there shouldn't be any code issues aside from the ones listed. The biggest change is the PREV function. Its changes are described in detail on its help manual page. A few other functions have been optimized for better performance (SignalFlag() and SignalRemove()), but not much else has changed in the language yet (unfortunately). smile.gif

Regards,
Chris
Hello again, friend of old. All is well as I hope it is with you and yours.
People who talk of "Longevity in this game" should quote your name.

Intentions are to re-aquaint myself with VT and it's parameters. {been on a soujourne}.

Open Forums have thier place BUT There is a Lot to be said regarding the few Moderated Forums that are still around.

Question:
Why has vtsystems never opened at least, One "Market Discussion" thread? Wild & Wooly & unmoderated till post POST.

Take care of you & yours Chris and I hope to contribute to your growth in the forthcoming future.

BMc
Anonymous
cskidmore,


Would you be able to edit this indicator? I looked at the code but it didn't contain any PREV values.

It doesn't appear on the chart.

Thanks.
cskidmore
Hello,

Did you make the code modifications mentioned in post #7 of this topic?

Regards,
Chris
Anonymous
QUOTE(cskidmore @ Dec 15 2009, 10:48 PM) *

Hello,

Did you make the code modifications mentioned in post #7 of this topic?

Regards,
Chris


Yes, I did. The indicator still did not show up.

Regards.
cskidmore
Hello,

If you're using Bemac's version of the indicator, you need to be certain that you set up the input properties correctly as well. You cannot leave them as their 'default' values. Unfortunately, beyond that I don't have any experience using this indicator or creating it.

Regards,
Chris
cskidmore
Hello,

After playing with the indicator a little bit, it seems that this indicator was a (very good) solution to the lack of the Fibonacci Expansion drawing tool in VT Trader. However, it's not really necessary any longer since VT Trader now includes such a tool. I've attached a screenshot that shows Bemac's indicator alongside the Fibonacci Expansion drawing tool. I've used the same 3 bars/candles for the drawing tool and the CopOpXop indicator and you can see that the levels produced are identical (or would be if I had enabled some additional levels in the Fib. Expansion tool).

Regards,
Chris
sajtzaupoznavanje
ok, i want to ask 2 stupid questions;
1= what are the changes in the TV did any changes happend or changed
if yes ,then what are those changes cause i only see changes in the artistry
2= are there any new regulations or changes in the execution

cause it very hard for me to read all that are placed in this forum about the cop , i want just a summary for the new changes
cskidmore
Hello,

I apologize, but I don't understand your questions. This custom indicator is no longer needed since VT Trader includes a Fibonacci Expansion drawing tool which performs the same functions as this indicator did, but does so much more elegantly.

With regards to changes made to VT Trader, you can find the release notes for every VT Trader software release in the "New VT Trader Software Version Releases" forum here at: http://forum.vtsystems.com/index.php?showforum=2. All versions of VT Trader from 2.2.0.48 and newer are the Forex.com-compatible editions of VT Trader.

Regards,
Chris

QUOTE(sajtzaupoznavanje @ Nov 11 2011, 09:39 AM) *

ok, i want to ask 2 stupid questions;
1= what are the changes in the TV did any changes happend or changed
if yes ,then what are those changes cause i only see changes in the artistry
2= are there any new regulations or changes in the execution

cause it very hard for me to read all that are placed in this forum about the cop , i want just a summary for the new changes

This is a "lo-fi" version of our main content. To view the full version with more information, formatting and images, please click here.
Invision Power Board © 2001-2012 Invision Power Services, Inc.