|
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 - download
Length: 10717 (0x29dd)
Notes: ZILOG_BASIC
Names: »DIG.AER.BP«
└─⟦70e1b4124⟧ Bits:30006818 8" ZilogMCZ floppy NThun_0020 (21/5-82 MAPDAT AEROTRIANGULERING COPYRIGHT VIAK A/S)
└─ ⟦this⟧ »DIG.AER.BP«
0x0000…0014 BasicHead {variables=0x014c, stms=0x08f0, f2=0x1f8d, f3=0000000000000000000000000000}
0x0014…0160 [
0x0014…0160 [0x00]: VarDef {f0=0xaaaa, f1=0x4f, f2=0x22} C% 0x52
0x0014…0160 [0x01]: VarDef {f0=0xaaaa, f1=0x49, f2=0x23} D9% 0x51
0x0014…0160 [0x02]: VarDef {f0=0x7420, f1=0x48, f2=0x29} J8% 0x50
0x0014…0160 [0x03]: VarDef {f0=0x7120, f1=0x49, f2=0x13} T9 0x4f
0x0014…0160 [0x04]: VarDef {f0=0x7110, f1=0x49, f2=0x19} Z9 0x4e
0x0014…0160 [0x05]: VarDef {f0=0x7106, f1=0x49, f2=0x18} Y9 0x4d
0x0014…0160 [0x06]: VarDef {f0=0x7103, f1=0x49, f2=0x17} X9 0x4c
0x0014…0160 [0x07]: VarDef {f0=0x6830, f1=0x41, f2=0x19} Z1 0x4b
0x0014…0160 [0x08]: VarDef {f0=0x6725, f1=0x49, f2=0x03} D9 0x4a
0x0014…0160 [0x09]: VarDef {f0=0x6635, f1=0x49, f2=0x28} I9% 0x49
0x0014…0160 [0x0a]: VarDef {f0=0x6540, f1=0x41, f2=0x18} Y1 0x48
0x0014…0160 [0x0b]: VarDef {f0=0x6530, f1=0x41, f2=0x17} X1 0x47
0x0014…0160 [0x0c]: VarDef {f0=0x6520, f1=0x44, f2=0x23} D4% 0x46
0x0014…0160 [0x0d]: VarDef {f0=0x6510, f1=0x49, f2=0x29} J9% 0x45
0x0014…0160 [0x0e]: VarDef {f0=0x6045, f1=0x4f, f2=0x03} D 0x44
0x0014…0160 [0x0f]: VarDef {f0=0x6040, f1=0x43, f2=0x03} D3 0x43
0x0014…0160 [0x10]: VarDef {f0=0x5040, f1=0x4f, f2=0x32} S% 0x42
0x0014…0160 [0x11]: VarDef {f0=0x4590, f1=0x41, f2=0x2d} N1% 0x41
0x0014…0160 [0x12]: VarDef {f0=0x4480, f1=0x45, f2=0x2b} L5% 0x40
0x0014…0160 [0x13]: VarDef {f0=0x4330, f1=0x4f, f2=0x31} R% 0x3f
0x0014…0160 [0x14]: VarDef {f0=0x4130, f1=0x40, f2=0x20} A0% 0x3e
0x0014…0160 [0x15]: VarDef {f0=0x4110, f1=0x5f, f2=0x4c} FNM$ 0x3d
0x0014…0160 [0x16]: VarDef {f0=0x4010, f1=0x5f, f2=0x23} FND% 0x3c
0x0014…0160 [0x17]: VarDef {f0=0x2155, f1=0x5f, f2=0x2f} FNP% 0x3b
0x0014…0160 [0x18]: VarDef {f0=0x2040, f1=0x4f, f2=0x28} I% 0x3a
0x0014…0160 [0x19]: VarDef {f0=0x2010, f1=0x5f, f2=0x21} FNB% 0x39
0x0014…0160 [0x1a]: VarDef {f0=0x1850, f1=0x43, f2=0x33} T3% 0x38
0x0014…0160 [0x1b]: VarDef {f0=0x1820, f1=0x5f, f2=0x45} FNF$ 0x37
0x0014…0160 [0x1c]: VarDef {f0=0x1710, f1=0x44, f2=0x13} T4 0x36
0x0014…0160 [0x1d]: VarDef {f0=0x1610, f1=0x49, f2=0x00} A9 0x35
0x0014…0160 [0x1e]: VarDef {f0=0x1600, f1=0x48, f2=0x00} A8 0x34
0x0014…0160 [0x1f]: VarDef {f0=0x1597, f1=0x47, f2=0x00} A7 0x33
0x0014…0160 [0x20]: VarDef {f0=0x1595, f1=0x43, f2=0x02} C3 0x32
0x0014…0160 [0x21]: VarDef {f0=0x1590, f1=0x45, f2=0x19} Z5 0x31
0x0014…0160 [0x22]: VarDef {f0=0x1540, f1=0x40, f2=0x2d} N0% 0x30
0x0014…0160 [0x23]: VarDef {f0=0x1530, f1=0x4f, f2=0x23} D% 0x2f
0x0014…0160 [0x24]: VarDef {f0=0x1510, f1=0x46, f2=0x00} A6 0x2e
0x0014…0160 [0x25]: VarDef {f0=0x1506, f1=0x45, f2=0x00} A5 0x2d
0x0014…0160 [0x26]: VarDef {f0=0x1505, f1=0x44, f2=0x00} A4 0x2c
0x0014…0160 [0x27]: VarDef {f0=0x1502, f1=0x42, f2=0x02} C2 0x2b
0x0014…0160 [0x28]: VarDef {f0=0x1500, f1=0x45, f2=0x18} Y5 0x2a
0x0014…0160 [0x29]: VarDef {f0=0x1350, f1=0x44, f2=0x19} Z4 0x29
0x0014…0160 [0x2a]: VarDef {f0=0x1340, f1=0x43, f2=0x00} A3 0x28
0x0014…0160 [0x2b]: VarDef {f0=0x1330, f1=0x44, f2=0x18} Y4 0x27
0x0014…0160 [0x2c]: VarDef {f0=0x1320, f1=0x42, f2=0x00} A2 0x26
0x0014…0160 [0x2d]: VarDef {f0=0x1310, f1=0x44, f2=0x17} X4 0x25
0x0014…0160 [0x2e]: VarDef {f0=0x1300, f1=0x41, f2=0x00} A1 0x24
0x0014…0160 [0x2f]: VarDef {f0=0x1290, f1=0x41, f2=0x02} C1 0x23
0x0014…0160 [0x30]: VarDef {f0=0x1286, f1=0x45, f2=0x17} X5 0x22
0x0014…0160 [0x31]: VarDef {f0=0x1250, f1=0x5f, f2=0x33} FNT% 0x21
0x0014…0160 [0x32]: VarDef {f0=0x1160, f1=0x4f, f2=0x19} Z 0x20
0x0014…0160 [0x33]: VarDef {f0=0x1120, f1=0x4f, f2=0x18} Y 0x1f
0x0014…0160 [0x34]: VarDef {f0=0x1102, f1=0x4f, f2=0x17} X 0x1e
0x0014…0160 [0x35]: VarDef {f0=0x1087, f1=0x47, f2=0x24} E7% 0x1d
0x0014…0160 [0x36]: VarDef {f0=0x1085, f1=0x47, f2=0x39} Z7% 0x1c
0x0014…0160 [0x37]: VarDef {f0=0x1080, f1=0x47, f2=0x38} Y7% 0x1b
0x0014…0160 [0x38]: VarDef {f0=0x1070, f1=0x47, f2=0x37} X7% 0x1a
0x0014…0160 [0x39]: VarDef {f0=0x1060, f1=0x46, f2=0x24} E6% 0x19
0x0014…0160 [0x3a]: VarDef {f0=0x1050, f1=0x46, f2=0x39} Z6% 0x18
0x0014…0160 [0x3b]: VarDef {f0=0x1047, f1=0x46, f2=0x38} Y6% 0x17
0x0014…0160 [0x3c]: VarDef {f0=0x1046, f1=0x46, f2=0x37} X6% 0x16
0x0014…0160 [0x3d]: VarDef {f0=0x1040, f1=0x4f, f2=0x20} A% 0x15
0x0014…0160 [0x3e]: VarDef {f0=0x1030, f1=0x5f, f2=0x2b} FNL% 0x14
0x0014…0160 [0x3f]: VarDef {f0=0x0636, f1=0x4f, f2=0x4d} N$ 0x13
0x0014…0160 [0x40]: VarDef {f0=0x0635, f1=0x4f, f2=0x52} S$ 0x12
0x0014…0160 [0x41]: VarDef {f0=0x0625, f1=0x41, f2=0x4d} N1$ 0x11
0x0014…0160 [0x42]: VarDef {f0=0x0620, f1=0x41, f2=0x51} R1$ 0x10
0x0014…0160 [0x43]: VarDef {f0=0x0610, f1=0x41, f2=0x40} A1$ 0xf
0x0014…0160 [0x44]: VarDef {f0=0x0605, f1=0x41, f2=0xb3} T1%' 0xe
0x0014…0160 [0x45]: VarDef {f0=0x0600, f1=0x41, f2=0x93} T1' 0xd
0x0014…0160 [0x46]: VarDef {f0=0x0530, f1=0x45, f2=0x55} V5$ 0xc
0x0014…0160 [0x47]: VarDef {f0=0x0520, f1=0x42, f2=0x53} T2$ 0xb
0x0014…0160 [0x48]: VarDef {f0=0x0510, f1=0x41, f2=0x53} T1$ 0xa
0x0014…0160 [0x49]: VarDef {f0=0x0040, f1=0x4f, f2=0x4b} L$ 0x9
0x0014…0160 [0x4a]: VarDef {f0=0x0030, f1=0x4f, f2=0x51} R$ 0x8
0x0014…0160 [0x4b]: VarDef {f0=0x0025, f1=0x4f, f2=0x4a} K$ 0x7
0x0014…0160 [0x4c]: VarDef {f0=0x0020, f1=0x48, f2=0x45} F8$ 0x6
0x0014…0160 [0x4d]: VarDef {f0=0x0015, f1=0x47, f2=0x45} F7$ 0x5
0x0014…0160 [0x4e]: VarDef {f0=0x0014, f1=0x46, f2=0x45} F6$ 0x4
0x0014…0160 [0x4f]: VarDef {f0=0x0013, f1=0x45, f2=0x45} F5$ 0x3
0x0014…0160 [0x50]: VarDef {f0=0x0012, f1=0x43, f2=0x40} A3$ 0x2
0x0014…0160 [0x51]: VarDef {f0=0x0011, f1=0x4f, f2=0x41} B$ 0x1
0x0014…0160 [0x52]: VarDef {f0=0x0010, f1=0x4f, f2=0x40} A$ 0x0
0x0014…0160 ]
0x0160…0164 Statement 37120 @0x29dc
0x0164…0168 Statement 36944 @0x29d9
0x0168…016c Statement 36864 @0x29d6
0x016c…0170 Statement 33072 @0x29d4
0x0170…0174 Statement 33056 @0x29bf
0x0174…0178 Statement 33040 @0x29bd
0x0178…017c Statement 33024 @0x29b2
0x017c…0180 Statement 32912 @0x29b0
0x0180…0184 Statement 32896 @0x29a5
0x0184…0188 Statement 32880 @0x29a3
0x0188…018c Statement 32864 @0x2998
0x018c…0190 Statement 32848 @0x2996
0x0190…0194 Statement 32832 @0x298b
0x0194…0198 Statement 32816 @0x2989
0x0198…019c Statement 32800 @0x297e
0x019c…01a0 Statement 32784 @0x297c
0x01a0…01a4 Statement 32768 @0x2967
0x01a4…01a8 Statement 31040 @0x2965
0x01a8…01ac Statement 31024 @0x2962
0x01ac…01b0 Statement 31008 @0x295b
0x01b0…01b4 Statement 30992 @0x2954
0x01b4…01b8 Statement 30976 @0x294d
0x01b8…01bc Statement 30864 @0x2946
0x01bc…01c0 Statement 30848 @0x293f
0x01c0…01c4 Statement 30832 @0x2939
0x01c4…01c8 Statement 30816 @0x2933
0x01c8…01cc Statement 30800 @0x292d
0x01cc…01d0 Statement 30784 @0x2927
0x01d0…01d4 Statement 30768 @0x2920
0x01d4…01d8 Statement 30752 @0x291a
0x01d8…01dc Statement 30736 @0x2914
0x01dc…01e0 Statement 30720 @0x2903
0x01e0…01e4 Statement 30009 @0x2901
0x01e4…01e8 Statement 30008 @0x28ff
0x01e8…01ec Statement 30007 @0x28ca
0x01ec…01f0 Statement 30006 @0x28b5
0x01f0…01f4 Statement 30005 @0x28ad
0x01f4…01f8 Statement 30004 @0x2896
0x01f8…01fc Statement 30003 @0x2885
0x01fc…0200 Statement 30002 @0x287a
0x0200…0204 Statement 30001 @0x2870
0x0204…0208 Statement 30000 @0x286d
0x0208…020c Statement 29992 @0x285c
0x020c…0210 Statement 29991 @0x2840
0x0210…0214 Statement 29990 @0x2837
0x0214…0218 Statement 29989 @0x282f
0x0218…021c Statement 29985 @0x2821
0x021c…0220 Statement 29974 @0x280b
0x0220…0224 Statement 29972 @0x2802
0x0224…0228 Statement 29971 @0x27f8
0x0228…022c Statement 29970 @0x27ef
0x022c…0230 Statement 29969 @0x27e1
0x0230…0234 Statement 29961 @0x27d5
0x0234…0238 Statement 29959 @0x27bf
0x0238…023c Statement 29958 @0x27b5
0x023c…0240 Statement 29957 @0x27b2
0x0240…0244 Statement 29956 @0x27a5
0x0244…0248 Statement 29955 @0x2778
0x0248…024c Statement 29954 @0x273d
0x024c…0250 Statement 29953 @0x2733
0x0250…0254 Statement 29952 @0x272d
0x0254…0258 Statement 29497 @0x272b
0x0258…025c Statement 29496 @0x2729
0x025c…0260 Statement 29495 @0x26f4
0x0260…0264 Statement 29494 @0x26df
0x0264…0268 Statement 29493 @0x26d7
0x0268…026c Statement 29492 @0x26c0
0x026c…0270 Statement 29491 @0x26af
0x0270…0274 Statement 29490 @0x26a4
0x0274…0278 Statement 29489 @0x269a
0x0278…027c Statement 29488 @0x2697
0x027c…0280 Statement 29480 @0x2686
0x0280…0284 Statement 29464 @0x2682
0x0284…0288 Statement 29463 @0x267a
0x0288…028c Statement 29462 @0x266d
0x028c…0290 Statement 29461 @0x2664
0x0290…0294 Statement 29460 @0x265c
0x0294…0298 Statement 29459 @0x2652
0x0298…029c Statement 29458 @0x2649
0x029c…02a0 Statement 29457 @0x263b
0x02a0…02a4 Statement 29448 @0x262f
0x02a4…02a8 Statement 29447 @0x2619
0x02a8…02ac Statement 29446 @0x260f
0x02ac…02b0 Statement 29445 @0x260c
0x02b0…02b4 Statement 29444 @0x25ff
0x02b4…02b8 Statement 29443 @0x25d2
0x02b8…02bc Statement 29442 @0x25b6
0x02bc…02c0 Statement 29440 @0x25ac
0x02c0…02c4 Statement 29328 @0x25aa
0x02c4…02c8 Statement 29317 @0x25a7
0x02c8…02cc Statement 29312 @0x2585
0x02cc…02d0 Statement 29301 @0x2582
0x02d0…02d4 Statement 29298 @0x2563
0x02d4…02d8 Statement 29296 @0x2553
0x02d8…02dc Statement 29285 @0x253f
0x02dc…02e0 Statement 29282 @0x2534
0x02e0…02e4 Statement 29280 @0x252b
0x02e4…02e8 Statement 29269 @0x24fd
0x02e8…02ec Statement 29268 @0x24cc
0x02ec…02f0 Statement 29267 @0x249d
0x02f0…02f4 Statement 29264 @0x249a
0x02f4…02f8 Statement 29255 @0x2497
0x02f8…02fc Statement 29253 @0x248c
0x02fc…0300 Statement 29248 @0x247a
0x0300…0304 Statement 29240 @0x2471
0x0304…0308 Statement 29238 @0x2465
0x0308…030c Statement 29236 @0x245f
0x030c…0310 Statement 29234 @0x245d
0x0310…0314 Statement 29232 @0x2457
0x0314…0318 Statement 29221 @0x2436
0x0318…031c Statement 29216 @0x2433
0x031c…0320 Statement 29200 @0x2430
0x0320…0324 Statement 29192 @0x242c
0x0324…0328 Statement 29188 @0x2427
0x0328…032c Statement 29186 @0x2416
0x032c…0330 Statement 29184 @0x2411
0x0330…0334 Statement 29072 @0x240f
0x0334…0338 Statement 28944 @0x23ff
0x0338…033c Statement 28928 @0x23d4
0x033c…0340 Statement 28816 @0x23d1
0x0340…0344 Statement 28805 @0x23c5
0x0344…0348 Statement 28800 @0x23be
0x0348…034c Statement 28784 @0x23bb
0x034c…0350 Statement 28768 @0x23b8
0x0350…0354 Statement 28757 @0x23ae
0x0354…0358 Statement 28754 @0x23a5
0x0358…035c Statement 28752 @0x2366
0x035c…0360 Statement 28712 @0x2350
0x0360…0364 Statement 28711 @0x2336
0x0364…0368 Statement 28710 @0x2334
0x0368…036c Statement 28709 @0x22f5
0x036c…0370 Statement 28708 @0x22ba
0x0370…0374 Statement 28705 @0x2280
0x0374…0378 Statement 28704 @0x227c
0x0378…037c Statement 28688 @0x227a
0x037c…0380 Statement 28680 @0x2273
0x0380…0384 Statement 28673 @0x2270
0x0384…0388 Statement 28672 @0x226d
0x0388…038c Statement 26704 @0x226b
0x038c…0390 Statement 26693 @0x2268
0x0390…0394 Statement 26688 @0x225f
0x0394…0398 Statement 26672 @0x225c
0x0398…039c Statement 26656 @0x2243
0x039c…03a0 Statement 26640 @0x222d
0x03a0…03a4 Statement 26624 @0x2217
0x03a4…03a8 Statement 26512 @0x2201
0x03a8…03ac Statement 26496 @0x21eb
0x03ac…03b0 Statement 26480 @0x21d5
0x03b0…03b4 Statement 26464 @0x21c4
0x03b4…03b8 Statement 26448 @0x21b3
0x03b8…03bc Statement 26432 @0x21ad
0x03bc…03c0 Statement 26416 @0x21a4
0x03c0…03c4 Statement 26400 @0x219e
0x03c4…03c8 Statement 26384 @0x219a
0x03c8…03cc Statement 26368 @0x2196
0x03cc…03d0 Statement 26256 @0x2194
0x03d0…03d4 Statement 26240 @0x2190
0x03d4…03d8 Statement 26229 @0x2182
0x03d8…03dc Statement 26224 @0x216c
0x03dc…03e0 Statement 26213 @0x2164
0x03e0…03e4 Statement 26208 @0x2158
0x03e4…03e8 Statement 26197 @0x2156
0x03e8…03ec Statement 26192 @0x2138
0x03ec…03f0 Statement 26181 @0x2137
0x03f0…03f4 Statement 26176 @0x2135
0x03f4…03f8 Statement 26165 @0x2132
0x03f8…03fc Statement 26162 @0x212d
0x03fc…0400 Statement 26161 @0x211f
0x0400…0404 Statement 26160 @0x2112
0x0404…0408 Statement 26144 @0x2105
0x0408…040c Statement 26112 @0x20f7
0x040c…0410 Statement 25936 @0x20f5
0x0410…0414 Statement 25925 @0x20eb
0x0414…0418 Statement 25920 @0x20d4
0x0418…041c Statement 25911 @0x20cb
0x041c…0420 Statement 25909 @0x20c2
0x0420…0424 Statement 25906 @0x20bb
0x0424…0428 Statement 25904 @0x20a5
0x0428…042c Statement 25893 @0x2083
0x042c…0430 Statement 25888 @0x2072
0x0430…0434 Statement 25856 @0x2067
0x0434…0438 Statement 25749 @0x2064
0x0438…043c Statement 25744 @0x2053
0x043c…0440 Statement 25736 @0x2052
0x0440…0444 Statement 25735 @0x2030
0x0444…0448 Statement 25734 @0x2021
0x0448…044c Statement 25733 @0x2012
0x044c…0450 Statement 25728 @0x2003
0x0450…0454 Statement 25712 @0x1ff2
0x0454…0458 Statement 25696 @0x1fdd
0x0458…045c Statement 25680 @0x1fd7
0x045c…0460 Statement 25669 @0x1fd4
0x0460…0464 Statement 25664 @0x1fce
0x0464…0468 Statement 25653 @0x1fcb
0x0468…046c Statement 25648 @0x1fc5
0x046c…0470 Statement 25632 @0x1fad
0x0470…0474 Statement 25621 @0x1f99
0x0474…0478 Statement 25616 @0x1f8a
0x0478…047c Statement 25605 @0x1f7e
0x047c…0480 Statement 25600 @0x1f70
0x0480…0484 Statement 25232 @0x1f6e
0x0484…0488 Statement 25203 @0x1f65
0x0488…048c Statement 25202 @0x1f46
0x048c…0490 Statement 25189 @0x1f44
0x0490…0494 Statement 25187 @0x1f40
0x0494…0498 Statement 25184 @0x1f34
0x0498…049c Statement 25177 @0x1f1e
0x049c…04a0 Statement 25175 @0x1f16
0x04a0…04a4 Statement 25171 @0x1f0d
0x04a4…04a8 Statement 25170 @0x1eeb
0x04a8…04ac Statement 25136 @0x1ee9
0x04ac…04b0 Statement 25125 @0x1edb
0x04b0…04b4 Statement 25124 @0x1ed8
0x04b4…04b8 Statement 25123 @0x1ed5
0x04b8…04bc Statement 25122 @0x1ea6
0x04bc…04c0 Statement 25121 @0x1e99
0x04c0…04c4 Statement 25120 @0x1e95
0x04c4…04c8 Statement 25112 @0x1e93
0x04c8…04cc Statement 25109 @0x1e89
0x04cc…04d0 Statement 25104 @0x1e7f
0x04d0…04d4 Statement 25093 @0x1e75
0x04d4…04d8 Statement 25088 @0x1e71
0x04d8…04dc Statement 24656 @0x1e6f
0x04dc…04e0 Statement 24645 @0x1e63
0x04e0…04e4 Statement 24640 @0x1e51
0x04e4…04e8 Statement 24624 @0x1e40
0x04e8…04ec Statement 24615 @0x1e2e
0x04ec…04f0 Statement 24613 @0x1e1c
0x04f0…04f4 Statement 24608 @0x1e19
0x04f4…04f8 Statement 24592 @0x1e12
0x04f8…04fc Statement 24581 @0x1dff
0x04fc…0500 Statement 24576 @0x1df5
0x0500…0504 Statement 22864 @0x1df2
0x0504…0508 Statement 22857 @0x1dee
0x0508…050c Statement 22856 @0x1deb
0x050c…0510 Statement 22855 @0x1de5
0x0510…0514 Statement 22854 @0x1de3
0x0514…0518 Statement 22853 @0x1de0
0x0518…051c Statement 22851 @0x1dd9
0x051c…0520 Statement 22850 @0x1d94
0x0520…0524 Statement 22849 @0x1d82
0x0524…0528 Statement 22848 @0x1d71
0x0528…052c Statement 22839 @0x1d6f
0x052c…0530 Statement 22837 @0x1d59
0x0530…0534 Statement 22832 @0x1d4e
0x0534…0538 Statement 22824 @0x1d3c
0x0538…053c Statement 22823 @0x1d2b
0x053c…0540 Statement 22822 @0x1d29
0x0540…0544 Statement 22820 @0x1d1b
0x0544…0548 Statement 22819 @0x1d18
0x0548…054c Statement 22818 @0x1d16
0x054c…0550 Statement 22817 @0x1d13
0x0550…0554 Statement 22816 @0x1d0c
0x0554…0558 Statement 22808 @0x1cc8
0x0558…055c Statement 22806 @0x1cb6
0x055c…0560 Statement 22805 @0x1ca5
0x0560…0564 Statement 22804 @0x1ca3
0x0564…0568 Statement 22803 @0x1c98
0x0568…056c Statement 22802 @0x1c8a
0x056c…0570 Statement 22801 @0x1c87
0x0570…0574 Statement 22800 @0x1c78
0x0574…0578 Statement 22792 @0x1c6b
0x0578…057c Statement 22791 @0x1c67
0x057c…0580 Statement 22790 @0x1c5f
0x0580…0584 Statement 22789 @0x1c56
0x0584…0588 Statement 22784 @0x1c53
0x0588…058c Statement 22680 @0x1c47
0x058c…0590 Statement 22678 @0x1c35
0x0590…0594 Statement 22677 @0x1c24
0x0594…0598 Statement 22675 @0x1c22
0x0598…059c Statement 22674 @0x1c1f
0x059c…05a0 Statement 22672 @0x1c17
0x05a0…05a4 Statement 22661 @0x1c0e
0x05a4…05a8 Statement 22656 @0x1c05
0x05a8…05ac Statement 22645 @0x1bfc
0x05ac…05b0 Statement 22640 @0x1bee
0x05b0…05b4 Statement 22629 @0x1be8
0x05b4…05b8 Statement 22624 @0x1bdb
0x05b8…05bc Statement 22613 @0x1bd1
0x05bc…05c0 Statement 22608 @0x1bce
0x05c0…05c4 Statement 22597 @0x1bc6
0x05c4…05c8 Statement 22595 @0x1bbc
0x05c8…05cc Statement 22592 @0x1bb3
0x05cc…05d0 Statement 22581 @0x1ba5
0x05d0…05d4 Statement 22579 @0x1b9e
0x05d4…05d8 Statement 22578 @0x1b92
0x05d8…05dc Statement 22577 @0x1b87
0x05dc…05e0 Statement 22576 @0x1b7d
0x05e0…05e4 Statement 22568 @0x1b70
0x05e4…05e8 Statement 22567 @0x1b43
0x05e8…05ec Statement 22565 @0x1b17
0x05ec…05f0 Statement 22564 @0x1b14
0x05f0…05f4 Statement 22563 @0x1ae8
0x05f4…05f8 Statement 22562 @0x1ae1
0x05f8…05fc Statement 22560 @0x1ad7
0x05fc…0600 Statement 22528 @0x1ad3
0x0600…0604 Statement 22072 @0x1ad1
0x0604…0608 Statement 22071 @0x1acf
0x0608…060c Statement 22070 @0x1a9a
0x060c…0610 Statement 22069 @0x1a85
0x0610…0614 Statement 22068 @0x1a7d
0x0614…0618 Statement 22067 @0x1a6e
0x0618…061c Statement 22066 @0x1a5d
0x061c…0620 Statement 22065 @0x1a52
0x0620…0624 Statement 22064 @0x1a4f
0x0624…0628 Statement 22056 @0x1a3f
0x0628…062c Statement 22055 @0x1a2e
0x062c…0630 Statement 22054 @0x1a25
0x0630…0634 Statement 22053 @0x1a1d
0x0634…0638 Statement 22052 @0x1a17
0x0638…063c Statement 22049 @0x1a09
0x063c…0640 Statement 22048 @0x19ff
0x0640…0644 Statement 22039 @0x19f6
0x0644…0648 Statement 22038 @0x19d1
0x0648…064c Statement 22037 @0x19b1
0x064c…0650 Statement 22036 @0x19a8
0x0650…0654 Statement 22035 @0x199e
0x0654…0658 Statement 22034 @0x1995
0x0658…065c Statement 22033 @0x1987
0x065c…0660 Statement 22032 @0x197a
0x0660…0664 Statement 22025 @0x196e
0x0664…0668 Statement 22024 @0x1964
0x0668…066c Statement 22023 @0x194e
0x066c…0670 Statement 22022 @0x1944
0x0670…0674 Statement 22021 @0x1941
0x0674…0678 Statement 22020 @0x1934
0x0678…067c Statement 22019 @0x1907
0x067c…0680 Statement 22018 @0x18cd
0x0680…0684 Statement 22017 @0x18c3
0x0684…0688 Statement 22016 @0x18b8
0x0688…068c Statement 21909 @0x18b6
0x068c…0690 Statement 21904 @0x18b3
0x0690…0694 Statement 21893 @0x18ad
0x0694…0698 Statement 21826 @0x18aa
0x0698…069c Statement 21824 @0x18a4
0x069c…06a0 Statement 21808 @0x18a1
0x06a0…06a4 Statement 21792 @0x189e
0x06a4…06a8 Statement 21784 @0x189b
0x06a8…06ac Statement 21783 @0x1891
0x06ac…06b0 Statement 21781 @0x1887
0x06b0…06b4 Statement 21776 @0x187d
0x06b4…06b8 Statement 21765 @0x1873
0x06b8…06bc Statement 21760 @0x186d
0x06bc…06c0 Statement 21621 @0x186a
0x06c0…06c4 Statement 21619 @0x1866
0x06c4…06c8 Statement 21618 @0x185e
0x06c8…06cc Statement 21617 @0x1855
0x06cc…06d0 Statement 21616 @0x184f
0x06d0…06d4 Statement 21605 @0x184c
0x06d4…06d8 Statement 21601 @0x1844
0x06d8…06dc Statement 21600 @0x183e
0x06dc…06e0 Statement 21589 @0x183b
0x06e0…06e4 Statement 21584 @0x1835
0x06e4…06e8 Statement 21573 @0x1832
0x06e8…06ec Statement 21568 @0x182a
0x06ec…06f0 Statement 21559 @0x1820
0x06f0…06f4 Statement 21557 @0x1817
0x06f4…06f8 Statement 21552 @0x180e
0x06f8…06fc Statement 21541 @0x1800
0x06fc…0700 Statement 21536 @0x17f7
0x0700…0704 Statement 21525 @0x17e9
0x0704…0708 Statement 21520 @0x17e5
0x0708…070c Statement 21504 @0x17d9
0x070c…0710 Statement 21125 @0x17d7
0x0710…0714 Statement 21120 @0x17d4
0x0714…0718 Statement 21109 @0x17d2
0x0718…071c Statement 21104 @0x179b
0x071c…0720 Statement 21093 @0x176e
0x0720…0724 Statement 21088 @0x175d
0x0724…0728 Statement 21080 @0x175a
0x0728…072c Statement 21079 @0x174c
0x072c…0730 Statement 21078 @0x173d
0x0730…0734 Statement 21077 @0x172c
0x0734…0738 Statement 21076 @0x1729
0x0738…073c Statement 21075 @0x171b
0x073c…0740 Statement 21074 @0x170c
0x0740…0744 Statement 21072 @0x1705
0x0744…0748 Statement 21061 @0x16f0
0x0748…074c Statement 21056 @0x16af
0x074c…0750 Statement 21045 @0x169b
0x0750…0754 Statement 21040 @0x165a
0x0754…0758 Statement 21024 @0x1627
0x0758…075c Statement 21008 @0x1624
0x075c…0760 Statement 20992 @0x1621
0x0760…0764 Statement 20530 @0x161e
0x0764…0768 Statement 20529 @0x1603
0x0768…076c Statement 20528 @0x15fa
0x076c…0770 Statement 20520 @0x15f6
0x0770…0774 Statement 20519 @0x15f4
0x0774…0778 Statement 20518 @0x15c9
0x0778…077c Statement 20517 @0x158e
0x077c…0780 Statement 20516 @0x155f
0x0780…0784 Statement 20515 @0x155d
0x0784…0788 Statement 20514 @0x1559
0x0788…078c Statement 20513 @0x1526
0x078c…0790 Statement 20512 @0x1522
0x0790…0794 Statement 20505 @0x1511
0x0794…0798 Statement 20503 @0x150e
0x0798…079c Statement 20502 @0x1500
0x079c…07a0 Statement 20501 @0x14f1
0x07a0…07a4 Statement 20500 @0x14e0
0x07a4…07a8 Statement 20498 @0x14dd
0x07a8…07ac Statement 20497 @0x14cf
0x07ac…07b0 Statement 20496 @0x14c0
0x07b0…07b4 Statement 20489 @0x14b9
0x07b4…07b8 Statement 20488 @0x14b2
0x07b8…07bc Statement 20487 @0x14aa
0x07bc…07c0 Statement 20486 @0x1464
0x07c0…07c4 Statement 20485 @0x1420
0x07c4…07c8 Statement 20484 @0x13dc
0x07c8…07cc Statement 20483 @0x1396
0x07cc…07d0 Statement 20482 @0x1393
0x07d0…07d4 Statement 20481 @0x1390
0x07d4…07d8 Statement 20480 @0x138d
0x07d8…07dc Statement 12288 @0x1347
0x07dc…07e0 Statement 08960 @0x1344
0x07e0…07e4 Statement 08848 @0x1334
0x07e4…07e8 Statement 08832 @0x1331
0x07e8…07ec Statement 08816 @0x132e
0x07ec…07f0 Statement 08800 @0x1314
0x07f0…07f4 Statement 08784 @0x1311
0x07f4…07f8 Statement 08768 @0x130e
0x07f8…07fc Statement 08752 @0x12ff
0x07fc…0800 Statement 08736 @0x12fc
0x0800…0804 Statement 08720 @0x12f9
0x0804…0808 Statement 08704 @0x12f6
0x0808…080c Statement 08597 @0x12ed
0x080c…0810 Statement 08592 @0x12e0
0x0810…0814 Statement 08576 @0x12dd
0x0814…0818 Statement 08565 @0x12d4
0x0818…081c Statement 08560 @0x12c7
0x081c…0820 Statement 08544 @0x12b7
0x0820…0824 Statement 08528 @0x12b4
0x0824…0828 Statement 08512 @0x12b1
0x0828…082c Statement 08496 @0x12ae
0x082c…0830 Statement 08480 @0x12a5
0x0830…0834 Statement 08448 @0x12a2
0x0834…0838 Statement 08272 @0x129f
0x0838…083c Statement 08256 @0x129c
0x083c…0840 Statement 08240 @0x1299
0x0840…0844 Statement 08224 @0x1296
0x0844…0848 Statement 08192 @0x124f
0x0848…084c Statement 06469 @0x124e
0x084c…0850 Statement 06464 @0x1245
0x0850…0854 Statement 06453 @0x1219
0x0854…0858 Statement 06448 @0x120b
0x0858…085c Statement 06437 @0x11fc
0x085c…0860 Statement 06432 @0x11ed
0x0860…0864 Statement 06421 @0x11d9
0x0864…0868 Statement 06416 @0x11ca
0x0868…086c Statement 06405 @0x11a8
0x086c…0870 Statement 06400 @0x11a4
0x0870…0874 Statement 06280 @0x11a3
0x0874…0878 Statement 06279 @0x11a0
0x0878…087c Statement 06277 @0x119d
0x087c…0880 Statement 06272 @0x116f
0x0880…0884 Statement 06240 @0x1159
0x0884…0888 Statement 06224 @0x1146
0x0888…088c Statement 06208 @0x1135
0x088c…0890 Statement 06160 @0x1128
0x0890…0894 Statement 06144 @0x1124
0x0894…0898 Statement 05960 @0x1123
0x0898…089c Statement 05959 @0x1120
0x089c…08a0 Statement 05957 @0x10fc
0x08a0…08a4 Statement 05955 @0x10f9
0x08a4…08a8 Statement 05952 @0x10cd
0x08a8…08ac Statement 05943 @0x10ca
0x08ac…08b0 Statement 05941 @0x109f
0x08b0…08b4 Statement 05936 @0x1092
0x08b4…08b8 Statement 05929 @0x108b
0x08b8…08bc Statement 05927 @0x1088
0x08bc…08c0 Statement 05925 @0x1073
0x08c0…08c4 Statement 05922 @0x1070
0x08c4…08c8 Statement 05920 @0x1053
0x08c8…08cc Statement 05911 @0x1050
0x08cc…08d0 Statement 05909 @0x1034
0x08d0…08d4 Statement 05904 @0x1027
0x08d4…08d8 Statement 05893 @0x101f
0x08d8…08dc Statement 05890 @0x101c
0x08dc…08e0 Statement 05888 @0x1017
0x08e0…08e4 Statement 05760 @0x1016
0x08e4…08e8 Statement 05744 @0x1013
0x08e8…08ec Statement 05728 @0x1008
0x08ec…08f0 Statement 05712 @0x1005
0x08f0…08f4 Statement 05683 @0xff9
0x08f4…08f8 Statement 05682 @0xfec
0x08f8…08fc Statement 05681 @0xfe0
0x08fc…0900 Statement 05680 @0xfd3
0x0900…0904 Statement 05664 @0xfcf
0x0904…0908 Statement 05648 @0xfbf
0x0908…090c Statement 05641 @0xfb8
0x090c…0910 Statement 05634 @0xfb4
0x0910…0914 Statement 05632 @0xfb0
0x0914…0918 Statement 05153 @0xfaf
0x0918…091c Statement 05152 @0xfac
0x091c…0920 Statement 05145 @0xfa7
0x0920…0924 Statement 05144 @0xfa4
0x0924…0928 Statement 05143 @0xf9f
0x0928…092c Statement 05142 @0xf92
0x092c…0930 Statement 05141 @0xf7f
0x0930…0934 Statement 05140 @0xf7c
0x0934…0938 Statement 05139 @0xf6a
0x0938…093c Statement 05138 @0xf3c
0x093c…0940 Statement 05137 @0xf39
0x0940…0944 Statement 05136 @0xf2a
0x0944…0948 Statement 05129 @0xf0b
0x0948…094c Statement 05128 @0xefd
0x094c…0950 Statement 05127 @0xefc
0x0950…0954 Statement 05126 @0xeee
0x0954…0958 Statement 05125 @0xedb
0x0958…095c Statement 05124 @0xecd
0x095c…0960 Statement 05123 @0xeb2
0x0960…0964 Statement 05122 @0xeae
0x0964…0968 Statement 05120 @0xea9
0x0968…096c Statement 04976 @0xea8
0x096c…0970 Statement 04965 @0xea5
0x0970…0974 Statement 04964 @0xe9a
0x0974…0978 Statement 04963 @0xe97
0x0978…097c Statement 04960 @0xe7b
0x097c…0980 Statement 04949 @0xe65
0x0980…0984 Statement 04944 @0xe62
0x0984…0988 Statement 04933 @0xe42
0x0988…098c Statement 04928 @0xe2c
0x098c…0990 Statement 04917 @0xe19
0x0990…0994 Statement 04912 @0xe08
0x0994…0998 Statement 04901 @0xe05
0x0998…099c Statement 04896 @0xde8
0x099c…09a0 Statement 04885 @0xdd5
0x09a0…09a4 Statement 04880 @0xdc4
0x09a4…09a8 Statement 04869 @0xdb7
0x09a8…09ac Statement 04864 @0xdb0
0x09ac…09b0 Statement 04711 @0xdad
0x09b0…09b4 Statement 04709 @0xd94
0x09b4…09b8 Statement 04704 @0xd7e
0x09b8…09bc Statement 04693 @0xd7b
0x09bc…09c0 Statement 04688 @0xd5e
0x09c0…09c4 Statement 04677 @0xd48
0x09c4…09c8 Statement 04672 @0xd35
0x09c8…09cc Statement 04661 @0xd24
0x09cc…09d0 Statement 04656 @0xd21
0x09d0…09d4 Statement 04645 @0xd07
0x09d4…09d8 Statement 04640 @0xcf4
0x09d8…09dc Statement 04629 @0xce3
0x09dc…09e0 Statement 04624 @0xcd6
0x09e0…09e4 Statement 04613 @0xcce
0x09e4…09e8 Statement 04611 @0xcca
0x09e8…09ec Statement 04608 @0xcc6
0x09ec…09f0 Statement 04144 @0xcc5
0x09f0…09f4 Statement 04133 @0xcba
0x09f4…09f8 Statement 04132 @0xcb7
0x09f8…09fc Statement 04131 @0xcb4
0x09fc…0a00 Statement 04130 @0xca2
0x0a00…0a04 Statement 04129 @0xc82
0x0a04…0a08 Statement 04128 @0xc6c
0x0a08…0a0c Statement 04121 @0xc5a
0x0a0c…0a10 Statement 04120 @0xc3a
0x0a10…0a14 Statement 04119 @0xc24
0x0a14…0a18 Statement 04118 @0xc12
0x0a18…0a1c Statement 04117 @0xbf2
0x0a1c…0a20 Statement 04116 @0xbdc
0x0a20…0a24 Statement 04115 @0xbc0
0x0a24…0a28 Statement 04114 @0xbbb
0x0a28…0a2c Statement 04112 @0xbb7
0x0a2c…0a30 Statement 04096 @0xbb3
0x0a30…0a34 Statement 00576 @0xb80
0x0a34…0a38 Statement 00560 @0xb54
0x0a38…0a3c Statement 00544 @0xb18
0x0a3c…0a40 Statement 00528 @0xaed
0x0a40…0a44 Statement 00336 @0xade
0x0a44…0a48 Statement 00258 @0xad0
0x0a48…0a4c Statement 00257 @0xa96
0x0a4c…0a50 Statement 00256 @0xa50
0x0a50…0a96 0100 DIM ELEMENT var(A$) ( 1 ) [] ELEMENT var(B$) ( 20 ) [] ELEMENT var(A3$) ( 11 ) [] ELEMENT var(F5$) ( %80 ) [] ELEMENT var(F6$) ( %80 ) [] ELEMENT var(F7$) ( %80 ) [] ELEMENT var(F8$) ( %80 ) [] ELEMENT var(K$) ( 8 ) [] ELEMENT var(R$) ( 8 ) [] ELEMENT var(L$) ( 8 ) [] EOS
0x0a96…0ad0 0101 DIM ELEMENT var(T1$) ( 20 8 ) [] ELEMENT var(T2$) ( 20 8 ) [] ELEMENT var(V5$) ( 1 ) [] ELEMENT var(T1') ( 20 ) [] ELEMENT var(T1%') ( 20 5 ) [] ELEMENT var(A1$) ( %78 ) [] ELEMENT var(R1$) ( %80 ) [] ELEMENT var(N1$) ( 20 16 ) [] EOS
0x0ad0…0ade 0102 DIM ELEMENT var(S$) ( 2 ) [] ELEMENT var(N$) ( 16 ) [] EOS
0x0ade…0aed 0150 SYSTEM »LINELEN« COMMA %80 EOS
0x0aed…0b18 0210 LET var(F5$) COMMA »#### ######## ##### ######## ########« EOS
0x0b18…0b54 0220 LET var(F6$) COMMA »###### ######## #########.DD #########.DD #########.DD« EOS
0x0b54…0b80 0230 LET var(F7$) COMMA »#########.DD #########.DD #########.DD« EOS
0x0b80…0bb3 0240 LET var(F8$) COMMA »###### #########.DD #########.DD #########.DD« EOS
0x0bb3…0bb7 1000 DEF var(FNL%) var(A%) EOS
0x0bb7…0bbb 1010 REM
0x0bbb…0bc0 1012 LET var(A%) COMMA 3 EOS
0x0bc0…0bdc 1013 1d700654454c4c4552f156f257f158f159f15af15bf15cf15df15ef3
0x0bdc…0bf2 1014 IF var(X7%) %128 > COMMA 27 var(X7%) COMMA var(X7%) 256 SUB2 EOS
0x0bf2…0c12 1015 IF var(X6%) 0 ?< COMMA 27 var(X) COMMA var(X7%) 65534 MULT 65534 PLUS var(X6%) PLUS EOS
0x0c12…0c24 1016 ELSE 27 var(X) COMMA var(X7%) 65534 MULT var(X6%) PLUS EOS
0x0c24…0c3a 1017 IF var(Y7%) %128 > COMMA 27 var(Y7%) COMMA var(Y7%) 256 SUB2 EOS
0x0c3a…0c5a 1018 IF var(Y6%) 0 ?< COMMA 27 var(Y) COMMA var(Y7%) 65534 MULT 65534 PLUS var(Y6%) PLUS EOS
0x0c5a…0c6c 1019 ELSE 27 var(Y) COMMA var(Y7%) 65534 MULT var(Y6%) PLUS EOS
0x0c6c…0c82 1020 IF var(Z7%) %128 > COMMA 27 var(Z7%) COMMA var(Z7%) 256 SUB2 EOS
0x0c82…0ca2 1021 IF var(Z6%) 0 ?< COMMA 27 var(Z) COMMA var(Z7%) 65534 MULT 65534 PLUS var(Z6%) PLUS EOS
0x0ca2…0cb4 1022 ELSE 27 var(Z) COMMA var(Z7%) 65534 MULT var(Z6%) PLUS EOS
0x0cb4…0cb7 1023 RETURN 1 EOS
0x0cb7…0cba 1024 GOTO 48 16
0x0cba…0cc5 1025 RETURN -1 EOS
0x0cc5…0cc6 1030 FNEND
0x0cc6…0cca 1200 DEF var(FNT%) var(A%) EOS
0x0cca…0cce 1203 TRAP ERR 1364
0x0cce…0cd6 1205 IF var(A%) 10 > COMMA 0 0 19
0x0cd6…0ce3 1210 ON var(A%) COMMA 0 21 18 53 18 21 18 var(Y) 18 EOS
0x0ce3…0cf4 1215 LET var(X5) COMMA var(C1) var(A1) var(X4) MULT PLUS var(A2) var(Y4) MULT PLUS var(A3) var(Z4) MULT PLUS EOS
0x0cf4…0d07 1220 LET var(Y5) COMMA var(C2) var(A4) var(X4) MULT PLUS var(A5) var(Y4) MULT PLUS var(A6) var(Z4) MULT PLUS EOS
0x0d07…0d21 1225 PRINT 2# SEMI USING var(F8$) COMMA var(D%) SEMI ELEMENT var(T2$) ( var(N0%) ) [] » « PLUS SEMI var(X5) SEMI var(Y5) EOS
0x0d21…0d24 1230 RETURN 1 EOS
0x0d24…0d35 1235 LET var(X5) COMMA var(C1) var(A1) var(X4) MULT PLUS var(A2) var(Y4) MULT PLUS var(A3) var(Z4) MULT PLUS EOS
0x0d35…0d48 1240 LET var(Y5) COMMA var(C2) var(A4) var(X4) MULT PLUS var(A5) var(Y4) MULT PLUS var(A6) var(Z4) MULT PLUS EOS
0x0d48…0d5e 1245 LET var(Z5) COMMA var(C3) var(A7) var(X4) MULT PLUS var(A8) var(Y4) MULT PLUS var(A9) var(Z4) MULT PLUS EOS
0x0d5e…0d7b 1250 PRINT 2# SEMI USING var(F8$) COMMA var(D%) SEMI ELEMENT var(T2$) ( var(N0%) ) [] » « PLUS SEMI var(X5) SEMI var(Y5) SEMI var(Z5) EOS
0x0d7b…0d7e 1255 RETURN 1 EOS
0x0d7e…0d94 1260 LET var(Z5) COMMA var(C3) var(A7) var(X4) MULT PLUS var(A8) var(Y4) MULT PLUS var(A9) var(Z4) MULT PLUS EOS
0x0d94…0dad 1265 PRINT 2# SEMI USING var(F8$) COMMA var(D%) SEMI ELEMENT var(T2$) ( var(N0%) ) [] » « PLUS SEMI var(Z5) EOS
0x0dad…0db0 1267 RETURN 1 EOS
0x0db0…0db7 1300 LET var(A%) COMMA var(A%) 10 SUB2 EOS
0x0db7…0dc4 1305 ON var(A%) COMMA 0 16 19 48 19 16 19 var(FNL%) 19 EOS
0x0dc4…0dd5 1310 LET var(X5) COMMA var(C1) var(A1) var(X4) MULT PLUS var(A2) var(Y4) MULT PLUS var(A3) var(Z4) MULT PLUS EOS
0x0dd5…0de8 1315 LET var(Y5) COMMA var(C2) var(A4) var(X4) MULT PLUS var(A5) var(Y4) MULT PLUS var(A6) var(Z4) MULT PLUS EOS
0x0de8…0e05 1320 PRINT 2# SEMI USING var(F6$) COMMA var(D%) SEMI var(T4) SEMI ELEMENT var(T2$) ( var(N0%) ) [] » « PLUS SEMI var(X5) SEMI var(Y5) EOS
0x0e05…0e08 1325 RETURN 1 EOS
0x0e08…0e19 1330 LET var(X5) COMMA var(C1) var(A1) var(X4) MULT PLUS var(A2) var(Y4) MULT PLUS var(A3) var(Z4) MULT PLUS EOS
0x0e19…0e2c 1335 LET var(Y5) COMMA var(C2) var(A4) var(X4) MULT PLUS var(A5) var(Y4) MULT PLUS var(A6) var(Z4) MULT PLUS EOS
0x0e2c…0e42 1340 LET var(Z5) COMMA var(C3) var(A7) var(X4) MULT PLUS var(A8) var(Y4) MULT PLUS var(A9) var(Z4) MULT PLUS EOS
0x0e42…0e62 1345 PRINT 2# SEMI USING var(F6$) COMMA var(D%) SEMI var(T4) SEMI ELEMENT var(T2$) ( var(N0%) ) [] » « PLUS SEMI var(X5) SEMI var(Y5) SEMI var(Z5) EOS
0x0e62…0e65 1350 RETURN 1 EOS
0x0e65…0e7b 1355 LET var(Z5) COMMA var(C3) var(A7) var(X4) MULT PLUS var(A8) var(Y4) MULT PLUS var(A9) var(Z4) MULT PLUS EOS
0x0e7b…0e97 1360 PRINT 2# SEMI USING var(F6$) COMMA var(D%) SEMI var(T4) SEMI ELEMENT var(T2$) ( var(N0%) ) [] » « PLUS SEMI var(Z5) EOS
0x0e97…0e9a 1363 RETURN 1 EOS
0x0e9a…0ea5 1364 RETURN -1 EOS
0x0ea5…0ea8 1365 TRAP ERR OFF
0x0ea8…0ea9 1370 FNEND
0x0ea9…0eae 1400 DEF var(FNF$) var(A3$) EOS
0x0eae…0eb2 1402 TRAP ERR 1419
0x0eb2…0ecd 1403 IF ELEMENT var(T1%') ( var(N0%) 4 ) [] 10 > COMMA 27 var(T3%) COMMA ELEMENT var(T1%') ( var(N0%) 4 ) [] 10 SUB2 EOS
0x0ecd…0edb 1404 ELSE 27 var(T3%) COMMA ELEMENT var(T1%') ( var(N0%) 4 ) [] EOS
0x0edb…0eee 1405 IF var(A3$) »FIRST POINT« <> COMMA 34 EOS
0x0eee…0efc 1406 ON var(T3%) COMMA 0 19 20 19 20 16 20 22 20 EOS
0x0efc…0efd 1407 DOEND
0x0efd…0f0b 1408 ON var(T3%) COMMA 0 18 20 18 20 9 20 21 20 EOS
0x0f0b…0f2a 1409 PRINT » X Y« COMMA = ( %75 ) → b5f3
0x0f2a…0f39 1410 PRINT USING var(F7$) COMMA var(X5) COMMA var(Y5) SEMI » « SEMI var(A3$) EOS
0x0f39…0f3c 1411 GOTO 23 20
0x0f3c…0f6a 1412 PRINT » X Y Z« COMMA = ( %75 ) → b5f3
0x0f6a…0f7c 1413 PRINT USING var(F7$) COMMA var(X5) COMMA var(Y5) COMMA var(Z5) SEMI » « SEMI var(A3$) EOS
0x0f7c…0f7f 1414 GOTO 23 20
0x0f7f…0f92 1415 PRINT » Z« COMMA = ( %75 ) → b5f3
0x0f92…0f9f 1416 PRINT USING var(F7$) COMMA var(Z5) SEMI » « SEMI var(A3$) EOS
0x0f9f…0fa4 1417 RETURN »A« EOS
0x0fa4…0fa7 1418 GOTO 32 20
0x0fa7…0fac 1419 RETURN »B« EOS
0x0fac…0faf 1420 TRAP ERR OFF
0x0faf…0fb0 1421 FNEND
0x0fb0…0fb4 1600 DEF var(FNB%) EOS
0x0fb4…0fb8 1602 TRAP ERR 1660
0x0fb8…0fbf 1609 19400d01f132f3
0x0fbf…0fcf 1610 PRINT 2# SEMI »$$$$$$$$$« EOS
0x0fcf…0fd3 1620 1a400df3
0x0fd3…0fe0 1630 SPACE 2 SEMI -501 EOS
0x0fe0…0fec 1631 READ 2# SEMI ELEMENT var(A$) ( 1 1 ) [] EOS
0x0fec…0ff9 1632 SPACE 2 SEMI -1 EOS
0x0ff9…1005 1633 13f402f27241730101749ff3
0x1005…1008 1650 RETURN 1 EOS
0x1008…1013 1660 RETURN -1 EOS
0x1013…1016 1670 TRAP ERR OFF
0x1016…1017 1680 FNEND
0x1017…101c 1700 DEF var(FNP%) var(A%) EOS
0x101c…101f 1702 GOSUB 0 → 80
0x101f…1027 1705 IF var(A%) 10 > COMMA 0 41 23
0x1027…1034 1710 ON var(A%) COMMA 0 21 23 32 23 21 23 37 23 EOS
0x1034…1050 1715 PRINT USING var(F7$) COMMA = ( 26 ) → b5f163f171732e74b5f16bf171736f4b0074b5f3
0x1050…1053 1717 RETURN 1 EOS
0x1053…1070 1720 PRINT USING var(F7$) COMMA = ( 26 ) → b5f163f171732e74b5f16bf171733b74b5f14004f3
0x1070…1073 1722 RETURN 1 EOS
0x1073…1088 1725 PRINT USING var(F7$) COMMA = ( 59 ) → b5f14004f171736f4b0074b5f3
0x1088…108b 1727 RETURN 1 EOS
0x108b…1092 1729 LET var(A%) COMMA var(A%) 10 SUB2 EOS
0x1092…109f 1730 ON var(A%) COMMA 0 53 23 var(D) 53 23 var(F6$) 23 EOS
0x109f…10ca 1735 PRINT USING ELEMENT var(F6$) ( 8 54 ) [] COMMA = ( 4 ) → b5f14009f171731a74b5f163f171732e74b5f16bf171736f4b0074b5f3
0x10ca…10cd 1737 RETURN 1 EOS
0x10cd…10f9 1740 PRINT USING ELEMENT var(F6$) ( 8 54 ) [] COMMA = ( 4 ) → b5f14009f171731a74b5f163f171732e74b5f16bf171733b74b5f14004f3
0x10f9…10fc 1743 RETURN 1 EOS
0x10fc…1120 1745 PRINT USING ELEMENT var(F6$) ( 8 54 ) [] COMMA = ( 4 ) → b5f14009f171733b74b5f14004f171736f4b0074b5f3
0x1120…1123 1747 RETURN 1 EOS
0x1123…1124 1748 FNEND
0x1124…1128 1800 DEF var(FND%) EOS
0x1128…1135 1810 LET var(X4) COMMA var(X) COMMA var(Y4) COMMA var(Y) COMMA var(Z4) COMMA var(Z) EOS
0x1135…1146 1840 LET var(X5) COMMA var(C1) var(A1) var(X4) MULT PLUS var(A2) var(Y4) MULT PLUS var(A3) var(Z4) MULT PLUS EOS
0x1146…1159 1850 LET var(Y5) COMMA var(C2) var(A4) var(X4) MULT PLUS var(A5) var(Y4) MULT PLUS var(A6) var(Z4) MULT PLUS EOS
0x1159…116f 1860 LET var(Z5) COMMA var(C3) var(A7) var(X4) MULT PLUS var(A8) var(Y4) MULT PLUS var(A9) var(Z4) MULT PLUS EOS
0x116f…119d 1880 PRINT USING var(F7$) COMMA = ( 4 ) → b5f27007444953504c4159f271731a74b5f263f271732e74b5f26bf271733b74b5f24004f2f3
0x119d…11a0 1885 GOSUB 32 → 80
0x11a0…11a3 1887 RETURN 1 EOS
0x11a3…11a4 1888 FNEND
0x11a4…11a8 1900 DEF var(FNM$) EOS
0x11a8…11ca 1905 LET var(A0%) COMMA ELEMENT var(T1%') ( var(N0%) 1 ) [] = ( ELEMENT var(T1%') ( var(N0%) 1 ) [] %100 DIV ) → a16f6400e4e3f3
0x11ca…11d9 1910 IF var(A0%) 11 EQ COMMA 5 »POINT« EOS
0x11d9…11ed 1915 IF var(A0%) 21 EQ var(A0%) 31 EQ OR COMMA 5 »SEQU.« EOS
0x11ed…11fc 1920 IF var(A0%) 22 EQ COMMA 5 »SIGN.« EOS
0x11fc…120b 1925 IF var(A0%) 23 EQ COMMA 5 »DIST.« EOS
0x120b…1219 1930 IF var(A0%) 24 EQ COMMA 5 »TIME« EOS
0x1219…1245 1935 PRINT »**** UNKNOWN DIG.MODE IN TABLE ****« EOS
0x1245…124e 1940 RETURN »ERROR« EOS
0x124e…124f 1945 FNEND
0x124f…1296 2000 REM ************ M A I N P R O G R A M **********************
0x1296…1299 2020 GOSUB 0 → 78
0x1299…129c 2030 GOSUB 0 »\x00«
0x129c…129f 2040 GOSUB 0 ELEMENT
0x129f…12a2 2050 GOSUB 0 var(A2)
0x12a2…12a5 2100 GOSUB 0 var(A1$)
0x12a5…12ae 2120 IF var(N0%) 0 → e9f1004020
0x12ae…12b1 2130 GOSUB 0 var(C1)
0x12b1…12b4 2140 GOSUB 0 var(N1$)
0x12b4…12b7 2150 GOSUB 0 var(N$)
0x12b7…12c7 2160 ON var(R%) COMMA 0 »\x90!\x10" "0"\xf3\x1b@\x03\xf1rOs@\x03\x02t\x9f\xf3\x03@\x03\x00\xe7\xf1\x00\x00!\x000«
0x12c7…12d4 2170 LET var(N0%) COMMA ELEMENT var(T1%') ( var(N0%) 2 ) [] EOS
0x12d4…12dd 2175 IF var(N0%) 0 EQ COMMA 0 0 33
0x12dd…12e0 2180 GOTO 48 33
0x12e0…12ed 2190 LET var(N0%) COMMA ELEMENT var(T1%') ( var(N0%) 3 ) [] EOS
0x12ed…12f6 2195 IF var(N0%) 0 EQ COMMA 0 0 33
0x12f6…12f9 2200 GOTO 48 33
0x12f9…12fc 2210 GOTO 0 → 90
0x12fc…12ff 2220 GOTO 0 33
0x12ff…130e 2230 IF ELEMENT var(T1%') ( var(N0%) 1 ) [] 11 <> COMMA 0 var(Y) 34
0x130e…1311 2240 GOSUB 0 var(Y)
0x1311…1314 2250 GOTO var(A1$) 33
0x1314…132e 2260 IF ELEMENT var(T1%') ( var(N0%) 1 ) [] 21 <> ELEMENT var(T1%') ( var(N0%) 1 ) [] 31 <> AND COMMA 0 → 9022
0x132e…1331 2270 GOSUB 0 var(Y6%)
0x1331…1334 2280 GOTO var(A1$) 33
0x1334…1344 2290 ON ( var(L5%) 21 SUB2 ) COMMA 1 0 var(A%) 0 USING 0 ( EOS
0x1344…1347 2300 GOTO var(A1$) 33
0x1347…138d 3000 REM ******************************************************************
0x138d…1390 5000 GOSUB var(Y) → 80
0x1390…1393 5001 GOSUB → 8080
0x1393…1396 5002 TRAP 3 OFF
0x1396…13dc 5003 PRINT » -----------------------------------------------------« EOS
0x13dc…1420 5004 PRINT » OBJECT OBJECT DIG- SHORT LONG« EOS
0x1420…1464 5005 PRINT » NO. MODE PED2 PED2« EOS
0x1464…14aa 5006 PRINT » -----------------------------------------------------« EOS
0x14aa…14b2 5007 19400d01f14014f3
0x14b2…14b9 5008 LET var(N0%) COMMA var(I%) EOS
0x14b9…14c0 5009 LET var(R$) COMMA = var(FNM$) EOS
0x14c0…14cf 5010 IF ELEMENT var(T1%') ( var(I%) 2 ) [] 0 <> COMMA 0 20 var(A1$)
0x14cf…14dd 5011 LET var(K$) COMMA » MENU« EOS
0x14dd…14e0 5012 GOTO 21 var(A1$)
0x14e0…14f1 5014 LET var(K$) COMMA ELEMENT var(T1$) ( ELEMENT var(T1%') ( var(I%) 2 ) [] ) [] EOS
0x14f1…1500 5015 IF ELEMENT var(T1%') ( var(I%) 3 ) [] 0 <> COMMA 0 25 var(A1$)
0x1500…150e 5016 LET var(L$) COMMA » MENU« EOS
0x150e…1511 5017 GOTO 32 var(A1$)
0x1511…1522 5019 LET var(L$) COMMA ELEMENT var(T1$) ( ELEMENT var(T1%') ( var(I%) 3 ) [] ) [] EOS
0x1522…1526 5020 REM
0x1526…1559 5021 PRINT USING var(F5$) COMMA = ( 15 ) → b5f1400df171731974b5f1724b73400d749ff171732574b5f149f171733074b5f148f171733c74b5f14af3
0x1559…155d 5022 1a400df3
0x155d…155f 5023 PRINT EOS
0x155f…158e 5024 PRINT » CHOOSE OBJECT NO.!« EOS
0x158e…15c9 5025 PRINT » CHANGING TABLE -> OBJECT NO.=0« EOS
0x15c9…15f4 5026 INPUT » OBJECT NO.=:« var(N0%) EOS
0x15f4…15f6 5027 PRINT EOS
0x15f6…15fa 5028 TRAP 3 5500
0x15fa…1603 5030 IF var(N0%) var(N1%) → e9f105f3
0x1603…161e 5031 PRINT »OBJECT NO.« SEMI var(N0%) SEMI »ILLEGAL« EOS
0x161e…1621 5032 GOTO 38 var(A1$)
0x1621…1624 5200 GOSUB var(Y) → 80
0x1624…1627 5210 GOSUB → 8080
0x1627…165a 5220 PRINT »OBJECT OBJECT DIG- SHORT LONG« EOS
0x165a…169b 5230 PRINT » NO. MODE PED2 PED2 T=TEXT« SEMI EOS
0x169b…16af 5235 PRINT = ( 62 ) → b5f2700a413d4143432e42415345f3
0x16af…16f0 5240 PRINT »--------------------------------------------------- E=EXIT« SEMI EOS
0x16f0…1705 5245 PRINT = ( 62 ) → b5f2700b4d3d4d414e2e494e505554f3
0x1705…170c 5250 LET var(R$) COMMA = var(FNM$) EOS
0x170c…171b 5252 IF ELEMENT var(T1%') ( var(N0%) 2 ) [] 0 <> COMMA 0 var(FNL%) var(N1$)
0x171b…1729 5253 LET var(K$) COMMA » MENU« EOS
0x1729…172c 5254 GOTO var(A%) var(N1$)
0x172c…173d 5255 LET var(K$) COMMA ELEMENT var(T1$) ( ELEMENT var(T1%') ( var(N0%) 2 ) [] ) [] EOS
0x173d…174c 5256 IF ELEMENT var(T1%') ( var(N0%) 3 ) [] 0 <> COMMA 0 var(Y) var(N1$)
0x174c…175a 5257 LET var(L$) COMMA » MENU« EOS
0x175a…175d 5258 GOTO var(A1) var(N1$)
0x175d…176e 5260 LET var(L$) COMMA ELEMENT var(T1$) ( ELEMENT var(T1%') ( var(N0%) 3 ) [] ) [] EOS
0x176e…179b 5265 PRINT USING var(F5$) COMMA var(N0%) COMMA = ( 9 ) → b5f1724b734003749ff171731774b5f149f171732074b5f148f171732b74b5f14af3
0x179b…17d2 5270 PRINT »---------------------------------------------------« EOS
0x17d2…17d4 5275 PRINT EOS
0x17d4…17d7 5280 GOSUB var(A0x80)
0x17d7…17d9 5285 RETURN EOS
0x17d9…17e5 5400 LET var(T4) COMMA ELEMENT var(T1') ( var(N0%) ) [] EOS
0x17e5…17e9 5410 TRAP 3 5500
0x17e9…17f7 5415 1d7005504544414cf101f24015f3
0x17f7…1800 5420 IF var(S%) 1 EQ COMMA 0 var(A1$) var(N$)
0x1800…180e 5425 1d7005504544414cf102f24015f3
0x180e…1817 5430 IF var(S%) 1 EQ COMMA 0 var(Y) var(N$)
0x1817…1820 5435 IF var(S%) 2 EQ COMMA 0 »\x1b@\x11\xf1qs\x03tU\xf3\x1b@\x11\xf1q@«si»\xf3\x00\x10T\x1b@\x12\xf1\x05\xf3\x00\x90U\x1b@\x12\xf1«soh»\xf3«si»qs\x07t\xaf\xf2\xf3\x00\x90U\x1b@\x12\xf1\x02\xf3\x19@
«soh»\xf1oF\x00\xf3«si»qs\x07t\xaf\xf2\xf3\x1a@
\xf3\x00\x90U\x1bM\xf1q\xb8\xf3\x03«
0x1820…182a 5437 LET var(A0%) COMMA = ( 3 ) var(FNL%) EOS
0x182a…1832 5440 LET var(A0%) COMMA = var(FND%) EOS
0x1832…1835 5445 GOTO 16 var(N$)
0x1835…183b 5450 LET var(R%) COMMA 5 EOS
0x183b…183e 5455 GOTO → 9055
0x183e…1844 5460 LET var(R%) COMMA 1 EOS
0x1844…184c 5461 PRINT = ( 7 ) → aff2f3
0x184c…184f 5465 GOTO → 9055
0x184f…1855 5470 LET var(R%) COMMA 2 EOS
0x1855…185e 5471 19400d01f16f4600f3
0x185e…1866 5472 PRINT = ( 7 ) → aff2f3
0x1866…186a 5473 1a400df3
0x186a…186d 5475 GOTO → 9055
0x186d…1873 5500 LET var(V5$) COMMA = → b8f3
0x1873…187d 5505 IF var(V5$) »T« EQ COMMA 0 32 var(FNL%)
0x187d…1887 5510 IF var(V5$) »A« EQ COMMA 0 32 var(FNL%)
0x1887…1891 5515 IF var(V5$) »M« EQ COMMA 0 32 var(FNL%)
0x1891…189b 5517 IF var(V5$) »E« EQ COMMA 0 var(A0x55)
0x189b…189e 5518 GOTO → 8555
0x189e…18a1 5520 GOSUB 0 var(FNT%)
0x18a1…18a4 5530 GOTO 21 var(N$)
0x18a4…18aa 5540 LET var(R%) COMMA 3 EOS
0x18aa…18ad 5542 GOTO → 9055
0x18ad…18b3 5585 LET var(R%) COMMA 4 EOS
0x18b3…18b6 5590 TRAP 3 OFF
0x18b6…18b8 5595 RETURN EOS
0x18b8…18c3 5600 LET var(D3) COMMA 0 COMMA var(D) COMMA 0 EOS
0x18c3…18cd 5601 LET var(A0%) COMMA = ( 3 ) var(FNL%) EOS
0x18cd…1907 5602 LET var(J9%) COMMA 1 COMMA var(D%) COMMA var(D4%) %100 SUB2 COMMA var(X1) COMMA var(X) COMMA var(Y1) COMMA var(Y) COMMA var(Z4) COMMA var(Z) COMMA var(X4) COMMA var(X) COMMA var(Y4) COMMA var(Y) COMMA var(Z4) COMMA var(Z) COMMA var(X1) COMMA var(X1) 0.001 PLUS EOS
0x1907…1934 5603 IF ELEMENT var(T1%') ( var(N0%) 4 ) [] 1 EQ ELEMENT var(T1%') ( var(N0%) 4 ) [] 11 EQ OR COMMA 27 var(D%) COMMA var(D%) 16 PLUS COMMA var(A%) COMMA ELEMENT var(T1%') ( var(N0%) 4 ) [] 1 PLUS EOS
0x1934…1941 5604 ELSE 27 var(A%) COMMA ELEMENT var(T1%') ( var(N0%) 4 ) [] EOS
0x1941…1944 5605 GOSUB 0 var(X4)
0x1944…194e 5606 LET var(A0%) COMMA = ( var(A%) ) var(FNT%) EOS
0x194e…1964 5607 LET var(A1$) COMMA = ( »FIRST POINT« ) var(FNF$) EOS
0x1964…196e 5608 LET var(A0%) COMMA = ( 3 ) var(FNL%) EOS
0x196e…197a 5609 LET var(I9%) COMMA 2 COMMA var(D%) COMMA var(D4%) EOS
0x197a…1987 5610 LET var(X4) COMMA var(X) COMMA var(Y4) COMMA var(Y) COMMA var(Z4) COMMA var(Z) EOS
0x1987…1995 5611 1d7005504544414cf101f24015f3
0x1995…199e 5612 IF var(S%) 0 EQ COMMA 0 49 var(A%)
0x199e…19a8 5613 LET var(A0%) COMMA = ( 3 ) var(FNL%) EOS
0x19a8…19b1 5614 LET var(I9%) COMMA var(I9%) 1 PLUS EOS
0x19b1…19d1 5615 LET var(D) COMMA ( var(X) var(X1) SUB2 ) var(Y4) MULT ( var(Y1) var(Y) SUB2 ) var(X4) MULT PLUS var(Y) var(X1) MULT PLUS var(X) var(Y1) MULT SUB2 EOS
0x19d1…19f6 5616 LET var(D) COMMA = ( var(D) ) ?SGN var(D) MULT var(D) MULT ( ( var(X) var(X1) SUB2 ) 2 POW ( var(Y) var(Y1) SUB2 ) 2 POW PLUS ) DIV EOS
0x19f6…19ff 5617 IF var(D) 0 EQ COMMA 0 16 var(A%)
0x19ff…1a09 5620 LET var(D3) COMMA var(D3) var(D) PLUS EOS
0x1a09…1a17 5621 IF = ( var(D3) ) ?ABS var(D9) ?< COMMA 0 16 var(A%)
0x1a17…1a1d 5624 LET var(D3) COMMA 0 EOS
0x1a1d…1a25 5625 PRINT = ( 7 ) → aff2f3
0x1a25…1a2e 5626 LET var(J9%) COMMA var(J9%) 1 PLUS EOS
0x1a2e…1a3f 5627 LET var(A0%) COMMA = ( ELEMENT var(T1%') ( var(N0%) 4 ) [] ) var(FNT%) EOS
0x1a3f…1a4f 5628 LET var(X1) COMMA var(X4) COMMA var(Y1) COMMA var(Y4) COMMA var(Z1) COMMA var(Z4) EOS
0x1a4f…1a52 5630 GOTO 16 var(A%)
0x1a52…1a5d 5631 LET var(D%) COMMA var(D4%) %100 PLUS EOS
0x1a5d…1a6e 5632 LET var(A0%) COMMA = ( ELEMENT var(T1%') ( var(N0%) 4 ) [] ) var(FNT%) EOS
0x1a6e…1a7d 5633 LET var(J9%) COMMA var(J9%) 1 PLUS COMMA var(D%) COMMA var(D4%) EOS
0x1a7d…1a85 5634 LET var(A0%) COMMA = var(FNB%) EOS
0x1a85…1a9a 5635 LET var(A1$) COMMA = ( »LAST POINT« ) var(FNF$) EOS
0x1a9a…1acf 5636 PRINT »**« SEMI var(I9%) SEMI » POINTS SAMPLED , « SEMI var(J9%) SEMI » POINTS STORED **« EOS
0x1acf…1ad1 5637 PRINT EOS
0x1ad1…1ad3 5638 RETURN EOS
0x1ad3…1ad7 5800 TRAP 3 5947
0x1ad7…1ae1 5820 LET var(A0%) COMMA = ( 3 ) var(FNL%) EOS
0x1ae1…1ae8 5822 PRINT = ( 7 ) → aff3
0x1ae8…1b14 5823 LET var(X4) COMMA var(X) COMMA var(Y4) COMMA var(Y) COMMA var(Z4) COMMA var(Z) COMMA var(X9) COMMA var(X) COMMA var(Y9) COMMA var(Y) COMMA var(Z9) COMMA var(Z) COMMA var(D%) COMMA var(D4%) %100 SUB2 COMMA var(T9) COMMA var(T4) EOS
0x1b14…1b17 5824 GOSUB 0 var(X4)
0x1b17…1b43 5825 IF ELEMENT var(T1') ( var(N0%) ) [] 0 ?< var(T4) ( ELEMENT var(T1') ( var(N0%) ) [] 1 SUB2 ) <> OR var(T4) ELEMENT var(T1') ( var(N0%) ) [] <> OR COMMA 27 var(T9) COMMA var(T4) EOS
0x1b43…1b70 5827 IF ELEMENT var(T1%') ( var(N0%) 4 ) [] 1 EQ ELEMENT var(T1%') ( var(N0%) 4 ) [] 11 EQ OR COMMA 27 var(D%) COMMA var(D%) 16 PLUS COMMA var(A%) COMMA ELEMENT var(T1%') ( var(N0%) 4 ) [] 1 PLUS EOS
0x1b70…1b7d 5828 ELSE 27 var(A%) COMMA ELEMENT var(T1%') ( var(N0%) 4 ) [] EOS
0x1b7d…1b87 5830 LET var(A0%) COMMA = ( var(A%) ) var(FNT%) EOS
0x1b87…1b92 5831 LET var(A0%) COMMA = ( var(A%) ) var(FNP%) EOS
0x1b92…1b9e 5832 LET var(T4) COMMA ELEMENT var(T1') ( var(N0%) ) [] EOS
0x1b9e…1ba5 5833 LET var(D%) COMMA var(D4%) EOS
0x1ba5…1bb3 5835 1d7005504544414cf101f24015f3
0x1bb3…1bbc 5840 IF var(S%) 0 <> COMMA 0 var(FNL%) var(Y6%)
0x1bbc…1bc6 5843 LET var(A0%) COMMA = ( 3 ) var(FNL%) EOS
0x1bc6…1bce 5845 LET var(A0%) COMMA = var(FND%) EOS
0x1bce…1bd1 5850 GOTO 53 var(Y6%)
0x1bd1…1bdb 5855 LET var(A0%) COMMA = ( 3 ) var(FNL%) EOS
0x1bdb…1be8 5860 LET var(X4) COMMA var(X) COMMA var(Y4) COMMA var(Y) COMMA var(Z4) COMMA var(Z) EOS
0x1be8…1bee 5865 LET var(J8%) COMMA 0 EOS
0x1bee…1bfc 5870 1d7005504544414cf101f24015f3
0x1bfc…1c05 5875 LET var(J8%) COMMA var(J8%) 1 PLUS EOS
0x1c05…1c0e 5880 IF var(J8%) 30 > COMMA 0 5 var(Z6%)
0x1c0e…1c17 5885 IF var(S%) 0 <> COMMA 0 »«si»qs\x07t\xaf\xf2\xf3«soh»\x00f«si»\xf3\x1b@\x11\xf1qsrOs@\x03\x04t\x9ftb\xf3\x1b@\x11\xf1qsrOs@\x03\x04t\x9ft@«so»\xf3\x1b@ \xf1rNs@\x03t\x9f\xf3\x005X\x19@
«soh»\xf1oF\x00\xf3«si»qs\x07t\xaf\xf2\xf3\x1a@
\xf3\x03rNs«
0x1c17…1c1f 5890 PRINT = ( 7 ) → aff2f3
0x1c1f…1c22 5892 GOSUB 0 var(X4)
0x1c22…1c24 5893 PRINT EOS
0x1c24…1c35 5895 LET var(A0%) COMMA = ( ELEMENT var(T1%') ( var(N0%) 4 ) [] ) var(FNT%) EOS
0x1c35…1c47 5896 LET var(A0%) COMMA = ( ELEMENT var(T1%') ( var(N0%) 4 ) [] ) var(FNP%) EOS
0x1c47…1c53 5898 LET var(T4) COMMA ELEMENT var(T1') ( var(N0%) ) [] EOS
0x1c53…1c56 5900 GOTO 53 var(Y6%)
0x1c56…1c5f 5905 19400d01f16f4600f3
0x1c5f…1c67 5906 PRINT = ( 7 ) → aff2f3
0x1c67…1c6b 5907 1a400df3
0x1c6b…1c78 5908 IF ELEMENT var(T1') ( var(N0%) ) [] 0 ?< COMMA 15 EOS
0x1c78…1c87 5910 IF ELEMENT var(T1%') ( var(N0%) 1 ) [] 31 EQ COMMA 0 35 var(Z6%)
0x1c87…1c8a 5911 GOSUB 0 var(X4)
0x1c8a…1c98 5912 IF ELEMENT var(T1') ( var(N0%) ) [] 0 ?< COMMA 1 0 → 80
0x1c98…1ca3 5913 LET var(D%) COMMA var(D4%) %100 PLUS EOS
0x1ca3…1ca5 5914 PRINT EOS
0x1ca5…1cb6 5915 LET var(A0%) COMMA = ( ELEMENT var(T1%') ( var(N0%) 4 ) [] ) var(FNT%) EOS
0x1cb6…1cc8 5916 LET var(A0%) COMMA = ( ELEMENT var(T1%') ( var(N0%) 4 ) [] ) var(FNP%) EOS
0x1cc8…1d0c 5918 PRINT = ( 11 ) → b5f2703a3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3df3
0x1d0c…1d13 5920 LET var(D%) COMMA var(D4%) EOS
0x1d13…1d16 5921 TRAP 3 OFF
0x1d16…1d18 5922 RETURN EOS
0x1d18…1d1b 5923 GOSUB 0 var(X4)
0x1d1b…1d29 5924 IF ELEMENT var(T1') ( var(N0%) ) [] 0 ?< COMMA 1 0 → 80
0x1d29…1d2b 5926 PRINT EOS
0x1d2b…1d3c 5927 LET var(A0%) COMMA = ( ELEMENT var(T1%') ( var(N0%) 4 ) [] ) var(FNT%) EOS
0x1d3c…1d4e 5928 LET var(A0%) COMMA = ( ELEMENT var(T1%') ( var(N0%) 4 ) [] ) var(FNP%) EOS
0x1d4e…1d59 5930 LET var(D%) COMMA var(D4%) %100 PLUS EOS
0x1d59…1d6f 5935 LET var(X4) COMMA var(X9) COMMA var(Y4) COMMA var(Y9) COMMA var(Z4) COMMA var(Z9) COMMA var(T4) COMMA var(T9) EOS
0x1d6f…1d71 5937 PRINT EOS
0x1d71…1d82 5940 LET var(A0%) COMMA = ( ELEMENT var(T1%') ( var(N0%) 4 ) [] ) var(FNT%) EOS
0x1d82…1d94 5941 LET var(A0%) COMMA = ( ELEMENT var(T1%') ( var(N0%) 4 ) [] ) var(FNP%) EOS
0x1d94…1dd9 5942 PRINT = ( 11 ) → b5f2703b3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3df3
0x1dd9…1de0 5943 LET var(D%) COMMA var(D4%) EOS
0x1de0…1de3 5945 TRAP 3 OFF
0x1de3…1de5 5946 RETURN EOS
0x1de5…1deb 5947 LET var(V5$) COMMA = → b8f3
0x1deb…1dee 5948 GOSUB 0 var(FNT%)
0x1dee…1df2 5949 TRAP 3 5947
0x1df2…1df5 5950 GOTO 53 var(Y6%)
0x1df5…1dff 6000 LET var(A0%) COMMA = ( 3 ) var(FNL%) EOS
0x1dff…1e12 6005 LET var(X4) COMMA var(X) COMMA var(Y4) COMMA var(Y) COMMA var(Z4) COMMA var(Z) COMMA var(D%) COMMA var(D4%) EOS
0x1e12…1e19 6010 PRINT = ( 7 ) → aff3
0x1e19…1e1c 6020 GOSUB 0 var(X4)
0x1e1c…1e2e 6025 IF ELEMENT var(T1%') ( var(N0%) 4 ) [] 1 EQ COMMA 27 var(D%) COMMA 14 EOS
0x1e2e…1e40 6027 IF ELEMENT var(T1%') ( var(N0%) 4 ) [] 11 EQ COMMA 27 var(D%) COMMA 15 EOS
0x1e40…1e51 6030 LET var(A0%) COMMA = ( ELEMENT var(T1%') ( var(N0%) 4 ) [] ) var(FNT%) EOS
0x1e51…1e63 6040 LET var(A0%) COMMA = ( ELEMENT var(T1%') ( var(N0%) 4 ) [] ) var(FNP%) EOS
0x1e63…1e6f 6045 LET var(T4) COMMA ELEMENT var(T1') ( var(N0%) ) [] EOS
0x1e6f…1e71 6050 RETURN EOS
0x1e71…1e75 6200 REM
0x1e75…1e7f 6205 IF var(V5$) »T« EQ COMMA 0 32 var(FNT%)
0x1e7f…1e89 6210 IF var(V5$) »A« EQ COMMA 0 var(N1$) var(FNT%)
0x1e89…1e93 6215 IF var(V5$) »M« EQ COMMA 0 ELEMENT var(FNT%)
0x1e93…1e95 6218 RETURN EOS
0x1e95…1e99 6220 TRAP ERR 6222
0x1e99…1ea6 6221 SPACE 2 SEMI -1 EOS
0x1ea6…1ed5 6222 PRINT »GIVE TEXT YOU WANT WRITTEN ON FILE:« COMMA = ( %75 ) → b5f3
0x1ed5…1ed8 6223 TRAP ERR OFF
0x1ed8…1edb 6224 INPUT var(A1$) EOS
0x1edb…1ee9 6225 PRINT 2# SEMI »*« SEMI var(A1$) SEMI »*« EOS
0x1ee9…1eeb 6230 RETURN EOS
0x1eeb…1f0d 6252 INPUT »GIVE NEW ACCUMULATING BASE:« COMMA var(T4) EOS
0x1f0d…1f16 6253 PRINT = ( %75 ) → b5f3
0x1f16…1f1e 6257 19400d01f14014f3
0x1f1e…1f34 6259 IF ELEMENT var(T1%') ( var(I%) 5 ) [] ELEMENT var(T1%') ( var(N0%) 5 ) [] <> COMMA 0 var(X5) var(FNT%)
0x1f34…1f40 6260 LET ELEMENT var(T1') ( var(I%) ) [] COMMA var(T4) EOS
0x1f40…1f44 6263 1a400df3
0x1f44…1f46 6265 RETURN EOS
0x1f46…1f65 6272 INPUT »GIVE VALUE MANUAL INPUT:« COMMA var(T4) EOS
0x1f65…1f6e 6273 PRINT = ( %75 ) → b5f3
0x1f6e…1f70 6290 RETURN EOS
0x1f70…1f7e 6400 LET var(D9) COMMA 0 EOS
0x1f7e…1f8a 6405 LET var(T4) COMMA ELEMENT var(T1') ( var(N0%) ) [] EOS
0x1f8a…1f99 6410 IF ELEMENT var(T1%') ( var(N0%) 4 ) [] 10 > COMMA 0 32 var(C1)
0x1f99…1fad 6415 ON ELEMENT var(T1%') ( var(N0%) 4 ) [] COMMA 0 48 var(C1) var(A0x64) 48 var(C1) var(A1$) var(C1) EOS
0x1fad…1fc5 6420 ON ( ELEMENT var(T1%') ( var(N0%) 4 ) [] 10 SUB2 ) COMMA 0 48 var(C1) var(A0x64) 48 var(C1) var(A1$) var(C1) EOS
0x1fc5…1fcb 6430 LET var(D4%) COMMA 14 EOS
0x1fcb…1fce 6435 GOTO var(Y) var(C1)
0x1fce…1fd4 6440 LET var(D4%) COMMA 30 EOS
0x1fd4…1fd7 6445 GOTO var(Y) var(C1)
0x1fd7…1fdd 6450 LET var(D4%) COMMA 18 EOS
0x1fdd…1ff2 6460 IF ELEMENT var(T1%') ( var(N0%) 4 ) [] 10 > COMMA 27 var(D4%) COMMA var(D4%) 1 PLUS EOS
0x1ff2…2003 6470 IF ELEMENT var(T1%') ( var(N0%) 1 ) [] %100 > COMMA 0 0 var(A1)
0x2003…2012 6480 IF ELEMENT var(T1%') ( var(N0%) 1 ) [] 11 EQ COMMA 0 var(A1$) var(A1)
0x2012…2021 6485 IF ELEMENT var(T1%') ( var(N0%) 1 ) [] 21 EQ COMMA 0 0 var(A1)
0x2021…2030 6486 IF ELEMENT var(T1%') ( var(N0%) 1 ) [] 32 ?< COMMA 0 → 9064
0x2030…2052 6487 PRINT »ERROR UNKNOWN DIGITIZING MODE« EOS
0x2052…2053 6488 06
0x2053…2064 6490 LET var(D4%) COMMA var(D4%) 500 PLUS EOS
0x2064…2067 6495 GOTO var(A1$) var(A1)
0x2067…2072 6500 LET var(D4%) COMMA var(D4%) %200 PLUS EOS
0x2072…2083 6520 IF ELEMENT var(T1%') ( var(N0%) 1 ) [] %100 ?< COMMA 0 var(A1$) var(A1)
0x2083…20a5 6525 LET var(L5%) COMMA ELEMENT var(T1%') ( var(N0%) 1 ) [] = ( ELEMENT var(T1%') ( var(N0%) 1 ) [] %100 DIV ) → a16f6400e4e3f3
0x20a5…20bb 6530 LET var(D9%) COMMA ( ELEMENT var(T1%') ( var(N0%) 1 ) [] var(L5%) SUB2 ) %100 DIV EOS
0x20bb…20c2 6532 LET var(D9) COMMA var(D9%) EOS
0x20c2…20cb 6535 IF var(L5%) 24 EQ COMMA 0 var(A1$) var(A1)
0x20cb…20d4 6537 LET var(D9) COMMA var(D9) 10 DIV EOS
0x20d4…20eb 6540 LET var(D9) COMMA var(D9) = ( var(A1) 2 POW var(A2) 2 POW PLUS var(A3) 2 POW PLUS ) SQR DIV EOS
0x20eb…20f5 6545 LET var(D9) COMMA var(D9) var(D9) MULT EOS
0x20f5…20f7 6550 RETURN EOS
0x20f7…2105 6600 IF ELEMENT var(T1%') ( var(N0%) 4 ) [] 10 ?< COMMA 5 EOS
0x2105…2112 6620 IF ELEMENT var(T1') ( var(N0%) ) [] 0 EQ COMMA 5 EOS
0x2112…211f 6630 IF ELEMENT var(T1') ( var(N0%) ) [] 0 ?< COMMA 34 EOS
0x211f…212d 6631 IF ELEMENT var(T1%') ( var(N0%) 1 ) [] 31 > COMMA 15 EOS
0x212d…2132 6632 REM
0x2132…2135 6635 GOSUB ELEMENT var(FNT%)
0x2135…2137 6640 RETURN EOS
0x2137…2138 6645 DOEND
0x2138…2156 6650 IF var(T4) ELEMENT var(T1') ( var(N0%) ) [] EQ var(T4) ( ELEMENT var(T1') ( var(N0%) ) [] 1 SUB2 ) EQ OR COMMA 0 var(Y) var(X4)
0x2156…2158 6655 RETURN EOS
0x2158…2164 6660 LET var(T4) COMMA ELEMENT var(T1') ( var(N0%) ) [] EOS
0x2164…216c 6665 19400d01f14014f3
0x216c…2182 6670 IF ELEMENT var(T1%') ( var(I%) 5 ) [] ELEMENT var(T1%') ( var(N0%) 5 ) [] <> COMMA 0 → 8066
0x2182…2190 6675 LET ELEMENT var(T1') ( var(I%) ) [] COMMA var(T4) 1 PLUS EOS
0x2190…2194 6680 1a400df3
0x2194…2196 6690 RETURN EOS
0x2196…219a 6700 REM
0x219a…219e 6710 TRAP 0 6840
0x219e…21a4 6720 LET var(N1%) COMMA 0 EOS
0x21a4…21ad 6730 LET var(N1%) COMMA var(N1%) 1 PLUS EOS
0x21ad…21b3 6740 LINPUT 1# SEMI var(R1$) EOS
0x21b3…21c4 6750 LET ELEMENT var(T1$) ( var(N1%) ) [] COMMA ELEMENT var(R1$) ( 7 14 ) [] EOS
0x21c4…21d5 6760 LET ELEMENT var(T2$) ( var(N1%) ) [] COMMA ELEMENT var(R1$) ( 16 23 ) [] EOS
0x21d5…21eb 6770 LET ELEMENT var(T1%') ( var(N1%) 1 ) [] COMMA = ( ELEMENT var(R1$) ( 25 31 ) [] ) VAL EOS
0x21eb…2201 6780 LET ELEMENT var(T1%') ( var(N1%) 2 ) [] COMMA = ( ELEMENT var(R1$) ( 33 39 ) [] ) VAL EOS
0x2201…2217 6790 LET ELEMENT var(T1%') ( var(N1%) 3 ) [] COMMA = ( ELEMENT var(R1$) ( 41 47 ) [] ) VAL EOS
0x2217…222d 6800 LET ELEMENT var(T1%') ( var(N1%) 4 ) [] COMMA = ( ELEMENT var(R1$) ( 49 55 ) [] ) VAL EOS
0x222d…2243 6810 LET ELEMENT var(T1%') ( var(N1%) 5 ) [] COMMA = ( ELEMENT var(R1$) ( 57 63 ) [] ) VAL EOS
0x2243…225c 6820 LET ELEMENT var(T1') ( var(N1%) ) [] COMMA = ( ELEMENT var(R1$) ( %64 %72 ) [] ) VAL EOS
0x225c…225f 6830 GOTO 48 var(A2)
0x225f…2268 6840 LET var(N1%) COMMA var(N1%) 1 SUB2 EOS
0x2268…226b 6845 TRAP 0 OFF
0x226b…226d 6850 RETURN EOS
0x226d…2270 7000 GOSUB → 8080
0x2270…2273 7001 GOSUB 0 → 81
0x2273…227a 7008 19400d01f107f3
0x227a…227c 7010 PRINT EOS
0x227c…2280 7020 1a400df3
0x2280…22ba 7021 PRINT » WELCOME TO THE MAPDAT DIGITIZE PROGRAM ! « EOS
0x22ba…22f5 7024 PRINT » *******************************************« EOS
0x22f5…2334 7025 INPUT » GIVE FILE NAME , DATA FILE :« var(B$) EOS
0x2334…2336 7026 PRINT EOS
0x2336…2350 7027 1602f242700f3b524c3d313032343b4143433d494ee2f14025f3
0x2350…2366 7028 ON var(C%) 1 PLUS COMMA 0 var(A1$) »« »« = 0 »« »« »« »\x10p: APPEND MODE ? (Y/N) :S\xf3\x03Sp\x00\xe7\xf1\x00\x00p\x03Sp«soh»N\xec\xf1\x00\x80p \x02\xf3\x00\x90q!\x02\xf2od\x00\xf3\x03qs\x02t\xb1\x00\xe7\xf1\x00\x80p\x00\x90q«si»p\x14 FILE \xf2B\xf2p«so» IS A NEW FILE\xf3\x16\x02\xf2Bp\x08;RL=1024\xe2\xf3\x05\xf3\x0bp\x02
\x1bT\xf1p\x0bTABLE.NAMES\xf3\x16\x05\xf2T\xf3\x15\xf4\x05\xf3«soh»`\x80«soh»\x80\x80«si»qs\x1at\xb5\xf2p TABLE NO.\xf2qs(t\xb5\xf2p\x05TABLE\xf3\x1b@«
0x2366…23a5 7050 INPUT » APPEND MODE ? (Y/N) :« var(S$) EOS
0x23a5…23ae 7052 IF var(S$) »« EQ COMMA 0 0 »Sp«soh»«
0x23ae…23b8 7055 IF var(S$) »N« <> COMMA 0 → 8070
0x23b8…23bb 7060 2002f3
0x23bb…23be 7070 GOTO → 9071
0x23be…23c5 7080 SPACE 2 SEMI %100 EOS
0x23c5…23d1 7085 IF = ( 2 ) → b100e7f1008070
0x23d1…23d4 7090 GOTO → 9071
0x23d4…23ff 7100 PRINT » FILE « SEMI var(B$) SEMI » IS A NEW FILE« EOS
0x23ff…240f 7110 1602f24270083b524c3d31303234e2f3
0x240f…2411 7190 RETURN EOS
0x2411…2416 7200 REM
0x2416…2427 7202 LET var(N$) COMMA »TABLE.NAMES« EOS
0x2427…242c 7204 1605f254f3
0x242c…2430 7208 RESTORE 5# EOS
0x2430…2433 7210 GOSUB var(Y) → 80
0x2433…2436 7220 GOSUB → 8080
0x2436…2457 7225 PRINT = ( 26 ) → b5f270095441424c45204e4f2ef271732874b5f270055441424c45f3
0x2457…245d 7230 LET var(I%) COMMA 0 EOS
0x245d…245f 7232 PRINT EOS
0x245f…2465 7234 INPUT 5# SEMI var(N$) EOS
0x2465…2471 7236 IF = ( 5 ) → b101e7f1005072
0x2471…247a 7238 LET var(I%) COMMA var(I%) 1 PLUS EOS
0x247a…248c 7240 PRINT = ( 30 ) → b5f2400df271732874b5f254f3
0x248c…2497 7245 LET ELEMENT var(N1$) ( var(I%) ) [] COMMA var(N$) EOS
0x2497…249a 7247 GOTO 52 ELEMENT
0x249a…249d 7250 GOSUB 32 → 81
0x249d…24cc 7253 PRINT » CHOOSE TABLE NO.« EOS
0x24cc…24fd 7254 PRINT » TERMINATION -> NO.=0« EOS
0x24fd…252b 7255 INPUT » TABLE NO. = « COMMA var(I%) EOS
0x252b…2534 7260 IF var(I%) 0 EQ COMMA 0 0 → 90
0x2534…253f 7262 LET var(N$) COMMA ELEMENT var(N1$) ( var(I%) ) [] EOS
0x253f…2553 7265 1601f25470092e543b4143433d494ee2f14025f3
0x2553…2563 7270 ON var(C%) 1 PLUS COMMA 0 → 9072727272728072f3
0x2563…2582 7272 PRINT = ( 20 ) → b5f170155448452046494c4520444f204e4f54204558495354f3
0x2582…2585 7275 GOTO var(FNL%) ELEMENT
0x2585…25a7 7280 PRINT = ( 20 ) → b5f170185448452046494c45204e414d4520495320494c4c4547414cf3
0x25a7…25aa 7285 GOTO var(FNL%) ELEMENT
0x25aa…25ac 7290 RETURN EOS
0x25ac…25b6 7300 LET var(A0%) COMMA = ( 3 ) var(FNL%) EOS
0x25b6…25d2 7302 LET var(I9%) COMMA 1 COMMA var(D%) COMMA var(D4%) %100 SUB2 COMMA var(X4) COMMA var(X) COMMA var(Y4) COMMA var(Y) COMMA var(Z4) COMMA var(Z) EOS
0x25d2…25ff 7303 IF ELEMENT var(T1%') ( var(N0%) 4 ) [] 1 EQ ELEMENT var(T1%') ( var(N0%) 4 ) [] 11 EQ OR COMMA 27 var(D%) COMMA var(D%) 16 PLUS COMMA var(A%) COMMA ELEMENT var(T1%') ( var(N0%) 4 ) [] 1 PLUS EOS
0x25ff…260c 7304 ELSE 27 var(A%) COMMA ELEMENT var(T1%') ( var(N0%) 4 ) [] EOS
0x260c…260f 7305 GOSUB 0 var(X4)
0x260f…2619 7306 LET var(A0%) COMMA = ( var(A%) ) var(FNT%) EOS
0x2619…262f 7307 LET var(A1$) COMMA = ( »FIRST POINT« ) var(FNF$) EOS
0x262f…263b 7308 LET var(I9%) COMMA 1 COMMA var(D%) COMMA var(D4%) EOS
0x263b…2649 7311 1d7005504544414cf101f24015f3
0x2649…2652 7312 IF var(S%) 0 EQ COMMA 0 49 (
0x2652…265c 7313 LET var(A0%) COMMA = ( 3 ) var(FNL%) EOS
0x265c…2664 7314 PRINT = ( 7 ) → aff2f3
0x2664…266d 7315 LET var(I9%) COMMA var(I9%) 1 PLUS EOS
0x266d…267a 7316 LET var(X4) COMMA var(X) COMMA var(Y4) COMMA var(Y) COMMA var(Z4) COMMA var(Z) EOS
0x267a…2682 7317 19400d01f1401df3
0x2682…2686 7318 1a400df3
0x2686…2697 7328 LET var(A0%) COMMA = ( ELEMENT var(T1%') ( var(N0%) 4 ) [] ) var(FNT%) EOS
0x2697…269a 7330 GOTO 17 (
0x269a…26a4 7331 LET var(A0%) COMMA = ( 3 ) var(FNL%) EOS
0x26a4…26af 7332 LET var(D%) COMMA var(D4%) %100 PLUS EOS
0x26af…26c0 7333 LET var(A0%) COMMA = ( ELEMENT var(T1%') ( var(N0%) 4 ) [] ) var(FNT%) EOS
0x26c0…26d7 7334 LET var(I9%) COMMA var(I9%) 1 PLUS COMMA var(D%) COMMA var(D4%) COMMA var(I9%) COMMA var(I9%) 1 PLUS EOS
0x26d7…26df 7335 LET var(A0%) COMMA = var(FNB%) EOS
0x26df…26f4 7336 LET var(A1$) COMMA = ( »LAST POINT« ) var(FNF$) EOS
0x26f4…2729 7337 PRINT »**« SEMI var(I9%) SEMI » POINTS SAMPLED , « SEMI var(I9%) SEMI » POINTS STORED **« EOS
0x2729…272b 7338 PRINT EOS
0x272b…272d 7339 RETURN EOS
0x272d…2733 7500 LET var(D) COMMA 0 EOS
0x2733…273d 7501 LET var(A0%) COMMA = ( 3 ) var(FNL%) EOS
0x273d…2778 7502 LET var(J9%) COMMA 1 COMMA var(D%) COMMA var(D4%) %100 SUB2 COMMA var(X1) COMMA var(X) COMMA var(Y1) COMMA var(Y) COMMA var(Z1) COMMA var(Z) COMMA var(X1) COMMA var(X1) 0.001 PLUS COMMA var(X4) COMMA var(X) COMMA var(Y4) COMMA var(Y) COMMA var(Z4) COMMA var(Z) EOS
0x2778…27a5 7503 IF ELEMENT var(T1%') ( var(N0%) 4 ) [] 1 EQ ELEMENT var(T1%') ( var(N0%) 4 ) [] 11 EQ OR COMMA 27 var(D%) COMMA var(D%) 16 PLUS COMMA var(A%) COMMA ELEMENT var(T1%') ( var(N0%) 4 ) [] 1 PLUS EOS
0x27a5…27b2 7504 ELSE 27 var(A%) COMMA ELEMENT var(T1%') ( var(N0%) 4 ) [] EOS
0x27b2…27b5 7505 GOSUB 0 var(X4)
0x27b5…27bf 7506 LET var(A0%) COMMA = ( var(A%) ) var(FNT%) EOS
0x27bf…27d5 7507 LET var(A1$) COMMA = ( »FIRST POINT« ) var(FNF$) EOS
0x27d5…27e1 7509 LET var(I9%) COMMA 1 COMMA var(D%) COMMA var(D4%) EOS
0x27e1…27ef 7511 1d7005504544414cf101f24015f3
0x27ef…27f8 7512 IF var(S%) 0 EQ COMMA 0 49 USING
0x27f8…2802 7513 LET var(A0%) COMMA = ( 3 ) var(FNL%) EOS
0x2802…280b 7514 LET var(I9%) COMMA var(I9%) 1 PLUS EOS
0x280b…2821 7516 LET var(D) COMMA ( var(X) var(X1) SUB2 ) 2 POW ( var(Y) var(Y1) SUB2 ) 2 POW PLUS EOS
0x2821…282f 7521 IF = ( var(D) ) ?ABS var(D9) ?< COMMA 0 17 USING
0x282f…2837 7525 PRINT = ( 7 ) → aff2f3
0x2837…2840 7526 LET var(J9%) COMMA var(J9%) 1 PLUS EOS
0x2840…285c 7527 LET var(X4) COMMA var(X) COMMA var(Y4) COMMA var(Y) COMMA var(Z4) COMMA var(Z) COMMA var(X1) COMMA var(X) COMMA var(Y1) COMMA var(Y) COMMA var(Z1) COMMA var(Z) EOS
0x285c…286d 7528 LET var(A0%) COMMA = ( ELEMENT var(T1%') ( var(N0%) 4 ) [] ) var(FNT%) EOS
0x286d…2870 7530 GOTO 17 USING
0x2870…287a 7531 LET var(A0%) COMMA = ( 3 ) var(FNL%) EOS
0x287a…2885 7532 LET var(D%) COMMA var(D4%) %100 PLUS EOS
0x2885…2896 7533 LET var(A0%) COMMA = ( ELEMENT var(T1%') ( var(N0%) 4 ) [] ) var(FNT%) EOS
0x2896…28ad 7534 LET var(J9%) COMMA var(J9%) 1 PLUS COMMA var(D%) COMMA var(D4%) COMMA var(I9%) COMMA var(I9%) 1 PLUS EOS
0x28ad…28b5 7535 LET var(A0%) COMMA = var(FNB%) EOS
0x28b5…28ca 7536 LET var(A1$) COMMA = ( »LAST POINT« ) var(FNF$) EOS
0x28ca…28ff 7537 PRINT »**« SEMI var(I9%) SEMI » POINTS SAMPLED , « SEMI var(J9%) SEMI » POINTS STORED **« EOS
0x28ff…2901 7538 PRINT EOS
0x2901…2903 7539 RETURN EOS
0x2903…2914 7800 1606f2700b415452414e532e44415441f3
0x2914…291a 7810 INPUT 6# SEMI var(C1) EOS
0x291a…2920 7820 INPUT 6# SEMI var(C2) EOS
0x2920…2927 7830 INPUT 6# SEMI var(C3) EOS
0x2927…292d 7840 INPUT 6# SEMI var(A1) EOS
0x292d…2933 7850 INPUT 6# SEMI var(A2) EOS
0x2933…2939 7860 INPUT 6# SEMI var(A3) EOS
0x2939…293f 7870 INPUT 6# SEMI var(A4) EOS
0x293f…2946 7880 INPUT 6# SEMI var(A5) EOS
0x2946…294d 7890 INPUT 6# SEMI var(A6) EOS
0x294d…2954 7900 INPUT 6# SEMI var(A7) EOS
0x2954…295b 7910 INPUT 6# SEMI var(A8) EOS
0x295b…2962 7920 INPUT 6# SEMI var(A9) EOS
0x2962…2965 7930 1406f3
0x2965…2967 7940 RETURN EOS
0x2967…297c 8000 PRINT = ( 27 ) → af700141e271731b74afe2700141e2f3
0x297c…297e 8010 RETURN EOS
0x297e…2989 8020 PRINT = ( 27 ) → af700141e2f3
0x2989…298b 8030 RETURN EOS
0x298b…2996 8040 PRINT = ( 27 ) → af700167e2f3
0x2996…2998 8050 RETURN EOS
0x2998…29a3 8060 PRINT = ( 27 ) → af700168e2f3
0x29a3…29a5 8070 RETURN EOS
0x29a5…29b0 8080 PRINT = ( 27 ) → af700145e2f3
0x29b0…29b2 8090 RETURN EOS
0x29b2…29bd 8100 PRINT = ( 27 ) → af700148e2f3
0x29bd…29bf 8110 RETURN EOS
0x29bf…29d4 8120 PRINT = ( 27 ) → af700142e271731b74afe2700142e2f3
0x29d4…29d6 8130 RETURN EOS
0x29d6…29d9 9000 2002f3
0x29d9…29dc 9050 GOSUB var(Y) → 80
0x29dc…29dd 9100 END