EAS-GRS
FILE INFORMATION
FILENAME(S): EAS-GRS
FILE TYPE(S): PRG
FILE SIZE: 1.9K
FIRST SEEN: 2025-11-30 01:13:11
APPEARS ON: 2 disk(s)
FILE HASH
1662bd2c2d519fbeeea0aa8a646d9476d17f1954b45fdc4292a77da4612d1af0
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| 10911 SEITE A | EAS-GRS | PRG | C64er | 11 | 6 | DOWNLOAD FILE |
| 10911 SEITE A | EAS-GRS | PRG | DuncanTwain | 11 | 6 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 1C 21 1C 0A 00 8F 3A 2A 2A 2A 20 45 41 53 2D |..!....:*** EAS-|
00000010: 47 52 53 20 2A 2A 2A 20 4A 2E 20 44 45 48 4C 45 |GRS *** J. DEHLE|
00000020: 52 00 27 1C 14 00 3A 00 49 1C 1E 00 8F 3A 20 20 |R.'...:.I....: |
00000030: 45 49 4E 47 41 42 45 2D 41 55 53 47 41 42 45 2D |EINGABE-AUSGABE-|
00000040: 53 54 45 55 45 52 55 4E 47 00 6B 1C 28 00 8F 3A |STEUERUNG.k.(..:|
00000050: 20 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D | --------------|
00000060: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 8E 1C 32 00 |-----------...2.|
00000070: 8F 3A 20 46 55 45 52 20 44 49 45 20 43 4F 4D 4D |.: FUER DIE COMM|
00000080: 4F 44 4F 52 45 2D 43 4F 4D 50 55 54 45 52 00 B1 |ODORE-COMPUTER..|
00000090: 1C 3C 00 8F 3A 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |.<..: ----------|
000000A0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000000B0: 2D 00 D4 1C 46 00 8F 3A 20 2A 2A 20 20 43 36 34 |-...F..: ** C64|
000000C0: 2C 20 43 31 32 38 20 55 4E 44 20 43 31 32 38 44 |, C128 UND C128D|
000000D0: 20 20 2A 2A 00 F3 1C 50 00 8F 3A 20 20 20 20 20 | **...P..: |
000000E0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000000F0: 2D 2D 2D 00 12 1D 5A 00 8F 3A 20 20 20 4D 49 54 |---...Z..: MIT|
00000100: 20 44 45 4D 20 47 52 53 2D 49 4E 54 45 52 46 41 | DEM GRS-INTERFA|
00000110: 43 45 00 30 1D 64 00 8F 3A 20 20 2D 2D 2D 2D 2D |CE.0.d..: -----|
00000120: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000130: 00 36 1D 6E 00 3A 00 4F 1D 78 00 8F 3A 20 52 45 |.6.n.:.O.x..: RE|
00000140: 47 49 53 54 45 52 41 44 52 45 53 53 45 4E 3A 00 |GISTERADRESSEN:.|
00000150: 68 1D 82 00 8F 3A 20 3D 3D 3D 3D 3D 3D 3D 3D 3D |h....: =========|
00000160: 3D 3D 3D 3D 3D 3D 3D 3D 00 84 1D 8C 00 8F 3A 20 |========......: |
00000170: 42 41 20 3D 20 42 41 53 49 53 41 44 52 45 53 53 |BA = BASISADRESS|
00000180: 45 21 21 21 00 A9 1D 96 00 8F 3A 20 52 41 20 3D |E!!!......: RA =|
00000190: 20 52 49 43 48 54 55 4E 47 20 41 2C 20 44 41 20 | RICHTUNG A, DA |
000001A0: 3D 20 44 41 54 45 4E 20 41 00 CE 1D A0 00 8F 3A |= DATEN A......:|
000001B0: 20 52 42 20 3D 20 52 49 43 48 54 55 4E 47 20 42 | RB = RICHTUNG B|
000001C0: 2C 20 44 42 20 3D 20 44 41 54 45 4E 20 42 00 D4 |, DB = DATEN B..|
000001D0: 1D AA 00 3A 00 F5 1D B4 00 42 41 B2 35 36 35 37 |...:.....BA.5657|
000001E0: 36 3A 43 4C B2 31 34 37 3A 8F 3A 43 4C 45 41 52 |6:CL.147:.:CLEAR|
000001F0: 20 48 4F 4D 45 00 19 1E BE 00 44 41 20 B2 20 42 | HOME.....DA . B|
00000200: 41 20 3A 20 44 42 20 B2 20 42 41 AA 31 20 3A 20 |A : DB . BA.1 : |
00000210: 52 42 20 B2 20 42 41 AA 33 00 1F 1E FA 00 3A 00 |RB . BA.3.....:.|
00000220: 42 1E 04 01 8F 3A 20 53 50 45 5A 49 45 4C 4C 45 |B....: SPEZIELLE|
00000230: 20 52 45 47 49 53 54 45 52 41 44 52 45 53 53 45 | REGISTERADRESSE|
00000240: 4E 3A 00 65 1E 0E 01 8F 3A 20 3D 3D 3D 3D 3D 3D |N:.e....: ======|
00000250: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
00000260: 3D 3D 3D 3D 3D 00 89 1E 18 01 8F 3A 20 4C 31 54 |=====......: L1T|
00000270: 20 3D 20 42 41 2B 34 20 3A 52 45 4D 3A 54 49 4D | = BA+4 :REM:TIM|
00000280: 45 52 20 41 2C 20 4C 4F 57 00 AE 1E 22 01 8F 3A |ER A, LOW..."..:|
00000290: 20 48 31 54 20 3D 20 42 41 2B 35 20 3A 52 45 4D | H1T = BA+5 :REM|
000002A0: 3A 54 49 4D 45 52 20 41 2C 20 48 49 47 48 00 D2 |:TIMER A, HIGH..|
000002B0: 1E 2C 01 8F 3A 20 4C 32 54 20 3D 20 42 41 2B 36 |.,..: L2T = BA+6|
000002C0: 20 3A 52 45 4D 3A 54 49 4D 45 52 20 42 2C 20 4C | :REM:TIMER B, L|
000002D0: 4F 57 00 F7 1E 36 01 8F 3A 20 48 32 54 20 3D 20 |OW...6..: H2T = |
000002E0: 42 41 2B 37 20 3A 52 45 4D 3A 54 49 4D 45 52 20 |BA+7 :REM:TIMER |
000002F0: 42 2C 20 48 49 47 48 00 1D 1F 40 01 8F 3A 20 20 |B, HIGH...@..: |
00000300: 43 41 20 3D 20 42 41 2B 31 34 3A 52 45 4D 3A 4B |CA = BA+14:REM:K|
00000310: 4F 4E 54 52 4F 4C 4C 52 45 47 2E 20 41 00 43 1F |ONTROLLREG. A.C.|
00000320: 4A 01 8F 3A 20 20 43 42 20 3D 20 42 41 2B 31 35 |J..: CB = BA+15|
00000330: 3A 52 45 4D 3A 4B 4F 4E 54 52 4F 4C 4C 52 45 47 |:REM:KONTROLLREG|
00000340: 2E 20 42 00 6A 1F 54 01 8F 3A 20 20 43 49 20 3D |. B.j.T..: CI =|
00000350: 20 42 41 2B 31 33 3A 52 45 4D 3A 49 4E 54 45 52 | BA+13:REM:INTER|
00000360: 52 55 50 54 2D 4B 2E 2D 52 2E 00 70 1F 5E 01 3A |RUPT-K.-R..p.^.:|
00000370: 00 96 1F 68 01 8F 3A 20 2B 2B 2B 2B 2B 2B 2B 2B |...h..: ++++++++|
00000380: 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B |++++++++++++++++|
00000390: 2B 2B 2B 2B 2B 2B 00 9C 1F 72 01 3A 00 B1 1F F4 |++++++...r.:....|
000003A0: 01 8F 3A 20 48 41 55 50 54 50 52 4F 47 52 41 4D |..: HAUPTPROGRAM|
000003B0: 4D 00 C6 1F FE 01 8F 3A 20 2A 2A 2A 2A 2A 2A 2A |M......: *******|
000003C0: 2A 2A 2A 2A 2A 2A 00 CC 1F 08 02 3A 00 EA 1F 12 |******.....:....|
000003D0: 02 8F 3A 20 28 52 45 43 48 4E 45 4E 2C 20 45 4E |..: (RECHNEN, EN|
000003E0: 54 53 43 48 45 49 44 45 4E 2C 00 08 20 1C 02 8F |TSCHEIDEN,.. ...|
000003F0: 3A 20 20 41 4E 5A 45 49 47 45 4E 2C 20 53 49 4D |: ANZEIGEN, SIM|
00000400: 55 4C 49 45 52 45 4E 2C 00 26 20 26 02 8F 3A 20 |ULIEREN,.& &..: |
00000410: 20 47 52 41 46 49 4B 20 41 55 53 47 45 42 45 4E | GRAFIK AUSGEBEN|
00000420: 2E 2E 2E 2E 2E 29 00 2C 20 30 02 3A 00 47 20 3A |.....)., 0.:.G :|
00000430: 02 8F 3A 20 47 45 48 45 20 42 45 49 20 42 45 44 |..: GEHE BEI BED|
00000440: 41 52 46 20 5A 55 4D 00 6D 20 44 02 8F 3A 20 45 |ARF ZUM.m D..: E|
00000450: 4E 54 53 50 52 45 43 48 45 4E 44 45 4E 20 55 4E |NTSPRECHENDEN UN|
00000460: 54 45 52 50 52 4F 47 52 41 4D 4D 20 21 00 93 20 |TERPROGRAMM !.. |
00000470: 4E 02 8F 3A 28 47 4F 53 55 42 20 31 30 30 30 30 |N..:(GOSUB 10000|
00000480: 2F 31 31 30 30 30 2F 31 32 30 30 30 2F 31 33 30 |/11000/12000/130|
00000490: 30 30 29 00 99 20 58 02 3A 00 BB 20 62 02 8F 3A |00).. X.:.. b..:|
000004A0: 20 4C 41 2C 20 4C 44 2C 20 53 41 20 55 4E 44 20 | LA, LD, SA UND |
000004B0: 53 44 20 53 49 4E 44 20 44 49 45 00 E0 20 6C 02 |SD SIND DIE.. l.|
000004C0: 8F 3A 20 56 41 52 49 41 42 4C 45 4E 2D 4E 41 4D |.: VARIABLEN-NAM|
000004D0: 45 4E 20 46 55 45 52 20 44 49 45 20 45 49 4E 2D |EN FUER DIE EIN-|
000004E0: 00 05 21 76 02 8F 3A 20 5A 55 4C 45 53 45 4E 44 |..!v..: ZULESEND|
000004F0: 45 4E 20 42 5A 57 2E 20 41 55 53 5A 55 47 45 42 |EN BZW. AUSZUGEB|
00000500: 45 4E 44 45 4E 00 25 21 80 02 8F 3A 20 5A 41 48 |ENDEN.%!...: ZAH|
00000510: 4C 45 4E 57 45 52 54 45 20 28 30 20 42 49 53 20 |LENWERTE (0 BIS |
00000520: 32 35 35 29 2E 00 2B 21 8A 02 3A 00 50 21 94 02 |255)..+!..:.P!..|
00000530: 8F 3A 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B |.:++++++++++++++|
00000540: 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B |++++++++++++++++|
00000550: 00 56 21 9E 02 3A 00 7B 21 10 27 8F 3A 20 55 50 |.V!..:.{!.'.: UP|
00000560: 2D 45 49 4E 47 41 42 45 3A 20 4C 45 53 45 4E 2F |-EINGABE: LESEN/|
00000570: 41 4E 41 4C 4F 47 20 28 4C 41 29 00 A0 21 1A 27 |ANALOG (LA)..!.'|
00000580: 8F 3A 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 20 3D |.: ----------- =|
00000590: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================|
000005A0: 00 AB 21 24 27 97 20 52 42 2C 30 00 C0 21 2E 27 |..!$'. RB,0..!.'|
000005B0: 97 20 44 41 2C C2 28 44 41 29 20 AF 20 32 35 31 |. DA,.(DA) . 251|
000005C0: 00 D3 21 38 27 97 20 44 41 2C C2 28 44 41 29 20 |..!8'. DA,.(DA) |
000005D0: B0 20 34 00 E4 21 42 27 4C 41 B2 C2 28 44 42 29 |. 4..!B'LA..(DB)|
000005E0: 20 3A 20 8E 00 EA 21 4C 27 3A 00 0F 22 F8 2A 8F | : ...!L':..".*.|
000005F0: 3A 20 55 50 2D 45 49 4E 47 41 42 45 3A 20 4C 45 |: UP-EINGABE: LE|
00000600: 53 45 4E 2F 44 49 47 49 54 41 4C 28 4C 44 29 00 |SEN/DIGITAL(LD).|
00000610: 34 22 02 2B 8F 3A 20 2D 2D 2D 2D 2D 2D 2D 2D 2D |4".+.: ---------|
00000620: 2D 2D 20 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |-- =============|
00000630: 3D 3D 3D 3D 00 3F 22 0C 2B 97 20 52 42 2C 30 00 |====.?".+. RB,0.|
00000640: 54 22 16 2B 97 20 44 41 2C C2 28 44 41 29 20 AF |T".+. DA,.(DA) .|
00000650: 20 32 35 31 00 65 22 20 2B 4C 44 B2 C2 28 44 42 | 251.e" +LD..(DB|
00000660: 29 20 3A 20 8E 00 6B 22 2A 2B 3A 00 90 22 E0 2E |) : ..k"*+:.."..|
00000670: 8F 3A 55 50 2D 41 55 53 47 41 42 45 3A 53 43 48 |.:UP-AUSGABE:SCH|
00000680: 52 45 49 42 45 4E 2F 41 4E 41 4C 4F 47 2C 53 41 |REIBEN/ANALOG,SA|
00000690: 00 B5 22 EA 2E 8F 3A 2D 2D 2D 2D 2D 2D 2D 2D 2D |.."...:---------|
000006A0: 2D 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |- **************|
000006B0: 2A 2A 2A 2A 2A 00 C2 22 F4 2E 97 20 52 42 2C 32 |*****.."... RB,2|
000006C0: 35 35 00 CE 22 FE 2E 97 20 44 42 2C 53 41 00 E2 |55.."... DB,SA..|
000006D0: 22 08 2F 97 20 44 41 2C C2 28 44 41 29 20 AF 32 |"./. DA,.(DA) .2|
000006E0: 34 33 00 F5 22 12 2F 97 20 44 41 2C C2 28 44 41 |43.."./. DA,.(DA|
000006F0: 29 20 B0 20 38 00 FB 22 1C 2F 8E 00 01 23 26 2F |) . 8.."./...#&/|
00000700: 3A 00 26 23 C8 32 8F 3A 55 50 2D 41 55 53 47 2E |:.&#.2.:UP-AUSG.|
00000710: 3A 20 53 43 48 52 45 49 42 45 4E 2F 44 49 47 49 |: SCHREIBEN/DIGI|
00000720: 54 41 4C 2C 53 44 00 4B 23 D2 32 8F 3A 2D 2D 2D |TAL,SD.K#.2.:---|
00000730: 2D 2D 2D 2D 2D 20 20 2A 2A 2A 2A 2A 2A 2A 2A 2A |----- *********|
00000740: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 58 23 DC 32 |***********.X#.2|
00000750: 97 20 52 42 2C 32 35 35 00 64 23 E6 32 97 20 44 |. RB,255.d#.2. D|
00000760: 42 2C 53 44 00 7F 23 F0 32 97 20 44 41 2C 28 C2 |B,SD..#.2. DA,(.|
00000770: 28 44 41 29 20 AF 20 32 34 37 29 20 B0 20 34 00 |(DA) . 247) . 4.|
00000780: 92 23 FA 32 97 20 44 41 2C C2 28 44 41 29 20 B0 |.#.2. DA,.(DA) .|
00000790: 20 38 00 98 23 04 33 8E 00 00 00 | 8..#.3.... |
..!....:*** EAS-GRS *** J. DEHLER.'...:.
I....: EINGABE-AUSGABE-STEUERUNG.K.(..:
-------------------------...2..: FUER
DIE COMMODORE-COMPUTER...<..: ----------
-----------------.T.F..: ** C64, C128 U
ND C128D **...P..: ----------------
---...Z..: MIT DEM GRS-INTERFACE.0.D..
: ---------------------.6.N.:.O.X..: RE
GISTERADRESSEN:.H....: =================
......: BA = BASISADRESSE!!!......: RA =
RICHTUNG A, DA = DATEN A.N. ..: RB = RI
CHTUNG B, DB = DATEN B.T...:.....BA.5657
6:CL.147:.:CLEAR HOME.....DA . BA : DB .
BA.1 : RB . BA.3.....:.B....: SPEZIELLE
REGISTERADRESSEN:.E....: ==============
=============......: L1T = BA+4 :REM:TIM
ER A, LOW..."..: H1T = BA+5 :REM:TIMER A
, HIGH.R.,..: L2T = BA+6 :REM:TIMER B, L
OW...6..: H2T = BA+7 :REM:TIMER B, HIGH.
..@..: CA = BA+14:REM:KONTROLLREG. A.C.
J..: CB = BA+15:REM:KONTROLLREG. B.J.T.
.: CI = BA+13:REM:INTERRUPT-K.-R..P.^.:
...H..: ++++++++++++++++++++++++++++++..
.R.:......: HAUPTPROGRAMM.F....: *******
******.L...:......: (RECHNEN, ENTSCHEIDE
N,.. ...: ANZEIGEN, SIMULIEREN,.& &..:
GRAFIK AUSGEBEN.....)., 0.:.G :..: GEHE
BEI BEDARF ZUM.M D..: ENTSPRECHENDEN UN
TERPROGRAMM !.. N..:(GOSUB 10000/11000/1
2000/13000).. X.:.. B..: LA, LD, SA UND
SD SIND DIE.. L..: VARIABLEN-NAMEN FUER
DIE EIN-..!V..: ZULESENDEN BZW. AUSZUGEB
ENDEN.%!...: ZAHLENWERTE (0 BIS 255)..+!
..:.P!...:++++++++++++++++++++++++++++++
.V!..:.{!.'.: UP-EINGABE: LESEN/ANALOG (
LA). !.'.: ----------- =================
..!$'. RB,0..!.'. DA,B(DA) . 251.S!8'. D
A,B(DA) . 4..!B'LA.B(DB) : ...!L':..".*.
: UP-EINGABE: LESEN/DIGITAL(LD).4".+.: -
---------- =================.?".+. RB,0.
T".+. DA,B(DA) . 251.E" +LD.B(DB) : ..K"
*+:.."...:UP-AUSGABE:SCHREIBEN/ANALOG,SA
.."...:---------- *******************.B"
... RB,255.N"... DB,SA.."./. DA,B(DA) .2
43.."./. DA,B(DA) . 8.."./...#&/:.&#H2.:
UP-AUSG.: SCHREIBEN/DIGITAL,SD.K#R2.:---
----- ********************.X#.2. RB,255
.D#.2. DB,SD.#.2. DA,(B(DA) . 247) . 4.
.#.2. DA,B(DA) . 8..#.3....
> CLICK IMAGE PREVIEW FOR FULL MODAL