Universe: TT81

       Name: TT81                                                    [Show more]
       Type: Subroutine
   Category: Universe
    Summary: Set the selected system's seeds to those of system 0
    Context: See this subroutine in context in the source code
 References: This subroutine is called as follows:
             * HME2 calls TT81
             * TT111 calls TT81
             * TT22 calls TT81
             * TT23 calls TT81


 Copy the three 16-bit seeds for the current galaxy's system 0 (QQ21) into the
 seeds for the selected system (QQ15) - in other words, set the selected
 system's seeds to those of system 0.


.TT81

 LDX #5                 \ Set up a counter in X to copy six bytes (for three
                        \ 16-bit numbers)

 LDA QQ21,X             \ Copy the X-th byte in QQ21 to the X-th byte in QQ15
 STA QQ15,X

 DEX                    \ Decrement the counter

 BPL TT81+2             \ Loop back up to the LDA instruction if we still have
                        \ more bytes to copy

 RTS                    \ Return from the subroutine