Minggu, 20 Oktober 2013

Cara Nembak cewek dari Notepad

Nah,, langsung saja,, saya kasi scripnya..

Dim Jika
Jika = InputBox (" MAU GA JADI PACAR AKU ")
If UCase(Jika) = "IYA" Then
MsgBox "MAKASI YA"
ElseIf UCase(Jika) = "TIDAK" Then
MsgBox "GPP "
Else
MsgBox " oke, fine"
End If

heheeh,,,,langsung saja diketik di Notepad lalu simpan dengan ekstensi *.vbs...
misalnya namanya xxxy.vbs

Misalnya Anda simpan di desktop,, maka untuk membukanya,,silahkan klik 2 kali.

KATA KUNCI DALAM BAHASA C


Kata Kunci Dalam Bahasa C

  1. auto
  2. break
  3. case
  4. char
  5. const
  6. continue
  7. default
  8. do
  9. double
  10. else
  11. enum
  12. extern
  13. float
  14. for 
  15. goto
  16. if 
  17. int
  18. long
  19. register
  20. return
  21. short
  22. signed
  23. sizeof
  24. static
  25. struct
  26. switch
  27. typedef
  28. union
  29. unsigned
  30. void
  31. volatile
  32. while
NB: Kata Kunci di tulis dalam huruf kecil.

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;
}

Rabu, 04 September 2013

saya sotul gaol.. kali ini saya akan berbagi dengan Anda bagaimana caranya membuat tampilan facebook Anda menjadi lebih menarik..lansung saja..
1.facebook