Listen-Modul: Titeln in einem Katalog entsprechend ihrer Gd50-Steigung über 42 Wochen Ränge zuteilen

Hallo Klaus,

es ist einerseits möglich im Chart-Modul einen gleichgewichteten Index zu erstellen, der die Titel eines Kataloges als Grundlage hat oder anderseits möglich im Listen-Modul Ränge zu vergeben um Titel eines Kataloges zu vergleichen. Nur im ersteren Fall gibt es Sinn das Resultat in eine WKN zu schreiben. Ich bitte Dich diesbezüglich um eine Präzisierung Deiner Fragestellung.


Chart-Modul:
Für das erste Problem kann die Formel von Herrn Goerke zum RMI bzs BMI als Vorlage dienen.

Meine nachfolgenden Ausführungen entsprechen nicht Deiner Fragestellung. Ich zeige hier wie man
Titeln in einem Katalog für deren Performace des jeweiligen Gd50 über 42Wochen einen Rang zuteilen kann, so dass eine Liste nach dem Rang sortiert werden kann.
Dein Problem lässt sich wahrscheinlich ähnlich lösen.



Listen-Modul:
Im folgenden Beispiel will ich wissen, bei welchem Titel eines Kataloges die Steigung des Gd50 über 42 Wochen den höchsten Wert hat. Dieser Titel soll dann den Rang "1" erhalten.

Tai-Pan Hauptverteiler -> Listen-Modul öffnen -> "Listen anzeigen"-Fenster mit "Abruch" schliessen. Dann im Hauptfenster gelbes Blatt mit rotem Stern -"Neue Liste anlegen" klicken -> nun öffnet sich der Listenkonfigurator.
Im Feld verfügbare Spalten eine Zeile aktivieren dann auf Tastatur "Kurz" tippen - "Kurznahme" wird nun aktiviert - mit "V" auswählen und in das untere weisse Feld einstellen. Wieder ins "Verfügbare Spalten" Feld klicken und auf Tastatur "For" tippen - "Formel" wird gewählt mit "V" nach unten - es öffnet sich "Formel bearbeiten" (müsste eigentlich "Formel-Editor" heissen...) Fenster. Dann dort wie folgt eintippen:
(alles was grün ist)


{Ich rechne die Steigung des Gd50 über ein Zeitfenster von 42 Wochen}
a2:=lastvalue(roc(sma(c,50),210,%));

{Ich suche nach einem beliebigen Titel, welchen ich als Master verwenden kann. Der Titel muss die Anzahl Elemente (Close-Kurse) haben, welche ich benötige. Im vorliegenden Beispiel 50 + 210 Tage also mindestens 260 Tage (Close-Kurse). (Denn die Zahlenreihe braucht minestens 50 Closewerte damit der Sma50 berechnet werden kann und dann 210 Sma50 Werte damit der Roc210 berechnet werden kann) Den Titel finde ich indem ich im Katalog-Modul in die Überschriften der rechten Darstellung klicke und dann über "Neu" einfach mit der Formel a1:=Count(C) eine Liste ausgebe, in welcher ich die Anzahl Kurse pro Titel sehen kann}

a_Master:=Kurse.LesenNoSync("0A0098","Close","Daily");

{Hier lese ich nun den mir passenden Titel ein. Das tue ich, damit die Berechenzeit nicht ins Unermessliche wächst. Ist es einem egal, die Liste über Stunden berechnen zu lassen, kann man das auch weglassen. Die WKN 0A0098 ist meinem Zweck entsprechend gewählt. Sie können hier eine Ihrem Zweck entsprechende WKN wählen. WKN muss in Anführungszeichen gesetzt werden.
Du kannst ohne den a_Master arbeiten. Du lässt dann diese Zeile aus. Unten bei a4:= ganz hinten in der Klammer muss Du dann ",a_Master" weg lassen. Die Synchronisation erfolgt dann in Bezug auf den obersten Titel im Katalog mit der Katalog id = 1. Hat dieser Titel nur 100 Close-Werte, weil es ein IPO ist, gibt es Probleme. Hat dieser Titel 6000 Close-Werte, braucht die Formel etwas lange für die Berechnung}

{Einlesen des Kataloges - dazu muss im "Formel Bearbeiten Editor" auf dem ersten Registerblatt als erster Parameter der Parameter Katalog eingestellt werden. Dazu den entsprechenden Eintrag ganz rechts unter "Typ" auswählen}
a_KatId:= Catalog.Open(Para.Katalog);

{Befehl Katalog Open öffnet den unter Para angegebenen Katalog. Kann jeweils beim Aufruf der Listenformel neu gewählt / eingestellt werden }

{Title.Count liest nun die Anzahl Titel des Kataloges (für Schlaufe nötig). TitLE nicht TitEL}
n:= Title.Count(a_KatId);

{Platzhalter für die Rang-Zahl. Die Rangzahl wird eine Ganzzahl sein. Ich muss VOR der Schlaufe
eine entsprechende Variable definieren, welche vom Typ Ganzzahl / integer sein muss. Tue ich das nicht, erbt a7 innerhalb der Schlaufe den Tyus der vorangehenden Variable innerhalb der Schlaufe also "Array" }
a7:integer:=0;

{Schlaufe um den jeweiligen Rang zu bestimmen}

For i:= 1 to n do
   Begin
{Lese Symbol des Titel mit Katalog_Id "i" aus Katalog}
 a3:=Title.Symbol(a_KatId,i);

{Synchronisiere mit meinem Master Titel}
 a4:=Kurse.Lesen(a3,"Close","Daily",a_Master);

{Schliesse Kurslücken beim Eingelesenen Titel}
 a5:=if(a4=Leer,prev,a4);

{Rechne wiederum Steigung Gd50, 42 Wochen von dem als Vergleich dienenen Titel
das tue ich mit der Schlaufe für jeden Katalog-Titel!}
a6:=lastvalue(roc(sma(a5,50),210,%));
 
{Berechne den Rang}
a7:=a7+if(a6 > a2,+1,+0);

{Abbruch der Schleife, wenn jener Titel, dem ich Rang zuteilen will, einen Rang über 50
erhalten würde. Da ich annehme, dass solche Titel für meine Selektion uninteressant sind
All das tue ich wieder um Rechenzeit zu kürzen}
if a7 > 50 then break else continue

{Ende der Schlaufe; "End" immer nötig wenn Befehlsfolge mit "Begin" eingeleitet}
End;

Result:=if(a7<50,a7,51);

Wichtig: Bevor die Liste nun über einen Katalog ausgeführt wird muss Du zuerst nach Aufrufen der Liste im Fenster "Liste-Anzeigen" unten auf den Schraubenschlüssel gehen und diesen Klicken. Der Listenkonfigurator erscheint. Nun die Konlone aktivieren, welche die obige Formel enthält und rechts auf "Einstellung" klicken. Im nun sich öffnenden Pop-Up muss im Trop-Down Feld natürlich der gleiche Katalog gewählt werden über welchen die Liste ausgeführt werden soll.

Hinweis: Tai-Pan ist eigentlich für das Bilden von Rängen ungeeignet. Das Programm muss zum Bestimmen des Ranges eines Titels alle anderen Titel Stück für Stück einlesen. Das muss das Programm für jeden Titel tun. Bei 50 Titel in einem Katalog kommt es also zu 50*50 = 2500 Lesevorgängen. Das frisst sehr viel Zeit. Ich empfehle daher die Liste über die Zwischenablage nach Excel zu kopieren und die Rang - Bewertung in Excel durchzuführen. Es wäre möglich mit Visual-Basic ein entsprechendes Programm zu schreiben. Mir fehlen hierzu die Kenntnisse.

MfG
DownUp

Hallo Hannes,

danke für deine erneut aufgebrachte Mühe. Natürlich ist das Chartmodul am besten geeignet, um für einen Katalog einen Wert zu berechnen und auszugeben (als Grafik oder/und als WKN). Das soll ähnlich der Berechnung des ADL oder des RSL für den gesamten Katalog erfolgen.

Die listenmäßigen Vergleiche sind so sehr einfach möglich, da dieser Durchschnitt dann ja ebenfalls eine WKN ist, genau wie anderen Wertpapiere der gleichen Liste.



Hallo Wilhelm,

so etwas hatte ich mir schon gedacht, da dieser Wunsch sicher bei allen Nutzern schon mal aufgetaucht war. - Also: Lass' uns nicht dumm sterben!


Beste Grüße euch beiden
KK

Hallo Hannes,

ich kann heute nicht mehr nachvollziehen, woher diese Programmierung stammt.
Jedenfalls verwende ich diese Formeln seit Langem, um mir einen Überblick über
die vorhandene Marktbreite (Advance/Decline) eines Kataloges zu machen.

Entsprechendes möchte ich für die durchschnittliche Kursperformance eines ges.
Marktes.

Beste Grüße
KK

{ ADLinie }
fAdvance := AdvIssues;
fDecline := DecIssues;
AD := fAdvance - fDecline;
ADLine := abs(AD + Prev);

ZielWPK := "NEWWPK" ;
KatID := Catalog.New (" !ADLINIEN2");
Title.New (KatID, ZielWPK, "NEWWPK", "", "WPArt");
Catalog.Close (KatID);
Kurse.Schreiben (ADLine, ZielWPK, "CLOSE");


PS: Die Anfrage bei Herrn Lieck betr. vorhandener (?) Lösung ist bisher unbeantwortet

Hallo Hannes,

danke für deine nächtliche Fleißarbeit. Meinem Ziel der Katalog-Performance kommen
wir wohl auch ein Stückchen näher. Trotzdem habe ich immer noch die wohl nicht ganz
unberechtigte Hoffnung, dass plötzlich eine simple, geniale Formel auftaucht. Denn frei
nach Goethe:

Alles Gescheite ist schon gedacht worden, man
muß nur versuchen, es noch einmal zu denken.

Bei den Programmierversuchen fiel mir auf, dass es eine Unmenge Formeln und Indikatoren
bereits in Taipan gibt, deren Zusammensetzung und Aussage sehr wertvoll für den täglichen
Umgang mit den großen Datenmengen wäre. Man müsste sie eben nur kennen u. anwenden
können.

Hier ist erneut die Forderung nach einem Handbuch abzuleiten

Beste Grüße
KK