|
DataMuseum.dkPresents historical artifacts from the history of: RC4000/8000/9000 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about RC4000/8000/9000 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 129024 (0x1f800)
Names: »testprlib «
└─⟦01e83a425⟧ Bits:30008166 Bånd med SW8010 og SW8500 source code
└─⟦75ff9bef3⟧
└─⟦this⟧ »testprlib «
0x00000…00030 00 00 00 00 00 03 00 00 a8 00 00 a0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 0b 00 00 0e 00 00 a0 00 00 08 ff ff ff 00 00 00 00 00 00 00 00 00 ┆ ┆
0x00030…00060 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 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ ┆
[…0xe…]
0x00300…00330 a5 78 48 34 80 68 24 68 0c 51 0a b4 a1 00 00 34 80 50 2c 00 01 5c 28 4c 5c 28 4e 2d 00 00 5d 28 50 2d 28 0c 2c 00 1c 53 10 00 37 78 01 00 00 40 ┆ xH4 h$h Q 4 P, Ø(LØ(N- Å(P-( , S 7x @┆
0x00330…00360 51 28 0c 51 18 2a 5d 28 10 2d 00 01 a1 68 10 34 80 08 a5 68 10 34 80 20 2d 10 01 24 68 0c 5d 08 24 2c 00 08 5c 28 4c 2f 00 00 5f 28 4e 2d 28 0c ┆Q( Q *Å( - h 4 h 4 - $h Å $, Ø(L/ _(N-( ┆
0x00360…00390 2c 00 1e 53 10 00 37 78 01 00 00 40 51 28 0c 51 18 24 34 8f e0 2d 28 0c 2c 00 1f 53 10 00 37 78 01 00 00 40 34 80 12 51 28 0c 51 18 46 24 68 0c ┆, S 7x @Q( Q $4 -( , S 7x @4 Q( Q F$h ┆
0x00390…003c0 5d 08 4a 53 28 0c 53 38 48 24 68 0c 5f 08 4c 2c 00 00 24 68 0c 5c 08 2a 51 28 0c 51 18 74 a9 00 01 34 80 0a 51 28 0c 51 18 2e 24 68 0c 5d 08 4c ┆Å JS( S8H$h _ L, $h Ø *Q( Q t 4 Q( Q .$h Å L┆
0x003c0…003f0 53 28 0c 51 38 4a a1 78 52 34 80 04 34 80 12 53 28 0c 51 38 52 a1 78 4c 34 80 04 34 80 08 2c 00 00 24 68 0c 5c 08 7c 2c 00 01 5c 28 4c 53 28 0c ┆S( Q8J xR4 4 S( Q8R xL4 4 , $h Ø ø, Ø(LS( ┆
0x003f0…00420 51 38 4a 21 38 46 2d 10 01 5d 28 4e 2c 00 00 5c 28 50 2d 28 0c 2c 00 1c 53 10 00 37 78 01 00 00 40 51 28 0c 51 18 4c 2d 1f ff 5d 28 10 53 28 0c ┆Q8J!8F- Å(N, Ø(P-( , S 7x @Q( Q L- Å( S( ┆
0x00420…00450 53 38 4a a3 68 10 34 80 08 a7 68 10 34 80 22 2f 30 01 24 68 0c 5f 08 5e 5f 28 4c 24 68 0c 23 08 46 2f 30 01 5f 28 4e 2d 28 0c 2c 00 39 53 10 00 ┆S8J h 4 h 4 "/0 $h _ ^_(L$h # F/0 _(N-( , 9S ┆
0x00450…00480 37 78 01 00 00 40 53 28 0c 53 38 5e 34 8f de 51 28 0c 51 18 4c 91 00 01 1d 28 0c 24 c0 d8 51 10 00 51 10 36 a9 00 00 34 80 2e 53 28 0c 51 38 4c ┆7x @S( S8^4 Q( Q L ( $ Q Q 6 4 .S( Q8L┆
0x00480…004b0 a5 78 48 34 80 26 51 28 0c 51 18 4c 5d 28 4c 24 68 0c 21 08 46 2d 10 01 5d 28 4e 2d 28 0c 2c 00 39 53 10 00 37 78 01 00 00 40 51 28 0c 51 18 4c ┆ xH4 &Q( Q LÅ(L$h ! F- Å(N-( , 9S 7x @Q( Q L┆
0x004b0…004e0 2d 10 01 24 68 0c 5d 08 4c 34 8f c4 51 28 0c 51 18 4c 5d 28 4c 24 68 0c 21 08 46 2d 10 01 5d 28 4e 2d 28 0c 2c 00 39 53 10 00 37 78 01 00 00 40 ┆- $h Å L4 Q( Q LÅ(L$h ! F- Å(N-( , 9S 7x @┆
0x004e0…00510 51 28 0c 51 18 8e a9 00 01 34 80 78 51 28 0c 51 18 74 a9 00 00 34 80 70 53 28 0c 51 38 4a ad 78 4c 34 80 68 51 28 0c 51 18 48 5d 28 10 53 28 0c ┆Q( Q 4 xQ( Q t 4 pS( Q8J xL4 hQ( Q HÅ( S( ┆
0x00510…00540 53 38 4c 2f 30 01 a3 68 10 34 80 08 a7 68 10 34 80 54 2f 30 01 24 68 0c 5f 08 5e 51 28 0c 51 18 38 2d 1f fd 5d 28 4c 24 68 0c 23 08 46 2f 30 01 ┆S8L/0 h 4 h 4 T/0 $h _ ^Q( Q 8- Å(L$h # F/0 ┆
0x00540…00570 5f 28 4e 2c 00 00 5c 28 50 2d 28 0c 2c 00 1c 53 10 00 37 78 01 00 00 40 51 28 0c 51 18 5e 2d 10 01 24 68 0c 1d 08 54 24 68 0c 21 08 42 08 00 02 ┆_(N, Ø(P-( , S 7x @Q( Q ^- $h T$h ! B ┆
0x00570…005a0 08 00 00 61 80 26 5c 28 4c 2d 00 04 5d 28 4e 2f 00 01 5f 28 50 2d 28 0c 2c 00 37 53 10 00 37 78 01 00 00 40 53 28 0c 53 38 5e 34 8f ac 2c 00 00 ┆ a &Ø(L- Å(N/ _(P-( , 7S 7x @S( S8^4 , ┆
0x005a0…005d0 24 68 0c 5c 08 b4 53 28 0c 34 78 03 00 27 10 00 0a 1a 44 69 73 70 6c 61 79 20 73 74 61 72 74 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆$h Ø S( 4x ' Display start: ┆
0x005d0…00600 20 20 20 20 20 20 20 20 20 20 20 20 5e 28 14 50 10 00 5c 28 12 24 68 12 2d 0a 86 5d 28 1c 53 28 1c 53 30 06 5f 28 1e 2d 00 01 a1 68 1e 00 00 00 ┆ ^( P Ø( $h - Å( S( S0 _( - h ┆
0x00600…00630 a5 68 1e 34 81 06 2d 10 01 5d 28 1a 53 28 1c 5f 28 20 2d 1f ff 08 00 02 08 00 00 61 81 10 91 00 01 90 00 03 5c 28 22 1d 28 20 53 10 00 24 68 22 ┆ h 4 - Å( S( _( - a Ø(" ( S $h"┆
0x00630…00660 9b 0f f0 13 80 fe 5f 28 18 a7 00 c0 34 80 30 51 28 1c 53 28 1a 5d 28 20 51 00 06 2d 1f ff 08 00 02 08 00 00 61 80 ea 91 00 01 90 00 03 5c 28 22 ┆ _( 4 0Q( S( Å( Q - a Ø("┆
0x00660…00690 1d 28 20 51 10 00 24 68 22 99 0f f0 11 80 d8 5d 28 58 2d 28 12 2c 00 18 53 10 00 37 78 01 00 00 4c 34 80 ae 51 28 18 2d 1f 20 5d 28 18 a1 0f ff ┆ ( Q $h" Å(X-( , S 7x L4 Q( - Å( ┆
0x00690…006c0 34 80 08 51 28 0c 5d 28 16 34 80 0c 51 28 18 2d 10 20 5d 28 18 53 28 0e 5f 28 16 51 28 18 2d 1f f0 5d 28 18 a5 00 00 34 80 0e 51 28 18 2d 10 10 ┆4 Q( Å( 4 Q( - Å( S( _( Q( - Å( 4 Q( - ┆
0x006c0…006f0 5d 28 18 53 28 16 2f 3f ff 5f 28 16 51 28 18 2d 1f f8 5d 28 18 a1 0f ff 34 80 0a 51 28 16 2d 10 20 5d 28 16 34 80 08 51 28 18 2d 10 08 5d 28 18 ┆Å( S( /? _( Q( - Å( 4 Q( - Å( 4 Q( - Å( ┆
0x006f0…00720 51 28 18 2d 1f fc 5d 28 18 a1 0f ff 34 80 26 51 28 16 a5 00 20 34 80 0a 51 28 16 2d 10 60 5d 28 16 34 80 16 51 28 16 a5 00 40 34 80 0a 51 28 16 ┆Q( - Å( 4 &Q( 4 Q( - `Å( 4 Q( @4 Q( ┆
0x00720…00750 2d 10 20 5d 28 16 34 80 08 51 28 16 2d 1f e0 5d 28 16 34 80 08 51 28 18 2d 10 04 5d 28 18 51 28 18 2d 1f fe 5d 28 18 a1 0f ff 34 80 12 51 28 16 ┆- Å( 4 Q( - Å( 4 Q( - Å( Q( - Å( 4 Q( ┆
0x00750…00780 5d 28 58 2d 28 12 2c 00 18 53 10 00 37 78 01 00 00 4c 34 80 18 51 28 16 5d 28 58 2c 0f fe 5c 28 5a 2f 00 00 5f 28 5c 2d 28 12 2c 00 37 53 10 00 ┆Å(X-( , S 7x L4 Q( Å(X, Ø(Z/ _(Ø-( , 7S ┆
0x00780…007b0 37 78 01 00 00 4c 51 28 1a 34 8e fa 51 28 10 a9 00 01 34 80 10 2c 00 00 5c 28 58 2d 28 12 2c 00 19 53 10 00 37 78 01 00 00 4c 53 28 12 34 78 03 ┆7x LQ( 4 Q( 4 , Ø(X-( , S 7x LS( 4x ┆
0x007b0…007e0 00 00 ff 00 00 03 5e 28 10 50 10 00 5c 28 0e 51 28 0c 2f 28 12 2c 10 18 5c 80 4a 5e 80 4a 2e 30 00 d8 10 02 dc 20 02 2e 20 04 2d 10 04 a1 c0 3c ┆ ^( P Ø( Q( /( , Ø J^ J.0 . - <┆
0x007e0…00810 34 8f f6 52 80 3a 2c 00 04 5c 28 6a 2d 00 00 5d 28 6c 2d 28 0e 2c 00 1e 53 10 00 37 78 01 00 00 5e 2d 28 12 5d 28 6a 2d 28 0e 2c 00 36 53 10 00 ┆4 R :, Ø(j- Å(l-( , S 7x ^-( Å(j-( , 6S ┆
0x00810…00840 37 78 01 00 00 5e 2c 00 05 5c 28 6a 2d 00 00 5d 28 6c 2d 28 0e 2c 00 1e 53 10 00 37 78 01 00 00 5e 53 28 0e 34 78 03 0c 12 a2 02 c6 70 5e 28 10 ┆7x ^, Ø(j- Å(l-( , S 7x ^S( 4x p^( ┆
0x00840…00870 50 10 00 5c 28 0e 51 28 0c 2f 28 12 2c 10 18 5c 80 4a 5e 80 4a 2e 30 00 d8 10 02 dc 20 02 2e 20 04 2d 10 04 a1 c0 3c 34 8f f6 52 80 3a 2c 00 06 ┆P Ø( Q( /( , Ø J^ J.0 . - <4 R :, ┆
0x00870…008a0 5c 28 6a 2d 00 00 5d 28 6c 2d 28 0e 2c 00 1e 53 10 00 37 78 01 00 00 5e 2d 28 12 5d 28 6a 2d 28 0e 2c 00 36 53 10 00 37 78 01 00 00 5e 2c 00 07 ┆Ø(j- Å(l-( , S 7x ^-( Å(j-( , 6S 7x ^, ┆
0x008a0…008d0 5c 28 6a 2d 00 00 5d 28 6c 2d 28 0e 2c 00 1e 53 10 00 37 78 01 00 00 5e 53 28 0e 34 78 03 0b f6 42 02 c8 68 5e 28 10 50 10 00 5c 28 0e 50 80 04 ┆Ø(j- Å(l-( , S 7x ^S( 4x B h^( P Ø( P ┆
0x008d0…00900 34 80 04 00 00 0e 5c 28 12 53 28 0e 51 38 5c 1d 38 36 24 68 0e 5d 08 5c 53 28 0c a7 00 20 34 80 16 51 28 0e 51 18 58 a1 00 09 34 80 0e 00 00 00 ┆4 Ø( S( Q8Ø 86$h Å ØS( 4 Q( Q X 4 ┆
0x00900…00930 ad 00 0a 34 80 08 51 28 0c 2d 10 80 5d 28 0c 51 28 0c 53 28 0e 53 38 36 2f 30 00 5d 28 1a 51 00 06 2d 1f ff 08 00 02 08 00 00 61 81 30 91 00 01 ┆ 4 Q( - Å( Q( S( S86/0 Å( Q - a 0 ┆
0x00930…00960 90 00 03 24 40 00 84 0f f0 5c 28 1c 5d 28 1e 53 28 0e 53 38 b0 1f 28 1e 5f 28 1e 51 28 1a 53 81 16 9b 68 1c 99 68 1c 87 30 01 24 68 1e 13 00 00 ┆ $@ Ø( Å( S( S8 ( _( Q( S h h 0 $h ┆
0x00960…00990 15 00 06 24 68 1e 5d 00 00 2c 00 00 51 28 0e 51 18 36 2d 10 01 5c 28 1a 2d 1f ff 08 00 02 08 00 00 61 80 f6 91 00 01 90 00 03 24 40 00 84 0f f0 ┆ $h Å , Q( Q 6- Ø( - a $@ ┆
0x00990…009c0 5c 28 1c 5d 28 1e 51 28 0e 51 18 b0 1d 28 1e 5d 28 1e 50 28 1a 51 80 dc 99 68 1c 98 68 1c 85 10 01 24 68 1e 11 00 00 14 00 02 24 68 1e 5c 00 00 ┆Ø( Å( Q( Q ( Å( P( Q h h $h $h Ø ┆
0x009c0…009f0 2c 00 00 51 28 0e 51 18 36 2d 10 02 5c 28 1a 2d 1f ff 08 00 02 08 00 00 61 80 bc 91 00 01 90 00 03 24 40 00 84 0f f0 5c 28 1c 5d 28 1e 51 28 0e ┆, Q( Q 6- Ø( - a $@ Ø( Å( Q( ┆
0x009f0…00a20 51 18 b0 1d 28 1e 5d 28 1e 50 28 1a 51 80 a2 99 68 1c 98 68 1c 85 10 01 24 68 1e 11 00 00 14 00 02 24 68 1e 5c 00 00 51 28 0e 51 18 36 2d 10 02 ┆Q ( Å( P( Q h h $h $h Ø Q( Q 6- ┆
0x00a20…00a50 08 00 02 08 00 00 61 80 88 91 00 01 5d 28 14 2c 00 00 5c 28 16 51 28 0e 51 18 b0 1d 28 16 24 68 0e 5d 09 90 1d 28 14 2d 1f fe 24 68 0e 5d 09 92 ┆ a Å( , Ø( Q( Q ( $h Å ( - $h Å ┆
0x00a50…00a80 51 28 0e 2d 19 12 5d 28 56 51 28 0e 2d 19 8e 5d 28 58 51 28 0e 2d 19 5e 5d 28 5a 2d 28 0e 2c 00 03 53 10 00 37 78 01 00 00 4a 50 28 4a 5c 28 18 ┆Q( - Å(VQ( - Å(XQ( - ^Å(Z-( , S 7x JP(JØ( ┆
0x00a80…00ab0 ac 00 01 34 80 14 2d 80 4a 5d 28 56 51 28 18 5d 28 58 2d 28 0e 2c 00 2f 53 10 00 37 78 01 00 00 4a 51 28 0e 51 19 5e a9 c0 2e 34 80 0c 53 28 12 ┆ 4 - JÅ(VQ( Å(X-( , /S 7x JQ( Q ^ .4 S( ┆
0x00ab0…00ae0 1f 80 04 34 b0 00 ff fe b6 34 80 12 51 28 14 24 68 0e 21 09 60 5d 28 14 53 28 16 24 68 0e 1f 09 60 5f 28 16 51 28 14 a9 00 00 34 8f 92 2c 00 01 ┆ 4 4 Q( $h ! `Å( S( $h `_( Q( 4 , ┆
0x00ae0…00b10 24 68 0e 5c 08 36 53 28 0e 34 78 03 01 00 00 00 00 ff 00 00 03 4f 75 74 70 75 74 20 73 65 6e 64 77 61 69 74 20 20 20 20 20 20 20 20 20 20 20 20 ┆$h Ø 6S( 4x Output sendwait ┆
0x00b10…00b40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 5e 28 10 50 10 00 5c 28 0e 51 28 0e 51 18 36 a1 01 fd 34 80 12 51 28 0c 5d 28 4e 2d 28 0e 2c 00 19 ┆ ^( P Ø( Q( Q 6 4 Q( Å(N-( , ┆
0x00b40…00b70 53 10 00 37 78 01 00 00 42 34 80 60 51 28 0c a5 00 20 34 80 16 51 28 0e 51 18 58 a1 00 09 34 80 0e 51 28 0c ad 00 0a 34 80 08 51 28 0c 2d 10 80 ┆S 7x B4 `Q( 4 Q( Q X 4 Q( 4 Q( - ┆
0x00b70…00ba0 5d 28 0c 51 28 0c 53 28 0e 53 38 36 5d 28 12 51 00 06 2d 1f ff 08 00 02 08 00 00 61 80 3a 91 00 01 90 00 03 24 40 00 84 0f f0 5c 28 14 5d 28 16 ┆Å( Q( S( S86Å( Q - a : $@ Ø( Å( ┆
0x00ba0…00bd0 53 28 0e 53 38 b0 1f 28 16 5f 28 16 51 28 12 53 80 20 9b 68 14 99 68 14 87 30 01 24 68 16 13 00 00 15 00 06 24 68 16 5d 00 00 51 28 0e 51 18 36 ┆S( S8 ( _( Q( S h h 0 $h $h Å Q( Q 6┆
0x00bd0…00c00 2d 10 01 24 68 0e 5d 08 36 53 28 0e 34 78 03 00 00 ff 00 00 03 5e 28 12 50 10 00 5c 28 10 51 28 0c 2f 28 58 2c 10 32 5c 83 36 5e 83 36 00 00 00 ┆- $h Å 6S( 4x ^( P Ø( Q( /(X, 2Ø 6^ 6 ┆
0x00c00…00c30 00 00 01 00 00 03 00 00 a8 00 00 6b 00 00 12 00 00 00 00 00 00 00 00 00 00 00 0b 00 00 0e 00 00 6b 00 00 3d ff ff ff 00 00 00 00 00 00 00 00 00 ┆ k k = ┆
0x00c30…00c60 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 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ ┆
[…0xe…]
0x00f00…00f30 00 00 ab 00 00 50 00 00 59 74 65 73 74 77 69 6e 74 74 78 00 00 00 00 02 64 69 73 63 00 00 00 00 00 00 00 00 bb 79 6e 00 00 00 00 00 00 00 00 00 ┆ P Ytestwinttx disc yn ┆
0x00f30…00f60 00 00 00 00 00 c3 00 00 50 00 00 59 74 65 73 74 6d 62 6f 6f 6c 74 78 00 00 00 02 64 69 73 63 00 00 00 00 00 00 00 00 bb 86 01 00 00 00 00 00 00 ┆ P Ytestmbooltx disc ┆
0x00f60…00f90 00 00 00 00 00 00 00 01 c3 00 00 50 00 00 59 74 65 73 74 73 79 73 74 78 00 00 00 00 00 05 64 69 73 63 00 00 00 00 00 00 00 00 bb b3 6b 00 00 00 ┆ P Ytestsystx disc k ┆
0x00f90…00fc0 00 00 00 00 00 00 00 00 00 24 68 0c 5f 08 4c 2c 00 00 24 68 0c 5c 08 2a 51 28 0c 51 18 74 a9 00 01 34 80 0a 51 28 0c 51 18 2e 24 68 0c 5d 08 4c ┆ $h _ L, $h Ø *Q( Q t 4 Q( Q .$h Å L┆
0x00fc0…00ff0 53 28 0c 51 38 4a a1 78 52 34 80 04 34 80 12 53 28 0c 51 38 52 a1 78 4c 34 80 04 34 80 08 2c 00 00 24 68 0c 5c 08 7c 2c 00 01 5c 28 4c 53 28 0c ┆S( Q8J xR4 4 S( Q8R xL4 4 , $h Ø ø, Ø(LS( ┆
0x00ff0…01020 51 38 4a 21 38 46 2d 10 01 5d 28 4e 2c 00 00 5c 28 50 2d 28 0c 2c 00 1c 53 10 00 37 78 01 00 00 40 51 28 0c 51 18 4c 2d 1f ff 5d 28 10 53 28 0c ┆Q8J!8F- Å(N, Ø(P-( , S 7x @Q( Q L- Å( S( ┆
0x01020…01050 53 38 4a a3 68 10 34 80 08 a7 68 10 34 80 22 2f 30 01 24 68 0c 5f 08 5e 5f 28 4c 24 68 0c 23 08 46 2f 30 01 5f 28 4e 2d 28 0c 2c 00 39 53 10 00 ┆S8J h 4 h 4 "/0 $h _ ^_(L$h # F/0 _(N-( , 9S ┆
0x01050…01080 37 78 01 00 00 40 53 28 0c 53 38 5e 34 8f de 51 28 0c 51 18 4c 91 00 01 1d 28 0c 24 c0 d8 51 10 00 51 10 36 a9 00 00 34 80 2e 53 28 0c 51 38 4c ┆7x @S( S8^4 Q( Q L ( $ Q Q 6 4 .S( Q8L┆
0x01080…010b0 a5 78 48 34 80 26 51 28 0c 51 18 4c 5d 28 4c 24 68 0c 21 08 46 2d 10 01 5d 28 4e 2d 28 0c 2c 00 39 53 10 00 37 78 01 00 00 40 51 28 0c 51 18 4c ┆ xH4 &Q( Q LÅ(L$h ! F- Å(N-( , 9S 7x @Q( Q L┆
0x010b0…010e0 2d 10 01 24 68 0c 5d 08 4c 34 8f c4 51 28 0c 51 18 4c 5d 28 4c 24 68 0c 21 08 46 2d 10 01 5d 28 4e 2d 28 0c 2c 00 39 53 10 00 37 78 01 00 00 40 ┆- $h Å L4 Q( Q LÅ(L$h ! F- Å(N-( , 9S 7x @┆
0x010e0…01110 51 28 0c 51 18 8e a9 00 01 34 80 78 51 28 0c 51 18 74 a9 00 00 34 80 70 53 28 0c 51 38 4a ad 78 4c 34 80 68 51 28 0c 51 18 48 5d 28 10 53 28 0c ┆Q( Q 4 xQ( Q t 4 pS( Q8J xL4 hQ( Q HÅ( S( ┆
0x01110…01140 53 38 4c 2f 30 01 a3 68 10 34 80 08 a7 68 10 34 80 54 2f 30 01 24 68 0c 5f 08 5e 51 28 0c 51 18 38 2d 1f fd 5d 28 4c 24 68 0c 23 08 46 2f 30 01 ┆S8L/0 h 4 h 4 T/0 $h _ ^Q( Q 8- Å(L$h # F/0 ┆
0x01140…01170 5f 28 4e 2c 00 00 5c 28 50 2d 28 0c 2c 00 1c 53 10 00 37 78 01 00 00 40 51 28 0c 51 18 5e 2d 10 01 24 68 0c 1d 08 54 24 68 0c 21 08 42 08 00 02 ┆_(N, Ø(P-( , S 7x @Q( Q ^- $h T$h ! B ┆
0x01170…011a0 08 00 00 61 80 26 5c 28 4c 2d 00 04 5d 28 4e 2f 00 01 5f 28 50 2d 28 0c 2c 00 37 53 10 00 37 78 01 00 00 40 53 28 0c 53 38 5e 34 8f ac 2c 00 00 ┆ a &Ø(L- Å(N/ _(P-( , 7S 7x @S( S8^4 , ┆
0x011a0…011d0 24 68 0c 5c 08 b4 53 28 0c 34 78 03 00 27 10 00 0a 1a 44 69 73 70 6c 61 79 20 73 74 61 72 74 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆$h Ø S( 4x ' Display start: ┆
0x011d0…01200 20 20 20 20 20 20 20 20 20 20 20 20 5e 28 14 50 10 00 5c 28 12 24 68 12 2d 0a 86 5d 28 1c 53 28 1c 53 30 06 5f 28 1e 2d 00 01 a1 68 1e 00 00 0e ┆ ^( P Ø( $h - Å( S( S0 _( - h ┆
0x01200…01230 00 00 43 00 00 50 00 00 59 74 65 73 74 63 6f 6e 74 31 74 78 00 00 00 03 64 69 73 63 31 00 00 00 00 00 00 00 bb 32 91 00 00 00 00 00 00 00 00 00 ┆ C P Ytestcont1tx disc1 2 ┆
0x01230…01260 00 00 00 00 00 83 00 00 50 00 00 59 74 65 73 74 6d 69 6e 74 74 78 00 00 00 00 02 64 69 73 63 00 00 00 00 00 00 00 00 bb 86 3a 00 00 00 00 00 00 ┆ P Ytestminttx disc : ┆
0x01260…01290 00 00 00 00 00 00 00 00 e3 00 00 50 00 00 59 74 65 73 74 77 70 62 6f 6c 74 78 00 00 00 02 64 69 73 63 00 00 00 00 00 00 00 00 bb 7a 31 00 00 00 ┆ P Ytestwpboltx disc z1 ┆
0x01290…012c0 00 00 00 00 00 00 00 00 00 00 01 13 00 00 50 00 00 59 74 65 73 74 6c 69 6e 6b 74 78 31 00 00 00 02 64 69 73 63 00 00 00 00 00 00 00 00 bc 07 b7 ┆ P Ytestlinktx1 disc ┆
0x012c0…012f0 00 00 00 00 00 00 00 00 00 00 00 00 00 01 23 00 00 50 00 00 59 74 65 73 74 72 62 6f 6f 6c 74 78 00 00 00 02 64 69 73 63 00 00 00 00 00 00 00 00 ┆ # P Ytestrbooltx disc ┆
0x012f0…01320 bb 85 ab 00 00 00 00 00 00 00 00 00 00 00 00 00 01 bb 00 00 50 00 00 59 74 65 73 74 6d 6f 76 65 74 78 00 00 00 00 01 64 69 73 63 35 00 00 00 00 ┆ P Ytestmovetx disc5 ┆
0x01320…01350 00 00 00 b8 26 fa 00 00 00 00 00 00 00 00 00 00 00 00 34 80 08 51 28 18 2d 10 04 5d 28 18 51 28 18 2d 1f fe 5d 28 18 a1 0f ff 34 80 12 51 28 16 ┆ & 4 Q( - Å( Q( - Å( 4 Q( ┆
0x01350…01380 5d 28 58 2d 28 12 2c 00 18 53 10 00 37 78 01 00 00 4c 34 80 18 51 28 16 5d 28 58 2c 0f fe 5c 28 5a 2f 00 00 5f 28 5c 2d 28 12 2c 00 37 53 10 00 ┆Å(X-( , S 7x L4 Q( Å(X, Ø(Z/ _(Ø-( , 7S ┆
0x01380…013b0 37 78 01 00 00 4c 51 28 1a 34 8e fa 51 28 10 a9 00 01 34 80 10 2c 00 00 5c 28 58 2d 28 12 2c 00 19 53 10 00 37 78 01 00 00 4c 53 28 12 34 78 03 ┆7x LQ( 4 Q( 4 , Ø(X-( , S 7x LS( 4x ┆
0x013b0…013e0 00 00 ff 00 00 03 5e 28 10 50 10 00 5c 28 0e 51 28 0c 2f 28 12 2c 10 18 5c 80 4a 5e 80 4a 2e 30 00 d8 10 02 dc 20 02 2e 20 04 2d 10 04 a1 c0 3c ┆ ^( P Ø( Q( /( , Ø J^ J.0 . - <┆
0x013e0…01410 34 8f f6 52 80 3a 2c 00 04 5c 28 6a 2d 00 00 5d 28 6c 2d 28 0e 2c 00 1e 53 10 00 37 78 01 00 00 5e 2d 28 12 5d 28 6a 2d 28 0e 2c 00 36 53 10 00 ┆4 R :, Ø(j- Å(l-( , S 7x ^-( Å(j-( , 6S ┆
0x01410…01440 37 78 01 00 00 5e 2c 00 05 5c 28 6a 2d 00 00 5d 28 6c 2d 28 0e 2c 00 1e 53 10 00 37 78 01 00 00 5e 53 28 0e 34 78 03 0c 12 a2 02 c6 70 5e 28 10 ┆7x ^, Ø(j- Å(l-( , S 7x ^S( 4x p^( ┆
0x01440…01470 50 10 00 5c 28 0e 51 28 0c 2f 28 12 2c 10 18 5c 80 4a 5e 80 4a 2e 30 00 d8 10 02 dc 20 02 2e 20 04 2d 10 04 a1 c0 3c 34 8f f6 52 80 3a 2c 00 06 ┆P Ø( Q( /( , Ø J^ J.0 . - <4 R :, ┆
0x01470…014a0 5c 28 6a 2d 00 00 5d 28 6c 2d 28 0e 2c 00 1e 53 10 00 37 78 01 00 00 5e 2d 28 12 5d 28 6a 2d 28 0e 2c 00 36 53 10 00 37 78 01 00 00 5e 2c 00 07 ┆Ø(j- Å(l-( , S 7x ^-( Å(j-( , 6S 7x ^, ┆
0x014a0…014d0 5c 28 6a 2d 00 00 5d 28 6c 2d 28 0e 2c 00 1e 53 10 00 37 78 01 00 00 5e 53 28 0e 34 78 03 0b f6 42 02 c8 68 5e 28 10 50 10 00 5c 28 0e 50 80 04 ┆Ø(j- Å(l-( , S 7x ^S( 4x B h^( P Ø( P ┆
0x014d0…01500 34 80 04 00 00 0e 5c 28 12 53 28 0e 51 38 5c 1d 38 36 24 68 0e 5d 08 5c 53 28 0c a7 00 20 34 80 16 51 28 0e 51 18 58 a1 00 09 34 80 0e 00 00 7e ┆4 Ø( S( Q8Ø 86$h Å ØS( 4 Q( Q X 4 ü┆
0x01500…01530 00 00 5b 00 00 50 00 00 59 74 65 73 74 63 6f 6e 74 32 74 78 00 00 00 03 64 69 73 63 31 00 00 00 00 00 00 00 bb 32 93 00 00 00 00 00 00 00 00 00 ┆ Æ P Ytestcont2tx disc1 2 ┆
0x01530…01560 00 00 00 00 00 73 00 00 50 00 00 59 74 65 73 74 63 6f 6e 74 74 78 00 00 00 00 02 64 69 73 63 31 00 00 00 00 00 00 00 bb 2c 4a 00 00 00 00 00 00 ┆ s P Ytestconttx disc1 ,J ┆
0x01560…01590 00 00 00 00 00 00 00 00 93 00 00 50 00 00 59 74 65 73 74 62 6f 6f 6c 74 78 00 00 00 00 03 64 69 73 63 00 00 00 00 00 00 00 00 bb 73 e5 00 00 00 ┆ P Ytestbooltx disc s ┆
0x01590…015c0 00 00 00 00 00 00 00 00 00 00 00 bb 00 00 50 00 00 59 74 65 73 74 73 79 73 35 74 78 00 00 00 00 01 64 69 73 63 00 00 00 00 00 00 00 00 bb b3 e4 ┆ P Ytestsys5tx disc ┆
0x015c0…015f0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 d3 00 00 50 00 00 59 74 65 73 74 77 62 6f 6f 6c 74 78 00 00 00 02 64 69 73 63 00 00 00 00 00 00 00 00 ┆ P Ytestwbooltx disc ┆
0x015f0…01620 bb 85 d6 00 00 00 00 00 00 00 00 00 00 00 00 00 00 f3 00 00 50 00 00 59 74 65 73 74 69 6e 74 74 78 00 00 00 00 00 03 64 69 73 63 00 00 00 00 00 ┆ P Ytestinttx disc ┆
0x01620…01650 00 00 00 bb 73 b7 00 00 00 00 00 00 00 00 00 00 00 00 00 01 0b 00 00 50 00 00 59 74 65 73 74 74 6f 66 72 74 78 00 00 00 00 01 64 69 73 63 00 00 ┆ s P Ytesttofrtx disc ┆
0x01650…01680 00 00 00 00 00 00 bd 91 a5 00 00 00 00 00 00 00 00 00 00 00 00 00 01 33 00 00 50 00 00 59 74 65 73 74 74 62 6f 6f 6c 74 78 00 00 00 02 64 69 73 ┆ 3 P Ytesttbooltx dis┆
0x01680…016b0 63 00 00 00 00 00 00 00 00 bb 87 30 00 00 00 00 00 00 00 00 00 00 00 00 00 01 43 00 00 50 00 00 59 74 65 73 74 70 72 34 74 78 00 00 00 00 00 0f ┆c 0 C P Ytestpr4tx ┆
0x016b0…016e0 64 69 73 63 31 00 00 00 00 00 00 00 be b2 6d 00 00 00 00 00 00 00 00 00 00 00 00 24 68 0e 1f 09 60 5f 28 16 51 28 14 a9 00 00 34 8f 92 2c 00 01 ┆disc1 m $h `_( Q( 4 , ┆
0x016e0…01710 24 68 0e 5c 08 36 53 28 0e 34 78 03 01 00 00 00 00 ff 00 00 03 4f 75 74 70 75 74 20 73 65 6e 64 77 61 69 74 20 20 20 20 20 20 20 20 20 20 20 20 ┆$h Ø 6S( 4x Output sendwait ┆
0x01710…01740 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 5e 28 10 50 10 00 5c 28 0e 51 28 0e 51 18 36 a1 01 fd 34 80 12 51 28 0c 5d 28 4e 2d 28 0e 2c 00 19 ┆ ^( P Ø( Q( Q 6 4 Q( Å(N-( , ┆
0x01740…01770 53 10 00 37 78 01 00 00 42 34 80 60 51 28 0c a5 00 20 34 80 16 51 28 0e 51 18 58 a1 00 09 34 80 0e 51 28 0c ad 00 0a 34 80 08 51 28 0c 2d 10 80 ┆S 7x B4 `Q( 4 Q( Q X 4 Q( 4 Q( - ┆
0x01770…017a0 5d 28 0c 51 28 0c 53 28 0e 53 38 36 5d 28 12 51 00 06 2d 1f ff 08 00 02 08 00 00 61 80 3a 91 00 01 90 00 03 24 40 00 84 0f f0 5c 28 14 5d 28 16 ┆Å( Q( S( S86Å( Q - a : $@ Ø( Å( ┆
0x017a0…017d0 53 28 0e 53 38 b0 1f 28 16 5f 28 16 51 28 12 53 80 20 9b 68 14 99 68 14 87 30 01 24 68 16 13 00 00 15 00 06 24 68 16 5d 00 00 51 28 0e 51 18 36 ┆S( S8 ( _( Q( S h h 0 $h $h Å Q( Q 6┆
0x017d0…01800 2d 10 01 24 68 0e 5d 08 36 53 28 0e 34 78 03 00 00 ff 00 00 03 5e 28 12 50 10 00 5c 28 10 51 28 0c 2f 28 58 2c 10 32 5c 83 36 5e 83 36 00 03 fe ┆- $h Å 6S( 4x ^( P Ø( Q( /(X, 2Ø 6^ 6 ┆
0x01800…01830 6d 6f 64 65 20 6c 69 73 74 2e 79 65 73 0a 74 65 73 74 63 6f 6e 74 31 3d 61 6c 67 6f 6c 20 72 74 73 2e 61 6c 67 66 74 6e 72 74 73 37 20 73 75 72 ┆mode list.yes testcont1=algol rts.algftnrts7 sur┆
0x01830…01860 76 65 79 2e 79 65 73 0a 62 65 67 69 6e 0a 20 20 69 6e 74 65 67 65 72 20 69 6e 63 2c 20 6d 6f 64 65 2c 20 6c 62 2c 20 75 62 2c 20 69 2c 20 6a 2c ┆vey.yes begin integer inc, mode, lb, ub, i, j,┆
0x01860…01890 20 6b 3b 0a 0a 20 20 77 72 69 74 65 20 28 6f 75 74 2c 20 22 6e 6c 22 2c 20 33 2c 20 22 73 70 22 2c 20 31 38 2c 0a 20 20 20 20 20 20 20 20 3c 3a ┆ k; write (out, "nl", 3, "sp", 18, <:┆
0x01890…018c0 54 20 45 20 53 20 54 20 20 41 20 46 20 20 43 20 4f 20 4e 20 54 20 45 20 58 20 54 20 20 56 20 41 20 52 20 49 20 41 20 42 20 4c 20 45 3a 3e 2c 0a ┆T E S T A F C O N T E X T V A R I A B L E:>, ┆
0x018c0…018f0 20 20 20 20 20 20 20 20 22 6e 6c 22 2c 20 33 29 3b 0a 20 20 77 72 69 74 65 20 28 6f 75 74 2c 20 0a 20 20 20 20 20 20 20 20 20 22 73 70 22 2c 20 ┆ "nl", 3); write (out, "sp", ┆
0x018f0…01920 32 38 2c 20 3c 3a 69 3a 3e 2c 20 0a 20 20 20 20 20 20 20 20 20 22 73 70 22 2c 20 20 33 2c 20 3c 3a 69 61 20 28 6c 62 29 3a 3e 2c 20 0a 20 20 20 ┆28, <:i:>, "sp", 3, <:ia (lb):>, ┆
0x01920…01950 20 20 20 20 20 20 22 73 70 22 2c 20 20 33 2c 20 3c 3a 69 61 20 28 75 62 29 3a 3e 2c 0a 20 20 20 20 20 20 20 20 20 22 73 70 22 2c 20 20 32 2c 20 ┆ "sp", 3, <:ia (ub):>, "sp", 2, ┆
0x01950…01980 3c 3a 61 3a 3e 2c 20 0a 20 20 20 20 20 20 20 20 20 22 73 70 22 2c 20 20 33 2c 20 3c 3a 72 3a 3e 2c 0a 20 20 20 20 20 20 20 20 20 22 73 70 22 2c ┆<:a:>, "sp", 3, <:r:>, "sp",┆
0x01980…019b0 20 20 33 2c 20 3c 3a 6c 2e 62 2e 3a 3e 2c 20 0a 20 20 20 20 20 20 20 20 20 22 73 70 22 2c 20 20 33 2c 20 3c 3a 75 2e 62 2e 3a 3e 2c 20 0a 20 20 ┆ 3, <:l.b.:>, "sp", 3, <:u.b.:>, ┆
0x019b0…019e0 20 20 20 20 20 20 20 22 73 70 22 2c 20 20 32 2c 20 3c 3a 69 6e 63 3a 3e 2c 20 22 6e 6c 22 2c 20 31 2c 0a 20 20 20 20 20 20 20 20 20 22 5f 22 20 ┆ "sp", 2, <:inc:>, "nl", 1, "_" ┆
0x019e0…01a10 2c 20 37 35 2c 20 22 6e 6c 22 2c 20 31 29 3b 0a 0a 0a 20 20 69 20 3a 3d 20 31 3b 0a 20 20 72 65 70 65 61 74 0a 0a 20 20 20 20 6a 20 3a 3d 20 31 ┆, 75, "nl", 1); i := 1; repeat j := 1┆
0x01a10…01a40 3b 0a 20 20 20 20 72 65 70 65 61 74 0a 20 20 20 20 20 20 0a 20 20 20 20 20 20 63 61 73 65 20 6a 20 6f 66 0a 20 20 20 20 20 20 62 65 67 69 6e 0a ┆; repeat case j of begin ┆
0x01a40…01a70 20 20 20 20 20 20 20 20 6d 6f 64 65 20 3a 3d 20 20 37 3b 20 3c 2a 72 65 61 64 2f 77 72 69 74 65 2f 73 61 76 65 20 62 69 74 20 73 61 74 2a 3e 0a ┆ mode := 7; <*read/write/save bit sat*> ┆
0x01a70…01aa0 20 20 20 20 20 20 20 20 6d 6f 64 65 20 3a 3d 20 20 30 3b 20 3c 2a 6e 6f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 62 69 74 20 73 61 74 2a 3e 0a ┆ mode := 0; <*no bit sat*> ┆
0x01aa0…01ad0 20 20 20 20 20 20 20 20 6d 6f 64 65 20 3a 3d 20 20 31 3b 20 3c 2a 72 65 61 64 20 20 20 20 20 20 20 20 20 20 20 20 62 69 74 20 73 61 74 2a 3e 0a ┆ mode := 1; <*read bit sat*> ┆
0x01ad0…01b00 20 20 20 20 20 20 20 20 6d 6f 64 65 20 3a 3d 20 20 32 3b 20 3c 2a 20 20 20 20 20 77 72 69 74 65 20 20 20 20 20 20 62 69 74 20 73 61 74 2a 3e 0a ┆ mode := 2; <* write bit sat*> ┆
0x01b00…01b30 20 20 20 20 20 20 20 20 6d 6f 64 65 20 3a 3d 20 20 33 3b 20 3c 2a 72 65 61 64 2f 77 72 69 74 65 20 20 20 20 20 20 62 69 74 20 73 61 74 2a 3e 0a ┆ mode := 3; <*read/write bit sat*> ┆
0x01b30…01b60 20 20 20 20 20 20 20 20 6d 6f 64 65 20 3a 3d 20 31 36 3b 20 3c 2a 6e 65 77 20 69 6e 63 61 72 6e 61 74 69 6f 6e 20 62 69 74 20 73 61 74 2a 3e 0a ┆ mode := 16; <*new incarnation bit sat*> ┆
0x01b60…01b90 20 20 20 20 20 20 20 20 6d 6f 64 65 20 3a 3d 20 31 37 3b 20 3c 2a 72 65 61 64 2f 6e 65 77 20 69 6e 63 61 72 6e 20 62 69 74 20 73 61 74 2a 3e 0a ┆ mode := 17; <*read/new incarn bit sat*> ┆
0x01b90…01bc0 20 20 20 20 20 20 65 6e 64 20 63 61 73 65 20 6a 20 6f 66 3b 0a 0a 20 20 20 20 20 20 6c 62 20 3a 3d 20 63 61 73 65 20 6a 20 6f 66 20 28 35 2c 20 ┆ end case j of; lb := case j of (5, ┆
0x01bc0…01bf0 35 2c 20 35 2c 20 35 2c 20 35 2c 20 20 31 2c 20 20 31 29 3b 0a 20 20 20 20 20 20 75 62 20 3a 3d 20 63 61 73 65 20 6a 20 6f 66 20 28 39 2c 20 38 ┆5, 5, 5, 5, 1, 1); ub := case j of (9, 8┆
0x01bf0…01c20 2c 20 39 2c 20 36 2c 20 35 2c 20 31 30 2c 20 31 31 29 3b 0a 0a 20 20 20 20 20 20 66 6f 72 20 69 6e 63 20 3a 3d 20 31 2c 20 32 20 64 6f 0a 20 20 ┆, 9, 6, 5, 10, 11); for inc := 1, 2 do ┆
0x01c20…01c50 20 20 20 20 62 65 67 69 6e 20 63 6f 6e 74 65 78 74 20 28 69 6e 63 2c 20 32 2c 20 6d 6f 64 65 29 3b 0a 20 20 20 20 20 20 20 20 69 6e 74 65 67 65 ┆ begin context (inc, 2, mode); intege┆
0x01c50…01c80 72 20 20 20 20 20 20 20 61 3b 0a 20 20 20 20 20 20 20 20 72 65 61 6c 20 20 20 20 20 20 20 20 20 20 72 3b 0a 20 20 20 20 20 20 20 20 69 6e 74 65 ┆r a; real r; inte┆
0x01c80…01cb0 67 65 72 20 61 72 72 61 79 20 69 61 20 28 6c 62 20 3a 20 75 62 29 3b 0a 0a 20 20 20 20 20 20 20 20 6c 62 20 3a 3d 20 73 79 73 74 65 6d 20 28 33 ┆ger array ia (lb : ub); lb := system (3┆
0x01cb0…01ce0 2c 20 75 62 2c 20 69 61 29 3b 0a 0a 20 20 20 20 20 20 20 20 77 72 69 74 65 20 28 6f 75 74 2c 20 63 61 73 65 20 6a 20 6f 66 20 28 20 0a 20 20 20 ┆, ub, ia); write (out, case j of ( ┆
0x01ce0…01d10 20 20 20 20 20 20 20 20 20 20 20 20 3c 3a 72 65 61 64 2f 77 72 69 74 65 2f 73 61 76 65 20 62 69 74 20 2e 2e 2e 3a 3e 2c 0a 20 20 20 20 20 20 20 ┆ <:read/write/save bit ...:>, ┆
0x01d10…01d40 20 20 20 20 20 20 20 20 3c 3a 6e 6f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 62 69 74 20 2e 2e 2e 3a 3e 2c 0a 20 20 20 20 20 20 20 20 20 20 20 ┆ <:no bit ...:>, ┆
0x01d40…01d70 20 20 20 20 3c 3a 72 65 61 64 20 20 20 20 20 20 20 20 20 20 20 20 62 69 74 20 2e 2e 2e 3a 3e 2c 20 20 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ <:read bit ...:>, ┆
0x01d70…01da0 20 20 3c 3a 20 20 20 20 20 77 72 69 74 65 20 20 20 20 20 20 62 69 74 20 2e 2e 2e 3a 3e 2c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3c 3a ┆ <: write bit ...:>, <:┆
0x01da0…01dd0 72 65 61 64 2f 77 72 69 74 65 20 20 20 20 20 20 62 69 74 20 2e 2e 2e 3a 3e 2c 20 20 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3c 3a 6e 65 ┆read/write bit ...:>, <:ne┆
0x01dd0…01e00 77 20 69 6e 63 61 72 6e 61 74 69 6f 6e 20 62 69 74 20 2e 2e 2e 3a 3e 2c 20 20 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3c 3a 72 65 61 64 ┆w incarnation bit ...:>, <:read┆
0x01e00…01e30 2f 6e 65 77 20 69 6e 63 61 72 6e 20 62 69 74 20 2e 2e 2e 3a 3e 29 2c 20 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 73 70 22 2c 20 33 2c ┆/new incarn bit ...:>), "sp", 3,┆
0x01e30…01e60 20 3c 3c 64 64 64 3e 2c 20 69 2c 20 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 73 70 22 2c 20 35 2c 20 69 61 20 28 6c 62 29 2c 20 0a 20 ┆ <<ddd>, i, "sp", 5, ia (lb), ┆
0x01e60…01e90 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 73 70 22 2c 20 35 2c 20 69 61 20 28 75 62 29 2c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 ┆ "sp", 5, ia (ub), "┆
0x01e90…01ec0 73 70 22 2c 20 34 2c 20 61 2c 20 3c 3c 64 2e 64 3e 2c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 73 70 22 2c 20 32 2c 20 72 2c 20 3c 3c ┆sp", 4, a, <<d.d>, "sp", 2, r, <<┆
0x01ec0…01ef0 64 64 3e 2c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 73 70 22 2c 20 32 2c 20 6c 62 2c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆dd>, "sp", 2, lb, ┆
0x01ef0…01f20 22 73 70 22 2c 20 35 2c 20 75 62 2c 20 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 73 70 22 2c 20 35 2c 20 69 6e 63 2c 0a 20 20 20 20 20 ┆"sp", 5, ub, "sp", 5, inc, ┆
0x01f20…01f50 20 20 20 20 20 20 20 20 20 20 22 6e 6c 22 2c 20 31 29 3b 0a 0a 20 20 20 20 20 20 20 20 66 6f 72 20 6b 20 3a 3d 20 6c 62 20 73 74 65 70 20 31 20 ┆ "nl", 1); for k := lb step 1 ┆
0x01f50…01f80 75 6e 74 69 6c 20 75 62 20 64 6f 0a 20 20 20 20 20 20 20 20 20 20 20 69 61 20 28 6b 29 20 3a 3d 20 6b 3b 0a 20 20 20 20 20 20 20 20 61 20 20 20 ┆until ub do ia (k) := k; a ┆
0x01f80…01fb0 20 20 20 20 3a 3d 20 39 3b 0a 20 20 20 20 20 20 20 20 72 20 20 20 20 20 20 20 3a 3d 20 31 2e 31 3b 0a 20 20 20 20 20 20 65 6e 64 20 63 6f 6e 74 ┆ := 9; r := 1.1; end cont┆
0x01fb0…01fe0 65 78 74 3b 0a 0a 20 20 20 20 20 20 6a 20 3a 3d 20 6a 20 2b 20 31 3b 0a 20 20 20 20 75 6e 74 69 6c 20 6a 20 3e 20 37 3b 0a 0a 20 20 20 20 69 20 ┆ext; j := j + 1; until j > 7; i ┆
0x01fe0…02010 3a 3d 20 69 20 2b 20 31 3b 0a 20 20 75 6e 74 69 6c 20 69 20 3e 20 31 3b 0a 0a 65 6e 64 20 70 72 6f 67 72 61 6d 3b 0a 0a 65 6e 64 0a 19 20 20 20 ┆:= i + 1; until i > 1; end program; end ┆
0x02010…02040 20 20 20 20 20 20 20 20 3c 3a 6e 6f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 62 69 74 20 2e 2e 2e 3a 3e 2c 0a 20 20 20 20 20 20 20 20 20 20 20 ┆ <:no bit ...:>, ┆
0x02040…02070 20 20 20 20 3c 3a 72 65 61 64 20 20 20 20 20 20 20 20 20 20 20 20 62 69 74 20 2e 2e 2e 3a 3e 2c 20 20 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ <:read bit ...:>, ┆
0x02070…020a0 20 20 3c 3a 20 20 20 20 20 77 72 69 74 65 20 20 20 20 20 20 62 69 74 20 2e 2e 2e 3a 3e 2c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3c 3a ┆ <: write bit ...:>, <:┆
0x020a0…020d0 72 65 61 64 2f 77 72 69 74 65 20 20 20 20 20 20 62 69 74 20 2e 2e 2e 3a 3e 2c 20 20 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3c 3a 6e 65 ┆read/write bit ...:>, <:ne┆
0x020d0…02100 77 20 69 6e 63 61 72 6e 61 74 69 6f 6e 20 62 69 74 20 2e 2e 2e 3a 3e 2c 20 20 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3c 3a 72 65 61 64 ┆w incarnation bit ...:>, <:read┆
0x02100…02130 6d 6f 64 65 20 6c 69 73 74 2e 79 65 73 0a 74 65 73 74 63 6f 6e 74 32 3d 61 6c 67 6f 6c 20 72 74 73 2e 61 6c 67 66 74 6e 72 74 73 37 20 73 75 72 ┆mode list.yes testcont2=algol rts.algftnrts7 sur┆
0x02130…02160 76 65 79 2e 79 65 73 0a 62 65 67 69 6e 0a 20 20 69 6e 74 65 67 65 72 20 69 6e 63 2c 20 6d 6f 64 65 2c 20 6c 62 2c 20 75 62 2c 20 69 2c 20 6a 2c ┆vey.yes begin integer inc, mode, lb, ub, i, j,┆
0x02160…02190 20 6b 3b 0a 0a 20 20 77 72 69 74 65 20 28 6f 75 74 2c 20 22 6e 6c 22 2c 20 33 2c 20 22 73 70 22 2c 20 31 38 2c 0a 20 20 20 20 20 20 20 20 3c 3a ┆ k; write (out, "nl", 3, "sp", 18, <:┆
0x02190…021c0 54 20 45 20 53 20 54 20 20 41 20 46 20 20 43 20 4f 20 4e 20 54 20 45 20 58 20 54 20 20 56 20 41 20 52 20 49 20 41 20 42 20 4c 20 45 3a 3e 2c 0a ┆T E S T A F C O N T E X T V A R I A B L E:>, ┆
0x021c0…021f0 20 20 20 20 20 20 20 20 22 6e 6c 22 2c 20 33 29 3b 0a 20 20 77 72 69 74 65 20 28 6f 75 74 2c 20 0a 20 20 20 20 20 20 20 20 20 22 73 70 22 2c 20 ┆ "nl", 3); write (out, "sp", ┆
0x021f0…02220 32 38 2c 20 3c 3a 69 3a 3e 2c 20 0a 20 20 20 20 20 20 20 20 20 22 73 70 22 2c 20 20 33 2c 20 3c 3a 69 61 20 28 6c 62 29 3a 3e 2c 20 0a 20 20 20 ┆28, <:i:>, "sp", 3, <:ia (lb):>, ┆
0x02220…02250 20 20 20 20 20 20 22 73 70 22 2c 20 20 33 2c 20 3c 3a 69 61 20 28 75 62 29 3a 3e 2c 0a 20 20 20 20 20 20 20 20 20 22 73 70 22 2c 20 20 32 2c 20 ┆ "sp", 3, <:ia (ub):>, "sp", 2, ┆
0x02250…02280 3c 3a 61 3a 3e 2c 20 0a 20 20 20 20 20 20 20 20 20 22 73 70 22 2c 20 20 33 2c 20 3c 3a 72 3a 3e 2c 0a 20 20 20 20 20 20 20 20 20 22 73 70 22 2c ┆<:a:>, "sp", 3, <:r:>, "sp",┆
0x02280…022b0 20 20 33 2c 20 3c 3a 6c 2e 62 2e 3a 3e 2c 20 0a 20 20 20 20 20 20 20 20 20 22 73 70 22 2c 20 20 33 2c 20 3c 3a 75 2e 62 2e 3a 3e 2c 20 0a 20 20 ┆ 3, <:l.b.:>, "sp", 3, <:u.b.:>, ┆
0x022b0…022e0 20 20 20 20 20 20 20 22 73 70 22 2c 20 20 32 2c 20 3c 3a 69 6e 63 3a 3e 2c 20 22 6e 6c 22 2c 20 31 2c 0a 20 20 20 20 20 20 20 20 20 22 5f 22 20 ┆ "sp", 2, <:inc:>, "nl", 1, "_" ┆
0x022e0…02310 2c 20 37 35 2c 20 22 6e 6c 22 2c 20 31 29 3b 0a 0a 0a 20 20 69 20 3a 3d 20 31 3b 0a 20 20 72 65 70 65 61 74 0a 0a 20 20 20 20 6a 20 3a 3d 20 31 ┆, 75, "nl", 1); i := 1; repeat j := 1┆
0x02310…02340 3b 0a 20 20 20 20 72 65 70 65 61 74 0a 20 20 20 20 20 20 0a 20 20 20 20 20 20 63 61 73 65 20 6a 20 6f 66 0a 20 20 20 20 20 20 62 65 67 69 6e 0a ┆; repeat case j of begin ┆
0x02340…02370 20 20 20 20 20 20 20 20 6d 6f 64 65 20 3a 3d 20 20 37 3b 20 3c 2a 72 65 61 64 2f 77 72 69 74 65 2f 73 61 76 65 20 62 69 74 20 73 61 74 2a 3e 0a ┆ mode := 7; <*read/write/save bit sat*> ┆
0x02370…023a0 20 20 20 20 20 20 20 20 6d 6f 64 65 20 3a 3d 20 20 30 3b 20 3c 2a 6e 6f 20 20 20 20 20 20 20 20 20 20 20 20 20 20 62 69 74 20 73 61 74 2a 3e 0a ┆ mode := 0; <*no bit sat*> ┆
0x023a0…023d0 20 20 20 20 20 20 20 20 6d 6f 64 65 20 3a 3d 20 20 31 3b 20 3c 2a 72 65 61 64 20 20 20 20 20 20 20 20 20 20 20 20 62 69 74 20 73 61 74 2a 3e 0a ┆ mode := 1; <*read bit sat*> ┆
0x023d0…02400 20 20 20 20 20 20 20 20 6d 6f 64 65 20 3a 3d 20 20 32 3b 20 3c 2a 20 20 20 20 20 77 72 69 74 65 20 20 20 20 20 20 62 69 74 20 73 61 74 2a 3e 0a ┆ mode := 2; <* write bit sat*> ┆
0x02400…02430 20 20 20 20 20 20 20 20 6d 6f 64 65 20 3a 3d 20 20 33 3b 20 3c 2a 72 65 61 64 2f 77 72 69 74 65 20 20 20 20 20 20 62 69 74 20 73 61 74 2a 3e 0a ┆ mode := 3; <*read/write bit sat*> ┆
0x02430…02460 20 20 20 20 20 20 20 20 6d 6f 64 65 20 3a 3d 20 31 36 3b 20 3c 2a 6e 65 77 20 69 6e 63 61 72 6e 61 74 69 6f 6e 20 62 69 74 20 73 61 74 2a 3e 0a ┆ mode := 16; <*new incarnation bit sat*> ┆
0x02460…02490 20 20 20 20 20 20 20 20 6d 6f 64 65 20 3a 3d 20 31 37 3b 20 3c 2a 72 65 61 64 2f 6e 65 77 20 69 6e 63 61 72 6e 20 62 69 74 20 73 61 74 2a 3e 0a ┆ mode := 17; <*read/new incarn bit sat*> ┆
0x02490…024c0 20 20 20 20 20 20 65 6e 64 20 63 61 73 65 20 6a 20 6f 66 3b 0a 0a 20 20 20 20 20 20 6c 62 20 3a 3d 20 63 61 73 65 20 6a 20 6f 66 20 28 35 2c 20 ┆ end case j of; lb := case j of (5, ┆
0x024c0…024f0 33 2c 20 35 2c 20 31 2c 20 35 2c 20 20 31 2c 20 20 31 29 3b 0a 20 20 20 20 20 20 75 62 20 3a 3d 20 63 61 73 65 20 6a 20 6f 66 20 28 39 2c 20 38 ┆3, 5, 1, 5, 1, 1); ub := case j of (9, 8┆
0x024f0…02520 2c 20 37 2c 20 36 2c 20 35 2c 20 31 30 2c 20 31 31 29 3b 0a 20 20 20 20 20 20 0a 20 20 20 20 20 20 74 72 61 70 20 28 72 65 70 29 3b 0a 0a 20 20 ┆, 7, 6, 5, 10, 11); trap (rep); ┆
0x02520…02550 20 20 20 20 66 6f 72 20 69 6e 63 20 3a 3d 20 31 2c 20 32 20 64 6f 0a 20 20 20 20 20 20 62 65 67 69 6e 20 63 6f 6e 74 65 78 74 20 28 69 6e 63 2c ┆ for inc := 1, 2 do begin context (inc,┆
0x02550…02580 20 32 2c 20 6d 6f 64 65 29 3b 0a 20 20 20 20 20 20 20 20 69 6e 74 65 67 65 72 20 20 20 20 20 20 20 61 3b 0a 20 20 20 20 20 20 20 20 72 65 61 6c ┆ 2, mode); integer a; real┆
0x02580…025b0 20 20 20 20 20 20 20 20 20 20 72 3b 0a 20 20 20 20 20 20 20 20 69 6e 74 65 67 65 72 20 61 72 72 61 79 20 69 61 20 28 6c 62 20 3a 20 75 62 29 3b ┆ r; integer array ia (lb : ub);┆
0x025b0…025e0 0a 0a 20 20 20 20 20 20 20 20 6c 62 20 3a 3d 20 73 79 73 74 65 6d 20 28 33 2c 20 75 62 2c 20 69 61 29 3b 0a 0a 20 20 20 20 20 20 20 20 77 72 69 ┆ lb := system (3, ub, ia); wri┆
0x025e0…02610 74 65 20 28 6f 75 74 2c 20 63 61 73 65 20 6a 20 6f 66 20 28 20 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3c 3a 72 65 61 64 2f 77 72 69 74 ┆te (out, case j of ( <:read/writ┆
0x02610…02640 65 2f 73 61 76 65 20 62 69 74 20 2e 2e 2e 3a 3e 2c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3c 3a 6e 6f 20 20 20 20 20 20 20 20 20 20 20 ┆e/save bit ...:>, <:no ┆
0x02640…02670 20 20 20 62 69 74 20 2e 2e 2e 3a 3e 2c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3c 3a 72 65 61 64 20 20 20 20 20 20 20 20 20 20 20 20 62 ┆ bit ...:>, <:read b┆
0x02670…026a0 69 74 20 2e 2e 2e 3a 3e 2c 20 20 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3c 3a 20 20 20 20 20 77 72 69 74 65 20 20 20 20 20 20 62 69 74 ┆it ...:>, <: write bit┆
0x026a0…026d0 20 2e 2e 2e 3a 3e 2c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3c 3a 72 65 61 64 2f 77 72 69 74 65 20 20 20 20 20 20 62 69 74 20 2e 2e 2e ┆ ...:>, <:read/write bit ...┆
0x026d0…02700 3a 3e 2c 20 20 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3c 3a 6e 65 77 20 69 6e 63 61 72 6e 61 74 69 6f 6e 20 62 69 74 20 2e 2e 2e 3a 3e ┆:>, <:new incarnation bit ...:>┆
0x02700…02730 2c 20 20 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3c 3a 72 65 61 64 2f 6e 65 77 20 69 6e 63 61 72 6e 20 62 69 74 20 2e 2e 2e 3a 3e 29 2c ┆, <:read/new incarn bit ...:>),┆
0x02730…02760 20 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 73 70 22 2c 20 33 2c 20 3c 3c 64 64 64 3e 2c 20 69 2c 20 0a 20 20 20 20 20 20 20 20 20 20 ┆ "sp", 3, <<ddd>, i, ┆
0x02760…02790 20 20 20 20 20 22 73 70 22 2c 20 35 2c 20 69 61 20 28 6c 62 29 2c 20 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 73 70 22 2c 20 35 2c 20 ┆ "sp", 5, ia (lb), "sp", 5, ┆
0x02790…027c0 69 61 20 28 75 62 29 2c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 73 70 22 2c 20 34 2c 20 61 2c 20 3c 3c 64 2e 64 3e 2c 0a 20 20 20 20 ┆ia (ub), "sp", 4, a, <<d.d>, ┆
0x027c0…027f0 20 20 20 20 20 20 20 20 20 20 20 22 73 70 22 2c 20 32 2c 20 72 2c 20 3c 3c 64 64 3e 2c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 73 70 ┆ "sp", 2, r, <<dd>, "sp┆
0x027f0…02820 22 2c 20 32 2c 20 6c 62 2c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 73 70 22 2c 20 35 2c 20 75 62 2c 20 0a 20 20 20 20 20 20 20 20 20 ┆", 2, lb, "sp", 5, ub, ┆
0x02820…02850 20 20 20 20 20 20 22 73 70 22 2c 20 35 2c 20 69 6e 63 2c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 6e 6c 22 2c 20 31 29 3b 0a 0a 20 20 ┆ "sp", 5, inc, "nl", 1); ┆
0x02850…02880 20 20 20 20 20 20 66 6f 72 20 6b 20 3a 3d 20 6c 62 20 73 74 65 70 20 31 20 75 6e 74 69 6c 20 75 62 20 64 6f 0a 20 20 20 20 20 20 20 20 20 20 20 ┆ for k := lb step 1 until ub do ┆
0x02880…028b0 69 61 20 28 6b 29 20 3a 3d 20 6b 3b 0a 20 20 20 20 20 20 20 20 61 20 20 20 20 20 20 20 3a 3d 20 39 3b 0a 20 20 20 20 20 20 20 20 72 20 20 20 20 ┆ia (k) := k; a := 9; r ┆
0x028b0…028e0 20 20 20 3a 3d 20 31 2e 31 3b 0a 20 20 20 20 20 20 65 6e 64 20 63 6f 6e 74 65 78 74 3b 0a 0a 20 20 20 20 20 20 72 65 70 3a 0a 20 20 20 20 20 20 ┆ := 1.1; end context; rep: ┆
0x028e0…02910 74 72 61 70 20 28 72 65 70 29 3b 0a 20 20 20 20 20 20 6a 20 3a 3d 20 6a 20 2b 20 31 3b 0a 20 20 20 20 75 6e 74 69 6c 20 6a 20 3e 20 37 3b 0a 0a ┆trap (rep); j := j + 1; until j > 7; ┆
0x02910…02940 20 20 20 20 69 20 3a 3d 20 69 20 2b 20 31 3b 0a 20 20 75 6e 74 69 6c 20 69 20 3e 20 31 3b 0a 0a 65 6e 64 20 70 72 6f 67 72 61 6d 3b 0a 0a 65 6e ┆ i := i + 1; until i > 1; end program; en┆
0x02940…02970 64 0a 19 62 69 74 20 2e 2e 2e 3a 3e 2c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3c 3a 72 65 61 64 20 20 20 20 20 20 20 20 20 20 20 20 62 ┆d bit ...:>, <:read b┆
0x02970…029a0 69 74 20 2e 2e 2e 3a 3e 2c 20 20 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3c 3a 20 20 20 20 20 77 72 69 74 65 20 20 20 20 20 20 62 69 74 ┆it ...:>, <: write bit┆
0x029a0…029d0 20 2e 2e 2e 3a 3e 2c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3c 3a 72 65 61 64 2f 77 72 69 74 65 20 20 20 20 20 20 62 69 74 20 2e 2e 2e ┆ ...:>, <:read/write bit ...┆
0x029d0…02a00 3a 3e 2c 20 20 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3c 3a 6e 65 77 20 69 6e 63 61 72 6e 61 74 69 6f 6e 20 62 69 74 20 2e 2e 2e 3a 3e ┆:>, <:new incarnation bit ...:>┆
0x02a00…02a30 6d 6f 64 65 20 6c 69 73 74 2e 79 65 73 0a 74 65 73 74 63 6f 6e 74 37 3d 61 6c 67 6f 6c 20 72 74 73 2e 61 6c 67 66 74 6e 72 74 73 37 20 73 75 72 ┆mode list.yes testcont7=algol rts.algftnrts7 sur┆
0x02a30…02a60 76 65 79 2e 79 65 73 0a 62 65 67 69 6e 0a 20 20 69 6e 74 65 67 65 72 20 6d 6f 64 65 2c 20 69 2c 20 6a 3b 0a 0a 20 20 77 72 69 74 65 20 28 6f 75 ┆vey.yes begin integer mode, i, j; write (ou┆
0x02a60…02a90 74 2c 20 22 6e 6c 22 2c 20 33 2c 20 22 73 70 22 2c 20 31 38 2c 0a 20 20 20 20 20 20 20 20 3c 3a 54 20 45 20 53 20 54 20 20 41 20 46 20 20 43 20 ┆t, "nl", 3, "sp", 18, <:T E S T A F C ┆
[…truncated at 200 lines…]