السلام عليكم اليوم سأشرح بعض خدع NotPad
تابعوا الشرح أتمنى أن ينال اعجابكم.
السلام عليكم سنشرح لكم في هذا الموضوع البسيط 4 خدع تعملها بالنوتباد وسنبدا بالشرح بسرعة
الخدعة الاولى
هي انشاء 1000 مجلد في وقت واحد
نقوم بالدخول الى النوتباد
قم بنسخ هذا الكود ووضعه في البرنامج كما في الصورة اعلاه
@@echo off
:top
md %random%
goto top
وبعد ذلك قم بحفظه باسم من اختيارك على شرط ان تتبعه
بصيغة .bat
على سبيل المثال
1000Fichier.bat
والاجمل في هذا هي تغيير الايقونة مثلا على شكل فيديو او موسيقى وتسميتها باسم musique
وارسالها لصديقك على الفيسبوك او اي موقع اخر وسيظن انها اغنية فيفتحها فتشن عليه هحوما فلوديريا هههههه اليست بمزحة رائعة
الخدعة الثانية
افتح برنامج النوت باد
واكتب به كلمة
Start
العدد الذي يعجبك
ثم احفظها بصيغة .batوليكن مثلا start.bat
ثم افتح الملف.. سوف يظهر عدد من الشاشات السوداء (الدوس)
عدد الشاشات السوداء يعتمد علي عدد الكلمات الي تكتبها
كتبت 3 start
يظهر 3 شاشات
الخدعة الثالثة
ستكون افضل
وهي استعراض نافذة فيلم ماتركس
افتح برنامج النود باد notepad
ثم اكتب هذا الكود
@echo off
color 2
:start
echo %random% %random% %random% %random% %random% %random% %random% %random% %random% %random% %random% %random% %random% %random%
goto start
قم بالحفظ على صيغة bat
مثلا
matrix.bat
واضغط على الايقونة لتظهر النافذة
الخدعة الرابعة
جعل الكمبيوتر ينطق ماتريد انت
اولا الصق هذا في النوتباد
Dim userInput
userInput = InputBox("Write your message here")
Set Sapi = Wscript.CreateObject("SAPI.SpVoice")Sapi.speak userInput
واحفظه على امتداد vps.
مثال
عند فتجك للايقونة تظهر لك رسالة او نافذة صغيرة تكتب فيها اي جملة
وينطق الكمبيوتر اياها لك
هههه حلوين بس ازاي اغير شكل الايقونة في ملف bat?
ردحذف