<html>
<head><title>Sistem Pemetaan Pom Bensin Kab. Karawang</title>
 
</head>
 
<body >
<script language = "javascript">
<!--
var nilaiacuan = 10000;
var takterdefinisi = -1;
var namaverteks = new Array('Lampu_Merah_Tanjungpura','SPBU_Tanjungpura','SPBU Kharisma','Lampu Merah By Pass','SPBU SMAN 4','SPBU Alam Sari','SPBU R.S Cito','Gerbang Perumnas','Bundaran Galuh Mas','SPBU Galuh Mas','Alun-alun Kota','Pertigaan Mal Karawang','Perum Bintang Alam','SPBU Telukjambe','SPBU Johar','Lampu Merah Johar','SPBU Lamaran','SPBU Warungbambu 1','SPBU Warung Bambu 2','Lampu Merah Jalan Baru','SPBU Klari','Lampu Merah Klari','SPBU Kosambi','Pasar Kosambi');
 
var matriks = new Array();
 
function init()      
{
 var x = '~';             
 matriks[0]=new Array(0,0.8,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x);
 matriks[1]=new Array(0.8,0,1.9,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x);
 matriks[2]=new Array(x,1.9,0,1.5,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x);
 matriks[3]=new Array(x,x,1.5,0,0.7,1.5,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x);
 matriks[4]=new Array(x,x,x,0.7,0,x,x,x,x,x,x,1.4,x,x,x,x,x,x,x,x,x,x,x,x);
 matriks[5]=new Array(x,x,x,1.5,x,0,0.9,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x);
 matriks[6]=new Array(x,x,x,x,x,0.9,0,3.8,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x);
 matriks[7]=new Array(x,x,x,x,x,x,3.8,0,2.6,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x); 
 matriks[8]=new Array(x,x,x,x,x,x,x,2.6,0,0.2,x,x,3.8,x,x,x,x,x,x,x,x,x,x,x);
 matriks[9]=new Array(x,x,x,x,x,x,x,x,0.2,0,2.1,x,x,x,x,x,x,x,x,x,x,x,x,x);
 matriks[10]=new Array(x,x,x,x,x,x,x,x,x,2.1,0,x,x,x,x,x,x,x,x,x,x,x,x,x);
 matriks[11]=new Array(x,x,x,x,1.4,x,x,x,x,x,1.6,0,x,x,x,1.4,x,x,x,x,x,x,x,x);
 matriks[12]=new Array(x,x,x,x,x,x,x,x,2.8,x,x,x,0,0.3,x,x,x,x,x,x,x,x,x,x);
 matriks[13]=new Array(x,x,x,x,x,x,x,x,x,x,x,x,0.3,0,1.6,x,x,x,x,x,x,x,x,x);
 matriks[14]=new Array(x,x,x,x,x,x,x,x,x,x,x,x,x,1.6,0,0.5,x,x,x,x,x,x,x,x);
 matriks[15]=new Array(x,x,x,x,x,x,x,x,x,x,x,1.4,x,x,0.5,0,1.2,0.6,x,x,x,x,x,x);
 matriks[16]=new Array(x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,1.2,0,x,x,x,x,x,x,x);
 matriks[17]=new Array(x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,0.6,x,0,0.6,x,x,x,x,x);
 matriks[18]=new Array(x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,0.6,0,2.5,x,x,x,x);
 matriks[19]=new Array(x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,2.5,0,0.8,x,x,x);
 matriks[20]=new Array(x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,0.8,0,1.4,x,x);
 matriks[21]=new Array(x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,1.4,0,3.2,x);
 matriks[22]=new Array(x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,3.2,0,0.8);
 matriks[23]=new Array(x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,x,0.8,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 \n(" + lintasan + ")");
  }
 else
  {
   alert ("Gk Ada jalur mas Bro!!!!");
  }
}
 
init();
 
//-->
 
</script>
 
 
 
<table border="4" cellpadding="10" cellspacing="10" bgcolor="#99FFFF" align="center">
 
<tr>
<td colspan="2"  align="center"><img src="file/header.jpg" height="125" width="1200" bgcolor="#66FFFF"></td>
</tr>
 
<tr >
<td colspan="0"  bgcolor="#66FFFF"  widht="400">
<font size="6" color="purple"><marquee>
Menentukan Rute Terpendek Dengan Menggunakan Algoritma Dijkstra
</font></marquee>
</td>
<td align="center" bgcolor="#66FFFF" >
<a href="script.html"><img src="file/script.png"></a>
<a href="data.html"><img src="file/peta.png" ></a>
<a href="index.html"><img src="file/home1.png" ></a>
 
<a href="script.html"></a>
</td>
</tr>
 
<tr>
<td colspan="0" width="800" height="500" align="center" bgcolor="#66FFFF">
<img src="file/peta spbu.jpg" width="700" height="470" border="5">
</td>
 
<td colspan="0" width="350" height="100" valign="top" align="center" bgcolor="#66FFFF">
<form><font size="5">
<img src="file/pertamina.jpg" alt="Karawang Map" width="250" height="200" border="5" align="center">
<p align="left">
    Posisi Anda :
<br><select name="Dari">
    <option value="0">Lampu Merah Tanjungpura</option>
    <option value="3">Lampu Merah By Pass</option>
    <option value="7">Gerbang Perumnas</option>
    <option value="8">Bunderan Galuh Mas</option>
    <option value="7">Gerbang Perumnas</option>
    <option value="8">Bunderan Galuh Mas</option>
    <option value="7">Gerbang Perumnas</option>
    <option value="8">Bunderan Galuh Mas</option>
    <option value="7">Gerbang Perumnas</option>
    <option value="8">Bunderan Galuh Mas</option>
    <option value="10">Alun-alun Kota</option>
    <option value="11">Pertigaan Mal Karawang</option>
    <option value="12">Perum Bintang Alam</option>
    <option value="21">Lampu Merah Klari</option>
    <option value="23">Pasar Kosambi</option>
    <option value="19">Lampu Merah Jalan Baru</option>
    <option value="19">Lampu Merah Jalan Baru</option>
    <option>-----------------------------------</option>
    <option value="1">[ 34 - 41301 ] SPBU Tanjungpura</option>
    <option value="2">[ 34 - 41344 ] SPBU Kharisma</option>
    <option value="4">[ 34 - 41349 ] SPBU SMAN 4</option>
    <option value="5">[ 34 - 41310 ] SPBU Alam Sari</option>
    <option value="6">[ 34 - 41328 ] SPBU R.S Cito</option>
    <option value="9">[ 34 - 41339 ] SPBU Galuh Mas</option>
    <option value="13">[ 34 - 41323 ] SPBU Telukjambe</option>
    <option value="14">[ 34 - 41348 ] SPBU Johar</option>
    <option value="15">Lampu Merah Johar</option>
    <option value="16">[ 34 - 41324 ] SPBU Lamaran</option>
    <option value="17">[ 34 - 41371 ] SPBU Warungbambu 1</option>
    <option value="18">[ 34 - 41352 ] SPBU Warungbambu 2</option>
    <option value="19">Lampu Merah Jalan Baru</option>
    <option value="20">[ 34 - 41341 ] SPBU Klari</option>
    <option value="22">[ 34 - 41315 ] SPBU Kosambi</option>
 
  </select></br>
 
<p align="left">
Hendak  Ke  :
<br><select name="Ke">
    <option value="0">Lampu Merah Tanjungpura</option>
    <option value="3">Lampu Merah By Pass</option>
    <option value="7">Gerbang Perumnas</option>
    <option value="8">Bunderan Galuh Mas</option>
    <option value="7">Gerbang Perumnas</option>
    <option value="8">Bunderan Galuh Mas</option>
    <option value="7">Gerbang Perumnas</option>
    <option value="8">Bunderan Galuh Mas</option>
    <option value="7">Gerbang Perumnas</option>
    <option value="8">Bunderan Galuh Mas</option>
    <option value="10">Alun-alun Kota</option>
    <option value="11">Pertigaan Mal Karawang</option>
    <option value="12">Perum Bintang Alam</option>
    <option value="21">Lampu Merah Klari</option>
    <option value="23">Pasar Kosambi</option>
    <option value="19">Lampu Merah Jalan Baru</option>
    <option value="19">Lampu Merah Jalan Baru</option>
    <option>-----------------------------------</option>
    <option value="1">[ 34 - 41301 ] SPBU Tanjungpura</option>
    <option value="2">[ 34 - 41344 ] SPBU Kharisma</option>
    <option value="4">[ 34 - 41349 ] SPBU SMAN 4</option>
    <option value="5">[ 34 - 41310 ] SPBU Alam Sari</option>
    <option value="6">[ 34 - 41328 ] SPBU R.S Cito</option>
    <option value="9">[ 34 - 41339 ] SPBU Galuh Mas</option>
    <option value="13">[ 34 - 41323 ] SPBU Telukjambe</option>
    <option value="14">[ 34 - 41348 ] SPBU Johar</option>
    <option value="15">Lampu Merah Johar</option>
    <option value="16">[ 34 - 41324 ] SPBU Lamaran</option>
    <option value="17">[ 34 - 41371 ] SPBU Warungbambu 1</option>
    <option value="18">[ 34 - 41352 ] SPBU Warungbambu 2</option>
    <option value="19">Lampu Merah Jalan Baru</option>
    <option value="20">[ 34 - 41341 ] SPBU Klari</option>
    <option value="22">[ 34 - 41315 ] SPBU Kosambi</option>
  </select></br>
</p>
<p align="center">
 <input type="button" value="Tampilkan jalur terpendek" onclick ='fungsi(Dari.value, Ke.value)'>     
</p>
 
</font>
 
</form>
</td>
</tr>
</table>
<p align="center">Copyright Teknik Informatika 2010</p>
</body>
</html>

Penulis : jaka fathurohman ~ Sebuah blog yang menyediakan berbagai macam informasi

Artikel ini dipublish oleh jaka fathurohman pada hari Jumat, 08 Juli 2011. Semoga artikel ini dapat bermanfaat.Terimakasih atas kunjungan Anda silahkan tinggalkan komentar.sudah ada 0 komentar: di postingan
 

0 komentar:

Posting Komentar

Langganan: Posting Komentar (Atom)