আলো দিয়ে বিদ্যুৎ তৈরির প্রযুক্তি এখন আমাদের হাতে৷ সোলার সেল ব্যবহার করে এ বিদ্যুত্ তৈরি করা হয়৷ নিচের চিত্র-১-এ এরকম একটি সোলার ইঞ্জিনের চিত্র দেয়া হলো৷ এ ইঞ্জিনটি বিশ্বে D1 Engine নামে পরিচিত৷ এখানে একটি মটর আছে যা +৫ ভোল্টে চলে৷ এ সোলার ইঞ্জিনে দুইটি ট্রানজিস্টর 2N3906 ও 2N3904, একটি ক্যাপাসিটর 7400mF, একটি রেজিস্টর 2.2KW, একটি ভোল্টেজ সেন্সর IC 1381, DC মটর ও সোলার সেল ব্যবহার করা হয়েছে৷ এই সোলার ইঞ্জিনের বেজ হচ্ছে 1381 IC. এই আইসিটি ভোল্টেজ ডিটেক্টর হিসেবে কাজ করে৷ সাধারণত এ আইসি ভোল্টেজের একটি মাত্রার উপরে গেলে সেন্ট্রাল প্রসেসর ইউনিটকে রিসেট করে দেয়৷ কমপিউটারে ভোল্টেজ নির্দিষ্ট মাত্রার চেয়ে কমে গেলে বা বেড়ে গেলে এই আইসি সিপিইউকে রিসেট করে দেয়৷ এই আইসিতে একটি আপার থ্রেসল্ড ও লোয়ার থ্রেসল্ড ভোল্টেজ আছে যার আপার থ্রেসল্ড 2 ~ 4.6 ভোল্ট ও লোয়ার থ্রেসল্ড 0.2 ~ 0.3 ভোল্ট৷ এই দুই থ্রেসল্ড ভোল্টেজের মধ্য অংশকে ট্রিপ পয়েন্ট বলে৷ অর্র্থাত্ 0.2 ভোল্ট হতে 4.6 ভোল্ট পর্যন্ত এই আইসি 1381 তার আউটপুটকে সুইচ করবে৷ এই ভোল্টেজ রেঞ্জের বাইরে আইসিটির আউটপুট শূন্য থাকে৷ চিত্র-১ হচ্ছে আইসি 1381 নিয়ন্ত্রিত সোলার ইঞ্জিন৷ সোলার সেল বিদ্যুত্ তৈরি করে ফলে ক্যাপাসিটর 4700mF চার্জ হতে থাকে৷ যখন এই সার্কিটের ভোল্টেজ 0.3V হয় তখন আইসি 1381 তার আউটপুটে সিগন্যাল পাঠায়৷ ফলে ট্রানজিস্টর 2N3904 অন হবে৷ এখন ক্যাপাসিটরটি মটর (M)কে চালানোর মতো চার্জ অর্জন করলে মটরটি ঘুরতে থাকে৷ অর্থাত্ আইসি যদি ট্রিপ পয়েন্টের মধ্যে ভোল্টেজ পায় তখন এটি মটরের সুইচ 2N3904 ট্রানজিস্টরটিকে অন রাখে৷ অপরদিকে ট্রানজিস্টর 2N3904 ও রেজিস্টর 2.2KΏ এই ইঞ্জিনে ভোল্টেজ রেগুলেটিংয়ে সাহায্য করে৷ নিচের চিত্র-২-এ এই ইঞ্জিনকে কিভাবে কমপিউটার দিয়ে নিয়ন্ত্রণ করা যায় তার সার্কিটটি দেয়া হয়েছে৷ এখানে অতিরিক্ত একটি রিলে ও ট্রানজিস্টর 2N222 ব্যবহার করা হয়েছে৷ Port2 তে কমপিউটার প্রিন্টারপোর্টের পিন ২ ও Port 18~25-এ পিন 18~25 যুক্ত করতে হবে (চিত্র-২দেখুন)৷ নিচেরচিত্র-৩-এ কমপিউটার নিয়ন্ত্রিত সফটওয়্যারের চিত্র দেয়া হয়েছে, যার প্রোগ্রাম কোডটি একদম শেষে দেয়া হলো৷ প্রোগ্রামটি ভিজ্যুয়াল বেসিকে ডেভেলপ করা হয়েছে৷ এ প্রোগ্রামটি চালানোর জন্য অতিরিক্ত একটি DLL ফাইল ব্যবহার করতে হবে৷ এই DLL ফাইলটি উইন্ডোজএক্সপৈতে কমপিউটার ও ইলেক্ট্রিক্যাল যন্ত্রের সাথে সংযোগ স্থাপনে সাহায্য করে৷ এটি inpout32.dll নামে পরিচিত৷ এই ফাইলটি www.geocities.com/redu0007 হতে ডাউনলোড করে উইন্ডোজের System ফোল্ডারে রাখতে হবে৷ প্রোগ্রামটি ডেভেলপ করার জন্য ভিজ্যুয়াল বেসিকের একটি ফর্ম সিলেক্ট করে তার মধ্যে দুটি বাটন বসাতে হবে যাদের Start_CMD ও Stop_CMD নাম দেয়া হয়েছে৷ নিচের প্রোগ্রামে দেখানো হয়েছে কিভাবে প্রোগ্রামের কোড করতে হবে৷ এই inpout32.dll ফাইলটি কিভাবে প্রোগ্রামে ব্যবহার করা যায় তাও এ প্রোগ্রামের কোডে দেয়া হয়েছে৷ নিচের প্রোগ্রামটি ডেভেলপ করে রান করলে চিত্র-৩-এর মতো একটি উইন্ডো চলে আসবে৷ এই প্রোগ্রামে বাটনের ক্যাপসনগুলো হচ্ছে Solar Engine Start ও Solar Engine Stop এবং একটি ম্যাসেজ বক্স-এর মাধ্যমে ইঞ্জিনের স্ট্যাটাস বর্ণনা করছে ইঞ্জিন কি অবস্থায় আছে৷ চিত্র-২-এর সার্কিটটি কমপিউটার নিয়ন্ত্রিত সোলার ইঞ্জিন যাকে রোবট নিয়ন্ত্রণের কাজে ব্যবহার করা যেতে পারে৷ যখন Solar Engine Start বাটন কে প্রেস করা হবে তখন কমপিউটার ৃর্ল Out port, 1 -এর মাধ্যমে প্রিন্টার পোর্টের পিন-২-এ সিগন্যাল পাঠায়, ফলে মটরটি ঘুরতে থাকে তেমনি Out port, 0 এর মাধ্যমে মটরকে অফ করে দেয়৷ এখানে ডিসি মটর ব্যবহার করা হয়েছে৷ তবে কমপিউটারের সাহায্যে এই সার্কিট অন করতে হলে সার্কিটের সোলার সেলকে সূর্যের আলোর মধ্যে রাখতে হবে৷ যদি সোলার সেল হতে ক্যাপাসিটর নির্দিষ্ট পরিমাণ চার্জ ধরে রাখতে না পারে (যা আসলে মটর চালানোর কাজে ব্যবহার হবে) তাহলে কমপিউটার হতে Start Solar Engine বাটন চাপলেও কাজ করবে না৷ তাই ক্যাপাসিটরে চার্জ ঠিকমতো আছে কিনা ম্যানুয়ালি চেক করা যেতে পারে৷ সে ক্ষেত্রে চিত্র-১-এর মতো করতে হবে৷ অর্থাত্ সোলার সেলের ধনাত্মক প্রান্তকে আইসি 1381-এর পিন ২-এ সরাসরি যুক্ত করতে হবে৷ ক্যাপাসিটরে মটর ঘুরানোর মত চার্জ সঞ্চিত থাকলে মটরটি ঘুরবে৷ প্রোগ্রাম কোড নিচে দেয়া হলো:





Public Port As Integer the below code shows the uses of inpout32.dll file and this file download from www.geocities.com/redu0007 and past in c://windows/system folder Private Declare Function Inp Lib "inpout32.dll" Alias "Inp32" (ByVal PortAddress As Integer) As Integer Private Declare Sub Out Lib "inpout32.dll" Alias "Out32" (ByVal PortAddress As Integer, ByVal Value As Integer) Private Sub Form_Load() Port = &H378 LPT port 1 End Sub Private Sub Form_Unload(Cancel As Integer) Out Port, 0 Send bit value zero to port 2 (data bit D0) End Sub Private Sub Start_CMD_Click() Out Port, 1 Send bit value one to port 2 (data bit D0) a = MsgBox("Solar engine is running ", vbOKOnly, "Status of Solar Engine.") End Sub Private Sub Stop_CMD_Click() Out Port, 0 Sending bit value zero to port 2 (data bit D0) a = MsgBox("Solar engine stoped", vbOKOnly, "Status of Solar Engine.") End Sub

ফিডব্যাক : redu0007@yahoo.com