Jumat, 24 Desember 2010

myfristGUI 1

//pemanggilan library yg diperlukan
import javax.swing.JFrame;
import javax.swing.JPanel;
import javax.swing.JButton;
import javax.swing.JTextField;
import javax.swing.JLabel;
import java.awt.*;
import java.awt.event.*;

public class myFristGUI extends JFrame implements ActionListener { //deklarasi class dengan menuruni sifat dari JFrame dengan meng-implements suatu Action
public myFristGUI(){
super("Frame PertamaKu"); //memberi judul frame
setSize(500, 400); //ukuran frame
panel1.setLayout(null);
//peletakan Objek-objek
lbl1.setBounds(100, 100, 75, 25); //( posisiX, posisiY, panjang, lebar)
txt1.setBounds(180, 100, 150, 25);
btn1.setBounds(200, 150, 75, 25);
lblnama1.setBounds(50, 200, 400, 100);

//mengatur Font pada Label Nama
lblnama1.setFont(new Font("Tahoma", Font.BOLD, 32));

//menempelkan Objek pada Panel
panel1.add(lbl1);
panel1.add(txt1);
panel1.add(btn1);
panel1.add(lblnama1);

//menempelkan Panel pada Frame
getContentPane().add(panel1);

//membuat Frame menjadi terlihat / ditampilkan
setVisible(true);

//menambahkan action pada Button
btn1.addActionListener(this);
}

//action
public void actionPerformed(ActionEvent e){
if(e.getSource() == btn1){ //jika action terjadi pada btn1 ( button clicked )
lblnama1.setText(txt1.getText()); //mengambil nilai String dari txt1 kemudian di kirimkan ke lblnama1
txt1.setText(""); //mengosongkan String pada txt1

}
}

public static void main(String[] args){ //main method
new myFirstGUI(); //memanggil constructor myFirstGUI()
}

//deklarasi Objek yg akan digunakan
private JPanel panel1 = new JPanel();
private JTextField txt1 = new JTextField();
private JLabel lbl1 = new JLabel("Nama Anda :"),
lblnama1 = new JLabel();
private JButton btn1 = new JButton("OK");
}

Minggu, 12 Desember 2010

program fifo dengan pascal

Program fifo;
02 uses crt;
03 var
04 x:array[1..100] of integer;
05 y:array[1..100] of integer;
06 z:array[1..100] of integer;
07 i,jum,n,t,jum2 : integer;
08
09 begin
10 clrscr;
11 t:=0;
12 jum:=0;
13 write('Masukkan proses = ');readln(n);
14 for i:= 1 to n do
15 begin
16 write('Proses ke-',i,' = ');readln(x[i]);
17 y[i]:=t;
18 z[i]:=x[i]+y[i];
19 jum:=jum+y[i];
20 jum2:=jum2+z[i];
21 t:=x[i]+t;
22 end;
23 writeln('===================================================');
24 writeln('Proses | CPU Time | Waiting Time | TAT ');
25 writeln('===================================================');
26 for i:=1 to n do
27 begin
28 writeln(' P',i,' ',x[i],' ',y[i],' ',z[i]);
29 end;
30 writeln('===================================================');
31 writeln(' Rata-rata = ',' ',jum/n:4:2,' ',jum2/n:4:2);
32 readln;
33 end.

Minggu, 05 Desember 2010

MENGAPA BENDERA INDONESIA BERWARNA MERAH PUTIH?

Bendera nasional Indonesia adalah sebuah bendera berdesain sederhana dengan dua warna yang dibagi menjadi dua bagian secara mendatar (horizontal) yaitu merah dan putih.
Dulu pada saat Bung Karno bercerita didepan kongres rakyat Jawa-Timur, beliau menceritakan asal mula warna merah putih sebagai warna bendera pusaka bangsa dan negara Indonesia. Beliau berpesan kepada seluruh rakyat Indonesia untuk tidak memperdebatkan Sang merah putih ini. Jangan ada satu pihak yang mengusulkan warna lain sebagai bendera Republik Indonesia.
Beliau juga mengatakan bahwa warna Merah Putih ini bukan buatan Republik Indonesia, Bukan buatan kita dari zaman pergerakan nasional. Apa lagi bukan buatan Bung Karno, bukan buatan Bung Hatta! Enam ribu tahun sudah kita mengenal akan warna Merah Putih ini. Bukan seribu tahun, bukan dua ribu tahun, bukan tiga ribu tahun, bukan empat ribu tahun, bukan lima ribu tahun! Enam ribu tahun kita telah mengenal warna Merah Putih!
Tatkala di sini belum ada agama Kristen, belum ada agama Islam, belum ada agama Hindu, bangsa Indonesia telah meng-agungkan warna Merah Putih. Pada waktu itu kita belum mengenal Tuhan dalam cara mengenal sebagai sekarang ini. Pada waktu itu yang kita sembah adalah Matahari dan Bulan. Pada waktu itu kita hanya mengira, bahwa yang memberi hidup itu Matahari. Siang Matahari – malam Bulan. Matahari merah- Bulan putih.
Pada waktu itu kita telah mengagungkan warna Merah Putih. Kemu¬dian bertambah kecerdasan kita. Kita lebih dalam menyelami akan hidup di dalam alam ini. Kita memperhatikan segala sesuatu di dalam alam ini dan kita melihat, alam ini ada yang hidup bergerak, ada yang tidak bergerak. Ada manusia dan binatang, makhluk-makhluk yang bergerak. Ada tumbuh-tumbuhan yang tidak bisa bergerak. Manusia dan binatang itu darahnya merah. Tumbuh-tumbuhan darahnya putih. Getih – Getah. Coba dengarkan hampir sama dua perkataan ini: Getih – Getah. Cuma i diganti dengan a. Kemudian kita mengagungkan Getih – Getah. Merah – Putih. Saudara-saudara, itu adalah fase kedua.
Fase ketiga, manusia mengerti akan kejadian manusia. Mengerti, bahwa kejadian manusia ini adalah dari perhubungan laki dan perempuan, perempuan dan laki. Orang mengerti perempuan adalah merah, laki adalah putih. Dan itulah sebabnya maka kita turun-temurun mengagungkan Merah-Putih. Apa yang dinamakan “gula-kelapa”, mengagungkan bubur”bang-putih”. Itulah sebabnya maka kita kemudian-tatkala kita mempunyai negara-negara setelah mempunyai kerajaan-kerajaan- memakai warna Merah-Putih itu sebagai bendera negara.
Tatkala kita mempunyai kerajaan Singasari, Majapahit Merah-Putih telah berkibar. Dan tatkala kita mengadakan pergerakan nasional sejak tahun 1908 dengan lahirnya Budi Utomo-dan diikuti oleh Serikat Islam, oleh NIP (Nationaal Indische Partij), oleh ISDP, oleh PKI, oleh Sarekat Rakyat, oleh PPPK, oleh PBI, oleh Parindra, dan lain-lain-maka rakyat lndonesia tetap mencintai Merah-Putih sebagai warna benderanya. Dan tatkala kita pada tanggal 17 Agustus 1945 memproklamirkan kemerdekaan itu, dengan resmi kita menyatakan Sang Merah Putih adalah bendera kemerdekaan kita.
Maka dari itu kawan! sudah saatnyalah kita sebagai penerus bangsa yang besar ini untuk tegap berdiri, tatap sang pusaka kita dengan rasa bangga! Berkibarlah engkau Sang Pusaka Merah Putih.