Beezaq to be wise

PEMOGRAMAN TERSTRUKTUR

2008-02-28T10:51:00.002+07:00

A. LISTING PROGRAM

{***********************************************************

KELAS : MIF-X-K32.7

PROGRAM : D-III

CREATED BY : ASEP KURNIA NPM: 07.302.039

BAHAGIA KARO SEKALI NPM: 07.302.041

SAMJA DIPRAJA NPM: 07.302.058

************************************************************}

Program Tugas2_Pemograman_Terstruktur;

uses wincrt;

type BrgRec=record

Kode : string[5];

NamaBrg : string[15];

Harga : integer;

JmlStock : integer;

end;

var

RBrg : BrgRec;

FBrg : File of BrgRec;

vKode : string[5];

Huruf : char;

Jawab,Lagi : char;

Ketemu : boolean;

JmlD,JmlE,JmlL,JmlP,JmlH,JmlI,JmlSpasi: integer;

Pilih1,Pilih2,Pilih3 : byte;

alas,tinggi,sisi,jari,panjang,lebar : integer;

LSegiTiga,LSegiEmpat,KSegiEmpat,LPersegiPanjang,LLingkaran : real;

VKubus,VBola : real;

KPersegiPanjang,L : Real;

{Funngsi untuk menghitung luas kubus}

function L_Kubus(s:real):real;

begin

L_Kubus:=6ss;

end;

{Procedure untuk menghitung volume kubus}

procedure V_Kubus(s:real;var V:real);

begin

V:=Sqr(s)*s;

end;

{Funngsi untuk menghitung luas bola}

function L_Bola(r:integer):real;

begin

L_Bola:=43.14r*r;

end;

{Procedure untuk menghitung volume bola}

procedure V_Bola(r:integer;var V:real);

begin

V:=(43.14rrr)/3;

end;

{Procedure untuk menghitung luas lingkaran}

procedure L_Lingkaran(r:integer;var L:real);

begin

L:=Pirr;

end;

{Program utama}

Label 1;

Label 2;

Label 3;

Label 4;

Label 5;

Label 6;

Label 7;

Label 8;

Label 9;

Label 10;

Label 11;

Label 12;

Label 13;

Label 14;

Label 15;

Label 16;

Label 17;

begin

1:

clrscr;

gotoxy(30,02); write('PEMOGRAMAN TERSETRUKTUR');

gotoxy(13,03); write('Manajemen Informatika-Program D-III Piksi Ganesha Bandung');

gotoxy(30,04); write('Created by : MIF-X-K32.7');

gotoxy(18,05); write('Asep Kurnia, Bahagia Karo Sekali, Samja Dipraja');

gotoxy(06,06); write('=============================================');

gotoxy(25,10); write('KASUS PEMOGRAMAN TERSETRUKTUR');

gotoxy(25,11); write('---------------------------------------------------------');

gotoxy(25,12); write('[1] Mesin Karakter');

gotoxy(25,13); write('[2] Opersai Matematik');

gotoxy(25,14); write('[3] Input Data');

gotoxy(25,15); write('[4] Keluar Program');

gotoxy(25,17); write('Pilihan [1-4] : '); Readln(Pilih1);

case Pilih1 of

1: begin

2:

clrscr;

gotoxy(30,02); write('PEMOGRAMAN TERSETRUKTUR');

gotoxy(13,03); write('Manajemen Informatika-Program D-III Piksi Ganesha Bandung');

gotoxy(30,04); write('Created by : MIF-X-K32.7');

gotoxy(18,05); write('Asep Kurnia, Bahagia Karo Sekali, Samja Dipraja');

gotoxy(06,06); write('==============================================');

gotoxy(25,10); write('MESIN KARAKTER');

gotoxy(25,11); write('---------------------------');

gotoxy(25,12); write('[1] Definisi Mesin Karakter');

gotoxy(25,13); write('[2] Contoh Program Mesin Karakter');

gotoxy(25,14); write('[3] Close');

gotoxy(25,16); write('Pilihan [1-3] : '); Readln(Pilih2);

case Pilih2 of

1: begin

5:

clrscr;

gotoxy(30,02); write('PEMOGRAMAN TERSETRUKTUR');

gotoxy(13,03); write('Manajemen Informatika-Program D-III Piksi Ganesha Bandung');

gotoxy(30,04); write('Created by : MIF-X-K32.7');

gotoxy(18,05); write('Asep Kurnia, Bahagia Karo Sekali, Samja Dipraja');

gotoxy(06,06); write('==============================================');

gotoxy(25,10); write('DEFINISI MESIN KARAKTER');

gotoxy(25,11); write('----------------------------------------');

gotoxy(04,12); write('Mesin Karakter adalah mesin abstrak yang menggambarkan dalam suatu mesin');

gotoxy(04,13); write('terdapat pita yang bertipe karakter, numerik, dan sebagainya');

gotoxy(04,15); write('Jika pita bertipe karakter maka akhir dari pta tersebut ditandai dengan ');

gotoxy(04,16); write('tanda titik. Jika pita bertipe numerik maka pita tersebut diakhiri dengan');

gotoxy(04,17); write('tanda 9999. Jika pita hanya berisi akhiran "."/"9999" berarti pita kosong');

gotoxy(04,19); write('Mesin Karakter terdiri atas empat komponen yaitu : Tombol STAR (posisi pada');

gotoxy(04,20); write('karakter pertama), ADV, maju satu karakter, sebuah lampu EOP (End of Pita)');

gotoxy(04,21); write('dan JENDELA yang ukurannya sebesar satu karakter. Hanya karakter yang ');

gotoxy(04,22); write('posisinya pada jendela yang dapat di konsultasi/dibaca. Karakter yang sedang');

gotoxy(04,23); write('dibaca pada jende;a dinamakan "CC" (Current Character).');

gotoxy(04,25); write('Close [Y/T] : '); readln(Jawab);

if Upcase(Jawab)='Y' then

goto 1

else

goto 5;

end;

2: begin

repeat

Jawab:='Y';

clrscr;

JmlD:=0;

JmlE:=0;

JmlL:=0;

JmlP:=0;

JmlH:=0;

JmlI:=0;

JmlSpasi:=0;

gotoxy(30,02); write('PEMOGRAMAN TERSETRUKTUR');

gotoxy(13,03); write('Manajemen Informatika-Program D-III Piksi Ganesha Bandung');

gotoxy(30,04); write('Created by : MIF-X-K32.7');

gotoxy(18,05); write('Asep Kurnia, Bahagia Karo Sekali, Samja Dipraja');

gotoxy(06,06); write('==============================================');

gotoxy(25,08); write('CONTOH PROGRAM MESIN KARAKTER');

gotoxy(25,09); write('-------------------------------------------------------');

gotoxy(05,10); write('Program menghitung banyaknya huruf "D,E,L,P,H,I" dari sebuah kalimat.');

gotoxy(05,11); write('Program akan berhenti jika ditekan tanda "titik" (.)');

gotoxy(05,13); write('Masukan huruf : '); readln(Huruf); gotoxy(23,13); write('');

while huruf <>'.' do

begin

Huruf:=Upcase(Huruf);

if Huruf='D' then

JmlD:=JmlD+1

else

if Huruf='E' then

JmlE:=JmlE+1

else

if Huruf='L' then

JmlL:=JmlL+1

else

if Huruf='P' then

JmlP:=JmlP+1

else

if Huruf='H' then

JmlH:=JmlH+1

else

if Huruf='I' then

JmlI:=JmlI+1

else

if Huruf=' ' then

JmlSpasi:=JmlSpasi+1;

gotoxy(05,13); write('Masukan huruf : '); readln(Huruf);

gotoxy(23,13); write('');

end;

writeln;

gotoxy(21,15); write('Huruf/Kalimat yang telah anda masukan');

gotoxy(21,17); write('Jumlah huruf "D" adalah : ',JmlD,' buah huruf');

gotoxy(21,18); write('Jumlah huruf "E" adalah : ',JmlE,' buah huruf');

gotoxy(21,19); write('Jumlah huruf "L" adalah : ',JmlL,' buah huruf');

gotoxy(21,20); write('Jumlah huruf "P" adalah : ',JmlP,' buah huruf');

gotoxy(21,21); write('Jumlah huruf "H" adalah : ',JmlH,' buah huruf');

gotoxy(21,22); write('Jumlah huruf "I" adalah : ',JmlI,' buah huruf');

gotoxy(21,23); write('Jumlah "SPASI" adalah : ',JmlSpasi,' buah spasi');

writeln;

gotoxy(05,25); write('Anda ingin mencoba lagi [Y/T] : '); readln(Jawab);

until upcase(Jawab)='T';

goto 1;

end;

3: begin

if Jawab='1' then

goto 1

else

goto 1;

end;

2: begin

6:

clrscr;

gotoxy(30,02); write('PEMOGRAMAN TERSETRUKTUR');

gotoxy(13,03); write('Manajemen Informatika-Program D-III Piksi Ganesha Bandung');

gotoxy(30,04); write('Created by : MIF-X-K32.7');

gotoxy(18,05); write('Asep Kurnia, Bahagia Karo Sekali, Samja Dipraja');

gotoxy(06,06); write('==============================================');

gotoxy(25,10); write('OPERASI MATEMATIK');

gotoxy(25,11); write('--------------------------------');

gotoxy(25,12); write('[1] Luas Segitiga');

gotoxy(25,13); write('[2] Luas Segiempat');

gotoxy(25,14); write('[3] Luas Persegi Panjang');

gotoxy(25,15); write('[4] Luas Lingkaran');

gotoxy(25,16); write('[5] Luas Kubus');

gotoxy(25,17); write('[6] Luas Bola');

gotoxy(25,18); write('[7] Volume Kubus');

gotoxy(25,19); write('[8] Volume Bola');

gotoxy(25,20); write('[9] Keliling Segiempat');

gotoxy(25,21); write('[10] Keliling Persegi Panjang');

gotoxy(25,22); write('[11] Close');

gotoxy(25,24); write('Pilihan [1-11] : '); readln(Pilih3);

case Pilih3 of

1: Begin

7:

clrscr;

gotoxy(30,02); write('PEMOGRAMAN TERSETRUKTUR');

gotoxy(13,03); write('Manajemen Informatika-Program D-III Piksi Ganesha Bandung');

gotoxy(30,04); write('Created by : MIF-X-K32.7');

gotoxy(18,05); write('Asep Kurnia, Bahagia Karo Sekali, Samja Dipraja');

gotoxy(06,06); write('==============================================');

gotoxy(25,10); write('PROGRAM MENGHITUNG LUAS SEGITIGA');

gotoxy(25,11); write('-----------------------------------------------------------');

gotoxy(25,12); write('Masukan nila alas segitiga : '); readln(alas);

gotoxy(25,13); write('Masukan nilai tinggi segitiga : '); readln(tinggi);

LSegiTiga:=0.5alastinggi;

gotoxy(25,15); write('Luas segitiga adalah : ',LSegitiga:12:2);

gotoxy(25,17); write('Anda ingin menghitung lagi [Y/T] : ');readln(Jawab);

if upcase(Jawab)='Y' then

goto 7 else goto 6;

end;

2: Begin

8:

clrscr;

gotoxy(30,02); write('PEMOGRAMAN TERSETRUKTUR');

gotoxy(13,03); write('Manajemen Informatika-Program D-III Piksi Ganesha Bandung');

gotoxy(30,04); write('Created by : MIF-X-K32.7');

gotoxy(18,05); write('Asep Kurnia, Bahagia Karo Sekali, Samja Dipraja');

gotoxy(06,06); write('=============================================='); gotoxy(25,10); write('PROGRAM MENGHITUNG LUAS SEGIEMPAT');

gotoxy(25,11); write('---------------------------------------');

gotoxy(25,12); write('Masukan nila sisi segiempat : '); readln(sisi);

LSegiEmpat:=sisi*sisi;

gotoxy(25,14); write('Luas segiempat adalah : ',LSegiEmpat:12:2);

gotoxy(25,16); write('Anda ingin menghitung lagi [Y/T] : ');readln(Jawab);

if upcase(Jawab)='Y' then

goto 8 else goto 6;

end;

3: Begin

9:

clrscr;

gotoxy(30,02); write('PEMOGRAMAN TERSETRUKTUR');

gotoxy(13,03); write('Manajemen Informatika-Program D-III Piksi Ganesha Bandung');

gotoxy(30,04); write('Created by : MIF-X-K32.7');

gotoxy(18,05); write('Asep Kurnia, Bahagia Karo Sekali, Samja Dipraja');

gotoxy(06,06); write('==============================================');

gotoxy(25,10); write('PROGRAM MENGHITUNG LUAS PERSEGI PANJANG');

gotoxy(25,11); write('-------------------------------------------------------------------------');

gotoxy(25,12); write('Masukan nila panjang : '); readln(panjang);

gotoxy(25,13); write('Masukan nilai lebar : '); readln(lebar);

LPersegiPanjang:=panjang*lebar;

gotoxy(25,15); write('Luas Persegi Panjang adalah : ',LPersegiPanjang:12:2);

gotoxy(25,17); write('Anda ingin menghitung lagi [Y/T] : ');readln(Jawab);

if upcase(Jawab)='Y' then

goto 9 else goto 6;

end;

4: Begin

10:

clrscr;

gotoxy(30,02); write('PEMOGRAMAN TERSETRUKTUR');

gotoxy(13,03); write('Manajemen Informatika-Program D-III Piksi Ganesha Bandung');

gotoxy(30,04); write('Created by : MIF-X-K32.7');

gotoxy(18,05); write('Asep Kurnia, Bahagia Karo Sekali, Samja Dipraja');

gotoxy(06,06); write('==============================================');

gotoxy(25,10); write('PROGRAM MENGHITUNG LUAS LINGKARAN');

gotoxy(25,11); write('---------------------------------------------------------------');

gotoxy(25,12); write('Masukan jari-jari lingkaran : '); readln(jari);

L_Lingkaran(jari,LLingkaran);

gotoxy(25,14); write('Luas lingkaran adalah : ',LLingkaran:12:2);

gotoxy(25,16); write('Anda ingin menghitung lagi [Y/T] : ');readln(Jawab);

if upcase(Jawab)='Y' then

goto 10 else goto 6;

end;

5: Begin

11:

clrscr;

gotoxy(30,02); write('PEMOGRAMAN TERSETRUKTUR');

gotoxy(13,03); write('Manajemen Informatika-Program D-III Piksi Ganesha Bandung');

gotoxy(30,04); write('Created by : MIF-X-K32.7');

gotoxy(18,05); write('Asep Kurnia, Bahagia Karo Sekali, Samja Dipraja');

gotoxy(06,06); write('==============================================');

gotoxy(25,10); write('PROGRAM MENGHITUNG LUAS KUBUS');

gotoxy(25,11); write('-------------------------------------------------------');

gotoxy(25,12); write('Masukan nila sisi kubus : '); readln(sisi);

gotoxy(25,14); write('Luas kubus adalah : ',L_Kubus(sisi):12:2);

gotoxy(25,16); write('Anda ingin menghitung lagi [Y/T] : ');readln(Jawab);

if upcase(Jawab)='Y' then

goto 11 else goto 6;

end;

6: Begin

12:

clrscr;

gotoxy(30,02); write('PEMOGRAMAN TERSETRUKTUR');

gotoxy(13,03); write('Manajemen Informatika-Program D-III Piksi Ganesha Bandung');

gotoxy(30,04); write('Created by : MIF-X-K32.7');

gotoxy(18,05); write('Asep Kurnia, Bahagia Karo Sekali, Samja Dipraja');

gotoxy(06,06); write('==============================================');

gotoxy(25,10); write('PROGRAM MENGHITUNG LUAS BOLA');

gotoxy(25,11); write('------------------------------------------------------');

gotoxy(25,12); write('Masukan nila jari-jari bola : '); readln(jari);

gotoxy(25,14); write('Luas bola adalah : ',L_Bola(jari):12:2);

gotoxy(25,16); write('Anda ingin menghitung lagi [Y/T] : ');readln(Jawab);

if upcase(Jawab)='Y' then

goto 12 else goto 6;

end;

7: Begin

13:

clrscr;

gotoxy(30,02); write('PEMOGRAMAN TERSETRUKTUR');

gotoxy(13,03); write('Manajemen Informatika-Program D-III Piksi Ganesha Bandung');

gotoxy(30,04); write('Created by : MIF-X-K32.7');

gotoxy(18,05); write('Asep Kurnia, Bahagia Karo Sekali, Samja Dipraja');

gotoxy(06,06); write('==============================================');

gotoxy(25,10); write('PROGRAM MENGHITUNG VOLUME KUBUS');

gotoxy(25,11); write('-------------------------------------------------------------');

gotoxy(25,12); write('Masukan nila sisi kubus : '); readln(sisi);

V_Kubus(sisi,VKubus);

gotoxy(25,14); write('Volume kubus adalah : ',VKubus:12:2);

gotoxy(25,16); write('Anda ingin menghitung lagi [Y/T] : ');readln(Jawab);

if upcase(Jawab)='Y' then

goto 13 else goto 6;

end;

8: Begin

14:

clrscr;

gotoxy(30,02); write('PEMOGRAMAN TERSETRUKTUR');

gotoxy(13,03); write('Manajemen Informatika-Program D-III Piksi Ganesha Bandung');

gotoxy(30,04); write('Created by : MIF-X-K32.7');

gotoxy(18,05); write('Asep Kurnia, Bahagia Karo Sekali, Samja Dipraja');

gotoxy(06,06); write('==============================================');

gotoxy(25,10); write('PROGRAM MENGHITUNG VOLUME BOLA');

gotoxy(25,11); write('----------------------------------------------------------');

gotoxy(25,12); write('Masukan nila jari-jari bola : '); readln(jari);

V_Bola(jari,VBola);

gotoxy(25,14); write('Volume bola adalah : ',VBola:12:2);

gotoxy(25,16); write('Anda ingin menghitung lagi [Y/T] : ');readln(Jawab);

if upcase(Jawab)='Y' then

goto 14 else goto 6;

end;

9: Begin

15:

clrscr;

gotoxy(30,02); write('PEMOGRAMAN TERSETRUKTUR');

gotoxy(13,03); write('Manajemen Informatika-Program D-III Piksi Ganesha Bandung');

gotoxy(30,04); write('Created by : MIF-X-K32.7');

gotoxy(18,05); write('Asep Kurnia, Bahagia Karo Sekali, Samja Dipraja');

gotoxy(06,06); write('==============================================');

gotoxy(25,10); write('PROGRAM MENGHITUNG KELILING SEGIEMPAT');

gotoxy(25,11); write('--------------------------------------------------------------------');

gotoxy(25,12); write('Masukan nila sisi segiempat : '); readln(sisi);

KSegiEmpat:=4*sisi;

gotoxy(25,14); write('Keliling segiempat adalah : ',KSegiEmpat:12:2);

gotoxy(25,16); write('Anda ingin menghitung lagi [Y/T] : ');readln(Jawab);

if upcase(Jawab)='Y' then

goto 15 else goto 6;

end;

10: Begin

16:

clrscr;

gotoxy(30,02); write('PEMOGRAMAN TERSETRUKTUR');

gotoxy(13,03); write('Manajemen Informatika-Program D-III Piksi Ganesha Bandung');

gotoxy(30,04); write('Created by : MIF-X-K32.7');

gotoxy(18,05); write('Asep Kurnia, Bahagia Karo Sekali, Samja Dipraja');

gotoxy(06,06); write('==============================================');

gotoxy(25,10); write('PROGRAM MENGHITUNG KELILING PERSEGI PANJANG');

gotoxy(25,11); write('------------------------------------------------------------------------------');

gotoxy(25,12); write('Masukan nila panjang : '); readln(panjang);

gotoxy(25,13); write('Masukan nilai lebar : '); readln(lebar);

KPersegiPanjang:=2panjanglebar;

gotoxy(25,15); write('Luas Persegi Panjang adalah : ',KPersegiPanjang:12:2);

gotoxy(25,17); write('Anda ingin menghitung lagi [Y/T] : ');readln(Jawab);

if upcase(Jawab)='Y' then

goto 16 else goto 6;

end;

11: goto 1

else goto 6;

end;

3: begin

17:

clrscr;

assign(FBrg,'Barang.Dat');

{$I-}

reset(FBrg);

{$I+}

if IOresult<>0 then rewrite(FBrg);

Lagi:='Y';

while upcase(Lagi)='Y' do

begin

clrscr;

gotoxy(30,02); write('PEMOGRAMAN TERSETRUKTUR');

gotoxy(13,03); write('Manajemen Informatika-Program D-III Piksi Ganesha Bandung');

gotoxy(30,04); write('Created by : MIF-X-K32.7');

gotoxy(18,05); write('Asep Kurnia, Bahagia Karo Sekali, Samja Dipraja');

gotoxy(06,06); write('==============================================');

gotoxy(25,10); write('INPUT DATA BARANG');

gotoxy(25,11); write('-------------------------------');

gotoxy(25,12); write('Kode Barang : ');

gotoxy(25,13); write('Nama Barang : ');

gotoxy(25,14); write('Harga Barang : ');

gotoxy(25,15); write('Jumlah Stock : ');

gotoxy(40,12); readln(vKode);

Ketemu:=False;

seek(FBrg,0);

while not EOF(FBrg) and not Ketemu do

begin

read(FBrg,RBrg);

if RBrg.Kode=vKode then

begin

clrscr;

gotoxy(30,02); write('PEMOGRAMAN TERSETRUKTUR');

gotoxy(13,03); write('Manajemen Informatika-Program D-III Piksi Ganesha Bandung');

gotoxy(30,04); write('Created by : MIF-X-K32.7');

gotoxy(18,05); write('Asep Kurnia, Bahagia Karo Sekali, Samja Dipraja');

gotoxy(06,06); write('=========================================');

gotoxy(25,17); write('Data Sudah Ada ');

readln;

clrscr;

Ketemu:=True;

end;

if not Ketemu then

begin

RBrg.Kode:=vKode;

Jawab:='T';

while upcase(Jawab)='T' do

begin

gotoxy(40,13); readln(RBrg.NamaBrg);

gotoxy(40,14); readln(RBrg.Harga);

gotoxy(40,15); readln(RBrg.JmlStock);

gotoxy(25,17); write('Data Sudah Benar [Y/T] : '); readln(Jawab);

end;

write(FBrg,RBrg);

end;

gotoxy(30,02); write('PEMOGRAMAN TERSETRUKTUR');

gotoxy(13,03); write('Manajemen Informatika-Program D-III Piksi Ganesha Bandung');

gotoxy(30,04); write('Created by : MIF-X-K32.7');

gotoxy(18,05); write('Asep Kurnia, Bahagia Karo Sekali, Samja Dipraja');

gotoxy(06,06);write('=========================================');

gotoxy(25,19); write('Masukan Data Lagi [Y/T] : '); readln(Lagi);

if upcase(Lagi)='Y' then

goto 17

else

goto 1;

end;

close(FBrg);

end;

4: exit

else

clrscr;

gotoxy(30,02); write('PEMOGRAMAN TERSETRUKTUR');

gotoxy(13,03); write('Manajemen Informatika-Program D-III Piksi Ganesha Bandung');

gotoxy(30,04); write('Created by : MIF-X-K32.7');

gotoxy(18,05); write('Asep Kurnia, Bahagia Karo Sekali, Samja Dipraja');

gotoxy(06,06); write('==============================================');

gotoxy(25,16); write('Pilihan tidak termasuk kriteria');

gotoxy(36,17); writeln(''); gotoxy(44,17); readln;

goto 1;

end;

end.

Install Router OS

2008-02-28T10:42:00.002+07:00

Installing RouterOS with CD-Install

Document revision:	1.2 (Tue Jul 13 13:06:16 GMT 2004)
Applies to:	V2.9

CD-Install

Description

To install the RouterOS using a CD you will need a CD-writer and a blank CD. Burn the CD-image (an .iso file) to a CD. The archive with image can be downloaded here.

Follow the instructions to install RouterOS using CD-Install:

After downloading the CD image from www.mikrotik.com you will have an ISO file on your computer:

Open a CD Writing software, like Ahead NERO as in this example:

In the program, choose Burn Image entry from the Recorder menu (there should be similary named option in all major CD burning programs):

Select the recently extracted ISO file and click Open:

Finally, click Burn button:

Set the first boot device to CDROM in router's BIOS.

7. After booting from CD you will see a menu where to choose packages to install:

8.                           Welcome to MikroTik Router Software installation

9.

10.       Move around menu using 'p' and 'n' or arrow keys, select with 'spacebar'.

11.       Select all with 'a', minimum with 'm'. Press 'i' to install locally or 'r' to

12.       install remote router or 'q' to cancel and reboot.

13.

14.         [X] system           [ ] isdn                  [ ] synchronous

15.         [X] ppp              [ ] lcd                   [ ] telephony

16.         [X] dhcp             [ ] ntp                   [ ] ups

17.         [X] advanced-tools   [ ] radiolan              [ ] web-proxy

18.         [ ] arlan            [ ] routerboard           [ ] wireless

19.         [ ] gps              [X] routing

20.         [ ] hotspot          [X] security

Follow the instructions, select needed packages, and press 'i' to install the software.

21. You will be asked for 2 questions:

22.       Warning: all data on the disk will be erased!

23.

24.       Continue? [y/n]

Press [Y] to continue or [N] to abort the installation.

Do you want to keep old configuration? [y/n]:

You should choose whether you want to keep old configuration (press [Y]) or to erase the configuration permanently (press [N]) and continue without saving it. For a fresh installation, press [N].

Creating partition...

Formatting disk...

The system will install selected packages. After that you will be prompted to press 'Enter'. Before doing that, remove the CD from your CD-Drive:

Software installed.

Press ENTER to reboot

Sampah

2008-02-28T10:29:00.003+07:00

::Pengertian Sampah

Sampah adalah suatu bahan yang terbuang atau dibuang dari sumber hasil aktifitas manusia maupun alam yang belum memiliki nilai ekonomis.

:: Sumber-sumber sampah

1. Rumah Tangga
2. Pertanian
3. Perkantoran
4. Perusahaan
5. Rumah Sakit
6. Pasar dll.

::Secara garis besar, sampah dibedakan menjadi tiga jenis yaitu :

1. Sampah Anorganik/kering
Contoh : logam, besi, kaleng, plastik, karet, botol, dll yang tidak dapat mengalami pembususkan secara alami.

2. Sampah organik/basah
Contoh : Sampah dapur, sampah restoran, sisa sayuran, rempah-rempah atau sisa buah dll yang dapat mengalami pembusukan secara alami.

3. Sampah berbahaya
contoh : Baterei, botol racun nyamuk, jarum suntik bekas dll

:: Permasalahan Sampah::

Secara umum pembuangan sampah yang tidak memenuhi syarat kesehatan lingkungan akan dapat mengakibatkan :
1. Tempat berkembang dan sarang dari serangga dan tikus

2. Menjadi sumber polusi dan pencemaran tanah, air dan udara

3. Menjadi sumber dan tempat hidup kuman-kuman yang membahayakan kesehatan.

::Tata cara Pemusnahan sampah

Beberapa cara pemusnahan sampah yang dapat dilakukan secara sederhana sebagai berikut :

a. Penumpukan.
Dengan metode ini, sebenarnya sampah tidak dimusnahkan secara langsung, namun dibiarkan membusuk menjadi bahan organik. Metode penumpukan bersifat murah, sederhana, tetapi menimbulkan resiko karena berjnagkitnya penyakit menular, menyebabkan pencemaran, terutama bau, kotoran dan sumber penyakit dana badan-badan air.

b. Pengkomposan. Cara pengkomposan meerupakan cara sederhana dan dapat menghasilkan pupuk yang mempunyai nilai ekonomi.

c. Pembakaran. Metode ini dapat dilakuakn hanya untuk sampah yang dapat dibakar habis. Harus diusahakan jauh dari pemukiman untuk menhindari pencemarn asap, bau dan kebakaran.

d. "Sanitary Landfill". Metode ini hampir sama dengan pemupukan, tetapi cekungan yang telah penuh terisi sampah ditutupi tanah, namun cara ini memerlukan areal khusus yang sangat luas.

::Pemanfaatan Sampah::

1. Sampah basah : Kompos dan makanan ternak
2. Sampah kering : Dipakai kembali dan daur ulang
3. Sampah kertas : Daur Ulang

::Daur ulang
Daur ulang adalah salah satu strategi pengelolaan sampah padat yang terdiri atas kegiatan pemilahan, pengumpulan , pemrosesan, pendistribusian dan pembuatan produk/material bekas pakai.

Material yang dapat didaur ulang :
1. Botol Bekas wadah kecap, saos, sirup, creamer dll baik yang putih bening maupun yang berwarna terutama gelas atau kaca yang tebal.
2. Kertas, terutama kertas bekas di kantor, koran, majalah, kardus kecualai kertas yang berlapis minyak.
3. Aluminium bekas wadah minuman ringan, bekas kemasan kue dll.
4. Besi bekas rangka meja, besi rangka beton dll
5. Plastik bekas wadah shampoo, air mineral, jerigen, ember dll
6. Sampah basah dapat diolah menjadi kompos.

Manfaat pengelolaan sampah
1. Mengehemat sumber daya alam
2. Mengehemat Energi
3. Menguranagi uang belanja
4. Menghemat lahan TPA
5. Lingkungan asri (bersih,sehat,nyaman)

NO	JENIS BARANG LAPAK	HARGA/KG
1	Gelas Aqua	1600
2	Kaleng Oli	1500
3	Ember biasa	1100
4	Keras (kaset, yakult, botol kecap)	150
5	Ember hitam (anti pecah)	800
6	Botol Aqua	700
7	Putian (botol bayclin, infus)	1600
8	Kardus	500
9	Kertas Putih	700
10	Majalah	350
11	Koran	500
12	Duplek (kardus tipis)	150
13	Semen	400
14	Besi Beton	700
15	Besi super	450
16	Besi pipa	250
17	Tembaga super	8000
18	Tembaga bakar	7000
19	Aluminium tebal	6000
20	Aluminium tipis	4000
21	Botol air besar	400
22	Botol bir kecil, sprite, fanta	200
::Sumber koperasi pemulung 2003::

::sumber : panduan ibu

Cinta Bagiku

2008-02-26T12:58:00.000+07:00

CINTA BAGIKU…

Cinta itu seperti kupu-kupu. Tambah dikejar, tambah larilah ia. Tapi kalu dibiarkan terbang, dia akan datang disaat kamu mengharapkannya. Cinta dapat membuatmu bahagia tapi sering juga membuatmu sedih. Cinta baru dapat berharga kalau diberikan kepada seseorang yang menghargainya. Jadi jangan terburu-buru, dan pilihlah yang terbaik.

Cinta bukan bagaimana menjadi pasangan yang ”sempurna” bagi seseorang, tapi bagaimana menemukan seseorang yang dapat membantumu menjadi dirimu sendiri. Dan dengan itu kamu juga akan turut sempurna.

Jangan hanya menyebut “I love U” kalau kamu tidak tahu. Jangan pernah membicarakan perasaan yang tidak pernah ada. Jangan pernah menyentuh hidup seseorang kalau hal itu akan menghancurkan hatinya. Jangan pernah menatap matanya kalau semua yang kamu lakukan hanya kebohongan. Hal yang paling kejam yang seseorang lakukan kepada orang lain adalah membiarknnya jatuh cinta, sementara kamu tidak berniat untuk menangkapnya….

Cinta bukan, “Ini salah kamu” tapi “maafkan aku”. Bukan “Kamu di mana?”, tapi “Aku disini”. Bukan “Di mana kamu?”, tapi “Aku mengerti”. Bukan “Coba aku disini”, tapi “Aku cinta kamu seperti kamu apa adanya”.

Kompabiliti yang paling benar bukan diukur berdasarkan berapa lama kamu sudah bersama maupun berapa sering kali bersama, tapi apakah selama kamu bersama, kamu selalu saling mengisi satu sama lain dan saling membuat hidup yang berkualiti.

Kesedihan dan kerinduan hanya terasa yang kamu inginkan dan menyayat selama yang kamu izinkan. Yang berat bukan bagaimana caranya menanggung kesedihan dan kerinduan itu, tapi bagaimana kamu belajar darinya.

Caranya jatuh cinta : jatuh tapi jangan terhuyung-huyung, konsisten tapi jangan memaksa, berbagi dan jangan bersikap tidak adil, mengerti dan cobalah untuk tidak banyak menuntut, sedih tapi jangan pernah simpan kesedihan itu.

Memang sakit melihat orang yang kamu cintai sedang berbahagia dengan orang lain tapi lebih sakit lagi kalau orang yang kamu cintai itu tidak berbahagia bersama kamu.

