ULOHA PROC
;vypis obsahu suboru
    CALL OPENFILE
    MOV Handler, AX
    MOV BX, AX
    PRINTC '1'
    PRINTC '.'
    PRINTC ' '


CITAJ:
;vypis sa vykonava po bytoch
    MOV CX, 1
    MOV AH, 3FH
    MOV DX, offset byteb
    INT 21H

    CMP AX, 0
    JZ STOP_READ

    PRINTC byteb
    MOV AL, byteb
    CMP AL,10
    JZ CISL

    JMP CITAJ

STOP_READ:
    CALL CLOSEFILE
    PRINTS Riadok
    RET

CISL:
    PRINTC 'Q'
    INC Cislovanie

   ; XOR AX, AX
   ; XOR CX, CX
   ; XOR DX, DX
   ; XOR BX, BX

   ; MOV AL, Cislovanie
   ; MOV BX, 10
   ; XOR CX, CX

DIVING1:
;konvertovanie a ulozenie cifier do zasobnika
   ; DIV BX
   ; PUSH DX
   ; XOR DX, DX
   ; INC CX
   ; CMP AX, 0
   ; JNZ DIVING1

POP_NUM1:
  ;  POP DX
  ;  ADD DX, '0'
  ;  MOV AH, 2H
  ;  INT 21H
  ;  LOOP POP_NUM1
  ;  PRINTC '.'
  ;  PRINTC ' '
    JMP CITAJ


endp