تقویم (فارس)
#include<conio.h>
#include<dos.h>
main(){
int n,year,month,count_day,x,y3=1,y=1,y1=0,y2=4,day,k_year;
char *dd[7]={"ù“÷‹‹‹‹ª","ù“÷‹‹ªîþ","ù“÷‹‹ªø¢","ù“÷‹‹ªù¨",
"ù“÷ª¤‘ú","ù“÷ªš÷• ","ùãõ‹‹‹‹›"} ;
char *mm[12]={"FAR","ORD","KHO","TIR","MOR","SHA",
"MEH","ABA","AZA","DAI","BAH","ASF"};
clrscr();textcolor(15); gotoxy(30,12);cprintf("ENTER YEAR ");
cscanf("%d",&year);
clrscr();
gotoxy(75,1);cprintf("%d",year);
for(int block=1;block<=3;block++)
{
y3++;
x=59;
for(int week_day=0;week_day<7;week_day++)
{ if(week_day==6)textcolor(4); else textcolor(1);
gotoxy(70,y3); cprintf("%s",dd[week_day]); y3++; }
for(month=y1;month<y2;month++)
{ textcolor(3);gotoxy(x,y);cprintf("%s",mm[month]);x-=18;}
y+=8; y1+=4; y2+=4;
}
y=year-1303;
if((y+1)%4) k_year=1;else k_year=0;
y=(y+(y/4))%7;
if(!y) y=7;
y++;
if(year==1379) y--;
if(year==1378) k_year=1;
x=65;
for(month=1;month<=12;month++){
if(month==5||month==9) { x=65; y+=8;}
if(month<=4){y1=2;y2=8;}
else if(month>=5 && month<=8){ y1=10;y2=16; }
else {y1=18; y2=24;}
if( month<=6) day=31;
else if(month>=7&&month<=11) day=30;
else if(month==12&&k_year) day=29;
else if(month==12&&!k_year) day=30;
count_day=1;
//textcolor(2);
while(day>=count_day){
while(y<=y2){
delay(20);
if(y==8||y==16||y==24)textcolor(4);
else textcolor(2);
gotoxy(x,y);cprintf("%d",count_day);
y++; count_day++;
if(count_day>day)break;
}
x-=3;
if(count_day>29) y3=y;
y=y1;
}
y=y3;
}
getch(); getch();
textcolor(15);gotoxy(25,12);cprintf("WRITEN BY:: JALIL MOHAMMADI");
}