BITS 16 
svim:
    pusha ; save state before program 
    ;mov si, .os_clear_screen_str
    ;call print
    xor bx, bx
    call os_clear_screen
    ;xor cx, cx   ; Upper and left coordinate 
    ;mov bh, 0x0a ; color for new screen 0 = black a = light green
    ;mov dh, 0xff ; Select all screen 
    ;mov dl, 0xff ; Select all screen 
    ;mov ah, 0x07 ; scrool down 
    ;mov al, 0x00 ; scrool 0 lines (means blank screen )
    ;int 0x10 
    
    mov ah, 0x02
    mov bh, 0x00 ; page number 0 
    mov dh, 0x00 ; row zero 
    mov dl, 0x17 ; coloumn zero
    int 0x10
    mov si, .welcome_svim_select_file
    call print
    call printCRLF
    mov si, .seperate_line
    call print
    call vsfs_list_files_command

    ; move cursor to the bootom 
    xor ax, ax
    xor bx, bx 
    mov ah, 0x02
    mov bh, 0x00 ; page number 0 
    mov dh, 0x17 ; row zero 
    mov dl, 0x00 ; coloumn zero
    int 0x10

    mov si, .welcome_svim
    call print
    call printCRLF
    mov si, .welcome_svim_enter_fileindex
    call print

    ; Ask the user for the filename  
    xor bx, bx
    xor cx, cx ; are going to be the counter
    xor dx, dx
.enter_fileindex_loop:
    push cx
.loop_no_push:    
    mov ax, 0x10 ; BIOS call to wait for key
    int 0x16
    cmp ax, 0x1c0d ; enter key
    je .fileindex_done
    cmp ax, 0x0e08 ; backspace
    jne .no_enter_fileindex
    cmp cx, 0    
    je .loop_no_push
    pop cx
    sub cx, 1
    mov bx, .buffer_for_svim
    add bx, cx
    mov BYTE [bx], 0
    ; Go back one space
    mov ax, 0x0e08 ; ah=0x0e means teletype output. al=0x08 means backspace character.
    int 0x10

    ; Place a NULL
    mov al, 0x0 ; NULL
    int 0x10

    ; Go back one space again as the above print of NULL pushes the cursor forward again.
    mov ax, 0x0e08
    int 0x10
    jmp .enter_fileindex_loop

.no_enter_fileindex:
    mov bh, 0x00
    mov bl, 0x02 
    mov ah, 0x0E 
    int 0x10 ; print char
    pop cx
    mov bx, .buffer_for_svim
    add bx, cx
    mov [bx], al
    add cx, 1
    ; fileindex must only be 120 chars
    cmp cx, 120
    jae .fileindex_done
    
    jmp .enter_fileindex_loop

.fileindex_done:
    pop cx ; Cleanup, and now contain filename size
    mov ax, cx
    add ax, .buffer_for_svim
    mov bx, ax
    mov BYTE [bx], 0
    mov si, .buffer_for_svim
    call zstring_to_integer ; ax now contain the interger index for the file
    mov [.fileindex_for_open_file], ax ; save the file index

    call os_clear_screen
    
    ; move cursor to the bootom 
    xor ax, ax
    xor bx, bx 
    mov ah, 0x02
    mov bh, 0x00 ; page number 0 
    mov dh, 0x17 ; row zero 
    mov dl, 0x00 ; coloumn zero
    int 0x10

    mov si, .seperate_line
    call print
    mov si, .welcome_svim
    call print

    ; move cursor to the top 
    xor ax, ax
    xor bx, bx 
    mov ah, 0x02
    mov bh, 0x00 ; page number 0 
    mov dh, 0x00 ; row zero 
    mov dl, 0x00 ; coloumn zero
    int 0x10
    ; Load from disk and, enter it, into the buffer

    mov si, .welcome_svim_select_file
    call print
    
    mov ax, [.fileindex_for_open_file]
    
    call dumpax10
    call printCRLF
    
    mov si, .seperate_line
    call print

    mov ax, [.fileindex_for_open_file]

    mov ch, al  ; move the fileindex in the ch
    mov bx, ds
    mov es, bx
    xor bx, bx
    mov bx, .buffer_for_svim
    xor ax, ax
    mov ah, 0x02    ;Read sectors from drive
    mov al, 0x04    ;Number of sectors to read (8 * 512 = 4096 bytes)
    mov cl, 0x01    ;First sector to read (bits 0-5), upper bits of cylinder (bits 6-7)
    mov dh, 0x00    ;Head number
    mov dl, [global_disk_identifier]    ;Drive number
    int 0x13 

    mov bx, .buffer_for_svim
    add bx, 2046
    mov ax, [bx]
    mov [.buffer_counter_svim], ax
    ; print buffer
    mov si, .buffer_for_svim
    mov es, si
    call print

.svim_loop:
    xor bx, bx
    xor cx, cx
    xor dx, dx
    mov ax, 0x1000 ; BIOS call to wait for key
    int 0x16
    cmp ax, 0x1c0d ; enter key
    jne .no_enter
    mov bx, .buffer_for_svim
    add bx, [.buffer_counter_svim]
    mov BYTE [bx], 13 ; put char in the buffer
    mov BYTE [bx + 1], 10 ; put char in the buffer
    mov bx, [.buffer_counter_svim]
    add bx, 0x02
    mov [.buffer_counter_svim], bx

    xor bx, bx
    xor cx, cx
    xor dx, dx
    mov ax, 0x0e0d
    int 0x10
    
    mov ax, 0x0e0a
    int 0x10
    
    jmp .svim_loop

.no_enter:
    cmp ax, 0x11b ; ESC key
    je .end_svim
    ;cmp ax, 0x3c00 ; f2 key
    ;je .f_key_pushed
    cmp ax, 0x0e08 ; backspace
    je .backspace_pushed
    mov bx, ax
    mov ax, 0xe20
    mov al, bl
    mov bx, .buffer_for_svim
    add bx, [.buffer_counter_svim]
    mov [bx], al ; put char in the buffer
    mov bx, [.buffer_counter_svim]
    add bx, 0x01
    mov [.buffer_counter_svim], bx
    
    int 0x10 ; print char
    jmp .svim_loop
.end_svim:
    ; save the written buffer
    ;AH  03h
    ;AL  Sectors To Write Count
    ;CH  Track
    ;CL  Sector
    ;DH  Head
    ;DL  Drive
    ;ES:BX   Buffer Address Pointer
    mov ax, [.buffer_counter_svim]
    mov bx, .buffer_for_svim
    add bx, 2046
    mov [bx], ax

    mov bx, ds
    mov es, bx
    mov bx, .buffer_for_svim

    mov ax, [.fileindex_for_open_file]
    mov ch, al  ; move the fileindex in the ch

    mov ah, 0x03     ;Write sectors to drive
    mov al, 0x04    ;Number of sectors to write (8 * 512 = 4096 bytes)
    mov cl, 0x01    ;First sector to read (bits 0-5), upper bits of cylinder (bits 6-7)
    mov dh, 0x00    ;Head number
    mov dl, [global_disk_identifier]    ;Drive number
    int 0x13         ;Low level disk services

    ; clean up swim
    ;xor bx, bx
    ;xor cx, cx   ; Upper and left coordinate 
    ;mov bh, 0x0f ; color for new screen 0 = black f =  white    
    ;mov dh, 0xff ; Select all screen 
    ;mov dl, 0xff ; Select all screen 
    ;mov ah, 0x07 ; scrool down 
    ;mov al, 0x00 ; scrool 0 lines (means blank screen )
    ;int 0x10 
    call os_clear_screen
    popa
    ret

.backspace_pushed:
    mov bx, [.buffer_counter_svim]
    cmp bx, 0
    je .svim_loop
    ;print_format .debug_buffer_counter, bx
    mov cx, bx
    sub cx, 1
    mov bx, .buffer_for_svim
    add bx, cx
    mov BYTE [bx], 0
    mov [.buffer_counter_svim], cx
    ;print_format .debug_buffer_counter, cx
    ; Go back one space
    mov ax, 0x0e08 ; ah=0x0e means teletype output. al=0x08 means backspace character.
    int 0x10

    ; Place a NULL
    mov al, 0x0 ; NULL
    int 0x10

    ; Go back one space again as the above print of NULL pushes the cursor forward again.
    mov ax, 0x0e08
    int 0x10
    jmp .svim_loop


;.f_key_pushed:
    ;mov al, 0x01    ;arg: index 1
    ;call os_change_screen
    ;jmp .svim_loop

;.load_buffer_svim:

.debug_buffer_counter db 'Buffer count: %d', 13, 10, 0
.welcome_svim db 'Vim like text editor for SingOS, ESC to exit', 0
.welcome_svim_select_file db 'svim - Open file: ', 0
.welcome_svim_enter_fileindex db 'Enter fileindex: ', 0
.seperate_line  db '________________________________________________________________________________', 0
.fileindex_for_open_file dw 0
.buffer_for_svim times 2048 db 0 ; db 'this is the buffer', 0, times 32 db 0
.buffer_counter_svim dw 0