قم الآن بعمل هذا الملف علي جهازك لحماية بطارية اللاب توب الخاص بك من التلف

بطارية اللاب توب :

إن أهم ما يميز أجهزة الكمبيوتر اللوحية أو ما تعرف باسم اللاب توب بخلاف حجمها هي تزويدها ببطاريات يمكنك من خلالها أن تقوم باستخدامها دون الحاجة إلي توصيلها بالكهرباء ومن المعروف أيضاً في أنظمة الويندوز وأغلب أنظمة التشغيل الأخرى أنه بمجرد وصول نسبة شحن البطارية إلي أقل من 20 % يفاجئك النظام على الفور بإشعار يخبرك من خلاله بأنه عليك القيام فوراً بتوصيل جهاز اللاب توب الخاص بك بالكهرباء وإلا سيتوقف عن العمل في خلال مدة معينة وهي المدة التي سينفذ بها شحن البطارية ولكن دائماً عندما تصل نسبه شحن بطارية اللاب توب إلي 100% لا تحصل  على تنبيه أو حتى صوت أو أي شئ أخر من نظام التشغيل .

بطارية اللاب توب

ولهذا أصدقائي سنقوم اليوم ببرمجة ملف صغير ستحصل من خلاله على إشعار بمجرد الإنتهاء من شحن بطارية اللاب توب وقد يعتقد الكثيرين أن برمجة هذا الملف ستكون في غاية الصعوبة ولكن على العكس تماماً فيمكنك عزيزي القارئ أت تقوم ببرمجة الملف في ثوان معدودة فأنت لست في حاجة إلي كتابة الأوامر بنفسك فيمكنك نسخها فوراً..أما على الناحية الأخرى فقد يتساءل البعض أيضاً ما هي أهمية برمجة ملف مثل هذا .

أهمية إزاله الشاحن عن بطارية اللاب توب بعد الإنتهاء من الشحن ؟

في الحقيقة أصدقائي تكاثرت الأقاويل حول هذا الموضوع فهناك مجموعة من الخبراء أجمعوا أن ترك البطارية باللاب توب بعد الإنتهاء من الشحن لا يؤثر تماماً على عمرها الافتراضي ولا  حتى على على سرعة إعادة شحنها مره أخرى بعد النفاذ ولكن من حيث التجربة التي مررت بها ومر بها أغلب المستخدمين أن ترك بطارية اللاب توب متصله به بعد الإنتهاء من الشحن يقلل من عمرها بصورة واضحة وقد يجعل عمليه إعادة شحنها مرة أخرى مستحيله كما أنها ستنفذ سريعاً ولهذا من الأفضل أن تقوم بإزالتها عند الإنتهاء من شحنها.

كيفية المحافظة على بطارية اللاب توب :

كما أخبرتكم أصدقائي بالفقرة السابقة أنه يجب أن يتم فصل البطارية عند الإنتهاء من شحنها..والآن سنتعلم سوياً كيفية برمجة ملف سريع لتنبيهك عند الإنتهاء من شحن البطارية،في البداية قم بفتح ملف Notepad جديد على جهازك .

حماية بطارية اللاب توب

بعد ذلك قم بنسخ الأمر التالي إلي داخل هذا الملف.

set oLocator = CreateObject(“WbemScripting.SWbemLocator”)
set oServices = oLocator.ConnectServer(“.”,”root\wmi”)
set oResults = oServices.ExecQuery(“select * from batteryfullchargedcapacity”)
for each oResult in oResults
iFull = oResult.FullChargedCapacity
next

while (1)
set oResults = oServices.ExecQuery(“select * from batterystatus”)
for each oResult in oResults
iRemaining = oResult.RemainingCapacity
bCharging = oResult.Charging
next
iPercent = ((iRemaining / iFull) * 100) mod 100
if bCharging and (iPercent > 96) Then msgbox “Battery is at ” & iPercent & “%”,vbInformation, “Battery monitor”
wscript.sleep 30000 ‘ 5 minutes
wend

بعد ذلك قم بعمل Save للملف ولكن تأكد من أن يكون بنهاية المسار كلمه vbs كما هو موضح بالصورة التالية .

احفظ بطارية اللاب توب

إذا واجهتك مشكلة في إنشاء الملف يمكنك تحميله فوراً من هنا

والآن بمجرد قيامك بتشغيل الملف ستحصل على إشعار بمجرد وصول نسبة شحن بطارية اللاب توب إلي 100% .


موضوعات مهمة جداً لك :

عن مينا صبحى

مينا صبحى
مهندس مصرى مهتم بكل ما هو جديد فى عالم التقنية ، ومؤسس موقع بيت الكورسات يمكنك متابعتى على فيس بوك وجوجل بلس او من  خلال قناتى على اليوتيوب

اترك تعليقاً

لن يتم نشر عنوان بريدك الإلكتروني. الحقول الإلزامية مشار إليها بـ *