
Notepad proqramı ilə edə biləcəyiniz 7 maraqlı əməliyyat
Texnologiya
07.05.2017
Farid Pardashunas
Kompyuterinizdə olan Notepad proqramının əslində bir çox funksiyaları olduğunu bilirdinizmi?
Bu yazımızda sizə Notepad proqramı ilə edə biləcəklərinizi
göstərəcəyik. Notepad’la nələr edə bilərsiniz? Bir neçə əmr ilə 10 möhtəşəm
funksiya yarada bilərsiniz.
1.Şəxsi Gündəlik yaradın
Kompyuterinizdə şəkildəki kimi şəxsi gündəlik yarada bilərsiniz.
Bununla da günün hansı saatında nə etdiyiniz qeyd edə bilərsiniz. Bunun üçün bu
addımları ardıcıllıqla edin:

·Notepad proqramını açın
·Birinci sətirdə ".LOG” ifadəsini yazın
·Həmin bu faylı "log.txt” adı ilə yaddaşa verin
2.Qovluqları Notepad istifadə etməklə şifrələmək
Siz kompyuterinizdəki qovluqları Notepad istifadə edərək
şifrələyə bilərsiniz. Bir neçə sətirlik kodlardan istifadə edərək bunu etmək
mümkündür. Aşağdakı kodların arasında olan "fossBytes” sözü əvəzinə istədiyiniz
sözü şifrə kimi istifadə edə bilərsiniz. Daha sonra bu faylı "private.bat” adı
ilə saxlayın və fayl tipində isə "All Files (*.*)” seçin. Bundan sonra şifrələnmiş
qovluğunuzu hazır olacaq və istədiyiniz faylı bura əlavə edə bilərsiniz.
Kodlar belədir:
@ECHO OFF
title Folder Kilitli
if EXIST "Control Panel.{21EC2020-3AEA-1069-A2DD-08002B30309D}" goto UNLOCK
if NOT EXIST Kilitli goto MDKilitli
:CONFIRM
echo Klasor kilitlensin mi?(e/h)
set/p "cho=>"
if %cho%==e goto LOCK
if %cho%==E goto LOCK
if %cho%==h goto END
if %cho%==H goto END
echo Invalid choice.
goto CONFIRM
:LOCK
ren Kilitli "Control Panel.{21EC2020-3AEA-1069-A2DD-08002B30309D}"
attrib +h +s "Control Panel.{21EC2020-3AEA-1069-A2DD-08002B30309D}"
echo Folder locked
goto End
:UNLOCK
echo Sifreyi giriniz:
set/p "pass=>"
if NOT %pass%== BURAYA ŞİFRE YAZILACAK goto FAIL
attrib -h -s "Control Panel.{21EC2020-3AEA-1069-A2DD-08002B30309D}"
ren "Control Panel.{21EC2020-3AEA-1069-A2DD-08002B30309D}" Kilitli
echo Folder Unlocked successfully
goto End
:FAIL
echo Invalid password
goto end
:MDKilitli
md Kilitli
echo Locker created successfully
goto End
:End
title Folder Kilitli
if EXIST "Control Panel.{21EC2020-3AEA-1069-A2DD-08002B30309D}" goto UNLOCK
if NOT EXIST Kilitli goto MDKilitli
:CONFIRM
echo Klasor kilitlensin mi?(e/h)
set/p "cho=>"
if %cho%==e goto LOCK
if %cho%==E goto LOCK
if %cho%==h goto END
if %cho%==H goto END
echo Invalid choice.
goto CONFIRM
:LOCK
ren Kilitli "Control Panel.{21EC2020-3AEA-1069-A2DD-08002B30309D}"
attrib +h +s "Control Panel.{21EC2020-3AEA-1069-A2DD-08002B30309D}"
echo Folder locked
goto End
:UNLOCK
echo Sifreyi giriniz:
set/p "pass=>"
if NOT %pass%== BURAYA ŞİFRE YAZILACAK goto FAIL
attrib -h -s "Control Panel.{21EC2020-3AEA-1069-A2DD-08002B30309D}"
ren "Control Panel.{21EC2020-3AEA-1069-A2DD-08002B30309D}" Kilitli
echo Folder Unlocked successfully
goto End
:FAIL
echo Invalid password
goto end
:MDKilitli
md Kilitli
echo Locker created successfully
goto End
:End
3.Matrix
Effekti
Matrix
filminin həvəskarısınız? Onda bu trick tam sizin üçündür. Aşağıdakı kodları
yazın və faylı
"Matrix.bat” adı ilə saxlayın. Daha sonra açdıqda Matrix effekti
ilə qarşılaşacaqsınız.

Kodlar:
@echo off
color 02
:start
echo %random% %random% %random% %random% %random% %random% %random% %random% %random% %random%
goto start
:start
echo %random% %random% %random% %random% %random% %random% %random% %random% %random% %random%
goto start
4.
Kompyuteri bir mesajla söndürmək
Kompyuteri
söndürmək üçün uzun bir yoldan istifadə edirik: Star menyunu açırıq, söndür
düyməsini seçirik, OK düyməsini basırıq və s. Bəs bunu bir ikona 2 dəfə
tıklamaqla etmək istərdinizmi? Hətta bununla bağlı sizə mesaj belə göstəriləcək.
Notepad proqramını açın aşağıdakı kodları daxil edin, daha sonra isə fayla
sonluğu ".bat” olmaqla istədiyiniz adı verin, hazırdır.

@echo off
msg * Computer will now shut down
shutdown -c "Sweet Dreams. Take care.” –s
msg * Computer will now shut down
shutdown -c "Sweet Dreams. Take care.” –s
5.
CD Drive hissəsini davamlı olaraq açıb-bağlayın
Dostlarınızla
zarafat etmək istəyirsiniz? Bu kodlarla siz onun kompyuterinin CD Drive hissəsini
davamlı olaraq açılıb-bağlanmasına və dostunuzun panika olmasına səbəb ola bilərsiniz.
Notepad proqramını açın, aşağıdakı kodları daxil edin və faylı istədiyiniz bir
adla ".vbs” sonluğu ilə saxlayın. Əməliyyatı dayandırmaq üçün isə Task
Manager’dən (Ctrl+Alt+Delete) wscript.vbs prosesini sonlandırın.
Kodlar:
Set oWMP = CreateObject("WMPlayer.OCX.7")
Set colCDROMs = oWMP.cdromCollection
if colCDROMs.Count >=1 then
do
For i=0 to colCDROMs.COunt -1
colCDROMs.Item(i).Eject
Next ' cdrom
For i=0 to colCDROMs.COunt -1
colCDROMs.Item(i).Eject
Next ' cdrom
loop
End If
6.
Yazdığınız sözlərin Notepad tərəfindən səsləndirilməsi
Notepad
proqramını açın və bu kodları daxil edin:
Dim message,sapi
message=InputBox("What should I speak?”,”Speak to
me”)
Set sapi=CreateObject("sapi.spvoice”)
sapi.Speak message
Set sapi=CreateObject("sapi.spvoice”)
sapi.Speak message
Daha
sonra bu faylı "speak.vbs” adı ilə saxlayın. Bundan sonra faylı açın, istədiyiniz
cümləni basıb "OK” düyməsinə basdıqda Notepad yazdığınız cümləni səsləndirəcək.

7.
Fake Windows Error Mesajı
Notepad proqramını açın və aşağıdakı kodları daxil
edib faylı "error.vbs” adı ilə saxlayın.
X=Msgbox("Press OK and Windows will restart
now.”,0+16,"There is a serious problem in your system”)

Bu
yazımızda sizə Notepad proqramı edə biləcəyiniz kiçik aksiyaları göstərdik.
Əlavə proqrama ehtiyac duymadan, sistemin özünün bu xüsusiyyətindən zövq alın :)
Linki kopyala
Həftənin xəbərləri

