pingin pintar

Calculator Program in Java

2012-04-26T09:37:00.000-07:00

Title	Calculator Program in Java
Author	Sathish Kumar .S
Author Email	mail2sathish [at] programmer.net
Description	This is a GUI oriented Simple Calculator program.
Category	Java » GUI
Hits	152142
Code	Select and Copy the Code

/**
This is a simple calculator program can any one take and use.

@author sathish_ssmca
@param nothing */
import javax.swing.*;
import javax.swing.JOptionPane;
import java.awt.*;
import java.awt.event.*;
//<applet code=Calculator height=300 width=200></applet>
public class Calculator extends JApplet {
public void init() {
CalculatorPanel calc=new CalculatorPanel();
getContentPane().add(calc);
}
}

class CalculatorPanel extends JPanel implements ActionListener {
JButton
n1,n2,n3,n4,n5,n6,n7,n8,n9,n0,plus,minus,mul,div,dot,equal;
static JTextField result=new JTextField("0",45);
static String lastCommand=null;
JOptionPane p=new JOptionPane();
double preRes=0,secVal=0,res;

private static void assign(String no)
{
if((result.getText()).equals("0"))
result.setText(no);
else if(lastCommand=="=")
{
result.setText(no);
lastCommand=null;
}
else
result.setText(result.getText()+no);
}

public CalculatorPanel() {
setLayout(new BorderLayout());
result.setEditable(false);
result.setSize(300,200);
add(result,BorderLayout.NORTH);
JPanel panel=new JPanel();
panel.setLayout(new GridLayout(4,4));

n7=new JButton("7");
panel.add(n7);
n7.addActionListener(this);
n8=new JButton("8");
panel.add(n8);
n8.addActionListener(this);
n9=new JButton("9");
panel.add(n9);
n9.addActionListener(this);
div=new JButton("/");
panel.add(div);
div.addActionListener(this);

n4=new JButton("4");
panel.add(n4);
n4.addActionListener(this);
n5=new JButton("5");
panel.add(n5);
n5.addActionListener(this);
n6=new JButton("6");
panel.add(n6);
n6.addActionListener(this);
mul=new JButton("*");
panel.add(mul);
mul.addActionListener(this);

n1=new JButton("1");
panel.add(n1);
n1.addActionListener(this);
n2=new JButton("2");
panel.add(n2);
n2.addActionListener(this);
n3=new JButton("3");
panel.add(n3);
n3.addActionListener(this);
minus=new JButton("-");
panel.add(minus);
minus.addActionListener(this);

dot=new JButton(".");
panel.add(dot);
dot.addActionListener(this);
n0=new JButton("0");
panel.add(n0);
n0.addActionListener(this);
equal=new JButton("=");
panel.add(equal);
equal.addActionListener(this);
plus=new JButton("+");
panel.add(plus);
plus.addActionListener(this);
add(panel,BorderLayout.CENTER);
}
public void actionPerformed(ActionEvent ae)
{
if(ae.getSource()==n1) assign("1");
else if(ae.getSource()==n2) assign("2");
else if(ae.getSource()==n3) assign("3");
else if(ae.getSource()==n4) assign("4");
else if(ae.getSource()==n5) assign("5");
else if(ae.getSource()==n6) assign("6");
else if(ae.getSource()==n7) assign("7");
else if(ae.getSource()==n8) assign("8");
else if(ae.getSource()==n9) assign("9");
else if(ae.getSource()==n0) assign("0");
else if(ae.getSource()==dot)
{
if(((result.getText()).indexOf("."))==-1)
result.setText(result.getText()+".");
}
else if(ae.getSource()==minus)
{
preRes=Double.parseDouble(result.getText());
lastCommand="-";
result.setText("0");
}
else if(ae.getSource()==div)
{
preRes=Double.parseDouble(result.getText());
lastCommand="/";
result.setText("0");
}
else if(ae.getSource()==equal)
{
secVal=Double.parseDouble(result.getText());
if(lastCommand.equals("/"))
res=preRes/secVal;
else if(lastCommand.equals("*"))
res=preRes*secVal;
else if(lastCommand.equals("-"))
res=preRes-secVal;
else if(lastCommand.equals("+"))
res=preRes+secVal;
result.setText(" "+res);
lastCommand="=";
}
else if(ae.getSource()==mul)
{
preRes=Double.parseDouble(result.getText());
lastCommand="*";
result.setText("0");
}
else if(ae.getSource()==plus)
{
preRes=Double.parseDouble(result.getText());
lastCommand="+";
result.setText("0");
}

}
}

Car Shot and Burnt at Freeport Area, Two Dead

2012-01-10T07:59:00.000-08:00

VIVAnews – Trailer inspector’s vehicle, KPI LWB 01-3608, which was owned by PT Freeport Indonesia was targeted gunshots in Freeport mining areas in Papua. Afterwards, a group of unidentified men set the car on fire on Monday, Jan 9.

The incident took place in Poros Tambang road, mile 51. “The investigation at the crime scene shows that the vehicle was shot by unknown men from both sides of the road as it passed through mile 32 toward Tembagapura mining area. The vehicle then rolled over and burned by the unidentified men,” said Papua Police spokesman, Chief. Comm. Wachyono on Tuesday, Jan 10.

He added that two passengers of the vehicle were found dead. “Thomas Bagenta, the driver, was found with burns under the vehicle. Meanwhile Nasyun Naboht Simopiaref was found 1.5 meters away from the vehicle with cut injuries to his neck and right check,” he explained.

The evidences found on the scene, he added, were a black bag containing areca nuts; another bag contained 3 shells of 5,56 caliber of FNB 84, 2 shells of 5,56 caliber of TJPLN. “A projectile was found in Nasyun’s body which brought the possibility that he had been shot,” Wachyono said.

According to Wachyono, police have yet to conclude the perpetrators as well as the motives behind the shootings.

Thomas’ body has been flown to Jakarta for autopsy in Cipto Mangunkusumo hospital. Police are still discussing with family members to perform autopsy over Nasyun’s body.

Four Freeport’s employees and security guards have been questioned in relation with this case as witnesses.

Menghentikan Restart Automatic Updates pada Komputer

2012-01-09T08:02:00.000-08:00

Pada Artikel kali ini saya akan berbagi tentang Bagaimana cara menghentikan Automatic Update pada windows. Sebagai pengguna Windows kita pasti menemukan masalah dengan automatic Update , yang membawa Komputer kita terdapat pilihan untuk merestart. Atau muncul pilihan Restart Dialogue Box.

Saya yakin, sobat pernah berurusan dengan hal ini. Itu muncul setiap sepuluh menit setelah update sistem utama. Untungnya, hal itu dapat di atasi. Berikut adalah cara-caranya.

Langkah 1
Buka Notepad.(Start= Run="Notepad")

Tuliskan pada Notepad, ketikkan perintah “net stop wuauserv” (tanpa tanda kutip seperti yang ditunjukkan pada gambar di atas). Kemudian tutup jendela, dan pilih "Ya" untuk menyimpan perubahan.

Langkah 2
Membuat file bat dari notepad

Disini kita sedang membuat sebuah file eksekusi batch yang akan menjalankan perintah ketika diklik ganda, untuk menghentikan Windows Update Layanan Otomatis. Pastikan bahwa "Save as type" disetel ke "All Files". Simpan file Anda dengan ekstensi "bat." Misalnya “stop this.bat” seperti yang ditunjukkan gambar di atas.

Langkah 3
Seperti ini icon file bat yang telah anda buat tadi.

Halah malah mas Tukul yang nongol.maaf...yang bener di bawah ini.

Kita cukup klik kiri 2x icon file tersebut untuk menjalankan dan menghentikan layanan Update otomatis pada windows. Dan hasilnya Komputer kita sudah bebas dari gangguan restart dari update otomatis layanan ini.

Salam

2011-12-16T04:03:00.000-08:00

Headlines

Investment Grade

More Investments May Chip in to Indonesia

“Financial market pressure from deliveraging would be scaled down”

Jum'at, 16 Desember 2011, 11:45 WIB

Nur Farida Ahniar

VIVAnews – Chief Economist of PT Bank Danamon Tbk, Anton Gunawan, said that more foreign investments will be chipped in to Indonesia following the nation’s regaining of investment grade set by Fitch Ratings. The rating helps reduce the pressure from financial market onto the country due to the debt crisis in Europe.
Several foreign investors have actually poured in capital in Indonesia in 2010 and 2011. However, the regain opens more chances for foreign investors.
Anton said that although next year Indonesia might have to cope with the effects of the crisis in Europe and the United States US crisis, the current rating would still be a counterweight for new investors.
“Financial market pressure from deliveraging would be scaled down,” he told VIVAnews, on Thursday, Dec 15.
Rupiah will have similar issue as its volatility will get higher next year following the debt crisis in Europe. However, with the investment grade rating, this would surely alleviate volatility pressure.
Another advantage of the rating increase, Anton continued, is that the cost to propose for financing from state or private parties will be lower. This in turn will boost the issuance of private bonds, especially when the global interest rate is still low.
Meanwhile, with regard to stock market, foreign funds may affect share prices. However, stock market investors are more concerned about stock market performance and economic condition.
Such rating agencies as Moody's and Standard & Poor's have not increased Indonesia’s ratings. It is believed that Indonesia will regain investment grade next year.
“Moody’s may grant positive outlook as they have visited Indonesia and will release the review in January,” he said.

vacancy

2011-10-24T03:56:00.000-07:00

PT. SUZUKI INDOMOBIL SALES

:: URGENTLY REQUIRED ::
As a response to the global transformation plan and to extend our perspectives in Suzuki’s Business Growth, We intend to share the challenging experiences and opportunities to young prominent individual to join and be part of our growth as:

AUTOMOTIVE ACCESSORIES DESIGN & DEVELOPMENT (AADD)

Requirements:

* Male, max 35 years old
* S1 – majoring in Mechanical Engineering from reputable university
* Computer skill : MS Office; AutoCAD; Corel draw; Adobe photo shop
* Mastering the automotive accessories design
* 2 years experienced in automotive design
* Fluent in English both of oral & written

Responsibilities:

* Creating & developing accessories sketch or drawing in accordance with artistic interests, ease of installation and dimension.
* Modifying; Filling; Finishing and preparing activity for mass production.
* Implements daily activities of work design, develop the design and drawing of Automotive accessories.

For those who are qualified and ready for the challenge, and also have what it takes to be part of our finance & accounting function, please APPLY ONLINE with your comprehensive resume (explaining the qualifications and personal details) and recent photograph.

All applicants will be treated in strictly confidential and Only sort-listed candidates will be notified.

Degree, Engineering - Mechanical, Indonesia, Jakarta, PT. SUZUKI INDOMOBIL SALES, Transportation & Logistics > Automotive AUTOMOTIVE ACCESSORIES DESIGN & DEVELOPMENT (AADD) Jobs Vacancy, Lowongan Kerja AUTOMOTIVE ACCESSORIES DESIGN & DEVELOPMENT (AADD), Jobs Vacancy at PT. SUZUKI INDOMOBIL SALES, Lowongan Kerja di PT. SUZUKI INDOMOBIL SALES