www.pudn.com > linuxcici1.rar > linuxcici1985.C
#include
#include
#include
#include
#include
#include
#include
#include
#include
#include
#include
#include
#define zi 45
#define jz float
#define j2 int
#define green 19
#define vd void
#define cv cv6 char far *vn6=(char far *)0xA0000000L;
#define cv1 cv6 char far *vn5=(char far *)0xF000FA6EL;
#define cv2 display
#define cv3 putpixel
#define cv4 delay
#define cv5 DELAY
#define cv6 unsigned
#define cv7 clicks
#define cv8 0x0000046CL
#define cv9 first_character
#define vb cleardevice
#define vb1 second_character
#define vb2 third_character
#define vb3 fourth
#define vb4 move1
#define vb5 gdriver
#define vb6 gmode
#define vb7 VGAHI
#define vb8 "c:\\turboc2"
#define vb9 initgraph
#define vn Blit_Char
#define vn1 trans_flag
#define vn2 offset
#define vn3 work_char
#define vn4 bit_mask
#define vn5 rom_char_set
#define vn6 video_buffer
#define vn7 Blit_String
#define vn8 index
#define vn9 string
#define vm Set_Video_Mode
#define vm1 show_east_character
#define vm2 inregs.h.ah
#define vm3 inregs.h.al
#define yyehhh "So Said So Done ",1);
#define coooo closegraph();
#define jo wall_change_line
jz wl= 318.0 ;j2 an=1;jz ik=279.5
,ij=80.0 ;jz lt= 145 ;jz lt1=145
;jz lt2= 145; jz ls =145 ;jz m1=145
;jz wz =145 ;j2 wq =0;jz we=0 ;jz wr
=0;jz wt=0; jz wy =0;jz wu=0; j2 wi
=0;j2 wp=265 ;j2 ws =0;j2 wd=0; jz wu1
=0;jz wf=0; jz wg =0;j2 wj=0; j2 wk
=267; j2 wx =198; j2 ws1=0; j2 wc=363,wv=198;
j2 wb =0;j2 wm=0;jz wm1= 269;jz
wm2= 365;jz wm3= 271; jz wm4
=363; jz wm5 =114; jz wm6 = 200 ;
jz wm7 = 114; jz wm8 =198; jz wm9
= 113; jz qw = 200;jz qw1= 114;jz
qw2 = 200; j2 qw3 = 1;j2 qw4 =
180 ; jz qw5 =640; jz qw6 =0; jz
qw7=0; jz qw8=0; jz qw9 =0;jz qe=0;jz
qe1=0; j2 qe2=1;j2 qe3=0; j2 qe4 =0;long j2 qe5=0;j2
qe6=0;j2 qe7=120,qe8=250 ,qe9=311;j2 qr=252 ,qr1=480;j2 qr2=250
,qr3=380,qr4 =0,qr5=640,qr6=640 ;j2 il1=640, il2=640,il4=640;jz il3
=640, il5=
640, il6 =640 ,il7
=0,il8 =604, il9= 620;
jz im21 =478, im22 =559,
ia1=280 ,ia2= 280 ; j2 iz1
=603,iz2= 530,iz3 =603,iz4 =620,iz5
=640, iz7=
620, iz8=
640; jz iz6
=72, iz9=
133; j2 qr7
=380, qr8=
529, qt=380
,qt1 =477;
j2 i9=0;jz iv=90,
iv1=115,iv2=0,iv3
=115,iv4=240,iv5=90,iv6=480,qt2=0,iw2=0,qt3=0;jz iv7=400,iv8=90,iv9=115,iw=0,iw1=0;jz ic1=0,ic2=0,
ic3=0,ic4=0,ic5=0,ic6=0,ic7=0,ic8=0,ic9=0; jz ih=0,ih1=0,ih2=0,ih3=0;j2 size,size1,size2;vd *buf,
*buf1,*buf2;cv cv1 vd cv2(j2 x,j2 y,j2 no, j2 color,j2 h){static cv6 char cc_code_data[1280]={
0x07,0xc0,0x08,0x20,0x10,0x10,0x10,0x10, 0x10,0x20,0x00,0x40,0x00,0x80,0x01,0x00,0x02,0x00,
0x04,0x00,0x08,0x00,0x10,0x00,0x10,0x00, 0x10,0x00,0x10,0x00,0x1f,0xf0,0x07,0xe0,0x08,0x10,
0x08,0x10,0x08,0x10,0x08,0x10,0x08,0x10, 0x08,0x10,0x08,0x10,0x08,0x10,0x08,0x10,0x08,0x10,
0x08,0x10,0x08,0x10,0x08,0x10,0x08,0x10, 0x07,0xe0,0x07,0xe0,0x08,0x20,0x08,0x00,0x08,0x00,
0x08,0x00,0x08,0x00,0x0f,0xc0,0x00,0x20, 0x00,0x20,0x00,0x20,0x00,0x20,0x08,0x20,0x08,0x20,
0x08,0x20,0x08,0x20,0x0f,0xc0,0x04,0x00, 0x0f,0xfc,0x10,0x80,0x27,0xf0,0x44,0x80,0x04,0x80,
0x04,0x80,0xff,0xff,0x00,0x80,0x00,0x80, 0x00,0x80,0x00,0x80,0x00,0x80,0x00,0x80,0x00,0x80,
0x00,0x80,0x04,0x20,0x04,0x20,0x04,0x20, 0x04,0x20,0x3f,0xfc,0x04,0x20,0x07,0xe0,0x04,0x20,
0x07,0xe0,0x01, 0x00,0x7f,0xfe,0x05,0x80,
0x09,0x40,0x11, 0x20,0x21,0x18,0x41,0x04,
0x00,0x00,0x00, 0x00,0x0f,0xf0,0x08, 0x10,0x08,0x10,0x08, 0x10,0x08,0x10,0x0f,0xf0,
0x08,0x10,0x08, 0x10,0x08,0x10,0x08, 0x10,0x08,0x10,0x08, 0x10,0x0f,0xf0,0x00,0x00,
0x00,0x40,0x00, 0x80,0x01,0x00,0xff, 0xff,0x04,0x00,0x07, 0xf0,0x0c,0x10,0x17,0xf0,
0x24,0x10,0x44, 0x10,0x87,0xf0,0x04, 0x10,0x04,0x10,0x04, 0x50,0x04,0x30,0x04,0x10,
0x00,0x00,0x00, 0x00,0x00,0x00,0x00, 0x00,0x00,0x00,0x00, 0x00,0x00,0x00,0x00,0x00,
0x3f,0xfc,0x00, 0x00,0x00,0x00,0x00,0x00,
0x00,0x00,0x00, 0x00,0x00,0x00,0x00,0x00,
0x00,0x80,0x10,0x80,0x10,0x00,0x30,0x00, 0xd7,0xfc,0x11,0x10,0x11,0x10,0x11,0x10,0x11,0x10,
0x11,0x10,0x11,0x10,0x11,0x10,0x11,0x10, 0x11,0x10,0x11,0x10,0x17,0xfc,0x00,0x00,0x00,0x00,
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00, 0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,
0x00,0x00,0x00,0x00,0x00,0x00,0x03,0x80, 0x03,0x80,0x00,0xc0,0x01,0x40,0x02,0x40,0x04,0x40,
0x08,0x40,0x10,0x40,0x20,0x40,0x20,0x40, 0x3f,0xf8,0x00,0x40,0x00,0x40,0x00,0x40,0x00,0x40,
0x00,0x40,0x00,0x40,0x00,0x40,0x07,0xfc, 0x04,0x04,0x04,0x04,0x07,0xfc,0x04,0x00,0x08,0x40,
0x08,0x40,0x10,0x40,0x10,0x40,0x27,0xfc, 0x24,0x44,0x44,0x44,0xc7,0xfc,0x84,0x44,0x04,0x44,
0x07,0xfc,0x00,0x00,0xf8,0x9f,0x20,0x84, 0x20,0x84,0x20,0x84,0x22,0x84,0x22,0x84,0xfa,0x9f,
0x20,0x84,0x20,0x84,0x20,0x84,0x20,0x84, 0x20,0x84,0xfd,0x3f,0x00,0x00,0x00,0x00,0x03,0x00,
0x01,0x00,0x00,0x80,0x0f,0xf0,0x01,0x00, 0x01,0x00,0x01,0x00,0x01,0x00,0x01,0x00,0x1f,0xf0,
0x01,0x00,0x01,0x00,0x01,0x00,0x01,0x00, 0x01,0x00,0x3f,0xfc,0x04,0x08,0x08,0x10,0x10,0x20,
0x30,0x60,0x50,0xa0,0x90,0x20,0x17,0xfe, 0x10,0x20,0x10,0x20,0x10,0x20,0x10,0x20,0x10,0x20,
0x10,0x20,0x10,0x20,0x11,0xfc,0x00,0x00, 0x00,0x00,0x42,0x08,0x21,0x10,0x13,0xf8,0xf2,0x08,
0x12,0x08,0x13,0xf8,0x11,0x20,0x11,0x20, 0x11,0x20,0x11,0x20,0x11,0x20,0x15,0x20,0x1a,0x22,
0x14,0x22,0x08,0x3e,0x08,0x20,0x18,0x24, 0x28,0x22,0x48,0x21,0x08,0x20,0xff,0xff,0x08,0x20,
0x0c,0x20,0x08,0x24,0x18,0x24,0x28,0x28, 0x48,0x30,0x08,0x20,0x08,0x51,0x50,0x0a,0x20,0x04,
0x04,0x00,0x08,0x00,0x12,0x00,0x32,0x40, 0x52,0x40,0x97,0xfc,0x12,0x44,0x12,0x44,0x12,0x44,
0x12,0x44,0x12,0x44,0x12,0x14,0x12,0x0c, 0x12,0x01,0x12,0x01,0x13,0xff,0x09,0x00,0x11,0x00,
0x20,0x80,0x64,0x3c,0xa4,0x04,0x24,0x04, 0x24,0x04,0x24,0x04,0x24,0x04,0x24,0x04,0x24,0x04,0x24,
0x04,0x24,0x04,0x24,0x14,0x24,0x0c,0x24, 0x04,0x07,0xf0,0x04,0x10,0x07,0xf0,0x04,0x10,0x07,0xf0,
0x00,0x00,0xff,0xff,0x22,0x00,0x3e,0xfe,0x22,0x44,0x3e,0x28,0x22,0x10,0xfe,0x28,0x02,0x44,0x02,
0x82,0x02,0x00, 0x08,0xf8,0x08,0x08,0x08,
0x08,0x10,0x10, 0xfe,0x20,0x23,0xff,0x40,
0x20,0x44,0x20, 0x84,0x20,0x84,0x20,0x48,0x20,0x30,0x20,0x30, 0x20,0x48,0xa0,0x84,0x60,
0x02,0x20,0x00, 0x20,0x08,0x40,0x10,0x80,0x21,0x00,0xfd,0xfc, 0x84,0x04,0x84,0x04,0x84,
0x44,0x84,0x24, 0xfc,0x14,0x84,0x04,0x84,0x04,0x84,0x04,0x84, 0x04,0x84,0x04,0xfc,0x3c,
0x00,0x00,0x00, 0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00, 0x00,0x00,0x00,0x00,0x3f,
0xfc,0x00,0x00, 0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00, 0x00,0x00,0x00,0x03,0x80,
0x05,0x40,0x09, 0x20, 0x11, 0x10,0x21,0x08,0x41,0x04,
0x81,0x02,0x01, 0x00, 0x01, 0x00,0x01,0x00,0x01,0x00,
0x01,0x00,0x01, 0x00,0x01,0x00,0x01, 0x00,0x01,0x00,0x03, 0xf0,0x02,0x10,0x03,0xf0,
0x02,0x10,0x03, 0xf0,0x00,0x00,0xff, 0xff,0x04,0x80,0x04, 0x80,0x08,0xf0,0x0c,0x80,
0x12,0x80,0x21, 0x80,0x40,0x80,0x80, 0x40,0x00,0x3f,0x04, 0x20,0x02,0x40,0x01,0x80,
0x03,0xc0,0x01, 0x00,0x07,0xe0,0x02, 0x00,0x3f,0xfc,0x04, 0x00,0x0f,0xf0,0x10,0x80,
0x20,0x80,0x40, 0x80,0x80,0x80,0x00, 0x80,0x0f,0xfc,0x03, 0x80,0x02,0x40,0x04,0x20,
0x08,0x10,0x10, 0x08,0x21,0x04,0x40, 0x82,0x80,0x41,0x0f, 0xf8,0x00,0x10,0x00,0x20,
0x00,0x40,0x00, 0x80, 0x01, 0x00,0x02,0x00,0x04,0x00,
0x0f,0xf0,0x01, 0x80, 0x01, 0x80,0x01,0x80,0x01,0x80,
0xff,0xff,0x01, 0x80,0x01,0x80,0x01, 0x80,0x02,0x40,0x04, 0x20,0x08,0x10,0x10,0x08,
0x20,0x04,0x40, 0x02,0x80,0x01,0xff, 0xfe,0x80,0x02,0x80, 0x02,0xc1,0x86,0xa2,0x4a,
0x94,0x32,0x98, 0x32,0x94,0x4a,0xa2, 0x86,0xc1,0x02,0x80, 0x02,0x80,0x02,0x80,0x02,
0x80,0x0a,0x80, 0x06,0x80,0x02,0x08, 0x10,0x10, 0x20, 0x20,0x40,0x44,0x80,0x81,
0xfc,0xf9,0x08, 0x10,0x90,0x20,0x60, 0x48,0x60, 0xf4, 0x90,0x09,0x08,0x12,0xfc,
0x24,0x8a,0x48, 0x89,0x80,0x88,0x00, 0xf8,0x00, 0x00, 0x08,0x80,0x09,0x00,0x0a,
0x00,0x0c,0x00, 0xff,0xff,0x0c,0x00, 0x0a,0x00,0x09,0x00, 0x08,0x80,0x08,0x40,0x08,
0x20,0x08,0x10, 0x0a,0x08,0x0c,0x04, 0x08,0x00,0x40,0x00, 0x27,0xff,0x70,0x10,0x90,
0x10,0x10,0x10, 0x10,0x10,0x10,0x1e, 0x10,0x10,0x11,0x10, 0x11,0x10,0x11,0x10,0x11,
0x10,0x11,0x10, 0x15, 0x10, 0x19,0x10,0x17,0xff,0x00,
0xff,0x00,0x81, 0x00, 0x81, 0xfc,0xff,0x84,0x81,0x84,
0x81,0x84,0x81, 0xfc,0xff,0x84,0x81,0x84,0x81,0x84,0x81,0xfc, 0x81,0x00,0x81,0x01,0x05,
0x02,0x03,0x04, 0x01,0x10,0x20,0x40,0x20,0x23,0xff,0xfd,0x02, 0x08,0x84,0x10,0x48,0x20,
0x30,0x40,0x30, 0xfc,0x48,0x08,0x84,0x11,0x02,0x22,0x01,0x44, 0x01,0x80,0x00,0x80,0x00,
0xff,0xff,0xff, 0xff,0x03,0x80,0x05,0x40,0x09,0x20,0x11,0x10, 0x21,0x08,0x41,0x04,0x81,
0x02,0x81,0x01, 0x01,0x00,0x01,0x00,0x01,0x00,0x01,0x00,0x01, 0x00,0x01,0x00,0x01,0x00,
0xff,0xff,0x00, 0x10,0x00,0x10,0x3f,0x10,
0x21,0x10,0x21, 0x10,0x21,0x10,0x21,0x10,
0x3f,0x10,0x00,0x10,0x00,0x10,0x00,0x10,0x00,0x90,0x00,0x50,0x00,0x30,0x00,0x30,0x10,0x32,0x20,0x44,0x48,0x48,
0x84,0x50,0xfe,0x61,0x00,0x41,0xfe,0x7f,0x81,0x00,0xfe,0x40,0x82,0x42,0x82,0x44,0xfe,0x48,0x82,
0x50,0x82,0x61,0x8a,0x41,0x86,0x7f,0xfc,0x04,0x88,0x08,0x91,0xff,0xa0,0x20,0xc0,0x40,0xfc,0x90,
0x89,0xff,0x90,0x10,0xa0,0x10,0xc0,0x94,0x81,0x12,0x82,0x11,0x80,0x10,0x80,0x10,0x80,0x50,0x80,
0x30,0x00,0x00,0x00,0x00,0x01,0x00,0x01,0x00,0x81,0x01,0x41,0x02,0x21,0x04,0x11,0x08,0x00,0x00,
0xff,0xff,0x04,0x40,0x08,0x20,0x10,0x10,0x20,0x08,0x40,0x04,0x80,0x02,0x0c,0x00,0x18,0x40,0x28,
0x44,0x48,0x48,0x88,0x50,0x08,0x61,0x08,0xc1,0x08,0x7f,0x01,0x00,0xff,0xff,0x01,0x00,0x01,0x00,
0x01,0x00,0x01,0x00,0x01,0x00,0x01,0x00,};
cv6 char *c,*p,num[512];j2 i,j,k,a,b ,xx
;long j2 d;c=cc_code_data;c+=32*no;p=num;
for( i=0; i< 16;i++){for(j=0;j <2;j++){a=*
c++;d= 0; for(k=0;k
<8;k++) { if(a&128)
d+=7;a<<= 1;d<<=3;}
d>>=3;*p= *(p+6)=*( p+12)=d>>16;b=d;p++;
*p=*(p+6) =*(p+12)= b>>8;p++;*p=*(p+6)=*
(p+12)=b& 255;p++;} p+=12;}p =num;xx=x;
for(i=0;i <16*3;i++
){for(j=0;j<2*3 ;j++){a=*p ++;for(k=
0;k<8;k++){if(a&128)cv3(x,y,color );a<<=1;x++;if( h==1)cv4(50);}}x=xx;y++;
}}vd cv5(j2 cv7){cv6 j2 far*clock=( cv6 j2 far*)cv8;cv6 j2 now ; now=*clock;
while(abs (* clock-now )>1);}vn2+=320;
vn3 ++ ; }} vd vn7(j2 x,j2 y,j2 color,char
*vn9,j2 vn1) {j2 vn8 ;for( vn8=0;vn9[vn8]
!=0;vn8++ ){ vn(x+(vn8<<3), y,vn9[vn8],color
,vn1);}}vd vm (j2 mode){union REGS inregs,outregs
;vm2=0;vm3 =( cv6 char)mode; int86(0x10,&inregs,
&outregs);}vd vm1(){vm(19);vn7 (90,100,5, yyehhh
cv5(40);coooo }vd character(j2 x,j2 y,j2 bei_shu
){j2 i=9;char *cici[]={"1","2" ,"3","4","5", "6",
"7","8","9 ","10"};settextjustify(CENTER_TEXT,CENTER_TEXT);settextstyle(DEFAULT_FONT,HORIZ_DIR,bei_shu);outtextxy(x,y,
cici[9]);cv5(20);for(;i>=0;i--){setcolor(i+38);outtextxy(x,y,cici[i]);cv5(7);vb();}}main(){j2 vb5,vb6,i;vd linux(vd) ;
vd den_shan();vd terra();vd start_moive();vd right_wall();vd j2erface_door();vd door();vd test();vd middle_line_all();vd
bar1_cover();vd a1();vd a2();vd a3();vd big_light();vd a4();vd l();vd(*p)();vd (*den)();vd (*terra1)();vd (*start_moive1)
();vd (*right_wall1)();vd (*j2erface_door1)();vd (*door1)();vd (*test1)();vb4();vm1();vb5=DETECT;vb6;
registerbgidriver ( IBM8514_driver ); vb9( & vb5,& vb6, vb8); character(320,200,15);
p=linux;(*p)(); setbkcolor(0);
terra1 =terra ; den =den_shan;
start_moive1 = start_moive ;
right_wall1 = right_wall ;
j2erface_door1= j2erface_door ;
door1 = door ; test1 = test ;
(*den)();cv5(2); setbkcolor(8);
(*terra1 ) () ;(* start_moive1)();
( *right_wall1 )( ); (*j2erface_door1)();
(*door)();cv5(5 ) ;(* test1)();middle_line_all
();bar1_cover();a1(); a2();a3();big_light();a4();
coooo l();
getch();}vd wall(j2 x)
{setcolor(7);setfillstyle(1,7);
bar ( 0,0,317+x, 480);
bar( 321-x,0,640,480);
}vd camellialinux(vd)
{if(an>=12){while(wl<=
320.0){line(wl,280,wl,
ik);line(wl,0,wl, ij);
if(an>=8)if(an>=30)if(
an>=32){ik-=0.35; ij+=
0.35;}else;else{ ik-=
0.59;ij+=0.59;}wl+=0.5;
}}}vd image(vd){j2 i=
250 ; setcolor ( 7 ) ;
setfillstyle( 1 , 7 );
setcolor(0);setlinestyle(0,1,1);for(;i>180;i--){ an++;cv5( 1);putimage(i,80,buf, COPY_PUT);wl=318;camellialinux();cv5(
0.3);}}vd linux(vd){static j2 c[10];j2 *num[10]={&c[0],&c[1], &c[2],&c[3],&c [4],&c[5],&c[6],&c[7],&c[8],&c[9]} ;j2
**p,i=0;j2 x=3;wall(0);{j2 a[]={293,80,277,130, 277,230,293,280,327,280, 343,230,343,130,327,80,293,80};j2 b[ ]={
298,85,282,135,282,225,298,275, 322,275,337,225,338,135,322,85,298,85}; setcolor(24);setfillstyle( 1 , 24 ) ;
fillpoly(9,a);setcolor( 34);setfillstyle(1,34) ;fillpoly(9,b);} setcolor(20);setfillstyle(1,24);bar(360,155
,410,205);setcolor(1); circle( 310, 180,60); setfillstyle ( 1,1);
floodfill(310,180,1); setcolor(25);circle ( 310 , 180 , 53 ) ;
setfillstyle (1,25 ); floodfill(310,180,25) ; setcolor ( 43 ) ;
setfillstyle( 1,43 ); bar(270,160,350,206 ); setcolor(31);rectangle
(270+5,160+5,350 -5 , 206-5);setfillstyle(1, 31);floodfill(300,190,
31 ) ; setcolor ( 1); rectangle(270+5,160+5, 350-5,206-5);setcolor(
41 ) ; while( x<= 24) {moveto(276+10,158+x + 10);linerel(0,2);moveto
(276+10+23,158+x+10); linerel(0,2);moveto(276 +10,158+x+10);linerel(
23,0);x+=3;}moveto(276 +10,158+x+10);linerel( 23,0);setlinestyle(0,1,
1);setcolor(1);moveto( 270,160);linerel( 5,5); moveto(350,206);linerel
(-5,-5);moveto(270,206); linerel( 5, -5);moveto( 350,160);linerel(-5,5);
{j2 j=0,i,z=20,*p,y=green; p=&i;while(j<11){if(z%2 ==0)*p=zi;else *p = 42;
setfillstyle(1,*p ); bar( 324,175,335,179);if(j== 10)y=RED ; setfillstyle(1
,y);bar ( 324,185,335,189); cv5(10);z--;j++;}}p=num; while(i<39){** p=410- i;
**(p+1)=155;** ( p+2)=410-i; **(p+3)=205;**(p+4)=420; **(p+5)=205;** ( p+6 )= 420;
**(p+7)=155;**(p+8)=410;**(p+9)=155;i+=1;cv5(1);setcolor(7);setfillstyle(1,7);fillpoly(5,c);
}{j2 i=320,*p,count=1;p=&i;setcolor(7);while(count<=8){arc(*p-count,180,320,40,60);count++
;cv5(2);}}size1=imagesize(255,80,385,280);buf1=malloc(size1);getimage(255,80,385,280,buf1
);size=imagesize(250,80,380,280);buf=malloc( size) ;size= setgraphbufsize( 99999999 );
getimage(250,80,374,280,buf);image();vb();{j2 q=180,free0=0;static j2 ic[10];j2 *num
[10]={&ic[0],&ic [1],&ic[2],&ic[3 ], &ic[4],&ic[5],&ic[6],&ic[7], &ic[8],&ic[9]};
j2 **p;i=0;p=num;wall(0);
while(i<320){putimage (q,
80,buf,COPY_PUT);**p=318-
i;**(p+1)=0;**(p+2)=318-i;
**(p+3)=480;**(p+4)=320+i;
**(p+5)=480;**(p+6)=320+i;
**(p+7)=0;**(p+8)=318-i;**
(p+9)=0;q-=2;setcolor( 0);
setfillstyle(1,0);fillpoly
(5,ic);if (i>=179)if(i>=181
){size2=imagesize(2,80,130,
280 ) ;buf2 =malloc(size2);
getimage(2,80,130,280,buf2)
;putimage(0,80,buf2,COPY_PUT
) ;free(buf2);}else if(free0
==0 ){free(buf);free0=1;}i+=
2;}} } vd den_shan( vd ) {j2
iden_yan_se=0,iyan_se,iden=2
;j2 ** p_light ; static j2
ilight[21];j2 *num_light[21
]={&ilight[0],&ilight[1] ,&
ilight[2],&ilight[3],&ilight
[4],&ilight[5],&ilight[6],&
ilight[7],&ilight[8],&ilight
[9],&ilight[10],&ilight[11],
& ilight [ 12],&ilight[13],&
ilight [ 14] , &ilight[15],&
ilight[ 16], & ilight[ 17],&
ilight [ 18 ], &ilight[19],&
ilight[20]};p_light=num_light
;**p_light=310;**(p_light+1)
=10;** (p_light + 2)=310;**(
p_light+ 3)=20;**(p_light+ 4)
=285;**(p_light+ 5 )=20 ;**(
p_light+ 6)= 265;**(p_light+7
)= 50;**(p_light+ 8)=265;
** ( p_light+ 9)=60;**(
p_light + 10)=365;**(
p_light+ 11)=60;**(
p_light + 12)=365
;**(p_light+ 13
) = 50 ; ** (
p_light +14
)=345;**(
p_light+15
)= 20; **(
p_light+16
)=320;**
(p_light
+ 17)
=20
;
**(p_light+18 )= 320;**(p_light+19
)=10;**(p_light+20) =310;**(p_light+21
)=10;for(iyan_se=1; iyan_se<20;iyan_se
++){if(iyan_se>=3) if(iyan_se>=7 )if(
iyan_se >= 12 )if (iyan_se >= 15 ) {
iden_yan_se = 15; iden= 10 ; } else{
iden_yan_se = 7, iden=146;cv5 (6);} else
{ iden_yan_se = 24 ; iden=0;cv5(6);}else {iden_yan_se
= 7 ; iden = 194 ; } setcolor(iden_yan_se );setlinestyle
(0 , 1,1 ); arc( 315,40, 220,320,30);line(293 ,60,336 , 60);
setfillstyle ( 1, iden_yan_se ) ; floodfill(316,61, iden_yan_se );
if(iyan_se>=15){setcolor(iden); setfillstyle(1,iden) ;fillpoly( 10,
ilight); }}}vd terra (vd) {static j2 ifloor[10 ];j2 *num_floor
[10]={&ifloor[0] ,&ifloor[1],&ifloor[ 2],& ifloor[3],&
ifloor [ 4 ] , & ifloor[5], & ifloor[6], &ifloor[7],&
ifloor[8],&ifloor [9]};j2 **floor;floor=num_floor;**
floor=0;**(floor+ 1)= 480;**(floor+ 2)= 200;**(
floor+ 3)= 160;** (floor+ 4)= 340;**(floor+5)=
160;**(floor+6)= 640;**(floor+ 7)= 480 ;**(
floor+ 8)= 0;**( floor+ 9)= 480;setcolor
(15);setfillstyle (1,15);fillpoly(5,ifloor
);}vd start_moive (vd){static j2 ileft_wall[10];j2
*num_left_wall[10 ]={&ileft_wall[0],&ileft_wall[1],
&ileft_wall[2],& ileft_wall[ 3],& ileft_wall [4 ], &
ileft_wall [5],& ileft_wall[6],&ileft_wall[7],&ileft_wall
[8],&ileft_wall[ 9]};j2 wq=0;jz we=0;j2**left_wall;left_wall
= num_left_wall; **left_wall=0;**(left_wall+ 1)= 0;**(left_wall+
2)= 0;**(left_wall +3)=480;**(left_wall + 4)= 305;**(left_wall+5 )
=160;**(left_wall+ 6)= 305;**(left_wall+ 7)=
130;**(left_wall+8 )= 0;**(left_wall+ 9)= 0; setcolor(7
);setfillstyle(1,7 );fillpoly(5,ileft_wall); }vd right_wall(
vd ) { static j2 iright_wall [ 10 ] ;j2 * num_right_wall[18
]={&iright_wall[0] , & iright_wall [ 1 ] ,& iright_wall[2],&
iright_wall [ 3],& iright_wall[4],&iright_wall [5],&iright_wall[6
],&iright_wall[7], &iright_wall[8],&iright_wall [9]};j2 **right_wall
;/* */right_wall= num_right_wall;**right_wall =640;**(right_wall
+1)=0;**(right_wall+ 2)= 326;**(right_wall+ 3)= 130;**(right_wall+
4)=326;**(right_wall +5)=160;**(right_wall+ 6)= 640;**(right_wall+
7)= 480;**(right_wall +8)=640 ;**( right_wall+ 9) = 0;setcolor( 7 );
setfillstyle ( 1, 7); fillpoly( 5, iright_wall ); }vd j2erface_door(
vd ) { static j2 ij2erface_door[10];static j2 ij2erface_door_under
[8];j2 *num_ij2erface_door [10]={ & ij2erface_door[ 0 ],& ij2erface_door[ 1 ],
& ij2erface_door [ 2 ] ,& ij2erface_door[3],&ij2erface_door[ 4],&ij2erface_door[
5], & ij2erface_door[ 6 ] ,& ij2erface_door[7],&ij2erface_door[8] ,&ij2erface_door[9]}
;j2 * num_ij2erface_door_under [8 ] = { & ij2erface_door_under[ 0 ],& ij2erface_door_under
[1],&ij2erface_door_under[ 2 ],& ij2erface_door_under[3]/*let it go */, & ij2erface_door_under
[4],&ij2erface_door_under[5],& ij2erface_door_under[6],&ij2erface_door_under[7] } ;j2 **p_door;
j2 **p_door_under;if(qw3 == 1){ p_door=num_ij2erface_door;p_door_under=num_ij2erface_door_under;
**p_door=331 + wr;**(p_door+ 1)= 135-wu1;**(p_door+ 2)= 341+wy;**(p_door+ 3)= 130-wu;**(p_door+
4)= 341+wy;**(p_door+ 5)=166+wr; **(p_door+ 6)= 331+wr;**(p_door+ 7)= 166+wr;**(p_door+ 8)=331+
wr;**(p_door+9)=135+wr;setcolor( 8);setfillstyle(1,8);fillpoly(5,ij2erface_door);**p_door_under =
331+wr;**(p_door_under+ 1)= 166+ wr;**(p_door_under+ 2)= 341+wy;**(p_door_under+ 3)= 183+ wy ;**(
p_door_under + 4 ) = 341+wy; **( p_door_under+ 5 ) = 166 + wr; **( p_door_under+ 6)= 331+wr
;**( p_door_under+ 7)=
166+wr;setcolor( 15 );
setfillstyle ( 1, 15);
fillpoly ( 4 ,/*leti*/
ij2erface_door_under);
setcolor(7);setlinestyle(
0,1,1);line(330+wr,136-wt,
330+wr,166+wr);if(wt>=30)if(wt>=50){wt+=0.164;}else{wt+=0.160; }else{ wt+=0.155;}if(wu>=8)if(wu>=11)if(wu>=50)if(wu>=90){wu
+=0.28;}else{wu+=0.25;}else{wu+=0.23;}else{wu+=0.17;}else{wu+=0.12;}if(qe5>=100){wy+=0.48;wr+=0.24;wu1+=0.16;}else{wy+=0.16
;wu1+=0.08;wr+=0.08;}}}vd door(vd){static j2 idoor[10];j2 *num_idoor[10]={&idoor[0],&idoor[1],&idoor[2],&idoor[3],&idoor[4]
,&idoor[5],&idoor[6],&idoor[7],&idoor[8],&idoor[9]};j2 **p_idoor=num_idoor;if(qw3==1){**p_idoor=305;**(p_idoor+ 1)= 130;**(
p_idoor+ 2)= 305;**(p_idoor+ 3)= 160;**(p_idoor+ 4)= 325;**(p_idoor+ 5)= 160;**(p_idoor+ 6)= 325;**( p_idoor + 7) = 130;**(
p_idoor+ 8)= 305;**(p_idoor+ 9)= 130;setcolor(22);setfillstyle(1,22);fillpoly(5,idoor);}}vd big_light(vd){static j2 ilight[
22];j2 *num_light[22]={&ilight[0],&ilight[1],&ilight[2],&ilight[3],&ilight[4],&ilight[5],&ilight[6],&ilight[7],&ilight[8],
&ilight[9],&ilight[10],&ilight[11],&ilight[12],&ilight[13],&ilight[14],&ilight[15],&ilight[16],&ilight[17],&ilight
[18],&ilight[19],&ilight[20
],&ilight[21]};j2 **p_light;
p_light=num_light;**p_light
=310;**(p_light+1 )= 10;**(
p_light+ 2)=310;**(p_light+
3)=20;**(p_light+ 4)=285;**
(p_light+ 5)=20;**(p_light+
6)= 265;**(p_light+ 7)= 50;
** ( p_light + 8)= 265;** (
p_light+ 9)=60;**(p_light+10
)=365;**(p_light+ 11)=60;**
(p_light+ 12)=365;**(p_light
+13)=50;**(p_light+ 14)=345;
**(p_light+15)=20;**(p_light
+16)=320;**(p_light+ 17)=20;
**(p_light+ 18)=320;**(p_light
+ 19)=10;**(p_light+ 20)=310
;**(p_light+ 21)=10;setcolor
( 10 ) ; setfillstyle(1 ,10);
fillpoly(11,ilight);setcolor(
15);setlinestyle(0,1,1 );arc(
315,40,220,320,30);line( 293,
60,336,60);setfillstyle(1,15)
;floodfill (316, 61,15);}vd
bar_cover(vd){setcolor(8)
;setfillstyle(1,8);bar(
264 , 9 , 366,70);}vd
door_come(vd){if(qw3
==1){setcolor(22);
setlinestyle(0,1
,1);rectangle(
305-qe1,130-
qe1,325+qe1
,160+qe1);
if(qe5>=
100){
qe1+=0.09;}else qe1+=0.03;}}vd wall_change_line(vd){if (qw5>=450){setcolor(7);setlinestyle(0,1,3);
line(326+qw6,131-qw6,qw5,0);if(wb % 4==0)qw6+=0.08;qw5-=0.17;}}vd wall_change_line_left(vd){if(qw7
<= 180){setcolor(7);setlinestyle(0, 1 ,3);line(304-qw8,131 - qw8, qw7,0 ) ; if(wb % 4==0)qw8 += 0.08
;qw7+=0.17; } }vd left_qe3(vd ){static j2 iwall_change[10];j2 *num_wall_change[10]={&iwall_change[0]
,&iwall_change[ 1 ],&iwall_change[ 2 ],&iwall_change[3],&iwall_change
[4 ],&iwall_change[5 ],&iwall_change[6 ],& iwall_change[7 ], &
iwall_change[8 ],&iwall_change[9 ]};j2 ** wall_change;wall_change=num_wall_change;if(qe3<=1 ){**
wall_change=270-wq;** (wall_change+ 1)= lt1;if(wq %3==0)lt1=**(wall_change+ 1)=lt1-2;**(wall_change+
2)= 270-wq;**(wall_change+ 3)= 150+wq;**(wall_change+ 4)= 265-wq;**(wall_change + 5 ) = 155 +wq;**(
wall_change+ 6)= 265-wq;**(wall_change+ 7)=lt;if(wq %3==0)lt=**(wall_change+ 7)=lt-2;**(wall_change
+ 8)= 270-wq;**(wall_change+ 9)=lt2;if(wq %3==0)lt2=**(wall_change+ 9)=lt2+2;setcolor(30);setfillstyle
(1,30);fillpoly(5,iwall_change);setcolor(7);setlinestyle(0,1,1);if(wq %3==0)ls-=1.2;line(280-we,ls,280
-we,150+we);we+=1;}}vd test(vd){wq=0;while(wi<=651){if(qe5>=680){qw3=0;wm=1;}if(qe5<=293)if((qe5>=0&&qe5<=
50) ||(qe5>=60 && qe5<=110) ||(qe5>=120 && qe5<=170) ||(qe5>=180 && qe5<=230) ||(qe5>=240 && qe5<=290) ||
(qe5>=300 && qe5<=320))big_light();else bar_cover();if(wm==1)wi=3000;qe5++;if(wi
==650){qe3++;m1-=3;if(m1<=108)m1=108;wi=0;wq=0;wz-=2.7;if(wz<=112)wz=112;ls=wz;
we=0;lt1=m1;lt2=m1;lt=m1;}left_qe3();wq+=2;wi+=2;if( wb % 30==0){jo();wall_change_line_left();}if(wb % 4
==0){door_come();j2erface_door();}}}vd middle_line_left(vd){setcolor(8);setlinestyle(0,1,3);line(qe7,0,qe8
,74);qe7-=2;qe8-=2;}vd middle_line_down(vd){if(qr1<=250)qr1= 249 ; setcolor(15);
setlinestyle(0,1,3);line(qr,215,1,qr1);line(0,qr1,0,qr1);qr-=2;qr1-=2;}vd squal
(vd ){ setcolor(22 ); setlinestyle(0,1,3);line(qr2,74,qr2,215);setcolor(7);setlinestyle(0,1,3);line(
qr3,74,qr3,215);qr2 -=2;qr3-=2;}vd middle_line_right(vd){ setcolor (7 ); setlinestyle ( 0, 1, 3 ) ;
line(qr7,74,qr8 ,0);qr7-=2;qr8-=2;}vd middle_line_down1(vd){line ( qt, 215,qt1, 311) ; qt-=2;
qt1-= 2 ;}vd m2(vd){setcolor(8);setlinestyle(0,1,3);line(im21,32,im22,0);line(im21,32,
im21,311); im21-=2;im22-=2;}vd middle_line_all( vd ){ while (qe6<=560){middle_line_left();middle_line_down
();squal ();middle_line_right();if(qe6>=559){setcolor(8);setfillstyle(1,8);bar(0,240,5,254);}middle_line_down1
();m2( );qe6++;}}vd bar1_cover(vd){setcolor(8);setfillstyle(1,8);bar(0,0,640,311);setcolor(15);setfillstyle
(1, 15);bar(0,311,640,480);while(qe9>=280){setcolor(15);setlinestyle
(0,1,3);line(0,qe9,640,qe9);qe9--;}}vd a1(vd){
while(qr4<=200 ){setcolor(15);setlinestyle
(0,1,3);line(320,282,il1,ia1);setcolor(8);setlinestyle(0,1,3)
;line(0,ia2,319,280);if(qr4>=163){setcolor(7);setfillstyle(
1,7);bar(qr5,90,qr6,115);qr5--;
if(qr4>=173){qr6--;if(
qr4>=183){setcolor(8);setlinestyle(0,1,3);
line(il4,90,il4,115);il4--;line(il5,90,
640,72);line(il6,115,640,133);
il6-=1;il5-=1;}}setcolor(7);
setfillstyle(1,7);line(il2,90,il3,0);il2--;
il3-=3;}if(qr4<=162){ia1--;}
else{il1--;}ia2++;qr4++;}}vd a2(vd)
{while(il7<=290){setcolor(7);setlinestyle(0,1,3);line(il8,90,
il8,115);setcolor(8);setlinestyle(0,1,3);line(il9,90,il9,115);
setcolor( 7 ) ; setlinestyle(0,1,3);line(iz1,89,iz2,0);
setcolor(15); setlinestyle(0,1,3);
line(6,480 ,iz3,116);
setcolor (8);setlinestyle(0,1,3);line
( iz4,90 ,iz5,iz6);line(
iz7, 115 ,iz8,iz9);
iz9 +=2.39;
iz8++; iz7--;
iz6 -= 2.5;
iz5++; iz4--;iz3--;iz2--;iz1--;il9--
;il8 --,il7++;}}vd a3(vd){while(iv2<=40)
{ setcolor(7);setlinestyle(0,1,3);line(
313, iv,328,iv);line(
313, iv1, 328,iv1);
line(312,iv5 ,iv4,0);line(329,iv8,iv7,0);setcolor(8);
setlinestyle(0, 1,3);line(0,iv6,312,iv3);line(329,iv9,640,480);
iv9++;iv8++;iv7+=2; iv6++;iv5++;iv4-=2;iv++;iv1++;iv3++;iv2++;}}
vd g(vd){while(i9<=139){setcolor(7);setlinestyle(0,1,3);line(125-ic7,
380+ic6,543+ic7,380+ic6);setcolor(15);setlinestyle(0,1,3);line
(127-ic7,376+ic6,541+ic7,376+ic6);setcolor(7);setlinestyle(0,1,3);
line(119-ic7,0,119-ic7,380+ic8);setcolor(8);setlinestyle(0,1,3);
line(123-ic7,0,123-ic7,376+ic8);setcolor(7);setlinestyle(0,1,3);line(553+ic7,
0,553+ic7,386+ic9);setcolor(8);setlinestyle(0,1,3);line(549+ic7,0,549+ic7,
385+ic9);setcolor(7);setfillstyle(1,7);bar(314-ih,133-ih1,329+ih2,156+ih3);
ih+=0.018;ih1+=0.02;ih2+=0.018;ih3+=0.02;ic6+=1.05;
ic8+=1;ic9+=0.9;ic7+=0.9;i9++;}}vd f(vd)
{iw2+=0.7;qt2+=0.6;qt3+=0.6;ic1+=0.9;
ic2+=0.9;ic5+=0.4;ic3+=0.4;ic4+=0.7;
setcolor(15);
setlinestyle(0,1,3);
line(256-qt3,225+iw2,
394+qt2,225+iw2);
setcolor(8);
setlinestyle(0,1,3);line(252-ic1,85-ic2,252-ic1,
227+ic2);setcolor(8);setlinestyle(0,1,3);
line(394+ic4,78-ic3,394+ic4,222+ic5);}
vd a4(vd){j2 iw3=0;while(iw<=300){if(iw==300)
{for(;iw3<=2;f(),iw3++);g();iw1++;iw=0;iw3
=0;iw2=0;qt2=0;qt3=0;ic1=0;ic2=0;ic3=0;
ic4=0;ic5=0;i9=0;ic6=0;ic7=0;ic8=0;
ic9=0;}if(iw1>=7){break;}
setcolor(7);setlinestyle(0,1,3);line(254-qt3,
228+iw2,396+qt2,228+iw2);setcolor(15);setlinestyle(0,1,3);line(256-qt3,
225+iw2,394+qt2,225+iw2);setcolor(7);setlinestyle(0,1,3);line(249-ic1,
84- ic2,249-ic1,228+ic2);setcolor(8);setlinestyle(0,1,3);line(252-ic1,
85-ic2, 252-ic1,227+ic2);setcolor(7);setlinestyle(0,1,3);line(397+ic4,
77-ic3,397 +ic4,223+ic5);setcolor(8);setlinestyle(0,1,3);line(394+ic4,
78-ic3,394 +ic4,222+ic5);iw2+=0.1;qt2+=0.09;qt3+=0.08;ic1+=0.08;ic2+=0.083;
if(iw<= 30) ic5+=0.095; else ic5+=0.098;ic3+=0.08;
ic4+=0.1;iw++;setcolor(7);setfillstyle(1,7);
bar(314-ih,133-ih1,329+ih2,156+ih3);ih+=0.018;
ih1+=0.02;ih2+=0.018;
ih3+=0.02;}}vd l(vd){j2 vb5,vb6;vb5=VGA;
vb6=vb7;vb9(&vb5,&vb6,vb8);vb();
settextjustify(CENTER_TEXT,CENTER_TEXT);settextstyle(DEFAULT_FONT,
HORIZ_DIR,3);setcolor(10);outtextxy(150,70,"just 3");outtextxy
(380,70,"D test of DOS");outtextxy(130,160,"can you");
outtextxy(410,160,"feel the code");outtextxy(320,240
,"is crying ?");cv5(50);vb();outtextxy(140,70
,"because its"); outtextxy(470,70,"Master couldn't");
outtextxy(300,130,"see tonight");outtextxy(190,300,"Internet 042");
setcolor(12);outtextxy(460,300,"LinuxCiCi");outtextxy(
450,340,"QQ:15348205");cv5(40);vb();cv2(200,100,28,3,0);cv2(260,100,29,3,0);
cv2(315,100,1,3,0);cv2(350,100,10,3,0);cv2(380,100,0,3,0);cv2(220,200,37,12,
0);cv2(290,200,38,12,0);cv2(360,200,39,12,0);getch();}