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

Multiple names: DIOA19, TRKS37

FILE INFORMATION

FILENAME(S):
• DIOA19<br>• TRKS37

FILE TYPE(S): DEL, SEQ

FILE SIZE: 1.1K

FIRST SEEN: 2025-11-30 21:11:47

APPEARS ON: 2 disk(s)

FILE HASH

82099381b20d60c8e8a4e104071b53ab766234dfa25749976f686000899d22f1

FOUND ON DISKS (2 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
C64 ASSEMBLER DIOA19 DEL DuncanTwain 7 1 DOWNLOAD FILE
C64 ASSEMBLER TRKS37 SEQ DuncanTwain 7 1 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

00000000: 20 20 20 20 20 20 20 20  20 2A 3D 30 30 38 32 38  |         *=00828|
00000010: 0D 20 20 20 20 20 20 4A  53 52 20 20 34 34 37 39  |.      JSR  4479|
00000020: 37 0D 20 20 20 20 20 20  4A 53 52 20 20 35 37 39  |7.      JSR  579|
00000030: 34 33 0D 20 20 20 20 20  20 4C 44 41 20 23 30 30  |43.      LDA #00|
00000040: 38 0D 20 20 20 20 20 20  53 54 41 20 20 31 38 34  |8.      STA  184|
00000050: 0D 20 20 20 20 20 20 4A  53 52 20 20 34 34 37 39  |.      JSR  4479|
00000060: 37 0D 20 20 20 20 20 20  42 45 51 20 20 43 4C 30  |7.      BEQ  CL0|
00000070: 30 37 0D 20 20 20 20 20  20 42 43 43 20 20 43 4C  |07.      BCC  CL|
00000080: 31 30 34 0D 20 20 20 20  20 20 43 4D 50 20 23 31  |104.      CMP #1|
00000090: 37 31 0D 20 20 20 20 20  20 42 4E 45 20 20 43 4C  |71.      BNE  CL|
000000A0: 30 30 37 0D 20 20 20 20  20 20 4A 53 52 20 20 30  |007.      JSR  0|
000000B0: 30 31 31 35 0D 20 20 20  20 20 20 4A 53 52 20 20  |0115.      JSR  |
000000C0: 43 4C 30 30 36 0D 20 20  20 20 20 20 4C 44 41 20  |CL006.      LDA |
000000D0: 20 30 34 33 0D 20 20 20  20 20 20 4C 44 58 20 20  | 043.      LDX  |
000000E0: 30 34 34 0D 20 20 20 20  20 20 53 54 41 20 20 31  |044.      STA  1|
000000F0: 39 33 0D 20 20 20 20 20  20 53 54 58 20 20 31 39  |93.      STX  19|
00000100: 34 0D 43 4C 30 30 31 20  4C 44 59 20 23 30 30 35  |4.CL001 LDY #005|
00000110: 0D 43 4C 30 30 32 20 4C  44 41 20 28 30 39 35 29  |.CL002 LDA (095)|
00000120: 2C 59 0D 20 20 20 20 20  20 42 45 51 20 20 43 4C  |,Y.      BEQ  CL|
00000130: 30 30 33 0D 20 20 20 20  20 20 49 4E 43 20 20 30  |003.      INC  0|
00000140: 39 35 0D 20 20 20 20 20  20 42 4E 45 20 20 43 4C  |95.      BNE  CL|
00000150: 30 30 32 0D 20 20 20 20  20 20 49 4E 43 20 20 30  |002.      INC  0|
00000160: 39 36 0D 20 20 20 20 20  20 42 4E 45 20 20 43 4C  |96.      BNE  CL|
00000170: 30 30 32 0D 43 4C 30 30  33 20 4C 44 58 20 20 30  |002.CL003 LDX  0|
00000180: 39 36 0D 20 20 20 20 20  20 4C 44 41 20 20 30 39  |96.      LDA  09|
00000190: 35 0D 20 20 20 20 20 20  41 44 43 20 23 30 30 37  |5.      ADC #007|
000001A0: 0D 20 20 20 20 20 20 42  43 43 20 20 43 4C 30 30  |.      BCC  CL00|
000001B0: 34 0D 20 20 20 20 20 20  49 4E 58 0D 43 4C 30 30  |4.      INX.CL00|
000001C0: 34 20 53 54 41 20 20 31  37 34 0D 20 20 20 20 20  |4 STA  174.     |
000001D0: 20 53 54 58 20 20 31 37  35 0D 20 20 20 20 20 20  | STX  175.      |
000001E0: 4C 44 59 20 23 30 30 36  0D 20 20 20 20 20 20 4C  |LDY #006.      L|
000001F0: 44 58 20 23 30 30 30 0D  20 20 20 20 20 20 4C 44  |DX #000.      LD|
00000200: 41 20 28 30 39 35 29 2C  59 0D 20 20 20 20 20 20  |A (095),Y.      |
00000210: 50 48 41 0D 20 20 20 20  20 20 54 58 41 0D 20 20  |PHA.      TXA.  |
00000220: 20 20 20 20 53 54 41 20  28 30 39 35 29 2C 59 0D  |    STA (095),Y.|
00000230: 20 20 20 20 20 20 49 4E  59 0D 20 20 20 20 20 20  |      INY.      |
00000240: 4C 44 41 20 28 30 39 35  29 2C 59 0D 20 20 20 20  |LDA (095),Y.    |
00000250: 20 20 50 48 41 0D 20 20  20 20 20 20 54 58 41 0D  |  PHA.      TXA.|
00000260: 20 20 20 20 20 20 53 54  41 20 28 30 39 35 29 2C  |      STA (095),|
00000270: 59 0D 20 20 20 20 20 20  4A 53 52 20 20 36 32 39  |Y.      JSR  629|
00000280: 37 30 0D 20 20 20 20 20  20 4C 44 59 20 23 30 30  |70.      LDY #00|
00000290: 37 0D 20 20 20 20 20 20  50 4C 41 0D 20 20 20 20  |7.      PLA.    |
000002A0: 20 20 53 54 41 20 28 30  39 35 29 2C 59 0D 20 20  |  STA (095),Y.  |
000002B0: 20 20 20 20 44 45 59 0D  20 20 20 20 20 20 50 4C  |    DEY.      PL|
000002C0: 41 0D 20 20 20 20 20 20  53 54 41 20 28 30 39 35  |A.      STA (095|
000002D0: 29 2C 59 0D 20 20 20 20  20 20 52 54 53 0D 43 4C  |),Y.      RTS.CL|
000002E0: 31 30 34 20 4A 53 52 20  20 43 4C 30 30 36 0D 20  |104 JSR  CL006. |
000002F0: 20 20 20 20 20 4C 44 41  20 20 30 39 35 0D 20 20  |     LDA  095.  |
00000300: 20 20 20 20 4C 44 58 20  20 30 39 36 0D 20 20 20  |    LDX  096.   |
00000310: 20 20 20 53 54 41 20 20  31 39 33 0D 20 20 20 20  |   STA  193.    |
00000320: 20 20 53 54 58 20 20 31  39 34 0D 20 20 20 20 20  |  STX  194.     |
00000330: 20 4A 53 52 20 20 30 30  31 32 31 0D 20 20 20 20  | JSR  00121.    |
00000340: 20 20 42 45 51 20 20 43  4C 30 30 31 0D 20 20 20  |  BEQ  CL001.   |
00000350: 20 20 20 43 4D 50 20 23  31 37 31 0D 20 20 20 20  |   CMP #171.    |
00000360: 20 20 42 4E 45 20 20 43  4C 30 30 37 0D 20 20 20  |  BNE  CL007.   |
00000370: 20 20 20 4A 53 52 20 20  30 30 31 31 35 0D 20 20  |   JSR  00115.  |
00000380: 20 20 20 20 42 45 51 20  20 43 4C 30 30 35 0D 20  |    BEQ  CL005. |
00000390: 20 20 20 20 20 4A 53 52  20 20 43 4C 30 30 36 0D  |     JSR  CL006.|
000003A0: 20 20 20 20 20 20 4A 4D  50 20 20 43 4C 30 30 31  |      JMP  CL001|
000003B0: 0D 43 4C 30 30 35 20 4C  44 41 20 20 30 34 35 0D  |.CL005 LDA  045.|
000003C0: 20 20 20 20 20 20 4C 44  58 20 20 30 34 36 0D 20  |      LDX  046. |
000003D0: 20 20 20 20 20 53 54 41  20 20 31 37 34 0D 20 20  |     STA  174.  |
000003E0: 20 20 20 20 53 54 58 20  20 31 37 35 0D 20 20 20  |    STX  175.   |
000003F0: 20 20 20 4A 4D 50 20 20  36 32 39 37 30 0D 43 4C  |   JMP  62970.CL|
00000400: 30 30 36 20 4A 53 52 20  20 34 33 33 37 31 0D 20  |006 JSR  43371. |
00000410: 20 20 20 20 20 4A 4D 50  20 20 34 32 35 31 35 0D  |     JMP  42515.|
00000420: 43 4C 30 30 37 20 4A 4D  50 20 20 34 34 38 30 38  |CL007 JMP  44808|
00000430: 0D 20 20 20 20 20 20 42  52 4B 0D 20 20 20 20 20  |.      BRK.     |
00000440: 20 2E 45 4E 44 0D                                 | .END.          |
         *=00828.      JSR  44797.      
JSR  57943.      LDA #008.      STA  184
.      JSR  44797.      BEQ  CL007.     
 BCC  CL104.      CMP #171.      BNE  CL
007.      JSR  00115.      JSR  CL006.  
    LDA  043.      LDX  044.      STA  1
93.      STX  194.CL001 LDY #005.CL002 L
DA (095),Y.      BEQ  CL003.      INC  0
95.      BNE  CL002.      INC  096.     
 BNE  CL002.CL003 LDX  096.      LDA  09
5.      ADC #007.      BCC  CL004.      
INX.CL004 STA  174.      STX  175.      
LDY #006.      LDX #000.      LDA (095),
Y.      PHA.      TXA.      STA (095),Y.
      INY.      LDA (095),Y.      PHA.  
    TXA.      STA (095),Y.      JSR  629
70.      LDY #007.      PLA.      STA (0
95),Y.      DEY.      PLA.      STA (095
),Y.      RTS.CL104 JSR  CL006.      LDA
  095.      LDX  096.      STA  193.    
  STX  194.      JSR  00121.      BEQ  C
L001.      CMP #171.      BNE  CL007.   
   JSR  00115.      BEQ  CL005.      JSR
  CL006.      JMP  CL001.CL005 LDA  045.
      LDX  046.      STA  174.      STX 
 175.      JMP  62970.CL006 JSR  43371. 
     JMP  42515.CL007 JMP  44808.      B
RK.      .END.
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL