ايران ويج

(۰۸-اسفند-۱۳۹۳, ۰۰:۰۵:۳۵)a_darya69 نوشته است: [ -> ]دوستان کسی نیست جواب بده؟

سلام
مدار شما ولتاژ و جريان را اندازه گيري ميكند و در
برنامه كه ارسال كرده ايد قسمت معادله توان وجود ندارد
شما بايد جريان و ولتاژ را بعد از قرائت بر روي lcd
در هم ضرب كنيد تا توان مصرف كننده بدست ايد

----
در مدار شما مقدار نهايي جريان كه مقدار اندازه گيري
توان را مشخص ميكند وابسته به مقاومت R2 است كه
در سر را مصرف كننده قرار داده شده و افت ولتاژ
دوسر ان متناسب با مقدار جريان عبوري است
---
چون حداكثر ولتاژ ورودي به ADC بايد تا 5 ولت باشد
و در برنامه و مدار شما افت ولتاژ مقاومت بر اثر جريان عبوري
يك ضريب 2.57 دارد نتيجه ميشود كه حداكثر سنجش جريان
5/257=1.94 است
پس حداكثر اندازه گيري محدود به تقريبا 2 امپر است و چون اين
2 امپر در ولتاژ 220 ولت است نتيجه ميشود كه
220 *2=440
يعني مدار تا حداكثر 440 وات اندازه گيري ميكند
------
نكته ديگر كه مهم است توان مقاومت R2 است چون بايد تحمل عبور
2 امپر را داشته باشد پس بايد مقاومت وات بالا باشد به اين صورت
1.2*2=2.4
يعني مقاوت سر راه مصرف كننده كه همان R2 با مقدار 1.2 اهم است
بايد حداقل 2.4 وات باشد كه براي اطمينان بيشتر ميتوانيد از يك مقاومت
5 وات و يا بالاتر استفاده كنيد (كمتر از 3 وات نباشد)

موفق باشيد

ممنون از توضیحات شما،
فقط یک سوال دیگه،
مقدار توانی که یک واتمتر از اندازه گیری یک لامپ 40وات و 100وات میده معمولأ چقدر است؟؟
آخه ابن واتمتر یک مقداری رو نشون میده آدم شک میکنه درست باشه!!

(۱۱-اسفند-۱۳۹۳, ۰۰:۱۷:۱۸)a_darya69 نوشته است: [ -> ]ممنون از توضیحات شما،
فقط یک سوال دیگه،
مقدار توانی که یک واتمتر از اندازه گیری یک لامپ 40وات و 100وات میده معمولأ چقدر است؟؟
آخه ابن واتمتر یک مقداری رو نشون میده آدم شک میکنه درست باشه!!

سلام
توان لامپ 40 وات 40 وات است اين مشخص است و هر واتمتري هم
اينرا نشان ميدهد منتها مدار شما در قسمت كد برنامه يعني
برنامه ميكرو كه ارسال كرده ايد بخش اندازه گيري وات ندارد
و دو مقدار جريان مصرف كننده و ولتاژ دو سر انرا نشان ميدهد
و شما بايد اين دوعدد را درهم ضرب كنيد تا مقدار توان را بدست بياوريد

اما اگر كد قسمت توان در برنامه ميكرو وجود دارد وشما انرا ارسال
نكرده ايد انرا ارسال كنيد تا اشكال پيدا شود
----
البته اين مدار در هر صورت قابل شبيه سازي است و ميتوان در شبيه
ساز انرا تست كرد منتها ممكن است بخاطر مسائلي كه در رابطه با اپ امپها
در شبيه ساز وجود دارد مقادير با مقادير واقعي فرق داشته باشد

موفق باشيد

دوستان اینم برنامه:
'==========================================
'BESMELLAHE RAHMANE RAHIM
'-------------------------------------------------
$regfile = "m8def.dat"
$crystal = 8000000
'outpt crystal is better
'
$hwstack = 100 '200 ' default use 32 for the hardware stack
$swstack = 200 '250 ' default use 10 for the SW stack
$framesize = 120

'=============================================
Config Lcd = 16 * 2

