jenis jenis register dan judul nya

Mikroprosesor 8086/8088 memiliki 4 register yang masing-masingnya terdiri dari 16 bit, ditambah 9 register flag. Tiga set yang menyediakan tempat register adalah General Purpose Register, Pointer dan Index Register, dan Segment Register. 4 Jenis kelompok register tersebut sebagai berikut:

1. General Purpose Register

2. Pointer dan Index Register

3. Register Segment

4. Flag Register

1.        General Purpose Register

• Accumulator Register AX

Fungsi: Sebagai akumulator dan berhubungan dengan jenis-jenis operasi khusus seperti Aritmetika, In/Out, Shift,Logic, Rotate, dan operasi desimal berkode biner.

• Base Register BX

Fungsi: Sebagai register base untuk mereferensi alamat memori. Operasi yang dapat dilakukan adalah Rotate, Logic, Shift, dan Aritmetika.

• Counter Register CX

Fungsi: Sebagai pencacah implisit dengan instruksi tertentu, misalnya terhadap perintah Loop dan operasi string. Counter naik jika direction flag bernilai 0, dan counter turun jika direction flag bernilai 1.

• Data Register DX

Fungsi: Menyimpan alamat port I/O selama operasi I/O tertentu, baik alamat port 8 bit maupun 16 bit. Digunakan juga dalam operasi perkalian dan pembagian.

2.      Pointer dan Index Register

• Register SP (Stack Pointer, 16 bit)

Fungsi: Digunakan untuk operasi stack seperti menyimpan alamat return saat memanggil subroutine. SP merupakan register yang secara implisit digunakan oleh perintah PUSH dan POP yaitu menyimpan dan mengambil kembali dari stack.

• Register BP (Base Pointer, 16 bit)

Fungsi: Sebagai penunjuk base dalam stack yang disediakan untuk penyimpanan data. BP juga digunakan si dengan bahasa pemrograman misalnya Assembler dan C.

• Register SI dan DI (Source Index dan Destination index, 16 bit)

Fungsi: Menyimpan nilai-nilai offset dalam segment data memori pada saat bersangkutan.

• Register IP (Instruction Pointer, 16 bit)

Fungsi: Register yang berpasangan dengan CS sebagai register utama untuk menunjukkan baris perintah program. Pada saat program dijalankan, IP akan langsung menunjuk pada awal program. Code Segment dan Instruction Pointer berfungsi sebagai program counter ditulis dengan format CS:IP. Secara umum, kode mesin diletakkan di Code Segment, semua data diletakkan di Data Segment, dan operasi PUSH dan POP dilakukan di Stack Segment.

 3.      Register Segment (16 bit)

• Register CS (Code Segment)

Fungsi: Mencatat segment dari kode program atau instruksi, register CS berpasangan dengan register IP (Instruction Pointer) dalam format CS:IP.

• Register DS (Data Segment)

Fungsi: Menyimpan alamat dari segment dimana data terletak.

• Register SS (Stack Segment)

Fungsi: Menyimpan alamat segment memori yang dipergunakan sebagai stack.

•  Register ES (Extra Segment)

Fungsi: Menyimpan alamat segment tambahan, misalnya alamat display, alamat sistem operasi, dan sebagainya.

4. Register Flag

Mikroprosesor 8086/8088 mempunyai Status Flag 1 bit dan 4 Kontrol Flag yang dikonfigurasikan dalam register 16 bit. Status Flag terdiri dari:

• CF (Carry Flag)

Tugas: Dimana sebuah carry out atau borrow, jika hasilnya adalah bit tertinggi (nilai 1).

• PF (Parity Flag)

Tugas: Menset (nilai 1), jika instruksi menghasilkan sebuah angka genap (even parity).

• AF (Auxiliary Flag)

Tugas: Digunakan oleh instruksi pegaturan desimal.

•   ZF(Zero Flag)

Tugas: Menset (nilai 1), jika hasil instruksi adalah 0.

•  SF (Sign Flag)

Tugas: Menset (nilai 1), jika hasilnya adalah negatif dan bernilai 0 jika positif. Kontrol Flag terdiri dari:

• OF (Overflow Flag)

Tugas: Menunjukkan sebuah operasi yang tidak benar yaitu merubah hasil daripada tanda bit..

• IF (Interrupt Enable Flag)

Tugas: Jika diset (nilai 1) dapat melakukan operasi interupsi dan sebaliknya bila bernilai 0, maka interupsi

tidak dapat dilakukan.

•  DF (Direction Flag)

Tugas: Mengontrol arah dari operasi string. Jika DF=1, maka register SI dan DI nilainya menurun (decrement); jika DF=0, maka register DI dan SI nilai menaik (increment). Register ini digunakan untuk instruksi-instruksi MOVS, MOVSB, MOVSW, CMPS, CMPSB, dan CMPSW.

