DRAW.S.M.
FILE INFORMATION
FILENAME(S): DRAW.S.M.
FILE TYPE(S): PRG
FILE SIZE: 3.7K
FIRST SEEN: 2025-12-01 01:08:52
APPEARS ON: 1 disk(s)
FILE HASH
a548058319fa7306442604a48e13de72f867cdffe06f7742dbadbd56b76fba63
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| ASSEMBLER FILER | DRAW.S.M. | PRG | hedning, loot | 10 | 9 | 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 47 15 FE 01 20 20 20 20 | .. #0.G... |
00000320: 20 20 20 20 20 20 90 94 20 23 33 32 00 60 15 08 | .. #32.`..|
00000330: 02 52 45 4E 4C 4F 4F 50 3A 20 20 90 97 20 24 45 |.RENLOOP: .. $E|
00000340: 41 30 30 2C 58 00 71 15 12 02 20 20 20 20 20 20 |A00,X.q... |
00000350: 20 20 20 20 90 AE 00 8A 15 1C 02 20 20 20 20 20 | ....... |
00000360: 20 20 20 20 20 90 8C 20 52 45 4E 4C 4F 4F 50 00 | .. RENLOOP.|
00000370: 90 15 3A 02 3B 00 A8 15 44 02 20 20 20 20 20 20 |..:.;...D. |
00000380: 20 20 20 20 90 A4 20 4B 45 52 4E 49 4E 00 AE 15 | .. KERNIN...|
00000390: B2 02 3B 00 D5 15 B3 02 3B 20 4B 4F 50 50 4C 41 |..;.....; KOPPLA|
000003A0: 20 49 4E 20 56 41 4C 44 20 54 45 43 4B 45 4E 20 | IN VALD TECKEN |
000003B0: 55 50 53 5B 54 54 4E 49 4E 47 00 DB 15 B4 02 3B |UPS[TTNING.....;|
000003C0: 00 F2 15 B5 02 20 20 20 20 20 20 20 20 20 20 90 |..... .|
000003D0: 94 20 35 33 32 37 32 00 07 16 B6 02 20 20 20 20 |. 53272..... |
000003E0: 20 20 20 20 20 20 AF 20 23 32 34 30 00 1B 16 B7 | . #240....|
000003F0: 02 20 20 20 20 20 20 20 20 20 20 90 95 20 23 32 |. .. #2|
00000400: 00 32 16 B8 02 20 20 20 20 20 20 20 20 20 20 90 |.2... .|
00000410: 97 20 35 33 32 37 32 00 43 16 B9 02 20 20 20 20 |. 53272.C... |
00000420: 20 20 20 20 20 20 90 AA 00 59 16 BA 02 20 20 20 | ...Y... |
00000430: 20 20 20 20 20 20 20 90 A4 20 48 4F 4D 45 00 5F | .. HOME._|
00000440: 16 BC 02 3B 00 65 16 C6 02 3B 00 8A 16 D0 02 3B |...;.e...;.....;|
00000450: 20 4C 5D 54 20 41 4E 56 5B 4E 44 41 52 45 4E 20 | L]T ANV[NDAREN |
00000460: 52 49 54 41 20 50 5D 20 53 4B 5B 52 4D 45 4E 00 |RITA P] SK[RMEN.|
00000470: 90 16 DA 02 3B 00 A7 16 E4 02 57 41 49 54 4C 4F |....;.....WAITLO|
00000480: 4F 50 3A 20 90 A4 20 53 54 4F 50 46 00 C1 16 E6 |OP: .. STOPF....|
00000490: 02 20 20 20 20 20 20 20 20 20 20 90 8C 20 4B 4F |. .. KO|
000004A0: 4E 54 52 4F 4C 4C 00 D9 16 E8 02 20 20 20 20 20 |NTROLL..... |
000004B0: 20 20 20 20 20 90 A4 20 43 55 52 4F 46 46 00 EF | .. CUROFF..|
000004C0: 16 EA 02 20 20 20 20 20 20 20 20 20 20 90 A5 20 |... .. |
000004D0: 4D 45 4E 59 00 F5 16 EC 02 3B 00 0C 17 EE 02 4B |MENY.....;.....K|
000004E0: 4F 4E 54 52 4F 4C 4C 3A 20 90 A4 20 47 45 54 49 |ONTROLL: .. GETI|
000004F0: 4E 00 26 17 F0 02 20 20 20 20 20 20 20 20 20 20 |N.&... |
00000500: 90 8A 20 57 41 49 54 4C 4F 4F 50 00 3D 17 F2 02 |.. WAITLOOP.=...|
00000510: 20 20 20 20 20 20 20 20 20 20 90 A4 20 43 48 45 | .. CHE|
00000520: 43 4B 00 52 17 F4 02 20 20 20 20 20 20 20 20 20 |CK.R... |
00000530: 20 90 94 20 4B 45 59 00 6C 17 F6 02 20 20 20 20 | .. KEY.l... |
00000540: 20 20 20 20 20 20 90 8A 20 57 41 49 54 4C 4F 4F | .. WAITLOO|
00000550: 50 00 84 17 F8 02 20 20 20 20 20 20 20 20 20 20 |P..... |
00000560: 90 A4 20 43 55 52 4F 46 46 00 99 17 FA 02 20 20 |.. CUROFF..... |
00000570: 20 20 20 20 20 20 20 20 90 94 20 4B 45 59 00 B1 | .. KEY..|
00000580: 17 FC 02 20 20 20 20 20 20 20 20 20 20 90 A4 20 |... .. |
00000590: 43 48 52 4F 55 54 00 C9 17 FE 02 20 20 20 20 20 |CHROUT..... |
000005A0: 20 20 20 20 20 90 A4 20 47 45 54 43 55 52 00 E1 | .. GETCUR..|
000005B0: 17 00 03 20 20 20 20 20 20 20 20 20 20 90 A4 20 |... .. |
000005C0: 47 45 54 43 48 52 00 FB 17 02 03 20 20 20 20 20 |GETCHR..... |
000005D0: 20 20 20 20 20 90 A5 20 57 41 49 54 4C 4F 4F 50 | .. WAITLOOP|
000005E0: 00 01 18 16 03 3B 00 29 18 20 03 3B 20 52 55 54 |.....;.). .; RUT|
000005F0: 49 4E 20 46 5C 52 20 4B 4F 4E 54 52 4F 4C 4C 20 |IN F\R KONTROLL |
00000600: 41 56 20 46 55 4E 4B 2E 20 54 41 4E 47 2E 00 2F |AV FUNK. TANG../|
00000610: 18 2A 03 3B 00 67 18 34 03 43 48 45 43 4B 3A 20 |.*.;.g.4.CHECK: |
00000620: 20 20 20 90 A4 20 47 45 54 49 4E 3B 20 A1 20 46 | .. GETIN; . F|
00000630: 49 52 53 54 20 43 48 41 52 41 43 54 45 52 20 46 |IRST CHARACTER F|
00000640: 52 4F 4D 20 4B 45 59 42 4F 41 52 44 00 7C 18 3E |ROM KEYBOARD.|.>|
00000650: 03 20 20 20 20 20 20 20 20 20 20 90 97 20 4B 45 |. .. KE|
00000660: 59 00 95 18 66 03 46 32 3A 20 20 20 20 20 20 20 |Y...f.F2: |
00000670: 90 92 20 23 C6 28 22 89 22 29 00 A9 18 70 03 20 |.. #.(".")...p. |
00000680: 20 20 20 20 20 20 20 20 20 90 8C 20 46 31 00 AF | .. F1..|
00000690: 18 7A 03 3B 00 D1 18 84 03 3B 20 53 55 44 44 41 |.z.;.....; SUDDA|
000006A0: 20 52 41 44 20 41 4E 56 49 53 41 44 20 41 56 20 | RAD ANVISAD AV |
000006B0: 4D 41 52 4B 5C 52 00 D7 18 8E 03 3B 00 EC 18 98 |MARK\R.....;....|
000006C0: 03 20 20 20 20 20 20 20 20 20 20 90 A1 20 32 31 |. .. 21|
000006D0: 34 00 05 19 A2 03 20 20 20 20 20 20 20 20 20 20 |4..... |
000006E0: 90 A4 20 43 4C 52 4C 49 4E 45 00 1D 19 B6 03 20 |.. CLRLINE..... |
000006F0: 20 20 20 20 20 20 20 20 20 90 A5 20 54 4F 57 41 | .. TOWA|
00000700: 49 54 00 23 19 C0 03 3B 00 3C 19 CA 03 46 31 3A |IT.#...;.<...F1:|
00000710: 20 20 20 20 20 20 20 90 92 20 23 C6 28 22 85 22 | .. #.("."|
00000720: 29 00 50 19 D4 03 20 20 20 20 20 20 20 20 20 20 |).P... |
00000730: 90 8C 20 46 33 00 56 19 DE 03 3B 00 75 19 E8 03 |.. F3.V...;.u...|
00000740: 3B 20 53 4B 49 46 54 41 20 4D 55 4C 54 49 43 4F |; SKIFTA MULTICO|
00000750: 4C 4F 55 52 20 41 56 AD 50 5D 00 7B 19 F2 03 3B |LOUR AV.P].{...;|
00000760: 00 91 19 FC 03 20 20 20 20 20 20 20 20 20 90 94 |..... ..|
00000770: 20 24 44 30 31 36 00 A6 19 06 04 20 20 20 20 20 | $D016..... |
00000780: 20 20 20 20 90 93 20 23 24 31 30 00 BC 19 10 04 | .. #$10.....|
00000790: 20 20 20 20 20 20 20 20 20 90 97 20 24 44 30 31 | .. $D01|
000007A0: 36 00 D3 19 24 04 20 20 20 20 20 20 20 20 20 90 |6...$. .|
000007B0: A5 20 54 4F 57 41 49 54 00 D9 19 2E 04 3B 00 F1 |. TOWAIT.....;..|
000007C0: 19 38 04 46 33 3A 20 20 20 20 20 20 90 92 20 23 |.8.F3: .. #|
000007D0: C6 28 22 86 22 29 00 04 1A 42 04 20 20 20 20 20 |.(".")...B. |
000007E0: 20 20 20 20 90 8C 20 46 34 00 0A 1A 4C 04 3B 00 | .. F4...L.;.|
000007F0: 24 1A 56 04 3B 20 4C 41 47 52 41 20 52 41 44 20 |$.V.; LAGRA RAD |
00000800: 49 20 42 55 46 46 45 52 54 00 2A 1A 60 04 3B 00 |I BUFFERT.*.`.;.|
00000810: 3A 1A 6A 04 20 20 20 20 20 20 20 20 20 90 B7 00 |:.j. ...|
00000820: 56 1A 74 04 20 20 20 20 20 20 20 20 20 90 A4 20 |V.t. .. |
00000830: 50 4C 4F 54 3B 20 A1 20 43 55 52 00 66 1A 7E 04 |PLOT; . CUR.f.~.|
00000840: 20 20 20 20 20 20 20 20 20 90 A8 00 84 1A 88 04 | .......|
00000850: 20 20 20 20 20 20 20 20 20 90 A4 20 50 4C 4F 54 | .. PLOT|
00000860: 3B 20 53 45 54 20 43 55 52 00 94 1A 92 04 20 20 |; SET CUR..... |
00000870: 20 20 20 20 20 20 20 90 A8 00 B2 1A 9C 04 20 20 | ....... |
00000880: 20 20 20 20 20 20 20 90 94 20 23 A5 20 4C 4F 57 | .. #. LOW|
00000890: 28 35 34 32 37 32 29 00 C6 1A A6 04 20 20 20 20 |(54272)..... |
000008A0: 20 20 20 20 20 90 90 20 24 44 31 00 DB 1A B0 04 | .. $D1.....|
000008B0: 20 20 20 20 20 20 20 20 20 90 97 20 54 45 4D 50 | .. TEMP|
000008C0: 00 FA 1A BA 04 20 20 20 20 20 20 20 20 20 90 94 |..... ..|
000008D0: 20 23 A5 20 48 49 47 48 28 35 34 32 37 32 29 00 | #. HIGH(54272).|
000008E0: 0E 1B C4 04 20 20 20 20 20 20 20 20 20 90 90 20 |.... .. |
000008F0: 24 44 32 00 25 1B CE 04 20 20 20 20 20 20 20 20 |$D2.%... |
00000900: 20 90 97 20 54 45 4D 50 AA 31 00 3B 1B D8 04 20 | .. TEMP.1.;... |
00000910: 20 20 20 20 20 20 20 20 90 A1 20 35 33 32 38 30 | .. 53280|
00000920: 00 4E 1B E2 04 20 20 20 20 20 20 20 20 20 90 A2 |.N... ..|
00000930: 20 23 30 00 66 1B EC 04 4C 41 47 4C 4F 4F 50 3A | #0.f...LAGLOOP:|
00000940: 20 90 94 20 28 24 44 31 29 2C 59 00 7E 1B F6 04 | .. ($D1),Y.~...|
00000950: 20 20 20 20 20 20 20 20 20 90 97 20 24 45 41 30 | .. $EA0|
00000960: 30 2C 59 00 97 1B 00 05 20 20 20 20 20 20 20 20 |0,Y..... |
00000970: 20 90 94 20 28 54 45 4D 50 29 2C 59 00 AF 1B 0A | .. (TEMP),Y....|
00000980: 05 20 20 20 20 20 20 20 20 20 90 97 20 24 45 41 |. .. $EA|
00000990: 34 30 2C 59 00 C5 1B 14 05 20 20 20 20 20 20 20 |40,Y..... |
000009A0: 20 20 90 9A 20 35 33 32 38 30 00 D5 1B 1E 05 20 | .. 53280..... |
000009B0: 20 20 20 20 20 20 20 20 90 AF 00 E9 1B 28 05 20 | .....(. |
000009C0: 20 20 20 20 20 20 20 20 90 A0 20 23 34 30 00 01 | .. #40..|
000009D0: 1C 32 05 20 20 20 20 20 20 20 20 20 90 8C 20 4C |.2. .. L|
000009E0: 41 47 4C 4F 4F 50 00 17 1C 3C 05 20 20 20 20 20 |AGLOOP...<. |
000009F0: 20 20 20 20 90 9E 20 35 33 32 38 30 00 2E 1C 50 | .. 53280...P|
00000A00: 05 20 20 20 20 20 20 20 20 20 90 A5 20 54 4F 57 |. .. TOW|
00000A10: 41 49 54 00 34 1C 5A 05 3B 00 4C 1C 64 05 46 34 |AIT.4.Z.;.L.d.F4|
00000A20: 3A 20 20 20 20 20 20 90 92 20 23 C6 28 22 8A 22 |: .. #.("."|
00000A30: 29 00 5F 1C 6E 05 20 20 20 20 20 20 20 20 20 90 |)._.n. .|
00000A40: 8C 20 46 35 00 65 1C 78 05 3B 00 7F 1C 82 05 3B |. F5.e.x.;.....;|
00000A50: 20 53 4B 52 49 56 20 55 54 20 4C 41 47 52 41 44 | SKRIV UT LAGRAD|
00000A60: 20 52 41 44 00 85 1C 8C 05 3B 00 95 1C AA 05 20 | RAD.....;..... |
00000A70: 20 20 20 20 20 20 20 20 90 B7 00 AA 1C B4 05 20 | ....... |
00000A80: 20 20 20 20 20 20 20 20 90 A4 20 50 4C 4F 54 00 | .. PLOT.|
00000A90: BA 1C BE 05 20 20 20 20 20 20 20 20 20 90 A8 00 |.... ...|
00000AA0: CF 1C C8 05 20 20 20 20 20 20 20 20 20 90 A4 20 |.... .. |
00000AB0: 50 4C 4F 54 00 DF 1C D2 05 20 20 20 20 20 20 20 |PLOT..... |
00000AC0: 20 20 90 A8 00 FD 1C DC 05 20 20 20 20 20 20 20 | ....... |
00000AD0: 20 20 90 94 20 23 A5 20 4C 4F 57 28 35 34 32 37 | .. #. LOW(5427|
00000AE0: 32 29 00 11 1D E6 05 20 20 20 20 20 20 20 20 20 |2)..... |
00000AF0: 90 90 20 24 44 31 00 26 1D F0 05 20 20 20 20 20 |.. $D1.&... |
00000B00: 20 20 20 20 90 97 20 54 45 4D 50 00 45 1D FA 05 | .. TEMP.E...|
00000B10: 20 20 20 20 20 20 20 20 20 90 94 20 23 A5 20 48 | .. #. H|
00000B20: 49 47 48 28 35 34 32 37 32 29 00 59 1D 04 06 20 |IGH(54272).Y... |
00000B30: 20 20 20 20 20 20 20 20 90 90 20 24 44 32 00 70 | .. $D2.p|
00000B40: 1D 0E 06 20 20 20 20 20 20 20 20 20 90 97 20 54 |... .. T|
00000B50: 45 4D 50 AA 31 00 76 1D 18 06 3B 00 86 1D 1A 06 |EMP.1.v...;.....|
00000B60: 20 20 20 20 20 20 20 20 20 90 B9 00 9E 1D 1D 06 | .......|
00000B70: 20 20 20 20 20 20 20 20 20 90 A4 20 4B 45 52 4E | .. KERN|
00000B80: 4F 55 54 00 B1 1D 22 06 20 20 20 20 20 20 20 20 |OUT...". |
00000B90: 20 90 A2 20 23 30 00 C9 1D 2C 06 53 4B 52 4C 4F | .. #0...,.SKRLO|
00000BA0: 4F 50 3A 20 90 94 20 24 45 41 30 30 2C 59 00 E1 |OP: .. $EA00,Y..|
00000BB0: 1D 36 06 20 20 20 20 20 20 20 20 20 90 97 20 28 |.6. .. (|
00000BC0: 24 44 31 29 2C 59 00 F9 1D 40 06 20 20 20 20 20 |$D1),Y...@. |
00000BD0: 20 20 20 20 90 94 20 24 45 41 34 30 2C 59 00 12 | .. $EA40,Y..|
00000BE0: 1E 4A 06 20 20 20 20 20 20 20 20 20 90 97 20 28 |.J. .. (|
00000BF0: 54 45 4D 50 29 2C 59 00 22 1E 54 06 20 20 20 20 |TEMP),Y.".T. |
00000C00: 20 20 20 20 20 90 AF 00 36 1E 5E 06 20 20 20 20 | ...6.^. |
00000C10: 20 20 20 20 20 90 A0 20 23 34 30 00 4E 1E 68 06 | .. #40.N.h.|
00000C20: 20 20 20 20 20 20 20 20 20 90 8C 20 53 4B 52 4C | .. SKRL|
00000C30: 4F 4F 50 00 65 1E 6D 06 20 20 20 20 20 20 20 20 |OOP.e.m. |
00000C40: 20 90 A4 20 4B 45 52 4E 49 4E 00 75 1E 72 06 20 | .. KERNIN.u.r. |
00000C50: 20 20 20 20 20 20 20 20 90 AA 00 88 1E 77 06 54 | .....w.T|
00000C60: 4F 57 41 49 54 3A 20 20 90 94 20 23 30 00 9C 1E |OWAIT: .. #0...|
00000C70: 79 06 20 20 20 20 20 20 20 20 20 90 97 20 4B 45 |y. .. KE|
00000C80: 59 00 AC 1E 7C 06 42 54 57 4C 3A 20 20 20 20 90 |Y...|.BTWL: .|
00000C90: B6 00 B2 1E 86 06 3B 00 CA 1E 90 06 46 35 3A 20 |......;.....F5: |
00000CA0: 20 20 20 20 20 90 92 20 23 C6 28 22 87 22 29 00 | .. #.(".").|
00000CB0: DD 1E 9A 06 20 20 20 20 20 20 20 20 20 90 8C 20 |.... .. |
00000CC0: 46 36 00 E3 1E A4 06 3B 00 02 1F AE 06 3B 20 52 |F6.....;.....; R|
00000CD0: 5B 4B 4E 41 20 55 50 50 20 4D 55 4C 54 49 43 4F |[KNA UPP MULTICO|
00000CE0: 4C 4F 55 52 20 23 31 00 08 1F B8 06 3B 00 1E 1F |LOUR #1.....;...|
00000CF0: C2 06 20 20 20 20 20 20 20 20 20 90 9A 20 24 44 |.. .. $D|
00000D00: 30 32 32 00 35 1F 08 07 20 20 20 20 20 20 20 20 |022.5... |
00000D10: 20 90 A5 20 54 4F 57 41 49 54 00 3B 1F 12 07 3B | .. TOWAIT.;...;|
00000D20: 00 53 1F 1C 07 46 36 3A 20 20 20 20 20 20 90 92 |.S...F6: ..|
00000D30: 20 23 C6 28 22 8B 22 29 00 66 1F 26 07 20 20 20 | #.(".").f.&. |
00000D40: 20 20 20 20 20 20 90 8C 20 46 37 00 6C 1F 30 07 | .. F7.l.0.|
00000D50: 3B 00 8B 1F 3A 07 3B 20 52 5B 4B 4E 41 20 55 50 |;...:.; R[KNA UP|
00000D60: 50 20 4D 55 4C 54 49 43 4F 4C 4F 55 52 20 23 32 |P MULTICOLOUR #2|
00000D70: 00 91 1F 44 07 3B 00 A7 1F 4E 07 20 20 20 20 20 |...D.;...N. |
00000D80: 20 20 20 20 90 9A 20 24 44 30 32 33 00 BE 1F 62 | .. $D023...b|
00000D90: 07 20 20 20 20 20 20 20 20 20 90 A5 20 54 4F 57 |. .. TOW|
00000DA0: 41 49 54 00 C4 1F 9E 07 3B 00 DC 1F A8 07 46 37 |AIT.....;.....F7|
00000DB0: 3A 20 20 20 20 20 20 90 92 20 23 C6 28 22 88 22 |: .. #.("."|
00000DC0: 29 00 EF 1F B2 07 20 20 20 20 20 20 20 20 20 90 |)..... .|
00000DD0: 8C 20 46 38 00 F5 1F BC 07 3B 00 10 20 C6 07 3B |. F8.....;.. ..;|
00000DE0: 20 52 5B 4B 4E 41 20 55 50 50 20 53 4B 5B 52 4D | R[KNA UPP SK[RM|
00000DF0: 20 46 5B 52 47 00 16 20 D0 07 3B 00 2C 20 DA 07 | F[RG.. ..;., ..|
00000E00: 20 20 20 20 20 20 20 20 20 90 9A 20 24 44 30 32 | .. $D02|
00000E10: 31 00 43 20 EE 07 20 20 20 20 20 20 20 20 20 90 |1.C .. .|
00000E20: A5 20 54 4F 57 41 49 54 00 49 20 F8 07 3B 00 61 |. TOWAIT.I ..;.a|
00000E30: 20 02 08 46 38 3A 20 20 20 20 20 20 90 92 20 23 | ..F8: .. #|
00000E40: C6 28 22 8C 22 29 00 76 20 0C 08 20 20 20 20 20 |.(".").v .. |
00000E50: 20 20 20 20 90 8C 20 42 54 57 4C 00 7C 20 16 08 | .. BTWL.| ..|
00000E60: 3B 00 97 20 20 08 3B 20 52 5B 4B 4E 41 20 55 50 |;.. .; R[KNA UP|
00000E70: 20 42 4F 52 44 45 52 20 46 5B 52 47 00 9D 20 2A | BORDER F[RG.. *|
00000E80: 08 3B 00 B3 20 34 08 20 20 20 20 20 20 20 20 20 |.;.. 4. |
00000E90: 90 9A 20 24 44 30 32 30 00 CA 20 48 08 20 20 20 |.. $D020.. H. |
00000EA0: 20 20 20 20 20 20 90 A5 20 54 4F 57 41 49 54 00 | .. TOWAIT.|
00000EB0: D0 20 A2 08 3B 00 D6 20 AC 08 3B 00 DC 20 B6 08 |. ..;.. ..;.. ..|
00000EC0: 3B 00 EA 20 C0 08 4B 45 59 3A 20 90 80 20 30 00 |;.. ..KEY: .. 0.|
00000ED0: 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.G...
.. #32.`...RENLOOP: .. $EA00,X.Q.
.. ....... .. RENLOOP.
..:.;...D. .. KERNIN.....;.U...
; KOPPLA IN VALD TECKEN UPS[TTNING.....;
..... .. 53272..... .
#240..... .. #2.2... .
. 53272.C... ...Y... .
. HOME._...;.E.F.;...P.; L]T ANV[NDAREN
RITA P] SK[RMEN...Z.;.....WAITLOOP: .. S
TOPF.A... .. KONTROLL.Y...
.. CUROFF..... .. MENY....
.;.....KONTROLL: .. GETIN.&...
.. WAITLOOP.=... .. CHECK.R...
.. KEY.L... .. WAITLOO
P..... .. CUROFF.....
.. KEY..... .. CHROUT.I...
.. GETCUR..... .. GETCHR..
... .. WAITLOOP.....;.). .; RUT
IN F\R KONTROLL AV FUNK. TANG../.*.;.G.4
.CHECK: .. GETIN; . FIRST CHARACTER F
ROM KEYBOARD.|.>. .. KEY...F.F2
: .. #F(".")...P. .. F1..
.Z.;.Q...; SUDDA RAD ANVISAD AV MARK\R.W
...;..... .. 214.....
.. CLRLINE..... .. TOWAIT.#...;
.<.J.F1: .. #F(".").P.T.
.. F3.V...;.U...; SKIFTA MULTICOLOUR AV.
P].{...;..... .. $D016.....
.. #$10..... .. $D016.S.$.
.. TOWAIT.Y...;...8.F3: .. #
F(".")...B. .. F4...L.;.$.V.; LA
GRA RAD I BUFFERT.*.`.;.:.J. ...
V.T. .. PLOT; . CUR.F.~.
....... .. PLOT; SET CUR.....
....... .. #. LOW(54272).
F... .. $D1..... .. TEMP
..... .. #. HIGH(54272)...D.
.. $D2.%.N. .. TEMP.1.;.X.
.. 53280.N... .. #0.F...
LAGLOOP: .. ($D1),Y.~... .. $EA0
0,Y..... .. (TEMP),Y.....
.. $EA40,Y.E... .. 53280.U...
.....(. . #40...2.
.. LAGLOOP...<. .. 53280...P
. .. TOWAIT.4.Z.;.L.D.F4: .
. #F(".")._.N. .. F5.E.X.;....;
SKRIV UT LAGRAD RAD.....;.....
....... .. PLOT..... ...
O.H. .. PLOT...R. ......
. .. #. LOW(54272).....
.. $D1.&... .. TEMP.E...
.. #. HIGH(54272).Y... .. $D2.P
... .. TEMP.1.V...;.....
....... .. KERNOUT...".
.. #0.I.,.SKRLOOP: .. $EA00,Y...6.
.. ($D1),Y...@. .. $EA40,Y..
.J. .. (TEMP),Y.".T. ...
6.^. . #40.N.H. .. SKRL
OOP.E.M. .. KERNIN.U.R.
.....W.TOWAIT: .. #0...Y. .. KE
Y...|.BTWL: .......;.J...F5: ..
#F(".")..... .. F6.....;.....; R
[KNA UPP MULTICOLOUR #1.....;...B.
.. $D022.5... .. TOWAIT.;...;
.S...F6: .. #F(".").F.&. ..
F7.L.0.;...:.; R[KNA UPP MULTICOLOUR #2
...D.;...N. .. $D023...B.
.. TOWAIT.D...;.....F7: .. #F("."
)..... .. F8.....;.. F.; R[KNA U
PP SK[RM F[RG.. P.;., Z. .. $D02
1.C .. .. TOWAIT.I ..;.A ..F8:
.. #F(".").V .. .. BTWL.| ..
;.. .; R[KNA UP BORDER F[RG.. *.;.. 4.
.. $D020.J H. .. TOWAIT.
P ..;.V ..;.. ..;.. ..KEY: .. 0...
> CLICK IMAGE PREVIEW FOR FULL MODAL