2 кубика...графика...ассемблер...

[Дмитрий142]

у меня есть программа, которая по нажатиям вправо/влево водит кубик туда/сюда

CSEG SEGMENT PARA PUBLIC
Assume   cs:CSEG, DS:CSEG, SS:CSEG, ES:CSEG

JMP BEG

KvB_X	DW 	0
KvB_Y	DW	80
KvE_X	DW	32
KvE_Y	DW	112

BEG :
MOV	AX,CS
MOV	SS,AX
MOV	DS,AX
MOV	ES,AX
MOV	SP, OFFSET STEK
;VIDEO
INT	12H
MOV 	AX,12H
INT 	10H

START : 
MOV	DX, KvB_Y
MOV	CX, KvB_X

CALL Kv_TO_SCREEN

;WAIT TO PRESS 

MOV	AX,0
INT	16H
CMP	AH,1
JE 	FINAL 




CMP 	AH,4DH
JNZ	C1
CALL	Kv_CLEAR
ADD 	KvB_X,32
ADD 	KvE_X,32
JMP 	START 	

C1:
CMP 	AH, 4Bh
JNE 	START
CALL 	Kv_CLEAR
SUB 	KvB_X,32
SUB 	KvE_X,32
JMP 	START




FINAL :

MOV	AX,03H
INT	10H
MOV	AH,4CH
INT	21H

Kv_TO_SCREEN PROC NEAR
PUSH	DX
PUSH	CX
MOV	BX,0

CICLE1 : 
MOV CX, KvB_X

CICLE :
MOV 	AX,0C04H
INT	10H
INC	CX
CMP	CX,KvE_X
JNZ	CICLE

INC	DX
CMP	DX,KvE_Y
JNZ	CICLE1
POP	CX
POP	DX
RET
Kv_TO_SCREEN ENDP

Kv_CLEAR PROC NEAR
PUSH	DX
PUSH	CX
MOV	BX,0

CLEAR1 : 
MOV CX, KvB_X

CLEAR :
MOV 	AX,0C00H
INT	10H
INC	CX
CMP	CX,KvE_X
JNZ	CLEAR

INC	DX
CMP	DX,KvE_Y
JNZ	CLEAR1
POP	CX
POP	DX
RET
Kv_CLEAR ENDP


LSTK	DB	256 DUP (0)
STEK	DW	0
CSEG ENDS
END

Мне нужно чтобы выводилось 2 кубика...и при нажатии влево они оттдалялись, а при нажатии вправо - сближались...Не получается вывести 2 кубик

[Дмитрий142]

Выкладываю еще и EXEшник

[Дмитрий142]

1111111111111111111