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

FLOPPY SRQ

FILE INFORMATION

FILENAME(S): FLOPPY SRQ

FILE TYPE(S): PRG

FILE SIZE: 1.1K

FIRST SEEN: 2025-11-02 16:41:30

APPEARS ON: 2 disk(s)

FILE HASH

c6d4778fdeeafddd4d269357e6f647e14dcff267c56c0ddecb4a67d9dbfb0b61

FOUND ON DISKS (2 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
15825 SH 25 FLOPPY SRQ PRG Treasure Chest - PrettyOldPixel 3 2 DOWNLOAD FILE
15825 SH 25 FLOPPY SRQ PRG C64er 3 2 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)

00000000: 01 08 25 08 0A 00 8F 20  4F 50 45 4E 20 31 2C 38  |..%.... OPEN 1,8|
00000010: 2C 31 2C 22 30 3A 46 4C  4F 50 50 59 20 53 52 51  |,1,"0:FLOPPY SRQ|
00000020: 2E 4F 42 4A 22 00 34 08  0C 00 8F 20 4F 50 45 4E  |.OBJ".4.... OPEN|
00000030: 20 32 2C 34 00 5D 08 0D  00 9E 20 33 32 37 36 38  | 2,4.].... 32768|
00000040: 3B 20 45 49 4E 53 50 8A  47 20 46 55 45 52 20 4E  |; EINSP.G FUER N|
00000050: 45 55 45 4E 20 50 52 4F  46 49 41 53 53 00 63 08  |EUEN PROFIASS.c.|
00000060: 0E 00 3B 00 84 08 0F 00  3B 20 AC AC AC AC AC AC  |..;.....; ......|
00000070: AC AC AC AC AC AC AC AC  AC AC AC AC AC AC AC AC  |................|
00000080: AC AC AC AC 00 A5 08 10  00 3B 20 AC 20 46 4C 4F  |.........; . FLO|
00000090: 50 50 59 20 53 45 52 56  49 43 45 20 52 45 51 55  |PPY SERVICE REQU|
000000A0: 45 53 54 20 AC 00 C6 08  11 00 3B 20 AC 20 20 20  |EST ......; .   |
000000B0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000000C0: 20 20 20 20 20 AC 00 E6  08 12 00 3B 20 AC 20 20  |     ......; .  |
000000D0: 20 20 56 91 20 20 55 57  45 20 47 45 52 4C 41 43  |  V.  UWE GERLAC|
000000E0: 48 20 20 20 20 AC 00 07  09 13 00 3B 20 AC 20 20  |H    ......; .  |
000000F0: 20 54 45 4C 2E 20 20 30  36 31 35 31 AD 33 31 36  | TEL.  06151.316|
00000100: 32 30 35 20 20 20 AC 00  28 09 14 00 3B 20 AC 20  |205   ..(...; . |
00000110: 20 20 20 42 5A 57 2E 20  20 30 36 36 32 32 AD 33  |   BZW.  06622.3|
00000120: 39 30 38 20 20 20 20 AC  00 49 09 15 00 3B 20 AC  |908    ..I...; .|
00000130: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000140: 20 20 20 20 20 20 20 20  AC 00 6A 09 16 00 3B 20  |        ..j...; |
00000150: AC 20 20 20 20 20 20 20  20 31 33 2E 30 36 2E 38  |.        13.06.8|
00000160: 36 20 20 20 20 20 20 20  20 AC 00 8B 09 17 00 3B  |6        ......;|
00000170: 20 AC AC AC AC AC AC AC  AC AC AC AC AC AC AC AC  | ...............|
00000180: AC AC AC AC AC AC AC AC  AC AC AC 00 91 09 18 00  |................|
00000190: 3B 00 97 09 19 00 3B 00  BC 09 1A 00 3B 20 55 45  |;.....;.....; UE|
000001A0: 42 45 52 20 83 2D 4C 49  4E 45 20 44 45 53 20 53  |BER .-LINE DES S|
000001B0: 45 52 49 45 4C 4C 45 4E  20 42 55 53 00 D2 09 1B  |ERIELLEN BUS....|
000001C0: 00 3B 20 41 4E 20 44 45  4E 20 43 4F 4D 50 55 54  |.; AN DEN COMPUT|
000001D0: 45 52 00 D8 09 1E 00 3B  00 DE 09 1F 00 3B 00 07  |ER.....;.....;..|
000001E0: 0A 64 00 2E 54 49 54 20  22 53 45 52 56 49 43 45  |.d..TIT "SERVICE|
000001F0: 20 52 45 51 55 45 53 54  20 43 36 34 20 26 20 56  | REQUEST C64 & V|
00000200: 43 31 35 34 31 20 22 00  13 0A 78 00 2E 4F 50 54  |C1541 "...x..OPT|
00000210: 20 4F 4F 00 19 0A 7D 00  3B 00 3F 0A 82 00 AC B2  | OO...}.;.?.....|
00000220: 24 30 35 30 30 3B 20 49  4D 20 55 53 45 52 50 55  |$0500; IM USERPU|
00000230: 46 46 45 52 20 44 45 52  20 46 4C 4F 50 50 59 00  |FFER DER FLOPPY.|
00000240: 45 0A 8C 00 3B 00 70 0A  F4 01 53 54 41 52 54 20  |E...;.p...START |
00000250: 4C 44 41 20 24 31 43 30  30 3B 20 50 B0 54 20 42  |LDA $1C00; P.T B|
00000260: 20 44 45 53 20 44 43 20  41 42 46 52 41 47 45 4E  | DES DC ABFRAGEN|
00000270: 00 9E 0A FE 01 AF 20 23  25 30 30 30 31 30 30 30  |...... #%0001000|
00000280: 30 3B 20 4C 49 43 48 54  53 43 48 52 41 4E 4B 45  |0; LICHTSCHRANKE|
00000290: 4E 42 49 54 20 49 53 4F  4C 49 45 52 45 4E 00 AA  |NBIT ISOLIEREN..|
000002A0: 0A 08 02 42 45 51 20 41  55 53 00 B0 0A 12 02 3A  |...BEQ AUS.....:|
000002B0: 00 D8 0A 58 02 45 49 4E  20 4C 44 41 20 24 31 43  |...X.EIN LDA $1C|
000002C0: 30 30 3B 50 B0 54 20 42  20 44 45 53 20 44 43 20  |00;P.T B DES DC |
000002D0: 41 42 46 52 41 47 45 4E  00 FA 0A 62 02 B0 41 20  |ABFRAGEN...b..A |
000002E0: 23 25 30 30 30 30 31 30  30 30 3B 20 4C 45 44 AB  |#%00001000; LED.|
000002F0: 42 49 54 20 53 45 54 5A  45 4E 00 19 0B 6C 02 53  |BIT SETZEN...l.S|
00000300: 54 41 20 24 31 43 30 30  3B 20 4C 45 44 20 45 49  |TA $1C00; LED EI|
00000310: 4E 53 43 48 41 4C 54 45  4E 00 1F 0B 8A 02 3B 00  |NSCHALTEN.....;.|
00000320: 44 0B 94 02 4C 44 41 20  24 31 38 30 30 3B 20 50  |D...LDA $1800; P|
00000330: B0 54 20 42 20 44 45 53  20 42 43 20 41 42 46 52  |.T B DES BC ABFR|
00000340: 41 47 45 4E 00 69 0B 9E  02 AF 20 23 25 31 31 31  |AGEN.i.... #%111|
00000350: 31 31 31 30 31 3B 20 83  20 4F 55 54 2D 42 49 54  |11101; . OUT-BIT|
00000360: 20 4C 4F 45 53 43 48 45  4E 00 8E 0B A8 02 53 54  | LOESCHEN.....ST|
00000370: 41 20 24 31 38 30 30 3B  20 83 20 4F 55 54 20 4E  |A $1800; . OUT N|
00000380: 41 43 48 20 4C 4F 57 20  5A 49 45 48 45 4E 00 9C  |ACH LOW ZIEHEN..|
00000390: 0B B2 02 4A 4D 50 20 53  54 41 52 54 00 A2 0B B7  |...JMP START....|
000003A0: 02 3B 00 CA 0B BC 02 41  55 53 20 4C 44 41 20 24  |.;.....AUS LDA $|
000003B0: 31 43 30 30 3B 50 B0 54  20 42 20 44 45 53 20 44  |1C00;P.T B DES D|
000003C0: 43 20 41 42 46 52 41 47  45 4E 00 ED 0B C6 02 AF  |C ABFRAGEN......|
000003D0: 20 23 25 31 31 31 31 30  31 31 31 3B 20 4C 45 44  | #%11110111; LED|
000003E0: AB 42 49 54 20 4C 4F 45  53 43 48 45 4E 00 0C 0C  |.BIT LOESCHEN...|
000003F0: D0 02 53 54 41 20 24 31  43 30 30 3B 20 4C 45 44  |..STA $1C00; LED|
00000400: 20 41 55 53 53 43 48 41  4C 54 45 4E 00 12 0C EE  | AUSSCHALTEN....|
00000410: 02 3B 00 37 0C F8 02 4C  44 41 20 24 31 38 30 30  |.;.7...LDA $1800|
00000420: 3B 20 50 B0 54 20 42 20  44 45 53 20 42 43 20 41  |; P.T B DES BC A|
00000430: 42 46 52 41 47 45 4E 00  5B 0C 02 03 B0 41 20 23  |BFRAGEN.[....A #|
00000440: 25 30 30 30 30 30 30 31  30 3B 20 83 20 4F 55 54  |%00000010; . OUT|
00000450: 2D 42 49 54 20 53 45 54  5A 45 4E 00 7A 0C 0C 03  |-BIT SETZEN.z...|
00000460: 53 54 41 20 24 31 38 30  30 3B 20 83 20 4F 55 54  |STA $1800; . OUT|
00000470: 20 46 52 45 49 47 45 42  45 4E 00 88 0C 16 03 4A  | FREIGEBEN.....J|
00000480: 4D 50 20 53 54 41 52 54  00 00 00                 |MP START...     |
..%.... OPEN 1,8,1,"0:FLOPPY SRQ.OBJ".4.
... OPEN 2,4.].... 32768; EINSP.G FUER N
EUEN PROFIASS.C...;.....; ..............
.................; . FLOPPY SERVICE REQU
EST ..F...; .                        ...
...; .    V.  UWE GERLACH    ......; .  
 TEL.  06151.316205   ..(...; .    BZW. 
 06622.3908    ..I...; .                
        ..J...; .        13.06.86       
 ......; ...............................
;.....;.....; UEBER .-LINE DES SERIELLEN
 BUS.R...; AN DEN COMPUTER.X...;.....;..
.D..TIT "SERVICE REQUEST C64 & VC1541 ".
..X..OPT OO...}.;.?.....$0500; IM USERPU
FFER DER FLOPPY.E...;.P...START LDA $1C0
0; P.T B DES DC ABFRAGEN...... #%0001000
0; LICHTSCHRANKENBIT ISOLIEREN.....BEQ A
US.....:.X.X.EIN LDA $1C00;P.T B DES DC 
ABFRAGEN...B..A #%00001000; LED.BIT SETZ
EN...L.STA $1C00; LED EINSCHALTEN.....;.
D...LDA $1800; P.T B DES BC ABFRAGEN.I..
.. #%11111101; . OUT-BIT LOESCHEN.....ST
A $1800; . OUT NACH LOW ZIEHEN.....JMP S
TART.....;.J...AUS LDA $1C00;P.T B DES D
C ABFRAGEN...F.. #%11110111; LED.BIT LOE
SCHEN...P.STA $1C00; LED AUSSCHALTEN....
.;.7...LDA $1800; P.T B DES BC ABFRAGEN.
[....A #%00000010; . OUT-BIT SETZEN.Z...
STA $1800; . OUT FREIGEBEN.....JMP START
...
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL