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

S-RWABS.S5

FILE INFORMATION

FILENAME(S): S-RWABS.S5

FILE TYPE(S): PRG

FILE SIZE: 1.5K

FIRST SEEN: 2025-12-02 00:13:21

APPEARS ON: 1 disk(s)

FILE HASH

92839310d2ad769812798cf902563623698b89ea004e2cc2653bcc9cbeb3929a

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
10906 SEITE B S-RWABS.S5 PRG earthshaker 23 6 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

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

00000000: 01 08 1B 08 5A 00 9F 31  2C 38 2C 31 2C 22 53 2D  |....Z..1,8,1,"S-|
00000010: 52 57 41 42 53 20 37 46  2F 41 22 00 37 08 64 00  |RWABS 7F/A".7.d.|
00000020: 9E 37 AC 34 30 39 36 3A  2E 4F 50 54 20 4F 31 3A  |.7.4096:.OPT O1:|
00000030: AC B2 24 37 46 30 30 00  42 08 6E 00 50 52 47 20  |..$7F00.B.n.PRG |
00000040: B2 31 00 52 08 78 00 42  44 4F 53 20 B2 24 41 30  |.1.R.x.BDOS .$A0|
00000050: 30 30 00 62 08 7D 00 2E  8B 20 23 3A 2E 89 20 32  |00.b.}... #:.. 2|
00000060: 31 30 00 73 08 82 00 2E  49 43 4C 20 38 2C 22 42  |10.s....ICL 8,"B|
00000070: 44 53 2A 00 84 08 8C 00  2E 49 43 4C 20 38 2C 22  |DS*......ICL 8,"|
00000080: 42 44 4B 2A 00 95 08 96  00 2E 49 43 4C 20 38 2C  |BDK*......ICL 8,|
00000090: 22 42 44 4A 2A 00 A6 08  A0 00 2E 49 43 4C 20 38  |"BDJ*......ICL 8|
000000A0: 2C 22 42 44 45 2A 00 B7  08 AA 00 43 55 52 53 B0  |,"BDE*.....CURS.|
000000B0: 20 B2 24 46 46 46 30 00  C5 08 D2 00 3B AC AC AC  | .$FFF0.....;...|
000000C0: AC AC AC AC AC 00 F3 08  DC 00 52 44 49 4E 49 54  |..........RDINIT|
000000D0: 20 4A 53 52 20 56 45 52  53 49 91 3A 53 54 58 20  | JSR VERSI.:STX |
000000E0: 52 57 42 5A 45 49 3A 53  54 59 20 52 57 42 5A 45  |RWBZEI:STY RWBZE|
000000F0: 49 AA 31 00 2D 09 E6 00  4C 44 59 20 23 56 45 4A  |I.1.-...LDY #VEJ|
00000100: 4D 50 41 44 52 AA 31 3A  4C 44 41 20 28 52 57 42  |MPADR.1:LDA (RWB|
00000110: 5A 45 49 29 2C 59 FF FF  FF E3 FF FF FF FF FF FF  |ZEI),Y..........|
00000120: FF FF FF FF FF FF FF FF  FF D3 FF FF FF FF D2 F3  |................|
00000130: FF FF FF FF FF FF FF FF  FF FF FF D3 FF FF FF E3  |................|
00000140: FF FF FF FF FF FF D3 FF  FF FF FF F3 FF FF FF FF  |................|
00000150: E3 FF FF FF FF FF F2 FF  FF FF FF FF FF FF FF FF  |................|
00000160: FF DA FF FF FF FF FF E2  FF 22 F2 FF FF FF FF FF  |........."......|
00000170: FF FF FF FF FF FF FF D3  FF FF FF FF FF FF FF FF  |................|
00000180: FF DA FF D0 FF FF FF E2  FF FF F2 62 FF FF FF FF  |...........b....|
00000190: FF FF DA EF FF FF E3 FF  FF FF FF FF FF FF FF FF  |................|
000001A0: FF FF D3 FF FF FF FF FF  F3 FF FF D2 FF E3 FF D2  |................|
000001B0: FF FF FF FF F3 FF FF FF  FF FF FF FF FF FF FF FF  |................|
000001C0: FF D3 FF FF FF FF FF FF  FF FF FF DA FF D0 FF FF  |................|
000001D0: FF E2 FF FF F3 FF FF FF  FF FF FF FF DA EF FF FF  |................|
000001E0: E3 FF FF FF FF FF FF FF  FF FF FF FF D3 FF FF FF  |................|
000001F0: FF 0A F2 FF FF D2 FF E3  FF D2 FF FF 00 23 0A 4A  |.............#.J|
00000200: 01 43 50 58 20 23 41 4E  5A A2 AC 32 3B 20 41 4E  |.CPX #ANZ..2; AN|
00000210: 5A 41 48 4C 20 4E 45 55  45 52 20 52 4F 55 54 49  |ZAHL NEUER ROUTI|
00000220: 4E 45 4E 00 2E 0A 54 01  42 43 43 20 4C 31 00 40  |NEN...T.BCC L1.@|
00000230: 0A 59 01 54 80 20 4C 44  41 20 23 30 3A 52 54 53  |.Y.T. LDA #0:RTS|
00000240: 00 4F 0A E7 03 3B AC AC  AC AC AC AC AC AC AC 00  |.O...;..........|
00000250: 7F 0A E8 03 54 52 57 B6  20 20 53 54 41 20 5A 45  |....TRW.  STA ZE|
00000260: 49 3A 53 54 59 20 5A 45  49 AA 31 3A 50 48 41 3A  |I:STY ZEI.1:PHA:|
00000270: 54 59 41 3A 50 48 41 3A  54 58 41 3A 50 48 41 00  |TYA:PHA:TXA:PHA.|
00000280: A6 0A ED 03 53 45 43 3A  4A 53 52 20 43 55 52 53  |....SEC:JSR CURS|
00000290: B0 3A 53 54 58 20 5A 45  49 4C 45 3A 53 54 59 20  |.:STX ZEILE:STY |
000002A0: 53 50 41 4C 54 45 00 C7  0A F2 03 4C 44 58 20 23  |SPALTE.....LDX #|
000002B0: 30 3A 4C 44 59 20 23 31  35 3A 43 4C 43 3A 4A 53  |0:LDY #15:CLC:JS|
000002C0: 52 20 43 55 52 53 B0 00  FF 0A FC 03 4C 44 59 20  |R CURS......LDY |
000002D0: 23 41 50 52 57 46 4C 41  47 3A 4C 44 41 20 28 5A  |#APRWFLAG:LDA (Z|
000002E0: 45 49 29 2C 59 3A 42 45  51 20 4C 31 41 3A 4C 44  |EI),Y:BEQ L1A:LD|
000002F0: 41 20 23 22 57 22 3A 2E  42 59 54 20 24 32 43 00  |A #"W":.BYT $2C.|
00000300: 24 0B 06 04 4C 31 41 20  4C 44 41 20 23 22 52 22  |$...L1A LDA #"R"|
00000310: 3A 4A 53 52 20 42 53 4F  55 54 3A 4A 53 52 20 53  |:JSR BSOUT:JSR S|
00000320: 50 4F 55 54 00 4D 0B 10  04 4C 44 59 20 23 41 50  |POUT.M...LDY #AP|
00000330: 44 52 49 56 45 3A 4C 44  41 20 28 5A 45 49 29 2C  |DRIVE:LDA (ZEI),|
00000340: 59 3A 4A 53 52 20 48 45  58 53 4F 55 54 00 77 0B  |Y:JSR HEXSOUT.w.|
00000350: 1A 04 4C 44 59 20 23 41  50 52 45 43 B0 44 AA 31  |..LDY #APREC.D.1|
00000360: 3A 4C 44 41 20 28 5A 45  49 29 2C 59 3A 4A 53 52  |:LDA (ZEI),Y:JSR|
00000370: 20 48 45 58 4F 55 54 00  97 0B 1B 04 44 45 59 3A  | HEXOUT.....DEY:|
00000380: 4C 44 41 20 28 5A 45 49  29 2C 59 3A 4A 53 52 20  |LDA (ZEI),Y:JSR |
00000390: 48 45 58 53 4F 55 54 00  BF 0B 24 04 4C 44 59 20  |HEXSOUT...$.LDY |
000003A0: 23 41 50 41 4E 5A AA 31  3A 4C 44 41 20 28 5A 45  |#APANZ.1:LDA (ZE|
000003B0: 49 29 2C 59 3A 4A 53 52  20 48 45 58 4F 55 54 00  |I),Y:JSR HEXOUT.|
000003C0: DF 0B 25 04 44 45 59 3A  4C 44 41 20 28 5A 45 49  |..%.DEY:LDA (ZEI|
000003D0: 29 2C 59 3A 4A 53 52 20  48 45 58 53 4F 55 54 00  |),Y:JSR HEXSOUT.|
000003E0: 0A 0C 2E 04 4C 44 59 20  23 41 50 42 55 46 46 45  |....LDY #APBUFFE|
000003F0: 52 AA 31 3A 4C 44 41 20  28 5A 45 49 29 2C 59 3A  |R.1:LDA (ZEI),Y:|
00000400: 4A 53 52 20 48 45 58 4F  55 54 00 2A 0C 2F 04 44  |JSR HEXOUT.*./.D|
00000410: 45 59 3A 4C 44 41 20 28  5A 45 49 29 2C 59 3A 4A  |EY:LDA (ZEI),Y:J|
00000420: 53 52 20 48 45 58 53 4F  55 54 00 51 0C 4C 04 4C  |SR HEXSOUT.Q.L.L|
00000430: 44 59 20 23 41 50 42 41  4E 4B 3A 4C 44 41 20 28  |DY #APBANK:LDA (|
00000440: 5A 45 49 29 2C 59 3A 4A  53 52 20 48 45 58 4F 55  |ZEI),Y:JSR HEXOU|
00000450: 54 00 6B 0C 56 04 4C 31  42 20 4A 53 52 20 24 46  |T.k.V.L1B JSR $F|
00000460: 46 45 34 3A 42 45 51 20  4C 31 42 00 92 0C B0 04  |FE4:BEQ L1B.....|
00000470: 4C 44 58 20 5A 45 49 4C  45 3A 4C 44 59 20 53 50  |LDX ZEILE:LDY SP|
00000480: 41 4C 54 45 3A 43 4C 43  3A 4A 53 52 20 43 55 52  |ALTE:CLC:JSR CUR|
00000490: 53 B0 00 B5 0C 6C 07 50  4C 41 3A 54 41 58 3A 50  |S....l.PLA:TAX:P|
000004A0: 4C 41 3A 54 41 59 3A 50  4C 41 3A 4A 4D 50 20 28  |LA:TAY:PLA:JMP (|
000004B0: 56 52 57 B6 29 00 C6 0C  C6 07 5A 45 49 4C 45 20  |VRW.).....ZEILE |
000004C0: 2E 42 59 54 20 30 00 D8  0C C7 07 53 50 41 4C 54  |.BYT 0.....SPALT|
000004D0: 45 20 2E 42 59 54 20 30  00 E3 0C CF 07 3B AC AC  |E .BYT 0.....;..|
000004E0: AC AC AC 00 0D 0D D0 07  48 45 58 4F 55 54 20 50  |........HEXOUT P|
000004F0: 48 41 3A 4C 53 52 3A 4C  53 52 3A 4C 53 52 3A 4C  |HA:LSR:LSR:LSR:L|
00000500: 53 52 3A 4A 53 52 20 4E  49 42 4F 55 54 00 1C 0D  |SR:JSR NIBOUT...|
00000510: DA 07 50 4C 41 3A AF 20  23 24 30 46 00 48 0D E4  |..PLA:. #$0F.H..|
00000520: 07 4E 49 42 4F 55 54 20  43 4C 43 3A 41 44 43 20  |.NIBOUT CLC:ADC |
00000530: 23 22 30 22 3A 43 4D 50  20 23 22 39 22 AA 31 3A  |#"0":CMP #"9".1:|
00000540: 42 43 43 20 4E 49 42 31  00 62 0D EE 07 41 44 43  |BCC NIB1.b...ADC|
00000550: 20 23 36 3A 4E 49 42 31  20 4A 4D 50 20 42 53 4F  | #6:NIB1 JMP BSO|
00000560: 55 54 00 92 0D F8 07 48  45 58 53 4F 55 54 20 4A  |UT.....HEXSOUT J|
00000570: 53 52 20 48 45 58 4F 55  54 3A 53 50 4F 55 54 20  |SR HEXOUT:SPOUT |
00000580: 4C 44 41 20 23 22 20 22  3A 4A 4D 50 20 42 53 4F  |LDA #" ":JMP BSO|
00000590: 55 54 00 A2 0D 1F 4E 3B  AC AC AC AC AC AC AC AC  |UT....N;........|
000005A0: AC AC 00 AE 0D 2A 4E 41  4E 5A A2 20 B2 31 00 B9  |.....*NANZ. .1..|
000005B0: 0D 34 4E 4A 4D 50 41 44  52 00 D3 0D 3E 4E 2E 57  |.4NJMPADR...>N.W|
000005C0: B0 44 20 20 52 57 B6 20  20 20 AB 42 44 4F 53 AC  |.D  RW.   .BDOS.|
000005D0: 32 AD 33 00 DC 0D 66 4E  4A 4D 50 A2 00 EB 0D 70  |2.3...fNJMP....p|
000005E0: 4E 2E 57 B0 44 20 20 54  52 57 B6 00 F6 0D 98 4E  |N.W.D  TRW.....N|
000005F0: 4A 4D 50 4F 4C 44 00 08  0E A2 4E 56 52 57 B6 20  |JMPOLD....NVRW. |
00000600: 20 20 2E 57 B0 44 20 30  00 00 00                 |  .W.D 0...     |
....Z..1,8,1,"S-RWABS 7F/A".7.D..7.4096:
.OPT O1:..$7F00.B.N.PRG .1.R.X.BDOS .$A0
00.B.}... #:.. 210.S....ICL 8,"BDS*.....
.ICL 8,"BDK*......ICL 8,"BDJ*... ..ICL 8
,"BDE*.....CURS. .$FFF0.E.R.;...........
..RDINIT JSR VERSI.:STX RWBZEI:STY RWBZE
I.1.-...LDY #VEJMPADR.1:LDA (RWBZEI),Y..
.................S....R............S....
......S..........................Z......
.".............S.........Z.P.......B....
..Z...............S........R...R........
.........S.........Z.P..............Z...
............S........R...R...#.J.CPX #AN
Z..2; ANZAHL NEUER ROUTINEN...T.BCC L1.@
.Y.T. LDA #0:RTS.O...;.............TRW.
  STA ZEI:STY ZEI.1:PHA:TYA:PHA:TXA:PHA.
....SEC:JSR CURS.:STX ZEILE:STY SPALTE.G
...LDX #0:LDY #15:CLC:JSR CURS......LDY 
#APRWFLAG:LDA (ZEI),Y:BEQ L1A:LDA #"W":.
BYT $2C.$...L1A LDA #"R":JSR BSOUT:JSR S
POUT.M...LDY #APDRIVE:LDA (ZEI),Y:JSR HE
XSOUT.W...LDY #APREC.D.1:LDA (ZEI),Y:JSR
 HEXOUT.....DEY:LDA (ZEI),Y:JSR HEXSOUT.
..$.LDY #APANZ.1:LDA (ZEI),Y:JSR HEXOUT.
..%.DEY:LDA (ZEI),Y:JSR HEXSOUT.....LDY 
#APBUFFER.1:LDA (ZEI),Y:JSR HEXOUT.*./.D
EY:LDA (ZEI),Y:JSR HEXSOUT.Q.L.LDY #APBA
NK:LDA (ZEI),Y:JSR HEXOUT.K.V.L1B JSR $F
FE4:BEQ L1B.....LDX ZEILE:LDY SPALTE:CLC
:JSR CURS....L.PLA:TAX:PLA:TAY:PLA:JMP (
VRW.).F.F.ZEILE .BYT 0.X.G.SPALTE .BYT 0
...O.;........P.HEXOUT PHA:LSR:LSR:LSR:L
SR:JSR NIBOUT...Z.PLA:. #$0F.H...NIBOUT 
CLC:ADC #"0":CMP #"9".1:BCC NIB1.B...ADC
 #6:NIB1 JMP BSOUT.....HEXSOUT JSR HEXOU
T:SPOUT LDA #" ":JMP BSOUT....N;........
.....*NANZ. .1...4NJMPADR.S.>N.W.D  RW. 
  .BDOS.2.3...FNJMP....PN.W.D  TRW.....N
JMPOLD....NVRW.   .W.D 0...
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL