<html><head>
<script Language = "JavaScript">
function urutkan (form)
{
DataKosong = false;
DataInputan = form.Data.value;
InputData = DataInputan.split(",");
for (var i=0; i < InputData.length; i++)
{
InputData[i] = parseInt (InputData[i], 10);
if (isNaN (InputData[i]))
{
DataKosong = true;
break;
}
}
InputData = bubbleSort (InputData, 0, InputData.length - 1);
if (DataKosong)
{
alert ("Silakan entri dulu Data, Pisahkan dengan tanda Koma");
form.Data.focus();
}
else
form.Hasil.value = DataString (InputData, 0);
}
function DataString (ArrayData, Angka)
{
if ((ArrayData.length - 1) >= Angka)
return (ArrayData[Angka] + "," + DataString (ArrayData, (Angka+1)));
else
return "";
}
function bubbleSort (ArrayData, Mulai, MulaiBaru)
{
for (var i = MulaiBaru - 1; i >= Mulai; i--)
{
for (var j = Mulai; j <= i; j++)
{
if (ArrayData[j+1] < ArrayData[j])
{
var DataTemporer = ArrayData[j];
ArrayData[j] = ArrayData[j+1];
ArrayData[j+1] = DataTemporer;
}
}
}
return ArrayData;
}
</script></head>
<body>
<center>
<form>
Masukkan Deretan Angka, Pisahkan dengan Koma :
<hr>
<input type=text name=Data size=30 value="5,6,8,5,12,4,8,4,20">
<br>
<br>
<input type=button value="urutkan" onClick="urutkan(this.form)">
<br>
<br>
<br>
Hasil Pengurutan :
<hr>
<input type=text name=Hasil size=30>
</form>
</center>
</body>
</html>
Selasa, 23 Juni 2009
Praktikum 12 - Modul 8 - bubbleSort - Ascending
Praktikum 11 - Modul 7 - Graph /Graf
<html>
<head><title>Dijkstra Algoritma</title>
<script>
<!--
alert ("Taet Dijkstra");
//-->
</script>
</head>
<body>
<script language = "javascript">
var NilaiAcuan = 10000;
var TakTerdefinisi = -1;
var NamaVerteks = new Array ('A','B','C','D','E','F');
var Matriks = new Array (6);
function Bobot (a,b)
{
return Matriks [a] [b];
}
function Dijkstra (JumlahVerteks,Awal,d)
{
var Posisi = new Array (JumlahVerteks);
var i;
var Kunjungan = new Array (JumlahVerteks);
var Sebelum = new Array (JumlahVerteks);
for (i=0; i<JumlahVerteks; i++)
{
Posisi [i] = NilaiAcuan;
Sebelum [i] = TakTerdefinisi;
Kunjungan[i] = false;
}
Posisi [Awal] = 0;
var Verteks;
for (Verteks =0; Verteks<JumlahVerteks; Verteks++)
{
var JarakTerpendek = NilaiAcuan, Berhenti = -1;
for (i=0; i<JumlahVerteks; i++)
{
if (!Kunjungan[i])
{
if (Posisi[i] <= JarakTerpendek)
{
JarakTerpendek = Posisi[i]; Berhenti = i;
}
}
}
Kunjungan[Berhenti] = true;
for (i=0; i<JumlahVerteks; i++)
{
if (!Kunjungan[i])
{
var w = Bobot (Berhenti, i);
if (Posisi [Berhenti]+ w <Posisi[i])
{
Posisi[i] = Posisi[Berhenti] + w;
Sebelum [i] = Berhenti;
}
}
}
}
i=d;
if (Posisi [i] <NilaiAcuan)
{
var Lintasan = NamaVerteks [i];
var Verteks = i;
while (Verteks>0)
{
Verteks = Sebelum [Verteks];
if (Verteks>0) Lintasan = NamaVerteks[Verteks] + '->' + Lintasan;
{
message ("Jarak :" +Posisi[i]+' ('+Lintasan+')'+'<br>');
}
else
{
message ("Tidak ada Jalur");
}
}
function init () {
var X = NilaiAcuan;
Matriks [0] = new Array (0,2,3,X,x,x);
Matriks [1] = new Array (2,o,3,6,x,x);
Matriks [2] = new Array (3,3,0,3,5,x);
Matriks [3] = new Array (x,6,3,0,1,3);
Matriks [4] = new Array (x,x,5,1,0,1);
Matriks [5] = new Array (x,x,x,3,1,0);
var Awal='<pre>';
Awal = Awal + 'A--2-B-6--D--3-F'+'<br>';
Awal = Awal + ' \ | /| / '+'<br>';
Awal = Awal + ' 3 3 3 1 1 '+'<br>';
Awal = Awal + ' \ | / | / '+'<br>';
Awal = Awal + ' \|/ |/ '+'<br>';
Awal = Awal + ' C--5-E '+'<br>;
Awal = Awal +'</pre>';
message (Awal.replace (/(\d)+/g, '<font color="red">$1</font>');
}
init ();
var Dari=0; // A
var Ke =5; // F
Dijkstra(Matriks.length,Dari,Ke);
//-->
</script>
</body>
</html>
Praktikum 10 - Modul 6 - Doubly Linked List
<html>
<head>
<title>Struktur Data Linked List</title>
</head>
<body>
<script language = "JavaScript">
<!--
function DoublyLinkedList()
{
this._Kepala = null;
this._Ekor = null;
this._Panjang = 0;
}
DoublyLinkedList.prototype =
{
constructor: DoublyLinkedList,
Tambah: function (data)
{
var node = {data: data, next: null, prev: null};
if (this._Panjang == 0)
{
this._Kepala = node;
this._Ekor = node;
}
else
{
this._Ekor.next = node;
node.prev = this._Ekor;
this._Ekor = node;
}
this._Panjang++;
},
ItemList: function(index)
{
if (index > -1 && index < this._Panjang)
{
var NodeTanda = this._Kepala,
i = 0;
while(i++ < index)
{
NodeTanda = NodeTanda.next;
}
return NodeTanda.data;
}
else
{
return null;
}
},
Buang: function(index){
if (index > -1 && index < this._Panjang)
{
var NodeTanda = this._Kepala, i = 0;
if (index === 0)
{
this._Kepala = NodeTanda.next;
if (!this._Kepala)
{
this._Ekor = null;
}
else
{
this._Kepala.prev = null;
}
}
else
if (index === this._Panjang -1)
{
NodeTanda = this._Ekor;
this._Ekor = NodeTanda.prev;
this._Ekor.next = null;
}
else
{
while(i++ < index)
{
NodeTanda = NodeTanda.next;
}
NodeTanda.prev.next = NodeTanda.next;
}
this._Panjang--;
return NodeTanda.data;
}
else
{
return null;
}
},
Ukuran: function(){
return this._Panjang;
},
toArray: function(){
var result = [],
NodeTanda = this._Kepala;
while(NodeTanda){
result.push(NodeTanda.data);
NodeTanda = NodeTanda.next;
}
return result;
},
toString: function(){
return this.toArray().toString();
}
}
var List = new DoublyLinkedList();
List.Tambah("Teknik Informatika");
List.Tambah("Teknik Komputer");
List.Tambah("Komputerisasi Akuntansi");
List.Tambah("Computer Networking");
document.write("Isi LinkedList <br>");
document.write("--------------- <br>");
for (i=0; i<4; i++)
{
document.write(List.ItemList(i) + "<br>") ;
}
document.write("--------------- <br>");
alert("Isi LinkedList Awal =" + List.ItemList(0));
alert("ItemList 1 pada Linked List diBuang, yaitu = " +List.ItemList(1));
List.Buang(1);
document.write("<br>Isi LinkedList Terakhir <br>");
document.write("--------------- <br>");
for (i=0; i<4; i++)
{
document.write(List.ItemList(i) + "<br>") ;
}
document.write("--------------- <br>");
//-->
</script>
</body>
</html>
Selasa, 19 Mei 2009
Praktikum 9 - Modul 6 - Linked List
<HTML>
<html>
<head>
<title>Struktur Data Linked List</title>
</head>
<body>
<script language = "JavaScript">
<!--
function LinkedList()
{
this._panjang = 0;
this._kepala = null;
}
LinkedList.prototype =
{
constructor: LinkedList,
//Membuat Metode untuk Menambah Data Kedalam List
Tambah: function (data)
{
//Membuat Node List
var node = {data: data, next: null}, NodeTanda;
//Periksa Isi List
if (this._kepala === null)
{
this._kepala = node;
}
else
{
NodeTanda = this._kepala;
while (NodeTanda.next)
{
NodeTanda = NodeTanda.next;
}
NodeTanda.next = node;
}
this._panjang++
},
//Membuat metode Untuk Menunjuk Item Data
Item: function (index)
{
if (index > -1 && index < this._panjang)
{
var NodeTanda = this._kepala,
i = 0;
while (i++ < index)
{
NodeTanda = NodeTanda.next;
}
return NodeTanda.data;
}
else
{
return null;
}
},
//Membuat metode Untuk Membuang Elemen List
Buang: function (index)
{
if (index > -1 && index < this._panjang)
{
var NodeTanda = this._kepala, previous, i = 0;
if (index === 0)
{
this._kepala = NodeTanda.next;
}
else
{
while (i++ < index)
{
previous = NodeTanda;
NodeTanda = NodeTanda.next;
}
previous.next =NodeTanda.next;
}
this._panjang--;
return NodeTanda.data;
}
else
{
return null;
}
},
//Membuat metode Untuk Mengetahui Jumlah Elemen List
Ukuran: function()
{
return this._panjang;
},
//Membuat metode Untuk Membentuk Array
toArray: function()
{
var result = [],
NodeTanda = this._kepala;
while (NodeTanda)
{
result.push (NodeTanda.data);
NodeTanda = NodeTanda.next;
}
return result;
},
//Membuat metode Untuk Konversi ke String
toString: function()
{
return this.toArray().toString();
}
}
var list = new LinkedList ();
list.Tambah("Teknik Informatika");
list.Tambah("Teknik Komputer");
list.Tambah("Komputerisasi Akuntansi");
list.Tambah("Komputer Networking");
document.write("Isi Linked List <br>");
document.write("--------------- <br>");
for (i=0; i<4; i++)
{
document.write(list.Item(i) + "<br>");
}
document.write("--------------- <br>");
alert("Isi Linked List Awal =" +list.Item(0));
alert("Item 1 Pada Linked List dibuang, Yaitu =" +list.Item(1));
list.Buang(1);
document.write("Isi Linked List Terakhir <br>");
document.write("---------------- <br>");
for (i=0; i<4; i++)
{
document.write(list.Item(i) + "<br>");
}
document.write("---------------- <br>");
//-->
</script>
</body>
</html>
Selasa, 12 Mei 2009
Praktikum 8 - Modul 5 - Queue - Program 2
<HTML>
<HEAD>
<TITLE> Struktur Data Queue </TITLE>
<SCRIPT Language = "JavaScript">
var queue = new Array ();
function Masuk (data)
{
queue.unshift (data);
}
function Keluar ()
{
var keluar_antrian = queue.pop ();
if (keluar_antrian == undefined)
return "Queue Kosong";
else
return keluar_antrian;
}
function Dalam_Antrian (list)
{
list.options.length = 0;
for (var i = 0; i < queue.length; i++)
{
var data = new Option (queue[i]);
list.options[list.options.length] = data;
}
}
</SCRIPT>
</HEAD>
<BODY>
<FORM>
<input type = text name = textSimpan>
<input type = button value = "Masuk Antrian"
onClick = 'Masuk (textSimpan.value);
textSimpan.value = "";
Dalam_Antrian (Visualisasi);'>
<select name = "Visualisasi" size = "10">
<option>Isi Antrian . . . .
</select>
<input type = button value = "Keluar Antrian"
onClick = "textAmbil.value = Keluar ();
Dalam_Antrian (Visualisasi);">
<input type = text name = textAmbil size = 20>
</FORM>
</BODY>
</HTML>
Praktikum 7 - Modul 5 - Queue - Program 1
<html>
<head>
<title> Program Queue dengan unshift javaScript </title>
<script language="JavaScript">
function DataQueue()
{
var queue = [];
queue.unshift(1);
queue.unshift(2);
var i = queue.pop();
document.write(i + "<br/>");
queue.unshift(3);
queue.unshift(4);
var i = queue.pop();
document.write(i + "<br/>");
}
</script>
</head>
<body>
<form name="FormStrukturData">
<input name="btnQueue" value="Queue" type="button" onClick="DataQueue();" />
</form>
</body>
</html>
Jumat, 08 Mei 2009
photo waktu iseng ..
Nha ..
karena Pak Supri'a sedang berhalangan hadiiiir .. :z
jadi kita photo-photo sebentar .. :d
klik klik klik eh nongol tuh bapak-bapak ikutan dibelakang'na .. :D
gag ada kerjaan ini teh .. :x males ng-net ..coz lab'na belum dibuka ..
males makan coz kan masih pagi baru ajah sarapan ..
jadi pada ngerumpi deyh .. :D
ada polisi yang dateng-dateng langsung ngomel-ngomel bilang gini "Yeh ieu barudak rek nararaon ka kampus lain mah belajar kalah ngarumpi .." :O
:O yaiyalah terserah dongk .. :f ngomel-ngomel sembarangan polisi teh ikuuuutaaaaaaann ajah gag di lampu merah gag dikampus ngomel mulu lakh .. :#
Sabtu, 02 Mei 2009
gag boleh ngopy .. !!
hehe :D dari judulnya ajah gag boleh ngopy maksudnya ngopy tuh meng-copy copy copy source code ini nih .. !! bukan kopi item yang ada di warung katin depan belakang kampus yang suka di minum Pak Jenal itu .. :D [ampun Pak .. :y]
nah maksudnya source code ini dipasang sih iaa biar temen-temen pada tau ajah ada program yang bisa bikin kita gag jadi tukang ngopy mulu kan klo ada tugas dari Pak Supri tuh kalian suka pada liat blog temennya terus ngopy deyh .. :D
[ :t pasti kalian bakal bilang kaya yang nggak ajahh!! :O ]
Heh .. !! Kalian tau gag seyh :o aku tuh dapet script ini darimana?? :s
sekedar pengen kalian tau ajah :x aku dapet source code ini dari buku tutorial javascript nya punya c Debby anak KA nah konon kata Debby,, dia juja pinjem dari temennya yang nama'na Herman :z tau tuh nyang mana kenal ge nggak :r iaa udah akh yang penting pinjem ajah kan udah dibalikin lagi tuh .. :D
nah ini dia bisa dipake di Internet Explorer tapi klo di Mozilla gag bisa tuwh .. :f
ngapa iaa?? :#
gag tau deyh .. :c
postingan selanjutnya bakal ngasih jawabannya atau kalian tau kenapa?? :o
kasih tau dund .. bagi-bagi iaa .. ;)
tinggal klik ajah nih bacaan Lanjuuut'na muncul deyh source code'na ..
<html>
<head>
<title>menampilkanbulan</title>
</head>
<body>
<script language="JavaScript">
<!--
var popup = "Warning!!! \n \n gag boleh ngopy yeee ...!! \n Ngetik ajah dund ..!! \n USAHA ..!! USAHA ..!!";
function noway (go)
{
if (document.all) {
if (event.button == 2) {
alert (popup);
return false;
}
}
if (document.layers) {
if (go.which == 3) {
alert (popup);
return false;
}
}
}
if (document.layers) {
document.CaptureEvents (Event.MOUSEDOWN);
}
document.onmousedown = noway;
//-->
</script>
</body>
</html>
