Monday, September 20, 2010 14:19 PM

Malaysia police probe alleged Indonesia maid abuse



Malaysian police investigated a couple Monday for allegedly raping, beating and scalding their Indonesian maid in the latest such case that could strain ties between the neighboring countries.

Indonesia banned maids from going to Malaysia last year amid an outcry over a series of abuse cases by Malaysian employers. The two countries are still negotiating to ensure better protection for some 230,000 Indonesians who work as maids in Malaysia.

The 26-year-old maid from Sumatra was found wandering around a neighborhood in northern Penang state early last week and was hospitalized with "severe injuries," said Indonesian Embassy official Widyarka Ryananta.

The woman claimed her male employer sexually abused her since May, while his wife beat her when she refused, said Ryananta, who visited her in the hospital Sunday. The woman was also allegedly beaten with a belt, and her back scalded with boiling water and her breasts with a hot iron, he said.

Penang police chief Ayub Yaakob said the employers have been in custody since Friday and were being investigated for rape, causing grievous injuries and human trafficking. Rape is punishable by up to 20 years in jail and caning, and trafficking with another 20 years.

The maid started to work for the family in February before they abandoned her, dropping her off in the neighborhood where she was found last week. It is unclear when she came to Malaysia, Ryananta said.

"We are disappointed that these cases (occur) again and again," she said. "The two countries now are aware that they have to protect the maids."

Indonesians account for the majority of Malaysia's foreign domestic workers. Indonesian officials say hundreds complain every year of mistreatment, overwork and unpaid salaries.

In July, a sugar cane juice seller was sentenced to death for murdering his Indonesian maid - a rare conviction. The maid died last October after police found her beaten, starved and locked in a bathroom in her employer's home.













Senin, 20 Sep 2010 14:19 PM

polisi menyelidiki dugaan penyalahgunaan Malaysia pembantu Indonesia



diselidiki polisi Malaysia beberapa hari Senin atas tuduhan memperkosa, memukul dan panas pembantu Indonesia mereka dalam kasus seperti terbaru yang bisa strain hubungan antara negara-negara tetangga.

Indonesia dilarang pembantu pergi ke Malaysia tahun lalu di tengah protes atas serangkaian kasus penyalahgunaan oleh majikan Malaysia. Kedua negara masih melakukan negosiasi untuk memastikan perlindungan yang lebih baik untuk beberapa 230.000 orang Indonesia yang bekerja sebagai pembantu di Malaysia.

Pembantu 26 tahun dari Sumatera ditemukan berkeliaran di sebuah lingkungan di negara utara minggu lalu Penang awal dan dirawat di rumah sakit dengan "luka berat," kata pejabat Kedutaan Besar Indonesia Widyarka Ryananta.

Wanita itu menyatakan majikan laki-lakinya seksual menyiksanya sejak Mei, sementara istrinya memukul dia ketika dia menolak, kata Ryananta, yang mengunjunginya di rumah sakit hari Minggu. Wanita itu juga diduga dipukuli dengan ikat pinggang, dan punggungnya tersiram air panas dengan air mendidih dan payudaranya dengan besi panas, katanya.

Kepala Kepolisian Penang Ayub Yaakob mengatakan majikan telah ditahan sejak Jumat dan sedang diselidiki untuk pemerkosaan, menyebabkan luka pedih dan perdagangan manusia. Perkosaan diancam dengan hukuman sampai 20 tahun penjara dan merotan, dan perdagangan dengan yang lain 20 tahun.

Pelayan itu mulai bekerja untuk keluarga pada bulan Februari sebelum mereka ditinggalkan, menjatuhkan liburnya di lingkungan tempat dia ditemukan minggu lalu. Tidak jelas ketika ia datang ke Malaysia, Ryananta kata.

"Kami kecewa bahwa kasus-kasus ini (terjadi) lagi dan lagi," katanya. "Kedua negara sekarang menyadari bahwa mereka harus melindungi pelayan."

Indonesia menjelaskan sebagian besar pekerja asing Malaysia dalam negeri. pejabat Indonesia mengatakan ratusan mengeluh setiap tahun penganiayaan, terlalu banyak pekerjaan dan gaji yang belum dibayar.

