اطلاعیه

**mostafahk** · 2009-09-10T01:25:06

پاسخ :ایراد در تولید پالس نیم ثانیه در میکرو

سلام
برنامه که نزاشتید. به فیوز بیت و هیچ چیز دیگه ای هم ربط نداره. مشکل تو الگوریتم برنامتونه.

در مورد بنرها هم مثل من از opera استفاده کنید و no image کنید :icon_razz:

**hosseinansari** · 2009-09-10T11:20:36

پاسخ : ایراد در تولید پالس نیم ثانیه در میکرو

با سلام دوباره اینهم برنامه:

$regfile Regfile = "m16def.dat"
$crystal = 1000000
Ddra = &HFF
Ddrb = &H00

Do

If Pinb.0 = 1 Then

Set Porta.0
Waitms 1
Reset Porta.0
Waitms 1

Else

Set Porta.0
Waitms 500
Reset Porta.0
Waitms 500

End If

Loop
End

البته کارکترها وقتی copy paste کردم بهم ریخت ولی اصل برنامه درسته :biggrin:

در ضمن من سوالم رو در بخش میکرو avr مطرح کردم !!!! :sad:
اگه اینجا نمیگفتم باید کجا میگفتم؟؟؟؟ :question:

**blacklove** · 2009-09-10T12:22:31

پاسخ : ایراد در تولید پالس نیم ثانیه در میکرو

اینا امتحان کن :

$regfile="m16def.dat"
$crystal=1000000
'--------------------
config porta=input
config portb=output
'--------------------
main:
if pina.1=1 then goto palse 'palse sarbarge tolidse moge 1khz
goto main
'--------------------
palse:
waitms 150
do
if pina.1=1 then goto stop
portb.1=1
waitus 500 ' 500 micro saniye ya nim mili saniye ta ferekans beshe 1khz
portb.1=0
waitms 500 ' 500 micro saniye ya nim mili saniye ta ferekans beshe 1khz
loop
'--------------------------------------------------------------------------
stop:
waitms 150
portb=0
do
portb.1=1
waitms 500 ' tolide palse 1Hz
portb.1=0
waitms 500
if pina.1=1 then goto palse
loop

اطلاعیه

ایراد در تولید پالس نیم ثانیه در میکرو

ایراد در تولید پالس نیم ثانیه در میکرو

دیدگاه

دیدگاه

دیدگاه