|
DataMuseum.dkPresents historical artifacts from the history of: Zilog MCZ Floppy Disks |
This is an automatic "excavation" of a thematic subset of
Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 14439 (0x3867)
Notes: ZILOG_BASIC
Names: »PREPARE.BP«
└─⟦329ff8d5f⟧ Bits:30006811 8" ZilogMCZ floppy NThun_0013 (SYSTEM MCZ 1/05)
└─⟦this⟧ »PREPARE.BP«
└─⟦837bc648a⟧ Bits:30006817 8" ZilogMCZ floppy NThun_0019 (Styredisk Plot - Prepare)
└─⟦this⟧ »PREPARE.BP«
0x0000…0014 BasicHead {variables=0x0238, stms=0x0b14, f2=0x2b07, f3=0000000000000000000000000000}
0x0014…024c [
0x0014…024c [0x00]: VarDef {f0=0x0100, f1=0x08, f2=0x36} W8% 0x8d
0x0014…024c [0x01]: VarDef {f0=0x0400, f1=0x02, f2=0x29} J2% 0x8c
0x0014…024c [0x02]: VarDef {f0=0x0400, f1=0x01, f2=0x29} J1% 0x8b
0x0014…024c [0x03]: VarDef {f0=0x102b, f1=0x00, f2=0xa1} B0%' 0x8a
0x0014…024c [0x04]: VarDef {f0=0x1013, f1=0x00, f2=0xa0} A0%' 0x89
0x0014…024c [0x05]: VarDef {f0=0xaaaa, f1=0x45, f2=0x29} J5% 0x88
0x0014…024c [0x06]: VarDef {f0=0x1053, f1=0x44, f2=0x26} G4% 0x87
0x0014…024c [0x07]: VarDef {f0=0x104b, f1=0x43, f2=0x26} G3% 0x86
0x0014…024c [0x08]: VarDef {f0=0x1043, f1=0x41, f2=0x26} G1% 0x85
0x0014…024c [0x09]: VarDef {f0=0x103b, f1=0x42, f2=0x26} G2% 0x84
0x0014…024c [0x0a]: VarDef {f0=0x1013, f1=0x49, f2=0x2d} N9% 0x83
0x0014…024c [0x0b]: VarDef {f0=0x0000, f1=0x05, f2=0x25} F5% 0x82
0x0014…024c [0x0c]: VarDef {f0=0x0700, f1=0x04, f2=0x2d} N4% 0x81
0x0014…024c [0x0d]: VarDef {f0=0x0700, f1=0x00, f2=0x2d} N0% 0x80
0x0014…024c [0x0e]: VarDef {f0=0x9360, f1=0x41, f2=0x21} B1% 0x7f
0x0014…024c [0x0f]: VarDef {f0=0x0a00, f1=0x02, f2=0x28} I2% 0x7e
0x0014…024c [0x10]: VarDef {f0=0x0c00, f1=0x01, f2=0x28} I1% 0x7d
0x0014…024c [0x11]: VarDef {f0=0x8600, f1=0x43, f2=0x0f} P3 0x7c
0x0014…024c [0x12]: VarDef {f0=0x7680, f1=0x41, f2=0x25} F1% 0x7b
0x0014…024c [0x13]: VarDef {f0=0x0100, f1=0x02, f2=0x25} F2% 0x7a
0x0014…024c [0x14]: VarDef {f0=0xfa30, f1=0x12, f2=0x31} FNR2% 0x79
0x0014…024c [0x15]: VarDef {f0=0xfa50, f1=0x11, f2=0x31} FNR1% 0x78
0x0014…024c [0x16]: VarDef {f0=0xfa10, f1=0x51, f2=0x2b} FNL1% 0x77
0x0014…024c [0x17]: VarDef {f0=0x11d7, f1=0x00, f2=0x17} X0 0x76
0x0014…024c [0x18]: VarDef {f0=0x11cf, f1=0x00, f2=0x18} Y0 0x75
0x0014…024c [0x19]: VarDef {f0=0x0200, f1=0x0f, f2=0x2a} K% 0x74
0x0014…024c [0x1a]: VarDef {f0=0x0000, f1=0x00, f2=0x31} R0% 0x73
0x0014…024c [0x1b]: VarDef {f0=0xfa50, f1=0x5f, f2=0x2b} FNL% 0x72
0x0014…024c [0x1c]: VarDef {f0=0xfabc, f1=0x16, f2=0x2e} FNO6% 0x71
0x0014…024c [0x1d]: VarDef {f0=0x11b7, f1=0x09, f2=0x16} W9 0x70
0x0014…024c [0x1e]: VarDef {f0=0x11af, f1=0x08, f2=0x16} W8 0x6f
0x0014…024c [0x1f]: VarDef {f0=0xfaf8, f1=0x13, f2=0x2e} FNO3% 0x6e
0x0014…024c [0x20]: VarDef {f0=0x3100, f1=0x49, f2=0x18} Y9 0x6d
0x0014…024c [0x21]: VarDef {f0=0x3098, f1=0x4f, f2=0x31} R% 0x6c
0x0014…024c [0x22]: VarDef {f0=0x1207, f1=0x0f, f2=0x0b} L 0x6b
0x0014…024c [0x23]: VarDef {f0=0x11ff, f1=0x0f, f2=0x0c} M 0x6a
0x0014…024c [0x24]: VarDef {f0=0x11f7, f1=0x04, f2=0x18} Y4 0x69
0x0014…024c [0x25]: VarDef {f0=0x11ef, f1=0x04, f2=0x17} X4 0x68
0x0014…024c [0x26]: VarDef {f0=0x11e7, f1=0x03, f2=0x18} Y3 0x67
0x0014…024c [0x27]: VarDef {f0=0x11df, f1=0x03, f2=0x17} X3 0x66
0x0014…024c [0x28]: VarDef {f0=0xfb4c, f1=0x1f, f2=0x32} FNS% 0x65
0x0014…024c [0x29]: VarDef {f0=0xfb88, f1=0x1f, f2=0x31} FNR% 0x64
0x0014…024c [0x2a]: VarDef {f0=0x2775, f1=0x42, f2=0x2b} L2% 0x63
0x0014…024c [0x2b]: VarDef {f0=0x2770, f1=0x41, f2=0x2b} L1% 0x62
0x0014…024c [0x2c]: VarDef {f0=0x2735, f1=0x49, f2=0x17} X9 0x61
0x0014…024c [0x2d]: VarDef {f0=0x2732, f1=0x40, f2=0x2b} L0% 0x60
0x0014…024c [0x2e]: VarDef {f0=0x2725, f1=0x49, f2=0x03} D9 0x5f
0x0014…024c [0x2f]: VarDef {f0=0xfbe4, f1=0x1f, f2=0x35} FNV% 0x5e
0x0014…024c [0x30]: VarDef {f0=0x11bf, f1=0x0f, f2=0x03} D 0x5d
0x0014…024c [0x31]: VarDef {f0=0x2686, f1=0x4f, f2=0x21} B% 0x5c
0x0014…024c [0x32]: VarDef {f0=0x2685, f1=0x4f, f2=0x20} A% 0x5b
0x0014…024c [0x33]: VarDef {f0=0x2680, f1=0x4f, f2=0x2d} N% 0x5a
0x0014…024c [0x34]: VarDef {f0=0xfc24, f1=0x1f, f2=0x26} FNG% 0x59
0x0014…024c [0x35]: VarDef {f0=0xfc44, f1=0x1f, f2=0x27} FNH% 0x58
0x0014…024c [0x36]: VarDef {f0=0x2608, f1=0x42, f2=0x0a} K2 0x57
0x0014…024c [0x37]: VarDef {f0=0x2605, f1=0x41, f2=0x0a} K1 0x56
0x0014…024c [0x38]: VarDef {f0=0x2455, f1=0x42, f2=0x01} B2 0x55
0x0014…024c [0x39]: VarDef {f0=0x2450, f1=0x42, f2=0x00} A2 0x54
0x0014…024c [0x3a]: VarDef {f0=0x2445, f1=0x41, f2=0x01} B1 0x53
0x0014…024c [0x3b]: VarDef {f0=0x2440, f1=0x41, f2=0x00} A1 0x52
0x0014…024c [0x3c]: VarDef {f0=0xfc8c, f1=0x11, f2=0x2c} FNM1% 0x51
0x0014…024c [0x3d]: VarDef {f0=0x2395, f1=0x4f, f2=0x0a} K 0x50
0x0014…024c [0x3e]: VarDef {f0=0x120f, f1=0x05, f2=0x17} X5 0x4f
0x0014…024c [0x3f]: VarDef {f0=0x1217, f1=0x05, f2=0x18} Y5 0x4e
0x0014…024c [0x40]: VarDef {f0=0x2365, f1=0x4f, f2=0x01} B 0x4d
0x0014…024c [0x41]: VarDef {f0=0x2360, f1=0x4f, f2=0x00} A 0x4c
0x0014…024c [0x42]: VarDef {f0=0xfcb8, f1=0x1f, f2=0x25} FNF% 0x4b
0x0014…024c [0x43]: VarDef {f0=0xfcc8, f1=0x1f, f2=0x03} FND 0x4a
0x0014…024c [0x44]: VarDef {f0=0x0000, f1=0x05, f2=0x2f} P5% 0x49
0x0014…024c [0x45]: VarDef {f0=0xfd00, f1=0x15, f2=0x31} FNR5% 0x48
0x0014…024c [0x46]: VarDef {f0=0x2130, f1=0x4f, f2=0x0f} P 0x47
0x0014…024c [0x47]: VarDef {f0=0xfd44, f1=0x1f, f2=0x0f} FNP 0x46
0x0014…024c [0x48]: VarDef {f0=0xfb1c, f1=0x19, f2=0x34} FNU9% 0x45
0x0014…024c [0x49]: VarDef {f0=0x0a00, f1=0x0f, f2=0x29} J% 0x44
0x0014…024c [0x4a]: VarDef {f0=0x11a7, f1=0x00, f2=0x0c} M0 0x43
0x0014…024c [0x4b]: VarDef {f0=0x119f, f1=0x00, f2=0x15} V0 0x42
0x0014…024c [0x4c]: VarDef {f0=0xfd88, f1=0x1f, f2=0x39} FNZ% 0x41
0x0014…024c [0x4d]: VarDef {f0=0x1790, f1=0x42, f2=0x2f} P2% 0x40
0x0014…024c [0x4e]: VarDef {f0=0x1785, f1=0x41, f2=0x2f} P1% 0x3f
0x0014…024c [0x4f]: VarDef {f0=0x1425, f1=0x4f, f2=0x15} V 0x3e
0x0014…024c [0x50]: VarDef {f0=0x1415, f1=0x4f, f2=0x18} Y 0x3d
0x0014…024c [0x51]: VarDef {f0=0x1405, f1=0x42, f2=0x18} Y2 0x3c
0x0014…024c [0x52]: VarDef {f0=0x1400, f1=0x41, f2=0x18} Y1 0x3b
0x0014…024c [0x53]: VarDef {f0=0x1390, f1=0x42, f2=0x17} X2 0x3a
0x0014…024c [0x54]: VarDef {f0=0x1380, f1=0x41, f2=0x17} X1 0x39
0x0014…024c [0x55]: VarDef {f0=0xfdec, f1=0x19, f2=0x15} FNV9 0x38
0x0014…024c [0x56]: VarDef {f0=0xfe20, f1=0x15, f2=0x2e} FNO5% 0x37
0x0014…024c [0x57]: VarDef {f0=0x11c7, f1=0x0f, f2=0x17} X 0x36
0x0014…024c [0x58]: VarDef {f0=0xfe4c, f1=0x14, f2=0x2e} FNO4% 0x35
0x0014…024c [0x59]: VarDef {f0=0x0500, f1=0x0f, f2=0x28} I% 0x34
0x0014…024c [0x5a]: VarDef {f0=0x0880, f1=0x43, f2=0x22} C3% 0x33
0x0014…024c [0x5b]: VarDef {f0=0x0875, f1=0x42, f2=0x22} C2% 0x32
0x0014…024c [0x5c]: VarDef {f0=0x0870, f1=0x41, f2=0x22} C1% 0x31
0x0014…024c [0x5d]: VarDef {f0=0xfedc, f1=0x18, f2=0x34} FNU8% 0x30
0x0014…024c [0x5e]: VarDef {f0=0x0000, f1=0x06, f2=0x25} F6% 0x2f
0x0014…024c [0x5f]: VarDef {f0=0xff18, f1=0x12, f2=0x2e} FNO2% 0x2e
0x0014…024c [0x60]: VarDef {f0=0xfe80, f1=0x1f, f2=0x2c} FNM% 0x2d
0x0014…024c [0x61]: VarDef {f0=0x0000, f1=0x09, f2=0x36} W9% 0x2c
0x0014…024c [0x62]: VarDef {f0=0x0700, f1=0x0f, f2=0x2b} L% 0x2b
0x0014…024c [0x63]: VarDef {f0=0xfdac, f1=0x1f, f2=0x4f} FNP$ 0x2a
0x0014…024c [0x64]: VarDef {f0=0x0100, f1=0x01, f2=0x2d} N1% 0x29
0x0014…024c [0x65]: VarDef {f0=0xfea0, f1=0x1f, f2=0x22} FNC% 0x28
0x0014…024c [0x66]: VarDef {f0=0x0000, f1=0x0f, f2=0x37} X% 0x27
0x0014…024c [0x67]: VarDef {f0=0xff90, f1=0x11, f2=0x2e} FNO1% 0x26
0x0014…024c [0x68]: VarDef {f0=0xe500, f1=0x01, f2=0x39} Z1% 0x25
0x0014…024c [0x69]: VarDef {f0=0x9a00, f1=0x00, f2=0x39} Z0% 0x24
0x0014…024c [0x6a]: VarDef {f0=0x1197, f1=0x01, f2=0x0f} P1 0x23
0x0014…024c [0x6b]: VarDef {f0=0x118f, f1=0x00, f2=0x19} Z0 0x22
0x0014…024c [0x6c]: VarDef {f0=0x0e00, f1=0x00, f2=0x30} Q0% 0x21
0x0014…024c [0x6d]: VarDef {f0=0x0000, f1=0x02, f2=0x36} W2% 0x20
0x0014…024c [0x6e]: VarDef {f0=0x4604, f1=0x01, f2=0x36} W1% 0x1f
0x0014…024c [0x6f]: VarDef {f0=0x10e7, f1=0x20, f2=0xb3} T0%'<20b3> 0x1e
0x0014…024c [0x70]: VarDef {f0=0x10db, f1=0x00, f2=0x50} Q0$ 0x1d
0x0014…024c [0x71]: VarDef {f0=0x10af, f1=0x02, f2=0x98} Y2' 0x1c
0x0014…024c [0x72]: VarDef {f0=0x1083, f1=0x02, f2=0x97} X2' 0x1b
0x0014…024c [0x73]: VarDef {f0=0x107b, f1=0x0f, f2=0xb9} Z%' 0x1a
0x0014…024c [0x74]: VarDef {f0=0x1073, f1=0x0f, f2=0xb8} Y%' 0x19
0x0014…024c [0x75]: VarDef {f0=0x106b, f1=0x0f, f2=0xb7} X%' 0x18
0x0014…024c [0x76]: VarDef {f0=0x1063, f1=0x0f, f2=0xb6} W%' 0x17
0x0014…024c [0x77]: VarDef {f0=0x105b, f1=0x0f, f2=0xa3} D%' 0x16
0x0014…024c [0x78]: VarDef {f0=0x1053, f1=0x0f, f2=0xa2} C%' 0x15
0x0014…024c [0x79]: VarDef {f0=0x104b, f1=0x0f, f2=0xa1} B%' 0x14
0x0014…024c [0x7a]: VarDef {f0=0x1043, f1=0x0f, f2=0xa0} A%' 0x13
0x0014…024c [0x7b]: VarDef {f0=0x1007, f1=0x00, f2=0x52} S0$ 0x12
0x0014…024c [0x7c]: VarDef {f0=0x0ffb, f1=0x00, f2=0x51} R0$ 0x11
0x0014…024c [0x7d]: VarDef {f0=0x09b7, f1=0x0f, f2=0x98} Y' 0x10
0x0014…024c [0x7e]: VarDef {f0=0x0373, f1=0x0f, f2=0x97} X' 0xf
0x0014…024c [0x7f]: VarDef {f0=0x0347, f1=0x01, f2=0x98} Y1' 0xe
0x0014…024c [0x80]: VarDef {f0=0x031b, f1=0x01, f2=0x97} X1' 0xd
0x0014…024c [0x81]: VarDef {f0=0x0316, f1=0x0f, f2=0x57} X$ 0xc
0x0014…024c [0x82]: VarDef {f0=0x0310, f1=0x00, f2=0x45} F0$ 0xb
0x0014…024c [0x83]: VarDef {f0=0x0304, f1=0x02, f2=0x45} F2$ 0xa
0x0014…024c [0x84]: VarDef {f0=0x02f4, f1=0x01, f2=0x45} F1$ 0x9
0x0014…024c [0x85]: VarDef {f0=0x02bd, f1=0x09, f2=0x4f} P9$ 0x8
0x0014…024c [0x86]: VarDef {f0=0x0287, f1=0x25, f2=0x4f} P5$<254f> 0x7
0x0014…024c [0x87]: VarDef {f0=0x0282, f1=0x04, f2=0x4f} P4$ 0x6
0x0014…024c [0x88]: VarDef {f0=0x024b, f1=0x01, f2=0x4f} P1$ 0x5
0x0014…024c [0x89]: VarDef {f0=0x0208, f1=0x0f, f2=0x4f} P$ 0x4
0x0014…024c [0x8a]: VarDef {f0=0x01ec, f1=0x0f, f2=0x53} T$ 0x3
0x0014…024c [0x8b]: VarDef {f0=0x01d4, f1=0x0f, f2=0x56} W$ 0x2
0x0014…024c [0x8c]: VarDef {f0=0x01bc, f1=0x0f, f2=0x51} R$ 0x1
0x0014…024c [0x8d]: VarDef {f0=0x0000, f1=0x21, f2=0x51} R1$<2151> 0x0
0x0014…024c ]
0x024c…0250 Statement 39321 @0x3866
0x0250…0254 Statement 39248 @0x3858
0x0254…0258 Statement 39232 @0x3856
0x0258…025c Statement 39216 @0x3821
0x025c…0260 Statement 39200 @0x3816
0x0260…0264 Statement 39168 @0x37f7
0x0264…0268 Statement 38656 @0x37f5
0x0268…026c Statement 38512 @0x37f1
0x026c…0270 Statement 38496 @0x37df
0x0270…0274 Statement 38480 @0x37d8
0x0274…0278 Statement 38464 @0x37d4
0x0278…027c Statement 38448 @0x37d0
0x027c…0280 Statement 38432 @0x37c5
0x0280…0284 Statement 38416 @0x37be
0x0284…0288 Statement 38400 @0x37b7
0x0288…028c Statement 38293 @0x37b4
0x028c…0290 Statement 38290 @0x3788
0x0290…0294 Statement 38288 @0x3772
0x0294…0298 Statement 38272 @0x375b
0x0298…029c Statement 38256 @0x3745
0x029c…02a0 Statement 38240 @0x372f
0x02a0…02a4 Statement 38224 @0x3718
0x02a4…02a8 Statement 38208 @0x3702
0x02a8…02ac Statement 38192 @0x36ec
0x02ac…02b0 Statement 38176 @0x36d6
0x02b0…02b4 Statement 38160 @0x36c0
0x02b4…02b8 Statement 38144 @0x369f
0x02b8…02bc Statement 37888 @0x369d
0x02bc…02c0 Statement 37760 @0x3695
0x02c0…02c4 Statement 37744 @0x368f
0x02c4…02c8 Statement 37728 @0x368a
0x02c8…02cc Statement 37712 @0x3678
0x02cc…02d0 Statement 37696 @0x366d
0x02d0…02d4 Statement 37680 @0x3663
0x02d4…02d8 Statement 37664 @0x364a
0x02d8…02dc Statement 37653 @0x3639
0x02dc…02e0 Statement 37648 @0x3630
0x02e0…02e4 Statement 37632 @0x360f
0x02e4…02e8 Statement 37525 @0x360d
0x02e8…02ec Statement 37120 @0x3607
0x02ec…02f0 Statement 37008 @0x35fc
0x02f0…02f4 Statement 36981 @0x35f1
0x02f4…02f8 Statement 36976 @0x35e3
0x02f8…02fc Statement 36960 @0x35c5
0x02fc…0300 Statement 36948 @0x35a4
0x0300…0304 Statement 36946 @0x3599
0x0304…0308 Statement 36944 @0x357e
0x0308…030c Statement 36896 @0x356c
0x030c…0310 Statement 36880 @0x3552
0x0310…0314 Statement 35104 @0x3548
0x0314…0318 Statement 35088 @0x3538
0x0318…031c Statement 35072 @0x352c
0x031c…0320 Statement 34960 @0x3523
0x0320…0324 Statement 34944 @0x351d
0x0324…0328 Statement 34928 @0x3517
0x0328…032c Statement 34912 @0x350b
0x032c…0330 Statement 34896 @0x34f3
0x0330…0334 Statement 34880 @0x34df
0x0334…0338 Statement 34864 @0x34d4
0x0338…033c Statement 34848 @0x34d2
0x033c…0340 Statement 34816 @0x34ae
0x0340…0344 Statement 34640 @0x34ab
0x0344…0348 Statement 34629 @0x34a8
0x0348…034c Statement 34624 @0x3499
0x034c…0350 Statement 34608 @0x348f
0x0350…0354 Statement 34592 @0x348a
0x0354…0358 Statement 34576 @0x346a
0x0358…035c Statement 34560 @0x3447
0x035c…0360 Statement 34448 @0x3444
0x0360…0364 Statement 34336 @0x3441
0x0364…0368 Statement 34320 @0x3424
0x0368…036c Statement 34304 @0x33f5
0x036c…0370 Statement 34085 @0x33f1
0x0370…0374 Statement 34064 @0x33d6
0x0374…0378 Statement 34048 @0x33b6
0x0378…037c Statement 33392 @0x33b4
0x037c…0380 Statement 33376 @0x3395
0x0380…0384 Statement 33360 @0x338e
0x0384…0388 Statement 33344 @0x337f
0x0388…038c Statement 33328 @0x336f
0x038c…0390 Statement 33312 @0x335f
0x0390…0394 Statement 33296 @0x3354
0x0394…0398 Statement 33280 @0x3349
0x0398…039c Statement 33168 @0x333a
0x039c…03a0 Statement 33152 @0x332a
0x03a0…03a4 Statement 33120 @0x3309
0x03a4…03a8 Statement 33088 @0x3307
0x03a8…03ac Statement 33072 @0x32e8
0x03ac…03b0 Statement 33056 @0x32e1
0x03b0…03b4 Statement 33040 @0x32d3
0x03b4…03b8 Statement 33024 @0x32b3
0x03b8…03bc Statement 32912 @0x3297
0x03bc…03c0 Statement 32896 @0x327b
0x03c0…03c4 Statement 32880 @0x3264
0x03c4…03c8 Statement 32864 @0x3250
0x03c8…03cc Statement 32848 @0x3231
0x03cc…03d0 Statement 32832 @0x3222
0x03d0…03d4 Statement 32816 @0x321b
0x03d4…03d8 Statement 32800 @0x31fe
0x03d8…03dc Statement 32768 @0x31dd
0x03dc…03e0 Statement 30736 @0x31db
0x03e0…03e4 Statement 30512 @0x31cf
0x03e4…03e8 Statement 30496 @0x31bc
0x03e8…03ec Statement 30480 @0x31b1
0x03ec…03f0 Statement 30464 @0x31ad
0x03f0…03f4 Statement 30352 @0x31a1
0x03f4…03f8 Statement 30336 @0x3193
0x03f8…03fc Statement 30320 @0x3187
0x03fc…0400 Statement 30304 @0x3179
0x0400…0404 Statement 30288 @0x3172
0x0404…0408 Statement 30272 @0x3164
0x0408…040c Statement 30256 @0x3159
0x040c…0410 Statement 30240 @0x3156
0x0410…0414 Statement 30224 @0x314b
0x0414…0418 Statement 30208 @0x3115
0x0418…041c Statement 29840 @0x3113
0x041c…0420 Statement 29831 @0x3110
0x0420…0424 Statement 29829 @0x30f4
0x0424…0428 Statement 29824 @0x30f0
0x0428…042c Statement 29808 @0x30ed
0x042c…0430 Statement 29765 @0x30d6
0x0430…0434 Statement 29761 @0x30cc
0x0434…0438 Statement 29760 @0x30c6
0x0438…043c Statement 29753 @0x30c3
0x043c…0440 Statement 29752 @0x30a9
0x0440…0444 Statement 29751 @0x309b
0x0444…0448 Statement 29749 @0x3090
0x0448…044c Statement 29746 @0x308f
0x044c…0450 Statement 29745 @0x3086
0x0450…0454 Statement 29744 @0x307a
0x0454…0458 Statement 29736 @0x306e
0x0458…045c Statement 29735 @0x306b
0x045c…0460 Statement 29733 @0x304a
0x0460…0464 Statement 29732 @0x3038
0x0464…0468 Statement 29731 @0x2ff7
0x0468…046c Statement 29720 @0x2fea
0x046c…0470 Statement 29718 @0x2fdb
0x0470…0474 Statement 29716 @0x2fbd
0x0474…0478 Statement 29714 @0x2fb8
0x0478…047c Statement 29712 @0x2fad
0x047c…0480 Statement 29701 @0x2fa5
0x0480…0484 Statement 29696 @0x2f9e
0x0484…0488 Statement 29584 @0x2f95
0x0488…048c Statement 29568 @0x2f89
0x048c…0490 Statement 29552 @0x2f7d
0x0490…0494 Statement 29536 @0x2f74
0x0494…0498 Statement 29520 @0x2f6a
0x0498…049c Statement 29509 @0x2f64
0x049c…04a0 Statement 29506 @0x2f5a
0x04a0…04a4 Statement 29504 @0x2f4d
0x04a4…04a8 Statement 29488 @0x2f41
0x04a8…04ac Statement 29472 @0x2f35
0x04ac…04b0 Statement 29456 @0x2f2f
0x04b0…04b4 Statement 29445 @0x2f2b
0x04b4…04b8 Statement 29440 @0x2f05
0x04b8…04bc Statement 29248 @0x2f03
0x04bc…04c0 Statement 29232 @0x2eff
0x04c0…04c4 Statement 29184 @0x2ef7
0x04c4…04c8 Statement 29077 @0x2ee8
0x04c8…04cc Statement 29072 @0x2ed5
0x04cc…04d0 Statement 29040 @0x2ea2
0x04d0…04d4 Statement 29029 @0x2e99
0x04d4…04d8 Statement 29026 @0x2e72
0x04d8…04dc Statement 29024 @0x2e69
0x04dc…04e0 Statement 29013 @0x2e5c
0x04e0…04e4 Statement 29008 @0x2e2e
0x04e4…04e8 Statement 28992 @0x2e2c
0x04e8…04ec Statement 28981 @0x2e19
0x04ec…04f0 Statement 24912 @0x2e04
0x04f0…04f4 Statement 24832 @0x2df6
0x04f4…04f8 Statement 24629 @0x2de1
0x04f8…04fc Statement 24624 @0x2dcd
0x04fc…0500 Statement 24613 @0x2dc6
0x0500…0504 Statement 24608 @0x2db4
0x0504…0508 Statement 24597 @0x2da3
0x0508…050c Statement 24592 @0x2d93
0x050c…0510 Statement 24581 @0x2d83
0x0510…0514 Statement 24576 @0x2d5a
0x0514…0518 Statement 18528 @0x2d58
0x0518…051c Statement 18512 @0x2d48
0x051c…0520 Statement 18496 @0x2d3a
0x0520…0524 Statement 18480 @0x2d37
0x0524…0528 Statement 18464 @0x2d1e
0x0528…052c Statement 18453 @0x2d1a
0x052c…0530 Statement 18448 @0x2d0f
0x0530…0534 Statement 18440 @0x2d04
0x0534…0538 Statement 18438 @0x2cfe
0x0538…053c Statement 18437 @0x2cfa
0x053c…0540 Statement 18432 @0x2ccf
0x0540…0544 Statement 18325 @0x2ccd
0x0544…0548 Statement 18320 @0x2cc7
0x0548…054c Statement 18304 @0x2cc3
0x054c…0550 Statement 18295 @0x2cc2
0x0550…0554 Statement 18293 @0x2cb9
0x0554…0558 Statement 18276 @0x2c97
0x0558…055c Statement 18274 @0x2c87
0x055c…0560 Statement 18272 @0x2c80
0x0560…0564 Statement 18240 @0x2c7d
0x0564…0568 Statement 18229 @0x2c6b
0x0568…056c Statement 18224 @0x2c55
0x056c…0570 Statement 18192 @0x2c4e
0x0570…0574 Statement 18181 @0x2c48
0x0574…0578 Statement 18176 @0x2c3d
0x0578…057c Statement 18032 @0x2c36
0x057c…0580 Statement 17776 @0x2c2a
0x0580…0584 Statement 17765 @0x2c17
0x0584…0588 Statement 17760 @0x2c0c
0x0588…058c Statement 17749 @0x2bfc
0x058c…0590 Statement 17744 @0x2bf2
0x0590…0594 Statement 17696 @0x2beb
0x0594…0598 Statement 17680 @0x2bdc
0x0598…059c Statement 17669 @0x2bcd
0x059c…05a0 Statement 17666 @0x2bc9
0x05a0…05a4 Statement 17296 @0x2bbd
0x05a4…05a8 Statement 17285 @0x2baf
0x05a8…05ac Statement 17280 @0x2b9d
0x05ac…05b0 Statement 17264 @0x2b8e
0x05b0…05b4 Statement 17240 @0x2b82
0x05b4…05b8 Statement 17238 @0x2b74
0x05b8…05bc Statement 17237 @0x2b62
0x05bc…05c0 Statement 17232 @0x2b53
0x05c0…05c4 Statement 17216 @0x2b4c
0x05c4…05c8 Statement 16976 @0x2b46
0x05c8…05cc Statement 16965 @0x2b3f
0x05cc…05d0 Statement 16944 @0x2b33
0x05d0…05d4 Statement 16936 @0x2b2d
0x05d4…05d8 Statement 16935 @0x2b26
0x05d8…05dc Statement 16928 @0x2b1c
0x05dc…05e0 Statement 16901 @0x2b18
0x05e0…05e4 Statement 16898 @0x2b12
0x05e4…05e8 Statement 16896 @0x2aeb
0x05e8…05ec Statement 16677 @0x2ae9
0x05ec…05f0 Statement 16672 @0x2ad3
0x05f0…05f4 Statement 16661 @0x2aaa
0x05f4…05f8 Statement 16656 @0x2aa8
0x05f8…05fc Statement 16645 @0x2a7f
0x05fc…0600 Statement 16640 @0x2a7d
0x0600…0604 Statement 16528 @0x2a54
0x0604…0608 Statement 16517 @0x2a2b
0x0608…060c Statement 16512 @0x2a02
0x060c…0610 Statement 16501 @0x29d9
0x0610…0614 Statement 16496 @0x299a
0x0614…0618 Statement 16485 @0x2998
0x0618…061c Statement 16480 @0x296f
0x061c…0620 Statement 16469 @0x296d
0x0620…0624 Statement 16464 @0x2957
0x0624…0628 Statement 16453 @0x292e
0x0628…062c Statement 16448 @0x292c
0x062c…0630 Statement 16438 @0x2905
0x0630…0634 Statement 16437 @0x28e0
0x0634…0638 Statement 16433 @0x28b9
0x0638…063c Statement 16432 @0x2894
0x063c…0640 Statement 16416 @0x2892
0x0640…0644 Statement 16400 @0x2887
0x0644…0648 Statement 16389 @0x2883
0x0648…064c Statement 16384 @0x285f
0x064c…0650 Statement 14744 @0x282a
0x0650…0654 Statement 14741 @0x2827
0x0654…0658 Statement 14656 @0x2824
0x0658…065c Statement 14624 @0x281e
0x065c…0660 Statement 14608 @0x281b
0x0660…0664 Statement 14592 @0x2818
0x0664…0668 Statement 14480 @0x280f
0x0668…066c Statement 14464 @0x2806
0x066c…0670 Statement 14448 @0x27fc
0x0670…0674 Statement 14432 @0x27f2
0x0674…0678 Statement 14416 @0x27ec
0x0678…067c Statement 14400 @0x27b9
0x067c…0680 Statement 14389 @0x27a3
0x0680…0684 Statement 14352 @0x2786
0x0684…0688 Statement 14336 @0x2784
0x0688…068c Statement 14192 @0x277e
0x068c…0690 Statement 14176 @0x2766
0x0690…0694 Statement 14112 @0x274e
0x0694…0698 Statement 13712 @0x2732
0x0698…069c Statement 13696 @0x272c
0x069c…06a0 Statement 13680 @0x270d
0x06a0…06a4 Statement 13669 @0x2709
0x06a4…06a8 Statement 13664 @0x2705
0x06a8…06ac Statement 13653 @0x26e4
0x06ac…06b0 Statement 13652 @0x26d7
0x06b0…06b4 Statement 13651 @0x26ca
0x06b4…06b8 Statement 13650 @0x26bf
0x06b8…06bc Statement 13648 @0x26b7
0x06bc…06c0 Statement 13637 @0x26ad
0x06c0…06c4 Statement 13632 @0x2680
0x06c4…06c8 Statement 13624 @0x2675
0x06c8…06cc Statement 13622 @0x2673
0x06cc…06d0 Statement 13621 @0x2670
0x06d0…06d4 Statement 13616 @0x266a
0x06d4…06d8 Statement 13605 @0x2663
0x06d8…06dc Statement 13136 @0x2657
0x06dc…06e0 Statement 13104 @0x264d
0x06e0…06e4 Statement 13088 @0x264c
0x06e4…06e8 Statement 13076 @0x2649
0x06e8…06ec Statement 13074 @0x2645
0x06ec…06f0 Statement 13073 @0x263d
0x06f0…06f4 Statement 13072 @0x2634
0x06f4…06f8 Statement 12928 @0x261c
0x06f8…06fc Statement 12912 @0x2611
0x06fc…0700 Statement 12901 @0x2606
0x0700…0704 Statement 12896 @0x2600
0x0704…0708 Statement 12848 @0x25fc
0x0708…070c Statement 12837 @0x25fb
0x070c…0710 Statement 12832 @0x25f8
0x0710…0714 Statement 12821 @0x25f5
0x0714…0718 Statement 12640 @0x25ee
0x0718…071c Statement 12624 @0x25e8
0x071c…0720 Statement 12608 @0x25e5
0x0720…0724 Statement 12597 @0x25dc
0x0724…0728 Statement 12592 @0x25b9
0x0728…072c Statement 12576 @0x25b1
0x072c…0730 Statement 12560 @0x257f
0x0730…0734 Statement 12546 @0x2578
0x0734…0738 Statement 12545 @0x255c
0x0738…073c Statement 12544 @0x253b
0x073c…0740 Statement 12440 @0x253a
0x0740…0744 Statement 12437 @0x2537
0x0744…0748 Statement 12436 @0x2529
0x0748…074c Statement 12432 @0x251f
0x074c…0750 Statement 12421 @0x24f2
0x0750…0754 Statement 12416 @0x24ea
0x0754…0758 Statement 12405 @0x24e8
0x0758…075c Statement 12400 @0x24c5
0x075c…0760 Statement 12389 @0x24c3
0x0760…0764 Statement 12384 @0x2486
0x0764…0768 Statement 12373 @0x2484
0x0768…076c Statement 12368 @0x2444
0x076c…0770 Statement 12357 @0x2404
0x0770…0774 Statement 12352 @0x23c4
0x0774…0778 Statement 12341 @0x2384
0x0778…077c Statement 12336 @0x2344
0x077c…0780 Statement 12320 @0x2342
0x0780…0784 Statement 12309 @0x2324
0x0784…0788 Statement 12304 @0x2319
0x0788…078c Statement 12293 @0x2315
0x078c…0790 Statement 12288 @0x2311
0x0790…0794 Statement 10640 @0x22f0
0x0794…0798 Statement 10544 @0x22ef
0x0798…079c Statement 10533 @0x22ec
0x079c…07a0 Statement 10528 @0x22e8
0x07a0…07a4 Statement 10517 @0x22c9
0x07a4…07a8 Statement 10512 @0x22aa
0x07a8…07ac Statement 10501 @0x22a3
0x07ac…07b0 Statement 10496 @0x229f
0x07b0…07b4 Statement 10389 @0x227e
0x07b4…07b8 Statement 10036 @0x227d
0x07b8…07bc Statement 10034 @0x227a
0x07bc…07c0 Statement 10022 @0x226f
0x07c0…07c4 Statement 10021 @0x2269
0x07c4…07c8 Statement 10020 @0x2256
0x07c8…07cc Statement 10018 @0x2250
0x07cc…07d0 Statement 10016 @0x224d
0x07d0…07d4 Statement 10004 @0x2247
0x07d4…07d8 Statement 10002 @0x2236
0x07d8…07dc Statement 10000 @0x2223
0x07dc…07e0 Statement 09992 @0x2215
0x07e0…07e4 Statement 09990 @0x220b
0x07e4…07e8 Statement 09988 @0x2202
0x07e8…07ec Statement 09986 @0x21f9
0x07ec…07f0 Statement 09984 @0x21f3
0x07f0…07f4 Statement 09880 @0x21ed
0x07f4…07f8 Statement 09878 @0x21dc
0x07f8…07fc Statement 09876 @0x21d3
0x07fc…0800 Statement 09872 @0x21cd
0x0800…0804 Statement 09864 @0x21c5
0x0804…0808 Statement 09863 @0x21a5
0x0808…080c Statement 09862 @0x21a0
0x080c…0810 Statement 09861 @0x219d
0x0810…0814 Statement 09860 @0x2178
0x0814…0818 Statement 09858 @0x216d
0x0818…081c Statement 09856 @0x2169
0x081c…0820 Statement 09848 @0x214a
0x0820…0824 Statement 09845 @0x2149
0x0824…0828 Statement 09840 @0x2146
0x0828…082c Statement 09829 @0x2131
0x082c…0830 Statement 09824 @0x212e
0x0830…0834 Statement 09814 @0x211a
0x0834…0838 Statement 09813 @0x2106
0x0838…083c Statement 09810 @0x2100
0x083c…0840 Statement 09797 @0x20fa
0x0840…0844 Statement 09792 @0x20ef
0x0844…0848 Statement 09778 @0x20df
0x0848…084c Statement 09777 @0x20cf
0x084c…0850 Statement 09776 @0x20ad
0x0850…0854 Statement 09765 @0x20a7
0x0854…0858 Statement 09760 @0x20a3
0x0858…085c Statement 09744 @0x2082
0x085c…0860 Statement 09736 @0x2081
0x0860…0864 Statement 09734 @0x207e
0x0864…0868 Statement 09733 @0x2072
0x0868…086c Statement 09728 @0x206b
0x086c…0870 Statement 09624 @0x204c
0x0870…0874 Statement 09616 @0x2026
0x0874…0878 Statement 09607 @0x201f
0x0878…087c Statement 09504 @0x2015
0x087c…0880 Statement 09488 @0x2011
0x0880…0884 Statement 09472 @0x1ff0
0x0884…0888 Statement 09333 @0x1fef
0x0888…088c Statement 09328 @0x1fec
0x088c…0890 Statement 09317 @0x1fd1
0x0890…0894 Statement 09312 @0x1fbf
0x0894…0898 Statement 09301 @0x1fad
0x0898…089c Statement 09296 @0x1f8c
0x089c…08a0 Statement 09285 @0x1f63
0x08a0…08a4 Statement 09280 @0x1f3f
0x08a4…08a8 Statement 09269 @0x1f19
0x08a8…08ac Statement 09264 @0x1f05
0x08ac…08b0 Statement 09255 @0x1ed5
0x08b0…08b4 Statement 09253 @0x1ed4
0x08b4…08b8 Statement 09248 @0x1ed1
0x08b8…08bc Statement 09237 @0x1ec2
0x08bc…08c0 Statement 09232 @0x1eb0
0x08c0…08c4 Statement 09221 @0x1e9e
0x08c4…08c8 Statement 09216 @0x1e8c
0x08c8…08cc Statement 09109 @0x1e7a
0x08cc…08d0 Statement 09104 @0x1e6b
0x08d0…08d4 Statement 09093 @0x1e59
0x08d4…08d8 Statement 09088 @0x1e47
0x08d8…08dc Statement 09077 @0x1e35
0x08dc…08e0 Statement 09072 @0x1e23
0x08e0…08e4 Statement 09061 @0x1e12
0x08e4…08e8 Statement 09056 @0x1e0c
0x08e8…08ec Statement 09040 @0x1deb
0x08ec…08f0 Statement 08997 @0x1dea
0x08f0…08f4 Statement 08992 @0x1de7
0x08f4…08f8 Statement 08984 @0x1dc8
0x08f8…08fc Statement 08983 @0x1dc4
0x08fc…0900 Statement 08965 @0x1dad
0x0900…0904 Statement 08960 @0x1d96
0x0904…0908 Statement 08853 @0x1d7f
0x0908…090c Statement 08848 @0x1d6c
0x090c…0910 Statement 08837 @0x1d59
0x0910…0914 Statement 08832 @0x1d26
0x0914…0918 Statement 08820 @0x1d19
0x0918…091c Statement 08818 @0x1d0a
0x091c…0920 Statement 08816 @0x1cf9
0x0920…0924 Statement 08808 @0x1cec
0x0924…0928 Statement 08807 @0x1ce3
0x0928…092c Statement 08805 @0x1cd9
0x092c…0930 Statement 08800 @0x1cd5
0x0930…0934 Statement 08768 @0x1cc1
0x0934…0938 Statement 08757 @0x1c97
0x0938…093c Statement 08752 @0x1c8d
0x093c…0940 Statement 08744 @0x1c7f
0x0940…0944 Statement 08741 @0x1c79
0x0944…0948 Statement 08736 @0x1c58
0x0948…094c Statement 08720 @0x1c57
0x094c…0950 Statement 08704 @0x1c53
0x0950…0954 Statement 08597 @0x1c46
0x0954…0958 Statement 08594 @0x1c33
0x0958…095c Statement 08592 @0x1c2f
0x095c…0960 Statement 08544 @0x1c1a
0x0960…0964 Statement 08512 @0x1bfa
0x0964…0968 Statement 08501 @0x1bde
0x0968…096c Statement 08496 @0x1ba7
0x096c…0970 Statement 08485 @0x1b9d
0x0970…0974 Statement 08480 @0x1b8e
0x0974…0978 Statement 08469 @0x1b82
0x0978…097c Statement 08464 @0x1b6d
0x097c…0980 Statement 08336 @0x1b5b
0x0980…0984 Statement 08325 @0x1b55
0x0984…0988 Statement 08320 @0x1b51
0x0988…098c Statement 08309 @0x1b30
0x098c…0990 Statement 08277 @0x1b2f
0x0990…0994 Statement 08240 @0x1b2c
0x0994…0998 Statement 08229 @0x1b29
0x0998…099c Statement 08224 @0x1b1c
0x099c…09a0 Statement 08213 @0x1b15
0x09a0…09a4 Statement 08208 @0x1b11
0x09a4…09a8 Statement 08192 @0x1af0
0x09a8…09ac Statement 06496 @0x1aef
0x09ac…09b0 Statement 06485 @0x1aec
0x09b0…09b4 Statement 06448 @0x1acc
0x09b4…09b8 Statement 06437 @0x1aa4
0x09b8…09bc Statement 06432 @0x1a90
0x09bc…09c0 Statement 06421 @0x1a7c
0x09c0…09c4 Statement 06416 @0x1a7b
0x09c4…09c8 Statement 06405 @0x1a78
0x09c8…09cc Statement 06400 @0x1a59
0x09cc…09d0 Statement 06293 @0x1a52
0x09d0…09d4 Statement 06288 @0x1a45
0x09d4…09d8 Statement 06277 @0x1a44
0x09d8…09dc Statement 06272 @0x1a41
0x09dc…09e0 Statement 06261 @0x1a22
0x09e0…09e4 Statement 06256 @0x1a1b
0x09e4…09e8 Statement 06245 @0x1a0e
0x09e8…09ec Statement 06240 @0x19fa
0x09ec…09f0 Statement 06229 @0x19f6
0x09f0…09f4 Statement 06224 @0x19d5
0x09f4…09f8 Statement 06165 @0x19d4
0x09f8…09fc Statement 06160 @0x19d1
0x09fc…0a00 Statement 06149 @0x19d0
0x0a00…0a04 Statement 06144 @0x19a9
0x0a04…0a08 Statement 06037 @0x1982
0x0a08…0a0c Statement 06032 @0x196e
0x0a0c…0a10 Statement 06021 @0x196b
0x0a10…0a14 Statement 05989 @0x1953
0x0a14…0a18 Statement 05984 @0x1943
0x0a18…0a1c Statement 05973 @0x193f
0x0a1c…0a20 Statement 05968 @0x191e
0x0a20…0a24 Statement 05909 @0x191a
0x0a24…0a28 Statement 05904 @0x18ea
0x0a28…0a2c Statement 05893 @0x18e6
0x0a2c…0a30 Statement 05888 @0x18c5
0x0a30…0a34 Statement 05248 @0x18c4
0x0a34…0a38 Statement 05200 @0x18c1
0x0a38…0a3c Statement 05189 @0x18b9
0x0a3c…0a40 Statement 05184 @0x18b5
0x0a40…0a44 Statement 05173 @0x18a9
0x0a44…0a48 Statement 05168 @0x18a2
0x0a48…0a4c Statement 05157 @0x189a
0x0a4c…0a50 Statement 05152 @0x1896
0x0a50…0a54 Statement 05141 @0x188a
0x0a54…0a58 Statement 05136 @0x1882
0x0a58…0a5c Statement 05125 @0x187c
0x0a5c…0a60 Statement 05120 @0x1878
0x0a60…0a64 Statement 05008 @0x1858
0x0a64…0a68 Statement 04992 @0x1857
0x0a68…0a6c Statement 04976 @0x1854
0x0a6c…0a70 Statement 04960 @0x1847
0x0a70…0a74 Statement 04944 @0x183d
0x0a74…0a78 Statement 04928 @0x1837
0x0a78…0a7c Statement 04912 @0x1833
0x0a7c…0a80 Statement 04896 @0x1830
0x0a80…0a84 Statement 04736 @0x1825
0x0a84…0a88 Statement 04725 @0x181b
0x0a88…0a8c Statement 04720 @0x180e
0x0a8c…0a90 Statement 04709 @0x1808
0x0a90…0a94 Statement 04688 @0x17fb
0x0a94…0a98 Statement 04677 @0x17f9
0x0a98…0a9c Statement 04640 @0x17f5
0x0a9c…0aa0 Statement 04629 @0x17ef
0x0aa0…0aa4 Statement 04624 @0x17e7
0x0aa4…0aa8 Statement 04613 @0x17e3
0x0aa8…0aac Statement 04608 @0x17c2
0x0aac…0ab0 Statement 04464 @0x17c1
0x0ab0…0ab4 Statement 04448 @0x17be
0x0ab4…0ab8 Statement 04432 @0x17ba
0x0ab8…0abc Statement 04421 @0x17a1
0x0abc…0ac0 Statement 04418 @0x178d
0x0ac0…0ac4 Statement 04416 @0x1786
0x0ac4…0ac8 Statement 04405 @0x1781
0x0ac8…0acc Statement 04400 @0x1778
0x0acc…0ad0 Statement 04392 @0x1773
0x0ad0…0ad4 Statement 04389 @0x1758
0x0ad4…0ad8 Statement 04384 @0x174c
0x0ad8…0adc Statement 04373 @0x171d
0x0adc…0ae0 Statement 04368 @0x1709
0x0ae0…0ae4 Statement 04357 @0x16e7
0x0ae4…0ae8 Statement 04352 @0x16e3
0x0ae8…0aec Statement 04240 @0x16c1
0x0aec…0af0 Statement 04208 @0x16c0
0x0af0…0af4 Statement 04192 @0x16bd
0x0af4…0af8 Statement 04128 @0x16b2
0x0af8…0afc Statement 04112 @0x16ac
0x0afc…0b00 Statement 02448 @0x169f
0x0b00…0b04 Statement 02437 @0x169d
0x0b04…0b08 Statement 02432 @0x1690
0x0b08…0b0c Statement 02416 @0x1689
0x0b0c…0b10 Statement 02405 @0x1685
0x0b10…0b14 Statement 02400 @0x1664
0x0b14…0b18 Statement 02384 @0x1663
0x0b18…0b1c Statement 02368 @0x165f
0x0b1c…0b20 Statement 02336 @0x164b
0x0b20…0b24 Statement 02320 @0x162f
0x0b24…0b28 Statement 02304 @0x162e
0x0b28…0b2c Statement 02192 @0x1622
0x0b2c…0b30 Statement 02181 @0x1613
0x0b30…0b34 Statement 02176 @0x1610
0x0b34…0b38 Statement 02165 @0x160f
0x0b38…0b3c Statement 02160 @0x1600
0x0b3c…0b40 Statement 02149 @0x15f8
0x0b40…0b44 Statement 02144 @0x15e6
0x0b44…0b48 Statement 02133 @0x15d3
0x0b48…0b4c Statement 02128 @0x15c7
0x0b4c…0b50 Statement 02117 @0x15aa
0x0b50…0b54 Statement 02112 @0x15a9
0x0b54…0b58 Statement 02104 @0x15a6
0x0b58…0b5c Statement 02102 @0x15a0
0x0b5c…0b60 Statement 02100 @0x1593
0x0b60…0b64 Statement 02098 @0x1588
0x0b64…0b68 Statement 02096 @0x157b
0x0b68…0b6c Statement 02088 @0x1575
0x0b6c…0b70 Statement 02072 @0x156d
0x0b70…0b74 Statement 02070 @0x1547
0x0b74…0b78 Statement 02068 @0x152f
0x0b78…0b7c Statement 02067 @0x152c
0x0b7c…0b80 Statement 02066 @0x1528
0x0b80…0b84 Statement 02064 @0x150d
0x0b84…0b88 Statement 02055 @0x150c
0x0b88…0b8c Statement 02053 @0x1509
0x0b8c…0b90 Statement 02051 @0x14f1
0x0b90…0b94 Statement 02050 @0x14e6
0x0b94…0b98 Statement 02048 @0x14dd
0x0b98…0b9c Statement 01944 @0x14ca
0x0b9c…0ba0 Statement 01942 @0x14c4
0x0ba0…0ba4 Statement 01940 @0x14be
0x0ba4…0ba8 Statement 01938 @0x14ba
0x0ba8…0bac Statement 01936 @0x14b6
0x0bac…0bb0 Statement 01925 @0x1491
0x0bb0…0bb4 Statement 01920 @0x1490
0x0bb4…0bb8 Statement 01909 @0x148d
0x0bb8…0bbc Statement 01904 @0x1478
0x0bbc…0bc0 Statement 01893 @0x1475
0x0bc0…0bc4 Statement 01888 @0x145b
0x0bc4…0bc8 Statement 01877 @0x1458
0x0bc8…0bcc Statement 01872 @0x1445
0x0bcc…0bd0 Statement 01861 @0x1442
0x0bd0…0bd4 Statement 01856 @0x1427
0x0bd4…0bd8 Statement 01840 @0x1419
0x0bd8…0bdc Statement 01824 @0x140e
0x0bdc…0be0 Statement 01808 @0x1408
0x0be0…0be4 Statement 01797 @0x1404
0x0be4…0be8 Statement 01792 @0x13e3
0x0be8…0bec Statement 01648 @0x13e2
0x0bec…0bf0 Statement 01632 @0x13df
0x0bf0…0bf4 Statement 01616 @0x13c1
0x0bf4…0bf8 Statement 01600 @0x13a3
0x0bf8…0bfc Statement 01584 @0x1391
0x0bfc…0c00 Statement 01568 @0x1388
0x0c00…0c04 Statement 01557 @0x1384
0x0c04…0c08 Statement 01556 @0x134b
0x0c08…0c0c Statement 01555 @0x131a
0x0c0c…0c10 Statement 01554 @0x12df
0x0c10…0c14 Statement 01553 @0x12be
0x0c14…0c18 Statement 01552 @0x12ba
0x0c18…0c1c Statement 01541 @0x1299
0x0c1c…0c20 Statement 01536 @0x1298
0x0c20…0c24 Statement 01429 @0x1295
0x0c24…0c28 Statement 01424 @0x1290
0x0c28…0c2c Statement 01376 @0x128b
0x0c2c…0c30 Statement 01360 @0x1285
0x0c30…0c34 Statement 01344 @0x1279
0x0c34…0c38 Statement 01333 @0x126b
0x0c38…0c3c Statement 01328 @0x1267
0x0c3c…0c40 Statement 01317 @0x1246
0x0c40…0c44 Statement 01312 @0x1245
0x0c44…0c48 Statement 01296 @0x1241
0x0c48…0c4c Statement 01280 @0x1240
0x0c4c…0c50 Statement 01168 @0x123d
0x0c50…0c54 Statement 01152 @0x121b
0x0c54…0c58 Statement 01136 @0x11f7
0x0c58…0c5c Statement 01120 @0x11f0
0x0c5c…0c60 Statement 01104 @0x11d8
0x0c60…0c64 Statement 01093 @0x11cf
0x0c64…0c68 Statement 01088 @0x11a6
0x0c68…0c6c Statement 01072 @0x119b
0x0c6c…0c70 Statement 01061 @0x1199
0x0c70…0c74 Statement 01056 @0x1196
0x0c74…0c78 Statement 01024 @0x1192
0x0c78…0c7c Statement 00912 @0x1171
0x0c7c…0c80 Statement 00896 @0x1170
0x0c80…0c84 Statement 00864 @0x116d
0x0c84…0c88 Statement 00854 @0x116a
0x0c88…0c8c Statement 00853 @0x1160
0x0c8c…0c90 Statement 00837 @0x115f
0x0c90…0c94 Statement 00832 @0x115c
0x0c94…0c98 Statement 00656 @0x1152
0x0c98…0c9c Statement 00640 @0x114b
0x0c9c…0ca0 Statement 00630 @0x1131
0x0ca0…0ca4 Statement 00628 @0x1121
0x0ca4…0ca8 Statement 00627 @0x1113
0x0ca8…0cac Statement 00626 @0x1112
0x0cac…0cb0 Statement 00624 @0x110f
0x0cb0…0cb4 Statement 00616 @0x1108
0x0cb4…0cb8 Statement 00613 @0x10fb
0x0cb8…0cbc Statement 00608 @0x10ea
0x0cbc…0cc0 Statement 00597 @0x10be
0x0cc0…0cc4 Statement 00592 @0x10b1
0x0cc4…0cc8 Statement 00582 @0x10af
0x0cc8…0ccc Statement 00581 @0x10a9
0x0ccc…0cd0 Statement 00576 @0x10a2
0x0cd0…0cd4 Statement 00565 @0x109c
0x0cd4…0cd8 Statement 00564 @0x1097
0x0cd8…0cdc Statement 00562 @0x105e
0x0cdc…0ce0 Statement 00560 @0x1053
0x0ce0…0ce4 Statement 00552 @0x102a
0x0ce4…0ce8 Statement 00549 @0x101f
0x0ce8…0cec Statement 00546 @0x101d
0x0cec…0cf0 Statement 00544 @0x101a
0x0cf0…0cf4 Statement 00528 @0x1016
0x0cf4…0cf8 Statement 00512 @0xff5
0x0cf8…0cfc Statement 00384 @0xfec
0x0cfc…0d00 Statement 00373 @0xfdf
0x0d00…0d04 Statement 00352 @0xfbc
0x0d04…0d08 Statement 00341 @0xfb3
0x0d08…0d0c Statement 00336 @0xf8e
0x0d0c…0d10 Statement 00320 @0xf69
0x0d10…0d14 Statement 00309 @0xf44
0x0d14…0d18 Statement 00304 @0xf1f
0x0d18…0d1c Statement 00261 @0xef9
0x0d1c…0d20 Statement 00256 @0xec0
0x0d20…0d24 Statement 00149 @0xeb5
0x0d24…0d28 Statement 00144 @0xea6
0x0d28…0d2c Statement 00128 @0xe99
0x0d2c…0d30 Statement 00117 @0xe90
0x0d30…0d34 Statement 00112 @0xe76
0x0d34…0d38 Statement 00096 @0xe68
0x0d38…0d3c Statement 00085 @0xe4e
0x0d3c…0d40 Statement 00080 @0xe34
0x0d40…0d44 Statement 00069 @0xe24
0x0d44…0d48 Statement 00064 @0xdfd
0x0d48…0d4c Statement 00048 @0xddf
0x0d4c…0d50 Statement 00032 @0xdac
0x0d50…0d54 Statement 00022 @0xd98
0x0d54…0d58 Statement 00021 @0xd7d
0x0d58…0d5c Statement 00016 @0xd69
0x0d5c…0d60 Statement 00005 @0xd60
0x0d60…0d69 0005 DIM ELEMENT var(R1$<2151>) ( 20 20 ) [] EOS
0x0d69…0d7d 0010 DIM ELEMENT var(R$) ( 20 ) [] ELEMENT var(W$) ( 20 ) [] ELEMENT var(T$) ( 24 ) [] EOS
0x0d7d…0d98 0015 DIM ELEMENT var(P$) ( 63 ) [] ELEMENT var(P1$) ( 51 ) [] ELEMENT var(P4$) ( 1 ) [] ELEMENT var(P5$<254f>) ( 5 8 ) [] EOS
0x0d98…0dac 0016 DIM ELEMENT var(P9$) ( 51 ) [] EOS 32 var(R$) var(F0$) var(R1$<2151>) var(X1') var(F2$) 32 var(F0$) var(P9$) var(X1') var(F1$) var(P$)
0x0dac…0ddf 0020 DIM ELEMENT var(F1$) ( 12 ) [] ELEMENT var(F2$) ( 8 ) [] ELEMENT var(F0$) ( 2 ) [] ELEMENT var(X$) ( 1 ) [] EOS var(P1$) var(Y1') var(R0$) var(X$) var(R1$<2151>) var(A%') 32 var(S0$) var(A%') var(R0$) var(P9$) var(X1') var(P4$) var(S0$) 32 var(P1$) var(Y1') var(R0$) 32 var(Y1') var(B%') var(A%') var(X') var(B%') var(A%')
0x0ddf…0dfd 0030 DIM ELEMENT var(X1') ( 5 ) [] ELEMENT var(Y1') ( 5 ) [] ELEMENT var(X') ( %200 ) [] ELEMENT var(Y') ( %200 ) [] EOS
0x0dfd…0e24 0040 DIM ELEMENT var(R0$) ( 8 ) [] ELEMENT var(S0$) ( 8 ) [] EOS 32 var(W$) var(B%') var(R0$) var(R0$) var(P$) var(X1') var(A%') 32 var(W$) var(Y1') var(T$) var(P$) 32 var(R1$<2151>) var(X1') var(T$) 32 var(X') var(Y1') var(P9$) var(X1') var(A%') var(P9$) var(T$)
0x0e24…0e34 0045 DIM ELEMENT var(A0%') ( 10 ) [] ELEMENT var(B0%') ( 10 ) [] EOS
0x0e34…0e4e 0050 DIM ELEMENT var(A%') ( 2 ) [] ELEMENT var(B%') ( 2 ) [] ELEMENT var(C%') ( 2 ) [] ELEMENT var(D%') ( 2 ) [] EOS
0x0e4e…0e68 0055 DIM ELEMENT var(W%') ( 2 ) [] ELEMENT var(X%') ( 2 ) [] ELEMENT var(Y%') ( 2 ) [] ELEMENT var(Z%') ( 2 ) [] EOS
0x0e68…0e76 0060 DIM ELEMENT var(X2') ( 5 ) [] ELEMENT var(Y2') ( 5 ) [] EOS
0x0e76…0e90 0070 DIM ELEMENT var(Q0$) ( 8 ) [] EOS 32 var(F0$) var(R1$<2151>) var(S0$) var(A%') 32 var(A%') var(P5$<254f>) var(P$) var(X$) var(P$) 32 var(S0$) var(Y1') var(R0$) var(A%') var(P$) var(T$)
0x0e90…0e99 0075 DIM ELEMENT var(T0%'<20b3>) ( 9 9 ) [] EOS
0x0e99…0ea6 0080 SYSTEM »BUFFERS« COMMA 6 EOS
0x0ea6…0eb5 0090 SYSTEM »LINELEN« COMMA %80 EOS
0x0eb5…0ec0 0095 SYSTEM »WARNOFF« EOS
0x0ec0…0ef9 0100 LET var(P9$) COMMA » « EOS
0x0ef9…0f1f 0105 LET var(F0$) COMMA »##« COMMA var(F1$) COMMA »########.DDD« COMMA var(F2$) COMMA »####.DDD« EOS
0x0f1f…0f44 0130 LET ELEMENT var(A%') ( 1 ) [] COMMA 17 COMMA ELEMENT var(B%') ( 1 ) [] COMMA 25 COMMA ELEMENT var(C%') ( 1 ) [] COMMA 38 COMMA ELEMENT var(D%') ( 1 ) [] COMMA 51 EOS
0x0f44…0f69 0135 LET ELEMENT var(A%') ( 2 ) [] COMMA 8 COMMA ELEMENT var(B%') ( 2 ) [] COMMA 16 COMMA ELEMENT var(C%') ( 2 ) [] COMMA 29 COMMA ELEMENT var(D%') ( 2 ) [] COMMA 42 EOS
0x0f69…0f8e 0140 LET ELEMENT var(W%') ( 1 ) [] COMMA 24 COMMA ELEMENT var(X%') ( 1 ) [] COMMA 37 COMMA ELEMENT var(Y%') ( 1 ) [] COMMA 50 COMMA ELEMENT var(Z%') ( 1 ) [] COMMA 63 EOS
0x0f8e…0fb3 0150 LET ELEMENT var(W%') ( 2 ) [] COMMA 15 COMMA ELEMENT var(X%') ( 2 ) [] COMMA 28 COMMA ELEMENT var(Y%') ( 2 ) [] COMMA 41 COMMA ELEMENT var(Z%') ( 2 ) [] COMMA 54 EOS
0x0fb3…0fbc 0155 LET var(W1%) COMMA 0 COMMA var(W2%) COMMA 0 EOS
0x0fbc…0fdf 0160 LET var(Q0%) COMMA 0 COMMA var(S0$) COMMA » « COMMA var(R0$) COMMA » « COMMA var(Z0) COMMA 0 EOS
0x0fdf…0fec 0175 LET var(P1) COMMA 3.14159 EOS
0x0fec…0ff5 0180 LET var(Z0%) COMMA 0 COMMA var(Z1%) COMMA 0 EOS
0x0ff5…1016 0200 REM --------- FUN OPEN INPUTFILE
0x1016…101a 0210 REM
0x101a…101d 0220 DEF var(FNO1%) EOS
0x101d…101f 0222 PRINT EOS
0x101f…102a 0225 LET var(X%) COMMA = ( 1 1 20 ) var(FNC%) EOS
0x102a…1053 0228 PRINT »Maksimalt 9 inputfiler pr. outputfil.« EOS
0x1053…105e 0230 LET var(X%) COMMA = ( 2 2 20 ) var(FNC%) EOS
0x105e…1097 0232 PRINT »Hvis inputfil er sortert,avslutt inputfilnavn med '*'« EOS
0x1097…109c 0234 LET var(N1%) COMMA 0 EOS
0x109c…10a2 0235 REM C
0x10a2…10a9 0240 LET var(N1%) COMMA var(N1%) 1 PLUS EOS
0x10a9…10af 0245 REM C
0x10af…10b1 0246 PRINT EOS
0x10b1…10be 0250 LET var(X%) COMMA = ( 2 5 var(N1%) PLUS 20 ) var(FNC%) EOS
0x10be…10ea 0255 PRINT »Gi inputfil nr « SEMI var(N1%) SEMI » (RETURN=AVSLUTT) : « EOS
0x10ea…10fb 0260 LET ELEMENT var(R1$<2151>) ( var(N1%) ) [] COMMA = ( 5 var(N1%) PLUS 55 ) var(FNP$) EOS
0x10fb…1108 0265 IF ELEMENT var(R1$<2151>) ( var(N1%) ) [] »« EQ COMMA 34 EOS
0x1108…110f 0268 LET var(N1%) COMMA var(N1%) 1 SUB2 EOS
0x110f…1112 0270 RETURN var(N1%) EOS
0x1112…1113 0272 DOEND
0x1113…1121 0273 LET var(L%) COMMA = ( ELEMENT var(R1$<2151>) ( var(N1%) ) [] ) LEN EOS
0x1121…1131 0274 LET var(W9%) COMMA ELEMENT var(R1$<2151>) ( var(N1%) var(L%) var(L%) ) [] »*« EQ EOS
0x1131…114b 0276 1601f27241736a016c6de3749f70073b4143433d494ee2f168f3
0x114b…1152 0280 IF var(X%) 0 <> COMMA 34 EOS
0x1152…115c 0290 LET var(X%) COMMA = ( 1 ) var(FNM%) EOS
0x115c…115f 0340 GOTO var(P$) 2
0x115f…1160 0345 DOEND
0x1160…116a 0355 LET var(X%) COMMA = ( 4 ) var(FNM%) EOS
0x116a…116d 0356 1401f3
0x116d…1170 0360 GOTO 53 2
0x1170…1171 0380 FNEND
0x1171…1192 0390 REM ------------ OPEN OUTPUTFILE
0x1192…1196 0400 DEF var(FNO2%) EOS
0x1196…1199 0420 1402f3
0x1199…119b 0425 PRINT EOS
0x119b…11a6 0430 LET var(X%) COMMA = ( 2 20 20 ) var(FNC%) EOS
0x11a6…11cf 0440 INPUT »--- Gi outputfil (return=utgang) : « COMMA var(W$) EOS
0x11cf…11d8 0445 IF var(W$) »« EQ COMMA 5 2 EOS
0x11d8…11f0 0450 1602f243700e3b5245433d35323b4143433d494ee2f168f3
0x11f0…11f7 0460 IF var(X%) 2 EQ COMMA 34 EOS
0x11f7…121b 0470 IF var(F6%) COMMA 22 2 SEMI var(W$) »;ACC=NEW;RL=512;REC=52« PLUS COMMA var(X%) EOS
0x121b…123d 0480 ELSE 22 2 SEMI var(W$) »;ACC=NEW;RL=1024;REC=52« PLUS COMMA var(X%) EOS
0x123d…1240 0490 RETURN 0 EOS
0x1240…1241 0500 DOEND
0x1241…1245 0510 ELSE 5 1 EOS
0x1245…1246 0520 FNEND
0x1246…1267 0525 REM --------- OUTPUT TO TABFILE
0x1267…126b 0530 DEF var(FNU8%) EOS
0x126b…1279 0535 IF var(Q0$) »DUMMY« EQ COMMA 0 var(X') 5
0x1279…1285 0540 13f403f25ef165f16601e3f3
0x1285…128b 0550 REM C
0x128b…1290 0560 LET var(Z0%) COMMA var(Z1%) EOS
0x1290…1295 0590 LET var(Q0$) COMMA var(R0$) EOS
0x1295…1298 0595 RETURN 1 EOS
0x1298…1299 0600 FNEND
0x1299…12ba 0605 REM ----------------- FUN SCREEN
0x12ba…12be 0610 REM
0x12be…12df 0611 REM C1% = 1 ERASE SCREEN
0x12df…131a 0612 REM 2 CURSOR ADRESSING TO LINE C2%, POS. C3%
0x131a…134b 0613 REM 3 ERASE LINE C2% FROM POS. C3%
0x134b…1384 0614 REM 4 ERASE SCREEN FROM LINE C2%, POS. C3%
0x1384…1388 0615 REM
0x1388…1391 0620 DEF var(FNC%) var(C1%) var(C2%) var(C3%) EOS
0x1391…13a3 0630 IF var(C1%) 1 EQ COMMA 15 = ( 27 ) → af700145e2f2f3
0x13a3…13c1 0640 PRINT = ( 27 ) → af700146e271731f4005e274afe271731f4006e274afe2f2f3
0x13c1…13df 0650 IF var(C1%) 3 EQ var(C1%) 4 EQ OR COMMA 15 = ( 27 ) → af71736f4e004004e374afe2f2f3
0x13df…13e2 0660 RETURN 0 EOS
0x13e2…13e3 0670 FNEND
0x13e3…1404 0700 REM ---------------------MESSAGE
0x1404…1408 0705 REM
0x1408…140e 0710 DEF var(FNM%) var(I%) EOS
0x140e…1419 0720 LET var(X%) COMMA = ( 2 22 50 ) var(FNC%) EOS
0x1419…1427 0730 ON var(I%) COMMA 0 var(I%) var(X') 7 var(W1%) 7 »\xf3«si»p\x16-- «
0x1427…1442 0740 PRINT »-- Ukjent filnavn --« SEMI EOS
0x1442…1445 0745 RETURN 0 EOS
0x1445…1458 0750 PRINT »-- Ny fil --« SEMI EOS
0x1458…145b 0755 RETURN 0 EOS
0x145b…1475 0760 PRINT »-- Ulovlig input --« SEMI EOS
0x1475…1478 0765 RETURN 0 EOS
0x1478…148d 0770 PRINT »-- Godkjent --« SEMI EOS
0x148d…1490 0775 RETURN 0 EOS
0x1490…1491 0780 FNEND
0x1491…14b6 0785 REM ---- TEST FOR APPEND TO SORTFILE
0x14b6…14ba 0790 DEF var(FNO4%) EOS
0x14ba…14be 0792 RESTORE 2# EOS
0x14be…14c4 0794 LET var(X) COMMA 0 EOS
0x14c4…14ca 0796 REM C
0x14ca…14dd 0798 SPACE 2 SEMI 32000 COMMA »!« COMMA var(X%) EOS
0x14dd…14e6 0800 LET var(X) COMMA var(X) var(X%) PLUS EOS
0x14e6…14f1 0802 IF = ( 2 ) → b1eff1009607
0x14f1…1509 0803 LET var(X%) COMMA = ( var(X) 52 DIV 0.1 PLUS ) → a101e3f3
0x1509…150c 0805 RETURN var(X%) EOS
0x150c…150d 0807 FNEND
0x150d…1528 0810 REM --- APPEND TO TAB.FILE
0x1528…152c 0812 DEF var(FNO5%) EOS
0x152c…152f 0813 1403f3
0x152f…1547 0814 1603f244700e3b4143433d494e3b5245433d3132e2f168f3
0x1547…156d 0816 IF var(X%) 0 <> COMMA 22 3 SEMI var(T$) »;ACC=NEW;REC=12;RL=512« PLUS COMMA var(I%) EOS
0x156d…1575 0818 IF var(X%) 0 <> COMMA 5 6 EOS
0x1575…157b 0828 REM C
0x157b…1588 0830 SPACE 3 SEMI 32000 EOS
0x1588…1593 0832 IF = ( 3 ) → b1eff1002808
0x1593…15a0 0834 SPACE 3 SEMI -2 EOS
0x15a0…15a6 0836 READ 3# SEMI var(X%) EOS
0x15a6…15a9 0838 RETURN var(X%) EOS
0x15a9…15aa 0840 FNEND
0x15aa…15c7 0845 REM ------------ FRAME ANGLE
0x15c7…15d3 0850 DEF var(FNV9) var(X1) var(X2) var(Y1) var(Y2) EOS
0x15d3…15e6 0855 LET var(X) COMMA var(X2) var(X1) SUB2 COMMA var(Y) COMMA var(Y2) var(Y1) SUB2 EOS
0x15e6…15f8 0860 LET var(V) COMMA = ( = ( var(X) var(Y) DIV ) ?ABS ) → aaf3
0x15f8…1600 0865 IF var(X) 0 > COMMA 34 EOS
0x1600…160f 0870 IF var(Y) 0 ?< COMMA 27 var(V) COMMA var(P1) var(V) SUB2 EOS
0x160f…1610 0875 DOEND
0x1610…1613 0880 ELSE 34 EOS
0x1613…1622 0885 IF var(Y) 0 ?< COMMA 27 var(V) COMMA var(P1) var(V) PLUS EOS
0x1622…162e 0890 ELSE 27 var(V) COMMA 2 var(P1) MULT var(V) SUB2 EOS
0x162e…162f 0900 DOEND
0x162f…164b 0910 IF = ( 2 var(P1) MULT var(V) SUB2 ) ?ABS 1e-07 ?< COMMA 27 var(V) COMMA 0 EOS
0x164b…165f 0920 IF var(V) 1e-07 ?< COMMA 27 var(V) COMMA 0 EOS
0x165f…1663 0940 RETURN var(V) EOS
0x1663…1664 0950 FNEND
0x1664…1685 0960 REM --------------- INPUT STRING
0x1685…1689 0965 REM
0x1689…1690 0970 DEF var(FNP$) var(P1%) var(P2%) EOS
0x1690…169d 0980 LET var(X%) COMMA = ( 3 var(P1%) var(P2%) ) var(FNC%) EOS
0x169d…169f 0985 PRINT EOS
0x169f…16ac 0990 LET var(X%) COMMA = ( 2 var(P1%) var(P2%) ) var(FNC%) EOS
0x16ac…16b2 1010 LINPUT »« COMMA var(P$) EOS
0x16b2…16bd 1020 LET var(X%) COMMA = ( 3 22 50 ) var(FNC%) EOS
0x16bd…16c0 1060 RETURN var(P$) EOS
0x16c0…16c1 1070 FNEND
0x16c1…16e3 1090 REM - WRITE TOP OF NEW OUTPUTFILE
0x16e3…16e7 1100 DEF var(FNZ%) EOS
0x16e7…1709 1105 LET var(V0) COMMA = ( ELEMENT var(X1') ( 1 ) [] ELEMENT var(X1') ( 4 ) [] ELEMENT var(Y1') ( 1 ) [] ELEMENT var(Y1') ( 4 ) [] ) var(FNV9) EOS
0x1709…171d 1110 PRINT 2# SEMI var(P1$) SEMI ELEMENT var(P9$) ( 1 51 = ( var(P1$) ) LEN SUB2 ) [] EOS
0x171d…174c 1115 PRINT 2# SEMI USING »##.DDDDDDDDDD« COMMA var(V0) SEMI USING »#######« COMMA var(M0) SEMI ELEMENT var(P4$) ( 1 1 ) [] SEMI EOS
0x174c…1758 1120 PRINT 2# SEMI ELEMENT var(P9$) ( 1 30 ) [] EOS
0x1758…1773 1125 LET var(S0$) COMMA » « COMMA var(R0$) COMMA » RAMME« EOS
0x1773…1778 1128 LET var(Q0$) COMMA var(R0$) EOS
0x1778…1781 1130 LET var(Q0%) COMMA 30 COMMA var(Z0) COMMA 0 EOS
0x1781…1786 1135 LET var(Z1%) COMMA 0 EOS
0x1786…178d 1140 19400701f105f3
0x178d…17a1 1142 LET var(J%) COMMA 5 ( var(I%) 5 EQ ) PLUS ( var(I%) 1 EQ ) SUB2 EOS
0x17a1…17ba 1145 LET var(X%) COMMA = ( var(J%) ELEMENT var(X1') ( var(I%) ) [] ELEMENT var(Y1') ( var(I%) ) [] ) var(FNU9%) EOS
0x17ba…17be 1150 1a4007f3
0x17be…17c1 1160 RETURN 1 EOS
0x17c1…17c2 1170 FNEND
0x17c2…17e3 1200 REM ---------- INPUT REAL VALUE
0x17e3…17e7 1205 REM
0x17e7…17ef 1210 DEF var(FNP) var(P1%) var(P2%) EOS
0x17ef…17f5 1215 REM C
0x17f5…17f9 1220 TRAP ERR 1215
0x17f9…17fb 1245 PRINT EOS
0x17fb…1808 1250 LET var(X%) COMMA = ( 2 var(P1%) var(P2%) ) var(FNC%) EOS
0x1808…180e 1265 INPUT »« COMMA var(P$) EOS
0x180e…181b 1270 IF var(P$) »« EQ COMMA 27 var(P$) COMMA »0« EOS
0x181b…1825 1275 LET var(P) COMMA = ( var(P$) ) VAL EOS
0x1825…1830 1280 LET var(X%) COMMA = ( 3 22 50 ) var(FNC%) EOS
0x1830…1833 1320 TRAP ERR OFF
0x1833…1837 1330 RETURN var(P) EOS
0x1837…183d 1340 REM C
0x183d…1847 1350 LET var(X%) COMMA = ( 3 ) var(FNM%) EOS
0x1847…1854 1360 LET var(X%) COMMA = ( 3 var(P1%) var(P2%) ) var(FNC%) EOS
0x1854…1857 1370 GOTO 21 18
0x1857…1858 1380 FNEND
0x1858…1878 1390 REM --- PRINT SORT PLAN TO FILE
0x1878…187c 1400 DEF var(FNR5%) EOS
0x187c…1882 1405 PRINT 5# SEMI var(W$) EOS
0x1882…188a 1410 19400701f1401cf3
0x188a…1896 1415 PRINT 5# SEMI ELEMENT var(P5$<254f>) ( var(I%) ) [] EOS
0x1896…189a 1420 1a4007f3
0x189a…18a2 1425 PRINT 5# SEMI »*« EOS
0x18a2…18a9 1430 19400701f16af3
0x18a9…18b5 1435 PRINT 5# SEMI ELEMENT var(R1$<2151>) ( var(I%) ) [] EOS
0x18b5…18b9 1440 1a4007f3
0x18b9…18c1 1445 PRINT 5# SEMI »*« EOS
0x18c1…18c4 1450 RETURN 1 EOS
0x18c4…18c5 1480 FNEND
0x18c5…18e6 1700 REM --------------- FUN DISTANCE
0x18e6…18ea 1705 REM
0x18ea…191a 1710 DEF var(FND) var(X1) var(Y1) var(X2) var(Y2) 5 = ( ( var(X2) var(X1) SUB2 ) ( var(X2) var(X1) SUB2 ) MULT ( var(Y2) var(Y1) SUB2 ) ( var(Y2) var(Y1) SUB2 ) MULT PLUS ) SQR EOS
0x191a…191e 1715 REM
0x191e…193f 1750 REM ---------- COMPUTE FOOTPOINT
0x193f…1943 1755 REM
0x1943…1953 1760 DEF var(FNF%) var(X1) var(Y1) var(X2) var(Y2) var(A) var(B) EOS
0x1953…196b 1765 IF ( var(Y2) var(Y1) SUB2 ) 0 EQ COMMA 27 var(Y5) COMMA var(Y1) COMMA var(X5) COMMA var(A) EOS
0x196b…196e 1785 ELSE 34 EOS
0x196e…1982 1790 LET var(K) COMMA ( var(X2) var(X1) SUB2 ) ( var(Y2) var(Y1) SUB2 ) DIV EOS
0x1982…19a9 1795 LET var(Y5) COMMA ( ( var(A) var(X1) SUB2 ) var(K) MULT var(B) PLUS var(K) var(K) MULT var(Y1) MULT PLUS ) ( 1 var(K) var(K) MULT PLUS ) DIV EOS
0x19a9…19d0 1800 LET var(X5) COMMA ( ( var(B) var(Y1) SUB2 ) var(K) MULT var(X1) PLUS var(K) var(K) MULT var(A) MULT PLUS ) ( 1 var(K) var(K) MULT PLUS ) DIV EOS
0x19d0…19d1 1805 DOEND
0x19d1…19d4 1810 RETURN 1 EOS
0x19d4…19d5 1815 FNEND
0x19d5…19f6 1850 REM ----- COMPUTE MISSING CORNER
0x19f6…19fa 1855 REM
0x19fa…1a0e 1860 DEF var(FNM1%) var(X1) var(Y1) var(X2) var(Y2) var(A1) var(B1) var(A2) var(B2) EOS
0x1a0e…1a1b 1865 IF ( var(B2) var(B1) SUB2 ) 0 EQ COMMA 34 EOS
0x1a1b…1a22 1870 LET var(X5) COMMA var(A1) EOS
0x1a22…1a41 1875 LET var(Y5) COMMA var(Y2) ( var(A1) var(X2) SUB2 ) ( var(X2) var(X1) SUB2 ) MULT ( var(Y2) var(Y1) SUB2 ) DIV SUB2 EOS
0x1a41…1a44 1880 RETURN 1 EOS
0x1a44…1a45 1885 DOEND
0x1a45…1a52 1890 IF ( var(Y2) var(Y1) SUB2 ) 0 EQ COMMA 34 EOS
0x1a52…1a59 1895 LET var(X5) COMMA var(X2) EOS
0x1a59…1a78 1900 LET var(Y5) COMMA var(B1) ( var(A1) var(X2) SUB2 ) ( var(A2) var(A1) SUB2 ) MULT ( var(B2) var(B1) SUB2 ) DIV PLUS EOS
0x1a78…1a7b 1905 RETURN 1 EOS
0x1a7b…1a7c 1910 DOEND
0x1a7c…1a90 1915 LET var(K1) COMMA ( var(A2) var(A1) SUB2 ) ( var(B2) var(B1) SUB2 ) DIV EOS
0x1a90…1aa4 1920 LET var(K2) COMMA ( var(X2) var(X1) SUB2 ) ( var(Y2) var(Y1) SUB2 ) DIV EOS
0x1aa4…1acc 1925 LET var(Y5) COMMA ( var(K1) var(K2) MULT ( var(A1) var(X2) SUB2 ) MULT var(B1) var(K2) MULT PLUS var(Y2) var(K1) MULT SUB2 ) ( var(K2) var(K1) SUB2 ) DIV EOS
0x1acc…1aec 1930 LET var(X5) COMMA ( var(X2) var(K2) MULT var(A1) var(K1) MULT SUB2 var(Y2) PLUS var(B1) SUB2 ) ( var(K2) var(K1) SUB2 ) DIV EOS
0x1aec…1aef 1955 RETURN 1 EOS
0x1aef…1af0 1960 FNEND
0x1af0…1b11 2000 REM --- FUNCTION TEST HOUSE CODE
0x1b11…1b15 2010 DEF var(FNH%) EOS
0x1b15…1b1c 2015 196801f1401cf3
0x1b1c…1b29 2020 IF var(R0$) ELEMENT var(P5$<254f>) ( var(X%) ) [] EQ COMMA 5 1 EOS
0x1b29…1b2c 2025 1a68f3
0x1b2c…1b2f 2030 RETURN 0 EOS
0x1b2f…1b30 2055 FNEND
0x1b30…1b51 2075 REM -- GET FIRST ERRONOUS CORNER
0x1b51…1b55 2080 REM
0x1b55…1b5b 2085 DEF var(FNG%) var(N%) EOS
0x1b5b…1b6d 2090 IF = ( var(N%) 2 DIV ) → a102e4402decf10500f3
0x1b6d…1b82 2110 LET var(A) COMMA 0 COMMA var(B) COMMA 0 COMMA var(A%) COMMA 0 COMMA var(B%) COMMA 0 EOS
0x1b82…1b8e 2115 19400701f173402d01e374f3
0x1b8e…1b9d 2120 IF var(I%) 1 EQ COMMA 27 var(J%) COMMA var(N%) 1 SUB2 EOS
0x1b9d…1ba7 2125 ELSE 27 var(J%) COMMA var(I%) 1 SUB2 EOS
0x1ba7…1bde 2130 LET var(X%) COMMA = ( ELEMENT var(X') ( var(J%) ) [] ELEMENT var(Y') ( var(J%) ) [] ELEMENT var(X') ( var(I%) ) [] ELEMENT var(Y') ( var(I%) ) [] ELEMENT var(X') ( var(I%) 1 PLUS ) [] ELEMENT var(Y') ( var(I%) 1 PLUS ) [] ) var(FNF%) EOS
0x1bde…1bfa 2135 LET var(D) COMMA = ( ELEMENT var(X') ( var(I%) ) [] ELEMENT var(Y') ( var(I%) ) [] var(X5) var(Y5) ) var(FND) EOS
0x1bfa…1c1a 2140 IF var(D) var(A) > COMMA 27 var(B) COMMA var(A) COMMA var(B%) COMMA var(A%) COMMA var(A) COMMA var(D) COMMA var(A%) COMMA var(I%) EOS
0x1c1a…1c2f 2160 ELSE 3 var(D) var(B) > COMMA 27 var(B%) COMMA var(I%) COMMA var(B) COMMA var(D) EOS
0x1c2f…1c33 2190 1a4007f3
0x1c33…1c46 2192 IF = ( var(A%) var(B%) SUB2 ) ?ABS 1 > COMMA 5 var(N%) 1 SUB2 EOS
0x1c46…1c53 2195 IF ( var(A%) var(B%) ?< ) COMMA 5 var(A%) EOS
0x1c53…1c57 2200 RETURN var(B%) EOS
0x1c57…1c58 2210 FNEND
0x1c58…1c79 2220 REM ----- FUNCTION ADJUST ANGLES
0x1c79…1c7f 2225 DEF var(FNV%) var(N%) EOS
0x1c7f…1c8d 2228 LET var(D9) COMMA -1 EOS
0x1c8d…1c97 2230 19403301f1402d01e3f3
0x1c97…1cc1 2235 LET var(X9) COMMA = ( ELEMENT var(X') ( var(L0%) ) [] ELEMENT var(Y') ( var(L0%) ) [] ELEMENT var(X') ( var(L0%) 1 PLUS ) [] ELEMENT var(Y') ( var(L0%) 1 PLUS ) [] ) var(FND) EOS
0x1cc1…1cd5 2240 IF var(D9) var(X9) ?< COMMA 27 var(D9) COMMA var(X9) COMMA var(I%) COMMA var(L0%) EOS
0x1cd5…1cd9 2260 1a4033f3
0x1cd9…1ce3 2265 19403301f1402d02e3f3
0x1ce3…1cec 2267 LET var(I%) COMMA var(I%) 1 PLUS EOS
0x1cec…1cf9 2268 IF var(I%) var(N%) EQ COMMA 27 var(I%) COMMA 1 EOS
0x1cf9…1d0a 2270 LET var(L1%) COMMA var(I%) 1 SUB2 COMMA var(L2%) COMMA var(I%) 1 PLUS EOS
0x1d0a…1d19 2272 IF var(L1%) 0 EQ COMMA 27 var(L1%) COMMA var(N%) 1 SUB2 EOS
0x1d19…1d26 2274 IF var(L2%) var(N%) EQ COMMA 27 var(L2%) COMMA 1 EOS
0x1d26…1d59 2280 LET var(X%) COMMA = ( ELEMENT var(X') ( var(L1%) ) [] ELEMENT var(Y') ( var(L1%) ) [] ELEMENT var(X') ( var(I%) ) [] ELEMENT var(Y') ( var(I%) ) [] ELEMENT var(X') ( var(L2%) ) [] ELEMENT var(Y') ( var(L2%) ) [] ) var(FNF%) EOS
0x1d59…1d6c 2285 LET var(A) COMMA ( var(X5) ELEMENT var(X') ( var(I%) ) [] PLUS ) 2 DIV EOS
0x1d6c…1d7f 2290 LET var(B) COMMA ( var(Y5) ELEMENT var(Y') ( var(I%) ) [] PLUS ) 2 DIV EOS
0x1d7f…1d96 2295 LET ELEMENT var(Y') ( var(L2%) ) [] COMMA ELEMENT var(Y') ( var(L2%) ) [] var(Y5) SUB2 var(B) PLUS EOS
0x1d96…1dad 2300 LET ELEMENT var(X') ( var(L2%) ) [] COMMA ELEMENT var(X') ( var(L2%) ) [] var(A) PLUS var(X5) SUB2 EOS
0x1dad…1dc4 2305 LET ELEMENT var(X') ( var(I%) ) [] COMMA var(A) COMMA ELEMENT var(Y') ( var(I%) ) [] COMMA var(B) EOS
0x1dc4…1dc8 2317 1a4033f3
0x1dc8…1de7 2318 LET ELEMENT var(X') ( var(N%) ) [] COMMA ELEMENT var(X') ( 1 ) [] COMMA ELEMENT var(Y') ( var(N%) ) [] COMMA ELEMENT var(Y') ( 1 ) [] EOS
0x1de7…1dea 2320 RETURN 1 EOS
0x1dea…1deb 2325 FNEND
0x1deb…1e0c 2350 REM ---- FUNCTION ADJUST FRAME
0x1e0c…1e12 2360 DEF var(FNR%) var(X) EOS
0x1e12…1e23 2365 LET var(D) COMMA 0.015 var(X) MULT EOS
0x1e23…1e35 2370 LET ELEMENT var(X1') ( 1 ) [] COMMA ELEMENT var(X1') ( 1 ) [] var(D) SUB2 EOS
0x1e35…1e47 2375 LET ELEMENT var(X1') ( 2 ) [] COMMA ELEMENT var(X1') ( 2 ) [] var(D) PLUS EOS
0x1e47…1e59 2380 LET ELEMENT var(X1') ( 3 ) [] COMMA ELEMENT var(X1') ( 3 ) [] var(D) PLUS EOS
0x1e59…1e6b 2385 LET ELEMENT var(X1') ( 4 ) [] COMMA ELEMENT var(X1') ( 4 ) [] var(D) SUB2 EOS
0x1e6b…1e7a 2390 LET ELEMENT var(X1') ( 5 ) [] COMMA ELEMENT var(X1') ( 1 ) [] EOS
0x1e7a…1e8c 2395 LET ELEMENT var(Y1') ( 1 ) [] COMMA ELEMENT var(Y1') ( 1 ) [] var(D) SUB2 EOS
0x1e8c…1e9e 2400 LET ELEMENT var(Y1') ( 2 ) [] COMMA ELEMENT var(Y1') ( 2 ) [] var(D) SUB2 EOS
0x1e9e…1eb0 2405 LET ELEMENT var(Y1') ( 3 ) [] COMMA ELEMENT var(Y1') ( 3 ) [] var(D) PLUS EOS
0x1eb0…1ec2 2410 LET ELEMENT var(Y1') ( 4 ) [] COMMA ELEMENT var(Y1') ( 4 ) [] var(D) PLUS EOS
0x1ec2…1ed1 2415 LET ELEMENT var(Y1') ( 5 ) [] COMMA ELEMENT var(Y1') ( 1 ) [] EOS
0x1ed1…1ed4 2420 RETURN 1 EOS
0x1ed4…1ed5 2425 FNEND
0x1ed5…1f05 2427 REM ------- INTERSECTION OF 2 LINES -----------
0x1f05…1f19 2430 DEF var(FNS%) var(X1) var(Y1) var(X2) var(Y2) var(X3) var(Y3) var(X4) var(Y4) EOS
0x1f19…1f3f 2435 IF = ( var(X2) var(X1) SUB2 ) ?ABS 1e-08 ?< COMMA 27 var(X2) COMMA var(X2) 1e-08 PLUS EOS
0x1f3f…1f63 2440 LET var(M) COMMA ( var(X2) var(X1) SUB2 ) ( var(Y1) var(Y3) SUB2 ) MULT ( var(X1) var(X3) SUB2 ) ( var(Y2) var(Y1) SUB2 ) MULT SUB2 EOS
0x1f63…1f8c 2445 LET var(M) COMMA var(M) ( ( var(X2) var(X1) SUB2 ) ( var(Y4) var(Y3) SUB2 ) MULT ( var(X4) var(X3) SUB2 ) ( var(Y2) var(Y1) SUB2 ) MULT SUB2 ) DIV EOS
0x1f8c…1fad 2450 LET var(L) COMMA ( var(M) ( var(X4) var(X3) SUB2 ) MULT ( var(X1) var(X3) SUB2 ) SUB2 ) ( var(X2) var(X1) SUB2 ) DIV EOS
0x1fad…1fbf 2455 LET var(X5) COMMA var(X3) var(M) ( var(X4) var(X3) SUB2 ) MULT PLUS EOS
0x1fbf…1fd1 2460 LET var(Y5) COMMA var(Y3) var(M) ( var(Y4) var(Y3) SUB2 ) MULT PLUS EOS
0x1fd1…1fec 2465 IF var(L) 0 → ebf103403e01e9f103403d00ebf103403d01e9f10501f3
0x1fec…1fef 2470 RETURN 0 EOS
0x1fef…1ff0 2475 FNEND
0x1ff0…2011 2500 REM --------RECORD TO OUTPUTFILE
0x2011…2015 2510 REM
0x2015…201f 2520 DEF var(FNU9%) var(R%) var(Y9) var(X9) EOS
0x201f…2026 2587 LET var(W2%) COMMA var(W2%) 1 PLUS EOS
0x2026…204c 2590 PRINT 2# SEMI USING »#« COMMA var(R%) SEMI USING var(F0$) COMMA var(Q0%) SEMI var(S0$) SEMI var(R0$) SEMI USING var(F1$) COMMA var(X9) SEMI USING var(F1$) COMMA var(Y9) SEMI USING var(F2$) COMMA var(Z0) EOS
0x204c…206b 2598 PRINT = ( 27 ) → af71736f460074afe271732474afe271736f550074afe2f261f3
0x206b…2072 2600 LET var(Z1%) COMMA var(Z1%) 1 PLUS EOS
0x2072…207e 2605 IF var(R0$) var(Q0$) <> COMMA 27 var(X%) COMMA = var(FNU8%) EOS
0x207e…2081 2606 RETURN 1 EOS
0x2081…2082 2608 FNEND
0x2082…20a3 2610 REM ----OLD PARAM FROM WRITEFILE
0x20a3…20a7 2620 DEF var(FNO3%) EOS
0x20a7…20ad 2625 LINPUT 2# SEMI var(P1$) EOS
0x20ad…20cf 2630 LINPUT 2# SEMI var(P$) EOS 32 var(T$) var(R0$) 46 var(C%') var(P9$) var(X1') var(F2$) var(P$) var(F0$) 32 44 var(X$) 46 var(S0$) var(A%') var(Y1') var(F2$) var(F2$) 44 var(A%') 46 var(R$) var(P$) var(P4$) var(R0$) 46 var(F2$)
0x20cf…20df 2631 LET var(V0) COMMA = ( ELEMENT var(P$) ( 1 13 ) [] ) VAL EOS
0x20df…20ef 2632 LET var(M0) COMMA = ( ELEMENT var(P$) ( 14 20 ) [] ) VAL EOS
0x20ef…20fa 2640 LET var(P4$) COMMA ELEMENT var(P$) ( 21 21 ) [] EOS
0x20fa…2100 2645 196c01f105f3
0x2100…2106 2652 LINPUT 2# SEMI var(P$) EOS
0x2106…211a 2655 LET ELEMENT var(X1') ( var(L%) ) [] COMMA = ( ELEMENT var(P$) ( 32 43 ) [] ) VAL EOS
0x211a…212e 2656 LET ELEMENT var(Y1') ( var(L%) ) [] COMMA = ( ELEMENT var(P$) ( 20 31 ) [] ) VAL EOS
0x212e…2131 2660 1a6cf3
0x2131…2146 2665 LET var(W8) COMMA = ( var(V0) ) → a9f14043f17173401574a8f3
0x2146…2149 2670 RETURN 1 EOS
0x2149…214a 2675 FNEND
0x214a…2169 2678 REM -------- RECREATE TAB-FILE
0x2169…216d 2680 DEF var(FNO6%) EOS
0x216d…2178 2682 LET var(X%) COMMA = ( 2 20 5 ) var(FNC%) EOS
0x2178…219d 2684 PRINT var(T$) SEMI » Feil,filen dannes paa nytt : « SEMI EOS
0x219d…21a0 2685 1403f3
0x21a0…21a5 2686 1e44f168f3
0x21a5…21c5 2687 1603f24470163b4143433d4e45573b5245433d31323b524c3d353132e2f168f3
0x21c5…21cd 2688 IF var(Z1%) 6 EQ COMMA 0 37 39
0x21cd…21d3 2690 LET var(I%) COMMA 7 EOS
0x21d3…21dc 2694 LINPUT 2# COMMA var(I%) SEMI var(P$) EOS
0x21dc…21ed 2696 LET ELEMENT var(Q0$) ( 1 8 ) [] COMMA ELEMENT var(P$) ( 12 19 ) [] EOS
0x21ed…21f3 2698 LET var(X%) COMMA var(I%) EOS
0x21f3…21f9 2700 REM C
0x21f9…2202 2702 LET var(I%) COMMA var(I%) 1 PLUS EOS
0x2202…220b 2704 LINPUT 2# COMMA var(I%) SEMI var(P$) EOS
0x220b…2215 2706 IF = ( 2 ) → b1f1002227
0x2215…2223 2708 IF var(Q0$) ELEMENT var(P$) ( 12 19 ) [] EQ COMMA 0 0 39
0x2223…2236 2710 13f403f2725e730108749ff168f1400701e3f3
0x2236…2247 2712 LET ELEMENT var(Q0$) ( 1 8 ) [] COMMA ELEMENT var(P$) ( 12 19 ) [] EOS
0x2247…224d 2714 LET var(X%) COMMA var(I%) EOS
0x224d…2250 2720 GOTO 0 39
0x2250…2256 2722 REM C
0x2256…2269 2724 13f403f2725e730108749ff168f1400701e3f3
0x2269…226f 2725 REM C
0x226f…227a 2726 LET var(X%) COMMA = ( 3 20 5 ) var(FNC%) EOS
0x227a…227d 2732 RETURN 1 EOS
0x227d…227e 2734 FNEND
0x227e…229f 2895 REM -------- COMPUTE TESTCORNERS
0x229f…22a3 2900 DEF var(FNR1%) EOS
0x22a3…22aa 2905 19400701f105f3
0x22aa…22c9 2910 LET ELEMENT var(X2') ( var(I%) ) [] COMMA ELEMENT var(X1') ( var(I%) ) [] var(W9) MULT ELEMENT var(Y1') ( var(I%) ) [] var(W8) MULT SUB2 EOS
0x22c9…22e8 2915 LET ELEMENT var(Y2') ( var(I%) ) [] COMMA ELEMENT var(Y1') ( var(I%) ) [] var(W9) MULT ELEMENT var(X1') ( var(I%) ) [] var(W8) MULT PLUS EOS
0x22e8…22ec 2920 1a4007f3
0x22ec…22ef 2925 RETURN 0 EOS
0x22ef…22f0 2930 FNEND
0x22f0…2311 2990 REM ------------ PROGRAM HEADING
0x2311…2315 3000 DEF var(FNR2%) EOS
0x2315…2319 3005 REM
0x2319…2324 3010 LET var(X%) COMMA = ( 1 2 1 ) var(FNC%) EOS
0x2324…2342 3015 PRINT = ( 31 ) → b5f270144d20412050204420412054202050204c204f2054f3
0x2342…2344 3020 PRINT EOS
0x2344…2384 3030 PRINT = ( 13 ) → b5f270362a2a2a2a2a2020202a2a2a2a2a2020202a2a2a2a2a2a20202a2a2a2a2a202020202a2a2a2a2020202a2a2a2a2a2020202a2a2a2a2a2af3
0x2384…23c4 3035 PRINT = ( 13 ) → b5f270362a202020202a20202a202020202a20202a202020202020202a202020202a20202a202020202a20202a202020202a20202a2020202020f3
0x23c4…2404 3040 PRINT = ( 13 ) → b5f270362a2a2a2a2a2020202a2a2a2a2a2020202a2a2a2a2a2020202a2a2a2a2a2020202a2a2a2a2a2a20202a2a2a2a2a2020202a2a2a2a2a20f3
0x2404…2444 3045 PRINT = ( 13 ) → b5f270362a202020202020202a20202a202020202a202020202020202a202020202020202a202020202a20202a20202a202020202a2020202020f3
0x2444…2484 3050 PRINT = ( 13 ) → b5f270362a202020202020202a2020202a2020202a2a2a2a2a2a20202a202020202020202a202020202a20202a2020202a2020202a2a2a2a2a2af3
0x2484…2486 3055 PRINT EOS
0x2486…24c3 3060 PRINT = ( 13 ) → b5f270332020502052204520502041205220452020204420412054204120202046204f205220202050204c204f205420542049204e2047f3
0x24c3…24c5 3065 PRINT EOS
0x24c5…24e8 3070 PRINT = ( 25 ) → b5f270195620492041204b202044204120542041202052454c20322e31f3
0x24e8…24ea 3075 PRINT EOS
0x24ea…24f2 3080 PRINT = ( 20 ) → b5f2f3
0x24f2…251f 3085 INPUT »Hard-disk eller floppy-system ? (H/F) :« COMMA var(X$) EOS
0x251f…2529 3090 LET var(F6%) COMMA var(X$) »H« EQ EOS
0x2529…2537 3094 1605f27008504c414e2e445441f3
0x2537…253a 3095 RETURN 1 EOS
0x253a…253b 3098 FNEND
0x253b…255c 3100 REM --------------- MAIN PROGRAM
0x255c…2578 3101 GOSUB 0 → 9520494e495449455220534f52544552494e4753544142454c4c
0x2578…257f 3102 LET var(X%) COMMA = var(FNR2%) EOS
0x257f…25b1 3110 REM C ------- DEFINE NEXT ENTRY IN SPOOLING QUEUE
0x25b1…25b9 3120 IF = var(FNO1%) → eff1003035
0x25b9…25dc 3130 LET var(F2%) COMMA = var(FNO2%) EOS 32 32 45 45 45 45 45 45 45 32 32 var(Y1') var(X') var(P$) var(X1') 32 var(Y1') var(B%') var(A%') var(X') var(B%') var(A%') 45 var(P1$) var(P9$) var(F0$) var(P$)
0x25dc…25e5 3135 IF var(F2%) 2 EQ COMMA 0 48 53
0x25e5…25e8 3140 GOSUB 0 var(FNU8%)
0x25e8…25ee 3150 IF var(F2%) COMMA 34 EOS
0x25ee…25f5 3160 LET var(X%) COMMA = var(FNO3%) EOS
0x25f5…25f8 3215 GOSUB 0 → 76
0x25f8…25fb 3220 GOSUB 0 var(P4$)
0x25fb…25fc 3225 DOEND
0x25fc…2600 3230 ELSE 1 0 var(R$)
0x2600…2606 3260 REM C
0x2606…2611 3265 LET var(X%) COMMA = ( 4 21 1 ) var(FNC%) EOS
0x2611…261c 3270 LET var(X%) COMMA = ( 2 21 24 ) var(FNC%) EOS
0x261c…2634 3280 INPUT »--- OK ? (J/N) : « COMMA var(X$) EOS
0x2634…263d 3310 IF var(X$) »N« EQ COMMA 34 EOS
0x263d…2645 3311 IF var(F2%) → eff1010048
0x2645…2649 3312 ELSE 1 0 var(P4$)
0x2649…264c 3314 GOTO var(W1%) 50
0x264c…264d 3320 DOEND
0x264d…2657 3330 IF var(X$) »J« <> COMMA 0 var(W1%) 50
0x2657…2663 3350 IF var(F2%) → eff11b68f1714014f3
0x2663…266a 3525 LET var(X%) COMMA = var(FNR5%) EOS
0x266a…2670 3530 REM C
0x2670…2673 3535 1402f3
0x2673…2675 3536 PRINT EOS
0x2675…2680 3538 LET var(X%) COMMA = ( 2 22 10 ) var(FNC%) EOS
0x2680…26ad 3540 INPUT »Flere sorteringsdefinisjoner ? (J/N) : « COMMA var(X$) EOS
0x26ad…26b7 3545 IF var(X$) »J« EQ COMMA 0 16 49
0x26b7…26bf 3550 PRINT 5# SEMI »*« EOS
0x26bf…26ca 3552 LET var(X%) COMMA = ( 1 1 1 ) var(FNC%) EOS
0x26ca…26d7 3553 1e70074c4f472e445441f168f3
0x26d7…26e4 3554 1606f270074c4f472e445441f3
0x26e4…2705 3555 REM ------ START SPOOLING-SYSTEM
0x2705…2709 3560 RESTORE 5# EOS
0x2709…270d 3565 TRAP ERR 8500
0x270d…272c 3570 REM NEXT SORTING JOB FROM FILE
0x272c…2732 3580 LINPUT 5# SEMI var(W$) EOS
0x2732…274e 3590 IF var(W$) »*« EQ COMMA 0 0 → 99205445524d494e4154452050524f4752414d
0x274e…2766 3720 GOSUB 0 → 8820494e495449415445204e455720534f52544a4f42
0x2766…277e 3760 REM OPEN NEXT INPUTFILE
0x277e…2784 3770 LINPUT 5# SEMI var(R$) EOS
0x2784…2786 3800 PRINT EOS
0x2786…27a3 3810 IF var(R$) »*« <> COMMA 1 0 → 9320494e4954204e455720494e50555446494c45
0x27a3…27b9 3835 ELSE 0 0 → 8720534f52542d4a4f422046494e4953484544
0x27b9…27ec 3840 REM C ~~~~~~~~~~~~ inner sort loop ~~~~~~~~~~~~~~~
0x27ec…27f2 3850 LINPUT 1# SEMI var(P$) EOS
0x27f2…27fc 3860 IF = ( 1 ) → b1f1000086
0x27fc…2806 3870 ON var(W8%) COMMA 1 0 → 806081f3
0x2806…280f 3880 IF var(R0%) 4 <> COMMA 0 32 57
0x280f…2818 3890 IF = var(FNH%) → eff1002039
0x2818…281b 3900 GOSUB 0 (
0x281b…281e 3910 GOTO var(FNS%)
0x281e…2824 3920 REM C
0x2824…2827 3940 GOSUB 0 var(W1%)
0x2827…282a 3995 GOTO var(FNS%)
0x282a…285f 3998 REM ~~~~~~~~~~~~~~ end inner sort loop ~~~~~~~~~~~~~
0x285f…2883 4000 REM PRINT PARAMETER FORM TO SCREEN
0x2883…2887 4005 REM
0x2887…2892 4010 LET var(X%) COMMA = ( 1 1 1 ) var(FNC%) EOS
0x2892…2894 4020 PRINT EOS
0x2894…28b9 4030 PRINT = ( 10 ) → b5f2701a49204e2050205520542020204120562020205020412052204120f2f3
0x28b9…28e0 4031 PRINT »M E T E R E T I L P R E P A R E« EOS
0x28e0…2905 4035 PRINT = ( 10 ) → b5f2701a3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3df2f3
0x2905…292c 4036 PRINT »===================================« EOS
0x292c…292e 4040 PRINT EOS
0x292e…2957 4045 PRINT = ( 10 ) → b5f2701f312e2020476920706c616e2d696420286d616b73203530207465676e29203af3
0x2957…296d 4050 PRINT = ( 10 ) → b5f2700c2020202054656b7374203a20f3
0x296d…296f 4055 PRINT EOS
0x296f…2998 4060 PRINT = ( 10 ) → b5f2701f322e20204769206d61616c6573746f6b6b74616c6c2020202020202020203af3
0x2998…299a 4065 PRINT EOS
0x299a…29d9 4070 PRINT = ( 10 ) → b5f27035332e2020476920686a30726e652d6b6f6f7264696e6174657220202020203a20202020202020202020592020202020202020202058f3
0x29d9…2a02 4075 PRINT = ( 10 ) → b5f2701f2020202020202031202d20284e65647265206830797265292020202020203af3
0x2a02…2a2b 4080 PRINT = ( 10 ) → b5f2701f2020202020202032202d20284e656472652076656e7374726529202020203af3
0x2a2b…2a54 4085 PRINT = ( 10 ) → b5f2701f2020202020202033202d2028307672652076656e737472652920202020203af3
0x2a54…2a7d 4090 PRINT = ( 10 ) → b5f2701f2020202020202034202d20283076726520683079726529202020202020203af3
0x2a7d…2a7f 4100 PRINT EOS
0x2a7f…2aa8 4105 PRINT = ( 10 ) → b5f2701f342e20204769207465676e6562656772656e736e696e672028532f5529203af3
0x2aa8…2aaa 4110 PRINT EOS
0x2aaa…2ad3 4115 PRINT = ( 10 ) → b5f2701f352e202047692074656d616b6f64657220666f72206875732020202020203af3
0x2ad3…2ae9 4120 PRINT = ( 10 ) → b5f2700c2020202054656d6120203a20f3
0x2ae9…2aeb 4125 RETURN EOS
0x2aeb…2b12 4200 REM ----------------- SUB INPUT PARAM
0x2b12…2b18 4202 LET var(F1%) COMMA 0 EOS
0x2b18…2b1c 4205 REM
0x2b1c…2b26 4220 LET var(P1$) COMMA = ( 6 22 ) var(FNP$) EOS
0x2b26…2b2d 4227 IF var(F1%) COMMA 0 → 9047
0x2b2d…2b33 4228 REM C
0x2b33…2b3f 4230 LET var(M0) COMMA = ( 8 42 ) var(FNP) EOS
0x2b3f…2b46 4245 IF var(F1%) COMMA 0 → 9047
0x2b46…2b4c 4250 REM C
0x2b4c…2b53 4340 19400701f104f3
0x2b53…2b62 4350 LET var(P3) COMMA = ( 10 var(I%) PLUS 42 ) var(FNP) EOS
0x2b62…2b74 4355 IF var(P3) 0 <> COMMA 27 ELEMENT var(Y1') ( var(I%) ) [] COMMA var(P3) EOS
0x2b74…2b82 4356 LET var(X%) COMMA = ( 2 10 var(I%) PLUS 42 ) var(FNC%) EOS
0x2b82…2b8e 4358 PRINT USING var(F1$) COMMA ELEMENT var(Y1') ( var(I%) ) [] EOS
0x2b8e…2b9d 4370 LET var(P3) COMMA = ( 10 var(I%) PLUS 56 ) var(FNP) EOS
0x2b9d…2baf 4380 IF var(P3) 0 <> COMMA 27 ELEMENT var(X1') ( var(I%) ) [] COMMA var(P3) EOS
0x2baf…2bbd 4385 LET var(X%) COMMA = ( 2 10 var(I%) PLUS 56 ) var(FNC%) EOS
0x2bbd…2bc9 4390 PRINT USING var(F1$) COMMA ELEMENT var(X1') ( var(I%) ) [] EOS
0x2bc9…2bcd 4502 1a4007f3
0x2bcd…2bdc 4505 LET ELEMENT var(X1') ( 5 ) [] COMMA ELEMENT var(X1') ( 1 ) [] EOS
0x2bdc…2beb 4510 LET ELEMENT var(Y1') ( 5 ) [] COMMA ELEMENT var(Y1') ( 1 ) [] EOS
0x2beb…2bf2 4520 IF var(F1%) COMMA 0 → 9047
0x2bf2…2bfc 4550 LET var(P4$) COMMA = ( 16 42 ) var(FNP$) EOS
0x2bfc…2c0c 4555 IF var(P4$) »S« <> var(P4$) »U« <> AND COMMA 0 var(X') var(P$)
0x2c0c…2c17 4560 LET var(X%) COMMA = ( 2 16 42 ) var(FNC%) EOS
0x2c17…2c2a 4565 IF var(P4$) »S« EQ COMMA 15 »STANDARD« EOS
0x2c2a…2c36 4570 ELSE 15 »Utvidet« EOS
0x2c36…2c3d 4670 IF var(F1%) COMMA 0 → 9047
0x2c3d…2c48 4700 LET var(I1%) COMMA 12 COMMA var(I2%) COMMA 10 EOS
0x2c48…2c4e 4705 LET var(P5%) COMMA 0 EOS
0x2c4e…2c55 4710 19400701f105f3
0x2c55…2c6b 4730 LET ELEMENT var(P5$<254f>) ( var(I%) ) [] COMMA = ( 19 ( var(I1%) var(I2%) PLUS ) ) var(FNP$) EOS
0x2c6b…2c7d 4735 IF ELEMENT var(P5$<254f>) ( var(I%) ) [] »« EQ COMMA 27 var(I%) COMMA 5 EOS
0x2c7d…2c80 4740 ELSE 34 EOS
0x2c80…2c87 4760 LET var(P5%) COMMA var(I%) EOS
0x2c87…2c97 4762 LET var(K%) COMMA = ( ELEMENT var(P5$<254f>) ( var(I%) ) [] ) LEN EOS
0x2c97…2cb9 4764 IF var(K%) 8 ?< COMMA 27 ELEMENT var(P5$<254f>) ( var(I%) ) [] COMMA ELEMENT var(P9$) ( 1 8 var(K%) SUB2 ) [] ELEMENT var(P5$<254f>) ( var(I%) ) [] PLUS EOS
0x2cb9…2cc2 4775 LET var(I2%) COMMA var(I2%) 10 PLUS EOS
0x2cc2…2cc3 4777 DOEND
0x2cc3…2cc7 4780 1a4007f3
0x2cc7…2ccd 4790 REM C
0x2ccd…2ccf 4795 RETURN EOS
0x2ccf…2cfa 4800 REM --------------- SUB CORRECT PARAMETERS
0x2cfa…2cfe 4805 REM
0x2cfe…2d04 4806 LET var(F1%) COMMA 1 EOS
0x2d04…2d0f 4808 LET var(X%) COMMA = ( 3 22 24 ) var(FNC%) EOS
0x2d0f…2d1a 4810 LET var(X%) COMMA = ( 2 22 24 ) var(FNC%) EOS
0x2d1a…2d1e 4815 TRAP ERR 4805
0x2d1e…2d37 4820 INPUT »--- Rett nr. : « COMMA var(B1%) EOS
0x2d37…2d3a 4830 TRAP ERR OFF
0x2d3a…2d48 4840 IF var(B1%) 1 ?< var(B1%) 5 > OR COMMA 0 5 var(P5$<254f>)
0x2d48…2d58 4850 ON var(B1%) COMMA 0 5 var(R$) 48 var(R$) var(X') var(R$) var(X') var(P$) 0 var(P4$) EOS
0x2d58…2d5a 4860 RETURN EOS
0x2d5a…2d83 6000 REM -------- INPUT SINGLE POINT FOR SORT
0x2d83…2d93 6005 LET var(X3) COMMA var(X0) var(W9) MULT var(Y0) var(W8) MULT SUB2 EOS
0x2d93…2da3 6010 LET var(Y3) COMMA var(Y0) var(W9) MULT var(X0) var(W8) MULT PLUS EOS
0x2da3…2db4 6015 IF var(X3) ELEMENT var(X2') ( 2 ) [] > COMMA 27 var(N0%) COMMA 1 EOS
0x2db4…2dc6 6020 ELSE 3 var(X3) ELEMENT var(X2') ( 1 ) [] > COMMA 27 var(N0%) COMMA 4 EOS
0x2dc6…2dcd 6025 ELSE 27 var(N0%) COMMA 7 EOS
0x2dcd…2de1 6030 IF var(Y3) ELEMENT var(Y2') ( 4 ) [] > COMMA 27 var(N0%) COMMA var(N0%) 2 PLUS EOS
0x2de1…2df6 6035 ELSE 3 var(Y3) ELEMENT var(Y2') ( 1 ) [] > COMMA 27 var(N0%) COMMA var(N0%) 1 PLUS EOS
0x2df6…2e04 6100 IF ELEMENT var(T0%'<20b3>) ( var(N4%) var(N0%) ) [] COMMA 1 var(X') =
0x2e04…2e19 6150 IF var(N0%) 5 EQ COMMA 27 var(X%) COMMA = ( var(R0%) var(X0) var(Y0) ) var(FNU9%) EOS
0x2e19…2e2c 7135 LET var(X4) COMMA var(X0) COMMA var(Y4) COMMA var(Y0) COMMA var(N4%) COMMA var(N0%) EOS
0x2e2c…2e2e 7140 RETURN EOS
0x2e2e…2e5c 7150 REM --------- SUBROUTINE FRAME INTERSECTION
0x2e5c…2e69 7155 IF var(R0%) 2 ?< var(R0%) 4 EQ OR COMMA 5 EOS
0x2e69…2e72 7160 LET var(F5%) COMMA var(N4%) 5 EQ EOS
0x2e72…2e99 7162 LET var(J1%) COMMA ELEMENT var(A0%') ( ELEMENT var(T0%'<20b3>) ( var(N4%) var(N0%) ) [] ) [] COMMA var(J2%) COMMA ELEMENT var(B0%') ( ELEMENT var(T0%'<20b3>) ( var(N4%) var(N0%) ) [] ) [] EOS
0x2e99…2ea2 7165 194007405ef1405ff3
0x2ea2…2ed5 7170 IF = ( var(X0) var(Y0) var(X4) var(Y4) ELEMENT var(X1') ( var(I%) ) [] ELEMENT var(Y1') ( var(I%) ) [] ELEMENT var(X1') ( var(I%) 1 PLUS ) [] ELEMENT var(Y1') ( var(I%) 1 PLUS ) [] ) var(FNS%) → eff1003072
0x2ed5…2ee8 7190 IF var(F5%) → eff11b68f171730140224021744018f3
0x2ee8…2ef7 7195 ELSE 27 var(X%) COMMA = ( 3 var(X5) var(Y5) ) var(FNU9%) EOS
0x2ef7…2eff 7200 LET var(F5%) COMMA var(F5%) → eff3
0x2eff…2f03 7230 1a4007f3
0x2f03…2f05 7240 RETURN EOS
0x2f05…2f2b 7300 REM --------- SUBROUTINE BUFFER HOUSE
0x2f2b…2f2f 7305 REM
0x2f2f…2f35 7310 LET var(I%) COMMA 1 EOS
0x2f35…2f41 7320 LET ELEMENT var(X') ( var(I%) ) [] COMMA var(X0) EOS
0x2f41…2f4d 7330 LET ELEMENT var(Y') ( var(I%) ) [] COMMA var(Y0) EOS
0x2f4d…2f5a 7340 REM C REPEAT
0x2f5a…2f64 7342 IF var(I%) %200 EQ COMMA 5 EOS
0x2f64…2f6a 7345 LINPUT 1# SEMI var(P$) EOS
0x2f6a…2f74 7350 ON var(W8%) COMMA 1 0 → 806081f3
0x2f74…2f7d 7360 LET var(I%) COMMA var(I%) 1 PLUS EOS
0x2f7d…2f89 7370 LET ELEMENT var(X') ( var(I%) ) [] COMMA var(X0) EOS
0x2f89…2f95 7380 LET ELEMENT var(Y') ( var(I%) ) [] COMMA var(Y0) EOS
0x2f95…2f9e 7390 IF var(R0%) 6 <> COMMA 0 var(A0x73)
0x2f9e…2fa5 7400 LET var(N9%) COMMA var(I%) EOS
0x2fa5…2fad 7405 IF var(N9%) 3 → e9f105f3
0x2fad…2fb8 7410 LET var(X%) COMMA = ( var(N9%) ) var(FNG%) EOS
0x2fb8…2fbd 7412 IF var(X%) COMMA 34 EOS
0x2fbd…2fdb 7414 LET var(G2%) COMMA var(X%) COMMA var(G1%) COMMA var(G2%) 1 SUB2 COMMA var(G3%) COMMA var(G2%) 1 PLUS COMMA var(G4%) COMMA var(G2%) 2 PLUS EOS
0x2fdb…2fea 7416 IF var(G1%) 0 EQ COMMA 27 var(G1%) COMMA var(N9%) 1 SUB2 EOS
0x2fea…2ff7 7418 IF var(G4%) var(N9%) > COMMA 27 var(G4%) COMMA 2 EOS
0x2ff7…3038 7423 LET var(X%) COMMA = ( ELEMENT var(X') ( var(G1%) ) [] ELEMENT var(Y') ( var(G1%) ) [] ELEMENT var(X') ( var(G2%) ) [] ELEMENT var(Y') ( var(G2%) ) [] ELEMENT var(X') ( var(G3%) ) [] ELEMENT var(Y') ( var(G3%) ) [] ELEMENT var(X') ( var(G4%) ) [] ELEMENT var(Y') ( var(G4%) ) [] ) var(FNM1%) EOS
0x3038…304a 7424 19684056f14059f16e8100000000000081f3
0x304a…306b 7425 LET ELEMENT var(X') ( var(X%) 1 PLUS ) [] COMMA ELEMENT var(X') ( var(X%) ) [] COMMA ELEMENT var(Y') ( var(X%) 1 PLUS ) [] COMMA ELEMENT var(Y') ( var(X%) ) [] EOS
0x306b…306e 7427 1a68f3
0x306e…307a 7428 LET ELEMENT var(X') ( var(G3%) ) [] COMMA var(X5) EOS
0x307a…3086 7430 LET ELEMENT var(Y') ( var(G3%) ) [] COMMA var(Y5) EOS
0x3086…308f 7431 LET var(N9%) COMMA var(N9%) 1 PLUS EOS
0x308f…3090 7432 DOEND
0x3090…309b 7435 LET var(X%) COMMA = ( var(N9%) ) var(FNV%) EOS
0x309b…30a9 7437 LET var(S0$) COMMA » « EOS
0x30a9…30c3 7438 LET var(X0) COMMA ELEMENT var(X') ( 1 ) [] COMMA var(Y0) COMMA ELEMENT var(Y') ( 1 ) [] COMMA var(R0%) COMMA 4 EOS
0x30c3…30c6 7439 GOSUB 0 var(W1%)
0x30c6…30cc 7440 LET var(R0%) COMMA 5 EOS
0x30cc…30d6 7441 19405b02f1405601e3f3
0x30d6…30ed 7445 LET var(X0) COMMA ELEMENT var(X') ( var(J5%) ) [] COMMA var(Y0) COMMA ELEMENT var(Y') ( var(J5%) ) [] EOS
0x30ed…30f0 7470 GOSUB 0 var(W1%)
0x30f0…30f4 7480 1a405bf3
0x30f4…3110 7485 LET var(X0) COMMA ELEMENT var(X') ( var(N9%) ) [] COMMA var(Y0) COMMA ELEMENT var(Y') ( var(N9%) ) [] COMMA var(R0%) COMMA 6 EOS
0x3110…3113 7487 GOSUB 0 var(W1%)
0x3113…3115 7490 RETURN EOS
0x3115…314b 7600 REM ---------------- SUBROUTINE OLD PARAM TO SCREEN
0x314b…3156 7610 LET var(X%) COMMA = ( 2 6 22 ) var(FNC%) EOS
0x3156…3159 7620 PRINT var(P1$) EOS
0x3159…3164 7630 LET var(X%) COMMA = ( 2 8 42 ) var(FNC%) EOS
0x3164…3172 7640 PRINT USING »######« COMMA var(M0) EOS
0x3172…3179 7650 19400701f104f3
0x3179…3187 7660 LET var(X%) COMMA = ( 2 var(I%) 10 PLUS 42 ) var(FNC%) EOS
0x3187…3193 7670 PRINT USING var(F1$) COMMA ELEMENT var(X1') ( var(I%) ) [] EOS
0x3193…31a1 7680 LET var(X%) COMMA = ( 2 var(I%) 10 PLUS 56 ) var(FNC%) EOS
0x31a1…31ad 7690 PRINT USING var(F1$) COMMA ELEMENT var(Y1') ( var(I%) ) [] EOS
0x31ad…31b1 7700 1a4007f3
0x31b1…31bc 7710 LET var(X%) COMMA = ( 2 16 42 ) var(FNC%) EOS
0x31bc…31cf 7720 IF var(P4$) »S« EQ COMMA 15 »STANDARD« EOS
0x31cf…31db 7730 ELSE 15 »UTVIDET« EOS
0x31db…31dd 7810 RETURN EOS
0x31dd…31fe 8000 REM ------ INPUT DIG.FILE RECORD
0x31fe…321b 8020 IF ELEMENT var(P$) ( 4 4 ) [] » « <> COMMA 27 var(R0%) COMMA = ( ELEMENT var(P$) ( 4 4 ) [] ) VAL EOS
0x321b…3222 8030 ELSE 27 var(R0%) COMMA 0 EOS
0x3222…3231 8040 LET var(Q0%) COMMA = ( ELEMENT var(P$) ( 5 6 ) [] ) VAL EOS
0x3231…3250 8050 IF var(Q0%) 15 EQ var(Q0%) 31 EQ OR COMMA 27 var(K%) COMMA 1 COMMA ELEMENT var(S0$) ( 1 8 ) [] COMMA ELEMENT var(P$) ( 8 15 ) [] EOS
0x3250…3264 8060 ELSE 27 var(K%) COMMA 2 COMMA var(S0$) COMMA » « EOS
0x3264…327b 8070 LET var(R0$) COMMA ELEMENT var(P$) ( ELEMENT var(A%') ( var(K%) ) [] ELEMENT var(W%') ( var(K%) ) [] ) [] EOS
0x327b…3297 8080 LET var(Y0) COMMA = ( ELEMENT var(P$) ( ELEMENT var(B%') ( var(K%) ) [] ELEMENT var(X%') ( var(K%) ) [] ) [] ) VAL EOS
0x3297…32b3 8090 LET var(X0) COMMA = ( ELEMENT var(P$) ( ELEMENT var(C%') ( var(K%) ) [] ELEMENT var(Y%') ( var(K%) ) [] ) [] ) VAL EOS
0x32b3…32d3 8100 IF var(Q0%) 15 > COMMA 27 var(Z0) COMMA = ( ELEMENT var(P$) ( ELEMENT var(D%') ( var(K%) ) [] ELEMENT var(Z%') ( var(K%) ) [] ) [] ) VAL EOS
0x32d3…32e1 8110 ELSE 27 var(Z0) COMMA -200 EOS
0x32e1…32e8 8120 LET var(W1%) COMMA var(W1%) 1 PLUS EOS
0x32e8…3307 8130 PRINT = ( 27 ) → af71736f460074afe271732974afe271736f550074afe2f260f3
0x3307…3309 8140 RETURN EOS
0x3309…332a 8160 REM ------ INPUT SORTFILE-RECORD
0x332a…333a 8180 LET var(R0%) COMMA = ( ELEMENT var(P$) ( 1 1 ) [] ) VAL EOS
0x333a…3349 8190 LET var(Q0%) COMMA = ( ELEMENT var(P$) ( 2 3 ) [] ) VAL EOS
0x3349…3354 8200 LET var(S0$) COMMA ELEMENT var(P$) ( 4 11 ) [] EOS
0x3354…335f 8210 LET var(R0$) COMMA ELEMENT var(P$) ( 12 19 ) [] EOS
0x335f…336f 8220 LET var(X0) COMMA = ( ELEMENT var(P$) ( 32 43 ) [] ) VAL EOS
0x336f…337f 8230 LET var(Y0) COMMA = ( ELEMENT var(P$) ( 20 31 ) [] ) VAL EOS
0x337f…338e 8240 LET var(Z0) COMMA = ( ELEMENT var(P$) ( 44 51 ) [] ) VAL EOS
0x338e…3395 8250 LET var(W1%) COMMA var(W1%) 1 PLUS EOS
0x3395…33b4 8260 PRINT = ( 27 ) → af71736f460074afe271732974afe271736f550074afe2f260f3
0x33b4…33b6 8270 RETURN EOS
0x33b6…33d6 8500 REM ------------- ERROR MESSAGE
0x33d6…33f1 8510 PRINT 6# SEMI »Feil ved inputfil « COMMA var(R$) EOS
0x33f1…33f5 8525 TRAP ERR 8500
0x33f5…3424 8600 REM ------------ TERMINATE INPUT FROM READFILE
0x3424…3441 8610 PRINT 6# SEMI var(W1%) SEMI » Records lest fra « SEMI var(R$) EOS
0x3441…3444 8620 1401f3
0x3444…3447 8690 GOTO var(W1%) 55
0x3447…346a 8700 REM ----------- TERMINATE SORT-JOB
0x346a…348a 8710 PRINT 6# SEMI var(W2%) SEMI » Records sortert til « SEMI var(W$) EOS
0x348a…348f 8720 PRINT 6# SEMI EOS
0x348f…3499 8730 13f403f25ef165f166f3
0x3499…34a8 8740 LET var(W2%) COMMA 0 COMMA var(Q0$) COMMA »DUMMY« EOS
0x34a8…34ab 8745 1402f3
0x34ab…34ae 8750 GOTO »\x0bp! --------- INITIATE NEW SORT-JOB
«si»\xf3\x1bh\xf1qs\x03\x05\x05ti\xf3«si»p«so»S«
0x34ae…34d2 8800 REM --------- INITIATE NEW SORT-JOB
0x34d2…34d4 8820 PRINT EOS
0x34d4…34df 8830 LET var(X%) COMMA = ( 3 5 5 ) var(FNC%) EOS
0x34df…34f3 8840 PRINT »Skriver til : « SEMI var(W$) EOS
0x34f3…350b 8850 1602f243700e3b4143433d494e3b5245433d3532e2f168f3
0x350b…3517 8860 LET var(T$) COMMA var(W$) ».TAB« PLUS EOS
0x3517…351d 8870 LET var(I%) COMMA 0 EOS
0x351d…3523 8880 REM C
0x3523…352c 8890 LET var(I%) COMMA var(I%) 1 PLUS EOS
0x352c…3538 8900 LINPUT 5# SEMI ELEMENT var(P5$<254f>) ( var(I%) ) [] EOS
0x3538…3548 8910 IF ELEMENT var(P5$<254f>) ( var(I%) ) [] »*« <> COMMA 0 → 8088
0x3548…3552 8920 ELSE 27 var(P5%) COMMA var(I%) 1 SUB2 EOS
0x3552…356c 9010 LET var(X%) COMMA = var(FNO3%) EOS 32 var(P4$) var(P$) var(A%') 32 var(Y1') var(F0$) var(T$) 32 var(X') var(R1$<2151>) var(R0$) var(R1$<2151>) var(X$) var(P$) var(A%') var(P$) var(R0$) var(S0$)
0x356c…357e 9020 IF var(P4$) »U« EQ COMMA 27 var(X%) COMMA = ( var(M0) ) var(FNR%) EOS
0x357e…3599 9050 LET var(X%) COMMA = var(FNR1%) EOS var(W$) var(Y1') var(X$) var(X') var(B%') var(A%') var(P$) 32 var(A%') var(P$) var(S0$) var(A%') 45 var(W$) var(Y1') var(R0$) var(X1') var(P$) var(R0$) var(S0$)
0x3599…35a4 9052 LET var(X%) COMMA = ( 2 20 5 ) var(FNC%) EOS
0x35a4…35c5 9054 PRINT »Gammel tabellfil kontrolleres« EOS
0x35c5…35e3 9060 LET var(Z1%) COMMA = var(FNO4%) EOS 32 var(R0$) var(P$) var(W$) 32 var(X1') var(R0$) 46 32 var(P1$) var(Y1') var(R0$) 32 var(X1') var(P$) var(W%') var(A%') 32 var(D%') var(R0$) var(P9$) var(A%') var(P$)
0x35e3…35f1 9070 IF var(Z1%) = var(FNO5%) <> COMMA 27 var(X%) COMMA = var(FNO6%) EOS
0x35f1…35fc 9075 LET var(X%) COMMA = ( 3 20 5 ) var(FNC%) EOS
0x35fc…3607 9090 LET var(Q0$) COMMA »DUMMY« EOS
0x3607…360d 9100 LET var(N4%) COMMA 2 EOS
0x360d…360f 9295 RETURN EOS
0x360f…3630 9300 REM ------- INIT NEW INPUTFILE
0x3630…3639 9310 LET var(L%) COMMA = ( var(R$) ) LEN EOS
0x3639…364a 9315 LET var(W9%) COMMA ( ELEMENT var(R$) ( var(L%) var(L%) ) [] »*« EQ ) EOS
0x364a…3663 9320 1601f2724273016c6de3749f70073b4143433d494ee2f168f3
0x3663…366d 9330 IF var(W9%) COMMA 33 1 SEMI 52 7 MULT EOS
0x366d…3678 9340 LET var(X%) COMMA = ( 3 10 5 ) var(FNC%) EOS
0x3678…368a 9350 PRINT »Leser fra : « SEMI var(R$) EOS
0x368a…368f 9360 LET var(W1%) COMMA 0 EOS
0x368f…3695 9370 LET var(N4%) COMMA 2 EOS
0x3695…369d 9380 LET var(W8%) COMMA var(W9%) 1 PLUS EOS
0x369d…369f 9400 RETURN EOS
0x369f…36c0 9500 REM ------ INIT SORT-ARRAY------
0x36c0…36d6 9510 0c701320302c302c302c302c322c332c302c342c340d
0x36d6…36ec 9520 0c701320302c302c302c322c352c362c342c342c370d
0x36ec…3702 9530 0c701320302c302c302c332c362c302c342c372c300d
0x3702…3718 9540 0c701320302c322c332c302c312c332c302c342c340d
0x3718…372f 9550 0c701420322c352c362c312c302c382c342c31302c390d
0x372f…3745 9560 0c701320332c362c302c332c382c302c342c392c300d
0x3745…375b 9570 0c701320302c342c342c302c342c342c302c302c300d
0x375b…3772 9580 0c701420342c342c372c342c31302c392c302c302c300d
0x3772…3788 9590 0c701320342c372c302c342c392c302c302c302c300d
0x3788…37b4 9592 0c702920312c312c312c322c312c332c312c342c322c322c322c332c322c342c332c332c332c342c342c340d
0x37b4…37b7 9595 RESTORE 0 → 95
0x37b7…37be 9600 19400701f109f3
0x37be…37c5 9610 19401701f109f3
0x37c5…37d0 9620 READ ELEMENT var(T0%'<20b3>) ( var(I%) var(J%) ) [] EOS
0x37d0…37d4 9630 1a4017f3
0x37d4…37d8 9640 1a4007f3
0x37d8…37df 9650 19400701f10af3
0x37df…37f1 9660 READ ELEMENT var(A0%') ( var(I%) ) [] ELEMENT var(B0%') ( var(I%) ) [] EOS
0x37f1…37f5 9670 1a4007f3
0x37f5…37f7 9700 RETURN EOS
0x37f7…3816 9900 REM ---------- EXIT ----------
0x3816…3821 9920 LET var(X%) COMMA = ( 1 10 5 ) var(FNC%) EOS
0x3821…3856 9930 PRINT »Sorterings-resultatet er listet i filen 'LOG.DTA'« EOS
0x3856…3858 9940 14f3
0x3858…3866 9950 1e7008504c414e2e445441f168f3
0x3866…3867 9999 END