kvisc/ka/sys/drv/diskdev.k

; The OS/K Team licenses this file to you under the MIT license.
; See the LICENSE file in the project root for more information.

DISKDEV := 4

DISK.FindFirst:
.slot := 16
    iocall DISKDEV, .slot
    ret

DISK.FindNext:
.slot := 17
    iocall DISKDEV, .slot
    ret

DISK.OpenFile:
    iocall DISKDEV, 25
    ret

DISK.CloseFile:
    iocall DISKDEV, 26
    ret

DISK.CreateFile:
    iocall DISKDEV, 27
    ret

DISK.RemoveFile:
    iocall DISKDEV, 28
    ret

DISK.ReadFile:
    iocall DISKDEV, 32
    ret

DISK.WriteFile:
    iocall DISKDEV, 33
    ret