SCREEN MACHINE.2
FILE INFORMATION
FILENAME(S): SCREEN MACHINE.2
FILE TYPE(S): PRG
FILE SIZE: 1.3K
FIRST SEEN: 2025-12-01 01:08:47
APPEARS ON: 1 disk(s)
FILE HASH
c9216dfa01cf7554fb200d96b03e907aa340ec47c9355f98e74e7c8c02d1348b
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| FAST ASS SYSTEM | SCREEN MACHINE.2 | PRG | hedning, loot | 15 | 3 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 1C 12 31 12 64 00 3B 20 53 43 52 45 45 4E 20 4D |..1.d.; SCREEN M| 00000010: 41 43 48 49 4E 45 00 37 12 6E 00 3B 00 48 12 78 |ACHINE.7.n.;.H.x| 00000020: 00 3B 20 49 4E 49 54 49 45 52 49 4E 47 00 4E 12 |.; INITIERING.N.| 00000030: 82 00 3B 00 88 12 8C 00 46 50 43 20 20 20 20 20 |..;.....FPC | 00000040: 20 20 B2 20 34 35 3B 20 50 45 4B 41 52 45 20 50 | . 45; PEKARE P| 00000050: 5D 20 46 5C 52 53 54 41 20 4C 45 44 49 47 41 20 |] F\RSTA LEDIGA | 00000060: 90 80 20 49 20 46 5B 52 47 20 46 49 4C 00 AE 12 |.. I F[RG FIL...| 00000070: 91 00 47 50 43 20 20 20 20 20 20 20 B2 20 34 37 |..GPC . 47| 00000080: 3B 20 50 45 4B 41 52 45 20 47 52 41 46 49 4B 20 |; PEKARE GRAFIK | 00000090: 46 49 4C 00 D3 12 96 00 48 50 43 20 20 20 20 20 |FIL.....HPC | 000000A0: 20 20 B2 20 34 39 3B 20 50 45 4B 41 52 45 20 48 | . 49; PEKARE H| 000000B0: 55 56 55 44 20 46 49 4C 00 F8 12 A0 00 52 41 44 |UVUD FIL.....RAD| 000000C0: 20 20 20 20 20 20 20 B2 20 32 31 34 3B 20 4C 5B | . 214; L[| 000000D0: 47 45 20 46 5C 52 20 4D 41 52 4B 5C 52 00 17 13 |GE F\R MARK\R...| 000000E0: AA 00 4B 4F 4C 20 20 20 20 20 20 20 B2 20 32 31 |..KOL . 21| 000000F0: 31 3B 20 20 20 20 20 AB 20 22 20 2D 00 4B 13 B4 |1; . " -.K..| 00000100: 00 4B 4F 4D 4D 41 4E 44 4F 20 20 B2 20 35 39 3B |.KOMMANDO . 59;| 00000110: AB 36 30 20 48 4F 50 50 20 41 44 52 45 53 53 20 |.60 HOPP ADRESS | 00000120: 46 5C 52 20 C5 20 46 52 5D 4E 20 4D 45 4E 59 4E |F\R . FR]N MENYN| 00000130: 00 74 13 BE 00 54 55 4D 20 20 20 20 20 20 20 B2 |.t...TUM .| 00000140: 20 32 30 36 3B 20 54 45 43 4B 45 4E 20 55 4E 44 | 206; TECKEN UND| 00000150: 45 52 20 4D 41 52 4B 5C 52 00 9B 13 C8 00 46 55 |ER MARK\R.....FU| 00000160: 4D 20 20 20 20 20 20 20 B2 20 36 34 37 3B 20 46 |M . 647; F| 00000170: 5B 52 47 20 55 4E 44 45 52 20 4D 41 52 4B 5C 52 |[RG UNDER MARK\R| 00000180: 00 BD 13 D2 00 43 4F 4C 20 20 20 20 20 20 20 B2 |.....COL .| 00000190: 20 36 34 36 3B 20 41 4B 54 55 45 4C 4C 20 46 5B | 646; AKTUELL F[| 000001A0: 52 47 00 00 14 DC 00 53 41 44 52 20 20 20 20 20 |RG.....SADR | 000001B0: 20 B2 20 36 31 3B 20 50 45 4B 41 52 45 20 46 5C | . 61; PEKARE F\| 000001C0: 52 20 41 4B 54 55 45 4C 4C 20 56 45 4B 54 4F 52 |R AKTUELL VEKTOR| 000001D0: 20 54 49 4C 4C 20 52 41 44 20 49 20 48 55 56 55 | TILL RAD I HUVU| 000001E0: 44 20 46 49 4C 00 33 14 E6 00 47 41 44 52 20 20 |D FIL.3...GADR | 000001F0: 20 20 20 20 B2 20 36 33 3B 20 50 45 4B 41 52 45 | . 63; PEKARE| 00000200: 20 54 49 4C 4C 20 41 4B 54 55 45 4C 4C 20 47 52 | TILL AKTUELL GR| 00000210: 41 46 49 4B 20 52 41 44 00 69 14 F0 00 46 41 44 |AFIK RAD.i...FAD| 00000220: 52 20 20 20 20 20 20 B2 20 36 35 3B 20 50 45 4B |R . 65; PEK| 00000230: 41 52 45 20 54 49 4C 4C 20 46 5B 52 47 20 4B 4F |ARE TILL F[RG KO| 00000240: 44 45 52 20 49 20 46 5B 52 47 20 46 49 4C 00 6F |DER I F[RG FIL.o| 00000250: 14 FA 00 3B 00 75 14 F4 01 3B 00 95 14 FE 01 3B |...;.u...;.....;| 00000260: 20 44 45 46 49 4E 49 45 52 49 4E 47 20 41 56 20 | DEFINIERING AV | 00000270: 46 55 4E 4B 54 49 4F 4E 45 52 00 9B 14 08 02 3B |FUNKTIONER.....;| 00000280: 00 B4 14 12 02 96 20 A5 20 48 49 47 48 28 58 29 |...... . HIGH(X)| 00000290: B2 B5 28 58 AD 32 35 36 29 00 D3 14 1C 02 96 20 |..(X.256)...... | 000002A0: A5 20 4C 4F 57 28 58 29 B2 58 AB 32 35 36 AC A5 |. LOW(X).X.256..| 000002B0: 20 48 49 47 48 28 58 29 00 D9 14 26 02 3B 00 DF | HIGH(X)...&.;..| 000002C0: 14 30 02 3B 00 E5 14 3A 02 3B 00 EB 14 44 02 3B |.0.;...:.;...D.;| 000002D0: 00 0A 15 4E 02 99 20 22 11 49 4E 43 4C 55 44 49 |...N.. ".INCLUDI| 000002E0: 4E 47 20 53 59 53 2E 20 46 49 4C 45 53 11 22 00 |NG SYS. FILES.".| 000002F0: 10 15 58 02 3B 00 27 15 62 02 90 85 20 22 4B 45 |..X.;.'.b... "KE| 00000300: 52 4E 41 4C 2E 46 2E 41 2E 22 2C 38 00 42 15 6C |RNAL.F.A.",8.B.l| 00000310: 02 90 85 20 22 53 43 52 45 45 4E 20 52 4F 4D 2E |... "SCREEN ROM.| 00000320: 46 2E 41 2E 22 2C 38 00 48 15 76 02 3B 00 4E 15 |F.A.",8.H.v.;.N.| 00000330: 80 02 3B 00 54 15 8A 02 3B 00 68 15 94 02 3B 20 |..;.T...;.h...; | 00000340: 41 53 53 45 4D 42 4C 59 20 4C 4F 4F 50 00 6E 15 |ASSEMBLY LOOP.n.| 00000350: 9E 02 3B 00 8D 15 A8 02 81 20 50 41 53 53 B2 31 |..;...... PASS.1| 00000360: 20 A4 20 33 3A 99 20 22 50 41 53 53 3A 22 50 41 | . 3:. "PASS:"PA| 00000370: 53 53 00 9C 15 B2 02 90 82 20 34 39 31 35 32 2C |SS....... 49152,| 00000380: 30 00 B6 15 BC 02 8B 20 50 41 53 53 B2 33 20 A7 |0...... PASS.3 .| 00000390: 20 90 82 20 34 39 31 35 32 2C 31 00 BC 15 C6 02 | .. 49152,1.....| 000003A0: 3B 00 D5 15 D0 02 90 85 20 22 49 4E 49 54 49 45 |;....... "INITIE| 000003B0: 52 41 2E 53 2E 4D 2E 22 2C 38 00 EA 15 DA 02 90 |RA.S.M.",8......| 000003C0: 85 20 22 4D 45 4E 59 2E 53 2E 4D 2E 22 2C 38 00 |. "MENY.S.M.",8.| 000003D0: F0 15 E4 02 3B 00 05 16 EE 02 90 85 20 22 44 52 |....;....... "DR| 000003E0: 41 57 2E 53 2E 4D 2E 22 2C 38 00 1D 16 F8 02 90 |AW.S.M.",8......| 000003F0: 85 20 22 43 4F 4D 50 49 4C 45 2E 53 2E 4D 2E 22 |. "COMPILE.S.M."| 00000400: 2C 38 00 38 16 02 03 3B 20 90 85 20 22 4F 50 54 |,8.8...; .. "OPT| 00000410: 49 4D 49 5A 45 2E 53 2E 4D 2E 22 2C 38 00 4F 16 |IMIZE.S.M.",8.O.| 00000420: 0C 03 3B 20 90 85 20 22 4C 4F 41 44 2E 53 2E 4D |..; .. "LOAD.S.M| 00000430: 2E 22 2C 38 00 66 16 16 03 3B 20 90 85 20 22 53 |.",8.f...; .. "S| 00000440: 41 56 45 2E 53 2E 4D 2E 22 2C 38 00 7F 16 20 03 |AVE.S.M.",8... .| 00000450: 3B 20 90 85 20 22 53 54 41 54 55 53 2E 53 2E 4D |; .. "STATUS.S.M| 00000460: 2E 22 2C 38 00 99 16 2A 03 3B 20 90 85 20 22 52 |.",8...*.; .. "R| 00000470: 45 53 54 41 52 54 2E 53 2E 4D 2E 22 2C 38 00 B0 |ESTART.S.M.",8..| 00000480: 16 34 03 3B 20 90 85 20 22 51 55 49 54 2E 53 2E |.4.; .. "QUIT.S.| 00000490: 4D 2E 22 2C 38 00 B6 16 3E 03 3B 00 D1 16 48 03 |M.",8...>.;...H.| 000004A0: 90 85 20 22 53 55 42 52 55 54 49 4E 45 52 2E 53 |.. "SUBRUTINER.S| 000004B0: 2E 4D 2E 22 2C 38 00 E9 16 52 03 90 85 20 22 55 |.M.",8...R... "U| 000004C0: 4E 44 45 52 52 55 54 49 4E 45 52 22 2C 38 00 EF |NDERRUTINER",8..| 000004D0: 16 5C 03 3B 00 F5 16 66 03 3B 00 00 17 70 03 82 |.\.;...f.;...p..| 000004E0: 20 50 41 53 53 00 06 17 7A 03 3B 00 24 17 84 03 | PASS...z.;.$...| 000004F0: 99 22 53 54 41 52 54 3A 22 53 54 41 52 54 3B 22 |."START:"START;"| 00000500: 20 20 45 4E 44 3A 22 3B AC 00 00 00 | END:";.... |
..1.D.; SCREEN MACHINE.7.N.;.H.X.; INITI
ERING.N...;.....FPC . 45; PEKARE P
] F\RSTA LEDIGA .. I F[RG FIL.....GPC
. 47; PEKARE GRAFIK FIL.S...HPC
. 49; PEKARE HUVUD FIL... .RAD .
214; L[GE F\R MARK\R.....KOL . 21
1; . " -.K...KOMMANDO . 59;.60 HOPP
ADRESS F\R E FR]N MENYN.T...TUM .
206; TECKEN UNDER MARK\R...H.FUM
. 647; F[RG UNDER MARK\R...R.COL .
646; AKTUELL F[RG.....SADR . 61; P
EKARE F\R AKTUELL VEKTOR TILL RAD I HUVU
D FIL.3...GADR . 63; PEKARE TILL AK
TUELL GRAFIK RAD.I...FADR . 65; PEK
ARE TILL F[RG KODER I F[RG FIL.O...;.U..
.;.....; DEFINIERING AV FUNKTIONER.....;
...... . HIGH(X)..(X.256).S.... . LOW(X)
.X.256.. HIGH(X).Y.&.;...0.;...:.;...D.;
...N.. ".INCLUDING SYS. FILES."...X.;.'.
B... "KERNAL.F.A.",8.B.L... "SCREEN ROM.
F.A.",8.H.V.;.N...;.T...;.H...; ASSEMBLY
LOOP.N...;...... PASS.1 . 3:. "PASS:"PA
SS....... 49152,0...... PASS.3 . .. 4915
2,1...F.;.U.P... "INITIERA.S.M.",8...Z..
. "MENY.S.M.",8.....;....... "DRAW.S.M."
,8....... "COMPILE.S.M.",8.8...; .. "OPT
IMIZE.S.M.",8.O...; .. "LOAD.S.M.",8.F..
.; .. "SAVE.S.M.",8.. .; .. "STATUS.S.M
.",8...*.; .. "RESTART.S.M.",8...4.; ..
"QUIT.S.M.",8...>.;.Q.H... "SUBRUTINER.S
.M.",8...R... "UNDERRUTINER",8...\.;...F
.;...P.. PASS...Z.;.$...."START:"START;"
END:";....
> CLICK IMAGE PREVIEW FOR FULL MODAL