|
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: 13167 (0x336f)
Notes: ZILOG_BASIC
Names: »PARAM.BP«
└─⟦837bc648a⟧ Bits:30006817 8" ZilogMCZ floppy NThun_0019 (Styredisk Plot - Prepare)
└─⟦this⟧ »PARAM.BP«
0x0000…0014 BasicHead {variables=0x00d0, stms=0x0a68, f2=0x2823, f3=0000000000000000000000000000}
0x0014…00e4 [
0x0014…00e4 [0x00]: VarDef {f0=0x8505, f1=0x4f, f2=0x23} D% 0x33
0x0014…00e4 [0x01]: VarDef {f0=0x8412, f1=0x4f, f2=0x21} B% 0x32
0x0014…00e4 [0x02]: VarDef {f0=0x8400, f1=0x4f, f2=0x20} A% 0x31
0x0014…00e4 [0x03]: VarDef {f0=0x8350, f1=0x4f, f2=0x22} C% 0x30
0x0014…00e4 [0x04]: VarDef {f0=0x7867, f1=0x42, f2=0x2d} N2% 0x2f
0x0014…00e4 [0x05]: VarDef {f0=0x7804, f1=0x45, f2=0x25} F5% 0x2e
0x0014…00e4 [0x06]: VarDef {f0=0x7802, f1=0x44, f2=0x25} F4% 0x2d
0x0014…00e4 [0x07]: VarDef {f0=0x7700, f1=0x4f, f2=0x29} J% 0x2c
0x0014…00e4 [0x08]: VarDef {f0=0x7692, f1=0x41, f2=0x29} J1% 0x2b
0x0014…00e4 [0x09]: VarDef {f0=0x7655, f1=0x42, f2=0x2a} K2% 0x2a
0x0014…00e4 [0x0a]: VarDef {f0=0x7650, f1=0x41, f2=0x2a} K1% 0x29
0x0014…00e4 [0x0b]: VarDef {f0=0x0000, f1=0x08, f2=0x25} F8% 0x28
0x0014…00e4 [0x0c]: VarDef {f0=0x6385, f1=0x41, f2=0x21} B1% 0x27
0x0014…00e4 [0x0d]: VarDef {f0=0x0000, f1=0x00, f2=0x25} F0% 0x26
0x0014…00e4 [0x0e]: VarDef {f0=0xfe28, f1=0x1f, f2=0x30} FNQ% 0x25
0x0014…00e4 [0x0f]: VarDef {f0=0xfe48, f1=0x1f, f2=0x37} FNX% 0x24
0x0014…00e4 [0x10]: VarDef {f0=0xfe64, f1=0x1f, f2=0x21} FNB% 0x23
0x0014…00e4 [0x11]: VarDef {f0=0xfe7c, f1=0x1f, f2=0x23} FND% 0x22
0x0014…00e4 [0x12]: VarDef {f0=0xfe98, f1=0x1f, f2=0x33} FNT% 0x21
0x0014…00e4 [0x13]: VarDef {f0=0x1200, f1=0x01, f2=0x28} I1% 0x20
0x0014…00e4 [0x14]: VarDef {f0=0x0100, f1=0x01, f2=0x2d} N1% 0x1f
0x0014…00e4 [0x15]: VarDef {f0=0xfec8, f1=0x1f, f2=0x2b} FNL% 0x1e
0x0014…00e4 [0x16]: VarDef {f0=0xfef4, f1=0x1f, f2=0x31} FNR% 0x1d
0x0014…00e4 [0x17]: VarDef {f0=0x1300, f1=0x0f, f2=0x28} I% 0x1c
0x0014…00e4 [0x18]: VarDef {f0=0x0000, f1=0x43, f2=0x22} C3% 0x1b
0x0014…00e4 [0x19]: VarDef {f0=0x1090, f1=0x42, f2=0x22} C2% 0x1a
0x0014…00e4 [0x1a]: VarDef {f0=0xa504, f1=0x41, f2=0x22} C1% 0x19
0x0014…00e4 [0x1b]: VarDef {f0=0xff8c, f1=0x1f, f2=0x2e} FNO% 0x18
0x0014…00e4 [0x1c]: VarDef {f0=0x0200, f1=0x4f, f2=0x24} E% 0x17
0x0014…00e4 [0x1d]: VarDef {f0=0xff1c, f1=0x1f, f2=0x24} FNE% 0x16
0x0014…00e4 [0x1e]: VarDef {f0=0xff3c, f1=0x1f, f2=0x22} FNC% 0x15
0x0014…00e4 [0x1f]: VarDef {f0=0x0000, f1=0x0f, f2=0x37} X% 0x14
0x0014…00e4 [0x20]: VarDef {f0=0xffc0, f1=0x1f, f2=0x28} FNI% 0x13
0x0014…00e4 [0x21]: VarDef {f0=0x0000, f1=0x0f, f2=0x2c} M% 0x12
0x0014…00e4 [0x22]: VarDef {f0=0x0000, f1=0x03, f2=0x25} F3% 0x11
0x0014…00e4 [0x23]: VarDef {f0=0x9600, f1=0x09, f2=0x2c} M9% 0x10
0x0014…00e4 [0x24]: VarDef {f0=0x1200, f1=0x09, f2=0x2d} N9% 0xf
0x0014…00e4 [0x25]: VarDef {f0=0x0000, f1=0x06, f2=0x25} F6% 0xe
0x0014…00e4 [0x26]: VarDef {f0=0x0100, f1=0x02, f2=0x25} F2% 0xd
0x0014…00e4 [0x27]: VarDef {f0=0x0000, f1=0x01, f2=0x25} F1% 0xc
0x0014…00e4 [0x28]: VarDef {f0=0x1a28, f1=0x0f, f2=0x57} X$ 0xb
0x0014…00e4 [0x29]: VarDef {f0=0x1a1c, f1=0x0f, f2=0x52} S$ 0xa
0x0014…00e4 [0x2a]: VarDef {f0=0x19f0, f1=0x09, f2=0x53} T9$ 0x9
0x0014…00e4 [0x2b]: VarDef {f0=0x19c4, f1=0x00, f2=0x53} T0$ 0x8
0x0014…00e4 [0x2c]: VarDef {f0=0x0052, f1=0x2f, f2=0x53} T$<2f53> 0x7
0x0014…00e4 [0x2d]: VarDef {f0=0x004d, f1=0x01, f2=0x4a} K1$ 0x6
0x0014…00e4 [0x2e]: VarDef {f0=0x0048, f1=0x08, f2=0x4f} P8$ 0x5
0x0014…00e4 [0x2f]: VarDef {f0=0x0042, f1=0x07, f2=0x4f} P7$ 0x4
0x0014…00e4 [0x30]: VarDef {f0=0x003d, f1=0x06, f2=0x4f} P6$ 0x3
0x0014…00e4 [0x31]: VarDef {f0=0x0030, f1=0x0f, f2=0x4f} P$ 0x2
0x0014…00e4 [0x32]: VarDef {f0=0x0018, f1=0x0f, f2=0x56} W$ 0x1
0x0014…00e4 [0x33]: VarDef {f0=0x0000, f1=0x0f, f2=0x51} R$ 0x0
0x0014…00e4 ]
0x00e4…00e8 Statement 36864 @0x336e
0x00e8…00ec Statement 34592 @0x336c
0x00ec…00f0 Statement 34562 @0x3369
0x00f0…00f4 Statement 34560 @0x3366
0x00f4…00f8 Statement 34455 @0x3364
0x00f8…00fc Statement 34454 @0x3361
0x00fc…0100 Statement 34453 @0x335e
0x0100…0104 Statement 34448 @0x3349
0x0104…0108 Statement 34432 @0x333e
0x0108…010c Statement 34424 @0x333c
0x010c…0110 Statement 34422 @0x3339
0x0110…0114 Statement 34421 @0x3336
0x0114…0118 Statement 34416 @0x3333
0x0118…011c Statement 34400 @0x3328
0x011c…0120 Statement 34384 @0x3322
0x0120…0124 Statement 34368 @0x331c
0x0124…0128 Statement 34357 @0x3317
0x0128…012c Statement 34352 @0x32f4
0x012c…0130 Statement 34345 @0x32f3
0x0130…0134 Statement 34344 @0x32ed
0x0134…0138 Statement 34343 @0x32e9
0x0138…013c Statement 34341 @0x32de
0x013c…0140 Statement 34340 @0x32d9
0x0140…0144 Statement 34339 @0x32d0
0x0144…0148 Statement 34338 @0x32c8
0x0148…014c Statement 34336 @0x32b2
0x014c…0150 Statement 34327 @0x32ae
0x0150…0154 Statement 34325 @0x32aa
0x0154…0158 Statement 34309 @0x32a6
0x0158…015c Statement 34304 @0x3269
0x015c…0160 Statement 34128 @0x3267
0x0160…0164 Statement 34080 @0x3264
0x0164…0168 Statement 34064 @0x3261
0x0168…016c Statement 34053 @0x3237
0x016c…0170 Statement 34048 @0x3235
0x0170…0174 Statement 33840 @0x3232
0x0174…0178 Statement 33824 @0x322d
0x0178…017c Statement 33816 @0x322c
0x017c…0180 Statement 33815 @0x3229
0x0180…0184 Statement 33814 @0x321f
0x0184…0188 Statement 33813 @0x321c
0x0188…018c Statement 33812 @0x3210
0x018c…0190 Statement 33810 @0x3207
0x0190…0194 Statement 33808 @0x3201
0x0194…0198 Statement 33792 @0x31fe
0x0198…019c Statement 33648 @0x31fc
0x019c…01a0 Statement 33632 @0x31fb
0x01a0…01a4 Statement 33616 @0x31fa
0x01a4…01a8 Statement 33600 @0x31f7
0x01a8…01ac Statement 33584 @0x31d5
0x01ac…01b0 Statement 33574 @0x31d4
0x01b0…01b4 Statement 33572 @0x31ca
0x01b4…01b8 Statement 33570 @0x31c3
0x01b8…01bc Statement 33568 @0x31b8
0x01bc…01c0 Statement 33552 @0x31b1
0x01c0…01c4 Statement 33536 @0x31ae
0x01c4…01c8 Statement 33424 @0x31ad
0x01c8…01cc Statement 33408 @0x31ab
0x01cc…01d0 Statement 33392 @0x318d
0x01d0…01d4 Statement 33376 @0x3187
0x01d4…01d8 Statement 33365 @0x3182
0x01d8…01dc Statement 33360 @0x317b
0x01dc…01e0 Statement 33344 @0x3174
0x01e0…01e4 Statement 33328 @0x316c
0x01e4…01e8 Statement 33312 @0x3163
0x01e8…01ec Statement 33301 @0x315d
0x01ec…01f0 Statement 33296 @0x3155
0x01f0…01f4 Statement 33280 @0x3149
0x01f4…01f8 Statement 33141 @0x3146
0x01f8…01fc Statement 33138 @0x3135
0x01fc…0200 Statement 33136 @0x3129
0x0200…0204 Statement 33125 @0x310b
0x0204…0208 Statement 33120 @0x30ff
0x0208…020c Statement 33093 @0x30fe
0x020c…0210 Statement 33092 @0x30fd
0x0210…0214 Statement 33091 @0x30fc
0x0214…0218 Statement 33090 @0x30ef
0x0218…021c Statement 33089 @0x30de
0x021c…0220 Statement 33088 @0x30bf
0x0220…0224 Statement 33081 @0x30a3
0x0224…0228 Statement 33080 @0x30a0
0x0228…022c Statement 33079 @0x3093
0x022c…0230 Statement 33078 @0x3073
0x0230…0234 Statement 33077 @0x306d
0x0234…0238 Statement 33076 @0x3067
0x0238…023c Statement 33074 @0x3064
0x023c…0240 Statement 33072 @0x3048
0x0240…0244 Statement 33061 @0x3045
0x0244…0248 Statement 33056 @0x3029
0x0248…024c Statement 33049 @0x3026
0x024c…0250 Statement 33047 @0x3019
0x0250…0254 Statement 33046 @0x300c
0x0254…0258 Statement 33043 @0x2fe4
0x0258…025c Statement 33042 @0x2fd2
0x025c…0260 Statement 33040 @0x2fcc
0x0260…0264 Statement 33033 @0x2fc6
0x0264…0268 Statement 33029 @0x2fb6
0x0268…026c Statement 33024 @0x2fb3
0x026c…0270 Statement 32917 @0x2fb2
0x0270…0274 Statement 32916 @0x2fb1
0x0274…0278 Statement 32915 @0x2fa4
0x0278…027c Statement 32914 @0x2f93
0x027c…0280 Statement 32913 @0x2f78
0x0280…0284 Statement 32912 @0x2f64
0x0284…0288 Statement 32901 @0x2f50
0x0288…028c Statement 32896 @0x2f41
0x028c…0290 Statement 32885 @0x2f25
0x0290…0294 Statement 32880 @0x2f01
0x0294…0298 Statement 32869 @0x2ef1
0x0298…029c Statement 32864 @0x2ee3
0x029c…02a0 Statement 32853 @0x2eda
0x02a0…02a4 Statement 32848 @0x2ece
0x02a4…02a8 Statement 32841 @0x2ecd
0x02a8…02ac Statement 32840 @0x2eca
0x02ac…02b0 Statement 32839 @0x2ec1
0x02b0…02b4 Statement 32837 @0x2eb0
0x02b4…02b8 Statement 32836 @0x2ea7
0x02b8…02bc Statement 32835 @0x2e9f
0x02bc…02c0 Statement 32832 @0x2e9c
0x02c0…02c4 Statement 32821 @0x2e96
0x02c4…02c8 Statement 32816 @0x2e92
0x02c8…02cc Statement 32805 @0x2e86
0x02cc…02d0 Statement 32800 @0x2e66
0x02d0…02d4 Statement 32789 @0x2e5a
0x02d4…02d8 Statement 32784 @0x2e55
0x02d8…02dc Statement 32773 @0x2e4f
0x02dc…02e0 Statement 32768 @0x2e1b
0x02e0…02e4 Statement 31061 @0x2e18
0x02e4…02e8 Statement 31056 @0x2e0c
0x02e8…02ec Statement 31045 @0x2e0b
0x02ec…02f0 Statement 30997 @0x2def
0x02f0…02f4 Statement 30994 @0x2de3
0x02f4…02f8 Statement 30992 @0x2de0
0x02f8…02fc Statement 30983 @0x2ddf
0x02fc…0300 Statement 30853 @0x2ddc
0x0300…0304 Statement 30848 @0x2dcc
0x0304…0308 Statement 30837 @0x2dc4
0x0308…030c Statement 30832 @0x2db8
0x030c…0310 Statement 30825 @0x2db7
0x0310…0314 Statement 30824 @0x2db4
0x0314…0318 Statement 30823 @0x2dab
0x0318…031c Statement 30821 @0x2da2
0x031c…0320 Statement 30819 @0x2d9a
0x0320…0324 Statement 30817 @0x2d97
0x0324…0328 Statement 30816 @0x2d91
0x0328…032c Statement 30805 @0x2d8d
0x032c…0330 Statement 30800 @0x2d81
0x0330…0334 Statement 30790 @0x2d7b
0x0334…0338 Statement 30787 @0x2d6f
0x0338…033c Statement 30784 @0x2d6a
0x033c…0340 Statement 30773 @0x2d64
0x0340…0344 Statement 30768 @0x2d37
0x0344…0348 Statement 30760 @0x2d34
0x0348…034c Statement 30759 @0x2d29
0x034c…0350 Statement 30758 @0x2d1d
0x0350…0354 Statement 30752 @0x2d1c
0x0354…0358 Statement 30745 @0x2d0f
0x0358…035c Statement 30744 @0x2cf2
0x035c…0360 Statement 30743 @0x2ce9
0x0360…0364 Statement 30742 @0x2ce6
0x0364…0368 Statement 30741 @0x2ce5
0x0368…036c Statement 30740 @0x2cd0
0x036c…0370 Statement 30739 @0x2cca
0x0370…0374 Statement 30738 @0x2cbe
0x0374…0378 Statement 30736 @0x2cb2
0x0378…037c Statement 30725 @0x2cb1
0x037c…0380 Statement 30724 @0x2cae
0x0380…0384 Statement 30722 @0x2ca5
0x0384…0388 Statement 30720 @0x2c9d
0x0388…038c Statement 30614 @0x2c9a
0x038c…0390 Statement 30613 @0x2c94
0x0390…0394 Statement 30610 @0x2c90
0x0394…0398 Statement 30608 @0x2c8c
0x0398…039c Statement 30597 @0x2c80
0x039c…03a0 Statement 30595 @0x2c72
0x03a0…03a4 Statement 30594 @0x2c66
0x03a4…03a8 Statement 30592 @0x2c55
0x03a8…03ac Statement 30581 @0x2c4f
0x03ac…03b0 Statement 30576 @0x2c49
0x03b0…03b4 Statement 30567 @0x2c1a
0x03b4…03b8 Statement 30566 @0x2c17
0x03b8…03bc Statement 30565 @0x2c16
0x03bc…03c0 Statement 30564 @0x2c0d
0x03c0…03c4 Statement 30563 @0x2c03
0x03c4…03c8 Statement 30562 @0x2bfc
0x03c8…03cc Statement 30561 @0x2bf0
0x03cc…03d0 Statement 30560 @0x2be7
0x03d0…03d4 Statement 30552 @0x2bdb
0x03d4…03d8 Statement 30549 @0x2bda
0x03d8…03dc Statement 30547 @0x2bd0
0x03dc…03e0 Statement 30544 @0x2bcb
0x03e0…03e4 Statement 30533 @0x2bbe
0x03e4…03e8 Statement 30528 @0x2ba9
0x03e8…03ec Statement 30519 @0x2ba8
0x03ec…03f0 Statement 30517 @0x2ba2
0x03f0…03f4 Statement 30515 @0x2b9b
0x03f4…03f8 Statement 30512 @0x2b94
0x03f8…03fc Statement 30505 @0x2b8a
0x03fc…0400 Statement 30501 @0x2b73
0x0400…0404 Statement 30496 @0x2b6f
0x0404…0408 Statement 30485 @0x2b6b
0x0408…040c Statement 30471 @0x2b36
0x040c…0410 Statement 30470 @0x2b2e
0x0410…0414 Statement 30469 @0x2b28
0x0414…0418 Statement 30468 @0x2b23
0x0418…041c Statement 30464 @0x2af1
0x041c…0420 Statement 30357 @0x2aef
0x0420…0424 Statement 30354 @0x2aec
0x0424…0428 Statement 30353 @0x2ae9
0x0428…042c Statement 30352 @0x2ae5
0x042c…0430 Statement 30342 @0x2adb
0x0430…0434 Statement 30341 @0x2ad8
0x0434…0438 Statement 30336 @0x2ac9
0x0438…043c Statement 30325 @0x2ac2
0x043c…0440 Statement 30320 @0x2ac1
0x0440…0444 Statement 30309 @0x2ac0
0x0444…0448 Statement 30304 @0x2ab6
0x0448…044c Statement 30293 @0x2aa9
0x044c…0450 Statement 30288 @0x2aa6
0x0450…0454 Statement 30277 @0x2aa5
0x0454…0458 Statement 30272 @0x2a9b
0x0458…045c Statement 30261 @0x2a96
0x045c…0460 Statement 30256 @0x2a8f
0x0460…0464 Statement 30245 @0x2a85
0x0464…0468 Statement 30240 @0x2a82
0x0468…046c Statement 30229 @0x2a71
0x046c…0470 Statement 30224 @0x2a61
0x0470…0474 Statement 30213 @0x2a57
0x0474…0478 Statement 30210 @0x2a52
0x0478…047c Statement 30208 @0x2a4a
0x047c…0480 Statement 30080 @0x2a2f
0x0480…0484 Statement 30064 @0x2a2b
0x0484…0488 Statement 30053 @0x2a27
0x0488…048c Statement 30032 @0x29f6
0x048c…0490 Statement 29984 @0x29f4
0x0490…0494 Statement 29973 @0x29f1
0x0494…0498 Statement 29970 @0x29ee
0x0498…049c Statement 29968 @0x29ed
0x049c…04a0 Statement 29957 @0x29ec
0x04a0…04a4 Statement 29952 @0x29e2
0x04a4…04a8 Statement 29845 @0x29d5
0x04a8…04ac Statement 29840 @0x29d2
0x04ac…04b0 Statement 29829 @0x29d1
0x04b0…04b4 Statement 29824 @0x29c7
0x04b4…04b8 Statement 29813 @0x29c0
0x04b8…04bc Statement 29808 @0x29b9
0x04bc…04c0 Statement 29799 @0x29b2
0x04c0…04c4 Statement 29797 @0x29af
0x04c4…04c8 Statement 29792 @0x299f
0x04c8…04cc Statement 29781 @0x2999
0x04cc…04d0 Statement 29776 @0x298e
0x04d0…04d4 Statement 29744 @0x298b
0x04d4…04d8 Statement 29733 @0x2974
0x04d8…04dc Statement 29728 @0x296e
0x04dc…04e0 Statement 29717 @0x2967
0x04e0…04e4 Statement 29712 @0x295f
0x04e4…04e8 Statement 29704 @0x2955
0x04e8…04ec Statement 29702 @0x294d
0x04ec…04f0 Statement 29701 @0x2945
0x04f0…04f4 Statement 29589 @0x2925
0x04f4…04f8 Statement 29587 @0x2921
0x04f8…04fc Statement 29584 @0x291d
0x04fc…0500 Statement 29568 @0x2918
0x0500…0504 Statement 29561 @0x28db
0x0504…0508 Statement 29560 @0x28d7
0x0508…050c Statement 29559 @0x28c0
0x050c…0510 Statement 29558 @0x28bc
0x0510…0514 Statement 29557 @0x287e
0x0514…0518 Statement 29552 @0x287c
0x0518…051c Statement 29477 @0x2872
0x051c…0520 Statement 29472 @0x2868
0x0520…0524 Statement 29461 @0x2861
0x0524…0528 Statement 29456 @0x2857
0x0528…052c Statement 29440 @0x2855
0x052c…0530 Statement 29328 @0x284b
0x0530…0534 Statement 29317 @0x2841
0x0534…0538 Statement 29312 @0x283a
0x0538…053c Statement 29301 @0x282e
0x053c…0540 Statement 29296 @0x282c
0x0540…0544 Statement 29264 @0x2822
0x0544…0548 Statement 29248 @0x2818
0x0548…054c Statement 29232 @0x280d
0x054c…0550 Statement 29216 @0x2800
0x0550…0554 Statement 29200 @0x27fe
0x0554…0558 Statement 29072 @0x27f4
0x0558…055c Statement 29056 @0x27ea
0x055c…0560 Statement 29040 @0x27e3
0x0560…0564 Statement 29024 @0x27da
0x0564…0568 Statement 29008 @0x27d8
0x0568…056c Statement 28976 @0x27ce
0x056c…0570 Statement 28965 @0x27c4
0x0570…0574 Statement 28960 @0x27b4
0x0574…0578 Statement 28944 @0x27ad
0x0578…057c Statement 28928 @0x27a5
0x057c…0580 Statement 28816 @0x27a3
0x0580…0584 Statement 28784 @0x2799
0x0584…0588 Statement 28768 @0x2794
0x0588…058c Statement 28672 @0x2783
0x058c…0590 Statement 27024 @0x2781
0x0590…0594 Statement 26501 @0x277c
0x0594…0598 Statement 26496 @0x2762
0x0598…059c Statement 26489 @0x275f
0x059c…05a0 Statement 26470 @0x275c
0x05a0…05a4 Statement 26468 @0x2753
0x05a4…05a8 Statement 26466 @0x274d
0x05a8…05ac Statement 26464 @0x2747
0x05ac…05b0 Statement 26224 @0x2744
0x05b0…05b4 Statement 26213 @0x2739
0x05b4…05b8 Statement 26208 @0x272e
0x05b8…05bc Statement 26197 @0x2720
0x05bc…05c0 Statement 26192 @0x2715
0x05c0…05c4 Statement 26181 @0x270a
0x05c4…05c8 Statement 26176 @0x26ff
0x05c8…05cc Statement 26165 @0x26f4
0x05cc…05d0 Statement 26160 @0x26e9
0x05d0…05d4 Statement 26149 @0x26de
0x05d4…05d8 Statement 26144 @0x26d3
0x05d8…05dc Statement 26133 @0x26c8
0x05dc…05e0 Statement 26128 @0x26bd
0x05e0…05e4 Statement 26117 @0x26b3
0x05e4…05e8 Statement 26114 @0x26a8
0x05e8…05ec Statement 26112 @0x26a2
0x05ec…05f0 Statement 25936 @0x2697
0x05f0…05f4 Statement 25925 @0x2693
0x05f4…05f8 Statement 25922 @0x2690
0x05f8…05fc Statement 25920 @0x267f
0x05fc…0600 Statement 25904 @0x267a
0x0600…0604 Statement 25888 @0x263e
0x0604…0608 Statement 25877 @0x263a
0x0608…060c Statement 25872 @0x2620
0x060c…0610 Statement 25861 @0x261a
0x0610…0614 Statement 25856 @0x25de
0x0614…0618 Statement 25751 @0x25dc
0x0618…061c Statement 25749 @0x25b2
0x061c…0620 Statement 25744 @0x2588
0x0620…0624 Statement 25733 @0x255f
0x0624…0628 Statement 25728 @0x2553
0x0628…062c Statement 25717 @0x252a
0x062c…0630 Statement 25712 @0x2506
0x0630…0634 Statement 25701 @0x24dd
0x0634…0638 Statement 25696 @0x24b6
0x0638…063c Statement 25685 @0x248c
0x063c…0640 Statement 25680 @0x2466
0x0640…0644 Statement 25669 @0x243e
0x0644…0648 Statement 25664 @0x2414
0x0648…064c Statement 25653 @0x23ec
0x064c…0650 Statement 25648 @0x23c3
0x0650…0654 Statement 25637 @0x2398
0x0654…0658 Statement 25632 @0x236f
0x0658…065c Statement 25621 @0x2349
0x065c…0660 Statement 25617 @0x231e
0x0660…0664 Statement 25616 @0x22fb
0x0664…0668 Statement 25493 @0x22d0
0x0668…066c Statement 25488 @0x22ac
0x066c…0670 Statement 25477 @0x22aa
0x0670…0674 Statement 25472 @0x229f
0x0674…0678 Statement 25461 @0x229b
0x0678…067c Statement 25456 @0x225c
0x067c…0680 Statement 25445 @0x2258
0x0680…0684 Statement 25440 @0x223c
0x0684…0688 Statement 25429 @0x2238
0x0688…068c Statement 25424 @0x21f9
0x068c…0690 Statement 25376 @0x21f7
0x0690…0694 Statement 25360 @0x21ec
0x0694…0698 Statement 25344 @0x21d4
0x0698…069c Statement 25200 @0x21aa
0x069c…06a0 Statement 25184 @0x2193
0x06a0…06a4 Statement 24912 @0x2189
0x06a4…06a8 Statement 24901 @0x2188
0x06a8…06ac Statement 24885 @0x2183
0x06ac…06b0 Statement 24880 @0x2155
0x06b0…06b4 Statement 24869 @0x212a
0x06b4…06b8 Statement 24864 @0x211a
0x06b8…06bc Statement 24853 @0x210f
0x06bc…06c0 Statement 24848 @0x2108
0x06c0…06c4 Statement 24832 @0x20e4
0x06c4…06c8 Statement 24688 @0x20b2
0x06c8…06cc Statement 24672 @0x20b0
0x06cc…06d0 Statement 24656 @0x20a8
0x06d0…06d4 Statement 24648 @0x209d
0x06d4…06d8 Statement 24645 @0x2086
0x06d8…06dc Statement 24644 @0x2083
0x06dc…06e0 Statement 24643 @0x206e
0x06e0…06e4 Statement 24640 @0x2063
0x06e4…06e8 Statement 24629 @0x205e
0x06e8…06ec Statement 24624 @0x205a
0x06ec…06f0 Statement 24608 @0x201a
0x06f0…06f4 Statement 24592 @0x2000
0x06f4…06f8 Statement 24576 @0x1fc0
0x06f8…06fc Statement 21872 @0x1fbe
0x06fc…0700 Statement 21840 @0x1fb3
0x0700…0704 Statement 21826 @0x1fa7
0x0704…0708 Statement 21825 @0x1fa4
0x0708…070c Statement 21824 @0x1f7a
0x070c…0710 Statement 21813 @0x1f76
0x0710…0714 Statement 21808 @0x1f6b
0x0714…0718 Statement 21797 @0x1f66
0x0718…071c Statement 21760 @0x1f2b
0x071c…0720 Statement 21504 @0x1f29
0x0720…0724 Statement 21360 @0x1f18
0x0724…0728 Statement 21344 @0x1f02
0x0728…072c Statement 21328 @0x1ef7
0x072c…0730 Statement 21280 @0x1ef3
0x0730…0734 Statement 21264 @0x1edd
0x0734…0738 Statement 21248 @0x1ed2
0x0738…073c Statement 21104 @0x1ec3
0x073c…0740 Statement 21088 @0x1eaf
0x0740…0744 Statement 21072 @0x1ea4
0x0744…0748 Statement 20885 @0x1ea0
0x0748…074c Statement 20882 @0x1e64
0x074c…0750 Statement 20800 @0x1e62
0x0750…0754 Statement 20789 @0x1e5f
0x0754…0758 Statement 20784 @0x1e54
0x0758…075c Statement 20768 @0x1e49
0x075c…0760 Statement 20752 @0x1e3e
0x0760…0764 Statement 20560 @0x1e38
0x0764…0768 Statement 20544 @0x1e30
0x0768…076c Statement 20528 @0x1e2c
0x076c…0770 Statement 20496 @0x1df1
0x0770…0774 Statement 18832 @0x1def
0x0774…0778 Statement 18816 @0x1de4
0x0778…077c Statement 18800 @0x1dd9
0x077c…0780 Statement 18789 @0x1dce
0x0780…0784 Statement 18784 @0x1dc3
0x0784…0788 Statement 18768 @0x1d9c
0x0788…078c Statement 18752 @0x1d94
0x078c…0790 Statement 18704 @0x1d83
0x0790…0794 Statement 18693 @0x1d6d
0x0794…0798 Statement 18688 @0x1d68
0x0798…079c Statement 18581 @0x1d5d
0x079c…07a0 Statement 18576 @0x1d4d
0x07a0…07a4 Statement 18560 @0x1d40
0x07a4…07a8 Statement 18544 @0x1d3a
0x07a8…07ac Statement 18531 @0x1d2f
0x07ac…07b0 Statement 18528 @0x1cf2
0x07b0…07b4 Statement 18517 @0x1cea
0x07b4…07b8 Statement 18512 @0x1ce7
0x07b8…07bc Statement 18496 @0x1ce3
0x07bc…07c0 Statement 18486 @0x1cd1
0x07c0…07c4 Statement 18485 @0x1cbb
0x07c4…07c8 Statement 18480 @0x1cb6
0x07c8…07cc Statement 18472 @0x1cab
0x07cc…07d0 Statement 18469 @0x1c9d
0x07d0…07d4 Statement 18464 @0x1c90
0x07d4…07d8 Statement 18453 @0x1c7c
0x07d8…07dc Statement 18437 @0x1c76
0x07dc…07e0 Statement 18432 @0x1c72
0x07e0…07e4 Statement 18328 @0x1c67
0x07e4…07e8 Statement 18325 @0x1c2a
0x07e8…07ec Statement 18322 @0x1c22
0x07ec…07f0 Statement 18256 @0x1c13
0x07f0…07f4 Statement 18240 @0x1c03
0x07f4…07f8 Statement 18229 @0x1bf8
0x07f8…07fc Statement 18224 @0x1bf3
0x07fc…0800 Statement 18208 @0x1be3
0x0800…0804 Statement 18192 @0x1bd3
0x0804…0808 Statement 18064 @0x1bcd
0x0808…080c Statement 18040 @0x1bc2
0x080c…0810 Statement 18032 @0x1b85
0x0810…0814 Statement 17712 @0x1b81
0x0814…0818 Statement 17680 @0x1b4e
0x0818…081c Statement 17664 @0x1b48
0x081c…0820 Statement 17040 @0x1b46
0x0820…0824 Statement 16976 @0x1b13
0x0824…0828 Statement 16965 @0x1b11
0x0828…082c Statement 16960 @0x1afa
0x082c…0830 Statement 16944 @0x1af8
0x0830…0834 Statement 16928 @0x1af6
0x0834…0838 Statement 16912 @0x1ac3
0x0838…083c Statement 16901 @0x1ac1
0x083c…0840 Statement 16896 @0x1a99
0x0840…0844 Statement 16784 @0x1a97
0x0844…0848 Statement 16768 @0x1a95
0x0848…084c Statement 16752 @0x1a62
0x084c…0850 Statement 16741 @0x1a60
0x0850…0854 Statement 16736 @0x1a47
0x0854…0858 Statement 16656 @0x1a45
0x0858…085c Statement 16528 @0x1a04
0x085c…0860 Statement 16512 @0x19c3
0x0860…0864 Statement 16496 @0x19c1
0x0864…0868 Statement 16480 @0x19b6
0x0868…086c Statement 16464 @0x197e
0x086c…0870 Statement 16453 @0x1979
0x0870…0874 Statement 16448 @0x1958
0x0874…0878 Statement 16421 @0x1954
0x0878…087c Statement 16400 @0x1917
0x087c…0880 Statement 14080 @0x1916
0x0880…0884 Statement 13856 @0x1904
0x0884…0888 Statement 13840 @0x18f9
0x0888…088c Statement 13824 @0x18f7
0x088c…0890 Statement 13701 @0x18f3
0x0890…0894 Statement 13680 @0x18d1
0x0894…0898 Statement 13669 @0x18cd
0x0898…089c Statement 13600 @0x18ab
0x089c…08a0 Statement 13573 @0x18a7
0x08a0…08a4 Statement 13568 @0x1885
0x08a4…08a8 Statement 13440 @0x1881
0x08a8…08ac Statement 13424 @0x1880
0x08ac…08b0 Statement 13413 @0x187d
0x08b0…08b4 Statement 13394 @0x187a
0x08b4…08b8 Statement 13360 @0x1871
0x08b8…08bc Statement 13349 @0x1830
0x08bc…08c0 Statement 13344 @0x17fd
0x08c0…08c4 Statement 13333 @0x17d8
0x08c4…08c8 Statement 13328 @0x1797
0x08c8…08cc Statement 13317 @0x1793
0x08cc…08d0 Statement 13312 @0x177c
0x08d0…08d4 Statement 13200 @0x1771
0x08d4…08d8 Statement 13189 @0x1766
0x08d8…08dc Statement 13184 @0x1747
0x08dc…08e0 Statement 13120 @0x1743
0x08e0…08e4 Statement 13088 @0x1738
0x08e4…08e8 Statement 13078 @0x1734
0x08e8…08ec Statement 13077 @0x16f3
0x08ec…08f0 Statement 13072 @0x16b7
0x08f0…08f4 Statement 13061 @0x167a
0x08f4…08f8 Statement 13056 @0x1639
0x08f8…08fc Statement 12949 @0x1635
0x08fc…0900 Statement 12912 @0x1631
0x0900…0904 Statement 12901 @0x1629
0x0904…0908 Statement 12896 @0x1625
0x0908…090c Statement 12885 @0x15f9
0x090c…0910 Statement 12880 @0x15f5
0x0910…0914 Statement 12688 @0x15d0
0x0914…0918 Statement 12672 @0x15ce
0x0918…091c Statement 12656 @0x15a0
0x091c…0920 Statement 12640 @0x159e
0x0920…0924 Statement 12624 @0x159c
0x0924…0928 Statement 12608 @0x1562
0x0928…092c Statement 12592 @0x1528
0x092c…0930 Statement 12576 @0x14ee
0x0930…0934 Statement 12560 @0x14b4
0x0934…0938 Statement 12544 @0x147a
0x0938…093c Statement 12432 @0x1440
0x093c…0940 Statement 12416 @0x1406
0x0940…0944 Statement 12408 @0x1404
0x0944…0948 Statement 12407 @0x13e4
0x0948…094c Statement 12405 @0x13e2
0x094c…0950 Statement 12400 @0x13d7
0x0950…0954 Statement 12389 @0x13d3
0x0954…0958 Statement 12309 @0x138d
0x0958…095c Statement 05984 @0x138c
0x095c…0960 Statement 05968 @0x1389
0x0960…0964 Statement 05952 @0x1383
0x0964…0968 Statement 05936 @0x135e
0x0968…096c Statement 05920 @0x1353
0x096c…0970 Statement 05909 @0x1351
0x0970…0974 Statement 05904 @0x134e
0x0974…0978 Statement 05888 @0x131b
0x0978…097c Statement 05472 @0x131a
0x097c…0980 Statement 05456 @0x1317
0x0980…0984 Statement 05440 @0x1311
0x0984…0988 Statement 05424 @0x12fb
0x0988…098c Statement 05408 @0x12f0
0x098c…0990 Statement 05397 @0x12ee
0x0990…0994 Statement 05392 @0x12eb
0x0994…0998 Statement 05376 @0x12ae
0x0998…099c Statement 05216 @0x12ad
0x099c…09a0 Statement 05200 @0x12aa
0x09a0…09a4 Statement 05184 @0x12a7
0x09a4…09a8 Statement 05168 @0x129f
0x09a8…09ac Statement 05152 @0x1299
0x09ac…09b0 Statement 05136 @0x1296
0x09b0…09b4 Statement 05120 @0x1251
0x09b4…09b8 Statement 05013 @0x1250
0x09b8…09bc Statement 05008 @0x124d
0x09bc…09c0 Statement 04997 @0x1242
0x09c0…09c4 Statement 04992 @0x1237
0x09c4…09c8 Statement 04965 @0x1234
0x09c8…09cc Statement 04944 @0x11ef
0x09cc…09d0 Statement 04896 @0x11ee
0x09d0…09d4 Statement 04880 @0x11eb
0x09d4…09d8 Statement 04864 @0x11e8
0x09d8…09dc Statement 04752 @0x11b5
0x09dc…09e0 Statement 04736 @0x11ad
0x09e0…09e4 Statement 04720 @0x11aa
0x09e4…09e8 Statement 04688 @0x1165
0x09e8…09ec Statement 04624 @0x1164
0x09ec…09f0 Statement 04608 @0x1161
0x09f0…09f4 Statement 04496 @0x115e
0x09f4…09f8 Statement 04480 @0x1144
0x09f8…09fc Statement 04469 @0x113c
0x09fc…0a00 Statement 04466 @0x1131
0x0a00…0a04 Statement 04464 @0x112b
0x0a04…0a08 Statement 04454 @0x1129
0x0a08…0a0c Statement 04453 @0x111e
0x0a0c…0a10 Statement 04450 @0x1116
0x0a10…0a14 Statement 04448 @0x1111
0x0a14…0a18 Statement 04432 @0x10cb
0x0a18…0a1c Statement 04352 @0x10ca
0x0a1c…0a20 Statement 04240 @0x10c3
0x0a20…0a24 Statement 04224 @0x10c0
0x0a24…0a28 Statement 04208 @0x10bd
0x0a28…0a2c Statement 04192 @0x10b3
0x0a2c…0a30 Statement 04176 @0x10b0
0x0a30…0a34 Statement 04160 @0x10aa
0x0a34…0a38 Statement 04144 @0x10a6
0x0a38…0a3c Statement 04128 @0x109e
0x0a3c…0a40 Statement 04112 @0x109b
0x0a40…0a44 Statement 04096 @0x1056
0x0a44…0a48 Statement 02320 @0x1055
0x0a48…0a4c Statement 02304 @0x1052
0x0a4c…0a50 Statement 02144 @0x103d
0x0a50…0a54 Statement 02133 @0x103a
0x0a54…0a58 Statement 02128 @0x1024
0x0a58…0a5c Statement 02117 @0x1021
0x0a5c…0a60 Statement 02112 @0x1018
0x0a60…0a64 Statement 02096 @0x100d
0x0a64…0a68 Statement 02080 @0x1009
0x0a68…0a6c Statement 02048 @0xfca
0x0a6c…0a70 Statement 01840 @0xfc6
0x0a70…0a74 Statement 01824 @0xfc5
0x0a74…0a78 Statement 01808 @0xfc2
0x0a78…0a7c Statement 01792 @0xfa7
0x0a7c…0a80 Statement 01680 @0xf8b
0x0a80…0a84 Statement 01664 @0xf7b
0x0a84…0a88 Statement 01648 @0xf75
0x0a88…0a8c Statement 01637 @0xf71
0x0a8c…0a90 Statement 01632 @0xf33
0x0a90…0a94 Statement 01621 @0xef5
0x0a94…0a98 Statement 01616 @0xeb7
0x0a98…0a9c Statement 01605 @0xe79
0x0a9c…0aa0 Statement 01600 @0xe3b
0x0aa0…0aa4 Statement 01589 @0xdfd
0x0aa4…0aa8 Statement 01584 @0xdbf
0x0aa8…0aac Statement 01568 @0xd81
0x0aac…0ab0 Statement 01552 @0xd43
0x0ab0…0ab4 Statement 01536 @0xd3f
0x0ab4…0ab8 Statement 01328 @0xd3e
0x0ab8…0abc Statement 01312 @0xd3b
0x0abc…0ac0 Statement 01280 @0xd3a
0x0ac0…0ac4 Statement 01120 @0xd25
0x0ac4…0ac8 Statement 01104 @0xd22
0x0ac8…0acc Statement 01088 @0xd1b
0x0acc…0ad0 Statement 01072 @0xd0a
0x0ad0…0ad4 Statement 01040 @0xd05
0x0ad4…0ad8 Statement 00880 @0xd02
0x0ad8…0adc Statement 00864 @0xcbd
0x0adc…0ae0 Statement 00768 @0xcbc
0x0ae0…0ae4 Statement 00608 @0xcb9
0x0ae4…0ae8 Statement 00560 @0xcb0
0x0ae8…0aec Statement 00384 @0xcad
0x0aec…0af0 Statement 00368 @0xca5
0x0af0…0af4 Statement 00352 @0xc94
0x0af4…0af8 Statement 00341 @0xc8b
0x0af8…0afc Statement 00338 @0xc82
0x0afc…0b00 Statement 00336 @0xc6a
0x0b00…0b04 Statement 00304 @0xc5f
0x0b04…0b08 Statement 00288 @0xc5c
0x0b08…0b0c Statement 00272 @0xc59
0x0b0c…0b10 Statement 00256 @0xc1b
0x0b10…0b14 Statement 00117 @0xc16
0x0b14…0b18 Statement 00112 @0xc11
0x0b18…0b1c Statement 00096 @0xbe3
0x0b1c…0b20 Statement 00086 @0xbdc
0x0b20…0b24 Statement 00085 @0xbd7
0x0b24…0b28 Statement 00080 @0xbca
0x0b28…0b2c Statement 00072 @0xbbd
0x0b2c…0b30 Statement 00071 @0xbb2
0x0b30…0b34 Statement 00069 @0xba3
0x0b34…0b38 Statement 00055 @0xb9b
0x0b38…0b3c Statement 00053 @0xb93
0x0b3c…0b40 Statement 00048 @0xb7c
0x0b40…0b44 Statement 00037 @0xb74
0x0b44…0b48 Statement 00032 @0xb5a
0x0b48…0b4c Statement 00016 @0xb4c
0x0b4c…0b5a 0010 DIM ELEMENT var(R$) ( 20 ) [] ELEMENT var(W$) ( 20 ) [] EOS
0x0b5a…0b74 0020 DIM ELEMENT var(P$) ( 9 ) [] ELEMENT var(P6$) ( 1 ) [] ELEMENT var(P7$) ( 2 ) [] ELEMENT var(P8$) ( 1 ) [] EOS
0x0b74…0b7c 0025 DIM ELEMENT var(K1$) ( 1 ) [] EOS
0x0b7c…0b93 0030 DIM ELEMENT var(T$<2f53>) ( %155 40 ) [] ELEMENT var(T0$) ( 40 ) [] ELEMENT var(T9$) ( 40 ) [] EOS
0x0b93…0b9b 0035 DIM ELEMENT var(S$) ( 8 ) [] EOS
0x0b9b…0ba3 0037 DIM ELEMENT var(X$) ( 10 ) [] EOS
0x0ba3…0bb2 0045 SYSTEM »LINELEN« COMMA %80 EOS
0x0bb2…0bbd 0047 SYSTEM »WARNOFF« EOS
0x0bbd…0bca 0048 SYSTEM »BUFFERS« COMMA 2 EOS
0x0bca…0bd7 0050 LET var(F1%) COMMA 0 COMMA var(F2%) COMMA 0 COMMA var(F6%) COMMA 0 EOS
0x0bd7…0bdc 0055 LET var(N9%) COMMA 18 EOS
0x0bdc…0be3 0056 LET var(M9%) COMMA %150 EOS
0x0be3…0c11 0060 LET var(T9$) COMMA » « EOS
0x0c11…0c16 0070 LET var(F3%) COMMA 0 EOS
0x0c16…0c1b 0075 LET var(M%) COMMA 0 EOS
0x0c1b…0c59 0100 REM ------------ FUNCTION : OPEN INPUT-FILE ---------------
0x0c59…0c5c 0110 DEF var(FNI%) EOS
0x0c5c…0c5f 0120 1401f3
0x0c5f…0c6a 0130 LET var(X%) COMMA = ( 3 20 20 ) var(FNC%) EOS
0x0c6a…0c82 0150 INPUT »*** Gi inputfil : « COMMA var(R$) EOS
0x0c82…0c8b 0152 IF var(R$) »« EQ COMMA 5 0 EOS
0x0c8b…0c94 0155 LET var(X%) COMMA = ( 0 ) var(FNE%) EOS
0x0c94…0ca5 0160 1601f24170073b4143433d494ee2f155f3
0x0ca5…0cad 0170 IF var(X%) 0 EQ COMMA 5 1 EOS
0x0cad…0cb0 0180 1401f3
0x0cb0…0cb9 0230 LET var(E%) COMMA = ( 1 ) var(FNE%) EOS
0x0cb9…0cbc 0260 GOTO 32 1
0x0cbc…0cbd 0300 FNEND
0x0cbd…0d02 0360 REM ----------------- FUNCTION : OPEN OUTPUT-FILE ----------------
0x0d02…0d05 0370 DEF var(FNO%) EOS
0x0d05…0d0a 0410 1401f102f3
0x0d0a…0d1b 0430 1602f24270073b4143433d494ee2f155f3
0x0d1b…0d22 0440 IF var(X%) 2 EQ COMMA 34 EOS
0x0d22…0d25 0450 1402f3
0x0d25…0d3a 0460 1602f27002302f42e270082c4143433d4e4557e2f3
0x0d3a…0d3b 0500 DOEND
0x0d3b…0d3e 0520 RETURN 0 EOS
0x0d3e…0d3f 0530 FNEND
0x0d3f…0d43 0600 REM
0x0d43…0d81 0610 REM ---------------------------------------------------------
0x0d81…0dbf 0620 REM - FUNCTION OUTSCR : -
0x0dbf…0dfd 0630 REM - -
0x0dfd…0e3b 0635 REM - C1% = 1 ERASE SCREEN -
0x0e3b…0e79 0640 REM - 2 CURSOR ADRESSING TO LINE C2%, POS. C3% -
0x0e79…0eb7 0645 REM - 3 ERASE LINE C2% FROM POS. C3% -
0x0eb7…0ef5 0650 REM - 4 ERASE SCREEN FROM LINE C2%, POS. C3% -
0x0ef5…0f33 0655 REM - -
0x0f33…0f71 0660 REM ---------------------------------------------------------
0x0f71…0f75 0665 REM
0x0f75…0f7b 0670 DEF var(FNC%) var(C1%) var(C2%) var(C3%) EOS
0x0f7b…0f8b 0680 IF var(C1%) 1 EQ COMMA 15 = ( 27 ) → af700145e2f3
0x0f8b…0fa7 0690 PRINT = ( 27 ) → af700146e271731f5be274afe271731f5ce274afe2f2f3
0x0fa7…0fc2 0700 IF var(C1%) 3 EQ var(C1%) 4 EQ OR COMMA 15 = ( 27 ) → af71736f4e005ae374afe2f2f3
0x0fc2…0fc5 0710 RETURN 0 EOS
0x0fc5…0fc6 0720 FNEND
0x0fc6…0fca 0730 REM
0x0fca…1009 0800 REM ------------------ FUNCTION ERROR ----------------------
0x1009…100d 0820 DEF var(FNE%) var(I%) EOS
0x100d…1018 0830 LET var(X%) COMMA = ( 3 22 50 ) var(FNC%) EOS
0x1018…1021 0840 ON var(I%) COMMA 0 var(N9%) 8 var(N1%) 8 EOS
0x1021…1024 0845 RETURN 0 EOS
0x1024…103a 0850 PRINT »- Ukjent filnavn -« EOS
0x103a…103d 0855 RETURN 0 EOS
0x103d…1052 0860 PRINT »- Ulovlig input -« EOS
0x1052…1055 0900 RETURN 0 EOS
0x1055…1056 0910 FNEND
0x1056…109b 1000 REM ------------------ FUNCTION FIL TIL ARRAY --------------------
0x109b…109e 1010 DEF var(FNR%) EOS
0x109e…10a6 1020 195d01f16fc800f3
0x10a6…10aa 1030 TRAP 0 1080
0x10aa…10b0 1040 LINPUT 1# SEMI var(T0$) EOS
0x10b0…10b3 1050 TRAP 0 OFF
0x10b3…10bd 1060 LET ELEMENT var(T$<2f53>) ( var(I%) ) [] COMMA var(T0$) EOS
0x10bd…10c0 1070 1a5df3
0x10c0…10c3 1080 TRAP 0 OFF
0x10c3…10ca 1090 RETURN ( var(I%) 1 SUB2 ) EOS
0x10ca…10cb 1100 FNEND
0x10cb…1111 1150 REM ----------------- FUNCTION LIST PAGE --------------------------
0x1111…1116 1160 DEF var(FNL%) var(N1%) var(M%) EOS
0x1116…111e 1162 IF var(N1%) 0 EQ COMMA 0 0 18
0x111e…1129 1165 LET var(X%) COMMA = ( 2 4 1 ) var(FNC%) EOS
0x1129…112b 1166 PRINT EOS
0x112b…1131 1170 195d01f112f3
0x1131…113c 1172 LET var(I1%) COMMA var(I%) ( var(N1%) 1 SUB2 ) PLUS EOS
0x113c…1144 1175 IF var(I1%) var(M9%) > COMMA 0 0 18
0x1144…115e 1180 PRINT var(I1%) SEMI = ( 5 ) → b5f270013ef271730774b5f272487361749ff3
0x115e…1161 1190 1a5df3
0x1161…1164 1200 RETURN 0 EOS
0x1164…1165 1210 FNEND
0x1165…11aa 1250 REM ---------------- FUNCTION INIT ARRAY T$ ----------------------
0x11aa…11ad 1270 DEF var(FNT%) EOS
0x11ad…11b5 1280 195d01f16f9600f3
0x11b5…11e8 1290 LET ELEMENT var(T$<2f53>) ( var(I%) ) [] COMMA » « EOS
0x11e8…11eb 1300 1a5df3
0x11eb…11ee 1310 RETURN 0 EOS
0x11ee…11ef 1320 FNEND
0x11ef…1234 1350 REM --------------- FUNCTION CLEAR COMMAND LINE ------------------
0x1234…1237 1365 DEF var(FND%) EOS
0x1237…1242 1380 LET var(X%) COMMA = ( 3 1 6 ) var(FNC%) EOS
0x1242…124d 1385 LET var(X%) COMMA = ( 2 1 6 ) var(FNC%) EOS
0x124d…1250 1390 RETURN 0 EOS
0x1250…1251 1395 FNEND
0x1251…1296 1400 REM ------------------- FUNCTION BELL ----------------------------
0x1296…1299 1410 DEF var(FNB%) EOS
0x1299…129f 1420 195d01f10af3
0x129f…12a7 1430 PRINT = ( 7 ) → aff2f3
0x12a7…12aa 1440 1a5df3
0x12aa…12ad 1450 RETURN 0 EOS
0x12ad…12ae 1460 FNEND
0x12ae…12eb 1500 REM ----------------- FUNCTION LIST INPUTFIL -------------
0x12eb…12ee 1510 DEF var(FNX%) EOS
0x12ee…12f0 1515 PRINT EOS
0x12f0…12fb 1520 LET var(X%) COMMA = ( 2 1 6 ) var(FNC%) EOS
0x12fb…1311 1530 PRINT » -- Inputfil : « COMMA var(R$) SEMI EOS
0x1311…1317 1540 LINPUT »« COMMA var(X$) EOS
0x1317…131a 1550 RETURN 0 EOS
0x131a…131b 1560 FNEND
0x131b…134e 1700 REM ----------------- WARNING --------------------
0x134e…1351 1710 DEF var(FNQ%) EOS
0x1351…1353 1715 PRINT EOS
0x1353…135e 1720 LET var(X%) COMMA = ( 2 23 6 ) var(FNC%) EOS
0x135e…1383 1730 PRINT » -- Glemt aa skrive til fil? --« EOS
0x1383…1389 1740 LET var(X%) COMMA = var(FNB%) EOS
0x1389…138c 1750 RETURN 1 EOS
0x138c…138d 1760 FNEND
0x138d…13d3 3015 REM - M A I N P R O G R A M *
0x13d3…13d7 3065 REM
0x13d7…13e2 3070 LET var(X%) COMMA = ( 1 3 1 ) var(FNC%) EOS
0x13e2…13e4 3075 PRINT EOS
0x13e4…1404 3077 PRINT = ( 30 ) → b5f270164d204120502044204120542020202050204c204f2054f3
0x1404…1406 3078 PRINT EOS
0x1406…1440 3080 PRINT = ( 16 ) → b5f270302a2a2a2a2a2a2a202020202a2a2a2a2a2a2020202a2a2a2a2a2a2a202020202a2a2a2a2a2a2020202a2020202020202af3
0x1440…147a 3090 PRINT = ( 16 ) → b5f270302a2020202020202a20202a2020202020202a20202a2020202020202a20202a2020202020202a20202a2a202020202a2af3
0x147a…14b4 3100 PRINT = ( 16 ) → b5f270302a2020202020202a20202a2020202020202a20202a2020202020202a20202a2020202020202a20202a202a20202a202af3
0x14b4…14ee 3110 PRINT = ( 16 ) → b5f270302a2a2a2a2a2a2a2020202a2a2a2a2a2a2a2a20202a2a2a2a2a2a2a2020202a2a2a2a2a2a2a2a20202a20202a2a20202af3
0x14ee…1528 3120 PRINT = ( 16 ) → b5f270302a2020202020202020202a2020202020202a20202a202020202a202020202a2020202020202a20202a2020202020202af3
0x1528…1562 3130 PRINT = ( 16 ) → b5f270302a2020202020202020202a2020202020202a20202a20202020202a2020202a2020202020202a20202a2020202020202af3
0x1562…159c 3140 PRINT = ( 16 ) → b5f270302a2020202020202020202a2020202020202a20202a2020202020202a20202a2020202020202a20202a2020202020202af3
0x159c…159e 3150 PRINT EOS
0x159e…15a0 3160 PRINT EOS
0x15a0…15ce 3170 PRINT = ( 22 ) → b5f27024526567697374726572696e672f656469746572696e6720617620706172616d6574657265f3
0x15ce…15d0 3180 PRINT EOS
0x15d0…15f5 3190 PRINT = ( 26 ) → b5f2701b5620492041204b20204420412054204120202052454c2e20322e31f3
0x15f5…15f9 3250 REM
0x15f9…1625 3255 REM -* PREPARE FOR "PLATE-PARAMETERE" **
0x1625…1629 3260 REM
0x1629…1631 3265 IF var(F6%) 1 EQ COMMA 1 var(N9%) var(A%)
0x1631…1635 3270 ELSE 1 16 var(A0x0b)
0x1635…1639 3295 REM
0x1639…167a 3300 REM -----------------------------------------------------------
0x167a…16b7 3305 REM -* RETURFLAGG FRA 4000 ; F0% = 0 : TAST INN PARAMETERE
0x16b7…16f3 3310 REM -* 1 : LES INN PARAMETERE
0x16f3…1734 3315 REM -----------------------------------------------------------
0x1734…1738 3316 REM
0x1738…1743 3320 IF ( var(F0%) var(F6%) OR ) → eff1011045
0x1743…1747 3340 ELSE 1 16 var(N9%)
0x1747…1766 3380 REM -* VERIFISER PLATEPARAM.
0x1766…1771 3385 LET var(X%) COMMA = ( 4 20 1 ) var(FNC%) EOS
0x1771…177c 3390 LET var(X%) COMMA = ( 3 20 20 ) var(FNC%) EOS
0x177c…1793 3400 INPUT »*** OK? (J/N) : « COMMA var(X$) EOS
0x1793…1797 3405 REM
0x1797…17d8 3410 REM -----------------------------------------------------------
0x17d8…17fd 3415 REM -* HVIS Y : PLATEPARAMETERE OK
0x17fd…1830 3420 REM -* HVIS N : RETTING AV ANGITT PLATEPARAMETER
0x1830…1871 3425 REM -----------------------------------------------------------
0x1871…187a 3430 IF var(X$) »N« EQ COMMA 34 EOS
0x187a…187d 3452 GOSUB 0 var(X%)
0x187d…1880 3465 GOTO → 8033
0x1880…1881 3470 DOEND
0x1881…1885 3480 REM
0x1885…18a7 3500 GOSUB 0 var(N1%) 32 32 42 42 32 32 var(P$) var(R$) var(X$) var(X$) 32 var(M%) var(X%) var(W$) var(F3%) var(F6%) var(X%) var(FNI%) var(T0$) var(F2%) var(P7$) 32 var(T0$) var(F2%) var(T0$) var(FNI%) 32 var(P7$) var(P6$) var(T0$) var(FNI%)
0x18a7…18ab 3505 REM
0x18ab…18cd 3520 GOSUB 0 var(FNX%) 32 32 42 42 32 32 var(P$) var(R$) var(X$) var(X$) 32 var(M%) var(X%) var(W$) var(F3%) var(F6%) var(X%) var(FNI%) var(T0$) var(F2%) var(P7$) 32 var(T$<2f53>) var(F6%) var(F1%) var(P7$) 32 var(P7$) var(P6$) var(T0$) var(FNI%)
0x18cd…18d1 3565 REM
0x18d1…18f3 3570 IF var(F6%) 1 EQ COMMA 0 var(FNX%) 50 32 32 42 42 32 32 var(F3%) var(P7$) var(FNI%) var(X%) var(F3%) 32 var(FNI%) var(T0$) var(X$) 32 var(N9%) var(X$) var(R$) var(FNI%) var(P7$) var(N9%) var(R$) var(F3%) var(R$) var(F1%)
0x18f3…18f7 3585 REM
0x18f7…18f9 3600 14f3
0x18f9…1904 3610 LET var(X%) COMMA = ( 1 5 5 ) var(FNC%) EOS
0x1904…1916 3620 PRINT »- Exit param -« EOS
0x1916…1917 3700 END
0x1917…1954 4010 REM -*************** SUBROUTINE PLATE-PARAM *************
0x1954…1958 4025 REM
0x1958…1979 4040 LET var(I%) COMMA = var(FNI%) EOS 32 32 45 45 45 45 45 45 45 45 32 32 var(F6%) var(N9%) var(P7$) var(F2%) 32 var(T0$) var(F2%) var(N9%) var(X%) var(FNI%) 45 var(P8$) var(T0$) var(X$) var(P7$)
0x1979…197e 4045 LET var(F0%) COMMA var(I%) EOS
0x197e…19b6 4050 REM -* SKRIVER LEDETEKST FOR INPUT AV PLATEPARAMETERE
0x19b6…19c1 4060 LET var(X%) COMMA = ( 1 1 1 ) var(FNC%) EOS
0x19c1…19c3 4070 PRINT EOS
0x19c3…1a04 4080 PRINT = ( 10 ) → b5f2703744204520462049204e204520522049204e20472020412056202050204c2041205420452050204120522041204d20452054204520522045f3
0x1a04…1a45 4090 PRINT = ( 10 ) → b5f270373d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3df3
0x1a45…1a47 4110 PRINT EOS
0x1a47…1a60 4160 PRINT = ( 10 ) → b5f2700f312e202052616d6d6576616c67203af3
0x1a60…1a62 4165 PRINT EOS
0x1a62…1a95 4170 PRINT = ( 10 ) → b5f270292020202052616d6d652f5574656e2072616d6d65202d204465662e3a52616d6d652028522f55293a20f3
0x1a95…1a97 4180 PRINT EOS
0x1a97…1a99 4190 PRINT EOS
0x1a99…1ac1 4200 PRINT = ( 10 ) → b5f2701e322e2020527574656e657474736b72797373657473206c656e676465203af3
0x1ac1…1ac3 4205 PRINT EOS
0x1ac3…1af6 4210 PRINT = ( 10 ) → b5f27029202020202839393d496e74657429204465662e3a48656c7472756b6b657420286d6d2f435229203a20f3
0x1af6…1af8 4220 PRINT EOS
0x1af8…1afa 4230 PRINT EOS
0x1afa…1b11 4240 PRINT = ( 10 ) → b5f2700d332e20204d65726b696e67203af3
0x1b11…1b13 4245 PRINT EOS
0x1b13…1b46 4250 PRINT = ( 10 ) → b5f27029202020204d656420656c6c6572207574656e202d204465662e3a4d656420202020284d2f5529203a20f3
0x1b46…1b48 4290 RETURN EOS
0x1b48…1b4e 4500 REM C
0x1b4e…1b81 4510 REM SUBROUTINE TAST PLATE-PARAM RETURFLAGG: F1%
0x1b81…1b85 4530 REM
0x1b85…1bc2 4670 REM ---------------- PLATEPARAM. 1 ----------------------
0x1bc2…1bcd 4678 LET var(X%) COMMA = ( 3 7 52 ) var(FNC%) EOS
0x1bcd…1bd3 4690 INPUT »« COMMA var(X$) EOS
0x1bd3…1be3 4710 IF = ( var(X$) ) LEN 0 EQ COMMA 27 var(X$) COMMA »R« EOS
0x1be3…1bf3 4720 IF var(X$) »R« <> var(X$) »U« <> AND COMMA 0 »\x1bD\xf1L\xf3\x1bU\xf1qs\x03\x074tV\xf3\x03Dp«soh»R\xe7\xf1«si»p\x05RAMME\xf3\x04«si»p
Uten ramme\xf3\x03M«soh»\xe7\xf1\x00PI\x0bp: ----------«
0x1bf3…1bf8 4730 LET var(P6$) COMMA var(X$) EOS
0x1bf8…1c03 4735 LET var(X%) COMMA = ( 3 7 52 ) var(FNC%) EOS
0x1c03…1c13 4740 IF var(P6$) »R« EQ COMMA 15 »RAMME« EOS
0x1c13…1c22 4750 ELSE 15 »Uten ramme« EOS
0x1c22…1c2a 4792 IF var(F1%) 1 EQ COMMA 0 var(N9%) var(T0$)
0x1c2a…1c67 4795 REM ---------------- PLATEPARAM. 2 ----------------------
0x1c67…1c72 4798 LET var(X%) COMMA = ( 3 12 52 ) var(FNC%) EOS
0x1c72…1c76 4800 TRAP ERR 4795
0x1c76…1c7c 4805 INPUT »« COMMA var(X$) EOS
0x1c7c…1c90 4815 IF var(X$) »0« EQ var(X$) »« EQ OR COMMA 27 var(X$) COMMA »00« EOS
0x1c90…1c9d 4820 LET var(X%) COMMA = ( = ( var(X$) ) VAL ) → a1f3
0x1c9d…1cab 4825 IF var(X%) 0 ?< var(X%) %99 > OR COMMA 0 → 9547
0x1cab…1cb6 4828 LET var(X%) COMMA = ( 3 12 52 ) var(FNC%) EOS
0x1cb6…1cbb 4830 LET var(P7$) COMMA var(X$) EOS
0x1cbb…1cd1 4835 IF var(P7$) »00« EQ COMMA 15 »HELTRUKKET« EOS
0x1cd1…1ce3 4836 ELSE 3 var(P7$) »99« EQ COMMA 15 »INTET« EOS
0x1ce3…1ce7 4840 ELSE 15 var(P7$) EOS
0x1ce7…1cea 4850 TRAP ERR OFF
0x1cea…1cf2 4855 IF var(F1%) 1 EQ COMMA 0 var(N9%) var(T0$)
0x1cf2…1d2f 4860 REM ---------------- PLATEPARAM. 3 ----------------------
0x1d2f…1d3a 4863 LET var(X%) COMMA = ( 3 17 52 ) var(FNC%) EOS
0x1d3a…1d40 4870 INPUT »« COMMA var(X$) EOS
0x1d40…1d4d 4880 IF var(X$) »« EQ COMMA 27 var(X$) COMMA »M« EOS
0x1d4d…1d5d 4890 IF var(X$) »M« <> var(X$) »U« <> AND COMMA 0 var(N1%) var(T$<2f53>)
0x1d5d…1d68 4895 LET var(X%) COMMA = ( 3 17 52 ) var(FNC%) EOS
0x1d68…1d6d 4900 LET var(P8$) COMMA var(X$) EOS
0x1d6d…1d83 4905 IF var(P8$) »M« EQ COMMA 15 »MED MERKING« EOS
0x1d83…1d94 4910 ELSE 15 »Uten merking« EOS
0x1d94…1d9c 4940 IF var(F1%) 1 EQ COMMA 0 var(N9%) var(T0$)
0x1d9c…1dc3 4950 REM ---------------- KODE PLATEPARAM
0x1dc3…1dce 4960 LET var(P$) COMMA ELEMENT var(T9$) ( 1 9 ) [] EOS
0x1dce…1dd9 4965 LET ELEMENT var(P$) ( 1 1 ) [] COMMA var(P6$) EOS
0x1dd9…1de4 4970 LET ELEMENT var(P$) ( 2 3 ) [] COMMA var(P7$) EOS
0x1de4…1def 4980 LET ELEMENT var(P$) ( 4 4 ) [] COMMA var(P8$) EOS
0x1def…1df1 4990 RETURN EOS
0x1df1…1e2c 5010 REM -*************** SUBROUTINE LES OG DEKODE PLATEPARAM
0x1e2c…1e30 5030 REM
0x1e30…1e38 5040 IF var(F6%) 1 EQ COMMA 0 16 var(M9%)
0x1e38…1e3e 5050 LINPUT 1# SEMI var(P$) EOS
0x1e3e…1e49 5110 LET var(P6$) COMMA ELEMENT var(P$) ( 1 1 ) [] EOS
0x1e49…1e54 5120 LET var(P7$) COMMA ELEMENT var(P$) ( 2 3 ) [] EOS
0x1e54…1e5f 5130 LET var(P8$) COMMA ELEMENT var(P$) ( 4 4 ) [] EOS
0x1e5f…1e62 5135 GOSUB → 9251
0x1e62…1e64 5140 RETURN EOS
0x1e64…1ea0 5192 REM -*************** SUBROUTINE PRINT PLATE-PARAM ******
0x1ea0…1ea4 5195 REM
0x1ea4…1eaf 5250 LET var(X%) COMMA = ( 2 7 52 ) var(FNC%) EOS
0x1eaf…1ec3 5260 IF var(P6$) »R« EQ COMMA 15 »MED RAMME« EOS
0x1ec3…1ed2 5270 ELSE 15 »Uten ramme« EOS
0x1ed2…1edd 5300 LET var(X%) COMMA = ( 2 12 52 ) var(FNC%) EOS
0x1edd…1ef3 5310 IF var(P7$) »00« EQ COMMA 15 »HELTRUKKET« EOS
0x1ef3…1ef7 5320 ELSE 15 var(P7$) EOS
0x1ef7…1f02 5350 LET var(X%) COMMA = ( 2 17 52 ) var(FNC%) EOS
0x1f02…1f18 5360 IF var(P8$) »M« EQ COMMA 15 »MED MERKING« EOS
0x1f18…1f29 5370 ELSE 15 »Uten merking« EOS
0x1f29…1f2b 5400 RETURN EOS
0x1f2b…1f66 5500 REM ------------------ RETT PLATEPARAMETRE----------------
0x1f66…1f6b 5525 LET var(F1%) COMMA 1 EOS
0x1f6b…1f76 5530 LET var(X%) COMMA = ( 3 21 10 ) var(FNC%) EOS
0x1f76…1f7a 5535 TRAP ERR 5500
0x1f7a…1fa4 5540 INPUT » *** Rett parameter nr. : « COMMA var(B1%) EOS
0x1fa4…1fa7 5541 TRAP ERR OFF
0x1fa7…1fb3 5542 IF var(B1%) 1 ?< var(B1%) 3 > OR COMMA 0 0 var(X%)
0x1fb3…1fbe 5550 ON var(B1%) COMMA 0 »\x95G`H\xf3\x05\xf3\x0bp= -*********************************************************«
0x1fbe…1fc0 5570 RETURN EOS
0x1fc0…2000 6000 REM -*********************************************************
0x2000…201a 6010 REM SUBROUTINE INIT EDIT
0x201a…205a 6020 REM -*********************************************************
0x205a…205e 6030 REM
0x205e…2063 6035 LET var(N1%) COMMA 1 EOS
0x2063…206e 6040 LET var(X%) COMMA = ( 1 1 1 ) var(FNC%) EOS
0x206e…2083 6043 REM -* PRINT GUIDE
0x2083…2086 6044 GOSUB var(N9%) var(FND%)
0x2086…209d 6045 REM -* PRINT HEADING
0x209d…20a8 6048 LET var(X%) COMMA = ( 2 1 1 ) var(FNC%) EOS
0x20a8…20b0 6050 PRINT » *« EOS
0x20b0…20b2 6060 PRINT EOS
0x20b2…20e4 6070 PRINT » ........ . ............................« EOS
0x20e4…2108 6100 REM -* SJEKK ARRAY, PRINT 1. SIDE
0x2108…210f 6110 IF var(F2%) 0 EQ COMMA 34 EOS
0x210f…211a 6115 LET var(X%) COMMA = ( 2 1 10 ) var(FNC%) EOS
0x211a…212a 6120 PRINT »-- Vent --« EOS
0x212a…2155 6125 LET var(X%) COMMA = var(FNT%) EOS 32 32 45 45 45 45 45 45 45 45 45 45 45 45 45 45 45 45 45 45 45 45 32 32 var(T0$) var(F2%) var(T0$) var(FNI%) 32 var(R$) var(F3%) var(F3%) var(R$) var(FNO%) 32 var(FNI%) 36
0x2155…2183 6130 IF var(F0%) 1 EQ COMMA 27 var(M%) COMMA = var(FNR%) EOS 32 32 45 45 45 45 45 45 32 32 var(P6$) var(R$) var(FNI%) var(R$) 32 var(FNI%) var(T0$) var(X$) 32 var(R$) var(F3%) var(F3%) var(R$) var(FNO%) 32 var(FNI%) 36 32 var(P8$) var(F3%) var(R$) 32 var(P8$) var(T0$) var(X$)
0x2183…2188 6135 LET var(F2%) COMMA 1 EOS
0x2188…2189 6145 DOEND
0x2189…2193 6150 LET var(X%) COMMA = ( var(N1%) var(M%) ) var(FNL%) EOS
0x2193…21aa 6260 REM -* INIT VARIABLE
0x21aa…21d4 6270 LET var(F6%) COMMA 0 EOS 32 32 42 42 32 32 var(P8$) var(X$) var(R$) var(K1$) var(K1$) 32 var(P8$) var(F6%) var(F3%) 32 var(F3%) var(P7$) var(FNI%) var(X%) var(F3%) 32 var(FNI%) var(T0$) var(X$) 32 var(N9%) var(X$) var(R$) var(FNI%) var(P7$) var(N9%) var(R$) var(F3%) var(R$) var(F1%) 46
0x21d4…21ec 6300 REM -* RETURN TO MAIN
0x21ec…21f7 6310 LET var(X%) COMMA = ( 3 1 10 ) var(FNC%) EOS
0x21f7…21f9 6320 RETURN EOS
0x21f9…2238 6350 REM -********************************************************
0x2238…223c 6355 REM
0x223c…2258 6360 REM SUBROUTINE PRINT GUIDE
0x2258…225c 6365 REM
0x225c…229b 6370 REM -********************************************************
0x229b…229f 6375 REM
0x229f…22aa 6380 LET var(X%) COMMA = ( 2 1 1 ) var(FNC%) EOS
0x22aa…22ac 6385 PRINT EOS
0x22ac…22d0 6390 PRINT = ( 47 ) → b5f2701a202f2020202020202020202d2d20472055204920442045202d2df3
0x22d0…22fb 6395 PRINT = ( 47 ) → b5f27021202f203d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3d3df3
0x22fb…231e 6410 PRINT = ( 47 ) → b5f27019202f204b3a20506172616d3a2020202046756e6b736a6f6e3af3
0x231e…2349 6411 PRINT = ( 47 ) → b5f27021202f202d2d2d2d2d2d2d2d2d2d2d2d2d2d2d2d2d2d2d2d2d2d2d2d2d2d2d2d2d2df3
0x2349…236f 6415 PRINT = ( 47 ) → b5f2701c202f2046202020202020202020202d204c69737420312e2073696465f3
0x236f…2398 6420 PRINT = ( 47 ) → b5f2701f202f204e202020202020202020202d204c697374206e657374652073696465f3
0x2398…23c3 6425 PRINT = ( 47 ) → b5f27021202f2050202020202020202020202d204c69737420666f72726967652073696465f3
0x23c3…23ec 6430 PRINT = ( 47 ) → b5f2701f202f204c202020202020202020202d204c6973742073697374652073696465f3
0x23ec…2414 6435 PRINT = ( 47 ) → b5f2701e202f202b202020202020202020202d204c697374206e657374652066656df3
0x2414…243e 6440 PRINT = ( 47 ) → b5f27020202f202d202020202020202020202d204c69737420666f72726967652066656df3
0x243e…2466 6445 PRINT = ( 47 ) → b5f2701e202f2045202046726120202020202d205365747420656469742d6d6f6465f3
0x2466…248c 6450 PRINT = ( 47 ) → b5f2701c202f204420204672612c54696c202d20536c657474206c696e6a6572f3
0x248c…24b6 6455 PRINT = ( 47 ) → b5f27020202f20492020466f72616e2020202d204c656767206c696e6a6520666f72616ef3
0x24b6…24dd 6460 PRINT = ( 47 ) → b5f2701d202f2057202046696c6e61766e202d20536b7269762074696c2066696cf3
0x24dd…2506 6465 PRINT = ( 47 ) → b5f2701f202f2058202020202020202020202d204e61766e676920696e70757466696cf3
0x2506…252a 6470 PRINT = ( 47 ) → b5f2701a202f2051202020202020202020202d204578697420506172616df3
0x252a…2553 6475 PRINT = ( 47 ) → b5f2701f202f2052202020202020202020202d20506c617465706172616d6574657265f3
0x2553…255f 6480 PRINT = ( 47 ) → b5f27002202ff3
0x255f…2588 6485 PRINT = ( 47 ) → b5f2701f202f2045534320202020202020202d204578697420456469742d6d6f64652ff3
0x2588…25b2 6490 PRINT = ( 47 ) → b5f27020202f202020202020202020202020202041626f72746572206b6f6d6d616e646ff3
0x25b2…25dc 6495 PRINT = ( 47 ) → b5f27020202f204374726c204820202020202d20536c657474207369737465207465676ef3
0x25dc…25de 6497 RETURN EOS
0x25de…261a 6500 REM -------------------------------------------------------
0x261a…2620 6505 REM
0x2620…263a 6510 REM SUBROUTINE HOME EDIT
0x263a…263e 6515 REM
0x263e…267a 6520 REM -------------------------------------------------------
0x267a…267f 6530 LET var(F8%) COMMA 1 EOS
0x267f…2690 6540 REM NEXT COMMAND
0x2690…2693 6542 TRAP ERR OFF
0x2693…2697 6545 TRAP 3 6600
0x2697…26a2 6550 LET var(X%) COMMA = ( 2 1 5 ) var(FNC%) EOS
0x26a2…26a8 6600 LET var(K1$) COMMA = → b8f3
0x26a8…26b3 6602 LET var(X%) COMMA = ( 3 1 5 ) var(FNC%) EOS
0x26b3…26bd 6605 IF var(K1$) »F« EQ COMMA 1 0 »\x03Gp«soh»«
0x26bd…26c8 6610 ELSE 3 var(K1$) »N« EQ COMMA 1 0 »\x03Gp«soh»«
0x26c8…26d3 6615 ELSE 3 var(K1$) »P« EQ COMMA 1 var(N1%) =
0x26d3…26de 6620 ELSE 3 var(K1$) »L« EQ COMMA 1 32 ELEMENT
0x26de…26e9 6625 ELSE 3 var(K1$) »+« EQ COMMA 1 USING ELEMENT
0x26e9…26f4 6630 ELSE 3 var(K1$) »-« EQ COMMA 1 16 (
0x26f4…26ff 6635 ELSE 3 var(K1$) »E« EQ COMMA 1 0 → 77
0x26ff…270a 6640 ELSE 3 var(K1$) »D« EQ COMMA 1 USING (
0x270a…2715 6645 ELSE 3 var(K1$) »I« EQ COMMA 1 var(N9%) USING
0x2715…2720 6650 ELSE 3 var(K1$) »W« EQ COMMA 1 0 → 86
0x2720…272e 6655 ELSE 3 var(K1$) »X« EQ COMMA 27 var(X%) COMMA = var(FNX%) EOS
0x272e…2739 6660 ELSE 3 var(K1$) »Q« EQ COMMA 0 var(N1%) var(F0%)
0x2739…2744 6665 ELSE 3 var(K1$) »R« EQ COMMA 0 → 8067
0x2744…2747 6670 GOTO var(A0x65)
0x2747…274d 6760 REM C
0x274d…2753 6762 LET var(F8%) COMMA var(F8%) → eff3
0x2753…275c 6764 IF var(F8%) COMMA 27 var(X%) COMMA = var(FNQ%) EOS
0x275c…275f 6766 ELSE 5 EOS
0x275f…2762 6779 GOTO var(A0x65)
0x2762…277c 6780 REM -- NYE ramme paramtre
0x277c…2781 6785 LET var(F6%) COMMA 1 EOS
0x2781…2783 6990 RETURN EOS
0x2783…2794 7000 REM ------------
0x2794…2799 7060 LET var(N1%) COMMA 1 EOS
0x2799…27a3 7070 LET var(X%) COMMA = ( var(N1%) var(M%) ) var(FNL%) EOS
0x27a3…27a5 7090 RETURN EOS
0x27a5…27ad 7100 REM ---
0x27ad…27b4 7110 LET var(N1%) COMMA var(N1%) var(N9%) PLUS EOS
0x27b4…27c4 7120 IF ( var(N1%) var(N9%) PLUS ) var(M%) > COMMA 27 var(N1%) COMMA var(M%) var(N9%) SUB2 EOS
0x27c4…27ce 7125 IF var(N1%) 1 ?< COMMA 27 var(N1%) COMMA 1 EOS
0x27ce…27d8 7130 LET var(X%) COMMA = ( var(N1%) var(M%) ) var(FNL%) EOS
0x27d8…27da 7150 RETURN EOS
0x27da…27e3 7160 REM ----
0x27e3…27ea 7170 LET var(N1%) COMMA var(N1%) var(N9%) SUB2 EOS
0x27ea…27f4 7180 IF var(N1%) 1 ?< COMMA 27 var(N1%) COMMA 1 EOS
0x27f4…27fe 7190 LET var(X%) COMMA = ( var(N1%) var(M%) ) var(FNL%) EOS
0x27fe…2800 7210 RETURN EOS
0x2800…280d 7220 REM --------
0x280d…2818 7230 LET var(N1%) COMMA var(M%) ( var(N9%) 1 SUB2 ) SUB2 EOS
0x2818…2822 7240 IF var(N1%) 1 ?< COMMA 27 var(N1%) COMMA 1 EOS
0x2822…282c 7250 LET var(X%) COMMA = ( var(N1%) var(M%) ) var(FNL%) EOS
0x282c…282e 7270 RETURN EOS
0x282e…283a 7275 REM -------
0x283a…2841 7280 LET var(N1%) COMMA var(N1%) 5 PLUS EOS
0x2841…284b 7285 IF var(N1%) var(M%) > COMMA 27 var(N1%) COMMA var(M%) EOS
0x284b…2855 7290 LET var(X%) COMMA = ( var(N1%) var(M%) ) var(FNL%) EOS
0x2855…2857 7300 RETURN EOS
0x2857…2861 7310 REM -----
0x2861…2868 7315 LET var(N1%) COMMA var(N1%) 5 SUB2 EOS
0x2868…2872 7320 IF var(N1%) 1 ?< COMMA 27 var(N1%) COMMA 1 EOS
0x2872…287c 7325 LET var(X%) COMMA = ( var(N1%) var(M%) ) var(FNL%) EOS
0x287c…287e 7370 RETURN EOS
0x287e…28bc 7375 REM ---------------------------------------------------------
0x28bc…28c0 7376 REM
0x28c0…28d7 7377 REM SUBROUTINE DELETE
0x28d7…28db 7378 REM
0x28db…2918 7379 REM --------------------------------------------------------
0x2918…291d 7380 LET var(F8%) COMMA 0 EOS
0x291d…2921 7390 TRAP ERR 7515
0x2921…2925 7393 TRAP ESC 7515
0x2925…2945 7395 INPUT »Slett - Fra,Til : « COMMA var(K1%) var(K2%) EOS
0x2945…294d 7405 IF var(K1%) var(K2%) > COMMA 0 → 8073
0x294d…2955 7406 IF var(K1%) var(M%) > COMMA 0 → 8073
0x2955…295f 7408 IF var(K2%) var(M%) > COMMA 27 var(K2%) COMMA var(M%) EOS
0x295f…2967 7410 IF var(K2%) var(M%) → ebf1005074
0x2967…296e 7415 LET var(I1%) COMMA var(M%) var(K2%) SUB2 EOS
0x296e…2974 7420 195d01f161f3
0x2974…298b 7425 LET ELEMENT var(T$<2f53>) ( var(K1%) ( var(I%) 1 SUB2 ) PLUS ) [] COMMA ELEMENT var(T$<2f53>) ( var(K2%) var(I%) PLUS ) [] EOS
0x298b…298e 7430 1a5df3
0x298e…2999 7450 LET var(J1%) COMMA ( var(K2%) var(K1%) SUB2 ) 1 PLUS EOS
0x2999…299f 7455 196d01f16cf3
0x299f…29af 7460 LET ELEMENT var(T$<2f53>) ( var(M%) ( var(J1%) var(J%) SUB2 ) SUB2 ) [] COMMA var(T9$) EOS
0x29af…29b2 7465 1a6df3
0x29b2…29b9 7467 LET var(M%) COMMA var(M%) var(J1%) SUB2 EOS
0x29b9…29c0 7470 IF var(K1%) var(N1%) ?< COMMA 34 EOS
0x29c0…29c7 7475 LET var(N1%) COMMA var(N1%) var(J1%) SUB2 EOS
0x29c7…29d1 7480 LET var(X%) COMMA = ( var(N1%) var(M%) ) var(FNL%) EOS
0x29d1…29d2 7485 DOEND
0x29d2…29d5 7490 ELSE 34 EOS
0x29d5…29e2 7495 IF var(K1%) var(N1%) → eb6a6050e2e8edf122f3
0x29e2…29ec 7500 LET var(X%) COMMA = ( var(N1%) var(M%) ) var(FNL%) EOS
0x29ec…29ed 7505 DOEND
0x29ed…29ee 7510 DOEND
0x29ee…29f1 7512 TRAP ESC OFF
0x29f1…29f4 7515 TRAP ERR OFF
0x29f4…29f6 7520 RETURN EOS
0x29f6…2a27 7550 REM -------------- INSERT LINE -----------------
0x2a27…2a2b 7565 TRAP ERR 7690
0x2a2b…2a2f 7570 TRAP ESC 7690
0x2a2f…2a4a 7580 INPUT »Insert linje foran : « COMMA var(K1%) EOS
0x2a4a…2a52 7600 IF var(K1%) var(M%) > COMMA 0 → 9076
0x2a52…2a57 7602 LET var(F8%) COMMA 0 EOS
0x2a57…2a61 7605 IF var(K1%) 1 ?< COMMA 27 var(K1%) COMMA 1 EOS
0x2a61…2a71 7610 195d53f16af16e8100000000000081f3
0x2a71…2a82 7615 LET ELEMENT var(T$<2f53>) ( var(I%) 1 PLUS ) [] COMMA ELEMENT var(T$<2f53>) ( var(I%) ) [] EOS
0x2a82…2a85 7620 1a5df3
0x2a85…2a8f 7625 LET ELEMENT var(T$<2f53>) ( var(K1%) ) [] COMMA var(T9$) EOS
0x2a8f…2a96 7630 IF var(K1%) var(N1%) ?< COMMA 34 EOS
0x2a96…2a9b 7635 LET var(N1%) COMMA var(K1%) EOS
0x2a9b…2aa5 7640 LET var(X%) COMMA = ( var(N1%) var(M%) ) var(FNL%) EOS
0x2aa5…2aa6 7645 DOEND
0x2aa6…2aa9 7650 ELSE 34 EOS
0x2aa9…2ab6 7655 IF var(K1%) var(N1%) → eb6a6050e2e8edf122f3
0x2ab6…2ac0 7660 LET var(X%) COMMA = ( var(N1%) var(M%) ) var(FNL%) EOS
0x2ac0…2ac1 7665 DOEND
0x2ac1…2ac2 7670 DOEND
0x2ac2…2ac9 7675 LET var(M%) COMMA var(M%) 1 PLUS EOS
0x2ac9…2ad8 7680 LET var(F3%) COMMA 1 COMMA var(F4%) COMMA 0 COMMA var(F5%) COMMA 1 EOS
0x2ad8…2adb 7685 GOSUB 0 → 77
0x2adb…2ae5 7686 LET var(F3%) COMMA 0 COMMA var(F5%) COMMA 0 EOS
0x2ae5…2ae9 7690 REM
0x2ae9…2aec 7691 TRAP ESC OFF
0x2aec…2aef 7692 TRAP ERR OFF
0x2aef…2af1 7695 RETURN EOS
0x2af1…2b23 7700 REM ------------------ EDIT ---------------------
0x2b23…2b28 7704 LET var(F8%) COMMA 0 EOS
0x2b28…2b2e 7705 REM C
0x2b2e…2b36 7706 IF var(F3%) 1 EQ COMMA 0 var(E%) → 77
0x2b36…2b6b 7707 LET var(F3%) COMMA 0 COMMA var(F4%) COMMA 0 COMMA var(F5%) COMMA 0 EOS 32 var(P8$) 51 37 58 32 var(T0$) var(F2%) var(M%) var(P7$) var(F3%) var(FNI%) 44 32 var(P8$) 52 37 58 32 var(F1%) var(P7$) var(M%) var(M%) 44 32 var(P8$) 53 37 58 32 var(F2%) var(FNO%) 32 var(X$) var(T0$) var(F2%) var(T9$) var(P7$)
0x2b6b…2b6f 7715 TRAP ERR 8505
0x2b6f…2b73 7720 TRAP ERR 8505
0x2b73…2b8a 7725 INPUT »Edit fra linje : « COMMA var(K1%) EOS
0x2b8a…2b94 7729 IF var(K1%) 1 ?< COMMA 27 var(K1%) COMMA 1 EOS
0x2b94…2b9b 7730 IF var(K1%) var(M%) > COMMA 34 EOS
0x2b9b…2ba2 7733 LET var(K1%) COMMA var(M%) 1 PLUS EOS
0x2ba2…2ba8 7735 LET var(F5%) COMMA 1 EOS
0x2ba8…2ba9 7737 DOEND
0x2ba9…2bbe 7740 ELSE 27 var(F4%) COMMA ELEMENT var(T$<2f53>) ( var(K1%) 1 4 ) [] »MESS« EQ EOS
0x2bbe…2bcb 7745 IF var(K1%) var(N1%) ?< var(K1%) var(N1%) var(N9%) PLUS > OR COMMA 34 EOS
0x2bcb…2bd0 7750 LET var(N1%) COMMA var(K1%) EOS
0x2bd0…2bda 7753 LET var(X%) COMMA = ( var(N1%) var(M%) ) var(FNL%) EOS
0x2bda…2bdb 7755 DOEND
0x2bdb…2be7 7758 LET var(N2%) COMMA ( var(K1%) var(N1%) SUB2 ) 4 PLUS EOS
0x2be7…2bf0 7760 LET var(N2%) COMMA var(N2%) 1 PLUS EOS
0x2bf0…2bfc 7761 IF var(N2%) ( var(N9%) 4 PLUS ) > COMMA 34 EOS
0x2bfc…2c03 7762 LET var(N1%) COMMA var(N1%) 10 PLUS EOS
0x2c03…2c0d 7763 LET var(X%) COMMA = ( var(N1%) var(M%) ) var(FNL%) EOS
0x2c0d…2c16 7764 LET var(N2%) COMMA var(N2%) 10 SUB2 EOS
0x2c16…2c17 7765 DOEND
0x2c17…2c1a 7766 GOTO → 8577
0x2c1a…2c49 7767 REM ----------------------------- INPUT TEMA
0x2c49…2c4f 7770 LET var(X%) COMMA = var(FNB%) EOS
0x2c4f…2c55 7775 LET var(F4%) COMMA 0 EOS
0x2c55…2c66 7780 LET ELEMENT var(T0$) ( 1 40 ) [] COMMA ELEMENT var(T9$) ( 1 40 ) [] EOS
0x2c66…2c72 7782 LET var(X%) COMMA = ( 2 var(N2%) 7 ) var(FNC%) EOS
0x2c72…2c80 7783 PRINT » « EOS
0x2c80…2c8c 7785 LET var(X%) COMMA = ( 2 var(N2%) 7 ) var(FNC%) EOS
0x2c8c…2c90 7790 TRAP ERR 7770
0x2c90…2c94 7792 TRAP ESC 8400
0x2c94…2c9a 7795 INPUT »« COMMA var(T0$) EOS
0x2c9a…2c9d 7796 TRAP ERR OFF
0x2c9d…2ca5 7800 IF var(T0$) »« EQ COMMA 34 EOS
0x2ca5…2cae 7802 IF var(F5%) 0 EQ COMMA 0 var(N9%) → 78
0x2cae…2cb1 7804 GOTO »\x08\x03qsIt\xab\x08\xea\xf1\x00pw\x03Ip\x04MESS\xe7\xf1"\xf3\x1b@\x00\xf1«soh»\xf3\x1brHsj«soh»\x08t\x9f\xf1p\x08MESS \xf3\x08\x04"\xf3\x1bU\xf1qsIt\xab\xf3\x03U\x08\xe8\xf1\x1brHsj«soh»\x08t\x9f\xf1rJs«soh»s\x08U\xe3tt\x9fI\xe2\xf3\x04\x1brHsj«soh»\x08t\x9f\xf1I\xf3\x08\x1bU\xf1qs\x02@\x02\x07tV«
0x2cb1…2cb2 7805 DOEND
0x2cb2…2cbe 7810 IF = ( var(T0$) ) LEN 8 > COMMA 0 »\x03Ip\x04MESS\xe7\xf1"\xf3\x1b@\x00\xf1«soh»\xf3\x1brHsj«soh»\x08t\x9f\xf1p\x08MESS \xf3\x08\x04"\xf3\x1bU\xf1qsIt\xab\xf3\x03U\x08\xe8\xf1\x1brHsj«soh»\x08t\x9f\xf1rJs«soh»s\x08U\xe3tt\x9fI\xe2\xf3\x04\x1brHsj«soh»\x08t\x9f\xf1I\xf3\x08\x1bU\xf1qs\x02@\x02\x07tV\xf3«si»rHsj«soh»
t\x9f\xf2\xf3\x00«
0x2cbe…2cca 7812 IF var(T0$) »MESS« EQ COMMA 34 EOS
0x2cca…2cd0 7813 LET var(F4%) COMMA 1 EOS
0x2cd0…2ce5 7814 LET ELEMENT var(T$<2f53>) ( var(K1%) 1 8 ) [] COMMA »MESS « EOS
0x2ce5…2ce6 7815 DOEND
0x2ce6…2ce9 7816 ELSE 34 EOS
0x2ce9…2cf2 7817 LET var(X%) COMMA = ( var(T0$) ) LEN EOS
0x2cf2…2d0f 7818 IF var(X%) 8 ?< COMMA 27 ELEMENT var(T$<2f53>) ( var(K1%) 1 8 ) [] COMMA ELEMENT var(T9$) ( 1 ( 8 var(X%) SUB2 ) ) [] var(T0$) PLUS EOS
0x2d0f…2d1c 7819 ELSE 27 ELEMENT var(T$<2f53>) ( var(K1%) 1 8 ) [] COMMA var(T0$) EOS
0x2d1c…2d1d 7820 DOEND
0x2d1d…2d29 7826 LET var(X%) COMMA = ( 2 var(N2%) 7 ) var(FNC%) EOS
0x2d29…2d34 7827 PRINT ELEMENT var(T$<2f53>) ( var(K1%) 1 10 ) [] SEMI EOS
0x2d34…2d37 7828 GOTO var(N9%) → 78
0x2d37…2d64 7830 REM ---------------------------- INPUT KEY
0x2d64…2d6a 7835 LET var(X%) COMMA = var(FNB%) EOS
0x2d6a…2d6f 7840 LET var(T0$) COMMA var(T9$) EOS
0x2d6f…2d7b 7843 LET var(X%) COMMA = ( 2 var(N2%) 17 ) var(FNC%) EOS
0x2d7b…2d81 7846 PRINT » « EOS
0x2d81…2d8d 7850 LET var(X%) COMMA = ( 2 var(N2%) 17 ) var(FNC%) EOS
0x2d8d…2d91 7855 TRAP ERR 7835
0x2d91…2d97 7860 INPUT »« COMMA var(T0$) EOS
0x2d97…2d9a 7861 TRAP ERR OFF
0x2d9a…2da2 7863 IF var(T0$) »« EQ COMMA 34 EOS
0x2da2…2dab 7865 IF var(F5%) 0 EQ COMMA 0 37 → 80
0x2dab…2db4 7867 IF var(F4%) 1 EQ COMMA 0 37 → 80
0x2db4…2db7 7868 GOTO 53 → 78
0x2db7…2db8 7869 DOEND
0x2db8…2dc4 7870 IF = ( var(T0$) ) LEN 1 > COMMA 0 53 → 78
0x2dc4…2dcc 7875 IF var(F4%) 0 EQ COMMA 34 EOS
0x2dcc…2ddc 7880 IF var(T0$) »L« EQ var(T0$) »P« EQ OR COMMA 0 var(N9%) → 79
0x2ddc…2ddf 7885 GOTO 53 → 78
0x2ddf…2de0 7907 DOEND
0x2de0…2de3 7910 ELSE 34 EOS
0x2de3…2def 7912 REM MESSAGE
0x2def…2e0b 7915 IF ELEMENT var(T0$) ( 1 1 ) [] » « <> ELEMENT var(T0$) ( 1 1 ) [] »H« <> AND COMMA 0 53 → 78
0x2e0b…2e0c 7945 DOEND
0x2e0c…2e18 7950 LET ELEMENT var(T$<2f53>) ( var(K1%) 11 11 ) [] COMMA var(T0$) EOS
0x2e18…2e1b 7955 GOTO 37 → 80
0x2e1b…2e4f 8000 REM --------------------------- INPUT PARAM/TEKST
0x2e4f…2e55 8005 LET var(X%) COMMA = var(FNB%) EOS
0x2e55…2e5a 8010 LET var(T0$) COMMA var(T9$) EOS
0x2e5a…2e66 8015 LET var(X%) COMMA = ( 2 var(N2%) 19 ) var(FNC%) EOS
0x2e66…2e86 8020 PRINT » « EOS
0x2e86…2e92 8025 LET var(X%) COMMA = ( 2 var(N2%) 19 ) var(FNC%) EOS
0x2e92…2e96 8030 TRAP ERR 8000
0x2e96…2e9c 8035 LINPUT »« COMMA var(T0$) EOS
0x2e9c…2e9f 8040 TRAP ERR OFF
0x2e9f…2ea7 8043 IF var(T0$) »« EQ COMMA 34 EOS
0x2ea7…2eb0 8044 IF var(F5%) 0 EQ COMMA 0 21 → 82
0x2eb0…2ec1 8045 IF ELEMENT var(T$<2f53>) ( var(K1%) 11 11 ) [] »P« EQ COMMA 0 0 → 82
0x2ec1…2eca 8047 IF var(F4%) 1 EQ COMMA 0 0 → 82
0x2eca…2ecd 8048 GOTO 0 → 80
0x2ecd…2ece 8049 DOEND
0x2ece…2eda 8050 IF = ( var(T0$) ) LEN 28 > COMMA 0 0 → 80
0x2eda…2ee3 8055 IF var(F4%) 1 EQ COMMA 0 0 → 82
0x2ee3…2ef1 8060 LET var(S$) COMMA var(T0$) » « PLUS EOS
0x2ef1…2f01 8065 IF ELEMENT var(T$<2f53>) ( var(K1%) 11 11 ) [] »L« EQ COMMA 34 EOS
0x2f01…2f25 8070 IF = ( ELEMENT var(S$) ( 1 1 ) [] ) → ac6f4100e87173724b730101749f74ac6f4300eaeef1000080
0x2f25…2f41 8075 IF ELEMENT var(S$) ( 2 3 ) [] » « EQ COMMA 27 ELEMENT var(S$) ( 2 3 ) [] COMMA »00« EOS
0x2f41…2f50 8080 LET var(X%) COMMA = ( ELEMENT var(S$) ( 2 3 ) [] ) VAL EOS
0x2f50…2f64 8085 IF ELEMENT var(S$) ( 1 1 ) [] »A« <> var(X%) 0 EQ AND COMMA 0 0 → 80
0x2f64…2f78 8090 IF ELEMENT var(S$) ( 1 1 ) [] »A« EQ var(X%) 0 <> AND COMMA 0 0 → 80
0x2f78…2f93 8091 IF ELEMENT var(S$) ( 2 2 ) [] » « <> ELEMENT var(S$) ( 3 3 ) [] » « EQ AND COMMA 34 EOS
0x2f93…2fa4 8092 LET ELEMENT var(S$) ( 3 3 ) [] COMMA ELEMENT var(S$) ( 2 2 ) [] EOS
0x2fa4…2fb1 8093 LET ELEMENT var(S$) ( 2 2 ) [] COMMA »0« EOS
0x2fb1…2fb2 8094 DOEND
0x2fb2…2fb3 8095 DOEND
0x2fb3…2fb6 8100 ELSE 34 EOS
0x2fb6…2fc6 8105 IF ELEMENT var(T$<2f53>) ( var(K1%) 11 11 ) [] »P« EQ COMMA 34 EOS
0x2fc6…2fcc 8109 LET var(C%) COMMA 0 EOS
0x2fcc…2fd2 8110 195d01f102f3
0x2fd2…2fe4 8112 LET var(A%) COMMA = ( ELEMENT var(S$) ( var(I%) var(I%) ) [] ) → ac20e7f3
0x2fe4…300c 8113 LET var(B%) COMMA ( = ( ELEMENT var(S$) ( var(I%) var(I%) ) [] ) → ac6f4800e874737173724b735d5d749f74ac6f4000ea74edf3
0x300c…3019 8116 IF ( var(A%) var(B%) OR ) → eff1000080
0x3019…3026 8117 IF var(B%) COMMA 27 var(C%) COMMA var(C%) 1 PLUS EOS
0x3026…3029 8119 1a5df3
0x3029…3045 8120 IF ELEMENT var(S$) ( 3 3 ) [] »P« EQ ELEMENT var(S$) ( 3 3 ) [] » « EQ OR COMMA 0 48 → 81
0x3045…3048 8125 GOTO 0 → 80
0x3048…3064 8130 IF ELEMENT var(S$) ( 4 4 ) [] »Z« EQ ELEMENT var(S$) ( 4 4 ) [] » « EQ OR COMMA 0 52 → 81
0x3064…3067 8132 GOTO 0 → 80
0x3067…306d 8134 LET var(D%) COMMA 0 EOS
0x306d…3073 8135 195d05f106f3
0x3073…3093 8136 LET var(A%) COMMA = ( ELEMENT var(S$) ( var(I%) var(I%) ) [] ) → ac3ae87173724b735d5d749f74ac30eaedf3
0x3093…30a0 8137 IF var(A%) COMMA 27 var(D%) COMMA var(D%) 1 PLUS EOS
0x30a0…30a3 8138 1a5df3
0x30a3…30bf 8139 IF ( var(C%) 0 > var(D%) 0 EQ AND ) ( var(C%) 0 EQ var(D%) 0 > AND ) OR COMMA 0 0 → 80
0x30bf…30de 8140 IF ( ELEMENT var(S$) ( 5 5 ) [] » « <> ) ( ELEMENT var(S$) ( 6 6 ) [] » « EQ ) AND COMMA 34 EOS
0x30de…30ef 8141 LET ELEMENT var(S$) ( 6 6 ) [] COMMA ELEMENT var(S$) ( 5 5 ) [] EOS
0x30ef…30fc 8142 LET ELEMENT var(S$) ( 5 5 ) [] COMMA »0« EOS
0x30fc…30fd 8143 DOEND
0x30fd…30fe 8144 DOEND
0x30fe…30ff 8145 DOEND
0x30ff…310b 8160 LET var(X%) COMMA = ( 2 var(N2%) 19 ) var(FNC%) EOS
0x310b…3129 8165 PRINT » « EOS
0x3129…3135 8170 LET var(X%) COMMA = ( 2 var(N2%) 19 ) var(FNC%) EOS
0x3135…3146 8172 LET ELEMENT var(T0$) ( 1 6 ) [] COMMA ELEMENT var(S$) ( 1 6 ) [] EOS
0x3146…3149 8175 PRINT var(T0$) EOS
0x3149…3155 8200 LET ELEMENT var(T$<2f53>) ( var(K1%) 13 40 ) [] COMMA var(T0$) EOS
0x3155…315d 8210 IF var(F3%) 1 EQ COMMA 0 5 → 85
0x315d…3163 8215 REM C
0x3163…316c 8220 IF var(F5%) 0 EQ COMMA 0 5 → 85
0x316c…3174 8230 IF var(F5%) 1 EQ COMMA 34 EOS
0x3174…317b 8240 LET var(M%) COMMA var(M%) 1 PLUS EOS
0x317b…3182 8250 IF var(M%) var(M9%) > COMMA 34 EOS
0x3182…3187 8255 LET var(M%) COMMA var(M9%) EOS
0x3187…318d 8260 LET var(X%) COMMA = var(FND%) EOS
0x318d…31ab 8270 PRINT » -- Bufferet er fullt --« EOS
0x31ab…31ad 8280 RETURN EOS
0x31ad…31ae 8290 DOEND
0x31ae…31b1 8300 ELSE 34 EOS
0x31b1…31b8 8310 LET var(K1%) COMMA var(K1%) 1 PLUS EOS
0x31b8…31c3 8320 IF var(K1%) ( var(N1%) var(N9%) PLUS ) > COMMA 34 EOS
0x31c3…31ca 8322 LET var(N1%) COMMA var(N1%) 10 PLUS EOS
0x31ca…31d4 8324 LET var(X%) COMMA = ( var(N1%) var(M%) ) var(FNL%) EOS
0x31d4…31d5 8326 DOEND
0x31d5…31f7 8330 LET var(F4%) COMMA 0 EOS 32 32 42 42 32 32 var(F2%) var(X%) var(X$) var(X$) var(M%) var(FNI%) var(T0$) var(X$) var(X$) var(P7$) var(F3%) 32 var(F1%) var(P7$) var(M%) var(M%) 45 var(P8$) var(X$) var(R$) var(K1$) var(K1$)
0x31f7…31fa 8340 GOTO var(N1%) → 77
0x31fa…31fb 8350 DOEND
0x31fb…31fc 8360 DOEND
0x31fc…31fe 8370 RETURN EOS
0x31fe…3201 8400 TRAP ESC OFF
0x3201…3207 8410 LET var(X%) COMMA = var(FND%) EOS
0x3207…3210 8412 IF var(F3%) → ef4001edf122f3
0x3210…321c 8414 LET var(X%) COMMA = ( 2 var(N2%) 6 ) var(FNC%) EOS
0x321c…321f 8415 PRINT var(T9$) EOS
0x321f…3229 8416 LET ELEMENT var(T$<2f53>) ( var(K1%) ) [] COMMA var(T9$) EOS
0x3229…322c 8417 GOTO 0 → 85
0x322c…322d 8418 DOEND
0x322d…3232 8420 LET var(K2%) COMMA var(K1%) EOS
0x3232…3235 8430 GOTO 21 )
0x3235…3237 8500 RETURN EOS
0x3237…3261 8505 REM C -------------- ABORT EDIT-COMMAND
0x3261…3264 8510 TRAP ESC OFF
0x3264…3267 8520 TRAP ERR OFF
0x3267…3269 8550 RETURN EOS
0x3269…32a6 8600 REM -*************** SUBROUTINE WRITE TO FILE ***********
0x32a6…32aa 8605 REM
0x32aa…32ae 8615 TRAP ESC 8700
0x32ae…32b2 8617 TRAP ERR 8605
0x32b2…32c8 8620 INPUT »Skriv til fil : « COMMA var(W$) EOS
0x32c8…32d0 8622 IF var(W$) »« EQ COMMA 34 EOS
0x32d0…32d9 8623 IF var(R$) »« EQ COMMA 0 0 → 87
0x32d9…32de 8624 LET var(W$) COMMA var(R$) EOS
0x32de…32e9 8625 LET var(X%) COMMA = ( 2 1 22 ) var(FNC%) EOS
0x32e9…32ed 8627 PRINT var(W$) SEMI EOS
0x32ed…32f3 8628 LINPUT »« COMMA var(X$) EOS
0x32f3…32f4 8629 DOEND
0x32f4…3317 8630 LET var(X%) COMMA = var(FNO%) EOS 32 32 45 45 45 45 45 45 45 45 45 32 32 var(F6%) var(N9%) var(P7$) var(F2%) 32 var(F6%) var(X%) var(FNI%) var(N9%) var(X%) var(FNI%) 45 var(P8$) var(T0$) var(X$) var(P7$)
0x3317…331c 8635 LET var(F8%) COMMA 1 EOS
0x331c…3322 8640 PRINT 2# SEMI var(P$) EOS
0x3322…3328 8650 195d01f153f3
0x3328…3333 8660 PRINT 2# SEMI ELEMENT var(T$<2f53>) ( var(I%) ) [] EOS
0x3333…3336 8670 1a5df3
0x3336…3339 8675 2002f3
0x3339…333c 8676 1402f3
0x333c…333e 8678 PRINT EOS
0x333e…3349 8680 LET var(X%) COMMA = ( 3 23 6 ) var(FNC%) EOS
0x3349…335e 8690 PRINT var(M%) SEMI » Linjer skrevet« EOS
0x335e…3361 8695 TRAP ESC OFF
0x3361…3364 8696 TRAP ERR OFF
0x3364…3366 8697 RETURN EOS
0x3366…3369 8700 TRAP ESC OFF
0x3369…336c 8702 TRAP ERR OFF
0x336c…336e 8720 RETURN EOS
0x336e…336f 9000 END