Cinta akan menyakitkan ketika kamu berpisah dengan seseorang, lebih menyakitkan apabila kamu dilupakan oleh kekasihmu, tapi cinta akn lebih menyakitkan lagi kalau orang yang kamu sayangi tidak tahu apa sesungguhnya kamu rasakan.

Yang paling menyedihkan dalam hidup adalah menemukan seseorang dan jatuh cinta, hanya untuk mengetahui bahwa dia bukun untuk kamu dan kamu menghabiskan banyak waktu orang yang tidak pernah menghargainya. Kalau dia tidak “worth it” sekarang, dia tidak akan pernah “worth it” setahun lagi ataupun 10 tahun lagi. Jadi, biarkan dia pergi…

Perampokan Di Dalam Taxi Bandung

2008-02-20T13:02:00.000+07:00

Bandung (ANTARA News) - Setelah lama tidak terdengar, kasus perampokan terhadap penumpang taxi kembali terjadi dan kali ini menimpa seorang pengusaha di Bandung pada Minggu malam.

Irnadi Rusmana (32) warga Jalan Karang Layung Nomor 20, Kelurahan Cipedes, Kecamatan Sukajadi, Kota Bandung, harus merelakan hartanya yang bernilai sekitar Rp30 juta ketika dua orang berambut cepak merampoknya di dalam warna biru berinisial "GR" yang ditumpanginya.

Dalam laporannya kepada petugas Polresta Bandung Barat, Senin siang, dalam peristiwa itu Irnadi kehilangan satu unit laptop Acer, dua handphone Nokia, satu jam tangan merek Fosil dan uang tunai Rp400 ribu.

Dalam keterangannya kepada polisi, korban menuturkan, peristiwa itu berawal ketika dirinya pada Minggu (17/2) malam pukul 22.00 WIB hendak pulang menuju kawasan Jalan Karang Layung.

"Saat menunggu taksi di Jalan Merdeka Bandung, muncul taksi GR," katanya.

Tanpa curiga, dirinya masuk dan meminta supir taxi mengatarnya menuju Jalan Karang Layung, sembari berpesan agar mengambil rute yang agak ramai. "Tidak berapa lama taxi malah masuk kawasan Jalan Eyckman yang agak gelap dan sepi," ujarnya.

Ia mengaku saat itu sempat heran dan bertanya-tanya, apalagi tiba-tiba supir taksi menghentikan kendaraannya. "Belum sempat bertanya alasan supir berhenti, tidak lama kemudian muncul dua pemuda yang masuk dari pintu kanan dan kiri," katanya.

Dua pemuda berambut cepak itu, kata dia, langsung mengapit dirinya dan menodongkan senjata tajam jenis belati seraya merampas barang bawaan yang terdiri dari laptop, dua HP, jam tangan dan uang dalam dompet.

"Usai menjarah barang berharga, saya diminta menundukkan kepala dan diancam akan ditusuk bila berteriak, sementara taksi langsung tancap gas ke arah kegelapan malam," katanya.

Korban menuturkan, setengah jam kemudian taksi berhenti di kawasan yang sepi dan dirinya dilempar ke pinggir jalan sambil tetap diancam para pelaku. "Saya waktu itu tidak tahu berada di kawasan mana, namun setelah mencari rumah warga, ternyata saya dibuang di kawasan Cihideung Lembang, sekitar 10 kilometer dari TKP," katanya.

Menurut dia, saat itu juga dirinya langsung pulang menggunakan angkutan kota dan pada Senin siang baru melaporkan kejadian tersebut ke Polresta Bandung Barat, karena TKP-nya ada di wilayah hukum Polresta Bandung Barat.

Kapolresta Bandung Barat AKBP Teddy Setiadi yang dikomfirmasi wartawan membebarkan peristiwa perampokan penumpang taksi di wilayah hukumnya itu. "Kami masih melakukan pengejaran terhadap dua pelaku yang diduga bersekongkol dengan sopir taksi tersebut," katanya.(*)

Berdasarkan kesimpulan berita di atas, tidak ditemukannya identitas sopir dan Nomor Armadanya berapa, sehingga terjadi kejanggalan pelaporan.

Setelah dikonfirmasi pun ke pihak korban maka:
1. Korban tidak mengetahui identitas sopir dan nomor armadanya.
2. Pada saat dibawa ke TKP Cihideung korban tidak mengetahui jelas dimana dia dibuang
3. Warga sekitar tidak mengetahui terjadinya perampokan dan pembuangan korban
4. Pada saat diketemukan dengan sopir-sopir Taxi tersebut korban tidak mengetahuinya.

Oleh karena itu pemberitannya masih simpang siur. Dan pada akhirnya industri angkutan TAxi di kota BAndung akan mendapat efek yang tidak bagus dengan adanya pemberitaan ini.

Apalagi terhadap inisial Taxi "GR" yang menjadi rate No.1 di kota Bandung atas pelayanan dan armadanya yang cukup bagus.

Mohon pembaca semua dapat menyikapinya.............................dengan arif dan bijaksana.........

Celaka Karena Dua Lubang

2008-02-18T13:22:00.000+07:00

"Rasulullah ditanya tentang sesuatu yang paling banyak memasukkan orang ke dalam surga, lalu beliau menjawab, 'Taqwa kepada Allah dan akhlaq yang baik.' Beliau juga ditanya tentang perkara yang paling banyak mengantarkan orang masuk ke neraka, beliau menjawab, 'Mulut dan kemaluan.'" (HR Tirmidzi)

Tugas utama semua rasul adalah menjelaskan berbagai persoalan agama kepada ummatnya, baik yang berkaitan dengan aqidah, syariah, maupun akhlaq. Oleh karenanya, setiap rasul adalah guru.

Sebagai guru, Muhammad adalah yang terbaik. Dalam mengajarkan agama, beliau tidak membatasi waktu dan tempat. Artinya, di mana saja dan kapan saja beliau meladeni setiap orang yang mau berguru kepadanya. Tidak terpaku hanya di kelas atau di masjid. Mengajar bisa secara formal, non-formal dan informal. Semua itu tergantung di mana beliau mengajar, dan siapa yang diajari.

Dalam mengajarkan al-Islam, beliau tidak menggunakan sistem monologis. Dalam sejarah, hanya sesekali saja Rasulullah berceramah panjang lebar. Yang sering adalah berdialog. Sebelum menjelaskan suatu permasalahan, tidak jarang beliau menanyai para sahabat terlebih dahulu. Jika jawaban mereka kurang tepat, beliau membetulkannya. Jika jawaban mereka sudah tepat, beliau menyetujuinya. Kadang hanya dengan ucapan "Ya", kadang memperdalam lagi.

Para sahabat sangat bebas bertanya apa saja, utamanya yang berkait langsung dengan kepentingannya. Salah satu kepentingan manusia adalah hidup selamat di dunia dan di akhirat. Pertanyaan seputar itulah yang paling banyak ditanyakan para sahabat, termasuk hadits yang dibahas pada tulisan ini.

Ketika Rasulullah ditanya tentang perkara yang banyak menjadikan seseorang masuk surga, Rasulullah menjawab singkat: Taqwallah dan husnul khuluq. Jawaban ini singkat, tapi makna kandungannya tidak terbatas. Bisa dibahas berhari-hari, bisa menghasilkan berjilid-jilid buku. Jawaban Nabi selalu singkat dan mengena.

Ketika Rasulullah ditanya mengenai perkara yang lebih banyak menjerumuskan manusia ke jurang neraka, lagi-lagi beliau menjawabnya dengan sigkat pula. "Mulut dan kemaluan." Inilah dua lubang yang sering mengantarkan manusia ke dalam bahaya. Baik semasa hidupnya di dunia maupun di akhiratnya.

Banyak jalan menuju taqwa

Asal arti taqwa adalah hati-hati. Seperti orang yang berjalan di semak belukar, tentu ia selalu waspada dan hati-hati agar tidak terpeleset atau terkena duri, atau bahkan terbelokkan sehingga keluar dari jalur yang semestinya dilewati. Orang yang selalu waspada dan hati-hati dalam hidupnya niscaya akan selamat. Demikian juga orang yang bertaqwa. Bahkan mereka tidak hanya selamat ketika di dunia, akan tetapi juga akan selamat sejahtera sampai di surga.

