15.25
alie
Contoh 1
Contoh 2
Contoh 3
Contoh 4
Contoh 5
Sumber : Abdul Kadir, 2003 Pemrograman Dasar Turbo C untuk IBM PC.
/* -------------------------------------- */
/* file program: CGETS.C */
/*i contoh pembatasan panjang string */
/* yang dimasukan dari keyhboard */
/* ------------------------------------------ */
#include "conio.h"
main()
{
char st[27]; /*I area untuk string masukan */
char *ptr; /* pointer yang menunjuk string masukan */
clrscr();
cprintf("Nama ( maks.24 karakter ):");
st[0]=25; /* atur panjang string maksimal plus karakter NULL */
ptr=cgets(st); /* baca maksimal 24 karakter */
cprintf("Nama yang anda masukan adalah %s\r\n",ptr);
cprintf("Jumlah karakter = %d\r\n",st[1]);
getch();
}
Contoh 2
/* -------------------------------- */
/* file program : GETDATE.C */
/* untuk memperoleh tanggal sistem */
/* ----------------------------------- */
#include "conio.h"
#include "dos.h"
main()
{
struct time tanggal;
clrscr();
getdate(&tanggal); /* peroleh data tanggal */
cprintf("Tanggal kini: %d-%d-%d",tanggal.da_day,tanggal.da_mon,tanggal.da_year);
getch();
}
Contoh 3
/* -------------------------------- */
/* file program :GETTIME.C */
/* untuk memperoleh waktu sistem */
/* ------------------------------- */
#include "conio.h"
#include "dos.h"
main()
{
struct time waktu;
clrscr();
while(!kbhit())
{
gettime(&waktu); /* peroleh data jam */
gotoxy(70,1);
cprintf("%2d:%2d:%2d",waktu.ti_hour,waktu.ti_min,waktu.ti_sec);
}
getch();
}
Contoh 4
/* ------------------------------------ */
/* file program: HAPUSKBD.C */
/* contoh menghapus isi keyboard */
/* ------------------------------------ */
#include "stdio.h"
#include "conio.h"
#include "dos.h"
#define PANJANG_STR 15
main()
{
char st[PANJANG_STR+3];
clrscr();
cputs("saya akan menunggu kira - kira 4detik.\r\n");
cputs("jika selama waktu tersebut ada tombol");
cputs("yang ditekan\r\n");
cputs("tombol tersebut takkan dibaca oleh cgets().\r\n");
sleep(4); /* tunda eksekusi selama 4 detik */
while (kbhit())
getch(); /* hanpus isi penampung keyboard */
cputs("Masukan nama anda : ");
st[0]=PANJANG_STR+1; /* atur agar string maksimal adalah PANJANG_STR karakter */
cgets(st); /* baca string dari keyhboard */
getch();
}
Contoh 5
/* ------------------------------------ */
/* file program : KBHIT.C */
/* contoh pemakaian kbhit() */
/* untuk memeriksa ada tidaknya tombol yang ditekan */
/* ----------------------------------------------------- */
# include "conio.h"
main()
{
unsigned i;
unsigned char kar;
clrscr();
for (i=0;i<200000;i++) /* selama i <2000 */
if(kbhit()) /* jika ada tombol ditekan */
break; /* keluar dari for */
if(!kbhit())
cputs("Anda tak menekan tombol sama sekali\r\n");
else
{
cputs("Anda telah menekan tombol ");
if((kar=getch())==0)
{
kar=getch(); /* baca kode kedua */
cprintf("Perluasan. kode kedua=%d\r\n",kar);
}
else
cprintf("biasa.kode = %d\r\n",kar);
}
getch();
}
Contoh 6 /* ------------------------------------ */
/* file program : RANDOM1.C */
/* contoh membangkitkan bilangan acak */
/* menggunakan rand() */
/* dengan inisialisasi melalui srang() */
/* ------------------------------------- */
#include "conio.h"
#include "stdlib.h"
main()
{
int i;
srand(100); /* memberikan nilai awal kepada pembangkit bil.acak */
cputs("5 Bilangan melalui srand() :\r\n");
for(i=0;i<5;i++)
cprintf("%d",random(50));
cputs("\r\n");
getch();
}
Contoh 7 /* --------------------------------- */
/* file program: RANDOM2.C */
/* contoh membangkitkan bilangan acak */
/* menggunakan rand() */
/* dengan inisialisasi melalui randomize() */
/* ---------------------------------------------- */
#include "conio.h"
#include "stdlib.h"
#include "time.h"
main()
{
int i;
randomize(); /* inisialisasi pembangkit acak berdasarkan waktu sistem */
cputs("5 Bilangan acak melalui randomize() : \r\n");
for(i=0;i<5;i++)
cprintf("%d\r\n",random(50));
getch();
}
Contoh 8 /* ------------------------------------ */
/* file program: SUARA.C */
/* contoh membunyikan speaker */
/* --------------------------------------- */
#include "dos.h"
main()
{
sound(440); /* bunti berfrekwensi 440 Hz */
delay(500); /* selama 1/2 */
nosound(); /* hentikan suara */
getch();
}
Contoh 9 /* ------------------------------------- */
/* file program: TBLOANAH.C */
/* contohmembaca tombol panah */
/* ----------------------------------- */
#include "conio.h"
#define PANAH_ATAS (256+72)
#define PANAH_KIRI (256+75)
#define PANAH_KANAN (256+77)
#define PANAH_BAWAH (256+80)
main()
{
unsigned int kar;
cputs("Tekanlah tombol - tombol panah.\r\n");
do
{
kar=getch(); /* baca tombol */
if(kar==0) /* jika tombol perluasan */
kar=256+getch(); /* tambahkan nilai 256 terhadap kode kedua */
/* --- cek tombol panah --- */
switch(kar)
{
case PANAH_ATAS : cputs("Tombol yang anda tekan");
cputs("adalah PANAH ATAS\r\n");
break;
case PANAH_BAWAH: cputs("Tombol yang anda tekan");
cputs("adalah PANAH BAWAH\r\n");
break;
case PANAH_KIRI : cputs("Tombol yang anda tekan");
cputs("adalah PANAH KIRI\r\n");
break;
case PANAH_KANAN: cputs("Tombol yang anda tekan");
cputs("adalah PANAH KANAN\r\n");
}
}
while (kar !=27); /* selesai jika escape */
getch();
}
Contoh 10 /* ----------------------------------------- */
/* file program : TOTWAKTU.C */
/* program mencacah waktu yang diperlukan */
/* untuk menampilkan tulisan turbo c */
/* ----------------------------------------- */
#include "stdio.h"
#include "time.h"
#include "conio.h"
main()
{
int i;
time_t waktu_awal, total_waktu;
clrscr();
waktu_awal=time(NULL); /* catat waktu kini */
for(i=0;i<350;i++)
cputs("TURBO C");
total_waktu=time(NULL)-waktu_awal;
cprintf("\r\nTotal waktu : %d detik\r\n",total_waktu);
getch();
}
Sumber : Abdul Kadir, 2003 Pemrograman Dasar Turbo C untuk IBM PC.
Menciptakan Database
