Tugas Grafika Komputer

Aplikasi Geometry Process Menggunakan Visual Studio

1 Translasi

Operasi Translasi merupakan operasi untuk mengubah posisi gambar melakukan penambahan atau pengurangan baik pada koordinat x dan atau koordinat y suatu citra. Rumus Translasi dapat ditulis sebagai :

 nX = x + dX nY = y + dY

 Keterangan : dX = besar pergeseran dalam arah x 

                     dY = besar pergeseran dalam arah y

Algoritma Translasi  adalah sebagai berikut :

Hasil operasi Translasi  adalah sebagai berikut :

2. Skala

Skala yaitu proses untuk mengubah ukuran citra asli (zoom in / memperbesar ukuran citra asli atau zoom out / memperkecil ukuran citra asli).

Rumus penskalaan dapat ditulis sebagai : x’ = Sx . x  dan  y’ = Sy . y

Keterangan : Sx = faktor skala horizontal

                    Sy = faktor skala vertikal

• Zoom in (Pembesaran ) 

Operasi zoom in dengan faktor skala = 2 (Sx = Sy = 2) diimplementasikan dengan menyalin setiap piksel sebanyak 4 kali. Jadi, citra 2 x 2 piksel akan menjadi 4 x 4 piksel.

Algoritma Skala  adalah sebagai berikut :

Hasil  operasi Skala  Zoom in adalah sebagai berikut

• Zoom out (Pengecilan) 

Operasi zoom out dengan faktor skala = 1/2 dilakukan dengan mengambil rata-rata dari piksel yang bertetangga menjadi 1 piksel. 

Hasil Skala zoom out  adalah sebagai berikut :

3. Rotasi

Rotasi adalah perputaran citra sesuai dengan arah perputaran dan besar sudut yang diinginkan.

Algoritma Rotasi 90 adalah sebagai berikut :

Hasil Rotasi 90  adalah sebagai berikut :

Tugas Grafika Komputer

Membuat Garis Segi dengan Menggunakan Visual Basic 6

Di dalam visual basic kita dapat menggambarkan sebuah sudut dan segi dengan script-script sederhana, berikut contoh membuat jumlah sudut segi :

1. Buat form baru
2. Masukan sebuah combobox
2. Masukan Script di bawah ini pada combobox :


Private Sub Command1_Click()
On Error Resume Next
n = InputBox("Masukan Jumlah Sudut yang Anda inginkan ? (3-100)", "Membuat banyak sudut")
sudut = 360 / n
Cls
For i = 1 To n
For j = 1 To n
simpulIX = Sin(i * sudut / 57.2958) * 2000 + 2600
simpulIY = Cos(i * sudut / 57.2958) * 2000 + 2000
simpulJX = Sin(j * sudut / 57.2958) * 2000 + 2600
simpulJY = Cos(j * sudut / 57.2958) * 2000 + 2000
Line (simpulIX, simpulIY)-(simpulJX, simpulJY)
Next j
Next i
End Sub

3. Coba run, dan lihat hasilnya.