Friday, April 9, 2010

Animasi Delay

Friday, April 9, 2010
Download Source Code

#include<iostream.h>
#include<conio.h>
#include<dos.h>

void delay(int a);
void delay(int a)
{

    for (int x=0;x<a*100;x++)
   {
       for (int y=0;y<a*100;y++)
      {}
   }
}
main()
{
    _setcursortype(_NOCURSOR);

    //KIRI DELAY
   textcolor(4);
   gotoxy(29,11);cprintf(">");
   delay(100);
   textcolor(6);
   gotoxy(30,11);cprintf(">");
   delay(100);
   textcolor(7);
   gotoxy(31,11);cprintf(">");
   delay(100);

    //TENGAH DELAY
   textcolor(3);
   gotoxy(33,11);cprintf("PROGRAM DELAY");

   //KANAN DELAY
   textcolor(4);
   gotoxy(47,11);cprintf("<");
   delay(100);
   textcolor(6);
   gotoxy(48,11);cprintf("<");
   delay(100);
   textcolor(7);
   gotoxy(49,11);cprintf("<");

   //MULAI STIKOM BALI
   sleep(2);
   textcolor(1);
   gotoxy(44,13);cprintf("|");
   delay(100);
   textcolor(0);
   gotoxy(44,13);cprintf(" ");

   textcolor(2);
   gotoxy(43,13);cprintf("L");
   delay(100);
   textcolor(0);
   gotoxy(43,13);cprintf(" ");
   textcolor(3);
   gotoxy(42,13);cprintf("A");
   delay(100);
   textcolor(0);
   gotoxy(42,13);cprintf(" ");

   textcolor(4);
   gotoxy(41,13);cprintf("B");
   delay(100);
   textcolor(0);
   gotoxy(41,13);cprintf(" ");
   textcolor(5);
   gotoxy(39,13);cprintf("M");
   delay(100);
   textcolor(0);
   gotoxy(39,13);cprintf(" ");

   textcolor(6);
   gotoxy(38,13);cprintf("O");
   delay(100);
   textcolor(0);
   gotoxy(38,13);cprintf(" ");
   textcolor(7);
   gotoxy(37,13);cprintf("K");
   delay(100);
   textcolor(0);
   gotoxy(37,13);cprintf(" ");

   textcolor(8);
   gotoxy(36,13);cprintf("I");
   delay(100);
   textcolor(0);
   gotoxy(36,13);cprintf(" ");
   textcolor(9);
   gotoxy(35,13);cprintf("T");
   delay(100);
   textcolor(0);
   gotoxy(35,13);cprintf(" ");

   textcolor(10);
   gotoxy(34,13);cprintf("S");
   delay(100);
   textcolor(0);
   gotoxy(34,13);cprintf(" ");

   //BALIK
   textcolor(15);
   gotoxy(34,13);cprintf("S");
   delay(100);
   textcolor(10);
   gotoxy(34,13);cprintf("S");

   textcolor(15);
   gotoxy(35,13);cprintf("T");
   delay(100);
   textcolor(9);
   gotoxy(35,13);cprintf("T");

   textcolor(15);
   gotoxy(36,13);cprintf("I");
   delay(100);
   textcolor(8);
   gotoxy(36,13);cprintf("I");

   textcolor(15);
   gotoxy(37,13);cprintf("K");
   delay(100);
   textcolor(7);
   gotoxy(37,13);cprintf("K");

   textcolor(15);
   gotoxy(38,13);cprintf("O");
   delay(100);
   textcolor(6);
   gotoxy(38,13);cprintf("O");

   textcolor(15);
   gotoxy(39,13);cprintf("M");
   delay(100);
   textcolor(5);
   gotoxy(39,13);cprintf("M");

   textcolor(15);
   gotoxy(41,13);cprintf("B");
   delay(100);
   textcolor(4);
   gotoxy(41,13);cprintf("B");

   textcolor(15);
   gotoxy(42,13);cprintf("A");
   delay(100);
   textcolor(3);
   gotoxy(42,13);cprintf("A");

   textcolor(15);
   gotoxy(43,13);cprintf("L");
   delay(100);
   textcolor(2);
   gotoxy(43,13);cprintf("L");

   textcolor(15);
   gotoxy(44,13);cprintf("I");
   delay(100);
   textcolor(1);
   gotoxy(44,13);cprintf("I");

   sleep(5);
   clrscr();
   getch();
   return 0;
}