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 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL