TimeStamping Market Text or Tape Timestamp of events punctuating daily quotation prices

The “Timestamping market text” will find its use for traders performing Intraday transactions, real “post-it” it informs you by short texts the fixing, closing or opening hours of different types of markets (Futures, Equities, Market free or CFD). It can be placed in the top banner or under the price chart. His counterpart “Timestamping market tape” is a watered down version employing different colors that can be added below the course graph.

Of course the use of both programs is quite possible. The two images attached to view the addition of the file in the price chart (for example for institutional) or as suggested in the documentary, one top banner at the top of the graph and the other below the course graph

// TimeStamping Market Text | Dashboard
// 20/05/2019 (Release 1.0)
// Swapping @ www.forexswap.fr
// Sharing ProRealTime knowledge | Market Fixing

DefParam DrawOnLastBarOnly = true

Xoffset = (OffsetText)            // Distance entre Texte et Bord droit du tableau (4 par défaut)
//BackColor = 0                   // Case à cocher pour couleur de fond (inactif par défaut)
// --- Init
BackgroundColor(255,255,255,255)
OffsetText = max(1,OffsetText)
OffsetText = min(200,OffsetText)
// --- end

// Horodatage des tableaux annonces
if time >= 071500 and time <= 085959 then
DrawText("Cumul ordres",barindex[48]-(Xoffset),0.5,MonoSpaced,Bold,20) coloured(250,110,0)
DrawText("Hors transaction",barindex[48]-(Xoffset),0.2,Dialog,Standard,17) coloured(250,110,0)
DrawText("07h15 - 09h00",barindex[48]-(Xoffset),-0.2,Dialog,Standard,15) coloured(250,110,0)
DrawText("Pré-ouverture",barindex[48]-(Xoffset),-0.5,Dialog,Standard,15) coloured(250,110,0)
DrawRectangle(barindex[60]-(Xoffset),- 0.8,barindex[35]-(Xoffset),0.8) coloured(250,110,0)
endif
if time >= 080000 and time <= 220000 then
DrawText("Futures",barindex[14]-(Xoffset),0.5,MonoSpaced,Bold,20) coloured(10,160,0)
DrawText("Cotation en continu",barindex[14]-(Xoffset),0.2,Dialog,Standard,17) coloured(10,160,0)
DrawText("08h00 - 22h00",barindex[14]-(Xoffset),-0.2,Dialog,Standard,15) coloured(10,160,0)
DrawText("Séance active",barindex[14]-(Xoffset),-0.5,Dialog,Standard,15) coloured(10,160,0)
DrawRectangle(barindex[27]-(Xoffset),- 0.8,barindex[2]-(Xoffset),0.8) coloured(10,160,0)
endif
if time >= 090000 and time <= 173400 then
DrawText("CFD Actions",barindex[48]-(Xoffset),0.5,MonoSpaced,Bold,20) coloured(0,160,250)
DrawText("Heures de cotation",barindex[48]-(Xoffset),0.2,Dialog,Standard,17) coloured(0,160,250)
DrawText("09h00 - 17h30",barindex[48]-(Xoffset),-0.2,Dialog,Standard,15) coloured(0,160,250)
DrawText("Séance active",barindex[48]-(Xoffset),-0.5,Dialog,Standard,15) coloured(0,160,250)
DrawRectangle(barindex[60]-(Xoffset),- 0.8,barindex[35]-(Xoffset),0.8) coloured(0,160,250)
endif
if time >= 103000 and time <= 103500 then
DrawText("Compart.ABC",barindex[80]-(Xoffset),0.5,MonoSpaced,Bold,20) coloured(250,110,0)
DrawText("Premier Fixing",barindex[80]-(Xoffset),0.2,Dialog,Standard,17) coloured(250,110,0)
DrawText("10h30",barindex[80]-(Xoffset),-0.2,Dialog,Standard,15) coloured(250,110,0)
DrawText("Séance suspendue",barindex[80]-(Xoffset),-0.5,Dialog,Standard,15) coloured(250,110,0)
DrawRectangle(barindex[93]-(Xoffset),- 0.8,barindex[68]-(Xoffset),0.8) coloured(250,110,0)
endif
if time >= 105500 and time <= 110100 then
DrawText("Obligations",barindex[80]-(Xoffset),0.5,MonoSpaced,Bold,20) coloured(250,110,0)
DrawText("Fixing A",barindex[80]-(Xoffset),0.2,Dialog,Standard,17) coloured(250,110,0)
DrawText("11h00",barindex[80]-(Xoffset),-0.2,Dialog,Standard,15) coloured(250,110,0)
DrawText("Séance suspendue",barindex[80]-(Xoffset),-0.5,Dialog,Standard,15) coloured(250,110,0)
DrawRectangle(barindex[93]-(Xoffset),- 0.8,barindex[68]-(Xoffset),0.8) coloured(250,110,0)
endif
if time >= 155500 and time <= 160000 then
DrawText("Compart.ABC",barindex[80]-(Xoffset),0.5,MonoSpaced,Bold,20) coloured(250,110,0)
DrawText("Second Fixing",barindex[80]-(Xoffset),0.2,Dialog,Standard,17) coloured(250,110,0)
DrawText("16h00",barindex[80]-(Xoffset),-0.2,Dialog,Standard,15) coloured(250,110,0)
DrawText("Fin de Séance",barindex[80]-(Xoffset),-0.5,Dialog,Standard,15) coloured(250,110,0)
DrawRectangle(barindex[93]-(Xoffset),- 0.8,barindex[68]-(Xoffset),0.8) coloured(250,110,0)
endif
if time >= 162000 and time <= 162959 then
DrawText("Marché Libre",barindex[80]-(Xoffset),0.5,MonoSpaced,Bold,20) coloured(250,110,0)
DrawText("Pré-clôture",barindex[80]-(Xoffset),0.2,Dialog,Standard,17) coloured(250,110,0)
DrawText("16h25",barindex[80]-(Xoffset),-0.2,Dialog,Standard,15) coloured(250,110,0)
DrawText("Fin de Séance",barindex[80]-(Xoffset),-0.5,Dialog,Standard,15) coloured(250,110,0)
DrawRectangle(barindex[93]-(Xoffset),- 0.8,barindex[68]-(Xoffset),0.8) coloured(250,110,0)
endif
if time >= 163000 and time <= 163500 then
DrawText("Marché Libre",barindex[80]-(Xoffset),0.5,MonoSpaced,Bold,20) coloured(190,10,0)
DrawText("Fixing de clôture",barindex[80]-(Xoffset),0.2,Dialog,Standard,17) coloured(190,10,0)
DrawText("16h30",barindex[80]-(Xoffset),-0.2,Dialog,Standard,15) coloured(190,10,0)
DrawText("Séance clôturée",barindex[80]-(Xoffset),-0.5,Dialog,Standard,15) coloured(190,10,0)
DrawRectangle(barindex[93]-(Xoffset),- 0.8,barindex[68]-(Xoffset),0.8) coloured(190,10,0)
endif
if time >= 172500 and time <= 173000 then
DrawText("Marché Libre",barindex[80]-(Xoffset),0.5,MonoSpaced,Bold,20) coloured(190,10,0)
DrawText("Compartiment A,B,C",barindex[80]-(Xoffset),0.2,Dialog,Standard,17) coloured(190,10,0)
DrawText("17h30",barindex[80]-(Xoffset),-0.2,Dialog,Standard,15) coloured(190,10,0)
DrawText("Fixing de clôture",barindex[80]-(Xoffset),-0.5,Dialog,Standard,15) coloured(190,10,0)
DrawRectangle(barindex[93]-(Xoffset),- 0.8,barindex[68]-(Xoffset),0.8) coloured(190,10,0)
endif
if time >= 173500 and time <= 174500 then
DrawText("Cumul Ordres",barindex[45]-(Xoffset),0.5,MonoSpaced,Bold,20) coloured(190,10,0)
DrawText("Compensation",barindex[45]-(Xoffset),0.2,Dialog,Standard,17) coloured(190,10,0)
DrawText("17h35 - 17h45",barindex[45]-(Xoffset),-0.2,Dialog,Standard,15) coloured(190,10,0)
DrawText("Séance clôturée",barindex[45]-(Xoffset),-0.5,Dialog,Standard,15) coloured(190,10,0)
DrawRectangle(barindex[58]-(Xoffset),- 0.8,barindex[33]-(Xoffset),0.8) coloured(190,10,0)
endif
if time >= 213000 and time <= 215459 then
DrawText("Futures",barindex[12]-(Xoffset),0.5,MonoSpaced,Bold,20) coloured(190,10,0)
DrawText("Reste 30mn",barindex[12]-(Xoffset),0.2,Dialog,Standard,17) coloured(190,10,0)
DrawText("09h00 - 22h00",barindex[12]-(Xoffset),-0.2,Dialog,Standard,15) coloured(190,10,0)
DrawText("Séance active",barindex[12]-(Xoffset),-0.5,Dialog,Standard,15) coloured(190,10,0)
DrawRectangle(barindex[25]-(Xoffset),- 0.8,barindex[0]-(Xoffset),0.8) coloured(190,10,0)
endif
if time >= 215500 and time <= 220500 then
DrawText("Futures",barindex[12]-(Xoffset),0.5,MonoSpaced,Bold,20) coloured(190,10,0)
DrawText("Reste 5mn",barindex[12]-(Xoffset),0.2,Dialog,Standard,17) coloured(190,10,0)
DrawText("09h00 - 22h00",barindex[12]-(Xoffset),-0.2,Dialog,Standard,15) coloured(190,10,0)
DrawText("Compensation",barindex[12]-(Xoffset),-0.5,Dialog,Standard,15) coloured(190,10,0)
DrawRectangle(barindex[25]-(Xoffset),- 0.8,barindex[0]-(Xoffset),0.8) coloured(190,10,0)
endif
if time >= 220500 and time <= 221000 then
DrawText("Futures",barindex[12]-(Xoffset),0.5,MonoSpaced,Bold,20) coloured(190,10,0)
DrawText("Arrêt de cotation",barindex[12]-(Xoffset),0.2,Dialog,Standard,17) coloured(190,10,0)
DrawText("09h00 - 22h00",barindex[12]-(Xoffset),-0.2,Dialog,Standard,15) coloured(190,10,0)
DrawText("Séance clôturée",barindex[12]-(Xoffset),-0.5,Dialog,Standard,15) coloured(190,10,0)
DrawRectangle(barindex[25]-(Xoffset),- 0.8,barindex[0]-(Xoffset),0.8) coloured(190,10,0)
endif

// Horodatage des évènements
if BackColor = 1 then
if time >= 071500 and time <= 075959 then     // Pré ouverture Futures
BackgroundColor(10,190,0,30)               // vert clair
elsif time >= 080000 and time <= 085959 then  // Ouverture Futures
BackgroundColor(10,190,0,80)               // vert
elsif time >= 090000 and time <= 102959 then  // Ouverture CFD, Actions
BackgroundColor(0,160,250,70)              // bleu
elsif time >= 103000 and time <= 103459 then  // Marché Libre Fixing A 10h30
BackgroundColor(250,160,0,100)             // jaune
elsif time >= 103500 and time <= 155459 then  // CFD actif 09h00-17h30
BackgroundColor(0,160,250,70)              // bleu
elsif time >= 155500 and time <= 155959 then  // Marché Libre Fixing B 16h00
BackgroundColor(250,160,0,100)             // jaune
elsif time >= 160000 and time <= 161959 then  // CFD actif 09h00-17h30
BackgroundColor(0,160,250,70)              // bleu
elsif time >= 162000 and time <= 162959 then  // Marché Libre Pré clôture 16h25
BackgroundColor(250,160,0,100)             // jaune
elsif time >= 163000 and time <= 163459 then  // Marché Libre Fixing clôture 16h30
BackgroundColor(190,10,0,150)              // rouge
elsif time >= 163500 and time <= 172459 then  // CFD actif 09h00-17h30
BackgroundColor(0,160,250,70)              // bleu
elsif time >= 172500 and time <= 172959 then  // Marché Libre Compartiment A,B,C 17h30
BackgroundColor(190,10,0,80)               // rouge clair
elsif time >= 173000 and time <= 173459 then  // CFD Reste 5mn de cours
BackgroundColor(190,10,0,130)              // rouge clair
elsif time >= 173500 and time <= 174459 then  // CFD Séance clôturée
BackgroundColor(190,10,0,190)              // rouge vif
elsif time >= 174500 and time <= 212959 then  // Futures 08h00-22h00
BackgroundColor(10,190,0,80)               // vert
elsif time >= 213000 and time <= 214959 then  // Futures Reste 30mn de cours
BackgroundColor(190,10,0,30)               // rouge rose
elsif time >= 215000 and time <= 215959 then  // Futures Compensation des cours
BackgroundColor(190,10,0,80)               // rouge clair
elsif time >= 220000 and time <= 221000 then  // Futures Arrêt de cotation
BackgroundColor(190,10,0,190)              // rouge vif
endif
endif

// --- "current date" European format (supprimer "REM" en début des 4 lignes suivantes pour activer l'affichage)
REM cday   = day
REM cmonth = month
REM cyear  = year
REM DrawText("#cDay#/#cMonth#/#cYear#",barindex,-0.85,Dialog,Italic,12)

return

In view of its simplicity, it is possible to modify at your convenience the contents of the texts, to add or translate into another language…

For any questions about the program “Time Stamping Market” please make your request here ► https://www.prorealcode.com/topic/time-stamping-market/