Jika sikap hati-hati dihiasi dengan sikap-sikap positif lainnya, misalnya jujur, ikhlas, sabar, lapang dada, selalu optimis, husnuzh-zhan, dan sikap-sikap terpuji lainnya, maka hasilnya tentu menjadi lebih baik lagi. Muslim yang demikian tidak hanya meraih sukses ke surga tapi mendapatkan surga yang paling utama, kelas VIP bersama para nabi dan kekasih Allah yang lain.

Jika jalan ke surga telah ditunjukkan Rasulullah, yaitu taqwa dan akhlaq mulia, maka jalan menuju neraka juga dijelaskannya. Ada dua jalan yang paling gampang untuk menjerumuskan manusia ke neraka, yaitu dua lubang, lubang mulut dan lubang kemaluan.

Lubang mulut berarti jalan masuknya makanan. Tidak sedikit orang yang tidak mampu menahan mulutnya dari makanan yang haram. Baik yang haram karena dzatnya, maupun yang haram karena proses mendapatkannya. Kebanyakan manusia tidak tahan lapar, sebaliknya sangat rakus terhadap makanan. Agar tidak lapar dan nafsu perutnya terpenuhi, manusia tak segan-segan berbuat nekat, seperti mencuri, merampok, korupsi, dan sebagainya.

Mulut, selain berfungsi sebagai jalan masuknya makanan, juga alat untuk berbicara. Dalam hal ini terlalu banyak manusia yang mudah berkata-kata kotor. Mulai dari berkata kurang sopan, berdusta, sampai dengan memfitnah. Ada pepatah mengatakan: "Sedikit orang yang celaka karena kakinya, sebaliknya banyak orang yang jatuh tersungkur karena lidahnya." Lidah memang tak bertulang!

Berkait dengan masalah lubang mulut ini, Rasulullah pernah bersabda:

"Barangsiapa yang dipelihara Allah dari kejelekan apa yang berada di antara kumis dan jenggotnya (mulut), dan kejelekan apa yang berada di antara kedua pahanya (kemaluan), niscaya ia akan masuk surga." (HR Tirmidzi)

Lubang kedua yang mengancam keselamatan manusia adalah lubang yang berada di antara dua paha. Orang yang bisa menjaga kemaluannya dari perbuatan maksiat, maka surga jaminannya. Adapun mereka yang tidak mampu menahan dirinya dari nafsu seksualnya, maka neraka adalah sebaik-baik tempat baginya. Na'udzu billah.

Adab Makan

2008-02-18T13:05:00.000+07:00

"Apabila Rasulullah selesai makan, beliau menjilat ketiga jari tangannya. Dan beliau bersabda, 'Apabila ada sesuap dari makanan kalian terjatuh, hendaklah ia mengambilnya dan menghilangkan kotoran yang melekat padanya, lalu memakannya dan tidak membiarkannya untuk syetan.' Kami juga diperintahkan untuk mengusapi piring (yang kami gunakan untuk makan). Sabda beliau, 'Kalian tidak tahu, di bagian mana dari makanan kalian tersembunyi berkahnya.'"

Banyak kesalahan yang dilakukan kaum muslimin dalam memahami hadits-hadits Rasulullah. Mereka tidak bisa membedakan, mana yang menjadi sasaran atau tujuan dan mana yang menjadi sarana atau alat. Sasaran atau tujuan tentu tidak pernah berubah, tapi sarana bisa berganti-ganti sesuai dengan situasi dan kondisi.

Dalam memaknai hadits di atas, bagi mereka yang hanya memahaminya secara tekstual hanya akan memperoleh pengertian bahwa Rasulullah selalu makan dengan menggunakan tiga jari, kemudian setelah selesai beliau menjilatnya hingga bersih. Mereka bersikeras menyatakan bahwa itulah cara makan yang sesuai dengan sunnah Nabi.

Karena pemahaman seperti ini, bisa jadi orang tersebut menjadi sangat membenci mereka yang makan dengan menggunakan sendok, sebab tidak sesuai sunnah. Sementara orang yang menyelisihi sunnah Nabi sama dengan menyerupai orang kafir.

Berbeda halnya dengan mereka yang memahami hadits ini tidak hanya melalui teks atau lafadznya belaka. Mereka bisa memperoleh makna yang jauh lebih banyak dan mendalam. Bagi mereka persoalan makan dengan menggunakan jari tangan atau sendok itu sekadar soal alat. Karena alat, maka setiap saat bisa berubah sesuai dengan tempat, waktu, dan kemajuan teknologinya.

Yang dapat ditangkap dari hadits ini bahwa Rasulullah itu adalah sosok pemimpin yang sangat bersahaja. Beliau makan sebagaimana halnya orang-orang kebanyakan. Beliau tidak bersikap elitis, tidak juga bergaya ningrat.

Dalam soal makan, beliau tidak malu menggunakan jari-jari tangannya. Beliau juga tidak enggan menghabiskan makanan yang ada di piring sampai bersih, tanpa sisa. Bahkan jika ada makanan yang terjatuh, tak segan-segan beliau memungutnya. Setelah dibersihkan, dengan senang hati dimakannya.

Perilaku makan seperti ini hanya bisa dilakukan oleh mereka yang memiliki sifat rendah hati. Adapun bagi mereka yang tinggi hati, memungut makanan yang tercecer merupakan perbuatan hina, merendahkan martabatnya, dan yang jelas akan mengurangi gengsinya.

Perilaku makan yang terakhir inilah yang paling banyak dipertontonkan orang ketika dalam berbagai acara pesta, baik pesta pernikahan maupun pesta lainnya. Mereka merasa gengsi jika harus menghabiskan seluruh makanan yang ada di piringnya. Ada gengsi tersendiri jika makan tidak habis.

Melalui hadits ini Rasulullah mendidik kita untuk bersikap sederhana dan hemat. Ini pelajaran kejiwaan sekaligus ekonomis. Andaikata sisa makanan yang terbuang di tempat-tempat sampah itu dihimpun, berapa penghematan konsumsi yang bisa dihitung? Nilai ekonomisnya tentu besar sekali.

Perilaku Rasulullah dalam hal makan ini tentu saja didasari oleh rasa syukurnya atas rezeki yang dikaruniakan Allah kepadanya. Karenanya beliau sangat berhati-hati, jangan sampai ada sedikitpun karunia yang sia-sia tanpa faedah. Perbuatan menyia-nyiakan makanan itu sama dengan laku syetan.

Kesimpulannya, kita boleh saja makan dengan menggunakan sendok, garpu, piring dan alat-alat makan yang paling modern sekalipun, asal kita tetap bersikap sederhana dan rendah hati. Syukuri nikmat Allah, sekecil apapun. Jangan sampai ada yang hilang percuma tanpa faedah, sebab bisa jadi di situlah terletak berkahnya.

Sebaliknya, jangan sampai kita terjebak pada pola-pola berfikir sempit, yang mengharuskan kita untuk menggunakan alat-alat yang sama sebagaimana yang dipakai Rasulullah, sementara pada saat yang sama kita justru terjauh dari sifat tawadhu' dan sikap bersahaja. Padahal itulah yang menjadi sasaran utamanya.

PRIORITAS AMALAN HATI ATAS AMALAN ANGGOTA BADAN

2008-02-18T10:29:00.000+07:00

DI ANTARA amalan yang sangat dianjurkan menurut pertimbangan
agama ialah amalan batiniah yang dilakukan oleh hati manusia.
Ia lebih diutamakan daripada amalan lahiriah yang dilakukan
oleh anggota badan, dengan beberapa alasan.

Pertama, karena sesungguhnya amalan yang lahiriah itu tidak
akan diterima oleh Allah SWT selama tidak disertai dengan
amalan batin yang merupakan dasar bagi diterimanya amalan
lahiriah itu, yaitu niat; sebagaimana disabdakan oleh Nabi
saw:

"Sesungguhnya amal perbuatan itu harus disertai dengan
niat." 32

Arti niat ini ialah niat yang terlepas dari cinta diri dan
dunia. Niat yang murni untuk Allah SWT. Dia tidak akan
menerima amalan seseorang kecuali amalan itu murni untuk-Nya;
sebagaimana difirmankan-Nya:

"Padahal mereka tidak disuruh kecuali supaya menyembah
Allah dengan memurnikan ketaatan kepada-Nya dalam
(menjalankan) agama dengan lurus..." (al-Bayyinah: 5)

Rasulullah saw bersabda,

"Sesungguhnya Allah tidak menerima amalan kecuali yang
murni, yang dilakukan hanya untuk-Nya."33

