header blog biru nisa

Pensieve UuL
 



TeNtaNg UuL...
ImageChef.com - Custom comment codes for MySpace, Hi5, Friendster and more
Name: UuL
Home: Semarang kaline banjir...., Indonesia
About Me: UuL hanyalah gadis yang suka jalan-jalan, tidur, makan, foto, baca, maen komputer.... Suka tanya-tanya, gampang penasaran tp pendiem.....(he2) Tp ga tau jg gimana anaknya???? Soalnya pendapat orang kan beda-beda. What about u? T_T
See my complete profile
My Japanese Name Is...
Kaede Ichijo
DeeP bLue Me




Copy kode di bawah untuk link,,tungguin linkback UuL.. MakaCi



UuL Friendster * Blog * Contact Email YM *

CoReTaNKu
Archives
BaTas WaKtu


Free Blog Content

AbSeN YoK...


Free chat widget @ ShoutMix

TeMen-TeMeN
BanNer'z

Blogger Templates

BLOGGER


www.feriardiansyah.blogspot.com

BlOg FoR MuSiCFr3ak
edit blog

 

 

.::::::::::::::: FrEeDoM fRee===uulmaniest.blogspot.com :::::::::::::::.
 
  Minggu, 20 April 2008  
 
  ;
Game Bahasa C
Akhirnya dua minggu serangkaian ujianku pun berlalu...
Oy,,,,sekedar berbagi ne tugas komputer grafik yang sempet bkin aku terkapar....Emank sih bukan semua murni ideku....tapi seenggaknya aku enggak ngejiplak murni karya orang lain...paling enggak sesuai budaya di kampusku -copy_paste_edit- beberapa listing kugabungkan hingga jadilah game sederhana ini.

Ceritanya cy sederhana pesawat yang kehabisan bahan bakar. Jadi kamu harus ngambil beberapa gasoline sebelum waktunya bener-bener abiz.... Ne listing program tentang game pesawat yang kubuat pake graphic bhs C :
main()
{
int kendali=DETECT; int mode;
int i,x,y,waktu,z=0,q,xpswt=400,ypswt=300,scor=0,l=0,l2=0,lv=1,nabrak=0,laku;
void *pesawat; void *gas;
char skor[5]; char level[5];
initgraph(&kendali,&mode,"");
randomize();
setbkcolor(WHITE);

/*Buat bentuk pesawat*/
setcolor(BLUE);
ellipse(100,100,0,180,10,15);
line(90,100,90,130); line(110,100,110,130); line(92,100,92,105); line(108,100,108,105);
ellipse(100,105,0,180,8,9); ellipse(100,110,20,160,8,9);
line(90,130,50,150); line(50,150,50,160); line(50,160,90,150); line(110,130,150,150);
line(150,150,150,160); line(150,160,110,150); line(90,150,93,190); line(110,150,107,190);
line(93,190,82,194); line(82,194,82,200); line(82,200,100,197); line(107,190,118,194);
line(118,194,118,200); line(118,200,100,197); line(100,190,100,205);
pesawat=(void *)malloc(imagesize(50,85,150,205));
getimage(50,85,150,205,pesawat);
bar(50,85,150,205);
putimage(250,300,pesawat,XOR_PUT);
cleardevice();

/*Buat bentuk gasoline*/
rectangle(100,20,175,40);
outtextxy(105,25,"GASOLINE");
gas=(void *)malloc(imagesize(100,20,175,40));
getimage(100,20,175,40,gas);
putimage(100,20,gas,XOR_PUT);

/*Buat batas waktu jalan*/
for(x=40;x<=600;x++) for(y=5;y<=25;y++) putpixel(x,y,BLUE); waktu=600; /*Buat Jalanin pesawat*/ do { if(kbhit()) laku=getch(); if(z%10==0) { for(q=600;q>=waktu;q--)
for(z=5;z<=25;z++) putpixel(q,z,0); waktu--;
if(waktu<40) nabrak="="" x="50+random(300);" y="50+random(200);" nabrak="1;" xpswt="30;">500)xpswt=500;
else if(ypswt<40) ypswt="40;">350)
ypswt=350;
if(laku==75) /*jalan kiri*/ xpswt=xpswt-8;
else if(laku==77) /*jalan kanan*/ xpswt=xpswt+8;
else if(laku==72) /*jalan atas*/ ypswt=ypswt-8;
else if(laku==80) /*jalan bawah*/ ypswt=ypswt+8;
putimage(xpswt,ypswt,pesawat,XOR_PUT);
delay(100);
putimage(xpswt,ypswt,pesawat,XOR_PUT);
if(xpswt>=x-60 && ypswt>=y-50 && xpswt<=x+60 && ypswt<=y+50) { setcolor(BLUE); bar(140,450,190,460); scor=scor+100; itoa(scor,skor,10); outtextxy(90,450,"Scor ="); outtextxy(140,450,skor); putimage(x,y,gas,XOR_PUT); nabrak=0; } if(scor>=1000)
{ l=5; lv=2; }
if(scor>2000)
{ l2=10; lv=3; }
bar(340,450,390,460);
itoa(lv,level,10);
outtextxy(280,450,"Level = ");
outtextxy(340,450,level);
if(z>50)
z=0;z++;
}while(laku!=27);
getch();
closegraph();
}
Yah....Selamat mencoba aja deh...Sebenernya ne program masih jauh dr bagus cy tapi lumayan lah...buat pemula yang sedang diserang sakit. he...he..
Moga bermanfaat!

Label:

daLam fiKiRan UuL @ 4/20/2008 09:24:00 AM  
2 Comments:
Posting Komentar
<< Home