کمک!!!!!

[alizeraatcar]

سلام

من می خوام تو بیسکام برنامه ای بنویسم که چهار تا پین از یک پورت رو ورودی تعریف کنم و ورودی 4 پین رو در یک متغیر( به صورت باینری) بریزه.
اگه میشه کمکم کنید.

یه سوال دیگه یه سایت یا مقاله ای درباره ربات های فوتبالیست دانش آموزی می خواستم

متشکرم.

[IMeysam]

Config Pind.0 = Input
Config Pind.1 = Input
Config Pind.2 = Input
Config Pind.3 = Input
البته پین ها به طور پیش فرض ورودی هستن.
بهتره که پولاپ داخلی رو فعال کنی :portd=&b00001111
با خوندن ثبات pinx هم میتونی به مقدار صفر یا یک بودن پین ها دسترسی پیدا کنی.باینری و غیر باینری نداره .اگه مثلا می خوای بدونی pind.2 صفره یا یک با یه
if pind.2=0 then
می تونی کار خودت رو راه بندازی.

[alizeraatcar]

ممنون
ولی منظور من این کی 4 تا پین ورودی رو با هم تو شرط ببرم مثلا:

if portd = &B00001111 then

یعنی اگر پین های 1 و 2 و 3 و 4 یک بود ....

[reza_analog]

دوست عزيز مشكل اصلي شما توي سيستم هاي اعداد سيستم ها ديجيتاليه
چون اين سوال رو پرسيديد اين رو مي گم :oops:

1 پورت 8 تا پين داره
اگه هر پين 1 بيت باشه پس ميشه 8 بيت يعني 1 بايت پس اگه اطلاعات اون رو بگيري
ميشه 1 بايت
شما يك متغيير تعريف مي كني
dim a as byte
بنام a از نوع بايت

بعد اون رو به اين صورت مي خوني ( مثلا پورت D رو ورودي كردي)
a=pind

حالا كل اطلاعات پورت d توي متغيير a ريخته شده
حالا كافيه مقدار a رو توسط دستورات منطقي با مقدار 00001111 and بكني در اين صورت اون 4 تا بيت بالائي متغيير a هر چي باشه صفر ميشه

بعد شما مي توني در ساده ترين صورت داده هاي اين متغيير رو تست بكني


اگه خواستي كامل بگو از اين برنامه ات چه هدفي رو دنبال مي كني و كامل بهت توضيح بدم


بر مي گردم :wink: