OCK 24 008-

Beraber girelim diye düşündüm. Küçük bir program yapıp Proteus ISIS yardımıyla denedim. Öncelikle Program hakkında bir bilgi veriyim. "Çalıştırıldığında A Portuna bağlı ledlerden RA0 ve RA2 deki Ledleri yakan programı Assembly ile yazınız!". Sınav sorusu gibi oldu değil mi

Ben kodları aşağıya kopyalıyorum. Açıklamlarını da zaten yanlarına yazdım. Şimdilik üst kısımı sorgulamayın. ASM anlatımlarına girdiğimde üstteki CONFIG yazmaçlarını da açıklayacağım.

*************************************************** 

;====led_yak_son===22.01.2008======
;==================================
LIST P=16F628A
INCLUDE "P16F628A.INC"
__CONFIG _INTRC_OSC_NOCLKOUT &_WDT_OFF &_PWRTE_ON &_MCLRE_ON &_BODEN_OFF &_LVP_OFF &_DATA_CP_OFF &_CP_OFF
;==================================
ORG h'00'
CLRF PORTA ;PORT B'nin bütün uçlarını temizle
BANKSEL TRISA ;BANK1'e geç
CLRF TRISA ;B'nin bütün bitlerini 0 la- Çıkış yapıldı
BANKSEL PORTA ;BANK0'a geç

BASLA
MOVLW h'05' ;W'ye 00000101 yüklendi
MOVWF PORTA ;W içeriği PORTA'ya yüklendi
DONGU
GOTO DONGU ;Sonsuz döngü oluşturduk
END

***************************************************

 

Programa baktığınızda aslında çok da zor değil. Yakılacak LED'lerin bacaklarına 1 vererek bir uçları GND(toprağa bağlı) olan ledlerin diğer uçlarını enerjilendirmiş oluyoruz.

Başlangıç için gayet güzel bir örnek. Proteus ISIS proje dosyasını da [şuradan] indirebilirsiniz. Tavsiyem W'ye  05 den başka 8 bitlik değişik formlarda sayılar yükleyerek ledlerin ne şekilde yandığını gözlemlemeniz olacaktır. Bundan sonraki uygulamamızda da bir buton yardımıyla Ledlerin kontrolünü göreceğiz.