دستور input

[safavism]

با سلام خدمت دوستان

از دستور input جهت دریافت دیتا از پورت سریال ماژول گیرنده hm_tr استفاده میکنم ولی وقتی دیتایی دریافت نمیشه loop مربوط به دریافت دیتا متوقف میشه و رو خط دستور input می مونه ولی میخوام وقتی دیتایی نباشه از loop خارج بشه و بعنوان مثال رو صفحه lcd بنویسه no data ...بیسوادم دیگه به بزرگواری خودتون ببخشید از دوستان راهنمایی میخوام(بیسیک-بیسکام)

[cmuiran]

سلام
والا ما که متوجه نشدیم :018:
ولی در کل وقتی از دستور input استفاده میکتی cpu اینقدر صبر میکنه که از پورت سریال دیتا بگیره تا وقتی هم دیتا نگیره خط بعد اجراء نمیکه
برای جلوگیری از این مشکل یک ریجیستر که هنگام آمدن دیتا از پورت سریال 1 میشه میتونی از اون استفاده کنی فعلا یادم نیس ولی بهت میگم چییه
در ضمت بهتر توضیح بده ، من مشکل اصلی متوجه نشدم

[safavism]

از اینکه بد توضیح میدم ببخشید
میخواستم از دست این صبر cpu خلاص بشم راهی هست که بزنیم تو سر این cpu بی صاحب متوجه بشه که اصلا الان قرار نیس دیتا بیاد بیکار نشین برو دنبال کارای دیگه...میخواستم زمانی که دیتا نمیاد جمله NO DATA ودر صورت دریافت دیتا از پورت سریال اون اطلاعاتی که از پورت میگیرم رو LCD نمایش داده بشه..

[cmuiran]

مهندس این دستوری من تو هیچ کتابی ندیدم ولی کار میکنه
If Iserial = 1 then Call _seria


دستور بالا تا زمانی که دیتا نیاد کاری نداری ولی اگه دیتا بیاد میره تو تابع _seria

[modj.ir]

می تونین وقثه سریال رو فعال کنین و وقتی اطلاعاتی دریفات شد ، روتین وقفه اون رو نمایش بده

[morteza_rk]

سلام

علتش اینه که دستور input برای اجرا نیاز به کاراکتر اینتر (Cr) با کد 13 داره. برای خلاصی از این حالت روش های زیادی وجود داره. از جمله نظیم خواص دستور input ، روش دیگه هم استفاده از پورت سریال در مد وقفه ای هست که توصیه میشه. البته روش های دیگه هم هست.

[safavism]

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

[safavism]

با سلام
If Iserial = 1 then Call _seria متاسفانه نشد...یعنی اینکه کامپایل نمیشه خطا میزنه....میخواستم سراغ وقفه نرم ولی رفتم ... مجبورم :sa:

[morteza_rk]

if iserial = 1 then call _seria متاسفانه نشد..
مهندس ما اصلا همچین دستوراتی نداریم توی بسکام. منظور پیمان جان این بود که خودتون یه همچین روتینی بسازید. دوتا اسم هم مثال زده.

[shayanmelody]

dim s as string*16
do
while s=0
s=waitkey()
if s>0 then
home
lcd s
else
home
lcd "no data"
end if
wend
loop

[cmuiran]

سلام آقا مرتضی این دستور iserial تو بسکام هست ولی تو help نیس با 1001 ببختی و ترفند به دست آوردم
این دستور زمانی که سریال بیاد 1 میشه و نیاد 0 هست که میتونه خیلی کاربردی باشه ، به کار من که شدید اومد

[cmuiran]

با سلام
if iserial = 1 then call _seria متاسفانه نشد...یعنی اینکه کامپایل نمیشه خطا میزنه....میخواستم سراغ وقفه نرم ولی رفتم ... مجبورم :sa:

تو ورژن 2.0.7.3 من دارم از این دستور استفاده میکنم
حالا نمیدونم ورژن چند استفاده میکنین

[safavism]

متشکرم از دوستان

