Buat rekan- rekan Kopasus IT divisi rpl SMA Plus PGRi Cibinong yang mau download materi pascal on linux silahkan download di bawah ini :

intoducing-pascalonlinux

introduction

Read *.wav file with php and then show results with graph interfaced. There are 2 files: example_draw.php and class.wave.php

Both these files can be developed for the analysis of wav files with a web interface, especially in the field of acoustic physics.

Results:

Download Here

Reff: GooGle

Disini untuk celcius disingkat cel, Fahrenheit disingkat fah

Listing programnya :

#include <conio.h>

#include <stdio.h>

void main()

{

float cel, fah;

char lagi=’Y';

printf(“    PROGRAM KONVERSI SUHU CELCIUS KE FAHRENHEIT \n”);

printf(“===================================================\n”);

do

{

printf(“\nMasukkan Nilai Celcius : “);

scanf(“%f”, &cel);

fah=1.8*cel+32;

printf(“Nilai fahrenheit adalah: %.2f \n”, fah);

printf(“Coba lagi (Y/T) ? “);

scanf(“%s”, &lagi);

}

while (lagi==’Y’ || lagi==’y');

getch();

}

Berikut saya sajikan contoh program menggunakan bahasa C++. Contoh mengkonversi satuan panjang dari tiga masukan yaitu yard, kaki, dan inchi  ke dalam meter. Keluaran dari program tersebut adalah panjang dalam meter.

Untuk mengerjakan soal tersebut kita perlu tahu table konversi. Adapun untuk yard, kaki, dan inchi adalah

1 yard = 0,9144 m

1 kaki = 30,48 cmm

1 inch = 25,4 mm

(informasi : mungkin diperlukan juga, 1 yard = 3 kaki, 1 kaki = 12 inch)

Algoritmanya :

Masukkan yard, kaki, inch

Meter          0,9144*yard + 0,3048*kaki + 0,0254*inch

Tulis/ cetak meter

Programnya :

#include <iostream.h>

#include <conio.h>

main()

{

float yard, kaki, inch, meter;

cout <<”Masukkan yard : “;cin>>yard;

cout <<”Masukkan kaki : “;cin>>kaki;

cout <<”Masukkan inch : “;cin>>inch;

meter=0.9144*yard+0.3048*kaki+0.0254*inch;

cout <<yard<<” yard “<<kaki<<” kaki “<<inch<<” inch “<<meter<<” meter”;

getch();

}

Nah mudah bukan ? silakan di coba dan anda bisa bisa berkreasi untuk merubahnya sendiri.

Program sederhana ini terdiri dari sebuah form dan sebuah button. Bila button di klik, maka program tersebut akan mereplikasikan dirinya sendiri ke tempat / path / directory lain (yang sudah kita tentukan di source code). Efek negatifnya bisa diterapkan pada kode jahat yang bersifat merusak seperti “virus”. Tulisan sederhana ini hanya sebagai pengetahuan semata.

Source Code :

procedure TForm1.Button1Click(Sender: TObject);
const
newName = 'C:\namaaplikasi.exe';
begin
copyfile(PChar(application.exename), PChar(newName), false);
end;

Program ini akan menggandakan dirinya ke drive C:/ dengan nama “namaaplikasi.exe”

Reff: google

Program ini akan menunjukkan dimana aplikasi tersebut dijalankan, dalam hal ini adalah path, atau di directory mana program ini berada.

Komponen : Form & Button

Source Code :


procedure TForm1.Button1Click(Sender: TObject);
var
dir : string;
begin
// Get the current directory
dir := GetCurrentDir;
ShowMessage('Current directory = '+dir);
end;

ScreenShoot :



Reff : DelphiBasics

Saat masih kecil sebelum mengenal bangku sekolah, atau saat pertama memasuki bangku sekolahan, kita harus bisa baca, tulis, dan menghitung! & sama seperti itu, saat kita ingin menjadi programmer handal kita wajib bisa baca, tulis, dan menghitung. tentunya dengan cara pemprograman, berikut 3 listing program dasar, dengan menggunakan compiler pascal …

Listing program 1
————————–
program tulis;

begin
write(‘Pascal on Linux’);
end.

Listing program 2
————————–
program baca;

var nama:string;

begin
write(‘masukan nama anda ‘);
read(nama);
write(‘nama anda ‘, nama);
end.

Listing program 3
————————–
program hitung;

var x,y,z : integer;
begin
write(‘masukan nilai ke-1′);
read(x);
write(‘masukan nilai ke-2′);
read(y);
z := x + y;
writeln(‘hasil penjumlahan’, z);
end.

Selamat ! apabila telah mahir berarti anda sudah memiliki dasar program yang cukup untuk melanjutka ke-tingkat selanjutnya

1c4l

programmer & IT engineer

Contoh penggunaan fungsi di c++ :

#include<iostream.h>
#include<conio.h>
#include<string.h>

float lingkaran (float jari);
float segitiga (float alas, float tinggi);

void main()
{
	float a, t, j, ll, ls;
	int menu;
	char menu2;
	char cekpassword[80];
	char password[]="saya";

	do
	{
	cout << "Masukan Password : ";
	cin >>cekpassword;
	clrscr();
	}
	while(strcmp(password, cekpassword));

        menu:
	cout << "Menu : "<<endl;
	cout << "1. Menghitung Luas Lingkaran"<<endl;
	cout << "2. Menghitung Luas Segitiga"<<endl;
	cout << "Pilihan [1/2] : ";
	cin >> menu;

	clrscr();
		if (menu==1)
		{
			cout << "Menghitung Luas Lingkaran"<<endl;
			cout << "Jari-jari = ";
			cin >> j;
			ll=lingkaran(j);
			cout << "Luas = "<<ll<<endl;
			cout << "Mau hitung lagi [y/n]? ";
			cin >> menu2;
			clrscr();
				if(menu2=='y' || menu2=='Y')
				{
					goto menu;
				}
				else if(menu2=='n' || menu2=='N' )
				{
                                	cout << "Selesai";
				}
		}else if (menu==2)
		{
			cout << "Menghitung Luas Segitiga"<<endl;
			cout << "Alas = ";
			cin >> a;
			cout << "Tinggi = ";
			cin >> t;
			ls=segitiga(a, t);
			cout << "Luas = "<<ls<<endl;
			cout << "Mau hitung lagi [y/n]? ";
			cin >> menu2;
			clrscr();
				if(menu2=='y' || menu2=='Y')
				{
					goto menu;
				}
				else if(menu2=='n' || menu2=='N' )
				{
                                	cout << "Selesai";
				}
		}

}

float lingkaran (float jari)
{
	float ll;
	ll=3.14*jari*jari;
        return(ll);
}

float segitiga (float alas, float tinggi)
{
	float ls;
	ls=alas*tinggi/2;
        return(ls);
}

Assalam semua, pa kabar??? semoga dalam keadaan baik-baik ja…. pada posting kali ini mencoba menghitung beberapa nilai dengan assembly. Tapi, yang saya buat ini saya liat contoh dari orang dan saya kembangkan berdasarkan kasus, hehe (yang penting ada usaha untuk mencoba kn masih belajar, hehe).
Ada sebuah kasus untuk melakukan perhitungan dengan menu berikut:

  a. (A + B)
  b. (A – B)
  c. (A + B) – C
  d. (A – B) + C

Pertamnya sh bingung, tapi setelah ngeliat beberapa contoh, ya beginilah coding dengan bahasa assembly:

mohamadsodiq segment
assume cs : mohamadsodiq
org 100h
start : jmp mulai
menu db ‘ Menu Perhitungan’,13,10
         db ‘——————————–’,13,10
         db ‘ 1. Perhitungan (A+B) ‘,13,10
         db ‘ 2. Perhitungan (A-B) ‘,13,10
         db ‘ 3. Perhitungan (A+B)-C’,13,10
         db ‘ 4. Perhitungan (A-B)+C’,13,10
         db ‘——————————–’,'$’

pilih   db 13,10,’Silahkan input pilihan anda : ‘,’$’

nilai1 db 13,10,13,10,’Silahkan input nilai 1 = ‘,’$’
nilai2 db 13,10,’Silahkan input nilai 2 = ‘,’$’
nilai3 db 13,10,’Silahkan input nilai 3 = ‘,’$’

result db 13,10,13,10,’Hasilnya adalah = ‘,’$’

mulai : mov ah,09h
           mov dx,offset menu
           int 21h
           mov dx,offset pilih
           int 21h
           mov ah,01h
           int 21h
           cmp al,’1′
           je hitung1
           cmp al,’2′
           je hitung2
           cmp al,’3′
           je hitung3
           cmp al,’4′
           je hitung4
           jmp mulai

hitung1:call tambah
           jmp akhir

hitung2:call kurang
           jmp akhir

hitung3:call tkurang
           jmp akhir

hitung4:call ktambah

akhir : int 20h

inputNilai proc near
           mov ah,09h
           mov dx,offset nilai1
           int 21h
           mov ah,01h
           int 21h
           mov bl,al
           sub bl,30h
           mov ah,09h
           mov dx,offset nilai2
           int 21h
           mov ah,01h
           int 21h
           sub al,30h
           ret
inputNilai endp

inputNilai3 proc near
           mov ah,09h
           mov dx,offset nilai3
           int 21h
           mov ah,01h
           int 21h
           sub al,30h
           ret
inputNilai3 endp

tampil proc near
           mov ah,09h
           mov dx,offset result
           int 21h
           mov ah,02h
           mov dl,bl
           add dl,30h
           int 21h
           ret
tampil endp

tambah proc near
           call inputNilai
           add bl,al
           call tampil
           ret
tambah endp

kurang proc near
           call inputNilai
           sub bl,al
           call tampil
           ret
kurang endp

tkurang proc near
           call inputNilai
           add bl,al
           call inputNilai3
           sub bl,al
           call tampil
           ret
tkurang endp

ktambah proc near
           call inputNilai
           sub bl,al
           call inputNilai3
           add bl,al
           call tampil
           ret
ktambah endp

mohamadsodiq ends
           end start

Klo ada yang lebih menarik, jgn lp bagi” y, hehe

Salah satu cara untuk memperkuat hasil dari sebuah proses enkripsi adalah dengan menggunakan kunci yang relatif panjang. Cara ini bisa ditempuh dengan 2 metode. Pertama, user memasukkan kunci yang panjangnya real (nyata). Kedua, dengan memberikan nilai random pada kunci. Banyak cara dan metode yang ditawarkan untuk membangkitakan kunci random, namun dalam tulisan ini saya mencoba menggunakan metode sederhana yaitu dengan membangkitakan kunci berdasarkan nilai (kunci) awal yang kita masukkan.

Adapun langkah-langkah pembangkitan kunci sebagai berikut:
1. karakter terakhir dari kunci dijumlahkan dengan n-1 karakter sebelumnya (n adalah panjang kunci asli), kemudian jumlah tersebut
dimodulo 26.
2. Hasil modulo merupakan karakter baru yang kemudian digabungkan dengan kunci sebelumnya menjadi kunci baru.
3. Kembali ke langkah pertama sampai kunci tersebut sepanjang plaintext.

Dari langkah-langkah di atas, dapat dirumuskan persaman berikut untuk menghasilkan karakter kunci ke-i:

k[i] = (k[i-n] + k[i-1]) mod 128
dimana:
i = n+1, n+2, …
ki = karakter kunci ke-i (A = 0, B = 1, …)
n = panjang kunci asli

Penerapan dalam program adalah sebagai berikut:
Kunci akan dimasukkan ke dalam array berukuran 256 byte sebanyak satu kali, kemudian sisa array lainnya akan diisikan dengan nilai random
yang dibangkitkan oleh fungsi random, maka seluruh array terisi. Algoritmanya adalah sebagai berikut :
a) Isi k dengan 0
b) Untuk i = 0 sampai i = 255 lakukan
c) Jika j < panjang kunci maka
d) Isi K ke i dengan nilai Ascii karakter key ke k
e) Selain itu
f) Isi K ke i dengan nilai random (dalam hal ini saya menggunakan persamaan seperti diatas)
g) Akhir jika
h) Nilai k dinaikkan 1
i) Nilai i dinaikkan kemudian kembali ke 2.

