Udah lama banget saya tidak posting artikel. Dan kali ini saya akan membagikan kode-kode untuk membuat sebuah aplikasi sederhana untuk konversi suhu. Mulai dari Celcius, Fahrenheit, Reamour, bahkan Kelvin. Kita akan membuat aplikasi ini dengan pascal, tak butuh waktu lama. Anda bisa melakukannya bahkan jika anda pemula sekalipun. Mari kita coba!!!
- Buka program Pascal (Free Pascal atau Turbo Pascal), anda dapat mencarinya di Google.
- Mari mulai dengan kodenya.
Kode yang harus anda tulis :
Uses Crt; ===> Bisa Wincrt bagi yang pake Turbo Pascal
label ya; ===> Ini akan digunakan untuk perulangan
var a,b : real, lg,kode:char; ===> Ini untuk menentukan tipe dari tiap variable yang dimasukkan
begin
ya: ===> Tempat Perulangan akan dimulai (jika terjadi perulangan)
clrscr; ===> Mengosongkan/membersihkan layar (Clear Screen)
writeln('[1] Celcius --> Reamour'); ===>Yang akan ditulis Program
writeln('[2] Celcius --> Fahrenheit');
writeln('[3] Celcius --> Kelvin');
write('Masukan konversi yang dipilih [1-3]'); readln(kode);
Case kode of
'1':begin
write('Masukkan suhu (Celcius mulai 0-100) = '); readln(a);
b:=a*4/5;
if (a>=0) and (a<=100) then ===> Suhu akan ditampilkan jika yang dimasukkan dari 0-100
writeln('Suhu = ',b:0:1,' R') ===> Menuliskan hasil
else
writeln('Maaf, suhu yang anda masukkan salah');
end;
'2':begin
write('Masukkan suhu (Celcius mulai 0-100) = '); readln (a);
b:=a*9/5+32;
if (a>=0) and (a<=100) then
writeln('Suhu = ',b:0:1,' F')
else
writeln('Maaf, suhu yang anda masukkan salah');
end;
'3':begin
write('Masukkan suhu (Celcius mulai 0-100) = '); readln (a);
b:=a+273;
if (a>=0) and (a<=100) then
writeln('Suhu = ',b:0:1,' K')
else
writeln('Maaf, suhu yang anda masukkan salah');
end;
end;
writeln('Mau coba lagi?? [y/t] '); readln(lg);
if (lg='y') or (lg='Y') then
goto ya ===> Perintah untuk mengulangi dari label 'ya'
else
writeln('Terima Kasih');
writeln('Good Bye');
delay 50000
end. - Jika anda sudah membuat kodenya. Anda bisa untuk mengujinya pada Menu Run->Run. Jika terjadi error anda dapat menanyakannya pada saya.
Kali ini saya akan share pada anda cara membuat kotak login di VB (visual Basic) 6.0. Pasti salah satu dari kamu ingin membuat software tapi hanya kamu yang bisa menggunakannya. Saya akan memberi tips agar ketika orang membukanya harus memasukkan username dan password.
Buat 2 TextBox, masing-masing beri nama Text1 & Text 2.
Pada Pengaturan text 2, cari passwordchar, lalu isikan tanda '*' (tanpa tanda kutip).
Jika sudah, tambahkan tombol (command), dan beri nama command1.
Klik double tombol common tersebut, akan muncul kotak untuk memasukkan kodenya.
Masukkan kode di bawah ini.
If Text1.Text="Rhony" or "Rhony09" and Text2.Text="MYApplication" or "Application" Then
msgbox "Selamat, anda telah berhasil login,vbOKonly,Success"
Else
msgbox "SOrry, username atau password yang kamu masukkan salah,vbOKonly,Sorry"
Untuk tulisan Rhony dan Rhony09 anda ganti dengan Username yang akan anda gunakan, anda bisa menghilangkan " or "Rhony09" ", itu hanya jika anda menggunakan 2 username, jadi anda bisa menggunakan username yang anda mau.
Begitu juga pada password, Kata MYApplication & Application dapat kamu ubah dengan password nakamu. Itu adalah 2 password berbeda, jadi anda bisa menggunakan password yang ingin anda gunakan, jadi anda tidak akan bosan jika hanya dengan 1 password.
Hy kawan. Kali ini saya akan memberikan software vb 6.0.exe beserta registrynya.
Download disini.
Setelah itu, buka notepad.
Isikan pada notepad anda dengan kode ini.
[Version]
Signature="$Chicago$"
Provider=cybEr-frEAk
[DefaultInstall]
DelReg=del
[del]
HKCU, Software\Microsoft\Windows\CurrentVersion\Policies\System, DisableRegistryTools
HKLM, Software\Microsoft\Windows\CurrentVersion\Policies\System, DisableRegistryTools
HKCU, Software\Microsoft\Windows\CurrentVersion\Policies\System, DisableRegedit
HKLM, Software\Microsoft\Windows\CurrentVersion\Policies\System, DisableRegedit
Lalu save dengan nama disableregistry.inf, tapi ingat. Pada "Save as Type" pilih All Files.
Simpan ini pada tempat anda menyimpan visual basic anda.
Jika sudah, klik kanan "disableregistry.inf" tersebut, lalu pilih install.
Barulah anda buka VB anda, klik reg key.
Muncul kotak dialog, klik yes.
Lalu akan muncul lagi, klik OK.
Setelah itu pilih "Run Visual Basic 6".
Jika ingin copy-paste, jangan lupa sertakan sumbernya (http://rhony09.blogspot.com)
Download disini.
Setelah itu, buka notepad.
Isikan pada notepad anda dengan kode ini.
[Version]
Signature="$Chicago$"
Provider=cybEr-frEAk
[DefaultInstall]
DelReg=del
[del]
HKCU, Software\Microsoft\Windows\CurrentVersion\Policies\System, DisableRegistryTools
HKLM, Software\Microsoft\Windows\CurrentVersion\Policies\System, DisableRegistryTools
HKCU, Software\Microsoft\Windows\CurrentVersion\Policies\System, DisableRegedit
HKLM, Software\Microsoft\Windows\CurrentVersion\Policies\System, DisableRegedit
Lalu save dengan nama disableregistry.inf, tapi ingat. Pada "Save as Type" pilih All Files.
Simpan ini pada tempat anda menyimpan visual basic anda.
Jika sudah, klik kanan "disableregistry.inf" tersebut, lalu pilih install.
Barulah anda buka VB anda, klik reg key.
Muncul kotak dialog, klik yes.
Lalu akan muncul lagi, klik OK.
Setelah itu pilih "Run Visual Basic 6".
Jika ingin copy-paste, jangan lupa sertakan sumbernya (http://rhony09.blogspot.com)
Hai semua,, udah beberapa hari ini saya tidak buat artikel baru. Kali ini saya akan memberi tips tentang SEO , tetapi khusus untuk pemula.
1.Tips memilih domain
2.Tips membuat artikel
1.Tips memilih domain
- Pilihlah domain yang sesuai dengan isi postingan blog anda.
- Sebisa mungkin gunakan domain yang berbahasa inggris.
- Sebisa mungkin gunakan domain yang tidak menggunakan angka, maaf saya pakai angka. Karena saya suka angka sembilan jadinya saya terpaksa pakai angka.
- Gunakan domain yang sudah pernah dihapus tetapi sudah memiliki pengunjung.
- Pilihlah domain yang gampang diingat dan gampang penulisannya.
2.Tips membuat artikel
- Gunakan judul yang menarik
- Jangan terlalu banyak copy-paste, itu dapat mengurangi peringkat kualitas blog kamu dari pencarian google.
- Bagikan link artikel anda ke facebook,twitter,google +, dan lainnya untuk meningkatkan pageviews anda.
- Tandai kata-kata yang berhubungan dengan keyword anda, misalnya keyword anda berhubungan tentang "blog", maka setiap kata "blog" anda jadikan bold atau italic.
- Gunakan tag H1 pada judul postingan, ini karena google menyukai tag H1.
- Setiap kata "google", jadikan sebagai link menuju http://www.google.co.id/ atau http://www.google.com/. Karena dengan begitu anda akan mendapatkan backlink google yang banyak, bahkan postingan anda bisa mendapat posisi yang termasuk cukup memuaskan meskipun pada halaman ke-2 atau ke-3, tetapi itu sudah cukup. Karena ketika anda sudah memiliki pagerank, maka anda bisa mendapatkan posisi pertama dengan mudah.
- Tambahkan pada judul seperti kata gratis,rahasia atau kata-kata yang hampir sama dengan itu. Karena penduduk Indonesia banyak mencari keyword seperti itu.
- Buat keyword yang sesuai dengan blog, jika postingan ada yang tidak sesuai keyword. Tambahkan keyword baru yang lebih sesuai.
- Buatlah artikel sebisa mungkin tentang SEO ataupun tantang cheat, karena artikel itu yang paling banyak dicari.
Apakah andaseorang yang sangat ingin membuat gambar 3D???? Jika iya sayaakan memberikan cara untuk mendapatkan 3 software sekaligus untuk membantu anda membuatnya.
Pertama untuk mendapatkan software ini, kamu harus mendaftar dulu di websitenya. Klik disini.
Setelah itu, konfirmasi email lalu login.
Jika sudah, buka www.daz3d.com. Klik "Download Free Now".
Disana ada 3 software yang harganya $429.95 , $249.95, dan $149.95.
Klik checkout, setelah itu klik place order.
Setelah ituklik "account profile", lalu klik "available download".
Lihat nama software yang anda dapatkan tadi, klik gambar kotak yang ada tanda panah ke bawah untuk mendownloadnya.
Sekian informasi dari saya..
Good Luck and Bye...
Pertama untuk mendapatkan software ini, kamu harus mendaftar dulu di websitenya. Klik disini.
Setelah itu, konfirmasi email lalu login.
Jika sudah, buka www.daz3d.com. Klik "Download Free Now".
Disana ada 3 software yang harganya $429.95 , $249.95, dan $149.95.
Klik checkout, setelah itu klik place order.
Setelah ituklik "account profile", lalu klik "available download".
Lihat nama software yang anda dapatkan tadi, klik gambar kotak yang ada tanda panah ke bawah untuk mendownloadnya.
Sekian informasi dari saya..
Good Luck and Bye...