Config Lcdpin = Pin , Rs = Pind.5 , E = Pind.4 , Db4 = Pind.3 , Db5 = Pind.2 , Db6 = Pind.1 , Db7 = Pind.0
Cls
Cursor Off
'================================================
Config Adc = Single , Prescaler = Auto , Reference = Internal
Start Adc

'===========================================
Config Pind.6 = Output
Config Pind.7 = Output

Led_red Alias Portd.7
Led_green Alias Portd.6

'==========================================
Cls


Led_red = 1
Led_green = 0

Locate 1 , 6
Lcd "Hello"
Waitms 100

Led_red = 0
Led_green = 1
'==========================================

Dim A As Byte
Dim Aa As Byte
Dim Adcca As Word
Dim Adccv As Word

Dim Longg As Long
Dim Ss As Byte '*****************'
Dim Singlee As Single
Dim Stringg As String * 10
Dim Stringgg As String * 10

Dim Volt As Single
Dim Amper As Single
'=========================================
Cls
Main:

'Initlcd


Ss = 0
Locate 2 , 1 : Lcd "t=" ; Ss ; "s"
Waitms 95


For Aa = 1 To 99

If Adcca = 10 Then

Exit For

End If


Ss = Ss + 1
'cls
Locate 2 , 1 : Lcd "t=" ; Ss ; "s"
Waitms 95



Longg = 0

For A = 1 To 5
Adccv = Getadc(4)
Waitms 10
Longg = Longg + Adccv
Next

Longg = Longg / 5

Singlee = Longg * 2.44
Singlee = Singlee / 1000
Singlee = Singlee * 222

Longg = Singlee
Volt = Singlee


Locate 1 , 1 : Lcd "V=" ; Longg ; " "

'=========================================================

Longg = 0

For A = 1 To 5
Adcca = Getadc(3)
Waitms 10
Longg = Longg + Adcca
Next

Longg = Longg / 5

Singlee = Longg * 2.44
Singlee = Singlee / 1000
Singlee = Singlee / 2.57

Stringg = Fusing(singlee , "#.###")

Amper = Singlee
Locate 1 , 8
Lcd "A=" ; Stringg ; " "

'==========================================================
Singlee = Volt * Amper
Stringg = Fusing(singlee , "#.#")

Waitms 60


Stringgg = Stringgg + Stringg


Locate 2 , 8 : Lcd "W=" ; Stringgg ; "w/h "

Next

'Goto Main

End

(۱۱-اسفند-۱۳۹۳, ۲۳:۵۳:۲۱)a_darya69 نوشته است: [ -> ]دوستان باید ذکر کنم این مدار مقدار توان لامپ 40وات رو کمتر نشون میده.
در صورت امکان روش نمونه گیری جریان رو هم شرح بدین.

سلام
مقدار 40 وات را 30 وات نشان ميدهد ؟
عدد را براي همين 40 وات ذكر ميكرديد
تا با تحليل اين عدد ونسبتش با مقدار واقعي اشكال
مدار پيدا شود
---
نمونه گيري جريان بر اين اساس است كه در سر را
مصرف كننده يك مقاومت كم اهم قرار ميگيرد و بخاطر
عبور جريان افت ولتاژي در ان صورت ميگيرد كه اين ولتاژ
نشاندهنده يا متناسب با جريان عيوري است
در مدار شماR2 اين مقاومت است مقدار مقاومت بايد هرچه كمتر باشد
تا جريانهاي بالا بتوانند از ان عبور كنند بهمين علت افت ولتاژ
در ان خيلي زياد نيست و اپ امپهاي در مدار اين ولتاژ نماينده جريان را
تقويت ميكنند تا قابل اندازه گيري توسط ميكرو باشد
چون افت ولتاژ بصورت متناوب است ديودهاي يكسوساز نيز در
مدار اپ امپ انرا يكسو ميكنند ابته بعد از اينكه تقويت اوليه صورت
گرفت

موفق باشيد

ممنون، در این مدار از یک ضرب کننده آنالوگ ad633 استفاده شده است که جریان و ولتاژ را در هم ضرب می کند ولی در میکرو هم این دو پارامتر در هم ضرب می شوند، به نظر شما تفاوت این دو در چیست؟
نمونه گیری جریان که ابتدا ولتاژ است در نهایت میکرو چگونه جریان را حساب می کند؟

