LIST p=16F84A
#INCLUDE <p16f84.inc>
__CONFIG _CP_OFF & _WDT_OFF & _XT_OSC
#DEFINE LED PORTB, 2
#DEFINE YANIK 0X20, 0
SAYAC_1 EQU 0X21
SAYAC_2 EQU 0X22
ORG 0x0000
main
CLRF PORTB
BSF STATUS,RP0 ;PORT I/O ayarları için BANK1'e geçiliyor...
MOVLW B'00000000' ;PORTA çıkış olarak ayarlanıyor...
MOVWF TRISA
MOVLW B'00000000' ;PORTB çıkış olarak ayarlanıyor...
MOVWF TRISB
BCF STATUS,RP0 ;PORT I/O ayarları bitti...
start
BSF LED
CALL delay
BCF LED
CALL delay
GOTO start
delay
MOVLW 0xFF
MOVWF SAYAC_1
MOVWF SAYAC_2
SAYAC_AZALT
MOVWF SAYAC_1
SAYAC_1_AZALT
DECFSZ SAYAC_1
GOTO SAYAC_1_AZALT
DECFSZ SAYAC_2
GOTO SAYAC_AZALT
RETURN
END