_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\
                                                                 
            

3.0 PART-LINKER

FILE INFORMATION

FILENAME(S): 3.0 PART-LINKER

FILE TYPE(S): SEQ

FILE SIZE: 1.3K

FIRST SEEN: 2025-12-02 00:16:13

APPEARS ON: 1 disk(s)

FILE HASH

f115da02367e67b0be7519eac2d701b917d9d608bdc47f25b5495dd5b8428265

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
CODE LIBRARY 1 3.0 PART-LINKER SEQ Maestro 22 1 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

00000000: 0D 3B 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |.;--------------|
00000010: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00000020: 2D 2D 2D 2D 2D 2D 2D 2D  2D 0D 4E 45 57 50 52 4F  |---------.NEWPRO|
00000030: 47 20 20 3D 20 24 32 38  30 30 0D 43 4F 44 45 41  |G  = $2800.CODEA|
00000040: 52 45 41 20 3D 20 24 30  33 33 43 0D 3B 2D 2D 2D  |REA = $033C.;---|
00000050: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00000060: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00000070: 2D 2D 2D 2D 0D 20 20 20  20 20 20 20 20 20 2A 3D  |----.         *=|
00000080: 20 24 30 46 30 30 0D 20  20 20 20 20 20 20 20 20  | $0F00.         |
00000090: 53 45 49 0D 20 20 20 20  20 20 20 20 20 4A 53 52  |SEI.         JSR|
000000A0: 20 24 46 46 45 34 0D 20  20 20 20 20 20 20 20 20  | $FFE4.         |
000000B0: 4C 44 41 20 23 24 30 30  0D 20 20 20 20 20 20 20  |LDA #$00.       |
000000C0: 20 20 4C 44 58 20 23 24  34 30 0D 4B 49 4C 4C 53  |  LDX #$40.KILLS|
000000D0: 49 44 20 20 53 54 41 20  24 44 34 30 30 2C 58 0D  |ID  STA $D400,X.|
000000E0: 20 20 20 20 20 20 20 20  20 44 45 58 0D 20 20 20  |         DEX.   |
000000F0: 20 20 20 20 20 20 42 4E  45 20 4B 49 4C 4C 53 49  |      BNE KILLSI|
00000100: 44 0D 20 20 20 20 20 20  20 20 20 53 45 49 0D 20  |D.         SEI. |
00000110: 20 20 20 20 20 20 20 20  4A 53 52 20 24 46 46 35  |        JSR $FF5|
00000120: 42 0D 20 20 20 20 20 20  20 20 20 4A 53 52 20 24  |B.         JSR $|
00000130: 46 44 31 35 0D 20 20 20  20 20 20 20 20 20 4A 53  |FD15.         JS|
00000140: 52 20 24 45 33 42 46 0D  20 20 20 20 20 20 20 20  |R $E3BF.        |
00000150: 20 4A 53 52 20 24 46 44  41 33 0D 20 20 20 20 20  | JSR $FDA3.     |
00000160: 20 20 20 20 43 4C 49 0D  20 20 20 20 20 20 20 20  |    CLI.        |
00000170: 20 4C 44 58 20 23 24 34  30 0D 54 52 41 4E 4C 4F  | LDX #$40.TRANLO|
00000180: 4F 50 20 4C 44 41 20 4C  49 4E 4B 43 4F 44 45 2C  |OP LDA LINKCODE,|
00000190: 58 0D 20 20 20 20 20 20  20 20 20 53 54 41 20 43  |X.         STA C|
000001A0: 4F 44 45 41 52 45 41 2C  58 0D 20 20 20 20 20 20  |ODEAREA,X.      |
000001B0: 20 20 20 44 45 58 0D 20  20 20 20 20 20 20 20 20  |   DEX.         |
000001C0: 42 50 4C 20 54 52 41 4E  4C 4F 4F 50 0D 20 20 20  |BPL TRANLOOP.   |
000001D0: 20 20 20 20 20 20 4C 44  41 20 24 32 45 0D 20 20  |      LDA $2E.  |
000001E0: 20 20 20 20 20 20 20 53  45 43 0D 20 20 20 20 20  |       SEC.     |
000001F0: 20 20 20 20 53 42 43 20  23 24 30 43 0D 20 20 20  |    SBC #$0C.   |
00000200: 20 20 20 20 20 20 53 54  41 20 24 32 45 0D 20 20  |      STA $2E.  |
00000210: 20 20 20 20 20 20 20 4C  44 41 20 24 32 44 0D 20  |       LDA $2D. |
00000220: 20 20 20 20 20 20 20 20  53 45 43 0D 20 20 20 20  |        SEC.    |
00000230: 20 20 20 20 20 53 42 43  20 23 24 32 39 0D 20 20  |     SBC #$29.  |
00000240: 20 20 20 20 20 20 20 42  43 53 20 49 30 46 33 42  |       BCS I0F3B|
00000250: 0D 20 20 20 20 20 20 20  20 20 44 45 43 20 24 32  |.         DEC $2|
00000260: 45 0D 49 30 46 33 42 20  20 20 20 53 54 41 20 24  |E.I0F3B    STA $|
00000270: 32 44 0D 20 20 20 20 20  20 20 20 20 4C 44 41 20  |2D.         LDA |
00000280: 23 24 30 38 0D 20 20 20  20 20 20 20 20 20 53 54  |#$08.         ST|
00000290: 41 20 24 42 41 0D 20 20  20 20 20 20 20 20 20 4A  |A $BA.         J|
000002A0: 4D 50 20 43 4F 44 45 41  52 45 41 0D 20 20 20 20  |MP CODEAREA.    |
000002B0: 20 20 20 20 20 3B 0D 20  20 20 20 20 20 20 20 20  |     ;.         |
000002C0: 3B 20 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |; --------------|
000002D0: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 0D 20  |--------------. |
000002E0: 20 20 20 20 20 20 20 20  3B 0D 4C 49 4E 4B 43 4F  |        ;.LINKCO|
000002F0: 44 45 20 53 45 49 0D 20  20 20 20 20 20 20 20 20  |DE SEI.         |
00000300: 4C 44 41 20 23 24 33 34  0D 20 20 20 20 20 20 20  |LDA #$34.       |
00000310: 20 20 53 54 41 20 24 30  31 0D 20 20 20 20 20 20  |  STA $01.      |
00000320: 20 20 20 4C 44 58 20 23  24 30 30 0D 4E 45 58 54  |   LDX #$00.NEXT|
00000330: 42 59 54 45 20 4C 44 41  20 4E 45 57 50 52 4F 47  |BYTE LDA NEWPROG|
00000340: 2C 58 0D 20 20 20 20 20  20 20 20 20 53 54 41 20  |,X.         STA |
00000350: 24 30 38 30 31 2C 58 0D  20 20 20 20 20 20 20 20  |$0801,X.        |
00000360: 20 4C 44 59 20 23 24 33  37 0D 20 20 20 20 20 20  | LDY #$37.      |
00000370: 20 20 20 53 54 59 20 24  30 31 0D 20 20 20 20 20  |   STY $01.     |
00000380: 20 20 20 20 42 49 54 20  24 44 34 31 38 0D 20 20  |    BIT $D418.  |
00000390: 20 20 20 20 20 20 20 4C  44 59 20 23 24 33 34 0D  |       LDY #$34.|
000003A0: 20 20 20 20 20 20 20 20  20 53 54 59 20 24 30 31  |         STY $01|
000003B0: 0D 20 20 20 20 20 20 20  20 20 49 4E 58 0D 20 20  |.         INX.  |
000003C0: 20 20 20 20 20 20 20 42  4E 45 20 4E 45 58 54 42  |       BNE NEXTB|
000003D0: 59 54 45 0D 20 20 20 20  20 20 20 20 20 4C 44 41  |YTE.         LDA|
000003E0: 20 24 30 33 34 35 0D 20  20 20 20 20 20 20 20 20  | $0345.         |
000003F0: 43 4D 50 20 23 24 30 30  0D 20 20 20 20 20 20 20  |CMP #$00.       |
00000400: 20 20 42 45 51 20 54 52  41 4E 45 58 49 54 0D 20  |  BEQ TRANEXIT. |
00000410: 20 20 20 20 20 20 20 20  49 4E 43 20 24 30 33 34  |        INC $034|
00000420: 35 0D 20 20 20 20 20 20  20 20 20 49 4E 43 20 24  |5.         INC $|
00000430: 30 33 34 38 0D 20 20 20  20 20 20 20 20 20 4A 4D  |0348.         JM|
00000440: 50 20 24 30 33 34 31 0D  54 52 41 4E 45 58 49 54  |P $0341.TRANEXIT|
00000450: 20 4C 44 41 20 23 24 30  30 0D 20 20 20 20 20 20  | LDA #$00.      |
00000460: 20 20 20 53 54 41 20 24  30 38 30 30 0D 20 20 20  |   STA $0800.   |
00000470: 20 20 20 20 20 20 53 54  41 20 24 44 34 31 38 0D  |      STA $D418.|
00000480: 20 20 20 20 20 20 20 20  20 4C 44 41 20 23 24 33  |         LDA #$3|
00000490: 37 0D 20 20 20 20 20 20  20 20 20 53 54 41 20 24  |7.         STA $|
000004A0: 30 31 0D 20 20 20 20 20  20 20 20 20 43 4C 49 0D  |01.         CLI.|
000004B0: 20 20 20 20 20 20 20 20  20 4A 53 52 20 24 41 36  |         JSR $A6|
000004C0: 35 45 0D 20 20 20 20 20  20 20 20 20 4A 53 52 20  |5E.         JSR |
000004D0: 24 41 36 38 45 0D 20 20  20 20 20 20 20 20 20 4A  |$A68E.         J|
000004E0: 4D 50 20 24 41 37 41 45  0D 3B 2D 2D 2D 2D 2D 2D  |MP $A7AE.;------|
000004F0: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00000500: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00000510: 2D 0D 0D                                          |-..             |
.;--------------------------------------
-.NEWPROG  = $2800.CODEAREA = $033C.;---
------------------------------------.   
      *= $0F00.         SEI.         JSR
 $FFE4.         LDA #$00.         LDX #$
