الکترونیک 98 آموزش الکترونیک-رباتیک-برق-برنامه نویسی میکروکنترلرها، رسپبری پای و آردوینو
ساخت آسانسور
در این بخش دانلود پروژه ساخت آسانسور Lift چهار طبقه توسط میکروکنترلر AVR, توسط تیم الکترونیک و برنامه نویسی الکترونیک ۹۸ برای شما علاقه مندان به پروژه های میکروکنترلر AVR آماده شده است. یکی از کاربردهای رایج میکروکنترلرها استفاده از آن ها در صنعت به عنوان پردازشگر CPU در ساخت مدارات فرمان جهت کنترل مدارات قدرت می باشد. سیستم های بالابر یا آسانسورها (Lift) از جمله موارد صنعتی هستند که شرکت های سازنده برای طراحی مدارات فرمان آن از میکروکنترلرها استفاده می کنند. در این پروژه قصد داریم تا با استفاده از میکروکنترلرهای AVR, که امروزه در جهان به خصوص ایران از جمله پرکاربردترین پردازشگرها در طراحی مدارات الکترونیکی جهت اجرای انواع پروژه های صنعتی و تولیدی به شمار می آیند, مدار فرمان یک آسانسور 4 طبقه را شبیه سازی نمائیم.
نحوه عملکرد آسانسور Lift
در این پروژه سعی شده است تا طراحی مدار الکترونیکی آسانسور نزدیک به واقعیت باشد, به طوری که برنامه نویسی و در نتیجه رفتار میکروکنترلر AVR کاملا شبیه به یک مدار کنترل آساسنسور واقعی می باشد. به طور کلی عملکرد میکروکنترلر AVR و رفتار مدار فرمان در این پروژه شامل سه حالت می باشد, که در زیر به صورت کامل به آن اشاره شده است.
حالت اول : تشخیص افراد قرار گرفته در میان درب آسانسور
در طراحی شماتیک فنی پروژه برای تشخیص افراد قرار گرفته در میان درب آسانسور توسط میکروکنترلر AVR از یک کلید به نام SW1 استفاده شده است. در حقیقت کلید SW1 یک سنسور جهت تشخیص افراد قرار گرفته در میان درب آسانسور می باشد, که شما می توانید برای تکمیل کردن این قسمت از سنسورهای فرستنده گیرنده مادون قرمز استفاده کنید.
همانطور که می دانید زمانی که نور ساطع شده از ال ای دی LED فرستنده مادون قرمز به ال ای دی گیرنده مادون قرمز برسد, نور مادون قرمز دریافت شده در گیرنده باعث کاهش مقاومت ال ای دی LED گیرنده مادون قرمز و در نتیجه عبور جریان الکتریکی از آن می شود. این عمل بدان معناست که مانعی در راه فرستنده و گیرنده مادون قرمز وجود ندارد و میکروکنترلر AVR می تواند فرمان بسته شدن درب آسانسور را به مدار قدرت صادر نماید. برای راه اندازی سنسور فرستنده گیرنده مادون قرمز جهت استفاده در این پروژه می توانید به جای کلید SW1 از مدار قرار داده شده در شکل زیر استفاده نمائید.
نکات مهم
نکته 1 : در برنامه نوشته شده برای میکروکنترلر AVR هنگامی که PORTA.7 ولتاژ مثبت بگیرد به این معنا می باشد که شخصی بین درب آسانسور قرار گرفته است و در نتیجه فرمان بسته شدن درب آسانسور صادر نمی شود, از آنجا که طراحی مدار قرار داده شده در بالا به گونه ای است که در هنگام نبود شخص بین درب آسانسور خروجی آی سی OPAMP ولتاژ مثبت می گیرد, از یک آی سی NOT (معکوس کننده) استفاده کرده ایم. شما می توانید با اعمال کمی تغیر کوچک در برنامه نوشته شده, برنامه میکروکنترلر AVR را طوری عوض کنید که با دریافت ولتاژ مثبت بر روی پایه PORTA.7 فرمان بسته شدن درب آسانسور را به مدار قدرت صادر نماید, به این ترتیب نیازی به استفاده از آی سی NOT در نقشه شماتیک بالا نیست.
نکته 2 : توسط پتانسیومتر RV1 می توانید, سنسور گیرنده مادون قرمز را برای انجام عملکرد مناسبتر کالیبره نمائید.
نکته 3 : جهت آشنایی بیشتر با سنسورهای مادون قرمز و نحوه عملکرد آن ها می توانید پروژه های ساخت فرستنده و گیرنده مادون قرمز با میکروکنترلر AVR | ساخت ربات مسیریاب ویژه با ۷ سنسور CNY70 توسط AVR | اندازه گیری سرعت چرخش موتور انکدردار با میکروکنترلر AVR را مطالعه نمائید.
حالت دوم : اندازه گیری وزن آسانسور جهت بررسی ظرفیت غیر مجاز
یکی از موارد الزامی در طراحی آسانسور اندازه گیری وزن کابین در هنگام حرکت آسانسور می باشد, تا در صورتی که وزن تعداد افراد سوار شده در آسانسور بیشتر از حد مجاز تعیین شده توسط شرکت سازنده باشد, دستور حرکت آسانسور توسط میکروکنترلر AVR تا زمان رفع خطا به مدار قدرت جهت حرکت آسانسور صادر نشود. در شماتیک اصلی این پروژه برای اندازه گیری وزن کابین از یک پتانسیومتر RV1 استفاده شده است. که شما می توانید برای تکمیل این قسمت و اندازه گیری وزن در واقعیت از یک سنسور لودسل Load Cell مناسب استفاده نمائید.
حالت سوم : حرکت آسانسور به طبق درخواست کاربران
در شماتیک اصلی این پروژه از 4 کلید به عنوان انتخاب طبقه مورد نظر, و 4 کلید دیگر که در هر طبقه یک کلید قرار می گیرد به عنوان خبردهنده آسانسور یا همان کلید درخواست کمک استفاده شده است. همچنین 4 لامپ ال ای دی LED سبز رنگ برای نمایش طبقه مورد نظر و 4 ال ای دی LED قرمز رنگ به عنوان نمایش کلیدهای خبردهنده در هر طبقه به کار گرفته شده است.
نقشه شماتیک پروژه ساخت آسانسور Lift چهار طبقه توسط AVR
در این پروژه برای نمایش اطلاعاتی نظیر نمایش شماره طبقه ای که آسانسور در آن قرار دارد, نمایش وضعیت مجاز یا غیر مجاز بودن وزن کابین آسانسور, نمایش وضعیت باز و بسته بودن درب آسانسور از یک ال سی دی گرافیکی 64*128 استفاده شده است.
از آنجا که این پروژه یک نمونه شبیه سازی شده کامل از نحوه عملکرد آسانسور می باشد, جهت حرکت آسانسور در بین طبقات از یک موتور DC دوازده ولتی استفاده شده است. که برای راه اندازی و کنترل سرعت حرکت این موتور DC توسط میکروکنترلر ATmega32 از تراشه معروف و پر کاربرد L298 استفاده کرده ایم. لازم به ذکر است حداکثر جریان قابل تحمل این تراشه 2A با حداکثر ولتاژ 50 ولت می باشد.
برنامه میکروکنترلر در محیط نرم افزار Bascom AVR
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188 189 190 191 192 193 194 195 196 197 198 199 200 201 202 203 204 205 206 207 208 209 210 211 212 213 214 215 216 217 218 219 220 221 222 223 224 225 226 227 228 229 230 231 232 233 234 235 236 237 238 239 240 241 242 243 244 245 246 247 248 249 250 251 252 253 254 255 256 257 258 259 260 261 262 263 264 265 266 267 268 269 270 271 272 273 274 275 276 277 278 279 280 281 282 283 284 285 286 287 288 289 290 291 292 293 294 295 296 297 298 299 300 301 302 303 304 305 306 307 308 309 310 311 312 313 314 315 316 317 318 319 320 321 322 323 324 325 326 327 328 329 330 331 332 333 334 335 336 337 338 339 340 341 342 343 344 345 |
$regfile = "m32def.dat" $crystal = 8000000 Config Graphlcd = 128 * 64 , Dataport = Portb , Controlport = Portc , Ce = 2 ,_ Cd = 3 , Wr = 0 , Rd = 1 , Reset = 4 , Fs = 5 , Mode = 8 Cursor Off Config Portd = Output :Config Pinc.7 = Output :Config Pinc.6 = Output Config Pina.0 = Input :Config Pina.1 = Input :Config Pina.2 = Input Config Pina.3 = Input :Config Pina.4 = Input :Config Pina.5 = Output Config Pina.6 = Output :Config Pina.7 = Input Dim B1 As Bit , B2 As Bit , B3 As Bit , B4 As Bit Dim M11 As Bit , M12 As Bit , Nomojaz As Bit , Mem As Bit , Tab As Byte Dim X As Word : Tab = 1 : M1 Alias Porta.5 :M2 Alias Porta.6 Showpic 0 , 0 , Start1 Wait 3 Cls Showpic 0 , 0 , St1 Showpic 94 , 0 , Stt Showpic 63 , 4 , Aval Showpic 60 , 41 , Baz Do Starts: Key: GOSUB SHART If Pina.7 = 1 Then Goto Key Showpic 60 , 41 , Baste '-------ASANSOR--------------------- B2: If B2 = 1 Then Portd.5 = 1 If Tab > 2 Then Showpic 41 , 31 , Setare M1 = 1 M2 = 0 If B3 = 1 Then Goto B3 Elseif Tab < 2 Then Showpic 41 , 31 , Setare M1 = 0 M2 = 1 Elseif Tab = 2 Then M1 = 0 M2 = 0 B2 = 0 Goto Starts End If Waitms 100 If Pina.0 = 1 Then Nomojaz = 1 M1 = 0 M2 = 0 Showpic 60 , 22 , Nmojaz Else Showpic 60 , 22 , Mojaz If Tab = 1 Or Tab = 3 Then GOSUB SHART Showpic 0 , 0 , St2 Showpic 63 , 4 , Dovom End If If Tab = 4 Then GOSUB SHART Showpic 0 , 0 , St3 Showpic 63 , 4 , Sevom GOSUB SHART Showpic 0 , 0 , St2 Showpic 63 , 4 , Dovom End If M1 = 0 M2 = 0 B2 = 0 Tab = 2 Portd.0 = 0 Portd.2 = 0 Portd.3 = 0 H2: Showpic 60 , 41 , Baz Portd.1 = 1 GOSUB SHART Showpic 60 , 41 , Baste Portd.1 = 0 If Pina.7 = 1 Then Goto H2 End If Else Portd.5 = 0 End If '------------------------------ B3: If B3 = 1 Then Portd.6 = 1 If Tab > 3 Then Showpic 41 , 17 , Setare M1 = 1 M2 = 0 Elseif Tab < 3 Then Showpic 41 , 17 , Setare M1 = 0 M2 = 1 If B2 = 1 Then Goto B2 Elseif Tab = 3 Then M1 = 0 M2 = 0 B3 = 0 Goto Starts End If Waitms 100 If Pina.0 = 1 Then Nomojaz = 1 M1 = 0 M2 = 0 Showpic 60 , 22 , Nmojaz Else Showpic 60 , 22 , Mojaz If Tab = 2 Or Tab = 4 Then GOSUB SHART Showpic 0 , 0 , St3 Showpic 63 , 4 , Sevom End If If Tab = 1 Then GOSUB SHART Showpic 0 , 0 , St2 Showpic 63 , 4 , Dovom Showpic 41 , 17 , Setare GOSUB SHART Showpic 0 , 0 , St3 Showpic 63 , 4 , Sevom End If M1 = 0 M2 = 0 B3 = 0 Tab = 3 Portd.0 = 0 Portd.1 = 0 Portd.3 = 0 H3: Showpic 60 , 41 , Baz Portd.2 = 1 GOSUB SHART Showpic 60 , 41 , Baste Portd.2 = 0 If Pina.7 = 1 Then Goto H3 End If Else Portd.6 = 0 End If '--------------------------- B4: If B4 = 1 Then Portd.7 = 1 If Tab > 4 Then Showpic 41 , 3 , Setare M1 = 1 M2 = 0 Elseif Tab < 4 Then Showpic 41 , 3 , Setare M1 = 0 M2 = 1 If B2 = 1 Or B3 = 1 Then Goto B2 Elseif Tab = 4 Then M1 = 0 M2 = 0 Goto Starts End If Waitms 200 If Pina.0 = 1 Then Nomojaz = 1 M1 = 0 M2 = 0 B4 = 0 Showpic 60 , 22 , Nmojaz Else Showpic 60 , 22 , Mojaz If Tab = 3 Then GOSUB SHART Showpic 0 , 0 , St4 Showpic 63 , 4 , Char End If If Tab = 2 Then GOSUB SHART Showpic 0 , 0 , St3 Showpic 63 , 4 , Sevom Showpic 41 , 3 , Setare GOSUB SHART Showpic 0 , 0 , St4 Showpic 63 , 4 , Char End If If Tab = 1 Then GOSUB SHART Showpic 0 , 0 , St2 Showpic 63 , 4 , Dovom Showpic 41 , 3 , Setare GOSUB SHART Showpic 0 , 0 , St3 Showpic 63 , 4 , Sevom Showpic 41 , 3 , Setare GOSUB SHART Showpic 0 , 0 , St4 Showpic 63 , 4 , Char End If M1 = 0 M2 = 0 B4 = 0 Tab = 4 Portd.0 = 0 Portd.1 = 0 Portd.2 = 0 H4: Showpic 60 , 41 , Baz Portd.3 = 1 GOSUB SHART Showpic 60 , 41 , Baste Portd.3 = 0 If Pina.7 = 1 Then Goto H4 End If Portd.7 = 0 End If '--------------------------- B1: If B1 = 1 Then Portd.4 = 1 If Tab > 1 Then Showpic 41 , 45 , Setare M1 = 1 M2 = 0 If B2 = 1 Or B3 = 1 Then Goto B3 Elseif Tab < 1 Then Showpic 41 , 45 , Setare M1 = 0 M2 = 1 Elseif Tab = 1 Then M1 = 0 M2 = 0 B1 = 0 Goto Starts End If Waitms 100 If Pina.0 = 1 Then Nomojaz = 1 M1 = 0 M2 = 0 Showpic 60 , 22 , Nmojaz Else Showpic 60 , 22 , Mojaz If Tab = 2 Then GOSUB SHART Showpic 0 , 0 , St1 Showpic 63 , 4 , Aval End If If Tab = 3 Then GOSUB SHART Showpic 0 , 0 , St2 Showpic 63 , 4 , Dovom Showpic 41 , 45 , Setare GOSUB SHART Showpic 0 , 0 , St1 Showpic 63 , 4 , Aval End If If Tab = 4 Then GOSUB SHART 'Next X Showpic 0 , 0 , St3 Showpic 63 , 4 , Sevom Showpic 41 , 45 , Setare GOSUB SHART Showpic 0 , 0 , St2 Showpic 63 , 4 , Dovom Showpic 41 , 45 , Setare GOSUB SHART Showpic 0 , 0 , St1 Showpic 63 , 4 , Aval End If M1 = 0 M2 = 0 B1 = 0 Tab = 1 Portd.1 = 0 Portd.2 = 0 Portd.3 = 0 H1: Showpic 60 , 41 , Baz Portd.0 = 1 GOSUB SHART Showpic 60 , 41 , Baste Portd.0 = 0 If Pina.7 = 1 Then Goto H1 End If Portd.4 = 0 End If Loop End SHART: For X = 1 To 10000 If Pina.1 = 1 Then B1 = 1 If Pina.2 = 1 Then B2 = 1 If Pina.3 = 1 Then B3 = 1 If Pina.4 = 1 Then B4 = 1 Waitus 200 Next X RETURN Start1: $bgf "start1.bgf" Stt: $bgf "stt.bgf" St1: $bgf "st1.bgf" St2: $bgf "st2.bgf" St3: $bgf "st3.bgf" St4: $bgf "st4.bgf" Setare: $bgf "setare.bgf" Mojaz: $bgf "mojaz.bgf" Nmojaz: $bgf "nmojaz.bgf" Aval: $bgf "AVAL.bgf" Dovom: $bgf "DOVOM.bgf" Sevom: $bgf "SEVOM.bgf" Char: $bgf "CHAR.bgf" Baz: $bgf "baz.bgf" Baste: $bgf "baste.bgf" |
نکته 4 : از آنجا فیوز بیت JTAG بر روی PORTC میکروکنترلر ATmega32 قرار دارد و به صورت پیش فرض فعال می باشد, و ما نیز در این پروژه از پورت C میکروکنترلراستفاده کرده ایم, به همین خاطر در هنگام پروگرام کردنمیکروکنترلر ATmega32 حتما فیوز بیت JTAG را غیر فعال نمائید.
نکته 5 : لطفا توجه داشته باشید در هنگام کامپایل کردن و پروگرام کردن برنامه فایل های با فرمت bgf. که همان تصاویر استفاده شده در پروژه جهت نمایش بر روی ال سی دی گرافیکی می باشد, داخل همان پوشه ای قرار داده شود که فایل هگز Hex و دیگر فایل های برنامه نویسی قرار داده شده است.
سلام در رابطه با برد میکرویی که زحمت طراحیش رو کشیدین،میخواستم یکم فنی تر باهاتون در ارتباط باشم،بنده یه تابلو ی برای بالابر هیدرولیکی که دارم،میخوام،خودم الکترونیک خوندم و در زمینه جک های هیدرولیک تراشکاری دارم
ممنون میشم با بنده در ارتباط باشید.
سلام دوست عزیز
شما می توانید از طریق تلفن موجود در سایت با بخش فنی سایت در ارتباط باشید.
سلام خسته نباشید .من برنامه ای رو به زبان بیسیک برای آسانسور گذاشتید رو نوشتم ولی خط سوم برنامه خطا میده چون تو این برنامه پورت ها با حرف کوچک نوشته شده ولی وقتی داخل محیط نرم افزار مینویسم تبدیل به حرف بزرگ میشه مشکل چیه لطفا کمک کنید خیلی ممنون میشم.
سلام دوست عزیز
لطفا تنها از ورژن نرم افزار بسکام که در سایت الکترونیک98 گذاشته شده استفاده کنید.
چراکه نسخه های جدید و موجود در اینترنت به درستی کرک نشده اند و یا کرک آن ها مربوط به نسخه آزمایشی می باشد.
عذر میخوام ورژن نرم افزار سایت چیه؟
ورژن پیشنهادی ما 1.11.9.0 است که می توانید از طریق همین سایت دانلود کنید.
Error : 12 Line: 3 Unknown CONFIG parameter ][PORTB
این ارور رو میده معنی و مفهومش رو میشه بگید ممنونتون میشم
برنامه دوباره آزمایش شد و مشکلی در برنامه یافت نشد
همانطور که در پاسخ قبلی ذکر شد مشکل از نرم افزار بسکام شماست لطفا از نرم افزار با ورژن ذکر شده استفاده کنید.
سلام میشه فایل پروتیوس رو بزارید عکس خیلی ناخوانا هست
سلام
ممنون از زحمات شما
میشه لطف کنین و فایل پروتئوس رو هم بارگزاری کنین