[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Omega-World Junk



PureBytes Links

Trading Reference Links

Input:JK1(012279);
If JK1=012279 and CurrentDate<=980601

  then begin;
IF H<H[1] and H[1]<H[2] and L<L[1] and L[1]<L[2] Then Buy Highest(o,2)+1 
point Stop;
IF H>H[1] and H[1]>H[2] and L>L[1] and L[1]>L[2] Then Sell Lowest(o,2)- 
1 point Stop;
end;
If JK1=053152  then begin;
IF H<H[1] and H[1]<H[2] and L<L[1] and L[1]<L[2] Then Buy Highest(o,2)+1 
point Stop;
IF H>H[1] and H[1]>H[2] and L>L[1] and L[1]>L[2] Then Sell Lowest(o,2)- 
1 point Stop;
end;
{if Date > Date[1] then begin
PRINT(file("C:\pa\31"),
DATE:6:0,",",
DayOfWeek(date):1:0,",",
CurrentTime:4:0,",",
OpenPositionProfit+NetProfit,",",
NetProfit,",",
MaxidDrawdown,",",
MarketPosition:1:0);

END;}

////////////////////////////////


Input: Length(9),JK1(012279);
If JK1=012279 and CurrentDate<=980601  then begin;
IF (C of data2 >Highest(High of data2,Length)[1]) and (C[1] of data2 < 
Highest(High of data2,Length)[2]) Then Buy at Market;
IF (C of data2 < Lowest(Low of data2,Length)[1]) and (C[1] of data2> 
Lowest(Low of data2,Length)[2]) Then ExitLong at Market;
end;

If JK1=053152  then begin;
IF (C of data2 >Highest(High of data2,Length)[1]) and (C[1] of data2 < 
Highest(High of data2,Length)[2]) Then Buy at Market;
IF (C of data2 < Lowest(Low of data2,Length)[1]) and (C[1] of data2> 
Lowest(Low of data2,Length)[2]) Then ExitLong at Market;
end;
{if Date > Date[1] then begin
PRINT(file("C:\pa\30"),
DATE:6:0,",",
DayOfWeek(date):1:0,",",
CurrentTime:4:0,",",
OpenPositionProfit+NetProfit,",",
NetProfit,",",
MaxidDrawdown,",",
MarketPosition:1:0);

END;}

//////////////////////////////////


Input: PH(((H+L+C)/3*2)-L),PL(((H+L+C)/3*2)-H),Length(28),
Length2(28),JK1(012279);
If JK1=012279 and CurrentDate<=980601 then begin;
Buy Highest(PH,Length)+1 point Stop;
ExitLong Lowest(L,Length2) Stop;
Sell Lowest(PL,Length)- 1 point Stop;
ExitShort Highest(H,Length2) Stop;
end;

If JK1=053152   then begin;
Buy Highest(PH,Length)+1 point Stop;
ExitLong Lowest(L,Length2) Stop;
Sell Lowest(PL,Length)- 1 point Stop;
ExitShort Highest(H,Length2) Stop;
end;

{
if Date > Date[1] then begin
PRINT(file("C:\pa\29"),
DATE:6:0,",",
DayOfWeek(date):1:0,",",
CurrentTime:4:0,",",
OpenPositionProfit+NetProfit,",",
NetProfit,",",
MaxidDrawdown,",",
MarketPosition:1:0);

END;}

//////////////////////////////////


Input: VarA(9),JK1(012279);
If JK1=012279 and CurrentDate<=980601  then begin;
IF C of data2 <Average(C of data2,VarA) Then Buy at Market;
IF C of data2 >Average(C of data2,VarA) Then Sell at Market;
end;

If JK1=053152  then begin;
IF C of data2 <Average(C of data2,VarA) Then Buy at Market;
IF C of data2 >Average(C of data2,VarA) Then Sell at Market;
end;
{
if Date > Date[1] then begin
PRINT(file("C:\pa\28"),
DATE:6:0,",",
DayOfWeek(date):1:0,",",
CurrentTime:4:0,",",
OpenPositionProfit+NetProfit,",",
NetProfit,",",
MaxidDrawdown,",",
MarketPosition:1:0);

END;}

///////////////////////////////

Input: VarA(5),VarB(4),VarC(3),JK1(012279);
If JK1=012279 and CurrentDate<=980601 then begin;
IF (DayOfWeek(date)=VarA and C < Average(C,3)) OR (DayOfWeek(date)=VarB 
and C > Average(C,3)) OR (DayOfWeek(Date)=VarC and C >Average(C,3)) Then 
Buy at Market;
end;
If JK1=053152  then begin;
IF (DayOfWeek(date)=VarA and C < Average(C,3)) OR (DayOfWeek(date)=VarB 
and C > Average(C,3)) OR (DayOfWeek(Date)=VarC and C >Average(C,3)) Then 
Buy at Market;
end;
{if Date > Date[1] then begin
PRINT(file("C:\pa\27"),
DATE:6:0,",",
DayOfWeek(date):1:0,",",
CurrentTime:4:0,",",
OpenPositionProfit+NetProfit,",",
NetProfit,",",
MaxidDrawdown,",",
MarketPosition:1:0);

END;}

////////////////////////////////


Input: Input1(45),Input2(45),JK1(012279);
If JK1=012279 and CurrentDate<=980601 then begin;
IF  L > Average(H,Input2)  Then Buy at Market;
IF  H<Average(L,Input1) Then Sell at Market;
end;
If JK1=053152  then begin;
IF  L > Average(H,Input2)  Then Buy at Market;
IF  H<Average(L,Input1) Then Sell at Market;
end;
{if Date > Date[1] then begin
PRINT(file("C:\pa\26"),
DATE:6:0,",",
DayOfWeek(date):1:0,",",
CurrentTime:4:0,",",
OpenPositionProfit+NetProfit,",",
NetProfit,",",
MaxidDrawdown,",",
MarketPosition:1:0);

END;}


//////////////////////////////////


Input: Input1(45),Input2(60),JK1(012279);
If JK1=012279 and CurrentDate<=980601 then begin;
IF  L > Average(H,Input2)  Then Buy at Market;
IF  H<Average(L,Input1) Then Sell at Market;
end;
If JK1=053152  then begin;
IF  L > Average(H,Input2)  Then Buy at Market;
IF  H<Average(L,Input1) Then Sell at Market;
end;



{
if Date > Date[1] then begin
PRINT(file("C:\pa\25"),
DATE:6:0,",",
DayOfWeek(date):1:0,",",
CurrentTime:4:0,",",
OpenPositionProfit+NetProfit,",",
NetProfit,",",
MaxidDrawdown,",",
MarketPosition:1:0);

END;
}

//////////////////////////////////


Input: Input1(45),Input2(45),JK1(012279);
If JK1=012279 and CurrentDate<=980601 then begin;
IF  L > Average(H,Input2)  Then Buy at Market;
IF  H<Average(L,Input1) Then Sell at Market;
end;

If JK1=053152  then begin;
IF  L > Average(H,Input2)  Then Buy at Market;
IF  H<Average(L,Input1) Then Sell at Market;
end;

{
if Date > Date[1] then begin
PRINT(file("C:\pa\24"),
DATE:6:0,",",
DayOfWeek(date):1:0,",",
CurrentTime:4:0,",",
OpenPositionProfit+NetProfit,",",
NetProfit,",",
MaxidDrawdown,",",
MarketPosition:1:0);

END;}


//////////////////////////////////


Input: Input1(65),Input2(50 ),JK1(012279);
If JK1=012279 and CurrentDate<=980601 then begin;
IF  L > Average(H,Input2)  Then Buy at Market;
IF  H<Average(L,Input1) Then Sell at Market;
end;
If JK1=053152   then begin;
IF  L > Average(H,Input2)  Then Buy at Market;
IF  H<Average(L,Input1) Then Sell at Market;
end;
{if Date > Date[1] then begin
PRINT(file("C:\pa\23"),
DATE:6:0,",",
DayOfWeek(date):1:0,",",
CurrentTime:4:0,",",
OpenPositionProfit+NetProfit,",",
NetProfit,",",
MaxidDrawdown,",",
MarketPosition:1:0);

END;
}



///////////////////////////////////


Input:JK1(012279);
If JK1=012279 and CurrentDate<=980601  then begin;
IF DayOfWeek(Date)=5 and C < Average(C,3) Then Buy at Market;
end;
If JK1=053152   then begin;
IF DayOfWeek(Date)=5 and C < Average(C,3) Then Buy at Market;
end;
{

if Date > Date[1] then begin
PRINT(file("C:\pa\22"),
DATE:6:0,",",
DayOfWeek(date):1:0,",",
CurrentTime:4:0,",",
OpenPositionProfit+NetProfit,",",
NetProfit,",",
MaxidDrawdown,",",
MarketPosition:1:0);

END;}


////////////////////////////////////

Input:JK1(012279);
If JK1=012279 and CurrentDate<=980601 then begin;
IF C <H-(Range/6) and C >C[1] Then Buy h Stop;
IF C >L+(Range/6) and C < C[1] Then Sell l Stop;
end;

If JK1=053152   then begin;
IF C <H-(Range/6) and C >C[1] Then Buy h Stop;
IF C >L+(Range/6) and C < C[1] Then Sell l Stop;
end;
{
if Date > Date[1] then begin
PRINT(file("C:\pa\21"),
DATE:6:0,",",
DayOfWeek(date):1:0,",",
CurrentTime:4:0,",",
OpenPositionProfit+NetProfit,",",
NetProfit,",",
MaxidDrawdown,",",
MarketPosition:1:0);

END;
}


/////////////////////////////////////

Input: VarA(5),JK1(012279);
If JK1=012279 and CurrentDate<=980601 then begin;
IF C >C[1]  Then Buy C + (Range*0.9) Stop;
IF MarketPosition=1 and BarsSinceEntry>=VarA-1 
Then ExitLong at Market;
IF C < C[1]  Then Sell C-(Range *1.8) Stop;
IF MarketPosition=-1 and BarsSinceEntry>=VarA-1
 Then ExitShort at Market;
end;

If JK1=053152   then begin;
IF C >C[1]  Then Buy C + (Range*0.9) Stop;
IF MarketPosition=1 and BarsSinceEntry>=VarA-1 
Then ExitLong at Market;
IF C < C[1]  Then Sell C-(Range *1.8) Stop;
IF MarketPosition=-1 and BarsSinceEntry>=VarA-1
 Then ExitShort at Market;
end;

{
if Date > Date[1] then begin
PRINT(file("C:\pa\20"),
DATE:6:0,",",
DayOfWeek(date):1:0,",",
CurrentTime:4:0,",",
OpenPositionProfit+NetProfit,",",
NetProfit,",",
MaxidDrawdown,",",
MarketPosition:1:0);

END;}