CHR$─>SCREENCODE
FILE INFORMATION
FILENAME(S): CHR$─>SCREENCODE
FILE TYPE(S): PRG
FILE SIZE: 1.2K
FIRST SEEN: 2025-11-30 21:12:37
APPEARS ON: 1 disk(s)
FILE HASH
c1e99a21bf7b6ef08ca1765a82452bfef8fc788f1750b7dc878d3e2547fb5731
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| 64 ER 3 95 | CHR$─>SCREENCODE | PRG | DuncanTwain | 7 | 12 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: D8 1F E6 1F 64 00 2E 4C 49 20 31 2C 33 2C 30 00 |....d..LI 1,3,0.| 00000010: EC 1F 6E 00 3B 00 12 20 78 00 3B 2A 2A 2A 2A 2A |..n.;.. x.;*****| 00000020: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000030: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 38 20 82 00 |***********.8 ..| 00000040: 3B 2A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |;* | 00000050: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000060: 2A 00 5E 20 8C 00 3B 2A 20 43 48 52 24 2D 43 4F |*.^ ..;* CHR$-CO| 00000070: 44 45 20 3D 3E 20 42 49 4C 44 53 43 48 49 52 4D |DE => BILDSCHIRM| 00000080: 20 43 4F 44 45 20 2A 00 84 20 96 00 3B 2A 20 28 | CODE *.. ..;* (| 00000090: 57 29 20 42 59 20 46 55 42 45 4E 2F 48 49 53 2D |W) BY FUBEN/HIS-| 000000A0: 54 45 41 4D 20 44 45 53 49 47 4E 20 2A 00 AA 20 |TEAM DESIGN *.. | 000000B0: A0 00 3B 2A 20 20 20 20 20 20 20 20 20 20 20 20 |..;* | 000000C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000000D0: 20 20 2A 00 D0 20 AA 00 3B 2A 2A 2A 2A 2A 2A 2A | *.. ..;*******| 000000E0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 000000F0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 D6 20 B4 00 3B 00 |*********.. ..;.| 00000100: E4 20 BE 00 2E 42 41 20 24 43 30 30 30 00 EA 20 |. ...BA $C000.. | 00000110: C8 00 3B 00 0F 21 D2 00 20 43 4D 50 23 24 46 46 |..;..!.. CMP#$FF| 00000120: 3B 43 4F 44 45 20 4D 49 54 20 50 49 20 56 45 52 |;CODE MIT PI VER| 00000130: 47 4C 45 49 43 48 45 4E 00 2E 21 DC 00 20 43 4C |GLEICHEN..!.. CL| 00000140: 43 3B 46 4C 41 47 20 46 55 45 52 20 4F 2E 4B 2E |C;FLAG FUER O.K.| 00000150: 20 53 45 54 5A 45 4E 00 53 21 E6 00 20 42 45 51 | SETZEN.S!.. BEQ| 00000160: 50 49 3B 43 4F 44 45 20 50 49 20 3F 20 44 41 4E |PI;CODE PI ? DAN| 00000170: 4E 20 56 45 52 5A 57 45 49 47 45 4E 00 79 21 F0 |N VERZWEIGEN.y!.| 00000180: 00 20 43 4D 50 23 24 43 30 3B 2B 53 48 49 46 54 |. CMP#$C0;+SHIFT| 00000190: 2F 2B 43 4F 4D 4D 4F 44 4F 52 45 20 43 4F 44 45 |/+COMMODORE CODE| 000001A0: 20 3F 00 9F 21 FA 00 20 42 43 53 4D 49 4E 55 53 | ?..!.. BCSMINUS| 000001B0: 31 32 38 3B 4A 41 20 3F 20 44 41 4E 4E 20 56 45 |128;JA ? DANN VE| 000001C0: 52 5A 57 45 49 47 45 4E 00 BE 21 04 01 20 43 4D |RZWEIGEN..!.. CM| 000001D0: 50 23 24 41 30 3B 2B 43 4F 4D 4D 4F 44 4F 52 45 |P#$A0;+COMMODORE| 000001E0: 20 43 4F 44 45 20 3F 00 E3 21 0E 01 20 42 43 53 | CODE ?..!.. BCS| 000001F0: 4D 49 4E 55 53 36 34 3B 4A 41 20 3F 20 44 41 4E |MINUS64;JA ? DAN| 00000200: 4E 20 56 45 52 5A 57 45 49 47 45 4E 00 07 22 18 |N VERZWEIGEN..".| 00000210: 01 20 43 4D 50 23 24 38 30 3B 4B 45 49 4E 20 42 |. CMP#$80;KEIN B| 00000220: 49 4C 44 53 43 48 49 52 4D 20 43 4F 44 45 20 3F |ILDSCHIRM CODE ?| 00000230: 00 1F 22 22 01 20 42 43 53 52 54 53 3B 44 41 4E |.."". BCSRTS;DAN| 00000240: 4E 20 45 4E 44 45 20 21 00 3A 22 2C 01 20 43 4D |N ENDE !.:",. CM| 00000250: 50 23 24 36 30 3B 2B 53 48 49 46 54 20 43 4F 44 |P#$60;+SHIFT COD| 00000260: 45 20 3F 00 5F 22 36 01 20 42 43 53 4D 49 4E 55 |E ?._"6. BCSMINU| 00000270: 53 33 32 3B 4A 41 20 3F 20 44 41 4E 4E 20 56 45 |S32;JA ? DANN VE| 00000280: 52 5A 57 45 49 47 45 4E 00 83 22 40 01 20 43 4D |RZWEIGEN.."@. CM| 00000290: 50 23 24 32 30 3B 4B 45 49 4E 20 42 49 4C 44 53 |P#$20;KEIN BILDS| 000002A0: 43 48 49 52 4D 20 43 4F 44 45 20 3F 00 A1 22 4A |CHIRM CODE ?.."J| 000002B0: 01 20 42 43 43 4E 4F 43 4F 44 45 3B 44 41 4E 4E |. BCCNOCODE;DANN| 000002C0: 20 5A 55 20 4E 4F 43 4F 44 45 00 C4 22 54 01 20 | ZU NOCODE.."T. | 000002D0: 43 4D 50 23 24 34 30 3B 43 4F 44 45 20 55 4E 54 |CMP#$40;CODE UNT| 000002E0: 45 52 20 24 34 30 20 3F 20 44 41 4E 4E 00 E8 22 |ER $40 ? DANN.."| 000002F0: 5E 01 20 42 43 43 52 54 53 3B 4B 45 49 4E 45 20 |^. BCCRTS;KEINE | 00000300: 55 4D 57 41 4E 44 4C 55 4E 47 20 4E 4F 45 54 49 |UMWANDLUNG NOETI| 00000310: 47 00 06 23 68 01 20 43 4D 50 23 24 36 30 3B 42 |G..#h. CMP#$60;B| 00000320: 55 43 48 53 54 41 42 45 4E 2C 2E 2E 2E 20 3F 00 |UCHSTABEN,... ?.| 00000330: 26 23 72 01 20 42 43 43 4D 49 4E 55 53 36 34 3B |&#r. BCCMINUS64;| 00000340: 44 41 4E 4E 20 5A 55 20 4D 49 4E 55 53 36 34 00 |DANN ZU MINUS64.| 00000350: 50 23 7C 01 4D 49 4E 55 53 31 32 38 20 53 42 43 |P#|.MINUS128 SBC| 00000360: 23 24 34 30 3B 42 49 53 20 52 54 53 20 31 32 38 |#$40;BIS RTS 128| 00000370: 20 41 42 5A 49 45 48 45 4E 00 72 23 86 01 4D 49 | ABZIEHEN.r#..MI| 00000380: 4E 55 53 36 34 20 53 45 43 3B 42 49 53 20 52 54 |NUS64 SEC;BIS RT| 00000390: 53 20 49 4E 53 47 45 53 41 4D 54 00 8C 23 90 01 |S INSGESAMT..#..| 000003A0: 20 53 42 43 23 24 32 30 3B 36 34 20 20 41 42 5A | SBC#$20;64 ABZ| 000003B0: 49 45 48 45 4E 00 B0 23 9A 01 4D 49 4E 55 53 33 |IEHEN..#..MINUS3| 000003C0: 32 20 53 42 43 23 24 32 30 3B 55 4E 44 20 33 32 |2 SBC#$20;UND 32| 000003D0: 20 41 42 5A 49 45 48 45 4E 00 CC 23 A4 01 20 43 | ABZIEHEN..#.. C| 000003E0: 4C 43 3B 43 4F 44 45 20 55 4D 47 45 57 41 4E 44 |LC;CODE UMGEWAND| 000003F0: 45 4C 54 20 21 00 E1 23 AE 01 52 54 53 20 52 54 |ELT !..#..RTS RT| 00000400: 53 3B 45 4E 44 45 20 21 21 21 00 08 24 B8 01 4E |S;ENDE !!!..$..N| 00000410: 4F 43 4F 44 45 20 53 45 43 3B 4E 49 43 48 54 20 |OCODE SEC;NICHT | 00000420: 4D 4F 45 47 4C 49 43 48 20 43 4F 44 45 20 55 4D |MOEGLICH CODE UM| 00000430: 2D 00 23 24 C2 01 20 52 54 53 3B 5A 55 57 41 4E |-.#$.. RTS;ZUWAN| 00000440: 44 45 4C 4E 2E 20 45 4E 44 45 20 21 00 4E 24 CC |DELN. ENDE !.N$.| 00000450: 01 50 49 20 4C 44 41 23 24 35 45 3B 42 49 4C 44 |.PI LDA#$5E;BILD| 00000460: 53 43 48 49 52 4D 20 43 4F 44 45 20 56 4F 4E 20 |SCHIRM CODE VON | 00000470: 50 49 20 45 49 4E 2D 00 72 24 D6 01 20 52 54 53 |PI EIN-.r$.. RTS| 00000480: 3B 5A 45 4C 4E 44 20 55 45 42 45 52 47 45 42 45 |;ZELND UEBERGEBE| 00000490: 4E 2E 20 45 4E 44 45 20 21 21 21 00 00 00 |N. ENDE !!!... |
X...D..LI 1,3,0...N.;.. X.;*************
*******************.8 ..;*
*.^ ..;* CHR$-CODE => BI
LDSCHIRM CODE *.. ..;* (W) BY FUBEN/HIS-
TEAM DESIGN *.. .;*
*.P ..;***********************
*********.V ..;.. ...BA $C000.. H.;..!R.
CMP#$FF;CODE MIT PI VERGLEICHEN..!.. CL
C;FLAG FUER O.K. SETZEN.S!.. BEQPI;CODE
PI ? DANN VERZWEIGEN.Y!.. CMP#$C0;+SHIFT
/+COMMODORE CODE ?..!.. BCSMINUS128;JA ?
DANN VERZWEIGEN..!.. CMP#$A0;+COMMODORE
CODE ?..!.. BCSMINUS64;JA ? DANN VERZWE
IGEN..".. CMP#$80;KEIN BILDSCHIRM CODE ?
.."". BCSRTS;DANN ENDE !.:",. CMP#$60;+S
HIFT CODE ?._"6. BCSMINUS32;JA ? DANN VE
RZWEIGEN.."@. CMP#$20;KEIN BILDSCHIRM CO
DE ?.."J. BCCNOCODE;DANN ZU NOCODE.D"T.
CMP#$40;CODE UNTER $40 ? DANN.."^. BCCRT
S;KEINE UMWANDLUNG NOETIG..#H. CMP#$60;B
UCHSTABEN,... ?.&#R. BCCMINUS64;DANN ZU
MINUS64.P#|.MINUS128 SBC#$40;BIS RTS 128
ABZIEHEN.R#..MINUS64 SEC;BIS RTS INSGES
AMT..#.. SBC#$20;64 ABZIEHEN..#..MINUS3
2 SBC#$20;UND 32 ABZIEHEN.L#.. CLC;CODE
UMGEWANDELT !..#..RTS RTS;ENDE !!!..$..N
OCODE SEC;NICHT MOEGLICH CODE UM-.#$B. R
TS;ZUWANDELN. ENDE !.N$L.PI LDA#$5E;BILD
SCHIRM CODE VON PI EIN-.R$V. RTS;ZELND U
EBERGEBEN. ENDE !!!...
> CLICK IMAGE PREVIEW FOR FULL MODAL