Untuk lebih jelasnya saya coba deskripsikan dalam source code dengan bahasa Java:
int k = 0;
for (int i = 0; i < 256; i++) {
if (k < kunci.length()) {
key[i] = kunci.charAt(k);
k++;
}
else
key[i] = (key[i-kunci.length()] + key[i-1]) % 128;
System.out.print(key[i] + " ");
}

Mohon masukan dan sarannya….. Semoga bermanfaat…

Seharusnya ini menjadi postingan pertama dalam kategori Delphi. Tapi tak apalah. Bagi anda yang sedang dan ingin belajar atau sekedar ingin mengetahui tentang sejarah delphi, semoga tulisan ini bisa memberikan informasi yang berguna bagi anda.

Apa itu Delphi?

Borland Delphi adalah bahasa tingkat tinggi dan terkompilasi yang mendukung bahasa terstruktur serta Perancangan Berorientasi Object (OOD). Delphi menggunakan bahasa Pascal, sebuah bahasa terstruktur generasi ketiga. Delphi menawarkan gaya pemrograman yang bersih dan konsisten dan yang terpenting menghasilkan aplikasi yang lebih dapat diandalkan.

Pascal dan Sejarahnya

Asal usul Pascal bermula dari rancangan Algol, bahasa tingkat tinggi pertama yang mudah dibaca, terstruktur dan mendefinisikan sintax secara sistematis. Pada akhir tahun 1960-an (196x), beberapa usulan evolusi penerus algol dikembangkan. Salah satu yang paling sukses adalah Pascal, ditemukan oleh Prof Niklaus Wirth. Wirth mempublikasikan temuan asli Pascal pada tahun 1971. Mulai diimplementasikan di tahun 1973 dengan beberapa modifikasi.   Banyak fitur pascal yang berasal dari bahasa sebelumnya. Pernyataan Case dan parameter value-result berasal dari Algol, dan catatan struktur yang mirip dengan Cobol dan PL 1. Pascal menambahkan kemampuan untuk mendefinsikan tipe data baru secara lebih sederhana dari yang pernah ada. Pascal juga mendukung struktur data dinamis, contohnya : struktur data yang dapat tumbuh dan menyusut saat program berjalan. Bahasa ini dirancang untuk menjadi alat pembelajaran bagi siswa pada kelas pemrograman.