(۱۲-اسفند-۱۳۹۳, ۲۱:۱۶:۲۷)a_darya69 نوشته است: [ -> ]ممنون، در این مدار از یک ضرب کننده آنالوگ ad633 استفاده شده است که جریان و ولتاژ را در هم ضرب می کند ولی در میکرو هم این دو پارامتر در هم ضرب می شوند، به نظر شما تفاوت این دو در چیست؟
نمونه گیری جریان که ابتدا ولتاژ است در نهایت میکرو چگونه جریان را حساب می کند؟

سلام
قبلا گفته شد كه ميكرو با ADC فقط ولتاژ را اندازه گيري
ميكند

پس اگر شما افت ولتاژ يك مقاومت را داشته باشيد و انرا بر
مقدار مقاومت تبديل كنيد مقدار جريان را داريد در مدار ارسالي
شما با ميكرو و اپ امپ مقاومت R2 اين مقاومت است و و لتاژ
دو سر ان بعد از تقويت ويكسو شدن به ADC ميرسد
حال اگر بخواهيد خروجي ADC3 نماينده جريان عبوري باشد
بايد انرا بر مقدار مقاومت تقسيم كنيد
براي همين در حلقه مربوط به ADC3 اين مقدار بر 2.57
تقسيم ميشود
البته از اين مقدار 2.57 1.2 ان مربوط به مقاومت R2
و مقدار 2.57-1.2=1.37 مربوط به مدار يكسوساز و تقويت كننده
اپ امپ است
و براي همين ممكن است در اينجا احتياج به دستكاري بر روي
اين عدد باشد
چون مقدار 1.37 ممكن است به نسبت مدل اپ امپ در عمل تغيير داشته باشد
و اين مقدار بايد كم يا زياد شود تا مقدار واقعي جريان و توان
بدست بيايد
براي همين گفتم كه مقداري كه شما بر فرض براي يك لامپ 40 وات
بدست اورده ايد بگوييد تا تحليل شود


موفق باشيد

مقدار دقیق رو اندازه میگیرم میذارم،
در این مدار از یک ضرب کننده آنالوگ ad633 استفاده شده است که جریان و ولتاژ را در هم ضرب می کند ولی در میکرو هم این دو پارامتر در هم ضرب می شوند، به نظر شما تفاوت این دو در چیست؟

(۱۱-اسفند-۱۳۹۳, ۲۳:۵۳:۲۱)a_darya69 نوشته است: [ -> ]دوستان باید ذکر کنم این مدار مقدار توان لامپ 40وات رو کمتر نشون میده.

سلام و درود
مقاومت متغیر 9 برای مدرج(کالیبره) کردن ولتاژ بکار رفته است.
برای این کار باید ولتاژ ورودی را با ولتمتر دقیقی خواند و ولتاژ
متناسب با آن را با تنظیم مقاومت 9 روی پایه ADC4 بدست آورد.(از روابط ریاضی و مدار )
همچنین باید برای دقت مقاومت ها با درصد خطا کم باشند.
تازه لامپهای رشته ای (جنس رشته تنگستن(ولفرام) ) توانشان برای ولتاژ
نوشته شده بر رویشان است که تا ده درصد خطا دارد. و با استهلاک لامپ
توان تغییر میکند.
پس بهتر است از یک بار خوب استفاده کرد.

(۱۱-اسفند-۱۳۹۳, ۲۳:۵۳:۲۱)a_darya69 نوشته است: [ -> ]
در صورت امکان روش نمونه گیری جریان رو هم شرح بدین.

جریان بر روی R2 به صورت متناوب افت میکند.
OpAmp نخست به شکل یکسوساز و OpAmp دوّم به شکل
یک تقویت کننده پیکربندی شده است .(بهتر بود OpAmp دوّم
یک انتگرال گیر باشد تا یک موثر سنج واقعی بدست می آمد.
دیگر خازن 6 هم لازم نبود.)
خازن 6 نیز صافی ولتاژ است.


برای ولتاژ هم میتوان پس از یکسو سازی و تقسیم ولتاژ به یک
OpAmp انتگرال گیر داد تا یک موثر سنج واقعی بدست می آمد.
که در اینجا از مدار پالایش (فیلتر) RC بهره برده است.