remove dangling spaces
This commit is contained in:
@@ -7,7 +7,7 @@
|
||||
|
||||
.export zerobss
|
||||
.import __BSS_RUN__, __BSS_SIZE__
|
||||
|
||||
|
||||
.include "jumptab.inc"
|
||||
.include "geossym.inc"
|
||||
|
||||
|
||||
@@ -11,7 +11,7 @@
|
||||
.importzp cursor_r, cursor_c
|
||||
.import _cursor
|
||||
.constructor initscrsize
|
||||
|
||||
|
||||
.include "geossym.inc"
|
||||
|
||||
.segment "ONCE"
|
||||
@@ -38,7 +38,7 @@ L1: lda #40 ; 40 columns (more or less)
|
||||
|
||||
.code
|
||||
|
||||
screensize:
|
||||
screensize:
|
||||
ldx xsize
|
||||
ldy ysize
|
||||
rts
|
||||
|
||||
@@ -19,7 +19,7 @@
|
||||
; ESC_GRAPHICS, ESC_RULER, GOTOX, GOTOY, GOTOXY, NEWCARDSET, all 1..8
|
||||
;
|
||||
; note that there are conflicts between control characters and keyboard:
|
||||
; HOME = KEY_ENTER, KEY_HOME = REV_ON,
|
||||
; HOME = KEY_ENTER, KEY_HOME = REV_ON,
|
||||
; UPLINE = ?, KEY_UPARROW = GOTOY, ...
|
||||
|
||||
.export _cputcxy, _cputc
|
||||
|
||||
@@ -18,7 +18,7 @@ _cvlinexy:
|
||||
jsr gotoxy ; Call this one, will pop params
|
||||
pla ; Restore the length
|
||||
|
||||
_cvline:
|
||||
_cvline:
|
||||
cmp #0 ; Is the length zero?
|
||||
beq L9 ; Jump if done
|
||||
tax
|
||||
|
||||
@@ -11,7 +11,7 @@
|
||||
.include "jumptab.inc"
|
||||
.include "diskdrv.inc"
|
||||
.include "geossym.inc"
|
||||
|
||||
|
||||
_BlkAlloc:
|
||||
sta r2L
|
||||
stx r2H
|
||||
|
||||
@@ -11,7 +11,7 @@
|
||||
.include "jumptab.inc"
|
||||
.include "diskdrv.inc"
|
||||
.include "geossym.inc"
|
||||
|
||||
|
||||
_CalcBlksFree:
|
||||
lda #<curDirHead
|
||||
ldx #>curDirHead
|
||||
|
||||
@@ -11,7 +11,7 @@
|
||||
.include "jumptab.inc"
|
||||
.include "diskdrv.inc"
|
||||
.include "geossym.inc"
|
||||
|
||||
|
||||
_FreeBlock:
|
||||
jsr gettrse
|
||||
sta r6L
|
||||
|
||||
@@ -12,7 +12,7 @@
|
||||
.include "jumptab.inc"
|
||||
.include "diskdrv.inc"
|
||||
.include "geossym.inc"
|
||||
|
||||
|
||||
_GetBlock:
|
||||
sta r4L
|
||||
stx r4H
|
||||
|
||||
@@ -12,8 +12,8 @@
|
||||
|
||||
.include "jumptab.inc"
|
||||
.include "geossym.inc"
|
||||
|
||||
_GetPtrCurDkNm:
|
||||
|
||||
_GetPtrCurDkNm:
|
||||
sta ptr3
|
||||
stx ptr3+1
|
||||
ldx #ptr4
|
||||
|
||||
@@ -13,7 +13,7 @@
|
||||
.include "jumptab.inc"
|
||||
.include "diskdrv.inc"
|
||||
.include "geossym.inc"
|
||||
|
||||
|
||||
_NxtBlkAlloc:
|
||||
sta r2L
|
||||
stx r2H
|
||||
|
||||
@@ -10,7 +10,7 @@
|
||||
|
||||
.include "jumptab.inc"
|
||||
.include "diskdrv.inc"
|
||||
|
||||
|
||||
_OpenDisk:
|
||||
jsr OpenDisk
|
||||
jmp setoserror
|
||||
|
||||
@@ -12,7 +12,7 @@
|
||||
.include "jumptab.inc"
|
||||
.include "diskdrv.inc"
|
||||
.include "geossym.inc"
|
||||
|
||||
|
||||
_PutBlock:
|
||||
sta r4L
|
||||
stx r4H
|
||||
|
||||
@@ -10,7 +10,7 @@
|
||||
|
||||
.include "jumptab.inc"
|
||||
.include "diskdrv.inc"
|
||||
|
||||
|
||||
_PutDirHead:
|
||||
jsr PutDirHead
|
||||
jmp setoserror
|
||||
|
||||
@@ -12,7 +12,7 @@
|
||||
.include "jumptab.inc"
|
||||
.include "diskdrv.inc"
|
||||
.include "geossym.inc"
|
||||
|
||||
|
||||
_SetNextFree:
|
||||
jsr gettrse
|
||||
sta r3L
|
||||
|
||||
@@ -8,5 +8,5 @@
|
||||
.export _RstrFrmDialogue
|
||||
|
||||
.include "jumptab.inc"
|
||||
|
||||
|
||||
_RstrFrmDialogue = RstrFrmDialogue
|
||||
|
||||
@@ -38,21 +38,21 @@ _open:
|
||||
jsr popax ; Get flags
|
||||
sta tmp1
|
||||
jsr popptr1 ; Get name
|
||||
|
||||
|
||||
lda filedesc ; is there a file already open?
|
||||
bne @alreadyopen
|
||||
|
||||
|
||||
lda tmp1 ; check open mode
|
||||
and #(O_RDWR | O_CREAT)
|
||||
cmp #O_RDONLY ; only O_RDONLY is valid
|
||||
bne @badmode
|
||||
|
||||
|
||||
lda ptr1
|
||||
ldx ptr1+1
|
||||
jsr _FindFile ; try to find the file
|
||||
tax
|
||||
bne @oserror
|
||||
|
||||
|
||||
lda dirEntryBuf + OFF_DE_TR_SC ; tr&se for ReadByte (r1)
|
||||
sta f_track
|
||||
lda dirEntryBuf + OFF_DE_TR_SC + 1
|
||||
|
||||
@@ -5,7 +5,7 @@
|
||||
;
|
||||
; Driver for GEOS standard input device interface
|
||||
;
|
||||
|
||||
|
||||
.export _mouse_init, _mouse_done
|
||||
.export _mouse_hide, _mouse_show
|
||||
.export _mouse_box
|
||||
|
||||
@@ -10,7 +10,7 @@
|
||||
|
||||
.include "jumptab.inc"
|
||||
.include "diskdrv.inc"
|
||||
|
||||
|
||||
_AppendRecord:
|
||||
|
||||
jsr AppendRecord
|
||||
|
||||
@@ -10,7 +10,7 @@
|
||||
|
||||
.include "jumptab.inc"
|
||||
.include "diskdrv.inc"
|
||||
|
||||
|
||||
_CloseRecordFile:
|
||||
jsr CloseRecordFile
|
||||
jmp setoserror
|
||||
|
||||
@@ -11,7 +11,7 @@
|
||||
.include "jumptab.inc"
|
||||
.include "diskdrv.inc"
|
||||
.include "geossym.inc"
|
||||
|
||||
|
||||
_DeleteFile:
|
||||
sta r0L
|
||||
stx r0H
|
||||
|
||||
@@ -11,7 +11,7 @@
|
||||
.include "jumptab.inc"
|
||||
.include "diskdrv.inc"
|
||||
.include "geossym.inc"
|
||||
|
||||
|
||||
_DeleteRecord:
|
||||
jsr DeleteRecord
|
||||
jmp setoserror
|
||||
|
||||
@@ -11,7 +11,7 @@
|
||||
.include "jumptab.inc"
|
||||
.include "diskdrv.inc"
|
||||
.include "geossym.inc"
|
||||
|
||||
|
||||
_FindFile:
|
||||
sta r6L
|
||||
stx r6H
|
||||
|
||||
@@ -11,7 +11,7 @@
|
||||
.include "jumptab.inc"
|
||||
.include "diskdrv.inc"
|
||||
.include "geossym.inc"
|
||||
|
||||
|
||||
_FreeFile:
|
||||
sta r9L
|
||||
stx r9H
|
||||
|
||||
@@ -11,7 +11,7 @@
|
||||
.include "jumptab.inc"
|
||||
.include "diskdrv.inc"
|
||||
.include "geossym.inc"
|
||||
|
||||
|
||||
_GetFHdrInfo:
|
||||
sta r9L
|
||||
stx r9H
|
||||
|
||||
@@ -11,7 +11,7 @@
|
||||
.include "jumptab.inc"
|
||||
.include "diskdrv.inc"
|
||||
.include "geossym.inc"
|
||||
|
||||
|
||||
_GetFile:
|
||||
sta r3L
|
||||
stx r3H
|
||||
|
||||
@@ -11,7 +11,7 @@
|
||||
.include "jumptab.inc"
|
||||
.include "diskdrv.inc"
|
||||
.include "geossym.inc"
|
||||
|
||||
|
||||
_OpenRecordFile:
|
||||
sta r0L
|
||||
stx r0H
|
||||
|
||||
@@ -10,7 +10,7 @@
|
||||
|
||||
.include "jumptab.inc"
|
||||
.include "diskdrv.inc"
|
||||
|
||||
|
||||
_PointRecord:
|
||||
jsr PointRecord
|
||||
jmp setoserror
|
||||
|
||||
@@ -12,7 +12,7 @@
|
||||
.include "jumptab.inc"
|
||||
.include "diskdrv.inc"
|
||||
.include "geossym.inc"
|
||||
|
||||
|
||||
_ReadFile:
|
||||
sta r2L
|
||||
stx r2H
|
||||
|
||||
@@ -11,7 +11,7 @@
|
||||
.include "jumptab.inc"
|
||||
.include "diskdrv.inc"
|
||||
.include "geossym.inc"
|
||||
|
||||
|
||||
_ReadRecord:
|
||||
sta r2L
|
||||
stx r2H
|
||||
|
||||
@@ -11,7 +11,7 @@
|
||||
.include "jumptab.inc"
|
||||
.include "diskdrv.inc"
|
||||
.include "geossym.inc"
|
||||
|
||||
|
||||
_WriteRecord:
|
||||
sta r2L
|
||||
stx r2H
|
||||
|
||||
@@ -136,7 +136,7 @@ Skip:
|
||||
;-------------------------------------------------------------------------
|
||||
|
||||
.macro CmpW source, dest
|
||||
.local Skip
|
||||
.local Skip
|
||||
CmpB source+1, dest+1
|
||||
bne Skip
|
||||
CmpB source+0, dest+0
|
||||
@@ -203,7 +203,7 @@ Skip:
|
||||
|
||||
.macro rmb bitNumber, dest
|
||||
pha
|
||||
lda #(1 << bitNumber) ^ $ff
|
||||
lda #(1 << bitNumber) ^ $ff
|
||||
and dest
|
||||
sta dest
|
||||
pla
|
||||
|
||||
@@ -3,7 +3,7 @@
|
||||
;
|
||||
; 21.12.99
|
||||
|
||||
; void BitOtherClip (void *proc1, void* proc2, char skipl, char skipr, int skipy,
|
||||
; void BitOtherClip (void *proc1, void* proc2, char skipl, char skipr, int skipy,
|
||||
; struct iconpic *myGfx);
|
||||
|
||||
; both proc1, proc2 should be: char __fastcall something (void);
|
||||
|
||||
@@ -8,5 +8,5 @@
|
||||
.export _FrameRectangle
|
||||
|
||||
.include "jumptab.inc"
|
||||
|
||||
|
||||
_FrameRectangle = FrameRectangle
|
||||
|
||||
@@ -4,10 +4,10 @@
|
||||
; 21.12.99
|
||||
|
||||
; void ImprintRectangle (void);
|
||||
|
||||
|
||||
.export _ImprintRectangle
|
||||
|
||||
.include "jumptab.inc"
|
||||
|
||||
|
||||
_ImprintRectangle = ImprintRectangle
|
||||
|
||||
|
||||
@@ -9,7 +9,7 @@
|
||||
.export _InvertLine
|
||||
|
||||
.include "jumptab.inc"
|
||||
|
||||
|
||||
_InvertLine:
|
||||
jsr HLineRegs
|
||||
jmp InvertLine
|
||||
|
||||
@@ -6,7 +6,7 @@
|
||||
; void InvertRectangle (void);
|
||||
|
||||
.export _InvertRectangle
|
||||
|
||||
|
||||
.include "jumptab.inc"
|
||||
|
||||
_InvertRectangle = InvertRectangle
|
||||
|
||||
@@ -7,7 +7,7 @@
|
||||
|
||||
.import HLineRegs
|
||||
.export _RecoverLine
|
||||
|
||||
|
||||
.include "jumptab.inc"
|
||||
|
||||
_RecoverLine:
|
||||
|
||||
@@ -4,10 +4,10 @@
|
||||
; 29.10.99
|
||||
|
||||
; void RecoverRectangle (void);
|
||||
|
||||
|
||||
.export _RecoverRectangle
|
||||
|
||||
.include "jumptab.inc"
|
||||
|
||||
|
||||
_RecoverRectangle = RecoverRectangle
|
||||
|
||||
|
||||
@@ -6,7 +6,7 @@
|
||||
; void Rectangle (void);
|
||||
|
||||
.export _Rectangle
|
||||
|
||||
|
||||
.include "jumptab.inc"
|
||||
|
||||
_Rectangle = Rectangle
|
||||
|
||||
@@ -10,7 +10,7 @@
|
||||
.export _TestPoint
|
||||
|
||||
.include "jumptab.inc"
|
||||
|
||||
|
||||
_TestPoint:
|
||||
jsr PointRegs
|
||||
jsr TestPoint
|
||||
|
||||
@@ -5,12 +5,12 @@
|
||||
|
||||
; void VerticalLine (char pattern, char ystart, char yend, int x);
|
||||
|
||||
.import popa
|
||||
.import popa
|
||||
.export _VerticalLine
|
||||
|
||||
.include "jumptab.inc"
|
||||
.include "geossym.inc"
|
||||
|
||||
|
||||
_VerticalLine:
|
||||
stx r4H
|
||||
sta r4L
|
||||
|
||||
@@ -7,7 +7,7 @@
|
||||
|
||||
.import _InitDrawWindow
|
||||
.export _IsMseInRegion
|
||||
|
||||
|
||||
.include "jumptab.inc"
|
||||
|
||||
_IsMseInRegion:
|
||||
|
||||
@@ -12,11 +12,11 @@
|
||||
.export _UnblockProcess
|
||||
|
||||
.include "jumptab.inc"
|
||||
|
||||
|
||||
_BlockProcess:
|
||||
tax
|
||||
jmp BlockProcess
|
||||
|
||||
|
||||
_UnblockProcess:
|
||||
tax
|
||||
jmp UnblockProcess
|
||||
|
||||
@@ -10,11 +10,11 @@
|
||||
.export _UnfreezeProcess
|
||||
|
||||
.include "jumptab.inc"
|
||||
|
||||
|
||||
_FreezeProcess:
|
||||
tax
|
||||
jmp FreezeProcess
|
||||
|
||||
|
||||
_UnfreezeProcess:
|
||||
tax
|
||||
jmp UnfreezeProcess
|
||||
|
||||
@@ -20,11 +20,11 @@ _InitProcesses:
|
||||
stx r0H
|
||||
jsr popa
|
||||
jmp InitProcesses
|
||||
|
||||
|
||||
_RestartProcess:
|
||||
tax
|
||||
jmp RestartProcess
|
||||
|
||||
|
||||
_EnableProcess:
|
||||
tax
|
||||
jmp EnableProcess
|
||||
|
||||
Reference in New Issue
Block a user