Dalam sebuah hadits qudsi diriwayatkan, Allah SWT berfirman,

"Aku adalah sekutu yang paling tidak memerlukan
persekutuan. Barangsiapa melakukan suatu amalan kemudian
dia mempersekutukan diri-Ku dengan yang lain, maka Aku
akan meninggalkannya dan meninggalkan sekutunya." Dalam
riwayat yang lain disebutkan: "Maka dia akan menjadi
milik sekutunya dan Aku berlepas diri darinya." 34

Kedua, karena hati merupakan hakikat manusia, sekaligus
menjadi poros kebaikan dan kerusakannya. Dalam Shahih Bukhari
dan Muslim disebutkan bahwasanya Nabi saw bersabda,

"Ketahuilah sesungguhnya di dalam tubuh manusia ada
segumpal darah, apabila dia baik maka baiklah seluruh
tubuhnya, dan apabila dia rusak, maka rusaklah seluruh
tubuhnya. Ketahuilah bahwa segumpal darah itu ialah
hati."35

Nabi saw. menjelaskan bahwasanya hati merupakan titik pusat
pandangan Allah, dan perbuatan yang dilakukan oleh hatilah
yang diakui (dihargai/dinilai) oleh-Nya. Karenanya, Allah
hanya melihat hati seseorang, bila bersih niatnya, maka Allah
akan menerima amalnya: dan bila kotor hatinya (niatnya tidak
benar), maka otomatis amalnya akan ditolak Allah, sebagaimana
disabdakan oleh baginda,

"Sesungguhnya Allah SWT tidak melihat kepada tubuh dan
bentuk kamu, tetapi Dia melihat kepada hati-hati kamu."
36

Yang dimaksudkan di sini ialah diterima dan diperhatikannya
amalan tersebut.

Al-Qur'an menjelaskan bahwasanya keselamatan di akhirat kelak,
dan perolehan surga di sana, hanya dapat dicapai oleh orang
yang hatinya bersih dari kemusyrikan, kemunafikan dan
penyakit-penyakit hati yang menghancurkan. Yaitu orang yang
hanya menggantungkan diri kepada Allah SWT, sebagaimana yang
Dia firmankan melalui lidah nabi-Nya, Ibrahim al-Khalil a.s.

"Dan janganlah Engkau hinakan aku pada hari mereka
dibangkitkan. (Yaitu) di hari harta dan anak-anak tidak
berguna. Kecuali orang-orang yang menghadap Allah dengan
hati yang bersih." (as-Syu'ara': 87-89)

"Dan didekatlah surga itu kepada orang-orang yang
bertaqwa pada tempat yang tiada jauh (dari mereka).
Inilah yang dijanjikan kepadamu, (yaitu) kepada setiap
hamba yang selalu kembali (kepada Allah) lagi memelihara
(semua peraturan-peraturan-Nya). (Yaitu) orang yang takut
kepada tuhan Yang Maha Pemurah sedang Dia tidak kelihatan
(olehnya) dan dia datang dengan hati yang bertobat."
(Qaf: 31-33)

Keselamatan dari kehinaan pada hari kiamat kelak hanya
diberikan kepada orang yang datang kepada Allah SWT dengan
hati yang bersih. Dan surga hanya diberikan kepada orang yang
datang kepada Tuhannya dengan hati yang pasrah.

Taqwa kepada Allah --yang merupakan wasiat bagi orang-orang
terdahulu dan yang terkemudian, merupakan dasar perbuatan yang
utama, kebajikan, kebaikan di dunia dan akhirat-- pada hakikat
dan intinya merupakan persoalan hati. Oleh karena itu Nabi saw
bersabda, "Taqwa itu ada di sini," sambil menunjuk ke dadanya
sebanyak tiga kali. Beliau mengatakannya sebanyak tiga kali
sambil memberikan isyarat dengan tangannya ke dadanya agar
dapat dipahami oleh akal dan jiwa manusia.

Sehubungan dengan hal ini, al-Qur'an memberi isyarat bahwa
ketaqwaan itu dilakukan oleh hati manusia:

"Demikianlah (perintah Allah). Dan barangsiapa
mengagungkan syiar-syiar Allah, maka sesungguhnya itu
timbul dari ketaqwaan hati." (al-Hajj: 32)

Semua tingkah laku dan perbuatan yang mulia, serta tingkatan
amalan rabbaniyah yang menjadi perhatian para ahli suluk dan
tasawuf, serta para penganjur pendidikan ruhaniah, merupakan
perkara-perkara yang berkaitan dengan hati; seperti menjauhi
dunia, memberi perhatian yang lebih kepada akhirat, keikhlasan
kepada Allah, kecintaan kepada Allah dan Rasul-Nya, tawakkal
kepada Allah, mengharapkan rahmat-Nya, takut kepada
siksaan-Nya, mensyukuri nikmatNya, bersabar atas bencana,
ridha terhadap ketentuan-Nya, selalu mengingat-Nya, mengawasi
diri sendiri... dan lain-lain. Perkara-perkara ini merupakan
inti dan ruh agama, sehingga barangsiapa yang tidak memiliki
perhatian sama sekali terhadapnya maka dia akan merugi
sendiri, dan juga rugi dari segi agamanya.

Siapa yang mensia-siakan umurnya, maka dia tidak akan
mendapatkan apa-apa

Anas meriwayatkan dari Nabi saw,

"Tiga hal yang bila siapapun berada di dalamnya, maka dia
dapat menemukan manisnya rasa iman. Hendaknya Allah dan
Rasul-Nya lebih ia cintai daripada yang lain; hendaknya
ia mencintai seseorang yang ia tidak mencintainya kecuali
karena Allah; dan hendaknya ia benci untuk kembali kepada
kekafiran sebagaimana dia benci untuk dilemparkan ke
dalam api neraka." 37

"Tidak beriman salah seorang di antara kamu sehingga aku
lebih dicintainya daripada orangtua dan anaknya, serta
manusia seluruhnya." 38

Diriwayatkan dari Anas bahwa ada seorang lelaki yang bertanya
kepada Nabi saw, "Kapankah kiamat terjadi wahai Rasulullah?"
Beliau balik bertanya: "Apakah yang telah engkau persiapkan?"
Dia menjawab, "Aku tidak mempersiapkan banyak shalat dan
puasa, serta shadaqah, tetapi aku mencintai Allah dan
Rasul-Nya." Rasulullah saw kemudian bersabda, "Engkau akan
bersama orang yang engkau cintai."39

Hadits ini dikuatkan oleh hadits Abu Musa bahwa ada seseorang
berkata kepada Nabi saw, "Ada seseorang yang mencintai kaum
Muslimin, tetapi dia tidak termasuk mereka." Nabi saw
menjawab, "Seseorang akan bersama dengan orang yang dia
cintai."40

Hadits-hadits tersebut menunjukkan bahwa cinta kepada Allah
SWT dan Rasulullah, serta cinta kepada hamba-hamba-Nya yang
shaleh merupakan cara pendekatan yang paling baik kepada Allah
SWT; walaupun tidak disertai dengan tambahan shalat, puasa dan
shadaqah.

Hal ini tidak lain adalah karena cinta yang murni merupakan
salah satu amalan hati, yang memiliki kedudukan tinggi di sisi
Allah SWT.

Atas dasar itulah beberapa ulama besar berkata,

"Aku cinta kepada orang-orang shaleh walaupun aku tidak
termasuk golongan mereka."

"Aku berharap hahwa aku bisa mendapatkan syafaat (ilmu,
dan kebaikan) dari mereka."

"Aku tidak suka terhadap barang-barang maksiat, walaupun
aku sama maksiatnya dengan barang-barang itu. "

Cinta kepada Allah, benci karena Allah merupakan salah satu
bagian dari iman, dan keduanya merupakan amalan hati manusia.

Dalam sebuah hadits disebutkan,

"Barangsiapa mencintai karena Allah, marah karena Allah,
memberi karena Allah, menahan pemberian karena Allah,
maka dia termasuk orang yang sempurna imannya."41

"Ikatan iman yang paling kuat ialah berwala' karena
Allah, bermusuhan karena Allah, mencintai karena Allah,
dan membenci karena Allah SWT." 42

