Lingkaran mengelilingi perssegi panjang

Bahasa pemrograman pascal membuat tampilan sebuah lingkaran
mengelilingi persegi panjang.
program lingkaran;
uses crt,graph;
var graphicdriver,graphicmode,i: integer;
begin
graphicdriver := detect;
initgraph(graphicdriver,graphicmode,'');
if graphresult<> grOK then halt(1);
cleardevice;
repeat
for i:=1 to 400 do
 begin
  rectangle(100,100,500,400);
  circle(100+i,100,10);
  delay(10);
  cleardevice;
 end;
for i:=1 to 300 do
 begin
  rectangle(100,100,500,400);
  circle(500,100+i,10);
  delay(10);
  cleardevice;
 end;
for i:=1 to 400 do
 begin
  rectangle(100,100,500,400);
  circle(500-i,400,10);
  delay(10);
  cleardevice;
 end;
for i:=1 to 300 do
 begin
  rectangle(100,100,500,400);
  circle(100,400-i,10);
  delay(10);
  cleardevice;
 end;
until keypressed;
end.

Read More

Memblock alamat situs yang tidak kita inginkan

Saat ini mungkin telah Banyak software atau program yang tersedia dan berfungsi untuk memblock alamat situs yang tidak kita inginkan. Akan tetapi menggunakan suatu software di PC client bukanlah solusi yang tepat, karna selain bisa memberatkan kinerja PC itu sendiri, juga sebagian besar pengguna bisa dengan mudah mencari akal untuk mengganti settingan pada software tersebut.

Nah berikut ini ada trick untuk dengan mudah memblock beberapa alamat situs yang tidak kita inginkan tanpa menggunakan software apapun :

1. Buka C:WINDOWS\system32\drivers\etc
2. Cari file dengan nama “HOSTS“
3. Open with “Notepad”
4. Dibawah IP “127.0.0.1 localhost” tambahkan nama website yang ingin anda blokir Sebagai contoh “127.0.0.2 www.bing.com” (Tanpa tanda petik)
5. Selesai dan save

Apabila file dengan nama “HOSTS” tidak kamu dapati dalam folder system32, maka kamu bisa menggunakan fasilitas Search yang ada di windows, dan kamu bisa langsung cari file HOSTS tersebut di drive C)

Yang perlu di ingat disini adalah, semakin banyak website yang mau kita blokir maka ujung IPnya harus berurutan, mulai dari 1 sampai berapa banyak situs yang akan diblok.

ex :
127.0.0.1 localhost
127.0.0.2 www.google.com
127.0.0.3 www.youtube.com
127.0.0.4 www.yahoo.com

Dan seterusnya dan Kalau sudah, jangan lupa di-save. Gampang kan?

Coba saja buka website yang sudah anda blokir, dengan browser Firefox, Internet Explorer, atau Opera, tak bisa dibuka kan? Semoga bermanfaat.

Read More