S-FLOPRW.S5
FILE INFORMATION
FILENAME(S): S-FLOPRW.S5
FILE TYPE(S): PRG
FILE SIZE: 1.5K
FIRST SEEN: 2025-12-02 00:13:21
APPEARS ON: 1 disk(s)
FILE HASH
f9a0ca5aa56a06381913770ab9b2d2c94be1f5f3f85fd79f3969f7f13942531e
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| 10906 SEITE B | S-FLOPRW.S5 | PRG | earthshaker | 23 | 8 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1C 08 5A 00 9F 31 2C 38 2C 31 2C 22 53 2D |....Z..1,8,1,"S-| 00000010: 46 4C 4F 50 52 57 20 37 45 2F 41 22 00 38 08 64 |FLOPRW 7E/A".8.d| 00000020: 00 9E 37 AC 34 30 39 36 3A 2E 4F 50 54 20 4F 31 |..7.4096:.OPT O1| 00000030: 3A AC B2 24 37 45 30 30 00 43 08 6E 00 50 52 47 |:..$7E00.C.n.PRG| 00000040: 20 B2 31 00 53 08 78 00 42 44 4F 53 20 B2 24 41 | .1.S.x.BDOS .$A| 00000050: 30 30 30 00 63 08 7D 00 2E 8B 20 23 3A 2E 89 20 |000.c.}... #:.. | 00000060: 32 31 30 00 74 08 82 00 2E 49 43 4C 20 38 2C 22 |210.t....ICL 8,"| 00000070: 42 44 53 2A 00 85 08 8C 00 2E 49 43 4C 20 38 2C |BDS*......ICL 8,| 00000080: 22 42 44 4B 2A 00 96 08 96 00 2E 49 43 4C 20 38 |"BDK*......ICL 8| 00000090: 2C 22 42 44 4A 2A 00 A7 08 A0 00 2E 49 43 4C 20 |,"BDJ*......ICL | 000000A0: 38 2C 22 42 44 45 2A 00 B8 08 AA 00 43 55 52 53 |8,"BDE*.....CURS| 000000B0: B0 20 B2 24 46 46 46 30 00 C6 08 D2 00 3B AC AC |. .$FFF0.....;..| 000000C0: AC AC AC AC AC AC 00 F4 08 DC 00 52 44 49 4E 49 |...........RDINI| 000000D0: 54 20 4A 53 52 20 56 45 52 53 49 91 3A 53 54 58 |T JSR VERSI.:STX| 000000E0: 20 52 57 42 5A 45 49 3A 53 54 59 20 52 57 42 5A | RWBZEI:STY RWBZ| 000000F0: 45 49 AA 31 00 2E 09 E6 00 4C 44 59 20 23 56 45 |EI.1.....LDY #VE| 00000100: 4A 4D 50 41 44 52 AA 31 3A 4C 44 41 20 28 52 57 |JMPADR.1:LDA (RW| 00000110: 42 5A 45 49 29 2C 59 3A 54 41 58 3A 44 45 59 3A |BZEI),Y:TAX:DEY:| 00000120: 4C 44 41 20 28 52 57 42 5A 45 49 29 2C 59 00 4A |LDA (RWBZEI),Y.J| 00000130: 09 F0 00 53 54 41 20 52 57 42 5A 45 49 3A 53 54 |...STA RWBZEI:ST| 00000140: 58 20 52 57 42 5A 45 49 AA 31 00 55 09 FA 00 4C |X RWBZEI.1.U...L| 00000150: 44 58 20 23 30 00 69 09 04 01 4C 31 20 4C 44 59 |DX #0.i...L1 LDY| 00000160: 20 4A 4D 50 41 44 52 2C 58 00 89 09 0E 01 4C 44 | JMPADR,X.....LD| 00000170: 41 20 28 52 57 42 5A 45 49 29 2C 59 3A 53 54 41 |A (RWBZEI),Y:STA| 00000180: 20 4A 4D 50 4F 4C 44 2C 58 00 A7 09 18 01 4C 44 | JMPOLD,X.....LD| 00000190: 41 20 4A 4D 50 A2 2C 58 3A 53 54 41 20 28 52 57 |A JMP.,X:STA (RW| 000001A0: 42 5A 45 49 29 2C 59 00 B3 09 22 01 49 4E 58 3A |BZEI),Y...".INX:| 000001B0: 49 4E 59 00 D3 09 2C 01 4C 44 41 20 28 52 57 42 |INY...,.LDA (RWB| 000001C0: 5A 45 49 29 2C 59 3A 53 54 41 20 4A 4D 50 4F 4C |ZEI),Y:STA JMPOL| 000001D0: 44 2C 58 00 F1 09 36 01 4C 44 41 20 4A 4D 50 A2 |D,X...6.LDA JMP.| 000001E0: 2C 58 3A 53 54 41 20 28 52 57 42 5A 45 49 29 2C |,X:STA (RWBZEI),| 000001F0: 59 00 FD 09 40 01 49 4E 58 3A 49 4E 59 00 24 0A |Y...@.INX:INY.$.| 00000200: 4A 01 43 50 58 20 23 41 4E 5A A2 AC 32 3B 20 41 |J.CPX #ANZ..2; A| 00000210: 4E 5A 41 48 4C 20 4E 45 55 45 52 20 52 4F 55 54 |NZAHL NEUER ROUT| 00000220: 49 4E 45 4E 00 2F 0A 54 01 42 43 43 20 4C 31 00 |INEN./.T.BCC L1.| 00000230: 41 0A 59 01 54 80 20 4C 44 41 20 23 30 3A 52 54 |A.Y.T. LDA #0:RT| 00000240: 53 00 50 0A E7 03 3B AC AC AC AC AC AC AC AC AC |S.P...;.........| 00000250: 00 82 0A E8 03 54 46 4C 4F 50 52 57 20 53 54 41 |.....TFLOPRW STA| 00000260: 20 5A 45 49 3A 53 54 59 20 5A 45 49 AA 31 3A 50 | ZEI:STY ZEI.1:P| 00000270: 48 41 3A 54 59 41 3A 50 48 41 3A 54 58 41 3A 50 |HA:TYA:PHA:TXA:P| 00000280: 48 41 00 A9 0A ED 03 53 45 43 3A 4A 53 52 20 43 |HA.....SEC:JSR C| 00000290: 55 52 53 B0 3A 53 54 58 20 5A 45 49 4C 45 3A 53 |URS.:STX ZEILE:S| 000002A0: 54 59 20 53 50 41 4C 54 45 00 CA 0A F2 03 4C 44 |TY SPALTE.....LD| 000002B0: 58 20 23 30 3A 4C 44 59 20 23 31 38 3A 43 4C 43 |X #0:LDY #18:CLC| 000002C0: 3A 4A 53 52 20 43 55 52 53 B0 00 02 0B FC 03 4C |:JSR CURS......L| 000002D0: 44 59 20 23 50 42 52 57 46 4C 41 47 3A 4C 44 41 |DY #PBRWFLAG:LDA| 000002E0: 20 28 5A 45 49 29 2C 59 3A 42 45 51 20 4C 31 41 | (ZEI),Y:BEQ L1A| 000002F0: 3A 4C 44 41 20 23 22 57 22 3A 2E 42 59 54 20 24 |:LDA #"W":.BYT $| 00000300: 32 43 00 27 0B 06 04 4C 66 FF FF FF FF FF FF FF |2C.'...Lf.......| 00000310: FF FF FF FF FF FF FF FF FF FF D0 EE ED FF FF FF |................| 00000320: FF FF FF FF D0 EE FF FF FF F6 FF FF FF FF FF FF |................| 00000330: FF FF FF FF FF D2 FF FF FF FF FF FF FF FF FF FF |................| 00000340: D3 FF FF FF FF FF FF FF FF FF FF E2 FF D0 EE FF |................| 00000350: FF 42 F6 FF FF FF FF FF FF FF FF FF FF D2 FF FF |.B..............| 00000360: FF FF FF FF FF FF FF FF D3 FF FF FF FF FF FF E0 |................| 00000370: 88 FF 9D FF EC AF DD D9 81 8C 14 89 89 9F 99 FF |................| 00000380: 80 0C D8 A8 D9 E8 9C AC B4 58 9F 99 94 80 FF FF |.........X......| 00000390: 9D FF FF 8F FF 58 B8 EC E0 88 FF 9D FF EB F1 BB |.....X..........| 000003A0: B2 23 42 FF 72 33 31 33 FF FF FF A3 FF FF 3B FF |.#B.r313......;.| 000003B0: 33 FF E3 31 33 FF FF 21 E3 3B FF FF 31 FF E3 63 |3..13..!.;..1..c| 000003C0: FF FF 23 21 3B A1 FF F1 BB B2 2F 1A FF A0 33 31 |..#!;...../...31| 000003D0: 33 FF FF FF A3 FF FF BB F3 F3 3B FF FF FF E3 31 |3.........;....1| 000003E0: 33 FF FF 21 E3 3B 60 FF 8F FF 58 B8 EC E0 88 FF |3..!.;`...X.....| 000003F0: 9D FF AF DD D9 88 CD 86 42 04 44 45 59 3A 4C 44 |........B.DEY:LD| 00000400: 41 20 28 5A 45 49 29 2C 59 3A 4A 53 52 20 48 45 |A (ZEI),Y:JSR HE| 00000410: 58 53 4F 55 54 00 3C 0C 4C 04 4C 44 59 20 23 50 |XSOUT.<.L.LDY #P| 00000420: 42 42 41 4E 4B 3A 4C 44 41 20 28 5A 45 49 29 2C |BBANK:LDA (ZEI),| 00000430: 59 3A 4A 53 52 20 48 45 58 4F 55 54 00 56 0C 56 |Y:JSR HEXOUT.V.V| 00000440: 04 4C 31 42 20 4A 53 52 20 24 46 46 45 34 3A 42 |.L1B JSR $FFE4:B| 00000450: 45 51 20 4C 31 42 00 7D 0C B0 04 4C 44 58 20 5A |EQ L1B.}...LDX Z| 00000460: 45 49 4C 45 3A 4C 44 59 20 53 50 41 4C 54 45 3A |EILE:LDY SPALTE:| 00000470: 43 4C 43 3A 4A 53 52 20 43 55 52 53 B0 00 A3 0C |CLC:JSR CURS....| 00000480: 6C 07 50 4C 41 3A 54 41 58 3A 50 4C 41 3A 54 41 |l.PLA:TAX:PLA:TA| 00000490: 59 3A 50 4C 41 3A 4A 4D 50 20 28 56 46 4C 4F 50 |Y:PLA:JMP (VFLOP| 000004A0: 52 57 29 00 B4 0C C6 07 5A 45 49 4C 45 20 2E 42 |RW).....ZEILE .B| 000004B0: 59 54 20 30 00 C6 0C C7 07 53 50 41 4C 54 45 20 |YT 0.....SPALTE | 000004C0: 2E 42 59 54 20 30 00 D1 0C CF 07 3B AC AC AC AC |.BYT 0.....;....| 000004D0: AC 00 FB 0C D0 07 48 45 58 4F 55 54 20 50 48 41 |......HEXOUT PHA| 000004E0: 3A 4C 53 52 3A 4C 53 52 3A 4C 53 52 3A 4C 53 52 |:LSR:LSR:LSR:LSR| 000004F0: 3A 4A 53 52 20 4E 49 42 4F 55 54 00 0A 0D DA 07 |:JSR NIBOUT.....| 00000500: 50 4C 41 3A AF 20 23 24 30 46 00 36 0D E4 07 4E |PLA:. #$0F.6...N| 00000510: 49 42 4F 55 54 20 43 4C 43 3A 41 44 43 20 23 22 |IBOUT CLC:ADC #"| 00000520: 30 22 3A 43 4D 50 20 23 22 39 22 AA 31 3A 42 43 |0":CMP #"9".1:BC| 00000530: 43 20 4E 49 42 31 00 50 0D EE 07 41 44 43 20 23 |C NIB1.P...ADC #| 00000540: 36 3A 4E 49 42 31 20 4A 4D 50 20 42 53 4F 55 54 |6:NIB1 JMP BSOUT| 00000550: 00 80 0D F8 07 48 45 58 53 4F 55 54 20 4A 53 52 |.....HEXSOUT JSR| 00000560: 20 48 45 58 4F 55 54 3A 53 50 4F 55 54 20 4C 44 | HEXOUT:SPOUT LD| 00000570: 41 20 23 22 20 22 3A 4A 4D 50 20 42 53 4F 55 54 |A #" ":JMP BSOUT| 00000580: 00 90 0D 1F 4E 3B AC AC AC AC AC AC AC AC AC AC |....N;..........| 00000590: 00 9C 0D 2A 4E 41 4E 5A A2 20 B2 31 00 A7 0D 34 |...*NANZ. .1...4| 000005A0: 4E 4A 4D 50 41 44 52 00 C3 0D FF DD FF FF FF FF |NJMPADR.........| 000005B0: FF FF FF FF D0 FF FF FF FF FF F6 FF FF D0 FF FF |................| 000005C0: FF FB FF FF AA FB FF FF FF DA EF FF FF FF FB FF |................| 000005D0: DD FF FF FF FF FF FF FF FF FF D0 FF FF FF FF D2 |................| 000005E0: FB 22 FF FF DA FF D0 FF FF FF 1A FB FF FF FF FF |."..............| 000005F0: FF D0 FF FF 57 20 20 2E 57 B0 44 20 30 00 00 00 |....W .W.D 0...|
....Z..1,8,1,"S-FLOPRW 7E/A".8.D..7.4096 :.OPT O1:..$7E00.C.N.PRG .1.S.X.BDOS .$A 000.C.}... #:.. 210.T....ICL 8,"BDS*.... ..ICL 8,"BDK*......ICL 8,"BDJ*... ..ICL 8,"BDE*.....CURS. .$FFF0.F.R.;.......... ...RDINIT JSR VERSI.:STX RWBZEI:STY RWBZ EI.1.....LDY #VEJMPADR.1:LDA (RWBZEI),Y: TAX:DEY:LDA (RWBZEI),Y.J...STA RWBZEI:ST X RWBZEI.1.U...LDX #0.I...L1 LDY JMPADR, X.....LDA (RWBZEI),Y:STA JMPOLD,X.....LD A JMP.,X:STA (RWBZEI),Y...".INX:INY.S.,. LDA (RWBZEI),Y:STA JMPOLD,X...6.LDA JMP. ,X:STA (RWBZEI),Y...@.INX:INY.$.J.CPX #A NZ..2; ANZAHL NEUER ROUTINEN./.T.BCC L1. A.Y.T. LDA #0:RTS.P...;..............TFL OPRW STA ZEI:STY ZEI.1:PHA:TYA:PHA:TXA:P HA.....SEC:JSR CURS.:STX ZEILE:STY SPALT E.J...LDX #0:LDY #18:CLC:JSR CURS......L DY #PBRWFLAG:LDA (ZEI),Y:BEQ L1A:LDA #"W ":.BYT $2C.'...LF.................P..... ....P................R..........S....... .....P...B...........R..........S....... .......Y..........X.Y....X...........X.. .........#B.R313......;.3..13..!.;..1..C ..#!;...../.. 313.........;....13..!.;`. ..X.........Y.M.B.DEY:LDA (ZEI),Y:JSR HE XSOUT.<.L.LDY #PBBANK:LDA (ZEI),Y:JSR HE XOUT.V.V.L1B JSR $FFE4:BEQ L1B.}...LDX Z EILE:LDY SPALTE:CLC:JSR CURS....L.PLA:TA X:PLA:TAY:PLA:JMP (VFLOPRW)...F.ZEILE .B YT 0.F.G.SPALTE .BYT 0.Q.O.;........P.HE XOUT PHA:LSR:LSR:LSR:LSR:JSR NIBOUT...Z. PLA:. #$0F.6...NIBOUT CLC:ADC #"0":CMP # "9".1:BCC NIB1.P...ADC #6:NIB1 JMP BSOUT .....HEXSOUT JSR HEXOUT:SPOUT LDA #" ":J MP BSOUT....N;.............*NANZ. .1...4 NJMPADR.C...........P........P.......... .Z................P....R."..Z.P......... .P..W .W.D 0...
> CLICK IMAGE PREVIEW FOR FULL MODAL