Apple-2-SW/basic-system-cmd
1
0
Fork 0
mirror of https://github.com/a2geek/basic-system-cmd.git synced 2024-12-28 02:29:18 +00:00
Code Issues Projects Releases Wiki Activity

Tweak to shorten code a bit.

Browse Source
This commit is contained in:
Rob Greene 2015-09-23 22:12:32 -05:00
parent 83b1697802
commit d8bee4ec49
1 changed files with 5 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
online.asm
View File

@ -189,10 +189,9 @@ notOurCommand:
; S5 D1 ERR=$57 (S7 D1)
;
online:
stz sunitnum
lda #>sd
bit fbits+1
beq @1 ; Bit was NOT set
lda fbits+1
and #>sd
beq @1 ; Bit was NOT set; Acc = 0
lda vdriv ; 1 or 2, use 2nd bit to toggle drive (then drive 1 has bit off, drive 2 has bit on)
and #%00000010
asl
@ -202,8 +201,8 @@ online:
asl
asl
asl
sta sunitnum
@1: stz sbufadr
@1: sta sunitnum
stz sbufadr
lda #>buffer
sta sbufadr+1
; Note: if we have a specific unit, this is not zero terminated -- fake it!