─/ -> ─ TRANS

FILE INFORMATION

FILENAME(S): ─/ -> ─ TRANS

FILE TYPE(S): PRG

FILE SIZE: 1.7K

FIRST SEEN: 2025-10-20 14:30:06

APPEARS ON: 2 disk(s)

FILE HASH

0190720790ca4b7fb58e8bde572e213d6346a98444fe2c883c91213499ca8e58

FOUND ON DISKS (2 DISKS)

DISK TITLE	FILENAME	FILE TYPE	COLLECTION	TRACK	SECTOR	ACTIONS
10002 SEITE C	─/ -> ─ TRANS	PRG	C64er, earthshaker, Treasure Chest - Klaus Der Suhler	14	11	DOWNLOAD FILE
10002 SEITE C	─/ -> ─ TRANS	PRG	DuncanTwain	14	11	DOWNLOAD FILE

FILE CONTENT & ANALYSIS

00000000: 01 1C 1F 1C 0A 00 8F 20  4C 49 53 54 49 4E 47 20  |....... LISTING |
00000010: 37 20 20 20 20 4A 41 4E  55 53 20 56 32 2E 30 00  |7    JANUS V2.0.|
00000020: 36 1C 14 00 8F 20 43 50  2F 4D 20 2D 3E 20 43 3D  |6.... CP/M -> C=|
00000030: 20 54 52 41 4E 53 00 5C  1C 1E 00 8F 20 4C 49 45  | TRANS.\.... LIE|
00000040: 53 54 20 44 41 54 45 49  45 4E 20 41 55 53 20 43  |ST DATEIEN AUS C|
00000050: 50 2F 4D 20 53 50 45 49  43 48 45 52 00 93 1C 28  |P/M SPEICHER...(|
00000060: 00 8F 20 55 4E 44 20 55  45 42 45 52 54 52 41 45  |.. UND UEBERTRAE|
00000070: 47 54 20 53 49 45 20 55  45 42 45 52 20 43 31 32  |GT SIE UEBER C12|
00000080: 38 20 4D 4F 44 55 53 20  4E 41 43 48 20 4D 53 2D  |8 MODUS NACH MS-|
00000090: 44 4F 53 00 C3 1C 32 00  8F 20 45 49 4E 20 50 52  |DOS...2.. EIN PR|
000000A0: 4F 47 52 41 4D 4D 20 56  4F 4E 20 4F 4C 41 46 20  |OGRAMM VON OLAF |
000000B0: 4B 55 42 49 54 5A 2C 20  42 45 52 4C 49 4E 20 31  |KUBITZ, BERLIN 1|
000000C0: 39 38 39 00 C9 1C 3C 00  8F 00 D1 1C 46 00 FE 02  |989...<.....F...|
000000D0: 30 00 EF 1C 50 00 8B 20  C2 28 D1 28 22 35 30 30  |0...P.. .(.("500|
000000E0: 30 22 29 29 20 B3 B1 20  37 36 20 A7 20 FE 18 00  |0")) .. 76 . ...|
000000F0: 2A 1D 5A 00 99 22 C4 49  53 4B 45 54 54 45 20 4D  |*.Z..".ISKETTE M|
00000100: 49 54 20 CA 41 4E 55 53  2D D0 52 4F 47 52 41 4D  |IT .ANUS-.ROGRAM|
00000110: 4D 20 45 49 4E 4C 45 47  45 4E 20 21 20 3C D4 41  |M EINLEGEN ! <.A|
00000120: 53 54 45 3E 22 3A A1 F9  57 24 00 32 1D 64 00 FE  |STE>":..W$.2.d..|
00000130: 02 30 00 4D 1D 6E 00 FE  11 20 22 4A 41 4E 55 53  |.0.M.n... "JANUS|
00000140: 20 56 32 2E 30 20 50 52  47 22 2C 42 30 00 69 1D  | V2.0 PRG",B0.i.|
00000150: 78 00 FE 11 22 4A 41 4E  55 53 2D 46 55 4E 4B 54  |x..."JANUS-FUNKT|
00000160: 41 53 54 45 4E 22 2C 42  30 00 73 1D 82 00 FE 02  |ASTEN",B0.s.....|
00000170: 20 31 35 00 8F 1D 8C 00  FE 1B 20 22 4A 41 4E 55  | 15....... "JANU|
00000180: 53 20 56 32 2E 30 20 42  41 53 22 2C 42 31 35 00  |S V2.0 BAS",B15.|
00000190: AA 1D 96 00 FE 11 22 4A  41 4E 55 53 20 56 32 2E  |......"JANUS V2.|
000001A0: 30 20 53 57 41 50 22 2C  42 30 00 B1 1D A0 00 FE  |0 SWAP",B0......|
000001B0: 19 00 F4 1D AA 00 4D 58  20 B2 20 D1 28 22 33 39  |......MX . .("39|
000001C0: 22 29 3A 20 97 20 4D 58  2C 30 3A 97 20 4D 58 AA  |"): . MX,0:. MX.|
000001D0: 31 2C 20 D1 28 22 32 34  22 29 3A 20 9C 20 3A 8F  |1, .("24"): . :.|
000001E0: 20 56 41 52 49 41 42 4C  45 4E 20 42 45 47 52 45  | VARIABLEN BEGRE|
000001F0: 4E 5A 45 4E 00 FA 1D B4  00 8F 00 3C 1E BE 00 85  |NZEN.......<....|
00000200: 22 C7 45 42 45 4E 20 D3  49 45 20 44 49 45 20 47  |".EBEN .IE DIE G|
00000210: 45 57 BD 4E 53 43 48 54  45 20 C7 45 52 BB 54 45  |EW.NSCHTE .ER.TE|
00000220: 41 44 52 45 53 53 45 20  46 BD 52 20 CD D3 2D C4  |ADRESSE F.R ..-.|
00000230: CF D3 20 45 49 4E 3A 20  22 3B 47 4E 00 7F 1E C8  |.. EIN: ";GN....|
00000240: 00 85 22 C7 45 42 45 4E  20 D3 49 45 20 44 49 45  |..".EBEN .IE DIE|
00000250: 20 47 45 57 BD 4E 53 43  48 54 45 20 C7 45 52 BB  | GEW.NSCHTE .ER.|
00000260: 54 45 41 44 52 45 53 53  45 20 46 BD 52 20 C3 3D  |TEADRESSE F.R .=|
00000270: 20 C4 49 53 4B 20 45 49  4E 3A 20 22 3B 55 4E 00  | .ISK EIN: ";UN.|
00000280: 97 1E D2 00 9F 20 31 35  2C 47 4E 2C 31 35 3A 98  |..... 15,GN,15:.|
00000290: 31 35 2C 22 55 3A 22 00  A2 1E DC 00 46 24 B2 44  |15,"U:".....F$.D|
000002A0: 53 24 00 C1 1E E6 00 8B  20 44 53 20 B2 20 37 33  |S$...... DS . 73|
000002B0: 20 A7 20 46 4C 24 B2 CA  28 46 24 2C 31 39 2C 32  | . FL$..(F$,19,2|
000002C0: 29 00 C8 1E F0 00 FE 0F  00 00 1F FA 00 8B 20 46  |)............. F|
000002D0: 4C 24 B2 22 34 31 22 20  B0 20 46 4C 24 20 B2 20  |L$."41" . FL$ . |
000002E0: 22 37 30 22 20 A7 20 99  20 22 C6 41 4C 53 43 48  |"70" . . ".ALSCH|
000002F0: 45 20 C6 4C 4F 50 50 59  20 21 22 3A FE 0F 3A 90  |E .LOPPY !":..:.|
00000300: 00 15 1F 04 01 FE 02 20  30 3A 56 56 B2 C2 28 32  |....... 0:VV..(2|
00000310: 34 35 35 33 29 00 3B 1F  0E 01 8B 20 56 56 B2 20  |4553).;.... VV. |
00000320: 38 30 20 AF 20 46 4C 24  B2 22 37 31 22 20 A7 20  |80 . FL$."71" . |
00000330: 9E 20 33 30 37 32 2C 2C  2C 32 30 00 62 1F 18 01  |. 3072,,,20.b...|
00000340: 8B 20 56 56 B2 20 34 30  20 AF 20 46 4C 24 B3 B1  |. VV. 40 . FL$..|
00000350: 22 37 31 22 20 A7 20 9E  20 33 30 37 32 2C 2C 2C  |"71" . . 3072,,,|
00000360: 32 30 00 7C 1F 22 01 FE  30 20 4D 37 2C 20 47 20  |20.|."..0 M7, G |
00000370: 28 47 4E 29 2C 20 55 20  28 55 4E 29 00 B4 1F 2C  |(GN), U (UN)...,|
00000380: 01 99 22 C6 4C 4F 50 50  59 20 31 35 22 3B 3A 56  |..".LOPPY 15";:V|
00000390: 56 B2 C2 28 32 34 35 35  33 29 3A 20 8B 20 56 56  |V..(24553): . VV|
000003A0: B2 34 30 20 A7 20 99 22  37 31 22 3B 3A D5 99 22  |.40 . ."71";:.."|
000003B0: 38 31 22 3B 00 D9 1F 36  01 99 22 20 49 53 54 20  |81";...6.." IST |
000003C0: 4A 45 54 5A 54 20 45 49  4E 47 45 53 43 48 41 4C  |JETZT EINGESCHAL|
000003D0: 54 45 54 21 22 2C 44 53  24 00 DF 1F 40 01 8F 00  |TET!",DS$...@...|
000003E0: F6 1F 4A 01 8F 20 43 50  2F 4D 20 2D 3E 20 43 3D  |..J.. CP/M -> C=|
000003F0: 20 54 52 41 4E 53 00 FC  1F 54 01 8F 00 30 20 5E  | TRANS...T...0 ^|
00000400: 01 41 B2 D1 28 22 32 34  30 30 22 29 3A 20 8F 20  |.A..("2400"): . |
00000410: 41 4E 46 41 4E 47 20 53  50 45 49 43 48 45 52 42  |ANFANG SPEICHERB|
00000420: 45 52 45 49 43 48 20 46  55 45 52 20 43 50 2F 4D  |EREICH FUER CP/M|
00000430: 00 65 20 68 01 41 44 20  B2 20 D1 28 22 35 46 43  |.e h.AD . .("5FC|
00000440: 37 22 29 3A 20 8F 20 41  4E 46 41 4E 47 20 44 49  |7"): . ANFANG DI|
00000450: 52 4E 41 4D 45 20 41 55  53 20 4A 41 4E 55 53 4F  |RNAME AUS JANUSO|
00000460: 4B 20 28 43 29 00 7C 20  72 01 85 22 C4 41 54 45  |K (C).| r..".ATE|
00000470: 49 4E 41 4D 45 3A 20 22  3B 44 41 24 00 C1 20 7C  |INAME: ";DA$.. ||
00000480: 01 FE 30 20 4D 37 2C 28  44 41 24 29 3A 44 24 B2  |..0 M7,(DA$):D$.|
00000490: 22 22 20 3A 20 8F 20 44  41 54 45 49 4E 41 4D 45  |"" : . DATEINAME|
000004A0: 4E 20 41 55 53 57 45 52  54 45 4E 20 55 4E 44 20  |N AUSWERTEN UND |
000004B0: 4E 41 43 48 20 41 44 20  53 43 48 52 45 49 42 45  |NACH AD SCHREIBE|
000004C0: 4E 00 C9 20 86 01 FE 02  30 00 2B 21 90 01 81 20  |N.. ....0.+!... |
000004D0: 49 B2 30 20 A4 20 37 3A  44 24 B2 44 24 AA C7 28  |I.0 . 7:D$.D$..(|
000004E0: C2 28 41 44 AA 49 29 29  3A 82 3A 44 24 B2 44 24  |.(AD.I)):.:D$.D$|
000004F0: AA 22 2E 22 3A 81 49 B2  38 A4 31 30 3A 44 24 B2  |.".":.I.8.10:D$.|
00000500: 44 24 AA C7 28 C2 28 41  44 AA 49 29 29 3A 82 20  |D$..(.(AD.I)):. |
00000510: 20 20 20 3A 20 20 8F 20  44 41 54 45 49 4E 41 4D  |   :  . DATEINAM|
00000520: 45 4E 20 41 55 53 4C 45  53 45 4E 00 61 21 9A 01  |EN AUSLESEN.a!..|
00000530: 44 24 B2 22 4C 20 2D 20  22 AA 44 24 20 3A 20 8F  |D$."L - ".D$ : .|
00000540: 20 4E 41 4D 45 4E 20 4D  49 54 20 4B 45 4E 4E 5A  | NAMEN MIT KENNZ|
00000550: 45 49 43 48 4E 55 4E 47  20 56 45 52 53 45 48 45  |EICHNUNG VERSEHE|
00000560: 4E 00 8E 21 A4 01 85 22  D3 54 41 52 54 41 44 52  |N..!...".TARTADR|
00000570: 45 53 53 45 20 3A 22 3B  53 31 3A 20 85 22 C5 4E  |ESSE :";S1: .".N|
00000580: 44 41 44 52 45 53 53 45  20 3A 22 3B 53 32 00 DA  |DADRESSE :";S2..|
00000590: 21 AE 01 FE 02 31 3A FE  10 20 28 44 24 29 2C 55  |!....1:.. (D$),U|
000005A0: 20 28 55 4E 29 2C 91 20  42 31 2C 50 28 53 31 29  | (UN),. B1,P(S1)|
000005B0: 20 A4 20 50 28 53 32 29  3A 20 8F 20 50 52 4F 47  | . P(S2): . PROG|
000005C0: 52 41 4D 4D 20 56 4F 4E  20 41 44 52 45 53 53 45  |RAMM VON ADRESSE|
000005D0: 20 53 50 45 49 43 48 45  52 4E 00 E4 21 B8 01 99  | SPEICHERN..!...|
000005E0: 20 44 53 24 00 16 22 C2  01 99 22 C4 41 54 45 49  | DS$.."...".ATEI|
000005F0: 45 4E 20 5A 55 4D 20 CD  D3 2D C4 CF D3 20 BD 42  |EN ZUM ..-... .B|
00000600: 45 52 54 52 41 47 45 4E  20 28 4A 2F 4E 29 3F 22  |ERTRAGEN (J/N)?"|
00000610: 3A A1 F9 20 57 24 00 29  22 CC 01 8B 20 57 24 20  |:.. W$.)"... W$ |
00000620: B2 20 22 4E 22 20 A7 20  80 00 4B 22 D6 01 FE 30  |. "N" . ..K"...0|
00000630: 20 4D 34 20 20 20 20 3A  20 8F 20 56 4F 4E 20 43  | M4    : . VON C|
00000640: 2D 44 49 53 4B 20 4C 41  44 45 4E 00 90 22 E0 01  |-DISK LADEN.."..|
00000650: 99 22 C2 49 54 54 45 20  C4 CF D3 2D C4 49 53 4B  |.".ITTE ...-.ISK|
00000660: 45 54 54 45 20 49 4E 20  CC 41 55 46 57 45 52 4B  |ETTE IN .AUFWERK|
00000670: 20 22 3B 47 4E 3B 22 20  45 49 4E 4C 45 47 45 4E  | ";GN;" EINLEGEN|
00000680: 20 3C D4 41 53 54 45 3E  20 22 3A A1 F9 20 57 24  | <.ASTE> ":.. W$|
00000690: 00 9A 22 EA 01 FE 30 20  4D 32 00 00 00           |.."...0 M2...   |

....... LISTING 7    JANUS V2.0.6.... CP
/M -> C= TRANS.\.... LIEST DATEIEN AUS C
P/M SPEICHER...(.. UND UEBERTRAEGT SIE U
EBER C128 MODUS NACH MS-DOS.C.2.. EIN PR
OGRAMM VON OLAF KUBITZ, BERLIN 1989.I.<.
..Q.F...0...P.. B(Q("5000")) .. 76 . ...
*.Z.."DISKETTE MIT JANUS-PROGRAMM EINLEG
EN ! <TASTE>":..W$.2.D...0.M.N... "JANUS
 V2.0 PRG",B0.I.X..."JANUS-FUNKTASTEN",B
0.S..... 15....... "JANUS V2.0 BAS",B15.
......"JANUS V2.0 SWAP",B0... ........MX
 . Q("39"): . MX,0:. MX.1, Q("24"): . :.
 VARIABLEN BEGRENZEN.......<...."GEBEN S
IE DIE GEW.NSCHTE GER.TEADRESSE F.R MS-D
OS EIN: ";GN..H.."GEBEN SIE DIE GEW.NSC
HTE GER.TEADRESSE F.R C= DISK EIN: ";UN.
..R.. 15,GN,15:.15,"U:".....F$.DS$.A....
 DS . 73 . FL$.J(F$,19,2).H........... F
L$."41" . FL$ . "70" . . "FALSCHE FLOPPY
 !":..:........ 0:VV.B(24553).;.... VV. 
80 . FL$."71" . . 3072,,,20.B.... VV. 40
 . FL$.."71" . . 3072,,,20.|."..0 M7, G 
(GN), U (UN)...,.."FLOPPY 15";:VV.B(2455
3): . VV.40 . ."71";:U."81";.Y.6.." IST 
JETZT EINGESCHALTET!",DS$...@.....J.. CP
/M -> C= TRANS...T...0 ^.A.Q("2400"): . 
ANFANG SPEICHERBEREICH FUER CP/M.E H.AD 
. Q("5FC7"): . ANFANG DIRNAME AUS JANUSO
K (C).| R.."DATEINAME: ";DA$.A |..0 M7,(
DA$):D$."" : . DATEINAMEN AUSWERTEN UND 
NACH AD SCHREIBEN.I ....0.+!... I.0 . 7:
D$.D$.G(B(AD.I)):.:D$.D$.".":.I.8.10:D$.
D$.G(B(AD.I)):.    :  . DATEINAMEN AUSLE
SEN.A!..D$."L - ".D$ : . NAMEN MIT KENNZ
EICHNUNG VERSEHEN..!..."STARTADRESSE :";
S1: ."ENDADRESSE :";S2.Z!....1:.. (D$),U
 (UN),. B1,P(S1) . P(S2): . PROGRAMM VON
 ADRESSE SPEICHERN..!... DS$.."B.."DATEI
EN ZUM MS-DOS .BERTRAGEN (J/N)?":.. W$.)
"L.. W$ . "N" . ..K"V..0 M4    : . VON C
-DISK LADEN.."..."BITTE DOS-DISKETTE IN 
LAUFWERK ";GN;" EINLEGEN <TASTE> ":.. W$
.."...0 M2...

Visualization:

Width: Skip load address (+2) Invert

> CLICK IMAGE PREVIEW FOR FULL MODAL