|
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: 14641 (0x3931)
Notes: ZILOG_BASIC
Names: »PLOT.BP«
└─⟦837bc648a⟧ Bits:30006817 8" ZilogMCZ floppy NThun_0019 (Styredisk Plot - Prepare)
└─⟦this⟧ »PLOT.BP«
0x0000…0014 BasicHead {variables=0x01e0, stms=0x0a74, f2=0x2cc9, f3=0000000000000000000000000000}
0x0014…01f4 [
0x0014…01f4 [0x00]: VarDef {f0=0x0500, f1=0x43, f2=0x28} I3% 0x77
0x0014…01f4 [0x01]: VarDef {f0=0xffda, f1=0x4f, f2=0x0e} O 0x76
0x0014…01f4 [0x02]: VarDef {f0=0x0600, f1=0x00, f2=0x28} I0% 0x75
0x0014…01f4 [0x03]: VarDef {f0=0x0000, f1=0x00, f2=0x25} F0% 0x74
0x0014…01f4 [0x04]: VarDef {f0=0xaa00, f1=0x40, f2=0x37} X0% 0x73
0x0014…01f4 [0x05]: VarDef {f0=0x03a0, f1=0x05, f2=0x03} D5 0x72
0x0014…01f4 [0x06]: VarDef {f0=0xaaaa, f1=0x4f, f2=0x12} S 0x71
0x0014…01f4 [0x07]: VarDef {f0=0x0400, f1=0x0f, f2=0x29} J% 0x70
0x0014…01f4 [0x08]: VarDef {f0=0x0300, f1=0x0f, f2=0x2a} K% 0x6f
0x0014…01f4 [0x09]: VarDef {f0=0x0100, f1=0x0f, f2=0x25} F% 0x6e
0x0014…01f4 [0x0a]: VarDef {f0=0x2800, f1=0x02, f2=0x28} I2% 0x6d
0x0014…01f4 [0x0b]: VarDef {f0=0x2800, f1=0x01, f2=0x28} I1% 0x6c
0x0014…01f4 [0x0c]: VarDef {f0=0xaaaa, f1=0x4f, f2=0x10} Q 0x6b
0x0014…01f4 [0x0d]: VarDef {f0=0xfb04, f1=0x19, f2=0x36} FNW9% 0x6a
0x0014…01f4 [0x0e]: VarDef {f0=0xfb30, f1=0x18, f2=0x36} FNW8% 0x69
0x0014…01f4 [0x0f]: VarDef {f0=0xaaaa, f1=0x49, f2=0x15} V9 0x68
0x0014…01f4 [0x10]: VarDef {f0=0xaaaa, f1=0x49, f2=0x14} U9 0x67
0x0014…01f4 [0x11]: VarDef {f0=0xfb94, f1=0x17, f2=0x36} FNW7% 0x66
0x0014…01f4 [0x12]: VarDef {f0=0xfbc8, f1=0x19, f2=0x29} FNJ9% 0x65
0x0014…01f4 [0x13]: VarDef {f0=0x03a0, f1=0x42, f2=0x05} F2 0x64
0x0014…01f4 [0x14]: VarDef {f0=0x0390, f1=0x41, f2=0x05} F1 0x63
0x0014…01f4 [0x15]: VarDef {f0=0x0500, f1=0x47, f2=0x28} I7% 0x62
0x0014…01f4 [0x16]: VarDef {f0=0x0500, f1=0x48, f2=0x28} I8% 0x61
0x0014…01f4 [0x17]: VarDef {f0=0xfc38, f1=0x1f, f2=0x31} FNR% 0x60
0x0014…01f4 [0x18]: VarDef {f0=0x0380, f1=0x4f, f2=0x01} B 0x5f
0x0014…01f4 [0x19]: VarDef {f0=0x0378, f1=0x4f, f2=0x00} A 0x5e
0x0014…01f4 [0x1a]: VarDef {f0=0x0370, f1=0x4f, f2=0x03} D 0x5d
0x0014…01f4 [0x1b]: VarDef {f0=0x0100, f1=0x40, f2=0x24} E0% 0x5c
0x0014…01f4 [0x1c]: VarDef {f0=0x0100, f1=0x40, f2=0x23} D0% 0x5b
0x0014…01f4 [0x1d]: VarDef {f0=0x0398, f1=0x00, f2=0x18} Y0 0x5a
0x0014…01f4 [0x1e]: VarDef {f0=0x0390, f1=0x00, f2=0x17} X0 0x59
0x0014…01f4 [0x1f]: VarDef {f0=0xfcb0, f1=0x1f, f2=0x26} FNG% 0x58
0x0014…01f4 [0x20]: VarDef {f0=0xfc90, f1=0x1f, f2=0x27} FNH% 0x57
0x0014…01f4 [0x21]: VarDef {f0=0x0358, f1=0x46, f2=0x19} Z6 0x56
0x0014…01f4 [0x22]: VarDef {f0=0xaaaa, f1=0x49, f2=0x18} Y9 0x55
0x0014…01f4 [0x23]: VarDef {f0=0xaaaa, f1=0x49, f2=0x17} X9 0x54
0x0014…01f4 [0x24]: VarDef {f0=0xfd3c, f1=0x1f, f2=0x34} FNU% 0x53
0x0014…01f4 [0x25]: VarDef {f0=0x0378, f1=0x02, f2=0x10} Q2 0x52
0x0014…01f4 [0x26]: VarDef {f0=0x0370, f1=0x01, f2=0x10} Q1 0x51
0x0014…01f4 [0x27]: VarDef {f0=0xfd60, f1=0x1f, f2=0x03} FND 0x50
0x0014…01f4 [0x28]: VarDef {f0=0x0390, f1=0x46, f2=0x18} Y6 0x4f
0x0014…01f4 [0x29]: VarDef {f0=0x0328, f1=0x01, f2=0x03} D1 0x4e
0x0014…01f4 [0x2a]: VarDef {f0=0x0368, f1=0x06, f2=0x05} F6 0x4d
0x0014…01f4 [0x2b]: VarDef {f0=0x0360, f1=0x06, f2=0x04} E6 0x4c
0x0014…01f4 [0x2c]: VarDef {f0=0x0358, f1=0x06, f2=0x01} B6 0x4b
0x0014…01f4 [0x2d]: VarDef {f0=0x0350, f1=0x06, f2=0x00} A6 0x4a
0x0014…01f4 [0x2e]: VarDef {f0=0x0350, f1=0x46, f2=0x17} X6 0x49
0x0014…01f4 [0x2f]: VarDef {f0=0xfdf8, f1=0x1f, f2=0x2e} FNO% 0x48
0x0014…01f4 [0x30]: VarDef {f0=0x03a8, f1=0x0f, f2=0x15} V 0x47
0x0014…01f4 [0x31]: VarDef {f0=0x0398, f1=0x4f, f2=0x07} H 0x46
0x0014…01f4 [0x32]: VarDef {f0=0xfe20, f1=0x1f, f2=0x37} FNX% 0x45
0x0014…01f4 [0x33]: VarDef {f0=0xfd58, f1=0x1f, f2=0x39} FNZ% 0x44
0x0014…01f4 [0x34]: VarDef {f0=0x0368, f1=0x4f, f2=0x18} Y 0x43
0x0014…01f4 [0x35]: VarDef {f0=0x03b0, f1=0x0f, f2=0x17} X 0x42
0x0014…01f4 [0x36]: VarDef {f0=0xfe38, f1=0x1f, f2=0x2f} FNP% 0x41
0x0014…01f4 [0x37]: VarDef {f0=0x0348, f1=0x05, f2=0x18} Y5 0x40
0x0014…01f4 [0x38]: VarDef {f0=0x0340, f1=0x05, f2=0x17} X5 0x3f
0x0014…01f4 [0x39]: VarDef {f0=0x0338, f1=0x0f, f2=0x0b} L 0x3e
0x0014…01f4 [0x3a]: VarDef {f0=0x0330, f1=0x0f, f2=0x0c} M 0x3d
0x0014…01f4 [0x3b]: VarDef {f0=0xaaaa, f1=0x44, f2=0x18} Y4 0x3c
0x0014…01f4 [0x3c]: VarDef {f0=0xaaaa, f1=0x44, f2=0x17} X4 0x3b
0x0014…01f4 [0x3d]: VarDef {f0=0x0388, f1=0x03, f2=0x18} Y3 0x3a
0x0014…01f4 [0x3e]: VarDef {f0=0x0380, f1=0x03, f2=0x17} X3 0x39
0x0014…01f4 [0x3f]: VarDef {f0=0xaaaa, f1=0x42, f2=0x18} Y2 0x38
0x0014…01f4 [0x40]: VarDef {f0=0xaaaa, f1=0x42, f2=0x17} X2 0x37
0x0014…01f4 [0x41]: VarDef {f0=0xaaaa, f1=0x41, f2=0x18} Y1 0x36
0x0014…01f4 [0x42]: VarDef {f0=0xaaaa, f1=0x41, f2=0x17} X1 0x35
0x0014…01f4 [0x43]: VarDef {f0=0xfe64, f1=0x1f, f2=0x32} FNS% 0x34
0x0014…01f4 [0x44]: VarDef {f0=0xfef0, f1=0x19, f2=0x2c} FNM9% 0x33
0x0014…01f4 [0x45]: VarDef {f0=0xfcf4, f1=0x11, f2=0x31} FNR1% 0x32
0x0014…01f4 [0x46]: VarDef {f0=0x0200, f1=0x0f, f2=0x28} I% 0x31
0x0014…01f4 [0x47]: VarDef {f0=0xff54, f1=0x1f, f2=0x36} FNW% 0x30
0x0014…01f4 [0x48]: VarDef {f0=0x0100, f1=0x0f, f2=0x37} X% 0x2f
0x0014…01f4 [0x49]: VarDef {f0=0xaaaa, f1=0x4f, f2=0x22} C% 0x2e
0x0014…01f4 [0x4a]: VarDef {f0=0xaaaa, f1=0x4f, f2=0x21} B% 0x2d
0x0014…01f4 [0x4b]: VarDef {f0=0x0000, f1=0x0f, f2=0x20} A% 0x2c
0x0014…01f4 [0x4c]: VarDef {f0=0xff8c, f1=0x19, f2=0x37} FNX9% 0x2b
0x0014…01f4 [0x4d]: VarDef {f0=0xaaaa, f1=0x43, f2=0x22} C3% 0x2a
0x0014…01f4 [0x4e]: VarDef {f0=0xaaaa, f1=0x42, f2=0x22} C2% 0x29
0x0014…01f4 [0x4f]: VarDef {f0=0xaaaa, f1=0x41, f2=0x22} C1% 0x28
0x0014…01f4 [0x50]: VarDef {f0=0xffa8, f1=0x1f, f2=0x22} FNC% 0x27
0x0014…01f4 [0x51]: VarDef {f0=0x0320, f1=0x02, f2=0x03} D2 0x26
0x0014…01f4 [0x52]: VarDef {f0=0x0318, f1=0x09, f2=0x12} S9 0x25
0x0014…01f4 [0x53]: VarDef {f0=0x0310, f1=0x01, f2=0x12} S1 0x24
0x0014…01f4 [0x54]: VarDef {f0=0x0a00, f1=0x01, f2=0x35} V1% 0x23
0x0014…01f4 [0x55]: VarDef {f0=0x02c6, f1=0x0f, f2=0x57} X$ 0x22
0x0014…01f4 [0x56]: VarDef {f0=0x02a2, f1=0x01, f2=0x8a} K1' 0x21
0x0014…01f4 [0x57]: VarDef {f0=0x027e, f1=0x0f, f2=0x81} B' 0x20
0x0014…01f4 [0x58]: VarDef {f0=0x025a, f1=0x0f, f2=0x80} A' 0x1f
0x0014…01f4 [0x59]: VarDef {f0=0x0250, f1=0x09, f2=0x50} Q9$ 0x1e
0x0014…01f4 [0x5a]: VarDef {f0=0x024b, f1=0x0f, f2=0x52} S$ 0x1d
0x0014…01f4 [0x5b]: VarDef {f0=0x0243, f1=0x00, f2=0x10} Q0 0x1c
0x0014…01f4 [0x5c]: VarDef {f0=0x023b, f1=0x09, f2=0x03} D9 0x1b
0x0014…01f4 [0x5d]: VarDef {f0=0x0000, f1=0x09, f2=0x2c} M9% 0x1a
0x0014…01f4 [0x5e]: VarDef {f0=0x0233, f1=0x00, f2=0x0c} M0 0x19
0x0014…01f4 [0x5f]: VarDef {f0=0x022b, f1=0x09, f2=0x16} W9 0x18
0x0014…01f4 [0x60]: VarDef {f0=0x0223, f1=0x08, f2=0x16} W8 0x17
0x0014…01f4 [0x61]: VarDef {f0=0x021b, f1=0x01, f2=0x0f} P1 0x16
0x0014…01f4 [0x62]: VarDef {f0=0x0213, f1=0x01, f2=0x15} V1 0x15
0x0014…01f4 [0x63]: VarDef {f0=0x020b, f1=0x00, f2=0x15} V0 0x14
0x0014…01f4 [0x64]: VarDef {f0=0x0203, f1=0x07, f2=0x18} Y7 0x13
0x0014…01f4 [0x65]: VarDef {f0=0x01fb, f1=0x07, f2=0x17} X7 0x12
0x0014…01f4 [0x66]: VarDef {f0=0x01f3, f1=0x00, f2=0x12} S0 0x11
0x0014…01f4 [0x67]: VarDef {f0=0x01ee, f1=0x0f, f2=0x56} W$ 0x10
0x0014…01f4 [0x68]: VarDef {f0=0x01c2, f1=0x02, f2=0x98} Y2' 0xf
0x0014…01f4 [0x69]: VarDef {f0=0x0196, f1=0x02, f2=0x97} X2' 0xe
0x0014…01f4 [0x6a]: VarDef {f0=0x016a, f1=0x01, f2=0x98} Y1' 0xd
0x0014…01f4 [0x6b]: VarDef {f0=0x013e, f1=0x01, f2=0x97} X1' 0xc
0x0014…01f4 [0x6c]: VarDef {f0=0x0112, f1=0x0f, f2=0x90} Q' 0xb
0x0014…01f4 [0x6d]: VarDef {f0=0x00e6, f1=0x0f, f2=0x8f} P' 0xa
0x0014…01f4 [0x6e]: VarDef {f0=0x00da, f1=0x0f, f2=0x50} Q$ 0x9
0x0014…01f4 [0x6f]: VarDef {f0=0x00ce, f1=0x0f, f2=0x4f} P$ 0x8
0x0014…01f4 [0x70]: VarDef {f0=0x007a, f1=0x09, f2=0x53} T9$ 0x7
0x0014…01f4 [0x71]: VarDef {f0=0x0062, f1=0x03, f2=0x4d} N3$ 0x6
0x0014…01f4 [0x72]: VarDef {f0=0x004a, f1=0x02, f2=0x4d} N2$ 0x5
0x0014…01f4 [0x73]: VarDef {f0=0x0032, f1=0x01, f2=0x4d} N1$ 0x4
0x0014…01f4 [0x74]: VarDef {f0=0x002d, f1=0x0f, f2=0x42} C$ 0x3
0x0014…01f4 [0x75]: VarDef {f0=0x0028, f1=0x0f, f2=0x40} A$ 0x2
0x0014…01f4 [0x76]: VarDef {f0=0x000c, f1=0x02, f2=0x53} T2$ 0x1
0x0014…01f4 [0x77]: VarDef {f0=0x0000, f1=0x00, f2=0x53} T0$ 0x0
0x0014…01f4 ]
0x01f4…01f8 Statement 39312 @0x392f
0x01f8…01fc Statement 39168 @0x38fe
0x01fc…0200 Statement 38992 @0x38fc
0x0200…0204 Statement 38933 @0x38f2
0x0204…0208 Statement 38930 @0x38ed
0x0208…020c Statement 38919 @0x38e1
0x020c…0210 Statement 38912 @0x38b1
0x0210…0214 Statement 38688 @0x38af
0x0214…0218 Statement 38672 @0x38ab
0x0218…021c Statement 38656 @0x389d
0x021c…0220 Statement 38544 @0x3893
0x0220…0224 Statement 38528 @0x3885
0x0224…0228 Statement 38512 @0x387e
0x0228…022c Statement 38496 @0x3869
0x022c…0230 Statement 38480 @0x3865
0x0230…0234 Statement 38464 @0x3859
0x0234…0238 Statement 38448 @0x3838
0x0238…023c Statement 38432 @0x381d
0x023c…0240 Statement 38416 @0x3816
0x0240…0244 Statement 38405 @0x37f8
0x0244…0248 Statement 38400 @0x37d4
0x0248…024c Statement 38192 @0x37d2
0x024c…0250 Statement 38176 @0x37b4
0x0250…0254 Statement 38160 @0x37a8
0x0254…0258 Statement 38144 @0x379e
0x0258…025c Statement 37968 @0x379c
0x025c…0260 Statement 37952 @0x3790
0x0260…0264 Statement 37936 @0x3770
0x0264…0268 Statement 37920 @0x376e
0x0268…026c Statement 37904 @0x376b
0x026c…0270 Statement 37888 @0x3768
0x0270…0274 Statement 37760 @0x3762
0x0274…0278 Statement 37749 @0x3750
0x0278…027c Statement 37744 @0x3746
0x027c…0280 Statement 37728 @0x3734
0x0280…0284 Statement 37712 @0x371c
0x0284…0288 Statement 37696 @0x3701
0x0288…028c Statement 37680 @0x36f8
0x028c…0290 Statement 37664 @0x36e6
0x0290…0294 Statement 37648 @0x36da
0x0294…0298 Statement 37632 @0x36d6
0x0298…029c Statement 37520 @0x36c4
0x029c…02a0 Statement 37504 @0x36c2
0x02a0…02a4 Statement 37488 @0x36bf
0x02a4…02a8 Statement 37472 @0x36b0
0x02a8…02ac Statement 37456 @0x36a7
0x02ac…02b0 Statement 37440 @0x3689
0x02b0…02b4 Statement 37424 @0x366b
0x02b4…02b8 Statement 37408 @0x365f
0x02b8…02bc Statement 37392 @0x3658
0x02bc…02c0 Statement 37376 @0x3645
0x02c0…02c4 Statement 37264 @0x3643
0x02c4…02c8 Statement 37248 @0x363f
0x02c8…02cc Statement 37232 @0x3635
0x02cc…02d0 Statement 37216 @0x362a
0x02d0…02d4 Statement 37200 @0x361f
0x02d4…02d8 Statement 37184 @0x3600
0x02d8…02dc Statement 37168 @0x35e1
0x02dc…02e0 Statement 37152 @0x35cc
0x02e0…02e4 Statement 37136 @0x35b8
0x02e4…02e8 Statement 37120 @0x35b2
0x02e8…02ec Statement 37008 @0x35ab
0x02ec…02f0 Statement 36992 @0x35a8
0x02f0…02f4 Statement 36976 @0x35a5
0x02f4…02f8 Statement 36960 @0x35a0
0x02f8…02fc Statement 36944 @0x3595
0x02fc…0300 Statement 36928 @0x358a
0x0300…0304 Statement 36912 @0x3588
0x0304…0308 Statement 36896 @0x3576
0x0308…030c Statement 36880 @0x3563
0x030c…0310 Statement 36864 @0x354e
0x0310…0314 Statement 35216 @0x353d
0x0314…0318 Statement 35200 @0x352a
0x0318…031c Statement 35184 @0x350e
0x031c…0320 Statement 35168 @0x34f0
0x0320…0324 Statement 35152 @0x34ee
0x0324…0328 Statement 35136 @0x34ec
0x0328…032c Statement 35120 @0x34b9
0x032c…0330 Statement 35104 @0x3477
0x0330…0334 Statement 35088 @0x3452
0x0334…0338 Statement 35077 @0x3446
0x0338…033c Statement 35072 @0x340a
0x033c…0340 Statement 34896 @0x3408
0x0340…0344 Statement 34864 @0x33f4
0x0344…0348 Statement 34848 @0x33e3
0x0348…034c Statement 34832 @0x33cf
0x034c…0350 Statement 34816 @0x33bc
0x0350…0354 Statement 34704 @0x33a8
0x0354…0358 Statement 34688 @0x3397
0x0358…035c Statement 34672 @0x3383
0x035c…0360 Statement 34656 @0x3370
0x0360…0364 Statement 34640 @0x335c
0x0364…0368 Statement 34624 @0x334b
0x0368…036c Statement 34608 @0x3337
0x036c…0370 Statement 34592 @0x3324
0x0370…0374 Statement 34576 @0x3310
0x0374…0378 Statement 34560 @0x32ff
0x0378…037c Statement 34448 @0x32eb
0x037c…0380 Statement 34432 @0x32d4
0x0380…0384 Statement 34416 @0x32bd
0x0384…0388 Statement 34400 @0x32a9
0x0388…038c Statement 34384 @0x3298
0x038c…0390 Statement 34368 @0x3282
0x0390…0394 Statement 34352 @0x326c
0x0394…0398 Statement 34336 @0x3259
0x0398…039c Statement 34320 @0x3245
0x039c…03a0 Statement 34304 @0x3234
0x03a0…03a4 Statement 34192 @0x3220
0x03a4…03a8 Statement 34176 @0x320d
0x03a8…03ac Statement 34160 @0x3209
0x03ac…03b0 Statement 34144 @0x31f5
0x03b0…03b4 Statement 34128 @0x31e4
0x03b4…03b8 Statement 34112 @0x31ce
0x03b8…03bc Statement 34096 @0x31b8
0x03bc…03c0 Statement 34080 @0x31a5
0x03c0…03c4 Statement 34064 @0x319e
0x03c4…03c8 Statement 33936 @0x318a
0x03c8…03cc Statement 33920 @0x3179
0x03cc…03d0 Statement 33904 @0x3165
0x03d0…03d4 Statement 33888 @0x3152
0x03d4…03d8 Statement 33872 @0x313e
0x03d8…03dc Statement 33856 @0x312d
0x03dc…03e0 Statement 33840 @0x3117
0x03e0…03e4 Statement 33824 @0x3101
0x03e4…03e8 Statement 33808 @0x30ee
0x03e8…03ec Statement 33792 @0x30da
0x03ec…03f0 Statement 33680 @0x30c9
0x03f0…03f4 Statement 33664 @0x30b5
0x03f4…03f8 Statement 33648 @0x30a2
0x03f8…03fc Statement 33616 @0x309e
0x03fc…0400 Statement 33600 @0x308a
0x0400…0404 Statement 33584 @0x3079
0x0404…0408 Statement 33568 @0x3063
0x0408…040c Statement 33552 @0x304d
0x040c…0410 Statement 33536 @0x303a
0x0410…0414 Statement 33424 @0x3033
0x0414…0418 Statement 33408 @0x301f
0x0418…041c Statement 33392 @0x300e
0x041c…0420 Statement 33376 @0x2ffa
0x0420…0424 Statement 33360 @0x2fe3
0x0424…0428 Statement 33312 @0x2fcc
0x0428…042c Statement 33301 @0x2fbc
0x042c…0430 Statement 33296 @0x2f9a
0x0430…0434 Statement 33285 @0x2f8d
0x0434…0438 Statement 33282 @0x2f84
0x0438…043c Statement 33280 @0x2f4d
0x043c…0440 Statement 33177 @0x2f4b
0x0440…0444 Statement 33173 @0x2f3a
0x0444…0448 Statement 33172 @0x2f39
0x0448…044c Statement 33170 @0x2f22
0x044c…0450 Statement 33168 @0x2f0b
0x0450…0454 Statement 33157 @0x2f08
0x0454…0458 Statement 33152 @0x2f07
0x0458…045c Statement 33141 @0x2ef0
0x045c…0460 Statement 33136 @0x2ed9
0x0460…0464 Statement 33125 @0x2ed2
0x0464…0468 Statement 33106 @0x2ec0
0x0468…046c Statement 33024 @0x2e8c
0x046c…0470 Statement 32848 @0x2e8a
0x0470…0474 Statement 32800 @0x2e86
0x0474…0478 Statement 32789 @0x2e6b
0x0478…047c Statement 32784 @0x2e64
0x047c…0480 Statement 32773 @0x2e4b
0x0480…0484 Statement 32768 @0x2e1a
0x0484…0488 Statement 29952 @0x2e18
0x0488…048c Statement 28928 @0x2e0e
0x048c…0490 Statement 28800 @0x2e09
0x0490…0494 Statement 28693 @0x2dfd
0x0494…0498 Statement 28672 @0x2dc9
0x0498…049c Statement 24656 @0x2dc7
0x049c…04a0 Statement 24640 @0x2dbf
0x04a0…04a4 Statement 24624 @0x2d9b
0x04a4…04a8 Statement 24608 @0x2d79
0x04a8…04ac Statement 24592 @0x2d6d
0x04ac…04b0 Statement 24576 @0x2d40
0x04b0…04b4 Statement 18480 @0x2d3e
0x04b4…04b8 Statement 18464 @0x2d38
0x04b8…04bc Statement 16976 @0x2d2b
0x04bc…04c0 Statement 16960 @0x2d2a
0x04c0…04c4 Statement 16944 @0x2d1d
0x04c4…04c8 Statement 16933 @0x2d15
0x04c8…04cc Statement 16928 @0x2cf3
0x04cc…04d0 Statement 16912 @0x2cf0
0x04d0…04d4 Statement 16896 @0x2cce
0x04d4…04d8 Statement 16656 @0x2ca9
0x04d8…04dc Statement 16645 @0x2ca1
0x04dc…04e0 Statement 16512 @0x2c83
0x04e0…04e4 Statement 16496 @0x2c65
0x04e4…04e8 Statement 16480 @0x2c45
0x04e8…04ec Statement 16384 @0x2c41
0x04ec…04f0 Statement 14736 @0x2c30
0x04f0…04f4 Statement 14725 @0x2c1f
0x04f4…04f8 Statement 14720 @0x2c10
0x04f8…04fc Statement 14709 @0x2c06
0x04fc…0500 Statement 14704 @0x2bff
0x0500…0504 Statement 14672 @0x2bef
0x0504…0508 Statement 14341 @0x2be5
0x0508…050c Statement 14336 @0x2bb4
0x050c…0510 Statement 14229 @0x2bb2
0x0510…0514 Statement 14224 @0x2baf
0x0514…0518 Statement 14213 @0x2b93
0x0518…051c Statement 14208 @0x2b8f
0x051c…0520 Statement 14197 @0x2b6e
0x0520…0524 Statement 14192 @0x2b67
0x0524…0528 Statement 14181 @0x2b53
0x0528…052c Statement 14176 @0x2b4a
0x052c…0530 Statement 14160 @0x2b1a
0x0530…0534 Statement 14096 @0x2b18
0x0534…0538 Statement 14080 @0x2b11
0x0538…053c Statement 13968 @0x2b0f
0x053c…0540 Statement 13952 @0x2afe
0x0540…0544 Statement 13941 @0x2aed
0x0544…0548 Statement 13936 @0x2ae0
0x0548…054c Statement 13925 @0x2ac0
0x054c…0550 Statement 13924 @0x2abe
0x0550…0554 Statement 13922 @0x2ab7
0x0554…0558 Statement 13920 @0x2aa9
0x0558…055c Statement 13909 @0x2aa7
0x055c…0560 Statement 13904 @0x2aa3
0x0560…0564 Statement 13872 @0x2a95
0x0564…0568 Statement 13861 @0x2a8b
0x0568…056c Statement 13856 @0x2a84
0x056c…0570 Statement 13845 @0x2a7e
0x0570…0574 Statement 13833 @0x2a7b
0x0574…0578 Statement 13832 @0x2a71
0x0578…057c Statement 13831 @0x2a6f
0x057c…0580 Statement 13830 @0x2a47
0x0580…0584 Statement 13828 @0x2a25
0x0584…0588 Statement 13826 @0x2a19
0x0588…058c Statement 13824 @0x29e9
0x058c…0590 Statement 13637 @0x29e7
0x0590…0594 Statement 13632 @0x29e4
0x0594…0598 Statement 13621 @0x29de
0x0598…059c Statement 13616 @0x29d8
0x059c…05a0 Statement 13607 @0x29b5
0x05a0…05a4 Statement 13605 @0x299d
0x05a4…05a8 Statement 13602 @0x299b
0x05a8…05ac Statement 13600 @0x2992
0x05ac…05b0 Statement 13589 @0x298e
0x05b0…05b4 Statement 13573 @0x297a
0x05b4…05b8 Statement 13570 @0x296e
0x05b8…05bc Statement 13568 @0x2964
0x05bc…05c0 Statement 13461 @0x295e
0x05c0…05c4 Statement 13456 @0x2955
0x05c4…05c8 Statement 13440 @0x2941
0x05c8…05cc Statement 13431 @0x2938
0x05cc…05d0 Statement 13429 @0x292e
0x05d0…05d4 Statement 13424 @0x291d
0x05d4…05d8 Statement 13408 @0x2919
0x05d8…05dc Statement 13397 @0x28fe
0x05dc…05e0 Statement 13394 @0x28f8
0x05e0…05e4 Statement 13392 @0x28e4
0x05e4…05e8 Statement 13381 @0x28ab
0x05e8…05ec Statement 13376 @0x28a7
0x05ec…05f0 Statement 13368 @0x289b
0x05f0…05f4 Statement 13365 @0x2864
0x05f4…05f8 Statement 13360 @0x2862
0x05f8…05fc Statement 13168 @0x285f
0x05fc…0600 Statement 13152 @0x283d
0x0600…0604 Statement 13141 @0x2837
0x0604…0608 Statement 13136 @0x2834
0x0608…060c Statement 13120 @0x282e
0x060c…0610 Statement 13104 @0x282c
0x0610…0614 Statement 13072 @0x281a
0x0614…0618 Statement 13061 @0x2814
0x0618…061c Statement 13056 @0x2811
0x061c…0620 Statement 12949 @0x2809
0x0620…0624 Statement 12944 @0x2808
0x0624…0628 Statement 12928 @0x2801
0x0628…062c Statement 12917 @0x27fa
0x062c…0630 Statement 12912 @0x27e9
0x0630…0634 Statement 12901 @0x27d7
0x0634…0638 Statement 12896 @0x27ca
0x0638…063c Statement 12885 @0x27c0
0x063c…0640 Statement 12880 @0x27b7
0x0640…0644 Statement 12869 @0x27ae
0x0644…0648 Statement 12864 @0x27a8
0x0648…064c Statement 12853 @0x27a1
0x064c…0650 Statement 12848 @0x279a
0x0650…0654 Statement 12837 @0x2789
0x0654…0658 Statement 12832 @0x2780
0x0658…065c Statement 12816 @0x277a
0x065c…0660 Statement 12809 @0x2754
0x0660…0664 Statement 12807 @0x2733
0x0664…0668 Statement 12806 @0x272d
0x0668…066c Statement 12805 @0x272a
0x066c…0670 Statement 12804 @0x2722
0x0670…0674 Statement 12803 @0x2709
0x0674…0678 Statement 12802 @0x2706
0x0678…067c Statement 12800 @0x26fa
0x067c…0680 Statement 12697 @0x26f6
0x0680…0684 Statement 12693 @0x26ea
0x0684…0688 Statement 12688 @0x26c2
0x0688…068c Statement 12680 @0x26c0
0x068c…0690 Statement 12678 @0x26bd
0x0690…0694 Statement 12675 @0x26ba
0x0694…0698 Statement 12674 @0x26a3
0x0698…069c Statement 12672 @0x268c
0x069c…06a0 Statement 12664 @0x2675
0x06a0…06a4 Statement 12662 @0x2673
0x06a4…06a8 Statement 12660 @0x2668
0x06a8…06ac Statement 12658 @0x2659
0x06ac…06b0 Statement 12656 @0x264e
0x06b0…06b4 Statement 12648 @0x2648
0x06b4…06b8 Statement 12646 @0x2644
0x06b8…06bc Statement 12629 @0x263b
0x06bc…06c0 Statement 12624 @0x2629
0x06c0…06c4 Statement 12615 @0x2621
0x06c4…06c8 Statement 12613 @0x2606
0x06c8…06cc Statement 12608 @0x2603
0x06cc…06d0 Statement 12600 @0x25f7
0x06d0…06d4 Statement 12597 @0x25f3
0x06d4…06d8 Statement 12594 @0x25e7
0x06d8…06dc Statement 12592 @0x25b4
0x06dc…06e0 Statement 12581 @0x25b2
0x06e0…06e4 Statement 12579 @0x25af
0x06e4…06e8 Statement 12578 @0x25a6
0x06e8…06ec Statement 12432 @0x259d
0x06ec…06f0 Statement 12421 @0x2584
0x06f0…06f4 Statement 12418 @0x257c
0x06f4…06f8 Statement 12416 @0x2566
0x06f8…06fc Statement 12405 @0x255a
0x06fc…0700 Statement 12400 @0x2554
0x0700…0704 Statement 12368 @0x254e
0x0704…0708 Statement 12357 @0x2542
0x0708…070c Statement 12352 @0x250d
0x070c…0710 Statement 12336 @0x250c
0x0710…0714 Statement 12320 @0x250a
0x0714…0718 Statement 12304 @0x24fe
0x0718…071c Statement 12288 @0x24f8
0x071c…0720 Statement 10544 @0x24f5
0x0720…0724 Statement 10528 @0x24dc
0x0724…0728 Statement 10517 @0x24d5
0x0728…072c Statement 10512 @0x24c4
0x072c…0730 Statement 10368 @0x24af
0x0730…0734 Statement 10357 @0x24a7
0x0734…0738 Statement 10352 @0x249b
0x0738…073c Statement 10328 @0x2498
0x073c…0740 Statement 10325 @0x247e
0x0740…0744 Statement 10324 @0x2476
0x0744…0748 Statement 10322 @0x2472
0x0748…074c Statement 10320 @0x243e
0x074c…0750 Statement 10240 @0x243d
0x0750…0754 Statement 10128 @0x243a
0x0754…0758 Statement 10037 @0x241d
0x0758…075c Statement 10032 @0x23fa
0x075c…0760 Statement 10021 @0x23d7
0x0760…0764 Statement 10016 @0x23b4
0x0764…0768 Statement 10005 @0x2391
0x0768…076c Statement 09984 @0x238b
0x076c…0770 Statement 09880 @0x235a
0x0770…0774 Statement 09877 @0x2359
0x0774…0778 Statement 09872 @0x2356
0x0778…077c Statement 09776 @0x2353
0x077c…0780 Statement 09765 @0x2336
0x0780…0784 Statement 09760 @0x2319
0x0784…0788 Statement 09749 @0x22f0
0x0788…078c Statement 09744 @0x22c7
0x078c…0790 Statement 09733 @0x2292
0x0790…0794 Statement 09732 @0x227e
0x0794…0798 Statement 09728 @0x227a
0x0798…079c Statement 09621 @0x224a
0x079c…07a0 Statement 09600 @0x2249
0x07a0…07a4 Statement 09589 @0x2246
0x07a4…07a8 Statement 09296 @0x2233
0x07a8…07ac Statement 09285 @0x221a
0x07ac…07b0 Statement 09284 @0x2209
0x07b0…07b4 Statement 09282 @0x21f4
0x07b4…07b8 Statement 09280 @0x21e1
0x07b8…07bc Statement 09273 @0x21c8
0x07bc…07c0 Statement 09272 @0x21b7
0x07c0…07c4 Statement 09264 @0x21a2
0x07c4…07c8 Statement 09253 @0x219c
0x07c8…07cc Statement 09248 @0x2189
0x07cc…07d0 Statement 09240 @0x216a
0x07d0…07d4 Statement 09237 @0x2155
0x07d4…07d8 Statement 09235 @0x2144
0x07d8…07dc Statement 09234 @0x212f
0x07dc…07e0 Statement 09232 @0x211c
0x07e0…07e4 Statement 09224 @0x20fd
0x07e4…07e8 Statement 09223 @0x20e8
0x07e8…07ec Statement 09222 @0x20d7
0x07ec…07f0 Statement 09221 @0x20c2
0x07f0…07f4 Statement 09220 @0x20a8
0x07f4…07f8 Statement 09217 @0x208a
0x07f8…07fc Statement 09216 @0x2086
0x07fc…0800 Statement 09109 @0x2053
0x0800…0804 Statement 08704 @0x2052
0x0804…0808 Statement 08597 @0x204f
0x0808…080c Statement 08592 @0x203e
0x080c…0810 Statement 08576 @0x203a
0x0810…0814 Statement 08560 @0x202e
0x0814…0818 Statement 08544 @0x2024
0x0818…081c Statement 08528 @0x2021
0x081c…0820 Statement 08512 @0x201d
0x0820…0824 Statement 08496 @0x2011
0x0824…0828 Statement 08480 @0x2007
0x0828…082c Statement 08464 @0x1fff
0x082c…0830 Statement 08448 @0x1ff7
0x0830…0834 Statement 08341 @0x1fc5
0x0834…0838 Statement 08192 @0x1fc4
0x0838…083c Statement 06544 @0x1fc1
0x083c…0840 Statement 06528 @0x1fbd
0x0840…0844 Statement 06512 @0x1fbc
0x0844…0848 Statement 06272 @0x1fa9
0x0848…084c Statement 06261 @0x1f9d
0x084c…0850 Statement 06256 @0x1f8a
0x0850…0854 Statement 06224 @0x1f70
0x0854…0858 Statement 06213 @0x1f5f
0x0858…085c Statement 06208 @0x1f48
0x085c…0860 Statement 06192 @0x1f35
0x0860…0864 Statement 06181 @0x1f2f
0x0864…0868 Statement 06176 @0x1f23
0x0868…086c Statement 06160 @0x1f10
0x086c…0870 Statement 06000 @0x1efc
0x0870…0874 Statement 05991 @0x1ef0
0x0874…0878 Statement 05990 @0x1ede
0x0878…087c Statement 05989 @0x1ec7
0x087c…0880 Statement 05984 @0x1ec0
0x0880…0884 Statement 05968 @0x1ebc
0x0884…0888 Statement 05952 @0x1eb1
0x0888…088c Statement 05936 @0x1e89
0x088c…0890 Statement 05925 @0x1e7f
0x0890…0894 Statement 05922 @0x1e79
0x0894…0898 Statement 05904 @0x1e72
0x0898…089c Statement 05893 @0x1e4f
0x089c…08a0 Statement 05888 @0x1e4b
0x08a0…08a4 Statement 05781 @0x1e18
0x08a4…08a8 Statement 05776 @0x1e17
0x08a8…08ac Statement 05765 @0x1e14
0x08ac…08b0 Statement 05488 @0x1e10
0x08b0…08b4 Statement 05472 @0x1de2
0x08b4…08b8 Statement 05456 @0x1dc6
0x08b8…08bc Statement 05440 @0x1dbf
0x08bc…08c0 Statement 05424 @0x1dae
0x08c0…08c4 Statement 05408 @0x1d9d
0x08c4…08c8 Statement 05392 @0x1d8a
0x08c8…08cc Statement 05376 @0x1d80
0x08cc…08d0 Statement 05264 @0x1d6d
0x08d0…08d4 Statement 05248 @0x1d63
0x08d4…08d8 Statement 05232 @0x1d52
0x08d8…08dc Statement 05216 @0x1d41
0x08dc…08e0 Statement 05200 @0x1d2e
0x08e0…08e4 Statement 05184 @0x1d24
0x08e4…08e8 Statement 05168 @0x1d11
0x08e8…08ec Statement 05152 @0x1d07
0x08ec…08f0 Statement 05136 @0x1cf5
0x08f0…08f4 Statement 05122 @0x1ce6
0x08f4…08f8 Statement 05120 @0x1cde
0x08f8…08fc Statement 05008 @0x1cb0
0x08fc…0900 Statement 04944 @0x1caf
0x0900…0904 Statement 04933 @0x1ca8
0x0904…0908 Statement 04928 @0x1c8c
0x0908…090c Statement 04901 @0x1c70
0x090c…0910 Statement 04880 @0x1c62
0x0910…0914 Statement 04869 @0x1c54
0x0914…0918 Statement 04864 @0x1c4c
0x0918…091c Statement 04759 @0x1c18
0x091c…0920 Statement 04757 @0x1c17
0x0920…0924 Statement 04752 @0x1c14
0x0924…0928 Statement 04710 @0x1bf7
0x0928…092c Statement 04708 @0x1bd4
0x092c…0930 Statement 04706 @0x1bb1
0x0930…0934 Statement 04704 @0x1b8e
0x0934…0938 Statement 04696 @0x1b6b
0x0938…093c Statement 04694 @0x1b55
0x093c…0940 Statement 04692 @0x1b3f
0x0940…0944 Statement 04690 @0x1b28
0x0944…0948 Statement 04688 @0x1b20
0x0948…094c Statement 04672 @0x1b1c
0x094c…0950 Statement 04656 @0x1aff
0x0950…0954 Statement 04640 @0x1ae2
0x0954…0958 Statement 04624 @0x1adb
0x0958…095c Statement 04608 @0x1ad7
0x095c…0960 Statement 04501 @0x1ab4
0x0960…0964 Statement 04416 @0x1ab3
0x0964…0968 Statement 04406 @0x1ab0
0x0968…096c Statement 04405 @0x1aac
0x096c…0970 Statement 04245 @0x1aa2
0x0970…0974 Statement 04240 @0x1a98
0x0974…0978 Statement 04229 @0x1a92
0x0978…097c Statement 04224 @0x1a8f
0x097c…0980 Statement 04213 @0x1a85
0x0980…0984 Statement 04208 @0x1a77
0x0984…0988 Statement 04197 @0x1a6d
0x0988…098c Statement 04192 @0x1a67
0x098c…0990 Statement 04181 @0x1a56
0x0990…0994 Statement 04176 @0x1a50
0x0994…0998 Statement 04165 @0x1a3f
0x0998…099c Statement 04162 @0x1a26
0x099c…09a0 Statement 04161 @0x1a22
0x09a0…09a4 Statement 04160 @0x1a16
0x09a4…09a8 Statement 04151 @0x19e3
0x09a8…09ac Statement 04149 @0x19e2
0x09ac…09b0 Statement 04148 @0x19df
0x09b0…09b4 Statement 04133 @0x19cf
0x09b4…09b8 Statement 04128 @0x19bf
0x09b8…09bc Statement 04112 @0x199c
0x09bc…09c0 Statement 04101 @0x1994
0x09c0…09c4 Statement 04096 @0x1961
0x09c4…09c8 Statement 02448 @0x193d
0x09c8…09cc Statement 02437 @0x193c
0x09cc…09d0 Statement 02432 @0x1939
0x09d0…09d4 Statement 02421 @0x1936
0x09d4…09d8 Statement 02416 @0x192c
0x09d8…09dc Statement 02408 @0x192b
0x09dc…09e0 Statement 02404 @0x1912
0x09e0…09e4 Statement 02402 @0x18fc
0x09e4…09e8 Statement 02400 @0x18e7
0x09e8…09ec Statement 02389 @0x18ba
0x09ec…09f0 Statement 02384 @0x1892
0x09f0…09f4 Statement 02373 @0x1881
0x09f4…09f8 Statement 02368 @0x187b
0x09f8…09fc Statement 02357 @0x184e
0x09fc…0a00 Statement 02352 @0x1826
0x0a00…0a04 Statement 02341 @0x1818
0x0a04…0a08 Statement 02336 @0x17e6
0x0a08…0a0c Statement 02325 @0x17e3
0x0a0c…0a10 Statement 02322 @0x17ce
0x0a10…0a14 Statement 02320 @0x17c4
0x0a14…0a18 Statement 02312 @0x17c3
0x0a18…0a1c Statement 02310 @0x17b2
0x0a1c…0a20 Statement 02308 @0x179c
0x0a20…0a24 Statement 02306 @0x178e
0x0a24…0a28 Statement 02304 @0x177d
0x0a28…0a2c Statement 02197 @0x176c
0x0a2c…0a30 Statement 02192 @0x175f
0x0a30…0a34 Statement 02181 @0x1732
0x0a34…0a38 Statement 02176 @0x170a
0x0a38…0a3c Statement 02165 @0x16fd
0x0a3c…0a40 Statement 02160 @0x16f7
0x0a40…0a44 Statement 02149 @0x16ca
0x0a44…0a48 Statement 02144 @0x16a2
0x0a48…0a4c Statement 02133 @0x1670
0x0a4c…0a50 Statement 02128 @0x1662
0x0a50…0a54 Statement 02117 @0x165c
0x0a54…0a58 Statement 02114 @0x1648
0x0a58…0a5c Statement 02113 @0x1644
0x0a5c…0a60 Statement 02112 @0x163e
0x0a60…0a64 Statement 02103 @0x160b
0x0a64…0a68 Statement 02101 @0x160a
0x0a68…0a6c Statement 02096 @0x1607
0x0a6c…0a70 Statement 02085 @0x15f7
0x0a70…0a74 Statement 02080 @0x15d0
0x0a74…0a78 Statement 02064 @0x15c2
0x0a78…0a7c Statement 02056 @0x15a7
0x0a7c…0a80 Statement 02052 @0x1590
0x0a80…0a84 Statement 02051 @0x1571
0x0a84…0a88 Statement 02048 @0x1564
0x0a88…0a8c Statement 01941 @0x152d
0x0a8c…0a90 Statement 01925 @0x152c
0x0a90…0a94 Statement 01920 @0x1529
0x0a94…0a98 Statement 01909 @0x1513
0x0a98…0a9c Statement 01877 @0x1505
0x0a9c…0aa0 Statement 01872 @0x14fc
0x0aa0…0aa4 Statement 01861 @0x14c9
0x0aa4…0aa8 Statement 01392 @0x14c8
0x0aa8…0aac Statement 01381 @0x14c5
0x0aac…0ab0 Statement 01376 @0x14aa
0x0ab0…0ab4 Statement 01365 @0x1498
0x0ab4…0ab8 Statement 01360 @0x1486
0x0ab8…0abc Statement 01349 @0x1465
0x0abc…0ac0 Statement 01344 @0x143c
0x0ac0…0ac4 Statement 01333 @0x1418
0x0ac4…0ac8 Statement 01328 @0x13f2
0x0ac8…0acc Statement 01317 @0x13de
0x0acc…0ad0 Statement 01312 @0x13ac
0x0ad0…0ad4 Statement 01301 @0x13ab
0x0ad4…0ad8 Statement 01300 @0x13a7
0x0ad8…0adc Statement 01298 @0x1399
0x0adc…0ae0 Statement 01296 @0x1372
0x0ae0…0ae4 Statement 01288 @0x1366
0x0ae4…0ae8 Statement 01286 @0x1362
0x0ae8…0aec Statement 01285 @0x135c
0x0aec…0af0 Statement 01175 @0x134c
0x0af0…0af4 Statement 01174 @0x1340
0x0af4…0af8 Statement 01173 @0x1329
0x0af8…0afc Statement 01168 @0x131d
0x0afc…0b00 Statement 01157 @0x1301
0x0b00…0b04 Statement 01136 @0x12f5
0x0b04…0b08 Statement 01125 @0x12d0
0x0b08…0b0c Statement 01120 @0x12c4
0x0b0c…0b10 Statement 01109 @0x1294
0x0b10…0b14 Statement 01104 @0x1288
0x0b14…0b18 Statement 01093 @0x1260
0x0b18…0b1c Statement 01088 @0x1254
0x0b1c…0b20 Statement 01077 @0x1226
0x0b20…0b24 Statement 01072 @0x121a
0x0b24…0b28 Statement 01061 @0x11f3
0x0b28…0b2c Statement 01056 @0x11e7
0x0b2c…0b30 Statement 01045 @0x11c3
0x0b30…0b34 Statement 01040 @0x11b7
0x0b34…0b38 Statement 01029 @0x1190
0x0b38…0b3c Statement 01024 @0x1184
0x0b3c…0b40 Statement 00917 @0x1182
0x0b40…0b44 Statement 00916 @0x115e
0x0b44…0b48 Statement 00914 @0x113a
0x0b48…0b4c Statement 00913 @0x1105
0x0b4c…0b50 Statement 00912 @0x10f9
0x0b50…0b54 Statement 00904 @0x10f7
0x0b54…0b58 Statement 00902 @0x10f3
0x0b58…0b5c Statement 00901 @0x10ba
0x0b5c…0b60 Statement 00896 @0x10b9
0x0b60…0b64 Statement 00885 @0x10b6
0x0b64…0b68 Statement 00880 @0x10b3
0x0b68…0b6c Statement 00864 @0x10ad
0x0b6c…0b70 Statement 00854 @0x10aa
0x0b70…0b74 Statement 00832 @0x1097
0x0b74…0b78 Statement 00816 @0x1078
0x0b78…0b7c Statement 00800 @0x1062
0x0b7c…0b80 Statement 00789 @0x104f
0x0b80…0b84 Statement 00784 @0x1043
0x0b84…0b88 Statement 00656 @0x103b
0x0b88…0b8c Statement 00640 @0x102a
0x0b8c…0b90 Statement 00629 @0x1026
0x0b90…0b94 Statement 00624 @0x1011
0x0b94…0b98 Statement 00613 @0xffc
0x0b98…0b9c Statement 00608 @0xff1
0x0b9c…0ba0 Statement 00597 @0xfea
0x0ba0…0ba4 Statement 00592 @0xfdf
0x0ba4…0ba8 Statement 00582 @0xfd8
0x0ba8…0bac Statement 00581 @0xfbb
0x0bac…0bb0 Statement 00576 @0xfb3
0x0bb0…0bb4 Statement 00560 @0xfab
0x0bb4…0bb8 Statement 00549 @0xfa7
0x0bb8…0bbc Statement 00544 @0xfa3
0x0bbc…0bc0 Statement 00528 @0xf72
0x0bc0…0bc4 Statement 00517 @0xf71
0x0bc4…0bc8 Statement 00512 @0xf6e
0x0bc8…0bcc Statement 00402 @0xf6b
0x0bcc…0bd0 Statement 00400 @0xf5c
0x0bd0…0bd4 Statement 00391 @0xf55
0x0bd4…0bd8 Statement 00389 @0xf28
0x0bd8…0bdc Statement 00384 @0xf21
0x0bdc…0be0 Statement 00373 @0xef5
0x0be0…0be4 Statement 00368 @0xeef
0x0be4…0be8 Statement 00357 @0xec9
0x0be8…0bec Statement 00356 @0xebd
0x0bec…0bf0 Statement 00355 @0xeb1
0x0bf0…0bf4 Statement 00352 @0xea9
0x0bf4…0bf8 Statement 00341 @0xe7e
0x0bf8…0bfc Statement 00336 @0xe7d
0x0bfc…0c00 Statement 00325 @0xe7a
0x0c00…0c04 Statement 00320 @0xe5f
0x0c04…0c08 Statement 00309 @0xe3f
0x0c08…0c0c Statement 00304 @0xe2a
0x0c0c…0c10 Statement 00293 @0xe24
0x0c10…0c14 Statement 00256 @0xdf6
0x0c14…0c18 Statement 00149 @0xde9
0x0c18…0c1c Statement 00144 @0xddc
0x0c1c…0c20 Statement 00133 @0xdcf
0x0c20…0c24 Statement 00128 @0xdc8
0x0c24…0c28 Statement 00101 @0xdbb
0x0c28…0c2c Statement 00096 @0xdae
0x0c2c…0c30 Statement 00084 @0xda1
0x0c30…0c34 Statement 00082 @0xd94
0x0c34…0c38 Statement 00080 @0xd87
0x0c38…0c3c Statement 00064 @0xd7a
0x0c3c…0c40 Statement 00048 @0xd6f
0x0c40…0c44 Statement 00037 @0xd60
0x0c44…0c48 Statement 00032 @0xd54
0x0c48…0c4c Statement 00022 @0xd10
0x0c4c…0c50 Statement 00021 @0xce8
0x0c50…0c54 Statement 00009 @0xce2
0x0c54…0c58 Statement 00008 @0xcd2
0x0c58…0c5c Statement 00007 @0xcac
0x0c5c…0c60 Statement 00006 @0xc9e
0x0c60…0c64 Statement 00005 @0xc82
0x0c64…0c68 Statement 00002 @0xc68
0x0c68…0c82 0002 COM ELEMENT var(T0$) ( 8 ) [] ELEMENT var(T2$) ( 24 ) [] ELEMENT var(A$) ( 1 ) [] ELEMENT var(C$) ( 1 ) [] EOS
0x0c82…0c9e 0005 COM ELEMENT var(N1$) ( 20 ) [] ELEMENT var(N2$) ( 20 ) [] ELEMENT var(N3$) ( 20 ) [] ELEMENT var(T9$) ( %80 ) [] EOS
0x0c9e…0cac 0006 COM ELEMENT var(P$) ( 8 ) [] ELEMENT var(Q$) ( 8 ) [] EOS
0x0cac…0cd2 0007 COM ELEMENT var(P') ( 5 ) [] ELEMENT var(Q') ( 5 ) [] ELEMENT var(X1') ( 5 ) [] ELEMENT var(Y1') ( 5 ) [] ELEMENT var(X2') ( 5 ) [] ELEMENT var(Y2') ( 5 ) [] EOS
0x0cd2…0ce2 0008 COM ELEMENT var(W$) ( 1 ) [] var(S0) var(X7) var(Y7) var(V0) var(V1) var(P1) var(W8) var(W9) EOS
0x0ce2…0ce8 0009 COM var(M0) var(M9%) var(D9) var(Q0) EOS
0x0ce8…0d10 0015 DIM ELEMENT var(S$) ( 1 ) [] ELEMENT var(Q9$) ( 6 ) [] ELEMENT var(A') ( 4 ) [] ELEMENT var(B') ( 4 ) [] ELEMENT var(K1') ( 4 ) [] ELEMENT var(X$) ( %70 ) [] EOS
0x0d10…0d54 0016 REM ----------- PLOT.BP ver. april 1983 ------- copyright VIAK a/s
0x0d54…0d60 0020 LET var(Q9$) COMMA »DDDDDD« EOS
0x0d60…0d6f 0025 SYSTEM »LINELEN« COMMA %80 EOS
0x0d6f…0d7a 0030 SYSTEM »WARNOFF« EOS
0x0d7a…0d87 0040 SYSTEM »BUFFERS« COMMA 4 EOS
0x0d87…0d94 0050 LET var(S0) COMMA 20000 EOS
0x0d94…0da1 0052 LET var(X7) COMMA 2600 EOS
0x0da1…0dae 0054 LET var(Y7) COMMA 2800 EOS
0x0dae…0dbb 0060 LET var(V1) COMMA 270 EOS
0x0dbb…0dc8 0065 LET var(P1) COMMA 3.14159 EOS
0x0dc8…0dcf 0080 LET var(V1%) COMMA %100 EOS
0x0dcf…0ddc 0085 LET var(S1) COMMA 1e+09 EOS
0x0ddc…0de9 0090 LET var(S9) COMMA -1e+08 EOS
0x0de9…0df6 0095 LET var(D2) COMMA 0.1 EOS
0x0df6…0e24 0100 REM ----------- SCREEN-HANDLER --------------
0x0e24…0e2a 0125 DEF var(FNC%) var(C1%) var(C2%) var(C3%) EOS
0x0e2a…0e3f 0130 IF var(C1%) 1 EQ COMMA 15 = ( 27 ) → af71736f450074afe2f2f3
0x0e3f…0e5f 0135 PRINT = ( 27 ) → af71736f460074afe271731f6ae274afe271731f6be274afe2f2f3
0x0e5f…0e7a 0140 IF var(C1%) 3 EQ var(C1%) 4 EQ OR COMMA 15 = ( 27 ) → af71736f4e0069e374afe2f2f3
0x0e7a…0e7d 0145 RETURN 1 EOS
0x0e7d…0e7e 0150 FNEND
0x0e7e…0ea9 0155 REM ------------ ERROR MESS.--------------
0x0ea9…0eb1 0160 DEF var(FNX9%) var(A%) var(B%) var(C%) EOS
0x0eb1…0ebd 0163 LET var(X%) COMMA = ( 1 1 1 ) var(FNC%) EOS
0x0ebd…0ec9 0164 LET var(X%) COMMA = ( 2 1 1 ) var(FNC%) EOS
0x0ec9…0eef 0165 IF var(A%) var(N1$) »« EQ AND COMMA 15 = ( 5 ) → b5f27014536f727466696c20696b6b65206f707067697474f3
0x0eef…0ef5 0170 ELSE 27 var(A%) COMMA 0 EOS
0x0ef5…0f21 0175 IF var(B%) var(N2$) »« EQ AND COMMA 15 = ( 5 ) → b5f27019506172616d6574657266696c20696b6b65206f707067697474f3
0x0f21…0f28 0180 ELSE 27 var(B%) COMMA 0 EOS
0x0f28…0f55 0185 IF var(C%) var(T2$) »« EQ AND COMMA 15 = ( 5 ) → b5f2701a496e70757466696c20696b6b6520696e697469616c6973657274f3
0x0f55…0f5c 0187 ELSE 27 var(C%) COMMA 0 EOS
0x0f5c…0f6b 0190 IF ( var(A%) var(B%) OR var(C%) OR ) → eff10501f3
0x0f6b…0f6e 0192 GOSUB 0 → 95
0x0f6e…0f71 0200 RETURN 0 EOS
0x0f71…0f72 0205 FNEND
0x0f72…0fa3 0210 REM -------- READ TOP OF SORTFILE --------------
0x0fa3…0fa7 0220 DEF var(FNW%) EOS
0x0fa7…0fab 0225 TRAP ERR 0360
0x0fab…0fb3 0230 LINPUT 1# COMMA 0 SEMI var(T9$) EOS
0x0fb3…0fbb 0240 LINPUT 1# COMMA 1 SEMI var(X$) EOS
0x0fbb…0fd8 0245 LET var(M0) COMMA = ( ELEMENT var(X$) ( 14 20 ) [] ) VAL COMMA var(V0) COMMA = ( ELEMENT var(X$) ( 1 13 ) [] ) VAL EOS
0x0fd8…0fdf 0246 LET var(Q0) COMMA var(S0) var(M0) DIV EOS
0x0fdf…0fea 0250 LET var(W$) COMMA ELEMENT var(X$) ( 21 21 ) [] EOS
0x0fea…0ff1 0255 19400401f105f3
0x0ff1…0ffc 0260 LINPUT 1# COMMA var(I%) 1 PLUS SEMI var(X$) EOS
0x0ffc…1011 0265 LET ELEMENT var(X1') ( var(I%) ) [] COMMA = ( ELEMENT var(X$) ( 32 43 ) [] ) VAL EOS
0x1011…1026 0270 LET ELEMENT var(Y1') ( var(I%) ) [] COMMA = ( ELEMENT var(X$) ( 20 31 ) [] ) VAL EOS
0x1026…102a 0275 1a4004f3
0x102a…103b 0280 LET var(W8) COMMA = ( var(V0) ) → a9f159f171735574a8f3
0x103b…1043 0290 LET var(X%) COMMA = var(FNR1%) EOS
0x1043…104f 0310 LET var(X%) COMMA = ( 2 5 1 ) var(FNC%) EOS
0x104f…1062 0315 PRINT »Betegnelse : « SEMI var(T9$) EOS
0x1062…1078 0320 PRINT »Maalestokk : 1:« SEMI var(M0) EOS
0x1078…1097 0330 PRINT »Origo : « SEMI ELEMENT var(Y1') ( 1 ) [] COMMA ELEMENT var(X1') ( 1 ) [] EOS
0x1097…10aa 0340 PRINT »Utvidelse : « SEMI var(W$) EOS
0x10aa…10ad 0356 RETURN 1 EOS
0x10ad…10b3 0360 REM C
0x10b3…10b6 0370 TRAP ERR OFF
0x10b6…10b9 0375 RETURN 0 EOS
0x10b9…10ba 0380 FNEND
0x10ba…10f3 0385 REM ---------- DISPLAY AND ACCEPT MENU-CHOICE ----------
0x10f3…10f7 0386 DEF var(FNM9%) EOS
0x10f7…10f9 0388 PRINT EOS
0x10f9…1105 0390 LET var(X%) COMMA = ( 1 1 1 ) var(FNC%) EOS
0x1105…113a 0391 PRINT » M A P D A T P L O T T E G N E P R O G R A M« EOS
0x113a…115e 0392 PRINT » *** Sortert inputfil : « SEMI var(N1$) EOS
0x115e…1182 0394 PRINT » *** Parameter-fil : « SEMI var(N2$) EOS
0x1182…1184 0395 PRINT EOS
0x1184…1190 0400 LET var(X%) COMMA = ( 2 6 5 ) var(FNC%) EOS
0x1190…11b7 0405 PRINT »1 ==> Angivelse av sortert inputfil« EOS
0x11b7…11c3 0410 LET var(X%) COMMA = ( 2 7 5 ) var(FNC%) EOS
0x11c3…11e7 0415 PRINT »2 ==> Angivelse av parameter-fil« EOS
0x11e7…11f3 0420 LET var(X%) COMMA = ( 2 8 5 ) var(FNC%) EOS
0x11f3…121a 0425 PRINT »3 ==> Initialisering av sortert fil« EOS
0x121a…1226 0430 LET var(X%) COMMA = ( 2 9 5 ) var(FNC%) EOS
0x1226…1254 0435 PRINT »4 ==> Kontroll av parameterfil (Valgfritt)« EOS
0x1254…1260 0440 LET var(X%) COMMA = ( 2 10 5 ) var(FNC%) EOS
0x1260…1288 0445 PRINT »5 ==> Prosessering av plateparametre« EOS
0x1288…1294 0450 LET var(X%) COMMA = ( 2 11 5 ) var(FNC%) EOS
0x1294…12c4 0455 PRINT »6 ==> Sekvensiell uttegning av samtlige tema« EOS
0x12c4…12d0 0460 LET var(X%) COMMA = ( 2 12 5 ) var(FNC%) EOS
0x12d0…12f5 0465 PRINT »7 ==> Tegning av spesifisert tema« EOS
0x12f5…1301 0470 LET var(X%) COMMA = ( 2 13 5 ) var(FNC%) EOS
0x1301…131d 0485 PRINT »8 ==> Definer nytt origo« EOS
0x131d…1329 0490 LET var(X%) COMMA = ( 2 14 5 ) var(FNC%) EOS
0x1329…1340 0495 PRINT »9 ==> Tekstutskrift« EOS
0x1340…134c 0496 LET var(X%) COMMA = ( 2 15 5 ) var(FNC%) EOS
0x134c…135c 0497 PRINT »10==> Utgang« EOS
0x135c…1362 0505 REM C
0x1362…1366 0506 TRAP ERR 0505
0x1366…1372 0508 LET var(X%) COMMA = ( 3 19 5 ) var(FNC%) EOS
0x1372…1399 0510 INPUT »Hva skal gj0res ? Gi kommando : « COMMA var(X%) EOS
0x1399…13a7 0512 IF var(X%) 1 ?< var(X%) 10 > OR COMMA 0 5 5
0x13a7…13ab 0514 RETURN var(X%) EOS
0x13ab…13ac 0515 FNEND
0x13ac…13de 0520 REM ------------- COMPUTE INTERSECTION ----------
0x13de…13f2 0525 DEF var(FNS%) var(X1) var(Y1) var(X2) var(Y2) var(X3) var(Y3) var(X4) var(Y4) EOS
0x13f2…1418 0530 IF = ( var(X2) var(X1) SUB2 ) ?ABS 1e-08 ?< COMMA 27 var(X2) COMMA var(X2) 1e-08 PLUS EOS
0x1418…143c 0535 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
0x143c…1465 0540 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
0x1465…1486 0545 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
0x1486…1498 0550 LET var(X5) COMMA var(X3) var(M) ( var(X4) var(X3) SUB2 ) MULT PLUS EOS
0x1498…14aa 0555 LET var(Y5) COMMA var(Y3) var(M) ( var(Y4) var(Y3) SUB2 ) MULT PLUS EOS
0x14aa…14c5 0560 IF var(L) 0 → ebf103401101e9f103401000ebf103401001e9f10501f3
0x14c5…14c8 0565 RETURN 0 EOS
0x14c8…14c9 0570 FNEND
0x14c9…14fc 0745 REM -------------- PLOT-COORDINATE ---------------
0x14fc…1505 0750 DEF var(FNP%) var(X) var(Y) var(S$) EOS
0x1505…1513 0755 LET var(X%) COMMA = ( var(X) var(Y) ) var(FNZ%) EOS
0x1513…1529 0775 PRINT 5# SEMI var(S$) SEMI USING var(Q9$) COMMA var(Y3) SEMI »,« SEMI USING var(Q9$) COMMA var(X3) EOS
0x1529…152c 0780 RETURN 1 EOS
0x152c…152d 0785 FNEND
0x152d…1564 0795 REM ------------- OUTPUT STRING OR SYMBOL ------------
0x1564…1571 0800 DEF var(FNX%) var(X) var(Y) var(H) var(V) var(X$) EOS
0x1571…1590 0803 IF var(V) 360 > COMMA 27 var(V) COMMA var(V) 360 SUB2 EOS
0x1590…15a7 0804 IF var(V) 0 ?< COMMA 27 var(V) COMMA var(V) 360 PLUS EOS
0x15a7…15c2 0808 LET var(V) COMMA var(V) %100 MULT COMMA var(H) COMMA var(H) 3.333 MULT EOS
0x15c2…15d0 0810 LET var(X%) COMMA = ( var(X) var(Y) ) var(FNZ%) EOS
0x15d0…15f7 0820 PRINT 5# SEMI »L« SEMI USING var(Q9$) COMMA var(V) SEMI »,« SEMI USING var(Q9$) COMMA var(H) SEMI »,« SEMI USING var(Q9$) COMMA var(Y3) SEMI »,« SEMI EOS
0x15f7…1607 0825 PRINT 5# SEMI USING var(Q9$) COMMA var(X3) SEMI »,« SEMI var(X$) EOS
0x1607…160a 0830 RETURN 1 EOS
0x160a…160b 0835 FNEND
0x160b…163e 0837 REM ---------- DRAW GRID -------------------------
0x163e…1644 0840 DEF var(FNO%) var(X6) EOS
0x1644…1648 0841 TRAP ESC 0980
0x1648…165c 0842 PRINT »Rutenett tegnes.« EOS
0x165c…1662 0845 REM C
0x1662…1670 0850 IF var(X6) ELEMENT var(P') ( 3 ) [] → ebf1002009
0x1670…16a2 0855 REM ------- DRAW HORIZONTAL GRID-LINES ----------
0x16a2…16ca 0860 LET var(X%) COMMA = ( ELEMENT var(P') ( 1 ) [] ELEMENT var(Q') ( 1 ) [] ELEMENT var(P') ( 2 ) [] ELEMENT var(Q') ( 2 ) [] var(X6) var(S9) var(X6) var(S1) ) var(FNS%) EOS
0x16ca…16f7 0865 IF var(X%) → eff11b4002f17173724b7302749f724c7302749f724b7303749f724c7303749f401c66401c65744007f3
0x16f7…16fd 0870 IF var(X%) COMMA 34 EOS
0x16fd…170a 0875 LET var(A6) COMMA var(X5) COMMA var(B6) COMMA var(Y5) EOS
0x170a…1732 0880 LET var(X%) COMMA = ( ELEMENT var(P') ( 5 ) [] ELEMENT var(Q') ( 5 ) [] ELEMENT var(P') ( 4 ) [] ELEMENT var(Q') ( 4 ) [] var(X6) var(S9) var(X6) var(S1) ) var(FNS%) EOS
0x1732…175f 0885 IF var(X%) → eff11b4002f17173724b7304749f724c7304749f724b7303749f724c7303749f401c66401c65744007f3
0x175f…176c 0890 LET var(E6) COMMA var(X5) COMMA var(F6) COMMA var(Y5) EOS
0x176c…177d 0895 LET var(X%) COMMA = ( var(A6) var(B6) »U« ) var(FNP%) EOS
0x177d…178e 0900 LET var(X%) COMMA = ( var(E6) var(F6) »D« ) var(FNP%) EOS
0x178e…179c 0902 LET var(X$) COMMA = ( = ( var(E6) ) → a174b0f3
0x179c…17b2 0904 LET var(X$) COMMA » X « = ( = ( var(E6) ) → a174b0e2f3
0x17b2…17c3 0906 LET var(X%) COMMA = ( var(E6) var(F6) 2 0 var(X$) ) var(FNX%) EOS
0x17c3…17c4 0908 DOEND
0x17c4…17ce 0910 LET var(X6) COMMA var(X6) var(D1) PLUS EOS
0x17ce…17e3 0912 LET var(Y6) COMMA = ( ELEMENT var(Q') ( 2 ) [] var(D1) DIV ) → a14021e4f3
0x17e3…17e6 0915 GOTO var(N1$) 8
0x17e6…1818 0920 REM ------- DRAW VERTICAL GRID-LINES ------------
0x1818…1826 0925 IF var(Y6) ELEMENT var(Q') ( 4 ) [] → ebf1008009
0x1826…184e 0930 LET var(X%) COMMA = ( ELEMENT var(P') ( 2 ) [] ELEMENT var(Q') ( 2 ) [] ELEMENT var(P') ( 3 ) [] ELEMENT var(Q') ( 3 ) [] var(S9) var(Y6) var(S1) var(Y6) ) var(FNS%) EOS
0x184e…187b 0935 IF var(X%) → eff11b4002f17173724b7303749f724c7303749f724b7304749f724c7304749f664022654022744007f3
0x187b…1881 0940 IF var(X%) COMMA 34 EOS
0x1881…1892 0945 LET var(X%) COMMA = ( var(X5) var(Y5) »U« ) var(FNP%) EOS
0x1892…18ba 0950 LET var(X%) COMMA = ( ELEMENT var(P') ( 2 ) [] ELEMENT var(Q') ( 2 ) [] ELEMENT var(P') ( 1 ) [] ELEMENT var(Q') ( 1 ) [] var(S9) var(Y6) var(S1) var(Y6) ) var(FNS%) EOS
0x18ba…18e7 0955 IF var(X%) → eff11b4002f17173724b7301749f724c7301749f724b7304749f724c7304749f664022654022744007f3
0x18e7…18fc 0960 IF var(X%) COMMA 27 var(X%) COMMA = ( var(X5) var(Y5) »D« ) var(FNP%) EOS
0x18fc…1912 0962 LET var(X$) COMMA » Y « = ( = ( var(Y5) ) → a174b0e2f3
0x1912…192b 0964 LET var(X%) COMMA = ( var(X5) var(Y5) 2 270 var(X$) ) var(FNX%) EOS
0x192b…192c 0968 DOEND
0x192c…1936 0970 LET var(Y6) COMMA var(Y6) var(D1) PLUS EOS
0x1936…1939 0975 GOTO 32 9
0x1939…193c 0980 RETURN 1 EOS
0x193c…193d 0985 FNEND
0x193d…1961 0990 DEF var(FND) var(X1) var(Y1) var(X2) var(Y2) 5 = ( ( var(X2) var(X1) SUB2 ) 2 POW ( var(Y2) var(Y1) SUB2 ) 2 POW PLUS ) SQR EOS
0x1961…1994 1000 REM ------------- COMP. PLOTTING-UNITS -----------
0x1994…199c 1005 DEF var(FNZ%) var(X) var(Y) EOS
0x199c…19bf 1010 LET var(Q1) COMMA var(Q0) ( var(X) ELEMENT var(X1') ( 1 ) [] SUB2 ) MULT COMMA var(Q2) COMMA var(Q0) ( var(Y) ELEMENT var(Y1') ( 1 ) [] SUB2 ) MULT EOS
0x19bf…19cf 1020 LET var(X3) COMMA var(X7) var(Q1) var(W9) MULT PLUS var(Q2) var(W8) MULT SUB2 EOS
0x19cf…19df 1025 LET var(Y3) COMMA var(Y7) var(Q2) var(W9) MULT PLUS var(Q1) var(W8) MULT PLUS EOS
0x19df…19e2 1034 RETURN 1 EOS
0x19e2…19e3 1035 FNEND
0x19e3…1a16 1037 REM ------------- OUTPUT GRID-CROSSES ------------
0x1a16…1a22 1040 DEF var(FNU%) var(X1) var(X9) var(Y1) var(Y9) EOS
0x1a22…1a26 1041 TRAP ESC 1135
0x1a26…1a3f 1042 PRINT »Rutenettskryss tegnes« EOS
0x1a3f…1a50 1045 LET var(X6) COMMA = ( var(X1) var(D1) DIV ) → a14021e4f3
0x1a50…1a56 1050 REM C
0x1a56…1a67 1055 LET var(Z6) COMMA = ( var(Y1) var(D1) DIV ) → a14021e4f3
0x1a67…1a6d 1060 REM C
0x1a6d…1a77 1065 IF var(Z6) var(Y9) → ebf1008510
0x1a77…1a85 1070 LET var(X%) COMMA = ( var(X6) var(Z6) ) var(FNH%) EOS
0x1a85…1a8f 1075 LET var(Z6) COMMA var(Z6) var(D1) PLUS EOS
0x1a8f…1a92 1080 GOTO var(A') 16
0x1a92…1a98 1085 REM C
0x1a98…1aa2 1090 LET var(X6) COMMA var(X6) var(D1) PLUS EOS
0x1aa2…1aac 1095 IF var(X6) var(X9) ?< COMMA 0 var(Y2') 16
0x1aac…1ab0 1135 REM
0x1ab0…1ab3 1136 RETURN 1 EOS
0x1ab3…1ab4 1140 FNEND
0x1ab4…1ad7 1195 REM ------- COMPUTE WINDOW--------
0x1ad7…1adb 1200 DEF var(FNR1%) EOS
0x1adb…1ae2 1210 19400401f105f3
0x1ae2…1aff 1220 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
0x1aff…1b1c 1230 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
0x1b1c…1b20 1240 1a4004f3
0x1b20…1b28 1250 IF var(V0) 0 <> COMMA 5 0 EOS
0x1b28…1b3f 1252 IF var(W$) »U« EQ COMMA 27 var(X) COMMA 0.015 var(M0) MULT EOS
0x1b3f…1b55 1254 ELSE 3 var(A$) »R« EQ COMMA 27 var(X) COMMA -0.1 EOS
0x1b55…1b6b 1256 ELSE 3 var(A$) »R« <> COMMA 27 var(X) COMMA 0.1 EOS
0x1b6b…1b8e 1258 LET ELEMENT var(X2') ( 1 ) [] COMMA ELEMENT var(X2') ( 1 ) [] var(X) SUB2 COMMA ELEMENT var(Y2') ( 1 ) [] COMMA ELEMENT var(Y2') ( 1 ) [] var(X) SUB2 EOS
0x1b8e…1bb1 1260 LET ELEMENT var(X2') ( 2 ) [] COMMA ELEMENT var(X2') ( 2 ) [] var(X) PLUS COMMA ELEMENT var(Y2') ( 2 ) [] COMMA ELEMENT var(Y2') ( 2 ) [] var(X) SUB2 EOS
0x1bb1…1bd4 1262 LET ELEMENT var(X2') ( 3 ) [] COMMA ELEMENT var(X2') ( 3 ) [] var(X) PLUS COMMA ELEMENT var(Y2') ( 3 ) [] COMMA ELEMENT var(Y2') ( 3 ) [] var(X) PLUS EOS
0x1bd4…1bf7 1264 LET ELEMENT var(X2') ( 4 ) [] COMMA ELEMENT var(X2') ( 4 ) [] var(X) SUB2 COMMA ELEMENT var(Y2') ( 4 ) [] COMMA ELEMENT var(Y2') ( 4 ) [] var(X) PLUS EOS
0x1bf7…1c14 1266 LET ELEMENT var(X2') ( 5 ) [] COMMA ELEMENT var(X2') ( 1 ) [] COMMA ELEMENT var(Y2') ( 5 ) [] COMMA ELEMENT var(Y2') ( 1 ) [] EOS
0x1c14…1c17 1290 RETURN 1 EOS
0x1c17…1c18 1295 FNEND
0x1c18…1c4c 1297 REM ---------- TEST IF X0,Y0 IS INSIDE WINDOW------
0x1c4c…1c54 1300 DEF var(FNG%) var(X0) var(Y0) EOS
0x1c54…1c62 1305 LET var(X) COMMA var(X0) var(W9) MULT var(Y0) var(W8) MULT SUB2 EOS
0x1c62…1c70 1310 LET var(Y) COMMA var(Y0) var(W9) MULT var(X0) var(W8) MULT PLUS EOS
0x1c70…1c8c 1325 LET var(D0%) COMMA ( ELEMENT var(X2') ( 2 ) [] var(X) > ) ( var(X) ELEMENT var(X2') ( 1 ) [] > ) AND EOS
0x1c8c…1ca8 1340 LET var(E0%) COMMA ( ELEMENT var(Y2') ( 4 ) [] var(Y) > ) ( var(Y) ELEMENT var(Y2') ( 1 ) [] > ) AND EOS
0x1ca8…1caf 1345 RETURN var(D0%) var(E0%) AND EOS
0x1caf…1cb0 1350 FNEND
0x1cb0…1cde 1390 REM ---------- PLOT SINGLE GRID-CROSS--------
0x1cde…1ce6 1400 DEF var(FNH%) var(X1) var(Y1) EOS
0x1ce6…1cf5 1402 IF = ( var(X1) var(Y1) ) var(FNG%) → eff10500f3
0x1cf5…1d07 1410 LET var(D) COMMA var(M0) var(D9) MULT 2000 DIV EOS
0x1d07…1d11 1420 LET var(A) COMMA var(X1) var(D) SUB2 EOS
0x1d11…1d24 1430 IF = ( var(A) var(Y1) ) var(FNG%) → eff11b4031f14008f3
0x1d24…1d2e 1440 LET var(B) COMMA var(X1) var(D) PLUS EOS
0x1d2e…1d41 1450 IF = ( var(B) var(Y1) ) var(FNG%) → eff11b4032f14008f3
0x1d41…1d52 1460 LET var(X%) COMMA = ( var(A) var(Y1) »U« ) var(FNP%) EOS
0x1d52…1d63 1470 LET var(X%) COMMA = ( var(B) var(Y1) »D« ) var(FNP%) EOS
0x1d63…1d6d 1480 LET var(A) COMMA var(Y1) var(D) SUB2 EOS
0x1d6d…1d80 1490 IF = ( var(X1) var(A) ) var(FNG%) → eff11b4031f14009f3
0x1d80…1d8a 1500 LET var(B) COMMA var(Y1) var(D) PLUS EOS
0x1d8a…1d9d 1510 IF = ( var(X1) var(B) ) var(FNG%) → eff11b4032f14009f3
0x1d9d…1dae 1520 LET var(X%) COMMA = ( var(X1) var(A) »U« ) var(FNP%) EOS
0x1dae…1dbf 1530 LET var(X%) COMMA = ( var(X1) var(B) »D« ) var(FNP%) EOS
0x1dbf…1dc6 1540 19400401f104f3
0x1dc6…1de2 1550 LET var(X) COMMA = ( ELEMENT var(X1') ( var(I%) ) [] ELEMENT var(Y1') ( var(I%) ) [] var(X1) var(Y1) ) var(FND) EOS
0x1de2…1e10 1560 IF var(X) ELEMENT var(K1') ( var(I%) ) [] ?< COMMA 27 ELEMENT var(K1') ( var(I%) ) [] COMMA var(X) COMMA ELEMENT var(A') ( var(I%) ) [] COMMA var(X1) COMMA ELEMENT var(B') ( var(I%) ) [] COMMA var(Y1) EOS
0x1e10…1e14 1570 1a4004f3
0x1e14…1e17 1685 RETURN 1 EOS
0x1e17…1e18 1690 FNEND
0x1e18…1e4b 1695 REM ---------- GRID-CROSS VALUES IF V0<>0 --------
0x1e4b…1e4f 1700 DEF var(FNR%) EOS
0x1e4f…1e72 1705 PRINT »Koordinatkryss-verdier paaf0res« EOS
0x1e72…1e79 1710 19403401f104f3
0x1e79…1e7f 1722 LET var(X%) COMMA 0 EOS
0x1e7f…1e89 1725 19403501f1403401e3f3
0x1e89…1eb1 1730 LET var(X%) COMMA = ( ELEMENT var(A') ( var(I8%) ) [] ELEMENT var(B') ( var(I8%) ) [] ELEMENT var(A') ( var(I7%) ) [] ELEMENT var(B') ( var(I7%) ) [] ) var(FND) 1 ?< EOS
0x1eb1…1ebc 1740 IF var(X%) COMMA 27 var(I7%) COMMA var(I8%) EOS
0x1ebc…1ec0 1750 1a4035f3
0x1ec0…1ec7 1760 IF var(X%) → eff122f3
0x1ec7…1ede 1765 LET var(A) COMMA ELEMENT var(A') ( var(I8%) ) [] COMMA var(B) COMMA ELEMENT var(B') ( var(I8%) ) [] EOS
0x1ede…1ef0 1766 LET var(D) COMMA var(M0) var(D9) MULT 2000 DIV EOS
0x1ef0…1efc 1767 LET var(V) COMMA var(V0) %180 MULT var(P1) DIV EOS
0x1efc…1f10 1770 LET var(F1) COMMA %90 var(V) SUB2 COMMA var(A) COMMA var(A) var(D) PLUS EOS
0x1f10…1f23 1810 LET var(X$) COMMA = ( = ( ELEMENT var(B') ( var(I8%) ) [] ) → a174b0f3
0x1f23…1f2f 1820 LET var(X$) COMMA » Y « var(X$) PLUS EOS
0x1f2f…1f35 1825 LET var(H) COMMA 2 EOS
0x1f35…1f48 1830 LET var(X%) COMMA = ( var(A) var(B) var(H) var(F1) var(X$) ) var(FNX%) EOS
0x1f48…1f5f 1840 LET var(A) COMMA ELEMENT var(A') ( var(I8%) ) [] COMMA var(B) COMMA ELEMENT var(B') ( var(I8%) ) [] EOS
0x1f5f…1f70 1845 LET var(V) COMMA var(V0) %180 MULT var(P1) DIV COMMA var(H) COMMA 2 EOS
0x1f70…1f8a 1850 LET var(F2) COMMA 360 var(V) SUB2 COMMA var(B) COMMA var(B) var(D) PLUS EOS
0x1f8a…1f9d 1870 LET var(X$) COMMA = ( = ( ELEMENT var(A') ( var(I8%) ) [] ) → a174b0f3
0x1f9d…1fa9 1875 LET var(X$) COMMA » X « var(X$) PLUS EOS
0x1fa9…1fbc 1880 LET var(X%) COMMA = ( var(A) var(B) var(H) var(F2) var(X$) ) var(FNX%) EOS
0x1fbc…1fbd 1970 DOEND
0x1fbd…1fc1 1980 1a4034f3
0x1fc1…1fc4 1990 RETURN 1 EOS
0x1fc4…1fc5 2000 FNEND
0x1fc5…1ff7 2095 REM ------ DISPLAY POSITION AND MOVE PEN --------
0x1ff7…1fff 2100 DEF var(FNJ9%) var(I%) var(X) EOS
0x1fff…2007 2110 IF var(I%) → eff1006021
0x2007…2011 2120 LET var(X0) COMMA var(X0) var(X) PLUS EOS
0x2011…201d 2130 LET var(X%) COMMA = ( 3 13 5 ) var(FNC%) EOS
0x201d…2021 2140 PRINT var(X0) EOS
0x2021…2024 2150 GOTO → 9021
0x2024…202e 2160 LET var(Y0) COMMA var(Y0) var(X) PLUS EOS
0x202e…203a 2170 LET var(X%) COMMA = ( 3 14 5 ) var(FNC%) EOS
0x203a…203e 2180 PRINT var(Y0) EOS
0x203e…204f 2190 LET var(X%) COMMA = ( var(X0) var(Y0) »U« ) var(FNP%) EOS
0x204f…2052 2195 RETURN 1 EOS
0x2052…2053 2200 FNEND
0x2053…2086 2395 REM -------- CORNER VAL. FOR STAND.SYSTEM --------
0x2086…208a 2400 DEF var(FNW7%) EOS
0x208a…20a8 2401 PRINT »Hj0rnekoordinater paaf0res« EOS
0x20a8…20c2 2404 LET var(D) COMMA 0.015 var(M0) MULT COMMA var(H) COMMA 2 COMMA var(V) COMMA 0 EOS
0x20c2…20d7 2405 LET var(U9) COMMA ELEMENT var(X1') ( 2 ) [] COMMA var(V9) COMMA ELEMENT var(Y1') ( 2 ) [] EOS
0x20d7…20e8 2406 IF var(W$) »U« EQ COMMA 27 var(V9) COMMA var(V9) var(D) SUB2 EOS
0x20e8…20fd 2407 LET var(X$) COMMA »X = « = ( ELEMENT var(X1') ( 2 ) [] ) → b0e2f3
0x20fd…211c 2408 LET var(V9) COMMA var(V9) ( = ( var(X$) ) LEN 4 PLUS ) 2 MULT var(M0) MULT 1000 DIV SUB2 EOS
0x211c…212f 2410 LET var(X%) COMMA = ( var(U9) var(V9) var(H) var(V) var(X$) ) var(FNX%) EOS
0x212f…2144 2412 LET var(U9) COMMA ELEMENT var(X1') ( 1 ) [] COMMA var(V9) COMMA ELEMENT var(Y1') ( 1 ) [] EOS
0x2144…2155 2413 IF var(W$) »U« EQ COMMA 27 var(V9) COMMA var(V9) var(D) SUB2 EOS
0x2155…216a 2415 LET var(X$) COMMA »X = « = ( ELEMENT var(X1') ( 1 ) [] ) → b0e2f3
0x216a…2189 2418 LET var(V9) COMMA var(V9) ( = ( var(X$) ) LEN 4 PLUS ) 2 MULT var(M0) MULT 1000 DIV SUB2 EOS
0x2189…219c 2420 LET var(X%) COMMA = ( var(U9) var(V9) var(H) var(V) var(X$) ) var(FNX%) EOS
0x219c…21a2 2425 LET var(V) COMMA var(V1) EOS
0x21a2…21b7 2430 LET var(U9) COMMA ELEMENT var(X1') ( 1 ) [] COMMA var(V9) COMMA ELEMENT var(Y1') ( 1 ) [] EOS
0x21b7…21c8 2438 IF var(W$) »U« EQ COMMA 27 var(U9) COMMA var(U9) var(D) SUB2 EOS
0x21c8…21e1 2439 LET var(X$) COMMA » Y = « = ( ELEMENT var(Y1') ( 1 ) [] ) → b0e2f3
0x21e1…21f4 2440 LET var(X%) COMMA = ( var(U9) var(V9) var(H) var(V) var(X$) ) var(FNX%) EOS
0x21f4…2209 2442 LET var(U9) COMMA ELEMENT var(X1') ( 4 ) [] COMMA var(V9) COMMA ELEMENT var(Y1') ( 4 ) [] EOS
0x2209…221a 2444 IF var(W$) »U« EQ COMMA 27 var(U9) COMMA var(U9) var(D) SUB2 EOS
0x221a…2233 2445 LET var(X$) COMMA » Y = « = ( ELEMENT var(Y1') ( 4 ) [] ) → b0e2f3
0x2233…2246 2450 LET var(X%) COMMA = ( var(U9) var(V9) var(H) var(V) var(X$) ) var(FNX%) EOS
0x2246…2249 2575 RETURN 1 EOS
0x2249…224a 2580 FNEND
0x224a…227a 2595 REM -------------- COMPUTE TEXTBOX ------------
0x227a…227e 2600 DEF var(FNW8%) EOS
0x227e…2292 2604 PRINT »Tekstboks tegnes« EOS
0x2292…22c7 2605 LET ELEMENT var(P') ( 3 ) [] COMMA ELEMENT var(X1') ( 2 ) [] var(M0) 0.0295 MULT SUB2 COMMA ELEMENT var(Q') ( 3 ) [] COMMA ELEMENT var(Y1') ( 2 ) [] var(M0) 0.022 MULT SUB2 EOS
0x22c7…22f0 2610 LET ELEMENT var(P') ( 4 ) [] COMMA ELEMENT var(P') ( 3 ) [] var(M0) 0.1335 MULT SUB2 COMMA ELEMENT var(Q') ( 4 ) [] COMMA ELEMENT var(Q') ( 3 ) [] EOS
0x22f0…2319 2615 LET ELEMENT var(P') ( 1 ) [] COMMA ELEMENT var(P') ( 4 ) [] COMMA ELEMENT var(Q') ( 1 ) [] COMMA ELEMENT var(Q') ( 4 ) [] var(M0) 0.04 MULT SUB2 EOS
0x2319…2336 2620 LET ELEMENT var(P') ( 2 ) [] COMMA ELEMENT var(P') ( 3 ) [] COMMA ELEMENT var(Q') ( 2 ) [] COMMA ELEMENT var(Q') ( 1 ) [] EOS
0x2336…2353 2625 LET ELEMENT var(P') ( 5 ) [] COMMA ELEMENT var(P') ( 1 ) [] COMMA ELEMENT var(Q') ( 5 ) [] COMMA ELEMENT var(Q') ( 1 ) [] EOS
0x2353…2356 2630 GOSUB 0 → 80
0x2356…2359 2690 RETURN 1 EOS
0x2359…235a 2695 FNEND
0x235a…238b 2698 REM ---------- FRAME CORRECTION ----------------
0x238b…2391 2700 DEF var(FNW9%) var(Q) EOS
0x2391…23b4 2715 LET ELEMENT var(P') ( 1 ) [] COMMA ELEMENT var(P') ( 1 ) [] var(Q) SUB2 COMMA ELEMENT var(Q') ( 1 ) [] COMMA ELEMENT var(Q') ( 1 ) [] var(Q) SUB2 EOS
0x23b4…23d7 2720 LET ELEMENT var(P') ( 2 ) [] COMMA ELEMENT var(P') ( 2 ) [] var(Q) PLUS COMMA ELEMENT var(Q') ( 2 ) [] COMMA ELEMENT var(Q') ( 2 ) [] var(Q) SUB2 EOS
0x23d7…23fa 2725 LET ELEMENT var(P') ( 3 ) [] COMMA ELEMENT var(P') ( 3 ) [] var(Q) PLUS COMMA ELEMENT var(Q') ( 3 ) [] COMMA ELEMENT var(Q') ( 3 ) [] var(Q) PLUS EOS
0x23fa…241d 2730 LET ELEMENT var(P') ( 4 ) [] COMMA ELEMENT var(P') ( 4 ) [] var(Q) SUB2 COMMA ELEMENT var(Q') ( 4 ) [] COMMA ELEMENT var(Q') ( 4 ) [] var(Q) PLUS EOS
0x241d…243a 2735 LET ELEMENT var(P') ( 5 ) [] COMMA ELEMENT var(P') ( 1 ) [] COMMA ELEMENT var(Q') ( 5 ) [] COMMA ELEMENT var(Q') ( 1 ) [] EOS
0x243a…243d 2790 RETURN 1 EOS
0x243d…243e 2800 FNEND
0x243e…2472 2850 REM ------------- MAIN PROGRAM --------------------
0x2472…2476 2852 TRAP ERR 2855
0x2476…247e 2854 IF var(M9%) 0 <> COMMA 0 16 41
0x247e…2498 2855 REM C 1. TIME RUN OF PLOT
0x2498…249b 2858 TRAP ERR OFF
0x249b…24a7 2870 1605f27006245445524d33f3
0x24a7…24af 2875 PRINT 5# SEMI »R« EOS
0x24af…24c4 2880 LET var(T2$) COMMA »« COMMA var(N1$) COMMA »« COMMA var(N2$) COMMA »« COMMA var(N3$) COMMA »« EOS
0x24c4…24d5 2910 REM NEXT COMMAND
0x24d5…24dc 2915 LET var(V1%) COMMA = var(FNM9%) EOS
0x24dc…24f5 2920 ON var(V1%) COMMA 1 var(D) 48 49 → 90313534003600980070006000890030f3
0x24f5…24f8 2930 GOTO 16 41
0x24f8…24fe 3000 REM C
0x24fe…250a 3010 LET var(X%) COMMA = ( 1 1 1 ) var(FNC%) EOS
0x250a…250c 3020 14f3
0x250c…250d 3030 END
0x250d…2542 3040 REM --------- OPEN,READ TOP OF SORTFILE ------------
0x2542…254e 3045 LET var(X%) COMMA = ( 1 1 1 ) var(FNC%) EOS
0x254e…2554 3050 LET var(T2$) COMMA »« EOS
0x2554…255a 3070 REM C
0x255a…2566 3075 LET var(X%) COMMA = ( 4 2 5 ) var(FNC%) EOS
0x2566…257c 3080 LINPUT »Oppgi sortfil : « COMMA var(N1$) EOS
0x257c…2584 3082 IF var(N1$) »« EQ COMMA 5 EOS
0x2584…259d 3085 1601f245700e3b4143433d494e3b5245433d3532e2f14002f3
0x259d…25a6 3090 IF var(X%) 0 <> COMMA 0 »\x03q@\x03\xef\xf1\x00p0«soh»\x00\x95\x05\xf3\x0bp0 ------------- OPEN PARAM.-FILE«
0x25a6…25af 3122 IF = var(FNW%) → eff1007030
0x25af…25b2 3123 GOSUB 0 → 95
0x25b2…25b4 3125 RETURN EOS
0x25b4…25e7 3130 REM ------------- OPEN PARAM.-FILE ---------------
0x25e7…25f3 3132 LET var(X%) COMMA = ( 1 1 1 ) var(FNC%) EOS
0x25f3…25f7 3135 REM
0x25f7…2603 3138 LET var(X%) COMMA = ( 3 2 1 ) var(FNC%) EOS
0x2603…2606 3140 1403f3
0x2606…2621 3145 LINPUT »Oppgi parameterfil : « COMMA var(N2$) EOS
0x2621…2629 3147 IF var(N2$) »« EQ COMMA 5 EOS
0x2629…263b 3150 1603f24670073b4143433d494ee2f14002f3
0x263b…2644 3155 IF var(X%) 0 <> COMMA 0 53 49
0x2644…2648 3166 TRAP ERR 3135
0x2648…264e 3168 LINPUT 3# SEMI var(X$) EOS
0x264e…2659 3170 LET var(A$) COMMA ELEMENT var(X$) ( 1 1 ) [] EOS
0x2659…2668 3172 LET var(D9) COMMA = ( ELEMENT var(X$) ( 2 3 ) [] ) VAL EOS
0x2668…2673 3174 LET var(C$) COMMA ELEMENT var(X$) ( 4 4 ) [] EOS
0x2673…2675 3176 PRINT EOS
0x2675…268c 3178 PRINT »Rammeparameter : « SEMI var(A$) EOS
0x268c…26a3 3180 PRINT »Krysslengde(mm): « SEMI var(D9) EOS
0x26a3…26ba 3182 PRINT »Opsjon,merking : « SEMI var(C$) EOS
0x26ba…26bd 3183 GOSUB 0 → 95
0x26bd…26c0 3186 TRAP ERR OFF
0x26c0…26c2 3188 RETURN EOS
0x26c2…26ea 3190 REM ------------ INITIALIZING INPUTFILE
0x26ea…26f6 3195 IF = ( 1 0 0 ) var(FNX9%) → eff105f3
0x26f6…26fa 3199 TRAP ERR 3340
0x26fa…2706 3200 LET var(T2$) COMMA var(N1$) ».TAB« PLUS EOS
0x2706…2709 3202 1402f3
0x2709…2722 3203 1602f242700e3b4143433d494e3b5245433d3132e2f14002f3
0x2722…272a 3204 IF var(X%) 0 EQ COMMA 5 EOS
0x272a…272d 3205 1402f3
0x272d…2733 3206 1e42f14002f3
0x2733…2754 3207 1602f24270163b4143433d4e45573b5245433d31323b524c3d353132e2f14002f3
0x2754…277a 3209 PRINT »Initialisering av sortert inputfil« EOS
0x277a…2780 3210 LET var(I%) COMMA 7 EOS
0x2780…2789 3220 LINPUT 1# COMMA var(I%) SEMI var(X$) EOS
0x2789…279a 3225 LET ELEMENT var(Q$) ( 1 8 ) [] COMMA ELEMENT var(X$) ( 12 19 ) [] EOS
0x279a…27a1 3230 LET var(I1%) COMMA var(I%) EOS
0x27a1…27a8 3235 LET var(I2%) COMMA var(I%) EOS
0x27a8…27ae 3240 REM C
0x27ae…27b7 3245 LET var(I%) COMMA var(I%) 1 PLUS EOS
0x27b7…27c0 3250 LINPUT 1# COMMA var(I%) SEMI var(X$) EOS
0x27c0…27ca 3255 IF = ( 1 ) → b1f1000533
0x27ca…27d7 3260 IF var(Q$) ELEMENT var(X$) ( 12 19 ) [] <> COMMA 34 EOS
0x27d7…27e9 3265 13f402f2724a730108749ff1403ff14040f3
0x27e9…27fa 3270 LET ELEMENT var(Q$) ( 1 8 ) [] COMMA ELEMENT var(X$) ( 12 19 ) [] EOS
0x27fa…2801 3275 LET var(I1%) COMMA var(I%) EOS
0x2801…2808 3280 LET var(I2%) COMMA var(I%) EOS
0x2808…2809 3290 DOEND
0x2809…2811 3295 ELSE 27 var(I2%) COMMA var(I%) EOS
0x2811…2814 3300 GOTO var(B)
0x2814…281a 3305 REM C
0x281a…282c 3310 13f402f2724a730108749ff1403ff14040f3
0x282c…282e 3330 RETURN EOS
0x282e…2834 3340 REM C
0x2834…2837 3350 TRAP ERR OFF
0x2837…283d 3355 LET var(T2$) COMMA »« EOS
0x283d…285f 3360 PRINT »Feil i sort-fil i linje nr « SEMI var(I%) EOS
0x285f…2862 3370 GOSUB 0 → 95
0x2862…2864 3430 RETURN EOS
0x2864…289b 3435 REM ------------- CONTROLLING PARAM.FILE -------------
0x289b…28a7 3438 IF = ( 1 1 1 ) var(FNX9%) → eff105f3
0x28a7…28ab 3440 RESTORE 2# EOS
0x28ab…28e4 3445 PRINT »Parameter-filen kontrolleres for manglende temakoder.« EOS
0x28e4…28f8 3450 LET ELEMENT var(Q$) ( 1 8 ) [] COMMA »DUMMY-XX« EOS
0x28f8…28fe 3452 LET var(F%) COMMA 1 EOS
0x28fe…2919 3455 REM NEXT TAB-FILE RECORD :
0x2919…291d 3460 RESTORE 3# EOS
0x291d…292e 3470 LET ELEMENT var(P$) ( 1 8 ) [] COMMA ELEMENT var(Q$) ( 1 8 ) [] EOS
0x292e…2938 3475 READ 2# SEMI var(Q$) var(I1%) var(I2%) EOS
0x2938…2941 3477 IF = ( 2 ) → b1f105f3
0x2941…2955 3480 IF ELEMENT var(Q$) ( 1 8 ) [] ELEMENT var(P$) ( 1 8 ) [] EQ COMMA 0 53 53
0x2955…295e 3490 REM CONT
0x295e…2964 3495 LINPUT 3# SEMI var(X$) EOS
0x2964…296e 3500 IF = ( 3 ) → b1f1002035
0x296e…297a 3502 IF = ( var(X$) ) LEN 0 EQ COMMA 0 32 53
0x297a…298e 3505 IF ELEMENT var(Q$) ( 1 8 ) [] ELEMENT var(X$) ( 1 8 ) [] EQ COMMA 0 53 53
0x298e…2992 3515 ELSE 0 → 9034
0x2992…299b 3520 REM CONT
0x299b…299d 3522 PRINT EOS
0x299d…29b5 3525 PRINT »Ukjent temakode : « COMMA var(Q$) EOS
0x29b5…29d8 3527 LINPUT »Trykk return for aa fortsette« COMMA var(X$) EOS
0x29d8…29de 3530 LET var(F%) COMMA 0 EOS
0x29de…29e4 3535 REM C
0x29e4…29e7 3540 GOTO var(V0) 52
0x29e7…29e9 3545 RETURN EOS
0x29e9…2a19 3600 REM -------- PROCESSING FRAME-PARAMETERS-------
0x2a19…2a25 3602 IF = ( 1 1 0 ) var(FNX9%) → eff105f3
0x2a25…2a47 3604 PRINT »Prosessering av plateparametre« EOS
0x2a47…2a6f 3606 LINPUT »Stopp mellom hvert tema ? (J/N) : « COMMA var(X$) EOS
0x2a6f…2a71 3607 PRINT EOS
0x2a71…2a7b 3608 LET var(F0%) COMMA var(X$) »J« EQ EOS
0x2a7b…2a7e 3609 TRAP ESC 0bf3
0x2a7e…2a84 3615 REM C
0x2a84…2a8b 3620 19404801f104f3
0x2a8b…2a95 3625 IF = → b64047eef1016036
0x2a95…2aa3 3630 ON var(I0%) COMMA 1 var(Y2') 55 0 56 0 → 810082f3
0x2aa3…2aa7 3650 1a4048f3
0x2aa7…2aa9 3655 RETURN EOS
0x2aa9…2ab7 3660 REM C RESTART
0x2ab7…2abe 3662 LET var(X%) COMMA = → b6f3
0x2abe…2ac0 3664 PRINT EOS
0x2ac0…2ae0 3665 LINPUT »N=Neste,R=Repeat,E=Exit : « COMMA var(X$) EOS
0x2ae0…2aed 3670 IF var(X$) »E« EQ COMMA 27 var(I0%) COMMA 5 EOS
0x2aed…2afe 3675 ELSE 3 var(X$) »N« EQ COMMA 27 var(I0%) COMMA var(I0%) 1 PLUS EOS
0x2afe…2b0f 3680 ELSE 3 var(X$) »R« EQ COMMA 27 var(I0%) COMMA var(I0%) 1 SUB2 EOS
0x2b0f…2b11 3690 PRINT EOS
0x2b11…2b18 3700 LET var(X%) COMMA = → b6f3
0x2b18…2b1a 3710 RETURN EOS
0x2b1a…2b4a 3750 REM --------- DRAW FRAME ----------------------
0x2b4a…2b53 3760 IF var(A$) »R« <> COMMA 5 EOS
0x2b53…2b67 3765 PRINT »Tegning av ramme« EOS
0x2b67…2b6e 3770 19400401f105f3
0x2b6e…2b8f 3775 LET ELEMENT var(P') ( var(I%) ) [] COMMA ELEMENT var(X1') ( var(I%) ) [] COMMA ELEMENT var(Q') ( var(I%) ) [] COMMA ELEMENT var(Y1') ( var(I%) ) [] EOS
0x2b8f…2b93 3780 1a4004f3
0x2b93…2baf 3785 IF var(W$) »U« EQ COMMA 27 var(X%) COMMA = ( 0.015 var(M0) MULT ) var(FNW9%) EOS
0x2baf…2bb2 3790 GOSUB 0 → 80
0x2bb2…2bb4 3795 RETURN EOS
0x2bb4…2be5 3800 REM -------- DRAW GRID,GRIDCROSSES--------------
0x2be5…2bef 3805 IF var(D9) %99 EQ COMMA 0 32 var(T9$)
0x2bef…2bff 3950 LET var(K%) COMMA = ( var(V0) ( var(P1) 2 DIV ) DIV ) → a1f3
0x2bff…2c06 3970 19400401f105f3
0x2c06…2c10 3975 LET var(J%) COMMA var(I%) var(K%) PLUS EOS
0x2c10…2c1f 3980 IF var(J%) 4 > COMMA 27 var(J%) COMMA var(J%) 4 SUB2 EOS
0x2c1f…2c30 3985 LET ELEMENT var(P') ( var(I%) ) [] COMMA ELEMENT var(X1') ( var(J%) ) [] EOS
0x2c30…2c41 3990 LET ELEMENT var(Q') ( var(I%) ) [] COMMA ELEMENT var(Y1') ( var(J%) ) [] EOS
0x2c41…2c45 4000 1a4004f3
0x2c45…2c65 4060 IF var(V0) 0 EQ var(W$) »U« EQ AND COMMA 27 var(X%) COMMA = ( 0.015 var(M0) MULT ) var(FNW9%) EOS
0x2c65…2c83 4070 IF var(V0) 0 EQ var(A$) »R« EQ AND COMMA 27 var(X%) COMMA = ( -0.1 ) var(FNW9%) EOS
0x2c83…2ca1 4080 IF var(V0) 0 EQ var(A$) »R« <> AND COMMA 27 var(X%) COMMA = ( 0.1 ) var(FNW9%) EOS
0x2ca1…2ca9 4105 LET var(D1) COMMA var(D2) var(M0) MULT EOS
0x2ca9…2cce 4110 LET ELEMENT var(K1') ( 1 ) [] COMMA var(S1) COMMA ELEMENT var(K1') ( 2 ) [] COMMA var(S1) COMMA ELEMENT var(K1') ( 3 ) [] COMMA var(S1) COMMA ELEMENT var(K1') ( 4 ) [] COMMA var(S1) EOS
0x2cce…2cf0 4200 IF var(D9) 0 EQ COMMA 27 var(X%) COMMA = ( = ( ELEMENT var(P') ( 1 ) [] var(D1) DIV ) → a14021e44021e274401bf3
0x2cf0…2cf3 4210 ELSE 34 EOS
0x2cf3…2d15 4220 LET var(X%) COMMA = ( ELEMENT var(P') ( 1 ) [] ELEMENT var(P') ( 3 ) [] ELEMENT var(Q') ( 2 ) [] ELEMENT var(Q') ( 4 ) [] ) var(FNU%) EOS
0x2d15…2d1d 4225 IF var(V0) 0 EQ COMMA 1 0 → 96
0x2d1d…2d2a 4230 IF var(V0) 0 <> COMMA 27 var(X%) COMMA = var(FNR%) EOS
0x2d2a…2d2b 4240 DOEND
0x2d2b…2d38 4250 IF var(V0) 0 EQ COMMA 27 var(X%) COMMA = var(FNW7%) EOS
0x2d38…2d3e 4820 REM C
0x2d3e…2d40 4830 RETURN EOS
0x2d40…2d6d 6000 REM -------------- SETT NYTT ORIGO ---------
0x2d6d…2d79 6010 LET var(X%) COMMA = ( 1 1 1 ) var(FNC%) EOS
0x2d79…2d9b 6020 PRINT »Plasser pennen i 0nsket origo.« EOS
0x2d9b…2dbf 6030 LINPUT »Trykk deretter return for meny« COMMA var(X$) EOS
0x2dbf…2dc7 6040 PRINT 5# SEMI »R« EOS
0x2dc7…2dc9 6050 RETURN EOS
0x2dc9…2dfd 7000 REM -------------- SINGLE THEME PLOT --------------
0x2dfd…2e09 7015 IF = ( 1 1 1 ) var(FNX9%) → eff105f3
0x2e09…2e0e 7080 LET var(M9%) COMMA 2 EOS
0x2e0e…2e18 7100 CHAIN »PLOT.2« EOS
0x2e18…2e1a 7500 RETURN EOS
0x2e1a…2e4b 8000 REM ------------- DRAW PQ-RECTANGLE ------------
0x2e4b…2e64 8005 LET var(X%) COMMA = ( ELEMENT var(P') ( 1 ) [] ELEMENT var(Q') ( 1 ) [] »U« ) var(FNP%) EOS
0x2e64…2e6b 8010 19403402f105f3
0x2e6b…2e86 8015 LET var(X%) COMMA = ( ELEMENT var(P') ( var(I8%) ) [] ELEMENT var(Q') ( var(I8%) ) [] »D« ) var(FNP%) EOS
0x2e86…2e8a 8020 1a4034f3
0x2e8a…2e8c 8050 RETURN EOS
0x2e8c…2ec0 8100 REM ------------- COORD-VALUES,CODE ---------------
0x2ec0…2ed2 8152 PRINT »Tekst paaf0res« EOS
0x2ed2…2ed9 8165 IF var(V0) 0 EQ COMMA 34 EOS
0x2ed9…2ef0 8170 LET var(X) COMMA ELEMENT var(X1') ( 2 ) [] var(M0) 0.0015 MULT SUB2 EOS
0x2ef0…2f07 8175 LET var(Y) COMMA ELEMENT var(Y1') ( 2 ) [] var(M0) 0.099 MULT SUB2 EOS
0x2f07…2f08 8180 DOEND
0x2f08…2f0b 8185 ELSE 34 EOS
0x2f0b…2f22 8190 LET var(X) COMMA ELEMENT var(X1') ( 2 ) [] var(M0) 0.0015 MULT SUB2 EOS
0x2f22…2f39 8192 LET var(Y) COMMA ELEMENT var(Y1') ( 2 ) [] var(M0) 0.03 MULT SUB2 EOS
0x2f39…2f3a 8194 DOEND
0x2f3a…2f4b 8195 LET var(X%) COMMA = ( var(X) var(Y) 4 var(V1) var(T9$) ) var(FNX%) EOS
0x2f4b…2f4d 8199 RETURN EOS
0x2f4d…2f84 8200 REM ------------- F0LGE OG SKJAEREMERKER -------------
0x2f84…2f8d 8202 IF var(C$) »M« <> COMMA 5 EOS
0x2f8d…2f9a 8205 IF var(V0) 0 EQ COMMA 27 var(X%) COMMA = var(FNW8%) EOS
0x2f9a…2fbc 8210 PRINT »Skjaere- og f0lgemerker tegnes« EOS
0x2fbc…2fcc 8215 LET var(S) COMMA var(M0) 0.005 MULT EOS
0x2fcc…2fe3 8220 LET var(X) COMMA ELEMENT var(X1') ( 1 ) [] var(M0) 0.08 MULT SUB2 EOS
0x2fe3…2ffa 8250 LET var(Y) COMMA ELEMENT var(Y1') ( 1 ) [] var(M0) 0.084 MULT SUB2 EOS
0x2ffa…300e 8260 LET var(X%) COMMA = ( var(X) var(Y) var(S) PLUS »U« ) var(FNP%) EOS
0x300e…301f 8270 LET var(X%) COMMA = ( var(X) var(Y) »D« ) var(FNP%) EOS
0x301f…3033 8280 LET var(X%) COMMA = ( var(X) var(S) PLUS var(Y) »D« ) var(FNP%) EOS
0x3033…303a 8290 19400401f103f3
0x303a…304d 8300 LET var(X) COMMA var(X) var(M0) 0.21 MULT PLUS EOS
0x304d…3063 8310 LET var(X%) COMMA = ( var(X) var(S) 2 DIV SUB2 var(Y) »U« ) var(FNP%) EOS
0x3063…3079 8320 LET var(X%) COMMA = ( var(X) var(S) 2 DIV PLUS var(Y) »D« ) var(FNP%) EOS
0x3079…308a 8330 LET var(X%) COMMA = ( var(X) var(Y) »U« ) var(FNP%) EOS
0x308a…309e 8340 LET var(X%) COMMA = ( var(X) var(Y) var(S) PLUS »D« ) var(FNP%) EOS
0x309e…30a2 8350 1a4004f3
0x30a2…30b5 8370 LET var(X) COMMA var(X) var(M0) 0.21 MULT PLUS EOS
0x30b5…30c9 8380 LET var(X%) COMMA = ( var(X) var(S) SUB2 var(Y) »U« ) var(FNP%) EOS
0x30c9…30da 8390 LET var(X%) COMMA = ( var(X) var(Y) »D« ) var(FNP%) EOS
0x30da…30ee 8400 LET var(X%) COMMA = ( var(X) var(Y) var(S) PLUS »D« ) var(FNP%) EOS
0x30ee…3101 8410 LET var(Y) COMMA var(Y) var(M0) 0.297 MULT PLUS EOS
0x3101…3117 8420 LET var(X%) COMMA = ( var(X) var(Y) var(S) 2 DIV SUB2 »U« ) var(FNP%) EOS
0x3117…312d 8430 LET var(X%) COMMA = ( var(X) var(Y) var(S) 2 DIV PLUS »D« ) var(FNP%) EOS
0x312d…313e 8440 LET var(X%) COMMA = ( var(X) var(Y) »U« ) var(FNP%) EOS
0x313e…3152 8450 LET var(X%) COMMA = ( var(X) var(S) SUB2 var(Y) »D« ) var(FNP%) EOS
0x3152…3165 8460 LET var(Y) COMMA var(Y) var(M0) 0.297 MULT PLUS EOS
0x3165…3179 8470 LET var(X%) COMMA = ( var(X) var(Y) var(S) SUB2 »U« ) var(FNP%) EOS
0x3179…318a 8480 LET var(X%) COMMA = ( var(X) var(Y) »D« ) var(FNP%) EOS
0x318a…319e 8490 LET var(X%) COMMA = ( var(X) var(S) SUB2 var(Y) »D« ) var(FNP%) EOS
0x319e…31a5 8510 19400401f103f3
0x31a5…31b8 8520 LET var(X) COMMA var(X) var(M0) 0.21 MULT SUB2 EOS
0x31b8…31ce 8530 LET var(X%) COMMA = ( var(X) var(S) 2 DIV PLUS var(Y) »U« ) var(FNP%) EOS
0x31ce…31e4 8540 LET var(X%) COMMA = ( var(X) var(S) 2 DIV SUB2 var(Y) »D« ) var(FNP%) EOS
0x31e4…31f5 8550 LET var(X%) COMMA = ( var(X) var(Y) »U« ) var(FNP%) EOS
0x31f5…3209 8560 LET var(X%) COMMA = ( var(X) var(Y) var(S) SUB2 »D« ) var(FNP%) EOS
0x3209…320d 8570 1a4004f3
0x320d…3220 8580 LET var(X) COMMA var(X) var(M0) 0.21 MULT SUB2 EOS
0x3220…3234 8590 LET var(X%) COMMA = ( var(X) var(S) PLUS var(Y) »U« ) var(FNP%) EOS
0x3234…3245 8600 LET var(X%) COMMA = ( var(X) var(Y) »D« ) var(FNP%) EOS
0x3245…3259 8610 LET var(X%) COMMA = ( var(X) var(Y) var(S) SUB2 »D« ) var(FNP%) EOS
0x3259…326c 8620 LET var(Y) COMMA var(Y) var(M0) 0.297 MULT SUB2 EOS
0x326c…3282 8630 LET var(X%) COMMA = ( var(X) var(Y) var(S) 2 DIV PLUS »U« ) var(FNP%) EOS
0x3282…3298 8640 LET var(X%) COMMA = ( var(X) var(Y) var(S) 2 DIV SUB2 »D« ) var(FNP%) EOS
0x3298…32a9 8650 LET var(X%) COMMA = ( var(X) var(Y) »U« ) var(FNP%) EOS
0x32a9…32bd 8660 LET var(X%) COMMA = ( var(X) var(S) PLUS var(Y) »D« ) var(FNP%) EOS
0x32bd…32d4 8670 LET var(X) COMMA ELEMENT var(X1') ( 1 ) [] var(M0) 0.11 MULT SUB2 EOS
0x32d4…32eb 8680 LET var(Y) COMMA ELEMENT var(Y1') ( 1 ) [] var(M0) 0.114 MULT SUB2 EOS
0x32eb…32ff 8690 LET var(X%) COMMA = ( var(X) var(Y) var(S) PLUS »U« ) var(FNP%) EOS
0x32ff…3310 8700 LET var(X%) COMMA = ( var(X) var(Y) »D« ) var(FNP%) EOS
0x3310…3324 8710 LET var(X%) COMMA = ( var(X) var(S) PLUS var(Y) »D« ) var(FNP%) EOS
0x3324…3337 8720 LET var(X) COMMA var(X) var(M0) 0.9 MULT PLUS EOS
0x3337…334b 8730 LET var(X%) COMMA = ( var(X) var(S) SUB2 var(Y) »U« ) var(FNP%) EOS
0x334b…335c 8740 LET var(X%) COMMA = ( var(X) var(Y) »D« ) var(FNP%) EOS
0x335c…3370 8750 LET var(X%) COMMA = ( var(X) var(Y) var(S) PLUS »D« ) var(FNP%) EOS
0x3370…3383 8760 LET var(Y) COMMA var(Y) var(M0) 0.654 MULT PLUS EOS
0x3383…3397 8770 LET var(X%) COMMA = ( var(X) var(Y) var(S) SUB2 »U« ) var(FNP%) EOS
0x3397…33a8 8780 LET var(X%) COMMA = ( var(X) var(Y) »D« ) var(FNP%) EOS
0x33a8…33bc 8790 LET var(X%) COMMA = ( var(X) var(S) SUB2 var(Y) »D« ) var(FNP%) EOS
0x33bc…33cf 8800 LET var(X) COMMA var(X) var(M0) 0.9 MULT SUB2 EOS
0x33cf…33e3 8810 LET var(X%) COMMA = ( var(X) var(S) PLUS var(Y) »U« ) var(FNP%) EOS
0x33e3…33f4 8820 LET var(X%) COMMA = ( var(X) var(Y) »D« ) var(FNP%) EOS
0x33f4…3408 8830 LET var(X%) COMMA = ( var(X) var(Y) var(S) SUB2 »D« ) var(FNP%) EOS
0x3408…340a 8850 RETURN EOS
0x340a…3446 8900 REM ---------- Move pen to coordinate,plot text------------
0x3446…3452 8905 IF = ( 1 0 0 ) var(FNX9%) → eff105f3
0x3452…3477 8910 LET var(X0) COMMA ELEMENT var(X1') ( 3 ) [] COMMA var(Y0) COMMA ELEMENT var(Y1') ( 3 ) [] COMMA var(X%) COMMA = ( var(X0) var(Y0) »U« ) var(FNP%) EOS
0x3477…34b9 8920 PRINT »Rutine for manuell bevegelse av penn og tekst(symbol)-utskrift« EOS
0x34b9…34ec 8930 PRINT »Kontinuerlig bevegelse : Hold aktuell tast nede« EOS
0x34ec…34ee 8940 PRINT EOS
0x34ee…34f0 8950 PRINT EOS
0x34f0…350e 8960 PRINT »N ==> Beveg penn mot Nord.« EOS
0x350e…352a 8970 PRINT »S ==> Beveg penn mot syd« EOS
0x352a…353d 8980 PRINT »V ==> Mot vest.« EOS
0x353d…354e 8990 PRINT »O ==> Mot Ost« EOS
0x354e…3563 9000 PRINT »H ==> Hastighet :« EOS
0x3563…3576 9010 PRINT »T ==> Gi tekst.« EOS
0x3576…3588 9020 PRINT »Q ==> Avslutt.« EOS
0x3588…358a 9030 PRINT EOS
0x358a…3595 9040 PRINT »X = « SEMI var(X0) EOS
0x3595…35a0 9050 PRINT »Y = « SEMI var(Y0) EOS
0x35a0…35a5 9060 LET var(A%) COMMA 0 EOS
0x35a5…35a8 9070 GOSUB 48 → 94
0x35a8…35ab 9080 GOSUB 0 → 92
0x35ab…35b2 9090 19400400f101f3
0x35b2…35b8 9100 LET var(X$) COMMA = → b8f3
0x35b8…35cc 9110 IF var(X$) »N« EQ COMMA 27 var(X%) COMMA = ( 0 var(D5) ) var(FNJ9%) EOS
0x35cc…35e1 9120 ELSE 3 var(X$) »V« EQ COMMA 27 var(X%) COMMA = ( 1 var(D5) ) var(FNJ9%) EOS
0x35e1…3600 9130 ELSE 3 var(X$) »S« EQ COMMA 27 var(X%) COMMA = ( 0 -1 var(D5) MULT ) var(FNJ9%) EOS
0x3600…361f 9140 ELSE 3 var(X$) »O« EQ COMMA 27 var(X%) COMMA = ( 1 -1 var(D5) MULT ) var(FNJ9%) EOS
0x361f…362a 9150 ELSE 3 var(X$) »H« EQ COMMA 1 0 → 92
0x362a…3635 9160 ELSE 3 var(X$) »T« EQ COMMA 1 → 9092
0x3635…363f 9170 LET var(I%) COMMA var(X$) »Q« EQ EOS
0x363f…3643 9180 1a4004f3
0x3643…3645 9190 RETURN EOS
0x3645…3658 9200 REM BYTT HASTIGHET
0x3658…365f 9210 LET var(A%) COMMA var(A%) 0 EQ EOS
0x365f…366b 9220 LET var(X%) COMMA = ( 3 9 20 ) var(FNC%) EOS
0x366b…3689 9230 IF var(A%) COMMA 15 »5 terrengmeter pr trykk« EOS
0x3689…36a7 9240 ELSE 15 »0.1 terrengmeter pr trykk« EOS
0x36a7…36b0 9250 IF var(A%) COMMA 27 var(D5) COMMA 5 EOS
0x36b0…36bf 9260 ELSE 27 var(D5) COMMA 0.1 EOS
0x36bf…36c2 9270 GOSUB 48 → 94
0x36c2…36c4 9280 RETURN EOS
0x36c4…36d6 9290 REM -INPUT STRING
0x36d6…36da 9300 TRAP ERR 9290
0x36da…36e6 9310 LET var(X%) COMMA = ( 3 18 1 ) var(FNC%) EOS
0x36e6…36f8 9320 INPUT » Gi tekst : « COMMA var(X$) EOS
0x36f8…3701 9330 IF var(X$) »« EQ COMMA 0 → 8093
0x3701…371c 9340 INPUT » Gi vinkel (grader):« COMMA var(V) EOS
0x371c…3734 9350 INPUT » Gi h|yde i mm : « COMMA var(X) EOS
0x3734…3746 9360 INPUT » OK ? (J/N):« COMMA var(S$) EOS
0x3746…3750 9370 IF var(S$) »J« <> COMMA 0 → 9092
0x3750…3762 9375 LET var(X%) COMMA = ( var(X0) var(Y0) var(V1) var(X) var(X$) ) var(FNX%) EOS
0x3762…3768 9380 REM C
0x3768…376b 9400 TRAP ERR OFF
0x376b…376e 9410 GOSUB 48 → 94
0x376e…3770 9420 RETURN EOS
0x3770…3790 9430 REM POSISJONER CURSOR FOR INPUT
0x3790…379c 9440 LET var(X%) COMMA = ( 2 15 1 ) var(FNC%) EOS
0x379c…379e 9450 RETURN EOS
0x379e…37a8 9500 REM ----
0x37a8…37b4 9510 LET var(X%) COMMA = ( 2 22 5 ) var(FNC%) EOS
0x37b4…37d2 9520 LINPUT »Trykk return for meny : « COMMA var(X$) EOS
0x37d2…37d4 9530 RETURN EOS
0x37d4…37f8 9600 REM --------- HALVRUTENETT---------
0x37f8…3816 9605 PRINT »5-cm rutenettskryss tegnes« EOS
0x3816…381d 9610 19400400f101f3
0x381d…3838 9620 LET var(X6) COMMA = ( ELEMENT var(X1') ( 1 ) [] var(D1) DIV ) → a14021e440044021e4e2f3
0x3838…3859 9630 IF = ( var(X6) ELEMENT var(X1') ( 1 ) [] SUB2 ) ?ABS 1 ?< COMMA 27 var(I%) COMMA 2 COMMA var(X6) COMMA ELEMENT var(X1') ( 2 ) [] EOS
0x3859…3865 9640 ELSE 27 var(X6) COMMA ELEMENT var(X1') ( 1 ) [] EOS
0x3865…3869 9650 1a4004f3
0x3869…387e 9660 LET var(Y6) COMMA = ( ELEMENT var(Y1') ( 1 ) [] var(D1) DIV ) → a14021e4f3
0x387e…3885 9670 19403400f101f3
0x3885…3893 9680 LET var(X%) COMMA = ( var(X6) var(Y6) ) var(FNH%) EOS
0x3893…389d 9690 LET var(Y6) COMMA var(Y6) var(D1) PLUS EOS
0x389d…38ab 9700 LET var(I8%) COMMA var(Y6) ELEMENT var(Y1') ( 4 ) [] > EOS
0x38ab…38af 9710 1a4034f3
0x38af…38b1 9720 RETURN EOS
0x38b1…38e1 9800 REM -------- CHAIN TO NEXT MODULE -------------
0x38e1…38ed 9807 IF = ( 1 1 1 ) var(FNX9%) → eff105f3
0x38ed…38f2 9812 LET var(M9%) COMMA 1 EOS
0x38f2…38fc 9815 CHAIN »PLOT.2« EOS
0x38fc…38fe 9850 RETURN EOS
0x38fe…392f 9900 REM ------- INTERRUPT FRAME-PAR.-PROCESSING-----
0x392f…3931 9990 RETURN EOS