Home » CEEFAX disks » telesoftware16.adl » 14-07-89/Btree\BBS

14-07-89/Btree\BBS

This website contains an archive of files for the Acorn Electron, BBC Micro, Acorn Archimedes, Commodore 16 and Commodore 64 computers, which Dominic Ford has rescued from his private collection of floppy disks and cassettes.

Some of these files were originally commercial releases in the 1980s and 1990s, but they are now widely available online. I assume that copyright over them is no longer being asserted. If you own the copyright and would like files to be removed, please contact me.

Tape/disk: Home » CEEFAX disks » telesoftware16.adl
Filename: 14-07-89/Btree\BBS
Read OK:
File size: 1401 bytes
Load address: 0000
Exec address: FFFFFFFF
File contents
�,8�
3p BTREE TEST PROGRAM - D.G.HIBBS - 15 June 1988
p Copyright (c) 1988
�
(|
2|
<�*
F�:M��H
P�:M��W
Z�:M��f
d�:M��v
n�:M	
x#��<9Are you sure? (Y/N) K
�	�M�
���MY��My
��
�w
�
���8�9
���<�<�<�<�
�	�M�

�M
|
M�
$�M
.�3<�<�<�<�<
8��L���M�
B��N���M�
L��M���M�
V��M��M=
`y
�
��'8�9
���<�<�<�<:
��M
��3<�<�<�<�<:
���L���M�J��M�
�M
�3<�<�<�<�<:

�M�
 �3<�<<=<=<
*y
�
��G8�9
�@��<�<�<�<:<]<i<v<�<�<�<�<�<�<�
�
��8�9
��M
��3<�<�<�<�
�
��M=�
��M�;
��3<v<�
�vM�vM�J��M�
�M�;
�3<v<�
&
��H=�
0�M�;
:
�3<�
D{
N�
X�M�
b�3<�<�<�<�<�
l�M�
v��H=
��M�
��M�
��3<�<�<�<�<�
�z
��M
��3<�<�<�<�<�
��M�;
��3<v<�
��vM��vM�J��M�
��M�;
��3<v<�
�
��H=�
��M�;


�3<�

{

M�
 
{
*

��89
4
y
�
���89
���<�<�<�<
��M
��3<�<�<�<�<
��M
��3<�<�<�<�<
��M
��3<�<�<�<�
�
�3<
�y
~
�p DEF PROCTREELIST (node%) 
���<�<�<�
��M
��3<�<�<�<�<
���H=���8�9
���
���H=���8�9
�y
f
pp DEF PROCTREELIST (node%) 
z��<�<�<�
��M
��3<�<�<�<�<
���H=��I����8�9
�
��L��
���I����
���H=���8�9
�{
�y
N
X��89
b��<�<�<�<�
l
��8�9
v|
���I���L����
��M
��
���I���M��M�
�y
6
@	�
J	�M�
T�M
^�3<�<�<�<�<
h
��H=�
rM�
|	�M�
�|
��M
�M
��3<�<�<�<�<
�M�
���M=
��
���N�
�M�
�|
��M
��M
�M
 �3<�<�<�<�<
 M�
 �L��M�
& ��M���M�
0 {
: {
D y
#
(#	�(
2#(��<�<�<�<<?<I<V<d
<#dM�NEWTREE.INX
F#�d
P#dM�NEWTREE.INX
Z#�3d<�89<=<=<=<=
d#�M
n#�3<�<�<�<�
x#VM8��o9=
�#1�M Jp point to linked list of waste nodes
�#
�3<
�#�N
�#�M; 
�#%VMV=Jp discount waste nodes
�#
�3<
�#z
�#
M
�#
{M
�#|
�#
�dM�d
�#
?M
�#�?GV
$?M?;?
$z
$?M?�
"$VMV=?
,$�uM�?
6$IM=
@$
�M
J$�
T$|
^$�M�;�
h$IMI;
r$�8u��9
|$�M��
�$�Mu��
�$�M��
�$	���
�$�M8u=�9:o;{
�$�M8u;�9:o;{
�$�
�$�M=
�$�M=
�${
�$�M�;
�$*�M�:8�;:88��9M99:o;{
�$�M�d
�$�3d<�<�<�<�<
%�
%�dM�;
%)�3d<{Jp back pointer to last part
&%�dM�;
0%)�3d<=Jp correct the right pointer
:%�dM{;
D%)�3d<�Jp link this subtree to last
N%{M�
X%�VM
b%�d
l%�
v%oDEL TREE.INX
�%oREN NEWTREE.INX TREE.INX
�%M�TREE.INX
�%y
'
'	�*
'��<91. Add an item.�<92. Delete an item.�<93. List the tree.�<94. Balance the tree.�<	99. End.
$'��<9
Your Choice? K
.'|
8':M�=0
B'�8:N�:L9�:M	
L'	�K:
V'y
�*
�*	�
+s
++�M!Binary Tree Demonstration Program
+��(=�8�9�<9�
 +M�TREE.INX
*+�M�
4+IM�TREE.INXJ�M��(Can't open index file. - Can't continue.Jw
>+�M�< 9
H+�M=
R+�M=
\+�M=
f+M=
p+�3<�<�<�<�<
z+�
�+M�TREE.INX
�+{
�+
oM%
�+y
�.
�.	�H
�.s
�.|
�.#��<9Enter item to add �
/�M��;�89<9
/
M
/
��8�9
&/I����Item �+ is already in the database - Press return KJ|��M

0/	���
:/
�'8�9
D/y
�2
�2	�W
�2s
�2|
�2&��<9Enter item to delete �
�2�M��;�89<9
�2
��8�9
3F�����Item �' is not in the database - Press return KJ|��M

3��
3
�G8�9
"3y
�6
�6	�f
�6-�Start at item? �J�
Stop before? �
�6��M��M~~~
�6��89
�6y
�:
�:	�v
�:�Please Wait
�:�(
�:y
�:
��	�STARTUP��
�MENU��choice%T	�ADD��DEL�LIST��	�BALANCE�	a$\#�TREESEARCH��item$key$7back%left%
right%
nodepointer%
found%Tnode%inx%Tdata%T%	�TREEADD�
dummy%�TREEDELETEpkey$
pback%
pleft%pright%
cnode%TJckey$
cback%
cleft%cright%
cdata%�WASTELINK
�TREELIST��
�TREENEXT�rlast%T
�TREEBALANCE�
p2%
level%number%new%size%T%
start%parent%	y%	b%max%
start$\:fin$\&
lnode%
00000000  80 2c 01 38 11 c2 02 0d  0a 00 33 70 20 42 54 52  |.,.8......3p BTR|
00000010  45 45 20 54 45 53 54 20  50 52 4f 47 52 41 4d 20  |EE TEST PROGRAM |
00000020  2d 20 44 2e 47 2e 48 49  42 42 53 20 2d 20 31 35  |- D.G.HIBBS - 15|
00000030  20 4a 75 6e 65 20 31 39  38 38 0d 14 00 18 70 20  | June 1988....p |
00000040  43 6f 70 79 72 69 67 68  74 20 28 63 29 20 31 39  |Copyright (c) 19|
00000050  38 38 0d 1e 00 08 a4 11  17 01 0d 28 00 05 7c 0d  |88.........(..|.|
00000060  32 00 05 7c 0d 3c 00 08  a4 11 2a 01 0d 46 00 10  |2..|.<....*..F..|
00000070  95 10 3a 01 4d 01 01 b3  a4 10 48 01 0d 50 00 10  |..:.M.....H..P..|
00000080  95 10 3a 01 4d 01 02 b3  a4 10 57 01 0d 5a 00 10  |..:.M.....W..Z..|
00000090  95 10 3a 01 4d 01 03 b3  a4 10 66 01 0d 64 00 10  |..:.M.....f..d..|
000000a0  95 10 3a 01 4d 01 04 b3  a4 10 76 01 0d 6e 00 0b  |..:.M.....v..n..|
000000b0  97 10 3a 01 4d 01 09 0d  78 00 23 85 b2 01 1e 3c  |..:.M...x.#....<|
000000c0  01 14 39 0c 14 41 72 65  20 79 6f 75 20 73 75 72  |..9..Are you sur|
000000d0  65 3f 20 28 59 2f 4e 29  20 4b 0d 82 00 09 1c 89  |e? (Y/N) K......|
000000e0  01 4d e9 0d 8c 00 14 97  1c 89 01 4d 0c 01 59 f6  |.M.........M..Y.|
000000f0  1c 89 01 4d 0c 01 79 0d  96 00 07 82 01 00 0d a0  |...M..y.........|
00000100  00 05 77 0d de 03 04 0d  e8 03 0e 7f a4 11 92 01  |..w.............|
00000110  38 1c a8 01 39 0d f2 03  18 a1 1c b4 01 3c 10 bf  |8...9........<..|
00000120  01 3c 10 cb 01 3c 10 d7  01 3c 10 e4 01 0d fc 03  |.<...<...<......|
00000130  09 10 f7 01 4d ca 0d 06  04 0a 10 e4 01 4d 01 00  |....M........M..|
00000140  0d 10 04 05 7c 0d 1a 04  0b 10 04 02 4d 10 e4 01  |....|.......M...|
00000150  0d 24 04 0c a9 10 10 02  4d 10 04 02 0d 2e 04 1d  |.$......M.......|
00000160  84 33 10 10 02 3c 1c b4  01 3c 10 bf 01 3c 10 cb  |.3...<...<...<..|
00000170  01 3c 10 d7 01 3c 10 1b  02 0d 38 04 14 95 1c a8  |.<...<....8.....|
00000180  01 4c 1c b4 01 b3 10 e4  01 4d 10 cb 01 0d 42 04  |.L.......M....B.|
00000190  14 95 1c a8 01 4e 1c b4  01 b3 10 e4 01 4d 10 d7  |.....N.......M..|
000001a0  01 0d 4c 04 12 95 1c a8  01 4d 1c b4 01 b3 10 f7  |..L......M......|
000001b0  01 4d e2 0d 56 04 12 97  10 f7 01 4d e2 f6 10 e4  |.M..V......M....|
000001c0  01 4d 3d 01 01 0d 60 04  05 79 0d c6 07 04 0d d0  |.M=...`..y......|
000001d0  07 0e 7f a4 11 27 02 38  1c a8 01 39 0d da 07 18  |.....'.8...9....|
000001e0  a1 1c b4 01 3c 10 bf 01  3c 10 cb 01 3c 10 d7 01  |....<...<...<...|
000001f0  3c 10 3a 02 0d e4 07 0c  a9 10 10 02 4d 10 04 02  |<.:.........M...|
00000200  0d ee 07 1d 84 33 10 10  02 3c 1c b4 01 3c 10 bf  |.....3...<...<..|
00000210  01 3c 10 cb 01 3c 10 d7  01 3c 10 3a 02 0d f8 07  |.<...<...<.:....|
00000220  1f 95 1c a8 01 4c 1c b4  01 b3 10 cb 01 4d c9 10  |.....L.......M..|
00000230  10 02 4a 9b 10 d7 01 4d  c9 10 10 02 0d 02 08 0c  |..J....M........|
00000240  a9 10 10 02 4d 10 04 02  0d 0c 08 1d 85 33 10 10  |....M........3..|
00000250  02 3c 1c b4 01 3c 10 bf  01 3c 10 cb 01 3c 10 d7  |.<...<...<...<..|
00000260  01 3c 10 3a 02 0d 16 08  0d a9 10 10 02 4d c9 10  |.<.:.........M..|
00000270  10 02 0d 20 08 1d 85 33  10 10 02 3c 1c a8 01 3c  |... ...3...<...<|
00000280  10 04 02 3c 3d 01 01 3c  3d 01 01 3c 10 1b 02 0d  |...<=..<=..<....|
00000290  2a 08 05 79 0d ae 0b 04  0d b8 0b 0e 7f a4 11 47  |*..y...........G|
000002a0  02 38 1c a8 01 39 0d c2  0b 40 a1 1c b4 01 3c 10  |.8...9...@....<.|
000002b0  bf 01 3c 10 cb 01 3c 10  d7 01 3c 10 3a 02 3c 1c  |..<...<...<.:.<.|
000002c0  5d 02 3c 10 69 02 3c 10  76 02 3c 10 83 02 3c 10  |].<.i.<.v.<...<.|
000002d0  91 02 3c 1c 9e 02 3c 10  aa 02 3c 10 b7 02 3c 10  |..<...<...<...<.|
000002e0  c4 02 3c 10 d2 02 0d cc  0b 0d a4 11 92 01 38 1c  |..<...........8.|
000002f0  a8 01 39 0d d6 0b 0c a9  10 10 02 4d 10 04 02 0d  |..9........M....|
00000300  e0 0b 19 84 33 10 10 02  3c 1c b4 01 3c 10 bf 01  |....3...<...<...|
00000310  3c 10 cb 01 3c 10 d7 01  0d ea 0b 0d 95 10 d7 01  |<...<...........|
00000320  4d 3d 01 01 b3 0d f4 0b  0f a9 10 10 02 4d 10 bf  |M=...........M..|
00000330  01 3b 01 16 0d fe 0b 11  84 33 10 10 02 3c 10 76  |.;.......3...<.v|
00000340  02 3c 10 83 02 0d 08 0c  1d 95 10 76 02 4d 10 04  |.<.........v.M..|
00000350  02 b3 10 76 02 4d 10 cb  01 4a 9b 10 83 02 4d 10  |...v.M...J....M.|
00000360  cb 01 0d 12 0c 0f a9 10  10 02 4d 10 bf 01 3b 01  |..........M...;.|
00000370  16 0d 1c 0c 11 85 33 10  10 02 3c 10 76 02 3c 10  |......3...<.v.<.|
00000380  83 02 0d 26 0c 0d 95 10  cb 01 48 3d 01 01 b3 0d  |...&......H=....|
00000390  30 0c 0f a9 10 10 02 4d  10 cb 01 3b 01 11 0d 3a  |0......M...;...:|
000003a0  0c 0d 85 33 10 10 02 3c  10 bf 01 0d 44 0c 05 7b  |...3...<....D..{|
000003b0  0d 4e 0c 05 9b 0d 58 0c  0c a9 10 10 02 4d 10 d7  |.N....X......M..|
000003c0  01 0d 62 0c 1d 84 33 10  10 02 3c 1c 9e 02 3c 10  |..b...3...<...<.|
000003d0  aa 02 3c 10 b7 02 3c 10  c4 02 3c 10 d2 02 0d 6c  |..<...<...<....l|
000003e0  0c 0b 10 91 02 4d 10 d7  01 0d 76 0c 0c 96 10 b7  |.....M....v.....|
000003f0  02 48 3d 01 01 0d 80 0c  0c a9 10 10 02 4d 10 b7  |.H=..........M..|
00000400  02 0d 8a 0c 0b 10 91 02  4d 10 b7 02 0d 94 0c 1d  |........M.......|
00000410  84 33 10 10 02 3c 1c 9e  02 3c 10 aa 02 3c 10 b7  |.3...<...<...<..|
00000420  02 3c 10 c4 02 3c 10 d2  02 0d 9e 0c 05 7a 0d a8  |.<...<.......z..|
00000430  0c 0c a9 10 10 02 4d 10  04 02 0d b2 0c 1d 85 33  |......M........3|
00000440  10 10 02 3c 1c 9e 02 3c  10 bf 01 3c 10 cb 01 3c  |...<...<...<...<|
00000450  10 d7 01 3c 10 d2 02 0d  bc 0c 0f a9 10 10 02 4d  |...<...........M|
00000460  10 aa 02 3b 01 16 0d c6  0c 11 84 33 10 10 02 3c  |...;.......3...<|
00000470  10 76 02 3c 10 83 02 0d  d0 0c 1d 95 10 76 02 4d  |.v.<.........v.M|
00000480  10 91 02 b3 10 76 02 4d  10 c4 02 4a 9b 10 83 02  |.....v.M...J....|
00000490  4d 10 c4 02 0d da 0c 0f  a9 10 10 02 4d 10 aa 02  |M...........M...|
000004a0  3b 01 16 0d e4 0c 11 85  33 10 10 02 3c 10 76 02  |;.......3...<.v.|
000004b0  3c 10 83 02 0d ee 0c 0d  95 10 c4 02 48 3d 01 01  |<...........H=..|
000004c0  b3 0d f8 0c 0f a9 10 10  02 4d 10 c4 02 3b 01 11  |.........M...;..|
000004d0  0d 02 0d 0d 85 33 10 10  02 3c 10 aa 02 0d 0c 0d  |.....3...<......|
000004e0  05 7b 0d 16 0d 0b 10 04  02 4d 10 91 02 0d 20 0d  |.{.......M.... .|
000004f0  05 7b 0d 2a 0d 0d a4 11  df 02 38 10 04 02 39 0d  |.{.*......8...9.|
00000500  34 0d 05 79 0d 96 0f 04  0d a0 0f 0e 7f a4 11 df  |4..y............|
00000510  02 38 10 04 02 39 0d aa  0f 18 a1 1c b4 01 3c 10  |.8...9........<.|
00000520  bf 01 3c 10 cb 01 3c 10  d7 01 3c 10 1b 02 0d b4  |..<...<...<.....|
00000530  0f 0b a9 10 10 02 4d 01  00 0d be 0f 1d 84 33 10  |......M.......3.|
00000540  10 02 3c 1c b4 01 3c 10  bf 01 3c 10 cb 01 3c 10  |..<...<...<...<.|
00000550  d7 01 3c 10 1b 02 0d c8  0f 0b a9 10 10 02 4d 01  |..<...........M.|
00000560  00 0d d2 0f 1d 85 33 10  10 02 3c 1c b4 01 3c 10  |......3...<...<.|
00000570  bf 01 3c 10 cb 01 3c 10  d7 01 3c 10 04 02 0d dc  |..<...<...<.....|
00000580  0f 0c a9 10 10 02 4d 10  04 02 0d e6 0f 19 84 33  |......M........3|
00000590  10 10 02 3c 1c b4 01 3c  10 bf 01 3c 10 cb 01 3c  |...<...<...<...<|
000005a0  10 d7 01 0d f0 0f 0d 85  33 10 10 02 3c 10 1b 02  |........3...<...|
000005b0  0d fa 0f 05 79 0d 7e 13  04 0d 88 13 1f 70 20 44  |....y.~......p D|
000005c0  45 46 20 50 52 4f 43 54  52 45 45 4c 49 53 54 20  |EF PROCTREELIST |
000005d0  28 6e 6f 64 65 25 29 20  0d 92 13 14 a1 1c b4 01  |(node%) ........|
000005e0  3c 10 bf 01 3c 10 cb 01  3c 10 d7 01 0d 9c 13 0c  |<...<...<.......|
000005f0  a9 10 10 02 4d 10 04 02  0d a6 13 1d 84 33 10 10  |....M........3..|
00000600  02 3c 1c b4 01 3c 10 bf  01 3c 10 cb 01 3c 10 d7  |.<...<...<...<..|
00000610  01 3c 10 1b 02 0d b0 13  16 95 10 cb 01 48 3d 01  |.<...........H=.|
00000620  01 b3 a4 11 f4 02 38 10  cb 01 39 0d ba 13 08 85  |......8...9.....|
00000630  1c b4 01 0d c4 13 16 95  10 d7 01 48 3d 01 01 b3  |...........H=...|
00000640  a4 11 f4 02 38 10 d7 01  39 0d ce 13 05 79 0d 66  |....8...9....y.f|
00000650  17 04 0d 70 17 1f 70 20  44 45 46 20 50 52 4f 43  |...p..p DEF PROC|
00000660  54 52 45 45 4c 49 53 54  20 28 6e 6f 64 65 25 29  |TREELIST (node%)|
00000670  20 0d 7a 17 14 a1 1c b4  01 3c 10 bf 01 3c 10 cb  | .z......<...<..|
00000680  01 3c 10 d7 01 0d 84 17  0c a9 10 10 02 4d 10 04  |.<...........M..|
00000690  02 0d 8e 17 1d 84 33 10  10 02 3c 1c b4 01 3c 10  |......3...<...<.|
000006a0  bf 01 3c 10 cb 01 3c 10  d7 01 3c 10 1b 02 0d 98  |..<...<...<.....|
000006b0  17 1e 95 10 cb 01 48 3d  01 01 f4 1c b4 01 49 1c  |......H=......I.|
000006c0  b3 03 b3 a4 11 f4 02 38  10 cb 01 39 0d a2 17 0d  |.......8...9....|
000006d0  95 1c b4 01 4c 1c c0 03  b3 0d ac 17 11 95 1c b4  |....L...........|
000006e0  01 49 1c b3 03 b3 85 1c  b4 01 0d b6 17 16 95 10  |.I..............|
000006f0  d7 01 48 3d 01 01 b3 a4  11 f4 02 38 10 d7 01 39  |..H=.......8...9|
00000700  0d c0 17 05 7b 0d ca 17  05 79 0d 4e 1b 04 0d 58  |....{....y.N...X|
00000710  1b 0e 7f a4 11 f4 02 38  10 04 02 39 0d 62 1b 18  |.......8...9.b..|
00000720  a1 1c b4 01 3c 10 bf 01  3c 10 cb 01 3c 10 d7 01  |....<...<...<...|
00000730  3c 10 cb 03 0d 6c 1b 0d  a4 11 92 01 38 1c b3 03  |<....l......8...|
00000740  39 0d 76 1b 05 7c 0d 80  1b 19 95 1c b4 01 49 1c  |9.v..|........I.|
00000750  b3 03 f4 1c b4 01 4c 1c  c0 03 b3 85 1c b4 01 0d  |......L.........|
00000760  8a 1b 0b 10 cb 03 4d 10  04 02 0d 94 1b 08 a4 11  |......M.........|
00000770  08 03 0d 9e 1b 1a 97 1c  b4 01 49 1c c0 03 f6 10  |..........I.....|
00000780  cb 03 4d 10 04 02 f6 10  f7 01 4d ca 0d a8 1b 05  |..M.......M.....|
00000790  79 0d 36 1f 04 0d 40 1f  09 7f a4 11 08 03 0d 4a  |y.6...@........J|
000007a0  1f 09 10 f7 01 4d ca 0d  54 1f 0c a9 10 10 02 4d  |.....M..T......M|
000007b0  10 04 02 0d 5e 1f 1d 84  33 10 10 02 3c 1c b4 01  |....^...3...<...|
000007c0  3c 10 bf 01 3c 10 cb 01  3c 10 d7 01 3c 10 1b 02  |<...<...<...<...|
000007d0  0d 68 1f 0d 95 10 d7 01  48 3d 01 01 b3 0d 72 1f  |.h......H=....r.|
000007e0  0b 10 1c 03 4d 10 d7 01  0d 7c 1f 09 10 f7 01 4d  |....M....|.....M|
000007f0  e2 0d 86 1f 05 7c 0d 90  1f 0c a9 10 10 02 4d 10  |.....|........M.|
00000800  1c 03 0d 9a 1f 0b 10 04  02 4d 10 1c 03 0d a4 1f  |.........M......|
00000810  1d 84 33 10 10 02 3c 1c  b4 01 3c 10 bf 01 3c 10  |..3...<...<...<.|
00000820  cb 01 3c 10 d7 01 3c 10  1b 02 0d ae 1f 0b 10 1c  |..<...<.........|
00000830  03 4d 10 cb 01 0d b8 1f  0c 97 10 cb 01 4d 3d 01  |.M...........M=.|
00000840  01 0d c2 1f 05 9b 0d cc  1f 0c 95 10 bf 01 4e 01  |..............N.|
00000850  00 b3 0d d6 1f 0b 10 1c  03 4d 10 bf 01 0d e0 1f  |.........M......|
00000860  05 7c 0d ea 1f 0c a9 10  10 02 4d 10 1c 03 0d f4  |.|........M.....|
00000870  1f 0b 10 91 02 4d 10 04  02 0d fe 1f 0b 10 04 02  |.....M..........|
00000880  4d 10 1c 03 0d 08 20 1d  84 33 10 10 02 3c 1c b4  |M..... ..3...<..|
00000890  01 3c 10 bf 01 3c 10 cb  01 3c 10 d7 01 3c 10 1b  |.<...<...<...<..|
000008a0  02 0d 12 20 0b 10 1c 03  4d 10 bf 01 0d 1c 20 13  |... ....M..... .|
000008b0  97 10 1c 03 4c 01 01 f6  10 91 02 4d 10 cb 01 0d  |....L......M....|
000008c0  26 20 12 95 10 91 02 4d  10 cb 01 b3 10 f7 01 4d  |& .....M.......M|
000008d0  e2 0d 30 20 05 7b 0d 3a  20 05 7b 0d 44 20 05 79  |..0 .{.: .{.D .y|
000008e0  0d 1e 23 04 0d 28 23 09  7f a4 11 28 03 0d 32 23  |..#..(#....(..2#|
000008f0  28 a1 1c b4 01 3c 10 bf  01 3c 10 cb 01 3c 10 d7  |(....<...<...<..|
00000900  01 3c 10 1b 02 3c 10 3f  03 3c 10 49 03 3c 10 56  |.<...<.?.<.I.<.V|
00000910  03 3c 10 64 03 0d 3c 23  16 10 64 03 4d d5 0c 0b  |.<.d..<#..d.M...|
00000920  4e 45 57 54 52 45 45 2e  49 4e 58 0d 46 23 08 82  |NEWTREE.INX.F#..|
00000930  10 64 03 0d 50 23 16 10  64 03 4d d6 0c 0b 4e 45  |.d..P#..d.M...NE|
00000940  57 54 52 45 45 2e 49 4e  58 0d 5a 23 1f 85 33 10  |WTREE.INX.Z#..3.|
00000950  64 03 3c ee 38 01 0f 39  3c 3d 01 01 3c 3d 01 01  |d.<.8..9<=..<=..|
00000960  3c 3d 01 01 3c 3d 01 01  0d 64 23 0b a9 10 10 02  |<=..<=...d#.....|
00000970  4d 01 00 0d 6e 23 19 84  33 10 10 02 3c 1c b4 01  |M...n#..3...<...|
00000980  3c 10 bf 01 3c 10 cb 01  3c 10 d7 01 0d 78 23 15  |<...<...<....x#.|
00000990  10 56 03 4d 38 c9 10 10  02 f3 10 6f 03 39 3d 01  |.V.M8......o.9=.|
000009a0  01 0d 82 23 31 a9 10 10  02 4d 01 20 4a 70 20 70  |...#1....M. Jp p|
000009b0  6f 69 6e 74 20 74 6f 20  6c 69 6e 6b 65 64 20 6c  |oint to linked l|
000009c0  69 73 74 20 6f 66 20 77  61 73 74 65 20 6e 6f 64  |ist of waste nod|
000009d0  65 73 0d 8c 23 0d 84 33  10 10 02 3c 10 1b 02 0d  |es..#..3...<....|
000009e0  96 23 0b 96 10 1b 02 4e  01 00 0d a0 23 0f a9 10  |.#.....N....#...|
000009f0  10 02 4d 10 1b 02 3b 01  20 0d aa 23 25 10 56 03  |..M...;. ..#%.V.|
00000a00  4d 10 56 03 3d 01 01 4a  70 20 64 69 73 63 6f 75  |M.V.=..Jp discou|
00000a10  6e 74 20 77 61 73 74 65  20 6e 6f 64 65 73 0d b4  |nt waste nodes..|
00000a20  23 0d 84 33 10 10 02 3c  10 1b 02 0d be 23 05 7a  |#..3...<.....#.z|
00000a30  0d c8 23 0a 10 04 02 4d  01 00 0d d2 23 0a 10 7b  |..#....M....#..{|
00000a40  03 4d 01 00 0d dc 23 05  7c 0d e6 23 0d a9 10 64  |.M....#.|..#...d|
00000a50  03 4d c9 10 64 03 0d f0  23 0a 10 3f 03 4d 01 01  |.M..d...#..?.M..|
00000a60  0d fa 23 0c 96 10 3f 03  47 10 56 03 0d 04 24 0f  |..#...?.G.V...$.|
00000a70  10 3f 03 4d 10 3f 03 3b  10 3f 03 0d 0e 24 05 7a  |.?.M.?.;.?...$.z|
00000a80  0d 18 24 0e 10 3f 03 4d  10 3f 03 f3 01 02 0d 22  |..$..?.M.?....."|
00000a90  24 0f 10 56 03 4d 10 56  03 3d 10 3f 03 0d 2c 24  |$..V.M.V.=.?..,$|
00000aa0  0f 94 10 75 00 4d 01 01  e1 10 3f 03 0d 36 24 0b  |...u.M....?..6$.|
00000ab0  10 49 03 4d 3d 01 01 0d  40 24 0a 10 88 03 4d 01  |.I.M=...@$....M.|
00000ac0  01 0d 4a 24 08 a4 11 08  03 0d 54 24 05 7c 0d 5e  |..J$......T$.|.^|
00000ad0  24 0f 10 88 03 4d 10 88  03 3b 10 88 03 0d 68 24  |$....M...;....h$|
00000ae0  0e 10 49 03 4d 10 49 03  3b 01 01 0d 72 24 0e 97  |..I.M.I.;...r$..|
00000af0  38 10 75 00 f2 10 88 03  39 0d 7c 24 0e 10 88 03  |8.u.....9.|$....|
00000b00  4d 10 88 03 f3 01 02 0d  86 24 0f 10 96 03 4d 10  |M........$....M.|
00000b10  75 00 f3 10 88 03 0d 90  24 0e 10 9f 03 4d 10 88  |u.......$....M..|
00000b20  03 f3 01 02 0d 9a 24 09  95 10 9f 03 b3 0d a4 24  |......$........$|
00000b30  19 10 cb 01 4d 38 10 75  00 3d 10 9f 03 39 3a 10  |....M8.u.=...9:.|
00000b40  6f 03 3b 10 7b 03 0d ae  24 19 10 d7 01 4d 38 10  |o.;.{...$....M8.|
00000b50  75 00 3b 10 9f 03 39 3a  10 6f 03 3b 10 7b 03 0d  |u.;...9:.o.;.{..|
00000b60  b8 24 05 9b 0d c2 24 0b  10 cb 01 4d 3d 01 01 0d  |.$....$....M=...|
00000b70  cc 24 0b 10 d7 01 4d 3d  01 01 0d d6 24 05 7b 0d  |.$....M=....$.{.|
00000b80  e0 24 0e 10 96 03 4d 10  96 03 3b 01 01 0d ea 24  |.$....M...;....$|
00000b90  2a 10 bf 01 4d 10 88 03  3a 38 10 96 03 3b 01 02  |*...M...:8...;..|
00000ba0  3a 38 38 10 96 03 f2 01  04 39 4d 01 00 39 39 3a  |:88......9M..99:|
00000bb0  10 6f 03 3b 10 7b 03 0d  f4 24 0c 10 a8 03 4d a9  |.o.;.{...$....M.|
00000bc0  10 64 03 0d fe 24 1d 85  33 10 64 03 3c 1c b4 01  |.d...$..3.d.<...|
00000bd0  3c 10 bf 01 3c 10 cb 01  3c 10 d7 01 3c 10 1b 02  |<...<...<...<...|
00000be0  0d 08 25 05 a5 0d 12 25  0f a9 10 64 03 4d 10 a8  |..%....%...d.M..|
00000bf0  03 3b 01 11 0d 1c 25 29  85 33 10 64 03 3c 10 7b  |.;....%).3.d.<.{|
00000c00  03 4a 70 20 62 61 63 6b  20 70 6f 69 6e 74 65 72  |.Jp back pointer|
00000c10  20 74 6f 20 6c 61 73 74  20 70 61 72 74 0d 26 25  | to last part.&%|
00000c20  0f a9 10 64 03 4d 10 a8  03 3b 01 1b 0d 30 25 29  |...d.M...;...0%)|
00000c30  85 33 10 64 03 3c 3d 01  01 4a 70 20 63 6f 72 72  |.3.d.<=..Jp corr|
00000c40  65 63 74 20 74 68 65 20  72 69 67 68 74 20 70 6f  |ect the right po|
00000c50  69 6e 74 65 72 0d 3a 25  0f a9 10 64 03 4d 10 7b  |inter.:%...d.M.{|
00000c60  03 3b 01 1b 0d 44 25 29  85 33 10 64 03 3c 10 a8  |.;...D%).3.d.<..|
00000c70  03 4a 70 20 6c 69 6e 6b  20 74 68 69 73 20 73 75  |.Jp link this su|
00000c80  62 74 72 65 65 20 74 6f  20 6c 61 73 74 0d 4e 25  |btree to last.N%|
00000c90  0b 10 7b 03 4d 10 a8 03  0d 58 25 0b 97 10 56 03  |..{.M....X%...V.|
00000ca0  4d 01 00 0d 62 25 08 82  10 64 03 0d 6c 25 08 82  |M...b%...d..l%..|
00000cb0  10 10 02 0d 76 25 11 6f  44 45 4c 20 54 52 45 45  |....v%.oDEL TREE|
00000cc0  2e 49 4e 58 0d 80 25 1d  6f 52 45 4e 20 4e 45 57  |.INX..%.oREN NEW|
00000cd0  54 52 45 45 2e 49 4e 58  20 54 52 45 45 2e 49 4e  |TREE.INX TREE.IN|
00000ce0  58 0d 8a 25 13 10 10 02  4d d6 0c 08 54 52 45 45  |X..%....M...TREE|
00000cf0  2e 49 4e 58 0d 94 25 05  79 0d 06 27 04 0d 10 27  |.INX..%.y..'...'|
00000d00  09 7f a4 11 2a 01 0d 1a  27 7f 85 b2 01 1e 3c 01  |....*...'.....<.|
00000d10  05 39 0c 0f 31 2e 20 41  64 64 20 61 6e 20 69 74  |.9..1. Add an it|
00000d20  65 6d 2e b2 01 1e 3c 01  06 39 0c 12 32 2e 20 44  |em....<..9..2. D|
00000d30  65 6c 65 74 65 20 61 6e  20 69 74 65 6d 2e b2 01  |elete an item...|
00000d40  1e 3c 01 07 39 0c 11 33  2e 20 4c 69 73 74 20 74  |.<..9..3. List t|
00000d50  68 65 20 74 72 65 65 2e  b2 01 1e 3c 01 08 39 0c  |he tree....<..9.|
00000d60  14 34 2e 20 42 61 6c 61  6e 63 65 20 74 68 65 20  |.4. Balance the |
00000d70  74 72 65 65 2e b2 01 1e  3c 01 09 39 0c 07 39 2e  |tree....<..9..9.|
00000d80  20 45 6e 64 2e 0d 24 27  1c 85 b2 01 1e 3c 01 0b  | End..$'.....<..|
00000d90  39 0c 0d 59 6f 75 72 20  43 68 6f 69 63 65 3f 20  |9..Your Choice? |
00000da0  4b 0d 2e 27 05 7c 0d 38  27 0c 10 3a 01 4d cb 3d  |K..'.|.8'..:.M.=|
00000db0  01 30 0d 42 27 1b 97 38  10 3a 01 4e 01 00 f4 10  |.0.B'..8.:.N....|
00000dc0  3a 01 4c 01 05 39 f6 10  3a 01 4d 01 09 0d 4c 27  |:.L..9..:.M...L'|
00000dd0  09 85 4b 10 3a 01 0d 56  27 05 79 0d ee 2a 04 0d  |..K.:..V'.y..*..|
00000de0  f8 2a 09 7f a4 11 17 01  0d 02 2b 05 73 0d 0c 2b  |.*........+.s..+|
00000df0  2b 1c 89 01 4d 0c 21 42  69 6e 61 72 79 20 54 72  |+...M.!Binary Tr|
00000e00  65 65 20 44 65 6d 6f 6e  73 74 72 61 74 69 6f 6e  |ee Demonstration|
00000e10  20 50 72 6f 67 72 61 6d  0d 16 2b 19 85 b2 01 28  | Program..+....(|
00000e20  3d cf 38 1c 89 01 39 f3  01 02 3c 01 01 39 1c 89  |=.8...9...<..9..|
00000e30  01 0d 20 2b 13 10 10 02  4d d6 0c 08 54 52 45 45  |.. +....M...TREE|
00000e40  2e 49 4e 58 0d 2a 2b 0c  95 10 10 02 4d 01 00 b3  |.INX.*+.....M...|
00000e50  0d 34 2b 49 10 10 02 4d  d5 0c 08 54 52 45 45 2e  |.4+I...M...TREE.|
00000e60  49 4e 58 4a 95 10 10 02  4d 01 00 b3 85 0c 28 43  |INXJ....M.....(C|
00000e70  61 6e 27 74 20 6f 70 65  6e 20 69 6e 64 65 78 20  |an't open index |
00000e80  66 69 6c 65 2e 20 2d 20  43 61 6e 27 74 20 63 6f  |file. - Can't co|
00000e90  6e 74 69 6e 75 65 2e 4a  77 0d 3e 2b 10 1c b4 01  |ntinue.Jw.>+....|
00000ea0  4d f0 01 0f 3c 0c 01 20  39 0d 48 2b 0b 10 bf 01  |M...<.. 9.H+....|
00000eb0  4d 3d 01 01 0d 52 2b 0b  10 cb 01 4d 3d 01 01 0d  |M=...R+....M=...|
00000ec0  5c 2b 0b 10 d7 01 4d 3d  01 01 0d 66 2b 0b 10 1b  |\+....M=...f+...|
00000ed0  02 4d 3d 01 01 0d 70 2b  1d 85 33 10 10 02 3c 1c  |.M=...p+..3...<.|
00000ee0  b4 01 3c 10 bf 01 3c 10  cb 01 3c 10 d7 01 3c 10  |..<...<...<...<.|
00000ef0  1b 02 0d 7a 2b 08 82 10  10 02 0d 84 2b 13 10 10  |...z+.......+...|
00000f00  02 4d d6 0c 08 54 52 45  45 2e 49 4e 58 0d 8e 2b  |.M...TREE.INX..+|
00000f10  05 7b 0d 98 2b 0a 10 6f  03 4d 01 25 0d a2 2b 05  |.{..+..o.M.%..+.|
00000f20  79 0d d6 2e 04 0d e0 2e  09 7f a4 11 48 01 0d ea  |y...........H...|
00000f30  2e 05 73 0d f4 2e 05 7c  0d fe 2e 23 84 b2 01 00  |..s....|...#....|
00000f40  3c 01 02 39 0c 12 45 6e  74 65 72 20 69 74 65 6d  |<..9..Enter item|
00000f50  20 74 6f 20 61 64 64 20  1c 89 01 0d 08 2f 16 1c  | to add ...../..|
00000f60  89 01 4d eb 1c 89 01 3b  ee 38 01 0f 39 3c 01 0f  |..M....;.8..9<..|
00000f70  39 0d 12 2f 0a 10 1b 02  4d 01 00 0d 1c 2f 0d a4  |9../....M..../..|
00000f80  11 92 01 38 1c 89 01 39  0d 26 2f 49 95 10 f7 01  |...8...9.&/I....|
00000f90  b3 85 0c 05 49 74 65 6d  20 1c 89 01 0c 2b 20 69  |....Item ....+ i|
00000fa0  73 20 61 6c 72 65 61 64  79 20 69 6e 20 74 68 65  |s already in the|
00000fb0  20 64 61 74 61 62 61 73  65 20 2d 20 50 72 65 73  | database - Pres|
00000fc0  73 20 72 65 74 75 72 6e  20 4b 4a 7c 97 cb 4d 01  |s return KJ|..M.|
00000fd0  0d 0d 30 2f 09 97 d3 10  f7 01 0d 3a 2f 0d a4 11  |..0/.......:/...|
00000fe0  27 02 38 1c 89 01 39 0d  44 2f 05 79 0d be 32 04  |'.8...9.D/.y..2.|
00000ff0  0d c8 32 09 7f a4 11 57  01 0d d2 32 05 73 0d dc  |..2....W...2.s..|
00001000  32 05 7c 0d e6 32 26 84  b2 01 00 3c 01 02 39 0c  |2.|..2&....<..9.|
00001010  15 45 6e 74 65 72 20 69  74 65 6d 20 74 6f 20 64  |.Enter item to d|
00001020  65 6c 65 74 65 20 1c 89  01 0d f0 32 16 1c 89 01  |elete .....2....|
00001030  4d eb 1c 89 01 3b ee 38  01 0f 39 3c 01 0f 39 0d  |M....;.8..9<..9.|
00001040  fa 32 0d a4 11 92 01 38  1c 89 01 39 0d 04 33 46  |.2.....8...9..3F|
00001050  95 d3 10 f7 01 b3 85 0c  05 49 74 65 6d 20 1c 89  |.........Item ..|
00001060  01 0c 27 20 69 73 20 6e  6f 74 20 69 6e 20 74 68  |..' is not in th|
00001070  65 20 64 61 74 61 62 61  73 65 20 2d 20 50 72 65  |e database - Pre|
00001080  73 73 20 72 65 74 75 72  6e 20 4b 4a 7c 97 cb 4d  |ss return KJ|..M|
00001090  01 0d 0d 0e 33 08 97 10  f7 01 0d 18 33 0d a4 11  |....3.......3...|
000010a0  47 02 38 1c 89 01 39 0d  22 33 05 79 0d a6 36 04  |G.8...9."3.y..6.|
000010b0  0d b0 36 09 7f a4 11 66  01 0d ba 36 2d 84 0c 0f  |..6....f...6-...|
000010c0  53 74 61 72 74 20 61 74  20 69 74 65 6d 3f 20 1c  |Start at item? .|
000010d0  b3 03 4a 84 0c 0d 53 74  6f 70 20 62 65 66 6f 72  |..J...Stop befor|
000010e0  65 3f 20 1c c0 03 0d c4  36 15 95 1c c0 03 4d 0c  |e? .....6.....M.|
000010f0  00 b3 1c c0 03 4d 0c 03  7e 7e 7e 0d ce 36 0c a4  |.....M..~~~..6..|
00001100  11 f4 02 38 01 00 39 0d  d8 36 05 79 0d 8e 3a 04  |...8..9..6.y..:.|
00001110  0d 98 3a 09 7f a4 11 76  01 0d a2 3a 12 85 0c 0b  |..:....v...:....|
00001120  50 6c 65 61 73 65 20 57  61 69 74 0d ac 3a 08 a4  |Please Wait..:..|
00001130  11 28 03 0d b6 3a 05 79  0d c0 3a 04 0d ff ff 13  |.(...:.y..:.....|
00001140  09 a4 53 54 41 52 54 55  50 97 bc 0d 00 00 00 00  |..STARTUP.......|
00001150  00 00 10 06 a4 4d 45 4e  55 97 da 0c 00 00 00 00  |.....MENU.......|
00001160  00 00 0e 08 63 68 6f 69  63 65 25 54 09 00 00 00  |....choice%T....|
00001170  0f 05 a4 41 44 44 96 00  0f 00 00 00 00 00 00 0f  |...ADD..........|
00001180  05 a4 44 45 4c 16 00 00  00 00 00 00 00 00 10 06  |..DEL...........|
00001190  a4 4c 49 53 54 96 89 10  00 00 00 00 00 00 13 09  |.LIST...........|
000011a0  a4 42 41 4c 41 4e 43 45  96 00 10 00 00 00 00 00  |.BALANCE........|
000011b0  00 09 03 61 24 5c 23 01  03 00 16 0c a4 54 52 45  |...a$\#......TRE|
000011c0  45 53 45 41 52 43 48 97  e4 00 00 00 00 00 00 00  |ESEARCH.........|
000011d0  0c 06 69 74 65 6d 24 1c  00 00 00 00 0b 05 6b 65  |..item$.......ke|
000011e0  79 24 1c 00 0f 37 00 0c  06 62 61 63 6b 25 14 00  |y$...7...back%..|
000011f0  00 00 00 0c 06 6c 65 66  74 25 14 00 00 00 00 0d  |.....left%......|
00001200  07 72 69 67 68 74 25 14  00 00 00 00 13 0d 6e 6f  |.right%.......no|
00001210  64 65 70 6f 69 6e 74 65  72 25 14 00 00 00 00 0d  |depointer%......|
00001220  07 66 6f 75 6e 64 25 54  00 00 00 00 0c 06 6e 6f  |.found%T......no|
00001230  64 65 25 14 00 00 00 00  0b 05 69 6e 78 25 54 05  |de%.......inx%T.|
00001240  00 00 00 0c 06 64 61 74  61 25 54 25 00 00 00 13  |.....data%T%....|
00001250  09 a4 54 52 45 45 41 44  44 97 00 01 00 00 00 00  |..TREEADD.......|
00001260  00 00 0d 07 64 75 6d 6d  79 25 14 00 00 00 00 16  |....dummy%......|
00001270  0c a4 54 52 45 45 44 45  4c 45 54 45 17 00 00 00  |..TREEDELETE....|
00001280  00 00 00 00 00 0c 06 70  6b 65 79 24 1c 00 00 00  |.......pkey$....|
00001290  00 0d 07 70 62 61 63 6b  25 14 00 00 00 00 0d 07  |...pback%.......|
000012a0  70 6c 65 66 74 25 14 00  00 00 00 0e 08 70 72 69  |pleft%.......pri|
000012b0  67 68 74 25 14 00 00 00  00 0d 07 63 6e 6f 64 65  |ght%.......cnode|
000012c0  25 54 4a 00 00 00 0c 06  63 6b 65 79 24 1c 00 00  |%TJ.....ckey$...|
000012d0  00 00 0d 07 63 62 61 63  6b 25 14 00 00 00 00 0d  |....cback%......|
000012e0  07 63 6c 65 66 74 25 14  00 00 00 00 0e 08 63 72  |.cleft%.......cr|
000012f0  69 67 68 74 25 14 00 00  00 00 0d 07 63 64 61 74  |ight%.......cdat|
00001300  61 25 14 00 00 00 00 15  0b a4 57 41 53 54 45 4c  |a%........WASTEL|
00001310  49 4e 4b 17 00 00 00 00  00 00 00 00 14 0a a4 54  |INK............T|
00001320  52 45 45 4c 49 53 54 97  e7 06 00 00 00 00 00 00  |REELIST.........|
00001330  14 0a a4 54 52 45 45 4e  45 58 54 97 72 07 00 00  |...TREENEXT.r...|
00001340  00 00 00 00 0c 06 6c 61  73 74 25 54 00 00 00 00  |......last%T....|
00001350  17 0d a4 54 52 45 45 42  41 4c 41 4e 43 45 97 00  |...TREEBALANCE..|
00001360  08 00 00 00 00 00 00 0a  04 70 32 25 14 00 00 00  |.........p2%....|
00001370  00 0d 07 6c 65 76 65 6c  25 14 00 00 00 00 0e 08  |...level%.......|
00001380  6e 75 6d 62 65 72 25 14  00 00 00 00 0b 05 6e 65  |number%.......ne|
00001390  77 25 14 00 00 00 00 0c  06 73 69 7a 65 25 54 25  |w%.......size%T%|
000013a0  00 00 00 0d 07 73 74 61  72 74 25 14 00 00 00 00  |.....start%.....|
000013b0  0e 08 70 61 72 65 6e 74  25 14 00 00 00 00 09 03  |..parent%.......|
000013c0  79 25 14 00 00 00 00 09  03 62 25 14 00 00 00 00  |y%.......b%.....|
000013d0  0b 05 6d 61 78 25 14 00  00 00 00 0d 07 73 74 61  |..max%.......sta|
000013e0  72 74 24 5c 00 00 3a 00  0b 05 66 69 6e 24 5c 05  |rt$\..:...fin$\.|
000013f0  03 26 00 0d 07 6c 6e 6f  64 65 25 14 00 00 00 00  |.&...lnode%.....|
00001400  00                                                |.|
00001401
14-07-89/Btree\BBS.m0
14-07-89/Btree\BBS.m1
14-07-89/Btree\BBS.m2
14-07-89/Btree\BBS.m4
14-07-89/Btree\BBS.m5