Discussione: Scripts di esempio
-
23-01-13, 13:11 #1
Scripts di esempio
Questa discussione è dedicata alla pubblicazione di semplici scripts di esempio realizzati dagli utenti.
-
23-01-13, 13:24 #2
Flat All
Ecco un primo esempio di script (in basic):
If (CurrentStrategy.NetProfit > 500) or (CurrentStrategy.NetProfit < -500) Then CurrentStrategy.FlatAll End if
L'interpretazione dello script è:
Seil profitto della strategia è maggiore di 500 €oppurela perdita della strategia è maggiore di 500 €alloraChiudi tutte le posizioni aperte della strategia
In questo piccolo script è da notare l'utilizzo del segno negativo nella condizione relativa alla perdita netta della strategia: l'utilizzo del segno negativo rende necessario anche il cambio di operatore di confronto, da maggiore a minore.
CurrentStrategy rappresenta la strategia di FiutoPRO, ed è l'oggetto principale nel sistema di scripting. Praticamente qualsiasi oggetto, proprietà, e metodo sono accessibili a partire da CurrentStrategy.
Per accedere alle proprietà ed ai metodi di un oggetto, è necessario utilizzare il carattere punto (.).
Consiglio sempre di leggere il manuale relativo al sistema di scripting di FiutoPRO a questo indirizzo:
http://www.playoptions.it/fiuto/FPSS.pdf
Max Francario
-
23-01-13, 16:41 #3
- Data Registrazione
- Aug 2008
- Località
- Edolo (BS)
- Messaggi
- 693
Ciao Max e grazie per aver aperto questa sezione...
L'oggetto CurrentStrategy è il principale...ok fin qui tutto semplice :-)
Questo ero riuscito a farlo, ovvero far interagire ad esempio il prezzo del sottostante con la Strategia...anche se magaari in modo un pò spartano...
dim bepl1
dim close
bepl1 = CurrentStrategy.UpsideBreakEven
close = CurrentStrategy.GetMainUnderlyingPrice
if close < bepl1 then
showmessage ("Bravo")
else
showmessage ("Vaffa!")
end if
Quello che invece tutt'ora non riesco a fare è interagire ad esempio con una singola opzione all'interno di una strategia...
Immagino che dovrò prima definire la gamba, con qualcosa di simile a:
Opzione = CurrentStrategy.OPZIONECHEVOGLIO
Opzione_BEP = CurrentStrategy.OPZIONECHEVOGLIO.UpsideBreakeven
Ci sto girando intorno ma non riesco a trovare il modo giusto...
-
23-01-13, 17:13 #4
Salve,
ecco un esempio di come ottenere gli oggetti corrispondenti alle leg della strategia.
dim under as TUnderlying dim c17000 as TOption under = CurrentStrategy.GetMainUnderlying() c17000 = CurrentStrategy.GetByName("C @ 17000 03-2013") if(under.Reference > c17000.Strike) Then c17000.Buy(2, MARKET) End If
L'interpretazione dello script è la seguente:
Assegno alla variabile under l'oggetto che rappresenta il sottostante principale della strategia
Assegno alla variabile c17000 l'oggetto che rappresenta la leg il cui nome è "C @ 17000 03-2013"
Seil prezzo di riferimento dell'oggetto under è maggiore dello strike dell'oggetto c17000AlloraCompra 2 contratti di c17000 al prezzo MARKET
L'oggetto CurrentStrategy ha diversi metodi disponibili per ottenere gli oggetti che corrispondono alle gambe della strategia: GetByName (usando il nome visualizzato sulla finestra Strategy Builder), GetByIsin (usando il codice isin dello strumento), GetByID (usando il codice identificativo univoco degli strumenti), AddFuture, AddOption.
Quando si dichiarano le variabili con la parola chiave Dim, se si conosce in anticipo il tipo di dati che quelle variabili andranno a contenere, è consigliabile specificarlo.
Max Francario
-
23-01-13, 17:35 #5
- Data Registrazione
- Aug 2008
- Località
- Edolo (BS)
- Messaggi
- 693
Grazie Max!
Ok...ottimo punto di partenza :-)
-
25-01-13, 13:09 #6
- Data Registrazione
- Aug 2008
- Località
- Edolo (BS)
- Messaggi
- 693
Sono l'unico interessato allo Script??
Max...altra domandina...
Qual è il modo corretto per utilizzare la funzione:
FILTER_TIME_SESSION ?
Quello che vorrei fare è dire a Fiuto di eseguire ad esempio il FlatAll solamente se si trova all'interno degli orari della sessione che ho definito...
Ho dichiarato le sessioni così, e anche qui non so se è giusto:
DIM StartSession1 as TDateTime
DIM EndSession1 as TDatetime
StartSession1 = 0905
EndSession1 = 1725
Ripeto...non so se è corretto...
Poi però ho provato in vari modi ad inserie una condizione che richiamasse il FILTER_TIME_SESSION ma senza avere successo...
Grazie in anticipo
-
25-01-13, 13:39 #7
Salve,
uno dei modi per impostare gli orari è il seguente:
CurrentStrategy.StrategySettings.StartSession1 = (9 * ONE_HOUR) + (5 * ONE_MINUTE) CurrentStrategy.StrategySettings.EndSession1 = (17 * ONE_HOUR) + (25 * ONE_MINUTE)
FILTER_TIME_SESSION invece è una costante obsoleta, che non viene più utilizzata dal software. Sto provvedendo a modificare anche il manuale on-line con questa modifica.
Al posto di FILTER_TIME_SESSION, è possibile utilizzare la seguente proprietà:
CurrentStrategy.StrategySettings.VerifyTimeSession = true oppure CurrentStrategy.StrategySettings.VerifyTimeSession = false
In entrambi gli esempi che ho riportato si interviene direttamente sulle proprietà della strategia, le stesse visibili nella finestra di impostazione che si apre da Strategy Builder -> Setup -> Impostazioni strategia -> scheda "Sessioni".
Se invece si vuole eseguire un'operazione controllata dall'orario indipendentemente dalle impostazioni della strategia, allora è possibile utilizzare una cosa simile a quanto segue:
dim inizio as TDateTime dim fine as TDateTime dim ore as Word, minuti as Word, secondi as Word, usec as Word dim adesso as TDateTime inizio = 9 * ONE_HOUR + 15 * ONE_MINUTE fine = 17 * ONE_HOUR + 25 * ONE_MINUTE DecodeTime(Now(), ore, minuti, secondi, usec) adesso = ore * ONE_HOUR + minuti * ONE_MINUTE IF ((adesso > inizio) and (adesso < fine)) THEN MostraMessaggio("Test") END IF
Max Francario
-
25-01-13, 13:58 #8
- Data Registrazione
- Aug 2008
- Località
- Edolo (BS)
- Messaggi
- 693
Grazi ancora Max, sei stato super speedy!!
-
29-01-13, 12:58 #9
- Data Registrazione
- Aug 2008
- Località
- Edolo (BS)
- Messaggi
- 693
Rieccomi Max!
Ho altre due domandine...passo dopo passo sto costruendo....
1) Ho messo in paper una strategia con lo Script, pare che funzioni ma quando scatta l'ordine, me lo mette in Basket senza eseguirlo automaticamente.
Nei settaggi strategia ho selezionato il Flag per l'esecuzione automatica, inoltre nel codice script ho inserito questo comando, ma probabilmente c'è qualcosa di sbagliato:
dim AutoExecAutoOrders as Boolean
CurrentStrategy.StrategySettings.AutoExecAutoOrder s = True
Continua a mettermeli solo in Basket...
2) Che comando uso per farmi mandare una email ogni volta che viene eseguito un ordine? Tipo con i Workflow? Ho visto che c'è un comando ma se non erro serve solo per gli ordini a mercato reale, non quelli in paper...
Thanks
-
29-01-13, 15:02 #10
Salve,
E' necessaria soltanto questa riga:
CurrentStrategy.StrategySettings.AutoExecAutoOrders = True
Sto invece verificando quale possa essere il problema che mantiene gli ordini fermi nel basket invece che eseguirli direttamente.
Al momento non è prevista una notifica per gli ordini inviati in paper trading.
Stiamo valutando quale soluzione possiamo rendere disponibile sullo script.
Max Francario