Text: MT8

       Name: MT8                                                     [Show more]
       Type: Subroutine
   Category: Text
    Summary: Tab to column 6 and start a new word when printing extended tokens
  Deep dive: Extended text tokens
    Context: See this subroutine in context in the source code
 References: This subroutine is called as follows:
             * JMTB calls MT8


 This routine sets the following:

   * XC = 6 (tab to column 6)

   * DTW2 = %11111111 (we are not currently printing a word)


.MT8

 LDA #6                 ; Set A = 6 to denote column 6

IF _IB_DISK OR _4AM_CRACK

 STA XC                 ; Move the text cursor to column 6

ELIF _SOURCE_DISK

 JSR DOXC               ; Move the text cursor to column 6

ENDIF

 LDA #%11111111         ; Set all the bits in DTW2
 STA DTW2

 RTS                    ; Return from the subroutine