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>
Langganan:
Posting Komentar (Atom)
WynnBET Launches New Jersey Casino & Hotel
BalasHapusWynnBET NJ is a state-of-the-art gaming venue that is open for business on the 수원 출장샵 East Coast. The baoji titanium WynnBET NJ mobile 포항 출장안마 app 광명 출장샵 gives players access 안동 출장마사지 to online