Akhirnya Beli MG Astray Red Frame Kai

akhirnya setelah bergalau ria, akhirnya pilihan gue ditetapkan pada Astray Red Frame Kai (MBF-P02KAI)

ada kurang lebih 28 runner (include action base buat weapon yang super gede)
ada beberapa armament, seperti Gerbera Straight, Tiger Pierce, Buster Sword + 2 Dagger

Gunplanya udah jadi gue rakit tapi masih malu buat gue tampakin disini :malu:

kapan2 aja yak. 

Conditional IF (advance)

membuat program untuk menentukan kelulusan beserta gradenya

Tampilannya

Codingnya

Penjelasan logika

Deklarasikan  Nama, Grade, Status sebagai string, lalu deklarasikan UTS, UAS, Total sebagai integer

Nama = TxtNama.Text                      *buat variable Nama

Grade = TxtGrade.Text                    *buat variable Grade

Status = TxtStatus.Text                  *buat variable Status

UTS = Val(TxtUTS.Text)                   *buat variable UTS

UAS = Val(TxtUAS.Text)                   *buat variable UAS

Total = Val(TxtTotal.Text)               *buat variable Total

Buat formula untuk TxtTotal.Text = Val(UTS / 100 * 70) + Val(UAS / 100 * 30)

*Artinya, nilai yang nanti akan muncul di textbox TxtTotal.Text adalah hasil dari nilai Val(TxtUTS.Text) yang di bagi 100 dan dikali 70, dan ditambah dari hasil nilai UAS = Val(TxtUAS.Text) yang dibagi 100 dan dikali 30

If TxtTotal.Text >= 0 And TxtTotal.Text < 60 Then

            TxtStatus.Text = "TIDAK LULUS"

            TxtGrade.Text = "Grade D"

            MessageBox.Show(Nama & " Dengan nilai " & TxtTotal.Text & " Maka Anda TIDAK LULUS", "Informasi", MessageBoxButtons.OK, MessageBoxIcon.Information)

*Artinya, akan dibuat suatu kondisi, apabila nilai dari textbox TxtTotal.Text lebih dari sama dengan 0 dan TxtTotal.Text kurang dari 60 maka, akan tertulis di Textbox TxtStatus.Text TIDAK LULUS, dan pada textbox TxtGrade.Text akan tertulis Grade D. Dan akan muncul messagebox, Nama Dengan nilai nilaitotalnya maka anda TIDAK lulus, dengan title informasi, lalu ada button ok pada messagebox itu dan ada messagebox icon informasi.

Ketika di running

Conditional IF

Kali ini gue mau post tentang conditional if

Tampilan

Coding

Public Class Form1

    Dim NPM As Integer = 32111775

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

        If TextBox1.Text = "Febrian Adrianputra" Then

            Label1.Text = NPM

        End If

    End Sub

End Class

Logika

Dim NPM As Integer = 32111775

*Deklarasikan NPM sebagai Integer, yang berisi 32111775 

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

        If TextBox1.Text = "Febrian Adrianputra" Then

            Label1.Text = NPM

        End If

*Event yang akan terjadi jika Button1 diklik adalah,

Jika Textbox diisi dengan tulisan  "Febrian Adrianputra" maka label1.text akan berisi variable NPM, dimana variable NPM tersebut telah kita isi dengan 32111775 tadi.

Running

jika textbox diisi dengan Febrian Adrianputra

Ketika button diklik

Next gue mau bahas Math Function

Variable

Udah lama gak post tutorial VB.NET, kali ini mau post tentang variable

Tampilan

Coding

Public Class Form1

    Dim Falcon As String = "Ubisoft Singapore is my goal"

    Dim NPM As Integer = 32111775

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

        MessageBox.Show(Falcon, "Febrian Adrianputra")

        MessageBox.Show(NPM, "NPM gue")

    End Sub

End Class

Logika

Dim Falcon As String = "Ubisoft Singapore is my goal"

*Deklarasikan variable Falcon sebagai String, yang isinya "Ubisoft Singapore is my goal"

Dim NPM As Integer = 32111775

*Deklarasikan variable NPM sebagai Integer, yang isinya 32111775

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

        MessageBox.Show(Falcon, "Febrian Adrianputra")

        MessageBox.Show(NPM, "NPM gue")

*Ketika button1 diklik, maka event yang terjadi adalah,  keluar message box yang berisi variable Falcon, dengan title "Febrian Adrianputra" dan keluar messagebox lagi yang berisi variable NPM, dengan title "NPM gue"

Running

MessageBox yang pertama keluar

 MessageBox kedua yang keluar

Selanjutnya gue mau bahas tentang Conditional IF

LP Latex 14 April 2012 Tentang Document Class

1. Sebutkan dan jelaskan jenis-jenis document class pada latex
2. contoh penulisan dengan latex

jawab
1. Report: digunakan untuk membuat laporan (report) baik dalam bidang bisnis, teknik, hukum, akademis, atau ilmu pengetahuan

   Article: digunakan untuk membuat paper, artikel sebuah jurnal atau majalah, review, paper untuk konferensi, atau catatan riset.

   Book: digunakan untuk membuat buku dan thesis

   Letter: digunakan untuk membuat surat.

2. contoh penulisan dengan latex

\documentclass[a4, 10pt]{article}
\usepackage[bahasa]{babel}
\begin{document}
\textit{Laboratorium Sistem Informasi}\\
\textbf{Belajar LaTeX}\\
Universitas Gunadarma\\
\end{document}

LA Pascal 8 April 2012 (Membuat Function dan Procedure)

Membuat Function dan Procedure dalam satu program

• Coding

 

• Logika:

uses crt;

var x, y: integer;

Deklarasikan variable  x dan y sebagai integer.

function hitung (var a, b: integer):integer;

        begin

                hitung:= a + b;

        end;

Buat function hitung, dengan tipe data integer dan variable a dan b sebagai integer, begin untuk memulai function, lalu buat rumus, hitung = variable a ditambah variable b. lalu end untuk mengakhiri function.

procedure input;

        begin

                write ('Masukkan x= ');

                readln(x);

                write ('masukkan y= ');

                readln(y);

                writeln;

        end;

Buat procedur input, begin untuk memulai procedure lalu write (‘Masukkan nilai x= ‘) untuk meninput nilai x, lalu readln (x) untuk membaca nilai yang diinput sebagai variable x. write (‘Masukkan nilai y= ‘) untuk meninput nilai x, lalu readln (x) untuk membaca nilai yang diinput sebagai variable y. lalu writeln untuk membuat garis baru

 begin

        clrscr;

        input;

        writeln (x, '+', y, '=', hitung (x, y));

        readln;

end.

Begin untuk memulai coding utama, lalu clrscr untuk membersihkan layar ketika program di running. Ketik input, untuk memasukan procedure input. Lalu writeln (x, ‘+’, y, ‘=’, hitung (x,y), untuk membuat tulisan, variable x + variable y = function hitung yang merubah variable a menjadi variable x, dan variable b menjadi variable y. lalu readln agar dapat membaca hasil dari yang di write, lalu end untuk mengakhiri coding pada program utama.

• Ketika program di running