جناب غلامی ورژن 1.11.9.5...من از قافله عقب هستم!

[cmuiran]

دادا این ورژن نصب کن کارت خیلی راحت تر از دستورات راه میفته کلی امکانات مخفی داره !!

[morteza_rk]

سلام آقا مرتضی این دستور iserial تو بسکام هست ولی تو help نیس با 1001 ببختی و ترفند به دست آوردم

جالبه! من تا حالا ندیدمش. ولی دستور ischarwaiting رو می دونم که داریم. من سه تا ورژن نصب دارم. 1.119.8 و 2.0.7.3 , 2.0.7.5 ، دمت گرم دادا ، روشنمون کردی.

به نظر من استفاده از مد وقفه ای بهتره مهندس صفوی.

[cmuiran]

جالبه! من تا حالا ندیدمش. ولی دستور ischarwaiting رو می دونم که داریم.

سلام مهندس
این دستور چیکار میکنه ؟

[morteza_rk]

همونی که شما میگی iserial انجام میده! یعنی اگه یه بایت به پورت سریال رسیده باشه و مقدار 1 برمی گردونه و در غیر اینصورت مقدار صفر!؟!

[safavism]

بسیار سپاسگزارم

راهنماییهای دوستان یک به یک تست میزنم نتیجه رو حتما منعکس میکنم ....فقط یه کد چناب شایان زحمت کشیدن و نوشتن اون waitkey بنظر برای ماژول hm-tr جواب نده چون فقط با input دیتا رو میگیره یه نکته دیگه اینکهwihle تا s صفر هست لوپ اجرا میشه ولی داخل همین لوپ s شرط بزرگ از ازصفر قرار داده شده بنظر منه بیسواد اون شرط قابل اجرا نخواهد بود ولی شاید بعد از خط waitkey قرار گرفته بمحض در یافت دیتا و بعد از رسیدن به اول لوپ مربوطه دیگه لوپ اجرا نشه و بقیه کد اجرا بشه ..باتشکر

[cmuiran]

آقا محمد من به شما iserial سفارش میکنم :0013:

[safavism]

{quote=cmuiran;56501]آقا محمد من به شما iserial سفارش میکنم :0013:[/quote]
حتما بر روی چشم.. , باید ورژن 2.0.7بسکام نصب کنم

[safavism]

با سلام
iserial استفاده کردم در ورژن 2.0.7.3 ولی خطا میزنه اما ischarwaiting مشکلی نداشت و تست زدم مشکل حل شد که با کمی تغییرات در کد برنامه به نتیجه رسیدم ...اما یه راه دیگه هم تست زدم و اون استفاده از امکانات تایمر 1 بود باز موفق شدم به نتیجه برسم .از مهندس غلامی و رحیمی ودیگر دوستان سپاسگزارم خدا به شما اجر بده به یه بچه سید خمس علمتون دادین.ولی اون iserial باید پیداش کنم .والا اول من خوندمش عزراییل ترسیدم برم طرفش.

[cmuiran]

با سلام
iserial استفاده کردم در ورژن 2.0.7.3 ولی خطا میزنه اما ischarwaiting مشکلی نداشت و تست زدم مشکل حل شد که با کمی تغییرات در کد برنامه به نتیجه رسیدم .

جالبه ، من استفاده میکنم مشکل نداره ولی برای شما خطا داره
داداش خطا چی میده ؟؟

[safavism]

جالبه ، من استفاده میکنم مشکل نداره ولی برای شما خطا داره
داداش خطا چی میده ؟؟

با سلام
کامپایل نمیشه ...بی مروت بسکام همچین دستوری نمیشناسه!

[cmuiran]

:mrgreen: حتما بسکام من VIP هس دیگه
جی دونم ، شاید یک سری کتابخانه هس که من دارم تو ندارم
بازم نمیدونم

[morteza_rk]

حتما بسکام من vip هس دیگه
جی دونم ، شاید یک سری کتابخانه هس که من دارم تو ندارم
بازم نمیدونم

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