Ziyaretçi Sayısı

ARAMA YAPIN

pic ile Gelişigüzel yanan ledler etiketine sahip kayıtlar gösteriliyor. Tüm kayıtları göster
pic ile Gelişigüzel yanan ledler etiketine sahip kayıtlar gösteriliyor. Tüm kayıtları göster

12 Nisan 2015 Pazar

12F675 ile Rastgele Yanan Ledler

'****************************************************************
'*  Name    :random_Led_12F675.BAS                                        *
'*  Author  : Şinasi Yavuz                                     *
'*  Notice  : Copyright (c) 09,Nisan,2015                          *
'*          :                              *
'*  Date    :  12,Nisan,2015                                       *
'*  Version : 1.0                                               *
'*  Notes   :                          *
'*          :                                                   *
'****************************************************************
Aşağıdaki linkten projenin dosyalarını indirebilirsiniz.




DEFINE LOADER_USED 1
define osc 4
@ DEVICE pic12f675, INTRC_OSC_NOCLKOUT,mclr_off
'@ DEVICE pic12f675,XT_OSC
@ device pic12f675,pwrt_on
@ device pic12f675,mclr_off    
trisio=%11001001
gpio  =%11001001

CMCON=7
ANSEL=0

OPTION_REG.7 = 0
osccal=3408

B1 var Byte
W1 var Word

BASLA:
   
w1=w1+1
random  w1
b1=w1
gpio= b1
pause 200
   
GOTO BASLA
END
Random 12F675 Ledler RAR Dosyası indir