Browse Source

Whitespace: adjusted whitespace for tms.asm

pull/113/head
Dean Netherton 6 years ago
parent
commit
7d6b011362
  1. 28
      Source/HBIOS/tms.asm

28
Source/HBIOS/tms.asm

@ -107,7 +107,7 @@ TMS_INIT1:
; ;
XOR A ; SIGNAL SUCCESS XOR A ; SIGNAL SUCCESS
RET RET
;
;
;====================================================================== ;======================================================================
; TMS DRIVER - VIDEO DISPLAY ADAPTER (VDA) FUNCTIONS ; TMS DRIVER - VIDEO DISPLAY ADAPTER (VDA) FUNCTIONS
;====================================================================== ;======================================================================
@ -170,19 +170,19 @@ TMS_VDARES1: ; ENTRY POINT TO AVOID TMS_Z180IO RECURSION
DEC A DEC A
LD (TMS_CURSAV),A LD (TMS_CURSAV),A
CALL TMS_SETCUR ; SET CURSOR CALL TMS_SETCUR ; SET CURSOR
XOR A ; SIGNAL SUCCESS XOR A ; SIGNAL SUCCESS
RET RET
TMS_VDADEV: TMS_VDADEV:
LD D,VDADEV_TMS ; D := DEVICE TYPE LD D,VDADEV_TMS ; D := DEVICE TYPE
LD E,0 ; E := PHYSICAL UNIT IS ALWAYS ZERO LD E,0 ; E := PHYSICAL UNIT IS ALWAYS ZERO
XOR A ; SIGNAL SUCCESS XOR A ; SIGNAL SUCCESS
RET RET
TMS_VDASCS: TMS_VDASCS:
CALL PANIC ; NOT IMPLEMENTED (YET) CALL PANIC ; NOT IMPLEMENTED (YET)
TMS_VDASCP: TMS_VDASCP:
#IF (CPUFAM == CPU_Z180) #IF (CPUFAM == CPU_Z180)
CALL TMS_Z180IO CALL TMS_Z180IO
@ -192,15 +192,15 @@ TMS_VDASCP:
CALL TMS_SETCUR CALL TMS_SETCUR
XOR A ; SIGNAL SUCCESS XOR A ; SIGNAL SUCCESS
RET RET
TMS_VDASAT: TMS_VDASAT:
XOR A ; NOT POSSIBLE, JUST SIGNAL SUCCESS XOR A ; NOT POSSIBLE, JUST SIGNAL SUCCESS
RET RET
TMS_VDASCO: TMS_VDASCO:
XOR A ; NOT POSSIBLE, JUST SIGNAL SUCCESS XOR A ; NOT POSSIBLE, JUST SIGNAL SUCCESS
RET RET
TMS_VDAWRC: TMS_VDAWRC:
#IF (CPUFAM == CPU_Z180) #IF (CPUFAM == CPU_Z180)
CALL TMS_Z180IO CALL TMS_Z180IO
@ -211,7 +211,7 @@ TMS_VDAWRC:
CALL TMS_SETCUR CALL TMS_SETCUR
XOR A ; SIGNAL SUCCESS XOR A ; SIGNAL SUCCESS
RET RET
TMS_VDAFIL: TMS_VDAFIL:
#IF (CPUFAM == CPU_Z180) #IF (CPUFAM == CPU_Z180)
CALL TMS_Z180IO CALL TMS_Z180IO
@ -239,7 +239,7 @@ TMS_VDACPY:
CALL TMS_SETCUR CALL TMS_SETCUR
XOR A XOR A
RET RET
TMS_VDASCR: TMS_VDASCR:
#IF (CPUFAM == CPU_Z180) #IF (CPUFAM == CPU_Z180)
CALL TMS_Z180IO CALL TMS_Z180IO
@ -294,7 +294,7 @@ TMS_SET:
OUT (TMS_CMDREG),A ; WRITE IT OUT (TMS_CMDREG),A ; WRITE IT
TMS_IODELAY TMS_IODELAY
LD A,C ; GET THE DESIRED REGISTER LD A,C ; GET THE DESIRED REGISTER
OR $80 ; SET BIT 7
OR $80 ; SET BIT 7
OUT (TMS_CMDREG),A ; SELECT THE DESIRED REGISTER OUT (TMS_CMDREG),A ; SELECT THE DESIRED REGISTER
TMS_IODELAY TMS_IODELAY
RET RET
@ -398,7 +398,7 @@ TMS_LOADFONT:
LD (TMS_STACK),SP ; SAVE STACK LD (TMS_STACK),SP ; SAVE STACK
LD HL,(TMS_STACK) ; AND SHIFT IT LD HL,(TMS_STACK) ; AND SHIFT IT
LD DE,$2000 ; DOWN 4KB TO LD DE,$2000 ; DOWN 4KB TO
CCF ; CREATE A
CCF ; CREATE A
SBC HL,DE ; DECOMPRESSION BUFFER SBC HL,DE ; DECOMPRESSION BUFFER
LD SP,HL ; HL POINTS TO BUFFER LD SP,HL ; HL POINTS TO BUFFER
EX DE,HL ; START OF STACK BUFFER EX DE,HL ; START OF STACK BUFFER
@ -597,7 +597,7 @@ TMS_SCROLL1:
INC DE INC DE
DJNZ TMS_SCROLL1 DJNZ TMS_SCROLL1
POP HL ; RECOVER THE DESTINATION POP HL ; RECOVER THE DESTINATION
;
;
; WRITE THE BUFFERED LINE TO CURRENT DESTINATION ; WRITE THE BUFFERED LINE TO CURRENT DESTINATION
CALL TMS_WR ; SET UP TO WRITE CALL TMS_WR ; SET UP TO WRITE
LD DE,TMS_BUF LD DE,TMS_BUF
@ -733,7 +733,7 @@ TMS_Z180IO:
OUT0 (Z180_DCNTL),A ; IMPLEMENT IT OUT0 (Z180_DCNTL),A ; IMPLEMENT IT
POP AF ; RESTORE AF POP AF ; RESTORE AF
; BACK TO CALLER ; BACK TO CALLER
TMS_Z180IOR .EQU $+1
TMS_Z180IOR .EQU $+1
JP $0000 ; BACK TO CALLER JP $0000 ; BACK TO CALLER
; ;
TMS_Z180IOX: TMS_Z180IOX:

Loading…
Cancel
Save