Membuat Aplikasi Menghitung Detik Menjadi Hari Jam Dan Menit

Buka aplikasi DELPHI 7
Lalu buat diagram seperti dibawah ini dengan menambahkan buttom, Edit,

 

 

 

 

Kemudian Ketikan script program  

 

1.      Klik Ganda Button Detik kemudian ketikan script seperti berikut:

procedure TForm1.HasilClick(Sender: TObject);
var
  a,b,c:integer;
begin

  a:=StrToInt(Detik.Text);
  b:=a mod (60*60*24);
  a:=a div (60*60*24);
  hari.Text:=inttostr(a);

  c:=b div (60*60);
  b:=b mod (60*60);
  jam.text:=inttostr(c);

  c:=b div 60;
  menit.Text := inttostr(c);
end;

Ket: 

-         Var  Mendefinisikan sebuah variabel

-         Integer untuk merubah tipe data bilangan bulat yang hanya mengenal bilangan decimal dan tidak dapat mengenal bilangan pecahan

-        StrToInt digunakan untuk merubah tipe data string ke tipe data integer.

-     Div di gunakan untuk pembagian interger

-     Mod digunakan untuk menampilkan sisa bagi variabel

 

            Lalu coba uji cobah deh klik run atau F9

 

 

User ID Speedy gratis

Konekkan dulu wifi  computer anda dengan wifi.id 

Kemudian buka broser anda pasti akan muncul tampilan seperti dibawah ini bila tidak keluar masuk keweb ini speedy

 Pilih akses speedy

  Kemudian masuk id atau user anda

Ini download usernya

user Id

SETTING ROUTER DENGAN CentOS

Setelah melakukan instalasi sistem operasi CentOS di PC, kita akan langsung setting PC tersebut menjadi PC Router. Dengan langkah 1. Setting IP NIC

1.      Setelah log-in, masukkan perintah

[root@centos]# vi /etc/sysconfig/network-scripts/ifcfg-eth0

untuk menyetting eth0 dengan settingan

DEVICE=eth0

BOOTPROTO=dhcp

HWADDR=11:22:33:AA:BB:CC #SESUAI DENGAN MASING2 NIC

ONBOOT=yes

TYPE=Ethernet

Lalu simpan dan keluar dengan menggunakan perintah

:wq

Lalu kita masuk pada pengaturan eth1 dengan perintah

[root@centos]# vi /etc/sysconfig/network-scripts/ifcfg-eth1

untuk menyetting eth1 dengan settingan

DEVICE=eth1

BOOTPROTO=static

HWADDR=11:22:33:AA:BB:CC #SESUAI DENGAN MASING2 NIC

IPADDR=192.168.93.1

NETMASK=255.255.255.0

NETWORK=192.168.93.0

ONBOOT=yes

TYPE=Ethernet

Lalu simpan dan keluar dengan menggunakan perintah

:wq

2.      Lalu restart network dengan
[root@centos]# /etc/init.d/network restart

3.      Cek IP yang sudah terinstall pada Ethernet
[root@centos]# ifconfig
eth0    Link encap:Ethernet  HWaddr 00:30:18:A4:E0:6F
inet addr:192.168.5.86  Bcast:192.168.5.255  Mask:255.255.255.0
inet6 addr: fe80::230:18ff:fea4:e06f/64 Scope:Link
UP BROADCAST RUNNING MULTICAST  MTU:1500  Metric:1
RX packets:81548 errors:0 dropped:0 overruns:0 frame:0
TX packets:74945 errors:0 dropped:0 overruns:0 carrier:0
collisions:0 txqueuelen:1000
RX bytes:68397087 (65.2 MiB)  TX bytes:8293763 (7.9 MiB)
Interrupt:201 Base address:0×6000

eth1    Link encap:Ethernet  HWaddr 00:E0:4D:48:B6:06
inet addr:192.168.93.1  Bcast:192.168.5.255  Mask:255.255.255.0
inet6 addr: fe80::2e0:4dff:fe48:b606/64 Scope:Link
UP BROADCAST RUNNING MULTICAST  MTU:1500  Metric:1
RX packets:521469 errors:0 dropped:0 overruns:0 frame:0
TX packets:572347 errors:0 dropped:0 overruns:0 carrier:0
collisions:0 txqueuelen:1000
RX bytes:411351695 (392.2 MiB)  TX bytes:517878843 (493.8 MiB)
Interrupt:169 Base address:0xfc00

4.      Cek dengan koneksi dengan perintah ping
[root@centos etc]#ping 192.168.5.86
PING 192.168.5.86 (192.168.5.86) 56(84) bytes of data.
64 bytes from 192.168.5.86: icmp_seq=0 ttl=255 time=0.925 ms
64 bytes from 192.168.5.86: icmp_seq=1 ttl=255 time=0.588 ms
64 bytes from 192.168.5.86: icmp_seq=2 ttl=255 time=0.603 ms
64 bytes from 192.168.5.86: icmp_seq=3 ttl=255 time=0.569 ms

[root@centos etc]#ping www.google.com
PING www.google.com (203.130.196.201) 56(84) bytes of data.
64 bytes from 203.130.196.201: icmp_seq=0 ttl=55 time=52.2 ms
64 bytes from 203.130.196.201: icmp_seq=1 ttl=55 time=108 ms
64 bytes from 203.130.196.201: icmp_seq=2 ttl=55 time=50.7 ms
Berarti server kita sudah terkoneksi dengan internet.

5.      Masukkan perintah sebagai berikut :

[root@centos]# iptables –t nat A POSTROUTING –o eth0  -s 192.168.93.0/24 –j MASQUERADE

[root@centos]# iptables –t nat A POSTROUTING –o eth1  -s 192.168.93.0/24 –j MASQUERADE

[root@centos]# iptables –t nat A POSTROUTING –o eth0 –j MASQUERADE

[root@centos]# iptables –t nat A POSTROUTING –o eth1 –j MASQUERADE

6.      Lalu restart network dengan
[root@centos]# /etc/init.d/network restart

7.      Masukkan perintah :

[root@centos]# echo “1” >/proc/sys/net/ipv4/ip_forward

8.      Pada Client Setting networknya

IP ADDRESS = 192.168.93.2

NETMASK= 255.255.255.0

GATEWAY= 192.168.93.1

9.      Finishing

Tes koneksi dari client dengan melakukan ping
a.    Ping ke gateway 192.168.93.1
b.    Ping ke eth0, 192.168.5.86

c.    Jika sukses dalam ping, coba gunakan browsing ke suatu website, misalkan ww.google.com

LANGKAH LANGKAH INSTALLASI LINUX CentOS 5.5

Gak basa basi langsung ke TKP aja wes

1.      Langkah awal yang pasti yaitu masukkan cd installer CentOS (The Community Enterprise Operating System) ke dalam cd/dvd rom kemudian aturlah BIOS di komputer anda agar dapat boot melalui cd/dvd rom. Setelah semua-nya selesai, sekarang tunggu-lah beberapa saat hingga tampilan installer CentOS (The Community Enterprise Operating System) tampil seperti gambar dibawah ini:

Tampilan Awal Installer CentOS

2.      Setelah terlihat tampilan seperti diatas, tekan saja tombol ENTER untuk memulai proses installasi. Setelah kita menekan tombol ENTER maka pada layar selanjutnya adalah proses pengecekan CD Installer. Skip saja bagian ini dengan memilih tombol Skip seperti gambar dibawah ini :

Tekan Tombol Skip Untuk Pengecekan CD Installer

3.      Setelah menekan tombol Skip maka kita akan melihat Anaconda Installer yang merupakan ciri khas dari distro Red Hat Enterprise Linux (RHEL) dan turunan-nya seperti gambar dibawah ini :

Tampilan Anaconda Installer CentOS

KOK MALAH MALES GINI YA NULISNYA BIAR GAK KEPOTONG NI GUE KASI FILENYA AJA FORMAT WORD ATAU PDF