• TF (Trap Flag)

Tugas: Ditempatkan dalam single step mode untuk keperluan debug.

PROGRAM PENGOLAHAN TAGIHAN PDAM

Berikut ini program untuk menyelesaikan pembayaran tagihan air minum.

Program penyelesaian pembayaran tagihan air minum menggunakan Visual Basic dot Net

Public Class Form1

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        KP.Items.Add("TOK-MED-100")

        KP.Items.Add("PAB-BEL-101")

        KP.Items.Add("SWA-BEL-102")

        KP.Items.Add("PAB-MED-103")

        KP.Items.Add("RUM-MED-104")

    End Sub

    Private Sub KP_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles KP.SelectedIndexChanged

        Dim x As String

        x = Microsoft.VisualBasic.Right(KP.Text, 3)

        Select Case x

            Case "100" : Nama.Text = "Muhammad Ardianto"

            Case "101" : Nama.Text = "Jekson Sinaga"

            Case "102" : Nama.Text = "Triani Arista"

            Case "103" : Nama.Text = "Aldyan"

        End Select

        x = Microsoft.VisualBasic.Left(KP.Text, 3)

        Select Case x

            Case "PAB"

                HargaM3.Text = 500

                BBeban.Text = 250000

                Tipe.Text = "Pabrik"

            Case "TOK"

                HargaM3.Text = 500

                BBeban.Text = 25000

                Tipe.Text = "Toko"

            Case "RUM"

                HargaM3.Text = 500

                BBeban.Text = 10000

                Tipe.Text = "Rumah"

            Case "SWA"

                HargaM3.Text = 200

                BBeban.Text = 15000

                Tipe.Text = "Swalayan"

        End Select

        x = Microsoft.VisualBasic.Mid(KP.Text, 5, 3)

        Select Case x

            Case "MED" : Daerah.Text = "Medan"

            Case "BEL" : Daerah.Text = "Belawan"

        End Select

    End Sub

    Private Sub Pemakaian_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles Pemakaian.KeyPress

        If Asc(e.KeyChar) = 13 Then

            TTagihan.Text = HargaM3.Text * Pemakaian.Text + Val(BBeban.Text)

            Pajak.Text = 0.01 * TTagihan.Text

            Pembayaran.Text = Val(TTagihan.Text) + Val(Pajak.Text)

        End If

    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        End

    End Sub

    Private Sub btnHapus_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnHapus.Click

        KP.Text = ""

        Nama.Text = ""

        Tipe.Text = ""

        TTagihan.Text = ""

        HargaM3.Text = ""

        Pajak.Text = ""

        Pembayaran.Text = ""

        Pemakaian.Text = ""

        Daerah.Text = ""

        BBeban.Text = ""

    End Sub

End Class

Demikianlah program penyelesaian pembayaran tagihan air minum menggunakan Visual Basic dot Net

mesran.net

data pemograman karyawan menggunakn Vb.net

 

Public Class Form1

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        NIK.Items.Add("PM001")

        NIK.Items.Add("PS002")

        NIK.Items.Add("KU003")

        NIK.Items.Add("GD004")

        NIK.Items.Add("PM002")

        GOLONGAN.Items.Add("IIIA")

        GOLONGAN.Items.Add("IIIB")

        GOLONGAN.Items.Add("IIIC")

        STATUS.Items.Add("menikah")

        STATUS.Items.Add("belum menikah")

    End Sub

    Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles NIK.SelectedIndexChanged

        Select Case Nik.Text

            Case "PM001"

                NAMA.Text = "dita"

            Case "PS002"

                NAMA.Text = "rama"

            Case "KU003"

                NAMA.Text = "dhani"

            Case "GD004"

                NAMA.Text = "dinda"

            Case "PM002"

                NAMA.Text = "savira"

        End Select

        Dim x As String

        x = Microsoft.VisualBasic.Left(NIK.Text, 2)

        If x = "PM" Then

            BAGIAN.text = "pemasaran"

        ElseIf x = "PS" Then

            BAGIAN.text = "personalia"

        ElseIf x = "KU" Then

            BAGIAN.text = "keuangan"

        Else

            BAGIAN.text = "pemasaran"

        End If

    End Sub

    Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles NAMA.TextChanged

    End Sub

    Private Sub GOLONGAN_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles GOLONGAN.SelectedIndexChanged

        Select Case GOLONGAN.Text

            Case "IIIA"

                GAJIPOKOK.Text = "1000000"

            Case "IIIB"

                GAJIPOKOK.Text = "2000000"

            Case "IIIC"

                GAJIPOKOK.Text = "3000000"

        End Select

        PAJAK.Text = 0.03 * GAJIPOKOK.Text

    End Sub

    Private Sub Btn_proses_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Btn_proses.Click

        TOTALGAJI.Text = Val(GAJIPOKOK.Text) + Val(TUNJANGANKEL.Text) - Val(PAJAK.Text)

    End Sub

    Private Sub STATUS_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles STATUS.SelectedIndexChanged

        Select Case STATUS.Text

            Case "menikah"

                TUNJANGANKEL.Text = 0.1 * GAJIPOKOK.Text

            Case "belum menikah"

                TUNJANGANKEL.Text = "0"

        End Select

    End Sub

    Private Sub Btn_hpus_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Btn_hpus.Click

        NIK.Text = ""

        NAMA.Text = ""

        BAGIAN.Text = ""

        GOLONGAN.Text = ""

        GAJIPOKOK.Text = ""

        PAJAK.Text = ""

        STATUS.Text = ""

        TUNJANGANKEL.Text = ""

        TOTALGAJI.Text = ""

    End Sub

End Class

berikut adalah lanjutan desain di atas:

mesran.net

Program Vb.Net 2008 Kriptografi VERNAM CHIPER

mari kita belajar kriptografi vernam,,

kita langsung aja dengan mengetikan listing programnya seperti ini:

Public Class Vernam_Chiper

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        Dim j As Integer

        Dim jum As Integer

        Dim sKey As String

        Dim nKata As Integer

        Dim nKunci As Integer

        Dim sKata As String

        Dim sPlain As String = ""

        Dim nEnc As Integer

        j = 0

        sKata = Plainteks.Text

        jum = Len(sKata)

        sKey = Kunci.Text

        For i = 1 To jum

            If j = Len(sKey) Then

                j = 1

            Else

                j = j + 1

            End If

            nKata = Asc(Mid(sKata, i, 1)) - 65

            nKunci = Asc(Mid(sKey, j, 1)) - 65

            nEnc = ((nKata + nKunci) Mod 26)

            sPlain = sPlain & Chr((nEnc) + 65)

        Next i

        Chiperteks.Text = sPlain

    End Sub

    Private Sub Vernam_Chiper_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        Plainteks.Text = ""

        Kunci.Text = ""

        Chiperteks.Text = ""

    End Sub

    Private Sub Plainteks_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles Plainteks.KeyPress

        e.KeyChar = UCase(e.KeyChar)

        Dim tombol As Integer = Asc(e.KeyChar)

        If Not (((tombol >= 65) And (tombol <= 90)) Or (tombol = 8)) Then

            e.Handled = True

        End If

    End Sub

End Class

Tampilan Desain 

 mesran.net

Tempat Wisata di Kota Medan yang Menarik

1.Danau Linting

Danau Linting Kota Medan

Danau Linting merupakan Salah satu Danau unik yang dapat anda kunjungi di kota Medan, Danau Linting ini mempunyai warna air yang hijau dan biru juka dilihat dari permukaan, dan disekeliling danau terdapat batu cadas. Lokasi Danau Linting di Kecamatan STM Hulu desa Sibunga-bunga Hilir Kabupaten deli Serdang. Danau Linting memiliki nuansa mistis namun menyejukkan karena disekeling danau terdapat pepohonan dengan akar yang panjang sehingga menambah suasna udara menjadi sejuk dan damai. Sangat Cocok untuk tempat refreshing anda dan keluarga atau bersama sahabat-sahabat anda.

2. Air Terjun Sipiso-Piso Tongging

Air Terjun Sipiso-Piso Tongging kota Medan

Air terjun Sipiso-Piso Tongging yang majestic terletak sekitar 135 km dari Brasatagi. Air terjun Tongging ini mempunyai ketinggian sekitar 120 meter yang dekat dengan Gunung Sipiso-piso . Keindahan panorama alam dari air terjun ditambah dengan pemandangan alam dari Danau Toba yang indah dan juga matahari di air terjun yang menambah keindahan dari air terjun tongging yang indah. Anda harus Bersiap untuk olah raga jika ingin pergi menuju dasar dari air terjun tongging. Karena anda harus menempuh sekitar 1000 anak tangga dan kira-kira membutuhkan waktu sekitar setengah jam untuk turun ke bawah melewati tangga yang berliku-liku dengan berjalan kaki. Air terjun Tongging sangat indah karena tidak begitu jauh dari tepian Danau Toba yang juga berada di tengah bukit dan disekelilingnya memiliki nuansa warna hijau yang di pengaruhi oleh tumbuhan dan ada disekeliling lembah yang menakjubkan.

3. Air Terjun dan Telaga Dwi Warna Sibolangit

Air Terjun dan Telaga Dwi Warna Sibolangit

Air Terjun dan Telaga Dwi Warna Sibolangit berjarak sekitar 2 jam waktu dari Kota Medan dengan menggunakan motor atau bus. Sibolangit merupakan sebuah tempat dengan nuansa pegunungan yang sejuk dan penuh dengan tempat pariwisata yang menarik sangat cocok untuk travelling. Salah satunya adalah Telaga Dwi warna yang terdapat di dalam hutan Sibolangit. Air terjun ini disebut Dwi warna karena air terjun terjun ini berada di telaga berwarna biru yang dingin dan tidak jauh dari air terjun yang dingin terdapat juga air terjun yang hangat dan berwarna putih. Jika Anda dari taman wisata Sibolangit dan ingin menuju Telaga Dwi warna ini membutuhkan waktu sekitar 3 jam waktu perjalanan dengan berjalan kaki dan menjelajahi hutan. Anda harus bersiap untuk melakukan perjalanan panjang namun waktu anda melihat keindahan panorama alamnya rasa capek yang ada akan serasa hilang. Pariwisata ini masih tersembunyi dan jika ingin menuju kesini sebaiknya anda menyewa pemandu agar tidak tersesat di dalam hutan. dan Tempat ini juga cocok untuk kamping atau berkemah.

4 . Gedung London

Gedung London Sumatera atau biasa disebut gedung Lonsum selesai dibangun tahun 1906 bersamaan dengan lahirnya Ratu Juliana, Kerajaan Belanda. Dibangun oleh David Harrison, pemilik perkebunan karet Harrison & Crossfield Company (H&C) yang berpusat kota London. Meskipun dibangun pada masa lampu namun fasilitas gedung ini cukup mengagumkan. Ia  tercatat sebagi gedung pertama di Medan yang menggunakan teknologi lift untuk menjangkau 5 lantai. Terletak di kawasan Kesawan, Anda harus melihat dari dekat kemegahan gedung ini. Read more. (peta lokasi View Larger Map)

Apple Kerjasama dengan China Mobile, Siap Datangkan iPhone 5S dan 5C ke Pasar Cina 17 Januari Mendatang

iPhone 5S dan 5C akan segera datang ke pasar Cina. Kedatangan kedua iPhone terbaru itu merupakan bagian dari kerjasama yang baru saja diumumkan oleh Apple dan China Mobile. Provider telepon terbesar dunia dengan jumlah pelanggan sebanyak 760 juta itu pun siap mendatangkan iPhone 5S dan 5C pada 17 Januari mendatang.

Kedua smartphone tersebut akan bisa digunakan memakai jaringan 3G dan 4G milik China Mobile. Pihak China Mobile pun akan mulai melayani pre-order untuk kedua smartphone tersebut pada 25 Desember dan handphone akan secara resmi tersedia pada 17 Januari 2014.
CEO Apple Tim Cook mengatakan bahwa kerjasama itu bakal memberikan keuntungan yang sangat besar bagi kedua perusahaan. Terlebih Cina merupakan salah satu pangsa pasar yang sangat potensial bagi Apple.
Selain mendatangkan iPhone 5S dan 5C, Apple juga siap mendatangkan produk lain miliknya ke pasar Cina. Produk lain tersebut adalah iPad Air. Belum ada informasi resmi terkait rumor yang satu ini. Kita tunggu saja kabar berikutnya.

Samsung Siap Luncurkan Smartphone Pertama Dunia yang Memiliki RAM 4GB

hablet Samsung Galaxy Note 3 menjadi smartphone pertama di dunia yang hadir dengan RAM sebesar 3GB. Namun nampaknya Samsung masih belum puas dengan pencapaian tersebut. Mereka pun siap menghadirkan smartphone yang dilengkapi dengan RAM sebesar 4GB.

Perusahaan asal Korea Selatan itu pun baru saja memperkenalkan chip Memori low power DDR4 8-gigabit (1GB) yang bisa digunakan secara multilayer untuk bisa membentuk memori 4GB. Chip ini pun memungkinkan untuk digunakan pada perangkat mobile karena ukurannya terbilang kecil.
Chip ini juga memiliki kecepatan lebih tinggi dibandingkan chip berbasis DDR3 yang saat ini ada di pasaran, dengan bandwidth sebesar 3.1Gbps. Tak hanya itu, chip memori ini juga hadir dengan efisiensi power 40 persen lebih baik dibandingkan pendahulunya.
Keberadaan chip memori ini pun sangat memungkinkan untuk dihadirkan Samsung pada berbagai jenis produknya pada tahun 2014 nanti. Tak terkecuali produk smartphone Galaxy milik Samsung. Selain itu, teknologi ini juga bisa dihadirkan pada perangkat lain seperti laptop serta tablet.