Oleh sebab itu, kami sangat heran terhadap konsentrasi yang
diberikan oleh sebagian pemeluk agama, khususnya para dai'
yang menganjurkan amalan dan adab sopan santun yang berkaitan
dengan perkara-perkara lahiriah lebih banyak daripada
perkara-perkara batiniah; yang memperhatikan bentuk luar lebih
banyak daripada intinya; misalnya memendekkan pakaian,
memotong kumis dan memanjangkan jenggot, bentuk hijab wanita,
hitungan anak tangga mimbar, cara meletakkan kedua tangan atau
kaki ketika shalat, dan perkara-perkara lain yang berkaitan
dengan bentuk luar lebih banyak daripada yang berkaitan dengan
inti dan ruhnya. Perkara-perkara ini, bagaimanapun, tidak
begitu diberi prioritas dalam agama ini.

Saya sendiri memperhatikan --dengan amat menyayangkan-- bahwa
banyak sekali orang-orang yang menekankan kepada bentuk
lahiriah ini dan hal-hal yang serupa dengannya --Saya tidak
berkata mereka semuanya-- mereka begitu mementingkan hal
tersebut dan melupakan hal-hal lain yang jauh lebih penting
dan lebih dahsyat pengaruhnya. Seperti berbuat baik kepada
kedua orangtua, silaturahim, menyampaikan amanat, memelihara
hak orang lain, bekerja yang baik, dan memberikan hak kepada
orang yang harus memilikinya, kasih-sayang terhadap makhluk
Allah, apalagi terhadap yang lemah, menjauhi hal-hal yang
jelas diharamkan, dan lain-lain sebagaimana dijelaskan oleh
Allah SWT kepada orang-orang yang beriman di dalam kitab-Nya,
di awal surah al-Anfal, awal surah al-Mu'minun, akhir surah
al-Furqan, dan lain-lain.

Saya tertarik dengan perkataan yang diucapkan oleh saudara
kita, seorang dai' Muslim, Dr. Hassan Hathout yang tinggal di
Amerika, yang sangat tidak suka kepada sebagian saudara kita
yang begitu ketat dan kaku dalam menerapkan hukum Islam yang
berkaitan dengan daging halal yang telah disembelih menurut
aturan syariat. Mereka begitu ketat meneliti daging-daging
tersebut apakah ada kemungkinan bahwa daging tersebut
tercampur dengan daging atau lemak babi, walaupun
persentasenya hanya sebesar satu persen, atau seperseribunya;
tetapi dalam masa yang sama dia tidak memperhatikan bahwa dia
memakan bangkai saudaranya setiap hari beberapa kali (dengan
fitnah dan mengumpat/ghibah), sehingga saudaranya dapat
menjadi sasaran syubhat dan tuduhan, atau dia sendiri yang
menciptakan tuduhan-tuduhan tersebut.

Catatan kaki:

32 Muttafaq Alaih dari Umar (al-Lu'lu' wa al-Marjan, 1245),
hadits pertama yang dimuat dalam Shahih al-Bukhari

33 Diriwayatkan oleh Nasai dari Abu Umamah, dan dihasankan
olehnya dalam Shahih al-Jami' as-Shaghir(1856)

34 Muslim meriwayatkannya dari Abu Hurairah r.a. dengan lafal
hadits yang pertama, sedangkan lafal yang lainnya diriwayatkan
oleh Ibn Majah.

35 Muttafaq 'Alaih, dari Nu'man bin Basyir, yang merupakan
bagian daripada hadits, "Yang halal itu jelas, dan yang haram
itu juga jelas" (Lihat al-Lu'lu' wa al-Marjan, 1028)

36 Diriwayatkan oleh Muslim dari Abu Hurairah r.a. (2564)

37 Muttafaq 'Alaih dari Anas (al-Lu'lu'wa al-Marjan, 26)

38 Muttafaq 'Alaih dari Anas (al-Lu'lu' wa al-Marjan, 27)

39 Muttafaq 'Alaih dari Anas (al-Lu'lu' wa al-Marjan, 1693)

40 Muttafaq 'Alaih dari Anas (al-Lu'lu' wa al- Marjan, 1694)

41 Diriwayatkan oleh Abu Dawud dalam kitab al-Sunnah dari Abu
Umamah (4681), dan dalam al-Jami' as-Shaghir riwayat ini
dinisbatkan kepada Dhiya' (Shahih al-Jami' as-Shaghir, 5965)

42 Diriwayatkan oleh al-Thayalisi, Hakim, dan Thabrani dalam
al-Kabir, dan al-Awsath dari Ibn Mas'ud, Ahmad, dan Ibn Abi
Syaibah dari Barra" dan juga diriwayatkan oleh Thabrani dari
Ibn ,Abbas (Shahih al-Jami' as-Shaghir, 2539)

------------------------------------------------------
FIQH PRIORITAS
Sebuah Kajian Baru Berdasarkan Al-Qur'an dan As-Sunnah
Dr. Yusuf Al Qardhawy
Robbani Press, Jakarta

Introduction

2008-01-21T19:52:00.001+07:00

Salam Kenal
Nama gw or orang biasanya panggil nama Budi. Memang sich namanya standar dan biasa orang bisa plesetin apa saja dan menambah partikel pada nama ini. Tapi Tuhan telah menciptakan dengan segala kelebihan dan kekurangannya. Dan ungkapan apa arti dari sebuah nama itu timbul dan memanglah benar. Mungkin banyak Budi yang lainnya lagi, yang sukses, yang berbuat dosa, yang menjadi ustadz, yang menjadi koruptor, pecundang, milioner, tokoh masyarakat,. pacar artis dan yang lainnya dech. Dari sederetan sandangan itu bisa diambil kesimpulan bahwa identitas sesorang yang hakiki memang ada dalam mutiara hatinya yang paling dalam. Tapi memang sussah juga sich..............................and don't forget also..........don't judge a book buy it's cover.......................................

Beezaq to be wise

PEMOGRAMAN TERSTRUKTUR

{***********************************************************

KELAS : MIF-X-K32.7

PROGRAM : D-III

CREATED BY : ASEP KURNIA NPM: 07.302.039

BAHAGIA KARO SEKALI NPM: 07.302.041

SAMJA DIPRAJA NPM: 07.302.058

************************************************************}

Program Tugas2_Pemograman_Terstruktur;

uses wincrt;

type BrgRec=record

Kode : string[5];

NamaBrg : string[15];

Harga : integer;

JmlStock : integer;

end;

var

RBrg : BrgRec;

FBrg : File of BrgRec;

vKode : string[5];

Huruf : char;

Jawab,Lagi : char;

Ketemu : boolean;

JmlD,JmlE,JmlL,JmlP,JmlH,JmlI,JmlSpasi: integer;

Pilih1,Pilih2,Pilih3 : byte;

alas,tinggi,sisi,jari,panjang,lebar : integer;

LSegiTiga,LSegiEmpat,KSegiEmpat,LPersegiPanjang,LLingkaran : real;

VKubus,VBola : real;

KPersegiPanjang,L : Real;

{Funngsi untuk menghitung luas kubus}

function L_Kubus(s:real):real;

begin

L_Kubus:=6*s*s;

end;

{Procedure untuk menghitung volume kubus}

procedure V_Kubus(s:real;var V:real);

begin

V:=Sqr(s)*s;

end;

{Funngsi untuk menghitung luas bola}

function L_Bola(r:integer):real;

begin

L_Bola:=4*3.14*r*r;

end;

{Procedure untuk menghitung volume bola}

procedure V_Bola(r:integer;var V:real);

begin

V:=(4*3.14*r*r*r)/3;

end;

{Procedure untuk menghitung luas lingkaran}

procedure L_Lingkaran(r:integer;var L:real);

begin

L:=Pi*r*r;

end;

{Program utama}

Label 1;

Label 2;

Label 3;

Label 4;

Label 5;

Label 6;

Label 7;

Label 8;

Label 9;

Label 10;

Label 11;

Label 12;

Label 13;

Label 14;

Label 15;

Label 16;

Label 17;

begin

1:

clrscr;

gotoxy(30,02); write('PEMOGRAMAN TERSETRUKTUR');

gotoxy(13,03); write('Manajemen Informatika-Program D-III Piksi Ganesha Bandung');

gotoxy(30,04); write('Created by : MIF-X-K32.7');

gotoxy(18,05); write('Asep Kurnia, Bahagia Karo Sekali, Samja Dipraja');

L_Kubus:=6ss;

L_Bola:=43.14r*r;

V:=(43.14rrr)/3;

L:=Pirr;