|
DataMuseum.dkPresents historical artifacts from the history of: Q1 computer |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Q1 computer Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - downloadIndex: 8 B C D I J M P Q R S T q r
Length: 176808 (0x2b2a8) Description: Bits:30008765 50001610 Types: 8" Floppy Disk
flag | nrec | reclen | rec_trk | t0 | tn | name | artifact |
---|---|---|---|---|---|---|---|
0 | 16 | 79 | 82 | 34 | 34 | BITTAR | ⟦793e592ec⟧ Q1_Text, reclen=79, q1file |
0 | 25 | 255 | 30 | 30 | 30 | CASINO | ⟦7812c52ae⟧ Q1_HexDump, reclen=255, q1file |
0 | 136 | 79 | 82 | 27 | 29 | CASINO1 | ⟦229f463b9⟧ Q1_Text, reclen=79, q1file |
0 | 9 | 255 | 30 | 1 | 1 | D | ⟦d59f4422e⟧ Q1_HexDump, reclen=255, q1file |
0 | 17 | 40 | 130 | 0 | 0 | INDEX | ⟦6807e0413⟧ Q1_HexDump, reclen=40, q1file |
0 | 10 | 79 | 82 | 31 | 32 | J | ⟦067b430eb⟧ Q1_Text, reclen=79, q1file |
0 | 14 | 255 | 30 | 3 | 3 | MASTMIND | ⟦873a4d868⟧ Q1_HexDump, reclen=255, q1file |
0 | 37 | 13 | 225 | 10 | 14 | MF | ⟦c4a44df53⟧ Q1_HexDump, reclen=13, q1file |
0 | 1 | 13 | 225 | 4 | 4 | MO | ⟦3286080c5⟧ Q1_HexDump, reclen=13, q1file |
0 | 37 | 13 | 225 | 16 | 20 | MS | ⟦4744e269b⟧ Q1_HexDump, reclen=13, q1file |
0 | 3 | 255 | 30 | 2 | 2 | ⟦e120d8c13⟧ Q1_HexDump, reclen=255, q1file | |
0 | 174 | 79 | 82 | 23 | 26 | RAKN21 | ⟦96f3c16e4⟧ Q1_Text, reclen=79, q1file |
0 | 5 | 255 | 30 | 15 | 15 | S | ⟦f9b8e39b1⟧ Q1_HexDump, reclen=255, q1file |
0 | 59 | 79 | 82 | 22 | 22 | SKRIV1 | ⟦a101e656f⟧ Q1_HexDump, reclen=79, q1file |
0 | 8 | 255 | 30 | 21 | 21 | TIPSRAD | ⟦b0e822ba0⟧ Q1_HexDump, reclen=255, q1file |
0 | 14 | 255 | 30 | 33 | 33 | TJUGOETT | ⟦a2728a132⟧ Q1_HexDump, reclen=255, q1file |
0x00000…00028 (0, 0, 0) Catalog {f0=0x0000, name=»INDEX «, nrec=0x0011, reclen=0x0028, rectrack=0x0082, track0=0x0000, trackn=0x0000} 0x00028…00050 (0, 0, 1) Catalog {f0=0x0000, name=»D «, nrec=0x0009, reclen=0x00ff, rectrack=0x001e, track0=0x0001, trackn=0x0001} 0x00050…00078 (0, 0, 2) Catalog {f0=0x0000, name=»PRINT «, nrec=0x0003, reclen=0x00ff, rectrack=0x001e, track0=0x0002, trackn=0x0002} 0x00078…000a0 (0, 0, 3) Catalog {f0=0x0000, name=»MASTMIND«, nrec=0x000e, reclen=0x00ff, rectrack=0x001e, track0=0x0003, trackn=0x0003} 0x000a0…000c8 (0, 0, 4) Catalog {f0=0x0000, name=»MO «, nrec=0x0001, reclen=0x000d, rectrack=0x00e1, track0=0x0004, trackn=0x0004} 0x000c8…000f0 (0, 0, 5) Catalog {f0=0x0000, name=»MH «, nrec=0x0000, reclen=0x000d, rectrack=0x00e1, track0=0x0005, trackn=0x0009} 0x000f0…00118 (0, 0, 6) Catalog {f0=0x0000, name=»MF «, nrec=0x0025, reclen=0x000d, rectrack=0x00e1, track0=0x000a, trackn=0x000e} 0x00118…00140 (0, 0, 7) Catalog {f0=0x0000, name=»S «, nrec=0x0005, reclen=0x00ff, rectrack=0x001e, track0=0x000f, trackn=0x000f} 0x00140…00168 (0, 0, 8) Catalog {f0=0x0000, name=»MS «, nrec=0x0025, reclen=0x000d, rectrack=0x00e1, track0=0x0010, trackn=0x0014} 0x00168…00190 (0, 0, 9) Catalog {f0=0x0000, name=»TIPSRAD «, nrec=0x0008, reclen=0x00ff, rectrack=0x001e, track0=0x0015, trackn=0x0015} 0x00190…001b8 (0, 0, 10) Catalog {f0=0x0000, name=»SKRIV1 «, nrec=0x003b, reclen=0x004f, rectrack=0x0052, track0=0x0016, trackn=0x0016} 0x001b8…001e0 (0, 0, 11) Catalog {f0=0x0000, name=»RAKN21 «, nrec=0x00ae, reclen=0x004f, rectrack=0x0052, track0=0x0017, trackn=0x001a} 0x001e0…00208 (0, 0, 12) Catalog {f0=0x0000, name=»CASINO1 «, nrec=0x0088, reclen=0x004f, rectrack=0x0052, track0=0x001b, trackn=0x001d} 0x00208…00230 (0, 0, 13) Catalog {f0=0x0000, name=»CASINO «, nrec=0x0019, reclen=0x00ff, rectrack=0x001e, track0=0x001e, trackn=0x001e} 0x00230…00258 (0, 0, 14) Catalog {f0=0x0000, name=»J «, nrec=0x000a, reclen=0x004f, rectrack=0x0052, track0=0x001f, trackn=0x0020} 0x00258…00280 (0, 0, 15) Catalog {f0=0x0000, name=»TJUGOETT«, nrec=0x000e, reclen=0x00ff, rectrack=0x001e, track0=0x0021, trackn=0x0021} 0x00280…002a8 (0, 0, 16) Catalog {f0=0x0000, name=»BITTAR «, nrec=0x0010, reclen=0x004f, rectrack=0x0052, track0=0x0022, trackn=0x0022} 0x002a8…002c8 (0, 0, 17) 43 cd 00 00 21 d0 40 0e 16 11 c0 42 cd 64 47 21 d0 40 11 80 00 1b 00 00 00 00 00 00 00 00 00 00 ┆C ! @ B dG! @ ┆ 0x002c8…002d0 00 00 00 00 00 00 00 00 ┆ ┆ 0x002d0…002f0 (0, 0, 18) 02 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ ┆ 0x002f0…002f8 00 00 00 00 00 00 00 00 ┆ ┆ 0x002f8…00320 (0, 0, 19) 0x00[0x28] […0x9…] 0x00488…004a8 (0, 0, 29) 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 0d 0e 66 e7 00 00 01 00 00 00 00 00 00 00 00 00 00 ┆ f ┆ 0x004a8…004b0 00 00 00 00 00 00 00 00 ┆ ┆ 0x004b0…004d0 (0, 0, 30) 7c 40 00 00 00 00 42 10 00 f3 c5 3a 10 66 b7 ca 33 66 97 32 10 66 00 00 00 00 00 00 00 00 00 00 ┆ö@ B : f 3f 2 f ┆ 0x004d0…004d8 00 00 00 00 00 00 00 00 ┆ ┆ 0x004d8…004f8 (0, 0, 31) 2a 87 00 22 0e 66 21 1a 66 22 87 40 21 98 67 0e 80 11 00 40 1a 46 00 00 00 00 00 00 00 00 00 00 ┆* " f! f" @! g @ F ┆ 0x004f8…00500 00 00 00 00 00 00 00 00 ┆ ┆ 0x00500…00520 (0, 0, 32) 77 78 00 13 23 0d c2 3b 66 2a 15 66 eb 2a fc 40 22 15 66 eb 22 fc 00 00 00 00 00 00 00 00 00 00 ┆wx # ;f* f * @" f " ┆ 0x00520…00528 00 00 00 00 00 00 00 00 ┆ ┆ 0x00528…00548 (0, 0, 33) 40 21 00 66 11 00 42 46 1a 77 78 12 23 1c c2 5a 66 2a fe 40 eb 2a 00 00 00 00 00 00 00 00 00 00 ┆@! f BF wx # Zf* @ * ┆ 0x00548…00550 00 00 00 00 00 00 00 00 ┆ ┆ 0x00550…00570 (0, 0, 34) 13 66 00 fe 40 eb 22 13 66 21 00 00 39 eb 2a 11 66 f9 eb 22 11 66 00 00 00 00 00 00 00 00 00 00 ┆ f @ " f! 9 * f " f ┆ 0x00570…00578 00 00 00 00 00 00 00 00 ┆ ┆ 0x00578…00598 (0, 0, 35) cd 15 00 c1 fb c9 42 10 00 f3 c5 3e 01 32 10 66 2a 0e 66 22 87 40 00 00 00 00 00 00 00 00 00 00 ┆ B > 2 f* f" @ ┆ 0x00598…005a0 00 00 00 00 00 00 00 00 ┆ ┆ 0x005a0…005c0 (0, 0, 36) c3 33 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ 3 ┆ 0x005c0…005c8 00 00 00 00 00 00 00 00 ┆ ┆ 0x005c8…005f0 (0, 0, 37) 0x00[0x28] […0x2…] 0x00640…00660 (0, 0, 40) 00 00 00 00 00 00 00 00 00 8d 87 84 74 6f 67 60 59 4c 45 3e 3b 2b 00 00 00 00 00 00 00 00 00 00 ┆ tog`YLE>;+ ┆ 0x00660…00668 00 00 00 00 00 00 00 00 ┆ ┆ 0x00668…00688 (0, 0, 41) 25 22 00 18 14 02 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆%" ┆ 0x00688…00690 00 00 00 00 00 00 00 00 ┆ ┆ 0x00690…006b8 (0, 0, 42) 0x00[0x28] […0x9…] 0x00820…00840 (0, 0, 52) 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 0d f5 00 00 00 00 00 00 00 00 00 00 ┆ ┆ 0x00840…00848 00 00 00 00 00 00 00 00 ┆ ┆ 0x00848…00868 (0, 0, 53) 66 f9 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆f ┆ 0x00868…00870 00 00 00 00 00 00 00 00 ┆ ┆ 0x00870…00898 (0, 0, 54) 0x00[0x28] […0x5…] 0x00960…00980 (0, 0, 60) 00 00 00 00 00 00 00 00 00 00 00 18 00 18 00 18 00 18 00 18 00 18 00 00 00 00 00 00 00 00 00 00 ┆ ┆ 0x00980…00988 00 00 00 00 00 00 00 00 ┆ ┆ 0x00988…009a8 (0, 0, 61) 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 00 00 00 00 00 00 00 00 00 ┆ ┆ 0x009a8…009b0 00 00 00 00 00 00 00 00 ┆ ┆ 0x009b0…009d0 (0, 0, 62) 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 00 00 00 00 00 00 00 00 00 ┆ ┆ 0x009d0…009d8 00 00 00 00 00 00 00 00 ┆ ┆ 0x009d8…009f8 (0, 0, 63) 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 00 00 00 00 00 00 00 00 00 ┆ ┆ 0x009f8…00a00 00 00 00 00 00 00 00 00 ┆ ┆ 0x00a00…00a20 (0, 0, 64) 00 18 00 18 00 18 00 18 00 00 02 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ ┆ 0x00a20…00a28 00 00 00 00 00 00 00 00 ┆ ┆ 0x00a28…00a50 (0, 0, 65) 0x00[0x28] […0xa…] 0x00be0…00c00 (0, 0, 76) 00 00 00 0d ee 67 2a 18 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 00 00 00 00 00 00 00 00 00 ┆ g* ┆ 0x00c00…00c08 00 00 00 00 00 00 00 00 ┆ ┆ 0x00c08…00c28 (0, 0, 77) 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 00 00 00 00 00 00 00 00 00 ┆ ┆ 0x00c28…00c30 00 00 00 00 00 00 00 00 ┆ ┆ 0x00c30…00c50 (0, 0, 78) 00 18 00 18 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ ┆ 0x00c50…00c58 00 00 00 00 00 00 00 00 ┆ ┆ 0x00c58…00c80 (0, 0, 79) 0x00[0x28] […0x3…] 0x00cf8…00d18 (0, 0, 83) 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 18 00 18 00 18 00 00 00 00 00 00 00 00 00 00 00 ┆ ┆ 0x00d18…00d20 00 00 00 00 00 00 00 00 ┆ ┆ 0x00d20…00d40 (0, 0, 84) 18 00 00 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 00 00 00 00 00 00 00 00 00 00 ┆ ┆ 0x00d40…00d48 00 00 00 00 00 00 00 00 ┆ ┆ 0x00d48…00d68 (0, 0, 85) 18 00 00 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 00 00 00 00 00 00 00 00 00 00 ┆ ┆ 0x00d68…00d70 00 00 00 00 00 00 00 00 ┆ ┆ 0x00d70…00d90 (0, 0, 86) 18 00 00 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 18 00 00 00 00 00 00 00 00 00 00 00 ┆ ┆ 0x00d90…00d98 00 00 00 00 00 00 00 00 ┆ ┆ 0x00d98…00db8 (0, 0, 87) 18 00 00 00 18 00 18 00 18 00 18 00 18 00 00 02 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ ┆ 0x00db8…00dc0 00 00 00 00 00 00 00 00 ┆ ┆ 0x00dc0…00de8 (0, 0, 88) 0x00[0x28] […0x29…] 0x01450…0154f (1, 0, 0) DataSector[0xff] […0x8…] 0x01d47…01e46 (1, 0, 9) 0x00[0xff] […0x14…] 0x03232…03331 (2, 0, 0) DataSector[0xff] […0x2…] 0x0352f…0362e (2, 0, 3) 0x00[0xff] […0x19…] 0x04f15…04f35 (2, 0, 29) 01 ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ┆ ┆ 0x04f35…04f55 ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ┆ ┆ […0x5…] 0x04ff5…05014 ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ┆ ┆ 0x05014…05113 (3, 0, 0) DataSector[0xff] […0xd…] 0x05e06…05f05 (3, 0, 14) 0x00[0xff] […0xf…] 0x06df6…06e03 (4, 0, 0) DataSector[0xd] 0x06e03…06e10 (4, 0, 1) 0x00[0xd] […0x381…] 0x09b9d…09baa (7, 0, 224) 01 ff ff ff ff ff ff ff ff ff ff ff ff ┆ ┆ 0x09baa…09bb7 (8, 0, 0) 0x00[0xd] […0xdf…] 0x0a70a…0a717 (8, 0, 224) 01 ff ff ff ff ff ff ff ff ff ff ff ff ┆ ┆ 0x0a717…0a724 (9, 0, 0) 0x00[0xd] […0xe0…] 0x0b284…0b291 (10, 0, 0) DataSector[0xd] […0x24…] 0x0b465…0b472 (10, 0, 37) 0x00[0xd] […0x27c…] 0x0d4be…0d4cb (12, 0, 224) 00 ff ff ff ff ff ff ff ff ff ff ff ff ┆ ┆ 0x0d4cb…0d4d8 (13, 0, 0) 0x00[0xd] […0xdf…] 0x0e02b…0e038 (13, 0, 224) 01 ff ff ff ff ff ff ff ff ff ff ff ff ┆ ┆ 0x0e038…0e045 (14, 0, 0) 0x00[0xd] […0xdf…] 0x0eb98…0eba5 (14, 0, 224) 01 ff ff ff ff ff ff ff ff ff ff ff ff ┆ ┆ 0x0eba5…0eca4 (15, 0, 0) DataSector[0xff] […0x4…] 0x0f0a0…0f19f (15, 0, 5) 0x00[0xff] […0x17…] 0x10888…108a8 (15, 0, 29) 01 ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ┆ ┆ 0x108a8…108c8 ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ┆ ┆ […0x5…] 0x10968…10987 ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ┆ ┆ 0x10987…10994 (16, 0, 0) DataSector[0xd] […0x24…] 0x10b68…10b75 (16, 0, 37) 0x00[0xd] […0xba…] 0x114e7…114f4 (16, 0, 224) 01 ff ff ff ff ff ff ff ff ff ff ff ff ┆ ┆ 0x114f4…11501 (17, 0, 0) 0x00[0xd] […0x2a1…] 0x1372e…1373b (19, 0, 224) 01 ff ff ff ff ff ff ff ff ff ff ff ff ┆ ┆ 0x1373b…13748 (20, 0, 0) 0x00[0xd] […0xdf…] 0x1429b…142a8 (20, 0, 224) 01 ff ff ff ff ff ff ff ff ff ff ff ff ┆ ┆ 0x142a8…143a7 (21, 0, 0) DataSector[0xff] […0x7…] 0x14aa0…14b9f (21, 0, 8) 0x00[0xff] […0x15…] 0x1608a…160d9 (22, 0, 0) DataSector[0x4f] […0x3a…] 0x172bf…172df (22, 0, 59) 50 55 54 20 46 49 4c 45 28 44 29 45 44 49 54 28 27 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆PUT FILE(D)EDIT('***************┆ 0x172df…172ff 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆********************************┆ 0x172ff…1730e 27 29 28 41 29 3b 45 4e 44 3b 20 20 20 20 20 ┆')(A);END; ┆ 0x1730e…1732e (22, 0, 60) 44 4f 20 4c 3d 31 20 54 4f 20 38 30 30 3b 45 4e 44 3b 50 55 54 20 46 49 4c 45 28 44 29 20 45 44 ┆DO L=1 TO 800;END;PUT FILE(D) ED┆ 0x1732e…1734e 49 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆IT ┆ 0x1734e…1735d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1735d…1737d (22, 0, 61) 28 27 2a 2a 2a 2a 2a 2a 2a 2a 2a 20 20 20 20 20 20 20 20 4d 2e 53 54 45 4e 48 41 52 44 54 20 41 ┆('********* M.STENHARDT A┆ 0x1737d…1739d 42 20 20 20 20 20 20 20 2a 2a 2a 2a 2a 2a 2a 2a 2a 27 29 28 41 29 3b 20 20 20 20 20 20 20 20 20 ┆B *********')(A); ┆ 0x1739d…173ac 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x173ac…173cc (22, 0, 62) 44 4f 20 4c 3d 31 20 54 4f 20 32 36 30 3b 45 4e 44 3b 50 55 54 20 46 49 4c 45 28 44 29 20 45 44 ┆DO L=1 TO 260;END;PUT FILE(D) ED┆ 0x173cc…173ec 49 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆IT ┆ 0x173ec…173fb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x173fb…1741b (22, 0, 63) 28 27 2a 2a 2a 2a 2a 2a 2a 2a 2a 20 20 20 20 20 48 5b 4c 53 41 52 20 44 49 47 20 56 5b 4c 4b 4f ┆('********* HÄLSAR DIG VÄLKO┆ 0x1741b…1743b 4d 4d 45 4e 20 20 20 20 2a 2a 2a 2a 2a 2a 2a 2a 2a 27 29 28 41 29 3b 20 20 20 20 20 20 20 20 20 ┆MMEN *********')(A); ┆ 0x1743b…1744a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1744a…1746a (22, 0, 64) 44 4f 20 4c 3d 31 20 54 4f 20 32 36 30 3b 45 4e 44 3b 50 55 54 20 46 49 4c 45 28 44 29 20 45 44 ┆DO L=1 TO 260;END;PUT FILE(D) ED┆ 0x1746a…1748a 49 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆IT ┆ 0x1748a…17499 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x17499…174b9 (22, 0, 65) 28 27 2a 2a 2a 2a 2a 2a 2a 2a 2a 20 20 20 20 20 20 20 20 20 20 20 20 54 49 4c 4c 20 20 20 20 20 ┆('********* TILL ┆ 0x174b9…174d9 20 20 20 20 20 20 20 20 2a 2a 2a 2a 2a 2a 2a 2a 2a 27 29 28 41 29 3b 20 20 20 20 20 20 20 20 20 ┆ *********')(A); ┆ 0x174d9…174e8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x174e8…17508 (22, 0, 66) 44 4f 20 4c 3d 31 20 54 4f 20 32 36 30 3b 45 4e 44 3b 50 55 54 20 46 49 4c 45 28 44 29 20 45 44 ┆DO L=1 TO 260;END;PUT FILE(D) ED┆ 0x17508…17528 49 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆IT ┆ 0x17528…17537 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x17537…17557 (22, 0, 67) 28 27 2a 2a 2a 2a 2a 2a 2a 2a 2a 20 20 20 20 20 20 20 20 20 51 31 20 2d 20 43 41 53 49 4e 4f 20 ┆('********* Q1 - CASINO ┆ 0x17557…17577 20 20 20 20 20 20 20 20 2a 2a 2a 2a 2a 2a 2a 2a 2a 27 29 28 41 29 3b 20 20 20 20 20 20 20 20 20 ┆ *********')(A); ┆ 0x17577…17586 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x17586…175a6 (22, 0, 68) 44 4f 20 4c 3d 31 20 54 4f 20 38 30 30 3b 45 4e 44 3b 44 4f 20 4c 3d 31 20 54 4f 20 33 3b 50 55 ┆DO L=1 TO 800;END;DO L=1 TO 3;PU┆ 0x175a6…175c6 54 20 46 49 4c 45 28 44 29 20 45 44 49 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆T FILE(D) EDIT ┆ 0x175c6…175d5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x175d5…175f5 (22, 0, 69) 28 27 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆('******************************┆ 0x175f5…17615 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 27 29 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆*****************') ┆ 0x17615…17624 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x17624…17644 (22, 0, 70) 28 41 28 34 37 29 29 3b 45 4e 44 3b 44 4f 20 4c 3d 31 20 54 4f 20 39 30 30 3b 45 4e 44 3b 50 55 ┆(A(47));END;DO L=1 TO 900;END;PU┆ 0x17644…17664 54 20 46 49 4c 45 28 44 29 20 45 44 49 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆T FILE(D) EDIT ┆ 0x17664…17673 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x17673…17693 (22, 0, 71) 28 27 20 27 29 28 41 28 34 37 29 29 28 27 20 20 20 20 20 20 20 20 20 20 20 2a 2a 2a 20 20 20 54 ┆(' ')(A(47))(' *** T┆ 0x17693…176b3 52 59 43 4b 20 52 45 54 55 52 4e 20 20 20 2a 2a 2a 27 29 28 41 28 34 36 29 29 3b 44 4f 20 4c 3d ┆RYCK RETURN ***')(A(46));DO L=┆ 0x176b3…176c2 31 20 54 4f 20 31 38 30 30 3b 45 4e 44 3b 20 ┆1 TO 1800;END; ┆ 0x176c2…176e2 (22, 0, 72) 43 41 4c 4c 20 4b 45 59 46 55 4e 28 4b 4b 4b 29 3b 49 46 20 4b 4b 4b 20 54 48 45 4e 20 47 4f 20 ┆CALL KEYFUN(KKK);IF KKK THEN GO ┆ 0x176e2…17702 54 4f 20 46 4f 52 54 53 3b 47 4f 20 54 4f 20 49 47 45 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆TO FORTS;GO TO IGEN; ┆ 0x17702…17711 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x17711…17760 (22, 0, 73) 0x20[0x4f] 0x17760…17780 (22, 0, 74) 46 4f 52 54 53 3a 47 45 54 20 53 4b 49 50 20 4c 49 53 54 28 44 55 4d 42 29 3b 20 20 20 20 20 20 ┆FORTS:GET SKIP LIST(DUMB); ┆ 0x17780…177a0 20 20 20 20 20 20 4c 3d 31 3b 20 41 4d 4f 55 4e 54 3d 32 35 30 3b 20 20 20 20 20 20 20 20 20 20 ┆ L=1; AMOUNT=250; ┆ 0x177a0…177af 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x177af…177cf (22, 0, 75) 50 55 54 20 46 49 4c 45 28 44 29 20 53 4b 49 50 20 45 44 49 54 28 27 20 27 29 28 41 28 34 37 29 ┆PUT FILE(D) SKIP EDIT(' ')(A(47)┆ 0x177cf…177ef 29 28 27 53 50 45 4c 45 54 20 56 49 20 53 4b 41 20 53 50 45 4c 41 20 48 45 54 45 52 20 22 42 4c ┆)('SPELET VI SKA SPELA HETER "BL┆ 0x177ef…177fe 41 43 4b 4a 41 43 4b 22 27 29 20 20 20 20 20 ┆ACKJACK"') ┆ 0x177fe…1781e (22, 0, 76) 28 41 28 39 34 29 29 28 27 4c 41 53 20 56 45 47 41 53 20 52 45 47 4c 45 52 20 47 5b 4c 4c 45 52 ┆(A(94))('LAS VEGAS REGLER GÄLLER┆ 0x1781e…1783e 2e 27 29 28 41 28 39 34 29 29 28 27 44 55 20 46 5d 52 20 32 35 30 20 4b 52 4f 4e 4f 52 20 41 54 ┆.')(A(94))('DU FÅR 250 KRONOR AT┆ 0x1783e…1784d 54 20 53 54 41 52 54 41 20 4d 45 44 2e 27 29 ┆T STARTA MED.')┆ 0x1784d…1786d (22, 0, 77) 28 41 28 39 34 29 29 28 27 54 52 59 43 4b 20 52 45 54 55 52 4e 27 29 28 41 28 34 36 29 29 3b 47 ┆(A(94))('TRYCK RETURN')(A(46));G┆ 0x1786d…1788d 45 54 20 53 4b 49 50 20 4c 49 53 54 28 44 55 4d 42 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ET SKIP LIST(DUMB); ┆ 0x1788d…1789c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1789c…178bc (22, 0, 78) 43 41 4c 4c 20 53 48 55 46 46 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆CALL SHUFF; ┆ 0x178bc…178dc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x178dc…178eb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x178eb…1790b (22, 0, 79) 47 41 4d 45 3a 20 44 4f 20 49 3d 31 20 54 4f 20 39 3b 20 4c 49 4e 45 28 49 29 3d 42 4c 4b 3b 20 ┆GAME: DO I=1 TO 9; LINE(I)=BLK; ┆ 0x1790b…1792b 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆ 0x1792b…1793a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1793a…1795a (22, 0, 80) 20 20 20 49 46 20 41 4d 4f 55 4e 54 7f 3d 30 20 54 48 45 4e 20 47 4f 54 4f 20 47 47 41 41 3b 20 ┆ IF AMOUNT =0 THEN GOTO GGAA; ┆ 0x1795a…1797a 50 55 54 20 46 49 4c 45 28 44 29 53 4b 49 50 20 45 44 49 54 28 27 44 55 20 5b 52 20 50 41 4e 4b ┆PUT FILE(D)SKIP EDIT('DU ÄR PANK┆ 0x1797a…17989 21 21 21 27 29 28 41 28 39 34 29 29 20 20 20 ┆!!!')(A(94)) ┆ 0x17989…179a9 (22, 0, 81) 28 27 4a 41 47 20 46 49 4e 4e 53 20 41 4c 4c 54 49 44 20 48 5b 52 20 44 5d 20 44 55 20 4b 5b 4e ┆('JAG FINNS ALLTID HÄR DÅ DU KÄN┆ 0x179a9…179c9 4e 45 52 27 29 28 41 28 34 37 29 29 28 27 46 5c 52 20 41 54 54 20 46 5c 52 4c 4f 52 41 20 4d 45 ┆NER')(A(47))('FÖR ATT FÖRLORA ME┆ 0x179c9…179d8 52 20 50 45 4e 47 41 52 2e 2e 2e 2e 2e 27 29 ┆R PENGAR.....')┆ 0x179d8…17a27 (23, 0, 0) DataSector[0x4f] […0xad…] 0x1af8a…1afaa (25, 0, 10) 20 20 20 20 20 41 36 30 30 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ A600: ┆ 0x1afaa…1afca 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1afca…1afd9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1afd9…1aff9 (25, 0, 11) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 20 28 44 29 20 53 4b 49 50 20 ┆ PUT FILE (D) SKIP ┆ 0x1aff9…1b019 45 44 49 54 20 28 27 44 49 4e 41 20 53 49 46 46 52 4f 52 20 20 20 4d 49 4e 41 20 53 49 46 46 52 ┆EDIT ('DINA SIFFROR MINA SIFFR┆ 0x1b019…1b028 4f 52 27 29 20 28 41 28 34 37 29 29 3b 20 20 ┆OR') (A(47)); ┆ 0x1b028…1b048 (25, 0, 12) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 20 28 44 29 20 45 44 49 54 20 ┆ PUT FILE (D) EDIT ┆ 0x1b048…1b068 28 27 20 37 20 20 20 27 29 20 28 41 28 35 29 29 20 28 27 20 20 20 20 20 20 20 20 20 20 20 38 2c ┆(' 7 ') (A(5)) (' 8,┆ 0x1b068…1b077 20 39 27 29 20 28 41 28 31 36 29 29 20 20 20 ┆ 9') (A(16)) ┆ 0x1b077…1b097 (25, 0, 13) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1b097…1b0b7 28 27 20 27 29 20 28 41 28 32 36 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆(' ') (A(26)); ┆ 0x1b0b7…1b0c6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1b0c6…1b0e6 (25, 0, 14) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 41 37 30 30 3b 20 20 20 20 20 20 20 ┆ GO TO A700; ┆ 0x1b0e6…1b106 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1b106…1b115 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1b115…1b135 (25, 0, 15) 20 20 20 20 20 41 36 35 30 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ A650: ┆ 0x1b135…1b155 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1b155…1b164 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1b164…1b184 (25, 0, 16) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 20 28 44 29 20 53 4b 49 50 20 ┆ PUT FILE (D) SKIP ┆ 0x1b184…1b1a4 45 44 49 54 20 28 27 44 49 4e 41 20 53 49 46 46 52 4f 52 20 20 20 4d 49 4e 41 20 53 49 46 46 52 ┆EDIT ('DINA SIFFROR MINA SIFFR┆ 0x1b1a4…1b1b3 4f 52 27 29 20 28 41 34 37 29 29 3b 20 20 20 ┆OR') (A47)); ┆ 0x1b1b3…1b1d3 (25, 0, 17) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 20 28 44 29 20 45 44 49 54 20 ┆ PUT FILE (D) EDIT ┆ 0x1b1d3…1b1f3 28 27 20 37 2c 20 38 27 29 20 28 41 28 35 29 29 20 28 27 20 20 20 20 20 20 20 20 20 20 20 39 20 ┆(' 7, 8') (A(5)) (' 9 ┆ 0x1b1f3…1b202 20 20 27 29 20 20 20 20 20 20 20 20 20 20 20 ┆ ') ┆ 0x1b202…1b222 (25, 0, 18) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 41 ┆ (A┆ 0x1b222…1b242 28 31 36 29 29 20 28 27 20 27 29 20 28 41 28 32 36 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆(16)) (' ') (A(26)); ┆ 0x1b242…1b251 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1b251…1b271 (25, 0, 19) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 41 37 30 30 3b 20 20 20 20 20 20 20 ┆ GO TO A700; ┆ 0x1b271…1b291 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1b291…1b2a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1b2a0…1b2c0 (25, 0, 20) 20 20 20 20 20 41 37 30 30 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ A700: ┆ 0x1b2c0…1b2e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1b2e0…1b2ef 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1b2ef…1b30f (25, 0, 21) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 47 45 54 20 4c 49 53 54 20 28 44 53 34 29 3b 20 20 20 ┆ GET LIST (DS4); ┆ 0x1b30f…1b32f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1b32f…1b33e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1b33e…1b35e (25, 0, 22) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 44 53 34 20 3d 20 27 31 30 20 20 27 20 54 48 ┆ IF DS4 = '10 ' TH┆ 0x1b35e…1b37e 45 4e 20 47 4f 20 54 4f 20 41 38 30 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆EN GO TO A800; ┆ 0x1b37e…1b38d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1b38d…1b3ad (25, 0, 23) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 44 53 34 20 3d 20 27 20 31 30 20 27 20 54 48 ┆ IF DS4 = ' 10 ' TH┆ 0x1b3ad…1b3cd 45 4e 20 47 4f 20 54 4f 20 41 38 30 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆EN GO TO A800; ┆ 0x1b3cd…1b3dc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1b3dc…1b3fc (25, 0, 24) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 44 53 34 20 3d 20 27 20 20 31 30 27 20 54 48 ┆ IF DS4 = ' 10' TH┆ 0x1b3fc…1b41c 45 4e 20 47 4f 20 54 4f 20 41 38 30 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆EN GO TO A800; ┆ 0x1b41c…1b42b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1b42b…1b44b (25, 0, 25) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 44 53 34 20 3d 20 27 31 30 31 31 27 20 54 48 ┆ IF DS4 = '1011' TH┆ 0x1b44b…1b46b 45 4e 20 47 4f 20 54 4f 20 41 38 35 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆EN GO TO A850; ┆ 0x1b46b…1b47a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1b47a…1b49a (25, 0, 26) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 41 31 35 30 3b 20 20 20 20 20 20 20 ┆ GO TO A150; ┆ 0x1b49a…1b4ba 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1b4ba…1b4c9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1b4c9…1b4e9 (25, 0, 27) 20 20 20 20 20 41 38 30 30 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ A800: ┆ 0x1b4e9…1b509 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1b509…1b518 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1b518…1b538 (25, 0, 28) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 20 28 44 29 20 53 4b 49 50 20 ┆ PUT FILE (D) SKIP ┆ 0x1b538…1b558 45 44 49 54 20 28 27 44 49 4e 41 20 53 49 46 46 52 4f 52 20 20 20 4d 49 4e 41 20 53 49 46 46 52 ┆EDIT ('DINA SIFFROR MINA SIFFR┆ 0x1b558…1b567 4f 52 27 29 20 28 41 28 34 37 29 29 3b 20 20 ┆OR') (A(47)); ┆ 0x1b567…1b587 (25, 0, 29) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 20 28 44 29 20 45 44 49 54 20 ┆ PUT FILE (D) EDIT ┆ 0x1b587…1b5a7 28 27 31 30 20 20 20 27 29 28 41 28 35 29 29 20 28 27 20 27 29 20 28 41 28 31 30 29 29 20 28 27 ┆('10 ')(A(5)) (' ') (A(10)) ('┆ 0x1b5a7…1b5b6 31 31 2c 31 32 27 29 20 20 20 20 20 20 20 20 ┆11,12') ┆ 0x1b5b6…1b5d6 (25, 0, 30) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 ┆ (┆ 0x1b5d6…1b5f6 41 28 35 29 29 20 28 27 20 27 29 20 28 41 28 32 37 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆A(5)) (' ') (A(27)); ┆ 0x1b5f6…1b605 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1b605…1b625 (25, 0, 31) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 41 39 30 30 3b 20 20 20 20 20 20 20 ┆ GO TO A900; ┆ 0x1b625…1b645 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1b645…1b654 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1b654…1b674 (25, 0, 32) 20 20 20 20 20 41 38 35 30 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ A850: ┆ 0x1b674…1b694 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1b694…1b6a3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1b6a3…1b6c3 (25, 0, 33) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 20 28 44 29 20 53 4b 49 50 20 ┆ PUT FILE (D) SKIP ┆ 0x1b6c3…1b6e3 45 44 49 54 20 28 27 44 49 4e 41 20 53 49 46 46 52 4f 52 20 20 20 4d 49 4e 41 20 53 49 46 46 52 ┆EDIT ('DINA SIFFROR MINA SIFFR┆ 0x1b6e3…1b6f2 4f 52 27 29 20 28 41 28 34 37 29 29 3b 20 20 ┆OR') (A(47)); ┆ 0x1b6f2…1b712 (25, 0, 34) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 20 28 44 29 20 45 44 49 54 20 ┆ PUT FILE (D) EDIT ┆ 0x1b712…1b732 28 27 31 30 2c 31 31 27 29 20 28 41 28 35 29 29 20 28 27 20 20 20 20 20 20 20 20 20 20 31 32 20 ┆('10,11') (A(5)) (' 12 ┆ 0x1b732…1b741 20 20 27 29 20 20 20 20 20 20 20 20 20 20 20 ┆ ') ┆ 0x1b741…1b761 (25, 0, 35) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 41 28 31 36 ┆ (A(16┆ 0x1b761…1b781 29 29 20 28 27 20 27 29 20 28 41 28 32 36 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆)) (' ') (A(26)); ┆ 0x1b781…1b790 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1b790…1b7b0 (25, 0, 36) 20 20 20 20 20 41 39 30 30 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ A900: ┆ 0x1b7b0…1b7d0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1b7d0…1b7df 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1b7df…1b7ff (25, 0, 37) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 47 45 54 20 4c 49 53 54 20 28 44 53 35 29 3b 20 20 20 ┆ GET LIST (DS5); ┆ 0x1b7ff…1b81f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1b81f…1b82e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1b82e…1b84e (25, 0, 38) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 44 53 35 20 3d 20 27 31 33 20 20 20 27 20 54 ┆ IF DS5 = '13 ' T┆ 0x1b84e…1b86e 48 45 4e 20 47 4f 20 54 4f 20 41 31 30 30 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆HEN GO TO A1000; ┆ 0x1b86e…1b87d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1b87d…1b89d (25, 0, 39) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 44 53 35 20 3d 20 27 20 31 33 20 27 20 54 48 ┆ IF DS5 = ' 13 ' TH┆ 0x1b89d…1b8bd 45 4e 20 47 4f 20 54 4f 20 41 31 30 30 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆EN GO TO A1000; ┆ 0x1b8bd…1b8cc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1b8cc…1b8ec (25, 0, 40) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 44 53 35 20 3d 20 27 20 20 31 33 27 20 54 48 ┆ IF DS5 = ' 13' TH┆ 0x1b8ec…1b90c 45 4e 20 47 4f 20 54 4f 20 41 31 30 30 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆EN GO TO A1000; ┆ 0x1b90c…1b91b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1b91b…1b93b (25, 0, 41) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 44 53 35 20 3d 20 27 31 33 31 34 27 20 54 48 ┆ IF DS5 = '1314' TH┆ 0x1b93b…1b95b 45 4e 20 47 4f 20 54 4f 20 41 31 30 35 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆EN GO TO A1050; ┆ 0x1b95b…1b96a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1b96a…1b98a (25, 0, 42) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 41 31 35 30 3b 20 20 20 20 20 20 20 ┆ GO TO A150; ┆ 0x1b98a…1b9aa 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1b9aa…1b9b9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1b9b9…1b9d9 (25, 0, 43) 20 20 20 20 20 41 31 30 30 30 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ A1000: ┆ 0x1b9d9…1b9f9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1b9f9…1ba08 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1ba08…1ba28 (25, 0, 44) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 20 28 44 29 20 53 4b 49 50 20 ┆ PUT FILE (D) SKIP ┆ 0x1ba28…1ba48 45 44 49 54 20 28 27 44 49 4e 41 20 53 49 46 46 52 4f 52 20 20 20 4d 49 4e 41 20 53 49 46 46 52 ┆EDIT ('DINA SIFFROR MINA SIFFR┆ 0x1ba48…1ba57 4f 52 27 29 20 28 41 28 34 37 29 29 3b 20 20 ┆OR') (A(47)); ┆ 0x1ba57…1ba77 (25, 0, 45) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 20 28 44 29 20 45 44 49 54 20 ┆ PUT FILE (D) EDIT ┆ 0x1ba77…1ba97 28 27 31 33 20 20 20 27 29 20 28 41 28 35 29 29 20 28 27 20 27 29 20 28 41 28 31 30 29 29 20 28 ┆('13 ') (A(5)) (' ') (A(10)) (┆ 0x1ba97…1baa6 27 31 34 2c 31 35 27 29 20 20 20 20 20 20 20 ┆'14,15') ┆ 0x1baa6…1bac6 (25, 0, 46) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 41 ┆ (A┆ 0x1bac6…1bae6 28 35 29 29 20 28 27 20 27 29 20 28 41 28 32 37 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆(5)) (' ') (A(27)); ┆ 0x1bae6…1baf5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1baf5…1bb15 (25, 0, 47) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 41 31 31 30 30 3b 20 20 20 20 20 20 ┆ GO TO A1100; ┆ 0x1bb15…1bb35 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1bb35…1bb44 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1bb44…1bb64 (25, 0, 48) 20 20 20 20 20 41 31 30 35 30 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ A1050: ┆ 0x1bb64…1bb84 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1bb84…1bb93 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1bb93…1bbb3 (25, 0, 49) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 20 28 44 29 20 53 4b 49 50 20 ┆ PUT FILE (D) SKIP ┆ 0x1bbb3…1bbd3 45 44 49 54 20 28 27 44 49 4e 41 20 53 49 46 46 52 4f 52 20 20 20 4d 49 4e 41 20 53 49 46 46 52 ┆EDIT ('DINA SIFFROR MINA SIFFR┆ 0x1bbd3…1bbe2 4f 52 27 29 20 28 41 28 34 37 29 29 3b 20 20 ┆OR') (A(47)); ┆ 0x1bbe2…1bc02 (25, 0, 50) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 20 28 44 29 20 45 44 49 54 20 ┆ PUT FILE (D) EDIT ┆ 0x1bc02…1bc22 28 27 31 33 2c 31 34 27 29 28 41 28 35 29 29 20 28 27 20 27 29 20 28 41 28 31 30 29 29 20 28 27 ┆('13,14')(A(5)) (' ') (A(10)) ('┆ 0x1bc22…1bc31 31 35 20 20 20 27 29 20 20 20 20 20 20 20 20 ┆15 ') ┆ 0x1bc31…1bc51 (25, 0, 51) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 41 ┆ (A┆ 0x1bc51…1bc71 28 35 29 29 20 28 27 20 27 29 20 28 41 28 32 36 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆(5)) (' ') (A(26)); ┆ 0x1bc71…1bc80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1bc80…1bca0 (25, 0, 52) 20 20 20 20 20 41 31 31 30 30 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ A1100: ┆ 0x1bca0…1bcc0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1bcc0…1bccf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1bccf…1bcef (25, 0, 53) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 47 45 54 20 4c 49 53 54 20 28 44 53 36 29 3b 20 20 20 ┆ GET LIST (DS6); ┆ 0x1bcef…1bd0f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1bd0f…1bd1e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1bd1e…1bd3e (25, 0, 54) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 44 53 36 20 3d 20 27 31 36 20 20 27 20 54 48 ┆ IF DS6 = '16 ' TH┆ 0x1bd3e…1bd5e 45 4e 20 47 4f 20 54 4f 20 41 31 32 30 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆EN GO TO A1200; ┆ 0x1bd5e…1bd6d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1bd6d…1bd8d (25, 0, 55) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 44 53 36 20 3d 20 27 20 31 36 20 27 20 54 48 ┆ IF DS6 = ' 16 ' TH┆ 0x1bd8d…1bdad 45 4e 20 47 4f 20 54 4f 20 41 31 32 30 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆EN GO TO A1200; ┆ 0x1bdad…1bdbc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1bdbc…1bddc (25, 0, 56) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 44 53 36 20 3d 20 27 20 20 31 36 27 20 54 48 ┆ IF DS6 = ' 16' TH┆ 0x1bddc…1bdfc 45 4e 20 47 4f 20 54 4f 20 41 31 32 30 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆EN GO TO A1200; ┆ 0x1bdfc…1be0b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1be0b…1be2b (25, 0, 57) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 44 53 36 20 3d 20 27 31 36 31 37 27 20 54 48 ┆ IF DS6 = '1617' TH┆ 0x1be2b…1be4b 45 4e 20 47 4f 20 54 4f 20 41 31 32 35 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆EN GO TO A1250; ┆ 0x1be4b…1be5a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1be5a…1be7a (25, 0, 58) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 41 31 35 30 3b 20 20 20 20 20 20 20 ┆ GO TO A150; ┆ 0x1be7a…1be9a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1be9a…1bea9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1bea9…1bec9 (25, 0, 59) 20 20 20 20 20 41 31 32 30 30 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ A1200: ┆ 0x1bec9…1bee9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1bee9…1bef8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1bef8…1bf18 (25, 0, 60) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 20 28 44 29 20 53 4b 49 50 20 ┆ PUT FILE (D) SKIP ┆ 0x1bf18…1bf38 45 44 49 54 20 28 27 44 49 4e 41 20 53 49 46 46 52 4f 52 20 20 20 4d 49 4e 41 20 53 49 46 46 4f ┆EDIT ('DINA SIFFROR MINA SIFFO┆ 0x1bf38…1bf47 52 4f 27 29 20 28 41 28 34 37 29 29 3b 20 20 ┆RO') (A(47)); ┆ 0x1bf47…1bf67 (25, 0, 61) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 20 28 44 29 20 45 44 49 54 20 ┆ PUT FILE (D) EDIT ┆ 0x1bf67…1bf87 28 27 31 36 20 20 20 27 29 20 28 41 28 35 29 29 20 28 27 20 27 29 20 28 41 28 31 30 29 29 20 28 ┆('16 ') (A(5)) (' ') (A(10)) (┆ 0x1bf87…1bf96 27 31 37 2c 31 38 27 29 20 20 20 20 20 20 20 ┆'17,18') ┆ 0x1bf96…1bfb6 (25, 0, 62) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 41 ┆ (A┆ 0x1bfb6…1bfd6 28 35 29 29 20 28 27 20 27 29 20 28 41 28 32 37 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆(5)) (' ') (A(27)); ┆ 0x1bfd6…1bfe5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1bfe5…1c005 (25, 0, 63) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 41 31 33 30 30 3b 20 20 20 20 20 20 ┆ GO TO A1300; ┆ 0x1c005…1c025 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1c025…1c034 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1c034…1c054 (25, 0, 64) 20 20 20 20 20 41 31 32 35 30 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ A1250: ┆ 0x1c054…1c074 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1c074…1c083 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1c083…1c0a3 (25, 0, 65) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 20 28 44 29 20 53 4b 49 50 20 ┆ PUT FILE (D) SKIP ┆ 0x1c0a3…1c0c3 45 44 49 54 20 28 27 44 49 4e 41 20 53 49 46 46 52 4f 52 20 20 20 4d 49 4e 41 20 53 49 46 46 52 ┆EDIT ('DINA SIFFROR MINA SIFFR┆ 0x1c0c3…1c0d2 4f 52 27 29 20 28 41 28 34 37 29 29 3b 20 20 ┆OR') (A(47)); ┆ 0x1c0d2…1c0f2 (25, 0, 66) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 20 28 44 29 20 45 44 49 54 20 ┆ PUT FILE (D) EDIT ┆ 0x1c0f2…1c112 28 27 31 36 2c 31 37 27 29 20 28 41 28 35 29 29 20 28 27 20 27 29 20 28 41 28 31 30 29 29 20 28 ┆('16,17') (A(5)) (' ') (A(10)) (┆ 0x1c112…1c121 27 31 38 20 20 20 27 29 20 20 20 20 20 20 20 ┆'18 ') ┆ 0x1c121…1c141 (25, 0, 67) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 41 28 35 29 ┆ (A(5)┆ 0x1c141…1c161 29 20 28 27 20 27 29 20 28 41 28 32 36 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆) (' ') (A(26)); ┆ 0x1c161…1c170 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1c170…1c190 (25, 0, 68) 20 20 20 20 20 41 31 33 30 30 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ A1300: ┆ 0x1c190…1c1b0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1c1b0…1c1bf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1c1bf…1c1df (25, 0, 69) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 47 45 54 20 4c 49 53 54 20 28 44 53 37 29 3b 20 20 20 ┆ GET LIST (DS7); ┆ 0x1c1df…1c1ff 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1c1ff…1c20e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1c20e…1c22e (25, 0, 70) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 44 53 37 20 3d 20 27 31 39 20 20 27 20 54 48 ┆ IF DS7 = '19 ' TH┆ 0x1c22e…1c24e 45 4e 20 47 4f 20 54 4f 20 41 31 34 30 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆EN GO TO A1400; ┆ 0x1c24e…1c25d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1c25d…1c27d (25, 0, 71) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 44 53 37 20 3d 20 27 20 31 39 20 27 20 54 48 ┆ IF DS7 = ' 19 ' TH┆ 0x1c27d…1c29d 45 4e 20 47 4f 20 54 4f 20 41 31 34 30 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆EN GO TO A1400; ┆ 0x1c29d…1c2ac 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1c2ac…1c2cc (25, 0, 72) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 44 53 37 20 3d 20 27 20 20 31 39 27 20 54 48 ┆ IF DS7 = ' 19' TH┆ 0x1c2cc…1c2ec 45 4e 20 47 4f 20 54 4f 20 41 31 34 30 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆EN GO TO A1400; ┆ 0x1c2ec…1c2fb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1c2fb…1c31b (25, 0, 73) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 44 53 37 20 3d 20 27 31 39 32 30 27 20 54 48 ┆ IF DS7 = '1920' TH┆ 0x1c31b…1c33b 45 4e 20 47 4f 20 54 4f 20 41 31 34 35 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆EN GO TO A1450; ┆ 0x1c33b…1c34a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1c34a…1c36a (25, 0, 74) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 41 31 35 30 3b 20 20 20 20 20 20 20 ┆ GO TO A150; ┆ 0x1c36a…1c38a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1c38a…1c399 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1c399…1c3b9 (25, 0, 75) 20 20 20 20 20 41 31 34 30 30 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ A1400: ┆ 0x1c3b9…1c3d9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1c3d9…1c3e8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1c3e8…1c408 (25, 0, 76) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 20 28 44 29 20 53 4b 49 50 20 ┆ PUT FILE (D) SKIP ┆ 0x1c408…1c428 45 44 49 54 20 28 27 44 49 4e 41 20 53 49 46 46 52 4f 52 20 20 20 4d 49 4e 41 20 53 49 46 46 52 ┆EDIT ('DINA SIFFROR MINA SIFFR┆ 0x1c428…1c437 4f 52 27 29 20 28 41 28 34 37 29 29 3b 20 20 ┆OR') (A(47)); ┆ 0x1c437…1c457 (25, 0, 77) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 20 28 44 29 20 45 44 49 54 20 ┆ PUT FILE (D) EDIT ┆ 0x1c457…1c477 28 27 31 39 20 20 20 27 29 20 28 41 28 35 29 29 20 28 27 20 27 29 20 28 41 28 31 30 29 29 20 28 ┆('19 ') (A(5)) (' ') (A(10)) (┆ 0x1c477…1c486 27 32 30 2c 32 31 27 29 20 20 20 20 20 20 20 ┆'20,21') ┆ 0x1c486…1c4a6 (25, 0, 78) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 41 28 35 29 ┆ (A(5)┆ 0x1c4a6…1c4c6 29 20 28 27 20 27 29 20 28 41 28 32 37 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆) (' ') (A(27)); ┆ 0x1c4c6…1c4d5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1c4d5…1c4f5 (25, 0, 79) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 41 31 35 30 30 3b 20 20 20 20 20 20 ┆ GO TO A1500; ┆ 0x1c4f5…1c515 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1c515…1c524 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1c524…1c544 (25, 0, 80) 20 20 20 20 20 41 31 34 35 30 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ A1450: ┆ 0x1c544…1c564 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1c564…1c573 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1c573…1c593 (25, 0, 81) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 20 28 44 29 20 53 4b 49 50 20 ┆ PUT FILE (D) SKIP ┆ 0x1c593…1c5b3 45 44 49 54 20 28 27 44 49 4e 41 20 53 49 46 46 52 4f 52 20 20 20 4d 49 4e 41 20 53 49 46 46 52 ┆EDIT ('DINA SIFFROR MINA SIFFR┆ 0x1c5b3…1c5c2 4f 52 27 29 20 28 41 28 34 37 29 29 3b 20 20 ┆OR') (A(47)); ┆ 0x1c5c2…1c5e2 (26, 0, 0) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 20 28 44 29 20 45 44 49 54 20 ┆ PUT FILE (D) EDIT ┆ 0x1c5e2…1c602 28 27 31 39 2c 32 30 27 29 20 28 41 28 35 29 29 20 28 27 20 27 29 20 28 41 28 31 30 29 29 20 28 ┆('19,20') (A(5)) (' ') (A(10)) (┆ 0x1c602…1c611 27 32 31 20 20 20 27 29 20 20 20 20 20 20 20 ┆'21 ') ┆ 0x1c611…1c631 (26, 0, 1) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 41 28 35 ┆ (A(5┆ 0x1c631…1c651 29 29 20 28 27 20 27 29 20 28 41 28 32 36 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆)) (' ') (A(26)); ┆ 0x1c651…1c660 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1c660…1c680 (26, 0, 2) 20 20 20 20 20 41 31 35 30 30 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ A1500: ┆ 0x1c680…1c6a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1c6a0…1c6af 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1c6af…1c6cf (26, 0, 3) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 20 28 44 29 20 45 44 49 54 20 ┆ PUT FILE (D) EDIT ┆ 0x1c6cf…1c6ef 28 27 42 45 4b 4c 41 47 41 52 2c 20 4d 45 4e 20 44 55 20 46 5c 52 4c 4f 52 41 44 45 27 29 20 28 ┆('BEKLAGAR, MEN DU FÖRLORADE') (┆ 0x1c6ef…1c6fe 41 28 34 37 29 29 3b 20 20 20 20 20 20 20 20 ┆A(47)); ┆ 0x1c6fe…1c71e (26, 0, 4) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 20 28 44 29 20 45 44 49 54 20 ┆ PUT FILE (D) EDIT ┆ 0x1c71e…1c73e 28 27 53 4b 41 20 56 49 20 46 5c 52 53 5c 4b 41 20 49 47 45 4e 2c 20 4a 20 65 6c 6c 65 72 20 4e ┆('SKA VI FÖRSÖKA IGEN, J eller N┆ 0x1c73e…1c74d 20 3f 27 29 20 28 41 28 34 36 29 29 3b 20 20 ┆ ?') (A(46)); ┆ 0x1c74d…1c76d (26, 0, 5) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 47 45 54 20 4c 49 53 54 20 28 53 56 41 52 29 3b 20 20 ┆ GET LIST (SVAR); ┆ 0x1c76d…1c78d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1c78d…1c79c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1c79c…1c7bc (26, 0, 6) 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 53 56 41 52 20 3d 20 27 4a 27 20 54 48 45 4e 20 47 ┆ IF SVAR = 'J' THEN G┆ 0x1c7bc…1c7dc 4f 20 54 4f 20 41 31 30 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆O TO A100; ┆ 0x1c7dc…1c7eb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1c7eb…1c80b (26, 0, 7) 20 20 20 44 39 39 39 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ D999: ┆ 0x1c80b…1c82b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1c82b…1c83a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1c83a…1c85a (26, 0, 8) 20 20 20 20 20 20 20 20 20 20 20 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ END; ┆ 0x1c85a…1c87a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1c87a…1c889 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1c889…1c8d8 (26, 0, 9) 0x20[0x4f] 0x1c8d8…1c8f8 (26, 0, 10) 20 20 20 20 20 41 36 30 30 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ A600: ┆ 0x1c8f8…1c918 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1c918…1c927 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1c927…1c947 (26, 0, 11) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 20 28 44 29 20 53 4b 49 50 20 ┆ PUT FILE (D) SKIP ┆ 0x1c947…1c967 45 44 49 54 20 28 27 44 49 4e 41 20 53 49 46 46 52 4f 52 20 20 20 4d 49 4e 41 20 53 49 46 46 52 ┆EDIT ('DINA SIFFROR MINA SIFFR┆ 0x1c967…1c976 4f 52 27 29 20 28 41 28 34 37 29 29 3b 20 20 ┆OR') (A(47)); ┆ 0x1c976…1c996 (26, 0, 12) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 20 28 44 29 20 45 44 49 54 20 ┆ PUT FILE (D) EDIT ┆ 0x1c996…1c9b6 28 27 20 37 20 20 20 27 29 20 28 41 28 35 29 29 20 28 27 20 20 20 20 20 20 20 20 20 20 20 38 2c ┆(' 7 ') (A(5)) (' 8,┆ 0x1c9b6…1c9c5 20 39 27 29 20 28 41 28 31 36 29 29 20 20 20 ┆ 9') (A(16)) ┆ 0x1c9c5…1c9e5 (26, 0, 13) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1c9e5…1ca05 28 27 20 27 29 20 28 41 28 32 36 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆(' ') (A(26)); ┆ 0x1ca05…1ca14 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1ca14…1ca34 (26, 0, 14) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 41 37 30 30 3b 20 20 20 20 20 20 20 ┆ GO TO A700; ┆ 0x1ca34…1ca54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1ca54…1ca63 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1ca63…1ca83 (26, 0, 15) 20 20 20 20 20 41 36 35 30 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ A650: ┆ 0x1ca83…1caa3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1caa3…1cab2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1cab2…1cad2 (26, 0, 16) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 20 28 44 29 20 53 4b 49 50 20 ┆ PUT FILE (D) SKIP ┆ 0x1cad2…1caf2 45 44 49 54 20 28 27 44 49 4e 41 20 53 49 46 46 52 4f 52 20 20 20 4d 49 4e 41 20 53 49 46 46 52 ┆EDIT ('DINA SIFFROR MINA SIFFR┆ 0x1caf2…1cb01 4f 52 27 29 20 28 41 34 37 29 29 3b 20 20 20 ┆OR') (A47)); ┆ 0x1cb01…1cb21 (26, 0, 17) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 20 28 44 29 20 45 44 49 54 20 ┆ PUT FILE (D) EDIT ┆ 0x1cb21…1cb41 28 27 20 37 2c 20 38 27 29 20 28 41 28 35 29 29 20 28 27 20 20 20 20 20 20 20 20 20 20 20 39 20 ┆(' 7, 8') (A(5)) (' 9 ┆ 0x1cb41…1cb50 20 20 27 29 20 20 20 20 20 20 20 20 20 20 20 ┆ ') ┆ 0x1cb50…1cb70 (26, 0, 18) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 41 ┆ (A┆ 0x1cb70…1cb90 28 31 36 29 29 20 28 27 20 27 29 20 28 41 28 32 36 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆(16)) (' ') (A(26)); ┆ 0x1cb90…1cb9f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1cb9f…1cbbf (26, 0, 19) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 41 37 30 30 3b 20 20 20 20 20 20 20 ┆ GO TO A700; ┆ 0x1cbbf…1cbdf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1cbdf…1cbee 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1cbee…1cc0e (26, 0, 20) 20 20 20 20 20 41 37 30 30 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ A700: ┆ 0x1cc0e…1cc2e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1cc2e…1cc3d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1cc3d…1cc5d (26, 0, 21) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 47 45 54 20 4c 49 53 54 20 28 44 53 34 29 3b 20 20 20 ┆ GET LIST (DS4); ┆ 0x1cc5d…1cc7d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1cc7d…1cc8c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1cc8c…1ccac (26, 0, 22) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 44 53 34 20 3d 20 27 31 30 20 20 27 20 54 48 ┆ IF DS4 = '10 ' TH┆ 0x1ccac…1cccc 45 4e 20 47 4f 20 54 4f 20 41 38 30 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆EN GO TO A800; ┆ 0x1cccc…1ccdb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1ccdb…1ccfb (26, 0, 23) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 44 53 34 20 3d 20 27 20 31 30 20 27 20 54 48 ┆ IF DS4 = ' 10 ' TH┆ 0x1ccfb…1cd1b 45 4e 20 47 4f 20 54 4f 20 41 38 30 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆EN GO TO A800; ┆ 0x1cd1b…1cd2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1cd2a…1cd4a (26, 0, 24) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 44 53 34 20 3d 20 27 20 20 31 30 27 20 54 48 ┆ IF DS4 = ' 10' TH┆ 0x1cd4a…1cd6a 45 4e 20 47 4f 20 54 4f 20 41 38 30 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆EN GO TO A800; ┆ 0x1cd6a…1cd79 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1cd79…1cd99 (26, 0, 25) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 44 53 34 20 3d 20 27 31 30 31 31 27 20 54 48 ┆ IF DS4 = '1011' TH┆ 0x1cd99…1cdb9 45 4e 20 47 4f 20 54 4f 20 41 38 35 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆EN GO TO A850; ┆ 0x1cdb9…1cdc8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1cdc8…1cde8 (26, 0, 26) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 41 31 35 30 3b 20 20 20 20 20 20 20 ┆ GO TO A150; ┆ 0x1cde8…1ce08 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1ce08…1ce17 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1ce17…1ce37 (26, 0, 27) 20 20 20 20 20 41 38 30 30 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ A800: ┆ 0x1ce37…1ce57 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1ce57…1ce66 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1ce66…1ce86 (26, 0, 28) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 20 28 44 29 20 53 4b 49 50 20 ┆ PUT FILE (D) SKIP ┆ 0x1ce86…1cea6 45 44 49 54 20 28 27 44 49 4e 41 20 53 49 46 46 52 4f 52 20 20 20 4d 49 4e 41 20 53 49 46 46 52 ┆EDIT ('DINA SIFFROR MINA SIFFR┆ 0x1cea6…1ceb5 4f 52 27 29 20 28 41 28 34 37 29 29 3b 20 20 ┆OR') (A(47)); ┆ 0x1ceb5…1ced5 (26, 0, 29) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 20 28 44 29 20 45 44 49 54 20 ┆ PUT FILE (D) EDIT ┆ 0x1ced5…1cef5 28 27 31 30 20 20 20 27 29 28 41 28 35 29 29 20 28 27 20 27 29 20 28 41 28 31 30 29 29 20 28 27 ┆('10 ')(A(5)) (' ') (A(10)) ('┆ 0x1cef5…1cf04 31 31 2c 31 32 27 29 20 20 20 20 20 20 20 20 ┆11,12') ┆ 0x1cf04…1cf24 (26, 0, 30) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 ┆ (┆ 0x1cf24…1cf44 41 28 35 29 29 20 28 27 20 27 29 20 28 41 28 32 37 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆A(5)) (' ') (A(27)); ┆ 0x1cf44…1cf53 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1cf53…1cf73 (26, 0, 31) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 41 39 30 30 3b 20 20 20 20 20 20 20 ┆ GO TO A900; ┆ 0x1cf73…1cf93 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1cf93…1cfa2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1cfa2…1cfc2 (26, 0, 32) 20 20 20 20 20 41 38 35 30 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ A850: ┆ 0x1cfc2…1cfe2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1cfe2…1cff1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1cff1…1d011 (26, 0, 33) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 20 28 44 29 20 53 4b 49 50 20 ┆ PUT FILE (D) SKIP ┆ 0x1d011…1d031 45 44 49 54 20 28 27 44 49 4e 41 20 53 49 46 46 52 4f 52 20 20 20 4d 49 4e 41 20 53 49 46 46 52 ┆EDIT ('DINA SIFFROR MINA SIFFR┆ 0x1d031…1d040 4f 52 27 29 20 28 41 28 34 37 29 29 3b 20 20 ┆OR') (A(47)); ┆ 0x1d040…1d060 (26, 0, 34) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 20 28 44 29 20 45 44 49 54 20 ┆ PUT FILE (D) EDIT ┆ 0x1d060…1d080 28 27 31 30 2c 31 31 27 29 20 28 41 28 35 29 29 20 28 27 20 20 20 20 20 20 20 20 20 20 31 32 20 ┆('10,11') (A(5)) (' 12 ┆ 0x1d080…1d08f 20 20 27 29 20 20 20 20 20 20 20 20 20 20 20 ┆ ') ┆ 0x1d08f…1d0af (26, 0, 35) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 41 28 31 36 ┆ (A(16┆ 0x1d0af…1d0cf 29 29 20 28 27 20 27 29 20 28 41 28 32 36 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆)) (' ') (A(26)); ┆ 0x1d0cf…1d0de 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1d0de…1d0fe (26, 0, 36) 20 20 20 20 20 41 39 30 30 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ A900: ┆ 0x1d0fe…1d11e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1d11e…1d12d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1d12d…1d14d (26, 0, 37) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 47 45 54 20 4c 49 53 54 20 28 44 53 35 29 3b 20 20 20 ┆ GET LIST (DS5); ┆ 0x1d14d…1d16d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1d16d…1d17c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1d17c…1d19c (26, 0, 38) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 44 53 35 20 3d 20 27 31 33 20 20 20 27 20 54 ┆ IF DS5 = '13 ' T┆ 0x1d19c…1d1bc 48 45 4e 20 47 4f 20 54 4f 20 41 31 30 30 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆HEN GO TO A1000; ┆ 0x1d1bc…1d1cb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1d1cb…1d1eb (26, 0, 39) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 44 53 35 20 3d 20 27 20 31 33 20 27 20 54 48 ┆ IF DS5 = ' 13 ' TH┆ 0x1d1eb…1d20b 45 4e 20 47 4f 20 54 4f 20 41 31 30 30 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆EN GO TO A1000; ┆ 0x1d20b…1d21a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1d21a…1d23a (26, 0, 40) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 44 53 35 20 3d 20 27 20 20 31 33 27 20 54 48 ┆ IF DS5 = ' 13' TH┆ 0x1d23a…1d25a 45 4e 20 47 4f 20 54 4f 20 41 31 30 30 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆EN GO TO A1000; ┆ 0x1d25a…1d269 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1d269…1d289 (26, 0, 41) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 44 53 35 20 3d 20 27 31 33 31 34 27 20 54 48 ┆ IF DS5 = '1314' TH┆ 0x1d289…1d2a9 45 4e 20 47 4f 20 54 4f 20 41 31 30 35 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆EN GO TO A1050; ┆ 0x1d2a9…1d2b8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1d2b8…1d2d8 (26, 0, 42) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 41 31 35 30 3b 20 20 20 20 20 20 20 ┆ GO TO A150; ┆ 0x1d2d8…1d2f8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1d2f8…1d307 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1d307…1d327 (26, 0, 43) 20 20 20 20 20 41 31 30 30 30 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ A1000: ┆ 0x1d327…1d347 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1d347…1d356 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1d356…1d376 (26, 0, 44) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 20 28 44 29 20 53 4b 49 50 20 ┆ PUT FILE (D) SKIP ┆ 0x1d376…1d396 45 44 49 54 20 28 27 44 49 4e 41 20 53 49 46 46 52 4f 52 20 20 20 4d 49 4e 41 20 53 49 46 46 52 ┆EDIT ('DINA SIFFROR MINA SIFFR┆ 0x1d396…1d3a5 4f 52 27 29 20 28 41 28 34 37 29 29 3b 20 20 ┆OR') (A(47)); ┆ 0x1d3a5…1d3c5 (26, 0, 45) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 20 28 44 29 20 45 44 49 54 20 ┆ PUT FILE (D) EDIT ┆ 0x1d3c5…1d3e5 28 27 31 33 20 20 20 27 29 20 28 41 28 35 29 29 20 28 27 20 27 29 20 28 41 28 31 30 29 29 20 28 ┆('13 ') (A(5)) (' ') (A(10)) (┆ 0x1d3e5…1d3f4 27 31 34 2c 31 35 27 29 20 20 20 20 20 20 20 ┆'14,15') ┆ 0x1d3f4…1d414 (26, 0, 46) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 41 ┆ (A┆ 0x1d414…1d434 28 35 29 29 20 28 27 20 27 29 20 28 41 28 32 37 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆(5)) (' ') (A(27)); ┆ 0x1d434…1d443 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1d443…1d463 (26, 0, 47) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 41 31 31 30 30 3b 20 20 20 20 20 20 ┆ GO TO A1100; ┆ 0x1d463…1d483 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1d483…1d492 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1d492…1d4b2 (26, 0, 48) 20 20 20 20 20 41 31 30 35 30 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ A1050: ┆ 0x1d4b2…1d4d2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1d4d2…1d4e1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1d4e1…1d501 (26, 0, 49) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 20 28 44 29 20 53 4b 49 50 20 ┆ PUT FILE (D) SKIP ┆ 0x1d501…1d521 45 44 49 54 20 28 27 44 49 4e 41 20 53 49 46 46 52 4f 52 20 20 20 4d 49 4e 41 20 53 49 46 46 52 ┆EDIT ('DINA SIFFROR MINA SIFFR┆ 0x1d521…1d530 4f 52 27 29 20 28 41 28 34 37 29 29 3b 20 20 ┆OR') (A(47)); ┆ 0x1d530…1d550 (26, 0, 50) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 20 28 44 29 20 45 44 49 54 20 ┆ PUT FILE (D) EDIT ┆ 0x1d550…1d570 28 27 31 33 2c 31 34 27 29 28 41 28 35 29 29 20 28 27 20 27 29 20 28 41 28 31 30 29 29 20 28 27 ┆('13,14')(A(5)) (' ') (A(10)) ('┆ 0x1d570…1d57f 31 35 20 20 20 27 29 20 20 20 20 20 20 20 20 ┆15 ') ┆ 0x1d57f…1d59f (26, 0, 51) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 41 ┆ (A┆ 0x1d59f…1d5bf 28 35 29 29 20 28 27 20 27 29 20 28 41 28 32 36 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆(5)) (' ') (A(26)); ┆ 0x1d5bf…1d5ce 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1d5ce…1d5ee (26, 0, 52) 20 20 20 20 20 41 31 31 30 30 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ A1100: ┆ 0x1d5ee…1d60e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1d60e…1d61d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1d61d…1d63d (26, 0, 53) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 47 45 54 20 4c 49 53 54 20 28 44 53 36 29 3b 20 20 20 ┆ GET LIST (DS6); ┆ 0x1d63d…1d65d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1d65d…1d66c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1d66c…1d68c (26, 0, 54) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 44 53 36 20 3d 20 27 31 36 20 20 27 20 54 48 ┆ IF DS6 = '16 ' TH┆ 0x1d68c…1d6ac 45 4e 20 47 4f 20 54 4f 20 41 31 32 30 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆EN GO TO A1200; ┆ 0x1d6ac…1d6bb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1d6bb…1d6db (26, 0, 55) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 44 53 36 20 3d 20 27 20 31 36 20 27 20 54 48 ┆ IF DS6 = ' 16 ' TH┆ 0x1d6db…1d6fb 45 4e 20 47 4f 20 54 4f 20 41 31 32 30 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆EN GO TO A1200; ┆ 0x1d6fb…1d70a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1d70a…1d72a (26, 0, 56) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 44 53 36 20 3d 20 27 20 20 31 36 27 20 54 48 ┆ IF DS6 = ' 16' TH┆ 0x1d72a…1d74a 45 4e 20 47 4f 20 54 4f 20 41 31 32 30 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆EN GO TO A1200; ┆ 0x1d74a…1d759 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1d759…1d779 (26, 0, 57) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 44 53 36 20 3d 20 27 31 36 31 37 27 20 54 48 ┆ IF DS6 = '1617' TH┆ 0x1d779…1d799 45 4e 20 47 4f 20 54 4f 20 41 31 32 35 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆EN GO TO A1250; ┆ 0x1d799…1d7a8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1d7a8…1d7c8 (26, 0, 58) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 41 31 35 30 3b 20 20 20 20 20 20 20 ┆ GO TO A150; ┆ 0x1d7c8…1d7e8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1d7e8…1d7f7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1d7f7…1d817 (26, 0, 59) 20 20 20 20 20 41 31 32 30 30 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ A1200: ┆ 0x1d817…1d837 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1d837…1d846 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1d846…1d866 (26, 0, 60) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 20 28 44 29 20 53 4b 49 50 20 ┆ PUT FILE (D) SKIP ┆ 0x1d866…1d886 45 44 49 54 20 28 27 44 49 4e 41 20 53 49 46 46 52 4f 52 20 20 20 4d 49 4e 41 20 53 49 46 46 4f ┆EDIT ('DINA SIFFROR MINA SIFFO┆ 0x1d886…1d895 52 4f 27 29 20 28 41 28 34 37 29 29 3b 20 20 ┆RO') (A(47)); ┆ 0x1d895…1d8b5 (26, 0, 61) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 20 28 44 29 20 45 44 49 54 20 ┆ PUT FILE (D) EDIT ┆ 0x1d8b5…1d8d5 28 27 31 36 20 20 20 27 29 20 28 41 28 35 29 29 20 28 27 20 27 29 20 28 41 28 31 30 29 29 20 28 ┆('16 ') (A(5)) (' ') (A(10)) (┆ 0x1d8d5…1d8e4 27 31 37 2c 31 38 27 29 20 20 20 20 20 20 20 ┆'17,18') ┆ 0x1d8e4…1d904 (26, 0, 62) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 41 ┆ (A┆ 0x1d904…1d924 28 35 29 29 20 28 27 20 27 29 20 28 41 28 32 37 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆(5)) (' ') (A(27)); ┆ 0x1d924…1d933 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1d933…1d953 (26, 0, 63) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 41 31 33 30 30 3b 20 20 20 20 20 20 ┆ GO TO A1300; ┆ 0x1d953…1d973 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1d973…1d982 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1d982…1d9a2 (26, 0, 64) 20 20 20 20 20 41 31 32 35 30 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ A1250: ┆ 0x1d9a2…1d9c2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1d9c2…1d9d1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1d9d1…1d9f1 (26, 0, 65) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 20 28 44 29 20 53 4b 49 50 20 ┆ PUT FILE (D) SKIP ┆ 0x1d9f1…1da11 45 44 49 54 20 28 27 44 49 4e 41 20 53 49 46 46 52 4f 52 20 20 20 4d 49 4e 41 20 53 49 46 46 52 ┆EDIT ('DINA SIFFROR MINA SIFFR┆ 0x1da11…1da20 4f 52 27 29 20 28 41 28 34 37 29 29 3b 20 20 ┆OR') (A(47)); ┆ 0x1da20…1da40 (26, 0, 66) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 20 28 44 29 20 45 44 49 54 20 ┆ PUT FILE (D) EDIT ┆ 0x1da40…1da60 28 27 31 36 2c 31 37 27 29 20 28 41 28 35 29 29 20 28 27 20 27 29 20 28 41 28 31 30 29 29 20 28 ┆('16,17') (A(5)) (' ') (A(10)) (┆ 0x1da60…1da6f 27 31 38 20 20 20 27 29 20 20 20 20 20 20 20 ┆'18 ') ┆ 0x1da6f…1da8f (26, 0, 67) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 41 28 35 29 ┆ (A(5)┆ 0x1da8f…1daaf 29 20 28 27 20 27 29 20 28 41 28 32 36 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆) (' ') (A(26)); ┆ 0x1daaf…1dabe 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1dabe…1dade (26, 0, 68) 20 20 20 20 20 41 31 33 30 30 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ A1300: ┆ 0x1dade…1dafe 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1dafe…1db0d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1db0d…1db2d (26, 0, 69) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 47 45 54 20 4c 49 53 54 20 28 44 53 37 29 3b 20 20 20 ┆ GET LIST (DS7); ┆ 0x1db2d…1db4d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1db4d…1db5c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1db5c…1db7c (26, 0, 70) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 44 53 37 20 3d 20 27 31 39 20 20 27 20 54 48 ┆ IF DS7 = '19 ' TH┆ 0x1db7c…1db9c 45 4e 20 47 4f 20 54 4f 20 41 31 34 30 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆EN GO TO A1400; ┆ 0x1db9c…1dbab 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1dbab…1dbcb (26, 0, 71) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 44 53 37 20 3d 20 27 20 31 39 20 27 20 54 48 ┆ IF DS7 = ' 19 ' TH┆ 0x1dbcb…1dbeb 45 4e 20 47 4f 20 54 4f 20 41 31 34 30 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆EN GO TO A1400; ┆ 0x1dbeb…1dbfa 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1dbfa…1dc1a (26, 0, 72) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 44 53 37 20 3d 20 27 20 20 31 39 27 20 54 48 ┆ IF DS7 = ' 19' TH┆ 0x1dc1a…1dc3a 45 4e 20 47 4f 20 54 4f 20 41 31 34 30 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆EN GO TO A1400; ┆ 0x1dc3a…1dc49 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1dc49…1dc69 (26, 0, 73) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 46 20 44 53 37 20 3d 20 27 31 39 32 30 27 20 54 48 ┆ IF DS7 = '1920' TH┆ 0x1dc69…1dc89 45 4e 20 47 4f 20 54 4f 20 41 31 34 35 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆EN GO TO A1450; ┆ 0x1dc89…1dc98 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1dc98…1dcb8 (26, 0, 74) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 41 31 35 30 3b 20 20 20 20 20 20 20 ┆ GO TO A150; ┆ 0x1dcb8…1dcd8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1dcd8…1dce7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1dce7…1dd07 (26, 0, 75) 20 20 20 20 20 41 31 34 30 30 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ A1400: ┆ 0x1dd07…1dd27 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1dd27…1dd36 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1dd36…1dd56 (26, 0, 76) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 20 28 44 29 20 53 4b 49 50 20 ┆ PUT FILE (D) SKIP ┆ 0x1dd56…1dd76 45 44 49 54 20 28 27 44 49 4e 41 20 53 49 46 46 52 4f 52 20 20 20 4d 49 4e 41 20 53 49 46 46 52 ┆EDIT ('DINA SIFFROR MINA SIFFR┆ 0x1dd76…1dd85 4f 52 27 29 20 28 41 28 34 37 29 29 3b 20 20 ┆OR') (A(47)); ┆ 0x1dd85…1dda5 (26, 0, 77) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 20 28 44 29 20 45 44 49 54 20 ┆ PUT FILE (D) EDIT ┆ 0x1dda5…1ddc5 28 27 31 39 20 20 20 27 29 20 28 41 28 35 29 29 20 28 27 20 27 29 20 28 41 28 31 30 29 29 20 28 ┆('19 ') (A(5)) (' ') (A(10)) (┆ 0x1ddc5…1ddd4 27 32 30 2c 32 31 27 29 20 20 20 20 20 20 20 ┆'20,21') ┆ 0x1ddd4…1ddf4 (26, 0, 78) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 41 28 35 29 ┆ (A(5)┆ 0x1ddf4…1de14 29 20 28 27 20 27 29 20 28 41 28 32 37 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆) (' ') (A(27)); ┆ 0x1de14…1de23 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1de23…1de43 (26, 0, 79) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 47 4f 20 54 4f 20 41 31 35 30 30 3b 20 20 20 20 20 20 ┆ GO TO A1500; ┆ 0x1de43…1de63 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1de63…1de72 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1de72…1de92 (26, 0, 80) 20 20 20 20 20 41 31 34 35 30 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ A1450: ┆ 0x1de92…1deb2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1deb2…1dec1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x1dec1…1dee1 (26, 0, 81) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 55 54 20 46 49 4c 45 20 28 44 29 20 53 4b 49 50 20 ┆ PUT FILE (D) SKIP ┆ 0x1dee1…1df01 45 44 49 54 20 28 27 44 49 4e 41 20 53 49 46 46 52 4f 52 20 20 20 4d 49 4e 41 20 53 49 46 46 52 ┆EDIT ('DINA SIFFROR MINA SIFFR┆ 0x1df01…1df10 4f 52 27 29 20 28 41 28 34 37 29 29 3b 20 20 ┆OR') (A(47)); ┆ 0x1df10…1df5f (27, 0, 0) DataSector[0x4f] […0x87…] 0x20908…20928 (28, 0, 54) 20 50 32 32 3a 44 4c 49 4e 3d 43 4c 49 4e 20 43 41 54 20 27 20 20 20 27 3b 50 32 33 3a 20 4c 49 ┆ P22:DLIN=CLIN CAT ' ';P23: LI┆ 0x20928…20948 4e 45 28 4c 4c 29 3d 44 4c 49 4e 20 43 41 54 20 42 4c 49 4e 3b 20 20 20 20 20 20 20 20 20 20 20 ┆NE(LL)=DLIN CAT BLIN; ┆ 0x20948…20957 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x20957…20977 (28, 0, 55) 50 50 3a 20 4c 4c 3d 4c 4c 2b 31 3b 20 52 45 54 55 52 4e 3b 20 45 4e 44 3b 20 20 20 20 20 20 20 ┆PP: LL=LL+1; RETURN; END; ┆ 0x20977…20997 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x20997…209a6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x209a6…209c6 (28, 0, 56) 2f 2a 20 20 4d 41 49 4e 20 50 52 4f 47 52 41 4d 20 53 54 41 52 54 53 20 20 2a 2f 20 20 20 20 20 ┆/* MAIN PROGRAM STARTS */ ┆ 0x209c6…209e6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x209e6…209f5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x209f5…20a15 (28, 0, 57) 52 55 4c 45 3a 43 41 4c 4c 20 4b 45 59 46 55 4e 28 4b 4b 4b 29 3b 43 41 4c 4c 20 43 4c 45 45 52 ┆RULE:CALL KEYFUN(KKK);CALL CLEER┆ 0x20a15…20a35 28 49 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆(I); ┆ 0x20a35…20a44 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x20a44…20a64 (28, 0, 58) 49 47 45 4e 3a 50 55 54 20 46 49 4c 45 28 44 29 20 53 4b 49 50 3b 44 4f 20 4c 3d 31 20 54 4f 20 ┆IGEN:PUT FILE(D) SKIP;DO L=1 TO ┆ 0x20a64…20a84 33 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆3; ┆ 0x20a84…20a93 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x20a93…20ab3 (28, 0, 59) 50 55 54 20 46 49 4c 45 28 44 29 45 44 49 54 28 27 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆PUT FILE(D)EDIT('***************┆ 0x20ab3…20ad3 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆********************************┆ 0x20ad3…20ae2 27 29 28 41 29 3b 45 4e 44 3b 20 20 20 20 20 ┆')(A);END; ┆ 0x20ae2…20b02 (28, 0, 60) 44 4f 20 4c 3d 31 20 54 4f 20 38 30 30 3b 45 4e 44 3b 50 55 54 20 46 49 4c 45 28 44 29 20 45 44 ┆DO L=1 TO 800;END;PUT FILE(D) ED┆ 0x20b02…20b22 49 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆IT ┆ 0x20b22…20b31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x20b31…20b51 (28, 0, 61) 28 27 2a 2a 2a 2a 2a 2a 2a 2a 2a 20 20 20 20 20 20 20 20 4d 2e 53 54 45 4e 48 41 52 44 54 20 41 ┆('********* M.STENHARDT A┆ 0x20b51…20b71 42 20 20 20 20 20 20 20 2a 2a 2a 2a 2a 2a 2a 2a 2a 27 29 28 41 29 3b 20 20 20 20 20 20 20 20 20 ┆B *********')(A); ┆ 0x20b71…20b80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x20b80…20ba0 (28, 0, 62) 44 4f 20 4c 3d 31 20 54 4f 20 32 36 30 3b 45 4e 44 3b 50 55 54 20 46 49 4c 45 28 44 29 20 45 44 ┆DO L=1 TO 260;END;PUT FILE(D) ED┆ 0x20ba0…20bc0 49 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆IT ┆ 0x20bc0…20bcf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x20bcf…20bef (28, 0, 63) 28 27 2a 2a 2a 2a 2a 2a 2a 2a 2a 20 20 20 20 20 48 5b 4c 53 41 52 20 44 49 47 20 56 5b 4c 4b 4f ┆('********* HÄLSAR DIG VÄLKO┆ 0x20bef…20c0f 4d 4d 45 4e 20 20 20 20 2a 2a 2a 2a 2a 2a 2a 2a 2a 27 29 28 41 29 3b 20 20 20 20 20 20 20 20 20 ┆MMEN *********')(A); ┆ 0x20c0f…20c1e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x20c1e…20c3e (28, 0, 64) 44 4f 20 4c 3d 31 20 54 4f 20 32 36 30 3b 45 4e 44 3b 50 55 54 20 46 49 4c 45 28 44 29 20 45 44 ┆DO L=1 TO 260;END;PUT FILE(D) ED┆ 0x20c3e…20c5e 49 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆IT ┆ 0x20c5e…20c6d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x20c6d…20c8d (28, 0, 65) 28 27 2a 2a 2a 2a 2a 2a 2a 2a 2a 20 20 20 20 20 20 20 20 20 20 20 20 54 49 4c 4c 20 20 20 20 20 ┆('********* TILL ┆ 0x20c8d…20cad 20 20 20 20 20 20 20 20 2a 2a 2a 2a 2a 2a 2a 2a 2a 27 29 28 41 29 3b 20 20 20 20 20 20 20 20 20 ┆ *********')(A); ┆ 0x20cad…20cbc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x20cbc…20cdc (28, 0, 66) 44 4f 20 4c 3d 31 20 54 4f 20 32 36 30 3b 45 4e 44 3b 50 55 54 20 46 49 4c 45 28 44 29 20 45 44 ┆DO L=1 TO 260;END;PUT FILE(D) ED┆ 0x20cdc…20cfc 49 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆IT ┆ 0x20cfc…20d0b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x20d0b…20d2b (28, 0, 67) 28 27 2a 2a 2a 2a 2a 2a 2a 2a 2a 20 20 20 20 20 20 20 20 20 51 31 20 2d 20 43 41 53 49 4e 4f 20 ┆('********* Q1 - CASINO ┆ 0x20d2b…20d4b 20 20 20 20 20 20 20 20 2a 2a 2a 2a 2a 2a 2a 2a 2a 27 29 28 41 29 3b 20 20 20 20 20 20 20 20 20 ┆ *********')(A); ┆ 0x20d4b…20d5a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x20d5a…20d7a (28, 0, 68) 44 4f 20 4c 3d 31 20 54 4f 20 38 30 30 3b 45 4e 44 3b 44 4f 20 4c 3d 31 20 54 4f 20 33 3b 50 55 ┆DO L=1 TO 800;END;DO L=1 TO 3;PU┆ 0x20d7a…20d9a 54 20 46 49 4c 45 28 44 29 20 45 44 49 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆T FILE(D) EDIT ┆ 0x20d9a…20da9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x20da9…20dc9 (28, 0, 69) 28 27 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆('******************************┆ 0x20dc9…20de9 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 27 29 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆*****************') ┆ 0x20de9…20df8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x20df8…20e18 (28, 0, 70) 28 41 28 34 37 29 29 3b 45 4e 44 3b 44 4f 20 4c 3d 31 20 54 4f 20 39 30 30 3b 45 4e 44 3b 50 55 ┆(A(47));END;DO L=1 TO 900;END;PU┆ 0x20e18…20e38 54 20 46 49 4c 45 28 44 29 20 45 44 49 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆T FILE(D) EDIT ┆ 0x20e38…20e47 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x20e47…20e67 (28, 0, 71) 28 27 20 27 29 28 41 28 34 37 29 29 28 27 20 20 20 20 20 20 20 20 20 20 20 2a 2a 2a 20 20 20 54 ┆(' ')(A(47))(' *** T┆ 0x20e67…20e87 52 59 43 4b 20 52 45 54 55 52 4e 20 20 20 2a 2a 2a 27 29 28 41 28 34 36 29 29 3b 44 4f 20 4c 3d ┆RYCK RETURN ***')(A(46));DO L=┆ 0x20e87…20e96 31 20 54 4f 20 31 38 30 30 3b 45 4e 44 3b 20 ┆1 TO 1800;END; ┆ 0x20e96…20eb6 (28, 0, 72) 43 41 4c 4c 20 4b 45 59 46 55 4e 28 4b 4b 4b 29 3b 49 46 20 4b 4b 4b 20 54 48 45 4e 20 47 4f 20 ┆CALL KEYFUN(KKK);IF KKK THEN GO ┆ 0x20eb6…20ed6 54 4f 20 46 4f 52 54 53 3b 47 4f 20 54 4f 20 49 47 45 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆TO FORTS;GO TO IGEN; ┆ 0x20ed6…20ee5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x20ee5…20f34 (28, 0, 73) 0x20[0x4f] 0x20f34…20f54 (28, 0, 74) 46 4f 52 54 53 3a 47 45 54 20 53 4b 49 50 20 4c 49 53 54 28 44 55 4d 42 29 3b 20 20 20 20 20 20 ┆FORTS:GET SKIP LIST(DUMB); ┆ 0x20f54…20f74 20 20 20 20 20 20 4c 3d 31 3b 20 41 4d 4f 55 4e 54 3d 32 35 30 3b 20 20 20 20 20 20 20 20 20 20 ┆ L=1; AMOUNT=250; ┆ 0x20f74…20f83 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x20f83…20fa3 (28, 0, 75) 50 55 54 20 46 49 4c 45 28 44 29 20 53 4b 49 50 20 45 44 49 54 28 27 20 27 29 28 41 28 34 37 29 ┆PUT FILE(D) SKIP EDIT(' ')(A(47)┆ 0x20fa3…20fc3 29 28 27 53 50 45 4c 45 54 20 56 49 20 53 4b 41 20 53 50 45 4c 41 20 48 45 54 45 52 20 22 42 4c ┆)('SPELET VI SKA SPELA HETER "BL┆ 0x20fc3…20fd2 41 43 4b 4a 41 43 4b 22 27 29 20 20 20 20 20 ┆ACKJACK"') ┆ 0x20fd2…20ff2 (28, 0, 76) 28 41 28 39 34 29 29 28 27 4c 41 53 20 56 45 47 41 53 20 52 45 47 4c 45 52 20 47 5b 4c 4c 45 52 ┆(A(94))('LAS VEGAS REGLER GÄLLER┆ 0x20ff2…21012 2e 27 29 28 41 28 39 34 29 29 28 27 44 55 20 46 5d 52 20 32 35 30 20 4b 52 4f 4e 4f 52 20 41 54 ┆.')(A(94))('DU FÅR 250 KRONOR AT┆ 0x21012…21021 54 20 53 54 41 52 54 41 20 4d 45 44 2e 27 29 ┆T STARTA MED.')┆ 0x21021…21041 (28, 0, 77) 28 41 28 39 34 29 29 28 27 54 52 59 43 4b 20 52 45 54 55 52 4e 27 29 28 41 28 34 36 29 29 3b 47 ┆(A(94))('TRYCK RETURN')(A(46));G┆ 0x21041…21061 45 54 20 53 4b 49 50 20 4c 49 53 54 28 44 55 4d 42 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ET SKIP LIST(DUMB); ┆ 0x21061…21070 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x21070…21090 (28, 0, 78) 43 41 4c 4c 20 53 48 55 46 46 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆CALL SHUFF; ┆ 0x21090…210b0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x210b0…210bf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x210bf…210df (28, 0, 79) 47 41 4d 45 3a 20 44 4f 20 49 3d 31 20 54 4f 20 39 3b 20 4c 49 4e 45 28 49 29 3d 42 4c 4b 3b 20 ┆GAME: DO I=1 TO 9; LINE(I)=BLK; ┆ 0x210df…210ff 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆ 0x210ff…2110e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x2110e…2112e (28, 0, 80) 20 20 20 49 46 20 41 4d 4f 55 4e 54 7f 3d 30 20 54 48 45 4e 20 47 4f 54 4f 20 47 47 41 41 3b 20 ┆ IF AMOUNT =0 THEN GOTO GGAA; ┆ 0x2112e…2114e 50 55 54 20 46 49 4c 45 28 44 29 53 4b 49 50 20 45 44 49 54 28 27 44 55 20 5b 52 20 50 41 4e 4b ┆PUT FILE(D)SKIP EDIT('DU ÄR PANK┆ 0x2114e…2115d 21 21 21 27 29 28 41 28 39 34 29 29 20 20 20 ┆!!!')(A(94)) ┆ 0x2115d…2117d (28, 0, 81) 28 27 4a 41 47 20 46 49 4e 4e 53 20 41 4c 4c 54 49 44 20 48 5b 52 20 44 5d 20 44 55 20 4b 5b 4e ┆('JAG FINNS ALLTID HÄR DÅ DU KÄN┆ 0x2117d…2119d 4e 45 52 27 29 28 41 28 34 37 29 29 28 27 46 5c 52 20 41 54 54 20 46 5c 52 4c 4f 52 41 20 4d 45 ┆NER')(A(47))('FÖR ATT FÖRLORA ME┆ 0x2119d…211ac 52 20 50 45 4e 47 41 52 2e 2e 2e 2e 2e 27 29 ┆R PENGAR.....')┆ 0x211ac…211cc (29, 0, 0) 28 41 28 39 34 29 29 28 27 54 52 59 43 4b 20 52 45 54 55 52 4e 2e 27 29 28 41 28 34 37 29 29 3b ┆(A(94))('TRYCK RETURN.')(A(47));┆ 0x211cc…211ec 47 45 54 20 53 4b 49 50 20 4c 49 53 54 28 44 55 4d 42 29 3b 20 47 4f 54 4f 20 44 4f 4e 45 3b 20 ┆GET SKIP LIST(DUMB); GOTO DONE; ┆ 0x211ec…211fb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x211fb…2121b (29, 0, 1) 47 47 41 41 3a 20 50 55 54 20 46 49 4c 45 28 44 29 53 4b 49 50 20 45 44 49 54 28 27 44 55 20 48 ┆GGAA: PUT FILE(D)SKIP EDIT('DU H┆ 0x2121b…2123b 41 52 20 27 29 28 41 28 37 29 29 28 41 4d 4f 55 4e 54 29 28 50 27 5a 5a 5a 5a 5a 5a 5a 5a 39 27 ┆AR ')(A(7))(AMOUNT)(P'ZZZZZZZZ9'┆ 0x2123b…2124a 29 28 27 20 4b 52 4f 4e 4f 52 27 29 20 20 20 ┆)(' KRONOR') ┆ 0x2124a…2126a (29, 0, 2) 28 41 28 33 31 29 29 3b 49 46 20 49 4a 4b 3d 31 20 54 48 45 4e 20 49 4a 4b 3d 32 3b 20 20 20 20 ┆(A(31));IF IJK=1 THEN IJK=2; ┆ 0x2126a…2128a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x2128a…21299 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x21299…212b9 (29, 0, 3) 50 55 54 20 46 49 4c 45 28 44 29 45 44 49 54 28 27 48 55 52 20 4d 59 43 4b 45 54 20 53 41 54 53 ┆PUT FILE(D)EDIT('HUR MYCKET SATS┆ 0x212b9…212d9 41 52 20 44 55 3f 20 27 29 28 41 28 32 32 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆AR DU? ')(A(22)); ┆ 0x212d9…212e8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x212e8…21308 (29, 0, 4) 47 45 54 20 53 4b 49 50 20 4c 49 53 54 28 42 45 54 29 3b 50 55 54 20 46 49 4c 45 28 44 29 45 44 ┆GET SKIP LIST(BET);PUT FILE(D)ED┆ 0x21308…21328 49 54 28 42 45 54 29 28 50 27 2d 2d 2d 2d 2d 39 27 29 28 27 20 27 29 28 41 28 31 39 29 29 3b 20 ┆IT(BET)(P'-----9')(' ')(A(19)); ┆ 0x21328…21337 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x21337…21357 (29, 0, 5) 42 45 54 43 3d 42 45 54 3b 20 41 4d 54 43 3d 41 4d 4f 55 4e 54 3b 20 49 46 20 53 55 42 53 54 52 ┆BETC=BET; AMTC=AMOUNT; IF SUBSTR┆ 0x21357…21377 28 42 45 54 43 2c 31 2c 31 29 3d 53 55 42 53 54 52 28 41 4d 54 43 2c 31 2c 31 29 2b 32 20 54 48 ┆(BETC,1,1)=SUBSTR(AMTC,1,1)+2 TH┆ 0x21377…21386 45 4e 20 49 4a 4b 3d 31 3b 20 20 20 20 20 20 ┆EN IJK=1; ┆ 0x21386…213a6 (29, 0, 6) 49 46 20 42 45 54 3e 30 20 54 48 45 4e 20 47 4f 54 4f 20 47 47 41 42 3b 20 50 55 54 20 46 49 4c ┆IF BET>0 THEN GOTO GGAB; PUT FIL┆ 0x213a6…213c6 45 28 44 29 45 44 49 54 28 27 53 4f 52 52 59 2c 20 44 45 54 20 47 5d 52 20 4a 41 47 20 49 4e 54 ┆E(D)EDIT('SORRY, DET GÅR JAG INT┆ 0x213c6…213d5 45 20 50 5d 21 27 29 28 41 28 34 37 29 29 20 ┆E PÅ!')(A(47)) ┆ 0x213d5…213f5 (29, 0, 7) 28 27 54 52 59 43 4b 20 52 45 54 55 52 4e 27 29 28 41 28 34 37 29 29 3b 47 45 54 20 53 4b 49 50 ┆('TRYCK RETURN')(A(47));GET SKIP┆ 0x213f5…21415 20 4c 49 53 54 28 44 55 4d 42 29 3b 20 47 4f 54 4f 20 47 41 4d 45 3b 20 20 20 20 20 20 20 20 20 ┆ LIST(DUMB); GOTO GAME; ┆ 0x21415…21424 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x21424…21444 (29, 0, 8) 47 47 41 42 3a 20 49 46 20 42 45 54 3c 3d 41 4d 4f 55 4e 54 20 54 48 45 4e 20 47 4f 54 4f 20 53 ┆GGAB: IF BET<=AMOUNT THEN GOTO S┆ 0x21444…21464 53 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ST; ┆ 0x21464…21473 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x21473…21493 (29, 0, 9) 50 55 54 20 46 49 4c 45 28 44 29 45 44 49 54 28 27 53 4f 52 52 59 2c 20 4d 45 4e 20 44 55 20 48 ┆PUT FILE(D)EDIT('SORRY, MEN DU H┆ 0x21493…214b3 41 52 20 49 4e 54 45 20 53 5d 20 4d 59 43 4b 45 54 21 21 27 29 28 41 28 34 37 29 29 28 27 54 52 ┆AR INTE SÅ MYCKET!!')(A(47))('TR┆ 0x214b3…214c2 59 43 4b 20 52 45 54 55 52 4e 27 29 20 20 20 ┆YCK RETURN') ┆ 0x214c2…214e2 (29, 0, 10) 28 41 28 34 37 29 29 3b 47 45 54 20 53 4b 49 50 20 4c 49 53 54 28 44 55 4d 42 29 3b 20 47 4f 54 ┆(A(47));GET SKIP LIST(DUMB); GOT┆ 0x214e2…21502 4f 20 47 41 4d 45 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆O GAME; ┆ 0x21502…21511 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x21511…21531 (29, 0, 11) 53 53 54 3a 20 50 46 4c 47 3d 30 3b 20 44 46 4c 47 3d 30 3b 20 50 4c 3d 31 3b 20 44 4c 3d 31 3b ┆SST: PFLG=0; DFLG=0; PL=1; DL=1;┆ 0x21531…21551 20 50 43 4e 54 3d 30 3b 20 44 43 4e 54 3d 30 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ PCNT=0; DCNT=0; ┆ 0x21551…21560 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x21560…21580 (29, 0, 12) 20 20 4c 4c 3d 50 4c 3b 43 43 3d 31 3b 43 41 4c 4c 20 44 45 41 4c 3b 20 43 41 4c 4c 20 50 43 41 ┆ LL=PL;CC=1;CALL DEAL; CALL PCA┆ 0x21580…215a0 52 44 28 50 43 4e 54 2c 50 46 4c 47 29 3b 50 4c 3d 4c 4c 3b 43 43 3d 32 3b 43 41 4c 4c 20 44 45 ┆RD(PCNT,PFLG);PL=LL;CC=2;CALL DE┆ 0x215a0…215af 41 4c 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆AL; ┆ 0x215af…215cf (29, 0, 13) 20 4c 4c 3d 44 4c 3b 43 41 4c 4c 20 50 43 41 52 44 28 44 43 4e 54 2c 44 46 4c 47 29 3b 44 4c 3d ┆ LL=DL;CALL PCARD(DCNT,DFLG);DL=┆ 0x215cf…215ef 4c 4c 3b 43 43 3d 31 3b 20 4c 4c 3d 50 4c 3b 43 41 4c 4c 20 44 45 41 4c 3b 43 41 4c 4c 20 50 43 ┆LL;CC=1; LL=PL;CALL DEAL;CALL PC┆ 0x215ef…215fe 41 52 44 28 50 43 4e 54 2c 50 46 4c 47 29 3b ┆ARD(PCNT,PFLG);┆ 0x215fe…2161e (29, 0, 14) 20 20 20 50 4c 3d 4c 4c 3b 20 50 55 54 20 46 49 4c 45 28 44 49 53 50 4c 41 59 29 53 4b 49 50 3b ┆ PL=LL; PUT FILE(DISPLAY)SKIP;┆ 0x2161e…2163e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x2163e…2164d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x2164d…2166d (29, 0, 15) 48 41 4e 44 3a 49 46 20 50 43 4e 54 3d 32 31 20 54 48 45 4e 20 47 4f 54 4f 20 42 4c 4b 4a 50 3b ┆HAND:IF PCNT=21 THEN GOTO BLKJP;┆ 0x2166d…2168d 43 41 4c 4c 20 50 4f 55 54 3b 4e 44 3a 20 50 55 54 20 46 49 4c 45 28 44 49 53 50 4c 41 59 29 45 ┆CALL POUT;ND: PUT FILE(DISPLAY)E┆ 0x2168d…2169c 44 49 54 20 20 20 20 20 20 20 20 20 20 20 20 ┆DIT ┆ 0x2169c…216bc (29, 0, 16) 28 27 56 49 4c 4c 20 44 55 20 48 41 20 46 4c 45 52 20 4b 4f 52 54 3f 27 29 28 41 28 34 37 29 29 ┆('VILL DU HA FLER KORT?')(A(47))┆ 0x216bc…216dc 28 27 53 56 41 52 41 20 4a 20 45 4c 4c 45 52 20 4e 3a 20 27 29 28 41 28 34 35 29 29 3b 20 20 20 ┆('SVARA J ELLER N: ')(A(45)); ┆ 0x216dc…216eb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x216eb…2170b (29, 0, 17) 47 45 54 20 53 4b 49 50 20 4c 49 53 54 28 44 55 4d 42 29 3b 50 55 54 20 46 49 4c 45 28 44 29 20 ┆GET SKIP LIST(DUMB);PUT FILE(D) ┆ 0x2170b…2172b 45 44 49 54 28 44 55 4d 42 29 28 41 28 32 29 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆EDIT(DUMB)(A(2)); ┆ 0x2172b…2173a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x2173a…2175a (29, 0, 18) 20 20 20 49 46 20 44 55 4d 42 7f 3d 27 4a 27 20 54 48 45 4e 20 47 4f 54 4f 20 44 50 4c 41 59 3b ┆ IF DUMB ='J' THEN GOTO DPLAY;┆ 0x2175a…2177a 20 43 41 4c 4c 20 44 45 41 4c 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ CALL DEAL; ┆ 0x2177a…21789 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x21789…217a9 (29, 0, 19) 20 20 20 43 43 3d 31 3b 4c 4c 3d 50 4c 3b 43 41 4c 4c 20 50 43 41 52 44 28 50 43 4e 54 2c 50 46 ┆ CC=1;LL=PL;CALL PCARD(PCNT,PF┆ 0x217a9…217c9 4c 47 29 3b 50 4c 3d 4c 4c 3b 43 41 4c 4c 20 50 4f 55 54 3b 49 46 20 50 43 4e 54 3c 32 32 20 54 ┆LG);PL=LL;CALL POUT;IF PCNT<22 T┆ 0x217c9…217d8 48 45 4e 20 47 4f 54 4f 20 4e 44 3b 20 20 20 ┆HEN GOTO ND; ┆ 0x217d8…217f8 (29, 0, 20) 20 20 20 49 46 20 50 46 4c 47 7f 3d 31 20 54 48 45 4e 20 47 4f 54 4f 20 42 55 53 50 31 3b 20 50 ┆ IF PFLG =1 THEN GOTO BUSP1; P┆ 0x217f8…21818 43 4e 54 3d 50 43 4e 54 2d 31 30 3b 20 50 46 4c 47 3d 31 31 3b 20 47 4f 54 4f 20 4e 44 3b 20 20 ┆CNT=PCNT-10; PFLG=11; GOTO ND; ┆ 0x21818…21827 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x21827…21847 (29, 0, 21) 42 55 53 50 31 3a 20 4c 4c 3d 44 4c 3b 43 43 3d 32 3b 43 41 4c 4c 20 44 45 41 4c 3b 20 43 41 4c ┆BUSP1: LL=DL;CC=2;CALL DEAL; CAL┆ 0x21847…21867 4c 20 50 43 41 52 44 28 44 43 4e 54 2c 44 46 4c 47 29 3b 44 4c 3d 4c 4c 3b 20 20 20 20 20 20 20 ┆L PCARD(DCNT,DFLG);DL=LL; ┆ 0x21867…21876 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x21876…21896 (29, 0, 22) 20 20 20 50 55 54 20 46 49 4c 45 28 44 49 53 50 4c 41 59 29 45 44 49 54 28 27 20 27 29 28 41 28 ┆ PUT FILE(DISPLAY)EDIT(' ')(A(┆ 0x21896…218b6 39 34 29 29 3b 20 43 41 4c 4c 20 50 4f 55 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆94)); CALL POUT; ┆ 0x218b6…218c5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x218c5…218e5 (29, 0, 23) 42 55 53 50 3a 20 50 55 54 20 46 49 4c 45 28 44 29 45 44 49 54 28 27 44 55 20 46 5c 52 4c 4f 52 ┆BUSP: PUT FILE(D)EDIT('DU FÖRLOR┆ 0x218e5…21905 41 44 45 21 20 56 49 4c 4c 20 44 55 20 46 4f 52 54 53 5b 54 54 41 3f 27 29 28 41 28 34 37 29 29 ┆ADE! VILL DU FORTSÄTTA?')(A(47))┆ 0x21905…21914 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x21914…21934 (29, 0, 24) 28 27 53 56 41 52 41 20 4a 20 45 4c 4c 45 52 20 4e 3a 27 29 28 41 28 34 36 29 29 3b 20 20 20 20 ┆('SVARA J ELLER N:')(A(46)); ┆ 0x21934…21954 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x21954…21963 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x21963…21983 (29, 0, 25) 20 20 20 41 4d 4f 55 4e 54 3d 41 4d 4f 55 4e 54 2d 42 45 54 3b 20 20 20 20 20 20 20 20 20 20 20 ┆ AMOUNT=AMOUNT-BET; ┆ 0x21983…219a3 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x219a3…219b2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x219b2…219d2 (29, 0, 26) 4e 58 3a 20 47 45 54 20 53 4b 49 50 20 4c 49 53 54 28 44 55 4d 42 29 3b 20 49 46 20 44 55 4d 42 ┆NX: GET SKIP LIST(DUMB); IF DUMB┆ 0x219d2…219f2 3d 27 4e 27 20 54 48 45 4e 20 47 4f 54 4f 20 44 4f 4e 45 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆='N' THEN GOTO DONE; ┆ 0x219f2…21a01 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x21a01…21a21 (29, 0, 27) 20 20 20 49 46 20 4c 3c 34 32 20 54 48 45 4e 20 47 4f 54 4f 20 47 41 4d 45 3b 20 43 41 4c 4c 20 ┆ IF L<42 THEN GOTO GAME; CALL ┆ 0x21a21…21a41 53 48 55 46 46 3b 20 4c 3d 31 3b 47 4f 54 4f 20 47 41 4d 45 3b 20 20 20 20 20 20 20 20 20 20 20 ┆SHUFF; L=1;GOTO GAME; ┆ 0x21a41…21a50 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x21a50…21a70 (29, 0, 28) 42 4c 4b 4a 50 3a 20 4c 4c 3d 44 4c 3b 43 43 3d 32 3b 43 41 4c 4c 20 44 45 41 4c 3b 20 43 41 4c ┆BLKJP: LL=DL;CC=2;CALL DEAL; CAL┆ 0x21a70…21a90 4c 20 50 43 41 52 44 28 44 43 4e 54 2c 44 46 4c 47 29 3b 20 44 4c 3d 4c 4c 3b 20 20 20 20 20 20 ┆L PCARD(DCNT,DFLG); DL=LL; ┆ 0x21a90…21a9f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x21a9f…21abf (29, 0, 29) 20 20 20 20 4c 49 4e 45 28 34 29 3d 27 2a 2a 2a 20 42 4c 41 43 4b 4a 41 43 4b 20 2a 2a 2a 2a 20 ┆ LINE(4)='*** BLACKJACK **** ┆ 0x21abf…21adf 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 3b 4c 49 ┆ ';LI┆ 0x21adf…21aee 4e 45 28 33 29 3d 42 4c 4b 3b 50 4c 3d 35 3b ┆NE(3)=BLK;PL=5;┆ 0x21aee…21b0e (29, 0, 30) 20 20 20 20 43 41 4c 4c 20 50 4f 55 54 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ CALL POUT; ┆ 0x21b0e…21b2e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x21b2e…21b3d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x21b3d…21b5d (29, 0, 31) 57 49 4e 50 3a 20 20 50 55 54 20 46 49 4c 45 28 44 29 45 44 49 54 28 27 47 52 41 54 54 49 53 20 ┆WINP: PUT FILE(D)EDIT('GRATTIS ┆ 0x21b5d…21b7d 44 55 20 56 41 4e 4e 21 21 20 20 56 49 4c 4c 20 44 55 20 46 4f 52 54 53 5b 54 54 41 3f 27 29 28 ┆DU VANN!! VILL DU FORTSÄTTA?')(┆ 0x21b7d…21b8c 41 28 34 37 29 29 20 20 20 20 20 20 20 20 20 ┆A(47)) ┆ 0x21b8c…21bac (29, 0, 32) 28 27 53 56 41 52 41 20 4a 20 45 4c 4c 45 52 20 4e 3a 27 29 28 41 28 34 36 29 29 3b 20 20 20 20 ┆('SVARA J ELLER N:')(A(46)); ┆ 0x21bac…21bcc 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x21bcc…21bdb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x21bdb…21bfb (29, 0, 33) 20 20 20 41 4d 4f 55 4e 54 3d 41 4d 4f 55 4e 54 2b 42 45 54 3b 47 4f 54 4f 20 4e 58 3b 20 20 20 ┆ AMOUNT=AMOUNT+BET;GOTO NX; ┆ 0x21bfb…21c1b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x21c1b…21c2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x21c2a…21c4a (29, 0, 34) 44 50 4c 41 59 3a 20 49 46 20 49 4a 4b 3d 32 20 54 48 45 4e 20 47 4f 20 54 4f 20 58 58 32 3b 20 ┆DPLAY: IF IJK=2 THEN GO TO XX2; ┆ 0x21c4a…21c6a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x21c6a…21c79 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x21c79…21c99 (29, 0, 35) 20 43 41 4c 4c 20 44 45 41 4c 3b 58 58 59 3a 20 4c 4c 3d 44 4c 3b 20 43 43 3d 32 3b 20 43 41 4c ┆ CALL DEAL;XXY: LL=DL; CC=2; CAL┆ 0x21c99…21cb9 4c 20 50 43 41 52 44 28 44 43 4e 54 2c 44 46 4c 47 29 3b 20 44 4c 3d 4c 4c 3b 20 20 20 20 20 20 ┆L PCARD(DCNT,DFLG); DL=LL; ┆ 0x21cb9…21cc8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x21cc8…21ce8 (29, 0, 36) 20 20 20 43 41 4c 4c 20 50 4f 55 54 3b 20 50 55 54 20 46 49 4c 45 28 44 49 53 50 4c 41 59 29 45 ┆ CALL POUT; PUT FILE(DISPLAY)E┆ 0x21ce8…21d08 44 49 54 28 27 20 27 29 28 41 28 39 34 29 29 3b 20 49 46 20 44 43 4e 54 3d 32 31 20 54 48 45 4e ┆DIT(' ')(A(94)); IF DCNT=21 THEN┆ 0x21d08…21d17 20 47 4f 54 4f 20 42 4c 4b 4a 44 3b 20 20 20 ┆ GOTO BLKJD; ┆ 0x21d17…21d37 (29, 0, 37) 20 20 20 49 46 20 44 43 4e 54 3e 31 36 20 54 48 45 4e 20 47 4f 54 4f 20 44 43 44 44 3b 44 4f 20 ┆ IF DCNT>16 THEN GOTO DCDD;DO ┆ 0x21d37…21d57 49 3d 31 20 54 4f 20 35 30 30 3b 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆I=1 TO 500; END; ┆ 0x21d57…21d66 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x21d66…21d86 (29, 0, 38) 44 50 4c 41 41 3a 20 49 46 20 49 4a 4b 3d 32 20 54 48 45 4e 20 47 4f 20 54 4f 20 58 58 31 3b 20 ┆DPLAA: IF IJK=2 THEN GO TO XX1; ┆ 0x21d86…21da6 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x21da6…21db5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x21db5…21dd5 (29, 0, 39) 20 43 41 4c 4c 20 44 45 41 4c 3b 58 58 58 3a 20 43 43 3d 32 3b 20 4c 4c 3d 44 4c 3b 20 43 41 4c ┆ CALL DEAL;XXX: CC=2; LL=DL; CAL┆ 0x21dd5…21df5 4c 20 50 43 41 52 44 28 44 43 4e 54 2c 44 46 4c 47 29 3b 20 44 4c 3d 4c 4c 3b 20 20 20 20 20 20 ┆L PCARD(DCNT,DFLG); DL=LL; ┆ 0x21df5…21e04 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x21e04…21e24 (29, 0, 40) 20 20 43 41 4c 4c 20 50 4f 55 54 3b 20 49 46 20 44 43 4e 54 3e 32 31 20 54 48 45 4e 20 47 4f 54 ┆ CALL POUT; IF DCNT>21 THEN GOT┆ 0x21e24…21e44 4f 20 54 54 4e 4e 3b 44 58 58 3a 20 50 55 54 20 46 49 4c 45 28 44 49 53 50 4c 41 59 29 45 44 49 ┆O TTNN;DXX: PUT FILE(DISPLAY)EDI┆ 0x21e44…21e53 54 28 27 20 27 29 28 41 28 39 34 29 29 3b 20 ┆T(' ')(A(94)); ┆ 0x21e53…21e73 (29, 0, 41) 20 20 20 49 46 20 44 43 4e 54 3e 31 36 20 54 48 45 4e 20 47 4f 54 4f 20 44 43 44 44 3b 44 4f 20 ┆ IF DCNT>16 THEN GOTO DCDD;DO ┆ 0x21e73…21e93 49 3d 31 20 54 4f 20 35 30 30 3b 20 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆I=1 TO 500; END; ┆ 0x21e93…21ea2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x21ea2…21ec2 (29, 0, 42) 20 20 20 47 4f 54 4f 20 44 50 4c 41 41 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ GOTO DPLAA; ┆ 0x21ec2…21ee2 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x21ee2…21ef1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x21ef1…21f11 (29, 0, 43) 58 58 31 3a 20 43 41 4c 4c 20 20 58 44 45 41 4c 3b 20 47 4f 20 54 4f 20 58 58 58 3b 58 58 32 3a ┆XX1: CALL XDEAL; GO TO XXX;XX2:┆ 0x21f11…21f31 20 43 41 4c 4c 20 58 44 45 41 4c 3b 20 47 4f 20 54 4f 20 58 58 59 3b 20 20 20 20 20 20 20 20 20 ┆ CALL XDEAL; GO TO XXY; ┆ 0x21f31…21f40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x21f40…21f60 (29, 0, 44) 54 54 4e 4e 3a 20 49 46 20 44 46 4c 47 7f 3d 31 20 54 48 45 4e 20 47 4f 54 4f 20 57 49 4e 50 3b ┆TTNN: IF DFLG =1 THEN GOTO WINP;┆ 0x21f60…21f80 20 44 46 4c 47 3d 31 31 3b 20 44 43 4e 54 3d 44 43 4e 54 2d 31 30 3b 20 47 4f 54 4f 20 44 58 58 ┆ DFLG=11; DCNT=DCNT-10; GOTO DXX┆ 0x21f80…21f8f 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆; ┆ 0x21f8f…21faf (29, 0, 45) 42 4c 4b 4a 44 3a 20 43 4c 49 4e 3d 4c 49 4e 45 28 36 29 3b 20 49 46 20 53 55 42 53 54 52 28 43 ┆BLKJD: CLIN=LINE(6); IF SUBSTR(C┆ 0x21faf…21fcf 4c 49 4e 2c 35 2c 31 29 7f 3d 27 4f 27 20 54 48 45 4e 20 43 4c 49 4e 3d 42 4c 4b 3b 20 20 44 4c ┆LIN,5,1) ='O' THEN CLIN=BLK; DL┆ 0x21fcf…21fde 3d 35 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆=5; ┆ 0x21fde…21ffe (29, 0, 46) 20 20 44 4c 49 4e 3d 43 4c 49 4e 20 43 41 54 20 27 20 20 20 27 3b 4c 49 4e 45 28 34 29 3d 44 4c ┆ DLIN=CLIN CAT ' ';LINE(4)=DL┆ 0x21ffe…2201e 49 4e 20 43 41 54 20 27 2a 2a 2a 20 42 4c 41 43 4b 4a 41 43 4b 20 2a 2a 2a 20 20 20 20 20 20 20 ┆IN CAT '*** BLACKJACK *** ┆ 0x2201e…2202d 20 20 20 27 3b 43 41 4c 4c 20 50 4f 55 54 3b ┆ ';CALL POUT;┆ 0x2202d…2204d (29, 0, 47) 47 4f 20 54 4f 20 42 55 53 50 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆GO TO BUSP; ┆ 0x2204d…2206d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x2206d…2207c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x2207c…2209c (29, 0, 48) 44 43 44 44 3a 20 43 41 4c 4c 20 50 4f 55 54 3b 49 46 20 44 43 4e 54 3e 50 43 4e 54 20 54 48 45 ┆DCDD: CALL POUT;IF DCNT>PCNT THE┆ 0x2209c…220bc 4e 20 47 4f 54 4f 20 42 55 53 50 3b 20 49 46 20 44 43 4e 54 3c 50 43 4e 54 20 54 48 45 4e 20 47 ┆N GOTO BUSP; IF DCNT<PCNT THEN G┆ 0x220bc…220cb 4f 54 4f 20 57 49 4e 50 3b 20 20 20 20 20 20 ┆OTO WINP; ┆ 0x220cb…220eb (29, 0, 49) 50 55 54 20 46 49 4c 45 28 44 29 45 44 49 54 28 27 2a 2a 2a 20 4c 49 4b 41 20 2a 2a 2a 20 20 20 ┆PUT FILE(D)EDIT('*** LIKA *** ┆ 0x220eb…2210b 20 20 56 49 4c 4c 20 44 55 20 46 4f 52 54 53 5b 54 54 41 3f 27 29 28 41 28 34 37 29 29 20 20 20 ┆ VILL DU FORTSÄTTA?')(A(47)) ┆ 0x2210b…2211a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x2211a…2213a (29, 0, 50) 28 27 53 56 41 52 41 20 4a 20 45 4c 4c 45 52 20 4e 3a 27 29 28 41 28 34 35 29 29 3b 47 4f 20 54 ┆('SVARA J ELLER N:')(A(45));GO T┆ 0x2213a…2215a 4f 20 4e 58 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆O NX; ┆ 0x2215a…22169 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x22169…22189 (29, 0, 51) 44 4f 4e 45 3a 20 47 4f 54 4f 20 52 55 4c 45 3b 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆DONE: GOTO RULE;END; ┆ 0x22189…221a9 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x221a9…221b8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x221b8…22207 (29, 0, 52) 0x20[0x4f] […0x1…] 0x22256…22276 (29, 0, 54) 20 50 32 32 3a 44 4c 49 4e 3d 43 4c 49 4e 20 43 41 54 20 27 20 20 20 27 3b 50 32 33 3a 20 4c 49 ┆ P22:DLIN=CLIN CAT ' ';P23: LI┆ 0x22276…22296 4e 45 28 4c 4c 29 3d 44 4c 49 4e 20 43 41 54 20 42 4c 49 4e 3b 20 20 20 20 20 20 20 20 20 20 20 ┆NE(LL)=DLIN CAT BLIN; ┆ 0x22296…222a5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x222a5…222c5 (29, 0, 55) 50 50 3a 20 4c 4c 3d 4c 4c 2b 31 3b 20 52 45 54 55 52 4e 3b 20 45 4e 44 3b 20 20 20 20 20 20 20 ┆PP: LL=LL+1; RETURN; END; ┆ 0x222c5…222e5 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x222e5…222f4 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x222f4…22314 (29, 0, 56) 2f 2a 20 20 4d 41 49 4e 20 50 52 4f 47 52 41 4d 20 53 54 41 52 54 53 20 20 2a 2f 20 20 20 20 20 ┆/* MAIN PROGRAM STARTS */ ┆ 0x22314…22334 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x22334…22343 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x22343…22363 (29, 0, 57) 52 55 4c 45 3a 43 41 4c 4c 20 4b 45 59 46 55 4e 28 4b 4b 4b 29 3b 43 41 4c 4c 20 43 4c 45 45 52 ┆RULE:CALL KEYFUN(KKK);CALL CLEER┆ 0x22363…22383 28 49 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆(I); ┆ 0x22383…22392 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x22392…223b2 (29, 0, 58) 49 47 45 4e 3a 50 55 54 20 46 49 4c 45 28 44 29 20 53 4b 49 50 3b 44 4f 20 4c 3d 31 20 54 4f 20 ┆IGEN:PUT FILE(D) SKIP;DO L=1 TO ┆ 0x223b2…223d2 33 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆3; ┆ 0x223d2…223e1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x223e1…22401 (29, 0, 59) 50 55 54 20 46 49 4c 45 28 44 29 45 44 49 54 28 27 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆PUT FILE(D)EDIT('***************┆ 0x22401…22421 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆********************************┆ 0x22421…22430 27 29 28 41 29 3b 45 4e 44 3b 20 20 20 20 20 ┆')(A);END; ┆ 0x22430…22450 (29, 0, 60) 44 4f 20 4c 3d 31 20 54 4f 20 38 30 30 3b 45 4e 44 3b 50 55 54 20 46 49 4c 45 28 44 29 20 45 44 ┆DO L=1 TO 800;END;PUT FILE(D) ED┆ 0x22450…22470 49 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆IT ┆ 0x22470…2247f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x2247f…2249f (29, 0, 61) 28 27 2a 2a 2a 2a 2a 2a 2a 2a 2a 20 20 20 20 20 20 20 20 4d 2e 53 54 45 4e 48 41 52 44 54 20 41 ┆('********* M.STENHARDT A┆ 0x2249f…224bf 42 20 20 20 20 20 20 20 2a 2a 2a 2a 2a 2a 2a 2a 2a 27 29 28 41 29 3b 20 20 20 20 20 20 20 20 20 ┆B *********')(A); ┆ 0x224bf…224ce 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x224ce…224ee (29, 0, 62) 44 4f 20 4c 3d 31 20 54 4f 20 32 36 30 3b 45 4e 44 3b 50 55 54 20 46 49 4c 45 28 44 29 20 45 44 ┆DO L=1 TO 260;END;PUT FILE(D) ED┆ 0x224ee…2250e 49 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆IT ┆ 0x2250e…2251d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x2251d…2253d (29, 0, 63) 28 27 2a 2a 2a 2a 2a 2a 2a 2a 2a 20 20 20 20 20 48 5b 4c 53 41 52 20 44 49 47 20 56 5b 4c 4b 4f ┆('********* HÄLSAR DIG VÄLKO┆ 0x2253d…2255d 4d 4d 45 4e 20 20 20 20 2a 2a 2a 2a 2a 2a 2a 2a 2a 27 29 28 41 29 3b 20 20 20 20 20 20 20 20 20 ┆MMEN *********')(A); ┆ 0x2255d…2256c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x2256c…2258c (29, 0, 64) 44 4f 20 4c 3d 31 20 54 4f 20 32 36 30 3b 45 4e 44 3b 50 55 54 20 46 49 4c 45 28 44 29 20 45 44 ┆DO L=1 TO 260;END;PUT FILE(D) ED┆ 0x2258c…225ac 49 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆IT ┆ 0x225ac…225bb 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x225bb…225db (29, 0, 65) 28 27 2a 2a 2a 2a 2a 2a 2a 2a 2a 20 20 20 20 20 20 20 20 20 20 20 20 54 49 4c 4c 20 20 20 20 20 ┆('********* TILL ┆ 0x225db…225fb 20 20 20 20 20 20 20 20 2a 2a 2a 2a 2a 2a 2a 2a 2a 27 29 28 41 29 3b 20 20 20 20 20 20 20 20 20 ┆ *********')(A); ┆ 0x225fb…2260a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x2260a…2262a (29, 0, 66) 44 4f 20 4c 3d 31 20 54 4f 20 32 36 30 3b 45 4e 44 3b 50 55 54 20 46 49 4c 45 28 44 29 20 45 44 ┆DO L=1 TO 260;END;PUT FILE(D) ED┆ 0x2262a…2264a 49 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆IT ┆ 0x2264a…22659 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x22659…22679 (29, 0, 67) 28 27 2a 2a 2a 2a 2a 2a 2a 2a 2a 20 20 20 20 20 20 20 20 20 51 31 20 2d 20 43 41 53 49 4e 4f 20 ┆('********* Q1 - CASINO ┆ 0x22679…22699 20 20 20 20 20 20 20 20 2a 2a 2a 2a 2a 2a 2a 2a 2a 27 29 28 41 29 3b 20 20 20 20 20 20 20 20 20 ┆ *********')(A); ┆ 0x22699…226a8 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x226a8…226c8 (29, 0, 68) 44 4f 20 4c 3d 31 20 54 4f 20 38 30 30 3b 45 4e 44 3b 44 4f 20 4c 3d 31 20 54 4f 20 33 3b 50 55 ┆DO L=1 TO 800;END;DO L=1 TO 3;PU┆ 0x226c8…226e8 54 20 46 49 4c 45 28 44 29 20 45 44 49 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆T FILE(D) EDIT ┆ 0x226e8…226f7 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x226f7…22717 (29, 0, 69) 28 27 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆('******************************┆ 0x22717…22737 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 27 29 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆*****************') ┆ 0x22737…22746 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x22746…22766 (29, 0, 70) 28 41 28 34 37 29 29 3b 45 4e 44 3b 44 4f 20 4c 3d 31 20 54 4f 20 39 30 30 3b 45 4e 44 3b 50 55 ┆(A(47));END;DO L=1 TO 900;END;PU┆ 0x22766…22786 54 20 46 49 4c 45 28 44 29 20 45 44 49 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆T FILE(D) EDIT ┆ 0x22786…22795 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x22795…227b5 (29, 0, 71) 28 27 20 27 29 28 41 28 34 37 29 29 28 27 20 20 20 20 20 20 20 20 20 20 20 2a 2a 2a 20 20 20 54 ┆(' ')(A(47))(' *** T┆ 0x227b5…227d5 52 59 43 4b 20 52 45 54 55 52 4e 20 20 20 2a 2a 2a 27 29 28 41 28 34 36 29 29 3b 44 4f 20 4c 3d ┆RYCK RETURN ***')(A(46));DO L=┆ 0x227d5…227e4 31 20 54 4f 20 31 38 30 30 3b 45 4e 44 3b 20 ┆1 TO 1800;END; ┆ 0x227e4…22804 (29, 0, 72) 43 41 4c 4c 20 4b 45 59 46 55 4e 28 4b 4b 4b 29 3b 49 46 20 4b 4b 4b 20 54 48 45 4e 20 47 4f 20 ┆CALL KEYFUN(KKK);IF KKK THEN GO ┆ 0x22804…22824 54 4f 20 46 4f 52 54 53 3b 47 4f 20 54 4f 20 49 47 45 4e 3b 20 20 20 20 20 20 20 20 20 20 20 20 ┆TO FORTS;GO TO IGEN; ┆ 0x22824…22833 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x22833…22882 (29, 0, 73) 0x20[0x4f] 0x22882…228a2 (29, 0, 74) 46 4f 52 54 53 3a 47 45 54 20 53 4b 49 50 20 4c 49 53 54 28 44 55 4d 42 29 3b 20 20 20 20 20 20 ┆FORTS:GET SKIP LIST(DUMB); ┆ 0x228a2…228c2 20 20 20 20 20 20 4c 3d 31 3b 20 41 4d 4f 55 4e 54 3d 32 35 30 3b 20 20 20 20 20 20 20 20 20 20 ┆ L=1; AMOUNT=250; ┆ 0x228c2…228d1 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x228d1…228f1 (29, 0, 75) 50 55 54 20 46 49 4c 45 28 44 29 20 53 4b 49 50 20 45 44 49 54 28 27 20 27 29 28 41 28 34 37 29 ┆PUT FILE(D) SKIP EDIT(' ')(A(47)┆ 0x228f1…22911 29 28 27 53 50 45 4c 45 54 20 56 49 20 53 4b 41 20 53 50 45 4c 41 20 48 45 54 45 52 20 22 42 4c ┆)('SPELET VI SKA SPELA HETER "BL┆ 0x22911…22920 41 43 4b 4a 41 43 4b 22 27 29 20 20 20 20 20 ┆ACKJACK"') ┆ 0x22920…22940 (29, 0, 76) 28 41 28 39 34 29 29 28 27 4c 41 53 20 56 45 47 41 53 20 52 45 47 4c 45 52 20 47 5b 4c 4c 45 52 ┆(A(94))('LAS VEGAS REGLER GÄLLER┆ 0x22940…22960 2e 27 29 28 41 28 39 34 29 29 28 27 44 55 20 46 5d 52 20 32 35 30 20 4b 52 4f 4e 4f 52 20 41 54 ┆.')(A(94))('DU FÅR 250 KRONOR AT┆ 0x22960…2296f 54 20 53 54 41 52 54 41 20 4d 45 44 2e 27 29 ┆T STARTA MED.')┆ 0x2296f…2298f (29, 0, 77) 28 41 28 39 34 29 29 28 27 54 52 59 43 4b 20 52 45 54 55 52 4e 27 29 28 41 28 34 36 29 29 3b 47 ┆(A(94))('TRYCK RETURN')(A(46));G┆ 0x2298f…229af 45 54 20 53 4b 49 50 20 4c 49 53 54 28 44 55 4d 42 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ET SKIP LIST(DUMB); ┆ 0x229af…229be 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x229be…229de (29, 0, 78) 43 41 4c 4c 20 53 48 55 46 46 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆CALL SHUFF; ┆ 0x229de…229fe 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x229fe…22a0d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x22a0d…22a2d (29, 0, 79) 47 41 4d 45 3a 20 44 4f 20 49 3d 31 20 54 4f 20 39 3b 20 4c 49 4e 45 28 49 29 3d 42 4c 4b 3b 20 ┆GAME: DO I=1 TO 9; LINE(I)=BLK; ┆ 0x22a2d…22a4d 45 4e 44 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆END; ┆ 0x22a4d…22a5c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ┆ 0x22a5c…22a7c (29, 0, 80) 20 20 20 49 46 20 41 4d 4f 55 4e 54 7f 3d 30 20 54 48 45 4e 20 47 4f 54 4f 20 47 47 41 41 3b 20 ┆ IF AMOUNT =0 THEN GOTO GGAA; ┆ 0x22a7c…22a9c 50 55 54 20 46 49 4c 45 28 44 29 53 4b 49 50 20 45 44 49 54 28 27 44 55 20 5b 52 20 50 41 4e 4b ┆PUT FILE(D)SKIP EDIT('DU ÄR PANK┆ 0x22a9c…22aab 21 21 21 27 29 28 41 28 39 34 29 29 20 20 20 ┆!!!')(A(94)) ┆ 0x22aab…22acb (29, 0, 81) 28 27 4a 41 47 20 46 49 4e 4e 53 20 41 4c 4c 54 49 44 20 48 5b 52 20 44 5d 20 44 55 20 4b 5b 4e ┆('JAG FINNS ALLTID HÄR DÅ DU KÄN┆ 0x22acb…22aeb 4e 45 52 27 29 28 41 28 34 37 29 29 28 27 46 5c 52 20 41 54 54 20 46 5c 52 4c 4f 52 41 20 4d 45 ┆NER')(A(47))('FÖR ATT FÖRLORA ME┆ 0x22aeb…22afa 52 20 50 45 4e 47 41 52 2e 2e 2e 2e 2e 27 29 ┆R PENGAR.....')┆ 0x22afa…22bf9 (30, 0, 0) DataSector[0xff] […0x18…] 0x243e1…244e0 (30, 0, 25) 0x00[0xff] […0x3…] 0x247dd…247fd (30, 0, 29) 01 ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ┆ ┆ 0x247fd…2481d ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ┆ ┆ […0x5…] 0x248bd…248dc ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ┆ ┆ 0x248dc…2492b (31, 0, 0) DataSector[0x4f] […0x9…] 0x24bf2…24c41 (31, 0, 10) 0x20[0x4f] 0x24c41…24c90 (31, 0, 11) 0x00[0x4f] […0x98…] 0x27b78…27c77 (33, 0, 0) DataSector[0xff] […0xd…] 0x2896a…28a69 (33, 0, 14) 0x00[0xff] […0xe…] 0x2985b…2987b (33, 0, 29) 01 ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ┆ ┆ 0x2987b…2989b ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ┆ ┆ […0x5…] 0x2993b…2995a ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ┆ ┆ 0x2995a…299a9 (34, 0, 0) DataSector[0x4f] […0xf…] 0x29e4a…29e99 (34, 0, 16) 0x00[0x4f] […0x40…] 0x2b259…2b279 (34, 0, 81) 01 ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ┆ ┆ 0x2b279…2b299 ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ┆ ┆ 0x2b299…2b2a8 ff ff ff ff ff ff ff ff ff ff ff ff ff ff ff ┆ ┆