Membuat message berulang - ulang dengan notepad

Copy paste kode dibawah ini di notepad anda

@ECHO off
:Begin
msg * message
msg * message again
GOTO BEGIN

Save dengan extention bat
contoh message.bat

Download video hell god Kabut keabadian

Download video Betrayer bendera kuning

Download di sini....

Download net control 2

net600.exe

Download VB 6.0 Portable

Visual Basic 6 Portable.exe

Download video ImmortalBlackMetal

download animasi lampu lalu lintas

kLIk dISini UnTuK meNdOWnlOadnYa...

hehehe...maap ya klo masih jelek......

Mendisable copy paste pada komputer

•Klik Start >> Run >> ketik Regedit kemudian OK atau ENTER.
•Klik HKEY_LOCALMACHINE\SYSTEM\CurrentControlSet\Control
•Klik kanan pada Control pilih New >> Key kemudian beri nama StorageDevicePolicies

•Klik kanan pada StorageDevicePolicies kemudian pilih New >> DWord Value kemudian beri nama WriteProtect
•Kemudian klik double pada WriteProtect tersebut, kemudian ganti value datanya menjadi 1.

•Kemudian Restart Komputer
•Finish

catatan : bila komputernya ingin menjadi seperi semula ganti value datanya menjadi 0

Blue screen pada XP

UNEXPECTED_KERNEL_MODE_TRAP
Bila mendapatkan pesan seperti ini,disebabkan karena Overclock Hardware yang berlebihan, Komponen komputer yang kepanasan, BIOS yang corrupt, atau Memory dan CPU yang cacat.

DATA_BUS_ERROR
Disebabkan karena adanya kemungkinan bahwa memory atau slot memory di motherboard rusak.

PAGE_FAULT_IN_NONPAGED_AREA
Karena adanya kerusakan hardware, termasuk memory utama, memory video card, atau memory di processor (L2 Cache)

IRQL_NOT_LESS_OR_EQUAL (0X0000000A)
Error yang secara umum terjadi pada BsOD karena terjadi ketidakcocokan driver yang terinstall di PC/Laptop. Ini dikarenakan (1) Masalah driver yang bentrok atau tidak cocok, (2) Masalah Video Card, hal ini mencakup video card yang dioverclock melebihi batas atau karena mengganti Video Card dan belum menguninstall driver Video card lama dari Chipset berbeda, atau (3) Masalah Audio Card, yaitu kesalahan konfigurasi atau bug dalam driver Sound Card.

NTFS_FILE_SYSTEM atau FAT_FILE_SYSTEM (0X00000024)/(0X00000023)
Kerusakan yaitu ada di partisi atau filesystemnya tetapi bukan di harddisknya. Kita bisa melakukan pengecekan dengan memeriksa kabel SATA atau PATA atau bisa mengecek partisi dengan tool chkdsk.

INACCESSIBLE_BOOT_DEVICE
Disebabkan karena adanya kesalahan dalam konfigurasi jumper harddisk yang salah, virus boot sector, driver IDE controller yang salah, atau kesalahan driver chipset.

VIDEO_DRIVER_INIT_FAILURE
Kesalahan terjadi pada instalasi driver video card yang kurang sempurna, restart pada saat instalasi atau juga dapat terjadi karena kesalahan dalam instalasi driver.

BAD_POOL_CALLER
Kesalahan dapat terjadi karena kesalahan atau driver yang tidak kompatibel. Sering terjadi saat melakukan instalasi XP dari upgrade, atau bukan dari instalasi baru.

PEN_LIST_CORRUPT
Pesan ini disebabkan karena adanya kerusakan RAM

MACHINE_CHECK_EXCEPTION
Dikarenakan oleh cacatnya CPU, atau yang di overclock secara agresif, serta power supply yang kekurangan daya atau rusak.
10 (sepuluh) kesalahan/error yang terjadi di BsOD, jika muncul dapat anda atasi permasalahannya sesuai dengan keterangan error yang ada diatas.

Program perkalian matriks 3 x 3 dengan C++

Buka Program C++ kemudian script dibawah ini:

#include
#include
#include
#define Nmaks 10
typedef int matrik[Nmaks] [Nmaks];

void main()
{
int n,i,j;
matrik A,B,C;
cout<<"Program Perkalian Matrik A 3*3 dan B 3*3\n";
cout<<"\n";
n = 3;
cout<<"Masukkan entri-entri matriks A \n";
for (i=1;i<=n;i++)
{
for (j=1;j<=n;j++)
{
printf("A[%d,%d] = ",i,j);cin>>A[i] [j];
}
}
clrscr();
cout<<"Masukkan entri-entri matriks B\n";
cout<<"\n";
for (i=1;i<=n;i++)
{
for (j=1;j<=n;j++)
{
printf("B[%d,%d] = ",i,j);cin>>B[i][j];
}
}
clrscr();
cout<<"\n";
for (i=1;i<=n;i++)
{
for (j=1;j<=n;j++)
{
C[i][j]=A[i][j]*B[i][j];
}
}
clrscr();
cout<<"entri-entri matriks A,B dan C \n";
cout<<"\n";

gotoxy(1,5);
cout<<"A = ";
for (i=1;i<=n;i++)
{
for (j=1;j<=n;j++)
{
gotoxy(2+4*j,2+2*i);
cout<}
}
gotoxy(1,11);
cout<<"B = ";
for (i=1;i<=n;i++)
{
for (j=1;j<=n;j++)
{
gotoxy(2+4*j,3+2*i+5);
cout<}
}
gotoxy(1,19);
cout<<"C = ";
for (i=1;i<=n;i++)
{
for (j=1;j<=n;j++)
{
gotoxy(2+4*j,5+2*i+10);
cout<}
}
gotoxy(16,19);
cout<<" x ";
for (i=1;i<=n;i++)
{
for (j=1;j<=n;j++)
{
gotoxy(16+4*j,5+2*i+10);
cout<}
}
gotoxy(30,19);
cout<<" = ";
for (i=1;i<=n;i++)
{
for (j=1;j<=n;j++)
{
gotoxy(30+4*j,5+2*i+10);
cout<}
}
}

Contoh Output

contoh program Select Case pada vb6.0

- Buka program vb6.0
- Kemudian buat project baru baru dengan cara klik file,New Project,Pilih Standard,lalu OK
- Siapkan sebuah TextBox dan command button,kemudian hapus text yang berada di TextBox dan ganti nama command button sesuai dengan keinginan pada jendela Properties

Kemudian ketik script dibawah ini di command button
Private Sub Command1_Click()
Dim sBulan As String

Select Case Val(Text1.Text)
Case 1
sBulan = "Januari"
Case 2
sBulan = "Februari"
Case 3
sBulan = "Maret"
Case 4
sBulan = "April"
Case 5
sBulan = "Mei"
Case 6
sBulan = "Juni"
Case 7
sBulan = "Juli"
Case 8
sBulan = "Agustus"
Case 9
sBulan = "September"
Case 10
sBulan = "Oktober"
Case 11
sBulan = "November"
Case 12
sBulan = "Desember"
End Select

MsgBox "Bulan " & sBulan, vbOKOnly, "Bulan"

End Sub

- Kemudian jalankan program tersebut dengan cara Run>Start atau tekan F5

Membuat password folder dengan perintah cmd

Ketik script dibawah ini di notepad

cls

@ECHO OFF

title Password GUE!!! (Prabowo_akhwan@yahoo.co.id)

if EXIST "Control Panel.{21EC2020-3AEA-1069-A2DD-08002B30309D}" goto UNLOCK

if NOT EXIST FolderRahasia goto MDLOCKER

:CONFIRM

color 0a

echo Apakah anda ingin mengunci FolderRahasia tersebut ? (Y/N)

set/p "cho=>"

if %cho%==Y goto LOCK

if %cho%==y goto LOCK

if %cho%==n goto END

if %cho%==N goto END

echo Ketik Y atau N.

goto CONFIRM

:LOCK

ren FolderRahasia "Control Panel.{21EC2020-3AEA-1069-A2DD-08002B30309D}"

attrib +h +s "Control Panel.{21EC2020-3AEA-1069-A2DD-08002B30309D}"

echo FolderRahasia Terkunci

goto End

:UNLOCK

color 0c

echo key foder (masukkan passwordnya ya...)

set/p "pass=>"

if NOT %pass%== system05 goto FAIL

attrib -h -s "Control Panel.{21EC2020-3AEA-1069-A2DD-08002B30309D}"

ren "Control Panel.{21EC2020-3AEA-1069-A2DD-08002B30309D}" FolderRahasia

echo FolderRahasia sudah di buka

goto End

:FAIL

echo Password salah

goto end

:MDLOCKER

md FolderRahasia

echo FolderRahasia Sukses di buat

goto End

:End

Kemudian save dengan ekstensi bat

Example: folder rahasia.bat

Kemudian masukkan password, password dari script di atas adalah system05 anda bisa mengganti password dengan yang anda inginkan

- Menutup folder tersebut

klik file .bat yang anda buat tadi

Kemudian tekan tombol Y,Lalu ENTER

Maka file .bat tersebut akan terkunci kembali

Membuat alert dengan perintah notepad

- Start > All Programs > Accessories > Notepad
- Ketik contoh script di bawah ini :
Msgbox"Perhatian ini adalah pesanku"
- Save type dengan All files
- Save nama file tersebut dengan extension vbs example: allert.vbs - klik 2 kali untuk membuka allert tersebut

Membuat file rahasia di notepad

- Klik start
- Pilih menu run
- Kemudian ketik perintah cmd lalu Enter













- Tentukan command directory yang ingin anda buat misal di D:\> kemudian ketik D: pada cmd tersebut













- Kemudian ketik perintah seperti gambar di bawah ini kemudian Enter











file rahasiaku dan file hidden bisa anda rubah sesuai dengan keinginan anda yang penting ada tanda : untuk pemisahnya

- Kemudian akan muncul notepad


















- Kemudian isi notepad tersebut lalu close dan save


















- Kemudian lihat drive Local Disk D: di komputer anda maka akan anda file rahasiaku.txt tapi ketika di buka maka file tersebut akan kosong,untuk melihat kembali ketik perintahnya kembali yang anda buat tadi di perintah cmd kemudian Enter











- Maka file yang tadi akan muncul

menghapus My Recent Documents dengan perintah command prompt

-buka notepad kemudian ketik perintah dibawah ini:
@echo off
title MENGHAPUS RECENT DOCUMENT
color 0a
echo Recent documents
echo tekan Y untuk hapus
echo tekan N untuk batal
del "%userprofile%\Recent\*.*"
- Save dengan ekstension bat contoh: Recent.bat














Kemudian pilih Y dan ENTER