انجمن های گفتگوی روبوایکیو

لطفا به سیستم وارد یا ثبت‌نام کنید.

لطفا برای ورود نام کاربری و رمز عبورتان را وارد نمایید

لطفا برای استفاده بهتر از انجمن، ثبت نام کنید!

نویسنده موضوع: مشکل در دستور debounce  (دفعات بازدید: 1116 بار)

0 کاربر و 1 مهمان درحال دیدن موضوع.

آفلاین Ali009

  • کاربر جدید
  • *
  • ارسال: 5
  • امتیاز: 1
    • ديدن مشخصات
مشکل در دستور debounce
« : 17 تیر, 1396, 06:08:55 »
سلام
من این برنامه رو نوشتم:
$regfile = "m8def.dat"
$crystal = 1000000
config portb = output
config portc = input
config portd = output
config DEBOUNCE=50
dim a as byte
do
SET PORTB.1
debounce pinc.1,1,q
portd=a
loop
q:
incr a
jmp
وقتی تو پروتئوس شبیه سازی میکنم کار نمیکنه
تو بهترین حالت سون سگمنت فقط 1 رو نشون میده
اگه این طوری بنویسم:
$regfile = "m8def.dat"
$crystal = 1000000
config portb = output
config portc = input
config portd = output
config DEBOUNCE=50
dim a as byte
do
SET PORTB.1
portd=a
debounce pinc.1,1,q
loop
q:
incr a
portd=a
jmp
وقتی از زیر برنامه خارج میشه دوباره 0 رو نشون میده
یعنی با هر بار خارج شدن از این زیر برنامه،متغیر 0 میشه
مشکل چیه؟