Removed (pretty inconsistently used) tab chars from source code base.
This commit is contained in:
@@ -3,22 +3,22 @@
|
||||
;
|
||||
; 21.12.99
|
||||
|
||||
; void BitmapClip (char skipl, char skipr, int skipy, struct iconpic *myGfx);
|
||||
; void BitmapClip (char skipl, char skipr, int skipy, struct iconpic *myGfx);
|
||||
|
||||
.import popa, popax
|
||||
.import BitmapRegs
|
||||
.export _BitmapClip
|
||||
.import popa, popax
|
||||
.import BitmapRegs
|
||||
.export _BitmapClip
|
||||
|
||||
.include "jumptab.inc"
|
||||
.include "geossym.inc"
|
||||
.include "jumptab.inc"
|
||||
.include "geossym.inc"
|
||||
|
||||
_BitmapClip:
|
||||
jsr BitmapRegs
|
||||
jsr popax
|
||||
sta r12L
|
||||
stx r12H
|
||||
jsr popa
|
||||
sta r11H
|
||||
jsr popa
|
||||
sta r11L
|
||||
jmp BitmapClip
|
||||
jsr BitmapRegs
|
||||
jsr popax
|
||||
sta r12L
|
||||
stx r12H
|
||||
jsr popa
|
||||
sta r11H
|
||||
jsr popa
|
||||
sta r11L
|
||||
jmp BitmapClip
|
||||
|
||||
@@ -3,18 +3,18 @@
|
||||
;
|
||||
; 21.12.99
|
||||
|
||||
.importzp ptr4
|
||||
.export BitmapRegs
|
||||
.importzp ptr4
|
||||
.export BitmapRegs
|
||||
|
||||
.include "geossym.inc"
|
||||
.include "geossym.inc"
|
||||
|
||||
BitmapRegs: ; a/x is a struct iconpic*
|
||||
sta ptr4
|
||||
stx ptr4+1
|
||||
ldy #0
|
||||
bmpLp: lda (ptr4),y
|
||||
sta r0L,y
|
||||
iny
|
||||
cpy #6
|
||||
bne bmpLp
|
||||
rts
|
||||
BitmapRegs: ; a/x is a struct iconpic*
|
||||
sta ptr4
|
||||
stx ptr4+1
|
||||
ldy #0
|
||||
bmpLp: lda (ptr4),y
|
||||
sta r0L,y
|
||||
iny
|
||||
cpy #6
|
||||
bne bmpLp
|
||||
rts
|
||||
|
||||
@@ -3,13 +3,13 @@
|
||||
;
|
||||
; 21.12.99
|
||||
|
||||
; void BitmapUp (struct iconpic *myGfx);
|
||||
; void BitmapUp (struct iconpic *myGfx);
|
||||
|
||||
.import BitmapRegs
|
||||
.export _BitmapUp
|
||||
.import BitmapRegs
|
||||
.export _BitmapUp
|
||||
|
||||
.include "jumptab.inc"
|
||||
.include "jumptab.inc"
|
||||
|
||||
_BitmapUp:
|
||||
jsr BitmapRegs
|
||||
jmp BitmapUp
|
||||
jsr BitmapRegs
|
||||
jmp BitmapUp
|
||||
|
||||
@@ -3,34 +3,34 @@
|
||||
;
|
||||
; 21.12.99
|
||||
|
||||
; void BitOtherClip (void *proc1, void* proc2, char skipl, char skipr, int skipy,
|
||||
; struct iconpic *myGfx);
|
||||
; void BitOtherClip (void *proc1, void* proc2, char skipl, char skipr, int skipy,
|
||||
; struct iconpic *myGfx);
|
||||
|
||||
; both proc1, proc2 should be: char __fastcall something (void);
|
||||
; proc1 is called before reading a byte (.A returns next data)
|
||||
; proc2 is called before reading each byte which is not pattern (code >219)
|
||||
; proc1 is called before reading a byte (.A returns next data)
|
||||
; proc2 is called before reading each byte which is not pattern (code >219)
|
||||
|
||||
|
||||
.import popa, popax
|
||||
.import BitOtherRegs
|
||||
.export _BitOtherClip
|
||||
.import popa, popax
|
||||
.import BitOtherRegs
|
||||
.export _BitOtherClip
|
||||
|
||||
.include "jumptab.inc"
|
||||
.include "geossym.inc"
|
||||
.include "jumptab.inc"
|
||||
.include "geossym.inc"
|
||||
|
||||
_BitOtherClip:
|
||||
jsr BitOtherRegs
|
||||
jsr popax
|
||||
sta r12L
|
||||
stx r12H
|
||||
jsr popa
|
||||
sta r11H
|
||||
jsr popa
|
||||
sta r11L
|
||||
jsr popax
|
||||
sta r14L
|
||||
stx r14H
|
||||
jsr popax
|
||||
sta r13L
|
||||
stx r13H
|
||||
jmp BitOtherClip
|
||||
jsr BitOtherRegs
|
||||
jsr popax
|
||||
sta r12L
|
||||
stx r12H
|
||||
jsr popa
|
||||
sta r11H
|
||||
jsr popa
|
||||
sta r11L
|
||||
jsr popax
|
||||
sta r14L
|
||||
stx r14H
|
||||
jsr popax
|
||||
sta r13L
|
||||
stx r13H
|
||||
jmp BitOtherClip
|
||||
|
||||
@@ -5,26 +5,26 @@
|
||||
|
||||
; void DrawLine (char mode, struct window *mywindow);
|
||||
|
||||
.import _InitDrawWindow
|
||||
.import popa
|
||||
.importzp tmp1
|
||||
.export _DrawLine
|
||||
.import _InitDrawWindow
|
||||
.import popa
|
||||
.importzp tmp1
|
||||
.export _DrawLine
|
||||
|
||||
.include "jumptab.inc"
|
||||
.include "geossym.inc"
|
||||
.include "geosmac.inc"
|
||||
.include "jumptab.inc"
|
||||
.include "geossym.inc"
|
||||
.include "geosmac.inc"
|
||||
|
||||
_DrawLine:
|
||||
tay
|
||||
PushW r2
|
||||
tya
|
||||
jsr _InitDrawWindow
|
||||
MoveW r2, r11
|
||||
PopW r2
|
||||
jsr popa
|
||||
sta tmp1
|
||||
clc
|
||||
bit tmp1
|
||||
bvc @1
|
||||
sec
|
||||
@1: jmp DrawLine
|
||||
tay
|
||||
PushW r2
|
||||
tya
|
||||
jsr _InitDrawWindow
|
||||
MoveW r2, r11
|
||||
PopW r2
|
||||
jsr popa
|
||||
sta tmp1
|
||||
clc
|
||||
bit tmp1
|
||||
bvc @1
|
||||
sec
|
||||
@1: jmp DrawLine
|
||||
|
||||
@@ -3,21 +3,21 @@
|
||||
;
|
||||
; 29.10.99, 05.3.2003
|
||||
|
||||
; void DrawPoint (char mode, struct pixel *mypixel);
|
||||
; void DrawPoint (char mode, struct pixel *mypixel);
|
||||
|
||||
.import PointRegs
|
||||
.import popa
|
||||
.importzp tmp1
|
||||
.export _DrawPoint
|
||||
.import PointRegs
|
||||
.import popa
|
||||
.importzp tmp1
|
||||
.export _DrawPoint
|
||||
|
||||
.include "jumptab.inc"
|
||||
.include "jumptab.inc"
|
||||
|
||||
_DrawPoint:
|
||||
jsr PointRegs
|
||||
jsr popa
|
||||
sta tmp1
|
||||
clc
|
||||
bit tmp1
|
||||
bvc @1
|
||||
sec
|
||||
@1: jmp DrawPoint
|
||||
jsr PointRegs
|
||||
jsr popa
|
||||
sta tmp1
|
||||
clc
|
||||
bit tmp1
|
||||
bvc @1
|
||||
sec
|
||||
@1: jmp DrawPoint
|
||||
|
||||
@@ -5,8 +5,8 @@
|
||||
|
||||
; void FrameRectangle (char pattern);
|
||||
|
||||
.export _FrameRectangle
|
||||
.export _FrameRectangle
|
||||
|
||||
.include "jumptab.inc"
|
||||
|
||||
_FrameRectangle = FrameRectangle
|
||||
.include "jumptab.inc"
|
||||
|
||||
_FrameRectangle = FrameRectangle
|
||||
|
||||
@@ -5,11 +5,11 @@
|
||||
|
||||
; char GetCharWidth (char character);
|
||||
|
||||
.export _GetCharWidth
|
||||
.export _GetCharWidth
|
||||
|
||||
.include "jumptab.inc"
|
||||
.include "jumptab.inc"
|
||||
|
||||
_GetCharWidth:
|
||||
jsr GetCharWidth
|
||||
ldx #0
|
||||
rts
|
||||
jsr GetCharWidth
|
||||
ldx #0
|
||||
rts
|
||||
|
||||
@@ -3,18 +3,18 @@
|
||||
;
|
||||
; 11.03.2000
|
||||
|
||||
.import popa, popax
|
||||
.export getintcharint
|
||||
.import popa, popax
|
||||
.export getintcharint
|
||||
|
||||
.include "geossym.inc"
|
||||
.include "geossym.inc"
|
||||
|
||||
getintcharint:
|
||||
sta r11L
|
||||
stx r11H
|
||||
jsr popa
|
||||
sta r1H
|
||||
jsr popax
|
||||
sta r0L
|
||||
stx r0H
|
||||
rts
|
||||
sta r11L
|
||||
stx r11H
|
||||
jsr popa
|
||||
sta r1H
|
||||
jsr popax
|
||||
sta r0L
|
||||
stx r0H
|
||||
rts
|
||||
|
||||
|
||||
@@ -5,12 +5,12 @@
|
||||
|
||||
; void GraphicsString (char *myString);
|
||||
|
||||
.export _GraphicsString
|
||||
.export _GraphicsString
|
||||
|
||||
.include "jumptab.inc"
|
||||
.include "geossym.inc"
|
||||
.include "jumptab.inc"
|
||||
.include "geossym.inc"
|
||||
|
||||
_GraphicsString:
|
||||
sta r0L
|
||||
stx r0H
|
||||
jmp GraphicsString
|
||||
sta r0L
|
||||
stx r0H
|
||||
jmp GraphicsString
|
||||
|
||||
@@ -4,17 +4,17 @@
|
||||
; 29.10.99
|
||||
|
||||
|
||||
.import popax, popa
|
||||
.export HLineRegs
|
||||
.import popax, popa
|
||||
.export HLineRegs
|
||||
|
||||
.include "geossym.inc"
|
||||
.include "geossym.inc"
|
||||
|
||||
HLineRegs:
|
||||
stx r4H
|
||||
sta r4L
|
||||
jsr popax
|
||||
stx r3H
|
||||
sta r3L
|
||||
jsr popa
|
||||
sta r11L
|
||||
rts
|
||||
stx r4H
|
||||
sta r4L
|
||||
jsr popax
|
||||
stx r3H
|
||||
sta r3L
|
||||
jsr popa
|
||||
sta r11L
|
||||
rts
|
||||
|
||||
@@ -5,13 +5,13 @@
|
||||
|
||||
; void HorizontalLine (char pattern, char y, int xstart, int xend);
|
||||
|
||||
.import popa
|
||||
.import HLineRegs
|
||||
.export _HorizontalLine
|
||||
.import popa
|
||||
.import HLineRegs
|
||||
.export _HorizontalLine
|
||||
|
||||
.include "jumptab.inc"
|
||||
.include "jumptab.inc"
|
||||
|
||||
_HorizontalLine:
|
||||
jsr HLineRegs
|
||||
jsr popa
|
||||
jmp HorizontalLine
|
||||
jsr HLineRegs
|
||||
jsr popa
|
||||
jmp HorizontalLine
|
||||
|
||||
@@ -4,10 +4,10 @@
|
||||
; 21.12.99
|
||||
|
||||
; void ImprintRectangle (void);
|
||||
|
||||
.export _ImprintRectangle
|
||||
|
||||
.export _ImprintRectangle
|
||||
|
||||
.include "jumptab.inc"
|
||||
|
||||
.include "jumptab.inc"
|
||||
|
||||
_ImprintRectangle = ImprintRectangle
|
||||
|
||||
|
||||
@@ -6,18 +6,18 @@
|
||||
|
||||
; void InitDrawWindow (struct window *myWindow);
|
||||
|
||||
.importzp ptr4
|
||||
.export _InitDrawWindow
|
||||
.importzp ptr4
|
||||
.export _InitDrawWindow
|
||||
|
||||
.include "geossym.inc"
|
||||
.include "geossym.inc"
|
||||
|
||||
_InitDrawWindow: ; a/x is a struct window*
|
||||
sta ptr4
|
||||
stx ptr4+1
|
||||
ldy #0
|
||||
_InitDrawWindow: ; a/x is a struct window*
|
||||
sta ptr4
|
||||
stx ptr4+1
|
||||
ldy #0
|
||||
copyWin:lda (ptr4),y
|
||||
sta r2L,y
|
||||
iny
|
||||
cpy #6
|
||||
bne copyWin
|
||||
rts
|
||||
sta r2L,y
|
||||
iny
|
||||
cpy #6
|
||||
bne copyWin
|
||||
rts
|
||||
|
||||
@@ -5,11 +5,11 @@
|
||||
|
||||
; void InvertLine (char y, int xstart, int xend);
|
||||
|
||||
.import HLineRegs
|
||||
.export _InvertLine
|
||||
.import HLineRegs
|
||||
.export _InvertLine
|
||||
|
||||
.include "jumptab.inc"
|
||||
|
||||
.include "jumptab.inc"
|
||||
|
||||
_InvertLine:
|
||||
jsr HLineRegs
|
||||
jmp InvertLine
|
||||
jsr HLineRegs
|
||||
jmp InvertLine
|
||||
|
||||
@@ -5,9 +5,9 @@
|
||||
|
||||
; void InvertRectangle (void);
|
||||
|
||||
.export _InvertRectangle
|
||||
|
||||
.include "jumptab.inc"
|
||||
.export _InvertRectangle
|
||||
|
||||
.include "jumptab.inc"
|
||||
|
||||
_InvertRectangle = InvertRectangle
|
||||
|
||||
|
||||
@@ -5,12 +5,12 @@
|
||||
|
||||
; void LoadCharSet (struct fontdesc *myFont);
|
||||
|
||||
.export _LoadCharSet
|
||||
.export _LoadCharSet
|
||||
|
||||
.include "jumptab.inc"
|
||||
.include "geossym.inc"
|
||||
.include "jumptab.inc"
|
||||
.include "geossym.inc"
|
||||
|
||||
_LoadCharSet:
|
||||
sta r0L
|
||||
stx r0H
|
||||
jmp LoadCharSet
|
||||
sta r0L
|
||||
stx r0H
|
||||
jmp LoadCharSet
|
||||
|
||||
@@ -3,21 +3,21 @@
|
||||
;
|
||||
; 29.10.99
|
||||
|
||||
.importzp ptr4
|
||||
.export PointRegs
|
||||
.importzp ptr4
|
||||
.export PointRegs
|
||||
|
||||
.include "geossym.inc"
|
||||
.include "geossym.inc"
|
||||
|
||||
PointRegs: ; a/x is a struct pixel*
|
||||
sta ptr4
|
||||
stx ptr4+1
|
||||
ldy #0
|
||||
lda (ptr4),y
|
||||
sta r3L
|
||||
iny
|
||||
lda (ptr4),y
|
||||
sta r3H
|
||||
iny
|
||||
lda (ptr4),y
|
||||
sta r11L
|
||||
rts
|
||||
PointRegs: ; a/x is a struct pixel*
|
||||
sta ptr4
|
||||
stx ptr4+1
|
||||
ldy #0
|
||||
lda (ptr4),y
|
||||
sta r3L
|
||||
iny
|
||||
lda (ptr4),y
|
||||
sta r3H
|
||||
iny
|
||||
lda (ptr4),y
|
||||
sta r11L
|
||||
rts
|
||||
|
||||
@@ -5,16 +5,16 @@
|
||||
|
||||
; void PutChar (char character, char y, int x);
|
||||
|
||||
.import popa
|
||||
.export _PutChar
|
||||
.import popa
|
||||
.export _PutChar
|
||||
|
||||
.include "jumptab.inc"
|
||||
.include "geossym.inc"
|
||||
.include "jumptab.inc"
|
||||
.include "geossym.inc"
|
||||
|
||||
_PutChar:
|
||||
sta r11L
|
||||
stx r11H
|
||||
jsr popa
|
||||
sta r1H
|
||||
jsr popa
|
||||
jmp PutChar
|
||||
sta r11L
|
||||
stx r11H
|
||||
jsr popa
|
||||
sta r1H
|
||||
jsr popa
|
||||
jmp PutChar
|
||||
|
||||
@@ -5,13 +5,13 @@
|
||||
|
||||
; void PutDecimal (char style, unsigned value, char y, int x);
|
||||
|
||||
.import popa, popax
|
||||
.import getintcharint
|
||||
.export _PutDecimal
|
||||
.import popa, popax
|
||||
.import getintcharint
|
||||
.export _PutDecimal
|
||||
|
||||
.include "jumptab.inc"
|
||||
.include "jumptab.inc"
|
||||
|
||||
_PutDecimal:
|
||||
jsr getintcharint
|
||||
jsr popa
|
||||
jmp PutDecimal
|
||||
jsr getintcharint
|
||||
jsr popa
|
||||
jmp PutDecimal
|
||||
|
||||
@@ -3,14 +3,14 @@
|
||||
;
|
||||
; 30.10.99
|
||||
|
||||
; void PutString (char *mytxt, char y, int x);
|
||||
; void PutString (char *mytxt, char y, int x);
|
||||
|
||||
.import popax, popa
|
||||
.import getintcharint
|
||||
.export _PutString
|
||||
.import popax, popa
|
||||
.import getintcharint
|
||||
.export _PutString
|
||||
|
||||
.include "jumptab.inc"
|
||||
.include "jumptab.inc"
|
||||
|
||||
_PutString:
|
||||
jsr getintcharint
|
||||
jmp PutString
|
||||
jsr getintcharint
|
||||
jmp PutString
|
||||
|
||||
@@ -5,12 +5,12 @@
|
||||
|
||||
; void RecoverLine (char y, int xstart, int xend);
|
||||
|
||||
.import HLineRegs
|
||||
.export _RecoverLine
|
||||
|
||||
.include "jumptab.inc"
|
||||
.import HLineRegs
|
||||
.export _RecoverLine
|
||||
|
||||
.include "jumptab.inc"
|
||||
|
||||
_RecoverLine:
|
||||
jsr HLineRegs
|
||||
jmp RecoverLine
|
||||
jsr HLineRegs
|
||||
jmp RecoverLine
|
||||
|
||||
|
||||
@@ -4,10 +4,10 @@
|
||||
; 29.10.99
|
||||
|
||||
; void RecoverRectangle (void);
|
||||
|
||||
.export _RecoverRectangle
|
||||
|
||||
.export _RecoverRectangle
|
||||
|
||||
.include "jumptab.inc"
|
||||
|
||||
.include "jumptab.inc"
|
||||
|
||||
_RecoverRectangle = RecoverRectangle
|
||||
|
||||
|
||||
@@ -5,8 +5,8 @@
|
||||
|
||||
; void Rectangle (void);
|
||||
|
||||
.export _Rectangle
|
||||
|
||||
.include "jumptab.inc"
|
||||
.export _Rectangle
|
||||
|
||||
.include "jumptab.inc"
|
||||
|
||||
_Rectangle = Rectangle
|
||||
_Rectangle = Rectangle
|
||||
|
||||
@@ -5,8 +5,8 @@
|
||||
|
||||
; void SetPattern (char pattern);
|
||||
|
||||
.export _SetPattern
|
||||
.export _SetPattern
|
||||
|
||||
.include "jumptab.inc"
|
||||
.include "jumptab.inc"
|
||||
|
||||
_SetPattern = SetPattern
|
||||
_SetPattern = SetPattern
|
||||
|
||||
@@ -3,17 +3,17 @@
|
||||
;
|
||||
; 29.10.1999, 2.1.2003
|
||||
|
||||
; char TestPoint (struct pixel *mypixel);
|
||||
; char TestPoint (struct pixel *mypixel);
|
||||
|
||||
.import PointRegs
|
||||
.import return0, return1
|
||||
.export _TestPoint
|
||||
.import PointRegs
|
||||
.import return0, return1
|
||||
.export _TestPoint
|
||||
|
||||
.include "jumptab.inc"
|
||||
|
||||
.include "jumptab.inc"
|
||||
|
||||
_TestPoint:
|
||||
jsr PointRegs
|
||||
jsr TestPoint
|
||||
bcc goFalse
|
||||
jmp return1
|
||||
jsr PointRegs
|
||||
jsr TestPoint
|
||||
bcc goFalse
|
||||
jmp return1
|
||||
goFalse:jmp return0
|
||||
|
||||
@@ -5,8 +5,8 @@
|
||||
|
||||
; void UseSystemFont (void);
|
||||
|
||||
.export _UseSystemFont
|
||||
.export _UseSystemFont
|
||||
|
||||
.include "jumptab.inc"
|
||||
.include "jumptab.inc"
|
||||
|
||||
_UseSystemFont = UseSystemFont
|
||||
_UseSystemFont = UseSystemFont
|
||||
|
||||
@@ -5,18 +5,18 @@
|
||||
|
||||
; void VerticalLine (char pattern, char ystart, char yend, int x);
|
||||
|
||||
.import popa
|
||||
.export _VerticalLine
|
||||
.import popa
|
||||
.export _VerticalLine
|
||||
|
||||
.include "jumptab.inc"
|
||||
.include "geossym.inc"
|
||||
|
||||
.include "jumptab.inc"
|
||||
.include "geossym.inc"
|
||||
|
||||
_VerticalLine:
|
||||
stx r4H
|
||||
sta r4L
|
||||
jsr popa
|
||||
sta r3H
|
||||
jsr popa
|
||||
sta r3L
|
||||
jsr popa
|
||||
jmp VerticalLine
|
||||
stx r4H
|
||||
sta r4L
|
||||
jsr popa
|
||||
sta r3H
|
||||
jsr popa
|
||||
sta r3L
|
||||
jsr popa
|
||||
jmp VerticalLine
|
||||
|
||||
Reference in New Issue
Block a user