Pada tahun 1975, Wirth dan Jensen memproduksi buku referensi Pascal terakhir “Pascal User Manual and Report”. Wirth berhenti bekerja pada Pascal pada tahun 1977 untuk menciptakan sebuah bahasa baru, Modula – penerus Pascal.

Borland Pascal

Dengan dirilisnya Turbo Pascal 1.0 pada November 1983, Borland mulai perjalanannya dengan lingkungan pengembangan dan perangkatnya. Untuk menciptakan Turbo Pascal 1.0 Borland melisensikan kompilator inti pascal yang cepat dan murah, yang ditulis oleh Anders Hejlsberg. Turbo Pascal memperkenalkan  suatu Lingkungan pengembangan terintegrasi / Integrated Development Environment (IDE) dimana anda dapat mengedit code, menjalankan compiler, melihat kesalahan dan melompat kembali ke baris yang mengalami kesalahan. Kompiler turbo pascal telah menjadi salah satu compiler terlaris sepanjang waktu, dan membuat bahasa ini sangat popular pada platform PC

Pada tahun 1995 Pascal kembali dengan memperkenalkan lingkungan aplikasi bernama Delphi – mengubah pascal menjadi sebuah bahasa pemrograman visual. Keputusan yang strategis dengan membuat perangkat database dan konektivitas sentral dari produk pascal.

Permulaan Delphi

Setelah merilis Turbo Pascal 1, Anders bergabung dengan perusahaan sebagai seorang karyawan dan arsitek untuk semua versi dari kompiler Turbo Pascal dan tiga versi pertama dari Delphi. Sebagai kepala arsitek di Borland, Hejlsberg diam-diam merubah Turbo Pascal menjadi bahasa pengembangan aplikasi berorientasi obyek, lengkap dengan lingkungan yang benar-benar visual dan fitur akses database yang luar biasa

Mengapa diberi nama “Delphi”

Seperti yang dijelaskan dalam Museum artikel Borland, proyek dengan codename Delphi muncul pada pertengahan 1993. Mengapa Delphi? Sangat sederhana: “Jika Anda ingin berbicara dengan Oracle, pergilah ke Delphi”. Ketika tiba saatnya untuk memilih nama produknya, setelah sebuah artikel di ‘Windows Tech Journal’ tentang sebuah produk yang akan mengubah hidup programmer, nama terakhir yang diusulkan adalah AppBuilder. Sejak Novell merilis Visual AppBuilder, orang-orang Borland perlu mengambil nama lain, tetapi menjadi semacam komedi: semakin keras orang-orang berusaha untuk mengabaikan “Delphi” sebagai nama produk, semakin banyak nama tersebut mendapat dukungan. Setelah disebut-sebut sebagai “pembunuh VB” Delphi tetap menjadi produk landasan untuk Borland.

Perjalanan Delphi

• Delphi 1 (1995)

Delphi dan Delphi Client / Server adalah satu-satunya alat pengembangan yang menyediakan Rapid Application Development (RAD) manfaat dari komponen visual berbasis desain, sebuah kekuatan mengoptimalkan kompiler kode asli dan sebuah solusi klien / server.

Delphi,Pemrograman Windows milik Borland yang kuat pertama kali muncul pada tahun 1995. Delphi 1 memperluas bahasa Borland Pascal dengan menyediakan object-oriented dan pendekatan berbasis form, mengkompilasi code dengan sangat cepat, perangkat visual dua arah dan dukungan database besar, terintegrasi dengan Windows dan teknologi komponen

• Delphi 2 (1996)

Delphi 2 adalah satu-satunya perangkat Rapid Application Development (RAD) yang menggabungkan kinerja compiler yang mengoptimalkan kode asli 32-bit tercepat di dunia, produktivitas komponen visual berbasis desain, dan fleksibilitas arsitektur database dalam lingkungan berorientasi object.

Delphi 2, di samping sedang dikembangkan untuk platform Win32 (dukungan penuh dan terintegrasi dengan Windows 95), membawa perbaikan database grid, otomatisasi OLE dan dukungan varian tipe data, tipe data long string dan Visual Form Inheritance. Delphi 2: “dengan kemudahan VB dan Kekuatan C + +”

• Delphi 3 (1997)

Alat pengembangan visual yang paling komprehensif, berkinerja tinggi, klien dan server untuk menciptakan perusahaan terdistribusi dan aplikasi Web.

Delphi 3  memperkenalkan fitur baru dan tambahan di bidang-bidang berikut: teknologi code insight, DLL debugging, component template, Decision Cube dan komponen TeeChart, teknologi WebBroker, ActiveForms, component packages, dan integrasi dengan COM melalui antarmuka.

• Delphi 4 (1998)

Delphi 4 adalah alat pengembangan profesional dan klien / server yang komprehensif sebagai solusi untuk membangun komputasi terdistribusi. Delphi menyediakan java interoperability, driver database berkinerja tinggi, pengembangan CORBA, dan dukungan Microsoft BackOffice. Anda tidak pernah punya cara yang lebih produktif untuk menyesuaikan, mengelola, visualisasikan dan memperbaharui data. Dengan Delphi, Anda memiliki aplikasi kuat untuk memproduksi, tepat waktu dan sesuai anggaran.

Delphi 4 memperkenalkan komponen docking, anchoring dan constraining. Fitur baru termasuk AppBrowser, array dinamis, metode overloading, mendukung Windows 98, meningkatkan OLE dan mendukung COM serta pengembangan dukungan database.

• Delphi 5 (1999)

Lingkungan pengembangan high-productivity untuk internet

Delphi 5 memperkenalkan banyak fitur baru dan perangkat tambahan. Beberapa, diantaranya adalah: berbagai layout desktop, konsep frame, pengembangan paralel, kemampuan menterjemahkan, meningkatkan debugger terintegrasi, kemampuan Internet baru (XML), kekuatan database yang lebih  (mendukung ADO), dll.

• Delphi 6 (2000)

Borland Delphi adalah lingkungan pengembangan aplikasi cepat yang pertama untuk Windows yang sepenuhnya mendukung layanan Web. Dengan Delphi, perusahaan atau pengembang individu dapat menciptakan aplikasi e-bisnis generasi berikutnya dengan cepat dan mudah.

Delphi 6 memperkenalkan fitur dan tambahan baru di bidang-bidang berikut: IDE, Internet, XML, Kompilator, COM / Active X, dukungan Database…
Terlebih lagi, Delphi 6 menambahkan dukungan untuk pengembangan cross-platform – sehingga memungkinkan kode yang sama untuk dikompilasi dengan Delphi (di Windows) dan Kylix (pada Linux). Beberapa tambahan termasuk: Dukungan untuk Web Services, mesin DBExpress, komponen dan kelas-kelas baru …

