forked from OldSkoolCoder/CIDOS
-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathincDismountCommand.asm
22 lines (20 loc) · 1.02 KB
/
incDismountCommand.asm
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
;*******************************************************************************
;* DisMount Routine *
;* Syntax : Dismount or d shifted I *
;*******************************************************************************
DISMOUNT
ldy #0 ; Init DOS Buffer Index
lda #"c" ; Load Mount Disk Command
sta DosCommandBuffer,y ; Store it in DOS Buffer
iny ; Increas Index
lda #"d" ; Load Mount Disk Command
sta DosCommandBuffer,y ; Store it in DOS Buffer
iny ; increase index
lda #CHR_Colon ; Loads ':'
sta DosCommandBuffer,y ; Stores it in DOS Buffer
iny ; Increase Index
lda #95 ; Loads '<-' (Arrow Left)
sta DosCommandBuffer,y ; Stores it in DOS Buffer
iny ; Increase Index
CHRGETSpaceCheck 255
jmp DOS