UNDERRUTINER
FILE INFORMATION
FILENAME(S): UNDERRUTINER
FILE TYPE(S): PRG
FILE SIZE: 4.7K
FIRST SEEN: 2025-12-01 01:08:47
APPEARS ON: 2 disk(s)
FILE HASH
66461535da11e3b8d93d6209c2b83056e58781e06bc0aca9e4337fcb1b2a877b
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| FAST ASS SYSTEM | UNDERRUTINER | PRG | hedning, loot | 21 | 0 | DOWNLOAD FILE |
| ASSEMBLER FILER | UNDERRUTINER | PRG | hedning, loot | 6 | 19 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 1C 12 2F 12 64 00 3B 20 55 4E 44 45 52 52 55 54 |../.d.; UNDERRUT| 00000010: 49 4E 45 52 00 35 12 6E 00 3B 00 5F 12 78 00 3B |INER.5.n.;._.x.;| 00000020: 20 42 45 52 5B 4B 4E 41 20 4F 46 46 53 45 54 20 | BER[KNA OFFSET | 00000030: 46 5C 52 20 53 4B 5B 52 4D 20 50 41 52 41 4D 45 |F\R SK[RM PARAME| 00000040: 54 52 41 52 00 65 12 82 00 3B 00 79 12 8C 00 53 |TRAR.e...;.y...S| 00000050: 43 52 50 41 52 3A 20 20 20 90 94 20 23 30 00 91 |CRPAR: .. #0..| 00000060: 12 96 00 20 20 20 20 20 20 20 20 20 20 90 97 20 |... .. | 00000070: 54 45 4D 50 AA 31 00 A9 12 A0 00 20 20 20 20 20 |TEMP.1..... | 00000080: 20 20 20 20 20 90 94 20 53 43 52 45 45 4E 00 BF | .. SCREEN..| 00000090: 12 AA 00 20 20 20 20 20 20 20 20 20 20 90 97 20 |... .. | 000000A0: 54 45 4D 50 00 D0 12 B4 00 20 20 20 20 20 20 20 |TEMP..... | 000000B0: 20 20 20 90 A8 00 F0 12 BE 00 20 20 20 20 20 20 | ....... | 000000C0: 20 20 20 20 90 98 20 54 45 4D 50 3A 90 9C 20 54 | .. TEMP:.. T| 000000D0: 45 4D 50 AA 31 00 10 13 C8 00 20 20 20 20 20 20 |EMP.1..... | 000000E0: 20 20 20 20 90 98 20 54 45 4D 50 3A 90 9C 20 54 | .. TEMP:.. T| 000000F0: 45 4D 50 AA 31 00 30 13 D2 00 20 20 20 20 20 20 |EMP.1.0... | 00000100: 20 20 20 20 90 98 20 54 45 4D 50 3A 90 9C 20 54 | .. TEMP:.. T| 00000110: 45 4D 50 AA 31 00 50 13 DC 00 20 20 20 20 20 20 |EMP.1.P... | 00000120: 20 20 20 20 90 98 20 54 45 4D 50 3A 90 9C 20 54 | .. TEMP:.. T| 00000130: 45 4D 50 AA 31 00 61 13 E6 00 20 20 20 20 20 20 |EMP.1.a... | 00000140: 20 20 20 20 90 A8 00 77 13 F0 00 20 20 20 20 20 | ...w... | 00000150: 20 20 20 20 20 90 94 20 23 24 46 30 00 8F 13 FA | .. #$F0....| 00000160: 00 20 20 20 20 20 20 20 20 20 20 90 90 20 54 45 |. .. TE| 00000170: 4D 50 AA 31 00 A7 13 04 01 20 20 20 20 20 20 20 |MP.1..... | 00000180: 20 20 20 90 97 20 54 45 4D 50 AA 31 00 B8 13 0E | .. TEMP.1....| 00000190: 01 20 20 20 20 20 20 20 20 20 20 90 B6 00 BE 13 |. .....| 000001A0: 18 01 3B 00 DD 13 22 01 3B 20 48 5B 4D 54 41 20 |..;...".; H[MTA | 000001B0: 53 4B 5B 52 4D 20 46 52 5D 4E 20 42 55 46 46 45 |SK[RM FR]N BUFFE| 000001C0: 52 54 00 E3 13 2C 01 3B 00 FC 13 36 01 47 45 54 |RT...,.;...6.GET| 000001D0: 53 43 52 3A 20 20 20 90 A4 20 4B 45 52 4E 4F 55 |SCR: .. KERNOU| 000001E0: 54 00 02 14 40 01 3B 00 18 14 4A 01 20 20 20 20 |T...@.;...J. | 000001F0: 20 20 20 20 20 20 90 A1 20 23 24 30 30 00 3A 14 | .. #$00.:.| 00000200: 54 01 20 20 20 20 20 20 20 20 20 20 90 A2 20 23 |T. .. #| 00000210: 24 45 30 3B 20 46 52 5D 4E 20 24 45 30 30 30 00 |$E0; FR]N $E000.| 00000220: 4F 14 5E 01 20 20 20 20 20 20 20 20 20 20 90 9E |O.^. ..| 00000230: 20 24 46 43 00 64 14 68 01 20 20 20 20 20 20 20 | $FC.d.h. | 00000240: 20 20 20 90 A3 20 24 46 44 00 6A 14 72 01 3B 00 | .. $FD.j.r.;.| 00000250: 80 14 7C 01 20 20 20 20 20 20 20 20 20 20 90 A1 |..|. ..| 00000260: 20 23 24 30 30 00 A2 14 86 01 20 20 20 20 20 20 | #$00..... | 00000270: 20 20 20 20 90 A2 20 23 24 30 34 3B 20 54 49 4C | .. #$04; TIL| 00000280: 4C 20 24 30 34 30 30 00 B7 14 90 01 20 20 20 20 |L $0400..... | 00000290: 20 20 20 20 20 20 90 9E 20 24 46 45 00 CC 14 9A | .. $FE....| 000002A0: 01 20 20 20 20 20 20 20 20 20 20 90 A3 20 24 46 |. .. $F| 000002B0: 46 00 D2 14 A4 01 3B 00 F9 14 AE 01 20 20 20 20 |F.....;..... | 000002C0: 20 20 20 20 20 20 90 A1 20 23 34 3B 20 46 4C 59 | .. #4; FLY| 000002D0: 54 54 41 20 46 59 52 41 20 42 4C 4F 43 4B 00 0F |TTA FYRA BLOCK..| 000002E0: 15 B8 01 20 20 20 20 20 20 20 20 20 20 90 A4 20 |... .. | 000002F0: 43 4F 50 59 00 15 15 C2 01 3B 00 2B 15 CC 01 20 |COPY.....;.+... | 00000300: 20 20 20 20 20 20 20 20 20 90 A1 20 23 24 30 30 | .. #$00| 00000310: 00 4D 15 D6 01 20 20 20 20 20 20 20 20 20 20 90 |.M... .| 00000320: A2 20 23 24 45 34 3B 20 46 52 5D 4E 20 24 45 34 |. #$E4; FR]N $E4| 00000330: 30 30 00 62 15 E0 01 20 20 20 20 20 20 20 20 20 |00.b... | 00000340: 20 90 9E 20 24 46 43 00 77 15 EA 01 20 20 20 20 | .. $FC.w... | 00000350: 20 20 20 20 20 20 90 A3 20 24 46 44 00 7D 15 F4 | .. $FD.}..| 00000360: 01 3B 00 93 15 FE 01 20 20 20 20 20 20 20 20 20 |.;..... | 00000370: 20 90 A1 20 23 24 30 30 00 B5 15 08 02 20 20 20 | .. #$00..... | 00000380: 20 20 20 20 20 20 20 90 A2 20 23 24 44 38 3B 20 | .. #$D8; | 00000390: 54 49 4C 4C 20 24 44 38 30 30 00 CA 15 12 02 20 |TILL $D800..... | 000003A0: 20 20 20 20 20 20 20 20 20 90 9E 20 24 46 45 00 | .. $FE.| 000003B0: DF 15 1C 02 20 20 20 20 20 20 20 20 20 20 90 A3 |.... ..| 000003C0: 20 24 46 46 00 E5 15 26 02 3B 00 0C 16 30 02 20 | $FF...&.;...0. | 000003D0: 20 20 20 20 20 20 20 20 20 90 A1 20 23 34 3B 20 | .. #4; | 000003E0: 46 4C 59 54 54 41 20 46 59 52 41 20 42 4C 4F 43 |FLYTTA FYRA BLOC| 000003F0: 4B 00 22 16 3A 02 20 20 20 20 20 20 20 20 20 20 |K.".:. | 00000400: 90 A4 20 43 4F 50 59 00 28 16 44 02 3B 00 40 16 |.. COPY.(.D.;.@.| 00000410: 4E 02 20 20 20 20 20 20 20 20 20 20 90 A4 20 4B |N. .. K| 00000420: 45 52 4E 49 4E 00 46 16 58 02 3B 00 5E 16 62 02 |ERNIN.F.X.;.^.b.| 00000430: 20 20 20 20 20 20 20 20 20 20 90 94 20 42 4F 52 | .. BOR| 00000440: 44 45 52 00 75 16 6C 02 20 20 20 20 20 20 20 20 |DER.u.l. | 00000450: 20 20 90 97 20 35 33 32 38 30 00 8D 16 76 02 20 | .. 53280...v. | 00000460: 20 20 20 20 20 20 20 20 20 90 94 20 42 41 43 4B | .. BACK| 00000470: 47 52 00 A4 16 80 02 20 20 20 20 20 20 20 20 20 |GR..... | 00000480: 20 90 97 20 35 33 32 38 31 00 AA 16 8A 02 3B 00 | .. 53281.....;.| 00000490: BB 16 94 02 20 20 20 20 20 20 20 20 20 20 90 B6 |.... ..| 000004A0: 00 C1 16 9E 02 3B 00 E7 16 A8 02 3B 20 57 52 49 |.....;.....; WRI| 000004B0: 54 45 53 43 52 2E 20 53 4B 52 49 56 45 52 20 55 |TESCR. SKRIVER U| 000004C0: 54 20 4B 4F 4D 50 49 4C 45 52 41 44 00 FD 16 B2 |T KOMPILERAD....| 000004D0: 02 3B 20 20 20 20 20 20 20 20 20 20 20 53 4B 5B |.; SK[| 000004E0: 52 4D 00 0E 17 BC 02 57 52 49 54 45 53 43 52 3A |RM.....WRITESCR:| 000004F0: 20 90 B9 00 27 17 C6 02 20 20 20 20 20 20 20 20 | ...'... | 00000500: 20 20 90 A4 20 4B 45 52 4E 4F 55 54 00 3F 17 D0 | .. KERNOUT.?..| 00000510: 02 20 20 20 20 20 20 20 20 20 20 90 A4 20 53 43 |. .. SC| 00000520: 52 50 41 52 00 45 17 DA 02 3B 00 6D 17 E4 02 3B |RPAR.E...;.m...;| 00000530: 20 48 5B 4D 54 41 20 53 54 41 52 54 20 41 44 52 | H[MTA START ADR| 00000540: 45 53 53 AD 4D 4F 44 45 20 46 5C 52 20 53 4B 5B |ESS.MODE F\R SK[| 00000550: 52 4D 00 73 17 EE 02 3B 00 87 17 F8 02 20 20 20 |RM.s...;..... | 00000560: 20 20 20 20 20 20 20 90 A2 20 23 30 00 A1 17 02 | .. #0....| 00000570: 03 20 20 20 20 20 20 20 20 20 20 90 94 20 28 54 |. .. (T| 00000580: 45 4D 50 29 2C 59 00 B7 17 0C 03 20 20 20 20 20 |EMP),Y..... | 00000590: 20 20 20 20 20 90 97 20 53 41 44 52 00 C8 17 16 | .. SADR....| 000005A0: 03 20 20 20 20 20 20 20 20 20 20 90 AF 00 E2 17 |. .....| 000005B0: 20 03 20 20 20 20 20 20 20 20 20 20 90 94 20 28 | . .. (| 000005C0: 54 45 4D 50 29 2C 59 00 FA 17 2A 03 20 20 20 20 |TEMP),Y...*. | 000005D0: 20 20 20 20 20 20 90 97 20 53 41 44 52 AA 31 00 | .. SADR.1.| 000005E0: 00 18 34 03 3B 00 15 18 3E 03 20 20 20 20 20 20 |..4.;...>. | 000005F0: 20 20 20 20 90 A2 20 23 31 32 00 2F 18 48 03 20 | .. #12./.H. | 00000600: 20 20 20 20 20 20 20 20 20 90 94 20 28 54 45 4D | .. (TEM| 00000610: 50 29 2C 59 00 51 18 52 03 20 20 20 20 20 20 20 |P),Y.Q.R. | 00000620: 20 20 20 90 97 20 54 45 4D 4F 3B 20 4C 41 47 52 | .. TEMO; LAGR| 00000630: 41 20 4D 4F 44 45 00 57 18 5C 03 3B 00 73 18 66 |A MODE.W.\.;.s.f| 00000640: 03 3B 20 4D 41 52 4B 5C 52 20 49 20 55 54 47 5D |.; MARK\R I UTG]| 00000650: 4E 47 53 20 4C 5B 47 45 00 79 18 70 03 3B 00 8D |NGS L[GE.y.p.;..| 00000660: 18 7A 03 20 20 20 20 20 20 20 20 20 20 90 94 20 |.z. .. | 00000670: 23 30 00 A2 18 84 03 20 20 20 20 20 20 20 20 20 |#0..... | 00000680: 20 90 97 20 52 41 44 00 B7 18 8E 03 20 20 20 20 | .. RAD..... | 00000690: 20 20 20 20 20 20 90 97 20 4B 4F 4C 00 BD 18 98 | .. KOL....| 000006A0: 03 3B 00 D5 18 A2 03 20 20 20 20 20 20 20 20 20 |.;..... | 000006B0: 20 90 A4 20 4B 45 52 4E 49 4E 00 DB 18 AC 03 3B | .. KERNIN.....;| 000006C0: 00 F3 18 B6 03 3B 20 53 54 41 52 54 20 41 56 20 |.....; START AV | 000006D0: 55 54 53 4B 52 49 46 54 00 F9 18 C0 03 3B 00 0D |UTSKRIFT.....;..| 000006E0: 19 CA 03 4E 45 57 4C 49 4E 45 3A 20 20 90 A2 20 |...NEWLINE: .. | 000006F0: 23 30 00 24 19 D4 03 20 20 20 20 20 20 20 20 20 |#0.$... | 00000700: 20 90 A3 20 47 41 44 52 59 00 3B 19 DE 03 20 20 | .. GADRY.;... | 00000710: 20 20 20 20 20 20 20 20 90 A3 20 46 41 44 52 59 | .. FADRY| 00000720: 00 41 19 E8 03 3B 00 64 19 F2 03 3B 20 48 5B 4D |.A...;.d...; H[M| 00000730: 54 41 20 41 44 52 45 53 53 20 54 49 4C 4C 20 47 |TA ADRESS TILL G| 00000740: 52 41 46 49 4B 20 46 49 4C 00 6A 19 FC 03 3B 00 |RAFIK FIL.j...;.| 00000750: 83 19 06 04 20 20 20 20 20 20 20 20 20 90 94 20 |.... .. | 00000760: 28 53 41 44 52 29 2C 59 00 98 19 10 04 20 20 20 |(SADR),Y..... | 00000770: 20 20 20 20 20 20 90 97 20 47 41 44 52 00 A8 19 | .. GADR...| 00000780: 1A 04 20 20 20 20 20 20 20 20 20 90 AF 00 C1 19 |.. .....| 00000790: 24 04 20 20 20 20 20 20 20 20 20 90 94 20 28 53 |$. .. (S| 000007A0: 41 44 52 29 2C 59 00 D8 19 2E 04 20 20 20 20 20 |ADR),Y..... | 000007B0: 20 20 20 20 90 97 20 47 41 44 52 AA 31 00 E8 19 | .. GADR.1...| 000007C0: 38 04 20 20 20 20 20 20 20 20 20 90 AF 00 FE 19 |8. .....| 000007D0: 42 04 20 20 20 20 20 20 20 20 20 90 A3 20 53 41 |B. .. SA| 000007E0: 44 52 59 00 04 1A 4C 04 3B 00 1A 1A 56 04 3B 20 |DRY...L.;...V.; | 000007F0: 5B 52 20 44 45 54 20 46 49 4C 20 53 4C 55 54 00 |[R DET FIL SLUT.| 00000800: 20 1A 60 04 3B 00 35 1A 6A 04 20 20 20 20 20 20 | .`.;.5.j. | 00000810: 20 20 20 90 94 20 47 41 52 44 00 4C 1A 74 04 20 | .. GARD.L.t. | 00000820: 20 20 20 20 20 20 20 20 90 95 20 47 41 52 44 AA | .. GARD.| 00000830: 31 00 6D 1A 7E 04 20 20 20 20 20 20 20 20 20 90 |1.m.~. .| 00000840: 8C 20 57 52 49 54 45 3B 20 4E 45 4A AB 53 4B 52 |. WRITE; NEJ.SKR| 00000850: 49 56 00 85 1A 83 04 20 20 20 20 20 20 20 20 20 |IV..... | 00000860: 90 A5 20 46 49 4C 53 4C 55 54 00 8B 1A 88 04 3B |.. FILSLUT.....;| 00000870: 00 AE 1A 92 04 3B 20 48 5B 4D 54 41 20 41 44 52 |.....; H[MTA ADR| 00000880: 45 53 53 20 54 49 4C 4C 20 46 5B 52 47 20 4B 4F |ESS TILL F[RG KO| 00000890: 44 45 52 00 B4 1A 9C 04 3B 00 C7 1A A6 04 57 52 |DER.....;.....WR| 000008A0: 49 54 45 3A 20 20 20 90 A2 20 23 30 00 E0 1A B0 |ITE: .. #0....| 000008B0: 04 20 20 20 20 20 20 20 20 20 90 94 20 28 47 41 |. .. (GA| 000008C0: 52 44 29 2C 59 00 F5 1A BA 04 20 20 20 20 20 20 |RD),Y..... | 000008D0: 20 20 20 90 97 20 46 41 44 52 00 05 1B C4 04 20 | .. FADR..... | 000008E0: 20 20 20 20 20 20 20 20 90 AF 00 1E 1B CE 04 20 | ....... | 000008F0: 20 20 20 20 20 20 20 20 90 94 20 28 47 41 44 52 | .. (GADR| 00000900: 29 2C 59 00 35 1B D8 04 20 20 20 20 20 20 20 20 |),Y.5... | 00000910: 20 90 97 20 46 41 44 52 AA 31 00 45 1B E2 04 20 | .. FADR.1.E... | 00000920: 20 20 20 20 20 20 20 20 90 AF 00 4B 1B EC 04 3B | ...K...;| 00000930: 00 68 1B F6 04 3B 20 48 5B 4D 54 41 20 49 4E 49 |.h...; H[MTA INI| 00000940: 54 49 45 52 49 4E 47 53 20 46 5B 52 47 00 6E 1B |TIERINGS F[RG.n.| 00000950: 00 05 3B 00 87 1B 0A 05 20 20 20 20 20 20 20 20 |..;..... | 00000960: 20 90 94 20 28 47 41 44 52 29 2C 59 00 9C 1B 14 | .. (GADR),Y....| 00000970: 05 20 20 20 20 20 20 20 20 20 90 97 20 46 41 52 |. .. FAR| 00000980: 47 00 AC 1B 1E 05 20 20 20 20 20 20 20 20 20 90 |G..... .| 00000990: AF 00 C2 1B 28 05 20 20 20 20 20 20 20 20 20 90 |....(. .| 000009A0: A3 20 47 41 44 52 59 00 C8 1B 32 05 3B 00 E6 1B |. GADRY...2.;...| 000009B0: 3C 05 3B 20 48 55 56 55 44 20 4C 4F 4F 50 20 46 |<.; HUVUD LOOP F| 000009C0: 5C 52 20 55 54 53 4B 52 49 46 54 00 EC 1B 46 05 |\R UTSKRIFT...F.| 000009D0: 3B 00 02 1C 50 05 4D 45 52 4B 4F 44 3A 20 20 90 |;...P.MERKOD: .| 000009E0: A2 20 47 41 44 52 59 00 1B 1C 5A 05 20 20 20 20 |. GADRY...Z. | 000009F0: 20 20 20 20 20 90 94 20 28 47 41 44 52 29 2C 59 | .. (GADR),Y| 00000A00: 00 32 1C 64 05 20 20 20 20 20 20 20 20 20 90 97 |.2.d. ..| 00000A10: 20 54 45 43 4B 45 4E 00 4A 1C 6E 05 20 20 20 20 | TECKEN.J.n. | 00000A20: 20 20 20 20 20 90 8A 20 53 54 59 52 4B 4F 44 00 | .. STYRKOD.| 00000A30: 50 1C 78 05 3B 00 66 1C 82 05 20 20 20 20 20 20 |P.x.;.f... | 00000A40: 20 20 20 90 9A 20 47 41 44 52 59 00 6C 1C 8C 05 | .. GADRY.l...| 00000A50: 3B 00 89 1C 96 05 3B 20 50 4C 4F 54 54 41 20 54 |;.....; PLOTTA T| 00000A60: 45 43 4B 45 4E 20 50 5D 20 53 4B 5B 52 4D 00 8F |ECKEN P] SK[RM..| 00000A70: 1C A0 05 3B 00 A6 1C AA 05 20 20 20 20 20 20 20 |...;..... | 00000A80: 20 20 90 A4 20 53 45 54 43 55 52 00 BB 1C B4 05 | .. SETCUR.....| 00000A90: 20 20 20 20 20 20 20 20 20 90 A1 20 46 41 52 47 | .. FARG| 00000AA0: 00 D2 1C BE 05 20 20 20 20 20 20 20 20 20 90 94 |..... ..| 00000AB0: 20 54 45 43 4B 45 4E 00 EA 1C C8 05 20 20 20 20 | TECKEN..... | 00000AC0: 20 20 20 20 20 90 A4 20 50 55 54 43 48 41 52 00 | .. PUTCHAR.| 00000AD0: F0 1C D2 05 3B 00 15 1D DC 05 3B 20 41 56 47 5C |....;.....; AVG\| 00000AE0: 52 20 4D 4F 44 45 20 2C 20 5C 4B 41 20 4B 4F 4C |R MODE , \KA KOL| 00000AF0: 20 45 4C 4C 45 52 20 52 41 44 00 1B 1D E6 05 3B | ELLER RAD.....;| 00000B00: 00 30 1D F0 05 20 20 20 20 20 20 20 20 20 90 94 |.0... ..| 00000B10: 20 54 45 4D 4F 00 45 1D FA 05 20 20 20 20 20 20 | TEMO.E... | 00000B20: 20 20 20 90 93 20 23 24 46 30 00 5D 1D 04 06 20 | .. #$F0.]... | 00000B30: 20 20 20 20 20 20 20 20 90 8C 20 49 43 4B 45 48 | .. ICKEH| 00000B40: 4F 5A 00 63 1D 0E 06 3B 00 77 1D 18 06 20 20 20 |OZ.c...;.w... | 00000B50: 20 20 20 20 20 20 90 9A 20 52 41 44 00 8E 1D 22 | .. RAD..."| 00000B60: 06 20 20 20 20 20 20 20 20 20 90 A5 20 4D 45 52 |. .. MER| 00000B70: 4B 4F 44 00 94 1D 2C 06 3B 00 A8 1D 36 06 49 43 |KOD...,.;...6.IC| 00000B80: 4B 45 48 4F 5A 3A 20 90 9A 20 4B 4F 4C 00 BF 1D |KEHOZ: .. KOL...| 00000B90: 40 06 20 20 20 20 20 20 20 20 20 90 A5 20 4D 45 |@. .. ME| 00000BA0: 52 4B 4F 44 00 C5 1D 4A 06 3B 00 E6 1D 54 06 3B |RKOD...J.;...T.;| 00000BB0: 20 41 56 47 5C 52 20 46 55 4E 4B 54 49 4F 4E 20 | AVG\R FUNKTION | 00000BC0: 46 5C 52 20 53 54 59 52 4B 4F 44 00 EC 1D 5E 06 |F\R STYRKOD...^.| 00000BD0: 3B 00 FC 1D 68 06 53 54 59 52 4B 4F 44 3A 20 90 |;...h.STYRKOD: .| 00000BE0: AF 00 15 1E 72 06 20 20 20 20 20 20 20 20 20 90 |....r. .| 00000BF0: 94 20 28 47 41 44 52 29 2C 59 00 2A 1E 7C 06 20 |. (GADR),Y.*.|. | 00000C00: 20 20 20 20 20 20 20 20 90 97 20 54 45 4D 50 00 | .. TEMP.| 00000C10: 3A 1E 86 06 20 20 20 20 20 20 20 20 20 90 AF 00 |:... ...| 00000C20: 50 1E 90 06 20 20 20 20 20 20 20 20 20 90 A3 20 |P... .. | 00000C30: 47 41 44 52 59 00 56 1E 9A 06 3B 00 69 1E A4 06 |GADRY.V...;.i...| 00000C40: 20 20 20 20 20 20 20 20 20 90 92 20 23 30 00 80 | .. #0..| 00000C50: 1E AE 06 20 20 20 20 20 20 20 20 20 90 8C 20 56 |... .. V| 00000C60: 41 44 4B 4F 44 00 86 1E B8 06 3B 00 A8 1E C2 06 |ADKOD.....;.....| 00000C70: 3B 20 52 41 44 53 4C 55 54 20 54 45 43 4B 45 4E |; RADSLUT TECKEN| 00000C80: 20 2C 20 41 56 53 4C 55 54 20 52 41 44 00 AE 1E | , AVSLUT RAD...| 00000C90: CC 06 3B 00 BE 1E D6 06 20 20 20 20 20 20 20 20 |..;..... | 00000CA0: 20 90 A8 00 E5 1E E0 06 20 20 20 20 20 20 20 20 | ....... | 00000CB0: 20 90 94 20 53 41 44 52 3B 20 52 5B 4B 4E 41 20 | .. SADR; R[KNA | 00000CC0: 55 50 50 20 50 45 4B 41 52 45 00 F8 1E EA 06 20 |UPP PEKARE..... | 00000CD0: 20 20 20 20 20 20 20 20 90 90 20 23 32 00 0D 1F | .. #2...| 00000CE0: F4 06 20 20 20 20 20 20 20 20 20 90 97 20 53 41 |.. .. SA| 00000CF0: 44 52 00 20 1F FE 06 20 20 20 20 20 20 20 20 20 |DR. ... | 00000D00: 90 94 20 23 30 00 37 1F 08 07 20 20 20 20 20 20 |.. #0.7... | 00000D10: 20 20 20 90 90 20 53 41 44 52 AA 31 00 4E 1F 12 | .. SADR.1.N..| 00000D20: 07 20 20 20 20 20 20 20 20 20 90 97 20 53 41 44 |. .. SAD| 00000D30: 52 AA 31 00 54 1F 1C 07 3B 00 69 1F 26 07 20 20 |R.1.T...;.i.&. | 00000D40: 20 20 20 20 20 20 20 90 94 20 54 45 4D 4F 00 7E | .. TEMO.~| 00000D50: 1F 30 07 20 20 20 20 20 20 20 20 20 90 93 20 23 |.0. .. #| 00000D60: 24 46 30 00 95 1F 3A 07 20 20 20 20 20 20 20 20 |$F0...:. | 00000D70: 20 90 8C 20 56 41 44 4B 4F 44 00 9B 1F 44 07 3B | .. VADKOD...D.;| 00000D80: 00 AE 1F 4E 07 20 20 20 20 20 20 20 20 20 90 94 |...N. ..| 00000D90: 20 23 30 00 C2 1F 58 07 20 20 20 20 20 20 20 20 | #0...X. | 00000DA0: 20 90 97 20 52 41 44 00 D6 1F 62 07 20 20 20 20 | .. RAD...b. | 00000DB0: 20 20 20 20 20 90 9A 20 4B 4F 4C 00 EA 1F 6C 07 | .. KOL...l.| 00000DC0: 20 20 20 20 20 20 20 20 20 90 94 20 4B 4F 4C 00 | .. KOL.| 00000DD0: FE 1F 76 07 20 20 20 20 20 20 20 20 20 90 92 20 |..v. .. | 00000DE0: 23 34 30 00 15 20 80 07 20 20 20 20 20 20 20 20 |#40.. .. | 00000DF0: 20 90 89 20 53 4B 49 50 31 31 00 2D 20 8A 07 54 | .. SKIP11.- ..T| 00000E00: 4F 4C 49 4E 45 3A 20 20 90 A5 20 4E 45 57 4C 49 |OLINE: .. NEWLI| 00000E10: 4E 45 00 44 20 94 07 53 4B 49 50 31 31 3A 20 90 |NE.D ..SKIP11: .| 00000E20: A5 20 46 49 4C 53 4C 55 54 00 4A 20 9E 07 3B 00 |. FILSLUT.J ..;.| 00000E30: 5D 20 A8 07 56 41 44 4B 4F 44 3A 20 20 90 94 20 |] ..VADKOD: .. | 00000E40: 23 30 00 71 20 B2 07 20 20 20 20 20 20 20 20 20 |#0.q .. | 00000E50: 90 97 20 4B 4F 4C 00 85 20 BC 07 20 20 20 20 20 |.. KOL.. .. | 00000E60: 20 20 20 20 90 9A 20 52 41 44 00 99 20 C6 07 20 | .. RAD.. .. | 00000E70: 20 20 20 20 20 20 20 20 90 94 20 52 41 44 00 AD | .. RAD..| 00000E80: 20 D0 07 20 20 20 20 20 20 20 20 20 90 92 20 23 | .. .. #| 00000E90: 32 35 00 C4 20 DA 07 20 20 20 20 20 20 20 20 20 |25.. .. | 00000EA0: 90 88 20 54 4F 4C 49 4E 45 00 CA 20 E4 07 3B 00 |.. TOLINE.. ..;.| 00000EB0: E2 20 EE 07 20 20 20 20 20 20 20 20 20 90 A5 20 |. .. .. | 00000EC0: 46 49 4C 53 4C 55 54 00 E8 20 F8 07 3B 00 02 21 |FILSLUT.. ..;..!| 00000ED0: 02 08 3B 20 4B 4F 4E 54 52 4F 4C 4C 45 52 41 20 |..; KONTROLLERA | 00000EE0: 53 54 59 52 4B 4F 44 00 08 21 0C 08 3B 00 1D 21 |STYRKOD..!..;..!| 00000EF0: 16 08 20 20 20 20 20 20 20 20 20 90 94 20 54 45 |.. .. TE| 00000F00: 4D 4F 00 32 21 20 08 20 20 20 20 20 20 20 20 20 |MO.2! . | 00000F10: 90 93 20 23 24 46 30 00 49 21 2A 08 20 20 20 20 |.. #$F0.I!*. | 00000F20: 20 20 20 20 20 90 8C 20 52 45 50 4B 4F 44 00 4F | .. REPKOD.O| 00000F30: 21 34 08 3B 00 65 21 3E 08 20 20 20 20 20 20 20 |!4.;.e!>. | 00000F40: 20 20 90 A2 20 46 41 44 52 59 00 7E 21 48 08 20 | .. FADRY.~!H. | 00000F50: 20 20 20 20 20 20 20 20 90 94 20 28 46 41 44 52 | .. (FADR| 00000F60: 29 2C 59 00 93 21 52 08 20 20 20 20 20 20 20 20 |),Y..!R. | 00000F70: 20 90 97 20 46 41 44 52 00 A9 21 5C 08 20 20 20 | .. FADR..!\. | 00000F80: 20 20 20 20 20 20 90 9A 20 46 41 44 52 59 00 AF | .. FADRY..| 00000F90: 21 66 08 3B 00 C6 21 70 08 54 4F 4B 4F 44 3A 20 |!f.;..!p.TOKOD: | 00000FA0: 20 20 90 A5 20 4D 45 52 4B 4F 44 00 CC 21 7A 08 | .. MERKOD..!z.| 00000FB0: 3B 00 EE 21 84 08 3B 20 42 45 48 41 4E 44 4C 41 |;..!..; BEHANDLA| 00000FC0: 20 52 45 50 45 54 49 54 49 4F 4E 53 20 54 45 43 | REPETITIONS TEC| 00000FD0: 4B 45 4E 00 F4 21 8E 08 3B 00 0A 22 98 08 52 45 |KEN..!..;.."..RE| 00000FE0: 50 4B 4F 44 3A 20 20 90 A2 20 47 41 44 52 59 00 |PKOD: .. GADRY.| 00000FF0: 2B 22 A2 08 20 20 20 20 20 20 20 20 20 90 94 20 |+".. .. | 00001000: 28 47 41 44 52 29 2C 59 3B 20 54 45 43 4B 45 4E |(GADR),Y; TECKEN| 00001010: 00 42 22 AC 08 20 20 20 20 20 20 20 20 20 90 97 |.B".. ..| 00001020: 20 54 45 43 4B 45 4E 00 52 22 B6 08 20 20 20 20 | TECKEN.R".. | 00001030: 20 20 20 20 20 90 AF 00 77 22 C0 08 20 20 20 20 | ...w".. | 00001040: 20 20 20 20 20 90 94 20 28 47 41 44 52 29 2C 59 | .. (GADR),Y| 00001050: 3B 20 41 4E 54 41 4C 20 52 45 50 2E 00 90 22 CA |; ANTAL REP...".| 00001060: 08 20 20 20 20 20 20 20 20 20 90 97 20 52 45 50 |. .. REP| 00001070: 45 54 45 52 41 00 A0 22 D4 08 20 20 20 20 20 20 |ETERA..".. | 00001080: 20 20 20 90 AF 00 B6 22 DE 08 20 20 20 20 20 20 | ....".. | 00001090: 20 20 20 90 A3 20 47 41 44 52 59 00 BC 22 E8 08 | .. GADRY.."..| 000010A0: 3B 00 D3 22 F2 08 3B 20 55 54 46 5C 52 20 52 45 |;.."..; UTF\R RE| 000010B0: 50 45 54 49 54 49 4F 4E 00 D9 22 FC 08 3B 00 EC |PETITION.."..;..| 000010C0: 22 06 09 20 20 20 20 20 20 20 20 20 90 A2 20 23 |".. .. #| 000010D0: 30 00 01 23 10 09 52 45 50 4C 4F 4F 50 3A 20 90 |0..#..REPLOOP: .| 000010E0: A1 20 46 41 52 47 00 18 23 1A 09 20 20 20 20 20 |. FARG..#.. | 000010F0: 20 20 20 20 90 94 20 54 45 43 4B 45 4E 00 30 23 | .. TECKEN.0#| 00001100: 24 09 20 20 20 20 20 20 20 20 20 90 A4 20 50 55 |$. .. PU| 00001110: 54 43 48 41 52 00 36 23 2E 09 3B 00 4F 23 38 09 |TCHAR.6#..;.O#8.| 00001120: 20 20 20 20 20 20 20 20 20 90 A0 20 52 45 50 45 | .. REPE| 00001130: 54 45 52 41 00 65 23 42 09 20 20 20 20 20 20 20 |TERA.e#B. | 00001140: 20 20 90 89 20 54 4F 4B 4F 44 00 6B 23 4C 09 3B | .. TOKOD.k#L.;| 00001150: 00 80 23 56 09 20 20 20 20 20 20 20 20 20 90 94 |..#V. ..| 00001160: 20 54 45 4D 4F 00 95 23 60 09 20 20 20 20 20 20 | TEMO..#`. | 00001170: 20 20 20 90 93 20 23 24 46 30 00 AD 23 6A 09 20 | .. #$F0..#j. | 00001180: 20 20 20 20 20 20 20 20 90 8C 20 56 45 52 54 53 | .. VERTS| 00001190: 43 52 00 B3 23 74 09 3B 00 C7 23 7E 09 20 20 20 |CR..#t.;..#~. | 000011A0: 20 20 20 20 20 20 90 9A 20 52 41 44 00 DF 23 88 | .. RAD..#.| 000011B0: 09 20 20 20 20 20 20 20 20 20 90 A5 20 52 45 50 |. .. REP| 000011C0: 4C 4F 4F 50 00 E5 23 92 09 3B 00 F9 23 9C 09 56 |LOOP..#..;..#..V| 000011D0: 45 52 54 53 43 52 3A 20 90 9A 20 4B 4F 4C 00 11 |ERTSCR: .. KOL..| 000011E0: 24 A6 09 20 20 20 20 20 20 20 20 20 90 A5 20 52 |$.. .. R| 000011F0: 45 50 4C 4F 4F 50 00 17 24 B0 09 3B 00 27 24 BA |EPLOOP..$..;.'$.| 00001200: 09 3B 20 56 41 52 49 41 42 4C 45 52 00 2D 24 C4 |.; VARIABLER.-$.| 00001210: 09 3B 00 3F 24 CE 09 53 41 44 52 59 3A 20 20 20 |.;.?$..SADRY: | 00001220: 90 80 20 30 00 51 24 D8 09 47 41 44 52 59 3A 20 |.. 0.Q$..GADRY: | 00001230: 20 20 90 80 20 30 00 63 24 E2 09 46 41 44 52 59 | .. 0.c$..FADRY| 00001240: 3A 20 20 20 90 80 20 30 00 69 24 EC 09 3B 00 6F |: .. 0.i$..;.o| 00001250: 24 F6 09 3B 00 86 24 00 0A 3B 20 41 56 53 4C 55 |$..;..$..; AVSLU| 00001260: 54 41 20 55 54 53 4B 52 49 46 54 00 8C 24 0A 0A |TA UTSKRIFT..$..| 00001270: 3B 00 9C 24 14 0A 46 49 4C 53 4C 55 54 3A 20 90 |;..$..FILSLUT: .| 00001280: AA 00 B1 24 1E 0A 20 20 20 20 20 20 20 20 20 90 |...$.. .| 00001290: A5 20 4D 45 4E 59 00 B7 24 28 0A 3B 00 BD 24 32 |. MENY..$(.;..$2| 000012A0: 0A 3B 00 C3 24 3C 0A 3B 00 00 00 |.;..$<.;... |
../.D.; UNDERRUTINER.5.N.;._.X.; BER[KNA
OFFSET F\R SK[RM PARAMETRAR.E...;.Y...S
CRPAR: .. #0..... .. TEMP.1..
. . .. SCREEN..... ..
TEMP.P... ....... .. T
EMP:.. TEMP.1...H. .. TEMP:.. T
EMP.1.0.R. .. TEMP:.. TEMP.1.P.
.. .. TEMP:.. TEMP.1.A...
...W... .. #$F0.....
.. TEMP.1..... .. TEMP.1....
. .......;...".; H[MTA SK[RM FR
]N BUFFERT...,.;...6.GETSCR: .. KERNOU
T...@.;...J. .. #$00.:.T.
.. #$E0; FR]N $E000.O.^. ..
$FC.D.H. .. $FD.J.R.;...|.
.. #$00..... .. #$04; TIL
L $0400..... .. $FE.L...
.. $FF.R...;..... .. #4; FLY
TTA FYRA BLOCK..... .. COPY...B
.;.+.L. .. #$00.M.V. .
. #$E4; FR]N $E400.B... .. $FC.
W... .. $FD.}...;.....
.. #$00..... .. #$D8; TILL $D8
00.J... .. $FE..... ..
$FF...&.;...0. .. #4; FLYTTA F
YRA BLOCK.".:. .. COPY.(.D.;.@.
N. .. KERNIN.F.X.;.^.B.
.. BORDER.U.L. .. 53280...V.
.. BACKGR..... .. 5328
1.....;..... ...A...;.....; WRI
TESCR. SKRIVER UT KOMPILERAD.....;
SK[RM.....WRITESCR: ...'.F.
.. KERNOUT.?.P. .. SCRPAR.E.Z
.;.M...; H[MTA START ADRESS.MODE F\R SK[
RM.S...;..... .. #0.....
.. (TEMP),Y..... .. SADR.H..
. ..... . .. (TEMP),Y.
..*. .. SADR.1...4.;...>.
.. #12./.H. .. (TEMP),Y.Q.R
. .. TEMO; LAGRA MODE.W.\.;.S.F
.; MARK\R I UTG]NGS L[GE.Y.P.;...Z.
.. #0..... .. RAD.....
.. KOL.....;.U... .. KERN
IN.....;.....; START AV UTSKRIFT.....;..
.J.NEWLINE: .. #0.$.T. .. GADR
Y.;... .. FADRY.A...;.D...; H[M
TA ADRESS TILL GRAFIK FIL.J...;.....
.. (SADR),Y..... .. GADR...
.. ...A.$. .. (SADR),Y.X
... .. GADR.1...8. .....
B. .. SADRY...L.;...V.; [R DET F
IL SLUT. .`.;.5.J. .. GARD.L.T.
.. GARD.1.M.~. .. WRITE;
NEJ.SKRIV..... .. FILSLUT.....;
.....; H[MTA ADRESS TILL F[RG KODER.....
;.G...WRITE: .. #0..... .. (GA
RD),Y..... .. FADR...D.
.....N. .. (GADR),Y.5.X.
.. FADR.1.E... ...K...;.H...; H
[MTA INITIERINGS F[RG.N...;.....
.. (GADR),Y..... .. FARG.....
...B.(. .. GADRY.H.2.;...
<.; HUVUD LOOP F\R UTSKRIFT...F.;...P.ME
RKOD: .. GADRY...Z. .. (GADR),Y
.2.D. .. TECKEN.J.N. ..
STYRKOD.P.X.;.F... .. GADRY.L...
;.....; PLOTTA TECKEN P] SK[RM... .;....
. .. SETCUR..... .. FARG
.R... .. TECKEN...H. ..
PUTCHAR...R.;.....; AVG\R MODE , \KA KOL
ELLER RAD.....;.0... .. TEMO.E.
.. .. #$F0.]... .. ICKEH
OZ.C...;.W... .. RAD...".
.. MERKOD...,.;...6.ICKEHOZ: .. KOL...
@. .. MERKOD.E.J.;...T.; AVG\R F
UNKTION F\R STYRKOD...^.;...H.STYRKOD: .
....R. .. (GADR),Y.*.|.
.. TEMP.:... ...P... ..
GADRY.V...;.I... .. #0.....
.. VADKOD.....;...B.; RADSLUT TECKEN
, AVSLUT RAD...L.;...V. .......
.. SADR; R[KNA UPP PEKARE.....
.. #2..... .. SADR. ...
.. #0.7... .. SADR.1.N..
. .. SADR.1.T...;.I.&. .
. TEMO.~.0. .. #$F0...:.
.. VADKOD...D.;...N. .. #0.B.X.
.. RAD.V.B. .. KOL...L.
.. KOL...V. .. #40.. ..
.. SKIP11.- ..TOLINE: .. NEWLI
NE.D ..SKIP11: .. FILSLUT.J ..;.] ..VADK
OD: .. #0.Q .. .. KOL.. ..
.. RAD.. F. .. RAD.. P.
.. #25.D Z. .. TOLINE.J ..;.
. .. .. FILSLUT.. ..;..!..; KONT
ROLLERA STYRKOD..!..;..!.. .. TE
MO.2! . .. #$F0.I!*. ..
REPKOD.O!4.;.E!>. .. FADRY.~!H.
.. (FADR),Y..!R. .. FADR
..!\. .. FADRY..!F.;.F!P.TOKOD:
.. MERKOD.L!Z.;..!..; BEHANDLA REPETIT
IONS TECKEN..!..;.."..REPKOD: .. GADRY.
+".. .. (GADR),Y; TECKEN.B"..
.. TECKEN.R".. ...W"..
.. (GADR),Y; ANTAL REP..."J.
.. REPETERA. "T. ...."..
.. GADRY.."..;.S"..; UTF\R REPETITION
.Y"..;..".. .. #0..#..REPLOOP: .
. FARG..#.. .. TECKEN.0#$.
.. PUTCHAR.6#..;.O#8. . REPE
TERA.E#B. .. TOKOD.K#L.;..#V.
.. TEMO..#`. .. #$F0..#J.
.. VERTSCR..#T.;.G#~. ..
RAD..#.. .. REPLOOP..#..;..#..V
ERTSCR: .. KOL..$.. .. REPLOOP..
$..;.'$..; VARIABLER.-$D.;.?$N.SADRY:
.. 0.Q$X.GADRY: .. 0.C$..FADRY: .. 0
.I$..;.O$..;..$..; AVSLUTA UTSKRIFT..$..
;..$..FILSLUT: ....$.. .. MENY..
$(.;..$2.;.C$<.;...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL