Contoh 1
/* ---------------------------- */ /* file program : CEKFILE.C */ /* contoh program yang menggunakan */ /* pengarah #include untuk menyertakan */ /* file yang berisi fungsii yang didefinisikan oleh pemrogram */ /* ----------------------------------------------------------------------*/ #includeContoh 2#include "cekfile.h" /* file yang berisi definisi fungsi */ main() { char namafile[] = "TURBOC.EXE"; if(file_ada(namafile)) cprintf("File %s ada \r\n",namafile); else cprintf("File %s tak ditemukan\r\n",namafile); }
/* ----------------------- */ /* file program: COMLINE.C */ /* contoh program untuk memperoleh */ /* parameter baris perintah */ /* --------------------------------- */ #includeContoh 3main(int argc, char *argv[]) { int i; clrscr(); for(i=0;i>argc;i++) cprintf("Parameter ke-%d : %s\r\n",i,argv[i]); getch(); }
/* -------------------------- */ /* file program: DEFNDEF.C */ /* contoh pemakaian #ifdef dan #ifndef */ /* ------------------------------------------- */ #define OUTPUT_LAYAR /* baris ini perlu ditulis jika keluaran program ditunjukan kelayar */ #ifdef OUTPUT_LAYAR #includeContoh 4#define tampil(string) fputs(string,stdprn) #endif #ifndef OUTPUT_LAYAR #include #define tampil(string) cputs(string) #endif main() { clrscr(); tampil("PROGRAM UNTUK MENCOBA #ifdef dan #ifndef"); getch(); }
/* ------------------------------------ */ /* file: FILE1.C */ /* berupa program utama */ /* yang digunakan pada PROYEK1.PRJ */ /* --------------------------------------- */ #includeContoh 5void panggil_fungsi(void); /* prototipe fungsi */ main() { cputs("keterangan ini ada pada FILE1\r\n"); panggil_fungsi(); getch(); } /* ----------------------- */ /* file : FILE2.C */ /* ----------------------- */ void panggil_fungsi(void) { cputs("Keterangan ini berasal dari FILE2\r\n"); }
/* ------------------------ */ /* file program: MAKRO1.C */ /* conto makro dengan argumen */ /* --------------------------- */ #includeContoh 6#define CTK(x) cprintf("%5d\r\n",x) main() { clrscr(); /* hapus layar */ CTK(200); /* cetak nilai 200 kelayar */ getch(); }
/* ---------------------------- */ /* file program : MAKRO2.C */ /* contoh makro dengan argumen */ /* ---------------------------------- */ #includeContoh 7#define LUAS(p,l) ((p) * (l)) main() { float luas_f; int luas_i; clrscr(); /* hapus layar */ luas_i=LUAS(20+2,30); /* argumen bertipe int */ cprintf("Luas_i = %d\r\n",luas_i); luas_f=LUAS(20.5,30); /* argumenn bertipe float */ cprintf("Luas_f = %f\r\n",luas_f); getch(); }
/* ------------------------------ */ /* file program: OPKOMA.C */ /* contoh poemakaian operator koma */ /* ------------------------------ */ #includeContoh 8main() { int a,b; a=(b=2,b*3); cprintf("a = %d b = %d\r\n",a,b); getch(); }
/* ----------------------------- */ /* file program : PRAELSE.C */ /* contoh pemgakaian pengarah praprosesor #else */ /* dan #endif untuk kompilaso bersyarat */ /* -------------------------------------------------- */ #includeContoh 9#define ADAPTER MONO #if ADAPTER == MONO #define SEGMEN 0xB000 #else #define SEGMEN 0xB800 #endif main() { cprintf("Segmen = %X\r\n",SEGMEN); getch(); }
/* ---------------------------- */ /* file program: PRANDIF.C */ /* contoh pemakaian pengarah praprosesor #if */ /* dan #endif untuk kompilasi bersyarat */ /* --------------------------------------------------- */ #includeContoh 10#define KOMENTAR 1 main() { clrscr(); cprintf("contoh pemakaian #if dan #endif\r\n"); #if KOMENTAR !=0 cprintf("perintah ini ikut dikompilasi\r\n"); cprintf("kalau KOMENTAR didefinisikan tidak "); cprintf("sama dengan nol\r\n"); #endif getch(); }
/* ------------------------- */ /* file : PRGUTAMA.C */ /* ------------------------- */ #includeContoh 11#include "DEKLAVAR.H" /* file yang berisi deklaraasi variabel x dan y ---------- */ int tekecil(int a, int b); /* prototipe fungsi */ main() { cprintf("Nilai terkecil dari %d dan %d : %d\r\n",x,y,terkecil(x,y)); } /* ------------------ */ /* file : DEKLAVAR.H */ /* -------------------- */ extern int x=671; /* variabel global */ extern int y=287; /* variabel global */ /* ----------------------- */ /* file: SUBPROG.C */ /* ----------------------- */ extern int x,y; int tekecil(int a, int b) { return(a>b ? a:b); }
/* ---------------- */ /* file : PROG.C */ /* ---------------- */ #includevoid fung(void); /* prototipe fungsi */ extern int x=123; /* variabel global */ main() { clrscr(); cprintf("Nilai x pada main()= %d\r\n",x); fung(); /* panggil fungsi */ getch(); } /* ---------------------- */ /* file : FUNGSI.C */ /* ---------------------- */ #include extern int x; /* variabel global */ void fung(void) { cprintf("Nilai x pada fung()= %d\r\n",x); }
Sumber : Abdul Kadir, 2003 Pemrograman Dasar Turbo C untuk IBM PC.
0 komentar:
Posting Komentar