Senin, 27 Juni 2011

pemetaan rumah sakit dan klinik di kabupaten karawang






<html>
<head><title>rumah sakit dan klinik di Kab. Karawang</title>

</head>

<body style="background-color:pink;">

<tr>
<td colspan="2"  align="center"><img src="banner2.jpg" height="125" width="1330" bgcolor="#66FFFF"></td>
</tr>

<br>
<h1 align="center">Program Pemetaan RumahSakit Dan Klinik Di kab. karawang</h1>
<br>

<script language = "javascript">
<!--
var nilaiacuan = 10000;
var takterdefinisi = -1;
var namaverteks     = new Array('Rs. proklamasi',' terminal tj pura','Rs.islam karawang','lampu merah bypass','Rs.dewi sri','klinik cito','Rs.bayukarta','klinik gempol','Rs.cito','klinik central medika','RSUD','bundaran kertabumi','klinik tuparev','bundaran MGM','perempatan johar','Rs.wisma asih');

var matriks = new Array();

function init()    
{
 var x = '~';
 matriks[0]=new Array(0,3,x,x,x,x,x,x,x,x,x,x,x,x,x,x);
 matriks[1]=new Array(3,0,1,x,x,x,x,x,x,x,x,x,x,x,x,x);
 matriks[2]=new Array(x,1,0,1,x,x,x,x,x,x,x,x,x,x,x,x);
 matriks[3]=new Array(x,x,1,0,2,x,x,x,x,x,x,x,x,x,x,x);
 matriks[4]=new Array(x,x,x,2,0,2,x,x,x,x,x,4,x,x,x,x);
 matriks[5]=new Array(x,x,x,x,2,0,1,x,x,x,x,x,x,x,x,x);
 matriks[6]=new Array(x,x,x,x,x,1,0,1,x,x,x,x,x,x,x,x);
 matriks[7]=new Array(x,x,x,x,x,x,1,0,1,x,x,x,x,x,x,x);
 matriks[8]=new Array(x,x,x,x,x,x,x,1,0.3,x,x,x,x,x,x);
 matriks[9]=new Array(x,x,x,x,x,x,x,x,3,0,4,x,x,x,x,x);
 matriks[10]=new Array(x,x,x,x,x,x,x,x,x,4,0,2,x,x,x,x);
 matriks[11]=new Array(x,x,x,x,4,1,x,x,x,x,2,0,1,x,x,x);
 matriks[12]=new Array(x,x,x,x,x,x,x,x,x,x,x,1,0,1,x,x);
 matriks[13]=new Array(x,x,x,3,x,x,x,x,x,x,x,x,1,0,1,x);
 matriks[14]=new Array(x,x,x,x,x,x,x,x,x,x,x,x,x,1,0,1);
 matriks[15]=new Array(x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,1,0);           
 }

function bobot(a,b)
{
 return matriks[a][b];
}

function fungsi(list, list2)
{
 var dari = parseInt(list);
 var ke   = parseInt(list2);

 jumlahverteks = matriks.length;
 awal = dari;
 d = ke;

 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;
  var 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;
   } 
   alert ("Jalur terpendek dari " +namaverteks[dari]+ " ke " +namaverteks[d]+ " : " + posisi[i] + " km (" + lintasan + ")");
  }
 else
  {
   alert (" Maaf Tidak Ada Jalan Ke Tempat Yang Anda Tuju ");
  }
}

init();

//-->
</script>
<p align="center">
<img src="x2.png" alt="Karawang Map" width="1000" height="500" border="5" align="center">
<p align="center">
<tr>
<td colspan="3"  align="center"><img src="fred.png" height="250" width="450" bgcolor="#66FFFF"></td>
</tr>
</p>
<br>

<form>
<p align="center">
 <font>Anda pergi dari : </font>
  <select name="Dari">
   <option value="0">Rs. Proklamasi</option>
   <option value="1">Terminal tj.pura</option>
   <option value="2">RS. ISLAM Karawang</option>
   <option value="3">Lampu Merah Bypass</option>
   <option value="4">RS. DewiSri</option>
   <option value="5">Klinik Cito</option>
   <option value="6">Rs. Bayukarta</option>
   <option value="7">Klinik Gempol</option>
   <option value="8">Rs. Cito</option>
   <option value="9">Klinik Central Medika</option>
   <option value="10">RSUD </option>
   <option value="11">Bundaran kertabumi </option>
   <option value="12">Klinik Tuparev</option>
   <option value="13">Bundaran MGM</option>
   <option value="14">Perempatan johar</option>
   <option value="15">Rs. Wisma Asih</option>
   </select>

 <font>Hendak ke : </font>
  <select name="Ke">
   <option value="0">Rs. Proklamasi</option>
   <option value="1">Terminal tj.pura</option>
   <option value="2">Rs. Islam karawang</option>
   <option value="3">Lampu merah bypass</option>
   <option value="4">Rs. dewi sri</option>
   <option value="5">Klinik cito</option>
   <option value="6">Rs. bayukarta</option>
   <option value="7">Klinik gempol</option>
   <option value="8">Rs. cito</option>
   <option value="9">Klinik central medika</option>
   <option value="10">RSUD</option>
   <option value="11">Bundaran kertabumi</option>
   <option value="12">Klinik tuparev</option>
   <option value="13">Bundaran MGM</option>
   <option value="14">Perempatan johar</option>
   <option value="15">Rs. Wisma Asih</option>
   </select>
   </p>

<p align="center">
 <input type="button" value="Tampilkan Jalur Terpendek" onclick ='fungsi(Dari.value, Ke.value)'>   
</br>
</p>
</form>
<hr>
<p align="center">Copyright. STMIK Kharisma Karawang - Teknik Informatika - 2011</p>

<p align="center">PROGRAM PEMETAAN RUMAH SAKIT DAN KLINIK KABUPATEN KARAWANG</p>

</body>
</html>

Rabu, 08 Juni 2011

linkedlist

<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("Computer Networking");
document.write("Isi LinkedList <br>");
document.write("--------------- <br>");
for (i=0; i<4; i++)
{
document.write(list.Item(i) + "<br>") ;
}
document.write("--------------- <br>");
alert("Isi LinkedList Awal =" + list.Item(1));
alert("Item 1 pada Linked list dibuang, yaitu = " +list.Item(1));
list.Buang(1);
document.write("Isi LinkedList Terakhir <br>");
document.write("--------------- <br>");
for (i=0; i<4; i++)
{
document.write(list.Item(i) + "<br>") ;
}
document.write("--------------- <br>");
//-->
</script>
</body>
</html>