Anak Agung Lingga Segara

Jika ada link yang rusak tolong segera hubungi saya dengan cara mengirimkan laporan saya.
cara mengirimkannya cukup mudah.

buat data seperti di bawah ini:

Nama:
URL Facebook :
URL artikel :
Keterangan :

Kirim data tersebut ke email agunglinggasegara@yahoo.co.id

diharap untuk mengirim laporan yang valid dan rinci agar mudah untuk di perbaiki nantinya.

Trimakasih.

kali ini saya akan mengupload program pengubah suhu / pengkorvensi suhu celcius,reamur,fahrenheit dan kelvin.
jika ingin mengunduh rumusnya bisa lansung download klik disni
untuk flowchartnya disini

berikut rumusnya:

program Konversi_Suhu;
uses crt;
label Celcius,Reaumur,Fahrenheit,Kelvin,awal,akhir;
var C,F,R,K,jumlah:real;
pilih,ulang:string;
begin clrscr;
awal:
clrscr;
textcolor(white);writeln('-----------------------------PROGRAM KONVERSI SUHU------------------------------');
textcolor(white);writeln('-------------------------------------oleh---------------------------------------');
textcolor(white);writeln('---------------------------Anak Agung Lingga Segara-----------------------------');
writeln('');
writeln('');
textcolor(white);writeln('Pilih jenis suhu: ');
writeln('');
textcolor(lightred);writeln('1.Celcius');
textcolor(yellow);writeln('2.Fahrenheit');
textcolor(lightgreen);writeln('3.Reaumur');
textcolor(lightblue);writeln('4.Kelvin');
writeln('');
textcolor(white);write('Masukkan nomor suhu pilihan (1-4) : '); readln(pilih);
if pilih='1' then goto Celcius else
if pilih='2' then goto Fahrenheit else
if pilih='3' then goto Reaumur else
if pilih='4' then goto Kelvin else goto awal;
Celcius:
clrscr;
textcolor(white);writeln('-----------------------------PROGRAM KONVERSI SUHU------------------------------');
textcolor(white);writeln('---------------------------Anak Agung Lingga Segara-----------------------------');
writeln('');
writeln('');
textcolor(lightred);writeln('Konversi Suhu Celcius');
writeln('');
textcolor(white);write('Masukkan suhu Celcius : '); readln(C);
jumlah:=C*1.8+32;
textcolor(yellow);writeln('Suhu Fahrenheit = ',jumlah:0:2);
jumlah:=C*0.8;
textcolor(lightgreen);writeln('Suhu Reaumur = ',jumlah:0:2);
jumlah:=C+273.15;
textcolor(lightblue);writeln('Suhu Kelvin = ',jumlah:0:2);
writeln('');
textcolor(white);writeln('Kembali ke menu awal? (ya/tidak)'); readln(ulang);
if ulang='ya' then goto awal else goto akhir;
Fahrenheit:
clrscr;
writeln('-----------------------------PROGRAM-KONVERSI-SUHU------------------------------');
writeln('----------------------------Anak Agung Lingga Segara------------------------------');
writeln('');
writeln('');
textcolor(yellow);writeln('Konversi Suhu Fahrenheit');
writeln('');
textcolor(white);write('Masukkan suhu Fahrenheit : '); readln(F);
jumlah:=(F-32)/1.8;
textcolor(red);writeln('Suhu Celcius = ',jumlah:0:2);
jumlah:=(F-32)/2.25;
textcolor(lightgreen);writeln('Suhu Reaumur = ',jumlah:0:2);
jumlah:=(F+459.67)/1.8;
textcolor(lightblue);writeln('Suhu Kelvin = ',jumlah:0:2);
writeln('');
textcolor(white);writeln('Kembali ke menu awal? (ya/tidak)'); readln(ulang);
if ulang='ya' then goto awal else goto akhir;
Reaumur:
clrscr;
writeln('-----------------------------PROGRAM-KONVERSI-SUHU------------------------------');
writeln('----------------------------Anak Agung Lingga Segara----------------------------');
writeln('');
writeln('');
textcolor(lightgreen);writeln('Konversi Suhu Reaumur');
writeln('');
textcolor(white);write('Masukkan suhu Reaumur : '); readln(R);
jumlah:=R/0.8;
textcolor(lightred);writeln('Suhu Celcius = ',jumlah:0:2);
jumlah:=R*2.25+32;
textcolor(yellow);writeln('Suhu Fahrenheit = ',jumlah:0:2);
jumlah:=R/0.8+273.15;
textcolor(lightblue);writeln('Suhu Kelvin = ',jumlah:0:2);
writeln('');
textcolor(white);writeln('Kembali ke menu awal? (ya/tidak)'); readln(ulang);
if ulang='ya' then goto awal else goto akhir;
Kelvin:
clrscr;
textcolor(white);writeln('-----------------------------PROGRAM KONVERSI SUHU------------------------------');
textcolor(white);writeln('----------------------------Anak Agung Lingga Segara----------------------------');
writeln('');
writeln('');
textcolor(lightblue);writeln('Konversi Suhu Kelvin');
writeln('');
textcolor(white);write('Masukkan suhu Kelvin : '); readln(K);
jumlah:=K-273.15;
textcolor(lightred);writeln('Suhu Celcius = ',jumlah:0:2);
jumlah:=K*1.8-459.67;
textcolor(yellow);writeln('Suhu Fahrenheit = ',jumlah:0:2);
jumlah:=(K-273.15)*0.8;
textcolor(lightgreen);writeln('Suhu Reamur = ',jumlah:0:2);
writeln('');
textcolor(white);writeln('Kembali ke menu awal? (ya/tidak)'); readln(ulang);
if ulang='ya' then goto awal else goto akhir;
akhir:
writeln('------------------------------ENTER-UNTUK-KELUAR--------------------------------');
writeln('---------------------------------Terimakasih------------------------------------');

readln;
end.



sekian dari program pengubah suhu di pascal
kopi kode di atas ke notepad atau ke word agar lebih gampang dibacanya
sebagai pembaca yang baik tinggalkan lah komentar anda di sini

Kebanyakan blog menggunakan bahasa internasional, yaitu bahasa Inggris dengan tujuan agar blognya dapat dimengerti oleh semua orang diseluruh dunia. Namun jangan khawatir apabila blog yang kita miliki berbahasa Indonesia, dengan menggunakan tambahan widget google translate maka blog kita yang berbahasa Indonesia akan dapat diterjemahkan ke dalam beberapa bahasa yang digunakan di dunia, seperti bahasa Inggris, Perancis, Italia, Jerman, Brazilia, Portugal, Yunani, Jepang, Cina, Korea, maupun bahasa Arab.

1. Pertama login ke blogger terlebih dahulu
2. Klik Tata Letak  
3. Klik tab Elemen Halaman  
4. KlikTambah Gadget  
5. Pilih Tambah HTML/JavaScriptCopy pastekan code translate di bawah kedalam kolom yang tersedia. 

Tampilan ke-1

Copy code dibawah ini:



Tampilan ke-2


Copy code dibawah:




Kalian bisa menambah negara lain lagi untuk ditambahkan.
Sekian dari cara memasang translate bergambar bendera

Tentang Saya

Nama	Anak Agung Lingga Segara
Kelas	X RPL 1
Sekolah	SMK N 1 Denpasar
Tempat,tanggal lahir	Denpasar-Bali-Indonesia,12 agustus 1998

Saya seorang siswa dari Sekolah Menengah Kejuruan Negri 1 .
Saya menyukai : Anime,Hatsune Miku,Game
Hobi Saya :Bermain Game,Menonton Anime,Mendengarkan Lagu Hatsune Miku / Menonton Video Hatsune Miku 

Changing your computer cursor to these!
If you want one or both of these cursors on your computer, it seems difficult, but its actually pretty easy:

1. Download any of these cursors from the links provided.
When you click these links, you will be prompted to download them. They will download to wherever your downloads normally go. Make sure you know where that folder is, since you'll have to browse for it later to replace your pointers with the Miku ones! Here are the links:

Singing Cursor
Blinking Cursor
Leekspin Cursor
Book Cursor
Kotatsu Cursor


2. Find the part of your computer where you can change cursors.

For Windows find it this way. First go to Control Panel on your computer. Then for Windows got to XP Printers and other hardware- then Mouse- then click the Pointers tab. For Windows 7 just go straight to Mouse from Control Panel, and then to the Pointers tab.

For other operating systems, there should be something similar and if you don't know you'll have to consult your manual or Google where to find your pointers.

3. Now change out the cursor!
Go down to Customize to select what cursors you wanna change. The ones you see the most are Normal Select and Link Select. Highlight the one you want to change and go to Browse.. and find the folder where the cursors downloaded to, select them, and switch them out! Make sure you hit Apply (or whatever your computer has) to keep the changes! You can save this theme as well. Make sure Allow themes to change cursors is checked as well.

Use these visual examples if you don't know how:
This is starting from the menu we brought up in step 2 above.
I select the cursor I'm going to change on my com and hit browse.


Then I find the custom Miku cursors on my com and select one.


Now I apply the changes to my com! Done!


A good setup is to have the Singing Cursor as your normal select, and the Blinking Cursor as your link select!



Changing your anime/manga list cursor!

This is made to work on any list, just add the codes in the spoiler to your CSS. The cursor will work in Chrome, Safari, and Firefox. Sadly no modern browsers support animated cursors anymore so Miku won't be animated, but the cursor will still be customized! The cursor won't appear in Internet Explorer, and would lag up IE anyways as they no longer support animated cursors.

note: You need custom CSS to use this on your anime and manga lists.
If you don't, use this tutorial first: http://myanimelist.net/forum/?topicid=200320

I made two schemes for cursors. One shows the Singing Miku cursor at all times on your list. The other shows the singing cursor normally but when you put it on a link it shows the blinking one!


Same cursor on hover and non-hover





Cursor changes on hover

Cara mengganti tampilan mouse di Blog

Sekarang kita akan bahas 2 jenis trik untuk merubah tampilan cursor mouse.

Type Pertama ( variasi image )

• Pilih tab Elemen Halaman ( Page Element ).
• Klik pada bagian Tambah Gadget dan pilih HTML/JavaScript.
• Copykan script berikut dan letakkan pada kotak Content yang tersedia:
  Note : Bisa kamu letakan dimana saja pada layout.
  

  <style type="text/css">body {cursor:url("http://lh5.ggpht.com/_wC8_9aR_6uE/S6ufngy_rmI/AAAAAAAACcg/XQ6AD06Zt10/appstarting.gif"),default}</style>

  Keterangan :
  Warna merah, URL cursor ( ganti dengan URL cursor lain yang sesuai dengan warna / type template )
• Simpan dan lihat hasilnya.. !

Type Kedua ( variasi Texs )

• Pilih tab Elemen Halaman ( Page Element ).
• Klik pada bagian Tambah Gadget dan pilih HTML/JavaScript.
• Copykan script berikut dan letakkan pada kotak Content yang tersedia:
  Note : Bisa kamu letakan dimana pada layout.
  

  <script>
  //mouse
  //Circling text trail- Tim Tilton
  //Website: http://www.tempermedia.com/
  //Visit http://www.dynamicdrive.com for this script and more
  function cursor_text_circle(){
  // your message here
  var msg='Inspirasi dan Kreasi'.split('').reverse().join('');
  
  var font='Times New Roman';
  var size=3; // up to seven
  var color='#ff0000';
  
  // This is not the rotation speed, its the reaction speed, keep low!
  // Set this to 1 for just plain rotation w/out drag
  var speed=.2;
  
  // This is the rotation speed, set it negative if you want
  // it to spin clockwise
  var rotation=-.2;
  
  // Alter no variables past here!, unless you are good
  //---------------------------------------------------
  
  
  var ns=(document.layers);
  var ie=(document.all);
  var dom=document.getElementById;
  msg=msg.split('');
  var n=msg.length;
  var a=size*13;
  var currStep=0;
  var ymouse=0;
  var xmouse=0;
  var props="<font face="+font+" color="+color+" size="+size+">";
  
  if (ie)
  window.pageYOffset=0
  
  // writes the message
  if (ns){
  for (i=0; i < n; i++)
  document.write('<layer left="0" top="0" width="+a+" name="nsmsg'+i+'" height="+a+"><center>'+props+msg[i]+'</font></center></layer>');
  }
  else if (ie||dom){
  document.write('<div id="outer" style="position:absolute;top:0px;left:0px;z-index:30000;"><div style="position:relative">');
  for (i=0; i < n; i++)
  document.write('<div id="iemsg'+(dom&&!ie? i:'')+'" style="position:absolute;top:0px;left:0;height:'+a+'px;width:'+a+'px;text-align:center;font-weight:normal;cursor:default">'+props+msg[i]+'</font></div>');
  document.write('</div></div>');
  }
  (ns)?window.captureEvents(Event.MOUSEMOVE):0;
  
  function Mouse(evnt){
  ymouse = (ns||(dom&&!ie))?evnt.pageY+20-(window.pageYOffset):event.y; // y-position
  xmouse = (ns||(dom&&!ie))?evnt.pageX+20:event.x-20; // x-position
  }
  
  if (ns||ie||dom)
  (ns)?window.onMouseMove=Mouse:document.onmousemove=Mouse;
  var y=new Array();
  var x=new Array();
  var Y=new Array();
  var X=new Array();
  for (i=0; i < n; i++){
  y[i]=0;
  x[i]=0;
  Y[i]=0;
  X[i]=0;
  }
  
  var iecompattest=function(){
  return (document.compatMode && document.compatMode!="BackCompat")? document.documentElement : document.body;
  }
  
  var makecircle=function(){ // rotation properties
  if (ie) outer.style.top=iecompattest().scrollTop+'px';
  currStep-=rotation;
  for (i=0; i < n; i++){ // makes the circle
  var d=(ns)?document.layers['nsmsg'+i]:ie? iemsg[i].style:document.getElementById('iemsg'+i).style;
  d.top=y[i]+a*Math.sin((currStep+i*1)/3.8)+window.pageYOffset-15+(ie||dom? 'px' : '');
  d.left=x[i]+a*Math.cos((currStep+i*1)/3.8)*2+(ie||dom? 'px' : ''); // remove *2 for just a plain circle, not oval
  }
  }
  
  var drag=function(){ // makes the resistance
  y[0]=Math.round(Y[0]+=((ymouse)-Y[0])*speed);
  x[0]=Math.round(X[0]+=((xmouse)-X[0])*speed);
  for (var i=1; i < n; i++){
  y[i]=Math.round(Y[i]+=(y[i-1]-Y[i])*speed);
  x[i]=Math.round(X[i]+=(x[i-1]-X[i])*speed);
  
  }
  makecircle();
  // not rotation speed, leave at zero
  setTimeout(function(){drag();},10);
  }
  if (ns||ie||dom)
  if ( typeof window.addEventListener != "undefined" )
  window.addEventListener( "load", drag, false );
  else if ( typeof window.attachEvent != "undefined" )
  window.attachEvent( "onload", drag );
  else {
  if ( window.onload != null ) {
  var oldOnload = window.onload;
  window.onload = function ( e ) {
  oldOnload( e );
  drag();
  };
  }
  else
  window.onload = drag;
  }
  
  }
  cursor_text_circle();
  
  </script>

  Keterangan :
  Teks akan muncul sebagai animasi yang mengikuti cursor mouse

Sekian dari cara mengganti tampilan mouse di blog

sumber: http://okelahe.blogspot.com/2011/07/mengganti-tampilan-cursor-mouse.html