Roy Angel adalah ustadz miskin yang memiliki kakak seorang milyuner. Pada tahun 2009, ketika bisnis minyak bumi sedang mengalami puncak, kakaknya menjual padang rumput di Texas pada waktu yang tepat dengan harga yang sangat tinggi. Seketika itu kakak Roy Angel menjadi kaya raya.
Setelah itu kakak Roy Angel menanam saham pada perusahaan besar dan memperoleh untung yang besar. Kini dia tinggal di apartemen mewah di Jakarta dan memiliki kantor di Di sana. Seminggu sebelum Hari raya, kakaknya menghadiahi Roy Angel sebuah mobil baru yang mewah dan mengkilap. . Suatu pagi seorang anak gelandangan menatap mobilnya dengan penuh kekaguman. "Hai.. nak" sapa Roy Anak itu melihat pada Roy dan bertanya "Apakah ini mobil Tuan?" "Ya," jawab Roy singkat. "Berapa harganya Tuan?" "Sesungguhnya saya tidak tahu harganya berapa". "Mengapa Tuan tidak tahu harganya, bukankan Tuan yang punya mobil ini?" Gelandangan kecil itu bertanya penuh heran. "Saya tidak tahu karena mobil ini hadiah dari kakak saya" . Mendengar jawaban itu mata anak itu melebar dan bergumam, "Seandainya. ...seandainya. ..." Roy mengira ia tahu persis apa yang didambakan anak kecil itu. "Anak ini pasti berharap memiliki kakak yang sama seperti kakakku." Ternyata Roy salah menduga, saat anak itu melanjutkan kata-katanya: "Seandainya. .. seandainya saya dapat menjadi kakak seperti itu....." Dengan masih terheran-heran Roy mengajak anak itu berkeliling dengan mobilnya. . Anak itu tak henti-henti memuji keindahan mobilnya. Sampai satu kali anak itu berkata, "Tuan bersediakah mampir ke rumah saya ? Letaknya hanya beberapa blok dari sini". Sekali lagi Roy mengira dia tahu apa yang ingin dilakukan anak ini. "Pasti anak ini ingin memperlihatkan pada teman-temannya bahwa ia telah naik mobil mewah." pikir Roy . "OK, mengapa tidak", kata Roy sambil menuju arah rumah anak itu. . Tiba di sudut jalan si anak gelandangan memohon pada Roy untuk berhenti sejenak, "Tuan, bersediakah Tuan menunggu sebentar? Saya akan segera kembali". Anak itu berlari menuju rumah gubuknya yang sudah reot. Setelah menunggu hampir sepuluh menit, Roy mulai penasaran apa yang dilakukan anak itu dan keluar dari mobilnya, menatap rumah reot itu. . Pada waktu itu ia mendengar suara kaki yang perlahan-lahan. Beberapa saat kemudian anak gelandangan itu keluar sambil menggendong adiknya yang lumpuh. Setelah tiba di dekat mobil anak gelandangan itu berkata pada adiknya: "Lihat... seperti yang kakak bilang padamu. Ini mobil terbaru. Kakak Tuan ini menghadiahkannya pada Tuan ini. Suatu saat nanti kakak akan membelikan mobil seperti ini untukmu". . Bukan karena keinginan seorang anak gelandangan yang hendak menghadiahkan mobil mewah untuk adiknya yang membuat Roy tak dapat menahan haru pada saat itu juga, tetapi karena ketulusan kasih seorang kakak yang selalu ingin memberi yang terbaik bagi adiknya. Seandainya saya dapat menjadi kakak seperti itu. . . Kisah ini diambil dari sebuah kisah nyata yang ditulis dalam sebuah buku "Stories for the family's heart" by Alice Gray.
Bayi lahir didalam tanah : sang ibu meninggal dunia, si bayi masih hidup...
Subhanallah....
Berita yang menggetarkan jiwa yang menunjukkan kebesaran Tuhan, Allah Yang Mahakuasa dan Perkasa. Begini singkat ceritanya. Peristiwa ini berawal dari bencana banjir yang melanda India. Pada saat itu, seorang wanita yang tengah hamil tua terseret oleh arus air bah yang dahsyat. Setelah air surut dan dilakukan pencarian, si ibu tak kunjung ditemukan kecuali bayinya yang dilahirkan di tempat dan situasi yang mengerikan. Allah SWT mengeluarkan si bayi dalam keadaan hidup, dan mewafatkan si ibu...
Mahasiswa Lelang Perawan - Natalie Dylan, mahasiswa asal San Diego, California, AS nekat melelang keperawanannya demi mendapatkan uang untuk biaya kuliah. Namun, agaknya gadis 22 tahun ini belum memilih pemenangnya.
Saat lelang disiarkan pertama kali melalui sebuah radio di AS September silam, nilai tawaran pun mulai bermunculan. Natalie pernah mendapatkan harga 243,000 dolar AS atau sekitar Rp 2,5 miliar. Dan nilai itu terus beranjak naik. Bahkan ketika sudah 10.000 laki-laki menawar dengan nilai tertinggi 3,7 juta dolar AS (sekitar Rp 40 miliar), Natalie masih geleng kepala karena menunggu tawaran lebih baik.
“Saya tak mengira orang mau keluar duit begitu banyak demi mendapatkan keperawanan, bahkan ketika keperawanan tidak begitu dihargai. Sepertinya ada persaingan di antara para pria itu,” aku Natalie terang-terangan.
Soal mengapa belum ada pemenang, Natalie mengatakan ini bukan lelang seperti e-Bay dengan penawar tertinggi sebagai pemenang. “Saya tidak memilih penawar tertinggi. Saya perlu waktu untuk saling mengenal. Saya banyak ngobrol dengan mereka,” katanya.
Dari 10.000 penawar tak sedikit yang punya orientasi seksual aneh-aneh, bahkan ada pula yang mencari pacar. “Buat yang mencari pacar, saya tegaskan ini cuma kencan semalam,” katanya. Natalie punya alasan untuk menjual kegadisannya. Ia telah meraih gelar sarjana di bidang studi perempuan. Sekarang ia perlu mengejar gelar master tentang terapi keluarga dan perkimpoian.
Nah, di sini ia membutuhkan biaya besar. ”Saya jujur soal studi yang menjadi alasan mengapa saya melelang keperawanan. Saya tidak mengambil keuntungan lebih dari itu. Saya dan pemenang lelang itu akan mendapat yang sepadan,” katanya.
Ia mengaku pernah memiliki dua kekasih, dan mereka menjalin hubungan dengan serius. Keduanya pria-pria sopan dan sabar dengan keinginannya. Natalie sendiri pernah berencana menyerahkan keperawanannya pada salah satu kekasihnya tersebut, namun ia merasa belum saatnya melakukan hal itu.
“Orang mungkin berpikir saya aneh karena hingga usia 22 tahun tetap perawan. Namun saya selalu menjaga tindak tanduk saya,” jelas Natalie.
Inspirasi mencari duit semacam ini datang dari sang kakak, Avia, 23. Sang kakak yang tak kalah cantik memilih menjual diri selama tiga pekan untuk membiayai kuliahnya. Untuk membuktikan masih perawan, Natalie berani menjalani bermacam tes, termasuk tes kebohongan. ”Saya tahu, keinginan saya ini akan dikutuk banyak orang karena memang tabu, tapi saya nggak ambil pusing dengan itu,” katanya.
harii ini gUe buka situs "Ruanghati.com" and gUe tertarik dengan judul "Korban Gempa Haiti Kalap, Tubuh Penjarah Ditelanjangi dan Diseret di Jalan (Picture)" so taNpa basa-basi gUe kLik and Finally . . . Look at this guys!! i just say "Oh my God..." ..........................................................................................................................................................................
Situasi rusuh berlangsung saat ini di Haiti, penduduk banyak terlibat dalam penjarahan serta berebut bala bantuan makanan, hal ini bisa difahami, karena kondisi psikis mereka yang frustrasi dan lelah serta panik akibat bencana yang mereka alami. Namun pemandangan yang sungguh sadis tidak bisa dihindari ketika seorang penjarah tertangkap basah oleh warga. Tubuh penjarah diikat dan diseret dalam keadaan telanjang.
Sadis, Tubuh penjarah ditelanjangi dan diseret-seret keliling kota
Petugas kepolisian setempat sudah kehilangan kenadali atas keamanan (Chaos) dikarenakan kondisi serta pemulihan yang sangat lamban berjalan). Siapapun bisa kalap mata bila menghadapi situasi seperti ini. Kehilangan keluarga tercinta, sanak saudara, harta benda serta perut lapar dan ketidakpastian situasi. Hingga sejauh ini bantuan internasional terus mengalir dari berbagai negara baik dalam bentuk tim penyelamat (Rescue) maupun bantuan pangan serta obat-obatan.
Beberapa hari sebelumnya seperti diberitakan beberapa media Internasional yang dikutip ruanghati.com menyebutkan untuk menghalau beberapa penjarah, warga setempat memblokade jalan dengan menggunakan mayat tubuh korban gempa, hingga bau busuk tercium disana sini. (Mail Online-ruanghati.com)
Marak penjarahan di setiap sudut kota untuk bertahan hidup
Sesama warga berebut bantuan pangan karena kelaparan, sering rebutan ini disertai kekerasan
Bala bantuan pangan yang belum memadahi sangat dinantikan warga Haiti
Kondisi kota yang porak poranda dan bau busuk tercium menyengat di sana sini
Tempat penampungan pengunsi gempa sementara di sebuah lapangan di Haiti
Salah seorang korban gempa yang berhasil diselamatkan dari puing-puing reruntuhan bangunan
Masih banyak korban gempa di Haiti yang dalam keadaan kritis karena minimnya fasilitas pengobatan
barUsan gUe nGgak sEngaja gy liyat blogs [uchihajaka.blogspot.com] wOow uPdates banGet soaL News di amRik saNa **hohohoooo ^^ look this articel from [uchihajaka.blogspot.com] .......................................................................................................................................................................... Para pemakai kendaraan umum di Amerika menanggalkan celana dan rok mereka untuk merayakan hari 'tak bercelana dan rok' yang dimulai sejak 8 tahun lalu di kota New York.
Acara ini dimulai sejak 8 tahun lalu oleh komite di New York yang diikuti lebih dari 3000 orang di kota New York saja, dan diikuti oleh 3 kota besar lainnya.
Menurut para pemakai kendaraan umum ini, mereka mendapat ajakan untuk berpartisipasi di acara ini lewat ajakan teman-teman lewat telepon dan facebook.
barusan gUe nggak sengaja baCa blogs darii temen blogs "http://ritemail.blogspot.com/" di KASKUS gUe dapeet'nya . . and Finally gUe "TOTAL angRy" . . aSshoLe (soory kasaar) siLaahkan liyaat gambar dibawaah ini . .!! gUue nggak tegaa guys (tears)
Denmark is a big shame
warna air lau berubah menjadi merah bukan karena perubahan iklim tetapi...
Itu karena kekejaman bahwa manusia membunuh ratusan dan ikan cerdas yang terkenal Calderon lumba-lumba.
Hal ini terjadi setiap tahun di Feroe iLand di denmark. Dalam pembantaian ini peserta utama masih muda remaja. MENGAPA? Untuk menunjukkan bahwa mereka adalah orang dewasa dan dewasa .... BULLLLsiihttt
Dalam perayaan besar ini, tidak ada yang tidak berpartisipasi untuk bersenang-senang. Setiap orang yang berpartisipasi dalam salah satu cara atau yang lain, membunuh atau melihat kekejaman..
lumba-lumba dipotong menjadi beberapa bagian suara mereka seperti anak bayi yg baru lahir ketika diburu..
ini sangat menyedihkan..
gimana agan agan sekalian ayoo kita jaga bumi kita tanpa menyakiti makhluk hidup lain nya..
SET DEFAUL TO"Digunakan untuk membaca & menggunakan
tempat penyimpanan suatu form"
USE user"Digunakan untuk membaca tabel tertentu sekaligus
memberi nama lain agar dapat digunakan oleh event& baris
perintah lainnya"
SET ORDER TO TAG"Digunakan untuk membaca dan menggunakan
kunci pengurutan sekaligus kunci pencarian data berdasarkan
field index dalam tabel tertentu"
PUBLICBerfungsi untuk membuat variabel secara global.
FormActivate
Pada saat form login dijalankan maka, txtid dan txtpassword dalam keadaan bersih.
txtidLostfocus
Pada saat diinput txtid, pencarian data berdasarkan field id. Jika pencarian txtid, diambil dari tabel user dan field id. Kemudian txtid pada saat diinput warna tulisannya hitam. Kursor fokus di txtpassword, Maka txtid berubah warna menjadi hiaju muda. Akhir jika penuhi syarat yang diatas, akhir jika.
txtpasswordLostfocus
pencarian data berdasarkan field id. Jika pencarian txtid, diambil dari tabel user dan field id DAN txtpassword diambil dari tabel user dan field password. Kemudian txtpassword berubah warna menjadi hiaju muda. Timer1 tidak aktif, Maka Apabila data yang diinput salah maka akan muncul pesan. Akhir jika penuhi syarat yang diatas, akhir jika.
Timer1Timer
Buat variabel x
X itu adalah progressbar
Jika proses penginputan sudah benar dan x mencapai maksimal kemudian
Progressbar=1+progressbar itu sendiri
Maka
Muncul pesan
Timer1 tidak aktif
Keluar atau menutup jendela form
Langsung menuju form utama
Akhir jika
2.Buat Form_Datafilm dengan menggunakan Form Wizard yang
diambil dari table film
FormActivate
thisform.txtkode.Value=film.kd_film
thisform.txtnama.Value=film.nm_film
thisform.txtjenis.Value=film.jenis
thisform.txtharga.Value=film.harga
FormLoad
SET DEFAULT TO C:\PAGI\FOXPRO
USE film
SET ORDER TO tag kd_film
cmdaddclick
thisform.txtkode.Value=""
thisform.txtnama.Value=""
thisform.txtjenis.Value=""
thisform.txtharga.Value=0
thisform.Refresh
thisform.txtkode.SetFocus
cmdsaveclick
APPEND BLANK
replace kd_film with thisform.txtkode.Value
replace nm_film with thisform.txtnama.Value
replace jenis with thisform.txtjenis.Value
replace harga with thisform.txtharga.Value
thisform.Refresh
cmdcloseclick
thisform.Release
cmdbrowseclick
browse
cmdbrowseclick
x=MESSAGEBOX("yakin data akan dihapus?",36,"konfirmasi")
IF x=6
DELETE
PACK
ENDIF
GO top
thisform.txtkode.Value=film.kd_film
thisform.txtnama.Value=film.nm_film
thisform.txtjenis.Value=film.jenis
thisform.txtharga.Value=film.harga
thisform.Refresh
cmdtopclick
GO top
thisform.txtkode.Value=film.kd_film
thisform.txtnama.Value=film.nm_film
thisform.txtjenis.Value=film.jenis
thisform.txtharga.Value=film.harga
thisform.Refresh
cmdpreviewclick
SKIP -1
IF BOF()
MESSAGEBOX("sudah diawal record",16,"informasi")
GO top
ENDIF
thisform.txtkode.Value=film.kd_film
thisform.txtnama.Value=film.nm_film
thisform.txtjenis.Value=film.jenis
thisform.txtharga.Value=film.harga
thisform.Refresh
cmdpreviewclick
SKIP -1
IF BOF()
MESSAGEBOX("sudah diawal record",16,"informasi")
GO top
ENDIF
thisform.txtkode.Value=film.kd_film
thisform.txtnama.Value=film.nm_film
thisform.txtjenis.Value=film.jenis
thisform.txtharga.Value=film.harga
thisform.Refresh
cmdnextclick
SKIP 1
IF EOF()
MESSAGEBOX("sudah diakhir record",16,"informasi")
GO bottom
ENDIF
thisform.txtkode.Value=film.kd_film
thisform.txtnama.Value=film.nm_film
thisform.txtjenis.Value=film.jenis
thisform.txtharga.Value=film.harga
thisform.Refresh
cmdbottomclick
GO bottom
thisform.txtkode.Value=film.kd_film
thisform.txtnama.Value=film.nm_film
thisform.txtjenis.Value=film.jenis
thisform.txtharga.Value=film.harga
thisform.Refresh
cmdfindclick
SET ORDER TOtag kd_film
IF SEEK(alltrim(thisform.txtcari.Value))
thisform.txtkode.Value=film.kd_film
thisform.txtnama.Value=film.nm_film
thisform.txtjenis.Value=film.jenis
thisform.txtharga.Value=film.harga
ELSE
x=messagebox("tiak ada data",16,"warning")
IF x=1
thisform.txtcari.Value=""
thisform.txtcari.SetFocus
ENDIF
ENDIF
3.Buat tabel :
àBARANG
Field Name
Type
Width
Index
Kd_film
Character
6
↑(Primary/Ascending)
Nm_film
Character
35
Jenis
Character
10
Harga
Numeric
10
Isi Data Barang
àTRANSAKSI
Field Name
Type
Width
Index
No_struk
Character
6
↑(Primary/Ascending)
Tgl
Date
8
Kasir
Character
25
Ppn
Numeric
10
Total
Numeric
10
Grandtotal
Numeric
10
Bayar
Numeric
10
Kembali
Numeric
10
àRINCIAN
Field Name
Type
Width
Index
No_srtuk
Character
5
↑(Regular/Ascending)
Kd_film
Character
6
↑(Regular/Ascending)
Jml
Numeric
10
Subtotal
Numeric
10
àSEMENTARA
Field Name
Type
Width
Index
Kd_film
Character
6
Nm_film
Character
250
Jenis
Numeric
10
Harga
Numeric
10
Jml
Numeric
10
Subtotal
Numeric
10
Buat Form dengan nama = form_transaksi
PROPERTIES
Untuk Combobox kode film :
Name= cbo_kdfilm
Rowsource= film.kd_film,nm_film,jenis,harga
RowsourceType= 6 – Fields
Buat Method = Bersih, aktif,nonaktif, gridsementara
Situasi rusuh berlangsung saat ini di Haiti, penduduk banyak terlibat dalam penjarahan serta berebut bala bantuan makanan, hal ini bisa difahami, karena kondisi psikis mereka yang frustrasi dan lelah serta panik akibat bencana yang mereka alami. Namun pemandangan yang sungguh sadis tidak bisa dihindari ketika seorang penjarah tertangkap basah oleh warga. Tubuh penjarah diikat dan diseret dalam keadaan telanjang.
), klik tombol new lalu pilih menu.
