Itseisarvojen yhteenlasku

N&L

Tarvitsen apua!

Kirjoita aliohjelma, joka laskee kahden 32-bittisen kokonaisluvun itseisarvojen summan. Luvut annetaan aliohjelmalle rekistereissä R0 ja R1. Aliohjelma palauttaa tuloksen rekisterissä R0.

Olkaa hyvä auttakaa minua.
Paljon kiitoksia etukäteen!

2

1352

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • Sattumalta-törmäsin-tähän

      Jos ymmärsin viestisi oikein osaan auttaa sinua.
      Sen ei pitäisi olla hankalaa.

      En tietenkään tiedä millaisia monimutkaistuksia koneesi 32-bittisten kokonaislukujen käsittelyssä on.
      Vaikka ne vaatisivat moniosaisia rekistereitä tai
      jotain niin se ei vielä sotke seuraavaa ratkaisua.

      Tämän pitäisi toimia (muunna oman systeemisi ymmärtämään kieliasuun):

      Jos R0 > 0 hyppää A:han muuttamatta mitään.
      Vaihda R0:n merkki.(R0=-R0 tai R0=1..00b XOR R0)

      A:
      Jos R1 > 0 hyppää B:hen
      Vaihda R1:n merkki. (samalla tavalla jolla R0)
      B:
      Aseta R0:n arvoksi R0 R1.
      Palaa aliohjelmasta.

      Toivottavasti toimi :-)

      • Delphiguru

        1. Kommenttina edellisen vastaajan tekstiin;

        Jos R0 >= 0 hyppää A:han ...
        (ok, *oikein tehty* etumerkin muuttaminen ei toki nollaa miksikään muuta, mutta tarpeetonta se ainakin on)

        2. Kannattaa katsoa mallia, mitä kääntäjä tekee korkean tason kielessä, esimerkkinä Delphi:

        var
        X : Integer; // 32-bit Delpheissä (2.0 - ainakin Tiburon) 32-bit etumerkillinen kokonaisluku.

        procedure ItseisArvoX;
        begin
        X := abs(X);
        end;


        Ja mitä kääntäjä tuottaa tällaisesta:

        (vain itseisarvon laskeminen):

        00463ECC A1507C4600 mov eax,[X]
        00463ED1 99 cdq
        00463ED2 33C2 xor eax,edx
        00463ED4 2BC2 sub eax,edx
        00463ED6 A3507C4600 mov [X],eax

        Kuten huomaat, Delphin käännöstuloksessa ei ole yhtään hyppykäskyä (ei ehdollista eikä ehdotonta).

        Todennäköisin syy tähän: Moderneissa prosessoreissa on edistynyt välimuisti- ja ennakoivan suorituksen järjestelmä; näillä pyritään mahdollisimman suureen suoritusnopeuteen.

        Yleensä jos ohjelmassa tulee vastaan hyppykäsky, niin ensinnäkin ennakoivan (=spekulatiivisen) suorituksen tuloksia joudutaan heittämään pois ja toisekseen lähinnä itse prosessoria olevan välimuistin tiedot joudutaan yleensä myös päivittämään, ja tällainen hidastaa ohjelman suoritusta.

        Näistä syistä usein pyritään välttämään hyppykäskyjä, jos annetun tehtävän voi ratkaista ilmankin.

        Mitäkö Delphin kääntämän koodin eri käskyt tekevät?

        00463ECC A1507C4600 mov eax,[X]
        Lataa muuttujan X arvon eax -rekisteriin

        00463ED1 99 cdq
        Muuntaa 32-bit etumerkillisen kokonaisluvun 64-bit etumerkilliseksi kokonaisluvuksi

        00463ED2 33C2 xor eax,edx
        Suorittaa bittitason XOR -operaation eax ja edx -rekisterien välillä, tulos rekisteriin eax (Yleinen käytäntö assemblerissa on: tulosoperandi vasemmalle, lähde oikealle; poikkeuksena tästä linuxmaailmassa ikävä kyllä paljon käytetty AT&T -syntaksi, jossa asia on sitten juuri päinvastoin !)

        00463ED4 2BC2 sub eax,edx
        Vähentää edx:n arvon eax:sta, tulos -> eax

        00463ED6 A3507C4600 mov [X],eax
        tallettaa eax -rekisterin arvon muuttujaan X, joka tässä tapauksessa on muistiosoitteessa
        467C50h.

        Delphin käännöstulos on ajokelpoinen x86 -sarjan prosessoreissa (80386, 80486, Pentium jne).

        Jos haluat tätä optimoitua ratkaisua soveltaa, joudut luonnollisesti muuntamaan tämän käyttämällesi prosessorille.


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

    Luetuimmat keskustelut

    1. Riikan perintö: ennätysvelka, ennätystyöttömyys ja ennätysverotus

      Tavallisen keskituloisen suomalaisen verotus on kireintä vuosikymmeniin, ja ensi vuonna palkansaajien käteen jää vieläki
      Maailman menoa
      215
      3647
    2. Mies, näen sinua hetken

      ja olet mielessä ikuisuuden. Toisia näen ikuisuuden ja he eivät jää mieleen hetkeksikään. Muistan jokaisen kohtaamisen
      Ikävä
      14
      3519
    3. Riikka Purra on ihana, jämpti

      Hän yrittää saada Suomen taas kuntoon. Sanoo asiat suoraan, eikä piiloudu kapulakielen taakse. Riikan kaltaisia päättä
      Maailman menoa
      91
      2608
    4. Antti Lindtman kiitti valtiovarainministeri Purraa

      Ministeri Purra kertoi ottavasa vastuun EU:n alijäämämenettelyyn joutumisesta. Hän myös sanoi tietävänsä, että Lindtman
      Perussuomalaiset
      12
      2199
    5. Henkilökohtaisia paljastuksia Dubaista - Kohujulkkis Sofia Belorf on äitipuoli ja puoliso!

      Tiesitkö, että Sofia on äitipuoli ja rakastava puoliso? Sofia Belorf saa oman sarjan, jossa seurataan hänen Bling Bling
      Kotimaiset julkkisjuorut
      59
      2160
    6. Suomalaisten enemmistö on (ateisteja / fiksuja / sosialisteja)

      Tai jokin noiden yhdistelmä, koska S-ryhmän markkinaosuus päivittäistavarakaupasta on yli 50 prosenttia.
      Maailman menoa
      11
      1919
    7. Sorsa: kuvaputki - Lipponen: kaasuputki - Marin: ryppyputki

      Nuo kolme demaria ovat poikkeuksia Suomen poliittisessa historiassa. Ovat ainoita, jotka ovat kyenneet nostamaan puolue
      48
      1745
    8. Mitä ajattelet

      Siitä henkilöstä jota kaipaat? Sana vapaa!
      Ikävä
      90
      1601
    9. Kenen luo menisit nyt

      jos se olisi mahdollista?
      Ikävä
      79
      1207
    10. Mikä kaivatussasi

      kolahti? 💥
      Ikävä
      72
      1163
    Aihe