????:0000 mov.l #????000C,ER1
????:0006 mov.l #????0020,ER2
????:000C mov.b #20,R3
????:000E mov.l @ER1,ER2
????:0010 add.l #1,ER1
????:0016 add.l #1,ER2
????:001C sub.b #1,R3
????:001E bne #-18
Älä kokeile, älä käynnistä tätä, jos haluat testata, testaa vain mielessäsi.
????:0006 mov.l #????0020,ER2
????:000C mov.b #20,R3
????:000E mov.l @ER1,ER2
????:0010 add.l #1,ER1
????:0016 add.l #1,ER2
????:001C sub.b #1,R3
????:001E bne #-18
Älä kokeile, älä käynnistä tätä, jos haluat testata, testaa vain mielessäsi.
Vastaukset 18
Vanhimmat
Det gör ingenting.
????:0000 mov.l #????000C,ER1
????:0006 mov.l #????003C,ER2
????:000C mov.b #48,R3
????:000E mov.l @ER2,ER4
????:0010 mov.l ER4, (d:32, ER2)
????:0016 add.l #1,ER1
????:0022 add.l #1,ER2
????:0038 sub.b #1,R3
????:003A bne.b #-46
Mutta vasta tämä voisi toimia....
ÄLÄ KOKEILE, en vastaa seurauksista, jos testaat, ja pistät oikean muistiosoitteen ????-paikalle!
????:0000 mov.l #????000C,ER1
????:0006 mov.l #????003C,ER2
????:000C mov.b #48,R3
????:000E mov.l @ER1,ER4
????:0010 mov.l ER4, (d:32, ER2)
????:0016 add.l #1,ER1
????:0022 add.l #1,ER2
????:0038 sub.b #1,R3
????:003A bne.b #-46
Tai ehkä nyt?
????:0000 mov.l #????000C,ER1
????:0006 mov.l #????002C,ER2
????:000C mov.b #32,R3
????:000E mov.l @ER1,ER4
????:0010 mov.l ER4, (d:32, ER2)
????:0016 add.l #1,ER1
????:0022 add.l #1,ER2
????:0028 sub.b #1,R3
????:002A bne #-30
Tai vasta nyt, älä kokeile, kone voi kaatua, mutta en usko, että kovalevyllesi mitään tapahtuu?
????:0000 mov.l #????000C,ER1
????:0006 mov.l #????002E,ER2
????:000C mov.b #34,R3
????:000E mov.l @ER1,ER4
????:0010 mov.l ER4, (00, ER2)
????:0016 add.l #1,ER1
????:0022 add.l #1,ER2
????:0028 sub.b #1,R3
????:002A bne #-32
Oli siinä vielä virhe, mutta tämä ehkä jo toimisi?
????:0000 mov.l #????000C,ER1
????:0006 mov.l #????002E,ER2
????:000C mov.b #32,R3
????:000E mov.l @ER1,ER4
????:0010 mov.l ER4, (00, ER2)
????:0016 add.l #1,ER1
????:0022 add.l #1,ER2
????:0028 sub.b #1,R3
????:002A bne #-30
Tai eipä sittenkään, tuo hyppykaskyn voi pistää .vain kahdella tavulla....
????:0000 mov.l #????000C,ER1
????:0006 mov.l #????002E,ER2
????:000C mov.b #30,R3
????:000E mov.l @ER1,ER4
????:0010 mov.l ER4, (00, ER2)
????:001A add.l #1,ER1
????:0020 add.l #1,ER2
????:0026 sub.b #1,R3
????:0028 bne #-28
Eli yksi käksy vei vähän enemmän tilaa, muutamat vähemmän....
????:0000 mov.l #????000C,ER1
????:000A mov.l #????002E,ER2
????:0014 mov.b #72,R3
????:0016 mov.l @ER1,ER4
????:002C mov.l ER4, (00, ER2)
????:0036 add.l #1,ER1
????:004C add.l #1,ER2
????:0052 sub.b #1,R3
????:0054 bne #-70
????:0000 mov.l #????0014,ER1
????:000A mov.l #????0056,ER2
????:0014 mov.b #72,R3
????:0016 mov.l @ER1,ER4
????:002C mov.l ER4, (00, ER2)
????:0036 add.l #1,ER1
????:004C add.l #1,ER2
????:0052 sub.b #1,R3
????:0054 bne #-70
No, nyt?
????:0000 mov.l #????0014,ER1
????:000A mov.l #????0042,ER2
????:0014 mov.b #52,R3
????:0016 mov.l @ER1,ER4
????:002C mov.l ER4, (00:16, ER2)
????:0032 add.l #1,ER1
????:0038 add.l #1,ER2
????:003E sub.b #1,R3
????:0040 bne #-50
Itse asiassa moevesta voinee selvitä 16:takin bitillä?
????:0000 mov.l #????0014,ER1
????:000A mov.l #????0042,ER2
????:0014 mov.b #52,R3
????:0016 mov.l @ER1,ER4
????:002C mov.l ER4, (00:16, ER2)
????:0032 add.l #1,ER1
????:0038 add.l #1,ER2
????:003E sub.b #1,R3
????:0040 bne #-50
Tämä saattaisi jo toimia, eli se kopioi itsensä seuraavaan tyhjään muistialueeseen, tai vaikkei se olisi edes tyhjä, ja suorittaa siitä sen saman kopiointiosuuden.... Ohjelma on 66 tavun mittainen.
????:0000 mov.l #h'????0014,ER1
????:000A mov.l #h'????0042,ER2
????:0014 mov.b #52,R3
????:0016 mov.l @ER1,ER4
????:002C mov.l ER4, (00:16, ER2)
????:0032 add.l #1,ER1
????:0038 add.l #1,ER2
????:003E sub.b #1,R3
????:0040 bne #-50
Heksadesimaalisuus pitänee tossa vielä ilmaista?
????:0000 mov.l #h'????0010,ER1
????:0008 mov.l #h'????003E,ER2
????:0010 mov.b #46,R3
????:0012 mov.l @ER1,ER4
????:0018 mov.l ER4, (00:16, ER2)
????:002E add.l #1,ER1
????:0034 add.l #1,ER2
????:003A sub.b #1,R3
????:003C bne #-44
Laskin äsken väärin osoitteet, ehkä ne nyt on oikein?
Canadalla ja Czechillä on 46 miltaia miesten jääkiekossa ja Ruotsilla 44.
????:0000 mov.l #h'????0010,ER1
????:0008 mov.l #h'????003E,ER2
????:0010 mov.b #46,R3
????:0012 mov.l @ER1,ER4
????:0018 mov.l ER4, (#00, ER2)
????:002E add.l #1,ER1
????:0034 add.l #1,ER2
????:003A sub.b #1,R3
????:003C bne #-44
Viimeinen syntaksivirhe oli jättää tuo risiuaita, riviltä 0018 merkkaamatta?
Miksei tämmösten potilaiden netinkäyttöä valvota? Ei tämmönen kirjottelu tee varmasti Akillekaan hyvää. Tää ei ollu Aki sulle suoraan suunnattu vaan mietin asiaa yleisesti.
Kyllä tekee hyvää. Kehoittaisin sinuakin käyttäytymään vähän paremmin, minuakin kohtaan tuo ei ollut kiltisti sanottu.
Ei pari tavua muistia siellä sun täällä tee kenellekään mitään, vaikka pistäisi minkämoisen kirouksen tahansa, niinkuin sinä taas.
Sinä olet vaarassa syyllistyä Pyhän Hengen pilkaan, se on pahempi asia, kuin mitä mun pari hullua Virus-ohjelmaa, joka tosin toi viimoisin kopioi muistin täyteen, ja konee kaatuu:-)