8085 İşlemci ile Geri Sayan Sayaç Arıyorum

[tugba7203]

8085 de geriye doğru sayan sayaç proğramı bilen var mı? Varsa acil yardım lütfenn

 

[sapanci444]

Aşağıdaki program 8085de 100 den geriye doğru sayar...

ORG 0100H
InCLUDE PATCALLS.InC
InT25 EQU 0094H

CLI

MOV DX,DS
MOV AX,0000H
MOV DS,AX
MOV WORD PTR DS:InT25,0200H
MOV WORD PTR DS:InT25+2,0080H

MOV DS,DX
MOV AL,03H ; al içerisine 03h değeri atılarak frq içeriği '1' yapılarak zamanlayıcı ;devreye alındı ve zamanlayıcı saat frekansı 1khz'e ayarlandı.

OUT 080H ; komut kayıtçısı
MOV AL,0E8H

OUT 098H,AL ; zamanlayıcı 3 e değere atandı
MOV AL,003H
OUT 09CH,AL ; zamanlayıcı 5 e değer atandı.

MOV AL,008H
OUT 8AH,AL ; kesme etkileştirme kayıtçısnın L3 biti 1 yapılarak kaskad bağlantı ;sağlandı

MOV AL,083H ;mode kayıçsına 83h değeri atılarak hem port2 çıkış yapıldı hem de 7. ;bit 1 yapılarak 3. ve 5. zamanlayıcılar kaskad bağlanmıştır.

OUT 086H,AL
STI


MOV BL,064H
MOV AH,CLRSCR
InT 028H

GIT: JMP GIT

ORG 0200H
In AL,08CH
MOV AL,0E8H
OUT 098H,AL

MOV AL,003H
OUT 09CH,AL

MOV AL,008H
OUT 8AH,AL

; yukarıda 1s gecikme yapıldıktan sonra...


CMP BL,00H ; bl içeriği sıfırla karşılaştırıldı

JZ DUR ; bl içeriği sıfır ise DUR etiketine dallanma sağlandı.

DEC BL ; bl içeriği 1 azaltıldı.

MOV AL,BL ; bl içeriği al atıldı

ADD AL,00H ; al 00 ile toplandı

DUR:

MOV AL,020H ; kesmeler aktif hale getirildi.
OUT 040H,AL
IRET ; ana programa dönüldü.