|
DataMuseum.dkPresents historical artifacts from the history of: RegneCentralen RC3600/RC7000 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about RegneCentralen RC3600/RC7000 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 16896 (0x4200)
Names: »REE00«
└─⟦466f46364⟧ Bits:30001785 SG0005 Floppy
└─ ⟦this⟧ »/REE00«
0x0000…0020 0c 20 20 30 30 30 31 20 50 52 4f 43 20 54 59 53 54 0d 0a 20 20 30 30 30 32 20 20 20 45 58 45 43 ┆ 0001 PROC TYST 0002 EXEC┆
0x0020…0040 20 48 45 58 34 0d 0a 20 20 30 30 30 33 20 20 20 4c 45 54 20 44 41 54 24 3d 52 45 4c 4f 43 24 28 ┆ HEX4 0003 LET DAT$=RELOC$(┆
0x0040…0060 52 45 4c 4f 43 28 43 20 44 49 56 20 35 2b 31 29 2f 32 20 44 49 56 20 38 5e 28 34 2d 43 20 4d 4f ┆RELOC(C DIV 5+1)/2 DIV 8^(4-C MO┆
0x0060…0080 44 20 35 29 20 4d 4f 44 20 38 29 0d 0a 20 20 30 30 30 34 20 20 20 50 52 49 4e 54 20 44 41 54 24 ┆D 5) MOD 8) 0004 PRINT DAT$┆
0x0080…00a0 3b 22 20 22 3b 0d 0a 20 20 30 30 30 35 20 20 20 43 41 53 45 20 44 41 54 24 20 4f 46 20 0d 0a 20 ┆;" "; 0005 CASE DAT$ OF ┆
0x00a0…00c0 20 30 30 30 36 20 20 20 20 20 52 45 4d 0d 0a 20 20 30 30 30 37 20 20 20 57 48 45 4e 20 22 20 22 ┆ 0006 REM 0007 WHEN " "┆
0x00c0…00e0 0d 0a 20 20 30 30 30 38 20 20 20 20 20 4c 45 54 20 43 3d 41 20 44 49 56 20 32 35 36 3b 20 43 3d ┆ 0008 LET C=A DIV 256; C=┆
0x00e0…0100 33 32 2b 28 28 43 2d 33 32 29 2a 28 43 3e 33 32 20 41 4e 44 20 43 3c 31 32 37 29 29 3b 20 44 3d ┆32+((C-32)*(C>32 AND C<127)); D=┆
0x0100…0120 41 20 4d 4f 44 20 32 35 36 3b 20 44 3d 33 32 2b 28 44 2d 33 32 29 2a 28 44 3e 33 32 20 41 4e 44 ┆A MOD 256; D=32+(D-32)*(D>32 AND┆
0x0120…0140 20 44 3c 31 32 37 29 0d 0a 20 20 30 30 30 39 20 20 20 20 20 50 52 49 4e 54 20 43 48 52 28 43 29 ┆ D<127) 0009 PRINT CHR(C)┆
0x0140…0160 3b 43 48 52 28 44 29 3b 22 20 20 20 22 3b 0d 0a 20 20 30 30 31 30 20 20 20 20 20 49 46 20 4c 41 ┆;CHR(D);" "; 0010 IF LA┆
0x0160…0180 53 54 56 41 4c 3c 3e 33 32 33 36 20 54 48 45 4e 20 47 4f 54 4f 20 30 30 32 31 0d 0a 20 20 30 30 ┆STVAL<>3236 THEN GOTO 0021 00┆
0x0180…01a0 31 31 20 20 20 20 20 52 45 53 54 4f 52 45 20 0d 0a 20 20 30 30 31 32 20 20 20 20 20 52 45 50 45 ┆11 RESTORE 0012 REPE┆
0x01a0…01c0 41 54 0d 0a 20 20 30 30 31 33 20 20 20 20 20 20 20 52 45 41 44 20 43 2c 45 52 52 4f 52 24 0d 0a ┆AT 0013 READ C,ERROR$ ┆
0x01c0…01e0 20 20 30 30 31 34 20 20 20 20 20 20 20 49 46 20 41 2b 33 30 30 3d 43 20 54 48 45 4e 20 0d 0a 20 ┆ 0014 IF A+300=C THEN ┆
0x01e0…0200 20 30 30 31 35 20 20 20 20 20 20 20 20 20 50 52 49 4e 54 20 22 27 22 3b 45 52 52 4f 52 24 3b 22 ┆ 0015 PRINT "'";ERROR$;"┆
0x0200…0220 27 22 3b 0d 0a 20 20 30 30 31 36 20 20 20 20 20 20 20 20 20 4c 45 54 20 43 3d 31 30 30 30 0d 0a ┆'"; 0016 LET C=1000 ┆
0x0220…0240 20 20 30 30 31 37 20 20 20 20 20 20 20 45 4e 44 49 46 0d 0a 20 20 30 30 31 38 20 20 20 20 20 55 ┆ 0017 ENDIF 0018 U┆
0x0240…0260 4e 54 49 4c 20 43 3d 31 30 30 30 0d 0a 20 20 30 30 31 39 20 20 20 20 20 4c 45 54 20 4c 41 53 54 ┆NTIL C=1000 0019 LET LAST┆
0x0260…0280 56 41 4c 3d 30 0d 0a 20 20 30 30 32 30 20 20 20 20 20 47 4f 54 4f 20 30 31 32 33 0d 0a 20 20 30 ┆VAL=0 0020 GOTO 0123 0┆
0x0280…02a0 30 32 31 20 20 20 20 20 4c 45 54 20 4c 41 53 54 56 41 4c 3d 41 0d 0a 20 20 30 30 32 32 20 20 20 ┆021 LET LASTVAL=A 0022 ┆
0x02a0…02c0 20 20 49 46 20 4e 4f 54 20 44 20 54 48 45 4e 20 47 4f 54 4f 20 30 31 32 33 0d 0a 20 20 30 30 32 ┆ IF NOT D THEN GOTO 0123 002┆
0x02c0…02e0 33 20 20 20 20 20 43 41 53 45 20 41 20 44 49 56 20 38 31 39 32 20 4f 46 20 0d 0a 20 20 30 30 32 ┆3 CASE A DIV 8192 OF 002┆
0x02e0…0300 34 20 20 20 20 20 20 20 49 46 20 41 3c 32 35 36 20 54 48 45 4e 20 0d 0a 20 20 30 30 32 35 20 20 ┆4 IF A<256 THEN 0025 ┆
0x0300…0320 20 20 20 20 20 20 20 45 58 45 43 20 48 45 58 34 0d 0a 20 20 30 30 32 36 20 20 20 20 20 20 20 45 ┆ EXEC HEX4 0026 E┆
0x0320…0340 4c 53 45 0d 0a 20 20 30 30 32 37 20 20 20 20 20 20 20 20 20 46 4f 52 20 43 3d 31 20 54 4f 20 53 ┆LSE 0027 FOR C=1 TO S┆
0x0340…0360 59 4d 4d 41 58 0d 0a 20 20 30 30 32 38 20 20 20 20 20 20 20 20 20 20 20 49 46 20 41 3d 53 59 4d ┆YMMAX 0028 IF A=SYM┆
0x0360…0380 42 28 43 29 20 54 48 45 4e 20 0d 0a 20 20 30 30 32 39 20 20 20 20 20 20 20 20 20 20 20 20 20 50 ┆B(C) THEN 0029 P┆
0x0380…03a0 52 49 4e 54 20 53 59 4d 42 24 28 43 29 3b 0d 0a 20 20 30 30 33 30 20 20 20 20 20 20 20 20 20 20 ┆RINT SYMB$(C); 0030 ┆
0x03a0…03c0 20 20 20 4c 45 54 20 43 3d 31 30 30 30 3b 20 44 3d 30 0d 0a 20 20 30 30 33 31 20 20 20 20 20 20 ┆ LET C=1000; D=0 0031 ┆
0x03c0…03e0 20 20 20 20 20 45 4e 44 49 46 0d 0a 20 20 30 30 33 32 20 20 20 20 20 20 20 20 20 4e 45 58 54 20 ┆ ENDIF 0032 NEXT ┆
0x03e0…0400 43 0d 0a 20 20 30 30 33 33 20 20 20 20 20 20 20 20 20 49 46 20 4e 4f 54 20 44 20 54 48 45 4e 20 ┆C 0033 IF NOT D THEN ┆
0x0400…0420 47 4f 54 4f 20 30 30 34 39 0d 0a 20 20 30 30 33 34 20 20 20 20 20 20 20 20 20 50 52 49 4e 54 20 ┆GOTO 0049 0034 PRINT ┆
0x0420…0440 4a 4a 49 44 24 28 28 41 20 44 49 56 20 32 30 34 38 29 2a 33 2b 31 2c 28 41 20 44 49 56 20 32 30 ┆JJID$((A DIV 2048)*3+1,(A DIV 20┆
0x0440…0460 34 38 29 2a 33 2b 33 29 3b 22 20 20 20 22 3b 43 48 52 28 33 32 2b 33 32 2a 28 41 20 44 49 56 20 ┆48)*3+3);" ";CHR(32+32*(A DIV ┆
0x0460…0480 31 30 32 34 20 4d 4f 44 20 32 29 29 3b 22 20 22 3b 0d 0a 20 20 30 30 33 35 20 20 20 20 20 20 20 ┆1024 MOD 2));" "; 0035 ┆
0x0480…04a0 20 20 43 41 53 45 20 41 20 44 49 56 20 32 35 36 20 4d 4f 44 20 34 20 4f 46 20 0d 0a 20 20 30 30 ┆ CASE A DIV 256 MOD 4 OF 00┆
0x04a0…04c0 33 36 20 20 20 20 20 20 20 20 20 20 20 50 52 49 4e 54 20 43 48 52 28 34 33 2b 32 2a 28 41 20 44 ┆36 PRINT CHR(43+2*(A D┆
0x04c0…04e0 49 56 20 31 32 38 20 4d 4f 44 20 32 29 29 3b 0d 0a 20 20 30 30 33 37 20 20 20 20 20 20 20 20 20 ┆IV 128 MOD 2)); 0037 ┆
0x04e0…0500 20 20 4c 45 54 20 43 3d 41 3b 20 41 3d 41 42 53 28 41 20 4d 4f 44 20 32 35 36 2d 32 35 36 2a 28 ┆ LET C=A; A=ABS(A MOD 256-256*(┆
0x0500…0520 41 20 44 49 56 20 31 32 38 20 4d 4f 44 20 32 29 29 0d 0a 20 20 30 30 33 38 20 20 20 20 20 20 20 ┆A DIV 128 MOD 2)) 0038 ┆
0x0520…0540 20 20 20 20 45 58 45 43 20 48 45 58 32 0d 0a 20 20 30 30 33 39 20 20 20 20 20 20 20 20 20 20 20 ┆ EXEC HEX2 0039 ┆
0x0540…0560 50 52 49 4e 54 20 55 53 49 4e 47 20 22 2c 23 22 2c 43 48 52 28 43 20 44 49 56 20 32 35 36 20 4d ┆PRINT USING ",#",CHR(C DIV 256 M┆
0x0560…0580 4f 44 20 34 2b 34 38 29 3b 0d 0a 20 20 30 30 34 30 20 20 20 20 20 20 20 20 20 57 48 45 4e 20 30 ┆OD 4+48); 0040 WHEN 0┆
0x0580…05a0 0d 0a 20 20 30 30 34 31 20 20 20 20 20 20 20 20 20 20 20 4c 45 54 20 41 3d 41 20 4d 4f 44 20 32 ┆ 0041 LET A=A MOD 2┆
0x05a0…05c0 35 36 0d 0a 20 20 30 30 34 32 20 20 20 20 20 20 20 20 20 20 20 45 58 45 43 20 48 45 58 32 0d 0a ┆56 0042 EXEC HEX2 ┆
0x05c0…05e0 20 20 30 30 34 33 20 20 20 20 20 20 20 20 20 57 48 45 4e 20 31 0d 0a 20 20 30 30 34 34 20 20 20 ┆ 0043 WHEN 1 0044 ┆
0x05e0…0600 20 20 20 20 20 20 20 20 4c 45 54 20 41 3d 41 20 4d 4f 44 20 32 35 36 2d 32 35 36 2a 28 41 20 44 ┆ LET A=A MOD 256-256*(A D┆
0x0600…0620 49 56 20 31 32 38 20 4d 4f 44 20 32 29 3b 20 41 3d 41 44 52 2b 41 0d 0a 20 20 30 30 34 35 20 20 ┆IV 128 MOD 2); A=ADR+A 0045 ┆
0x0620…0640 20 20 20 20 20 20 20 20 20 4c 45 54 20 41 3d 41 42 53 28 41 29 0d 0a 20 20 30 30 34 36 20 20 20 ┆ LET A=ABS(A) 0046 ┆
0x0640…0660 20 20 20 20 20 20 20 20 45 58 45 43 20 48 45 58 34 0d 0a 20 20 30 30 34 37 20 20 20 20 20 20 20 ┆ EXEC HEX4 0047 ┆
0x0660…0680 20 20 20 20 50 52 49 4e 54 20 41 44 52 24 3b 0d 0a 20 20 30 30 34 38 20 20 20 20 20 20 20 20 20 ┆ PRINT ADR$; 0048 ┆
0x0680…06a0 45 4e 44 43 41 53 45 0d 0a 20 20 30 30 34 39 20 20 20 20 20 20 20 45 4e 44 49 46 0d 0a 20 20 30 ┆ENDCASE 0049 ENDIF 0┆
0x06a0…06c0 30 35 30 20 20 20 20 20 57 48 45 4e 20 31 2c 32 0d 0a 20 20 30 30 35 31 20 20 20 20 20 20 20 49 ┆050 WHEN 1,2 0051 I┆
0x06c0…06e0 46 20 41 20 44 49 56 20 38 31 39 32 3d 31 20 54 48 45 4e 20 0d 0a 20 20 30 30 35 32 20 20 20 20 ┆F A DIV 8192=1 THEN 0052 ┆
0x06e0…0700 20 20 20 20 20 50 52 49 4e 54 20 22 4c 44 41 20 20 20 22 3b 0d 0a 20 20 30 30 35 33 20 20 20 20 ┆ PRINT "LDA "; 0053 ┆
0x0700…0720 20 20 20 45 4c 53 45 0d 0a 20 20 30 30 35 34 20 20 20 20 20 20 20 20 20 50 52 49 4e 54 20 22 53 ┆ ELSE 0054 PRINT "S┆
0x0720…0740 54 41 20 20 20 22 3b 0d 0a 20 20 30 30 35 35 20 20 20 20 20 20 20 45 4e 44 49 46 0d 0a 20 20 30 ┆TA "; 0055 ENDIF 0┆
0x0740…0760 30 35 36 20 20 20 20 20 20 20 50 52 49 4e 54 20 43 48 52 28 33 32 2b 33 32 2a 28 41 20 44 49 56 ┆056 PRINT CHR(32+32*(A DIV┆
0x0760…0780 20 31 30 32 34 20 4d 4f 44 20 32 29 29 3b 22 20 22 3b 43 48 52 28 41 20 44 49 56 20 32 30 34 38 ┆ 1024 MOD 2));" ";CHR(A DIV 2048┆
0x0780…07a0 20 4d 4f 44 20 34 2b 34 38 29 3b 22 2c 22 3b 0d 0a 20 20 30 30 35 37 20 20 20 20 20 20 20 43 41 ┆ MOD 4+48);","; 0057 CA┆
0x07a0…07c0 53 45 20 41 20 44 49 56 20 32 35 36 20 4d 4f 44 20 34 20 4f 46 20 0d 0a 20 20 30 30 35 38 20 20 ┆SE A DIV 256 MOD 4 OF 0058 ┆
0x07c0…07e0 20 20 20 20 20 20 20 50 52 49 4e 54 20 43 48 52 28 34 33 2b 32 2a 28 41 20 44 49 56 20 31 32 38 ┆ PRINT CHR(43+2*(A DIV 128┆
0x07e0…0800 20 4d 4f 44 20 32 29 29 3b 0d 0a 20 20 30 30 35 39 20 20 20 20 20 20 20 20 20 4c 45 54 20 43 3d ┆ MOD 2)); 0059 LET C=┆
0x0800…0820 41 3b 20 41 3d 41 42 53 28 41 20 4d 4f 44 20 32 35 36 2d 32 35 36 2a 28 41 20 44 49 56 20 31 32 ┆A; A=ABS(A MOD 256-256*(A DIV 12┆
0x0820…0840 38 20 4d 4f 44 20 32 29 29 0d 0a 20 20 30 30 36 30 20 20 20 20 20 20 20 20 20 45 58 45 43 20 48 ┆8 MOD 2)) 0060 EXEC H┆
0x0840…0860 45 58 32 0d 0a 20 20 30 30 36 31 20 20 20 20 20 20 20 20 20 50 52 49 4e 54 20 22 2c 22 3b 43 48 ┆EX2 0061 PRINT ",";CH┆
0x0860…0880 52 28 43 20 44 49 56 20 32 35 36 20 4d 4f 44 20 34 2b 34 38 29 3b 0d 0a 20 20 30 30 36 32 20 20 ┆R(C DIV 256 MOD 4+48); 0062 ┆
0x0880…08a0 20 20 20 20 20 57 48 45 4e 20 30 0d 0a 20 20 30 30 36 33 20 20 20 20 20 20 20 20 20 50 52 49 4e ┆ WHEN 0 0063 PRIN┆
0x08a0…08c0 54 20 50 5a 24 28 41 20 4d 4f 44 20 32 35 36 2b 31 29 3b 0d 0a 20 20 30 30 36 34 20 20 20 20 20 ┆T PZ$(A MOD 256+1); 0064 ┆
0x08c0…08e0 20 20 57 48 45 4e 20 31 0d 0a 20 20 30 30 36 35 20 20 20 20 20 20 20 20 20 4c 45 54 20 41 3d 41 ┆ WHEN 1 0065 LET A=A┆
0x08e0…0900 20 4d 4f 44 20 32 35 36 2d 32 35 36 2a 28 41 20 44 49 56 20 31 32 38 20 4d 4f 44 20 32 29 3b 20 ┆ MOD 256-256*(A DIV 128 MOD 2); ┆
0x0900…0920 41 3d 41 44 52 2b 41 3b 20 41 3d 41 42 53 28 41 29 0d 0a 20 20 30 30 36 36 20 20 20 20 20 20 20 ┆A=ADR+A; A=ABS(A) 0066 ┆
0x0920…0940 20 20 45 58 45 43 20 48 45 58 34 0d 0a 20 20 30 30 36 37 20 20 20 20 20 20 20 20 20 50 52 49 4e ┆ EXEC HEX4 0067 PRIN┆
0x0940…0960 54 20 41 44 52 24 3b 0d 0a 20 20 30 30 36 38 20 20 20 20 20 20 20 45 4e 44 43 41 53 45 0d 0a 20 ┆T ADR$; 0068 ENDCASE ┆
0x0960…0980 20 30 30 36 39 20 20 20 20 20 57 48 45 4e 20 33 0d 0a 20 20 30 30 37 30 20 20 20 20 20 20 20 43 ┆ 0069 WHEN 3 0070 C┆
0x0980…09a0 41 53 45 20 41 20 4f 46 20 0d 0a 20 20 30 30 37 31 20 20 20 20 20 20 20 20 20 50 52 49 4e 54 20 ┆ASE A OF 0071 PRINT ┆
0x09a0…09c0 49 4f 24 28 31 2b 28 41 20 44 49 56 20 32 35 36 20 4d 4f 44 20 38 29 2a 33 2c 33 2b 28 41 20 44 ┆IO$(1+(A DIV 256 MOD 8)*3,3+(A D┆
0x09c0…09e0 49 56 20 32 35 36 20 4d 4f 44 20 38 29 2a 33 29 3b 0d 0a 20 20 30 30 37 32 20 20 20 20 20 20 20 ┆IV 256 MOD 8)*3); 0072 ┆
0x09e0…0a00 20 20 49 46 20 41 20 44 49 56 20 32 35 36 20 4d 4f 44 20 38 3d 37 20 54 48 45 4e 20 0d 0a 20 20 ┆ IF A DIV 256 MOD 8=7 THEN ┆
0x0a00…0a20 30 30 37 33 20 20 20 20 20 20 20 20 20 20 20 50 52 49 4e 54 20 54 24 28 31 2b 32 2a 28 41 20 44 ┆0073 PRINT T$(1+2*(A D┆
0x0a20…0a40 49 56 20 36 34 20 4d 4f 44 20 34 29 2c 32 2b 32 2a 28 41 20 44 49 56 20 36 34 20 4d 4f 44 20 34 ┆IV 64 MOD 4),2+2*(A DIV 64 MOD 4┆
0x0a40…0a60 29 29 3b 22 20 20 20 22 3b 0d 0a 20 20 30 30 37 34 20 20 20 20 20 20 20 20 20 45 4c 53 45 0d 0a ┆));" "; 0074 ELSE ┆
0x0a60…0a80 20 20 30 30 37 35 20 20 20 20 20 20 20 20 20 20 20 50 52 49 4e 54 20 46 24 28 31 2b 41 20 44 49 ┆ 0075 PRINT F$(1+A DI┆
0x0a80…0aa0 56 20 36 34 20 4d 4f 44 20 34 29 3b 22 20 20 20 20 22 3b 0d 0a 20 20 30 30 37 36 20 20 20 20 20 ┆V 64 MOD 4);" "; 0076 ┆
0x0aa0…0ac0 20 20 20 20 45 4e 44 49 46 0d 0a 20 20 30 30 37 37 20 20 20 20 20 20 20 20 20 49 46 20 41 20 44 ┆ ENDIF 0077 IF A D┆
0x0ac0…0ae0 49 56 20 32 35 36 20 4d 4f 44 20 38 3c 3e 30 20 41 4e 44 20 41 20 44 49 56 20 32 35 36 20 4d 4f ┆IV 256 MOD 8<>0 AND A DIV 256 MO┆
0x0ae0…0b00 44 20 38 3c 3e 37 20 54 48 45 4e 20 50 52 49 4e 54 20 43 48 52 28 34 38 2b 41 20 44 49 56 20 32 ┆D 8<>7 THEN PRINT CHR(48+A DIV 2┆
0x0b00…0b20 30 34 38 20 4d 4f 44 20 34 29 3b 22 2c 22 3b 0d 0a 20 20 30 30 37 38 20 20 20 20 20 20 20 20 20 ┆048 MOD 4);","; 0078 ┆
0x0b20…0b40 4c 45 54 20 41 3d 41 20 4d 4f 44 20 36 34 0d 0a 20 20 30 30 37 39 20 20 20 20 20 20 20 20 20 45 ┆LET A=A MOD 64 0079 E┆
0x0b40…0b60 58 45 43 20 48 45 58 32 0d 0a 20 20 30 30 38 30 20 20 20 20 20 20 20 57 48 45 4e 20 32 34 37 30 ┆XEC HEX2 0080 WHEN 2470┆
0x0b60…0b80 33 0d 0a 20 20 30 30 38 31 20 20 20 20 20 20 20 20 20 50 52 49 4e 54 20 22 49 4e 54 45 4e 22 3b ┆3 0081 PRINT "INTEN";┆
0x0b80…0ba0 0d 0a 20 20 30 30 38 32 20 20 20 20 20 20 20 57 48 45 4e 20 32 34 37 36 37 0d 0a 20 20 30 30 38 ┆ 0082 WHEN 24767 008┆
0x0ba0…0bc0 33 20 20 20 20 20 20 20 20 20 50 52 49 4e 54 20 22 49 4e 54 44 53 22 3b 0d 0a 20 20 30 30 38 34 ┆3 PRINT "INTDS"; 0084┆
0x0bc0…0be0 20 20 20 20 20 20 20 57 48 45 4e 20 32 34 38 39 35 2c 32 36 39 34 33 2c 32 38 39 39 31 2c 33 31 ┆ WHEN 24895,26943,28991,31┆
0x0be0…0c00 30 33 39 0d 0a 20 20 30 30 38 35 20 20 20 20 20 20 20 20 20 50 52 49 4e 54 20 22 52 45 41 44 53 ┆039 0085 PRINT "READS┆
0x0c00…0c20 20 20 20 22 3b 43 48 52 28 41 20 44 49 56 20 32 30 34 38 20 4d 4f 44 20 34 2b 34 38 29 3b 0d 0a ┆ ";CHR(A DIV 2048 MOD 4+48); ┆
0x0c20…0c40 20 20 30 30 38 36 20 20 20 20 20 20 20 57 48 45 4e 20 32 35 34 30 37 2c 32 37 34 35 35 2c 32 39 ┆ 0086 WHEN 25407,27455,29┆
0x0c40…0c60 35 30 33 2c 33 31 35 35 31 0d 0a 20 20 30 30 38 37 20 20 20 20 20 20 20 20 20 50 52 49 4e 54 20 ┆503,31551 0087 PRINT ┆
0x0c60…0c80 22 49 4e 54 41 20 20 20 20 22 3b 43 48 52 28 41 20 44 49 56 20 32 30 34 38 20 4d 4f 44 20 34 2b ┆"INTA ";CHR(A DIV 2048 MOD 4+┆
0x0c80…0ca0 34 38 29 3b 0d 0a 20 20 30 30 38 38 20 20 20 20 20 20 20 57 48 45 4e 20 32 35 36 36 33 2c 32 37 ┆48); 0088 WHEN 25663,27┆
0x0ca0…0cc0 37 31 31 2c 32 39 37 35 39 2c 33 31 38 30 37 0d 0a 20 20 30 30 38 39 20 20 20 20 20 20 20 20 20 ┆711,29759,31807 0089 ┆
0x0cc0…0ce0 50 52 49 4e 54 20 22 4d 53 4b 4f 20 20 20 20 22 3b 43 48 52 28 41 20 44 49 56 20 32 30 34 38 20 ┆PRINT "MSKO ";CHR(A DIV 2048 ┆
0x0ce0…0d00 4d 4f 44 20 34 2b 34 38 29 3b 0d 0a 20 20 30 30 39 30 20 20 20 20 20 20 20 57 48 45 4e 20 32 36 ┆MOD 4+48); 0090 WHEN 26┆
0x0d00…0d20 30 34 37 2c 32 38 30 39 35 2c 33 30 31 34 33 2c 33 32 31 39 31 0d 0a 20 20 30 30 39 31 20 20 20 ┆047,28095,30143,32191 0091 ┆
0x0d20…0d40 20 20 20 20 20 20 50 52 49 4e 54 20 22 49 4f 52 53 54 22 3b 0d 0a 20 20 30 30 39 32 20 20 20 20 ┆ PRINT "IORST"; 0092 ┆
0x0d40…0d60 20 20 20 57 48 45 4e 20 32 36 31 37 35 2c 32 38 32 32 33 2c 33 30 32 37 31 2c 33 32 33 31 39 0d ┆ WHEN 26175,28223,30271,32319 ┆
0x0d60…0d80 0a 20 20 30 30 39 33 20 20 20 20 20 20 20 20 20 50 52 49 4e 54 20 22 48 41 4c 54 22 3b 0d 0a 20 ┆ 0093 PRINT "HALT"; ┆
0x0d80…0da0 20 30 30 39 34 20 20 20 20 20 20 20 45 4e 44 43 41 53 45 0d 0a 20 20 30 30 39 35 20 20 20 20 20 ┆ 0094 ENDCASE 0095 ┆
0x0da0…0dc0 57 48 45 4e 20 34 2c 35 2c 36 2c 37 0d 0a 20 20 30 30 39 36 20 20 20 20 20 20 20 43 41 53 45 20 ┆WHEN 4,5,6,7 0096 CASE ┆
0x0dc0…0de0 41 20 4d 4f 44 20 32 30 34 38 20 4f 46 20 0d 0a 20 20 30 30 39 37 20 20 20 20 20 20 20 20 20 50 ┆A MOD 2048 OF 0097 P┆
0x0de0…0e00 52 49 4e 54 20 41 52 49 24 28 31 2b 33 2a 28 41 20 44 49 56 20 32 35 36 20 4d 4f 44 20 38 29 2c ┆RINT ARI$(1+3*(A DIV 256 MOD 8),┆
0x0e00…0e20 33 2b 33 2a 28 41 20 44 49 56 20 32 35 36 20 4d 4f 44 20 38 29 29 3b 0d 0a 20 20 30 30 39 38 20 ┆3+3*(A DIV 256 MOD 8)); 0098 ┆
0x0e20…0e40 20 20 20 20 20 20 20 20 50 52 49 4e 54 20 43 24 28 41 20 44 49 56 20 31 36 20 4d 4f 44 20 34 2b ┆ PRINT C$(A DIV 16 MOD 4+┆
0x0e40…0e60 31 29 3b 0d 0a 20 20 30 30 39 39 20 20 20 20 20 20 20 20 20 50 52 49 4e 54 20 53 48 24 28 41 20 ┆1); 0099 PRINT SH$(A ┆
0x0e60…0e80 44 49 56 20 36 34 20 4d 4f 44 20 34 2b 31 29 3b 0d 0a 20 20 30 31 30 30 20 20 20 20 20 20 20 20 ┆DIV 64 MOD 4+1); 0100 ┆
0x0e80…0ea0 20 50 52 49 4e 54 20 22 20 22 3b 43 48 52 28 33 32 2b 33 2a 28 41 20 44 49 56 20 38 20 4d 4f 44 ┆ PRINT " ";CHR(32+3*(A DIV 8 MOD┆
0x0ea0…0ec0 20 32 29 29 3b 22 20 22 3b 0d 0a 20 20 30 31 30 31 20 20 20 20 20 20 20 57 48 45 4e 20 31 32 39 ┆ 2));" "; 0101 WHEN 129┆
0x0ec0…0ee0 32 0d 0a 20 20 30 31 30 32 20 20 20 20 20 20 20 20 20 50 52 49 4e 54 20 22 53 45 51 20 20 20 20 ┆2 0102 PRINT "SEQ ┆
0x0ee0…0f00 20 22 3b 0d 0a 20 20 30 31 30 33 20 20 20 20 20 20 20 20 20 4c 45 54 20 41 3d 28 41 20 44 49 56 ┆ "; 0103 LET A=(A DIV┆
0x0f00…0f20 20 32 30 34 38 29 2a 32 30 34 38 0d 0a 20 20 30 31 30 34 20 20 20 20 20 20 20 57 48 45 4e 20 31 ┆ 2048)*2048 0104 WHEN 1┆
0x0f20…0f40 33 30 36 0d 0a 20 20 30 31 30 35 20 20 20 20 20 20 20 20 20 50 52 49 4e 54 20 22 53 47 52 20 20 ┆306 0105 PRINT "SGR ┆
0x0f40…0f60 20 20 20 22 3b 0d 0a 20 20 30 31 30 36 20 20 20 20 20 20 20 20 20 4c 45 54 20 41 3d 28 41 20 44 ┆ "; 0106 LET A=(A D┆
0x0f60…0f80 49 56 20 32 30 34 38 29 2a 32 30 34 38 0d 0a 20 20 30 31 30 37 20 20 20 20 20 20 20 57 48 45 4e ┆IV 2048)*2048 0107 WHEN┆
0x0f80…0fa0 20 31 30 35 31 0d 0a 20 20 30 31 30 38 20 20 20 20 20 20 20 20 20 50 52 49 4e 54 20 22 53 4c 53 ┆ 1051 0108 PRINT "SLS┆
0x0fa0…0fc0 20 20 20 20 20 22 3b 0d 0a 20 20 30 31 30 39 20 20 20 20 20 20 20 20 20 4c 45 54 20 41 3d 28 41 ┆ "; 0109 LET A=(A┆
0x0fc0…0fe0 20 44 49 56 20 32 30 34 38 29 2a 32 30 34 38 0d 0a 20 20 30 31 31 30 20 20 20 20 20 20 20 57 48 ┆ DIV 2048)*2048 0110 WH┆
0x0fe0…1000 45 4e 20 31 32 39 33 0d 0a 20 20 30 31 31 31 20 20 20 20 20 20 20 20 20 50 52 49 4e 54 20 22 53 ┆EN 1293 0111 PRINT "S┆
0x1000…1020 4e 45 20 20 20 20 20 22 3b 0d 0a 20 20 30 31 31 32 20 20 20 20 20 20 20 20 20 4c 45 54 20 41 3d ┆NE "; 0112 LET A=┆
0x1020…1040 28 41 20 44 49 56 20 32 30 34 38 29 2a 32 30 34 38 0d 0a 20 20 30 31 31 33 20 20 20 20 20 20 20 ┆(A DIV 2048)*2048 0113 ┆
0x1040…1060 57 48 45 4e 20 31 33 30 37 0d 0a 20 20 30 31 31 34 20 20 20 20 20 20 20 20 20 50 52 49 4e 54 20 ┆WHEN 1307 0114 PRINT ┆
0x1060…1080 22 53 4e 47 20 20 20 20 20 22 3b 0d 0a 20 20 30 31 31 35 20 20 20 20 20 20 20 20 20 4c 45 54 20 ┆"SNG "; 0115 LET ┆
0x1080…10a0 41 3d 28 41 20 44 49 56 20 32 30 34 38 29 2a 32 30 34 38 0d 0a 20 20 30 31 31 36 20 20 20 20 20 ┆A=(A DIV 2048)*2048 0116 ┆
0x10a0…10c0 20 20 57 48 45 4e 20 31 30 35 30 0d 0a 20 20 30 31 31 37 20 20 20 20 20 20 20 20 20 50 52 49 4e ┆ WHEN 1050 0117 PRIN┆
0x10c0…10e0 54 20 22 53 4e 4c 20 20 20 20 20 22 3b 0d 0a 20 20 30 31 31 38 20 20 20 20 20 20 20 20 20 4c 45 ┆T "SNL "; 0118 LE┆
0x10e0…1100 54 20 41 3d 28 41 20 44 49 56 20 32 30 34 38 29 2a 32 30 34 38 0d 0a 20 20 30 31 31 39 20 20 20 ┆T A=(A DIV 2048)*2048 0119 ┆
0x1100…1120 20 20 20 20 45 4e 44 43 41 53 45 0d 0a 20 20 30 31 32 30 20 20 20 20 20 20 20 50 52 49 4e 54 20 ┆ ENDCASE 0120 PRINT ┆
0x1120…1140 43 48 52 28 34 38 2b 41 20 44 49 56 20 38 31 39 32 20 4d 4f 44 20 34 29 3b 22 2c 22 3b 43 48 52 ┆CHR(48+A DIV 8192 MOD 4);",";CHR┆
0x1140…1160 28 41 20 44 49 56 20 32 30 34 38 20 4d 4f 44 20 34 2b 34 38 29 3b 0d 0a 20 20 30 31 32 31 20 20 ┆(A DIV 2048 MOD 4+48); 0121 ┆
0x1160…1180 20 20 20 20 20 49 46 20 41 20 4d 4f 44 20 38 20 54 48 45 4e 20 50 52 49 4e 54 20 22 2c 22 3b 53 ┆ IF A MOD 8 THEN PRINT ",";S┆
0x1180…11a0 4b 50 24 28 31 2b 28 41 20 4d 4f 44 20 38 29 2a 33 2c 33 2b 28 41 20 4d 4f 44 20 38 29 2a 33 29 ┆KP$(1+(A MOD 8)*3,3+(A MOD 8)*3)┆
0x11a0…11c0 3b 0d 0a 20 20 30 31 32 32 20 20 20 20 20 45 4e 44 43 41 53 45 0d 0a 20 20 30 31 32 33 20 20 20 ┆; 0122 ENDCASE 0123 ┆
0x11c0…11e0 57 48 45 4e 20 22 27 22 2c 22 2d 22 2c 22 3d 22 2c 22 2a 22 0d 0a 20 20 30 31 32 34 20 20 20 20 ┆WHEN "'","-","=","*" 0124 ┆
0x11e0…1200 20 50 52 49 4e 54 20 22 20 20 20 20 20 22 3b 0d 0a 20 20 30 31 32 35 20 20 20 20 20 45 58 45 43 ┆ PRINT " "; 0125 EXEC┆
0x1200…1220 20 48 45 58 34 0d 0a 20 20 30 31 32 36 20 20 20 20 20 50 52 49 4e 54 20 44 41 54 24 3b 0d 0a 20 ┆ HEX4 0126 PRINT DAT$; ┆
0x1220…1240 20 30 31 32 37 20 20 20 57 48 45 4e 20 22 3c 33 34 3e 22 0d 0a 20 20 30 31 32 38 20 20 20 20 20 ┆ 0127 WHEN "<34>" 0128 ┆
0x1240…1260 50 52 49 4e 54 20 22 20 20 20 20 20 22 3b 0d 0a 20 20 30 31 32 39 20 20 20 20 20 4c 45 54 20 41 ┆PRINT " "; 0129 LET A┆
0x1260…1280 3d 41 2f 32 0d 0a 20 20 30 31 33 30 20 20 20 20 20 45 58 45 43 20 48 45 58 34 0d 0a 20 20 30 31 ┆=A/2 0130 EXEC HEX4 01┆
0x1280…12a0 33 31 20 20 20 20 20 50 52 49 4e 54 20 22 27 2a 32 22 3b 0d 0a 20 20 30 31 33 32 20 20 20 45 4e ┆31 PRINT "'*2"; 0132 EN┆
0x12a0…12c0 44 43 41 53 45 0d 0a 20 20 30 31 33 33 20 20 20 50 52 49 4e 54 20 0d 0a 20 20 30 31 33 34 20 45 ┆DCASE 0133 PRINT 0134 E┆
0x12c0…12e0 4e 44 50 52 4f 43 0d 0a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆NDPROC ┆
0x12e0…1300 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 00 ┆ ┆
[…0x8…]
0x1400…1420 35 36 30 20 20 20 20 20 20 20 20 20 20 20 50 52 49 4e 54 20 22 49 2f 4f 22 3b 0d 0a 20 20 31 35 ┆560 PRINT "I/O"; 15┆
0x1420…1440 37 30 20 20 20 20 20 20 20 20 20 57 48 45 4e 20 34 2c 35 2c 36 2c 37 0d 0a 20 20 31 35 38 30 20 ┆70 WHEN 4,5,6,7 1580 ┆
0x1440…1460 20 20 20 20 20 20 20 20 20 20 50 52 49 4e 54 20 41 52 49 24 28 31 2b 33 2a 28 41 20 44 49 56 20 ┆ PRINT ARI$(1+3*(A DIV ┆
0x1460…1480 32 35 36 20 4d 4f 44 20 38 29 2c 33 2b 33 2a 28 41 20 44 49 56 20 32 35 36 20 4d 4f 44 20 38 29 ┆256 MOD 8),3+3*(A DIV 256 MOD 8)┆
0x1480…14a0 29 3b 0d 0a 20 20 31 35 39 30 20 20 20 20 20 20 20 20 20 20 20 50 52 49 4e 54 20 43 24 28 41 20 ┆); 1590 PRINT C$(A ┆
0x14a0…14c0 44 49 56 20 31 36 20 4d 4f 44 20 34 2b 31 29 3b 0d 0a 20 20 31 36 30 30 20 20 20 20 20 20 20 20 ┆DIV 16 MOD 4+1); 1600 ┆
0x14c0…14e0 20 20 20 50 52 49 4e 54 20 53 48 24 28 41 20 44 49 56 20 36 34 20 4d 4f 44 20 34 2b 31 29 3b 0d ┆ PRINT SH$(A DIV 64 MOD 4+1); ┆
0x14e0…1500 0a 20 20 31 36 31 30 20 20 20 20 20 20 20 20 20 20 20 50 52 49 4e 54 20 22 20 22 3b 43 48 52 28 ┆ 1610 PRINT " ";CHR(┆
0x1500…1520 33 32 2b 33 2a 28 41 20 44 49 56 20 38 20 4d 4f 44 20 32 29 29 3b 22 20 22 3b 0d 0a 20 20 31 36 ┆32+3*(A DIV 8 MOD 2));" "; 16┆
0x1520…1540 32 30 20 20 20 20 20 20 20 20 20 20 20 50 52 49 4e 54 20 43 48 52 28 34 38 2b 41 20 44 49 56 20 ┆20 PRINT CHR(48+A DIV ┆
0x1540…1560 38 31 39 32 20 4d 4f 44 20 34 29 3b 22 2c 22 3b 43 48 52 28 41 20 44 49 56 20 32 30 34 38 20 4d ┆8192 MOD 4);",";CHR(A DIV 2048 M┆
0x1560…1580 4f 44 20 34 2b 34 38 29 3b 0d 0a 20 20 31 36 33 30 20 20 20 20 20 20 20 20 20 20 20 49 46 20 41 ┆OD 4+48); 1630 IF A┆
0x1580…15a0 20 4d 4f 44 20 38 20 54 48 45 4e 20 50 52 49 4e 54 20 22 2c 22 3b 53 4b 50 24 28 31 2b 28 41 20 ┆ MOD 8 THEN PRINT ",";SKP$(1+(A ┆
0x15a0…15c0 4d 4f 44 20 38 29 2a 33 2c 33 2b 28 41 20 4d 4f 44 20 38 29 2a 33 29 3b 0d 0a 20 20 31 36 34 30 ┆MOD 8)*3,3+(A MOD 8)*3); 1640┆
0x15c0…15e0 20 20 20 20 20 20 20 20 20 45 4e 44 43 41 53 45 0d 0a 20 20 31 36 35 30 20 20 20 20 20 20 20 57 ┆ ENDCASE 1650 W┆
0x15e0…1600 48 45 4e 20 22 27 22 2c 22 2d 22 2c 22 3d 22 2c 22 2a 22 0d 0a 20 20 31 36 36 30 20 20 20 20 20 ┆HEN "'","-","=","*" 1660 ┆
0x1600…1620 20 20 20 20 50 52 49 4e 54 20 22 20 20 20 20 20 22 3b 0d 0a 20 20 31 36 37 30 20 20 20 20 20 20 ┆ PRINT " "; 1670 ┆
0x1620…1640 20 20 20 45 58 45 43 20 48 45 58 34 0d 0a 20 20 31 36 38 30 20 20 20 20 20 20 20 20 20 50 52 49 ┆ EXEC HEX4 1680 PRI┆
0x1640…1660 4e 54 20 44 41 54 24 3b 0d 0a 20 20 31 36 39 30 20 20 20 20 20 20 20 57 48 45 4e 20 22 3c 33 34 ┆NT DAT$; 1690 WHEN "<34┆
0x1660…1680 3e 22 0d 0a 20 20 31 37 30 30 20 20 20 20 20 20 20 20 20 50 52 49 4e 54 20 22 20 20 20 20 20 22 ┆>" 1700 PRINT " "┆
0x1680…16a0 3b 0d 0a 20 20 31 37 31 30 20 20 20 20 20 20 20 20 20 4c 45 54 20 41 3d 41 2f 32 0d 0a 20 20 31 ┆; 1710 LET A=A/2 1┆
0x16a0…16c0 37 32 30 20 20 20 20 20 20 20 20 20 45 58 45 43 20 48 45 58 34 0d 0a 20 20 31 37 33 30 20 20 20 ┆720 EXEC HEX4 1730 ┆
0x16c0…16e0 20 20 20 20 20 20 50 52 49 4e 54 20 22 27 2a 32 22 3b 0d 0a 20 20 31 37 34 30 20 20 20 20 20 20 ┆ PRINT "'*2"; 1740 ┆
0x16e0…1700 20 45 4e 44 43 41 53 45 0d 0a 20 20 31 37 35 30 20 20 20 20 20 20 20 4c 45 54 20 41 44 52 3d 41 ┆ ENDCASE 1750 LET ADR=A┆
0x1700…1720 44 52 2b 31 0d 0a 20 20 31 37 36 30 20 20 20 20 20 20 20 50 52 49 4e 54 20 0d 0a 20 20 31 37 37 ┆DR+1 1760 PRINT 177┆
0x1720…1740 30 20 20 20 20 20 4e 45 58 54 20 42 0d 0a 20 20 31 37 38 30 20 20 20 57 48 45 4e 20 36 0d 0a 20 ┆0 NEXT B 1780 WHEN 6 ┆
0x1740…1760 20 31 37 39 30 20 20 20 20 20 46 4f 52 20 42 3d 31 20 54 4f 20 35 0d 0a 20 20 31 38 30 30 20 20 ┆ 1790 FOR B=1 TO 5 1800 ┆
0x1760…1780 20 20 20 20 20 45 58 45 43 20 57 4f 52 44 0d 0a 20 20 31 38 31 30 20 20 20 20 20 4e 45 58 54 20 ┆ EXEC WORD 1810 NEXT ┆
0x1780…17a0 42 0d 0a 20 20 31 38 32 30 20 20 20 20 20 50 52 49 4e 54 20 22 45 4e 54 52 59 50 4f 49 4e 54 3a ┆B 1820 PRINT "ENTRYPOINT:┆
0x17a0…17c0 22 3b 0d 0a 20 20 31 38 33 30 20 20 20 20 20 45 58 45 43 20 48 45 58 34 0d 0a 20 20 31 38 34 30 ┆"; 1830 EXEC HEX4 1840┆
0x17c0…17e0 20 20 20 20 20 50 52 49 4e 54 20 0d 0a 20 20 31 38 35 30 20 20 20 45 4e 44 43 41 53 45 0d 0a 20 ┆ PRINT 1850 ENDCASE ┆
0x17e0…1800 20 31 38 36 30 20 55 4e 54 49 4c 20 45 4e 44 46 0d 0a 20 20 31 38 37 30 20 44 41 54 41 20 33 36 ┆ 1860 UNTIL ENDF 1870 DATA 36┆
0x1800…1820 34 34 2c 22 41 2e 45 58 54 22 0d 0a 20 20 31 38 38 30 20 44 41 54 41 20 33 36 34 38 2c 22 41 2e ┆44,"A.EXT" 1880 DATA 3648,"A.┆
0x1820…1840 47 42 59 22 0d 0a 20 20 31 38 39 30 20 44 41 54 41 20 33 36 35 30 2c 22 41 2e 47 44 4f 22 0d 0a ┆GBY" 1890 DATA 3650,"A.GDO" ┆
0x1840…1860 20 20 31 39 30 30 20 44 41 54 41 20 33 36 35 31 2c 22 41 2e 47 54 52 22 0d 0a 20 20 31 39 31 30 ┆ 1900 DATA 3651,"A.GTR" 1910┆
0x1860…1880 20 44 41 54 41 20 33 36 34 39 2c 22 41 2e 47 57 4f 22 0d 0a 20 20 31 39 32 30 20 44 41 54 41 20 ┆ DATA 3649,"A.GWO" 1920 DATA ┆
0x1880…18a0 33 36 35 32 2c 22 41 2e 50 42 59 22 0d 0a 20 20 31 39 33 30 20 44 41 54 41 20 33 36 35 34 2c 22 ┆3652,"A.PBY" 1930 DATA 3654,"┆
0x18a0…18c0 41 2e 50 44 4f 22 0d 0a 20 20 31 39 34 30 20 44 41 54 41 20 33 36 35 35 2c 22 41 2e 50 54 52 22 ┆A.PDO" 1940 DATA 3655,"A.PTR"┆
0x18c0…18e0 0d 0a 20 20 31 39 35 30 20 44 41 54 41 20 33 36 35 33 2c 22 41 2e 50 57 4f 22 0d 0a 20 20 31 39 ┆ 1950 DATA 3653,"A.PWO" 19┆
0x18e0…1900 36 30 20 44 41 54 41 20 33 36 34 37 2c 22 41 2e 52 45 4c 22 0d 0a 20 20 31 39 37 30 20 44 41 54 ┆60 DATA 3647,"A.REL" 1970 DAT┆
0x1900…1920 41 20 33 36 34 36 2c 22 41 2e 52 45 53 22 0d 0a 20 20 31 39 38 30 20 44 41 54 41 20 33 36 34 35 ┆A 3646,"A.RES" 1980 DATA 3645┆
0x1920…1940 2c 22 41 2e 54 52 55 22 0d 0a 20 20 31 39 39 30 20 44 41 54 41 20 33 32 32 36 2c 22 42 49 4e 44 ┆,"A.TRU" 1990 DATA 3226,"BIND┆
0x1940…1960 45 22 0d 0a 20 20 32 30 30 30 20 44 41 54 41 20 33 30 38 32 2c 22 42 52 45 41 4b 22 0d 0a 20 20 ┆E" 2000 DATA 3082,"BREAK" ┆
0x1960…1980 32 30 31 30 20 44 41 54 41 20 33 33 30 39 2c 22 43 41 4c 4c 20 22 0d 0a 20 20 32 30 32 30 20 44 ┆2010 DATA 3309,"CALL " 2020 D┆
0x1980…19a0 41 54 41 20 33 32 39 32 2c 22 43 44 45 4c 41 22 0d 0a 20 20 32 30 33 30 20 44 41 54 41 20 33 33 ┆ATA 3292,"CDELA" 2030 DATA 33┆
0x19a0…19c0 30 34 2c 22 43 48 41 4e 47 22 0d 0a 20 20 32 30 34 30 20 44 41 54 41 20 33 30 38 31 2c 22 43 4c ┆04,"CHANG" 2040 DATA 3081,"CL┆
0x19c0…19e0 45 41 4e 22 0d 0a 20 20 32 30 35 30 20 44 41 54 41 20 33 32 31 36 2c 22 43 4c 4f 53 45 22 0d 0a ┆EAN" 2050 DATA 3216,"CLOSE" ┆
0x19e0…1a00 20 20 32 30 36 30 20 44 41 54 41 20 33 33 30 38 2c 22 43 4f 4d 4f 4e 22 0d 0a 20 20 32 30 37 30 ┆ 2060 DATA 3308,"COMON" 2070┆
[…truncated at 200 lines…]