ايران ويج

نسخه‌ی کامل: سوالهای برنامه نویسی با کامپایلر BASCOM
شما در حال مشاهده‌ی نسخه‌ی متنی این صفحه می‌باشید. مشاهده‌ی نسخه‌ی کامل با قالب بندی مناسب.
صفحه‌ها: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23
برای جدول lookup این درسته!!!!؟؟؟
کد:
do
  '  B = Lookup(b , Ebi)
' Portc = B
  'Incr B
  'If B > 2 Then : B = 0 : End If
  'Waitms 500
loop
ebi:
data &B1111100 , &B0001111 , &B001100
درسته ! البته اگه ' رو برداری !!!
فقط حواست باشه جدول لوک اپ از صفر شروع میشه !!! ( که البته شما رعایت کردی )
کد:
data 2&B1111100 , 1&B0001111 ,0 &B001100
این جوریه...
صفر اخره و به ترتیب برمیگرده

نه !
از صفر شروع میشه !!!!
(۰۷-آبان-۱۳۸۹, ۲۳:۲۰:۰۲)ebka نوشته است: [ -> ]
کد:
Ebi:
    Data &B000100 , &B000010 , &B000001
این جوریه...
صفر اخره و به ترتیب برمیگرده
من میخوام اول ال ای دی اول روشن بشه بعد بعدی و دوباره از اول
از یکی از این دوتا استفاده کن ! ( مثل همن )

کد php:
Data &B00000001 , &B00000010 , &B00000100 , &b00001000 
کد php:
Data 1 
(۰۷-آبان-۱۳۸۹, ۲۳:۳۸:۱۷)Gawky نوشته است: [ -> ]از یکی از این دوتا استفاده کن ! ( مثل همن )

کد php:
Data &B00000001 , &B00000010 , &B00000100 , &b00001000 
کد php:
Data 1 
چه جوری مثل همند؟؟؟؟؟
مثلا برای سون سگمنت که بخوام جدول lookup بزارم چه جوری میشه...
فرض کن پورت c تو مگا 32 خروجی
کد:
b=&b0000001
یک الان بیت کم ارزشه .
واسه پایه c.0 هست یا c.6?????
مهندس عدد 00000001 تو مبنای دو میشه همون عدد 1 خودمون !
00000010 میشه عدد 2 دسیمال
و ....

پس از سمت راست کم ارزش ترن !!
تو اکزمپل شما میشه c.0

اینم شاید به دردت بخوره ( کدهای لازم سون سگمنت )

کد php:
Digits:
Data 63 91 79 102 109 125 127 111 64 128 56 70 00
'     0    1   2    3    4     5     6     7   8     9     -    dp    L    + 
(۰۸-آبان-۱۳۸۹, ۰۰:۲۱:۵۷)Gawky نوشته است: [ -> ]مهندس عدد 00000001 تو مبنای دو میشه همون عدد 1 خودمون !
00000010 میشه عدد 2 دسیمال
و ....

پس از سمت راست کم ارزش ترن !!
تو اکزمپل شما میشه c.0

اینم شاید به دردت بخوره ( کدهای لازم سون سگمنت )

کد php:
Digits:
Data 63 91 79 102 109 125 127 111 64 128 56 70 00
' 0 1 2 3 4 5 6 7 8 9 - dp L + 
بسیار بسیار ممنون..
علی جان برام میگی که چجوری 63 میشه صفر و پایه های مربوطه به خودش رو یک میکنه؟و همین طور اعداد دیگه....
من تو جدول میزارم نشون نمیده ولی وقتی با دستور
کد:
Portc = 63
    Waitms S
    Portc = 6
    Waitms S
    Portc = 91
    Waitms S
    Portc = 79
    Waitms S
    Portc = 102
    Waitms S
    Portc = 109
    Waitms S
    Portc = 125
    Waitms S
    Portc = 7
    Waitms S
    Portc = 127
    Waitms S
    Portc = 111
    Waitms S
نشون میده...
یه سوال توی پرتئوس من برای سون سگمنتاش اون سگمنت وسط رو روشن نمیکنه...
طریقه برنامه نویسی جدول lookup روبهم میگی...
ممنونم علی جان..
عدد 63 رو از مبنای ده به مبنای دو تبدیل کنی میفهمی !!!



من که ایرادی نمیبینم !

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

کد php:
$regfile "m8def.dat" $crystal 1000000

Ddrd 
255

Dim B 
As Byte 

Do
   For 
0 To 9
      Portd 
Lookup(Ant)
      
Wait 1
   Next
Loop


Ant
:
Data 63 91 79 102 109 125 127 111 

این فایل برنامه و تست پروتئوس :
علی جان حل شد...
من این طور برنامه نوشته بودو
کد:
a=lookup(a,ebi)
portc=a
بجای اینکه a رو مساوی جدول lookup بزارم باید خوده پورت رو میزاشتم.
کد:
portc=lookup(a,ebi)
تبدیل مبنای دو دویی به دسیمال بود که اون رو هم فهمیدم..
صفحه‌ها: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23