Pada bulan Juli, gula penjual sari tebu dijatuhi hukuman mati karena membunuh pembantu Indonesia nya - sebuah keyakinan langka. Pelayan itu meninggal Oktober lalu setelah polisi menemukan dia dipukuli, kelaparan dan mengunci di kamar mandi dalam rumah majikannya.

Ziarah Sunan Muria


Minggu, 15 Maret 2009


Hari ini kita rencana mau ziarah ke Makam Sunan Muria. Letak Makam Sunan Muria adalah di Kabupaten Kudus tepatnya sebelah utara kota Kudus tepatnya Desa Colo Kecamatan Dawe Kabupaten Kudus, kurang lebih 20 km dari kota Kudus. Berdasarkan data kurang lebih ada sekitar 15.000 peziarah tiap hari yang berziarah ke komplek Makam Sunan Muria (Hidayat dan Kristianto,2001)

Pagi pukul 07.00 Wib..aku berangkat bersama teman - temanku. menggunakan bus pariwisata

Juana Kota Kudus kita tempuh kurang lebih 45 menit (30 km) sampai alun-alun.


Tiket masuk wiata ini per orang Rp1500,00 dan kendaraan roda 2 Rp 2000,00.Kita Punya 2 jalur kalau kita mau masuk ke makam Sunan Muria ini (karena letak Makam Sunan Muria ini berada di Puncak Bukit, yaitu:

kami memilih berjalan kaki yang panjangnya 1km
Dan disamping kiri kanan jalan ini banyak penjual (baik pakaian, makanan, souvenir dan lain-lain). Jadi walau terlihat tinggi letak makam ini kita tidak terasa cape.Disamping banyak sekali para peziarah yang datang.
Jalur naik Ojek Motor
Bila Kita tidak ingin berjalan kaki menuju makam dapat menggunakan jasa tukang ojek ini. Dimana banyak sekali jasa ojek yang ada. Tariff naik Ijek ini sendiri Rp 7.000,00 per orang.Kita akan diantar sampe pemberhentian terakhir sebelum masuk komplek makam.

lalu kami pergi ke air terjun monthel yang tiket masuknya seharga 5000 dan kami pergi berenang disana, air disana sangat dingin.

setelah kita semua lelah akhirnya kami memutuskan untuk pulang pada pukul 17.00 wib











Today we want to plan a pilgrimage to the tomb of Sunan Muria. Location of the Tomb of Sunan Muria is in the district north of the Holy Ghost rather precisely Village District Colo Dawe Holy District, approximately 20 km from the Holy city. Based on existing data approximately around 15,000 pilgrims every day of the pilgrimage to the tomb complex of Sunan Muria (Hidayat and Kristianto, 2001)

Morning at 7:00 pm .. I went with a friend - my friend. use the tourist buses

Juana our Holy City takes about 45 minutes (30 km) to the square.


Entrance fee is per person wiata Rp1500, two-wheeled vehicles in 2000 and USD 2000.00. We Got two lines if we want to get into the tomb of Sunan Muria was (because the location of this tomb of Sunan Muria was in Peak Hill, namely:

we chose to walk the length of 1km
And right beside this street left many sellers (whether clothing, food, souvenirs, etc.). So even though a high visible location of this tomb we do not feel cape.Disamping lot of pilgrims who come.
Line Motor Motorcycle taxi ride
If we do not want to walk toward the tomb can use this motorcycle taxi service. Where a lot of existing motorbike taxi. This tariff increase Ijek own USD 7000.00 per orang.Kita will be taken until the last stop before entering the tomb complex.

then we went to the waterfall monthel the entrance ticket for 5000 and we went swimming there, the water is very cold there.

we are all tired after we finally decided to go home at 17:00 pm

Google Translate for my:Searches
Videos
Email
Phone
Chat
Business
About Google TranslateTurn off instant translationPrivacyHelp

Tutorial Membuat Robot Cerdas
28 Mei 2008 in elektro | Tags: elektro, elektronika, krci, kri, kri-krci, robot, robot cerdas

Tim yang masuk final Kontes Robot Indonesia (KRI) dan Kontes Robot Cerdas Indonesia (KRCI) 2008 secara resmi diumumkan hari ini (lihat di: Pengumuman Final KRI/KRCI 2008). Dua puluh empat (24) tim berhak bertarung dalam lomba robot panjat pinang (KRI) dan 37 tim robot bertarung dalam kontes robot cerdas pemadam api (KRCI). Bagaimana cara membuat robot-robot itu agar bisa hebat & cerdas? Dalam tutorial ini akan dijelaskan langkah-langkah membuat robot cerdas, baik KRI/KRCI.
Tahap-tahap pembuatan robot
Secara garis besar, tahapan pembuatan robot dapat dilihat pada gambar berikut:



Ada tiga tahapan pembuatan robot, yaitu:

1.Perencanaan, meliputi: pemilihan hardware dan design.
2.Pembuatan, meliputi pembuatan mekanik, elektonik, dan program.
3.Uji coba.
1. Tahap perencanan
Dalam tahap ini, kita merencanakan apa yang akan kita buat, sederhananya, kita mau membuat robot yang seperti apa? berguna untuk apa? Hal yang perlu ditentukan dalam tahap ini:

•Dimensi, yaitu panjang, lebar, tinggi, dan perkiraan berat dari robot. Robot KRI berukuran tinggi sektar 1m, sedangkan tinggi robot KRCI sekitar 25 cm.
•Struktur material, apakah dari alumunium, besi, kayu, plastik, dan sebagainya.
•Cara kerja robot, berisi bagian-bagian robot dan fungsi dari bagian-bagian itu. Misalnya lengan, konveyor, lift, power supply.
•Sensor-sensor apa yang akan dipakai robot.
•Mekanisme, bagaimana sistem mekanik agar robot dapat menyelesaikan tugas.
•Metode pengontrolan, yaitu bagaimana robot dapat dikontrol dan digerakkan, mikroprosesor yanga digunakan, dan blok diagram sistem.
•Strategi untuk memenangkan pertandingan, jika memang robot itu akan diikutkan lomba/kontes robot Indonesia/Internasional.
2. Tahap pembuatan
Ada tiga perkerjaan yang harus dilakukan dalam tahap ini, yaitu pembuatan mekanik, elektronik, dan programming. Masing-masing membutuhkan orang dengan spesialisasi yang berbeda-beda, yaitu:

•Spesialis Mekanik, bidang ilmu yang cocok adalah teknik mesin dan teknik industri.
•Spesialis Elektronika, bidang ilmu yang cocok adalah teknik elektro.
•Spesialis Programming, bidang ilmu yang cocok adalah teknik informatika.
Jadi dalam sebuah tim robot, harus ada personil-personil yang memiliki kemampuan tertentu yang saling mengisi. Hal ini diperlukan dalam membentuk Tim Kontes Robot Indonesia (KRI) atau Kontes Robot Cerdas Indonesia (KRCI). Bidang ilmu yang saya sebutkan tadi, tidak harus diisi mahasiswa/alumni jurusan atau program studi tersebut, misalnya boleh saja mahasiswa jurusan teknik mesin belajar pemrograman.

Untuk mengikuti lomba KRI/KRCI dibutuhkan sebuah tim yang solid. Tetapi buat Anda yang tertarik membuat robot karena hobby atau ingin belajar, semua bisa dilakukan sendiri, karena Anda tidak terikat dengan waktu atau deadline. Jadi Anda bisa melakukannya dengan lebih santai.

Pembuatan mekanik

Setelah gambaran garis besar bentuk robot dirancang, maka rangka dapat mulai dibuat. Umumnya rangka robot KRI terbuat dari alumunium kotak atau alumunium siku. Satu ruas rangka terhubung satu sama lain dengan keling alumunium. Keling adalah semacam paku alumunium yang berguna untuk menempelkan lembaran logam dengan erat. Rangka robot KRCI lebih variatif, bisa terbuat dari plastik atau besi panjang seperti jeruji.

Pembuatan sistem elektronika

Bagian sistem elektronika dirancang sesuai dengan fungsi yang diinginkan. Misalnya untuk menggerakkan motor DC diperlukan h-brigde, sedangkan untuk menggerakkan relay diperlukan saklar transistor. Sensor-sensor yang akan digunakan dipelajari dan dipahami cara kerjanya, misalnya:

1.Sensor jarak, bisa menggunakan SRF04, GP2D12, atau merakit sendiri modul sensor ultrasonik atau inframerah.
2.Sensor arah, bisa menggunakan sensor kompas CMPS03 atau Dinsmore.
3.Sensor suhu, bisa menggunakan LM35 atau sensor yang lain.
4.Sensor nyala api/panas, bisa menggunakan UVTron atau Thermopile.
5.Sensor line follower / line detector, bisa menggunakan led & photo transistor.
Berikut ini gambar sensor ultrasonik, inframerah, UVTron, dan kompas:



Pembuatan sistem elektronika ini meliputi tiga tahap:

•Design PCB, misalnya dengan program Altium DXP.
•Pencetakan PCB, bisa dengan Proboard.
•Perakitan dan pengujian rangkaian elektronika.

Pembuatan Software/Program

Pembuatan software dilakukan setelah alat siap untuk diuji. Software ini ditanamkan (didownload) pada mikrokontroler sehingga robot dapat berfungsi sesuai dengan yang diharapkan.



Tahap pembuatan program ini meliputi:

1.Perancangan Algoritma atau alur program
Untuk fungsi yang sederhana, algoritma dapat dibuat langsung pada saat menulis program. Untuk fungsi yang kompleks, algoritma dibuat dengan menggunakan flow chart.
2.Penulisan Program
Penulisan program dalam Bahasa C, Assembly, Basic, atau Bahasa yang paling dikuasai.
3.Compile dan download, yaitu mentransfer program yang kita tulis kepada robot.
3. Uji coba
Setelah kita mendownload program ke mikrokontroler (otak robot) berarti kita siap melakukan tahapan terakhir dalam membuat robot, yaitu uji coba. Untuk KRCI, ujicoba dilakukan pada arena seluas sekitar 4×4 meter dan berbentuk seperti puzzle. Dalam arena KRCI ini diletakkan lilin-lilin yang harus dipadamkan oleh robot cerdas pemadam api. Contoh gambar robot pemadam api Ted Larsorn dan arena Kontes Robot Cerdas Indonesia (KRCI).



Untuk lomba robot KRI, dibutuhkan ruangan yang lebih besar, yaitu sekitar 15×15 meter. Dalam Kontes Robot Indonesia (KRI) 2008, masing-masing robot harus meraih target (bola/kubus) yang diletakkan di tempat yang tinggi, jadi sebuah robot harus bisa naik di atas robot yang lain untuk meraih target tersebut (seperti panjat pinang).



Final Kontes Robot Indonesia (KRI) dan Kontes Robot Cerdas Indonesia (KRCI) sudah diadakan tanggal 14-15 Juni 2008 di Balairung UI Depok.

How do I "hide" Excel?
faq707-1572
Posted: 4 Mar 02 (Edited 5 Mar 02)

Upon running a macro in Excel that opens a UserForm, you are presented with the form, but all the toolbars, scrollbars, gridlines and other unsightly things are still visible in the background. This will show you how to hide and reset all those things, input a background image and generally make your project more presentable. Let's roll!

'Paste this code in the main module. Sub_Start() is the procedure that is run upon clicking the button in Excel, and displays the UserForm.


Option Explicit

Sub Start()
ClearAll
FormInterface.Show
Unload FormInterface
End Sub

Sub ClearAll()
Application.ScreenUpdating = False
ClearWorkSheet
ClearActiveWindow
ClearApplicationControls
Application.ScreenUpdating = True
End Sub

Sub ResetAll()
Application.ScreenUpdating = False
ResetWorkSheet
ResetActiveWindow
ResetApplicationControls
Application.ScreenUpdating = True
End Sub

Sub ClearWorkSheet()
With ActiveWindow
.DisplayGridlines = False
.DisplayHeadings = False
.WindowState = xlMaximized
' xlMaximized or xlNormal
End With

'If you want a background image behind your UserForm, put it in here. This one is just an example. Otherwise you will have a blank white background.
ActiveSheet.SetBackgroundPicture ("C:\My Documents\My Pictures\Yosemite.jpg")
End Sub

Sub ResetWorkSheet()
With ActiveWindow
.DisplayGridlines = True
.DisplayHeadings = True
.WindowState = xlMaximized
' xlMaximized or xlNormal
End With

ActiveSheet.SetBackgroundPicture ("")
End Sub

Sub ClearActiveWindow()
With ActiveWindow
.DisplayHorizontalScrollBar = False
.DisplayVerticalScrollBar = False
.DisplayWorkbookTabs = False
End With


' Application.DisplayScrollBars = False
' Turns scrollbars off for all workbooks
End Sub

Sub ResetActiveWindow()
' Resets the scrollbars for all workbooks
With ActiveWindow
.DisplayHorizontalScrollBar = True
.DisplayVerticalScrollBar = True
.DisplayWorkbookTabs = True
End With
End Sub

Sub ClearApplicationControls()
Dim OneBar As CommandBar

' First the normal screen
With Application
.DisplayFullScreen = False
.DisplayFormulaBar = False
.DisplayStatusBar = False
End With

' Hide all Command Bars
On Error Resume Next
For Each OneBar In CommandBars
OneBar.Visible = False
Next
On Error GoTo 0

' Now viewing full screen
With Application
.DisplayFullScreen = True
.DisplayFormulaBar = False
.DisplayStatusBar = False
End With

' Hide all Command Bars
On Error Resume Next
For Each OneBar In CommandBars
OneBar.Visible = False
Next
On Error GoTo 0

' Disable the Menu Bar only required once
CommandBars("Worksheet Menu Bar").Enabled = False
End Sub

Sub ResetApplicationControls()
' First viewing full screen
With Application
.DisplayFullScreen = True
.DisplayFormulaBar = True
.DisplayStatusBar = True
End With

' Turn on main CommandBars
CommandBars("Standard").Visible = True
CommandBars("Formatting").Visible = True

' Now the normal screen
With Application
.DisplayFullScreen = False
.DisplayFormulaBar = True
.DisplayStatusBar = True
End With

' Turn on main CommandBars
CommandBars("Standard").Visible = True
CommandBars("Formatting").Visible = True

' Re-enable the Menu Bar
CommandBars("Worksheet Menu Bar").Enabled = True
End Sub


Okay, you'll notice that only ClearAll is run. To reset Excel, paste this code in the button that exits your UserForm and returns you to Excel (Or exits the UserForm and saves then exits Excel.)

Uncomment the ThisWorkbook.Save and Application.Quit if you want Excel to save and close down upon exiting the UserForm, also paste the code below ** to open the UserForm while Excel opens. This way though, the user cannot access the workbooks. You may wish to have a password form that takes you to the workbooks, so only the user who knows the password can access the workbook. Leave them commented for testing.

Private Sub BtnExit_Click()
' Runs procedures that reset Excel toolbars and exit the interface.
' Also saves the workbook and exits Excel completely.
Me.Hide
ResetAll
'ThisWorkbook.Save
'Application.Quit
End Sub


**Paste this code in ThisWorkbook in the Project Window. It will open the UserForm when Excel opens. Read the note above to find out more.

Option Explicit

Private Sub Workbook_Open()
Start
End Sub


Now we need to disable the QueryClose button (the little X in the top right corner of the window) so that the user can't close the form. This is vital to do, because only upon clicking the Exit button is Excel reset with all it's formula bars, toolbars and whatnot. It won't remove the button, but will disable it.

In the UserForm with that Exit button, paste this code...

Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
If Cancel <> 1 Then
Cancel = 1
End If
End Sub


Okay, remember I said about a password form? Dead simple. Have an extra button by the Exit button, let's call it Close. This button displays another UserForm with a textbox (let's call it TextWord) and 2 buttons. One button is a cancel button (obvious), and the other is the Enter button. Upon clicking Enter button, it checks if the word entered in TextWord is correct, if it is, you go to the workbook. If not, you get some sort of boolean error message.

Private Sub TextWord_Change()
PasswordChar = "*"
End Sub

Private Sub ButtonEnter_Click()
If TextWord = "YOURPASSWORD" Then
Me.Hide
ResetAll
Else MsgBox "Incorrect password", vbInformation, "Error"
End If
End Sub

Private Sub ButtonCancel_Click()
Me.Hide
UserForm.Show
End Sub

'UserForm.Show is the name of the Userform that you will return to if Cancel is pressed.
'YOURPASSWORD is whatever password you want. Capitalisation to be remembered.
'PasswordChar = "*" sets whatever text is entered into TextWord into *'s.
'It's important to have ResetAll if the password is correct, now you can go to Excel and play around with the worksheet, which is now resetted.

Well, hope that helps any of you. I'm not entirely sure what "Option Explicit" is, but I was always taught to put it at the top of every bit of code. Apparantley it "forces explicit declaration of variables" whatever that means.

--------------------------------------------------------------

Excel VBA Basic bag 2 (Record Macro)

Programer tidak harus pinter ngetik, cara praktis belajar & membuat program VBA di excel. Gunakan fasilitas yang ada pada excel yaitu merekam pekerjaan kita yang berulang ulang dengan Record Macro, yang nantinya dipakai untuk mengulang pekerjaan kita hanya dengan menjalankan macro tersebut.

Langkah langkah dalam merecord macro

* Buka excel Anda, sebaiknya workbook tersebut langsung diberi nana dan disimpan (Contoh dibawah kami beri nana VBA-Record-Macro)
* Pada menu pilih Tool->Macro->Record New Macro... (Gambar 01)
* Sehingga akan tampil jendela seperti Gambar 02

Record macro di Excel

Gambar 01

* Untuk kali ini kami sarankan tempat penyimpanan macro adalah di This Woekbook (File Excel yang baru dibuat tadi)

Record macro di Excel

Gambar 02

* Setelan tombol Ok ditekan, makan akan muncul Toolbar "Stop Recording" (Gambar 03)
Pada step ini operasi di excel sudah mulai direcord
* Pilih cell dengan range C4:D5, lalu beri warna "Light Blue"


Record macro di Excel

Gambar 03

* Setelah selesai memberi warna, tekan tombol Stop Recording pada Toolbar "Stop Recording" (Gambar 04)


Record macro di Excel

Gambar 04

* Pekerjaan selesai, macro sudah tersimpan, untuk melihat hasil dalam VBA
Dari menu pilih Tools->Macro->Visual Basic Editor
* Hasil seperti Gambar 05
* Sebelum testing macro, cell yang kita warnai tadi ganti dengan warna lain atau hilangkan warna
* Untuk testing hasil recording, kembali ke excel workbook dari menu pilih Tool->Macro->Macro...
* Jalankan macro yang yang Anda record tadi, hasilnya cell C4:D5 akan diwarnai kembali ke warna Light Blue

1
2
3
4
5
6
7
8
9
10
11



Sub Macro1()
'
' Macro1 Macro
' Macro recorded 5/21/2009 by Sapto Hartoko
'
Range("C4:D5").Select
With Selection.Interior
.ColorIndex = 41
.Pattern = xlSolid
End With
End Sub


Record macro di Excel

1. Dibawah ini yang merupakan label kecuali....
a. Perintah GO TO harus diikuti nama label yang dituju
b. Label harus dideklarasikan dahulu pada bagian dektarasi
c. Data yang digunakan harus diperkenalkan tipe nya
d. GO TO adalah perintah untuk ke sesuatu statement baru
2. Yang digunakan untuk format tampilan nilai numberic bulat dengan lebar n rata sebelah kanan adalah.....
a. Parameter integar
b. Parameter boolen
c. Parameter char
d. Parameter string
3. Suatu statement IF yang berada dalam lingkungan statement IF yang lain adalah.....
a. Struktur If Then
b. Struktur If...Then...Else
c. Struktur If tersarang
d. Statement Case of - Else