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

DRAW.S.M.II

FILE INFORMATION

FILENAME(S): DRAW.S.M.II

FILE TYPE(S): PRG

FILE SIZE: 4K

FIRST SEEN: 2025-12-01 01:08:52

APPEARS ON: 1 disk(s)

FILE HASH

1a395660855d8d227bc4164130d1b0147fc4df5a9804e0e3018f74f48d506fbb

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
ASSEMBLER FILER DRAW.S.M.II PRG hedning, loot 9 1 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

00000000: 1C 12 28 12 64 00 3B 20  44 52 41 57 2E 00 2E 12  |..(.d.; DRAW....|
00000010: 6E 00 3B 00 3F 12 78 00  3B 20 49 4E 49 54 49 45  |n.;.?.x.; INITIE|
00000020: 52 49 4E 47 00 45 12 82  00 3B 00 5E 12 8C 00 54  |RING.E...;.^...T|
00000030: 45 4D 50 20 20 20 20 20  20 B2 20 24 46 41 3B AB  |EMP      . $FA;.|
00000040: 24 46 42 00 64 12 96 00  3B 00 75 12 A0 00 44 52  |$FB.d...;.u...DR|
00000050: 41 57 3A 20 20 20 20 20  90 B9 00 8E 12 A5 00 20  |AW:     ....... |
00000060: 20 20 20 20 20 20 20 20  20 90 A4 20 4B 45 52 4E  |         .. KERN|
00000070: 4F 55 54 00 94 12 AA 00  3B 00 B4 12 B4 00 3B 20  |OUT.....;.....; |
00000080: 4B 4F 50 49 45 52 41 20  22 49 4E 22 20 4C 41 47  |KOPIERA "IN" LAG|
00000090: 52 41 44 20 53 4B 5B 52  4D 00 BA 12 BE 00 3B 00  |RAD SK[RM.....;.|
000000A0: D0 12 C8 00 20 20 20 20  20 20 20 20 20 20 90 A1  |....          ..|
000000B0: 20 23 24 30 30 00 F2 12  D2 00 20 20 20 20 20 20  | #$00.....      |
000000C0: 20 20 20 20 90 A2 20 23  24 45 30 3B 20 46 52 5D  |    .. #$E0; FR]|
000000D0: 4E 20 24 45 30 30 30 00  07 13 DC 00 20 20 20 20  |N $E000.....    |
000000E0: 20 20 20 20 20 20 90 9E  20 24 46 43 00 1C 13 E6  |      .. $FC....|
000000F0: 00 20 20 20 20 20 20 20  20 20 20 90 A3 20 24 46  |.          .. $F|
00000100: 44 00 22 13 F0 00 3B 00  38 13 FA 00 20 20 20 20  |D."...;.8...    |
00000110: 20 20 20 20 20 20 90 A1  20 23 24 30 30 00 5A 13  |      .. #$00.Z.|
00000120: 04 01 20 20 20 20 20 20  20 20 20 20 90 A2 20 23  |..          .. #|
00000130: 24 30 34 3B 20 54 49 4C  4C 20 24 30 34 30 30 00  |$04; TILL $0400.|
00000140: 6F 13 0E 01 20 20 20 20  20 20 20 20 20 20 90 9E  |o...          ..|
00000150: 20 24 46 45 00 84 13 18  01 20 20 20 20 20 20 20  | $FE.....       |
00000160: 20 20 20 90 A3 20 24 46  46 00 8A 13 22 01 3B 00  |   .. $FF...".;.|
00000170: AF 13 2C 01 20 20 20 20  20 20 20 20 20 20 90 A1  |..,.          ..|
00000180: 20 23 34 3B 20 4B 4F 50  49 45 52 41 20 34 20 42  | #4; KOPIERA 4 B|
00000190: 4C 4F 43 4B 00 C5 13 36  01 20 20 20 20 20 20 20  |LOCK...6.       |
000001A0: 20 20 20 90 A4 20 43 4F  50 59 00 CB 13 40 01 3B  |   .. COPY...@.;|
000001B0: 00 E9 13 4A 01 3B 20 4B  4F 50 49 45 52 41 20 22  |...J.; KOPIERA "|
000001C0: 49 4E 22 20 46 5B 52 47  20 4B 4F 44 45 52 00 EF  |IN" F[RG KODER..|
000001D0: 13 54 01 3B 00 05 14 5E  01 20 20 20 20 20 20 20  |.T.;...^.       |
000001E0: 20 20 20 90 A1 20 23 24  30 30 00 27 14 68 01 20  |   .. #$00.'.h. |
000001F0: 20 20 20 20 20 20 20 20  20 90 A2 20 23 24 45 34  |         .. #$E4|
00000200: 3B 20 46 52 5D 4E 20 24  45 34 30 30 00 3C 14 72  |; FR]N $E400.<.r|
00000210: 01 20 20 20 20 20 20 20  20 20 20 90 9E 20 24 46  |.          .. $F|
00000220: 43 00 51 14 7C 01 20 20  20 20 20 20 20 20 20 20  |C.Q.|.          |
00000230: 90 A3 20 24 46 44 00 57  14 86 01 3B 00 6D 14 90  |.. $FD.W...;.m..|
00000240: 01 20 20 20 20 20 20 20  20 20 20 90 A1 20 23 24  |.          .. #$|
00000250: 30 30 00 8F 14 9A 01 20  20 20 20 20 20 20 20 20  |00.....         |
00000260: 20 90 A2 20 23 24 44 38  3B 20 54 49 4C 4C 20 24  | .. #$D8; TILL $|
00000270: 44 38 30 30 00 A4 14 A4  01 20 20 20 20 20 20 20  |D800.....       |
00000280: 20 20 20 90 9E 20 24 46  45 00 B9 14 AE 01 20 20  |   .. $FE.....  |
00000290: 20 20 20 20 20 20 20 20  90 A3 20 24 46 46 00 BF  |        .. $FF..|
000002A0: 14 B8 01 3B 00 E4 14 C2  01 20 20 20 20 20 20 20  |...;.....       |
000002B0: 20 20 20 90 A1 20 23 34  3B 20 4B 4F 50 49 45 52  |   .. #4; KOPIER|
000002C0: 41 20 34 20 42 4C 4F 43  4B 00 FA 14 CC 01 20 20  |A 4 BLOCK.....  |
000002D0: 20 20 20 20 20 20 20 20  90 A4 20 43 4F 50 59 00  |        .. COPY.|
000002E0: 00 15 D6 01 3B 00 18 15  E0 01 3B 20 52 45 4E 53  |....;.....; RENS|
000002F0: 41 20 52 41 44 20 42 55  46 46 45 52 54 00 1E 15  |A RAD BUFFERT...|
00000300: EA 01 3B 00 32 15 F4 01  20 20 20 20 20 20 20 20  |..;.2...        |
00000310: 20 20 90 A1 20 23 30 00  46 15 FE 01 20 20 20 20  |  .. #0.F...    |
00000320: 20 20 20 20 20 20 90 94  20 23 30 00 5F 15 08 02  |      .. #0._...|
00000330: 52 45 4E 4C 4F 4F 50 3A  20 20 90 97 20 24 45 41  |RENLOOP:  .. $EA|
00000340: 30 30 2C 58 00 70 15 12  02 20 20 20 20 20 20 20  |00,X.p...       |
00000350: 20 20 20 90 AE 00 89 15  1C 02 20 20 20 20 20 20  |   .......      |
00000360: 20 20 20 20 90 8C 20 52  45 4E 4C 4F 4F 50 00 8F  |    .. RENLOOP..|
00000370: 15 26 02 3B 00 B4 15 30  02 3B 20 49 4E 53 54 41  |.&.;...0.; INSTA|
00000380: 4C 4C 45 52 41 20 4E 59  20 56 41 52 4D 53 54 41  |LLERA NY VARMSTA|
00000390: 52 54 20 56 45 4B 54 4F  52 00 BA 15 3A 02 3B 00  |RT VEKTOR...:.;.|
000003A0: DA 15 44 02 20 20 20 20  20 20 20 20 20 20 90 94  |..D.          ..|
000003B0: 20 23 A5 20 4C 4F 57 28  4E 59 56 41 52 4D 29 00  | #. LOW(NYVARM).|
000003C0: F1 15 4E 02 20 20 20 20  20 20 20 20 20 20 90 97  |..N.          ..|
000003D0: 20 24 30 33 30 32 00 12  16 58 02 20 20 20 20 20  | $0302...X.     |
000003E0: 20 20 20 20 20 90 94 20  23 A5 20 48 49 47 48 28  |     .. #. HIGH(|
000003F0: 4E 59 56 41 52 4D 29 00  29 16 62 02 20 20 20 20  |NYVARM).).b.    |
00000400: 20 20 20 20 20 20 90 97  20 24 30 33 30 33 00 2F  |      .. $0303./|
00000410: 16 6C 02 3B 00 47 16 76  02 3B 20 4B 4F 50 50 4C  |.l.;.G.v.; KOPPL|
00000420: 41 20 42 4F 52 54 20 42  41 53 49 43 00 4D 16 80  |A BORT BASIC.M..|
00000430: 02 3B 00 62 16 8A 02 20  20 20 20 20 20 20 20 20  |.;.b...         |
00000440: 20 90 94 20 24 30 31 00  77 16 94 02 20 20 20 20  | .. $01.w...    |
00000450: 20 20 20 20 20 20 AF 20  23 24 46 45 00 8C 16 9E  |      . #$FE....|
00000460: 02 20 20 20 20 20 20 20  20 20 20 90 97 20 24 30  |.          .. $0|
00000470: 31 00 92 16 A8 02 3B 00  AA 16 AD 02 20 20 20 20  |1.....;.....    |
00000480: 20 20 20 20 20 20 90 A4  20 4B 45 52 4E 49 4E 00  |      .. KERNIN.|
00000490: B0 16 B2 02 3B 00 D7 16  B3 02 3B 20 4B 4F 50 50  |....;.....; KOPP|
000004A0: 4C 41 20 49 4E 20 56 41  4C 44 20 54 45 43 4B 45  |LA IN VALD TECKE|
000004B0: 4E 20 55 50 53 5B 54 54  4E 49 4E 47 00 DD 16 B4  |N UPS[TTNING....|
000004C0: 02 3B 00 F4 16 B5 02 20  20 20 20 20 20 20 20 20  |.;.....         |
000004D0: 20 90 94 20 35 33 32 37  32 00 09 17 B6 02 20 20  | .. 53272.....  |
000004E0: 20 20 20 20 20 20 20 20  AF 20 23 32 34 30 00 1D  |        . #240..|
000004F0: 17 B7 02 20 20 20 20 20  20 20 20 20 20 90 95 20  |...          .. |
00000500: 23 32 00 34 17 B8 02 20  20 20 20 20 20 20 20 20  |#2.4...         |
00000510: 20 90 97 20 35 33 32 37  32 00 45 17 B9 02 20 20  | .. 53272.E...  |
00000520: 20 20 20 20 20 20 20 20  90 AA 00 4B 17 BC 02 3B  |        ...K...;|
00000530: 00 51 17 C6 02 3B 00 6F  17 D0 02 3B 20 48 4F 50  |.Q...;.o...; HOP|
00000540: 50 41 20 54 49 4C 4C 20  57 41 49 54 49 4E 47 20  |PA TILL WAITING |
00000550: 4C 4F 4F 50 00 75 17 DA  02 3B 00 8C 17 E4 02 20  |LOOP.u...;..... |
00000560: 20 20 20 20 20 20 20 20  20 90 A5 20 24 41 34 38  |         .. $A48|
00000570: 30 00 92 17 EE 02 3B 00  B8 17 F8 02 3B 20 4E 59  |0.....;.....; NY|
00000580: 20 52 55 54 49 4E 20 AB  20 56 41 52 4D 53 54 41  | RUTIN . VARMSTA|
00000590: 52 54 20 53 4F 4D 20 4B  4F 4C 4C 41 52 00 D6 17  |RT SOM KOLLAR...|
000005A0: 02 03 3B 20 46 55 4E 4B  54 49 4F 4E 53 20 54 41  |..; FUNKTIONS TA|
000005B0: 4E 47 45 4E 54 45 52 4E  41 AD 90 00 DC 17 0C 03  |NGENTERNA.......|
000005C0: 3B 00 E2 17 16 03 3B 00  F9 17 20 03 4E 59 56 41  |;.....;... .NYVA|
000005D0: 52 4D 3A 20 20 20 90 A4  20 55 44 54 49 4D 00 10  |RM:   .. UDTIM..|
000005E0: 18 2A 03 20 20 20 20 20  20 20 20 20 20 90 A4 20  |.*.          .. |
000005F0: 53 54 4F 50 46 00 28 18  34 03 20 20 20 20 20 20  |STOPF.(.4.      |
00000600: 20 20 20 20 90 8C 20 56  49 44 41 52 45 00 3E 18  |    .. VIDARE.>.|
00000610: 3E 03 20 20 20 20 20 20  20 20 20 20 90 A5 20 4D  |>.          .. M|
00000620: 45 4E 59 00 52 18 48 03  56 49 44 41 52 45 3A 20  |ENY.R.H.VIDARE: |
00000630: 20 20 90 94 20 23 30 00  6B 18 52 03 20 20 20 20  |  .. #0.k.R.    |
00000640: 20 20 20 20 20 20 90 97  20 4B 45 59 46 4C 41 47  |      .. KEYFLAG|
00000650: 00 A3 18 5C 03 20 20 20  20 20 20 20 20 20 20 90  |...\.          .|
00000660: 94 20 24 30 32 37 37 3B  20 A1 20 46 49 52 53 54  |. $0277; . FIRST|
00000670: 20 43 48 41 52 41 43 54  45 52 20 46 52 4F 4D 20  | CHARACTER FROM |
00000680: 4B 45 59 42 4F 41 52 44  00 BC 18 66 03 46 31 3A  |KEYBOARD...f.F1:|
00000690: 20 20 20 20 20 20 20 90  92 20 23 C6 28 22 85 22  |       .. #.("."|
000006A0: 29 00 D0 18 70 03 20 20  20 20 20 20 20 20 20 20  |)...p.          |
000006B0: 90 8C 20 46 32 00 D6 18  7A 03 3B 00 F8 18 84 03  |.. F2...z.;.....|
000006C0: 3B 20 53 55 44 44 41 20  52 41 44 20 41 4E 56 49  |; SUDDA RAD ANVI|
000006D0: 53 41 44 20 41 56 20 4D  41 52 4B 5C 52 00 FE 18  |SAD AV MARK\R...|
000006E0: 8E 03 3B 00 13 19 98 03  20 20 20 20 20 20 20 20  |..;.....        |
000006F0: 20 20 90 A1 20 32 31 34  00 2C 19 A2 03 20 20 20  |  .. 214.,...   |
00000700: 20 20 20 20 20 20 20 90  A4 20 43 4C 52 4C 49 4E  |       .. CLRLIN|
00000710: 45 00 45 19 B6 03 20 20  20 20 20 20 20 20 20 20  |E.E...          |
00000720: 90 A5 20 4E 4F 50 52 49  4E 54 00 4B 19 C0 03 3B  |.. NOPRINT.K...;|
00000730: 00 64 19 CA 03 46 32 3A  20 20 20 20 20 20 20 90  |.d...F2:       .|
00000740: 92 20 23 C6 28 22 89 22  29 00 78 19 D4 03 20 20  |. #.(".").x...  |
00000750: 20 20 20 20 20 20 20 20  90 8C 20 46 33 00 7E 19  |        .. F3.~.|
00000760: DE 03 3B 00 9D 19 E8 03  3B 20 53 4B 49 46 54 41  |..;.....; SKIFTA|
00000770: 20 4D 55 4C 54 49 43 4F  4C 4F 55 52 20 41 56 AD  | MULTICOLOUR AV.|
00000780: 50 5D 00 A3 19 F2 03 3B  00 B9 19 FC 03 20 20 20  |P].....;.....   |
00000790: 20 20 20 20 20 20 90 94  20 24 44 30 31 36 00 CE  |      .. $D016..|
000007A0: 19 06 04 20 20 20 20 20  20 20 20 20 90 93 20 23  |...         .. #|
000007B0: 24 31 30 00 E4 19 10 04  20 20 20 20 20 20 20 20  |$10.....        |
000007C0: 20 90 97 20 24 44 30 31  36 00 FC 19 24 04 20 20  | .. $D016...$.  |
000007D0: 20 20 20 20 20 20 20 90  A5 20 4E 4F 50 52 49 4E  |       .. NOPRIN|
000007E0: 54 00 02 1A 2E 04 3B 00  1A 1A 38 04 46 33 3A 20  |T.....;...8.F3: |
000007F0: 20 20 20 20 20 90 92 20  23 C6 28 22 86 22 29 00  |     .. #.(".").|
00000800: 2D 1A 42 04 20 20 20 20  20 20 20 20 20 90 8C 20  |-.B.         .. |
00000810: 46 34 00 33 1A 4C 04 3B  00 4D 1A 56 04 3B 20 4C  |F4.3.L.;.M.V.; L|
00000820: 41 47 52 41 20 52 41 44  20 49 20 42 55 46 46 45  |AGRA RAD I BUFFE|
00000830: 52 54 00 53 1A 60 04 3B  00 63 1A 6A 04 20 20 20  |RT.S.`.;.c.j.   |
00000840: 20 20 20 20 20 20 90 B7  00 7F 1A 74 04 20 20 20  |      .....t.   |
00000850: 20 20 20 20 20 20 90 A4  20 50 4C 4F 54 3B 20 A1  |      .. PLOT; .|
00000860: 20 43 55 52 00 8F 1A 7E  04 20 20 20 20 20 20 20  | CUR...~.       |
00000870: 20 20 90 A8 00 AD 1A 88  04 20 20 20 20 20 20 20  |  .......       |
00000880: 20 20 90 A4 20 50 4C 4F  54 3B 20 53 45 54 20 43  |  .. PLOT; SET C|
00000890: 55 52 00 BD 1A 92 04 20  20 20 20 20 20 20 20 20  |UR.....         |
000008A0: 90 A8 00 DB 1A 9C 04 20  20 20 20 20 20 20 20 20  |.......         |
000008B0: 90 94 20 23 A5 20 4C 4F  57 28 35 34 32 37 32 29  |.. #. LOW(54272)|
000008C0: 00 EF 1A A6 04 20 20 20  20 20 20 20 20 20 90 90  |.....         ..|
000008D0: 20 24 44 31 00 04 1B B0  04 20 20 20 20 20 20 20  | $D1.....       |
000008E0: 20 20 90 97 20 54 45 4D  50 00 23 1B BA 04 20 20  |  .. TEMP.#...  |
000008F0: 20 20 20 20 20 20 20 90  94 20 23 A5 20 48 49 47  |       .. #. HIG|
00000900: 48 28 35 34 32 37 32 29  00 37 1B C4 04 20 20 20  |H(54272).7...   |
00000910: 20 20 20 20 20 20 90 90  20 24 44 32 00 4E 1B CE  |      .. $D2.N..|
00000920: 04 20 20 20 20 20 20 20  20 20 90 97 20 54 45 4D  |.         .. TEM|
00000930: 50 AA 31 00 64 1B D8 04  20 20 20 20 20 20 20 20  |P.1.d...        |
00000940: 20 90 A1 20 35 33 32 38  30 00 77 1B E2 04 20 20  | .. 53280.w...  |
00000950: 20 20 20 20 20 20 20 90  A2 20 23 30 00 8F 1B EC  |       .. #0....|
00000960: 04 4C 41 47 4C 4F 4F 50  3A 20 90 94 20 28 24 44  |.LAGLOOP: .. ($D|
00000970: 31 29 2C 59 00 A7 1B F6  04 20 20 20 20 20 20 20  |1),Y.....       |
00000980: 20 20 90 97 20 24 45 41  30 30 2C 59 00 C0 1B 00  |  .. $EA00,Y....|
00000990: 05 20 20 20 20 20 20 20  20 20 90 94 20 28 54 45  |.         .. (TE|
000009A0: 4D 50 29 2C 59 00 D8 1B  0A 05 20 20 20 20 20 20  |MP),Y.....      |
000009B0: 20 20 20 90 97 20 24 45  41 32 30 2C 59 00 EE 1B  |   .. $EA20,Y...|
000009C0: 14 05 20 20 20 20 20 20  20 20 20 90 9A 20 35 33  |..         .. 53|
000009D0: 32 38 30 00 FE 1B 1E 05  20 20 20 20 20 20 20 20  |280.....        |
000009E0: 20 90 AF 00 12 1C 28 05  20 20 20 20 20 20 20 20  | .....(.        |
000009F0: 20 90 A0 20 23 34 30 00  2A 1C 32 05 20 20 20 20  | .. #40.*.2.    |
00000A00: 20 20 20 20 20 90 8C 20  4C 41 47 4C 4F 4F 50 00  |     .. LAGLOOP.|
00000A10: 40 1C 3C 05 20 20 20 20  20 20 20 20 20 90 9E 20  |@.<.         .. |
00000A20: 35 33 32 38 30 00 58 1C  50 05 20 20 20 20 20 20  |53280.X.P.      |
00000A30: 20 20 20 90 A5 20 4E 4F  50 52 49 4E 54 00 5E 1C  |   .. NOPRINT.^.|
00000A40: 5A 05 3B 00 76 1C 64 05  46 34 3A 20 20 20 20 20  |Z.;.v.d.F4:     |
00000A50: 20 90 92 20 23 C6 28 22  8A 22 29 00 89 1C 6E 05  | .. #.(".")...n.|
00000A60: 20 20 20 20 20 20 20 20  20 90 8C 20 46 35 00 8F  |         .. F5..|
00000A70: 1C 78 05 3B 00 A9 1C 82  05 3B 20 53 4B 52 49 56  |.x.;.....; SKRIV|
00000A80: 20 55 54 20 4C 41 47 52  41 44 20 52 41 44 00 AF  | UT LAGRAD RAD..|
00000A90: 1C 8C 05 3B 00 C5 1C 96  05 20 20 20 20 20 20 20  |...;.....       |
00000AA0: 20 20 90 94 20 24 45 41  30 30 00 DD 1C A0 05 20  |  .. $EA00..... |
00000AB0: 20 20 20 20 20 20 20 20  90 8A 20 4E 4F 50 52 49  |        .. NOPRI|
00000AC0: 4E 54 00 ED 1C AA 05 20  20 20 20 20 20 20 20 20  |NT.....         |
00000AD0: 90 B7 00 02 1D B4 05 20  20 20 20 20 20 20 20 20  |.......         |
00000AE0: 90 A4 20 50 4C 4F 54 00  12 1D BE 05 20 20 20 20  |.. PLOT.....    |
00000AF0: 20 20 20 20 20 90 A8 00  27 1D C8 05 20 20 20 20  |     ...'...    |
00000B00: 20 20 20 20 20 90 A4 20  50 4C 4F 54 00 37 1D D2  |     .. PLOT.7..|
00000B10: 05 20 20 20 20 20 20 20  20 20 90 A8 00 55 1D DC  |.         ...U..|
00000B20: 05 20 20 20 20 20 20 20  20 20 90 94 20 23 A5 20  |.         .. #. |
00000B30: 4C 4F 57 28 35 34 32 37  32 29 00 69 1D E6 05 20  |LOW(54272).i... |
00000B40: 20 20 20 20 20 20 20 20  90 90 20 24 44 31 00 7E  |        .. $D1.~|
00000B50: 1D F0 05 20 20 20 20 20  20 20 20 20 90 97 20 54  |...         .. T|
00000B60: 45 4D 50 00 9D 1D FA 05  20 20 20 20 20 20 20 20  |EMP.....        |
00000B70: 20 90 94 20 23 A5 20 48  49 47 48 28 35 34 32 37  | .. #. HIGH(5427|
00000B80: 32 29 00 B1 1D 04 06 20  20 20 20 20 20 20 20 20  |2).....         |
00000B90: 90 90 20 24 44 32 00 C8  1D 0E 06 20 20 20 20 20  |.. $D2.....     |
00000BA0: 20 20 20 20 90 97 20 54  45 4D 50 AA 31 00 CE 1D  |    .. TEMP.1...|
00000BB0: 18 06 3B 00 E6 1D 1D 06  20 20 20 20 20 20 20 20  |..;.....        |
00000BC0: 20 90 A4 20 4B 45 52 4E  4F 46 46 00 F9 1D 22 06  | .. KERNOFF...".|
00000BD0: 20 20 20 20 20 20 20 20  20 90 A2 20 23 30 00 11  |         .. #0..|
00000BE0: 1E 2C 06 53 4B 52 4C 4F  4F 50 3A 20 90 94 20 24  |.,.SKRLOOP: .. $|
00000BF0: 45 41 30 30 2C 59 00 29  1E 36 06 20 20 20 20 20  |EA00,Y.).6.     |
00000C00: 20 20 20 20 90 97 20 28  24 44 31 29 2C 59 00 41  |    .. ($D1),Y.A|
00000C10: 1E 40 06 20 20 20 20 20  20 20 20 20 90 94 20 24  |.@.         .. $|
00000C20: 45 41 32 30 2C 59 00 5A  1E 4A 06 20 20 20 20 20  |EA20,Y.Z.J.     |
00000C30: 20 20 20 20 90 97 20 28  54 45 4D 50 29 2C 59 00  |    .. (TEMP),Y.|
00000C40: 6A 1E 54 06 20 20 20 20  20 20 20 20 20 90 AF 00  |j.T.         ...|
00000C50: 7E 1E 5E 06 20 20 20 20  20 20 20 20 20 90 A0 20  |~.^.         .. |
00000C60: 23 34 30 00 96 1E 68 06  20 20 20 20 20 20 20 20  |#40...h.        |
00000C70: 20 90 8C 20 53 4B 52 4C  4F 4F 50 00 AD 1E 6D 06  | .. SKRLOOP...m.|
00000C80: 20 20 20 20 20 20 20 20  20 90 A4 20 4B 45 52 4E  |         .. KERN|
00000C90: 49 4E 00 C5 1E 72 06 4E  4F 50 52 49 4E 54 3A 20  |IN...r.NOPRINT: |
00000CA0: 90 9A 20 4B 45 59 46 4C  41 47 00 DB 1E 7C 06 20  |.. KEYFLAG...|. |
00000CB0: 20 20 20 20 20 20 20 20  90 8C 20 4B 4C 41 52 54  |        .. KLART|
00000CC0: 00 E1 1E 86 06 3B 00 F9  1E 90 06 46 35 3A 20 20  |.....;.....F5:  |
00000CD0: 20 20 20 20 90 92 20 23  C6 28 22 87 22 29 00 0C  |    .. #.(".")..|
00000CE0: 1F 9A 06 20 20 20 20 20  20 20 20 20 90 8C 20 46  |...         .. F|
00000CF0: 36 00 12 1F A4 06 3B 00  31 1F AE 06 3B 20 52 5B  |6.....;.1...; R[|
00000D00: 4B 4E 41 20 55 50 50 20  4D 55 4C 54 49 43 4F 4C  |KNA UPP MULTICOL|
00000D10: 4F 55 52 20 23 31 00 37  1F B8 06 3B 00 4D 1F C2  |OUR #1.7...;.M..|
00000D20: 06 20 20 20 20 20 20 20  20 20 90 9A 20 24 44 30  |.         .. $D0|
00000D30: 32 32 00 65 1F FE 06 20  20 20 20 20 20 20 20 20  |22.e...         |
00000D40: 90 9A 20 4B 45 59 46 4C  41 47 00 7B 1F 08 07 20  |.. KEYFLAG.{... |
00000D50: 20 20 20 20 20 20 20 20  90 8C 20 4B 4C 41 52 54  |        .. KLART|
00000D60: 00 81 1F 12 07 3B 00 99  1F 1C 07 46 36 3A 20 20  |.....;.....F6:  |
00000D70: 20 20 20 20 90 92 20 23  C6 28 22 8B 22 29 00 AC  |    .. #.(".")..|
00000D80: 1F 26 07 20 20 20 20 20  20 20 20 20 90 8C 20 46  |.&.         .. F|
00000D90: 37 00 B2 1F 30 07 3B 00  D1 1F 3A 07 3B 20 52 5B  |7...0.;...:.; R[|
00000DA0: 4B 4E 41 20 55 50 50 20  4D 55 4C 54 49 43 4F 4C  |KNA UPP MULTICOL|
00000DB0: 4F 55 52 20 23 32 00 D7  1F 44 07 3B 00 ED 1F 4E  |OUR #2...D.;...N|
00000DC0: 07 20 20 20 20 20 20 20  20 20 90 9A 20 24 44 30  |.         .. $D0|
00000DD0: 32 33 00 05 20 8A 07 20  20 20 20 20 20 20 20 20  |23.. ..         |
00000DE0: 90 9A 20 4B 45 59 46 4C  41 47 00 1B 20 94 07 20  |.. KEYFLAG.. .. |
00000DF0: 20 20 20 20 20 20 20 20  90 8C 20 4B 4C 41 52 54  |        .. KLART|
00000E00: 00 21 20 9E 07 3B 00 39  20 A8 07 46 37 3A 20 20  |.! ..;.9 ..F7:  |
00000E10: 20 20 20 20 90 92 20 23  C6 28 22 88 22 29 00 4C  |    .. #.(".").L|
00000E20: 20 B2 07 20 20 20 20 20  20 20 20 20 90 8C 20 46  | ..         .. F|
00000E30: 38 00 52 20 BC 07 3B 00  6D 20 C6 07 3B 20 52 5B  |8.R ..;.m ..; R[|
00000E40: 4B 4E 41 20 55 50 50 20  53 4B 5B 52 4D 20 46 5B  |KNA UPP SK[RM F[|
00000E50: 52 47 00 73 20 D0 07 3B  00 89 20 DA 07 20 20 20  |RG.s ..;.. ..   |
00000E60: 20 20 20 20 20 20 90 9A  20 24 44 30 32 31 00 A1  |      .. $D021..|
00000E70: 20 E4 07 20 20 20 20 20  20 20 20 20 90 9A 20 4B  | ..         .. K|
00000E80: 45 59 46 4C 45 4B 00 B7  20 EE 07 20 20 20 20 20  |EYFLEK.. ..     |
00000E90: 20 20 20 20 90 8C 20 4B  4C 41 52 54 00 BD 20 F8  |    .. KLART.. .|
00000EA0: 07 3B 00 D5 20 02 08 46  38 3A 20 20 20 20 20 20  |.;.. ..F8:      |
00000EB0: 90 92 20 23 C6 28 22 8C  22 29 00 EB 20 0C 08 20  |.. #.(".").. .. |
00000EC0: 20 20 20 20 20 20 20 20  90 8C 20 4B 4C 41 52 54  |        .. KLART|
00000ED0: 00 F1 20 16 08 3B 00 0C  21 20 08 3B 20 52 5B 4B  |.. ..;..! .; R[K|
00000EE0: 4E 41 20 55 50 20 42 4F  52 44 45 52 20 46 5B 52  |NA UP BORDER F[R|
00000EF0: 47 00 12 21 2A 08 3B 00  28 21 34 08 20 20 20 20  |G..!*.;.(!4.    |
00000F00: 20 20 20 20 20 90 9A 20  24 44 30 32 30 00 40 21  |     .. $D020.@!|
00000F10: 3E 08 20 20 20 20 20 20  20 20 20 90 9A 20 4B 45  |>.         .. KE|
00000F20: 59 46 4C 41 47 00 46 21  48 08 3B 00 5E 21 52 08  |YFLAG.F!H.;.^!R.|
00000F30: 4B 4C 41 52 54 3A 20 20  20 90 94 20 4B 45 59 46  |KLART:   .. KEYF|
00000F40: 4C 41 47 00 77 21 5C 08  20 20 20 20 20 20 20 20  |LAG.w!\.        |
00000F50: 20 90 8A 20 42 41 43 4B  57 41 49 54 00 7D 21 66  | .. BACKWAIT.}!f|
00000F60: 08 3B 00 A0 21 70 08 3B  20 41 56 4C 5B 47 53 4E  |.;..!p.; AVL[GSN|
00000F70: 41 20 54 45 43 4B 45 4E  20 46 52 5D 4E 20 42 55  |A TECKEN FR]N BU|
00000F80: 46 46 45 52 54 00 A6 21  7A 08 3B 00 BC 21 84 08  |FFERT..!z.;..!..|
00000F90: 20 20 20 20 20 20 20 20  20 90 A4 20 47 45 54 49  |         .. GETI|
00000FA0: 4E 00 C2 21 8E 08 3B 00  D8 21 98 08 42 41 43 4B  |N..!..;..!..BACK|
00000FB0: 57 41 49 54 3A 90 A5 20  24 41 34 38 33 00 DE 21  |WAIT:.. $A483..!|
00000FC0: A2 08 3B 00 E4 21 AC 08  3B 00 EA 21 B6 08 3B 00  |..;..!..;..!..;.|
00000FD0: 00 00                                             |..              |
..(.D.; DRAW....N.;.?.X.; INITIERING.E..
.;.^...TEMP      . $FA;.$FB.D...;.U. .DR
AW:     .......          .. KERNOUT.....
;.....; KOPIERA "IN" LAGRAD SK[RM.....;.
P.H.          .. #$00...R.          .. #
$E0; FR]N $E000.....          .. $FC....
.          .. $FD."...;.8...          ..
 #$00.Z...          .. #$04; TILL $0400.
O...          .. $FE.....          .. $F
F...".;...,.          .. #4; KOPIERA 4 B
LOCK.E.6.          .. COPY.K.@.;...J.; K
OPIERA "IN" F[RG KODER...T.;...^.       
   .. #$00.'.H.          .. #$E4; FR]N $
E400.<.R.          .. $FC.Q.|.          
.. $FD.W...;.M...          .. #$00..... 
         .. #$D8; TILL $D800.....       
   .. $FE.....          .. $FF.....;...B
.          .. #4; KOPIERA 4 BLOCK...L.  
        .. COPY...V.;.....; RENSA RAD BU
FFERT.....;.2...          .. #0.F...    
      .. #0._...RENLOOP:  .. $EA00,X.P..
.          .......          .. RENLOOP..
.&.;...0.; INSTALLERA NY VARMSTART VEKTO
R...:.;.Z.D.          .. #. LOW(NYVARM).
..N.          .. $0302...X.          .. 
#. HIGH(NYVARM).).B.          .. $0303./
.L.;.G.V.; KOPPLA BORT BASIC.M...;.B... 
         .. $01.W...          . #$FE....
.          .. $01.....;.....          ..
 KERNIN.....;.W...; KOPPLA IN VALD TECKE
N UPS[TTNING.....;.....          .. 5327
2.....          . #240.....          .. 
#2.4...          .. 53272.E...          
...K...;.Q.F.;.O.P.; HOPPA TILL WAITING 
LOOP.U.Z.;.....          .. $A480.....;.
....; NY RUTIN . VARMSTART SOM KOLLAR.V.
..; FUNKTIONS TANGENTERNA.......;.....;.
.. .NYVARM:   .. UDTIM...*.          .. 
STOPF.(.4.          .. VIDARE.>.>.      
    .. MENY.R.H.VIDARE:   .. #0.K.R.    
      .. KEYFLAG...\.          .. $0277;
 . FIRST CHARACTER FROM KEYBOARD...F.F1:
       .. #F(".").P.P.          .. F2.V.
Z.;.....; SUDDA RAD ANVISAD AV MARK\R...
..;.....          .. 214.,...          .
. CLRLINE.E...          .. NOPRINT.K...;
.D.J.F2:       .. #F(".").X.T.          
.. F3.~...;.....; SKIFTA MULTICOLOUR AV.
P].....;.....         .. $D016.N...     
    .. #$10.....         .. $D016...$.  
       .. NOPRINT.....;...8.F3:      .. 
#F(".").-.B.         .. F4.3.L.;.M.V.; L
AGRA RAD I BUFFERT.S.`.;.C.J.         ..
..T.         .. PLOT; . CUR...~.       
  .......         .. PLOT; SET CUR..... 
        .......         .. #. LOW(54272)