• Delphi 7 (2001)

Borland Delphi 7 Studio menyediakan jalur migrasi ke Microsoft. NET dimana pengembang telah lama menunggu. Dengan Delphi, pilihan-pilihan selalu milik Anda: Anda berada dalam kendali lengkap studio pengembangan e-bisnis – dengan kebebasan untuk dengan mudah mengambil solusi lintas-platform untuk Linux.

• Delphi 8

Untuk ulang tahun Delphi ke-8, Borland mempersiapkan rilis paling signifikan Delphi: Delphi 8 tetap menyediakan Visual Component Library (VCL) dan Component Library for Cross-platform (CLX) yang dikembangkan untuk Win32 (dan Linux) serta fitur-fitur baru dan framework, kompiler, IDE, dan perbaikan waktu desain.

• Delphi 2005 (part of Borland Developer Studio 2006)

Diamondback adalah nama kode Delphi rilis berikutnya. IDE Delphi baru mendukung banyak personalitas.  Dukungan Delphi untuk Win 32, Delphi for. NET dan C # …

• Delphi 2006 (part of Borland Developer Studio 2006)

BDS 2006 (code named “Dexter”) termasuk dukungan lengkap RAD untuk C + + dan C # di samping Delphi untuk Win32 dan Delphi untuk bahasa pemrograman .NET.

• Codegear Delphi 2007

Delphi 2007 (Delphi 11), versi pertama oleh CodeGear, dirilis pada 16 Maret 2007. Tersedia fitur baru termasuk dukungan untuk MS Build dan perangkat tambahan untuk Visual Component Library untuk Windows Vista, namun fitur C # Builder dihilangkan sejak rilis ini karena penjualannya tidak setinggi yang diharapkan karena Visual Studio juga menawarkan C #. Form desainer Windows untuk Delphi. NET juga dihilangkan di Delphi 2007 karena merupakan bagian dari .NET framework dan telah berubah secara drastis oleh Microsoft dalam .NET 2.0 yang meningkatkan IDE. Sekarang Delphi.NET telah diganti dengan Delphi Prism. Prisma sejauh ini mampu melakukan lintas platform seperti mendukung Mono. NET libraries. CodeGear dalam Delphi 2007 juga memperkenalkan DBX4 sebagai versi dbExpress berikutnya.
Borland CodeGear dijual untuk Embarcadero Technologies pada tahun 2008. Embarcadero mempertahankan divisi CodeGear yang membuat oleh Borland untuk mengidentifikasi perlengkapan dan database yang ditawarkan, dan Embarcadero telah memutuskan untuk mengidentifikasi perangkat databasenya di bawah DatabaseGear moniker.

• Embarcadero Delphi 2009

Delphi 2009 (Delphi 12, code named Tiburon), menambahkan banyak fitur baru seperti pengerjaan ulang sepenuhnya VCL dan RTL untuk dukungan penuh Unicode, dan menambahkan metode anonim generik untuk pembangunan Win32. Dukungan untuk. NET development dihilangkan dari IDE Delphi. Sebuah produk baru, Delphi Prism, sudah menawarkan pengembangan .NET di tempatnya. Delphi Prism adalah plug-in bahasa Visual Studio, dan tidak menyertakan RTL atau VCL untuk kode port.

• Embarcadero Delphi 2010

Versi terbaru, Delphi 2010 (Delphi 14, angka 13 ini diabaikan), dirilis pada 25 Agustus 2009 adalah rilis Unicode kedua dari Delphi. Ini mencakup sistem compiler RTTI terbaru, dukungan untuk Windows 7 langsung 2D, layar sentuh dan gerak tubuh, source code formatter, debugger visualizers dan pilihan untuk memiliki palet komponen gaya lama dalam IDE. Sistem RTTI terbaru membuat executable yang lebih besar dari versi sebelumnya.

Reference
[1] http://delphi.about.com/
[2] http://en.wikipedia.org/

Ada beberapa teknik dasar kriptografi, antara lain: Substitusi, Blocking, Permutasi, Ekspansi, dan Pemampatan (Compaction). Nah…. dalam tulisan ini saya mau membahas sedikit tentang teknik dasar kriptografi menggunakan teknik Blocking.

Sistem enkripsi terkadang membagi plaintext menjadi blok-blok yang terdiri dari beberapa karakter yang kemudian dienkripsikan secara independen. Plaintext dimasukkan kedalam matriks yang mempunyai jumlah kolom yang sudah didefinisikan, sedangkan jumlah barisnya bergantung pada panjang plaintext. Misal:
Plaintext: Math 310 Proves!
Setelah dimasukkan kedalam matriks:

Dengan menggunakan enkripsi blocking dipilih jumlah lajur dan kolom untuk penulisan pesan. Jumlah lajur atau kolom menjadi kunci bagi kriptografi dengan teknik ini. Plaintext dituliskan secara vertikal ke bawah berurutan pada lajur, dan dilanjutkan pada kolom berikutnya sampai seluruhnya tertulis. Ciphertext-nya adalah hasil pembacaan plaintext secara horizontal berurutan sesuai dengan blok-nya. Jadi ciphertext yang dihasilkan dengan teknik ini adalah:
M3r!a1ot0vh e Ps

Plaintext dapat pula ditulis secara horizontal dan ciphertextnya adalah hasil pembacaan secara vertikal.
Untuk potongan source codenya dalam bahasa pemrograman Java adalah sebagai berikut:

//Blocking
int [][] plainBlock = null; //membuat array dinamis dengan jumlah kolom = panjang kunci
int kolom = key.length;
int baris = 0;

//menghapus nilai 0 pada matrik
String tempChiper = "";
for (int x = 0; x < chiperBlock.length; x++) {
if (chiperBlock[x] != 0) {
tempChiper += (char) chiperBlock[x];
}
}
System.out.println("\nCHIPERTEXT BLOCKING: " + tempChiper);
Untuk dekripsi, tinggal membalik langkah pembacaan matriksnya. Silahkan kembangkan sendiri dan selamat mencoba!!.

Mungkin kalian sudah mengenal bahasa pemrograman berbasias bahasa pascal,berikut adalah salah satu contoh program pascal dengan menggunakan record, saya akan coba terangakan step by step :

1. Program pengiputan data mahasiswa :

program pengolahan_mhs;
uses wincrt;
const
a=’++++++++++++++++++++++++++++++++++++++++++++++’;
b=’ PENGOLAHAN DATA MAHSISWA ‘;
type
record_mhs=record
nim:string[6];
nama:string[20];
alamat:string[25];
tgl_lhr:string[8];
nilai:char;
end;
type_file_mhs=file of record_mhs;

procedure pemasukan_dan_perekaman_data
(var file_mhs:type_file_mhs;nmr_rec:word);

var
posX:byte;
data_mhs:record_mhs;
begin
with data_mhs do
begin
clrscr;
gotoxy(5,2);writeln(a);
gotoxy(5,3);writeln(b);
gotoxy(5,4);writeln(a);
gotoxy(5,5);
write(‘pemasukan data ke-’,nmr_rec:3);
gotoxy(5,7);write(‘nim [6 digit]:’);
posX:=wherex;
gotoxy(5,8);
write(‘nama :’);
gotoxy(5,9);
write(‘alamat :’);
gotoxy(5,10);
write(‘tanggal lahir:’);
gotoxy(5,11);
write(‘NILAI : [A] 100-85 [B] 84-75′);
gotoxy(5,12);
write(‘ [C] 74-55 [D] 54-40 [E] 39-0 ‘);
gotoxy(posX,7);readln(nim);
gotoxy(posX,8);readln(nama);
gotoxy(posX,9);readln(alamat);
gotoxy(posX,10);readln(tgl_lhr);
gotoxy(posX,11);
repeat
nilai:=readkey
until nilai in['A'..'E'];
write(nilai);
gotoxy(posX+7,11);readln(nilai);
end;
write(file_mhs,data_mhs);
end;

procedure menambah_data;

var
file_mhs:type_file_mhs;
jawaban:char;
nmr_record,nmr_komponen:word;
begin
clrscr;
assign(file_mhs,’MAHASISWA.DAT’);
rewrite(file_mhs);
reset(file_mhs);
nmr_komponen:=filesize(file_mhs);
seek(file_mhs,nmr_komponen);
nmr_record:=nmr_komponen+1;
repeat
pemasukan_dan_perekaman_data(file_mhs,nmr_record);
inc(nmr_record);
gotoxy(5,15);
write(‘tambah data lagi [Y/T]‘);
repeat
jawaban:=readkey
until jawaban in['Y','y','T','t'];
until upcase(jawaban)=’T';
write(upcase(jawaban));
end;
begin
menambah_data;
writeln;write(‘tekan enter’);
readln;
end.

2. Hasil output pengolahan mahasiswa :

program tampilan_mhs;
uses wincrt;
const
a=’+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++’;
b=’ OUTPUT DATA MAHASISWA ‘;
c=’~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~’;

type
record_mhs=record
nim:string[6];
nama:string[20];
alamat:string[25];
tgl_lhr:string[8];
nilai:char;
end;
type_file_mhs=file of record_mhs;

procedure menampilkan_semua_data;

var
file_mhs:file of record_mhs;
point:string[10];
data_mhs:record_mhs;

begin
clrscr;
assign(file_mhs,’MAHASISWA.DAT’);
reset(file_mhs);
writeln;
writeln(a);
writeln(b);
writeln(a);
writeln;
writeln;
writeln(c);
writeln(‘ NIM NAMA ALAMAT TANGGAL LAHIR NILAI’);
writeln(c);
while not Eof (file_mhs)do
with data_mhs do
begin
read(file_mhs,data_mhs);
case nilai of
‘A’:point:=’100-85′;
‘B’:point:=’84-75′;
‘C’:point:=’74-55′;
‘D’:point:=’54-40′;
‘E’:point:=’39-0′;
end;

writeln(NIM:5,NAMA:10,alamat:12,tgl_lhr:14,’ ‘,nilai:15);
end;
writeln(c);
end;
begin
menampilkan_semua_data;
writeln;write(‘ket:’);
writeln;write(‘[A] 100-85′);
writeln;write(‘[B] 84-75′);
writeln;write(‘[C] 74-55′);
writeln;write(‘[D] 54-40′);
writeln;write(‘[E] 39-0′);
writeln;
write(‘tekan ENTER……..’);
readln;
end.

Sekian dulu coretan dari saya
Mohon tinggalkan komentar anda
Terima kasih

Hai frend, ketemu lagi di Java lesson 8, kali ini kita akan membahas tentang array, dimana array yang akan kita pelajari adalah array berdimensi satu. Untuk lebih jelasnya kita lihat saja listing nya

Penjelasan :
Line 3 : int nilai[] = new int[3];
Ini adalah deklarasi variabel array berdimensi satu di tandai dengan tanda kurung kotak ([]).
Line 4 :
Duh.., maaf yah tidak lengkap. saat aku upload aq pikir sudah menyelesaikan tulisan ini, tapi jangan kuatir.., satu dua hari ini aku akan melanjutkannya.., tunggu yah..!

udah lama nih gag ngeblog.

gara2 keasikan coding sih (rada mekso).hahaha…..

teman2 udah pernah tau google map kan? kalo belum tau ya cekidot dulu gan!(welah kaskusna kebawa).

seperti yang dijelaskan google. bahwa Google Maps API adalah service dari google yang bisa kita gunakan secara cuma-cuma alias gratis. hehehe kita kan suka yang gratisan, sukur2 dapat duit.

Google Maps API memungkinkan Kita menampilkan(embed) Google Maps dalam halaman web kita sendiri dengan JavaScript. API menyediakan sejumlah utilitas untuk memanipulasi peta (seperti pada halaman web http://maps.google.com) dan menambahkan konten ke peta melalui berbagai layanan(fungsi2 yang ada pada google map), memungkinkan Anda untuk membuat aplikasi peta yang interaktif pada website Anda. (sedikit ngedit dari translator)

Yang masih pingin tau API itu apa silakan dicari di wikipedia.

maaf cuman sedikit sharing soalnya masih banyak kerjaan, kalo mau tanya2 silahkan.

ngga kerasa udah jam 2 lewat 19, sbntr lg lg subuh…

udah berapa hari ini tidur telat terus..

Entah ni bawaan dari ngenet yang berkepanjangan atau…..

gara-gara pikir nilai evolusi…

Hampir pasrah sama matkul  evolusi…

ngga tau kenapa kayaknya bahasa java sulit bgt buatqu..

ngga ngerti en ngga paham sama sekali.. dasarnya mengerti dikit-dikit…

apalagi kalo kepepet tugas.. hehehe…

idenya kadang keluar semua…

cuma….

yaa itu tadi… masih ngga paham…

Pengen belajar lebih dalam tapi lagi berusaha mendalami VB..

Sebenarnya logikanya sama cuma yaa… bhs syntaxnya aja beda…

Cari tutorial… downloadnya setengah mati..

aLhasil malah download MP3…. hehehehe…..

Tp sbenarnya dari hati kecilqu (halahh….) tertarik sama Java..

Tapi cm males aja mpelajarinya… (itu mslhx..)

Soale waktunya terjepit bgt sama belajar yg lainnya…

Palagi tiap hari tugas…

Tapi yoO tetep ChaYoO..!!!

Tp qu yakin dan pcaya dlm nama Tuhan ada kemenangan…

Amien sodara….!!

sebelumnya mungkin sudah pernah tahu apa itu variabel dalam matematika.
Variabel dalam bahasa pemrograman juga memiliki pengertian yang sama yaitu sebagai tempat menampung nilai..

misalnya di dalam matematika

diketahui :

x=5;

y=10;

ditanya: berapa nilai dari x*y??

bisa jawab kan?? yang mana variabelnya??

bener, yang variabel itu x dan y.

penggunaannya sama saja dalam bahasa pemrograman jadi tidak ada perbedaan sama sekali..

jadi gampangnya, variabel itu tempat menampung nilai agar membedakan sebuah nilai dengan nilai lainnya..

nah di bawah ini contoh pendeklarasian di bahasa pemrograman.

int x=5; atau int y; (biasa di pakai di bahasa c/c++ atau java)

$nilai=7;(biasanya di pakai di bahasa php)

untuk yang pertama yaitu “int x=5″, yang menjadi variable itu “x” nya dan bernilai 5….

yang berikut nya yaitu “int y”, yang menjadi variabel itu “y” nya dan bernilai (terkadang random dan terkadang nol)

int itu apa??? itu merupakan tipe data dari nilai yang kita akan set dalam variabel tersebut…apa itu?? jadi gini tipe data=jenis nilai… klo variabel jenisnya  huruf ya hanya bisa di masukin huruf aja, kalimat ya kalimat aja, dan angka ya angka aja.. ga bisa dimasukin dengan jenis nilai yang lain…

yang berikutnya yaitu “$nilai=7″, nah yang menjadi variabel nya itu “$nilai”,, ingat ya harus pake tanda “$”.. dikarenakan dalam bahasa php tidak mengenal adanya tipe data,, jadi semua nilai bisa di masukin dalam sebuah variabel (terserah anda aja heheh)…

mungkin cukup sekian penjelasan yang membingungkan ini,, maaf bila ada kesalahan,

OOP (Object Oriented Programming) merupakan konsep baru dalam teknik membangun program yang telah dimulai dengan lahirnya bahasa Simula 67 pada akhir tahun 1960-an. Sebelumnya, orang-orang atau programmer lebih banyak menggunakan konsep pemmrograman terstruktur yang begitu mendominasi. Sejak saat itu muncul bahasa-bahasa pemrograman lain yang menggunakan konsep OOP. Bahasa-bahasa lain tersebut adalah Smalltalk, LOOPS, Flavors, Object Pascal, Neon, C++, Eiffel, dan Actor.

Terlepas dari cara berpikir atau berlogika terstruktur, OOP mencoba melihat permasalahan lewat pengamatan dunia nyata yang dianggap sebagai object-object. Dimana object-object tersebut dapat berdiri sendiri (independen) dan antar object-object tersebut dapat saling berinteraksi. OOP merupakan cara yang ampuh untuk digunakan dalam pembangunan, pemeliharaan dan pengembangan program. Bahasa-bahasa baru generasi sekarang pada umumnya sudah memiliki kemampuan berorientasi object.

Dalam OOP ada beberapa istilah penting, seperti Object, Class, Method Enkapsulasi, Inheritance, dan Polimorfisme.
Object merupakan sesuatu yang memiliki identitas (nama), pada umumnya juga memiliki data tentang dirinya maupun object lain dan mempunyai kemampuan untuk melakukan sesuatu dan bisa bekerja sama dengan objek lainnya. Pada dasarnya semua benda yang ada di dunia dapat dianggap sebagai sebuah object. Rumah, mobil, sepeda motor, meja, dan komputer merupakan contoh-contoh object yang ada di dunia nyata. Setiap object memiliki dua karakteristik yang utama yaitu, atribut dan behavior. Atribut merupakan status object dan behavior merupakan tingkah laku dari object tersebut. Contoh sederhana adalah sepeda. Object sepeda memiliki atribut : pedal, roda, dan gigi, kecepatan serta memiliki tingkah laku seperti pacu dan rem. Sama seperti penggambaran di dunia nyata, pengembangan program dengan konsep OOP juga menggunakan model object yang akan menyimpan atributnya dalam variabel dan tingkah lakunya dalam method atau fungsi-fungsi/prosedur.

Class berbeda dengan object. Class merupakan prototipe yang mendefinisikan variabel dan method secara umum. Tetapi, object adalah hasil instansiasi dari suatu class. Object-object yang memiliki kondisi yang berbeda seperti sepeda A pada gigi posisi 4 dan sepeda B pada gigi posisi 6 dapat disatukan dalam satu “class sepeda” berdasarkan kondisi umum sepeda yang dapat mengubah posisi giginya. Untuk dapat memahami Konsep OOP dengan baik seorang pemrogram harus dapat membedakan antara object dengan class.

Method adalah fungsi dan prosedur atau behavior dari sebuah object. Contohnya pada sepeda motor ada behavior seperti pacu, rem, nyalakan lampu depan dan lain-lain.

Enkapsulasi adalah pengkombinasian/pembungkusan antara data dan prosedur ataupun fungsi (method) yang memanipulasinya ke dalam sebuah object pada bagian yang terlindungi sehingga data-datanya tidak mudah diakses langsung dari luar. Manfaat dari enkapsulasi ialah kode sumber dari sebuah object dapat dikelola secara independen dari kode object yang lain. Selain itu, dengan enkapsulasi kita bisa menyembunyikan informasi-informasi yang tidak perlu diketahui oleh object lain. Enkapsulasi merupakan salah satu karakteristik utama dalam konsep OOP.

Inheritance berdasarakan kamus bahasa Inggris berarti warisan. Dalam konsep OOP, sesuai dengan artinya Inheritance adalah pewarisan atribut atau method pada sebuah class yang diperoleh dari sebuah class yang terdefinisi sebelumnya. Sebagai contoh, class sepeda motor mewarisi atribut dari class sepeda sehingga class sepeda motor juga memiliki atribut-atribut seperti roda, gigi, dan kecepatan. Tetapi sepeda motor memiliki atribut-atribut baru seperti bahan bakar, nomor polisi, kapasitas mesin dan lain-lain.

Bagian lain dalam konsep OOP yaitu Polimorfisme. Polimorfisme adalah suatu sifat yang memungkinkan nama method yang sama dapat melakukan tindakan yang berbeda. Contohnya ialah method pacu yang terdapat pada sepeda motor dan sepeda. Ingat bahwa motor adalah kelas turunan dari sepeda. Method pacu pada kedua kelas sama-sama untuk menambah kecepatan. Namun pacu pada motor berbeda dengan pacu pada sepeda. Pacu pada motor ialah mengurangi (membakar) bahan bakar, sedangkan pacu pada sepeda ialah mengurangi stamina pengendara. Keduanya menggunakan nama yang sama, pacu, namun ternyata merujuk pada pekerjaan spesifik yang berbeda.

Kesimpulannya, pemrograman dengan konsep OOP diunggulkan sebagai cara pemrograman yang dapat mengatasi kekompleksitasan sebuah program. Pada masa sekarang kebanyakan program yang dibuat berukuran besar sehingga sangat sukar untuk dimodifikasi dan di-maintenance. Banyak waktu yang tersita untuk memelihara program-program seperti ini. Dengan menggunakan konsep OOP hal ini dapat diatasi karena program akan menjadi mudah dirancang, dipelihara dan dikembangkan, serta mudah dipakai kembali (dikembangkan) untuk membuat program lain.

sumber: belajar program

http://www.belajarpemrograman.net/2008/01/27/belajar-object-oriented-programming-oop-dengan-java/

Informasi lebih lanjut: 1 dan 2

http://belesat.files.wordpress.com/2008/01/pemrograman-java.pdf

http://poss.ipb.ac.id/files/JENI-Intro1-Bab04-Dasar-Dasar%20Pemrograman.pdf