_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\
                                                                 
            

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 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL