Closing Price January Higher than December Close

• 05/13/2024 at 2:50 PM #232606
  Lambo

  Thank you very much Roberto.

  It Works.

  Do you have an idea how i can integrate the Idea buy “day>24”, because with the code you buy this year on 30.1 , 29.2. and 28.3, right would be 25.1, 26.2 and 25.3.

  Thanks a lot

  

  Lambo

  Participant

  Topics: 7

  Replies: 24

  Been thanked: 1 time
  05/15/2024 at 4:05 PM #232686
  Lambo

  Hello Roberto,

  i Failed to change the code for another January Strategie. Perhaps you can help me:

  If Close of January is higher than Open of January than it is allowed to buy

  on First Trading day of February and on every 25 th of every month until the end of the year

  Close trade is the same a new 200 Day High

  and SL SMA200 *0,97

   

  Thanks a lot

  It is very difficult with the tally for me.

   

  

  Lambo

  Participant

  Topics: 7

  Replies: 24

  Been thanked: 1 time
  08/15/2024 at 4:48 PM #236419
  robertogozzi

  Lambo wrote:

  Thank you very much Roberto.

  It Works.

  Do you have an idea how i can integrate the Idea buy “day>24”, because with the code you buy this year on 30.1 , 29.2. and 28.3, right would be 25.1, 26.2 and 25.3.

  Thanks a lot

  Sorry for the Delay!

  ONCE EntryDay = 24 ONCE MonthDay1 = 5 ONCE MonthDay2 = 10 ONCE Tally = 0 ONCE AboveFlag = 0 // ate the beginning of each year save the closing price of the previous year IF OpenYear <> OpenYear[1] THEN YearClose = close[1] AboveFlag = 0 ENDIF // at the beginning of each Month reset the tally of trading days to zero IF (OpenMonth <> OpenMonth[1]) THEN Tally = 0 ENDIF // each new day updates the tally IF (OpenDay <> OpenDay[1]) THEN Tally = Tally + 1 ENDIF // between day 5 and day 10 check if the price is above the previous Year's closing price IF (Tally >= MonthDay1) AND (Tally <= MonthDay2) AND (OpenMonth = 1) THEN AboveFlag = max(AboveFlag,close > YearClose) ENDIF // enter after trading day 24 if conditions are met IF (OpenDay >= EntryDay) AND AboveFlag AND Not OnMarket THEN BUY 1 CONTRACT AT MARKET ENDIF // TAKE PROFIT: exit when the price closes below DONCHIAN UP ONCE p = 20 Upper = HIGHEST[p](HIGH[1]) TPflag = close > Upper IF LongOnMarket AND TPflag THEN SELL AT MARKET ENDIF // STOP LOSS: exit when the price closes below (Sma200 - 3%) Sma200 = average[200,0](close) * 0.97 SLflag = close < Sma200 IF LongOnMarket AND SLflag THEN SELL AT MARKET ENDIF // debugging section //graphonprice YearClose coloured("Blue") //graphonprice Sma200 coloured("Fuchsia") //graph Tally //graph AboveFlag

  1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51

  ONCE EntryDay  = 24 ONCE MonthDay1 = 5 ONCE MonthDay2 = 10 ONCE Tally     = 0 ONCE AboveFlag = 0   // ate the beginning of each year save the closing price of the previous year IF OpenYear <> OpenYear[1] THEN YearClose = close[1] AboveFlag = 0 ENDIF   // at the beginning of each Month reset the tally of trading days to zero IF (OpenMonth <> OpenMonth[1]) THEN Tally     = 0 ENDIF   // each new day updates the tally IF (OpenDay <> OpenDay[1]) THEN Tally     = Tally + 1 ENDIF   // between day 5 and day 10 check if the price is above the previous Year's closing price IF (Tally >= MonthDay1) AND (Tally <= MonthDay2) AND (OpenMonth = 1) THEN AboveFlag = max(AboveFlag,close > YearClose) ENDIF   // enter after trading day 24 if conditions are met IF (OpenDay >= EntryDay) AND AboveFlag AND Not OnMarket THEN BUY 1 CONTRACT AT MARKET ENDIF   // TAKE PROFIT: exit when the price closes below DONCHIAN UP ONCE p = 20 Upper  = HIGHEST[p](HIGH[1]) TPflag = close > Upper IF LongOnMarket AND TPflag THEN SELL AT MARKET ENDIF   // STOP LOSS: exit when the price closes below (Sma200 - 3%) Sma200 = average[200,0](close) * 0.97 SLflag = close < Sma200 IF LongOnMarket AND SLflag THEN SELL AT MARKET ENDIF // debugging section //graphonprice YearClose coloured("Blue") //graphonprice Sma200    coloured("Fuchsia") //graph        Tally //graph        AboveFlag

  

  robertogozzi

  Moderator

  Topics: 69

  Replies: 17499

  Been thanked: 4258 times
  08/15/2024 at 5:08 PM #236420
  robertogozzi

  Lambo wrote:

  Hello Roberto,

  i Failed to change the code for another January Strategie. Perhaps you can help me:

  If Close of January is higher than Open of January than it is allowed to buy

  on First Trading day of February and on every 25 th of every month until the end of the year

  Close trade is the same a new 200 Day High

  and SL SMA200 *0,97

  Thanks a lot

  It is very difficult with the tally for me.

  There you go:

  DEFPARAM CumulateOrders = true // check if JANUARY is a bullish month Timeframe(Monthly) ONCE TradeOK = 0 If OpenMonth = 1 THEN TradeOK = 0 IF close > open THEN TradeOK = 1 ENDIF ENDIF // Timeframe(Daily,UpdateOnClose) // IF (OpenMonth > 1) AND TradeOK AND ((OpenMonth <> OpenMonth[1]) AND Not OnMarket) OR ((OpenMonth > 1) AND (OpenDay >= 25) AND (abs(CountOfPosition) < 2)) THEN SL = average[200,0](close) * 0.97 BUY 1 CONTRACT AT MARKET SET STOP LOSS SL ENDIF // HH = highest[200](high[1]) IF LongOnMarket AND (high >= HH) THEN SELL AT MARKET ENDIF graphonprice HH AS "new 200-day High" coloured("Blue") graphonprice SL AS "Srop Loss" coloured("Red") graphonprice TradePrice

  1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26

  DEFPARAM CumulateOrders = true // check if JANUARY is a bullish month Timeframe(Monthly) ONCE TradeOK = 0 If OpenMonth = 1 THEN    TradeOK = 0    IF close > open THEN       TradeOK = 1    ENDIF ENDIF // Timeframe(Daily,UpdateOnClose) // IF (OpenMonth > 1) AND TradeOK AND ((OpenMonth <> OpenMonth[1]) AND Not OnMarket) OR ((OpenMonth > 1) AND (OpenDay >= 25) AND (abs(CountOfPosition) < 2))  THEN    SL = average[200,0](close) * 0.97    BUY 1 CONTRACT AT MARKET    SET STOP LOSS SL ENDIF // HH = highest[200](high[1]) IF LongOnMarket AND (high >= HH) THEN    SELL AT MARKET ENDIF graphonprice HH AS "new 200-day High" coloured("Blue") graphonprice SL AS "Srop Loss"        coloured("Red") graphonprice TradePrice

  

  robertogozzi

  Moderator

  Topics: 69

  Replies: 17499

  Been thanked: 4258 times
  04/17/2025 at 9:02 AM #245998
  Lambo

  Hello Roberto,

  the code doesn’t work as estimated

  TimeFrame(Yearly)
  ClosePreviousYear = Close[1]

  with this parameter i get the information for the hole year.

  How can I get a yes for a if /else  when I prove the condition in january but I am actually in april?

  // Prüfen, ob mindestens ein Schlusskurs zwischen dem 6. und 12. Januar höher ist als der Schlusskurs des Vorjahres
  IF (Month = 1 AND (Day >= 6 AND Day <= 12) AND Close > ClosePreviousYear) THEN
  Januarbarometer = 1 // Speichert die Bedingung für das ganze Jahr

  else

  Januarbarometer = 0
  ENDIF

  // Kauforder am 25. jedes Monats, wenn Bedingung erfüllt ist
  IF NOT LongOnMarket AND Day = 25 AND Januarbarometer = 1 THEN
  BUY 1 CONTRACT AT MARKET
  ENDIF

  I didn’t get it with this one

   

  

  Lambo

  Participant

  Topics: 7

  Replies: 24

  Been thanked: 1 time
  04/17/2025 at 9:04 AM #246001
  Lambo

  TimeFrame(Yearly) ClosePreviousYear = Close[1] // Zurück zur täglichen Zeitebene TimeFrame(Daily) // Prüfen, ob mindestens ein Schlusskurs zwischen dem 6. und 12. Januar höher ist als der Schlusskurs des Vorjahres IF (Month = 1 AND (Day >= 6 AND Day <= 12) AND Close > ClosePreviousYear) THEN Januarbarometer = 1 // Speichert die Bedingung für das ganze Jahr ELSE Januarbarometer = 0 ENDIF // Kauforder am 25. jedes Monats, wenn Bedingung erfüllt ist IF NOT LongOnMarket AND Day = 25 AND Januarbarometer = 1 THEN BUY 1 CONTRACT AT MARKET ENDIF

  1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19

  TimeFrame(Yearly) ClosePreviousYear = Close[1]   // Zurück zur täglichen Zeitebene TimeFrame(Daily)   // Prüfen, ob mindestens ein Schlusskurs zwischen dem 6. und 12. Januar höher ist als der Schlusskurs des Vorjahres IF (Month = 1 AND (Day >= 6 AND Day <= 12) AND Close > ClosePreviousYear) THEN Januarbarometer = 1  // Speichert die Bedingung für das ganze Jahr ELSE Januarbarometer = 0 ENDIF       // Kauforder am 25. jedes Monats, wenn Bedingung erfüllt ist IF NOT LongOnMarket AND Day = 25 AND Januarbarometer = 1 THEN BUY 1 CONTRACT AT MARKET ENDIF

   

   

  

  Lambo

  Participant

  Topics: 7

  Replies: 24

  Been thanked: 1 time
  04/17/2025 at 9:12 AM #246002
  Lambo

  I found the mistake. I changed something in your origine code which worked. sorry

  but one thing doesn’t worked

  if the code get stopped out it buys again. The code only have to buy on the first trading day =24

  

  Lambo

  Participant

  Topics: 7

  Replies: 24

  Been thanked: 1 time
  04/17/2025 at 9:19 AM #246004
  Lambo

  // Setze den TimeFrame auf jährlich, um den Schlusskurs des Vorjahres zu speichern
  TimeFrame(Yearly)
  ClosePreviousYear = Close[1]

  // Zurück zur täglichen Zeitebene
  TimeFrame(Daily)

  ONCE EntryDay = 24
  ONCE MonthDay1 = 9
  ONCE MonthDay2 = 11
  ONCE Tally = 0
  ONCE AboveFlag = 0

  // ate the beginning of each year save the closing price of the previous year
  IF OpenYear <> OpenYear[1] THEN
  YearClose = close[1]
  AboveFlag = 0
  ENDIF

  // at the beginning of each Month reset the tally of trading days to zero
  IF (OpenMonth <> OpenMonth[1]) THEN
  Tally = 0
  ENDIF

  // each new day updates the tally
  IF (OpenDay <> OpenDay[1]) THEN
  Tally = Tally + 1
  ENDIF

  // between day 5 and day 10 check if the price is above the previous Year’s closing price
  IF (Tally >= MonthDay1) AND (Tally <= MonthDay2) AND (OpenMonth = 1) THEN AboveFlag = max(AboveFlag,close > YearClose)
  ENDIF

  // enter after trading day 24 if conditions are met
  IF (OpenDay >= EntryDay) AND AboveFlag AND Not and day<28 and day>24 THEN
  BUY 1 CONTRACT AT MARKET
  ENDIF

  if longonmarket and day>4 then
  sell at market
  endif

  

  Lambo

  Participant

  Topics: 7

  Replies: 24

  Been thanked: 1 time
  04/17/2025 at 9:22 AM #246005
  Lambo

  I use this code

  in SUP Index  i have this situation:

  ON 10 January the close is under the close of 2024. But the code buy on 27.1

   

  

  Lambo

  Participant

  Topics: 7

  Replies: 24

  Been thanked: 1 time
  04/22/2025 at 3:35 PM #246235
  robertogozzi

  What use is NOT in this line:

  IF (OpenDay >= EntryDay) AND AboveFlag AND Not and day<28 and day>24 THEN

  1	IF (OpenDay >= EntryDay) AND AboveFlag AND Not and day<28 and day>24 THEN

  ?

  

  robertogozzi

  Moderator

  Topics: 69

  Replies: 17499

  Been thanked: 4258 times
  04/23/2025 at 8:03 AM #246255
  Lambo

  Good Morning Roberto, thanks for answering. I am on SP500 Daily, so i have backtesting since 1950.

  

  Lambo

  Participant

  Topics: 7

  Replies: 24

  Been thanked: 1 time
  04/23/2025 at 8:06 AM #246256
  Lambo

  // Setze den TimeFrame auf jährlich, um den Schlusskurs des Vorjahres zu speichern TimeFrame(Yearly) ClosePreviousYear = Close[1] // Zurück zur täglichen Zeitebene TimeFrame(Daily) ONCE EntryDay = 24 ONCE MonthDay1 = 9 ONCE MonthDay2 = 11 ONCE Tally = 0 ONCE AboveFlag = 0 // ate the beginning of each year save the closing price of the previous year IF OpenYear <> OpenYear[1] THEN YearClose = close[1] AboveFlag = 0 ENDIF // at the beginning of each Month reset the tally of trading days to zero IF (OpenMonth <> OpenMonth[1]) THEN Tally = 0 ENDIF // each new day updates the tally IF (OpenDay <> OpenDay[1]) THEN Tally = Tally + 1 ENDIF // between day 5 and day 10 check if the price is above the previous Year's closing price. If it is correct you are allowed to buy every month on 25. th IF (Tally >= MonthDay1) AND (Tally <= MonthDay2) AND (OpenMonth = 1) THEN AboveFlag = max(AboveFlag,close > YearClose) ENDIF // enter after trading day 24 if conditions are met. but you only allowed to buy once in a month!!! IF day<28 and day>24 and (OpenDay >= EntryDay) AND AboveFlag AND not OnMarket THEN BUY 1 CONTRACT AT MARKET ENDIF //Exit after the month beginning if longonmarket and day>4 then sell at market endif

  1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44

  // Setze den TimeFrame auf jährlich, um den Schlusskurs des Vorjahres zu speichern TimeFrame(Yearly) ClosePreviousYear = Close[1]   // Zurück zur täglichen Zeitebene TimeFrame(Daily)   ONCE EntryDay  = 24 ONCE MonthDay1 = 9 ONCE MonthDay2 = 11 ONCE Tally     = 0 ONCE AboveFlag = 0 // ate the beginning of each year save the closing price of the previous year IF OpenYear <> OpenYear[1] THEN YearClose = close[1] AboveFlag = 0 ENDIF // at the beginning of each Month reset the tally of trading days to zero IF (OpenMonth <> OpenMonth[1]) THEN Tally     = 0 ENDIF // each new day updates the tally IF (OpenDay <> OpenDay[1]) THEN Tally     = Tally + 1 ENDIF // between day 5 and day 10 check if the price is above the previous Year's closing price. If it is correct you are allowed to buy every month on 25. th IF (Tally >= MonthDay1) AND (Tally <= MonthDay2) AND (OpenMonth = 1) THEN AboveFlag = max(AboveFlag,close > YearClose) ENDIF // enter after trading day 24 if conditions are met. but you only allowed to buy once in a month!!! IF day<28 and day>24 and (OpenDay >= EntryDay) AND AboveFlag AND not OnMarket  THEN BUY 1 CONTRACT AT MARKET ENDIF     //Exit after the month beginning if longonmarket and day>4 then sell at market endif

  

  Lambo

  Participant

  Topics: 7

  Replies: 24

  Been thanked: 1 time
  04/23/2025 at 8:07 AM #246257
  Lambo

  there was missing not on market… i put the code here.

  1 user thanked author for this post.

  robertogozzi

  

  Lambo

  Participant

  Topics: 7

  Replies: 24

  Been thanked: 1 time
• Author
  Posts