untuk menghadapi kasus ini, maka diperukan sebuah sistem yang memiliki login multi user. sehingga bisa dibedakan, user sebagai admin, siswa, guru atau yang lainnya. berikut adalah salah satu contoh solusi sederhana login multi user.

dengan spesifikasi memakai database MS access 2003, 2 user yaitu guest dan admin, dan dibuat menggunakan delpi7.

source untuk login :

———————————-begin————————
unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, DB, ADODB, StdCtrls;

type
TForm1 = class(TForm)
Edit1: TEdit;
ComboBox1: TComboBox;
Edit2: TEdit;
Label1: TLabel;
Label2: TLabel;
Label3: TLabel;
Button1: TButton;
Button2: TButton;
Memo1: TMemo;
ADOConnection1: TADOConnection;
ADOQuery1: TADOQuery;
procedure Button1Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
with adoquery1 do
begin
if combobox1.Text=’Admin’ then
begin
SQL.Clear;
sql.Add(’select * from admin where username=”‘+edit1.Text+’”‘);
open;
if adoquery1.RecordCount <> 0 then
begin
if adoquery1.FieldByName(’passwd’).AsString = edit2.Text then
begin
Application.MessageBox(’Anda berhasil login sebagai administrator.’,'Selamat Datang’);
end
else
begin
Application.MessageBox(’Maaf, Password yang anda masukkan salah.’,'Perhatian!’);
end;
end
else
begin
Application.MessageBox(’Username anda tidak ditemukan.’,'Perhatian!’);
end;
end;
if combobox1.Text=’Guest’ then
begin
SQL.Clear;
sql.Add(’select * from guest where username=”‘+edit1.Text+’”‘);
open;
if adoquery1.RecordCount <> 0 then
begin
if adoquery1.FieldByName(’passwd’).AsString = edit2.Text then
begin
Application.MessageBox(’Anda berhasil login sebagai guest.’,'Selamat Datang’);
end
else
begin
Application.MessageBox(’Maaf, Password yang anda masukkan salah.’,'Perhatian!’);
end;
end
else
begin
Application.MessageBox(’Username anda tidak ditemukan.’,'Perhatian!’);
end;
end;
end;
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
application.Terminate;
end;

end.
————————————————-end———————————-

silakan download source lengkapnya di

disini

String:=''+string1+' '+string2+'';

namun bagaimana jika kita hendak memisahkan lagi 2 string yang telah digabung tersebut untuk keperluan edit data atau keperluan lainnya?? itu lah yang agak merepotkan..

hal seperti ini baru saja saya alami. dimana biasanya saya hanya memakai datetimepicker untuk menyajikan data berupa tanggal. Namun kemarin, saya diminta untuk menyajikan tanggal dalam bentuk 3 combobox. sebut saja masing-masing dengan cbhari, cbbulan, dan cbtahun. user menginputkan dengan 3 combobox tersebut lalu data tanggal disimpan dalam 1 field bernama tanggal (proses penggabungan string) dan jika suatu saat diperlukan edit data tanggal, maka tanggal yang tadinya telah disimpan menjadi 1 string harus dipisah lagi menjadi 3 substring tanggal. yaitu untuk hari, bulan, dan tahun. contoh:

user input tanggal :
cbhari=7
cbbulan=April
cbtahun=1999

kemudian data disimpan menjadi 7/April/1999. dan jika dibutuhkan edit, maka String 7/April/1999 harus dipisah lagi menjadi:
cbhari=7
cbbulan=April
cbtahun=1999

o iya, disini dipakai pemisah/delimiter tanda ‘/’ sebenarnya bisa juga memakai spasi,’;', atau tanda lainya…

berikut source lengkapnya..

——————————begin—————————
unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;

type
TForm1 = class(TForm)
Edit1: TEdit;
ComboBox1: TComboBox;
ComboBox2: TComboBox;
ComboBox3: TComboBox;
ComboBox4: TComboBox;
ComboBox5: TComboBox;
ComboBox6: TComboBox;
Button1: TButton;
Button4: TButton;
Button2: TButton;
procedure Button3Click(Sender: TObject);
procedure Button1Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
procedure Button4Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button3Click(Sender: TObject);
begin
application.Terminate;
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
edit1.Text:=”+combobox1.Text+’/'+combobox2.Text+’/'+combobox3.Text+”;
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
application.terminate;
end;

procedure TForm1.Button4Click(Sender: TObject);
var
s: string;
sl: TStringList;

begin
sl := TStringList.Create;
s := edit1.Text;
sl.Delimiter := ‘/’;
sl.DelimitedText := s;
combobox4.Text:=sl[0];
combobox5.Text:=sl[1];
combobox6.Text:=sl[2];
//ShowMessage(sl[0]);
end;
end.

————————————end———————————-

dan untuk memudahkan anda, silakan download source code lengkapnya di :

disini

Ketika dunia memberi 1000 alasan untuk membuat Kamu mengeluh …
Tunjukkanlah bahwa Kamu punya 1001 alasan untuk bersyukur.

Ketika dunia memberi 1000 alasan untuk membuat Kamu menyerah …
Tunjukkanlah 1001 janji Allah bahwa Kamu akan Berjaya, sebab

Ketika kerjamu tidak dihargai,
Maka saat itu Kamu sedang belajar tentang KETULUSAN.

Ketika usahamu dinilai tidak penting,
Maka saat itu Kamu sedang belajar KEIKHLASAN.

Ketika hatimu terluka sangat dalam,
Maka saat itu Kamu sedang belajar tentang MEMAAFKAN.

Ketika Kamu harus lelah & kecewa,
Maka saat itu Kamu sedang belajar tentang KESUNGGUHAN.

Ketika Kamu merasa sepi & sendiri,
Maka saat itu Kamu sedang belajar KETANGGUHAN.

Ketika Kamu harus membayar biaya yang sebenarnya tidak perlu Kamu tanggung,
Maka saat itu Kamu sedang belajar tentang KEMURAHHATIAN

Dunia ini terlalu hina untuk membuat Kamu menangis
… Terlalu murah untuk membuat Kamu bersedih,

… Terlalu lemah untuk membuat Kamu putus asa

Tersenyumlah …
Karena Kamu mendapat kesempatan & sedang menimba ilmu diuniversitas kehidupan.

Ketika batu itu memenuhi toples sampai ke ujung atas dan tidak ada batu lagi yg muat untuk masuk ke dalamnya, dia bertanya, “Apakah toples ini sudah penuh?” Semua siswanya serentak menjawab,”Sudah!” Kemudian dia berkata, “Benarkah?” Dialalu meraih dari bawah meja sekeranjang kerikil. Lalu dia memasukkan kerikil-kerikil itu ke dalam toples sambil sedikit mengguncang-guncangkannya, sehingga kerikil itu mendapat tempat di antara celah-celah batu-batu itu. Lalu ia bertanya kepada siswanya sekali lagi, “Apakah toples ini sudah penuh?”Kali ini para siswanya hanya tertegun. “Mungkin belum!”, salah satu dari siswanya menjawab. “Bagus!” jawabnya.

Kembali dia meraih kebawah meja dan mengeluarkan sekeranjang pasir. Dia mulai memasukkan pasir itu ke dalam toples, dan pasir itu dengan mudah langsung memenuhi ruang-ruang kosong diantara kerikil dan bebatuan. Sekali lagi dia bertanya, “Apakah toples ini sudah penuh?” “Belum!” serentak para siswanya menjawab. Sekali lagi dia berkata, “Bagus!”

Lalu ia mengambil sebotol air dan mulai menyiramkan air ke dalam toples, sampai toples itu terisi penuh hingga keujung atas. Lalu si Ahli Manajemen Waktu ini memandang kepada para siswanya dan bertanya, “Apakah maksud dari ilustrasi ini?” Seorang siswanya yg antusias langsung menjawab, “Maksudnya, betapapun penuhnya jadwalmu, jika kamu berusaha kamu masih dapat menyisipkan jadwal lain ke dalamnya!”"Bukan!”, jawab si ahli, “Bukan itu maksudnya.

Sebenarnya ilustrasi ini mengajarkan kita bahwa JIKA BUKAN BATU BESAR YANG PERTAMA KALI KAMU MASUKKAN,MAKA KAMU TIDAK AKAN PERNAH DAPAT MEMASUKKAN BATU BESAR ITU KE DALAM TOPLES TERSEBUT.”

Apakah batu-batu besar dalam hidupmu? Mungkin anak-anakmu, suami/istrimu, orang-orang yg kamu sayangi, persahabatanmu, kesehatanmu, mimpi-mimpimu. Hal-hal yg kamu anggap paling berharga dalam hidupmu. Ingatlah untuk selalu meletakkan batu-batu besar tersebut sebagai yg pertama, atau kamu tidak akan pernah punya waktu untuk memperhatikannya.

Jika kamu mendahulukan hal-hal yangkecil dalam prioritas waktumu, maka kamu hanya memenuhi hidupmu dengan hal-halyang kecil, kamu tidak akan punya waktu untuk melakukan hal yang besar dan berharga dalam hidupmu.

anda disarankan untuk memahami konsep-konsep dasar pemrograman sebelum mencoba untuk menjalankan aplikasi ini. kalau belum, pada akhirnya juga akan mengatakan “program apa ini?? ngawur si admin. program ga bisa dijalankan nekat di upload pula”. karena saya banyak menerima komentar serupa, berkaitan dengan source code yang saya upload. sedangkan, saya pastikan bahwa semua source code bisa di compile atau dijalankan dengan baik.

oke, sekali lagi, mohon dipelajari algoritma dan code nya. jadi jangan asal copy-paste.

chatserver.java

—————————-begin—————————————

import java.net.*;
import java.io.*;

public class chatserver
{
public static void main(String args[]) throws Exception
{
ServerSocket ss=new ServerSocket(2000);
System.out.println(”Menunggu Klien mengirim pesan pertama, klien yang harus pertama kali mengirim pesan…”);
System.out.println(”* chat dilakukan 2 arah, server klien, n bergantian kirim pesan.”);
Socket sk=ss.accept();
System.out.println(”Klien telah masuk. happy chat! untuk berhenti, ketik stop pada klien.\n\n”);
BufferedReader cin=new BufferedReader(new InputStreamReader(sk.getInputStream()));
PrintStream cout=new PrintStream(sk.getOutputStream());
BufferedReader stdin=new BufferedReader(new InputStreamReader(System.in));
String s;
while ( true )
{
s=cin.readLine();
if (s.equalsIgnoreCase(”stop”))
{
cout.println(”Bye”);
break;
}
System. out.print(”Client : “+s+”\n”);
System.out.print(”Server : “);
s=stdin.readLine();
cout.println(s);
}
ss.close();
sk.close();
cin.close();
cout.close();
stdin.close();
}
}

—————————————end———————————–

chatclient.java

——————————-begin———————

import java.net.*;
import java.io.*;

public class chatclient
{
public static void main(String args[]) throws Exception
{
Socket sk=new Socket(”localhost”,2000);
BufferedReader sin=new BufferedReader(new InputStreamReader(sk.getInputStream()));
PrintStream sout=new PrintStream(sk.getOutputStream());
BufferedReader stdin=new BufferedReader(new InputStreamReader(System.in));
String s;
while ( true )
{
System.out.print(”Client : “);
s=stdin.readLine();
sout.println(s);
s=sin.readLine();
System.out.print(”Server : “+s+”\n”);
if ( s.equalsIgnoreCase(”Bye”) )
break;
}
sk.close();
sin.close();
sout.close();
stdin.close();
}
}
————————————–end——————————

jika anda ingin yang lebih mudah, tanpa copy paste, saya sediakan link download untuk 2 source code diatas. namun ingat, palajari! jangan asal copas. berikut link download nya:

download disini

1. char charAt(int index)
- Mengembalikan sebuah karakter pada index tertentu.
- Parameter index adalah index dari karakter mulai dari 0 sampai jumlah karakter – 1.
- Error IndexOutOfBoundsException terjadi bila parameter index negatif atau tidak kurang dari
jumlah karakter.

2. int compareTo(Object o)
- Membandingkan string ini dengan object lain.
- Jika object merupakan string maka metode ini bersifat seperti compareTo(String).
- Nilai kembalian 0 bila argumen‐nya sama dengan string ini.
- Nilai kembalian negatif bila argumen‐nya lebih besar dari string ini.
- Nilai kembalian positif bila argumen‐nya lebih kecil dari string ini.
- Error ClassCastException terjadi bila argumen bukan string.

3. int compareTo(String anotherString)
- Membandingkan string ini dengan string yang lain.
- Nilai kembalian 0 bila argumen‐nya sama dengan string ini.
- Nilai kembalian negatif bila argumen‐nya lebih besar dari string ini.
- Nilai kembalian positif bila argumen‐nya lebih kecil dari string ini.

4. int compareToIgnoreCase(String str)
- Membandingkan string ini dengan string yang lain tanpa memperhatikan besar kecilnya karakter.
- Nilai kembalian 0 bila argumen‐nya sama dengan string ini.
- Nilai kembalian negatif bila argumen‐nya lebih besar dari string ini.
- Nilai kembalian positif bila argumen‐nya lebih kecil dari string ini.

5. String concat(String str)
- Menyambung string ini dengan argumen‐nya.
- Nilai yang dikembalikan adalah string hasil penyambungan di atas.

6. boolean contentEquals(StringBuffer sb)
- Mengembalikan nilai true jika string ini merepresentasikan deretan karakter yang sama dengan
argumen StringBuffer sb.

7. static String copyValueOf(char[] data)
- Mengembalikan string yang merepresentasikan deretan karakter dalam array tertentu.

8. static String copyValueOf(char[] data, int offset, int count)
- Mengembalikan string yang merepresentasikan deretan karakter dalam array tertentu.
- offset adalah index awal dari array data yang akan di‐copy menjadi string.
- count adalah panjang dari subarray yang akan di‐copy.

9. boolean endsWith(String suffix)
- Menguji apakah String ini diakhiri oleh string suffix.

10. boolean equals(Object anObject)
- Membandingkan string ini dengan object lain.
- Mengembalikan nilai true jika argumen tidak null dan object string sama dengan string ini.

11. boolean equalsIgnoreCase(String anotherString)
- Sama dengan no.10, hanya saja pada metode ini mengabaikan huruf kapital atau kecil.

12. byte[] getBytes()
- Meng‐encode string ini ke dalam array of byte menggunakan karakter set bawaan platform‐nya.

13. void getBytes(int srcBegin, int srcEnd, byte[] dst, int dstBegin)
- Mengambil data byte dari string ini dimulai dari karakter dengan index srcBegin sampai index
srcEnd – 1.
- Data byte disimpan dalam array dst dimulai pada index dstBegin.

14. byte[] getBytes(String charsetName)
- Meng‐encode string ini ke dalam array of byte menggunakan karakter set tertentu.

15. void getChars(int srcBegin, int srcEnd, char[] dst, int dstBegin)
- Mengambil data karakter dari string ini dimulai dari karakter dengan index srcBegin sampai index
srcEnd – 1.
- Karakter yang didapat disimpan dalam array dst dimulai pada index dstBegin.

16. int hashCode()
- Mengembalikan nilai hash code dari string ini.

17. int indexOf(int ch)
- Mengembalikan index dari karakter ch yang pertama ditemukan dalam string ini.
- Bila karakter tidak ditemukan, maka dikembalikan nilai ‐1.

18. int indexOf(int ch, int fromIndex)
- Mengembalikan index dari karakter ch yang pertama ditemukan dalam string ini dimulai dari index
tertentu.
- Bila karakter tidak ditemukan, maka dikembalikan nilai ‐1.

19. int indexOf(String str)
- Mengembalikan index dari string str yang pertama ditemukan dalam string ini.
- Bila string tidak ditemukan, maka dikembalikan nilai ‐1.

20. int indexOf(String str, int fromIndex)
- Mengembalikan index dari string str yang pertama ditemukan dalam string ini dimulai dari index
tertentu.
- Bila string tidak ditemukan, maka dikembalikan nilai ‐1.

21. String intern()
- Mengembalikan representasi kanonik dari string ini.

22. int lastIndexOf(int ch)
- Mengembalikan index dari karakter ch yang terakhir ditemukan dalam string ini.
- Bila karakter tidak ditemukan, maka dikembalikan nilai ‐1.

23. int lastIndexOf(int ch, int fromIndex)
- Mengembalikan index dari karakter ch yang terakhir ditemukan dalam string ini dimulai dari index
tertentu.
- Bila karakter tidak ditemukan, maka dikembalikan nilai ‐1.

24. int lastIndexOf(String str)
- Mengembalikan index dari string str yang terakhir ditemukan dalam string ini.
- Bila string tidak ditemukan, maka dikembalikan nilai ‐1.

25. int lastIndexOf(String str, int fromIndex)
- Mengembalikan index dari string str yang terakhir ditemukan dalam string ini dimulai dari index
tertentu.
- Bila string tidak ditemukan, maka dikembalikan nilai ‐1.

26. int length()
- Mengembalikan nilai panjang string / jumlah karakter dari string ini.

27. boolean matches(String regex)
- Mengembalikan nilai true bila ekspresi reguler yang dilewatkan sebagai parameter cocok dengan
string ini.

28. boolean regionMatches(boolean ignoreCase, int toffset, String other, int ooffset, int len)
- Membandingkan apakah dua buah region string sama.
- Bila ignoreCase false, maka akan diabaikan huruf kapital atau kecil dalam perbandingan.
- tooffset merupakan index awal dari string ini yang akan dibandingkan.
- other merupakan string yang akan dibandingkan.
- ooffset merupakan index awal dari string other yang akan dibandingkan.
- len merupakan jumlah karakter yang akan dibandingkan.

29. boolean regionMatches(int toffset, String other, int ooffset, int len)
- Sama dengan metode no.28, hanya saja nilai ignoreCase dianggap false.

30. String replace(char oldChar, char newChar)
- Mengembalikan string baru yang dihasilkan setelah mengganti semua karakter oldChar yang
ditemukan dari string ini dengan karakter newChar.

31. String replaceAll(String regex, String replacement)
- Mengganti setiap substring dari string ini yang cocok dengan string regex dengan string replacement
yang diberikan.

32. String replaceFirst(String regex, String replacement)
- Mengganti substring pertama dari string ini yang cocok dengan string regex dengan string
replacement yang diberikan.

33. String[] split(String regex)
- Memecah string ini ke dalam sebuah array berdasarkan regex yang diberikan.

34. String[] split(String regex, int limit)
- Memecah string ini ke dalam sebuah array berdasarkan regex yang diberikan.
- Limit merupakan jumlah bagian pecahan yang dinginkan.
- Bila limit bernilai negatif, maka string akan dipecah sebanyak kemungkinan yang bisa.
- Bila limit bernilai 0, maka hasil pecahan yang berupa string kosong pada akhir‐akhir tidak akan
dimasukan dalam array.

35. boolean startsWith(String prefix)
- Menguji apakah String ini diawali oleh string prefix.

36. boolean startsWith(String prefix, int toffset)
- Menguji apakah String ini diawali oleh string prefix dimulai dari index toffset.

37. CharSequence subSequence(int beginIndex, int endIndex)
- Mengembalikan sebuah deret karakter baru yang merupakan sub deret dari deret karakter ini
(pada hakikatnya string merupakan deret karakter).

38. String substring(int beginIndex)
- Mengembalikan sebuah string baru yang merupakan bagian dari string ini, dimulai dari karakter
dengan index tertentu sampai akhir string.

39. String substring(int beginIndex, int endIndex)
- Mengembalikan sebuah string baru yang merupakan bagian dari string ini, dimulai dari karakter
dengan index tertentu sampai index endIndex – 1.

40. char[] toCharArray()
- Mengkonversi string ini ke dalam array karakter.

41. String toLowerCase()
- Mengkonversi semua karakter menjadi huruf kecil.

42. String toLowerCase(Locale locale)
- Mengkonversi semua karakter menjadi huruf kecil menggunakan aturan transformasi tertentu.

43. String toString()
- Mengembalikan string ini sendiri.

44. String toUpperCase()
- Mengkonversi semua karakter menjadi huruf besar.

45. String toUpperCase(Locale locale)
- Mengkonversi semua karakter menjadi huruf besar menggunakan aturan transformasi tertentu.

46. String trim()
- Mengembalikan string baru yang setelah dihilangkan spasi kosong pada awal dan akhirnya.

47. static String valueOf(boolean b)
- Mengembalikan representasi string dari argumen boolean.

48. static String valueOf(char c)
- Mengembalikan representasi string dari argumen karakter.

49. static String valueOf(char[] data)
- Mengembalikan representasi string dari argumen deret karakter.

50. static String valueOf(char[] data, int offset, int count)
- Mengembalikan representasi string dari subarray dari array of char.
- offset merupakan index awal dari karakter pada string.
- count merupakan jumlah karakter yang akan diambil dari string dimulai dari index offset.

51. static String valueOf(double d)
- Mengembalikan representasi string dari argumen double.

52. static String valueOf(float f)
- Mengembalikan representasi string dari argumen float.

53. static String valueOf(int i)
- Mengembalikan representasi string dari argumen int.

54. static String valueOf(long l)
- Mengembalikan representasi string dari argumen long.

55. static String valueOf(Object obj)
- Mengembalikan representasi string dari argumen Object.

demikian sedikit info nya. hehe. nah, sekarang saat nya untuk contoh program pencarian string.

SearchString.java
————————————begin————————————–
import java.io.BufferedReader;
import java.io.IOException;
import java.io.InputStreamReader;
public class SearchString
{
public static void main( String[] args )
{
BufferedReader dataIn = new BufferedReader(new InputStreamReader(System.in));
try
{
System.out.print(”input kata : “);
String input = dataIn.readLine();
String strOrig = input;
System.out.print(”Masukkan bagian kata yang ingin dicari (pencarian case sensitive) : “);
String search = dataIn.readLine();
int intIndex = strOrig.indexOf(search);
if(intIndex == – 1)
{
System.out.println(”Pencarian tidak bisa ditemukan”);
}
else
{
System.out.println(”Kata tersebt telah ditemukan pada index ke- ” + intIndex);
}
}
catch (IOException e)
{
System.out.println(”Error in getting input”);
}
}
}
—————————————end———————————————–

dan, jika anda ingin download langsung source diatas, silakan download :

disini

• Class abstract dideklarasikan dengan kata kunci abtract ditulis sebelum kata kunci class
• Class abstract memiliki menimal satu method abstract
• Subclass dari class abstract harus mengoverride semua method abstract
• Class abstract tidak dapat dibuat instance, yang bisa hanya class concrete

contoh program menggunakan abstract class

Shape .java
————————————-begin————————————-

public abstract class Shape {
private String name;
Shape(String aName) {
name=aName;
}
public String getName() {
return name;
}
public abstract float calculateArea();
}
class Circle extends Shape {
private int radius;
Circle(String aName) {
super(aName);
radius = 3;
}
public float calculateArea() {
float area;
area = (float) (3.14 * radius * radius);
return area;
}
}
class Square extends Shape {
private int side;
Square(String aName) {
super(aName);
side = 3;
}
public float calculateArea() {
int area;
area = side * side;
return area;
}
}
—————————————–end————————–

ShapeTest.java
————————————-begin—————————
public class ShapeTest {
public static void main(String argv[]) {
Circle c = new Circle(”Circle C”);
Square s = new Square(”Square S”);
Triangle t = new Triangle(”Triangle T”);
Shape shapeArray[] = {c, s, t};
for (int i=0; i
System.out.println(”Area dari ” + shapeArray[i].getName()
+ ” is ” + shapeArray[i].calculateArea()+” sq. cm.\n”);
}
}
}
————————————end—————————

Triangle.java
———————————–begin————————
public class Triangle extends Shape{
private int alas,tinggi;
Triangle(String aName) {
super(aName);
alas = 5;
tinggi = 6;
}
@Override
public float calculateArea() {
float area;
area = (float) (0.5 * alas * tinggi);
return area;
}
}
—————————–end———————–

atau anda bisa langsung download 3 source code tersebut di :

disini

1. Seorang pria tidak akan merasa sakit saat melakukan perkelahian sengit namun akan mengaduh sakit saat seorang wanita berusaha membersihkan lukanya.
2. Tokoh jagoannya tak pernah jatuh cinta pada jagoan wanita kecuali sebelumnya mereka menari-nari di bawah hujan.
3. Sekali dipakai make-upnya tidak pernah luntur, saat hujan ataupun saat lainnya.
4. Dua orang kekasih bisa menari-nari ditengah lapang, dan entah dari mana 100 orang lainnya akan muncul dari antah berantah dan bergabung menari bersama mereka. (penari latar Michael Jackson aja kalah banyak)
5. Pada babak akhir, sang jagoan akan menemukan bahwa tokoh jahat yang dilawannya sebenarnya adalah saudara kandungnya, wanita tua yang mencarinya adalah ibunya, dan kepala Inspektur adalah ayahnya serta sang hakim adalah pamannya dan seterusnya.
6. Kata-kata Inggris yang biasanya muncul adalah (biasanya diucapkan keras2 di antara kalimat) No Problem!, My God!, Get Out!, Shut-up!, Impossible!, Please forgive me!
7. Mereka berguling-guling dan berputar-putar sambil bernyanyi dan muncul lagi dengan pakaian berbeda.
8. Mereka bisa berlari mengelilingi pohon kelapa, bernyanyi, saling memandang dan memalingkan muka menggoda dan berganti pakaian pada waktu yang sama tanpa menarik nafas….
9. Jagoan gak boleh liat pohon dan tiang listrik, pasti joget dulu muter2 dan tiba-tiba wanitanya muncul, gak heran film India minimal pasti 3 jam Bisa lebih gak rugi sih.
10. Airmata sang jagoan dan si wanita gampang mengucur bak keran air, tapi cepat juga kering dan langsung joget mbok,.

Film Kungfu China

1. Menjadi orangtua sang jagoan selalu bernasib sial dan biasanya selalu dibunuh oleh musuh saat si jagoan masih muda, dan is jagoan akan jadi yatim piatu terus belajar ilmu silat dan balas dendam, dstnya.
2. Ketika seseorang terluka berat dan sekarat, ia selalu berhasil bertahan hidup dan mengucapkan beberapa kalimat untuk mengungkapkan is pembunuh sebelum kepalanya terkulai dan menyatakan dirinya telah benar-benar mati.
3. Orang-orang yang mahir kungfu mampu terbang ke atas atap, ke atas pohon dan menempuh jarak jauh tanpa berkeringat. Namun saat berjalan ke kota dan desa-desa mereka tetap harus berjalan kaki atau menunggang kuda.
4. Sang jagoan tak perlu bekerja untuk mendapatkan uang, namun selalu memiliki uang emas dan perak untuk membayar makanan mereka. (Minta jatah preman kali ye….)
5. Sang jagoan dan sang penjahat akan saling bertemu walaupun negara mereka sangat luas dan tak peduli di manapun mereka berada. (padahal belon ada HP)
6. Menyembuhkan luka dalam di tubuh cukup dengan duduk bersilang kaki, telapak tangan di lutut dan asap keluar dari kepala.
7. Mereka bisa menyimpan banyak barang di baju lengan panjang mereka dan tak pernah menjatuhkannya. Terutama sedemikian banyak logam-logam emas….dan botol-botol obat penyembuh berbagai racun
8. Jagoan pasti jago minum arak, apalagi sedang kesel/marah, sekali minum bisa berdrum2 (5-10 drum) kayak Jacky Chan Pendekar Mabuk.
9. Sebelum mati, sang guru bisa mentransfer tenaga dalam ke muridnya hanya dengan menempelkan telapak tangan ke pundak si murid begitu gampang dan cepat bahkan mengalahkan kecepatan USB cable, infra red dan bluetooth jaman sekarang
10. Hebatnya kalo wanita mengenakan kostum pria, dan suaranya suara wanita, namun orang-orang bahkan pendekar pria tidak sadar bahwa itu seorang wanita, harus melalui proses tak sengaja, seperti menyentuh dada si wanita baru pendekarnya sadar.ape deh..!

Film Robot Jepang

1. Biasanya kalo jagoannya mau berubah wujud, si musuh nunggu dulu sampe si jagoan bener2 berubah wujud secara sempurna – kayak pesawat mau mendarat aja, sampe sempurna – mungkin si musuh memang gentlemen, gak mau nyerang si jagoan yang tengah lagi berubah wujud.
2. Kalo anak buah musuh suka nyerang jagoan secara gerombolan alias maen keroyokan, tapi anehnya selalu kalah, padahal jumlah mereka bisa satu kompi ato lebih. Dan lucunya lagi kalo berkelahi, si pengeroyok gak suka nyerang dari belakang jagoan, ya itu tadi biar gentle kali yah!
3. Biasanya si musuh ternyata sodara kandung si jagoan, dan itu baru ketauan saat akhir episode – telenovela banget yah hehehe
4. Kalo lagi berantem, si musuh udah ngeluarin semua senjatanya, dan si jagoan tetap selamat, paling2 jatuh doang tapi bangkit lagi, tapi giliran si jagoan ngeluarin satu (catet : satu) senjata, si musuh langsung terkapar !
5. Lokasi berantemnya dipilih di tempat yang terbuka kayak di lapangan, di pelabuhan, di padang rumput, padahal saat ketemu musuhnya pertama kali, si jagoan lagi bukan berada di lokasi tersebut !
6. Kalo jagoannya berkelompok, kayak Gogle V, Voltus, Megaloman, ceweknya mesti hanya satu personel, sisanya cowok semua. Gak pernah denger ada cewek semua, ato ceweknya empat, cowoknya satu, mungkin ntar kasian cowoknya kali ya jadi andalan terus hehehe
7. Si musuh suka nyerang penduduk lokal secara tiba-tiba, baru lah si jagoan muncul, kenapa gak jagoan dulu yang muncul baru musuh nyerang?
8. Bila jagoannya berupa raksasa, tiap berantem dengan musuhnya yang raksasa juga, selalu merusak bangunan2 yang ada, tapi anehnya gak ada yang komplain, penduduknya adem ayem aja..
9. Biasanya kalo ada anggota keluarga jagoan yang mati karena perbuatan musuh, jagoan akan membalas dendam, gak pake lapor2 ke pihak berwajib hehehe
10. Biasanya kalo jagoannya berkelompok, ada satu anak kecil, umumnya sih adik kandung dari si anggota kelompok jagoan itu.

Sinetron Indonesia

1. Umumnya kalo yang kaya punya anak cewek tunggal, atau sepasang anak cewek-cowok, jarang ditampilkan punya anak sampe tiga ke atas, apalagi tujuh anak !
2. Ortu yang orang kaya ini umumnya suka jodoh2in anaknya ke orang lain yang berasal dari keluarga kaya juga.
3. Saat makan malam/pagi, biasanya bersama istrinya, anaknya, menggunakan sendok-garpu, lauknya berlimpah, buah2an yang komplit, beserta es jeruk.
4. Yang jadi orang jahat, biasanya orang yang matanya suka melotot, dan ketawa yang menyeramkan.
5. Kalo mau ngekiss pacar ato istri, paling2 cuman kening doang, mau cium bibir, takut kena protes MUI.
6. Kalo cewek yang jalan sendirian pasti digoda penjahat bergerombol yang suka ketawa keras.
7. Polisi yang ditampilkan umumnya berpangkat ipda (garis satu) sampe kapten (garis tiga), gak pernah sampe pangkat jenderal yang dipake Smile
8. Kendaraan yang dipake si kaya biasanya kalo gak mercy, BMW, ato audy
9. Kalo sinetron silat, si cewek suka pake kemben, dan tiap berkelahi pasti pake loncat2 setinggi pohon gitu deh dan ada asap2nya gitu, padahal ga ada motor disitu
10. Kalo sinetron anak sekolahan, umumnya si murid suka berpakaian seenaknya, bajunya suka ga dimasukin, ada yang gondrong, ada yang pake rok diatas lutut, pake lipstik, semakin dia tokoh utama, semakin gak tertib pakaian sekolahnya.
11. Yang jadi ibu guru, umumnya memakai kacamata, agak gemuk, dan suka galak (jadi inget jaman sekolah dulu)
12. Pasti ada adegan di diskotik, entah itu sinetron remaja, entah itu sinetron horor, sampe sinetron religi.
13. Kadang dalam cerita asmara, suka diselipin adegan hantu.
14. Kalo adegan tabrakan, umumnya mobil yang melaju tiba2 berhenti mendadak, tau2 si korban dah terkapar dengan kepala berdarah, tapi kita gak liat tabrakannya gimana. entah knapa semua sinetron punya adegan ketabrak, seakan2 menggambarkan kenyataan org indo yg banyak nembak sim nya
15. Motor yang suka dipake biasanya motor gede kayak harley, dan kadang-kadang ada yg gak pake helm standar, mana nih pak polantasnya?
16. Pembantu umumnya suka gantungin handuk kecil di bahu, dan duduk di lantai tiap ngobrol ama majikan yang duduk di sofa.
17. Kalo ada adegan lagi telponan, pasti penontonnya mendengar suara si penelpon
18. Yang jadi dokter, umumnya cowok yang masih muda, berpakaian putih, dan berkacamata.
19. Makin sering ada adegan menampar, entah itu ortu menampar anaknya, cowok menampar pacarnya, cewe menampar cowoknya, majikan menampar pembantunya, dll
20. Ustadnya biasanya orang tua yang bisa berkelahi kalo menghadapi setan ato orang jahat.
21.disalah satu channel swasta indonesia, punya sinetron dmn suara nya di dub, sinetronya semi dangdut india, terus tokoh utama cowonya slalu bisa beladiri, dengan sound effect seperti di game Fighting.
22.biasanya, dibubuhi adegan mesum juga.

source: http://cuma-ingin-tahu.blogspot.com/2010/06/perbedaan-film-india-jepang-cina.html

I. Manfaat Teh
Banyak alasan kenapa orang minum teh. Jika anda punya kebiasaan itu,teruskan saja. Ada 8 manfaat yang terkandung dalam satu cangkir teh. Apa saja ?

1. Antioksidan dalam teh dapat melindungi tubuh dari efek polusi dan penuaan dini

2. Mengandung sedikit kafein. 1/8 cangkir kopi mengandung 135 mg kafein, sementara 1 cangkir teh hanya mengandung 30-40 mg kafein sehingga tidak membuat sakit kepala atau susah tidur

3. Mengurangi risiko serangan jantung dan stroke. Teh membuat peredaran darah lancar dan bersih. Hasil studi di Belanda memperlihatkan, orang yang minum 2-3 cangkir teh hitam perhari memiliki sedikit resiko serangan jantung daripada yang tidak pernah minum teh.

4. Perkuat tulang. Ternyata bukan hanya kalsium susu yang membuat tulang anda kuat, orang yang rutin minum teh memiliki massa tulang lebih padat.

5. Putihkan Gigi. Anggapan teh bisa membuat gigi nampak kusam rupanya tidak benar, sebab ternyata teh mengandung fluoride untuk mengusir karang gigi. Lebih bagus lagi jika seusai menggosok gigi, anda berkumur dengan teh tanpa gula.

6. Cegah Infeksi. Kandungan teh bisa memperkuat sistem kekebalan dan menangkal serangan infeksi.

7. Atasi kanker. Zat antioksidan bernama polyphenols yang ada dalam teh dapat memerangi kanker.

8. Bebas kalori. Tanpa tambahan pemanis, gula atau susu, teh tetap bebas kalori.(ref:http://premasai.wordpress.com/2007/10/22/8-manfaat-minum-teh/)

- Mendinginkan kulit yang terbakar matahari
Tempelkan beberapa kantung teh basah, dan rasa terbakar yang ada akan berkurang. Cara ini juga bisa dipakai untuk merawat luka bakar ringan seperti kena uap panas atau terkena setrika. Jika kulit yang terbakar matahari sudah sangat luas, coba rendam beberapa kantung teh dalam bak mandi, dan berendamlah!
- Mengurangi sakit luka gores
Goresan luka tadi biasanya sangat perih, cara paling nyaman adalah meletakkan kantung teh basah di tempat yang terluka.
- Mengeringkan bisul
Setelah teh direbus, tempelkan kantung teh yang basah di bisul, setelah semalam, bisul yang ada akan mengering tanpa rasa sakit pada saat Anda terbangun esok harinya.
- Mengurangi rasa sakit di puting payudara akibat menyusui.
Cara mengatasinya celupkan teh ke air panas, kemudian angkat kantungnya dan letakkan ke dalam wadah berisi es batu. Setelah itu letakkan di puting yang sakit dan biarkan selama beberapa menit.
- Mengurangi sakit gusi
Gusi berdarah selain perih memang tidak menyenangkan. Coba kompres dengan kantung teh basah yang dibasahi air dingin.
- Mengurangi sakit bayi dari suntikan
Coba basahi kantung teh, dan tutupkan di bekas luka suntikan. Tahan perlahan sampai tangis mereda.
- Membersihkan perabot kayu dan lantai
Rebus beberapa kantung teh dalam satu liter air dan biarkan dingin. Gunakan kain lembut dan celupkan dalam larutan, lalu peras, gunakan kain lembab tadi untuk membersihkan perabotan. Keringkan dengan lap kering dan lembut.
- Membersihkan cermin
Untuk membersihkan cermin, buatlah teh kental, biarkan dingin, dan gunakan untuk membersihkan cermin. Lembabkan kain lembut dengan teh tadi, dan gunakan untuk mengelap permukaan cermin. Kemudian keringkan dengan lap kering yang lembut.(ref:http://id.shvoong.com/medicine-and-health/epidemiology-public-health/1855272-beberapa-manfaat-teh/)

II keburukan/yang perlu diperhatikan
Ada pula yang harus Anda perhatikan saat Anda minum teh agar zat yang berguna dalam tubuh tidak hilang, antara lain:

* Jangan minum teh saat atau sesudah makan kerena zat yang terkandung dalam makanan dapat dicuri oleh zat stimulan teh.
* Jangan minum teh saat perut kosong sebab dapat meningkatkan produksi asam lambung.
* Hindari minum teh dicampur dengan gula karena menyebabkan zat-zat yang dikandungnya menjadi berkurang.
* Jangan minum teh yang sudah semalaman karena sudah banyak zat nya yang teroksidasi dan basi sehingga berdampak tidak baik untuk tubuh.
* Hindari minum teh saat hamil dan menyusui. Karena kafein dan zat stimulan pada teh bisa merangsang kontraksi rahim. Selain itu untuk ibu menyusui akan mengganggu produksi kelenjar penghasil susu ibu atau ASI.

/*rata array*/
#include “stdio.h”

main()

{
int maks;
float arr [100];
float total;
float rata;
int i;

printf (”Masukkan jumlah data : “);
scanf (”%d”, &maks);
for (i=0; i<maks; i++)
{
printf (”masukkan nilai : “);
scanf(”%f”, &arr[i]);
}

for (i=0; i<maks; i++)
{
total=0;
for (i=0; i<maks; i++)
total=total+arr[i];
}
rata=total/maks;
printf(”rata=%.2f\n”, rata);
}