Monday, December 23, 2013

PENYELESAIAN SISTEM PERSAMAAN DENGAN CROUS : METODA NUMERIK

Advertisement
Assalamualaikum Wr. Wb

oke gayssss ketemu lagi dengan Mr. Galaw..

saya sekarang akan postingkan untuk penyelesaian sistem persamaan dengan teknik crous..

oke download saja nih disini : (Exel file)..
disana anda hanya mengganti persamaan awal, dan akan otomatis keluar hasilnya..
(jangan lupa pelajari yaaaa gayyysssssss... heheeh)

langkah download : setelah anda klik link nya, lalu klik di regular download, lalu download file, pada enter the following isikan (sesuaikan), lalu continue, terus download rfile..

oke sekian postingannya...
mohon maaf bila ada kesalahan..

Assalamualaikum Wr. Wb.

Monday, December 16, 2013

Program Aplikasi Pembayaran SPP dengan Pascal

Advertisement
Assalmualaikum Wr. Wb

Oke ketemu lagi dengan Mr. Galaw..
heheeh

postingan kali ini tentang program aplikasi pembayaran spp dengan pascal..
Oke tanpa basa basi, langsung saja ke pembahasan..
Hiwrigoooooooooooo... :D

Berikut yang harus disiapkan :
1. Tentu nya Sistem Operasi yang digunakan (hehehehe).
2. Turbo Pascal for Windows (pada SO Windows).

Oke ini listing program nya :

program pembayaranspp;
uses wincrt;
var
no:integer;
nama,tempat: string;
blan:string;
tgl:integer;
bln:integer;
thn:integer;
biaya,bayar,sisa:longint;
begin
write('Nomor         : ');readln(no);
write('Nama          : ');readln(nama);
write('Tempat Lahir  : ');readln(tempat);
write('Tanggal lahir : ');readln(tgl);
if (tgl<=31) then
begin
write('bulan lahir   : ');readln(bln);
end
else
begin
writeln('Inputan tidak terdeteksi');
readln;
donewincrt;
end;

if (bln<=12) then
begin
write('tahun lahir   : ');readln(thn);
end
else
begin
writeln('Inputan tidak terdeteksi');
readln;
donewincrt;
end;

if (thn<=1995) then
begin
write('Bayar spp bulan : ');readln(blan);
write('Besar biaya     : ');readln(biaya);
write('Bayar           : ');readln(bayar);
sisa:=bayar-biaya;
writeln('Sisa          : ',sisa);
end
else
writeln('Inputn tidak terdeteksi');                              
readln;
donewincrt;

end.


Berikut ini untuk Layout nya :

"Sisa" otomatis muncul (tidak di inputkan)...

Lihat pada Layout dibawah ini :

Jika inputan tanggal lahir melebihi batas tanggal, maka inputan tidak akan terdeteksi...
Begitupun jika menginputkan bulan lahir dan tahun lahir...

Oke sekian postingan dari saya...
Ma'af bila ada kesalahan.. (mungkin bnyak yaaaa..  hehe)...

Wassalamualaikum Wr. Wb

Tuesday, December 10, 2013

Aritmatika Pada Assembler

Advertisement
Assalamualaikum Wr. Wb




oke kali ini Mr. Galaw sharing tentang bahasa rakitan atau assembler..

disini akan menampilkan pada cmd tentang aritmatika perkalian,pembagian,dan penjumlahan..
dan listing di ketik pada notepad..

oke, ini coding untuk di notepad :

.MODEL SMALL
.CODE
ORG 100h
start :
jmp proses
a DW 35
b DW 12
c DW 2
d DW 5
Kal01 DB 'Bil A = $'
Kal02 DB 13,10,'Bil B = $'
Kal03 DB 13,10,'Bil C = $'
Kal04 DB 13,10,'Hasil Penjumlahan A+B = $'
Kal05 DB 13,10,'Hasil Pengurangan B-C = $'
Kal06 DB 13,10,'Hasil Perkalian A*C = $'
proses:
mov AH,09
mov DX,OFFSET Kal01
int 21h
mov AX, a
jmp show
bag1 :
mov AH,09
mov DX,OFFSET Kal02
int 21h
mov AX, b
jmp show
bag2 :
mov AH,09
mov DX,OFFSET Kal03
int 21h
mov AX, c
jmp show
bag3 :
mov AH,09
mov DX,OFFSET Kal04
int 21h
mov AX, a
ADD AX, b
jmp show
bag4 :
mov AH,09
mov DX,OFFSET Kal05
int 21h
mov AX, b
SUB AX, c
jmp show
bag5 :
mov AH,09
mov DX,OFFSET Kal06
int 21h
mov AX, a
MUL c
jmp show

