Q. \u178f\u17be\u1794\u17d2\u179a\u17be\u1794\u17d2\u179a\u17b6\u179f\u17cb Function manipulator \u179f\u1798\u17d2\u179a\u17b6\u1794\u17cb\u1792\u17d2\u179c\u17be\u1780\u17b6\u179a\u1784\u17b6\u179a\u17a2\u17d2\u179c\u17b8?
\nA. Function manipulator \u1782\u17ba\u1787\u17b6\u17a2\u1793\u17bb\u1782\u1798\u17cd\u178a\u17c2\u179b\u1798\u17b6\u1793\u179f\u17d2\u179a\u17b6\u1794\u17cb\u179a\u1794\u179f\u17cb steam Input \/Output \u178a\u17c2\u179b\u178f\u17d2\u179a\u17bc\u179c\u1794\u17b6\u1793\u1782\u17c1\u1794\u17d2\u179a\u17be\u1794\u17d2\u179a\u17b6\u179f\u17cb\u179f\u1798\u17d2\u179a\u17b6\u1794\u17cb\u1792\u17d2\u179c\u17be\u1780\u17b6\u179a\u1795\u17d2\u179b\u17b6\u179f\u17cb\u1794\u17d2\u178a\u17bc\u179a\u179b\u1780\u17d2\u1781\u178e\u17c7\u179a\u1794\u179f\u17cb steam Input \/Output\u17d4
\n<\/p>\n
\u1780\u17bc\u178a\u1782\u17c6\u179a\u17bc\u1793\u17c1\u17c7\u1782\u17ba\u1787\u17b6\u1780\u17b6\u179a\u1794\u1784\u17d2\u1780\u17be\u178f\u1793\u17c3\u1794\u17d2\u179a\u178f\u17b7\u1791\u17b7\u1793\u178a\u17c2\u179b\u1798\u17b6\u1793\u1780\u17b6\u179b\u1794\u179a\u17b7\u1785\u17d2\u1786\u17c1\u1791\u1790\u17d2\u1784\u17c3\u1788\u1794\u17cb\u179f\u1798\u17d2\u179a\u17b6\u1780\u179a\u1794\u179f\u17cb\u1795\u17d2\u17a2\u17c2\u1780\u179b\u17be\u1790\u17d2\u1784\u17c3\u1788\u1794\u17cb\u179f\u1798\u17d2\u179a\u17b6\u1780\u1793\u17c5\u1780\u1798\u17d2\u1796\u17bb\u1787\u17b6\u17d4<\/p>\n
#include <stdio.h>
\n#include <conio.h>
\n#include <stdlib.h>
\n#include <string.h>
\n#include <dos.h><\/p>\n
#define gt gotoxy
\n#define tc textcolor
\n#define tb textbackground<\/p>\n
struct dosdate_t date ;
\n\/*Function shows current time*\/
\nvoid cur_time()
\n{
\nchar *mer = (char *)malloc(2*sizeof(char)) ;
\nwhile( !kbhit() ){
\nstruct dostime_t t ;
\n_dos_gettime(&t) ;
\ngt (28,21) ; tb( 0 ) ; tc(15) ;
\nif (t.hour<12) mer = “AM” ;
\nelse strcpy (mer,”PM”) ;
\nif (t.hour>12) t.hour = t.hour – 12 ;
\ncprintf (” Current Time: %d:%02d:%02d %s”,t.hour,t.minute,t.second,mer) ;
\n}
\n}<\/p>\n
void public_day() ;
\n\/\/****************** main ******************
\nvoid main(){
\n\/*Declare the name of day*\/
\nchar *day[] = {“Sun”,”Mon”,”Tue”,”Wed”,”Thu”,”Fri”,”Sat”} ;
\n\/*Declare the name of month*\/
\nchar *month[] = {“Jan”,”Feb”,”Mar”,”Apr”,”May”,”Jun”,”Jul”,”Aug”,”Sep”,”Oct”,”Nov”,”Dec”} ;
\nchar ca[]=”Calendar of year” ;
\n\/*declare how many day per month*\/
\nlong tdm[] = {31,28,31,30,31,30,31,31,30,31,30,31} ;
\nlong year,i,j,n,T,Startday,color,k=0,ch,endday,to,lastday ;
\ntb(0) ; window(0,0,80,25) ; clrscr() ; tc(15) ;
\ngt(16,5) ; cprintf(” This program is show calendar of each years”) ;
\ngt(22,3) ; cprintf(“PHNOM PENH INTERNATIONAL UNIVERSITY”) ;
\ngt(23,18); tc(3) ; cprintf(” Prepared by:”) ;
\ngt(37,18); tc(10); cprintf(“Vuthdara “) ;
\nstart:
\n_setcursortype(_NORMALCURSOR) ; tc(6) ;
\ngt(18,10) ; cprintf(“\u00c9\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00bb”) ;
\ngt(18,11) ; cprintf(“\u00ba \u00ba”) ;
\ngt(18,12) ; cprintf(“\u00c7\u00c4\u00c4\u00c4\u00c4\u00c4\u00c4\u00c4\u00c4\u00c4\u00c4\u00c4\u00c4\u00c4\u00c4\u00c4\u00c4\u00c4\u00c4\u00c4\u00c4\u00c4\u00c4\u00c4\u00c4\u00c4\u00c4\u00c4\u00c4\u00c4\u00c4\u00c4\u00c4\u00c4\u00c4\u00b6”) ;
\ngt(18,13) ; cprintf(“\u00ba \u00ba”) ;
\ngt(18,14) ; cprintf(“\u00c8\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00bc”) ;
\niy:
\ngt(42,11) ; clreol() ;
\ngt(53,11) ; tc(6) ; cprintf(“\u00ba”) ;
\ngt(20,11) ; tc(15) ; cprintf(“Please enter the year:”) ;
\ngt(42,11) ; scanf(“%ld”,&year) ;
\nif (year<=0 || year>=999999999) goto iy ;
\nim:
\ngt(40,13) ; clreol() ;
\ngt(53,13) ; tc(6) ; cprintf(“\u00ba”) ;
\ngt(20,13) ; tc(15) ; cprintf(“and enter the month:”) ;
\ngt(40,13) ; scanf(“%ld”,&k) ;
\nif (k<1 || k>12) goto im ;
\nelse k– ;
\n_setcursortype(_NOCURSOR) ;
\nclrscr();
\nfor (i=0;i<strlen(ca);i++) { gt(30+strlen(ca)-1-i,2) ; cprintf(“%c”,ca[strlen(ca)-1-i]) ; delay(30) ;}
\nfor (i=0;i<strlen(ca);i++) { gt(30+strlen(ca)-1-i,2) ; cprintf(” “) ; delay(30) ; }
\nfor (i=0;i<strlen(ca);i++) { gt(30+i,2) ; cprintf(“%c”,ca[i]) ; delay(30) ; }
\ngt(47,2) ; cprintf(“%ld”,year) ;
\ntha:
\ntb(14) ; tc(WHITE) ; gt(5,23);cprintf(” nput year “) ;
\ngt(43,23) ; cprintf(” P blic holiays “) ;
\ngt(23,23) ; cprintf(” Current ate “) ;
\ngt(65,23) ; cprintf(” E it = Esc “) ;
\ntc(10) ;
\ngt(6,23) ; cprintf(“I”) ; gt(45,23) ; cprintf(“u”) ;
\ngt(32,23) ; cprintf(“d”) ; gt(67,23) ; cprintf(“x”) ;
\ntb(0) ; tc(3) ;
\ngt(6,24) ; cprintf(“\u00df\u00df\u00df\u00df\u00df\u00df\u00df\u00df\u00df\u00df\u00df\u00df”) ;
\ngt(17,23) ; cprintf(“\u00dc”) ;
\ngt(24,24) ; cprintf(“\u00df\u00df\u00df\u00df\u00df\u00df\u00df\u00df\u00df\u00df\u00df\u00df\u00df\u00df”) ;
\ngt(37,23) ; cprintf(“\u00dc”) ;
\ngt(44,24) ; cprintf(“\u00df\u00df\u00df\u00df\u00df\u00df\u00df\u00df\u00df\u00df\u00df\u00df\u00df\u00df\u00df\u00df”) ;
\ngt(59,23) ; cprintf(“\u00dc”) ;
\ngt(66,24) ; cprintf(“\u00df\u00df\u00df\u00df\u00df\u00df\u00df\u00df\u00df\u00df\u00df\u00df”) ;
\ngt(77,23) ; cprintf(“\u00dc”) ;
\ngt(2,10) ; cprintf(“%c increase year” ,24) ;
\ngt(65,10) ; cprintf(“%c increase month”,26) ;
\ngt(2,12) ; cprintf(“%c decrease year” ,25) ;
\ngt(65,12) ; cprintf(“%c decrease month”,27) ;
\ntc(7) ;
\ngt(7,25) ; cprintf(“Prepared by: Vuthdara “) ;
\ntt:
\ntb(0) ; to=0 ; lastday = 0 ;
\n\/*Formula of the firstday(1 Jan)*\/
\nT = ((year-1)*365) + ((year-1)\/4) – ((year-1)\/100) + ((year-1)\/400) + 1 ;
\nStartday = T % 7 ;
\n\/*Form of Leap year or not*\/
\ntdm[1]=(!((year%4) || !(year%100) && (year%400)))? 29 : 28 ;<\/p>\n
if(k>0)
\n{ for (i=0;i<k;i++) to = to + tdm[i] ;
\nlastday = to % 7 ; }
\nStartday = Startday + lastday ;
\n_dos_getdate(&date) ;
\nj = 0 ; tb(0) ; tc(15) ;
\ngt(47,2) ; clreol() ;
\ngt(30,2) ; cprintf(“Calendar of year %ld”,year) ;
\ngt(36,3) ; cprintf(” \u00c4\u00c4\u00c4\u00c4\u00c4\u00c4”) ;
\ngt(39,4) ; cprintf(“%s”,month[k]) ;
\n\/*the last day in the month*\/
\nendday = tdm[k] ;<\/p>\n
tc(11) ;
\ngt(21,5) ; cprintf(“\u00c9\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00bb”) ;
\ngt(21,6) ; cprintf(“\u00ba \u00ba”) ;
\ngt(21,7) ; cprintf(“\u00c7\u00c4\u00c4\u00c4\u00c4\u00c4\u00c4\u00c4\u00c4\u00c4\u00c4\u00c4\u00c4\u00c4\u00c4\u00c4\u00c4\u00c4\u00c4\u00c4\u00c4\u00c4\u00c4\u00c4\u00c4\u00c4\u00c4\u00c4\u00c4\u00c4\u00c4\u00c4\u00c4\u00c4\u00c4\u00c4\u00c4\u00c4\u00b6”) ;
\ngt(22,8) ; cprintf(” ” ) ;
\nfor (i=0;i<10;i++) { gt(21,10+i) ; cprintf(” ” ) ; }<\/p>\n
for (i=0;i<7;i++)
\n{ if (i==0) color = 12 ;
\nelse color = 7 ;
\ngt(24+5*i,6) ; tc(color) ; cprintf(“%s”,day[i]) ; }
\nfor(i=1;i<=endday;i++)
\n{ if(Startday>6) { Startday = Startday – 7 ; j++ ; }<\/p>\n
if(Startday==0) color = 12 ;
\nelse color = 7 ;
\n\/*public day*\/
\nif(year>1993)
\n{
\nif(k==0) if(i==1 || i==7) color = 12 ;
\nif(k==2) if(i==8) color = 12 ;
\nif(k==3) if(i==13 || i==14 || i==15 || i==16 || i==30) color = 12 ;
\nif(k==4) if(i==1) color = 12 ;
\nif(k==5) if(i==1 || i==18) color = 12 ;
\nif(k==8) if(i==24) color = 12 ;
\nif(k==9) if(i==23 || i==30 || i==31) color = 12 ;
\nif(k==10)if(i==1 || i==9) color = 12 ;
\nif(k==11)if(i==10) color = 12 ;
\n}
\nif(Startday==0) color = 12 ;
\nif(i==1) j = 0 ;
\n\/*show the current date*\/
\n((i==date.day) && ((k+1)==date.month) && (year==date.year)) ?
\ntb(9) : tb(0) ;
\n\/*Output calendar of each month*\/
\ngt(25+5*Startday,8+2*j) ; tc(color) ; cprintf(“%ld”,i) ;<\/p>\n
Startday++ ;
\n}<\/p>\n
tc(11) ; tb(0) ;
\nfor (i=8;i<=8+2*j;i++) { gt(21,i) ; cprintf(“\u00ba”) ;
\ngt(59,i) ; cprintf(“\u00ba”) ; }
\ngt(21,8+2*j+1) ; cprintf(“\u00c8\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00cd\u00bc”) ;
\nagain:
\ncur_time() ; \/*call function for time*\/<\/p>\n
ch = getch() ;
\nif(ch==77)
\n{ if (k<11) k++ ;
\nelse { k=0 ; year++ ; }
\ngoto tt ; }
\nelse if(ch==72) { year++ ; goto tt ; }
\nelse if(ch==80) {
\nif(year>1) year– ; goto tt ; }
\nelse if(ch==75) {
\nif(k>0) k = k – 1 ;
\nelse { if(year>1) { year– ; k = 11 ; }
\nelse k=0 ; }
\ngoto tt ; }
\nelse if(ch==27 || ch==’x’ || ch==’X’) exit(1) ;
\nelse if(ch==’d’ || ch==’D’) { k=date.month-1 ; year=date.year ; goto tt ; }
\nelse if(ch==’I’ || ch==’i’) { clrscr() ; goto start; }
\nelse if(ch==’u’ || ch==’U’) { public_day() ; clrscr() ; goto tha ; }
\nelse goto again ;
\n}
\n\/****************** End main *******************\/
\nvoid public_day ()
\n{
\nint i,j = 0 ;
\nclrscr() ;
\ntc(3) ; gt(3,5) ; cprintf(“\u00c9”) ;
\ngt(78,5) ; cprintf(“\u00bb”) ;
\nfor(i=0;i<74;i++) { gt(4+i,5) ; cprintf(“\u00cd”) ; gt(4+i,21) ; cprintf(“\u00cd”) ; }
\nfor(i=0;i<15;i++) { gt(3,i+6) ; cprintf(“\u00ba”) ; gt(78,i+6) ; cprintf(“\u00ba”) ;
\ngt(41,i+6); cprintf(“\u00b3”) ; }
\ngt(3,21) ; cprintf(“\u00c8”) ; gt(78,21) ; cprintf(“\u00bc”) ;
\ngt(41,5) ; cprintf(“\u00d1”) ; gt(41,21) ; cprintf(“\u00cf”) ;
\ntc(1) ; gt(7,7) ; cprintf(“1-Jan : “) ;
\ntc(7) ; cprintf(“New Year”) ;
\ntc(1) ; gt(7,9) ; cprintf(“7-Jan : “) ;
\ntc(7) ; cprintf(“Liberation Day”) ;
\ntc(1) ; gt(7,11) ; cprintf(“8-Mar : “) ;
\ntc(7) ; cprintf(“Women’s Day”) ;
\ntc(1) ; gt(7,13) ; cprintf(“13,14,15,16 Apr : “) ;
\ntc(7) ; cprintf(“Khmer New Year”) ;
\ntc(1) ; gt(7,15) ; cprintf(“30-Apr : “);
\ntc(7) ; cprintf(“Royal Plowing Day”) ;
\ntc(1) ; gt(7,17) ; cprintf(“1-May : “) ;
\ntc(7) ; cprintf(“Labor Day”) ;
\ntc(1) ; gt(7,19) ; cprintf(“1-Jun : “) ;
\ntc(7) ; cprintf(“Children’s Day”) ;
\ntc(1) ; gt(44,7) ; cprintf(“18-Jun : “);
\ntc(7) ; cprintf(“Queen’s Birthday”) ;
\ntc(1) ; gt(44,9) ; cprintf(“24-Sep : “);
\ntc(7) ; cprintf(“Royal Re-coronation Day”) ;
\ntc(1) ; gt(44,11); cprintf(“23-Oct : “);
\ntc(7) ; cprintf(“Paris Peace Accord”) ;
\ntc(1) ; gt(44,13); cprintf(“30,31-Oct : “);
\ntc(7) ; cprintf(“King’s Birthday”) ;
\ntc(1) ; gt(44,15); cprintf(“1-Nov : “) ;
\ntc(7) ; cprintf(“King’s Birthday”) ;
\ntc(1) ; gt(44,17); cprintf(“9-Nov : “) ;
\ntc(7) ; cprintf(“Independence Day”) ;
\ntc(1) ; gt(44,19); cprintf(“10-Dec : “);
\ntc(7) ; cprintf(“Human Rights Day”) ;
\ngt(18,23); cprintf(“All of these days started to practice since 1994”) ;
\ntc(14+BLINK) ; gt(28,24) ; cprintf(“Press Any Key to go back…..”) ;<\/p>\n
while(!kbhit()){
\nif(i>15) i = 1 ;
\nif(j>10) j = 0 ;
\ntc(15) ; gt(34,4) ; cprintf(” \u00cd\u00cd\u00cd\u00cd\u00cd\u00cd “) ;
\ntc(i) ; gt(34,3) ; cprintf(“PUBLIC HOLIDAYS”) ;
\ntc(j) ; gt(35+j,4); cprintf(“\u00cd”) ;
\ni++ ; j++ ; }
\n}<\/p>\n