Skip to content

Instantly share code, notes, and snippets.

@semihozkoroglu
Created April 26, 2011 21:05
Show Gist options
  • Save semihozkoroglu/943151 to your computer and use it in GitHub Desktop.
Save semihozkoroglu/943151 to your computer and use it in GitHub Desktop.
Uygulama_3-8 bitlik bir sayinin bitlerini ters sırada yazar
;<Program title>
mvi D , 0;
mvi E , 8;
mvi H , 0B1h;
mvi A , 1;
mov L , A;
;A 'nin kaydirilmis degeri ile H'nin o basamagindaki degerin 1 mi 0 mi oldugunu anlariz.
don: ANA H ; A ile H yi and'la ve basamagin 1 mi 0 mi oldugunu anla.
jnz bir; bir ise git
jmp sifir; sifir ise git
;Sifir ise sadece kaydir.
sifir: mov A , D; toplami A'ya ata
rlc ; A'yi kaydir
mov D , A; A'
mov A , L;And'lenmis A degerini eski haline getir.
rlc;A' yi kaydir ve kaydet.
mov L , A;
dcr E;Sayaci azalt.
jnz don;
jmp cik;
;Bir ise bir ekle ve kaydir.
bir: mov A , D;D'yi kaydirmak icin yapiyoruz.
rlc; D'nin degerini kaydir.
INR A;D'nin icerigini 1 arttir.
mov D , A;Sonucu D 'ye yaz
mov A , L;A'nin kaydirilip kaydedilmis degerini eski haline al.
rlc; ve yeni islem icin kaydir.
mov L , A; ve son halini depola
dcr E; sayaci azalt.
jnz don;
jmp cik;
cik: hlt
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment