Minggu, 20 Oktober 2013

CARA MEMBUAT ANIMASI SEDERHANA DENGAN BAHASA C

Cara Membuat Animasi Sederhana Dengan Bahasa C

Langsung saja,, saya kasih source code-nya:

#include<stdio.h>
#include<conio.h>
#include<string.h>
#include<dos.h>
#include<windows.h>

void setcolor(unsigned short color)
{
HANDLE hCon=GetStdHandle(STD_OUTPUT_HANDLE);
SetConsoleTextAttribute(hCon,color);
}
void gotoxy(int x,int y)
{
HANDLE hConsoleOutput;
COORD dwCursorPosition;
dwCursorPosition.X=x;
dwCursorPosition.Y=y;
hConsoleOutput=GetStdHandle(STD_OUTPUT_HANDLE);
SetConsoleCursorPosition(hConsoleOutput,dwCursorPosition);
}
main()
{
 char kata[]="LAMBOK",kata1[10],kata2[10];
 int i,j,k,l;
 system("cls");
 gotoxy(24,11);

 strcpy(kata1,kata);
 strcpy(kata2,kata);
 for(i=0;i<=strlen(kata)-1;i++)
 {
  if(i%2==1)
  {
   kata1[i]=' ';
  }
  else
  {
   kata2[i]=' ';
  }
  printf("%s",kata);
  printf("%s",kata1);
  printf("%s",kata2);
 }
 for( i=1;i<=12;i++)
 {

 for(i=1,j=15-strlen(kata),k=59+strlen(kata),l=11;i<=11;i++,j+=2,k-=2,l--)
 {
  system("cls");
  setcolor(10);

  gotoxy(37-1/2*strlen(kata),12);printf("%s",kata);
  gotoxy(j,i);printf("%s",kata1);
  gotoxy(37-1/2*strlen(kata),l);printf("%s",kata1);
  gotoxy(k,i);printf("%s",kata2);
  gotoxy((37-1/2*strlen(kata))-j,12);printf("%s",kata1);
  gotoxy(j,l+12);printf("%s",kata1);
  gotoxy(37-1/2*strlen(kata),i+12);printf("%s",kata2);
  gotoxy(k,l+12);printf("%s",kata2);
  gotoxy((37-1/2*strlen(kata))+j,12);printf("%s",kata2);


 }


 for(i=11,j=35-strlen(kata),k=39+strlen(kata),l=1;i>=1;i--,j-=2,k+=2,l++)
 {
  system("cls");
  setcolor(11);

  gotoxy(37-1/2*strlen(kata),12);printf("%s",kata);
  gotoxy(j,i);printf("%s",kata2);
  gotoxy(37-1/2*strlen(kata),l);printf("%s",kata2);
  gotoxy(k,i);printf("%s",kata1);
  gotoxy(37-1/2*strlen(kata)-j,12);printf("%s",kata2);
  gotoxy(j,l+12);printf("%s",kata2);
  gotoxy(37-1/2*strlen(kata),i+12);printf("%s",kata1);
  gotoxy(k,l+12);printf("%s",kata1);
  gotoxy((37-1/2*strlen(kata))+j,12);printf("%s",kata1);
  gotoxy(37-1/2*strlen(kata),12);printf("%s",kata);
  gotoxy(j,i);printf("%s",kata1);
  gotoxy(37-1/2*strlen(kata),l);printf("%s",kata1);
  gotoxy(k,i);printf("%s",kata2);
  gotoxy((37-1/2*strlen(kata))-j,12);printf("%s",kata1);
  gotoxy(j,l+12);printf("%s",kata1);

gotoxy(37-1/2*strlen(kata),i+12);printf("%s",kata2);
  gotoxy(k,l+12);printf("%s",kata2);
  gotoxy((37-1/2*strlen(kata))+j,12);printf("%s",kata2);


 }
 for(i=1,j=15-strlen(kata),k=59+strlen(kata),l=11;i<=11;i++,j+=2,k-=2,l--)
 {
  system("cls");
  setcolor(13);

  gotoxy(37-1/2*strlen(kata),12);printf("%s",kata);
  gotoxy(j,i);printf("%s",kata1);
  gotoxy(37-1/2*strlen(kata),l);printf("%s",kata1);
  gotoxy(k,i);printf("%s",kata2);
  gotoxy((37-1/2*strlen(kata))-j,12);printf("%s",kata1);
  gotoxy(j,l+12);printf("%s",kata1);
  gotoxy(37-1/2*strlen(kata),i+12);printf("%s",kata2);
  gotoxy(k,l+12);printf("%s",kata2);
  gotoxy((37-1/2*strlen(kata))+j,12);printf("%s",kata2);
  gotoxy(37-1/2*strlen(kata),12);printf("%s",kata);
  gotoxy(j,i);printf("%s",kata2);
  gotoxy(37-1/2*strlen(kata),l);printf("%s",kata2);
  gotoxy(k,i);printf("%s",kata1);
  gotoxy(37-1/2*strlen(kata)-j,12);printf("%s",kata2);
  gotoxy(j,l+12);printf("%s",kata2);
  gotoxy(37-1/2*strlen(kata),i+12);printf("%s",kata1);
  gotoxy(k,l+12);printf("%s",kata1);
  gotoxy((37-1/2*strlen(kata))+j,12);printf("%s",kata1);
 for(i=1;i<=22666666;i++);

 }


 for(i=11,j=35-strlen(kata),k=39+strlen(kata),l=1;i>=1;i--,j-=2,k+=2,l++)
 {
  system("cls");
  setcolor(14);

  gotoxy(37-1/2*strlen(kata),12);printf("%s",kata);
  gotoxy(j,i);printf("%s",kata2);
  gotoxy(37-1/2*strlen(kata),l);printf("%s",kata2);
  gotoxy(k,i);printf("%s",kata1);
  gotoxy(37-1/2*strlen(kata)-j,12);printf("%s",kata2);
  gotoxy(j,l+12);printf("%s",kata2);
  gotoxy(37-1/2*strlen(kata),i+12);printf("%s",kata1);
  gotoxy(k,l+12);printf("%s",kata1);
  gotoxy((37-1/2*strlen(kata))+j,12);printf("%s",kata1);


 }
 system("cls");
 }
 return 0;
}

2 komentar: