#include
#include
#define M 8
char table[M][M];
void InitTable()
{
int i,j;
for(i=0;i for(j=0;j table[i][j]=' '; for(i=0;i { table[0][i]='@'; table[i][M-1]='@'; table[M-1][M-i-1]='@'; table[M-1-i][0]='@'; } } void DisplayTable() { int i,j; //clrscr(); //TC 下可用此方法 //system("cls");//VC6.0下用此方法 for(i=0;i { for(j=0;j printf("%c ",table[i][j]); printf("\n"); } } void Delay() { int i,j; for(i=0;i<10000;i++) for(j=0;j<10000;j++); } void FillTable()//将对应位置置* { int i; for(i=1;i { table[i][i]='*'; Delay(); //起一定延时，看起来效果好点 DisplayTable(); //重新显示那张表格 } for(i=1;i { table[M-i-1][i]='*'; Delay(); DisplayTable(); } } void EmptyTable()//将对应位置置空 { int i; for(i=1;i { table[i][M-1-i]=' '; Delay(); DisplayTable(); } for(i=1;i { table[M-i-1][M-i-1]=' '; Delay(); DisplayTable(); } } void main(void) { char cmd; InitTable(); //初始化表格,边框和置空部分 DisplayTable(); scanf("%c",&cmd); while(!(cmd=='Q'||cmd=='q')) { switch(cmd) { case 'I': case 'i': FillTable();//填充表格行动 break; case 'O': case 'o': EmptyTable();//将表格内清除 注意程序中填充像写X一样，这边清除时时相反的动作，具体去运行程序观看效果 break; // default: //printf("\nbad command,try it again!\n"); } scanf("%c",&cmd); } } 以上在VC6.0测试通过 以下是在TC下测试通过 #include #define M 8 char table[M][M]; void InitTable() { int i,j; for(i=0;i for(j=0;j table[i][j]=' '; for(i=0;i { table[0][i]='@'; table[i][M-1]='@'; table[M-1][M-i-1]='@'; table[M-1-i][0]='@'; } } void DisplayTable() { int i,j; clrscr(); for(i=0;i { for(j=0;j printf("%c ",table[i][j]); printf("\n"); } } void Delay() { int i,j; for(i=0;i<20000;i++) for(j=0;j<30000;j++); } void FillTable()/*将对应位置置* */ { int i; for(i=1;i { table[i][i]='*'; Delay(); /*起一定延时，看起来效果好点*/ DisplayTable(); /*重新显示那张表格*/ } for(i=1;i { table[M-i-1][i]='*'; Delay(); DisplayTable(); } } void EmptyTable()/*将对应位置置空*/ { int i; for(i=1;i { table[i][M-1-i]=' '; Delay(); DisplayTable(); } for(i=1;i { table[M-i-1][M-i-1]=' '; Delay(); DisplayTable(); } } void main(void) { char cmd; InitTable(); /*初始化表格,边框和置空部分*/ DisplayTable(); scanf("%c",&cmd); while(!(cmd=='Q'||cmd=='q')) { switch(cmd) { case 'I': case 'i': FillTable();/*填充表格行动*/ break; case 'O': case 'o': EmptyTable();/*将表格内清除 注意程序中填充像写X一样，这边清除时时相反的动作，具体去运行程序观看效果*/ break; /*default: //printf("\nbad command,try it again!\n");*/ } scanf("%c",&cmd); } }
data_seg segment
car db 26
db 3dh,0eh,0,0
db 40h,0ah,1,0
db 9 dup(02ah,0bh,1,0)
db 40h,0ah,1,0
db 3dh,0eh,1,0
db 3ch,0eh,0,-1
db 2ah,0bh,-1,0
db 9 dup(40h,0bh,-1,0)
db 2ah,0bh,-1,0
db 3ch,0eh,-1,0
car1 db 26
db 3dh,0eh,0,0
db 11 dup(40h,0bh,1,0)
db 3dh,0eh,1,0
db 3eh,0eh,0,1
db 11 dup(02ah,0bh,-1,0)
db 3eh,0eh,-1,0
;---------------------------------------
jeep1 db 26
db 3dh,0eh,0,0
db 11 dup(40h,0bh,1,0)
db 3dh,0eh,1,0
db 3ch,0eh,0,-1
db 11 dup(02ah,0bh,-1,0)
db 3ch,0eh,-1,0
;--------------------------------------
jeep db 26
db 3dh,0eh,0,0
db 40h,0ah,1,0
db 9 dup(02ah,0bh,1,0)
db 40h,0ah,1,0
db 3dh,0eh,1,0
db 3eh,0eh,0,1
db 2ah,0bh,-1,0
db 9 dup(40h,0bh,-1,0)
db 2ah,0bh,-1,0
db 3eh,0eh,-1,0
;----------------------------------------
left db '_',0ch,0,0
db 5ch,0ch,1,0
db 2fh,0ch,1,0
db 4 dup(7ch,0ch,1,0)
db 5ch,0ch,2,0
db 5ch,0ch,1,0
db 2ah,0ch,1,0
db 3dh,0ch,1,0
db '_',0ch,-9,-1
db 3dh,0ch,1,0
db 3dh,0ch,3,0
db '_',0ch,1,0
db 5ch,0ch,1,0
db 2ah,0ch,1,0
db 5ch,0ch,2,0
db '_',0ch,-9,-1
db 3dh,0ch,1,0
db 3dh,0ch,3,0
db '_',0ch,2,0
db 2ah,0ch,1,0
db '_',0ch,-7,-1
db 3dh,0ch,1,0
db 3dh,0ch,3,0
db '_',0ch,2,0
db 2ah,0ch,1,0
db 5ch,0ch,-10,-1
db 9 dup(7ch,0ch,1,0)
db 2ah,0ch,1,0
db 2ah,0ch,-10,-1
db 9 dup(7ch,0ch,1,0)
db 2ah,0ch,1,0
db '_',0ch,-7,-1
db 3dh,0ch,1,0
db 3dh,0ch,3,0
db '_',0ch,2,0
db 2ah,0ch,1,0
db '_',0ch,-7,-1
db 3dh,0ch,1,0
db 3dh,0ch,3,0
db '_',0ch,2,0
db 2fh,0ch,1,0
db '_',0ch,-7,-1
db 3dh,0ch,1,0
db 3dh,0ch,3,0
db '_',0ch,2,0
db 2 dup(2fh,0ch,1,0)
db 5ch,0ch,-8,-1
db 4 dup(7ch,0ch,1,0)
db 2fh,0ch,1,0
db 2ah,0ch,2,0
db 3dh,0ch,1,0
db 2fh,0ch,1,0
db 7ch,0ch,-9,-1
db 5 dup(7ch,0ch,1,0)
db 2fh,0ch,3,0
db 5ch,0ch,1,0
;---------------------------
db 5ch,0ch,-9,-2
db 5ch,0ch,8,0
db 2fh,0ch,1,0
db '_',0ch,-10,-1
db 2 dup(2fh,0ch,1,0)
db 2fh,0ch,7,0
db '_',0ch,1,0
db '_',0ch,-12,-1
db 7ch,0ch,1,0
db '_',0ch,1,0
db 3dh,0ch,1,0
db 2fh,0ch,1,0
db '_',0ch,7,0
db '_',0ch,1,0
db 5ch,0ch,-12,-1
db 3dh,0ch,1,0
db '_',0ch,1,0
db 3dh,0ch,1,0
db 5ch,0ch,3,0
db 2 dup(7ch,0ch,1,0)
db 2fh,0ch,1,0
db '_',0ch,2,0
db '_',0ch,1,0
db 2fh,0ch,-12,-1
db 3dh,0ch,1,0
db '_',0ch,1,0
db 3dh,0ch,1,0
db 2 dup(3eh,0ch,1,0)
db 2fh,0ch,1,0
db 3 dup(7ch,0ch,1,0)
db '_',0ch,2,0
db '_',0ch,1,0
db '_',0ch,-12,-1
db 3dh,0ch,1,0
db '_',0ch,1,0
db 3 dup(3dh,0ch,1,0)
db '_',0ch,1,0
db 2ah,0ch,1,0
db 3eh,0ch,1,0
db 3dh,0ch,1,0
db '_',0ch,2,0
db '_',0ch,1,0
db '_',0ch,-12,-1
db 3dh,0ch,1,0
db '_',0ch,1,0
db 3 dup(3dh,0ch,1,0)
db '_',0ch,1,0
db 2 dup(2ah,0ch,1,0)
db 3dh,0ch,1,0
db '_',0ch,2,0
db '_',0ch,1,0
db '_',0ch,-12,-1
db 3dh,0ch,1,0
db '_',0ch,1,0
db 3 dup(3dh,0ch,1,0)
db '_',0ch,1,0
db 2 dup(2ah,0ch,1,0)
db 3dh,0ch,1,0
db 2 dup(7dh,0ch,1,0)
db '_',0ch,1,0
db '_',0ch,-12,-1
db 3dh,0ch,1,0
db '_',0ch,1,0
db 3 dup(3dh,0ch,1,0)
db '_',0ch,1,0
db 2 dup(2ah,0ch,1,0)
db 3dh,0ch,1,0
db 3 dup(2ah,0ch,1,0)
db '_',0ch,-12,-1
db 3dh,0ch,1,0
db '_',0ch,1,0
db 3dh,0ch,1,0
db 2 dup(3ch,0ch,1,0)
db 3ch,0ch,2,0
db 3ch,0ch,1,0
db 3dh,0ch,1,0
db 2 dup(7bh,0ch,1,0)
db 5ch,0ch,1,0
db '_',0ch,-12,-1
db 2 dup(3dh,0ch,1,0,7ch,0ch,1,0)
db 7ch,0ch,1,0
db 3dh,0ch,4,0
db '_',0ch,-9,-1
db 2 dup(3dh,0ch,1,0,2bh,0ch,1,0)
db 2bh,0ch,1,0
db 5ch,0ch,2,0
db 3dh,0ch,2,0
db '_',0ch,-9,-1
db 2 dup(3dh,0ch,1,0,7ch,0ch,1,0)
db 7ch,0ch,1,0
db '_',0ch,1,0
db 2fh,0ch,1,0
db 5ch,0ch,1,0
db 3dh,0ch,1,0
db '_',0ch,-9,-1
db 3dh,0ch,1,0
db '_',0ch,1,0
db 3dh,0ch,1,0
db 2 dup(3eh,0ch,1,0)
db '_',0ch,1,0
db 2ah,0ch,1,0
db 2fh,0ch,1,0
db 3dh,0ch,1,0
db 7dh,0ch,1,0
db '_',0ch,-10,-1
db 3dh,0ch,1,0
db '_',0ch,1,0
db 3 dup(3dh,0ch,1,0)
db '_',0ch,1,0
db 2 dup(2ah,0ch,1,0)
db 3dh,0ch,1,0
db 2ah,0ch,1,0
db 2fh,0ch,1,0
db '_',0ch,-11,-1
db 3dh,0ch,1,0
db '_',0ch,1,0
db 3 dup(3dh,0ch,1,0)
db '_',0ch,1,0
db 2 dup(2ah,0ch,1,0)
db 3dh,0ch,1,0
db 7bh,0ch,1,0
db 2ah,0ch,1,0
db 3eh,0ch,1,0
db '_',0ch,-12,-1
db 3dh,0ch,1,0
db '_',0ch,1,0
db 3 dup(3dh,0ch,1,0)
db '_',0ch,1,0
db 2 dup(2ah,0ch,1,0)
db 3dh,0ch,1,0
db 2fh,0ch,2,0
db 3dh,0ch,1,0
db '_',0ch,-12,-1
db 3dh,0ch,1,0
db '_',0ch,1,0
db 3 dup(3dh,0ch,1,0)
db '_',0ch,1,0
db 2ah,0ch,1,0
db 3ch,0ch,1,0
db 3dh,0ch,1,0
db 3dh,0ch,3,0
db '_',0ch,-12,-1
db 3dh,0ch,1,0
db '_',0ch,1,0
db 3dh,0ch,1,0
db 2 dup(3ch,0ch,1,0)
db '_',0ch,1,0
db 3 dup(7ch,0ch,1,0)
db 3dh,0ch,3,0
db '_',0ch,-12,-1
db 3dh,0ch,1,0
db '_',0ch,1,0
db 3dh,0ch,1,0
db 2fh,0ch,4,0
db 2 dup(7ch,0ch,1,0)
db 3dh,0ch,3,0
db 2fh,0ch,-11,-1
db '_',0ch,1,0
db 3dh,0ch,1,0
db 3ch,0ch,9,0
db 2fh,0ch,-9,-1
db 2fh,0ch,1,0
db 3ch,0ch,8,0
db 2fh,0ch,-8,-1
db 3ch,0ch,8,0
right db 189
db '_',0ch,0,0
db 3dh,0ch,1,0
db 5ch,0ch,1,0
db 3 dup(7ch,0ch,1,0)
db 2fh,0ch,1,0
db 5ch,0ch,3,0
db 2ah,0ch,1,0
db 3dh,0ch,1,0
db '_',0ch,-11,1
db 3dh,0ch,1,0
db 40h,0ch,9,0
db 3dh,0ch,1,0
db 2 dup('_',0ch,-11,1,3dh,0ch,1,0,3dh,0ch,10,0)
db '_',0ch,-11,1
db 3dh,0ch,1,0
db 9 dup(7ch,0ch,1,0)
db 3dh,0ch,1,0
db '_',0ch,-11,1
db 3dh,0ch,1,0
db 9 dup(2bh,0ch,1,0)
db 3dh,0ch,1,0
db '_',0ch,-11,1
db 3dh,0ch,1,0
db 9 dup(7ch,0ch,1,0)
db 3dh,0ch,1,0
db 3 dup('_',0ch,-11,1,3dh,0ch,1,0,3dh,0ch,10,0)
db '_',0ch,-11,1
db 2fh,0ch,1,0
db 3dh,0ch,10,0
db 5ch,0ch,-10,1
db 2fh,0ch,10,0
;--------------------------
db 2fh,0ch,-6,1
db 5ch,0ch,1,0
db 2ah,0ch,4,0
db 5ch,0ch,1,0
db 2fh,0ch,-7,1
db 2ah,0ch,1,0
db 2fh,0ch,1,0
db 2fh,0ch,3,0
db 3dh,0ch,1,0
db 7ch,0ch,-6,1
db 7ch,0ch,1,0
db 2fh,0ch,3,0
db 2ah,0ch,1,0
db 2fh,0ch,-2,1
db 2ah,0ch,1,0
db 7ch,0ch,-9,1
db 5 dup(7ch,0ch,1,0)
db 7bh,0ch,1,0
db 40h,0ch,1,0
db 2ah,0ch,1,0
db 5ch,0ch,-8,1
db 8 dup(2ah,0ch,1,0) ;101
db '_',0ch,-8,1
db 5 dup(7ch,0ch,1,0)
db 7dh,0ch,1,0
db 40h,0ch,1,0
db 2ah,0ch,1,0
db 2fh,0ch,-4,1
db 2ah,0ch,1,0
db 5ch,0ch,3,0
db 5ch,0ch,1,0
db 2fh,0ch,-6,1
db 2ah,0ch,1,0
db 2fh,0ch,1,0
db 5ch,0ch,4,0
db 5ch,0ch,1,0
db 5ch,0ch,-7,1
db 2fh,0ch,1,0
db '_',0ch,5,0
db 2ah,0ch,1,0
db 5ch,0ch,1,0
db '_',0ch,-10,1
db 5ch,0ch,1,0
db 5ch,0ch,8,0
db 2fh,0ch,1,0
db '_',0ch,-10,1
db 3dh,0ch,1,0
db 2fh,0ch,8,0
db '^',0ch,1,0
db '_',0ch,-10,1
db 3dh,0ch,1,0
db 5ch,0ch,8,0
db '^',0ch,1,0
db '_',0ch,-10,1
db 3dh,0ch,1,0
db 3dh,0ch,8,0
db '^',0ch,1,0
db '_',0ch,-10,1
db 3dh,0ch,1,0
db 3dh,0ch,8,0
db 5ch,0ch,1,0
db '_',0ch,-10,1
db 3dh,0ch,1,0
db 7 dup(7ch,0ch,1,0)
db 3dh,0ch,1,0
db 40h,0ch,1,0
db '^',0ch,1,0
db '_',0ch,-11,1
db 3dh,0ch,1,0
db 8 dup(2bh,0ch,1,0)
db 2 dup(2ah,0ch,1,0)
db '_',0ch,-11,1
db 3dh,0ch,1,0
db 8 dup(7ch,0ch,1,0)
db 7dh,0ch,1,0
db 2fh,0ch,1,0
db '_',0ch,-11,1
db 3dh,0ch,1,0
db '_',0ch,-1,1
db 3dh,0ch,1,0
db '_',0ch,-1,1
db 2fh,0ch,1,0
db 5ch,0ch,0,1
char_cnt1 dw ?
pointer1 dw ?
line_on1 db ?
col_on1 db ?
char_cnt2 dw ?
pointer2 dw ?
line_on2 db ?
col_on2 db ?
char dw ?
char0 db ?
count db ?
count1 db ?
line db ?
line1 db ?
line2 db ?
col db ?
col1 db ?
col2 db ?
point1 dw ?
point2 dw ?
data_seg ends
;---------------------------------------
code_seg segment
assume cs:code_seg,ds:data_seg
main proc far
push ds
sub ax,ax
sub cx,cx
push ax
push cx
mov ax,data_seg
mov ds,ax
mov char0,2
mov count,2
mov count1,200
again:
lea di,car
mov dh,4
mov dl,38
call move_shape1
lea di,jeep
mov dh,4
mov dl,39
call move_shape2
dec count
lea di,left
mov dh,5
mov dl,38
call move_shape1
lea di,right
mov dh,5
mov dl,39
call move_shape2
call must_2
inc count
lea di,jeep1
mov dh,4
mov dl,76
call move_shape1
lea di,car1
mov dh,4
mov dl,3
call move_shape2
mov char0,2
exit01:
call dly_qrtr
dec count1
jne exit01
call must_2
pop cx
ret
main endp
;-------------------------------------
move_shape1 proc near
push ax
push bx
push cx
push dx
push di
mov ah,0fh
int 10h
cmp count,1
je exit20
sub ch,ch
mov cl,[di]
inc di
mov char_cnt1,cx
mov pointer1,di
mov line_on1,dh
mov col_on1,dl
mov char,cx
jmp exit21
exit20: mov point1,di
mov line1,dh
mov col1,dl
exit21: pop di
pop dx
pop cx
pop bx
pop ax
ret
move_shape1 endp
;----------------------------
move_shape2 proc near
push ax
push bx
push cx
push dx
push di
mov ah,0fh
int 10h
sub ch,ch
mov cl,[di]
inc di
cmp count,1
je exit23
mov char_cnt2,cx
mov pointer2,di
mov line_on2,dh
mov col_on2,dl
mov char,cx
jmp exit22
exit23: mov point2,di
mov line2,dh
mov col2,dl
exit22: pop di
pop dx
pop cx
pop bx
pop ax
ret
move_shape2 endp
;-----------------------------------------
must_2 proc near
push ax
push bx
push cx
push dx
push di
mov ah,0fh
int 10h
exit4: sub cx,cx
mov cx,char_cnt1
mov di,pointer1
mov dh,line_on1
mov dl,col_on1
mov char,cx
jmp plot_next
exit3: sub cx,cx
mov cx,char_cnt2
mov di,pointer2
mov dh,line_on2
mov dl,col_on2
mov char,cx
jmp plot_next
exit5: call dly_qrtr
call dly_qrtr
call dly_qrtr
call dly_qrtr
call dly_qrtr
call erase
mov char0,2
jmp exit4
plot_next: add dh,[di+2]
add dl,[di+3]
cmp count,1
jne exit1
cmp dl,3
je exit2
jmp exit
exit1: cmp dl,40
je exit2
exit: mov ah,2
int 10h
mov al,[di]
mov bl,[di+1]
push cx
mov cx,1
mov ah,09
int 10h
pop cx
add di,4
loop plot_next
cmp char0,1
je exit5
dec char0
jmp exit3
exit2: call erase
pop di
pop dx
pop cx
pop bx
pop ax
ret
must_2 endp
;------------------------------------------
erase proc near
push si
sub si,si
mov char0,2
exit7: sub cx,cx
push bx
sub bx,bx
mov bl,line1
mov line,bl
mov bl,col1
mov col,bl
pop bx
mov cx,char_cnt1
mov di,pointer1
mov dh,line_on1
mov dl,col_on1
mov si,point1
jmp erase_next
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024