.....         .. $D1.....         .. TEM
P.#...         .. #. HIGH(54272).7.D.   
      .. $D2.N.N.         .. TEMP.1.D.X.
         .. 53280.W...         .. #0....
.LAGLOOP: .. ($D1),Y.....         .. $EA
00,Y.....         .. (TEMP),Y.X...      
   .. $EA20,Y.....         .. 53280.....
         .....(.         .  #40.*.2.    
     .. LAGLOOP.@.<.         .. 53280.X.
P.         .. NOPRINT.^.Z.;.V.D.F4:     
 .. #F(".")...N.         .. F5...X.;....
.; SKRIV UT LAGRAD RAD.....;.E...       
  .. $EA00... .         .. NOPRINT..... 
        .......         .. PLOT.....    
     ...'.H.         .. PLOT.7.R.       
  ...U...         .. #. LOW(54272).I... 
        .. $D1.~...         .. TEMP.....
         .. #. HIGH(54272).....         
.. $D2.H...         .. TEMP.1.N...;.....
         .. KERNOFF...".         .. #0..
.,.SKRLOOP: .. $EA00,Y.).6.         .. (
$D1),Y.A.@.         .. $EA20,Y.Z.J.     
    .. (TEMP),Y.J.T.         ...~.^.    
     .  #40...H.         .. SKRLOOP...M.
         .. KERNIN.E.R.NOPRINT: .. KEYFL
AG...|.         .. KLART.....;.....F5:  
    .. #F(".").....         .. F6.....;.
1...; R[KNA UPP MULTICOLOUR #1.7...;.M.B
.         .. $D022.E...         .. KEYFL
AG.{...         .. KLART.....;.....F6:  
    .. #F(".")...&.         .. F7...0.;.
Q.:.; R[KNA UPP MULTICOLOUR #2.W.D.;...N
.         .. $D023.. ..         .. KEYFL
AG.. ..         .. KLART.! ..;.9 ..F7:  
    .. #F(".").L ..         .. F8.R ..;.
M F.; R[KNA UPP SK[RM F[RG.S P.;.. Z.   
      .. $D021.. ..         .. KEYFLEK..
 ..         .. KLART.. ..;.U ..F8:      
.. #F(".").. ..         .. KLART.. ..;..
! .; R[KNA UP BORDER F[RG..!*.;.(!4.    
     .. $D020.@!>.         .. KEYFLAG.F!
H.;.^!R.KLART:   .. KEYFLAG.W!\.        
 .. BACKWAIT.}!F.;. !P.; AVL[GSNA TECKEN
 FR]N BUFFERT..!Z.;..!..         .. GETI
N.B!..;.X!..BACKWAIT:.. $A483..!..;..!..
;..!..;...
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL