_NiGhTmArE_

kali ini praktikum kita membahas..

1. Variabel

buat source code seperti ini...

<html>
<head><title> ini coba IF</title></head>
<body>
<?php
$x=100;
$y=50;
if($x>$y)
{
print("nilai variabel $x lebih besar dari variabel $y");
}
else
{
print("nilai variabel\$xtidak lebih besar dari variabel \$y");
}
?>
</body>
</html>

maka akan muncul tampilan...



2. For

tulis seperti ini.

<html>
<head><title>Coba script For</title></head>
<body>
<?php
for($x=2;$x<=7;$x++)
{
print("<font size=$x>TEKNIK INFORMATIKA<br/></font>");
}
?>
</body>
</html>

tampilan...



3. Do... While
tulis gini ya....

<html>
<head><title>contoh script Do..... while</title></head>
<body>
<?php
$y=1;
do
{
print("$y. teknik infornatika<br/>");
$y++;
}
while($y<=7)
?>
</body>
</html>

tamilanya...



4. Switch

tulis gini....

<html>
<head><title>Contoh switch</title></head>
<body>
<?php
$englishday=date("1");
switch($englishday)
{
case"Monday";
$hari_indonesia="Senin";
break;
case"Tuesday";
$hari_indonesia="selasa";
break;
case "wednesday";
$hari_indonesia="rabu";
break;
case "thursday";
$hari_indonesia="kamis";
break;
case "friday";
$hari_indonesia="jum'at";
break;
case"saturday";
$hari_indonesia="sabtu";
break;

default:
$hari_indonesia="minggu";
break;
}
Print ("hari ini adalah $hari_indonesia");
?>
</body>
</html>

tampilan



5. while

tulisanya...

<html>
<head><title>contoh script while</title></head>
<body>
<?php
$i=1;
while($i<=7)
{
print("$i. teknik infornatika<br/>");
$i++;
}
?>
</body>
</html>

tampilanya...




6. Array

sekali lagi tulis...

<html>
<head><title>contoh ARRAY</title></head>
<body>
<?php
//$month=date("m");
//echo"$month";
$bulan=array("januari","februari","maret","april","mei","juni","juli","agustus","september",
"oktober","november","desember");
$bulan_ini=$bulan[date("m")-1];
echo"sekarang adalah bulan <b>$bulan_ini</b>";
?>
</body>
</html>

tampilan...



Sekian Terima Kasih....

To Be Continue.....

pada perteman ini kita membahas circle min point...

buat formnya seperti ini...







truz isi source codenya seperti ini...

#include Berfungsi sebagai library atau perpustakaan nya. Fungsi ini sama dengan yang digunakan oleh bahasa C++..

#include Library / perpustakaan yang memiliki fungsi sebagai matematika / perhitungan.

#pragma hdrstop

#include “Unit1.h” Library / perpustakaan untuk memanggil Unit1.h



//————————————————————————-

#pragma package(smart_init)

#pragma resource “*.dfm”

TForm1 *Form1;

int tergambar, XC, YC,QX,QY; /Fungsi XC, YC, QX, QY yang bertipe integer./



//————————————————————————-__fastcall TForm1::TForm1(TComponent* Owner)

: TForm(Owner)

{

}

//————————————————————————-

void __fastcall TForm1::Button2Click(TObject *Sender)

{

Close();

}

//————————————————————————-

void __fastcall TForm1::FormActivate(TObject *Sender)

{

Image1->Canvas->Rectangle(0,0,Image1->Width,Image1->Height);

}

Ini source pada FormActive yang mana befungsi untuk memfungsikan TImage serta memberikan fungsi agar dapat dilakukan penimpaan namun gambar tidak tertutup sehingga gambar sebelumnya masih terlihat.



//————————————————————————-

void __fastcall TForm1::Button1Click(TObject *Sender)

{

tergambar = false;

Image1->Canvas->Rectangle(0,0,Image1->Width,Image1->Height);

}

Pada listing diatas mengaktifkan untuk TForm1 serta mengaktifkn Formactivate pada TForm1 yang sudah dideklarasikan sebelumnya dengan atribut Tergambar dengan Boolean false. Selanjuntya menggunakan Image1 menggunakan Canvas menggunakan fungsi Rectangle untuk membuat bentuk segiempat sesuai dengan Image1 dan ukuran yang sudahh ditentukan.



//————————————————————————-

void __fastcall TForm1::Image1MouseDown(TObject *Sender,

TMouseButton Button, TShiftState Shift, int X, int Y)

{

tergambar = true;

XC=X;

YC=Y;

}

Pada listing diatas mengaktifkan untuk TForm1 serta mengaktifkan MouseDown pada TForm1 yang sudah dideklarasikan secara otomatis oleh C++ Builder selanjutnya menjalankan fungsi untuk Boolean True jika bernilai true maka MoveTo menentukan posisi awal. XC didefinisikan dengan simbol X, dan YC didefinisikan dengan simbol Y.



//————————————————————————-

void _fastcall TForm1::CirclePlotPoint(int XC, int YC, int X, int Y)

{

Image1->Canvas->Pixels[XC+X][YC+Y]=clBlack;

Image1->Canvas->Pixels[XC-X][YC+Y]=clBlack;

Image1->Canvas->Pixels[XC+X][YC-Y]=clBlack;

Image1->Canvas->Pixels[XC-X][YC-Y]=clBlack;

Image1->Canvas->Pixels[XC+Y][YC+Y]=clBlack;

Image1->Canvas->Pixels[XC-Y][YC+Y]=clBlack;

Image1->Canvas->Pixels[XC+Y][YC-Y]=clBlack;

Image1->Canvas->Pixels[XC-Y][YC-Y]=clBlack;

}

Untuk membentuk garis berupa lingkaran yang disesuaikan dengan perhitungan algoritma garis.



//————————————————————————-

void __fastcall TForm1::Image1MouseUp(TObject *Sender, TMouseButton Button,

TShiftState Shift, int X, int Y)

{

int R;

Button1Click(Sender);

tergambar=false;

QX=X; QY=Y;

R=int(sqrt(pow(XC-QX,2)+pow(YC-QY,2)));

if (RadioGroup1->ItemIndex==0)

{CircleMidPoint(XC,YC,R);}

}

Pada source ini hanya berfungsi memberikan event pada radiogroup yang berisikan radiogroup yaitu untuk menerima eksekusi dari EllipseMidPoint

//————————————————————————-

void _fastcall TForm1::CircleMidPoint(int XC, int YC, int R)

{

int x,y,p,k=0;

R=10;

x=0;

y=R;

p=1-R;

judul((float)x,(float)y,k,p);

do

{

k++;

if(p<0) { x=x+1; }

else {

x=x+1; y=y-1; }

if (p<0) {p=p+2*x+1;}

else {p=p+2* (x-y)+1;}

CirclePlotPoint(XC,YC,x,y);

tampil((float)x,(float)y,k,p);

} while (x
}

void _fastcall TForm1::judul(float x, float y,int k, int p)

{

int xt=200, yt=15, kt=2;

Image1->Canvas->TextOut(xt-50,(kt-1)*yt,”k”);

Image1->Canvas->TextOut(xt, (kt-1)*yt,”pk”);

Image1->Canvas->TextOut(xt+100, (kt-1)*yt,”(x k+1,y k+1)”);

}

void _fastcall TForm1::tampil(float x, float y, int k, int p)

{

{

char tampilX[20],tampilY[20],tampilK[20],tampilPk[20];

int i, xt=200, yt=15;

_gcvt(x,7,tampilX);

_gcvt(y,7,tampilY);

_gcvt(p,7,tampilPk);

if(k==0)

{ for (i=0; i<20; i++) { tampilK[i]=”; }}

else

{ _gcvt(k-1,10,tampilK); }

k=k+2;

Image1->Canvas->TextOut(xt-50, k*yt,tampilK);

Image1->Canvas->TextOut(xt+100, k*yt,”(”);

Image1->Canvas->TextOut(xt+120, k*yt,tampilX);

Image1->Canvas->TextOut(xt+150, k*yt,”,”);

Image1->Canvas->TextOut(xt+160, k*yt,tampilY);

Image1->Canvas->TextOut(xt+190, k*yt,”)”);

Image1->Canvas->TextOut(xt, k*yt,tampilPk);

}

}


maka akan muncul tampilan program




dan jika mid pointnya di tandai maka akan muncul seperti ini....

Variabel

pada praktikum kemarin membahas tentang variabel.

Variabel merupakan suatu bagian yang sangat penting sekali dalam bahasa pemrograman. Variabel digunakan pada semua bahasa pemrograman termasuk juga PHP dan juga Hampir semua program atau script yang telah dibuat oleh para programer menggunakan variabel kecuali program-program sederhana seperti script pertama pada buku ini yang untuk menampilkan tulisan.

Variabel dapat di artikan sebagai pelabelan atau penamaan suatu nilai yang dapat berupa angka ataupun string.

Sekarang saya akan membuat contoh variabel sederhana dari praktikum kemarin...

Variabel.

tulis source code seperti berikut:

<?php

// VARIABEL

$tanggal = date ("d F Y");

$nama = "_NiGhTmArE_";

?>



<html>

<head><title>_NiGhTmArE_ mengenal variabel</title>

</head>

<body>

<?php

// variabel digunakan

print ("hari ini tanggal $tanggal<br />");

print ("$nama, selamat menggunakan variabel PHP");

?>

</body>

</html>

setelah selesai, simpan file di hard disk mu.... dah jalankan dengan aplikasi browsermu...

Masukan.

Source codenya ini......

<html>

<head><title>contoh masukan</title></head>

<body>

<form action="keluaran.php" method="post">

nama anda : <br />

<input type="text" name="nama"><br />

kuliah di : <br />

<input type="text" name="kuliah"><br />

<input type="submit"><input type ="reset">

</form>

</body>

</html>

dan buat juga....

keluaran.php.... dengan source codenya....

<html>

<head><title>contoh hasil keluaran</title></head>

<body>

<?php

print ("hai, $_POST[nama]<br />");

print ("kamu kuliah di $_POST[kuliah]");

?>

</body>

</html>

jalankan file masukan.php dan kemudian hasil dari masukan.php akan muncul di file keluaran.php...

segini dulu yach....

tunggu laporan berikutnya......hahaha...

<BODY BGCOLOR="#rrggbb" atau BGCOLOR="nama_warna">

<BODY BACKGROUND="letak file gambar">

<table>

<tr>

<th>……….</th>

<th>…………</th>

<th>………….</th>

</tr>

ikuti aja, jangan banyak tanya.....hehehehehe....peace..

Setting IP
ketik ini di terminal....

"vim /etc/network/interfaces"
maka, akan muncul ini.... dan setting aja...

Address 192.168.133.xxx (sesuai dengan no IP)

Netmask 255.255.255.0

Gateway 192.168.133.13

Setting Resolv

"vim /etc/resolv/conf"

Nameserver 192.168.133.xxx

setelah itu kita restart IPnya....

Restart IP

"vim /etc/init.id/networking restart"

Setting Sourcelist

"vim /etc/apt/sources/list"

kemudian isikan alamat ini....

deb http : //192.168.144.120/ubuntu feisty main restricted universe multiverse

Reload

truzzzzzzzzzzzzzzzzzzzzz......

apt-get update
utuk meninstall paket begini katanya....

Install paket

"apt-get install namapaket"

contoh:
apt-get install xmms (ini adalah applikasi sejenis winamp di windows)


ini yang aq suka.... ngejahilin teman....hehehehehehe.
ikutin aja....okey...
ktiknya di terminal ya, jangan di stasiun ato bandara....hehehehe....

backup dulu sshdnya..
"cp /etc/ssh/sshd-config /etc/ssh/sshd_config_asli"

edit sshnya...
"vim /etc/ssh/sshd_config"

trus restart sshnya.....
"/etc/init.d/ssh restart"

okey deh,,,, sekarang ini yang di tunggu2.....

Perintah untuk masuk ke SSH

"ssh student@192.168.133.xxx" (IP yang mau di remote)

teruzzz nyambung dech....
untuk mengetest ketik aja perintah "EJECT"

segitu dulu yach........

IP : 192.168.13.1

Ingin dibagi menjadi 5 kelas, tiap-tiap kelas terdiri dari 48 host.

Jawab :
255 : 5 = 51
51 – 2 = 49

1. Laboratorium Basis Data ® 192.168.13.0 - 192.168.13.49
2. Laboratorium Komputasi ® 192.168.13.50 – 192.168.13.99
3. Laboratorium Jaringan ® 192.168.13.100 – 192.168.13.149
4. Laboratorium Multimedia ® 192.168.13.150 – 192.168.13.199
5. Laboratorium Digital ® 192.168.13.200 – 192.168.13-249

0 – 49 terdapat 50 host dikurangi 2 untuk network terkecil dan terbesar jadi ada 48 host sesungguhnya.
0 ® network
255 ® broadcast
51 dibinerkan menjadi 110011 ditambah 00 karena jumlah bit harus 8 ® 00110011
Dinegasikan 00110011 ® 11001100 = 204
Jadi Netmask = 255.255.255.204


IP 192.168.18.1 dibagi menjadi 5 kelas

Jawab :
255 : 5 = 51
a. Kelas 1 : 192.168.18.0 – 192.168.18.51
b. Kelas 2 : 192.168.18.52 – 192.168.18.103
c. Kelas 3 : 192.168.18.104 – 192.168.18.155
d. Kelas 4: 192.168.18.156 – 192.168.18.207
e. Kelas 5 : 192.168.18.208 – 192.168.18.259
0 – 51 = 52 host – 2 = 50 host sebenarnya.

Perintah untuk mengubah Netmask melalui terminal......
"sudo vim /etc/network/interfaces"

Address : 192.168.153.15
Netmask : 255.255.255.0
Gateway : 192.168.153.13

Esc : wq (keluar)

terus jalankan perintah ini....
"/etc/init.id/networking"

trus lupa.....