نیاز به یک راهنمای بیسیک

electronic

سلام دوستان عزیز
من از امروز می خوام کار کردن با AVR به زبان بیسیک و شروع کنم.از دوستان عزیز کسی هست که بتونه تو یاد گیری بیسیک به من کمک کنه.من می خوام یه دوست عزیز باشه که هروقت در مورد بیسیک سوال داشتم سوالو اینجا بذارم و لطف کنه که جواب منو بده.
اگه کسی هست لطفا جوابو واسه من همینجا بذاره.
به عنوان اولین سوال یه برنامه ساده می خوام که یه پین از یه پورتو با تاخیر 2 ثانیه خاموش روشن کنه.
هر کاری کردم راش بندازم نشد.
من از دستوران Do ,Loop,Set ,Reset استفاده کردم ولی نشد.
اگه یکی راهنمائی کنه ممنون میشم.

s_a_f2

سلام.بنويس:
do
portx.y = 1
wait2
portx.y =0
wait2
loop
كه قبلش بايد نوع چيپ و فركانس كريستالو تعيين كني كه در مجموع براي مثال با مگا 8 ميشه:
regfile = "m8def.dat"
crystal = 1000000
portb.2 = output
main:
do
portx.y = 1
wait2
portx.y =0
wait2
loop
end
كه البته بايد يدوني كه كلمه ي m8def.dat بايد بين كوتيشن(") باشه كه توي تايپ اشتباه شده.
موفق باشي.

webmaster

سلام از امروز دوباره مثل قبلا همیشه انلاین هستم و دوباره به سایت اومدم راستی چیزی به تولد سایت نمونده ها !

خوب بریم سر برنامه نویسی
من هم از یک روش دیگر برای برنامه شما استفاده کردم و مینویسم تا یاد بگیرید البته روش بالا هم درسته
این خوبی برنامه نویسی هست که میشه از چند راه یک برنامه نوشت.
در ضمن فایل این برنامه در پروتیوس براتون گذاشتم که اگر خواستید میتوانید دانلود کنید.
هم چنین از چند روز دیگر اموزش Avrرا خودم شروع میکنم و در سایت میذارم.

برای این که خیالت راحت بشه فایل ضمیمه را دانلود کن
یا علی