LOADING AT $.SRC
FILE INFORMATION
FILENAME(S): LOADING AT $.SRC
FILE TYPE(S): SEQ
FILE SIZE: 1.7K
FIRST SEEN: 2025-12-01 13:59:19
APPEARS ON: 1 disk(s)
FILE HASH
9b26c6c91b019631f4eb776defab4ba38182e09ff66a544b65e07fd9b3ca9078
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| DN PRG SERVICE | LOADING AT $.SRC | SEQ | HOL2001, OUG | 2 | 19 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 20 20 20 20 20 20 20 20 20 2A 3D 20 24 31 30 30 | *= $100| 00000010: 30 0D 0D 0D 0D 3B 53 50 45 43 49 41 4C 20 4C 4F |0....;SPECIAL LO| 00000020: 41 44 20 28 41 55 43 48 20 55 4E 54 45 52 20 24 |AD (AUCH UNTER $| 00000030: 44 30 30 30 29 0D 3B 20 20 20 20 20 20 20 20 20 |D000).; | 00000040: 20 20 28 57 29 20 42 59 20 4D 57 53 0D 0D 0D 3B | (W) BY MWS...;| 00000050: 49 4E 20 24 41 45 2F 24 41 46 20 3D 20 41 4E 46 |IN $AE/$AF = ANF| 00000060: 41 4E 47 53 41 44 52 45 53 53 45 0D 0D 0D 0D 53 |ANGSADRESSE....S| 00000070: 4C 4F 20 20 20 20 20 20 3D 20 24 41 45 0D 53 48 |LO = $AE.SH| 00000080: 49 20 20 20 20 20 20 3D 20 24 41 46 0D 0D 0D 0D |I = $AF....| 00000090: 20 20 20 20 20 20 20 20 20 4C 44 41 20 23 3C 50 | LDA #<P| 000000A0: 52 49 4E 54 0D 20 20 20 20 20 20 20 20 20 4C 44 |RINT. LD| 000000B0: 59 20 23 3E 50 52 49 4E 54 0D 20 20 20 20 20 20 |Y #>PRINT. | 000000C0: 20 20 20 4A 53 52 20 24 41 42 31 45 0D 0D 20 20 | JSR $AB1E.. | 000000D0: 20 20 20 20 20 20 20 4C 44 41 20 23 24 30 38 0D | LDA #$08.| 000000E0: 20 20 20 20 20 20 20 20 20 54 41 58 0D 20 20 20 | TAX. | 000000F0: 20 20 20 20 20 20 54 41 59 0D 20 20 20 20 20 20 | TAY. | 00000100: 20 20 20 4A 53 52 20 24 46 46 42 41 0D 0D 20 20 | JSR $FFBA.. | 00000110: 20 20 20 20 20 20 20 4C 44 41 20 23 24 30 31 0D | LDA #$01.| 00000120: 20 20 20 20 20 20 20 20 20 4C 44 58 20 23 3C 4E | LDX #<N| 00000130: 41 4D 0D 20 20 20 20 20 20 20 20 20 4C 44 59 20 |AM. LDY | 00000140: 23 3E 4E 41 4D 0D 20 20 20 20 20 20 20 20 20 4A |#>NAM. J| 00000150: 53 52 20 24 46 46 42 44 0D 0D 20 20 20 20 20 20 |SR $FFBD.. | 00000160: 20 20 20 4A 53 52 20 24 46 46 43 30 0D 0D 0D 20 | JSR $FFC0... | 00000170: 20 20 20 20 20 20 20 20 4C 44 41 20 23 24 30 38 | LDA #$08| 00000180: 0D 20 20 20 20 20 20 20 20 20 4A 53 52 20 24 46 |. JSR $F| 00000190: 46 42 34 0D 0D 20 20 20 20 20 20 20 20 20 4C 44 |FB4.. LD| 000001A0: 41 20 23 24 36 38 0D 20 20 20 20 20 20 20 20 20 |A #$68. | 000001B0: 4A 53 52 20 24 46 46 39 36 0D 0D 20 20 20 20 20 |JSR $FF96.. | 000001C0: 20 20 20 20 4A 53 52 20 24 46 46 41 35 0D 20 20 | JSR $FFA5. | 000001D0: 20 20 20 20 20 20 20 53 54 41 20 53 4C 4F 0D 20 | STA SLO. | 000001E0: 20 20 20 20 20 20 20 20 4A 53 52 20 48 45 58 0D | JSR HEX.| 000001F0: 20 20 20 20 20 20 20 20 20 53 54 58 20 24 30 34 | STX $04| 00000200: 30 30 2B 31 36 0D 20 20 20 20 20 20 20 20 20 53 |00+16. S| 00000210: 54 59 20 24 30 34 30 30 2B 31 37 0D 20 20 20 20 |TY $0400+17. | 00000220: 20 20 20 20 20 4A 53 52 20 24 46 46 41 35 0D 20 | JSR $FFA5. | 00000230: 20 20 20 20 20 20 20 20 53 54 41 20 53 48 49 0D | STA SHI.| 00000240: 20 20 20 20 20 20 20 20 20 4A 53 52 20 48 45 58 | JSR HEX| 00000250: 0D 20 20 20 20 20 20 20 20 20 53 54 58 20 24 30 |. STX $0| 00000260: 34 30 30 2B 31 34 0D 20 20 20 20 20 20 20 20 20 |400+14. | 00000270: 53 54 59 20 24 30 34 30 30 2B 31 35 0D 0D 4F 4B |STY $0400+15..OK| 00000280: 0D 20 20 20 20 20 20 20 20 20 4A 53 52 20 24 46 |. JSR $F| 00000290: 46 45 31 0D 20 20 20 20 20 20 20 20 20 42 4E 45 |FE1. BNE| 000002A0: 20 54 52 54 0D 20 20 20 20 20 20 20 20 20 4A 4D | TRT. JM| 000002B0: 50 20 45 4E 44 45 0D 0D 0D 54 52 54 20 20 20 20 |P ENDE...TRT | 000002C0: 20 20 4C 44 41 20 24 41 46 0D 20 20 20 20 20 20 | LDA $AF. | 000002D0: 20 20 20 4A 53 52 20 48 45 58 0D 20 20 20 20 20 | JSR HEX. | 000002E0: 20 20 20 20 53 54 58 20 24 30 34 30 30 2B 32 33 | STX $0400+23| 000002F0: 0D 20 20 20 20 20 20 20 20 20 53 54 59 20 24 30 |. STY $0| 00000300: 34 30 30 2B 32 34 0D 20 20 20 20 20 20 20 20 20 |400+24. | 00000310: 4C 44 41 20 24 41 45 0D 20 20 20 20 20 20 20 20 |LDA $AE. | 00000320: 20 4A 53 52 20 48 45 58 0D 20 20 20 20 20 20 20 | JSR HEX. | 00000330: 20 20 53 54 58 20 24 30 34 30 30 2B 32 35 0D 20 | STX $0400+25. | 00000340: 20 20 20 20 20 20 20 20 53 54 59 20 24 30 34 30 | STY $040| 00000350: 30 2B 32 36 0D 0D 0D 0D 20 20 20 20 20 20 20 20 |0+26.... | 00000360: 20 4A 53 52 20 24 46 46 41 35 0D 0D 20 20 20 20 | JSR $FFA5.. | 00000370: 20 20 20 20 20 42 49 54 20 24 39 30 0D 20 20 20 | BIT $90. | 00000380: 20 20 20 20 20 20 42 4E 45 20 45 4E 44 45 0D 0D | BNE ENDE..| 00000390: 0D 20 20 20 20 20 20 20 20 20 4C 44 59 20 23 24 |. LDY #$| 000003A0: 30 30 0D 20 20 20 20 20 20 20 20 20 53 45 49 0D |00. SEI.| 000003B0: 20 20 20 20 20 20 20 20 20 53 54 59 20 24 30 31 | STY $01| 000003C0: 0D 20 20 20 20 20 20 20 20 20 53 54 41 20 28 53 |. STA (S| 000003D0: 4C 4F 29 2C 59 0D 20 20 20 20 20 20 20 20 20 44 |LO),Y. D| 000003E0: 45 59 0D 20 20 20 20 20 20 20 20 20 53 54 59 20 |EY. STY | 000003F0: 24 30 31 0D 20 20 20 20 20 20 20 20 20 43 4C 49 |$01. CLI| 00000400: 0D 0D 0D 0D 20 20 20 20 20 20 20 20 20 49 4E 43 |.... INC| 00000410: 20 53 4C 4F 0D 20 20 20 20 20 20 20 20 20 42 4E | SLO. BN| 00000420: 45 20 4F 4B 0D 0D 20 20 20 20 20 20 20 20 20 49 |E OK.. I| 00000430: 4E 43 20 53 48 49 0D 0D 4B 4B 42 20 20 20 20 20 |NC SHI..KKB | 00000440: 20 42 4E 45 20 4F 4B 0D 0D 45 4E 44 45 20 20 20 | BNE OK..ENDE | 00000450: 20 20 4A 53 52 20 24 46 46 43 33 0D 20 20 20 20 | JSR $FFC3. | 00000460: 20 20 20 20 20 4A 53 52 20 24 46 46 45 37 0D 20 | JSR $FFE7. | 00000470: 20 20 20 20 20 20 20 20 4A 4D 50 20 24 46 36 34 | JMP $F64| 00000480: 32 0D 0D 0D 4E 41 4D 20 20 20 20 20 20 2E 54 45 |2...NAM .TE| 00000490: 58 54 20 22 41 22 0D 0D 20 3B 52 4F 55 54 49 4E |XT "A".. ;ROUTIN| 000004A0: 45 20 5A 55 52 20 41 55 53 47 41 42 45 20 45 49 |E ZUR AUSGABE EI| 000004B0: 4E 45 53 20 42 59 54 45 53 0D 20 3B 48 45 58 5A |NES BYTES. ;HEXZ| 000004C0: 41 48 4C 20 57 49 52 44 20 41 4C 53 20 44 45 43 |AHL WIRD ALS DEC| 000004D0: 49 4D 41 4C 5A 41 48 4C 0D 20 3B 41 55 53 47 45 |IMALZAHL. ;AUSGE| 000004E0: 47 45 42 45 4E 2E 20 57 45 52 54 20 4D 55 53 53 |GEBEN. WERT MUSS| 000004F0: 20 49 4D 20 41 4B 4B 55 20 53 54 45 48 45 4E 0D | IM AKKU STEHEN.| 00000500: 20 3B 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ; | 00000510: 20 20 28 57 29 20 42 59 20 4D 57 53 0D 0D 0D 0D | (W) BY MWS....| 00000520: 48 45 58 20 20 20 20 20 20 50 48 41 0D 20 20 20 |HEX PHA. | 00000530: 20 20 20 20 20 20 4C 53 52 20 41 0D 20 20 20 20 | LSR A. | 00000540: 20 20 20 20 20 4C 53 52 20 41 0D 20 20 20 20 20 | LSR A. | 00000550: 20 20 20 20 4C 53 52 20 41 0D 20 20 20 20 20 20 | LSR A. | 00000560: 20 20 20 4C 53 52 20 41 0D 20 20 20 20 20 20 20 | LSR A. | 00000570: 20 20 4A 53 52 20 4C 4F 4F 50 0D 20 20 20 20 20 | JSR LOOP. | 00000580: 20 20 20 20 54 41 58 0D 20 20 20 20 20 20 20 20 | TAX. | 00000590: 20 50 4C 41 0D 20 20 20 20 20 20 20 20 20 4A 53 | PLA. JS| 000005A0: 52 20 4C 4F 4F 50 0D 20 20 20 20 20 20 20 20 20 |R LOOP. | 000005B0: 54 41 59 0D 20 20 20 20 20 20 20 20 20 52 54 53 |TAY. RTS| 000005C0: 0D 0D 4C 4F 4F 50 20 20 20 20 20 41 4E 44 20 23 |..LOOP AND #| 000005D0: 24 30 46 0D 20 20 20 20 20 20 20 20 20 43 4D 50 |$0F. CMP| 000005E0: 20 23 24 30 41 0D 20 20 20 20 20 20 20 20 20 43 | #$0A. C| 000005F0: 4C 43 0D 20 20 20 20 20 20 20 20 20 42 4D 49 20 |LC. BMI | 00000600: 4D 49 4E 55 53 0D 20 20 20 20 20 20 20 20 20 41 |MINUS. A| 00000610: 44 43 20 23 24 30 37 0D 4D 49 4E 55 53 20 20 20 |DC #$07.MINUS | 00000620: 20 41 44 43 20 23 24 33 30 0D 20 20 20 20 20 20 | ADC #$30. | 00000630: 20 20 20 41 4E 44 20 23 24 33 46 0D 20 20 20 20 | AND #$3F. | 00000640: 20 20 20 20 20 52 54 53 0D 0D 0D 50 52 49 4E 54 | RTS...PRINT| 00000650: 20 20 20 20 2E 54 45 58 54 20 22 93 4C 4F 41 44 | .TEXT ".LOAD| 00000660: 49 4E 47 20 46 52 4F 4D 20 24 2E 2E 2E 2E 22 0D |ING FROM $....".| 00000670: 20 20 20 20 20 20 20 20 20 2E 54 45 58 54 20 22 | .TEXT "| 00000680: 20 54 4F 20 24 2E 2E 2E 2E 22 0D 20 20 20 20 20 | TO $....". | 00000690: 20 20 20 20 2E 42 59 54 45 20 30 0D 0D | .BYTE 0.. |
*= $1000....;SPECIAL LOAD (AUCH
UNTER $D000).; (W) BY MWS...;
IN $AE/$AF = ANFANGSADRESSE....SLO
= $AE.SHI = $AF.... LDA #<P
RINT. LDY #>PRINT. JSR $
AB1E.. LDA #$08. TAX.
TAY. JSR $FFBA.. L
DA #$01. LDX #<NAM. LDY
#>NAM. JSR $FFBD.. JSR $
FFC0... LDA #$08. JSR $F
FB4.. LDA #$68. JSR $FF9
6.. JSR $FFA5. STA SLO.
JSR HEX. STX $0400+16.
STY $0400+17. JSR $FFA5.
STA SHI. JSR HEX.
STX $0400+14. STY $0400+15..OK
. JSR $FFE1. BNE TRT.
JMP ENDE...TRT LDA $AF.
JSR HEX. STX $0400+23.
STY $0400+24. LDA $AE.
JSR HEX. STX $0400+25.
STY $0400+26.... JSR $FFA5..
BIT $90. BNE ENDE...
LDY #$00. SEI. STY $01
. STA (SLO),Y. DEY.
STY $01. CLI.... INC
SLO. BNE OK.. INC SHI..
KKB BNE OK..ENDE JSR $FFC3.
JSR $FFE7. JMP $F642...NAM
.TEXT "A".. ;ROUTINE ZUR AUSGABE EI
NES BYTES. ;HEXZAHL WIRD ALS DECIMALZAHL
. ;AUSGEGEBEN. WERT MUSS IM AKKU STEHEN.
; (W) BY MWS....HEX
PHA. LSR A. LSR A.
LSR A. LSR A. JSR LO
OP. TAX. PLA. JS
R LOOP. TAY. RTS..LOOP
AND #$0F. CMP #$0A. C
LC. BMI MINUS. ADC #$07.
MINUS ADC #$30. AND #$3F.
RTS...PRINT .TEXT ".LOADING FROM
$....". .TEXT " TO $....".
.BYTE 0..
> CLICK IMAGE PREVIEW FOR FULL MODAL