coba php

Header("Content-Type:image/jpeg");
$a=600;
$b=500;
$img=ImageCreate($a,$b);
$xmin=-4.5e-10;
$xmax=4.5e-10;
$ymin=-3e-10;
$ymax=3e-10;
function transformx($x) {
$xmin=-4.5e-10;
$xmax=4.5e-10;
$a=600;
$k1=$a/($xmax-$xmin);
$k2=-$a*$xmin/($xmax-$xmin);
$px=$k1*$x+$k2; return $px;
}
function transformy($y) {
$ymin=-3e-10;
$ymax=3e-10;
$b=500;
$k3=$b/($ymin-$ymax);
$k4=$b*$ymax/($ymax-$ymin);
$py=$k3*$y+$k4; return $py;
}
//warna
$hitam = ImageColorAllocate ($img, 0, 0, 0);
$putih = ImageColorAllocate ($img, 255, 255, 255);
$merah = ImageColorAllocate ($img, 255, 0, 0);
$hijau = ImageColorAllocate ($img, 55, 228, 10);
$kuning=imagecolorallocate($img,225,225,0);
$biru = ImageColorAllocate ($img, 0, 0, 255);
//mengatur sumbu x dan y //
imagerectangle($img,0,0,$a-1,$b-1,$biru);
imageline($img,transformx($xmin),transformy(0),transformx($xmax),transformy(0),$kuning);
imageline($img,transformx(0),transformy($ymin),transformx(0),transformy($ymax),$kuning);
$dx=($xmax-$xmin)/5;
$x=$xmin;
while($x<=$xmax) {
imageline($img,transformx($x),transformy(0)-1,transformx($x),transformy(0)+1,$merah);
imagestring($img,3,transformx($x)+10,transformy(0)+1,$x,$putih);
$x+=$dx;
}
$dy=($ymax-$ymin)/5;
$y=$ymin;
while($y<=$ymax) {
imageline($img,transformx(0)-1,transformy($y),transformx(0)+1,transformy($y),$merah);
imagestring($img,3,transformx(0)+1,transformy($y)+1,$y,$putih);
$y+=$dy;
}
imagestring($img, 430, 350, 480, "Azmi Fitria Pratiwi", $hijau);
imagestring($img, 5, 0, 10, "lintasan elektron ion hidrogen", $hijau);
$t=0;
$tmax=2e-14;
$e=1.602e-19;
$m=9.11e-31;
$k=8.99e+9;
$d=0.535e-11;
$h=5e-19;
$x=-2.4e-10;
$y=2.4e-10;
$vx=-2.8e+5;
$vy=-2.8e+5;
$a=pow($x-$d,2)+pow($y,2);
$b=pow($x+$d,2)+pow($y,2);
$c=$k*POW($e,2)/$m;
$ax=-$c*(($x-$d)/pow($a,1.5)+($x+$d)/pow($b,1.5));
$ay=-$c*($y/pow($a,1.5)+$y/pow($b,1.5));
$vx=$vx+($h/2)*$ax; $vy=$vy+($h/2)*$ay;
do{
$x=$x+$h*$vx;
$y=$y+$h*$vy;
 imagesetpixel($img,transformx($x),transformy($y),$kuning);
 $a=pow($x-$d,2)+pow($y,2);
 $b=pow($x+$d,2)+pow($y,2);
 $ax=-$c*(($x-$d)/pow($a,1.5)+($x+$d)/pow($b,1.5));
 $ay=-$c*(($y/pow($a,1.5))+($y/pow($b,1.5)));
 $vx=$vx+$h*$ax; $vy=$vy+$h*$ay; $t=$t+$h;
 }
 while($t<=$tmax);
 ImageJPEG($img);
 ?>?>
Assalammu'alaikum. Halo temen-temen. . . Kali ini aq bwt blog baru tp tenang aja blog lama q jg masih tak pake. . . =)