SI
SI
discoversearch

We've detected that you're using an ad content blocking browser plug-in or feature. Ads provide a critical source of revenue to the continued operation of Silicon Investor.  We ask that you disable ad blocking while on Silicon Investor in the best interests of our community.  If you are not using an ad blocker but are still receiving this message, make sure your browser's tracking protection is set to the 'standard' level.
Strategies & Market Trends : TA-Quotes Plus

 Public ReplyPrvt ReplyMark as Last ReadFilePrevious 10Next 10PreviousNext  
To: Michael Quarne who wrote (6634)9/18/1998 6:51:00 PM
From: Roy Yorgensen  Read Replies (1) of 11149
 
Mike The old cut and paste really did that one in.
Half of the scan went away. The line you were refering to is a simple method
of defining a 'long white' body for Japanese Candlestick patterns.

Here is the entire scan again.

Input"Issue List.lst";
Output"!Morning DOJI Star.lst";
//
//Start and End were 0 on 9-16 and changed to -1 on 9-17 getting different results
//
Integer i,Start,End,NumDays; //For back test loop
Start:=-0; // Set to Oldest day for loop
End:=-0; // Set to Most recent day for loop
NumDays:=0; // Set to number of days for MovAvg etc.
DaystoLoad((Start*-1)+10);
For i=start to end
DO
//Black Body first day
If
Close(i-2)<Open(i-2)And //Black body
(Open(i-2)-Close(-2))>Open(i-2)*.03 //Longer Body
Then
//Gapping Body second day
If
Open(i-1)<Close(i-2)and
Open(i-1)<Open(i)
//Close(i-1)=Open(i-1)
Then
If
//------*********---------
//This line found CYMI & HMA on 9-16 but not after 9-17 update
Abs(Close(-1)-Open(-1))<Open(-1)*.01 //DOJI body
//Or
//-----**********---------
//This is the line that finds CYMI for 9-16 after the 9-17 update
//Open(i-1)=Close(i-1)
Then
//White body third day
If
Close(i)>Open(i)and //White body
Close(i)-Open(i)>Open(i)*.03 //Longer body
Then
// Down Trend Previously
If
Close(i-1)<Close(i-2)and
Close(i-2)<Close(i-3)and
Close(i-3)<Close(i-4)and
Close(i-4)<Close(i-5)//and
//Close(i-5)<Close(i-6)
//MovAvg(i,5,Cl)<MovAvg(i-5,5,Cl)
Then
PrintLn Symbol,",",Date(i),",","Morning Star" ,",","Reversal at Bottom";
//The following line was inserted for testing the inconsistent results
//PrintLn Open(i-2),",",Close(i-2),",",Open(i-1),",",Close(i-1),",",Open(i),",",Close(i);
EndIf;
EndIf;
EndIf;
EndIf;
EndIf;

Next i;
Report TOU ViolationShare This Post
 Public ReplyPrvt ReplyMark as Last ReadFilePrevious 10Next 10PreviousNext