parametre

PIC16F628A ile yürüyen ışık nam-ı diğer Kara Şimşek devresi.
PIC Assembly kodlarken IDE olarak MPLAB kullandım.
Derleyici olarak MPASMWIN kullandım.
Proteus versiyonum 7.1 SP2

Size devrenin ISIS çiziminiASM dosyasını ve HEX dosyasını vereceğim.
Devreden bir görüntü:

kodları
===YURUYENLEDLER.ASM===08/09/2011============================================== =
;Coded By yücelyılmaz
;yucelz.blogspot.com

LIST P=16F628A
INCLUDE "P16F628A.INC"
__CONFIG _XT_OSC & _WDT_OFF & _PWRTE_ON & _MCLRE_ON & _BODEN_OFF & _LVP_OFF & _DATA_CP_OFF & _CP_OFF

;--------------------------------------------------------------------------------
ORG H'0000'
SAY1 EQU H'20'
SAY2 EQU H'21'
BANKSEL TRISB
CLRF TRISB

BASLA
BANKSEL PORTB
CLRF PORTB

MOVLW B'00000001'
MOVWF PORTB
CALL GECIKME

MOVLW B'00000010'
MOVWF PORTB
CALL GECIKME

MOVLW B'00000100'
MOVWF PORTB
CALL GECIKME

MOVLW B'00001000'
MOVWF PORTB
CALL GECIKME

MOVLW B'00010000'
MOVWF PORTB
CALL GECIKME

MOVLW B'00100000'
MOVWF PORTB
CALL GECIKME

MOVLW B'01000000'
MOVWF PORTB
CALL GECIKME

MOVLW B'10000000'
MOVWF PORTB
CALL GECIKME

GOTO BASLA
GECIKME
MOVLW H'FF'
MOVWF SAY1
DONGU1
MOVLW H'FF'
MOVWF SAY2
DONGU2
DECFSZ SAY2F
GOTO DONGU2
DECFSZ SAY1F
GOTO DONGU1
RETURN
END



alıntıdır