show :
DEC d
mov BX,10
XOR CX,CX
putar :
XOR DX,DX
DIV BX
PUSH DX
INC CX
cmp AX,0
JNE putar
print :
pop DX
ADD DL,'0'
mov AH,02
int 21h
loop print

cmp d,4
je bag1
cmp d,3
je bag2
cmp d,2
je bag3
cmp d,1
je bag4
cmp d,0
je bag5
int 20h
END start

catatan : "jangan langsung di copy pasteu ke notepad"..

setelah itu save dengan format ".asm" . contoh : aritmatika.asm  (save pada folder debaging tasm yaaa)....

oke setelah begincuu tekan windows+r lalu ketik cmd dan enter..

contoh debaging tasm saya ada pada direktori C...

maka kita ketik "cd\" dan kita akan masuk di dir C, lalu ketik "cd tasm2" untuk masuk ke folder debaging tasm..(disini saya menggunakan tasm2)...

setelah itu ketik "tasm aritmatika" lalu enter..
lalu setelah tidak ada eror maka ketikan "tlink/t aritmatika"..
jika lancar jaya (hahahahha,) maka tinggal di ketikan saja "aritmatika"..
dan enter..

lihat hasilya...
"jeng jrengggggggg"

catatan : saat pemanggilan file pada cmd , nama file disesuaikan dengan yang anda save tadi..
hehehe

oke sekian dari saya..
mohon maaf bila banyak kesalahan..

Assalamualaikum Wr. Wb

Friday, December 6, 2013

Postingan blog kita akan terbaca saat pencarian di google

Advertisement
Assalamualaikum Wr. Wb.




Oke kali ini Mr. Galaw posting tentang "Bagaimana sih supaya postingan blog kita  dapat terbaca saat pencarian di google"

mungkin kalo kita ktik.. contoh : "Belajar java asyik".. tentunya di google susah ketemu, atau pun tidak ada karena yang terbaca ostingan orang lain (orang lain muluuuuuuu  .. :p)
oke pastinya postingan kita ingin muncul yang terdepan..

oke langsung saja hiwwrigoooooo..

langkah-langkah :
1. setelah anda posting, anda masuk ke url dari postingan tersebut.
2. copiyurl
3. masuk ke Webmaster Tools
4. isi URL dengan tadi di copy (berarti tinggal paste saja.. hehe)
5. lalu klik "Submit Request"

selesai dehhh...

Terimakasih, mohon ma.af jika ada kesalahan..

Wassalamualaikum Wr. Wb.

Thursday, December 5, 2013

Mengatasi internet download manager has been registered with a fake serial number

Advertisement
Assalamualaikum Wr. Wb




Oke kenalin saya Mr. Galaw.... Salam kenal...

Oke kita pastinya selalu mengalami masalah dikala kita menggunakan sebuah aplikasi..

seperti pada IDM seperti ada keluar pesan "internet download manager has been registered with a fake serial number"..
siap lah untuk meembetulkannya.. heheheh...
oke langsung saja tanpa basa basi kalu ngajak happy-happy (hahaha)..
hiwrigoooooooooooooo...

langkah-langkah :

1. tekan windows+r "untuk masuk ke Run"
2. ketikan regedit lalu enter
3. lalu kita masuk di regedit editor
4. pilih yang HKEY-LOCAL-MACHINE
5. lalu pilih SOFTWARE
6. pilih Internet Download Manager
7. dsini kita hapus "Email, FName, LName, dan Serial" (tingal di klik kanan lalu delete)

selesai...
pesan "internet download manager has been registered with a fake serial number" tidak adakn muncul lagi..
tapi ini akan menjadikan IDM nya menjadi tidak full fersion..
jika ingin full fersion, maka tiggal crack atau patch lagi aja (jangan khawatir) atau cari crak IDM terbaru...

Sekian dan terimakasih..
Mohon ma.af bila banyak kesalahan pada postingan..

Wassalamualaikum Wr. Wb

Cara Merubah Bahasa pada Blog (language)

Advertisement
Assalamualaikum Wr. Wb.



Oke postingan kali ini akan bahan hal yang kecil tapi bisa berdampak besar dan cukup binugn tentungnya, terutama bagi pemula...  (seperti sayaaaa.. hehehe)..

oke ini tentang merubah bahasa blog (language)..
langsung saja..
hiwrigoooooooo.......

Langkahnya :
1. Masuk ke sini ... http://blogger.com/language.g
2. Atur deh bahasa yang diinginkan
3. Lalu tinggal di "Save Settings"..

Oke ... terimakasih..
semoga bermanfaat..

Wassalamualaikum Wr. Wb.

Dynamic View Blogger (Tampilan Dinamis Blog)

Advertisement
Assalamualaikum Wr. Wb.


oke kita akan bahas Dynamic View Blogger sekaligus membuat tampilan blog anda menjadi menarik dan keren alias kece  (hahahehe) dengan Dynamic View Blogger..
langsung saja hiwrigoooooooooooo..



Blogger/Blogspot pada tahun 2011 memang telah menjanjikan banyak fitur baru Blogger yang sangat menarik dan menakjubkan. Salah satu fitur terbaru yang diperkenalkan adalah Dynamic View, tampilan dinamis dari Blog yang terdiri dari lima jenis, yaitu : Flipcard, Sidebar, Mosaic, Snapshot, dan Timeslide.
Dynamic View adalah tampilan dinamis Blogger/Blogspot yang memiliki banyak keunggulan navigasi serta appearance yang sangat menarik. Oleh sebab itu, menjadikan dynamic view sebagai tampilan utama blog Blogspot/Blogger anda akan menjadi hal yang menarik minat pengunjung.
Tampilan ini dapat menunjang fungsi navigasi dan memberi nuansa lain pada pengunjung blog, mirip sebuah daftar isi blog yang kaya akan fitur, navigasi, dan tampilan.
(pastinya kerennn abizzzzzzzz... :p)

berikut video untuk tampilan dinamis blog (dynamic view blogger) :

Syarat dan Cara Setting/Pengaturan untuk mengaktifkan fitur Blogger Dynamic View tersebut:
1. Blog harus dalam setting public/umum, yaitu diperbolehkan atau diijinkan untuk dilihat oleh semua orang tanpa harus login atau menjadi member terlebih dahulu.
2. Blog mempunyai feed yang secara penuh diaktifkan (fully enabled). (cek Setting > Site Feed >Allow Blog Feed: Full)
3. Setting Dynamic View tidak dinonaktifkan. (cek Setting > Formatting > Enable Dynamic Views)

Untuk membuat url dynamic view seperti contoh di atas:
Flipcard    : URLBLOGMU/view/flipcard
Mosaic     : URLBLOGMU/view/mosaic
Sidebar     : URLBLOGMU/view/sidebar
Snapshot  :  URLBLOGMU/view/snapshot
Timeslide : URLBLOGMU/view/timeslide

Ganti URLBLOGMU dengan url blog anda.
Contoh:
http://buka-rahasia.blogspot.com/view/flipcard
http://buka-rahasia.blogspot.com/view/mosaic
http://buka-rahasia.blogspot.com/view/sidebar
http://buka-rahasia.blogspot.com/view/snapshot
http://buka-rahasia.blogspot.com/view/timeslide

Oke, pertanyaannya.. Bagaimana mengubah dynamic view menjadi halaman utama blog?
oke langsung sajaaa.  hiwrigoooo.....
Pastikan sebelumnya telah mengaktifkan dynamic view blog. Kemudian, Gunakan redirecting melalui perintah di meta content.

Caranya?
1. Masuk ke Dashboard > Design/Rancangan > Edit HTML
2. Copy kode meta content berikut:
<meta content='1; url=http://url-blog-anda.blogspot.com/view' http-equiv='refresh'/>
Sebelumnya ganti http://url-blog-anda.blogspot.com dengan url blog anda. Angka 1 menunjukkan bahwa waktu refresh sebelum redirecting ke dynamic view adalah 1 detik, anda dapat menggantinya dengan angka yang lebih besar agar lebih lama lagi.
3. Paste kode meta content yang telah anda edit tersebut tepat di bawah <head> (cari dengan Ctrl+F).
4. Kemudian save atau bisa di-preview terlebih dahulu.

bisa juga..
Untuk menggunakan Dynamic Views pada blog, kunjungi tab Template. Pada template Designer, pilih salah satu model dari tujuh tampilan yang tersedia.
Sewaktu tulisan ini dibuat, Google belum mengizinkan pengaturan lebih lanjut seperti penggunaan widget/gadget pada blog. Jadi, tombol Customize dan Edit HTML pada Template Designer tidak berfungsi dengan maksimal.
Untuk mengembalikan ke tampilan blog sebelumnya tanpa Dynamic Views, cukup menggunakan fitur Backup/Restore.

CATATAN: Sebelum mengaktifkan Dynamic Views disarankan untuk melakukan backup terhadap template lama blog. Hal ini disebabkan segala modifikasi dan setting blog lama akan terhapus sewaktu Dynamic Views diaktifkan.

