0 - 9 ARASI YUKARI AŞAĞI SAYICI
@ device pic16f84a, wdt_off
@ device pic16f84a, pwrt_on
@ device pic16f84a, protect_on
@ device pic16f84a, xt_osc
TRISB=%00000000
TRISA=%11111111
PORTB=0
PORTA=0
SAYAC VAR BYTE
SYMBOL ARTIR=PORTA.0
SYMBOL AZALT=PORTA.1
SAYAC=0
BASLA:
;------------------------------------------------
IF ARTIR=1 THEN
PORTB=PORTB+1
IF PORTB>9 THEN PORTB=0
PAUSE 300
ELSE
ENDIF
;------------------------------------------------
IF AZALT=1 THEN
PORTB=PORTB-1
IF PORTB=255 THEN PORTB=0
PAUSE 300
ELSE
ENDIF
;-------------------------------------------------
GOTO BASLA