TRIAGELOADER.SRC
FILE INFORMATION
FILENAME(S): TRIAGELOADER.SRC
FILE TYPE(S): SEQ
FILE SIZE: 2.5K
FIRST SEEN: 2025-12-02 00:17:57
APPEARS ON: 1 disk(s)
FILE HASH
a0c4940b154659a71b236e1b2185a46dd77d4b64c087e53c8b8c2b4590d6866f
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| SOURCES FOR REGI | TRIAGELOADER.SRC | SEQ | Maestro | 21 | 2 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 0D 3B 20 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 3B 20 2D 20 D4 D2 |---------.; - ..| 00000030: C9 C1 C7 C5 20 CC CF C1 C4 C5 D2 20 42 59 20 C1 |.... ...... BY .| 00000040: C5 C7 0D 3B 20 2D 0D 3B 20 2D 20 D2 C5 C1 D3 D3 |...; -.; - .....| 00000050: C5 CD C2 CC C5 C4 A0 26 20 CD CF C4 C9 C6 C9 C5 |.......& .......| 00000060: C4 20 42 59 0D 3B 20 2D 0D 3B 20 2D 20 C2 49 C7 |. BY.; -.; - .I.| 00000070: C6 4F 4F D4 20 2F 20 C2 D2 45 45 DA 45 0D 3B 20 |.OO. / ..EE.E.; | 00000080: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00000090: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 000000A0: 2D 2D 2D 2D 2D 2D 0D 3B 20 2D 20 CC C4 C1 A0 23 |------.; - ....#| 000000B0: 24 30 30 0D 3B 20 2D 20 CC C4 D8 20 CE C1 CD C5 |$00.; - ... ....| 000000C0: 31 53 54 0D 3B 20 2D 20 CC C4 D9 20 CE C1 CD C5 |1ST.; - ... ....| 000000D0: 32 4E 44 0D 3B 20 2D 20 CA D3 D2 A0 CC CF C1 C4 |2ND.; - ........| 000000E0: 20 20 20 20 20 20 3B 20 CC 4F 41 44 20 46 49 4C | ; .OAD FIL| 000000F0: 45 0D 3B 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |E.; ------------| 00000100: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00000110: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 0D 3B 20 2D 20 CA |----------.; - .| 00000120: D3 D2 A0 D5 CE C9 CE D3 D4 20 20 20 20 3B 20 D5 |......... ; .| 00000130: 4E 49 4E 53 54 41 4C 4C 0D 3B 20 2D 2D 2D 2D 2D |NINSTALL.; -----| 00000140: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00000150: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00000160: 2D 0D 0D 4C 4F 41 44 0D 20 20 20 20 20 20 20 20 |-..LOAD. | 00000170: 20 41 4E 44 20 23 24 45 46 0D 20 20 20 20 20 20 | AND #$EF. | 00000180: 20 20 20 53 54 41 20 41 43 43 55 4F 52 49 47 0D | STA ACCUORIG.| 00000190: 20 20 20 20 20 20 20 20 20 4A 53 52 20 53 45 54 | JSR SET| 000001A0: 4C 4F 41 44 0D 20 20 20 20 20 20 20 20 20 4A 53 |LOAD. JS| 000001B0: 52 20 53 45 4E 44 4E 41 4D 45 0D 20 20 20 20 20 |R SENDNAME. | 000001C0: 20 20 20 20 4C 44 41 20 41 43 43 55 4F 52 49 47 | LDA ACCUORIG| 000001D0: 0D 0D 20 20 20 20 20 20 20 20 20 43 4D 50 20 23 |.. CMP #| 000001E0: 24 30 31 0D 20 20 20 20 20 20 20 20 20 42 4E 45 |$01. BNE| 000001F0: 20 4C 4F 41 44 46 49 4C 45 0D 4B 45 53 4F 42 42 | LOADFILE.KESOBB| 00000200: 20 20 20 52 54 53 0D 0D 4C 4F 41 44 46 49 4C 45 | RTS..LOADFILE| 00000210: 20 4C 44 58 20 23 24 30 30 0D 20 20 20 20 20 20 | LDX #$00. | 00000220: 20 20 20 53 54 58 20 24 44 44 30 30 0D 4C 46 49 | STX $DD00.LFI| 00000230: 4C 45 31 30 30 20 42 49 54 20 24 44 44 30 30 0D |LE100 BIT $DD00.| 00000240: 20 20 20 20 20 20 20 20 20 42 50 4C 20 4C 46 49 | BPL LFI| 00000250: 4C 45 31 30 30 0D 0D 4C 46 49 4C 45 31 30 31 20 |LE100..LFILE101 | 00000260: 4C 44 59 20 23 24 30 30 0D 20 20 20 20 20 20 20 |LDY #$00. | 00000270: 20 20 53 54 59 20 24 44 44 30 30 0D 20 20 20 20 | STY $DD00. | 00000280: 20 20 20 20 20 4A 53 52 20 47 45 54 42 59 54 45 | JSR GETBYTE| 00000290: 0D 20 20 20 20 20 20 20 20 20 42 43 53 20 56 45 |. BCS VE| 000002A0: 47 45 0D 0D 20 20 20 20 20 20 20 20 20 53 54 41 |GE.. STA| 000002B0: 20 4C 4F 41 44 50 4F 53 0D 20 20 20 20 20 20 20 | LOADPOS. | 000002C0: 20 20 4A 53 52 20 47 45 54 42 59 54 45 0D 20 20 | JSR GETBYTE. | 000002D0: 20 20 20 20 20 20 20 53 54 41 20 4C 4F 41 44 50 | STA LOADP| 000002E0: 4F 53 2B 31 0D 0D 4C 46 49 4C 45 30 30 31 20 4A |OS+1..LFILE001 J| 000002F0: 53 52 20 47 45 54 42 59 54 45 0D 20 20 20 20 20 |SR GETBYTE. | 00000300: 20 20 20 20 42 43 53 20 56 45 47 45 0D 0D 20 20 | BCS VEGE.. | 00000310: 20 20 20 20 20 20 3B 44 45 43 20 24 30 31 0D 4C | ;DEC $01.L| 00000320: 4F 41 44 50 4F 53 20 20 3D 20 2A 2B 31 0D 20 20 |OADPOS = *+1. | 00000330: 20 20 20 20 20 20 20 53 54 41 20 24 46 46 46 46 | STA $FFFF| 00000340: 0D 20 20 20 20 20 20 20 20 3B 49 4E 43 20 24 30 |. ;INC $0| 00000350: 31 0D 0D 20 20 20 20 20 20 20 20 20 49 4E 43 20 |1.. INC | 00000360: 4C 4F 41 44 50 4F 53 0D 20 20 20 20 20 20 20 20 |LOADPOS. | 00000370: 20 42 4E 45 20 4C 46 49 4C 45 30 30 31 20 20 20 | BNE LFILE001 | 00000380: 20 20 20 20 20 20 20 3B 42 4E 45 20 4A 4D 50 21 | ;BNE JMP!| 00000390: 0D 20 20 20 20 20 20 20 20 20 49 4E 43 20 4C 4F |. INC LO| 000003A0: 41 44 50 4F 53 2B 31 0D 20 20 20 20 20 20 20 20 |ADPOS+1. | 000003B0: 20 4A 4D 50 20 4C 46 49 4C 45 30 30 31 0D 0D 56 | JMP LFILE001..V| 000003C0: 45 47 45 20 20 20 20 20 43 4C 43 0D 20 20 20 20 |EGE CLC. | 000003D0: 20 20 20 20 20 53 54 58 20 24 44 44 30 30 0D 45 | STX $DD00.E| 000003E0: 52 52 30 30 31 20 20 20 42 49 54 20 24 44 44 30 |RR001 BIT $DD0| 000003F0: 30 0D 20 20 20 20 20 20 20 20 20 42 56 53 20 45 |0. BVS E| 00000400: 52 52 30 30 31 0D 20 20 20 20 20 20 20 20 20 42 |RR001. B| 00000410: 50 4C 20 45 52 52 30 30 32 0D 20 20 20 20 20 20 |PL ERR002. | 00000420: 20 20 20 53 45 43 0D 45 52 52 30 30 32 20 20 20 | SEC.ERR002 | 00000430: 53 54 59 20 24 44 44 30 30 0D 20 20 20 20 20 20 |STY $DD00. | 00000440: 20 20 20 52 54 53 0D 0D 0D 53 45 54 4C 4F 41 44 | RTS...SETLOAD| 00000450: 20 20 4C 44 41 20 24 44 44 30 30 0D 20 20 20 20 | LDA $DD00. | 00000460: 20 20 20 20 20 41 4E 44 20 23 24 30 33 0D 20 20 | AND #$03. | 00000470: 20 20 20 20 20 20 20 53 54 41 20 53 44 52 56 30 | STA SDRV0| 00000480: 30 33 2B 31 0D 20 20 20 20 20 20 20 20 20 53 54 |03+1. ST| 00000490: 41 20 4C 46 49 4C 45 31 30 31 2B 31 0D 20 20 20 |A LFILE101+1. | 000004A0: 20 20 20 20 20 20 53 54 41 20 47 42 59 54 45 30 | STA GBYTE0| 000004B0: 30 33 2B 31 0D 20 20 20 20 20 20 20 20 20 4F 52 |03+1. OR| 000004C0: 41 20 23 24 31 30 0D 20 20 20 20 20 20 20 20 20 |A #$10. | 000004D0: 53 54 41 20 53 45 4E 44 44 52 56 2B 31 0D 20 20 |STA SENDDRV+1. | 000004E0: 20 20 20 20 20 20 20 45 4F 52 20 23 24 31 38 0D | EOR #$18.| 000004F0: 20 20 20 20 20 20 20 20 20 53 54 41 20 4C 4F 41 | STA LOA| 00000500: 44 46 49 4C 45 2B 31 0D 20 20 20 20 20 20 20 20 |DFILE+1. | 00000510: 20 53 54 41 20 53 45 4E 44 4E 41 4D 45 2B 31 0D | STA SENDNAME+1.| 00000520: 20 20 20 20 20 20 20 20 20 52 54 53 0D 0D 53 45 | RTS..SE| 00000530: 4E 44 4E 41 4D 45 20 4C 44 41 20 23 24 30 30 0D |NDNAME LDA #$00.| 00000540: 20 20 20 20 20 20 20 20 20 53 54 41 20 24 44 44 | STA $DD| 00000550: 30 30 0D 53 4E 41 4D 45 30 30 31 20 4C 44 41 20 |00.SNAME001 LDA | 00000560: 24 44 44 30 30 0D 20 20 20 20 20 20 20 20 20 42 |$DD00. B| 00000570: 50 4C 20 53 4E 41 4D 45 30 30 31 0D 20 20 20 20 |PL SNAME001. | 00000580: 20 20 20 20 20 41 4E 44 20 23 24 30 33 0D 20 20 | AND #$03. | 00000590: 20 20 20 20 20 20 20 53 54 41 20 24 44 44 30 30 | STA $DD00| 000005A0: 0D 53 4E 41 4D 45 30 30 32 20 42 49 54 20 24 44 |.SNAME002 BIT $D| 000005B0: 44 30 30 0D 20 20 20 20 20 20 20 20 20 42 56 43 |D00. BVC| 000005C0: 20 53 4E 41 4D 45 30 30 32 0D 20 20 20 20 20 20 | SNAME002. | 000005D0: 20 20 20 42 50 4C 20 53 4E 41 4D 45 30 30 32 0D | BPL SNAME002.| 000005E0: 0D 20 20 20 20 20 20 20 20 20 54 58 41 0D 20 20 |. TXA. | 000005F0: 20 20 20 20 20 20 20 4A 53 52 20 53 45 4E 44 42 | JSR SENDB| 00000600: 59 54 45 0D 20 20 20 20 20 20 20 20 20 54 59 41 |YTE. TYA| 00000610: 0D 20 20 20 20 20 20 20 20 20 4A 53 52 20 53 45 |. JSR SE| 00000620: 4E 44 42 59 54 45 0D 41 43 43 55 4F 52 49 47 20 |NDBYTE.ACCUORIG | 00000630: 3D 20 2A 2B 31 0D 20 20 20 20 20 20 20 20 20 4C |= *+1. L| 00000640: 44 41 20 23 24 30 30 0D 53 45 4E 44 42 59 54 45 |DA #$00.SENDBYTE| 00000650: 20 53 54 41 20 24 42 37 0D 20 20 20 20 20 20 20 | STA $B7. | 00000660: 20 20 4A 53 52 20 53 45 4E 44 44 52 56 0D 20 20 | JSR SENDDRV. | 00000670: 20 20 20 20 20 20 20 4A 53 52 20 53 45 4E 44 44 | JSR SENDD| 00000680: 52 56 0D 20 20 20 20 20 20 20 20 20 4A 53 52 20 |RV. JSR | 00000690: 53 45 4E 44 44 52 56 0D 20 20 20 20 20 20 20 20 |SENDDRV. | 000006A0: 20 4A 53 52 20 53 45 4E 44 44 52 56 0D 20 20 20 | JSR SENDDRV. | 000006B0: 20 20 20 20 20 20 52 54 53 0D 0D 53 45 4E 44 44 | RTS..SENDD| 000006C0: 52 56 20 20 4C 44 41 20 23 24 30 30 0D 20 20 20 |RV LDA #$00. | 000006D0: 20 20 20 20 20 20 4C 53 52 20 24 42 37 0D 20 20 | LSR $B7. | 000006E0: 20 20 20 20 20 20 20 42 43 43 20 53 44 52 56 30 | BCC SDRV0| 000006F0: 30 31 0D 20 20 20 20 20 20 20 20 20 4F 52 41 20 |01. ORA | 00000700: 23 24 32 30 0D 53 44 52 56 30 30 31 20 20 53 54 |#$20.SDRV001 ST| 00000710: 41 20 24 44 44 30 30 0D 20 20 20 20 20 20 20 20 |A $DD00. | 00000720: 20 4E 4F 50 0D 20 20 20 20 20 20 20 20 20 4E 4F | NOP. NO| 00000730: 50 0D 20 20 20 20 20 20 20 20 20 4E 4F 50 0D 20 |P. NOP. | 00000740: 20 20 20 20 20 20 20 20 4E 4F 50 0D 53 44 52 56 | NOP.SDRV| 00000750: 30 30 33 20 20 4C 44 41 20 23 24 30 30 0D 20 20 |003 LDA #$00. | 00000760: 20 20 20 20 20 20 20 4C 53 52 20 24 42 37 0D 20 | LSR $B7. | 00000770: 20 20 20 20 20 20 20 20 42 43 43 20 53 44 52 56 | BCC SDRV| 00000780: 30 30 32 0D 20 20 20 20 20 20 20 20 20 4F 52 41 |002. ORA| 00000790: 20 23 24 32 30 0D 53 44 52 56 30 30 32 20 20 53 | #$20.SDRV002 S| 000007A0: 54 41 20 24 44 44 30 30 0D 20 20 20 20 20 20 20 |TA $DD00. | 000007B0: 20 20 4E 4F 50 0D 20 20 20 20 20 20 20 20 20 4E | NOP. N| 000007C0: 4F 50 0D 20 20 20 20 20 20 20 20 20 52 54 53 0D |OP. RTS.| 000007D0: 0D 47 45 54 42 59 54 45 20 20 42 49 54 20 24 44 |.GETBYTE BIT $D| 000007E0: 44 30 30 0D 20 20 20 20 20 20 20 20 20 42 56 43 |D00. BVC| 000007F0: 20 47 45 54 42 59 54 45 0D 20 20 20 20 20 20 20 | GETBYTE. | 00000800: 20 20 42 50 4C 20 47 42 59 54 45 30 30 31 0D 20 | BPL GBYTE001. | 00000810: 20 20 20 20 20 20 20 20 53 45 43 0D 20 20 20 20 | SEC. | 00000820: 20 20 20 20 20 52 54 53 0D 47 42 59 54 45 30 30 | RTS.GBYTE00| 00000830: 31 20 53 45 49 0D 47 42 59 54 45 30 30 32 20 4C |1 SEI.GBYTE002 L| 00000840: 44 41 20 24 44 30 31 32 0D 20 20 20 20 20 20 20 |DA $D012. | 00000850: 20 20 41 4E 44 20 23 24 30 37 0D 20 20 20 20 20 | AND #$07. | 00000860: 20 20 20 20 43 4D 50 20 23 24 30 32 0D 20 20 20 | CMP #$02. | 00000870: 20 20 20 20 20 20 42 45 51 20 47 42 59 54 45 30 | BEQ GBYTE0| 00000880: 30 32 0D 20 20 20 20 20 20 20 20 20 4E 4F 50 0D |02. NOP.| 00000890: 20 20 20 20 20 20 20 20 20 53 54 58 20 24 44 44 | STX $DD| 000008A0: 30 30 0D 20 20 20 20 20 20 20 20 20 4E 4F 50 0D |00. NOP.| 000008B0: 20 20 20 20 20 20 20 20 20 4E 4F 50 0D 20 20 20 | NOP. | 000008C0: 20 20 20 20 20 20 4E 4F 50 0D 20 20 20 20 20 20 | NOP. | 000008D0: 20 20 20 53 54 59 20 24 44 44 30 30 0D 20 20 20 | STY $DD00. | 000008E0: 20 20 20 20 20 20 4C 44 41 20 24 44 44 30 30 0D | LDA $DD00.| 000008F0: 20 20 20 20 20 20 20 20 20 4C 53 52 20 41 0D 20 | LSR A. | 00000900: 20 20 20 20 20 20 20 20 4C 53 52 20 41 0D 20 20 | LSR A. | 00000910: 20 20 20 20 20 20 20 4F 52 41 20 24 44 44 30 30 | ORA $DD00| 00000920: 0D 20 20 20 20 20 20 20 20 20 4C 53 52 20 41 0D |. LSR A.| 00000930: 20 20 20 20 20 20 20 20 20 4C 53 52 20 41 0D 20 | LSR A. | 00000940: 20 20 20 20 20 20 20 20 4F 52 41 20 24 44 44 30 | ORA $DD0| 00000950: 30 0D 20 20 20 20 20 20 20 20 20 4C 53 52 20 41 |0. LSR A| 00000960: 0D 20 20 20 20 20 20 20 20 20 4C 53 52 20 41 0D |. LSR A.| 00000970: 47 42 59 54 45 30 30 33 20 45 4F 52 20 23 24 30 |GBYTE003 EOR #$0| 00000980: 30 0D 20 20 20 20 20 20 20 20 20 45 4F 52 20 24 |0. EOR $| 00000990: 44 44 30 30 0D 20 20 20 20 20 20 20 20 20 43 4C |DD00. CL| 000009A0: 49 0D 20 20 20 20 20 20 20 20 20 43 4C 43 0D 20 |I. CLC. | 000009B0: 20 20 20 20 20 20 20 20 52 54 53 0D 0D 55 4E 49 | RTS..UNI| 000009C0: 4E 53 54 0D 20 20 20 20 20 20 20 20 20 4C 44 41 |NST. LDA| 000009D0: 20 23 24 30 31 0D 20 20 20 20 20 20 20 20 20 4C | #$01. L| 000009E0: 44 58 20 23 24 30 30 0D 20 20 20 20 20 20 20 20 |DX #$00. | 000009F0: 20 4C 44 59 20 23 24 30 30 0D 20 20 20 20 20 20 | LDY #$00. | 00000A00: 20 20 20 4A 53 52 20 4C 4F 41 44 0D 20 20 20 20 | JSR LOAD. | 00000A10: 20 20 20 20 20 52 54 53 0D 0D | RTS.. |
.; -------------------------------------
-.; - TRIAGE LOADER BY AEG.; -.; - REASS
EMBLED & MODIFIED BY.; -.; - BIGFOOT / B
REEZE.; --------------------------------
------.; - LDA #$00.; - LDX NAME1ST.; -
LDY NAME2ND.; - JSR LOAD ; LOAD FIL
E.; ------------------------------------
--.; - JSR UNINST ; UNINSTALL.; -----
---------------------------------..LOAD.
AND #$EF. STA ACCUORIG.
JSR SETLOAD. JSR SENDNA
ME. LDA ACCUORIG.. CMP #
$01. BNE LOADFILE.KESOBB RTS..
LOADFILE LDX #$00. STX $DD00.LFI
LE100 BIT $DD00. BPL LFILE100..L
FILE101 LDY #$00. STY $DD00.
JSR GETBYTE. BCS VEGE..
STA LOADPOS. JSR GETBYTE.
STA LOADPOS+1..LFILE001 JSR GETBY
TE. BCS VEGE.. ;DEC $01.L
OADPOS = *+1. STA $FFFF.
;INC $01.. INC LOADPOS.
BNE LFILE001 ;BNE JMP!.
INC LOADPOS+1. JMP LFILE001..V
EGE CLC. STX $DD00.ERR001
BIT $DD00. BVS ERR001. B
PL ERR002. SEC.ERR002 STY $DD0
0. RTS...SETLOAD LDA $DD00.
AND #$03. STA SDRV003+1.
STA LFILE101+1. STA GBYTE0
03+1. ORA #$10. STA SEND
DRV+1. EOR #$18. STA LOA
DFILE+1. STA SENDNAME+1.
RTS..SENDNAME LDA #$00. STA $DD
00.SNAME001 LDA $DD00. BPL SNAME
001. AND #$03. STA $DD00
.SNAME002 BIT $DD00. BVC SNAME00
2. BPL SNAME002.. TXA.
JSR SENDBYTE. TYA.
JSR SENDBYTE.ACCUORIG = *+1. L
DA #$00.SENDBYTE STA $B7. JSR SE
NDDRV. JSR SENDDRV. JSR
SENDDRV. JSR SENDDRV. RT
S..SENDDRV LDA #$00. LSR $B7.
BCC SDRV001. ORA #$20.SDR
V001 STA $DD00. NOP. NO
P. NOP. NOP.SDRV003 LDA
#$00. LSR $B7. BCC SDRV
002. ORA #$20.SDRV002 STA $DD00
. NOP. NOP. RTS.
.GETBYTE BIT $DD00. BVC GETBYTE
. BPL GBYTE001. SEC.
RTS.GBYTE001 SEI.GBYTE002 LDA $D012
. AND #$07. CMP #$02.
BEQ GBYTE002. NOP.
STX $DD00. NOP. NOP.
NOP. STY $DD00. LD
A $DD00. LSR A. LSR A.
ORA $DD00. LSR A.
LSR A. ORA $DD00. LSR A
. LSR A.GBYTE003 EOR #$00.
EOR $DD00. CLI. CLC.
RTS..UNINST. LDA #$01.
LDX #$00. LDY #$00.
JSR LOAD. RTS..
> CLICK IMAGE PREVIEW FOR FULL MODAL