Relational Database

ENG

    Data relationships are relationships among the data in the table data table is in a database, data relationships closely linked to the database. before studying data relationships, it is good to learn beforehand Database.

The video below will discuss how to create Relation Data on Ms.Access.

IN

     Relasi data adalah hubungan antar data pada tabel-tabel data yang ada didalam sebuah database, Relasi data erat kaitannya dengan Basis Data. Sebelum mempelajari relasi data, alangkah baiknya pelajari terlebih dahulu Basis Data.

Pada video dibawah ini akan dibahas bagaimana cara membuat Relasi Data pada Ms.Access. 

Thanks for Watching

Menambahkan Favicon Pada Web [Html]

Sebuah website atau blog tidak lengkap jika tidak memiliki favicon sendiri. Pada kesempatan ini kita akan berbagi bagaimana caranya membuat favicon pada web atau blog sobat. 

Caranya cukup mudah, yang perlu sobat persiapkan adalah gambar yang nantinya akan dijadikan sebagai icon dari web atau blog sobat, saya sendiri biasa menggunakan gambar berformat .Png sebagai icon. Sobat dapat menggunakan juga format ini. Atau sobat juga dapat menggunakan format .Ico

Setelah gambar siap selanjutnya silahkan sobat edit file web atau blog nya, cari tag </title>, lalu tuliskan kode berikut dibawahnya.

<link rel="shortcut icon" href="icon.png">

Dari kode diatas, silahkan ganti href dengan link dari gambar yang ingin dijadikan favicon. Seperti berikut :

<link rel="shortcut icon" href="img/icon.png">

Atau menggunakan link seperti ini :

<link rel="shortcut icon" href="http://www.arrsnet.com/img/icon.png">

Link disesuaikan dimana sobat meletakan/meghosting gambar tersebut. 

Selamat Mencoba.

Membuat Certificate SSL Hotspot Mikrotik

Salam sejahtera, jumpa lagi setelah lama ga update. Kesempatan ini kita akan coba sharing, gimana caranya membuat sertifikat ssl mikrotik. Sesuai dengan judul postingan kali ini. Nah sebelum dimulai sobat perlu menyiapkan peralatannya dulu nih, tenang aja tools akan kami sediakan, kecuali Komputer / Leptop , sobat musti punya sendiri.

Oke pertama sobat download dulu OpenSsl-WIn32 di SINI 

Seperti biasa, Extract di localdisk C:/

Setelah itu ikuti Step-step berikut.

1. Buka folder C:\openssl\bin\      Klik kanan pada openssl.exe  lalu Run Administrator
2. Setelah masuk di shell nya OpenSSL silahkan ketik genrsa -des3 -out hotspot.key 1024 lalu Enter
3. Maka maka hotspot.key meminta password,  isikan terserah anda (12345) Enter. untuk Virifying masukan ulang (12345) Enter [password tidak akan tertulis, ketikan saja dengan benar lalu Enter]
4. Kemudian Ketik req -new -key hotspot.key -out hotspot.csr    kemudian   Enter
5. Muncul beberapa statement yang harus di isi, untuk Common Name isikan dengan DNS atau nama url hotspot sobat.
6. Sesuaikan dengan data sobat masing-masing, Untuk Challlenge password isi terserah (admin123)  Setelah selesai semua lalu di Enter.
7. Selanjutntya membuat certificate dengan perintah x509 -req -days 10000 -in hotspot.csr -signkey hotspot.key -out hotspot.crt  kemudian tekan  Enter
8. Akan diminta password hotspot.key yang tadi, di atas saya isi dengan (12345) maka isi sesuai dengan yang tadi (12345)
9. Setelah selasai, ambil file hotspot.key dan hotspot.crt yang ada di  C:\openssl\bin\ 
10. Step berikutnya silahkan upload file .key dan .crt ke server router mikrotik dengan langsung menggunakan winbox di menu File. Tarik aja,

Setelah mengukuti langkah diatas, selanjutnya kita perlu mengimport file tadi ke router, caranya :

1. Pada winbox , buka Terminal, ketik /certificate import file-name=hotspot.crt   kemudian Enter.
2. Masukan password file .crt (pada step 6) password (admin123 )
3. Jika benar dan berhasil pada terminal akan tertera Certificates-imported = 1 , file-imported=1
4. Kemudian ketik lagi perintah berikut di terminal /certificate import file-name=hotspot.key
5. Masukan password file .key , yaiutu (12345)
6. Jika berhasil  pada terminal akan tertera Private-keys-imported=1 , file-imported=1

Selanjutnya kita set dan aktifkan, dengan cara:

1. Buka Terminal 
2. Ketik /ip service set www-ssl certificate=cert_1      Enter
3. Lalu aktifkan, ketik /ip service set www-ssl disabled=no 
4. Kemudian Set server profile hotspot ke sertifikat cert_1

Lihat Gambar

Sekian Semoga bermanfaat, Lihat versi video DISINI

Membuat Login Hotspot Mikrotik

Salam sejahtera sobat, kali ini kita akan share cara membuat login Hotspot Mikrotik. Bagi sobat yang hobi atau ingin blajar membuat hotspot dengan mikrotik dan sedang mencari Login Page nya kini saatnya sobat buat sendiri login hotspotnya, sobat tidak perlu mencari, membeli, mendownload lagi, pada dasarnya membuat itu tidak sulit sobat, percayalah tidak ada yang tidak mungkin didunia ini selagi kita berusaha. Dibanding sobat membeli mahal lebih baik sobat luangkan waktu untuk blajar membuatnya.

Kita tidak perlu repot menulis script mikrotik, kita tinggal edit saja loin page bawaan mikrotik kemudian disesuaikan dengan disain yang kita ingin. Pada kasus ini kita perlu memahami Html dan Css, tapi tenang saja, bagi sobat yang baru belajar tidak perlu khawatir, saya pun awalnya tidak bias. Mari kita sama-sama belajar.

Pertama sobat ambil Login Page Default bawaan mikrotik, akses ke Ip wifi mikrotik dengan Filezilla, kemudian masuk ke folder Hotspot lalu ambil file “login.html”. file ini yang akan kita edit.

Langkah awal kita akan membuat desain / tampilan pagenya, pada kasus ini saya hanya memberikan desain yang simple saja dulu. Untuk desain yang advance kita bahas lain waktu. Oke silahkan sobat buka teks editor andalan sobat, dan tulislah script html berikut:

<html>
<head>
<title>simpel login</title>
</head>
<body>

<div id="main"> <!--layar utama -->
<div id="content"> <!--layar Untuk konten-->
<center><h1><span style="color:#fff;">Portal</span> <!--Membuat Judul Ditengah-->
<span style="color:#F63; font-weight:bold;">Nuansa Indah Net</span></h1></center>  <!--End-Membuat Judul Ditengah-->

        <div id="form"><!--Form untuk input user dan pass-->
              <h1 style="font-family: Aharoni; font-size:30px; color:#fff">SILAHKAN LOGIN</h1>
        <article style="margin:5px;">
  

        </article>
        </div> <!--End-Form untuk input user dan pass-->
        
    </div> <!--End-Konten -->
</div> <!--End-layar utama-->

</body>
</html>

Nah itu dia sobat, sedikit kan script nya, hehehe, jangan dibuat bingung, penjelasannya sudah sudah ada disana, jika kurang jelas silahkan tanyakan di komentar yah.

Sekarang kita buat Style nya, tidak lengkap bila Laman kita tidak diberi style maka akan terlihat berantakan. Oke sobat berikut adalah style nya, sobat bias buat file baru dengan extensi .css atau langsung dihalaman login.html juga bisa, tinggal tambahkan kode <style> </ style > diatas kode </head>.

@charset "utf-8";
/*
CSS : madein
by : firman

*/

body {
        margin: 0;
        padding: 20px 0 0 0;
  background: url(../img/twr.jpg) no-repeat;
  background-size: cover;
  background-repeat:repeat-y;
  -webkit-background-size: cover; 
  -moz-background-size: cover; 
  -o-background-size: cover;
}
 
#main { 
 height:auto;
 border-radius:7px;
    width:900px;
    margin:0 auto;
 margin-top:100px;
    font-family: helvetica, arial, sans-serif;
    font-size: 10pt;
        
}
#form{
 
 float:right;}

#content{
 width:870px;
 margin:0 auto;
 border-radius:15px;
 padding:7px;
 height: auto;
/* -moz-box-shadow: #000 4px 4px 20px;
    -webkit-box-shadow: #000 4px 4px 20px;*/
 background-color:transparent;
 }

.input {

 padding:13px;
 background-color:transparent;
 border-radius:9px;
 border:2px solid;
 color:#fff;
 -moz-box-shadow: #000 4px 4px 20px;
 width:100%;}

.input:hover{
 border-collapse:collapse;
 border-color: #FF0;
}

.input:active{
border-color: darkgreen ;
}

.download{
 font-weight:bold; 
 cursor: pointer; 
 width:200px; 
 border:none;
 border-radius:10px;
 padding:15px 40px!important;
 background:#6319AC;
 color:#fff!important;
 font:400 14px/18px 'Ubuntu',sans-serif;
 text-align:center;
 text-shadow:0 0 1px rgba(0,0,0,0.3);
 transition:background-color 1s ease-out 0s;
 letter-spacing:1px}

.download:hover{background:#454242;text-shadow:0 0 1px #222;text-decoration:none}

.play:hover{background:#66FF33;text-shadow:0 0 1px #222;text-decoration:none}

@media only screen and (max-width: 1024px) {
    /* Desktop, Tablet & Mobile. */
 #main{}
 #content{}
 #form{}
}

@media only screen and (max-width: 767px) {
    /* Tablet (Portrait) */
 #main{width:100%;}
 #content{ margin:auto; width:70%;}
 #form{}
}

@media only screen and (max-width: 479px) {
    /* Mobile */

 #main{margin-top:0px; width:70%;
  }
 #content{ width:100%;}
 #form{width:100%;}
}

Diatas terdapat @media only screen, nah ini gunannya untuk membuat page menjadi responsive ketika dibuka dilayar kecil. 

Lalu pada bagian body{  terdapat “background: url(../img/twr.jpg) no-repeat;” ,ini gunanya memerikan background sebuah gambar, gambar bisa sobat sesuaikan mau gambar apa saja silahkan. Supaya tidak terlalu repot nanti saya akan berikan file Jadinnya.

Kode diatas belum lengkap, Selanjutnya kita perlu memberikan/meletakkan script bawaan Mikrotik, letakan script mikrotik ini bibawah kode <article style="margin:5px;">

<!--starmik-->
 $(if chap-id)
 <form name="sendin" action="$(link-login-only)" method="post">
  <input type="hidden" name="username" />
  <input type="hidden" name="password" />
  <input type="hidden" name="dst" value="$(link-orig)" />
  <input type="hidden" name="popup" value="true" />
 </form>
 
 <script type="text/javascript" src="/md5.js"></script>
 <script type="text/javascript">
 <!--
     function doLogin() {
  document.sendin.username.value = document.login.username.value;
  document.sendin.password.value = hexMD5('$(chap-id)' + document.login.password.value + '$(chap-challenge)');
  document.sendin.submit();
  return false;
     }
 //-->
 </script>
$(endif)

<div align="center">
<a href="$(link-login-only)?target=lv&amp;dst=$(link-orig-esc)">Latviski</a>
</div>

  <div align="center" class="notice" style="color: #c1c1c1; font-size: 9px"><br />$(if trial == 'yes')Gratis Untuk Demo, <a style="color: #FF8080"href="$(link-login-only)?dst=$(link-orig-esc)&amp;username=T-$(mac-esc)">Klik Disini</a>.$(endif)</div><br /> 

     <form name="login" action="$(link-login-only)" method="post" $(if chap-id) onSubmit="return doLogin()" $(endif)>
                    <input type="hidden" name="dst" value="$(link-orig)" />
<h2 style="color:#FFF">Silahkan Login</h2>
     <input type="hidden" name="popup" value="true" />
     <div id="form-login">
     <div id="form-field-wrap">
     <div id="form-field" >

     <input type="text" class="input" id="username-login" name="username" placeholder="Username"><br /><br />
          <!--<input type="hidden" class="username" id="username_hidden" name="username" value="$(username)">-->
     </div>
     <div id="form-field" class="password-login">
     <input type="text" class="input"  id="pass-login" name="password" placeholder="Password"><br /><br />
     <input type="hidden" id="tsel" name="tsel" value="8">
     </div>
     </div>
     <div id="login-btn" >
     <input type="submit" class="download" value="LOGIN"  />
     </div>
     </div>
<!--end mik-->                    
<div style="color: #c1c1c1; font-size: 9px"></div>
 <center>$(if error)<br /><div style="color: #FF8080; font-size: 6px">$(error)</div>$(endif)</center>


<script type="text/javascript">
<!--
  document.login.username.focus();
//-->
</script>
<!--end mik--></form>

Jika sudah maka hasil akhirnya akan seperti ini sobat:

<html>
<head>
<title>simpel login</title>
<link href="css/madein.css" rel="stylesheet" type="text/css" />

<style type="text/css">
@charset "utf-8";
/*
CSS : madein
by : firman

*/

body {
        margin: 0;
        padding: 20px 0 0 0;
  background: url(../img/twr.jpg) no-repeat;
  background-size: cover;
  background-repeat:repeat-y;
  -webkit-background-size: cover; 
  -moz-background-size: cover; 
  -o-background-size: cover;
}
 
#main { 
 height:auto;
 border-radius:7px;
    width:900px;
    margin:0 auto;
 margin-top:100px;
    font-family: helvetica, arial, sans-serif;
    font-size: 10pt;
        
}
#form{
 
 float:right;}

#content{
 width:870px;
 margin:0 auto;
 border-radius:15px;
 padding:7px;
 height: auto;
/* -moz-box-shadow: #000 4px 4px 20px;
    -webkit-box-shadow: #000 4px 4px 20px;*/
 background-color:transparent;
 }
.input {

 padding:13px;
 background-color:transparent;
 border-radius:9px;
 border:2px solid;
 color:#fff;
 -moz-box-shadow: #000 4px 4px 20px;
 width:100%;}
.input:hover{
 border-collapse:collapse;
 border-color: #FF0;
}
.input:active{
border-color: darkgreen ;
}
.download{
 font-weight:bold; 
 cursor: pointer; 
 width:200px; 
 border:none;
 border-radius:10px;
 padding:15px 40px!important;
 background:#6319AC;
 color:#fff!important;
 font:400 14px/18px &#39;Ubuntu&#39;,sans-serif;
 text-align:center;
 text-shadow:0 0 1px rgba(0,0,0,0.3);
 transition:background-color 1s ease-out 0s;
 letter-spacing:1px}

.download:hover{background:#454242;text-shadow:0 0 1px #222;text-decoration:none}

.play:hover{background:#66FF33;text-shadow:0 0 1px #222;text-decoration:none}
@media only screen and (max-width: 1024px) {
    /* Desktop, Tablet & Mobile. */
 #main{}
 #content{}
 #form{}
}
@media only screen and (max-width: 767px) {
    /* Tablet (Portrait) */
 #main{width:100%;}
 #content{ margin:auto; width:70%;}
 #form{}
}
@media only screen and (max-width: 479px) {
    /* Mobile */

 #main{margin-top:0px; width:70%;
  }
 #content{ width:100%;}
 #form{width:100%;}
}

</style>
</head>

<body>

<div id="main"><!--layar utama-->

 <div id="content"><!--layar untuk konten-->
    <center><h1><span style="color:#fff;">Portal</span><!--Membuat Judul Ditengah-->

<span style="color:#F63; font-weight:bold;">Nuansa Indah Net</span></h1></center>     
  <div id="form">
        <h1 style="font-family: Aharoni; font-size:30px; color:#fff">SILAHKAN LOGIN</h1>
        <article style="margin:5px;">
        

        <!--starmik-->
 $(if chap-id)
 <form name="sendin" action="$(link-login-only)" method="post">
  <input type="hidden" name="username" />
  <input type="hidden" name="password" />
  <input type="hidden" name="dst" value="$(link-orig)" />
  <input type="hidden" name="popup" value="true" />
 </form>
 
 <script type="text/javascript" src="/md5.js"></script>
 <script type="text/javascript">
 <!--
     function doLogin() {
  document.sendin.username.value = document.login.username.value;
  document.sendin.password.value = hexMD5('$(chap-id)' + document.login.password.value + '$(chap-challenge)');
  document.sendin.submit();
  return false;
     }
 //-->
 </script>
$(endif)

<div align="center">
<a href="$(link-login-only)?target=lv&amp;dst=$(link-orig-esc)">Latviski</a>
</div>

  <div align="center" class="notice" style="color: #c1c1c1; font-size: 9px"><br />$(if trial == 'yes')Gratis Untuk Demo, <a style="color: #FF8080"href="$(link-login-only)?dst=$(link-orig-esc)&amp;username=T-$(mac-esc)">Klik Disini</a>.$(endif)</div><br /> 

     <form name="login" action="$(link-login-only)" method="post" $(if chap-id) onSubmit="return doLogin()" $(endif)>
                    <input type="hidden" name="dst" value="$(link-orig)" />
<h2 style="color:#FFF">Silahkan Login</h2>
     <input type="hidden" name="popup" value="true" />
     <div id="form-login">
     <div id="form-field-wrap">
     <div id="form-field" >

     <input type="text" class="input" id="username-login" name="username" placeholder="Username"><br /><br />
          <!--<input type="hidden" class="username" id="username_hidden" name="username" value="$(username)">-->
     </div>
     <div id="form-field" class="password-login">
     <input type="text" class="input"  id="pass-login" name="password" placeholder="Password"><br /><br />
     <input type="hidden" id="tsel" name="tsel" value="8">
     </div>
     </div>
     <div id="login-btn" >
     <input type="submit" class="download" value="LOGIN"  />
     </div>
     </div>
<!--end mik-->                    
<div style="color: #c1c1c1; font-size: 9px"></div>
 <center>$(if error)<br /><div style="color: #FF8080; font-size: 6px">$(error)</div>$(endif)</center>


<script type="text/javascript">
<!--
  document.login.username.focus();
//-->
</script>

<!--end mik--></form>
         
        </article>
        </div>
        
    </div><!--End-div-Content-->
</div><!--End-div-Main-->
</body>
</html>

Setelah itu silahkan simpan proyek sobat, dan coba sobat running, maka hasilnya akan seperti berikut jika benar: Lihat Hasil 

Link download sudah tersedia disana.

Selesai.

Semoga Membantu.

Membuat Program Hotel [Pascal-Part3]

Sebelumnya ditutorial part2 kita sudah membuat program hotel dengan fungsi if serta diskon 10%, pada kesempatan kali ini kita juga akan membuat program yang sama, tetapi sedikit akan kita tambahkan fitur/fungsi baru didalamnya. Kita akan coba menambahkan sebuah keterangan Dapat diskon / Tidak Dapat, kelihatanya cukup mudah, tapi perlu konsentrasi yang lebih untuk membuatnya. Seperti biasa pada awal program kita akan menulis code berikut.

PROGRAM Hotel_Citra;
USES Wincrt;
VAR
LM:Byte;
HK, JMLBayar, BayarAkhir:REAL;
Ket:string[40];

Sobat perhatikan code diatas, sudah terlihat perbedaannya.? Betul sekali, dalam code tersebut kita menempatkan variabel LM adalah Byte, sementara var HK, JmlBayar dan BayarAkhir tetap REAL. Kemudian kita juga menambahkan variabel Ket dengan tipe String [40], 40 disini maksudnya adalah pemsanan karakter untuk var Ket/ Keterangan. jika dalam pemesanan karakter kita tuliskan 10 maka kata-kata "Anda Mendapat Diskon 20%" akan tertulis "Anda Menda". Mudah-mudahan sampai disini sobat tidak bingung. Selanjutnya tuliskan code berikut tepat dibawah code sebelumnya.

Begin
Write('Lama Menginap = ');
Readln(LM);
Write('Harga Perhari = ');
Readln(HK);
JMLBayar:=LM*HK;

Kemudian dibawahnya sobat tuliskan code berikut.

IF JMLBayar>=300000
THEN
begin
BayarAkhir:=JMLBayar-(JMLBayar*0.2);
Ket:= 'Anda Mendapat Diskon 20%';
end
ELSE
begin
BayarAkhir:=JMLBayar;
Ket:= 'Maaf Tidak Dapat diskon';
end;

Dalam code diatas setelah Then dan Else terdapat Begin, Mengapa demikian? karena code setelah begin adalah sebuah Proses kembali, Sobat lihat disana terdapat variabel Ket, ini gunanya untuk menampilkan apakah dapat atau tidak dapat diskon, karena diawal kita memesan variabel Ket dengan tipe string[40] maka akan tertulis sesuai dengan keterangan yang kita tulis dalam code diatas. Jika sobat menginginkan kata-kata yang cukup panjang dalam keterangannya, sobat bisa merubah pemesanan karakter [40] sesuai yang dibutuhkan.

Selanjutnya sobat tulis juga code berikut dibawah code sebelumnya.

writeln;
Writeln('Diskon? = ' ,Ket);
Writeln('Yang harus dibayar = ' ,JMLBayar:8:0);
Writeln('Harga Akhir = ' ,BayarAkhir:8:0);
Writeln('TERIMAKASIH...!');
readln;
End.

Kegunaan dari code diatas masih sama, yaitu untuk menampilkan hasil akhir dari proses perhitungan dan juga menampilkan Keterangan diskon atau tidak. Setelah semua code tertulis silahkan uji programnya apakah berjalan dengan baik, tekan Ctrl+F9 untuk menjalankan program. Selesai.

Semoga bermanfaat

Penulis: Firman A-Arrsnet

Keyword

• Pascal Tutorials
• Tutorial Pascal
• Membuat Program Hotel
• Membuat Program di Pascal
• Membuat Program dengan Pascal

Membuat Program Hotel [Pascal-Part2]

Tutorial sebelumnya telah membahas bagaimana membuat program hotel dengan bahasa pascal tetapi tidak menggunakan fungsi if dan discount. Pada tutorial ini kita akan coba membuat program hotel dan mengkolaborasikannya dengan fungsi if , bila sobat belum melihat tutorial pertama, silahkan sobat lihat di Membuat Program Hotel [Pascal-Part1] ,untuk pengguaan codenya tidak banyak perubahan hanya saja kita perlu menambahkan fungsi if. Silakan simak code dibawah ini.

PROGRAM Hotel_Citra;
USES Wincrt;
VAR
LM, HK, JMLBayar, BayarAkhir:REAL;

Judul program silahkan sobat ubah dengan nama program yang sobat buat. uses wincrt; bisa juga menggunakan uses crt; jika sobat menjalankan progran pascal di windows xp. Var adalah variabel yang akan kita gunakan dalam program nantinya. Selanjutnya tulis code dibawah ini tepat dibawah code yang diatas.

Begin
Write('Lama Menginap =');
Readln(LM);
Write('Harga Perhari =');
Readln(HK);
JMLBayar:=LM*HK;

Lalu dibawah code tersebut, sobat tuliskan fungsi if berikut ini.

IF JMLBayar>=100000
THEN
BayarAkhir:=JMLBayar-(JMLBayar*0.1)
ELSE
BayarAkhir:=JMLBayar;

Writeln;
Writeln('Harus di Bayar=',JMLBayar:8:2);
Writeln('Bayar Akhir=',BayarAkhir:8:2);
Readln;
End.

Sobat perhatikan dalam code diatas terdapat if then dan else. Maksudnya adalah Jika variabel JmlBayar lebih dari atau sama dengan 100.000, kemudian BayarAkhir = JmlBayar dikuragi ( - ) JmlBayar x 0.1 (0.1 = diskon 10%). Else, jika JmlBayar kurang dari atau tidak sama dengan 100.000, BayarAkhir = JmlBayar (tidak mendapat diskon). Sampai disini mudah-mudahan sobat faham. Kemudian:

Writeln;
Writeln('Harus di Bayar=',JMLBayar:8:2);
Writeln('Bayar Akhir=',BayarAkhir:8:2);
Readln;
End.

Code tersebut fungsinya untuk menampilkan hasil akhir dari proses perhitungan, untuk penjelasannya silahkan soat buka tutorial part1. Setelah selesai menuliskan code-code tersebut, sekarang coba Run/Jalankan program yang sobat buat, tekan (Ctrl+F9) untuk menjalankan. Jika sudah sesuai dan berjalan normal silahkan simpan pekerjaan sobat.

Tutorial berikutnya kita akan membuat program hotel ini memiliki keterangan, jika harga bayar misal lebih dari = 200.000 maka akan muncul keterangan Anda mendapat diskon  20%, jika tidak, akan muncul keterangan Anda Tidak mendapat diskon.

Semoga bermanfaat

Penuls: Firman A-Arrsnet

Keyword

• Pascal Tutorials
• Tutorial Pascal
• Membuat Program Hotel
• Membuat Program di Pascal
• Membuat Program dengan Pascal

Membuat Program Hotel [Pascal-Part1]

   Kali ini kita akan membahas seputar Bahasa Pascal, tapi sebelumnya sobat harus memiliki dulu programnya, silahkan sobat cari terlebihdahulu. Hari ini kita akan coba membuat program sederhana yaitu program perhitungan untuk hotel, kenapa harus hotel? karena program yang kita akan buat tidak terlalu sulit jadi kita cari mudahnya, untuk membuat sebuah program tentu kita harus menuliskan codenya, tentusaja kita akan menulis kode tersebut. Sobat simak kode dibawah ini.

PROGRAM Hotel_Arrs;
USES Wincrt;
VAR
LM, HK, JMLBayar:REAL;

    Kode diatas adalah kode awal, sobat tuliskan seperti kode diatas. Sobat dapat merubah Hotel_Arrs dengan judul program yang sobat buat sendiri. 

uses wincrt; bisa juga menggunakan uses crt; jika sobat menjalankan progran pascal di windows xp. Var adalah Variabel yang akan kita gunakan didalam program, disana tertulis LM untuk Lama Menginap, HK untuk Harga Kamar, JMLBayar untuk Jumlah Bayar dan :Real menyatakan bilangan real.

    Selanjutnya tuliskan kode berikut dibawah kode sebelumnya.

Begin
Write('Lama Menginap =');
Readln(LM);
Write('Harga Perhari =');
Readln(HK);
JMLBayar:=LM*HK;

Writeln;
Writeln('Harus di Bayar=',JMLBayar:8:2);
Readln;
End.

Kode diatas diawali dengan Begin, ini ditujukan untuk memulai sebuah proses.

Write('Lama Menginap =');   // Kegunaanya untuk menampilkan kata Lama Menginap =

Readln(LM);   // Untuk membaca variabel LM:Real

Write('Harga Perhari =');   // Kegunaanya untuk menampilkan kata Harga Perhari =

Readln(HK);   // Untuk membaca variabel LM:Real

JMLBayar:=LM*HK;   // Ini adalah rumus, lama menginap x harga perhari

Writeln;

Writeln('Harus diBayar =',JMLBayar:8:0);   // Kegunaanya untuk menampilkan kata Harus dibayar = . dengan variabel Jumlah Bayar. 8 spasi dari tanda = , dan 0 karakter dibelakang nominal harga (tanpa koma)

Readln;   // Tujuannya aga pengguna dapat melihat preview akhir, jika tidak ada kode ini pengguna program tidak dapat melihat harga akhir yang harus dibayar, karena program akan otomatis mengClose.

    Silahkan sobat mencobanya, tutorial berikutnya kita akan menggunakan fungsi IF dan akan kita masukan kode pemotongan harga atau Diskon dengan minimal harga sewa tertentu.

Semoga bermanfaat

Penulis: Firman A-Arrsnet

Keyword

• Pascal Tutorials
• Tutorial Pascal
• Membuat Program Hotel
• Membuat Program di Pascal
• Membuat Program dengan Pascal

Memulai Pascal di Lazarus

Lazarus sebuah aplikasi yang membantu kita menuliskan sebuah bahasa pemograman, karena kita sedang berbicara bahasa pascal, maka kita tidak akan berbicara tentang bahasa Basic apalagi Cobol.

Lazarus bisa disebut juga software multi, mengapa demikian? sobat penasaran? jika iya jawabanya adalah sobat cobalah sendri aplikasi ini. Langsung pada pembahasannya, untuk memulai penulisan bahasa pascal atau coding dengan bahasa pascal, langka awal adalah:

• Sobat buka Lazarus yang telah didownload
• Kemudian sobat ke menu File lalu pilih New.. setelah itu akan ada form yang muncul.
• Pada form tersebut sobat klik Project kemudian double klick di Simple Program 

Setelah itu maka form baru akan muncul, di form tersebut telah tertulis 

---

program Project1;

begin
end.

---

Nah pada bagian itulah sobat tuliskan coding-coding nya. Mudah bukan? sekarang sobat sudah bisa ber experimen dengan bahasa pascal tanpa perlu menggunakan Dos Box, ataupun XpMode dan bagi sobat yang kurang suka dengan latar belakang Turbo Pascal yang berwarna biru, sobat bisa gunakan Lazarus di windows 7 64bit mengingat Tpw 1.5 tidak work di 64bit.

---

Semoga membantu

Penulis: Firman A-Arrsnet

Contoh Tag Html [Format]

Pada postingan sebelumnya kita telah melihat tag-tag html basic, sekarang kita lanjutkan ke tag Format. Tak perlu panjang lebar, Silahkan sobat lihat Tag dan contoh di bawah ini.

FORMAT

KODE	KETERANGAN
<abbr>	Ini untuk membuat singkatan
<acronym>	Membuat acronim
<address>	Tag ini untuk membuat alamat
<b>	Tag yang tidak asing. Digunakan untuk membuat font tebal
<bdo>	Tag ini untuk membalikan arah baca tek dari kiri -kanan, kanan-kiri
<big>	Membuat Huruf Besar
<bdi>	Mengisolasi pengaturan text-arah sekitarnya
<blockquote>	Membuat paragraf yang mengutip dari sumber web lain
<cite>	Menentukan judul karya menggunakan <cite>
<code>	Mendefinisikan sebuah bagian dari kode komputer
<center>	Membuat teks rata tengah

---

Oke sobat yang diatas adalah Tag nya, dan ini adalah cara penulisanya.

Berikut Penulisannya:

<!--abbr-->
Kabar baik dari <abbr title="Universitas Indonesia">UI</abbr> Akan mengadakan seminar.

<!--acronym-->
Can I get this <acronym title="as soon as possible">ASAP</acronym>?

<!--Address-->
<address>
Jln. Kemangi raya no.20 B kedung jaya -surakarta.
Tlp: 0231 22351111
Herry Widarsono
</address>

<!--bold-->
<b>Arrs Net</b>

<!--bdo-->
<bdo dir="ltr">Arrs Net</bdo>
<bdo dir="rtl">Arrs Net</bdo>

<!--big-->
Teks Normal
<big>Teks Besar</big>

<!--bdi-->
<ul>
 <li>Pengguna <bdi>Andi</bdi>: 3 tahun</li>
    <li>Pengguna <bdi>Ridho</bdi>: 1 tahun</li>
    <li>Pengguna <bdi>Radit</bdi>: 2 tahun</li>
</ul>

<!--blockquote-->
<h3>Tips Menjadi Programer</h3>
Di ambil dari sebuah website
<blockquote cite="http://www.arrsnet.com/2014/12/tips-menjadi-programer.html">
Seorang programer dituntut untuk memiliki logika yang kuat, karena seorang programer harus bisa mengambil keputusan / kesimpulan dengan cepat dan tepat. Pernyataan seperti True, False, 0, 1, If, Then,dll akan bayak dijumpai jika sobat bergelut didunia programer.
</blockquote>

<!--cite-->
<img src="" />
<p><cite>The Mistery Of Live</cite> by Ridwan A. Ditulis 2013.</p>

<!--code-->
<strong>Judul</strong><br>
<code>Kode Harga Komputer</code><br>
<samp>Contoh program keluaran komputer</samp><br>
<kbd>Keyboard input</kbd><br>
Bla,bla,bla...

<!--center-->
Tanpa Center
<table width="250" border="1">
<td><center>Dengan Center</center></td>
</table>

---

Dan Ini adalah Previewnya

[Abbr] Kabar baik dari UI Akan mengadakan seminar. [Acronym] Can I get this ASAP? [Address] Jln. Kemangi raya no.20 B kedung jaya -surakarta. Tlp: 0231 22351111  Herry Widarsono [Bold] Arrs Net - tidak bold Arrs Net [Bdo] Arrs Net -kiri ke kanan Arrs Net  -Kanan ke kiri [Big]  Teks Normal   Teks Besar [Bdi] Pengguna Andi: 3 tahun Pengguna Ridho: 1 tahun Pengguna Radit: 2 tahun [Blockquote] Tips Menjadi Programer Di ambil dari sebuah website Seorang programer dituntut untuk memiliki logika yang kuat, karena seorang programer harus bisa mengambil keputusan / kesimpulan dengan cepat dan tepat. Pernyataan seperti True, False, 0, 1, If, Then,dll akan bayak dijumpai jika sobat bergelut didunia programer. [Cite] The Mistery Of Live by Ridwan A. Ditulis 2013.  [Code] Judul Kode Harga Komputer Contoh program keluaran komputer Keyboard input  Bla,bla,bla...  [Center] Tanpa Center Dengan Center

Nah itu dia Tag html, Penulisan dan Previewnya, Bagaimana sobat? Mudahkan. Untuk Tag <acronym> Tidak suport di Html5. Oke sampai disini, smoga sobat dapat memahaminya.

Keyword

• Belajar Html Dasar
• Belajar Kode Html
• Belajar Coding Html
• Belajar Bahasa Html
• Coding Html
• Html Codes
• Html Tag

Html Tag

Membuat sebuah website mungkin bukan hal asing lagi kita dengar, tetapi sebelum membuatnya kita perlu mengetahui lebih dulu dasar dari sebuah Tag Html. Nah kali ini kita akan membahas satu-persatu Tag html. Untuk mengetahu hatml dasar,mari kita simak table berikut ini.

BASIC

KODE	KETERANGAN
<!DOCTYPE>	Tag Ini menentukan tipe dari sebuah dokumen
<html>	Ini Tag html menandakan dokumen html
<title>	Tag ini untuk membuat judul dokumen
<body>	Tag untuk membentuk susunan dari html
h1 sampai h6	Membuat Font dari besar-kecil
<p>	Ini tag untuk memulai sebuah paragraf
<br>	Tag ini untuk membuat Enter
<hr>	Tag ini untuk membuat garis
<!--Komen-->	Lihat Contoh

Lihat Contoh

---

FORMAT

KODE	KETERANGAN
<abbr>	Ini untuk membuat singkatan
<acronym>	Membuat acronim
<address>	Tag ini untuk membuat alamat
<b>	Tag yang tidak asing. Digunakan untuk membuat font tebal
<bdo>	Tag ini untuk membalikan arah baca tek dari kiri -kanan, kanan-kiri
<big>	Membuat Huruf Besar
<bdi>	Mengisolasi pengaturan text-arah sekitarnya
<blockquote>	Membuat paragraf yang mengutip dari sumber web lain
<cite>	Menentukan judul karya menggunakan <cite>
<code>	Mendefinisikan sebuah bagian dari kode komputer
<center>	Membuat teks rata tengah

Lihat Contoh

---

Dari table di atas, silahkan sobat klik "Lihat Contoh" untuk mengetahui cara menggunakannya. Oya sobat, ini masih bersambung, Tag Format akan dilanjukan pada postingan ke dua.
Dan Untuk Contohnya sedang dalam proses, mohon sobat bersabar, dan kembali lagi esok hari.

Keyword

• Belajar Html Dasar
• Belajar Kode Html
• Belajar Coding Html
• Belajar Bahasa Html
• Coding Html
• Html Codes
• Html Tag