00000000: 01 08 48 08 0A 00 4D B2 32 30 30 3A 44 B2 35 30 |..H...M.200:D.50|
00000010: 3A 45 B2 31 34 3A 5A B2 AB 31 3A 56 4E B2 5A 3A |:E.14:Z..1:VN.Z:|
00000020: 99 22 11 11 2A 20 4D 49 43 52 4F 43 4F 4D 50 20 |."..* MICROCOMP |
00000030: 56 31 2E 30 20 2A 22 3A 99 22 11 43 4F 44 45 20 |V1.0 *":.".CODE |
00000040: 41 52 45 41 3A 20 22 3B 00 91 08 0F 00 86 20 4C |AREA: ";...... L|
00000050: 24 28 4D 29 2C 4C 56 28 4D 29 2C 43 24 28 4D 29 |$(M),LV(M),C$(M)|
00000060: 2C 43 28 4D 29 2C 4F 24 28 4D 29 2C 50 24 28 4D |,C(M),O$(M),P$(M|
00000070: 29 2C 56 24 28 44 29 2C 57 24 28 45 29 2C 4C 45 |),V$(D),W$(E),LE|
00000080: 28 45 29 2C 4C 58 28 45 29 2C 58 28 45 2C 33 30 |(E),LX(E),X(E,30|
00000090: 29 00 C7 08 14 00 81 4E B2 30 A4 45 3A 87 57 24 |)......N.0.E:.W$|
000000A0: 28 4E 29 2C 4C 45 28 4E 29 2C 4C 58 28 4E 29 3A |(N),LE(N),LX(N):|
000000B0: 81 49 B2 30 A4 4C 58 28 4E 29 3A 87 58 28 4E 2C |.I.0.LX(N):.X(N,|
000000C0: 49 29 3A 82 49 2C 4E 00 FA 08 1E 00 56 4E B2 56 |I):.I,N.....VN.V|
000000D0: 4E AA 31 3A 87 56 24 28 56 4E 29 3A 91 AB 28 56 |N.1:.V$(VN):..(V|
000000E0: 24 28 56 4E 29 B3 B1 22 2A 3D 22 29 89 33 30 3A |$(VN).."*=").30:|
000000F0: 87 20 53 41 2C 56 42 2C 4C 24 00 3E 09 23 00 5A |. SA,VB,L$.>.#.Z|
00000100: B2 5A AA 31 3A 4C 24 28 5A 29 B2 4C 24 3A 87 43 |.Z.1:L$(Z).L$:.C|
00000110: 24 28 5A 29 2C 4F 24 28 5A 29 2C 50 24 28 5A 29 |$(Z),O$(Z),P$(Z)|
00000120: 3A 5A 4D B2 5A 3A 87 4C 24 3A 91 AB 28 4C 24 B3 |:ZM.Z:.L$:..(L$.|
00000130: B1 22 5F 22 29 89 33 35 3A 41 44 B2 53 41 00 83 |."_").35:AD.SA..|
00000140: 09 32 00 99 53 41 3B 22 2D 22 3B 3A 81 5A B2 30 |.2..SA;"-";:.Z.0|
00000150: A4 5A 4D 3A 4C 56 28 5A 29 B2 41 44 3A 81 4E B2 |.ZM:LV(Z).AD:.N.|
00000160: 30 A4 45 3A 8B 43 24 28 5A 29 B2 57 24 28 4E 29 |0.E:.C$(Z).W$(N)|
00000170: A7 43 28 5A 29 B2 4E 3A 41 44 B2 41 44 AA 4C 45 |.C(Z).N:AD.AD.LE|
00000180: 28 4E 29 00 C8 09 37 00 82 4E 2C 5A 3A 43 45 B2 |(N)...7..N,Z:CE.|
00000190: 41 44 3A 99 43 45 3A 41 44 B2 53 41 3A 81 5A B2 |AD:.CE:AD.SA:.Z.|
000001A0: 30 A4 5A 4D 3A 43 B2 43 28 5A 29 3A 56 24 B2 4F |0.ZM:C.C(Z):V$.O|
000001B0: 24 28 5A 29 3A 8D 38 30 3A 4F 28 30 29 B2 56 3A |$(Z):.80:O(0).V:|
000001C0: 56 24 B2 50 24 28 5A 29 00 06 0A 3C 00 8D 38 30 |V$.P$(Z)...<..80|
000001D0: 3A 4F 28 32 29 B2 56 3A 81 4E B2 30 A4 4C 58 28 |:O(2).V:.N.0.LX(|
000001E0: 43 29 3A 58 B2 58 28 43 2C 4E 29 3A 8B 58 B1 B2 |C):X.X(C,N):.X..|
000001F0: 30 A7 97 41 44 2C 58 3A 41 44 B2 41 44 AA 31 3A |0..AD,X:AD.AD.1:|
00000200: 82 4E 2C 5A 3A 80 00 41 0A 41 00 91 58 AF 34 89 |.N,Z:..A.A..X.4.|
00000210: 2C 2C 2C 37 35 3A 4A B2 B5 28 4F 28 58 AF 32 29 |,,,75:J..(O(X.2)|
00000220: AD 32 35 36 29 3A 97 41 44 2C 4A 3A 8B 58 AF 31 |.256):.AD,J:.X.1|
00000230: A7 97 41 44 2C 4F 28 58 AF 32 29 AB 4A AC 32 35 |..AD,O(X.2).J.25|
00000240: 36 00 54 0A 46 00 41 44 B2 41 44 AA 31 3A 82 4E |6.T.F.AD.AD.1:.N|
00000250: 2C 5A 3A 80 00 95 0A 4B 00 49 B2 4F 28 58 AF 32 |,Z:....K.I.O(X.2|
00000260: 29 AA 28 58 AF 31 29 3A 97 41 44 AA 31 2C 49 AD |).(X.1):.AD.1,I.|
00000270: 32 35 36 3A 97 41 44 2C 49 AB B5 28 49 AD 32 35 |256:.AD,I..(I.25|
00000280: 36 29 AC 32 35 36 3A 41 44 B2 41 44 AA 32 3A 82 |6).256:AD.AD.2:.|
00000290: 4E 2C 5A 3A 80 00 DF 0A 50 00 56 B2 C5 28 56 24 |N,Z:....P.V..(V$|
000002A0: 29 3A 56 B2 56 AB 36 35 35 33 36 AC 28 56 B3 30 |):V.V.65536.(V.0|
000002B0: 29 3A 81 49 B2 30 A4 56 4E AB 31 3A 56 B2 56 AB |):.I.0.VN.1:V.V.|
000002C0: 28 56 24 B2 56 24 28 49 29 29 AC 28 32 AC 49 AA |(V$.V$(I)).(2.I.|
000002D0: 56 42 AB 43 45 AC 28 56 42 B2 30 29 29 3A 82 00 |VB.CE.(VB.0)):..|
000002E0: 04 0B 55 00 81 49 B2 30 A4 5A 4D 3A 56 B2 56 AB |..U..I.0.ZM:V.V.|
000002F0: 4C 56 28 49 29 AC 28 56 24 B2 4C 24 28 49 29 29 |LV(I).(V$.L$(I))|
00000300: 3A 82 3A 8E 00 54 0B 5A 00 83 41 44 44 2C 31 39 |:.:..T.Z..ADD,19|
00000310: 2C 31 32 2C 32 34 2C 31 37 33 2C 2D 34 2C 31 30 |,12,24,173,-4,10|
00000320: 39 2C 2D 32 2C 31 34 31 2C 2D 32 2C 31 37 33 2C |9,-2,141,-2,173,|
00000330: 2D 33 2C 31 30 39 2C 2D 31 2C 31 34 31 2C 2D 31 |-3,109,-1,141,-1|
00000340: 2C 53 55 42 2C 31 39 2C 31 32 2C 35 36 2C 31 37 |,SUB,19,12,56,17|
00000350: 33 2C 2D 32 00 A2 0B 5B 00 83 32 33 37 2C 2D 34 |3,-2...[..237,-4|
00000360: 2C 31 34 31 2C 2D 32 2C 31 37 33 2C 2D 31 2C 32 |,141,-2,173,-1,2|
00000370: 33 37 2C 2D 33 2C 31 34 31 2C 2D 31 2C 4D 4F 56 |37,-3,141,-1,MOV|
00000380: 45 2C 31 32 2C 37 2C 31 37 33 2C 2D 34 2C 31 34 |E,12,7,173,-4,14|
00000390: 31 2C 2D 32 2C 31 37 33 2C 2D 33 2C 31 34 31 2C |1,-2,173,-3,141,|
000003A0: 2D 31 00 F0 0B 5C 00 83 47 4F 54 4F 2C 33 2C 31 |-1...\..GOTO,3,1|
000003B0: 2C 37 36 2C 2D 34 2C 49 46 2C 31 31 2C 37 2C 31 |,76,-4,IF,11,7,1|
000003C0: 37 33 2C 2D 34 2C 31 33 2C 2D 33 2C 32 34 30 2C |73,-4,13,-3,240,|
000003D0: 33 2C 37 36 2C 2D 32 2C 4D 4F 56 45 23 2C 31 30 |3,76,-2,MOVE#,10|
000003E0: 2C 37 2C 31 36 39 2C 2D 37 2C 31 34 31 2C 2D 32 |,7,169,-7,141,-2|
000003F0: 00 41 0C 5D 00 83 31 36 39 2C 2D 38 2C 31 34 31 |.A.]..169,-8,141|
00000400: 2C 2D 31 2C 43 4D 4F 56 45 2C 36 2C 33 2C 31 37 |,-1,CMOVE,6,3,17|
00000410: 33 2C 2D 34 2C 31 34 31 2C 2D 32 2C 47 4F 53 55 |3,-4,141,-2,GOSU|
00000420: 42 2C 33 2C 31 2C 33 32 2C 2D 34 2C 52 45 54 55 |B,3,1,32,-4,RETU|
00000430: 52 4E 2C 31 2C 30 2C 39 36 2C 53 45 54 52 45 47 |RN,1,0,96,SETREG|
00000440: 53 00 91 0C 5E 00 83 39 2C 35 2C 31 37 33 2C 2D |S...^..9,5,173,-|
00000450: 34 2C 31 37 34 2C 2D 32 2C 31 37 32 2C 2D 31 2C |4,174,-2,172,-1,|
00000460: 43 4D 4F 56 45 23 2C 35 2C 33 2C 31 36 39 2C 2D |CMOVE#,5,3,169,-|
00000470: 37 2C 31 34 31 2C 2D 32 2C 41 44 44 23 2C 31 37 |7,141,-2,ADD#,17|
00000480: 2C 31 32 2C 32 34 2C 31 36 39 2C 2D 37 2C 31 30 |,12,24,169,-7,10|
00000490: 39 00 E3 0C 5F 00 83 2D 32 2C 31 34 31 2C 2D 32 |9..._..-2,141,-2|
000004A0: 2C 31 36 39 2C 2D 38 2C 31 30 39 2C 2D 31 2C 31 |,169,-8,109,-1,1|
000004B0: 34 31 2C 2D 31 2C 47 4F 54 4F 28 29 2C 33 2C 31 |41,-1,GOTO(),3,1|
000004C0: 2C 31 30 38 2C 2D 34 2C 43 4D 4F 56 45 28 29 2C |,108,-4,CMOVE(),|
000004D0: 32 36 2C 32 31 2C 31 37 33 2C 2D 34 2C 31 33 33 |26,21,173,-4,133|
000004E0: 2C 33 34 00 32 0D 60 00 83 31 37 33 2C 2D 33 2C |,34.2.`..173,-3,|
000004F0: 31 33 33 2C 33 35 2C 31 37 33 2C 2D 32 2C 31 33 |133,35,173,-2,13|
00000500: 33 2C 33 36 2C 31 37 33 2C 2D 31 2C 31 33 33 2C |3,36,173,-1,133,|
00000510: 33 37 2C 31 36 30 2C 30 2C 31 37 37 2C 33 34 2C |37,160,0,177,34,|
00000520: 31 34 35 2C 33 36 2C 57 4F 52 44 2C 32 2C 30 2C |145,36,WORD,2,0,|
00000530: 2D 34 00 3E 0D 64 00 8F 20 4D 45 52 47 45 00 46 |-4.>.d.. MERGE.F|
00000540: 0D 6E 00 83 20 41 00 55 0D 78 00 83 20 2A 3D 2C |.n.. A.U.x.. *=,|
00000550: 38 32 38 2C 30 00 69 0D 82 00 83 20 2C 47 4F 53 |828,0.i.... ,GOS|
00000560: 55 42 2C 34 34 37 39 37 2C 00 7D 0D 8C 00 83 20 |UB,44797,.}.... |
00000570: 2C 47 4F 53 55 42 2C 35 37 38 31 32 2C 00 8E 0D |,GOSUB,57812,...|
00000580: 96 00 83 20 2C 4D 4F 56 45 2C 34 35 2C 41 00 9F |... ,MOVE,45,A..|
00000590: 0D A0 00 83 20 2C 41 44 44 23 2C 2D 32 2C 41 00 |.... ,ADD#,-2,A.|
000005A0: B3 0D AA 00 83 20 2C 43 4D 4F 56 45 23 2C 30 2C |..... ,CMOVE#,0,|
000005B0: 31 38 35 00 C8 0D B4 00 83 20 2C 53 45 54 52 45 |185...... ,SETRE|
000005C0: 47 53 2C 31 38 35 2C 41 00 DB 0D BE 00 83 20 2C |GS,185,A...... ,|
000005D0: 47 4F 54 4F 2C 35 37 37 31 37 2C 00 E3 0D C8 00 |GOTO,57717,.....|
000005E0: 83 20 5F 00 00 00 |. _... |
..H...M.200:D.50:E.14:Z..1:VN.Z:."..* MI
CROCOMP V1.0 *":.".CODE AREA: ";...... L
$(M),LV(M),C$(M),C(M),O$(M),P$(M),V$(D),
W$(E),LE(E),LX(E),X(E,30).G....N.0.E:.W$
(N),LE(N),LX(N):.I.0.LX(N):.X(N,I):.I,N.
....VN.VN.1:.V$(VN):..(V$(VN).."*=").30:
. SA,VB,L$.>.#.Z.Z.1:L$(Z).L$:.C$(Z),O$(
Z),P$(Z):ZM.Z:.L$:..(L$.."_").35:AD.SA..
.2..SA;"-";:.Z.0.ZM:LV(Z).AD:.N.0.E:.C$(
Z).W$(N).C(Z).N:AD.AD.LE(N).H.7..N,Z:CE.
AD:.CE:AD.SA:.Z.0.ZM:C.C(Z):V$.O$(Z):.80
:O(0).V:V$.P$(Z)...<..80:O(2).V:.N.0.LX(
C):X.X(C,N):.X..0..AD,X:AD.AD.1:.N,Z:..A
.A..X.4.,,,75:J..(O(X.2).256):.AD,J:.X.1
..AD,O(X.2).J.256.T.F.AD.AD.1:.N,Z:....K
.I.O(X.2).(X.1):.AD.1,I.256:.AD,I..(I.25
6).256:AD.AD.2:.N,Z:....P.V.E(V$):V.V.65
536.(V.0):.I.0.VN.1:V.V.(V$.V$(I)).(2.I.
VB.CE.(VB.0)):....U..I.0.ZM:V.V.LV(I).(V
$.L$(I)):.:..T.Z..ADD,19,12,24,173,-4,10
9,-2,141,-2,173,-3,109,-1,141,-1,SUB,19,
12,56,173,-2...[..237,-4,141,-2,173,-1,2
37,-3,141,-1,MOVE,12,7,173,-4,141,-2,173
,-3,141,-1...\..GOTO,3,1,76,-4,IF,11,7,1
73,-4,13,-3,240,3,76,-2,MOVE#,10,7,169,-
7,141,-2.A.]..169,-8,141,-1,CMOVE,6,3,17
3,-4,141,-2,GOSUB,3,1,32,-4,RETURN,1,0,9
6,SETREGS...^..9,5,173,-4,174,-2,172,-1,
CMOVE#,5,3,169,-7,141,-2,ADD#,17,12,24,1
69,-7,109..._..-2,141,-2,169,-8,109,-1,1
41,-1,GOTO(),3,1,108,-4,CMOVE(),26,21,17
3,-4,133,34.2.`..173,-3,133,35,173,-2,13
3,36,173,-1,133,37,160,0,177,34,145,36,W
ORD,2,0,-4.>.D.. MERGE.F.N.. A.U.X.. *=,
828,0.I.... ,GOSUB,44797,.}.... ,GOSUB,5
7812,...... ,MOVE,45,A... .. ,ADD#,-2,A.
..... ,CMOVE#,0,185.H.... ,SETREGS,185,A
...... ,GOTO,57717,...H.. _...