Wassalamualaikum Wr. Wb.

Monday, December 2, 2013

Program Pascal : membuat program sekolah

Advertisement
Assalamualaikum Wr. Wb

Oke kali ini belajar pemrograman pada Pascal..
langsung saja, Hiwrigoooooo...

kali ini merupakan program pascal "membuat program sekolah"..
disini diposkan untuk listing program, tampilan, juga flowchart..

yuk mulai dari yang pertama duluuuuu...

1. Listing program

program sekolah;
uses wincrt;
var
   pilihan : string;
   again : char;

procedure datasiswa;

var
   nama,jns,tempat,alamat,asalsekolah,tkelas : string;
   tgl,bln,thn:integer;
   nis:longint;

begin
     repeat
     clrscr;
     writeln('             Input Data Siswa');
     writeln('______________________________________________');
     writeln;
     write('NIS                  : ');readln(nis);
     write('Nama                 : ');readln(nama);
     write('Jenis Kelamin        : ');readln(jns);

     if (jns='Laki-Laki') or (jns='LAKI-LAKI') or (jns='PEREMPUAN')
     or (jns='laki-laki') or (jns='perempuan') or (jns='Perempuan')
     or (jns='pria') or (jns='Pria') or (jns='PRIA')
     or (jns='wanita') or (jns='Wanita') or (jns='WANITA') then
     begin
     write('Tempat Lahir         : ');readln(tempat);
     write('Tanggal Lahir (masukan angka)       : ');readln(tgl);

     case tgl of         
     1..31:begin
            write('Bulan Lahir (masukan angka)         : ');readln(bln);
            end;
     end;

     case bln of
     1..12:begin
            write('Tahun Lahir (4 dijit angka)         : ');readln(thn);
            end;
     end;

     case thn of
     1990..2000:begin
                write('Alamat               : ');readln(alamat);
                write('Asal Sekolah         : ');readln(asalsekolah);
                write('Kelas                : ');readln(tkelas);
                end;
     0..1989:writeln('Maaf inputan tidak diperkenankan');
     2001..3000:writeln('Maaf inputan tidak diperkenankan');
     end;
   
     end
     else
     writeln('Tidak Valid');
     writeln ('______________________________________________');
     writeln;
     writeln('R. Isi data kembali');
     writeln('K. Keluar dari program');
     writeln;
     write('Pilih : ');readln(again);

     if (again = 'K') or (again= 'k') then
        donewincrt
     else
     writeln('Keyword Tidak Valid');

     until again <> 'R';
    
end;

procedure data_guru;

var
   nm_guru, jk_guru, a_guru, mp_guru, kd_pel, no_guru : string;
   nip_guru : longint;

begin
     repeat
     clrscr;
     writeln('             Input Data Guru');
     writeln ('______________________________________________');
     write (' Masukan NIP guru       : '); readln (nip_guru);
     write (' Masukan nama guru      : '); readln (nm_guru);
     write (' Jenis kelamin          : '); readln (jk_guru);

     if (jk_guru='Laki-Laki') or (jk_guru='LAKI-LAKI') or (jk_guru='PEREMPUAN')
     or (jk_guru='laki-laki') or (jk_guru='perempuan') or (jk_guru='Perempuan')
     or (jk_guru='pria') or (jk_guru='Pria') or (jk_guru='PRIA')
     or (jk_guru='wanita') or (jk_guru='Wanita') or (jk_guru='WANITA') then
     begin
     write (' Alamat guru            : '); readln (a_guru);
     write (' Nomor telepon guru     : '); readln (no_guru);
     write (' Masukan kode pelajaran : '); readln (kd_pel);

     if kd_pel = 'PEL001' then
        mp_guru := 'Matematika'
     else
     if kd_pel = 'PEL002' then
        mp_guru := 'Bahasa Indonesia'
     else
     if kd_pel = 'PEL003' then
        mp_guru := 'Bahasa Inggris'
     else
     if kd_pel = 'PEL004' then
        mp_guru := 'IPA'
     else
     if kd_pel = 'PEL005' then
        mp_guru := 'IPS'
     else
     if kd_pel = 'PEL006' then
        mp_guru := 'PAI'
     else
     if kd_pel = 'PEL007' then
        mp_guru := 'PKn'
     else
         mp_guru := 'Kode Tidak Valid';
    
     writeln (' Mata pelajaran         : ',mp_guru);
     end
     else
     writeln('Tidak Valid');
     writeln ('______________________________________________');
     writeln('R. Isi data kembali');
     writeln('K. Keluar dari program');
     writeln;
     write('Pilih : ');readln(again);

     if (again = 'K') or (again= 'k') then
        donewincrt
     else
     writeln('Keyword Tidak Valid');

     until again <> 'R';

end;

procedure nilai;

var
   nm,grade : string;
   npm:longint;
   khdrn,uts,uas,tgs,jml_nil : real;
   a,n : integer;

begin
     repeat
     clrscr;
     writeln('             Input Nilai Siswa');
     writeln ('______________________________________________');
     write('NPM            : ');readln(npm);
     write('NAMA           : ');readln(nm);
     write('Nilai Kehadiran (batas min nilai = 0, batasan max nilai = 100) : ');readln(khdrn);
     write('Nilai Tugas (batas min nilai = 0, batasan max nilai = 100) : ');readln(tgs);
     write('Nilai UTS (batas min nilai = 0, batasan max nilai = 100) : ');readln(uts);
     write('Nilai UAS  (batas min nilai = 0, batasan max nilai = 100) : ');readln(uas);
     jml_nil:=(khdrn+tgs+uts+uas)/4;
     writeln('Nilai rata-rata: ',jml_nil:0:0);
  
     if jml_nil >= 90 then
        grade:='A'
     else
     if jml_nil > 80 then
        grade:='B'
     else
     if jml_nil > 60 then
        grade:='C'
     else
     if jml_nil > 50 then
        grade:='D'
     else
        grade:='E';

     writeln('Grade          : ',grade);
     writeln ('______________________________________________');
     writeln;
     writeln('R. Isi data kembali');
     writeln('K. Keluar dari program');
     writeln;
     write('Pilih : ');readln(again);

     if (again = 'K') or (again= 'k') then
        donewincrt
     else
     writeln('Keyword Tidak Valid');

     until again <> 'R';


end;

begin
     clrscr;
     writeln('SMK Plus YSB PP. Suryalaya');
     writeln('__________________________');
     writeln;
     writeln;
     writeln('           MENU');
     writeln('+*+*+*+*+*+*+*+*+*+*+*+*+*+');
     writeln;
     writeln('A. Data Siswa');
     writeln('B. Data Guru');
     writeln('C. Data Nilai Siswa');
     writeln('K. Keluar');
     writeln('+*+*+*+*+*+*+*+*+*+*+*+*+*+');
     writeln;
     write('Pilih Menu : ');readln(pilihan);

     if (pilihan='A') or (pilihan='a') then
        datasiswa
     else
     if (pilihan='B') or (pilihan='b') then
        data_guru
     else
     if (pilihan='C') or (pilihan='c') then
        nilai
     else
     if (pilihan='K') or (pilihan='k') then
        donewincrt;

end.


2. berikut tampilannya




3. Flowchart








Oke Ceman-ceman sekian dulu..
cumungut terus belajarnya eaaaaaaaaaaaaaaaaaaaaa...

Semoga bermanfaat..
isi komentar apabila tidak ada yang dimengerti..

Wassalamualaikum Wr. Wb

DESAIN WEB : Membuat Tabel

Advertisement
Assalamualaikum Wr. Wb

kali ini saya akan share bagaimana cara membuat tabel..
tidak hanya itu, disini  juga dapat menambahkan foto dan juga memberi warna..

berikut coding html nya..

<HTML>
<HEAD>
<TITLE>MEMBUAT TABEL</TITLE>
</HEAD>
<BODY BGCOLOR="CYAN">MENU MAKANAN IRFAN RESTO <BR></BR>
<TABLE BORDER="4" WIDTH="500" CELLPADDING="6">
<TR>
    <TD COLSPAN = "2" BGCOLOR="RED">DAFTAR MAKANAN</TD>
    <TD BGCOLOR="BROWN">HARGA</TD>
    <TD ROWSPAN = "4"><MARQUEE><IMG SRC="FANS.JPG" WIDTH="200"></MARQUEE></TD>
</TR>
<TR>
    <TD>1.</TD>
    <TD>NASI LIWET</TD>
    <TD>25000</TD>
</TR>
<TR>
    <TD>2.</TD>
    <TD>JUS MELON</TD>
    <TD>5000</TD>
</TR>
<TR>
    <TD COLSPAN ="2"  BGCOLOR = "GREEN">TOTAL</TD>
    <TD>30000</TD>
</TR>
</TABLE>
</BODY>
</HTML>

Berikut tampilannya...



Sekian post desain web saya.. Cumungut belajar terus eaaaaaaaaaa.. :D
Semoga bermanfaat

Wassalamualaikum Wr. Wb