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!
Itseisarvojen yhteenlasku
2
1297
Vastaukset
- 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
Kalle Palander kertoi fantasioivansa siitä, kuinka Kiira Korpi naisi häntä sträppärillä ahteriin
Sai potkut Yleltä. https://yle.fi/a/74-201400005338586Aamuseuraa/rehevää naista
uhkean rehevät m-xxxl naiset/rouvat/pari 18-80v kutsu luokses 31.1 aamusta päiväpanoille 32v hetero mies.oon innokas nuo5368824h Kirppis
Olen muuttamassa paikkakunnalle ja mietin olisiko tälläiselle liikkeelle tarvetta alueella?72203Suomessa eletään liian pitkään
"Ihmisten on kuoltava" Asiantuntija varoittaa: Suomi ei ole valmis siihen, että niin moni elää pitkään: ”Kaiken täytyy1611203Kerotakaa joensuun kontiolahden paiholan laitoksesta jotain
Mun kaveri joutuu paiholan laitokseen nyt lähi aikoina niin voisko ihmiset kertoa minkälaista siellä on tarinoita jne ja17846Sun ulkonäkö on
Kyllä viehättävä. Kauniit piirteet. Todella sievät. Ja olemus on ihana. Olet tehnyt vaikutuksen.40764Olen niin haaveillut
Sinusta. Ollut hullun rakastunut. Ajatellut kaikkea mitä yhdessä voisimme tehdä. Mutta ei ei yhtään mitään. Usko vaan lo57752Oletko koskaan
Tavannut/tuntenut ihmistä, jonka kanssa vuosisadan rakkaustarina olisi ollut mahdollinen, mutta joku este tuli väliin?68716- 46715
En voi ottaa
Jos ikinä aiot ottaa yhteyttä, niin tee se nyt. On aika, kun todella todella tarvitsisin sinua. Naiselle.36647