Jednu a najpoctatnejsiu vec neviem
ked je kurzor nad znakom ( v mojom pripade hviezdicka) potrebujem porovnat ci kurzor je nad znakom a napisat vedla... neviem... to kde je kurzor sa uklada do nejakeho registra alebo treba na to nejaku dosovsku funkciu? dik tu je zdrojak:Kód: Vybrať všetko
zas segment stack 'stack'
dw 64
zas ends
X equ 1 ; zaciatocny riadok
Y equ 1 ; zaciatocny stlpec
DATA SEGMENT ;zaciatok datoveho segmentu
TEXT DB '*$' ;definicia retazca
NR DB 13,10
XOVA DB X
YOVA DB Y
DATA ENDS
CODE SEGMENT ;zaciatok kodoveho segmentu
ASSUME CS:CODE, DS:DATA, ss:zas ;direktiva oznamuje
WRITE MACRO W
MOV AH,9
MOV DX,OFFSET W
INT 21H
ENDM
CLEAR MACRO
MOV AX,0003H
INT 10H
ENDM
KURZOR MACRO X,Y
MOV DL,X ;PRESUN X-OVEJ SURADNICE DO REGISTRA
MOV DH,Y ;PRESUN Y-OVEJ SURADNICE DO REGISTRA
MOV AX,0200H ;FUNKCIA NA OBSLUHU KURZORA
INT 10H
ENDM
start: MOV AX, SEG DATA
MOV DS, AX
CLEAR
KURZOR 9,3
WRITE TEXT
KURZOR 11,8
WRITE TEXT
KURZOR 22,8
WRITE TEXT
KURZOR 2,9
WRITE TEXT
KURZOR 45,14
WRITE TEXT
KURZOR 1,1
MOV AH,07H
INT 21H
JMP POKRAC
POKRAC: KURZOR XOVA,YOVA
;PUSH CX
INC XOVA
CMP CX, 2Ah ; << tu porovnavam ci je v registry hviezdicka
JZ DOPISANIE
CMP XOVA, 79
JZ ZVYSY
CMP YOVA, 24
JZ KONIEC
;POP CX
JMP POKRAC
ZVYSY: INC YOVA
MOV DL,1
JMP POKRAC
DOPISANIE: INC XOVA
WRITE TEXT
JMP POKRAC
KONIEC: MOV AX,4C00H
INT 21H
code ends
end start