40.KILLSID  STA $D400,X.         DEX.   
      BNE KILLSID.         SEI.         
JSR $FF5B.         JSR $FD15.         JS
R $E3BF.         JSR $FDA3.         CLI.
         LDX #$40.TRANLOOP LDA LINKCODE,
X.         STA CODEAREA,X.         DEX. 
        BPL TRANLOOP.         LDA $2E.  
       SEC.         SBC #$0C.         ST
A $2E.         LDA $2D.         SEC.    
     SBC #$29.         BCS I0F3B.       
  DEC $2E.I0F3B    STA $2D.         LDA 
#$08.         STA $BA.         JMP CODEA
REA.         ;.         ; --------------
--------------.         ;.LINKCODE SEI. 
        LDA #$34.         STA $01.      
   LDX #$00.NEXTBYTE LDA NEWPROG,X.     
    STA $0801,X.         LDY #$37.      
   STY $01.         BIT $D418.         L
DY #$34.         STY $01.         INX.  
       BNE NEXTBYTE.         LDA $0345. 
        CMP #$00.         BEQ TRANEXIT. 
        INC $0345.         INC $0348.   
      JMP $0341.TRANEXIT LDA #$00.      
   STA $0800.         STA $D418.        
 LDA #$37.         STA $01.         CLI.
         JSR $A65E.         JSR $A68E.  
       JMP $A7AE.;----------------------
-----------------..
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL