COMPUTE! MLX

00000000: 01 08 23 08 01 00 8F 20  20 20 20 53 41 56 45 22  |..#....    SAVE"|
00000010: 40 30 3A 43 4F 4D 50 55  54 45 21 20 4D 4C 58 22  |@0:COMPUTE! MLX"|
00000020: 2C 38 3A 00 29 08 02 00  8F 00 49 08 03 00 8F 20  |,8:.).....I.... |
00000030: 20 20 49 4E 44 54 41 53  54 4E 49 4E 47 53 50 52  |  INDTASTNINGSPR|
00000040: 4F 47 52 41 4D 20 54 49  4C 00 4F 08 04 00 8F 00  |OGRAM TIL.O.....|
00000050: 77 08 05 00 8F 20 2A 20  43 4F 4D 50 55 54 45 21  |w.... * COMPUTE!|
00000060: 53 20 4D 41 53 4B 49 4E  4B 4F 44 45 50 52 4F 47  |S MASKINKODEPROG|
00000070: 52 41 4D 4D 45 52 2A 00  7D 08 06 00 8F 00 97 08  |RAMMER*.}.......|
00000080: 07 00 8F 20 20 20 20 20  20 20 20 20 56 45 52 53  |...         VERS|
00000090: 49 4F 4E 20 31 2E 31 00  9D 08 08 00 8F 00 C7 08  |ION 1.1.........|
000000A0: 64 00 97 20 35 36 2C 35  30 3A 9C 3A 86 20 49 4E  |d.. 56,50:.:. IN|
000000B0: 24 2C 49 2C 4A 2C 41 2C  42 2C 41 24 2C 42 24 2C  |$,I,J,A,B,A$,B$,|
000000C0: 41 28 37 29 2C 4E 24 00  FD 08 6E 00 43 34 B2 34  |A(7),N$...n.C4.4|
000000D0: 38 3A 43 36 B2 31 36 3A  43 37 B2 37 3A 5A 32 B2  |8:C6.16:C7.7:Z2.|
000000E0: 32 3A 5A 34 B2 32 35 34  3A 5A 35 B2 32 35 35 3A  |2:Z4.254:Z5.255:|
000000F0: 5A 36 B2 32 35 36 3A 5A  37 B2 31 32 37 00 3B 09  |Z6.256:Z7.127.;.|
00000100: 78 00 46 41 B2 C2 28 34  35 29 AA 5A 36 AC C2 28  |x.FA..(45).Z6..(|
00000110: 34 36 29 3A 42 53 B2 C2  28 35 35 29 AA 5A 36 AC  |46):BS..(55).Z6.|
00000120: C2 28 35 36 29 3A 48 24  B2 22 30 31 32 33 34 35  |.(56):H$."012345|
00000130: 36 37 38 39 41 42 43 44  45 46 22 00 7A 09 82 00  |6789ABCDEF".z...|
00000140: 52 24 B2 C7 28 31 33 29  3A 4C 24 B2 22 9D 22 3A  |R$..(13):L$.".":|
00000150: 53 24 B2 22 20 22 3A 44  24 B2 C7 28 32 30 29 3A  |S$." ":D$..(20):|
00000160: 5A 24 B2 C7 28 30 29 3A  54 24 B2 22 1D 1D 1D 1D  |Z$..(0):T$."....|
00000170: 1D 1D 1D 1D 1D 1D 1D 1D  1D 22 00 AC 09 8C 00 53  |.........".....S|
00000180: 44 B2 35 34 32 37 32 3A  81 49 B2 53 44 A4 53 44  |D.54272:.I.SD.SD|
00000190: AA 32 33 3A 97 49 2C 30  3A 82 3A 97 53 44 AA 32  |.23:.I,0:.:.SD.2|
000001A0: 34 2C 31 35 3A 97 37 38  38 2C 35 32 00 D4 09 96  |4,15:.788,52....|
000001B0: 00 99 22 93 22 20 C7 28  31 34 32 29 C7 28 38 29  |.."." .(142).(8)|
000001C0: 3A 97 35 33 32 38 30 2C  31 35 3A 97 35 33 32 38  |:.53280,15:.5328|
000001D0: 31 2C 31 35 00 15 0A A0  00 99 54 24 22 1C 12 20  |1,15......T$".. |
000001E0: 20 3C 3C 3C 3C 3E 3E 3E  3E 20 20 22 A6 32 38 29  | <<<<>>>>  ".28)|
000001F0: 22 20 20 92 1F 1D 4D 4C  58 20 49 49 20 1C 12 20  |"  ...MLX II .. |
00000200: 20 22 A6 32 38 29 22 20  20 20 20 20 20 20 20 20  | ".28)"         |
00000210: 20 20 20 1F 22 00 45 0A  AA 00 99 22 11 11 11 20  |   .".E...."... |
00000220: 20 20 43 4F 4D 50 55 54  45 21 27 53 20 20 4D 41  |  COMPUTE!'S  MA|
00000230: 53 4B 49 4E 4B 4F 44 45  20 20 50 52 4F 47 52 41  |SKINKODE  PROGRA|
00000240: 4D 11 11 11 22 00 75 0A  B4 00 99 22 90 53 54 41  |M...".u....".STA|
00000250: 52 54 20 41 44 52 45 53  53 45 97 22 3B 3A 8D 33  |RT ADRESSE.";:.3|
00000260: 30 30 3A 53 41 B2 41 44  3A 8D 31 30 34 30 3A 8B  |00:SA.AD:.1040:.|
00000270: 46 A7 31 38 30 00 A9 0A  BE 00 99 22 90 53 4C 55  |F.180......".SLU|
00000280: 54 20 41 44 52 45 53 53  45 20 97 22 3B 3A 8D 33  |T ADRESSE .";:.3|
00000290: 30 30 3A 45 41 B2 41 44  3A 8D 20 31 30 33 30 3A  |00:EA.AD:. 1030:|
000002A0: 8B 20 46 20 A7 20 31 39  30 00 E4 0A C8 00 85 22  |. F . 190......"|
000002B0: 11 11 11 90 43 4C 45 41  52 20 41 52 42 45 4A 44  |....CLEAR ARBEJD|
000002C0: 53 4F 4D 52 5D 44 45 20  28 4A 2F 4E 29 97 22 3B  |SOMR]DE (J/N).";|
000002D0: 41 24 3A 8B C8 28 41 24  2C 31 29 B3 B1 22 4A 22  |A$:..(A$,1).."J"|
000002E0: A7 32 32 30 00 1E 0B D2  00 99 22 11 11 1F 41 52  |.220......"...AR|
000002F0: 42 45 4A 44 45 52 2E 2E  2E 22 3B 3A 81 49 B2 42  |BEJDER...";:.I.B|
00000300: 53 A4 42 53 AA 45 41 AB  53 41 AA 37 3A 97 49 2C  |S.BS.EA.SA.7:.I,|
00000310: 30 3A 82 3A 99 22 46 5B  52 44 49 47 2E 22 00 54  |0:.:."F[RDIG.".T|
00000320: 0B DC 00 99 A3 31 30 29  22 11 11 90 12 20 4D 4C  |.....10)".... ML|
00000330: 58 20 43 4F 4D 4D 41 4E  44 20 4D 45 4E 55 20 11  |X COMMAND MENU .|
00000340: 97 22 3A 99 54 24 22 12  45 92 4E 54 45 52 20 44  |.":.T$".E.NTER D|
00000350: 41 54 41 22 00 7D 0B E6  00 99 54 24 22 12 44 92  |ATA".}....T$".D.|
00000360: 49 53 50 4C 41 59 20 44  41 54 41 22 3A 99 54 24  |ISPLAY DATA":.T$|
00000370: 22 12 4C 92 4F 41 44 20  44 41 54 41 22 00 A1 0B  |".L.OAD DATA"...|
00000380: F0 00 99 54 24 22 12 53  92 41 56 45 20 46 49 4C  |...T$".S.AVE FIL|
00000390: 45 22 3A 99 54 24 22 12  51 92 55 49 54 11 11 90  |E":.T$".Q.UIT...|
000003A0: 22 00 B4 0B FA 00 A1 41  24 3A 8B 41 24 B2 4E 24  |"......A$:.A$.N$|
000003B0: A7 32 35 30 00 DE 0B 04  01 41 B2 30 3A 81 49 B2  |.250.....A.0:.I.|
000003C0: 31 A4 35 3A 8B 41 24 B2  CA 28 22 45 44 4C 53 51  |1.5:.A$..("EDLSQ|
000003D0: 22 2C 49 2C 31 29 A7 41  B2 49 3A 49 B2 35 00 06  |",I,1).A.I:I.5..|
000003E0: 0C 0E 01 82 3A 91 41 89  34 32 30 2C 36 31 30 2C  |....:.A.420,610,|
000003F0: 36 39 30 2C 37 30 30 2C  32 38 30 3A 8D 31 30 36  |690,700,280:.106|
00000400: 30 3A 89 32 35 30 00 43  0C 18 01 99 22 12 20 51  |0:.250.C....". Q|
00000410: 55 49 54 20 22 3A 85 22  11 97 45 52 20 44 55 20  |UIT ":."..ER DU |
00000420: 53 49 4B 4B 45 52 20 28  4A 2F 4E 29 22 3B 41 24  |SIKKER (J/N)";A$|
00000430: 3A 8B 20 C8 28 41 24 2C  31 29 B3 B1 22 4A 22 A7  |:. .(A$,1).."J".|
00000440: 32 32 30 00 52 0C 22 01  97 53 44 AA 32 34 2C 30  |220.R."..SD.24,0|
00000450: 3A 80 00 74 0C 2C 01 49  4E 24 B2 4E 24 3A 41 44  |:..t.,.IN$.N$:AD|
00000460: B2 30 3A 85 49 4E 24 3A  8B C3 28 49 4E 24 29 B3  |.0:.IN$:..(IN$).|
00000470: B1 34 A7 8E 00 A8 0C 36  01 42 24 B2 49 4E 24 3A  |.4.....6.B$.IN$:|
00000480: 8D 33 32 30 3A 41 44 B2  41 3A 42 24 B2 CA 28 49  |.320:AD.A:B$..(I|
00000490: 4E 24 2C 33 29 3A 8D 33  32 30 3A 41 44 B2 41 44  |N$,3):.320:AD.AD|
000004A0: AC 32 35 36 AA 41 3A 8E  00 E4 0C 40 01 41 B2 30  |.256.A:....@.A.0|
000004B0: 3A 81 4A B2 31 A4 32 3A  41 24 B2 CA 28 42 24 2C  |:.J.1.2:A$..(B$,|
000004C0: 4A 2C 31 29 3A 42 B2 C6  28 41 24 29 AB 43 34 AA  |J,1):B..(A$).C4.|
000004D0: 28 41 24 B1 22 40 22 29  AC 43 37 3A 41 B2 41 AC  |(A$."@").C7:A.A.|
000004E0: 43 36 AA 42 00 00 0D 4A  01 8B 42 B3 30 B0 42 B1  |C6.B...J..B.0.B.|
000004F0: 31 35 A7 41 44 B2 30 3A  41 B2 AB 31 3A 4A B2 32  |15.AD.0:A..1:J.2|
00000500: 00 08 0D 54 01 82 3A 8E  00 3D 0D 5E 01 42 B2 B5  |...T..:..=.^.B..|
00000510: 28 41 AD 43 36 29 3A 99  CA 28 48 24 2C 42 AA 31  |(A.C6):..(H$,B.1|
00000520: 2C 31 29 3B 3A 42 B2 41  AB 42 AC 43 36 3A 99 CA  |,1);:B.A.B.C6:..|
00000530: 28 48 24 2C 42 AA 31 2C  31 29 3B 3A 8E 00 66 0D  |(H$,B.1,1);:..f.|
00000540: 68 01 41 B2 B5 28 41 44  AD 5A 36 29 3A 8D 33 35  |h.A..(AD.Z6):.35|
00000550: 30 3A 41 B2 41 44 AB 41  AC 5A 36 3A 8D 33 35 30  |0:A.AD.A.Z6:.350|
00000560: 3A 99 22 3A 22 3B 00 92  0D 72 01 43 4B B2 B5 28  |:.":";...r.CK..(|
00000570: 41 44 AD 5A 36 29 3A 43  4B B2 41 44 AB 5A 34 AC  |AD.Z6):CK.AD.Z4.|
00000580: 43 4B AA 5A 35 AC 28 43  4B B1 5A 37 29 3A 89 33  |CK.Z5.(CK.Z7):.3|
00000590: 39 30 00 AC 0D 7C 01 43  4B B2 43 4B AC 5A 32 AA  |90...|.CK.CK.Z2.|
000005A0: 5A 35 AC 28 43 4B B1 5A  37 29 AA 41 00 C3 0D 86  |Z5.(CK.Z7).A....|
000005B0: 01 43 4B B2 43 4B AA 5A  35 AC 28 43 4B B1 5A 35  |.CK.CK.Z5.(CK.Z5|
000005C0: 29 3A 8E 00 F4 0D 90 01  99 22 11 53 54 41 52 54  |):.......".START|
000005D0: 45 4E 44 45 20 49 97 22  3B 3A 8D 33 30 30 3A 8B  |ENDE I.";:.300:.|
000005E0: 49 4E 24 B3 B1 4E 24 A7  8D 31 30 33 30 3A 8B 46  |IN$..N$..1030:.F|
000005F0: A7 34 30 30 00 FA 0D 9A  01 8E 00 22 0E A4 01 99  |.400......."....|
00000600: 22 12 20 49 4E 44 54 41  53 54 20 44 41 54 41 20  |". INDTAST DATA |
00000610: 22 3A 8D 34 30 30 3A 8B  49 4E 24 B2 4E 24 A7 32  |":.400:.IN$.N$.2|
00000620: 32 30 00 2D 0E AE 01 9F  33 2C 33 3A 99 00 50 0E  |20.-....3,3:..P.|
00000630: B8 01 97 31 39 38 2C 30  3A 8D 33 36 30 3A 8B 46  |...198,0:.360:.F|
00000640: A7 99 49 4E 24 3A 99 22  91 1D 1D 1D 1D 1D 22 3B  |..IN$:."......";|
00000650: 00 7E 0E C2 01 81 49 B2  30 A4 32 34 A9 33 3A 42  |.~....I.0.24.3:B|
00000660: 24 B2 53 24 3A 81 4A B2  31 A4 32 3A 8B 46 A7 42  |$.S$:.J.1.2:.F.B|
00000670: 24 B2 CA 28 49 4E 24 2C  49 AA 4A 2C 31 29 00 98  |$..(IN$,I.J,1)..|
00000680: 0E CC 01 99 22 12 22 42  24 4C 24 3B 3A 8B 49 B3  |...."."B$L$;:.I.|
00000690: 32 34 A7 99 22 92 22 3B  00 AB 0E D6 01 A1 41 24  |24..".";......A$|
000006A0: 3A 8B 41 24 B2 4E 24 A7  34 37 30 00 D4 0E E0 01  |:.A$.N$.470.....|
000006B0: 8B 28 41 24 B1 22 2F 22  AF 41 24 B3 22 3A 22 29  |.(A$."/".A$.":")|
000006C0: B0 28 41 24 B1 22 40 22  AF 41 24 B3 22 47 22 29  |.(A$."@".A$."G")|
000006D0: A7 35 34 30 00 E2 0E E4  01 8F 20 47 4F 54 4F 34  |.540...... GOTO4|
000006E0: 39 30 00 29 0F E5 01 41  B2 AB 28 41 24 B2 22 4D  |90.)...A..(A$."M|
000006F0: 22 29 AB 32 AC 28 41 24  B2 22 2C 22 29 AB 33 AC  |").2.(A$.",").3.|
00000700: 28 41 24 B2 22 2E 22 29  AB 34 AC 28 41 24 B2 22  |(A$.".").4.(A$."|
00000710: 2F 22 29 AB 35 AC 28 41  24 B2 22 4A 22 29 AB 36  |/").5.(A$."J").6|
00000720: AC 28 41 24 B2 22 4B 22  29 00 76 0F E6 01 41 B2  |.(A$."K").v...A.|
00000730: 41 AB 37 AC 28 41 24 B2  22 4C 22 29 AB 38 AC 28  |A.7.(A$."L").8.(|
00000740: 41 24 B2 22 5B 22 29 AB  39 AC 28 41 24 B2 22 55  |A$."[").9.(A$."U|
00000750: 22 29 AB 31 30 AC 28 41  24 B2 22 49 22 29 AB 31  |").10.(A$."I").1|
00000760: 31 AC 28 41 24 B2 22 4F  22 29 AB 31 32 AC 28 41  |1.(A$."O").12.(A|
00000770: 24 B2 22 50 22 29 00 AB  0F E7 01 41 B2 41 AB 31  |$."P").....A.A.1|
00000780: 33 AC 28 41 24 B2 53 24  29 3A 8B 41 A7 41 24 B2  |3.(A$.S$):.A.A$.|
00000790: CA 28 22 41 42 43 44 31  32 33 45 34 35 36 46 30  |.("ABCD123E456F0|
000007A0: 22 2C 41 2C 31 29 3A 89  35 34 30 00 DB 0F EA 01  |",A,1):.540.....|
000007B0: 8B 41 24 B2 52 24 AF 28  28 49 B2 30 29 AF 28 4A  |.A$.R$.((I.0).(J|
000007C0: B2 31 29 B0 46 29 A7 99  42 24 3B 3A 4A B2 32 3A  |.1).F)..B$;:J.2:|
000007D0: 82 3A 49 B2 32 34 3A 89  35 35 30 00 02 10 F4 01  |.:I.24:.550.....|
000007E0: 8B 41 24 B2 22 13 22 A7  99 20 42 24 3A 4A B2 32  |.A$.".".. B$:J.2|
000007F0: 3A 82 3A 49 B2 32 34 3A  82 3A 46 B2 30 3A 89 34  |:.:I.24:.:F.0:.4|
00000800: 34 30 00 1E 10 FE 01 8B  28 41 24 B2 22 1D 22 29  |40......(A$.".")|
00000810: AF 46 A7 99 42 24 4C 24  3B 3A 89 35 34 30 00 4A  |.F..B$L$;:.540.J|
00000820: 10 08 02 8B 41 24 B3 B1  4C 24 AF 41 24 B3 B1 44  |....A$..L$.A$..D|
00000830: 24 B0 28 28 49 B2 30 29  AF 28 4A B2 31 29 29 A7  |$.((I.0).(J.1)).|
00000840: 8D 31 30 36 30 3A 89 34  37 30 00 75 10 12 02 41  |.1060:.470.u...A|
00000850: 24 B2 4C 24 AA 53 24 AA  4C 24 3A 99 42 24 4C 24  |$.L$.S$.L$:.B$L$|
00000860: 3B 3A 4A B2 32 AB 4A 3A  8B 4A A7 99 4C 24 3B 3A  |;:J.2.J:.J..L$;:|
00000870: 49 B2 49 AB 33 00 86 10  1C 02 99 41 24 3B 3A 82  |I.I.3......A$;:.|
00000880: 4A 3A 99 53 24 3B 00 B1  10 26 02 82 49 3A 99 3A  |J:.S$;...&..I:.:|
00000890: 99 22 91 1D 1D 1D 1D 1D  22 3B 3A 84 33 2C 49 4E  |."......";:.3,IN|
000008A0: 24 3A 8B 49 4E 24 B2 4E  24 A7 A0 33 3A 89 32 32  |$:.IN$.N$..3:.22|
000008B0: 30 00 E5 10 30 02 81 49  B2 31 A4 32 35 A9 33 3A  |0...0..I.1.25.3:|
000008C0: 42 24 B2 CA 28 49 4E 24  2C 49 29 3A 8D 33 32 30  |B$..(IN$,I):.320|
000008D0: 3A 8B 49 B3 32 35 20 A7  8D 33 38 30 3A 41 28 49  |:.I.25 ..380:A(I|
000008E0: AD 33 29 B2 41 00 22 11  3A 02 82 3A 8B 41 B3 B1  |.3).A.".:..:.A..|
000008F0: 43 4B A7 8D 31 30 36 30  3A 99 22 90 12 20 46 45  |CK..1060:.".. FE|
00000900: 4A 4C 3A 20 49 4E 44 54  41 53 54 20 4C 49 4E 49  |JL: INDTAST LINI|
00000910: 45 4E 20 49 47 45 4E 97  22 3A 46 B2 31 3A 89 34  |EN IGEN.":F.1:.4|
00000920: 34 30 00 4A 11 44 02 8D  31 30 38 30 3A 42 B2 42  |40.J.D..1080:B.B|
00000930: 53 AA 41 44 AB 53 41 3A  81 49 B2 30 A4 37 3A 97  |S.AD.SA:.I.0.7:.|
00000940: 42 AA 49 2C 41 28 49 29  3A 82 00 86 11 4E 02 41  |B.I,A(I):....N.A|
00000950: 44 B2 41 44 AA 38 3A 8B  41 44 B1 45 41 A7 A0 33  |D.AD.8:.AD.EA..3|
00000960: 3A 99 22 11 1F 2A 2A 20  49 4E 44 54 41 53 54 4E  |:."..** INDTASTN|
00000970: 49 4E 47 20 46 5B 52 44  49 47 20 2A 2A 90 11 11  |ING F[RDIG **...|
00000980: 22 3A 89 37 30 30 00 93  11 58 02 46 B2 30 3A 89  |":.700...X.F.0:.|
00000990: 34 34 30 00 BD 11 62 02  99 22 93 11 12 20 46 52  |440...b.."... FR|
000009A0: 45 4D 56 49 53 20 44 41  54 41 20 22 3A 8D 34 30  |EMVIS DATA ":.40|
000009B0: 30 3A 8B 49 4E 24 B2 4E  24 A7 32 32 30 00 04 12  |0:.IN$.N$.220...|
000009C0: 6C 02 99 22 11 1F 54 41  53 54 3A 20 12 4D 45 4C  |l.."..TAST: .MEL|
000009D0: 4C 45 4D 52 55 4D 92 20  46 4F 52 20 50 41 55 53  |LEMRUM. FOR PAUS|
000009E0: 45 2C 22 3A 99 20 20 20  20 22 20 20 20 20 20 20  |E,":.    "      |
000009F0: 12 52 45 54 55 52 4E 92  20 41 46 42 52 59 44 45  |.RETURN. AFBRYDE|
00000A00: 52 97 11 22 00 37 12 76  02 8D 33 36 30 3A 42 B2  |R..".7.v..360:B.|
00000A10: 42 53 AA 41 44 AB 53 41  3A 81 49 B2 42 A4 42 AA  |BS.AD.SA:.I.B.B.|
00000A20: 37 3A 41 B2 C2 28 49 29  3A 8D 33 35 30 3A 8D 33  |7:A..(I):.350:.3|
00000A30: 38 30 3A 99 53 24 3B 00  4F 12 80 02 82 3A 99 22  |80:.S$;.O....:."|
00000A40: 12 22 3B 3A 41 B2 43 4B  3A 8D 33 35 30 3A 99 00  |.";:A.CK:.350:..|
00000A50: 86 12 8A 02 46 B2 31 3A  41 44 B2 41 44 AA 38 3A  |....F.1:AD.AD.8:|
00000A60: 8B 41 44 B1 45 41 A7 99  22 11 1F 2A 2A 20 49 4B  |.AD.EA.."..** IK|
00000A70: 4B 45 20 46 4C 45 52 45  20 44 41 54 41 20 2A 2A  |KE FLERE DATA **|
00000A80: 22 3A 89 32 32 30 00 A0  12 94 02 A1 41 24 3A 8B  |":.220......A$:.|
00000A90: 41 24 B2 52 24 A7 8D 31  30 38 30 3A 89 32 32 30  |A$.R$..1080:.220|
00000AA0: 00 B7 12 9E 02 8B 41 24  B2 53 24 A7 46 B2 46 AA  |......A$.S$.F.F.|
00000AB0: 31 3A 8D 31 30 38 30 00  CA 12 A8 02 91 46 89 36  |1:.1080......F.6|
00000AC0: 33 30 2C 36 36 30 2C 36  33 30 00 E9 12 B2 02 99  |30,660,630......|
00000AD0: 22 11 12 20 4C 4F 41 44  20 44 41 54 41 20 22 3A  |".. LOAD DATA ":|
00000AE0: 4F 50 B2 31 3A 89 37 31  30 00 03 13 BC 02 99 22  |OP.1:.710......"|
00000AF0: 11 12 20 53 41 56 45 20  46 49 4C 45 20 22 3A 4F  |.. SAVE FILE ":O|
00000B00: 50 B2 30 00 2C 13 C6 02  49 4E 24 B2 4E 24 3A 85  |P.0.,...IN$.N$:.|
00000B10: 22 11 46 49 4C 45 4E 41  4D 45 97 22 3B 49 4E 24  |".FILENAME.";IN$|
00000B20: 3A 8B 49 4E 24 B2 4E 24  A7 32 32 30 00 5E 13 D0  |:.IN$.N$.220.^..|
00000B30: 02 46 B2 30 3A 8F 20 20  2A 2A 2A 20 20 20 50 52  |.F.0:.  ***   PR|
00000B40: 49 4E 54 22 11 90 12 54  92 41 50 45 20 45 4C 4C  |INT"...T.APE ELL|
00000B50: 45 52 20 12 44 92 49 53  4B 3A 20 97 22 3B 00 93  |ER .D.ISK: .";..|
00000B60: 13 DA 02 8F 20 20 20 20  20 20 2A 2A 2A 20 20 20  |....      ***   |
00000B70: 47 45 54 41 24 3A 49 46  41 24 3D 22 54 22 54 48  |GETA$:IFA$="T"TH|
00000B80: 45 4E 50 52 49 4E 54 22  54 11 22 3A 47 4F 54 4F  |ENPRINT"T.":GOTO|
00000B90: 38 38 30 00 B5 13 E4 02  8F 20 20 20 20 20 20 2A  |880......      *|
00000BA0: 2A 2A 20 20 20 49 46 41  24 3C 3E 22 44 22 54 48  |**   IFA$<>"D"TH|
00000BB0: 45 4E 37 33 30 00 D0 13  E9 02 8F 20 20 20 20 20  |EN730......     |
00000BC0: 20 2A 2A 2A 20 20 20 50  52 49 4E 54 22 44 11 22  | ***   PRINT"D."|
00000BD0: 00 00 14 EE 02 9F 31 35  2C 38 2C 31 35 2C 22 49  |......15,8,15,"I|
00000BE0: 30 3A 22 3A 42 B2 45 41  AB 53 41 3A 49 4E 24 B2  |0:":B.EA.SA:IN$.|
00000BF0: 22 30 3A 22 AA 49 4E 24  3A 8B 4F 50 A7 38 31 30  |"0:".IN$:.OP.810|
00000C00: 00 22 14 F8 02 9F 31 2C  38 2C 38 2C 49 4E 24 AA  |."....1,8,8,IN$.|
00000C10: 22 2C 50 2C 57 22 3A 8D  38 36 30 3A 8B 41 A7 32  |",P,W":.860:.A.2|
00000C20: 32 30 00 52 14 02 03 41  48 B2 B5 28 53 41 AD 32  |20.R...AH..(SA.2|
00000C30: 35 36 29 3A 41 4C B2 53  41 AB 28 41 48 AC 32 35  |56):AL.SA.(AH.25|
00000C40: 36 29 3A 98 31 2C C7 28  41 4C 29 3B C7 28 41 48  |6):.1,.(AL);.(AH|
00000C50: 29 3B 00 74 14 0C 03 81  49 B2 30 A4 42 3A 98 31  |);.t....I.0.B:.1|
00000C60: 2C C7 28 C2 28 42 53 AA  49 29 29 3B 3A 8B 53 54  |,.(.(BS.I));:.ST|
00000C70: A7 38 30 30 00 86 14 16  03 82 3A A0 31 3A A0 31  |.800......:.1:.1|
00000C80: 35 3A 89 39 34 30 00 B2  14 20 03 8D 31 30 36 30  |5:.940... ..1060|
00000C90: 3A 99 22 11 90 46 45 4A  4C 20 4D 45 44 45 4E 53  |:."..FEJL MEDENS|
00000CA0: 20 53 41 56 45 3A 97 22  3A 8D 38 36 30 3A 89 32  | SAVE:.":.860:.2|
00000CB0: 32 30 00 D4 14 2A 03 9F  31 2C 38 2C 38 2C 49 4E  |20...*..1,8,8,IN|
00000CC0: 24 AA 22 2C 50 2C 52 22  3A 8D 38 36 30 3A 8B 41  |$.",P,R":.860:.A|
00000CD0: A7 32 32 30 00 0C 15 34  03 A1 23 31 2C 41 24 2C  |.220...4..#1,A$,|
00000CE0: 42 24 3A 41 44 B2 C6 28  41 24 AA 5A 24 29 AA 32  |B$:AD..(A$.Z$).2|
00000CF0: 35 36 AC C6 28 42 24 AA  5A 24 29 3A 8B 41 44 B3  |56..(B$.Z$):.AD.|
00000D00: B1 53 41 A7 46 B2 31 3A  89 38 35 30 00 47 15 3E  |.SA.F.1:.850.G.>|
00000D10: 03 81 49 B2 30 A4 42 3A  A1 23 31 2C 41 24 3A 97  |..I.0.B:.#1,A$:.|
00000D20: 42 53 AA 49 2C C6 28 41  24 AA 5A 24 29 3A 8B 20  |BS.I,.(A$.Z$):. |
00000D30: 53 54 20 AF 28 49 B3 B1  42 29 A7 46 B2 32 3A 41  |ST .(I..B).F.2:A|
00000D40: 44 B2 49 3A 49 B2 42 00  59 15 48 03 82 3A 8B 53  |D.I:I.B.Y.H..:.S|
00000D50: 54 B3 B1 36 34 A7 46 B2  33 00 76 15 52 03 A0 31  |T..64.F.3.v.R..1|
00000D60: 3A A0 31 35 3A 91 B6 28  46 B1 30 29 AA 31 89 39  |:.15:..(F.0).1.9|
00000D70: 36 30 2C 39 37 30 00 A0  15 5C 03 84 31 35 2C 41  |60,970...\..15,A|
00000D80: 2C 41 24 3A 8B 41 A7 A0  31 3A A0 31 35 3A 8D 31  |,A$:.A..1:.15:.1|
00000D90: 30 36 30 3A 99 22 12 46  45 4A 4C 3A 20 22 41 24  |060:.".FEJL: "A$|
00000DA0: 00 A6 15 66 03 8E 00 DB  15 70 03 97 31 38 33 2C  |...f.....p..183,|
00000DB0: C2 28 46 41 AA 32 29 3A  97 31 38 37 2C C2 28 46  |.(FA.2):.187,.(F|
00000DC0: 41 AA 33 29 3A 97 31 38  38 2C C2 28 46 41 AA 34  |A.3):.188,.(FA.4|
00000DD0: 29 3A 8B 4F 50 B2 30 A7  39 32 30 00 13 16 7A 03  |):.OP.0.920...z.|
00000DE0: 9E 36 33 34 36 36 3A 8B  28 C2 28 37 38 33 29 AF  |.63466:.(.(783).|
00000DF0: 31 29 A7 8D 31 30 36 30  3A 99 22 11 12 46 49 4C  |1)..1060:."..FIL|
00000E00: 45 20 49 4B 4B 45 20 46  55 4E 44 45 54 22 3A 89  |E IKKE FUNDET":.|
00000E10: 36 39 30 00 3D 16 84 03  41 44 B2 C2 28 38 32 39  |690.=...AD..(829|
00000E20: 29 AA 32 35 36 AC C2 28  38 33 30 29 3A 8B 41 44  |).256..(830):.AD|
00000E30: B3 B1 53 41 A7 46 B2 31  3A 89 39 37 30 00 7A 16  |..SA.F.1:.970.z.|
00000E40: 8E 03 41 B2 C2 28 38 33  31 29 AA 32 35 36 AC C2  |..A..(831).256..|
00000E50: 28 38 33 32 29 AB 31 3A  46 B2 46 AB 32 AC 28 41  |(832).1:F.F.2.(A|
00000E60: B3 45 41 29 AB 33 AC 28  41 B1 45 41 29 3A 41 44  |.EA).3.(A.EA):AD|
00000E70: B2 41 AB 41 44 3A 89 39  33 30 00 9E 16 98 03 41  |.A.AD:.930.....A|
00000E80: B2 53 41 3A 42 B2 45 41  AA 31 3A 8D 31 30 31 30  |.SA:B.EA.1:.1010|
00000E90: 3A 97 37 38 30 2C 33 3A  9E 36 33 33 33 38 00 CB  |:.780,3:.63338..|
00000EA0: 16 A2 03 41 B2 42 53 3A  42 B2 42 53 AA 28 45 41  |...A.BS:B.BS.(EA|
00000EB0: AB 53 41 29 AA 31 3A 8D  31 30 31 30 3A 91 4F 50  |.SA).1:.1010:.OP|
00000EC0: 89 39 35 30 3A 9E 36 33  35 39 31 00 F3 16 AC 03  |.950:.63591.....|
00000ED0: 8D 31 30 38 30 3A 99 22  1F 2A 2A 20 53 41 56 45  |.1080:.".** SAVE|
00000EE0: 20 41 46 53 4C 55 54 54  45 54 20 2A 2A 22 3A 89  | AFSLUTTET **":.|
00000EF0: 32 32 30 00 10 17 B6 03  97 31 34 37 2C 30 3A 9E  |220......147,0:.|
00000F00: 36 33 35 36 32 3A 8B 20  53 54 B1 30 A7 39 37 30  |63562:. ST.0.970|
00000F10: 00 38 17 C0 03 8D 31 30  38 30 3A 99 22 1F 2A 2A  |.8....1080:.".**|
00000F20: 20 4C 4F 41 44 20 41 46  53 4C 55 54 54 45 54 20  | LOAD AFSLUTTET |
00000F30: 2A 2A 22 3A 89 32 32 30  00 70 17 CA 03 8D 31 30  |**":.220.p....10|
00000F40: 36 30 3A 99 22 90 12 46  45 4A 4C 20 4D 45 44 45  |60:."..FEJL MEDE|
00000F50: 4E 53 20 4C 4F 41 44 3A  11 97 22 3A 91 46 8D 39  |NS LOAD:..":.F.9|
00000F60: 38 30 2C 39 39 30 2C 31  30 30 30 3A 89 32 32 30  |80,990,1000:.220|
00000F70: 00 9C 17 D4 03 99 22 55  4B 4F 52 52 45 4B 54 20  |......"UKORREKT |
00000F80: 53 54 41 52 54 41 44 52  45 53 53 45 20 28 22 3B  |STARTADRESSE (";|
00000F90: 3A 8D 33 36 30 3A 99 22  29 22 3A 8E 00 C9 17 DE  |:.360:.")":.....|
00000FA0: 03 99 22 4C 4F 41 44 20  41 46 53 4C 55 54 54 45  |.."LOAD AFSLUTTE|
00000FB0: 54 20 49 22 3B 3A 41 44  B2 53 41 AA 41 44 3A 8D  |T I";:AD.SA.AD:.|
00000FC0: 33 36 30 3A 99 44 24 3A  8E 00 E9 17 E8 03 99 22  |360:.D$:......."|
00000FD0: 41 46 4B 4F 52 54 45 54  20 49 20 53 4C 55 54 41  |AFKORTET I SLUTA|
00000FE0: 44 52 45 53 53 45 22 3A  8E 00 17 18 F2 03 41 48  |DRESSE":......AH|
00000FF0: B2 B5 28 41 AD 32 35 36  29 3A 41 4C B2 41 AB 28  |..(A.256):AL.A.(|
00001000: 41 48 AC 32 35 36 29 3A  97 31 39 33 2C 41 4C 3A  |AH.256):.193,AL:|
00001010: 97 31 39 34 2C 41 48 00  47 18 FC 03 41 48 B2 B5  |.194,AH.G...AH..|
00001020: 28 42 AD 32 35 36 29 3A  41 4C B2 42 AB 28 41 48  |(B.256):AL.B.(AH|
00001030: AC 32 35 36 29 3A 97 31  37 34 2C 41 4C 3A 97 31  |.256):.174,AL:.1|
00001040: 37 35 2C 41 48 3A 8E 00  5D 18 06 04 8B 41 44 B3  |75,AH:..]....AD.|
00001050: 53 41 B0 41 44 B1 45 41  A7 31 30 35 30 00 94 18  |SA.AD.EA.1050...|
00001060: 10 04 8B 28 41 44 B1 35  31 31 AF 41 44 B3 34 30  |...(AD.511.AD.40|
00001070: 39 36 30 29 B0 28 41 44  B1 34 39 31 35 31 AF 41  |960).(AD.49151.A|
00001080: 44 B3 35 33 32 34 38 29  A7 8D 31 30 38 30 3A 46  |D.53248)..1080:F|
00001090: B2 30 3A 8E 00 BC 18 1A  04 8D 31 30 36 30 3A 99  |.0:.......1060:.|
000010A0: 22 12 20 55 47 59 4C 44  49 47 20 41 44 52 45 53  |". UGYLDIG ADRES|
000010B0: 53 45 20 11 90 22 3A 46  B2 31 3A 8E 00 EC 18 24  |SE ..":F.1:....$|
000010C0: 04 97 53 44 AA 35 2C 33  31 3A 97 53 44 AA 36 2C  |..SD.5,31:.SD.6,|
000010D0: 32 30 38 3A 97 53 44 2C  32 34 30 3A 97 53 44 AA  |208:.SD,240:.SD.|
000010E0: 31 2C 34 3A 97 53 44 AA  34 2C 33 33 00 01 19 2E  |1,4:.SD.4,33....|
000010F0: 04 81 53 B2 31 A4 31 30  30 3A 82 3A 89 31 30 39  |..S.1.100:.:.109|
00001100: 30 00 2F 19 38 04 97 53  44 AA 35 2C 38 3A 97 53  |0./.8..SD.5,8:.S|
00001110: 44 AA 36 2C 32 34 30 3A  97 53 44 2C 30 3A 97 53  |D.6,240:.SD,0:.S|
00001120: 44 AA 31 2C 39 30 3A 97  53 44 AA 34 2C 31 37 00  |D.1,90:.SD.4,17.|
00001130: 58 19 42 04 81 53 B2 31  A4 31 30 30 3A 82 3A 97  |X.B..S.1.100:.:.|
00001140: 20 53 44 AA 34 2C 30 3A  97 20 53 44 2C 30 3A 97  | SD.4,0:. SD,0:.|
00001150: 53 44 AA 31 2C 30 3A 8E  00 00 00                 |SD.1,0:....     |

..#....    SAVE"@0:COMPUTE! MLX",8:.)...
..I....   INDTASTNINGSPROGRAM TIL.O.....
W.... * COMPUTE!S MASKINKODEPROGRAMMER*.
}..........         VERSION 1.1.......G.
D.. 56,50:.:. IN$,I,J,A,B,A$,B$,A(7),N$.
..N.C4.48:C6.16:C7.7:Z2.2:Z4.254:Z5.255:
Z6.256:Z7.127.;.X.FA.B(45).Z6.B(46):BS.B
(55).Z6.B(56):H$."0123456789ABCDEF".Z...
R$.G(13):L$.".":S$." ":D$.G(20):Z$.G(0):
T$.".............".....SD.54272:.I.SD.SD
.23:.I,0:.:.SD.24,15:.788,52.T...."." G(
142)G(8):.53280,15:.53281,15... ..T$".. 
 <<<<>>>>  ".28)"  ...MLX II ..  ".28)" 
           .".E...."...   COMPUTE!'S  MA
SKINKODE  PROGRAM...".U....".START ADRES
SE.";:.300:SA.AD:.1040:.F.180......".SLU
T ADRESSE .";:.300:EA.AD:. 1030:. F . 19
0...H.."....CLEAR ARBEJDSOMR]DE (J/N).";
A$:.H(A$,1).."J".220...R.."...ARBEJDER..
.";:.I.BS.BS.EA.SA.7:.I,0:.:."F[RDIG.".T
.....10)".... MLX COMMAND MENU ..":.T$".
E.NTER DATA".}....T$".D.ISPLAY DATA":.T$
".L.OAD DATA"......T$".S.AVE FILE":.T$".
Q.UIT..."......A$:.A$.N$.250.....A.0:.I.
1.5:.A$.J("EDLSQ",I,1).A.I:I.5......:.A.
420,610,690,700,280:.1060:.250.C....". Q
UIT ":."..ER DU SIKKER (J/N)";A$:. H(A$,
1).."J".220.R."..SD.24,0:..T.,.IN$.N$:AD
.0:.IN$:.C(IN$)..4.....6.B$.IN$:.320:AD.
A:B$.J(IN$,3):.320:AD.AD.256.A:....@.A.0
:.J.1.2:A$.J(B$,J,1):B.F(A$).C4.(A$."@")
.C7:A.A.C6.B...J..B.0.B.15.AD.0:A..1:J.2
...T..:..=.^.B..(A.C6):.J(H$,B.1,1);:B.A
.B.C6:.J(H$,B.1,1);:..F.H.A..(AD.Z6):.35
0:A.AD.A.Z6:.350:.":";...R.CK..(AD.Z6):C
K.AD.Z4.CK.Z5.(CK.Z7):.390...|.CK.CK.Z2.
Z5.(CK.Z7).A.C...CK.CK.Z5.(CK.Z5):......
.".STARTENDE I.";:.300:.IN$..N$..1030:.F
.400......."....". INDTAST DATA ":.400:.
IN$.N$.220.-....3,3:..P....198,0:.360:.F
..IN$:."......";.~.B..I.0.24.3:B$.S$:.J.
1.2:.F.B$.J(IN$,I.J,1)...L.."."B$L$;:.I.
24..".";...V..A$:.A$.N$.470.T....(A$."/"
.A$.":").(A$."@".A$."G").540...... GOTO4
90.)...A..(A$."M").2.(A$.",").3.(A$.".")
.4.(A$."/").5.(A$."J").6.(A$."K").V...A.
A.7.(A$."L").8.(A$."[").9.(A$."U").10.(A
$."I").11.(A$."O").12.(A$."P").....A.A.1
3.(A$.S$):.A.A$.J("ABCD123E456F0",A,1):.
540......A$.R$.((I.0).(J.1).F)..B$;:J.2:
.:I.24:.550......A$.".".. B$:J.2:.:I.24:
.:F.0:.440......(A$.".").F..B$L$;:.540.J
....A$..L$.A$..D$.((I.0).(J.1))..1060:.4
70.U...A$.L$.S$.L$:.B$L$;:J.2.J:.J..L$;:
I.I.3......A$;:.J:.S$;...&..I:.:."......
";:.3,IN$:.IN$.N$. 3:.220...0..I.1.25.3:
B$.J(IN$,I):.320:.I.25 ..380:A(I.3).A.".
:..:.A..CK..1060:.".. FEJL: INDTAST LINI
EN IGEN.":F.1:.440.J.D..1080:B.BS.AD.SA:
.I.0.7:.B.I,A(I):....N.AD.AD.8:.AD.EA. 3
:."..** INDTASTNING F[RDIG **...":.700..
.X.F.0:.440...B.."... FREMVIS DATA ":.40
0:.IN$.N$.220...L.."..TAST: .MELLEMRUM. 
FOR PAUSE,":.    "      .RETURN. AFBRYDE
R..".7.V..360:B.BS.AD.SA:.I.B.B.7:A.B(I)
:.350:.380:.S$;.O....:.".";:A.CK:.350:..
....F.1:AD.AD.8:.AD.EA.."..** IKKE FLERE
 DATA **":.220. ....A$:.A$.R$..1080:.220
......A$.S$.F.F.1:.1080.J....F.630,660,6
30......".. LOAD DATA ":OP.1:.710......"
.. SAVE FILE ":OP.0.,.F.IN$.N$:.".FILENA
ME.";IN$:.IN$.N$.220.^.P.F.0:.  ***   PR
INT"...T.APE ELLER .D.ISK: .";...Z..    
  ***   GETA$:IFA$="T"THENPRINT"T.":GOTO
880......      ***   IFA$<>"D"THEN730.P.
...      ***   PRINT"D."......15,8,15,"I
0:":B.EA.SA:IN$."0:".IN$:.OP.810."....1,
8,8,IN$.",P,W":.860:.A.220.R...AH..(SA.2
56):AL.SA.(AH.256):.1,G(AL);G(AH);.T....
I.0.B:.1,G(B(BS.I));:.ST.800......: 1: 1
5:.940... ..1060:."..FEJL MEDENS SAVE:."
:.860:.220.T.*..1,8,8,IN$.",P,R":.860:.A
.220...4..#1,A$,B$:AD.F(A$.Z$).256.F(B$.
Z$):.AD..SA.F.1:.850.G.>..I.0.B:.#1,A$:.
BS.I,F(A$.Z$):. ST .(I..B).F.2:AD.I:I.B.
Y.H..:.ST..64.F.3.V.R. 1: 15:..(F.0).1.9
60,970. .\..15,A,A$:.A. 1: 15:.1060:.".F
EJL: "A$...F.....P..183,B(FA.2):.187,B(F
A.3):.188,B(FA.4):.OP.0.920...Z..63466:.
(B(783).1)..1060:."..FILE IKKE FUNDET":.
690.=...AD.B(829).256.B(830):.AD..SA.F.1
:.970.Z...A.B(831).256.B(832).1:F.F.2.(A
.EA).3.(A.EA):AD.A.AD:.930.....A.SA:B.EA
.1:.1010:.780,3:.63338.K...A.BS:B.BS.(EA
.SA).1:.1010:.OP.950:.63591......1080:."
.** SAVE AFSLUTTET **":.220......147,0:.
63562:. ST.0.970.8....1080:.".** LOAD AF
SLUTTET **":.220.P.J..1060:."..FEJL MEDE
NS LOAD:..":.F.980,990,1000:.220...T.."U
KORREKT STARTADRESSE (";:.360:.")":..I..
.."LOAD AFSLUTTET I";:AD.SA.AD:.360:.D$:
......."AFKORTET I SLUTADRESSE":......AH
..(A.256):AL.A.(AH.256):.193,AL:.194,AH.
G...AH..(B.256):AL.B.(AH.256):.174,AL:.1
75,AH:..]....AD.SA.AD.EA.1050......(AD.5
11.AD.40960).(AD.49151.AD.53248)..1080:F
.0:.......1060:.". UGYLDIG ADRESSE ..":F
.1:....$..SD.5,31:.SD.6,208:.SD,240:.SD.
1,4:.SD.4,33......S.1.100:.:.1090./.8..S
D.5,8:.SD.6,240:.SD,0:.SD.1,90:.SD.4,17.
X.B..S.1.100:.:. SD.4,0:. SD,0:.SD.1,0:.
...

×

C64 Image

> CLICK IMAGE PREVIEW FOR FULL MODAL