DRAW.S.M.III
FILE INFORMATION
FILENAME(S): DRAW.S.M.III
FILE TYPE(S): PRG
FILE SIZE: 3.9K
FIRST SEEN: 2025-12-01 01:08:52
APPEARS ON: 1 disk(s)
FILE HASH
0355981fee21cfd41aafd1e4f73fe1f4436a3cf0ae1853f74e0988e99488665f
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| ASSEMBLER FILER | DRAW.S.M.III | PRG | hedning, loot | 27 | 7 | 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 AE 15 30 02 3B 20 49 4E 53 54 41 |.&.;...0.; INSTA|
00000380: 4C 4C 45 52 41 20 4E 59 20 4E 4D 49 20 56 45 4B |LLERA NY NMI VEK|
00000390: 54 4F 52 00 B4 15 3A 02 3B 00 D4 15 3F 02 20 20 |TOR...:.;...?. |
000003A0: 20 20 20 20 20 20 20 20 90 94 20 23 A5 20 4C 4F | .. #. LO|
000003B0: 57 28 41 54 4D 45 4E 59 29 00 EB 15 44 02 20 20 |W(ATMENY)...D. |
000003C0: 20 20 20 20 20 20 20 20 90 97 20 24 30 33 31 38 | .. $0318|
000003D0: 00 0C 16 49 02 20 20 20 20 20 20 20 20 20 20 90 |...I. .|
000003E0: 94 20 23 A5 20 48 49 47 48 28 41 54 4D 45 4E 59 |. #. HIGH(ATMENY|
000003F0: 29 00 23 16 4E 02 20 20 20 20 20 20 20 20 20 20 |).#.N. |
00000400: 90 97 20 24 30 33 31 39 00 29 16 6C 02 3B 00 41 |.. $0319.).l.;.A|
00000410: 16 76 02 3B 20 4B 4F 50 50 4C 41 20 42 4F 52 54 |.v.; KOPPLA BORT|
00000420: 20 42 41 53 49 43 00 47 16 80 02 3B 00 5C 16 8A | BASIC.G...;.\..|
00000430: 02 20 20 20 20 20 20 20 20 20 20 90 94 20 24 30 |. .. $0|
00000440: 31 00 71 16 94 02 20 20 20 20 20 20 20 20 20 20 |1.q... |
00000450: AF 20 23 24 46 45 00 86 16 9E 02 20 20 20 20 20 |. #$FE..... |
00000460: 20 20 20 20 20 90 97 20 24 30 31 00 8C 16 A8 02 | .. $01.....|
00000470: 3B 00 A4 16 AD 02 20 20 20 20 20 20 20 20 20 20 |;..... |
00000480: 90 A4 20 4B 45 52 4E 49 4E 00 AA 16 B2 02 3B 00 |.. KERNIN.....;.|
00000490: D1 16 B3 02 3B 20 4B 4F 50 50 4C 41 20 49 4E 20 |....; KOPPLA IN |
000004A0: 56 41 4C 44 20 54 45 43 4B 45 4E 20 55 50 53 5B |VALD TECKEN UPS[|
000004B0: 54 54 4E 49 4E 47 00 D7 16 B4 02 3B 00 EE 16 B5 |TTNING.....;....|
000004C0: 02 20 20 20 20 20 20 20 20 20 20 90 94 20 35 33 |. .. 53|
000004D0: 32 37 32 00 03 17 B6 02 20 20 20 20 20 20 20 20 |272..... |
000004E0: 20 20 AF 20 23 32 34 30 00 17 17 B7 02 20 20 20 | . #240..... |
000004F0: 20 20 20 20 20 20 20 90 95 20 23 32 00 2E 17 B8 | .. #2....|
00000500: 02 20 20 20 20 20 20 20 20 20 20 90 97 20 35 33 |. .. 53|
00000510: 32 37 32 00 3F 17 B9 02 20 20 20 20 20 20 20 20 |272.?... |
00000520: 20 20 90 AA 00 55 17 BA 02 20 20 20 20 20 20 20 | ...U... |
00000530: 20 20 20 90 A4 20 48 4F 4D 45 00 5B 17 BC 02 3B | .. HOME.[...;|
00000540: 00 61 17 C6 02 3B 00 86 17 D0 02 3B 20 4C 5D 54 |.a...;.....; L]T|
00000550: 20 41 4E 56 5B 4E 44 41 52 45 4E 20 52 49 54 41 | ANV[NDAREN RITA|
00000560: 20 50 5D 20 53 4B 5B 52 4D 45 4E 00 8C 17 DA 02 | P] SK[RMEN.....|
00000570: 3B 00 A3 17 E4 02 57 41 49 54 4C 4F 4F 50 3A 20 |;.....WAITLOOP: |
00000580: 90 A4 20 43 48 45 43 4B 00 BC 17 E9 02 20 20 20 |.. CHECK..... |
00000590: 20 20 20 20 20 20 20 90 A1 20 4B 45 59 46 4C 41 | .. KEYFLA|
000005A0: 47 00 D1 17 EE 02 20 20 20 20 20 20 20 20 20 20 |G..... |
000005B0: 90 8C 20 43 55 54 00 E9 17 F3 02 20 20 20 20 20 |.. CUT..... |
000005C0: 20 20 20 20 20 90 A4 20 43 48 52 4F 55 54 00 00 | .. CHROUT..|
000005D0: 18 F8 02 43 55 54 3A 20 20 20 20 20 20 90 A4 20 |...CUT: .. |
000005E0: 53 54 4F 50 46 00 1A 18 02 03 20 20 20 20 20 20 |STOPF..... |
000005F0: 20 20 20 20 90 8C 20 57 41 49 54 4C 4F 4F 50 00 | .. WAITLOOP.|
00000600: 30 18 0C 03 20 20 20 20 20 20 20 20 20 20 90 A5 |0... ..|
00000610: 20 4D 45 4E 59 00 36 18 16 03 3B 00 5E 18 20 03 | MENY.6...;.^. .|
00000620: 3B 20 52 55 54 49 4E 20 46 5C 52 20 4B 4F 4E 54 |; RUTIN F\R KONT|
00000630: 52 4F 4C 4C 20 41 56 20 46 55 4E 4B 2E 20 54 41 |ROLL AV FUNK. TA|
00000640: 4E 47 2E 00 64 18 2A 03 3B 00 78 18 34 03 43 48 |NG..d.*.;.x.4.CH|
00000650: 45 43 4B 3A 20 20 20 20 90 94 20 23 30 00 91 18 |ECK: .. #0...|
00000660: 3E 03 20 20 20 20 20 20 20 20 20 20 90 97 20 4B |>. .. K|
00000670: 45 59 46 4C 41 47 00 C9 18 5C 03 20 20 20 20 20 |EYFLAG...\. |
00000680: 20 20 20 20 20 90 A4 20 47 45 54 49 4E 3B 20 A1 | .. GETIN; .|
00000690: 20 46 49 52 53 54 20 43 48 41 52 41 43 54 45 52 | FIRST CHARACTER|
000006A0: 20 46 52 4F 4D 20 4B 45 59 42 4F 41 52 44 00 E2 | FROM KEYBOARD..|
000006B0: 18 66 03 46 31 3A 20 20 20 20 20 20 20 90 92 20 |.f.F1: .. |
000006C0: 23 C6 28 22 85 22 29 00 F6 18 70 03 20 20 20 20 |#.(".")...p. |
000006D0: 20 20 20 20 20 20 90 8C 20 46 32 00 FC 18 7A 03 | .. F2...z.|
000006E0: 3B 00 1E 19 84 03 3B 20 53 55 44 44 41 20 52 41 |;.....; SUDDA RA|
000006F0: 44 20 41 4E 56 49 53 41 44 20 41 56 20 4D 41 52 |D ANVISAD AV MAR|
00000700: 4B 5C 52 00 24 19 8E 03 3B 00 39 19 98 03 20 20 |K\R.$...;.9... |
00000710: 20 20 20 20 20 20 20 20 90 A1 20 32 31 34 00 52 | .. 214.R|
00000720: 19 A2 03 20 20 20 20 20 20 20 20 20 20 90 A4 20 |... .. |
00000730: 43 4C 52 4C 49 4E 45 00 6B 19 AC 03 20 20 20 20 |CLRLINE.k... |
00000740: 20 20 20 20 20 20 90 9A 20 4B 45 59 46 4C 41 47 | .. KEYFLAG|
00000750: 00 7C 19 B6 03 20 20 20 20 20 20 20 20 20 20 90 |.|... .|
00000760: B6 00 82 19 C0 03 3B 00 9B 19 CA 03 46 32 3A 20 |......;.....F2: |
00000770: 20 20 20 20 20 20 90 92 20 23 C6 28 22 89 22 29 | .. #.(".")|
00000780: 00 AF 19 D4 03 20 20 20 20 20 20 20 20 20 20 90 |..... .|
00000790: 8C 20 46 33 00 B5 19 DE 03 3B 00 D4 19 E8 03 3B |. F3.....;.....;|
000007A0: 20 53 4B 49 46 54 41 20 4D 55 4C 54 49 43 4F 4C | SKIFTA MULTICOL|
000007B0: 4F 55 52 20 41 56 AD 50 5D 00 DA 19 F2 03 3B 00 |OUR AV.P].....;.|
000007C0: F0 19 FC 03 20 20 20 20 20 20 20 20 20 90 94 20 |.... .. |
000007D0: 24 44 30 31 36 00 05 1A 06 04 20 20 20 20 20 20 |$D016..... |
000007E0: 20 20 20 90 93 20 23 24 31 30 00 1B 1A 10 04 20 | .. #$10..... |
000007F0: 20 20 20 20 20 20 20 20 90 97 20 24 44 30 31 36 | .. $D016|
00000800: 00 33 1A 1A 04 20 20 20 20 20 20 20 20 20 90 9A |.3... ..|
00000810: 20 4B 45 59 46 4C 41 47 00 43 1A 24 04 20 20 20 | KEYFLAG.C.$. |
00000820: 20 20 20 20 20 20 90 B6 00 49 1A 2E 04 3B 00 61 | ...I...;.a|
00000830: 1A 38 04 46 33 3A 20 20 20 20 20 20 90 92 20 23 |.8.F3: .. #|
00000840: C6 28 22 86 22 29 00 74 1A 42 04 20 20 20 20 20 |.(".").t.B. |
00000850: 20 20 20 20 90 8C 20 46 34 00 7A 1A 4C 04 3B 00 | .. F4.z.L.;.|
00000860: 94 1A 56 04 3B 20 4C 41 47 52 41 20 52 41 44 20 |..V.; LAGRA RAD |
00000870: 49 20 42 55 46 46 45 52 54 00 9A 1A 60 04 3B 00 |I BUFFERT...`.;.|
00000880: AA 1A 6A 04 20 20 20 20 20 20 20 20 20 90 B7 00 |..j. ...|
00000890: C6 1A 74 04 20 20 20 20 20 20 20 20 20 90 A4 20 |..t. .. |
000008A0: 50 4C 4F 54 3B 20 A1 20 43 55 52 00 D6 1A 7E 04 |PLOT; . CUR...~.|
000008B0: 20 20 20 20 20 20 20 20 20 90 A8 00 F4 1A 88 04 | .......|
000008C0: 20 20 20 20 20 20 20 20 20 90 A4 20 50 4C 4F 54 | .. PLOT|
000008D0: 3B 20 53 45 54 20 43 55 52 00 04 1B 92 04 20 20 |; SET CUR..... |
000008E0: 20 20 20 20 20 20 20 90 A8 00 22 1B 9C 04 20 20 | ..."... |
000008F0: 20 20 20 20 20 20 20 90 94 20 23 A5 20 4C 4F 57 | .. #. LOW|
00000900: 28 35 34 32 37 32 29 00 36 1B A6 04 20 20 20 20 |(54272).6... |
00000910: 20 20 20 20 20 90 90 20 24 44 31 00 4B 1B B0 04 | .. $D1.K...|
00000920: 20 20 20 20 20 20 20 20 20 90 97 20 54 45 4D 50 | .. TEMP|
00000930: 00 6A 1B BA 04 20 20 20 20 20 20 20 20 20 90 94 |.j... ..|
00000940: 20 23 A5 20 48 49 47 48 28 35 34 32 37 32 29 00 | #. HIGH(54272).|
00000950: 7E 1B C4 04 20 20 20 20 20 20 20 20 20 90 90 20 |~... .. |
00000960: 24 44 32 00 95 1B CE 04 20 20 20 20 20 20 20 20 |$D2..... |
00000970: 20 90 97 20 54 45 4D 50 AA 31 00 AB 1B D8 04 20 | .. TEMP.1..... |
00000980: 20 20 20 20 20 20 20 20 90 A1 20 35 33 32 38 30 | .. 53280|
00000990: 00 BE 1B E2 04 20 20 20 20 20 20 20 20 20 90 A2 |..... ..|
000009A0: 20 23 30 00 D6 1B EC 04 4C 41 47 4C 4F 4F 50 3A | #0.....LAGLOOP:|
000009B0: 20 90 94 20 28 24 44 31 29 2C 59 00 EE 1B F6 04 | .. ($D1),Y.....|
000009C0: 20 20 20 20 20 20 20 20 20 90 97 20 24 45 41 30 | .. $EA0|
000009D0: 30 2C 59 00 07 1C 00 05 20 20 20 20 20 20 20 20 |0,Y..... |
000009E0: 20 90 94 20 28 54 45 4D 50 29 2C 59 00 1F 1C 0A | .. (TEMP),Y....|
000009F0: 05 20 20 20 20 20 20 20 20 20 90 97 20 24 45 41 |. .. $EA|
00000A00: 32 30 2C 59 00 35 1C 14 05 20 20 20 20 20 20 20 |20,Y.5... |
00000A10: 20 20 90 9A 20 35 33 32 38 30 00 45 1C 1E 05 20 | .. 53280.E... |
00000A20: 20 20 20 20 20 20 20 20 90 AF 00 59 1C 28 05 20 | ...Y.(. |
00000A30: 20 20 20 20 20 20 20 20 90 A0 20 23 34 30 00 71 | .. #40.q|
00000A40: 1C 32 05 20 20 20 20 20 20 20 20 20 90 8C 20 4C |.2. .. L|
00000A50: 41 47 4C 4F 4F 50 00 87 1C 3C 05 20 20 20 20 20 |AGLOOP...<. |
00000A60: 20 20 20 20 90 9E 20 35 33 32 38 30 00 9F 1C 46 | .. 53280...F|
00000A70: 05 20 20 20 20 20 20 20 20 20 90 9A 20 4B 45 59 |. .. KEY|
00000A80: 46 4C 41 47 00 AF 1C 50 05 20 20 20 20 20 20 20 |FLAG...P. |
00000A90: 20 20 90 B6 00 B5 1C 5A 05 3B 00 CD 1C 64 05 46 | .....Z.;...d.F|
00000AA0: 34 3A 20 20 20 20 20 20 90 92 20 23 C6 28 22 8A |4: .. #.(".|
00000AB0: 22 29 00 E0 1C 6E 05 20 20 20 20 20 20 20 20 20 |")...n. |
00000AC0: 90 8C 20 46 35 00 E6 1C 78 05 3B 00 00 1D 82 05 |.. F5...x.;.....|
00000AD0: 3B 20 53 4B 52 49 56 20 55 54 20 4C 41 47 52 41 |; SKRIV UT LAGRA|
00000AE0: 44 20 52 41 44 00 06 1D 8C 05 3B 00 1C 1D 96 05 |D RAD.....;.....|
00000AF0: 20 20 20 20 20 20 20 20 20 90 94 20 24 45 41 30 | .. $EA0|
00000B00: 30 00 33 1D A0 05 20 20 20 20 20 20 20 20 20 90 |0.3... .|
00000B10: 8A 20 54 4F 57 41 49 54 00 43 1D AA 05 20 20 20 |. TOWAIT.C... |
00000B20: 20 20 20 20 20 20 90 B7 00 58 1D B4 05 20 20 20 | ...X... |
00000B30: 20 20 20 20 20 20 90 A4 20 50 4C 4F 54 00 68 1D | .. PLOT.h.|
00000B40: BE 05 20 20 20 20 20 20 20 20 20 90 A8 00 7D 1D |.. ...}.|
00000B50: C8 05 20 20 20 20 20 20 20 20 20 90 A4 20 50 4C |.. .. PL|
00000B60: 4F 54 00 8D 1D D2 05 20 20 20 20 20 20 20 20 20 |OT..... |
00000B70: 90 A8 00 AB 1D DC 05 20 20 20 20 20 20 20 20 20 |....... |
00000B80: 90 94 20 23 A5 20 4C 4F 57 28 35 34 32 37 32 29 |.. #. LOW(54272)|
00000B90: 00 BF 1D E6 05 20 20 20 20 20 20 20 20 20 90 90 |..... ..|
00000BA0: 20 24 44 31 00 D4 1D F0 05 20 20 20 20 20 20 20 | $D1..... |
00000BB0: 20 20 90 97 20 54 45 4D 50 00 F3 1D FA 05 20 20 | .. TEMP..... |
00000BC0: 20 20 20 20 20 20 20 90 94 20 23 A5 20 48 49 47 | .. #. HIG|
00000BD0: 48 28 35 34 32 37 32 29 00 07 1E 04 06 20 20 20 |H(54272)..... |
00000BE0: 20 20 20 20 20 20 90 90 20 24 44 32 00 1E 1E 0E | .. $D2....|
00000BF0: 06 20 20 20 20 20 20 20 20 20 90 97 20 54 45 4D |. .. TEM|
00000C00: 50 AA 31 00 24 1E 18 06 3B 00 34 1E 1A 06 20 20 |P.1.$...;.4... |
00000C10: 20 20 20 20 20 20 20 90 B9 00 4C 1E 1D 06 20 20 | ...L... |
00000C20: 20 20 20 20 20 20 20 90 A4 20 4B 45 52 4E 4F 55 | .. KERNOU|
00000C30: 54 00 5F 1E 22 06 20 20 20 20 20 20 20 20 20 90 |T._.". .|
00000C40: A2 20 23 30 00 77 1E 2C 06 53 4B 52 4C 4F 4F 50 |. #0.w.,.SKRLOOP|
00000C50: 3A 20 90 94 20 24 45 41 30 30 2C 59 00 8F 1E 36 |: .. $EA00,Y...6|
00000C60: 06 20 20 20 20 20 20 20 20 20 90 97 20 28 24 44 |. .. ($D|
00000C70: 31 29 2C 59 00 A7 1E 40 06 20 20 20 20 20 20 20 |1),Y...@. |
00000C80: 20 20 90 94 20 24 45 41 32 30 2C 59 00 C0 1E 4A | .. $EA20,Y...J|
00000C90: 06 20 20 20 20 20 20 20 20 20 90 97 20 28 54 45 |. .. (TE|
00000CA0: 4D 50 29 2C 59 00 D0 1E 54 06 20 20 20 20 20 20 |MP),Y...T. |
00000CB0: 20 20 20 90 AF 00 E4 1E 5E 06 20 20 20 20 20 20 | .....^. |
00000CC0: 20 20 20 90 A0 20 23 34 30 00 FC 1E 68 06 20 20 | .. #40...h. |
00000CD0: 20 20 20 20 20 20 20 90 8C 20 53 4B 52 4C 4F 4F | .. SKRLOO|
00000CE0: 50 00 13 1F 6D 06 20 20 20 20 20 20 20 20 20 90 |P...m. .|
00000CF0: A4 20 4B 45 52 4E 49 4E 00 23 1F 72 06 20 20 20 |. KERNIN.#.r. |
00000D00: 20 20 20 20 20 20 90 AA 00 3B 1F 77 06 54 4F 57 | ...;.w.TOW|
00000D10: 41 49 54 3A 20 20 90 9A 20 4B 45 59 46 4C 41 47 |AIT: .. KEYFLAG|
00000D20: 00 4B 1F 7C 06 20 20 20 20 20 20 20 20 20 90 B6 |.K.|. ..|
00000D30: 00 51 1F 86 06 3B 00 69 1F 90 06 46 35 3A 20 20 |.Q...;.i...F5: |
00000D40: 20 20 20 20 90 92 20 23 C6 28 22 87 22 29 00 7C | .. #.(".").||
00000D50: 1F 9A 06 20 20 20 20 20 20 20 20 20 90 8C 20 46 |... .. F|
00000D60: 36 00 82 1F A4 06 3B 00 A1 1F AE 06 3B 20 52 5B |6.....;.....; R[|
00000D70: 4B 4E 41 20 55 50 50 20 4D 55 4C 54 49 43 4F 4C |KNA UPP MULTICOL|
00000D80: 4F 55 52 20 23 31 00 A7 1F B8 06 3B 00 BD 1F C2 |OUR #1.....;....|
00000D90: 06 20 20 20 20 20 20 20 20 20 90 9A 20 24 44 30 |. .. $D0|
00000DA0: 32 32 00 D5 1F CC 06 20 20 20 20 20 20 20 20 20 |22..... |
00000DB0: 90 9A 20 4B 45 59 46 4C 41 47 00 E5 1F 08 07 20 |.. KEYFLAG..... |
00000DC0: 20 20 20 20 20 20 20 20 90 B6 00 EB 1F 12 07 3B | .......;|
00000DD0: 00 03 20 1C 07 46 36 3A 20 20 20 20 20 20 90 92 |.. ..F6: ..|
00000DE0: 20 23 C6 28 22 8B 22 29 00 16 20 26 07 20 20 20 | #.(".").. &. |
00000DF0: 20 20 20 20 20 20 90 8C 20 46 37 00 1C 20 30 07 | .. F7.. 0.|
00000E00: 3B 00 3B 20 3A 07 3B 20 52 5B 4B 4E 41 20 55 50 |;.; :.; R[KNA UP|
00000E10: 50 20 4D 55 4C 54 49 43 4F 4C 4F 55 52 20 23 32 |P MULTICOLOUR #2|
00000E20: 00 41 20 44 07 3B 00 57 20 4E 07 20 20 20 20 20 |.A D.;.W N. |
00000E30: 20 20 20 20 90 9A 20 24 44 30 32 33 00 6F 20 58 | .. $D023.o X|
00000E40: 07 20 20 20 20 20 20 20 20 20 90 9A 20 4B 45 59 |. .. KEY|
00000E50: 46 4C 41 47 00 7F 20 94 07 20 20 20 20 20 20 20 |FLAG.. .. |
00000E60: 20 20 90 B6 00 85 20 9E 07 3B 00 9D 20 A8 07 46 | .... ..;.. ..F|
00000E70: 37 3A 20 20 20 20 20 20 90 92 20 23 C6 28 22 88 |7: .. #.(".|
00000E80: 22 29 00 B0 20 B2 07 20 20 20 20 20 20 20 20 20 |").. .. |
00000E90: 90 8C 20 46 38 00 B6 20 BC 07 3B 00 D1 20 C6 07 |.. F8.. ..;.. ..|
00000EA0: 3B 20 52 5B 4B 4E 41 20 55 50 50 20 53 4B 5B 52 |; R[KNA UPP SK[R|
00000EB0: 4D 20 46 5B 52 47 00 D7 20 D0 07 3B 00 ED 20 DA |M F[RG.. ..;.. .|
00000EC0: 07 20 20 20 20 20 20 20 20 20 90 9A 20 24 44 30 |. .. $D0|
00000ED0: 32 31 00 05 21 E4 07 20 20 20 20 20 20 20 20 20 |21..!.. |
00000EE0: 90 9A 20 4B 45 59 46 4C 41 47 00 15 21 EE 07 20 |.. KEYFLAG..!.. |
00000EF0: 20 20 20 20 20 20 20 20 90 B6 00 1B 21 F8 07 3B | ....!..;|
00000F00: 00 33 21 02 08 46 38 3A 20 20 20 20 20 20 90 92 |.3!..F8: ..|
00000F10: 20 23 C6 28 22 8C 22 29 00 4A 21 0C 08 20 20 20 | #.(".").J!.. |
00000F20: 20 20 20 20 20 20 90 8C 20 54 4F 57 41 49 54 00 | .. TOWAIT.|
00000F30: 50 21 16 08 3B 00 6B 21 20 08 3B 20 52 5B 4B 4E |P!..;.k! .; R[KN|
00000F40: 41 20 55 50 20 42 4F 52 44 45 52 20 46 5B 52 47 |A UP BORDER F[RG|
00000F50: 00 71 21 2A 08 3B 00 87 21 34 08 20 20 20 20 20 |.q!*.;..!4. |
00000F60: 20 20 20 20 90 9A 20 24 44 30 32 30 00 9F 21 3E | .. $D020..!>|
00000F70: 08 20 20 20 20 20 20 20 20 20 90 9A 20 4B 45 59 |. .. KEY|
00000F80: 46 4C 41 47 00 AF 21 48 08 20 20 20 20 20 20 20 |FLAG..!H. |
00000F90: 20 20 90 B6 00 B5 21 A2 08 3B 00 BB 21 AC 08 3B | ....!..;..!..;|
00000FA0: 00 C1 21 B6 08 3B 00 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 NMI VEKTOR...:.
;.T.?. .. #. LOW(ATMENY)...D.
.. $0318...I. .. #. HIG
H(ATMENY).#.N. .. $0319.).L.;.A
.V.; KOPPLA BORT BASIC.G...;.\...
.. $01.Q... . #$FE.....
.. $01.....;..... .. KERNI
N.....;.Q...; KOPPLA IN VALD TECKEN UPS[
TTNING.W...;..... .. 53272.....
. #240..... .. #2....
. .. 53272.?... ...U..
. .. HOME.[...;.A.F.;...P.; L]T
ANV[NDAREN RITA P] SK[RMEN...Z.;.....WA
ITLOOP: .. CHECK..... .. KEYFLA
G.Q... .. CUT..... ..
CHROUT.....CUT: .. STOPF.....
.. WAITLOOP.0... .. MENY.6.
..;.^. .; RUTIN F\R KONTROLL AV FUNK. TA
NG..D.*.;.X.4.CHECK: .. #0...>.
.. KEYFLAG.I.\. .. GETIN; .
FIRST CHARACTER FROM KEYBOARD...F.F1:
.. #F(".")...P. .. F2...Z.
;.....; SUDDA RAD ANVISAD AV MARK\R.$...
;.9... .. 214.R... ..
CLRLINE.K... .. KEYFLAG.|...
.......;...J.F2: .. #F(".")
...T. .. F3.....;.T...; SKIFTA
MULTICOLOUR AV.P].Z...;..... ..
$D016..... .. #$10.....
.. $D016.3... .. KEYFLAG.C.$.
...I...;.A.8.F3: .. #F(".").T
.B. .. F4.Z.L.;...V.; LAGRA RAD
I BUFFERT...`.;...J. ...F.T.
.. PLOT; . CUR.V.~. .......
.. PLOT; SET CUR..... .
.."... .. #. LOW(54272).6...
.. $D1.K... .. TEMP.J...
.. #. HIGH(54272).~.D. ..
$D2...N. .. TEMP.1...X.
.. 53280..... .. #0.V...LAGLOOP:
.. ($D1),Y..... .. $EA00,Y.....
.. (TEMP),Y..... .. $EA
20,Y.5... .. 53280.E...
...Y.(. . #40.Q.2. .. L
AGLOOP...<. .. 53280...F.
.. KEYFLAG...P. .....Z.;.M.D.F
4: .. #F(".")...N. .. F5...
X.;.....; SKRIV UT LAGRAD RAD.....;.....
.. $EA00.3. . .. TOWAIT
.C... ...X... .. PLOT.H.
.. ...}.H. .. PLOT...R.
....... .. #. LOW(54272)
..... .. $D1.T... .. TEM
P..... .. #. HIGH(54272).....
.. $D2..... .. TEMP.1.$...
;.4... ...L... .. KERNOU
T._.". .. #0.W.,.SKRLOOP: .. $EA
00,Y...6. .. ($D1),Y...@.
.. $EA20,Y...J. .. (TEMP),Y.P.
T. .....^. . #40...H.
.. SKRLOOP...M. .. KERNIN
.#.R. ...;.W.TOWAIT: .. KEYFLAG
.K.|. ...Q...;.I...F5: .. #
F(".").|... .. F6.....;.....; R[
KNA UPP MULTICOLOUR #1.....;...B.
.. $D022.U.L. .. KEYFLAG.....
.......;.. ..F6: .. #F(".")
.. &. .. F7.. 0.;.; :.; R[KNA UP
P MULTICOLOUR #2.A D.;.W N. .. $
D023.O X. .. KEYFLAG. ..
.... ..;.. ..F7: .. #F(".").. ..
.. F8.. ..;.Q F.; R[KNA UPP SK[R
M F[RG.W P.;.. Z. .. $D021..!..
.. KEYFLAG..!.. ....!..;
.3!..F8: .. #F(".").J!.. ..
TOWAIT.P!..;.K! .; R[KNA UP BORDER F[RG
.Q!*.;..!4. .. $D020..!>.
.. KEYFLAG..!H. ....!..;..!..;
.A!..;...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL