Delphi ja osakedata - apua tarvitaan...

Timoyla

Minulla on Delphillä tehty osakkeiden backtestaus ohjelma, joka on vähän kesken ja tarvitsen siihen apua joltain sellaiselta henkilöltä joka ymmärttää myös vähän osakkeista (on helpompi selittää mitä haluan jos tiedät perusasiat osakkeisa).

Minulla on osakesysteemi joka tuottaa noin 20 osto tai myynti signaalia per vuosi. Minä haluaisi testata systeemini myynti ja osto päivät eri osakkeilla tällä Delphi ohjelmalla, joka laskisi automaattisesti tuoton näille eri osakkeille?

Tiedän että on olemassa paljon ohjelmia jotka pitävät kirjaa osake salkusta, mutta etsin ohjemaa johon voisin syöttää koko vuoden osto ja myynti päivät ja sitten testata mitä tuotto olisi ollut eri osakkeiden kohdalla jos niillä olisi käyty kauppaa näinä kyseisinä päivinä. Kiitos, Timo.

PS www.etf-gold-stocks.com
sivulta löytyy lisää infoa systeemistäni ja sitä kautta saat myös halutessa yhteyden minuun...

6

410

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • iiiiiiiiiiiii ii

      Kannattaisi ehkäpä kysyä yksityiskohtaisemmista asioista.

      Mutta ainakin eri ajankohtien (päivämäärien) käsittelyyn löytyy monia vakiorutiineja.

      • Timoyla

        Tämä on yksinkertaiseksi asiaksi vaikea selitää tällaisella forumilla. Mutta oli miten oli, minulla on ohjelma joka on tehty Delphillä mutta se ei ole aivan valmis... jos kiinnostaa, niin ota yhteyttä niin voin lähettää sen ja sen jälkee tämä asia on helpompi selitää.
        signal at etf-gold-stocks com


      • Ugli
        Timoyla kirjoitti:

        Tämä on yksinkertaiseksi asiaksi vaikea selitää tällaisella forumilla. Mutta oli miten oli, minulla on ohjelma joka on tehty Delphillä mutta se ei ole aivan valmis... jos kiinnostaa, niin ota yhteyttä niin voin lähettää sen ja sen jälkee tämä asia on helpompi selitää.
        signal at etf-gold-stocks com

        Millaisi Delphi ongelmia sinulla on? Mitä haluat ratkaista?


      • Timoyla
        Ugli kirjoitti:

        Millaisi Delphi ongelmia sinulla on? Mitä haluat ratkaista?

        Minulla on keskeneräinen Delphillä tehty ohjelma. Tai kyllä se toimii aivan hyvin, mutta sitä pitää hieman korjata. Tämä korjaus on vaikea selittää tässä.

        Minulla on osakesysteemi joka tuottaa noin 20 osto tai myynti signaalia per vuosi. Minä haluaisi testata systeemini myynti ja osto päivät eri osakkeilla tällä Delphi ohjelmalla, joka laskisi automaattisesti tuoton näille eri osakkeille?

        En osaa ylläolevaa paremmin selittää mitä haluan. Parasta olisi jos on halua auttaa, niin mä voisin lähettää ohjeman sähköpostilla ja sitten vaikka puhelimessa selittää mitä haluan. Muuten se ei oikein selviä. Terv Timo


      • Timoyla
        Timoyla kirjoitti:

        Minulla on keskeneräinen Delphillä tehty ohjelma. Tai kyllä se toimii aivan hyvin, mutta sitä pitää hieman korjata. Tämä korjaus on vaikea selittää tässä.

        Minulla on osakesysteemi joka tuottaa noin 20 osto tai myynti signaalia per vuosi. Minä haluaisi testata systeemini myynti ja osto päivät eri osakkeilla tällä Delphi ohjelmalla, joka laskisi automaattisesti tuoton näille eri osakkeille?

        En osaa ylläolevaa paremmin selittää mitä haluan. Parasta olisi jos on halua auttaa, niin mä voisin lähettää ohjeman sähköpostilla ja sitten vaikka puhelimessa selittää mitä haluan. Muuten se ei oikein selviä. Terv Timo

        Eli sanotaan, että minulla on vaikka 4 signaali eli kauppa päivää: Osta: 12.1.08. Myy: 2.3.08. Osta: 5.5.08 ja Myy: 15.5.08.

        Nyt haluan ajaa tällä ohjelmalla Nokian, Metson, UPM, Orioinin, Marimekon osakkeiden hinnat läpi niin, että näen mikä olisi ollut tuotto näillä osakkeila jos niillä olisi käyty kauppaa näinä kyseisinä päivinä.

        Eli ohjelman pitää pysytä hakemaan Yahoosta näiden osakkeiden aamun avaus hinnat. (se ei ole onglema, koska Delphi ohjelma joka on mulla tekee sen) Sitten minun on pystyttävä taltioimaan tähän ohjelmaan nämä kauppa/signaali päivät talteen, ja sitten vain klikkaan jotain osaketta ja ohjelma laskee sille sen tuoton näillä päivillä.

        Vaikka käytin suomalaisia osakkeita esimerkissäni kyse on USAlaista osakkeista. Mutta sen ei pitä olla onglema, koska nykyinen ohjelma hakee hinnat Yahoosta automaatisesti.

        Ainoa osuus joka ei vielä toimi on se että mä pysytyisin tallentamaan noin mun osto ja myynti päivät.

        Eli onko täällä apua, kun on niin hiljasta koko forumissa???


      • poiju-poiju
        Timoyla kirjoitti:

        Eli sanotaan, että minulla on vaikka 4 signaali eli kauppa päivää: Osta: 12.1.08. Myy: 2.3.08. Osta: 5.5.08 ja Myy: 15.5.08.

        Nyt haluan ajaa tällä ohjelmalla Nokian, Metson, UPM, Orioinin, Marimekon osakkeiden hinnat läpi niin, että näen mikä olisi ollut tuotto näillä osakkeila jos niillä olisi käyty kauppaa näinä kyseisinä päivinä.

        Eli ohjelman pitää pysytä hakemaan Yahoosta näiden osakkeiden aamun avaus hinnat. (se ei ole onglema, koska Delphi ohjelma joka on mulla tekee sen) Sitten minun on pystyttävä taltioimaan tähän ohjelmaan nämä kauppa/signaali päivät talteen, ja sitten vain klikkaan jotain osaketta ja ohjelma laskee sille sen tuoton näillä päivillä.

        Vaikka käytin suomalaisia osakkeita esimerkissäni kyse on USAlaista osakkeista. Mutta sen ei pitä olla onglema, koska nykyinen ohjelma hakee hinnat Yahoosta automaatisesti.

        Ainoa osuus joka ei vielä toimi on se että mä pysytyisin tallentamaan noin mun osto ja myynti päivät.

        Eli onko täällä apua, kun on niin hiljasta koko forumissa???

        Tässä on eräs tapa tallentaa ja lukea noita tietoja.
        Ideana on käyttää Ini-tiedostoja ja SringList:ä.
        Kaikki tiedot tallentuu tällöin selväkielisenä.


        procedure TForm1.Button1Click(Sender: TObject);
        var IniFile:TIniFile;
        strlist:TStringList;
        IniTiedostonNimi,kauppa,tapahtuma,p,k,v,kpl,hinta:string;
        i:integer;
        begin
        IniTiedostonNimi := 'tiedostonnimi.ini';
        kauppa := 'Kauppa 4';
        tapahtuma := 'Myynti';
        p := '5';
        k :='1';
        v:='2008';
        kpl :='5';
        hinta := '20.00';
        strlist := TStringList.Create;
        strlist.add('Tapahtuma =' tapahtuma);
        strlist.add('pv =' p);
        strlist.add('kuu =' k);
        strlist.add('vuosi =' v);
        strlist.add('Kpl =' kpl);
        strlist.add('Hinta =' hinta);

        IniFile := TIniFile.Create(IniTiedostonNimi);
        for i:= 0 to strlist.count-1 do
        IniFile.WriteString(kauppa, strlist.Names[i], strlist.ValueFromIndex[i]);
        FreeAndNil(IniFile);
        FreeAndNil(strlist);
        end;

        procedure TForm1.Button2Click(Sender: TObject);
        var IniFile:TIniFile;
        strlist:TStringList;
        IniTiedostonNimi,kauppa:string;
        begin
        IniTiedostonNimi := 'tiedostonnimi.ini';
        kauppa := 'Kauppa 4';
        strlist := TStringList.Create;
        IniFile := TIniFile.Create(IniTiedostonNimi);
        IniFile.ReadSectionValues(kauppa,strlist);
        Edit1.Text:= strlist.Values['Hinta'];
        FreeAndNil(IniFile);
        FreeAndNil(strlist);
        end;


    Ketjusta on poistettu 0 sääntöjenvastaista viestiä.

    Luetuimmat keskustelut

    1. Hengenvaaralliset kiihdytysajot päättyivät karmealla tavalla, kilpailija kuoli

      Onnettomuudesta on aloitettu selvitys. Tapahtuma keskeytettiin onnettomuuteen. Tapahtumaa tutkitaan paikan päällä yhtei
      Kauhava
      198
      6908
    2. Ootko rakastunut?

      Kerro pois nyt
      Ikävä
      159
      2036
    3. Onhan sulla nainen parempi mieli

      Nyt? Ainakin toivon niin.
      Ikävä
      113
      1688
    4. Ujosteletko tosissaan vai mitä oikeen

      Himmailet???? Mitä pelkäät?????
      Ikävä
      51
      1390
    5. Suureksi onneksesi on myönnettävä

      Että olen nyt sitten mennyt rakastumaan sinuun. Ei tässä mitään, olen kärsivällinen ❤️
      Ikävä
      55
      1238
    6. Möykkähulluus vaati kuolonuhrin

      Nuori elämä menettiin täysin turhaan tällä järjettömyydellä! Toivottavasti näitä ei enää koskaan nähdä Kauhavalla! 😢
      Kauhava
      50
      1098
    7. Älä mies pidä mua pettäjänä

      En petä ketään. Älä mies ajattele niin. Anteeksi että ihastuin suhun varattuna. Pettänyt en ole koskaan ketään vaikka hu
      Ikävä
      100
      1074
    8. Reeniähororeeniä

      Helvetillisen vaikeaa työskennellä hoitajana,kun ei kestä silmissään yhtään läskiä. Saati hoitaa sellaista. Mitä tehdä?
      Kouvola
      7
      996
    9. Tarvitsemme lisää maahanmuuttoa.

      Väestö eläköityy, eli tarvitsemme lisää tekeviä käsiä ja veronmaksajia. Ainut ratkaisu löytyy maahanmuutosta. Nimenomaan
      Maailman menoa
      251
      954
    10. Kävit nainen näemmä mun

      Facessa katsomassa....
      Ikävä
      41
      929
    Aihe