|
DataMuseum.dkPresents historical artifacts from the history of: Philips Data Systems |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Philips Data Systems Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 4778 (0x12aa)
Notes: pts_type(OB)
Names: »/OBJCT.OB«
└─⟦928b1fd3e⟧ Bits:30009671 Philips computer tape "600131"
└─⟦this⟧ »DRGP02//OBJCT.OB«
0x0000…0020 (0, 0, 400) 00 3e 00 40 20 20 20 20 20 20 20 20 49 44 45 4e 54 20 20 20 20 44 52 47 50 30 32 20 20 20 20 20 ┆ > @ IDENT DRGP02 ┆
0x0020…0040 52 45 4c 20 31 31 2e 30 20 38 32 2d 30 36 2d 32 38 20 38 37 30 31 30 35 30 34 31 31 30 30 00 00 ┆REL 11.0 82-06-28 870105041100 ┆
0x0040…0060 00 04 00 0c 00 08 01 03 a4 47 50 41 44 38 00 00 00 46 00 2c 00 28 03 13 00 00 00 01 00 00 1b 5b ┆ GPAD8 F , ( [┆
0x0060…0080 30 30 30 62 ff ff 1b 5b 30 30 30 65 ff ff 1b 5b 30 30 74 ff 1b 5b 30 30 71 ff 1b 38 ff ff 00 00 ┆000b [000e [00t [00q 8 ┆
0x0080…00a0 00 56 00 0e 00 0a 05 04 bc 47 50 41 44 38 00 3c 00 00 00 86 00 2c 00 28 03 13 00 00 00 21 00 00 ┆ V GPAD8 < , ( ! ┆
0x00a0…00c0 1b 5b 30 30 77 ff 1b 5b 30 30 76 ff ff ff 1b 63 ff ff 1b 5b 35 6e ff ff 00 86 00 02 00 00 00 00 ┆ [00w [00v c [5n ┆
0x00c0…00e0 00 00 00 98 00 0c 00 08 02 03 a2 44 57 54 4f 52 00 00 00 c8 00 0e 00 0a 02 04 c2 44 57 54 44 45 ┆ DWTOR DWTDE┆
0x00e0…0100 56 00 00 00 00 d8 00 2a 00 26 03 12 00 00 00 41 02 20 00 00 00 00 00 06 24 24 05 05 e2 58 00 00 ┆V * & A $$ X ┆
0x0100…0120 00 02 22 01 e3 58 00 01 00 04 23 fe ab 08 e3 59 00 00 00 ea 00 0e 00 0a 02 04 c2 4c 45 4e 44 45 ┆ " X # Y LENDE┆
0x0120…0140 52 00 00 00 01 18 00 2c 00 28 03 13 00 10 00 5b 81 00 00 01 00 04 ef 20 00 05 50 00 97 08 e7 59 ┆R , ( [ P Y┆
0x0140…0160 00 01 00 02 03 05 ef 4d 00 44 50 00 1b 01 5e 0a 8f 20 00 00 01 2a 00 0e 00 0a 02 04 c2 4c 45 4e ┆ M DP ^ * LEN┆
0x0160…0180 44 49 53 00 00 00 01 5a 00 2c 00 28 03 13 00 00 00 77 80 00 00 00 00 06 93 0c 8f 4c 00 00 00 00 ┆DIS Z , ( w L ┆
0x0180…0190 00 00 00 00 00 00 00 00 00 00 f5 21 00 00 f5 21 ┆ ! !┆
0x0190…01b0 (1, 0, 400) 00 00 8f 20 00 00 01 6c 00 0e 00 0a 02 04 c2 53 54 41 42 4c 4b 00 00 01 00 0c 00 0e 00 0a 02 04 ┆ l STABLK ┆
0x01b0…01d0 c2 47 45 54 43 48 52 00 00 01 00 1e 00 0e 00 0a 02 04 c2 4f 55 54 50 55 54 00 00 01 00 30 00 2c ┆ GETCHR OUTPUT 0 ,┆
0x01d0…01f0 00 28 03 13 00 00 00 95 82 10 00 00 00 08 03 00 04 90 82 10 f5 21 00 00 00 0a 8c 20 00 00 f7 a1 ┆ ( ! ┆
0x01f0…0210 00 00 00 0c 81 04 50 00 f5 21 00 01 00 42 00 0e 00 0a 02 04 c2 45 4e 44 42 4c 4b 00 00 01 00 72 ┆ P ! B ENDBLK r┆
0x0210…0230 00 2c 00 28 03 13 00 00 00 af 80 82 00 00 00 0e 8c 20 00 00 1c 01 50 00 5f 16 f5 21 00 00 00 10 ┆ , ( P _ ! ┆
0x0230…0250 8c 20 00 00 5f 2c f5 21 00 00 00 10 00 01 00 84 00 2c 00 28 03 13 00 00 00 c9 00 00 8c 20 00 00 ┆ _, ! , ( ┆
0x0250…0270 5f 44 f5 21 00 00 83 20 20 00 a1 0d 50 00 8f 20 00 00 03 01 a1 0d 50 00 8f 20 00 00 00 01 00 b4 ┆_D ! P P ┆
0x0270…0290 00 2c 00 28 03 13 01 00 00 e9 20 42 02 0e f5 21 00 00 00 0a 8c 20 00 00 82 20 00 20 83 20 00 06 ┆ , ( B ! ┆
0x0290…02b0 00 04 f5 21 00 00 f5 21 00 00 00 10 00 01 00 e4 00 2c 00 28 03 13 00 00 01 03 09 00 8c 20 00 00 ┆ ! ! , ( ┆
0x02b0…02d0 03 01 f7 a1 00 00 00 0c 81 58 00 00 00 04 a1 20 00 20 54 00 1a 2b 50 00 84 08 82 42 00 01 01 14 ┆ X T +P B ┆
0x02d0…02f0 00 2c 00 28 03 13 00 00 01 1f 10 40 00 04 12 08 f5 21 00 00 00 0a 8c 20 00 00 82 10 a0 59 00 1c ┆ , ( @ ! Y ┆
0x02f0…0310 00 04 1a 05 50 00 1a 01 50 00 57 00 00 01 01 44 00 2a 00 26 03 12 00 00 01 3b 40 90 84 58 00 1c ┆ P P W D * & ;@ X ┆
0x0310…0320 00 04 50 00 1c 01 f5 21 00 00 e2 59 00 19 00 04 ┆ P ! Y ┆
0x0320…0340 (2, 0, 400) 84 59 00 1b 00 04 02 8c f5 21 00 01 01 74 00 2c 00 28 03 13 00 01 01 53 84 20 00 00 00 0a 8c 20 ┆ Y ! t , ( S ┆
0x0340…0360 00 00 84 58 00 1c 00 04 50 00 02 20 f5 21 00 00 00 0e 8c 20 00 00 82 20 00 00 00 02 00 12 00 2c ┆ X P ! ,┆
0x0360…0380 00 28 03 13 00 00 01 6d 40 82 83 20 00 19 00 04 f5 21 00 00 57 00 02 0a f5 21 00 00 00 0e 8c 20 ┆ ( m@ ! W ! ┆
0x0380…03a0 00 00 02 0a f5 21 00 00 00 0e 00 02 00 42 00 2a 00 26 03 12 00 00 01 87 04 00 8c 20 00 00 57 00 ┆ ! B * & W ┆
0x03a0…03c0 02 0c f5 21 00 00 00 0e 8c 20 00 00 57 00 f5 21 00 00 1a 2b 58 52 81 58 00 02 00 72 00 2c 00 28 ┆ ! W ! +XR X r , (┆
0x03c0…03e0 03 13 00 00 01 a3 84 40 00 24 00 04 54 00 5f 8e 90 59 00 24 00 04 03 02 f7 a1 00 00 00 0c 84 04 ┆ @ $ T _ Y $ ┆
0x03e0…0400 51 00 1b 02 50 00 02 0d 00 02 00 a0 00 2c 00 28 03 13 00 00 01 bd 42 00 f5 21 00 00 00 0e 8c 20 ┆Q P , ( B ! ┆
0x0400…0420 00 00 f5 21 00 00 00 10 8c 20 00 00 f5 21 00 00 57 00 84 08 1c 20 5a 2a 00 02 00 d0 00 2c 00 28 ┆ ! ! W Z* , (┆
0x0420…0440 03 13 00 00 01 d9 00 10 1c 5f 52 00 1c 2f 50 00 04 04 ac 43 00 08 5f 3a 02 2e 84 04 f5 21 00 00 ┆ _R /P C _: . ! ┆
0x0440…0460 00 0e 8c 20 00 00 e2 58 00 02 01 00 00 2c 00 28 03 13 00 00 01 f7 84 44 00 01 00 02 22 01 54 00 ┆ X , ( D " T ┆
0x0460…0480 90 59 00 1c 00 04 5f 54 90 59 00 1e 00 04 5f 5a a0 59 00 24 00 04 8f 20 00 02 01 30 00 2c 00 28 ┆ Y _T Y _Z Y $ 0 , (┆
0x0480…04a0 03 13 00 00 02 0f 90 00 00 00 00 08 8f 20 00 00 00 06 01 00 f5 21 00 00 84 42 00 0a 3c 68 50 00 ┆ ! B <hP ┆
0x04a0…04b0 ec 20 00 10 59 18 94 10 00 02 01 60 00 2c 00 28 ┆ Y ` , (┆
0x04b0…04d0 (3, 0, 400) 03 13 00 08 02 2b 11 02 84 50 00 00 84 59 00 08 00 04 02 0a f5 21 00 00 00 0a 8c 20 00 00 82 20 ┆ + P Y ! ┆
0x04d0…04f0 00 26 83 20 00 08 00 04 00 02 01 90 00 2c 00 28 03 13 00 00 02 45 10 00 f5 21 00 00 f5 21 00 00 ┆ & , ( E ! ! ┆
0x04f0…0510 00 10 8c 20 00 00 84 42 00 0a 24 ff 50 00 ec 20 00 0f 59 4e 94 10 84 50 00 03 00 30 00 0c 00 08 ┆ B $ P YN P 0 ┆
0x0510…0530 02 03 a2 44 57 54 53 54 00 03 00 60 00 0e 00 0a 02 04 c2 44 57 54 53 42 32 00 00 03 00 70 00 2c ┆ DWTST ` DWTSB2 p ,┆
0x0530…0550 00 28 03 13 04 00 02 63 20 48 00 00 84 59 00 06 00 04 8f 20 02 08 81 20 7f ff a1 59 00 00 00 12 ┆ ( c H Y Y ┆
0x0550…0570 85 20 00 00 00 14 95 18 02 0f 00 03 00 82 00 2c 00 28 03 13 02 00 02 7d 40 22 f5 21 00 00 00 0a ┆ , ( }@" ! ┆
0x0570…0590 8c 20 00 00 82 20 00 2e f5 21 00 00 81 58 00 22 00 04 50 00 a0 59 00 22 00 04 00 03 00 b2 00 2a ┆ . ! X " P Y " *┆
0x0590…05b0 00 26 03 12 00 00 02 97 04 80 84 20 00 07 f5 21 00 00 84 59 00 04 00 04 84 59 00 06 00 04 84 20 ┆ & ! Y Y ┆
0x05b0…05d0 00 30 f5 21 00 00 84 59 00 03 00 e2 00 2c 00 28 03 13 10 00 02 b1 84 02 00 08 00 04 82 20 00 26 ┆ 0 ! Y , ( &┆
0x05d0…05f0 83 20 00 08 00 04 f5 21 00 00 84 20 00 30 f5 21 00 00 84 59 00 0a 00 04 00 03 01 10 00 0e 00 0a ┆ ! 0 ! Y ┆
0x05f0…0610 02 04 c2 44 57 54 45 43 42 00 00 03 01 40 00 2c 00 28 03 13 00 00 02 cb 42 12 f5 21 00 00 00 10 ┆ DWTECB @ , ( B ! ┆
0x0610…0630 8c 20 00 00 a0 59 00 0c 00 04 81 20 00 20 a9 59 00 00 00 04 81 58 00 00 00 16 00 03 01 52 00 2c ┆ Y Y X R ,┆
0x0630…0640 00 28 03 13 40 00 02 e3 12 20 8c 20 00 68 8f 20 ┆ ( @ h ┆
0x0640…0660 (4, 0, 398) 00 00 00 08 a0 59 00 11 00 04 02 04 f5 21 00 00 00 0a 8c 20 00 00 02 1b f5 21 00 03 01 82 00 2c ┆ Y ! ! ,┆
0x0660…0680 00 28 03 13 00 00 02 fd 82 08 00 00 00 0e 8c 20 00 00 02 5b f5 21 00 00 00 0e 8c 20 00 00 02 35 ┆ ( [ ! 5┆
0x0680…06a0 f5 21 00 00 00 0e 8c 20 00 00 00 04 00 22 00 0e 00 0a 02 04 c2 53 45 54 49 4d 50 00 00 04 00 52 ┆ ! " SETIMP R┆
0x06a0…06c0 00 2c 00 28 03 13 00 00 03 17 21 04 02 6e f5 21 00 00 00 0e 8c 20 00 00 f5 21 00 00 00 10 8c 20 ┆ , ( ! n ! ! ┆
0x06c0…06e0 00 00 81 18 84 20 00 02 00 04 94 18 00 04 00 64 00 0c 00 08 02 03 a2 49 4e 50 55 54 00 04 00 94 ┆ d INPUT ┆
0x06e0…0700 00 2c 00 28 03 13 00 00 03 31 40 40 f7 a1 00 00 00 18 00 00 00 ff 84 20 00 00 03 00 f5 21 00 00 ┆ , ( 1@@ ! ┆
0x0700…0720 00 1a 22 ff ea 21 9c 9c 50 00 e3 30 00 04 00 a4 00 2a 00 26 03 12 00 00 03 4d 01 08 a2 0c 83 20 ┆ " ! P 0 * & M ┆
0x0720…0740 3a c0 e3 50 00 01 f0 0d aa 59 00 11 00 04 14 02 5f 24 81 58 00 11 00 04 82 58 00 04 00 d4 00 2c ┆: P Y _$ X X ,┆
0x0740…0760 00 28 03 13 00 00 03 67 89 00 00 02 00 04 50 00 a0 79 00 02 00 04 a0 59 00 02 00 04 f0 34 02 00 ┆ ( g P y Y 4 ┆
0x0760…0780 ec 20 00 64 52 00 9c 20 00 64 00 04 01 02 00 2c 00 28 03 13 00 00 03 81 00 00 82 20 01 00 ec 20 ┆ dR d , ( ┆
0x0780…07a0 00 0a 52 00 1c 0a 12 01 5f 0c aa 20 30 30 2c 30 3a e8 81 08 a1 20 ff 00 22 ff 00 04 01 32 00 2c ┆ R _ 00,0: " 2 ,┆
0x07a0…07c0 00 28 03 13 00 02 03 a1 10 40 ac 04 f0 34 84 58 00 00 00 04 a4 20 00 20 50 00 b4 59 00 00 00 04 ┆ ( @ 4 X P Y ┆
0x07c0…07ce f0 34 21 1a 8c 20 02 6c 01 01 00 04 01 62 ┆ 4! l b┆
0x07ce…07ee (5, 0, 398) 00 2a 00 26 03 12 00 00 03 bd 44 48 8f 20 00 00 00 08 86 04 a0 59 00 02 00 04 5f 0e 83 59 00 14 ┆ * & DH Y _ Y ┆
0x07ee…080e 00 04 82 59 00 12 00 04 83 58 00 05 00 04 00 2c 00 28 03 13 00 02 03 d3 80 10 00 12 00 04 e2 2c ┆ Y X , ( ,┆
0x080e…082e 22 ff 3a 48 52 00 ea 20 30 00 50 00 3a 68 f5 21 00 00 00 0e 8c 20 03 b4 90 59 00 05 00 32 00 2c ┆" :HR 0 P :h ! Y 2 ,┆
0x082e…084e 00 28 03 13 00 08 03 ef 88 42 00 12 00 04 5f 22 83 58 00 14 00 04 93 18 e2 2c f5 21 00 00 00 0e ┆ ( B _" X , ! ┆
0x084e…086e 8c 20 03 b4 90 59 00 14 00 04 00 05 00 62 00 2c 00 28 03 13 00 00 04 07 00 00 5f 1c f0 34 9b 0c ┆ Y b , ( _ 4 ┆
0x086e…088e 82 04 3a 68 1a 30 93 08 93 08 3a 43 93 08 21 0f 93 04 f0 34 31 32 31 35 31 38 00 05 00 92 00 2c ┆ :h 0 :C ! 4121518 ,┆
0x088e…08ae 00 28 03 13 00 00 04 27 00 00 32 34 32 35 33 30 33 33 33 35 33 36 34 38 35 30 35 31 36 30 36 36 ┆ ( ' 2425303335364850516066┆
0x08ae…08ce 37 30 37 32 30 31 30 32 30 33 00 05 00 c2 00 2c 00 28 03 13 00 00 04 47 00 00 30 34 30 35 30 36 ┆7072010203 , ( G 040506┆
0x08ce…08ee 30 37 30 38 30 39 31 30 31 31 31 31 31 33 31 34 31 35 00 c0 00 c0 00 c0 02 cc 00 05 00 f2 00 20 ┆070809101111131415 ┆
0x08ee…090e 00 1c 03 0d 00 00 04 67 00 00 02 cf 04 cb 00 c0 00 c0 00 c0 00 c0 00 c0 00 c0 00 c0 00 c0 00 05 ┆ g ┆
0x090e…092e 01 22 00 48 00 44 04 21 cf fd 00 3d 00 4a 00 43 02 6c 00 61 50 02 00 6f 50 08 00 7d 00 7e 00 7f ┆ " H D ! = J C l aP oP } ~ ┆
0x092e…094e 00 8a 00 81 00 ce 00 83 02 14 00 85 02 14 00 87 00 96 00 89 00 96 00 8d 03 a4 00 91 02 ea 00 a3 ┆ ┆
0x094e…095c 03 b4 00 ab 50 18 00 b3 03 b4 00 05 01 46 ┆ P F┆
0x095c…097c (6, 2, 374) 00 48 00 44 04 21 75 e4 00 b7 50 02 00 c1 03 b4 00 cb 03 b4 00 d1 02 ea 00 d9 50 04 00 dd 02 08 ┆ H D !u P P ┆
0x097c…099c 00 e3 50 04 00 e7 02 08 00 f1 03 b4 00 fd 03 c8 01 05 03 b4 01 15 54 82 01 19 50 20 01 29 03 b4 ┆ P T P ) ┆
0x099c…09bc 01 33 50 42 01 37 50 54 00 06 00 04 00 48 00 44 04 21 36 d4 01 39 57 46 01 3f 50 02 01 45 03 74 ┆ 3PB 7PT H D !6 9WF ?P E t┆
0x09bc…09dc 01 57 03 b4 01 5d 50 4e 01 67 03 b4 01 73 03 c8 01 75 57 36 01 7f 03 b4 01 89 03 b4 01 8b 57 1c ┆ W ]PN g s uW6 W ┆
0x09dc…09fc 01 95 03 b4 01 97 57 10 01 9b 03 a4 01 a5 54 06 01 b5 51 1c 00 06 00 50 00 48 00 44 04 21 71 5e ┆ W T Q P H D !q^┆
0x09fc…0a1c 01 b9 50 0a 01 c3 03 b4 01 cb 03 b4 01 cf 02 ea 01 d1 57 36 01 db 52 0e 01 df 50 08 01 f3 03 b4 ┆ P W6 R P ┆
0x0a1c…0a3c 01 fb 54 06 02 19 03 a4 02 21 50 2e 02 2d 04 1e 02 3b 03 b4 02 47 03 c8 02 4f 03 b4 02 57 50 10 ┆ T !P. - ; G O WP ┆
0x0a3c…0a5c 00 06 00 9c 00 48 00 44 04 21 ef ff 02 63 04 3e 02 83 03 b4 02 8b 03 c8 02 91 50 38 02 9d 03 74 ┆ H D ! c > P8 t┆
0x0a5c…0a7c 02 ad 03 74 02 bd 03 c8 02 c5 03 74 02 d1 03 b4 02 f7 03 b4 03 01 03 b4 03 0b 03 b4 03 15 03 b4 ┆ t t ┆
0x0a7c…0a9c 03 1f 03 b4 03 27 03 b4 03 35 03 c0 00 06 00 e8 00 28 00 24 04 11 80 00 03 3b 04 5e 03 49 50 16 ┆ ' 5 ( $ ; ^ IP ┆
0x0a9c…0abc 03 69 50 04 03 7b 52 08 03 89 52 06 03 ad 50 04 03 db 52 2c 03 e1 50 10 00 06 01 34 00 0e 00 0a ┆ iP {R R P R, P 4 ┆
0x0abc…0ad2 07 04 00 00 00 00 04 7a 00 00 00 06 01 60 40 04 00 00 00 06 01 72 ┆ z `@ r┆
0x0ad2…0ada (7, 1, 8) 20 04 00 00 00 07 00 04 ┆ ┆
0x0ada…0afa (8, 0, 400) 54 20 46 52 4f 4e 54 20 46 45 45 44 5c 20 00 1f 01 76 00 3a 00 50 5c 4c 44 4b 4c 5c 41 33 2c 44 ┆T FRONT FEED v : P LDKL A3,D┆
0x0afa…0b1a 57 54 44 45 56 2b 44 57 54 52 4c 4e 5c 52 45 51 55 45 53 54 45 44 20 4c 49 4e 45 20 4e 4f 20 44 ┆WTDEV+DWTRLN REQUESTED LINE NO D┆
0x0b1a…0b3a 49 53 50 4c 41 43 45 4d 45 4e 54 20 00 20 00 16 00 26 00 50 5c 43 46 5c 41 35 2c 53 45 4e 44 5c ┆ISPLACEMENT & P CF A5,SEND ┆
0x0b3a…0b5a 53 45 4e 44 20 49 4e 50 55 54 20 46 52 4f 4e 54 20 46 45 45 44 20 00 20 00 54 00 1c 00 50 5c 4c ┆SEND INPUT FRONT FEED T P L┆
0x0b5a…0b7a 44 5c 41 33 2c 44 57 54 44 45 56 2b 44 57 54 52 4c 4e 2c 41 36 20 00 20 00 7e 00 34 00 50 5c 53 ┆D A3,DWTDEV+DWTRLN,A6 ~ 4 P S┆
0x0b7a…0b9a 54 5c 41 33 2c 44 57 54 44 45 56 2b 44 57 54 41 4c 4e 2c 41 36 5c 53 45 54 20 44 57 54 44 45 56 ┆T A3,DWTDEV+DWTALN,A6 SET DWTDEV┆
0x0b9a…0bba 2b 44 57 54 41 4c 4e 3d 44 57 54 52 4c 4e 00 20 00 9e 00 04 00 50 00 20 00 d6 00 30 00 50 57 52 ┆+DWTALN=DWTRLN P 0 PWR┆
0x0bba…0bda 44 4f 31 35 5c 4c 44 4b 4c 5c 41 32 2c 43 53 53 4e 56 5c 53 45 4c 45 43 54 20 4e 41 54 49 4f 4e ┆DO15 LDKL A2,CSSNV SELECT NATION┆
0x0bda…0bfa 41 4c 20 56 45 52 53 49 4f 4e 00 20 00 de 00 3e 00 50 5c 4c 44 4b 4c 5c 41 33 2c 44 57 54 44 45 ┆AL VERSION > P LDKL A3,DWTDE┆
0x0bfa…0c1a 56 2b 44 57 54 44 43 53 5c 44 4f 43 55 4d 45 4e 54 20 43 48 41 52 41 43 54 45 52 20 53 45 54 20 ┆V+DWTDCS DOCUMENT CHARACTER SET ┆
0x0c1a…0c3a 44 49 53 50 4c 41 43 45 4d 45 4e 54 00 20 01 12 00 2c 00 50 5c 43 46 5c 41 35 2c 53 45 4e 44 5c ┆DISPLACEMENT , P CF A5,SEND ┆
0x0c3a…0c5a 53 45 4e 44 20 53 45 4c 45 43 54 20 4e 41 54 49 4f 4e 41 4c 20 56 45 52 53 49 4f 4e 00 20 01 54 ┆SEND SELECT NATIONAL VERSION T┆
0x0c5a…0c6a 00 1e 00 50 5c 43 46 5c 41 35 2c 45 4e 44 42 4c ┆ P CF A5,ENDBL┆
0x0c6a…0c8a (9, 0, 400) 4b 5c 45 4e 44 20 4f 46 20 42 4c 4f 43 4b 00 20 01 84 00 20 00 50 5c 41 42 4c 28 4e 5a 29 5c 45 ┆K END OF BLOCK P ABL(NZ) E┆
0x0c8a…0caa 52 52 4f 55 54 5c 4a 4d 50 20 49 46 20 45 52 52 4f 52 00 21 00 16 00 06 00 50 2a 20 00 21 00 3a ┆RROUT JMP IF ERROR ! P* ! :┆
0x0caa…0cca 00 22 00 50 2a 20 20 20 20 45 58 41 4d 49 4e 45 20 43 4f 4e 54 52 4f 4c 20 43 48 41 52 41 43 54 ┆ " P* EXAMINE CONTROL CHARACT┆
0x0cca…0cea 45 52 00 21 00 44 00 06 00 50 2a 20 00 21 00 6a 00 24 00 50 5c 4c 44 4b 5c 41 33 2c 31 5c 53 45 ┆ER ! D P* ! j $ P LDK A3,1 SE┆
0x0cea…0d0a 54 20 45 43 42 20 42 55 46 46 45 52 20 50 4f 49 4e 54 45 52 00 21 00 74 00 28 00 50 5c 43 46 5c ┆T ECB BUFFER POINTER ! t ( P CF ┆
0x0d0a…0d2a 41 31 35 2c 47 45 54 43 48 52 5c 47 45 54 20 43 4f 4e 54 52 4f 4c 20 43 48 41 52 41 43 54 45 52 ┆A15,GETCHR GET CONTROL CHARACTER┆
0x0d2a…0d4a 00 21 00 9c 00 26 00 50 5c 4c 44 5c 41 31 2c 44 57 54 44 45 56 2c 41 36 5c 47 45 54 20 44 45 56 ┆ ! & P LD A1,DWTDEV,A6 GET DEV┆
0x0d4a…0d6a 49 43 45 20 53 54 41 54 55 53 00 21 00 c8 00 28 00 50 5c 41 4e 4b 4c 5c 41 31 2c 2f 32 30 5c 48 ┆ICE STATUS ! ( P ANKL A1,/20 H┆
0x0d6a…0d8a 41 53 20 50 4f 57 45 52 20 4f 46 46 20 4f 43 43 55 52 45 44 20 3f 00 21 00 f2 00 14 00 50 5c 52 ┆AS POWER OFF OCCURED ? ! P R┆
0x0d8a…0daa 46 28 4e 5a 29 5c 52 45 50 31 5c 59 45 53 00 21 01 1e 00 06 00 50 2a 20 00 21 01 36 00 2a 00 50 ┆F(NZ) REP1 YES ! P* ! 6 * P┆
0x0daa…0dca 5c 53 55 4b 5c 41 32 2c 2f 32 42 5c 50 52 49 4e 54 20 57 49 54 48 4f 55 54 20 4c 49 4e 45 20 46 ┆ SUK A2,/2B PRINT WITHOUT LINE F┆
0x0dca…0dea 45 45 44 20 3f 20 00 21 01 40 00 14 00 50 5c 52 46 28 5a 29 5c 57 52 54 30 33 5c 59 45 53 00 21 ┆EED ? ! @ P RF(Z) WRT03 YES !┆
0x0dea…0dfa 01 6e 00 2c 00 50 57 52 54 30 34 5c 4c 44 52 5c ┆ n , PWRT04 LDR ┆
0x0dfa…0e1a (10, 0, 400) 41 34 2c 41 32 5c 53 41 56 45 20 43 4f 4e 54 52 4f 4c 20 43 48 41 52 2e 20 49 4e 20 41 34 00 21 ┆A4,A2 SAVE CONTROL CHAR. IN A4 !┆
0x0e1a…0e3a 01 86 00 14 00 50 5c 4c 44 5c 41 32 2c 45 43 42 52 4c 2c 41 38 20 00 22 00 26 00 1e 00 50 5c 41 ┆ P LD A2,ECBRL,A8 " & P A┆
0x0e3a…0e5a 44 4b 5c 41 32 2c 2f 38 5c 4d 41 58 20 42 4c 4f 43 4b 20 53 49 5a 45 20 00 22 00 3e 00 20 00 50 ┆DK A2,/8 MAX BLOCK SIZE " > P┆
0x0e5a…0e7a 5c 43 46 5c 41 35 2c 53 54 41 42 4c 4b 5c 53 54 41 52 54 20 4f 46 20 42 4c 4f 43 4b 00 22 00 60 ┆ CF A5,STABLK START OF BLOCK " `┆
0x0e7a…0e9a 00 20 00 50 5c 41 42 4c 28 4e 5a 29 5c 45 52 52 4f 55 54 5c 4a 4d 50 20 49 46 20 45 52 52 4f 52 ┆ P ABL(NZ) ERROUT JMP IF ERROR┆
0x0e9a…0eba 00 22 00 84 00 28 00 50 5c 4c 44 52 5c 41 32 2c 41 34 5c 52 45 53 54 4f 52 45 20 43 4f 4e 54 2e ┆ " ( P LDR A2,A4 RESTORE CONT.┆
0x0eba…0eda 20 43 48 41 52 2e 20 49 4e 20 41 32 00 22 00 a8 00 36 00 50 5c 43 4d 5c 44 57 54 44 45 56 2b 44 ┆ CHAR. IN A2 " 6 P CM DWTDEV+D┆
0x0eda…0efa 57 54 43 4f 32 2c 41 36 5c 43 4c 45 41 52 20 44 4f 43 55 4d 45 4e 54 20 43 4f 4c 55 4d 4e 20 43 ┆WTCO2,A6 CLEAR DOCUMENT COLUMN C┆
0x0efa…0f1a 4f 55 4e 54 45 52 00 22 00 d4 00 2a 00 50 5c 53 55 4b 20 41 32 2c 35 5c 50 52 49 4e 54 20 41 46 ┆OUNTER " * P SUK A2,5 PRINT AF┆
0x0f1a…0f3a 54 45 52 20 54 57 4f 20 4c 49 4e 45 20 46 45 45 44 20 3f 20 00 22 01 0e 00 16 00 50 5c 52 46 28 ┆TER TWO LINE FEED ? " P RF(┆
0x0f3a…0f5a 5a 29 5c 54 57 4f 4c 46 31 5c 59 45 53 20 00 22 01 3c 00 06 00 50 2a 20 00 22 01 56 00 26 00 50 ┆Z) TWOLF1 YES " < P* " V & P┆
0x0f5a…0f7a 5c 53 55 4b 5c 41 32 2c 31 5c 50 52 49 4e 54 20 41 46 54 45 52 20 46 4f 52 4d 20 46 45 45 44 20 ┆ SUK A2,1 PRINT AFTER FORM FEED ┆
0x0f7a…0f8a 3f 20 00 22 01 60 00 26 00 50 5c 41 42 4c 28 5a ┆? " ` & P ABL(Z┆
0x0f8a…0faa (11, 0, 400) 29 5c 57 52 54 31 34 5c 59 45 53 2c 20 41 4c 4c 52 45 41 44 59 20 44 4f 4e 45 20 21 00 22 01 8a ┆) WRT14 YES, ALLREADY DONE ! " ┆
0x0faa…0fca 00 06 00 50 2a 20 00 23 00 24 00 2a 00 50 5c 52 46 5c 4f 4e 45 4c 46 31 5c 50 52 49 4e 54 20 41 ┆ P* # $ * P RF ONELF1 PRINT A┆
0x0fca…0fea 46 54 45 52 20 4f 4e 45 20 4c 49 4e 45 20 46 45 45 44 20 21 00 23 00 2e 00 06 00 50 2a 20 00 23 ┆FTER ONE LINE FEED ! # . P* #┆
0x0fea…100a 00 5c 00 22 00 50 2a 20 20 20 20 45 58 45 43 55 54 45 20 43 4f 4e 54 52 4f 4c 20 43 48 41 52 41 ┆ " P* EXECUTE CONTROL CHARA┆
0x100a…102a 43 54 45 52 00 23 00 66 00 06 00 50 2a 20 00 23 00 8c 00 32 00 50 57 52 54 30 33 5c 4c 44 5c 41 ┆CTER # f P* # 2 PWRT03 LD A┆
0x102a…104a 34 2c 44 57 54 44 45 56 2b 44 57 54 43 4f 32 2c 41 36 5c 47 45 54 20 41 43 54 55 41 4c 20 43 4f ┆4,DWTDEV+DWTCO2,A6 GET ACTUAL CO┆
0x104a…106a 4c 55 4d 4e 00 23 00 96 00 10 00 50 5c 52 46 28 5a 29 5c 57 52 54 30 35 00 23 00 cc 00 26 00 50 ┆LUMN # P RF(Z) WRT05 # & P┆
0x106a…108a 5c 53 55 4b 5c 41 34 2c 31 5c 46 4f 52 20 43 4f 52 52 45 43 54 20 4e 4f 20 4f 46 20 53 50 41 43 ┆ SUK A4,1 FOR CORRECT NO OF SPAC┆
0x108a…10aa 45 53 00 23 00 e0 00 2e 00 50 57 52 54 30 35 5c 43 46 5c 41 35 2c 4b 4f 4e 56 45 52 5c 43 4f 4e ┆ES # . PWRT05 CF A5,KONVER CON┆
0x10aa…10ca 56 45 52 54 20 42 49 4e 41 52 59 20 54 4f 20 41 53 43 49 49 00 23 01 0a 00 40 00 50 5c 53 43 5c ┆VERT BINARY TO ASCII # @ P SC ┆
0x10ca…10ea 41 32 2c 44 57 54 44 45 56 2b 44 57 54 41 43 44 2c 41 36 5c 53 54 4f 52 45 20 54 48 45 20 56 41 ┆A2,DWTDEV+DWTACD,A6 STORE THE VA┆
0x10ea…110a 4c 55 45 20 49 4e 20 41 43 54 55 41 4c 20 43 4f 4c 2e 20 44 4f 43 2e 20 00 23 01 3c 00 42 00 50 ┆LUE IN ACTUAL COL. DOC. # < B P┆
0x110a…111a 5c 53 43 5c 41 34 2c 44 57 54 44 45 56 2b 44 57 ┆ SC A4,DWTDEV+DW┆
0x111a…113a (12, 0, 400) 54 41 43 44 2b 32 2c 41 36 5c 53 54 4f 52 45 20 54 48 45 20 56 41 4c 55 45 20 49 4e 20 41 43 54 ┆TACD+2,A6 STORE THE VALUE IN ACT┆
0x113a…115a 55 41 4c 20 43 4f 4c 2e 20 44 4f 43 2e 20 00 23 01 80 00 0e 00 50 5c 53 52 4c 5c 41 34 2c 38 20 ┆UAL COL. DOC. # P SRL A4,8 ┆
0x115a…117a 00 24 00 36 00 36 00 50 5c 53 43 5c 41 34 2c 44 57 54 44 45 56 2b 44 57 54 41 43 44 2b 31 2c 41 ┆ $ 6 6 P SC A4,DWTDEV+DWTACD+1,A┆
0x117a…119a 36 5c 53 48 49 46 54 20 46 4f 52 20 43 4f 52 52 45 43 54 20 44 49 47 49 54 53 00 24 00 48 00 06 ┆6 SHIFT FOR CORRECT DIGITS $ H ┆
0x119a…11ba 00 50 2a 20 00 24 00 82 00 20 00 50 57 52 54 30 39 5c 4c 44 4b 4c 5c 41 32 2c 2f 38 43 5c 42 4c ┆ P* $ PWRT09 LDKL A2,/8C BL┆
0x11ba…11da 4f 43 4b 20 53 49 5a 45 00 24 00 8c 00 20 00 50 5c 43 46 5c 41 35 2c 53 54 41 42 4c 4b 5c 53 54 ┆OCK SIZE $ P CF A5,STABLK ST┆
0x11da…11fa 41 52 54 20 4f 46 20 42 4c 4f 43 4b 00 24 00 b0 00 20 00 50 5c 41 42 4c 28 4e 5a 29 5c 45 52 52 ┆ART OF BLOCK $ P ABL(NZ) ERR┆
0x11fa…121a 4f 55 54 5c 4a 4d 50 20 49 46 20 45 52 52 4f 52 00 24 00 d4 00 1c 00 50 5c 4c 44 5c 41 34 2c 44 ┆OUT JMP IF ERROR $ P LD A4,D┆
0x121a…123a 57 54 44 45 56 2b 44 57 54 43 4f 32 2c 41 36 20 00 24 00 f8 00 2e 00 50 5c 41 42 4c 28 5a 29 5c ┆WTDEV+DWTCO2,A6 $ . P ABL(Z) ┆
0x123a…125a 57 52 54 31 35 5c 4a 4d 50 20 49 46 20 4e 4f 20 50 52 45 43 45 49 44 49 4e 47 20 53 50 41 43 45 ┆WRT15 JMP IF NO PRECEIDING SPACE┆
0x125a…127a 53 20 00 24 01 18 00 1a 00 50 5c 4c 44 4b 5c 41 32 2c 2f 32 30 5c 53 45 4e 44 20 53 50 41 43 45 ┆S $ P LDK A2,/20 SEND SPACE┆
0x127a…129a 00 24 01 4a 00 12 00 50 5c 43 46 5c 41 35 2c 4f 55 54 50 55 54 20 00 24 01 68 00 20 00 50 5c 41 ┆ $ J P CF A5,OUTPUT $ h P A┆
0x129a…12aa 42 4c 28 4e 5a 29 5c 45 52 52 4f 55 54 5c 4a 4d ┆BL(NZ) ERROUT JM┆