IMD 1.18: 22/01/1996 7:54:54
micro cornucopia kaypro user group
disk 38
pascal runoff winners 1st-3rd
38-DISK DOC CRC COM CRCKLISTCRC
PLANSTRUDOC (
PLANTER COM PLANTER COM PLANTER DOC !"#$ PLANTER PQS E%&'()*+,- PLANTER1IQC 4./01234 PROBE COM 56789:;<=>?@ABCD PROBE COM VEFGHIJKLMNO PROBE DQC PQRSTUVWXYZ[\]^_ PROBE DQC 6`abcdef PROBE PQS g PROBE1 PQS chijklmnopqrst PROBE2 DQC -uvwxyz
KAYPRO DISK K-38
PASCAL RUNOFF WINNERS
FIRST - THIRD
Christmas came early this year at Micro C when we got to judge the 103 entries
in our Pascal Runoff. Everyone had a GREAT time. The first three finishers
are excellent examples of what can be accomplished in Pascal.
Many thanks to the folks at Borland International who took time over Thanks-
giving to help us with the judging. They had as muc PROBE2 PQS 3{|}~ PROBE3 PQS c README TXT RESCUE DOC ? RESCUE PQS C RESCUE60COM o RESCUE63COM o USQ COM h fun as we did.
Most of the source and .DOC files on this disk have been squeezed but all
files necessary to run the programs are in executable form. Any file with
a 'Q' as the second letter of the extension should be unsqueezed as in the
following example:
USQ PROBE.DQC d:
The unsqueezed file will be redirected to drive d:. If d: is not specified,
USQ will write to the current drive. Since the unsqueezed files take up so
much room you'll want to unsqueeze t
hem to another disk, especially if all
you have are single sided drives.
______________________________________________________________________________
PROBE - Rick Ryall's effort was the unanimous winner. His disk editor will
view and edit sectors, find bad sectors, copy blocks to a new location, search
for text strings, and feed the dog. ( Not really, but it does a lot! )
I've used it on hard disks and ram disks as well as standard Kaypros. For
those of you with 83 Kaypros ( non-graphth file - ! ~T #M M 2 2 2 2 ! > 2 3o: : @ ***No CRC Files found***$ >
ʉ
ʉw#: <2 P6: .6 @ Can not parse string
! ~ʽT #ñM ! > 6 #6^#6 ! ~T #! 4M #x]
# e
w~ T #>2 @ - s M@ File not found
! 4 >2 o: G: : G: @ *Match*
2 ! 4@ <-- is, was --> : ) > T : ) M 2 ! 4< 2 ~# @ Not a space between CRC values < 2 G-CATALOG???e addition of the 63K vesion.
PLANTER - Third place goes to Dennis Sprague. After the user describes the
dimensions and number of sides of a wooden planter box, PLANTER draws ( on 84
Kaypros ) the required pieces and gives all dimensions necessary to build the
box. The 3-D graphics procedures are especially nice. PLANTER can also be
run on 83 Kaypros but no graphics will be displayed.
RROR++
<* |): o% |g}o" 2
; 0T ~T #~A >
T >
_h : F{͇ 2h 2| : ʲ !\
:\ 2 ! \
\ ! \
\ ! \
\ <7=Ɓo&
]
2h 2| 2
~$#~# x
: F}
*}=
">͇1
] .#͡tK* =: =͔="
ʳ
ª~#.
¿~ #~ .+~#0:0~#!A.O.Gy~#0M0
K
MMɷ:m 2 FSÄ CRCKLIST$$$ tK, **}|! "*{z*~ ] *"Ü
DISK FULL: CRCFILE$ ! "*~#CRC.COM 5.0 6/18/82 CRCKFILE??? ! 9" 1 M @ CRC Ver 5.0
CTL-S pauses, CTL-C aborts
:] O@ ++Searching for CRCKLIST file++ @ Now searching for "CRCKFILE" file++
!
1 .)
F! ͡ ] ! ͔0 CRCKLIST??? CRCKFILE??? ! 9" M à*,*.}|ډ! ".*,{z{** u *.".G*.", ! ".***,}>*.#".ɯ22)! ",". <
NO FILECRC FILE$!
>.
@ Checking wi match - : ̓ : J M @ Quantity of lines failed parse test - : ̓ : ~ M @ Quantity of file(s) not found - : ̓ * d͔
͔ 0T Җ Wyʩ 0T 0zti il 63K systems
and one for 60K. It would be best to recompile on your system. But, if you
don't have Turbo Pascal and are using RESCUE to recover other text such as
Wordstar files, then you should use the appropriate compiled version. The
reason for all this is that we normally distribute Turbo .COM files compiled
on 60K systems so any size system may run them. RESCUE, however, will write
it's variables over part of a long Turbo source file if it is being run on a
larger system than 60K. Hence th*#"ɯ2i2}! "! "] ] 2 s : ~#
++FILE NOT FOUND++$: F*}">͇] <
CANNOT CLOSE CRCFILE$ CRCKLISTCRC SK FULL: CRCFILE$
w#
!]͐
DONE$!e
S!] Q
!e Z
@
--> FILE: XXXXXXXX.XXX CRC = oS)
\ <@ ++OPEN FAILED++ ! " ! " * | ʹ )
\ ! ~2 #" Ý: ) > T : ) @ ++FILE READ E
--> FILE: PROBE .DQC CRC = B0 EA
--> FILE: PROBE .PQS CRC = 9A 06
--> FILE: PROBE1 .PQS CRC = 7D 0B
--> FILE: PROBE2 .DQC CRC = 38 E3
--> FILE: PROBE2 .PQS CRC = 33 36
--> FILE: PROBE3 .PQS CRC = 20 E9
--> FILE: PROBE .COM CRC = 3A FF
--> FILE: PLANTER .COM CRC = 4F ED
--> FILE: PLANTER .PQS CRC = 2B 06
--> FILE: PLANTER1.IQC CRC = 80 9A
--> FILE: PLANSTRU.DOC CRC = E3 48
--> FILE: PLANTER .DOC CRC = 29 F0
--> FILE: RESCUE60.COM CRC = F2 38
--> FILE: RESCU- draw3DLine @ 297
392 - draw3DLine
@ 297
398 - draw3DLine
@ 297
401 procedure threeViews
443 * setUpSide
@ 222
457 * drawSide
@ 292
466 procedure calculateOneSide
468 procedure setUpBoard
470 procedure setUpImage
472 procedure setUpCenterLineOfPlanter
494 *** setUpSide
@ 222
495 --- setUpCenterLineOfPlanter
@ 472
498 procedure moveCornerOneToOrigin
502 acceptOtherDimensions
@ 129
178 - setLargestDimension
@ 142
193 function rotateX
202 function rotateY
211 procedure pointOnCircle
222 procedure setUpSide
226 procedure setUpTopPoints
243 ** pointOnCircle
@ 211
249 ** pointOnCircle
@ 211
254 procedure setUpBottomPoints
271 ** pointOnCircle
@ 211
277 ** pointOnCircle
@ 211
288 - setUpTopPoints
@ 226
289 - setUpBottomPoints
@ 254
292on topWidth
654 --* distanceBetweenPoints @ 627
657 function bottomWidth
663 --* distanceBetweenPoints @ 627
666 function centerLineLength
675 --* midPoint @ 637
676 --* midPoint
@ 637
678 --* distanceBetweenPoints @ 627
681 function centerLineToEdgeAngle
687 --* topWidth @ 648
687 --* bottomWidth @ 657
688 --* centerLineLenE63.COM CRC = CD 6C
--> FILE: RESCUE .DOC CRC = E6 F6
--> FILE: RESCUE .PQS CRC = 87 19
--> FILE: USQ .COM CRC = DB D3
--> FILE: CRC .COM CRC = B2 07
--> FILE: 38-DISK .DOC CRC = 75 DC procedure translate
522 --- translate @ 502
523 --- translate
@ 502
524 --- translate
@ 502
525 --- translate
@ 502
528 procedure tiltBoard
533 procedure rotateXZ
538 **** rotateX @ 193
539 **** rotateY @ 202
544 **** rotateX @ 193
545 **** rotateY @ 202
576 --- rotateXZ @ 533
577 procedure drawSide
297 procedure draw3DLine
299 procedure combineYZ
312 *** rotateY @ 202
313 *** rotateY @ 202
317 procedure lineToScreen
321 procedure screenScale
336 procedure drawKayproLine
361 --- screenScale @ 321
362 --- drawKayproLine
@ 336
366 -- combineYZ
@ 299
367 -- lineToScreen
@ 317
380 - draw3DLine
@ 297
386 gth @ 666
691 function edgeAngle
706 --* midPoint @ 637
710 function angleOfSideToVertical
739 --* midPoint
@ 637
740 --* midPoint
@ 637
741 --* distanceBetweenPoints @ 627
742 --* distanceBetweenPoints @ 627
749 procedure drawFlatView
751 procedure setPoint
789 --- setPoint @ 751
790 --- setPoint
@ 751
791 structure chart of program planter; { 1985 djs }
56 procedure intro
74 procedure acceptDimensions
78 function sourceInteger
99 function sourceReal
121 procedure acceptNumberOfSides
126 -* sourceInteger @ 78
129 procedure acceptOtherDimensions
136 -* sourceReal @ 99
137 -* sourceReal @ 99
138 -* sourceReal @ 99
142 procedure setLargestDimension
163 - acceptNumberOfSides @ 121
171 - --- rotateXZ
@ 533
578 --- rotateXZ
@ 533
582 procedure drawIt
600 *** drawSide
@ 292
611 -- setUpImage
@ 470
613 -- drawIt
@ 582
615 -- moveCornerOneToOrigin
@ 498
617 -- drawIt
@ 582
619 -- tiltBoard
@ 528
621 -- drawIt
@ 582
624 procedure boardDimensions
627 function distanceBetweenPoints
637 procedure midPoint
648 functi
--- setPoint
@ 751
792 --- setPoint
@ 751
797 *** drawSide
@ 292
809 *** pointOnCircle
@ 211
811 --* edgeAngle @ 691
835 *** drawSide @ 292
863 -- topWidth @ 648
864 -- bottomWidth @ 657
865 -- centerLineLength @ 666
866 -- centerLineToEdgeAngle @ 681
867 -- edgeAngle @ 691
868 -- angleOfSideToVertical @ 710
870 -- topWidth <H\< z5+)+< z {0Gɯgo||H}||/g}/o#}o& K [ xAJS JDM!b" !6J" DM 'ͬͬd ͬ
ͬ}
w ͦWͧ _}8(8J `9{T]=o`9y 28 !? "9 ! ! >2 :D]SXN]D [ (!e }̈́A8Q0G: x@!\ w#
( yV. V!h 6 #
(*(.(!8}(*(̈́w#>?> w#a{ |͒} ͛Ɛ'@'7||}>" C " 6 # " " ͐ͩ* B" [ R5 * " ^#V#a}.;
OJ
, ;
!U
>,k- o& 0%,`
}g; }؉ }颋.:}8c~I$I~L*kٷx˸;
}0G,͙< },-(-J
!
>0
a`
o8 Oþ
>u m. `1pF,t6|!wS<.z}[ |%FXc~ur1}Oٯx(<˸ͨ 8;
!~Jͨ 0O!> <ͨ 8 = 7 <`
O ;
7 0
W-J
OT0 j
oD,:j
!I}袋.}8c~I$I~L!>f> @ 648
870 -- bottomWidth @ 657
870 -- centerLineLength @ 666
870 -- drawFlatView @ 749
876 - setUpBoard
@ 468
877 - boardDimensions
@ 624
(* main *)
881 intro
@ 56
895 acceptDimensions
@ 74
902 threeViews
@ 401
903 calculateOneSide
@ 466
904 acceptDimensions
@ 74
907 lines read from file
xW^8/w >u J
u`
}>(;
xQ
}} ˸T}ٕ(0D=C ,= ( [ 0%D , 7 ͏ ?(8u x O - ; 8˸x X
,-xG}; }م 9; .>#n 0[ D = - nx P ,-(-˸G,-; }ٕ? 9.>͏ 8u ?= u+-(>O 0u O 8^#V#N#FO /o&9O /o&9!9(> (G!9 w#E͊w}8u RB0 >R@ RR! +ͨ z R! +ͨ z <! +ͨ z <! +ͨ z <! #ͨ z <! +ͨ z T]KB! z> S>))0 = |JJDMgo>jB0 7?= u`
`
77 `
= O n f^VNF! DLT\I!!53!r1!\! > x
#-= o˸xO(- }( x>8(C ,C `iM! >u |; |J>| )=|(DM bo˸ͦ 88 ͦx(0 8> Mx(>-Ͳ{(a y(Ͱͦ
\z(>.Ͳ (Ͱ ~ͦ{>EͲ>+|(|Dg>-Ͳ|/
0:p # ~ # +>0w #,- 6 0#J˸}րogM | . ͫCopyright (C) 1984 BORLAND Inc A KayproDelete2/920/92P = E R T ### &&& ~7#~ =%
o& ͦ oͦ ܐԩͣ }!! "8~#( }:$= +*!Z!*B!!:(=2!Z: <2!! ! :O: :O: ! *B͏ ?x P , 78ƀ8ƀ8ox٨! دoGOW_gɷ ɷ|لg{ً_zيWyىOxوG|ٔg{ٛ_zٚWyٙOx٘Gxٸyٹzٺ{ٻ|ټx٨ xx(ͼ ?}ٽÏ }ց; <(; 7D = |٤g{٣_z٢Wy١Ox٠GD
u J
}x>u u}ƀ/ƀo;
-J
}0W-J
W,}l˸ͨ 8 ;
`
x( -ͨ 8J
-ͨ 8,J
}l8;*!`
! >u`
`
u--- J
,,,-xGg?+2n* 8t
z~,->u xu
(C = ~ > x 0w #xG%P %P ZJDM%P = _ ~6 5 i+~ hìx-Sx9?+ {Η@}|C C gZJDM0D ,7}o˸ #yO!@ 9i&
# w# /w#* ###w* N#FB ͟r+s> ! T]>)j)0 0= UR! #U* ^#V#N#F#^#V>">!2 DM" ~x(L * : O (o: " C}=( ?* - N#Fp+qq#p! * F+N+++V+^Bq#p>>> S RѷR * s#r$ s#r" S " ! N#FB(^x * 6 #[ <(H* ! K q#p##K [ ! * ! 4 #4! x * $ * >w " " {_! " * nf}(HR0n f"
^ VMDn fu tqp
J= B== ͯ }8= ͵ }/ͭ !* ###~-_ ~(4Q6 * >2 >* ##w: >* ##~* #~(E[ ( (
(
!] [ ( (
((w#(6 !] ~ -#8~ >7 [>OkͼMs
#rkͼpX
á[
[
(( #w(q* #~ [
(
* ##~6 ͜O$* #~(08 ʦ =ʦ ==ʩ =ʬ ò +###~-_ q46 ͡> * : 4^ q}Ò* |(N}o!!}o!!ͥ}oEb!Ŕ ** error **͐b ô !!͡!" number of sidesQ! a! !( k *s#r"*"* top diameter! !y͓ ͡* bottom diameter! !y͓ ͡* height! !y͓ ͡"*"* * }Eʽ"* * ͡"* * ͡* * ͥE#* w#! 9! E9!! 9~(+F͊!" 9! (#>2 * Ͳ" |>" : (
͆ * 6 #w* 6 #6 !\ $ ![ (̈́(
#:~CON TRMKBDLSTAUXUSR>2 $* #~ Ͷ$* : > >w###6 #6 ++p>2 S -$Ͷ: * 6###w w#w$ w#w: ##N#F* B> w#w#[ s#r >2 S$Ͷ$* 6 # - Nw#Fwq#p#6#w#w#w* : (
͒* s#r* s#r" * 5 K B ! >u ~#fo{_" * R0Rn fR0K qpu ts rNF ( ^ VNF^ V* S u tK qp R* R(~ w ~wnf ut" 6 # * * ! " " * NFy( * " * B0C n f* [ R* " * RS [ s#r^#VS >O" w2 x2 ! " "
@* >2 " ! " " " !\ Ͳ* : ! ~6 go(\ R* s#r _2 x( s xM|( M6 -#͐ͦ[ R8
(G> ͒C~͒#* ͦC!h !l TRUEFALSEͦ! 9^#(~#(G~͒#>
͒>
Ò
" F! [(#RR0* 4#4> RR * 4 #4(>>2 $* V(/˖: (#~+ x y2!͵(
=( X: (R* : (###~-_ -͌X> : (" ͟"* ^˞* V˖0 S RѷR8A* N#F#s#r$ 0})jS\* ͡"Ŕenter 0 sides to exit ͐b *x!*"*^#VQ! !( k EA$*ͳ!* ! W* ! W}o* ! W* * W}o}oE5$Ŕ' *** error in planter dimensions *** ͐b B#*n"Ó$* ! ͡* ! ͡* ! ͡* ! ͡!m͡!s͡!y͡!y!mH !s!mP ͳ !͡!: * ^ F* < >2 6 " ~͟* - w#ww# ͟" ~ <@* Ͳ !\ <ʮ!\ $ > >2 * |>! * \ $ \ <(! : [1 Á \ ! (f" > 2 : ! <" F( #~ #6 e>! [" N>! ~8>O6* " w
(= (&(" ( : (N 8y(~#x+% (6* #~[* #~ * ~(h#" b= 8(T]DMR0 -a%}̈́o* ! ~6 o& ͠ |ͣ }%^C
User break 1: %
I/O %
Run-time % error ͒%, PC= [ R " ͍%
Program aborted * 1 ! ͍!C Ͳ2C# !!Ͳ! "Ŕ enter !
! q́ .. b !+_5 ! N}o*! - }o}oEʇ Ŕ ** error **͐b *"*!͡!͡!Ͳ! !͡Ŕ enter !
! q́ .. b !+_5 !
!Q͡!W͡!]͡!W!QH !]!QP ͼ !c͡!c!?͡!E͡"K!E! !?H *K͡*K !E! !?P ͡ñ(" "!"!yI*^#V *! R !͡*! +))))* !r%*! +)))) * ! ͡!yI*^#V * !͡*! +)))) of sides,͐b Ŕ,the height and the top and bottom diameters.͐b R͐b Ŕ8supply the overall dimensions and the number of sides of͐b Ŕ7the planter, this program will return the dimensions of͐b Ŕ)each board required to build the planter.͐b R͐b C40 "*"*H ! ͡*N ! ͡*T !! ͡*Z ! ͡*` ! ͡*f !xG! ͡ "*!! v)!!2*!9͡!?͡E I$ !I!9(!I!E!?s)!q͡w !{͡H !! +)))) !! +)))) !!w!q!{(!! +)))) !! +)))) !!w!q!{(!! +)))) !! +)))) !!w!q!{(!! +)))) !! +)))) !!w!q!{(q cŔ three views of"*!(0*& ! }oEB5*! set up 4*1*& ! }oEʂ5*! move to origin 4*!S2*& ! }oEʼ5*! tilt 4í? ! ! ͼ !#!ͼ ͳ !)!ͼ ͳ !/͡!/ "!!ͳ ! *͡* !!ͳ ! ͡* !!ͳ ! ͡k* !r%*! +)))) * ! ͡" "!"!yI*^#V *! R !͡*! +))))* !r%*! +)))) * xG! ͡!yI*^#V * !͡*! +))))* !r%*! +)))) * xG! ͡" "9*9! * %*9! * R'c++!-͡"3%*!+0ß1n "*"j*j!nͼ *j͡*j *j !tͼ ͡*j *j !zͼ ͡"! ! 5z1"**+))))*! +))))1*#ó1*H *! +))))1*Z *! +))))1*! +))))*! +))))12!:͡"@*@"6*6!0͡*6*6 !:͖$*6͡*6 !0*6 !:%͡N "h!P!V planter b ! ! !͡!d ! ͙" ! *q5z"."k!!!q*k%! ! 5z."i!!\( *i! !p=* ͳ ͙" !!!*i ! !! (*i#t-*k#N-!B! Mh"*! R"! *i! Mh" ** aEv.! }2~.! }2! *i*& cŔ .... Planter program .... ͐b R͐b Ŕ9a wooden planter may be described by its numberl !k"g*g! +))))*g! +))))5!͡!l !"*! +))))*! +))))5!a͡!al !"{!i*{! +))))*{! +))))I6!W*{! +))))*{! +))))I6!i!W5!͡!l !1.e!6!F7ͼ ! !͑7 ˸ !Q͡!Qol !o"k!Y*k! +))))*k! +))))I6!1.e!_!Y ˸ !͡!*3")*) *) *) !-%͡*) *) *) !-%͡*!͡$ "*"!! ͙*s#r* !! ͙s#r* !! ͙s#r* !! ͙s#r !"R! !L ! ** ^#VR! **^#V! ** ^#VR! ** ^#Vb !͡ $ !!!jE4!N"J*J ! WED3!GrI!B͡á3*J ! *J ! ͼ *J !B͡! ! 5z3"H*h*H+))))!BxGV2*H#í3*hH !BxGV2*hZ !BxGV2!Ͳ!͡H !P ! !͡!2 "!P "c!
R! q͐b R! !L !R !! !R ! b R! !L !! !p ! !p b !! !!(!B
l !! WEH9!Z !S͡J:!!WEu9! !S͡J:!"!*! +))))*! +))))I6!*! +))))*! +))))I6!*H 5!͡!*Z 5!͡!1.e!!ͼ ! ˸ !S͡!Sü:!o͡!u͡!{͡"*"k!{*k͡*k !u͡*k !o͡!͡!͡!͡!n " !F "!!!͑7R: !!%0!!;5͏.+.}2! CON:<b !b ! *Q! !( k EʥC*& EʑC!,!"0! dC !;5͏.+.}2! CON:<b !b ! *Q! !( k Eʰs*Ŕ view of end of board b !
! Ŕ (thickness not to scale)b R! !L !Z !R ! !R b !#! ! !(!B! !
9 Sl c![͐b !9"5![*5^#V! ́ sided figure with top of *5 ! ! @́ , bottom of *5 ! ! @́ height of *5 ! ! @͐b ![́>------ each board dimensions ---------------- ͐b ![́> angle of sam surfac o
th board Th tape an beve o th edge allo th
side t g togethe t for th planter.
Th inpu t th progra i descriptio o th
desire planter Th plante i describe t th
progra b th numbe o sides th to an botto ri
diameter an th heigh o th planter
Th progra report th shap o th boar a th
'to width' th 'botto width' th 'cente lin
length an th angl tha i forme b th boa}E`;!!}EB;!2 ! !͡\;!2 ! !͡õ;!!}Eʚ;!2 ! !͡ô;!2 ! !͡!#! +))))!xG! !! ! U:!#! +))))!! !! ! U:!#! +))))!xG! !xG! ! U:!#! +))))!! !xG! ! .OP
.H program plante
'round woode plante ma b buil b cuttin
numbe o board o th sam shap an fittin the
together Th resul i simila t a oa barre o ol
fashione woode bucket Answe fe question an
thi progra create thre dimensiona imag o th
desire plante an th dimension o singl sid ar
'measured and reported.
Th shap o sid o plante wit th to an
botto th sam siz i angle of ͐b ![́> center edge to one side ͐b ![́> top bottom line center edge of planter͐b ![́> width width length line angle to vertical͐b ![́?---------------------------------------------------------------͐b ![!S6! ! @!SF7!
! @!S͑7!
! @!S8! ! @!S͈8! ! @!S!99! ! @͐b *& E C!S6!SF7!Sr cente
lin aneach o th nonparalle edge o th boar
'angl o edg t cente line ) Th cente lin o
th boar i vertica fro th cente o th to edg t
th cente o th botto edge Th nonparalle side
hav t b bevele t th 'edg angle' Th 'angl o
on sid o plante t vertical i measure alon th
cente lin o th board Thi angl wil b helpfu i
puttin slo i th inne surfac o th board fo
botto i th planter YouU:!0 ! Ŕflat view of board b R! !L !I ! ! ! b !#! ! !(!2 ! !͡!2 " !P "!!#! +)))) ! ͡!#! +)))) ! ͡!#! +))))!! !S͈8xG!{ r%!#! +))))"*!#! +))))ͳ *͡* * xG͡!#! +))))"!#! +))))xG*͡* !#! +)))) ͡!
! fairl simpl t calculat b
hand Th onl angl require i beve o tw edge
o eac board
T creat plante wit slope side yo mus
tape eac boar an beve th tapere edges Th
angle involve i th tape an th beve젠 ar
determine b th numbe o side i th plante an th
relationshi betwee th height an to an botto
diameters Th boar wil b a isoscele trapezoi wit
th nonparalle side bevele towar th
'r o you ow puttin th
botto i an buildin th planter that' contes fo
anothe magazin anyway.
Th fil POTSTRU no documen t Wordsta i
simpl structur char o progra Planter Th lin
numbe i PLANTER.PA i show fo eac procedur o
functio declaratio an eac procedur o functio
activation Whe procedur o functio i activate
serie o '- o '* character procee th name Eac
characte indicate nestin leve i tk[;7o 9X=7ROM^ol>Q CNZ7>_b6}1amH|UwgۅXvE(e[TE,_qko귰dY\L04h뉱t7EȄHCZ7|IO`tR;_SO04h;7)OwcY\LxsX+7>_r0nmH|zNLOi`vW-eq2=cϗTd]nCj4 xy0~|m7_R- ĸF!E]OZ$Bi`vgꆜ8djzb,k u7mR\!'7;v>vCNZ
cnX!#
Z[xkE|%#7\{ WOPIO76ߍßM0E}.TEbZMOCNZ7>_bUO݆i
?Sݑiѽ)o,jzb,rRަEH 9)o kuX/Ҁ | ! |7_$~b# X鏋?.m|
"qb# Р*,֪< 0|
"qbmbϫK[7_Eͷh3cX?~[18ub1~l7䤼M\A奼MQ6UfVc6qV}ϗ-9al"/]>?SX%g?dV1r\_?t՞ kͷh땚nD!{ܕ?tAW?~:_Ґj0~|JZS7qkW3cLOՅ nLO3c/iqy퉱biH~wZMyH-㭅!'#=1H!'|
Z[ CNFqֈ/!ǁ[#a8Sh curren majo
block Th '- indicate th procedur o functio wa
declare withi th curren block '* mean i wa
declare outsid th block lette o an th
lin numbe o th procedur o functio declaratio
follo th name
Thi i fil POT.DO documen t Wordsta ).
PLANTER.CO wa compile o Kaypr 2-8 wit th
endin addres se t he 8000.
lo ca b don i hundre line o code
Sinc Turb Pasca thin X"
TEZ
/o|I\U?W.lbn#zR!g!͠agKȬ, fV2~ =n`D^o < 9d|'Cs?3g =/ѱC73
Fns{G3.4
ØpmRb>
aHCw ~q/9s[~q/9s[~1H&`a7_ ;s]c{ƅ"^^40
c ׆1nm,-đ
20ƍ܌ϗ-?x?۴u%.B9s[~EcEme 1=i@Kܖ{ +ҵq!ȴ" 0k3zstmӓV\d|r#Wx9s[~1HFKܦ{ E d|Hg3s^) 0F"
4 @Ξ;{+ƹ.vPLANTER.PAS B: f
! " $ # % & ' o( ) * + - , / . 0 1 3 2 5 4 7 6 8 9 ; : < = ? > @ A B C D E F G H I K J M L N P O R Q S T W U Y V X Z \ [ _ ` ] ^ b e c a d ҧWL\.cqЍ3>|-]D̝oJqLl s]?SWUZß+*[|JZS7G7z5]cUOv鏋0vaFΗ40j7_r;`=K.Z X7`t7_Ԭ5uTaW3cLOEn1a7zu6z{t176_yyRZƔ_ōq 2~Q[|iOCf \Q[;_2c| o progra a smal i i
ca b edite an compile withou includ files.
Dennis Sprague
P. O. Box 2912
Great Falls, Montana
59401-2912
(406) 727-4538
ҊL{y+sH5]XR{ )%c9{py땚nK؏q96͗kD'
X>b|@2KZʵv%-#7-"Xy](kc MX
9lF|IKHyo*mhcP|ŭUw%-r큿hq64z#EȄ0m۠)!'3KZʵFZ=<>bZ| -S1m, aw%-#{/] ɺ6E1L>lZr|o^YkꦹGc wZ
Q |JZS7pK/]ѫ1
ZK\Հ 徘7_Ԭ5uմHKWmt]b](ńnzf%g?dV1r\tAW?~돋0va
xF/`@`v?݅a^a p.~Ǻ; gXCku錸_~|ŭմK?n3DYjڥ|.տol>x鉱6n.ڔ)sgPik5=1 w+
)<
9)o|䤼M\0 a+7|oR\!\)OwsuC6
2q /1ᦼ\4Djo- 9)o#퉱BNP@;/mƍ4
S-EL?Eiјǭ0Fń)Jysad];oc KZ\^ jciH"[b_?9u!:ԕi:ԕ+K~+ ~F`|m
twr`B;OH[b,?ߢ1)&Xwg=K~V{ jƠ֟xtFZ
Q {nѫ%"۳ԟKD~Ā鉱^a]l4_bP b{n>c?+aؐvCNZ6vfV
9)onRަY rRަ?.֪ov k-^8|n9n7>_߱0{7%{/ ;鏋+e[?.֪Ϡ*e>`ȉeXTc0<ݍeq2=k2sX+/ b~ZB`~p>gm ? oh
m7|Rԍօ7z5W]'rOFXn>c?-Sfd 1H.Ly+"=TcsSƲ i2sX+/B 3>ڥ/B;3ڥ/B
c.m|o>Ħ0E0ltAW?~{t176߱rRg!'톜鏋:|IˋAWm,imy b~ZB)LпovƠ*a[Ϡ6` jޣ؏qůHoCN
9鏋:|IˋAWm,i*a[^@`,úج߭.c]tWOa~;olƻmRErbU;| aRw%]tW}(͗Fw]cƍ|7_gʸ
#͗82mBwbYm.~7>_c؟ß+^4_$9..m"ɱ۬V8t#]#W`7|Iˋß+^(4`8|"nB P0 0| L]W!`7_$y7_E͗82rbiH~'*iX߆X)Ow/`@`ԕi/x ?SW；//HKZʵHBNmȉAWmF|GE?n\ɯ_v݀ѽG WC7,oc=_2{6ƚM{ O)[L6G1~6/1\Q=xk* ybBo|-7iCwp)n6 ox#P/? 0nPh7_R='.7_R
idȩܴOwxWnƻsKZʵ9 95_[)oq L0 ,yv|E cgjqsi`Elqy1認"d8|= ;|օ'=K))Lп/ٺcD~S L]B82r|^Q/˰.6˰.6w.X'-O),꿛/3DYuـXuY[]t!Ƃ?AU$bPCk]uwݳgG@`"p064׀M]嗢^a]l6ncP b) k-^hm7|RԍqoWԟbP40w+5kM-bcuO 0w1Η4_c?"
x /ЀC"
,nE7?S7` L]wGn7_Ew1`E.X]rPs CNHc a`x=ß+^?SWFпovYA;h+gU0]?`t7zuDd{SD~Ā鉱X=4z0nȉAW|%-./]4_c?"l]~"۳ԟ L]Wß+&(u!lR'?SWԕ+4hfV1ůXuY[]t!Ƃ?YO"[TEovYA{ o؟AWmtѽG7 |cWCN۬6䤼
dϗ4:q p (M?_3w?I^ jqHmy??/ofV1ůAW_ovfwϠ6` jޣo|I?9u!
؏qWf0䤼
d0䤼M\Ո&cGX;_Qc߱qHS]8\"Qy-n3ZY!76e dTV64_9rAU$ "Q
x˟W!'#'o
l]|IK ՛%iHoĭX!¸8pr?27KvG|H;6D:CcCN2KZʵȬ, fOEz#fV# E:Cv7_R=Gff(7{/4\E}H4\Fhk5o#?.ȿ/i) #zdw=DŶHb[^c+/.~F,jqs7_R=Gff(7{/q+7_R=Gff(7{/+a[ϠNEzU( ~]U l;5S]Owھj?W/z[=E.+x C͗=M^ͷhka͗bL|~ ܒKWm(p7m j6&\4hƲ2bB`
EZXHRjo%gO jO鏋K؉ ? 70mja1~)oqHVo_ j})qV}oaɲ}F|%"R\u=K Ϡ͗2~ =n`.bR|ޖt LSbeq2)#itSR3/)>/]?SbvbB`
EZX_[/ҀW?Zß{J\Uq[X,.B&|Vo+q+8Jb, |%]tW}quK`13nvRGxTEb[/Ҁ | IQ ,j[/@,o
@KQ?_$= xF|ڥYnHvdE0c/ ;1fVS| b~;n@`ʧ] "qH{/@,o
@KX|m7|p+f6]ϗ-bß+*tiSZM"K 1ԕi:O,jڥ7_\~L{SƠ*.mMXiS| r!92rN1ĴK)n,jڥ7|GE?nNqKZʵ縕QVȉAWmF|IK72A#ƻL\Owھj?Wm7_bݟß{)
:q-~ jtGܣTuF?v{>D `,}&a3QKu~0\wR,3z'/X&^s$~uAWF k{>=N:=M y_\,|B)nfy;Rel3/y%|\w `NCh5l7{1cItqPSM靀 iN'pl >J1g(t/N0:_>pueFUǢJ4}&{OzJh8NG4˳ͼFlrNg"f^{#69]
FlrNn >J1{#69] iN| i#MYdqSly>RN^R {a:Tuj(?~0\ǟm6PFlrN( 1 7tv䔿N)YΝc|%uZ;Cr!K# &U_w3T,Pְ{>>;uzOiKNByN;\_53T,>PJl|N|; Թ姅pc2_wRuns
!1&JN~0\CKB2>O *Z:_HuڨOo:7]瑦묓NOYiL2w2я
ԹFy䖉)uF?3X20GNssÍ[-SL ѿt봮{: ['SCF 5,h X #QnL n:~35 ?{#`%n 3O;V_Yf^~a%fpw#m6p]'60 ssÍ^w:cL^ uz'u-] XYfNF KYoNyN酪
l>\@6 :Rel3/ＺSNs'95|B)댭3{Ae}uz'u-] XYfNF Khuz'PȐ` ,PO?#Q&6Ϋl1yN更:
{#6oC(\tOy:dSֿ
l>%momgzkf^y>V
:c L
JSi2#OkX6]fM,˧nNUd>o`f^ޫ`ǩm}|_ i+W:~0\P̕7bg6^%ifj(v
ͼp %i4m:4]guz7]0m`{+hORd{l4Fy_'6P,3z'/QY> g2*h8/a2z͑Hu\4}&dM1Β7P彷ҏ[&8O`:KEn 2؍Jl7:봁I@nR]w T4˳ͼFlT֧O7fq^5=kbtIG*Lm7b>}l|"ʔf^yd^bDuz'
߆Pz#6*'÷!q^5=kbt>tGN:=e_8 %Ϙh
ԹFy䖉)uF?3N/>|Rc )ְ~3QK?Nnuu$l
7{;Nj`E<{sؑ(gyy~9>| = ? @ A B C D F E G H I K J M L N O P R Q S U T V Y W X Z \ ^ [ ] _ dSֿ{>}.(?Ϙq[@ 0{>Jƽ2צּ{ܣH2Qo䖉)g y:o|!?#Oj(q:
om` :y
7{o 'LL1]w>Ft봮{: ['SCԍ5,h X Yݘ*X (u$fj(A7~iGJ8/}yg v
6XJFyF )l4
ۿN:m`6PTu֙N:Sˮ\J,3z'я%7^<]wL
6u. X*f^yu-8O4POxboĆoC(\tu&u|N:Sˮ\J,3z'я%i4:fj(dHs'$ϫhgyyU<]w@ ?!!ވ
߆P
:#My:dSֿ,gQ&J%mod[A
+46V 4/J8myNu8)h 묓NOY´ϒWh
Թ~8ml~op3puWo5 !z%RFH;)&:5 ޛ!N:m`V+uz;pIKWވueu5Yi'gC:fވueu5
,Iᓳ!tI3+goĺHg:|,Iᓳ!tI3+7b]Y@{rK8ml<]w4]瑦묓NOYRr,PV 4Ӫ`[%мj(t댭#
\;NPL['j }
qv@ÏeP #,)v'm{: }AP dqc%sJAeS}O RJ%,X np*X 4SC(X B@N x_
l8 {t6]l0q>%RrrÎUB'>_uM~6JMbl7{:cPA%&
Vo7{_[ yZ,ʬ#W4+T`
E+7W 'E-A` ҍ>v7&uXcv`.aP.*ʆc1 n5_c
Vo7o`vwN]Y_r70smc/]P.*ʆ͌alJ5fhtYr7G՛#q>ui_]T
sX͑3NһشaGy5f }#!Mz6((8?^YG/6ܱ.6m8 nE]Jͪ:~XPIbӆTnxm%66]lp"Ce
Rrr{Yr3|m0{#֕E:Kz6m^#V#N#FO /o&9O /o&9!9(> (G!9 w#E͊w}8u RB0 >R@ RR! +ͨ z R! +ͨ z <! +ͨ z <! +ͨ z <! #ͨ z <! +ͨ z T]KB! z> S>))0 = |JJDMgo>jB0 7?= )p7iC4vd X nJV&u֑`7*
\;R
qlJӆO l҆u#;ߓ<-To naE!ԠFK&m~\Gͪ8?^Ygd X 2lҧ_>u#mTn(m &aun;M~9yS}@īn]v4SC{N a
W&ҕsk =K_\3 &^u Ԍ
ڱ>L
_\3 &^u Ms>O;֎x6GÎ>yzal:m /L,Ne
y
Թißw@f ?oB^m0w ͦWͧ _}8(8J `9{T]=o`9y :cDN:m0kooĂ6 봁:Yν '?]<ß\UC^*[Lq3HEY'6Pr57bAX9봁:Yν 'R@ u.n!qyu-8O['uiu._3~{#OxNs9
B :- q,Pr>6
WWbtGN:=e+c Y7{o 'LLq}vb Fiǚd fEyo:md[AX20GN'G2JyPҎ`m0buZcV
ӎn >J]/
|u&(봾m`~Xb "0]gl r70sm _! !45(!.+/ 0y0(
d!kZ!{Z ͈ ͈o& : ( y
͠ |( * " x2 y( >28 !? "9 ! ! >2 :D]SXN]D [ (!e }̈́A8Q0G: x@!\ w#
( yV. V!h 6 #
(*(.(!8}(*(̈́w#>?> w#a{ |͒} ͛Ɛ'@'7||}>" C " 6 # " " ͐ͩ* B" [ R5 * " ^#V#
xW^8/w >u J
u`
}>(;
xQ
}} ˸T}ٕ(0D=C ,= ( [ 0%D , 7 ͏ ?(8u x O - ; 8˸x X
,-xG}; }م 9; .>#n 0[ D = - nx P ,-(-˸G,-; }ٕ? 9.>͏ 8u ?= u+-(>O 0u O 8 w#! 9! E9!! 9~(+F͊!" 9! (#>2 * Ͳ" |>" : (
͆ * 6 #w* 6 #6 !\ $ ![ (̈́(
#:~CON TRMKBDLSTAUXUSR>2 $* #~ Ͷ$* : > >w###6 #6 ++p>2 S -$Ͷ: * 6###w w#w$ w#w: ##N#F* B> w#w#[ s#r >2 S$Ͷ$* 6 # - Nw#Fwq#p#6#w#w#w* : (
͒u`
`
77 `
= O n f^VNF! DLT\I!!53!r1!\! > x
#-= o˸xO(- }( x>8(C ,C `iM! >u |; |J>| )=|(DM bo˸ͦ 88 ͦx(0 8> Mx(>-Ͳ{(a y(Ͱͦ
\z(>.Ͳ (Ͱ ~ͦ{>EͲ>+|(|Dg>-Ͳ|/
0:p # ~ # +>0w #,- 6 0#J˸}րogM | . M|( M6 -#͐ͦ[ R8
(G> ͒C~͒#* ͦC!h !l TRUEFALSEͦ! 9^#(~#(G~͒#>
͒>
Ò
" F! [(#RR0* 4#4> RR * 4 #4(>>2 $* V(/˖: (#~+ x y2!͵(
=( X: (R* : (###~-_ -͌X> : (" ͟"* ^˞* V˖0 S RѷR8A* N#F#s#r$ 0})jS\͏ ?x P , 78ƀ8ƀ8ox٨! دoGOW_gɷ ɷ|لg{ً_zيWyىOxوG|ٔg{ٛ_zٚWyٙOx٘Gxٸyٹzٺ{ٻ|ټx٨ xx(ͼ ?}ٽÏ }ց; <(; 7D = |٤g{٣_z٢Wy١Ox٠GD
u J
}x>u u}ƀ/ƀo;
-J
}0W-J
W,}l˸ͨ 8 ;
`
x( -ͨ 8J
-ͨ 8,J
}l8;*!`
! >u`
`
u--- J
,,,-xGg?+2n* 8t
z~,->u xu : * ^ F* < >2 6 " ~͟* - w#ww# ͟" ~ <@* Ͳ !\ <ʮ!\ $ > >2 * |>! * \ $ \ <(! : [1 Á \ ! (f" > 2 : ! <" F( #~ #6 e>! [" N>! ~8>O6* " w
(= (&(" ( : (N 8y(~#x+% (6* #~[* #~ * ~(h#" b= 8(C = ~ > x 0w #xG%P %P ZJDM%P = _ ~6 5 i+~ hìx-Sx9?+ {Η@}|C C gZJDM0D ,7}o˸ #yO!@ 9i&
# w# /w#* ###w* N#FB ͟r+s> ! T]>)j)0 0= UR! #U* ^#V#N#F#^#V>">!2 DM" ~x(L * : O (o: " C}=( ?* - N#Fp+qq#p! * F+N+++V+^Bq#p>>> S RѷR * s#r$ s#r" S " ! N#FB(^x * 6 #[ <(H* ! K q#p##K [ ! * ! 4 #4! x * $ * >w " " {_! " * nf}(HR0n f"
^ VMDn fu tqpa}.;
OJ
, ;
!U
>,k- o& 0%,`
}g; }؉ }颋.:}8c~I$I~L*kٷx˸;
}0G,͙< },-(-J
!
>0
a`
o8 Oþ
>u m. `1pF,t6|!wS<.z}[ |%FXc~ur1}Oٯx(<˸ͨ 8;
!~Jͨ 0O!> <ͨ 8 = 7 <`
O ;
7 0
W-J
OT0 j
oD,:j
!I}袋.}8c~I$I~L!>
J= B== ͯ }8= ͵ }/ͭ !* ###~-_ ~(4Q6 * >2 >* ##w: >* ##~* #~(E[ ( (
(
!] [ ( (
((w#(6 !] ~ -#8~ >7 [>OkͼMs
#rkͼpX
á[
[
(( #w(q* #~ [
(
* ##~6 ͜O$* #~(08 ʦ =ʦ ==ʩ =ʬ ò +###~-_ q46 ͡> * : 4^ q}Ò* |(
* s#r* s#r" * 5 K B ! >u ~#fo{_" * R0Rn fR0K qpu ts rNF ( ^ VNF^ V* S u tK qp R* R(~ w ~wnf ut" 6 # * * ! " " * NFy( * " * B0C n f* [ R* " * RS [ s#r^#VS >O" w2 x2 ! " "
@* >2 " ! " " " !\ Ͳ* : ! ~6 go(\ R* s#r _2 x( s x!=
! e.!=Ͳ&!A
!=
*PͲ}2;*;& ! |g}o}2;*;& Q! ! k! a Ex'!. }2;*;& }2<*<& }23*3& ! }2.*3& ! |g}o}2-!i *.& n& !i *-& n& e.l !4Ͳ!4
}2# !Ͳ! ! 5zʂ("*#& ! |g}o! NEP(!1 !
l !Ͳh(!0 !
l !Ͳ*#& ! }2#*#(!
!$Ͳ!$
!Ͳ!Ͳ! "! }2*#"!*n& ! |g}o!*n& a!*n& !? aR! qb }2|! *|& ͽ! 8!rb *r& ! NEI#͆!*r& ( Q!Y a!N a E%#*r& ( }2w*w& ! 8!mb *m& ! NEʢ#͆! $* #!y
R! q́AYou pressed a key. Do you wish to abort this command (Y or N)? b %#!Y NE$! }2* #}2l* #!y
R! q́ Hit the key to continueb *l& Eʎ$Ŕ, to quit...b Û$Ŕ...b ! 8!gb *g& ! NEʿ$͆!*g& !
N*l& *g& ! N}o}oEʛ$*g& ! NE %!*C& ! |g}o!
! qb F-R! *C& ͇'! q! b ";"=! "! " P!Ͳ! 8!6b *6& _ RB-**;͇E-!
*6& e.P!Ͳ*6& Rb *#"*#"y0 R- R.*! ͛Eʎ.!*+n& Q! !~ k! ! k }oET.R! ! ! b *! R"!! !! n& +sR! ! b *+"*+"y0 R/!
#R!
́(Enter the character byte value (0-255) ͽ!+5 ! N*Q! ! k(T]DMR0 -a%}̈́o* ! ~6 o& ͠ |ͣ }%^C
User break 1: %
I/O %
Run-time % error ͒%, PC= [ R " ͍%
Program aborted * 1 ! ͍!k Ͳi *.* 0123456789ABCDEFB4C4B0B1C0C1B6C6B7ERROR: Data displayed is invalid!!! !] OFF\E ! }2 !] ON \E!}oE)! }2*& }o*! N}oEʼ(*& }2*& ""*!͡*!͡*8"!*
^#Vͼ *^#V !ͳ !͡!! * !͡**
^#VͯE *!" *!ͧ"*"""*8"*!͡!* ! !͡!*^#V *
^#Vͳ ͧ*s#r!*^#V*
^#VR! *^#V ͼ !͡!ͧ* }2%* #"eR!
b ! *e5zN%"R! b *#0%"P!RͲ! !R
m5zʞ%"!R*!R*n& ( s*#p%!. e.!R
|"J*J! ͛E%!R
! *J+5!AͲ!R
*J#! 5!=Ͳ&!R
!AͲ !=Ͳ!* e.!A
|"J*J! ͛Ef&*J! 5zf&"!? e.!A*J*#A&!A
m! ͯEʗ&!A
! e.!AͲf&!* e.!=
|"J*J! ͛E&*J! 5z&"!? e.!=*J*#&!=
m! ͯE' }oEʢ.!
#!
*e.P!Ͳ*! *Ͳ,*#"*#"*Q! !~ k! ! k }oE}/*! "y0 Rl0 P!Ͳ*! Ezʿ/"R! b *+á/! "! "! *=
m5zf0"!
*=*n& e.P!Ͳ*=*n& "*Ͳ,*#"*#"*Q! !~ k! ! k }oE]0*! "*#/ͽy0 Ry0͆!*6& Q!
a! a Ek-*6& ! NEʲ0! }20!
m! ͛E0!
P*=Ͳ0*=
R! qb P!Ͳ"""! }2 * & E#!!
R! qb * & }oEʅ! !y Ͳ !} Ͳ!( e.! Ͳ!) e.! Ͳ! " ! Ͳ ! Ͳ ""! ! i! Mh! |g}o! *s#r! ! i*^#V! Mh*s#r"! ! i! *l& i! ! i! *& i! ! i* & }oE." #!
R! qb ! ! ! "! * 5z""! !P 5z""** !͉!*!! B! Mh! |g}o"*Q! !~ k E"! [*b *#o"! [!
!
b *#["!
s#r"! *! "! *! "*n& *|g}o! NEd+! }2k+! }2*& *8"! "! "** ^#V͇Eʼ+*+}oEʲ+*#"*#"Ã+*! * !͡!ͧ"*P!JͲ! !J
m5zʱ,"D!J*Dn& ( R^,!
R! qb * & E[,R! b è,) R,* & E~,R! b !
R! qb è,!J*Dn& Rb *D#,}2C*C& _ RB,R*C& b F- _ RB%-!
R! q
!uͲ*^#V*ͯE.1**s#r*^#V*͛EL1**s#rR![ *^#V! ́] !
! qŔ, (*! ́ - *! ́)? ! !u
m5z1"R! *#ô1ͽ*^#V! !ut !u! G-*& E1Q2!u
!~!͞ *! N*~*t}o*~*͇}oEʣ1*~*s#rR͐b "q"s*8"m*m^#V+"k*s*k=)*m ^#V͛Eʙ2*k+"ko2*q! *k What is the sector number0! "c*8 ^#V"a! ! 5z'3"*a! |g}o! V+*"s#r:""**
6* & Eʃ;! #ŔWrite error at track *! ́ , sector *! !. b ! $! ! 5zʺ;"!!! @9**͇5*#Î;! ! 5z;"!!! @9**͇5*#;*8"c* & EY<æ<* ! R2*& EV<æ<ÛóA* & ͋?B RAͪ<B RAk=B
RA;>B RAy>B RB͆!* & ! NEjA* & EʛB! #Ŕ6Do you wish to write these changes to disk (Y or N)? b %#!Y NEʅB* * ;ÐB* * ͇5* * ͑6! }2 ! " ! }2;*& EBÕEc* * ͑6*& ! aEʕE! }2! ! I(F)orward, NE3*c#"c*a! "a*#2*c"i*i"_! o& *_s#r"Y! *Y ! "*"8! ! *8"U! *U n& "*U ^#V! *U^#V *! *U
^#Vͳ ͙"*U ^#V2R! ͳ !O͡*!I͡!O!I ! ͙"q+""G* # !Please choose a disk drive (A to +R!C ! !
! q́ b ! 8!Bb *B& ! NE4͆!*B& ( Q!A !C k!Q! +a!2 +a E.=R! b *#"j=*!A ͯEW=R! b *#"j=! %! "! "*!2 ͛Eʑ=R! b *+":>*! ͛E'>R! b *+"*+"*! ͯE=R! b ! "*+"*Q! ! Ra!2 ! Ra E$>R! b *+":>!A %! "!A "*! ͯEa>R!
b *#"x>Ŕ b ! "*! ͛Eʟ>R! b *+"ö>Ŕ
b ! "}2!}
R! q*& b *! *!2 R}2*!2 * & E?9 , (READ ERROR: data displayed is invalid.)+}2!"""$*8" * & Eʗ9*!& ! NEʅ9*"^#V#*"s#rÔ9*"^#V+*"s#r:*!& ! NEʳ9* #" ú9* +" * ! ͯE9* ^#V" 9* * ^#V͛E9! " * *$*"**"^#V* ^#Vt*$^#V*"^#V=)* ^#V͛}oEʂ:! *"s#r*$^#V#*$s#r*$^#V*tE:! *$s#r
;*"^#V! ͯE
;* ^#V+*"s#r*$^#V+*$s#r*$^#V! ͯE
;*+*$s#r*$^#V*"^#V=)* ^#VaE
;*"^#(B)ackward, (R)ange, (J)ump, (C)hange, (M)ovement, (ESC)ape? +ͽ! 8!b *& ! NEhC͆!*& ( Q!B a!C a!F a!J a!M a!R a! a EDC*& ( }2*& B RC! }2EC RCͧ<EF RC! }2EJ R$D;*& EDÕE! #! #* * ͑6EM R¬D! #* & }o}2 ŔViewing movement is now in b * & EʄDŔsectorb ÓDŔblockb Ŕ increments.b ER RE! #! ! !X .How many sectors or blocks displayed each time0! a E4*B& ! NE!5Æ5*B& ( }2B*B& Rb *B& !A R*Gs#r*G^#VL3!@13!
*@*Gs#r*G^#VL3* #"<">! *>DM. !
* to bring it back.b ! #! 8!b *& ! NEʘj͆!*& Q!0 !9 k!? a!/ a! a Etj*& 0 RjͣBÞk1 RjJÞk2 RjQÞk3 R͛EN[Ŕ Default: b ! !
m5zN["! *n& Ͳ,*#,[! #! !P G-!
m! N*& }oEʃ[M^cŔText: b ! !
m5z["! *n& Ͳ,*#ç[! }2! ! *& @9! ! !}
R! q́Searching track * ! ́ , sector * ! b * * ͇5!
!|Q! ! k E}]!
!|"u! #Ŕ Byte number *u! b !!Ͳ!! *u!
m+ͽ! "w!
!
|Q! !
mk *w! %Ŕ Reserved tracks............. *
^#V! ͐b Ŕ! Number of logical blocks.... * ^#V! ! b !( %Ŕ Directory entries........... * ^#V! ! ͐b Ŕ! Logical block size.......... *! b !( %Ŕ 128 byte sectors per block.. *! ! ͐b Ŕ! Disk size in K.............. *! b !( %Ŕ Free space remaining in k... *! ͐b ! !
Ŕ* (0) View or change disk sectors.͐b ŔB|! N}o*& }o}oEʉa!}
R! q!
! q͐b *#"*! ! NEra! $! ! !?8!O._b `*& }oEʞa! $!?b -b* + #ŔSorry. The file "*>& !: !
! q́", which contains b Ŕ the help messages, is missing.b ! $! }2! ! * & }oERbBcŔL! ! ! ! ! ! ! ! b ŔL! ! ! ! ! !% ! ! b ŔL! !% ! ! ! !% ! ! kNÞk4 RkXÞk5 R)k͆GÞk6 R9k͝EÞk7 RMk!i4Þk8 R]k!ZÞk9 RmkcÞk/ Rʁk? RkU^Þk Rk* & }o}2 *& !9 NEjŔBye...!y
! qb *L3c ZUk9 R9 cek/ R/ ? Ra}oEd]*w#"w!
!
|"y*u*y"uŔ, *u! b !! *y!
m+ͽ\* * ͑6! $! }2͠ Eʈ]{#* * t* *{^#V+N}o* * #=)*{ ^#V͛}o*& }oE[*& *& }o}oEM^!
#!y
R! q́9Text string not found within the specified track range...b ! $! }2 O!Ͳ! }2 PROBE.DOC!Ͳ*!A }2>!?*>& !: e.l !
<b !?5 ! NEʪa! #R͐b L(G)eneral help, (0-9) for help on the (1) Copy logical blocks or disk sectors to another area.͐b Ŕ3 (2) Find the allocated blocks for a file.͐b Ŕ; (3) Produce a map of allocated blocks for a disk.͐b Ŕ$ (4) Find bad disk sectors.͐b ŔC (5) Calculate logical block number from track and sector.͐b ŔC (6) Calculate track and sector from logical block number.͐b Ŕ+ (7) Change the logged disk drive.͐b Ŕ' (8) Search for a text
vPROBE.DOC \
! " # $ & % ( ' ) * o, + - / . 0 1 2 4 3 6 5 7 8 9 : ; < = > @ ? B A C D E F G H I J K L M N O P Q R T V S U Z X Y W [ wؐz9x$lU}i-"g~] ?/>cXԗՊwvO8emK-Y{5la.U"/rwm|
/&a74iۅ?RϜ07vHc[ EC[i= w 5%S[ҤNC6E ?|Ʈ snxɣ Zc? YҔޭ E^m#VZz z*Qܷ)d W5EzWȷ5壊O#zu5}[:=lSCT ؔ4 {{tz uݽ1;[K I/y8,=:(roqPp XK/ێǥwHH.|=(;5{f%-tPf5ZJHڊ mޢF;:(ے>q?ܽ,2G] )Sӿ"Tӱ(gKG l-M&t9I Gobz1g;
1IR( *R)i T9emKgQ{ϖi2QϘţ-D)Qn tܼtgKQhwZ4^7Sz V
`k)7;E=k!Ku|Mm^WɔMI= \w
[O7~ĢǑR8, *\eMI= \w
[owX8飳{tm]ZӶa(mlJ =uLٔ4 y3ӮqT_u|C+xjFlm85HDSkk(iK
[Lߗ&=tUPBeRGܹT}i<=ohCuu{X;ۻE{Go*ގE.KA
ݜ$) I)VߗXI>= LbqTεŢF PfoNbKYwdșI doMl-%,O>8 >Qx߭y3[Ɯvms퐥_9/kѴcүƜou9ѴC+"4"- vć9Քj0jJɫɳt0-u,==)Zf6eQpc[,Ŧ \ *qPo ck=пI){K^
Y
{lu2s*}6(rI/@3}q!E?/-EL aK> [(rM3/}V1{KNeAc Q'/֣4=QY:"O{CduA/!uti.b>8^߷{DECSf(Kyk (rڜ$ޭwY("g~ [%7;*/mX= >8kHqDy˖k<,㝢q eoԖ =)\kb/K,7Ǧ tOՠQ*Ræ`U#`k)!eyE#]r))o_e5a Ǧ!e>cnC6K9=dQAh ŊƋ!G{ܔbנ="-P_RqDy˖kb;n}i[:==/0(r?ean5WÚm
kT[u5Rȋ6cES{OGJ|Aٛҡ[o܁-q= i{Y_('?Uv
eo;[-fy=eo]!m.k~8|kb; أl"C{t0,oe5kQBlۇ Q.VGTތwc ^
mޯT} ?U- 5(Cq=[{q!K^܌Pf;(r/&h2yLfy3Ӯq=ń#G5: > (=[:EOfs Qu?!=eucv^]u4Ս"x?)FGt`lz ʩ
^[:ć5QM^ȋ)q7/[ENZRAip1%E}MRb-#*h:(r~/&Mwnut(!;x-O@Qʶ}: ={tB,y3
@"*ޝ- Glx1GO5DUޣҡQhE Q!KbeX8},UQQߚxw!ǴNsyO%eO䟪ń/ NA=z E^h`mX7y3Ӯq@Ao?="a )`k)IQ^yme>c 8XQuǜS=ak)(reL❂7h9A|l{;U9$>N~IR\LJ9٧p p9ֶt:qb T9;ہ=]OGoo lO~l x:>٧p3@9Ѵ"?/&ft) s4 LbKy3Sҙi[K ';z n/> 2;E,z SY']yT8I<8Y3xy8_|dyq(r[8I<:pC~(il82;ZdͱRRcZ
q9Z{GT82;aSĢ!M~ zHS=\jbj'n0;{;Rb8G'ց/n:Y~07NJFVGɻ,̭bb!RbLVQWmҚ
=bk=bjV߷#۲)i,̭U[ͦ鰇gT
k| ) >E㘝*R) B]Kk6[
Sc?fl-z _~E,7}4\w
[ow/|ƭۼϚUN=^P4:g$Osz(S{v2'}yiz k8͢Ι/EcM>621Bؔ4 OQ=NJfk=ll٧үZ4s ߣȷ;^Ll-%i.):W[} kC=wiMۆuB [K]Icv>+:tqL>x lF阮g EK6;gKG&es} 8Y+zؚ( T/C E}OPEN с oF}䟰 - 4ʶXy}Y34ʶXP F6)ՖbRZb;z!Eeaw qhlA=g; ӲշbIY"o3ӡdM?[EN w8b=lR5bBqE?Ee1-z@ :bupVc> T[2ËK[u -t^) 1.sm ʶX5-4Ϳհ &ʶXL-Ĵײ#X?{Y3;xw~آDZ`{K%\[ "/rwgL,P{آVe>c_ z GMŧc>8P룇4^Ll
:pC~Y3Vx1!EqE3_E.X8U3uDEjń/ >8͢Ι/5Y3<܋ T@{8\lhi\2RbL>7}t|裇4<ܐ/B =NJF(|q}9fi">Ѵ"ZJHY|lRGܹ({ey} UY 8都5NQQUY3vfw5 =lRGܹ({e'ĢM 3uyTjxp}~`v>+Q.WRtiu|I({eJ%}X8Ue>c裇4^L
RlOA>.VH!_\H ak+yP~[mKݐ/,glu)ɧ٫v?l_MSV oHyw,=sx:>'
[ (=Y
S5DE}ZՏngllS$u|i=lGC = iU?^ n E?[:^;ȋ\#RΩs}
7EҳE^Qł@RC#*}
7{;`( +zܧ=~
eoe>cװ/ czWM*>\rmK'k*KOe| /v܂U|_mϖf z ({,-"wQz=;5aS=ґ1;/[ENZϖv\x17E!|Y\G(tOf^Ll-%)8*/n,;n ҫ#<>=:pQza{8,vԐlIJ EECٛCuc; 'n_ YwZ~?d)^"L_S*ϖΚG'n0g.=lvdșI 7{.;C7Cpp>[=Y| ,?_"q/n^9Iɣ?؊GVߗX8Y.:E,b qDDE ܐ.=bQN,C fX({߶tZl~@,z 1}NGT8ʖRiK|="w>آ{6/y<_Rҽ,?'n_ {Etq McGJjlvBx}.ڑ:7 6Mb*Ձ&pܭ/nbڧ:7{ <كXԽ 5sG[A5 QiS :6>IJ Elx:2e-zĤz H KJqlH}PQ S@ٛQ_1gZޣ4b[bŔC6aG E{3d-"ȼkƆhsvk,m"/rw(bRl ^LtN8QG,jRl-%&w^҉
_
[:۽riRts VGiyyobzɃ݂NwͿb)vwe>cװGÝ/ "T)Y ej ljG=[:uݽv܂ G?ܩ (ezE^ﴱq vpn=k'SĢܿ[أQY%QsY i[ |q}܊ GeX H =dQ?
Cn|z o5H =d ܐ/wNA)"q t(I Y3vc|2w
{8}|M>{SAṯ:g$K9Ѵ[ʜ=zHޠl
= j MoejZJySdWޠ>z;ܐߣeosILJ
whghYo{ߖ lAC+x=Y":yɃl(mZL%-Y3oK'ӆ`k)?eLAnK(iY
eW8ܐ2q []Yo{Lfzأ7>k-"g~:wύeN{Tq{[iq (r7d\LJ `E#nNn@3}q(re\E^串ʖ$Lm؎[LϖN{Dk8 w):~{ \ǧeo=z ը[ ?u5sXѸqnFȽ`,챿-z mx:>[y,E?qM{x:>~뾕]U5(=ۧ- >E.({nFT8=PږŢ [-M{y/& mBpC;:p15[Sֶtdy=ltͲE^4/&PL +07EL]/&Cq=ۘȓz ?/>t*^L`Su|G[Y3Vń<:pQztuGil +k-y
+zܧt5*XTw ~eac[oOzf t-Vȋ4kge[,k[mIaf8(!K
tt`~O|ebz,= S/y[o)we5 [˖ko5A&7nQ1u&(V[S>6an0L я 7C}<lmGo2k?!*>=s{>=:q[}q({'n_܌! XOTs a ,ys !xH6;J!)~D_,[EN2kwgu9Is yϖN}ZՏ *U-V
d)_5{tN[,q _~2Q'k5ɳyC6w?b!({38I9Is 4$_OY E&an[K I)XEyV31}zWAo-%اp3q$}A}ZՏ; q({3?Q5\uniU?{}u{q3lu@$_9Ilq"U-c 8Y] nfKGB>ұ$%"kL- z $}=sU-nCeo:(KJOH>=??,Ŧc,E^+x˷
\
Cl)L+{8*KC E~_ީs'ql+2RBc®a{TRlOQ{z o5k Gj].
md
wig
z k {QsdE}vH3')!I;!
=s ߃[=_uWY G
'm ;qZlq(:ǭ^
[yq3T},R$[RjEcMQ)ts` 8*Kǜ1NsKb=2k;|M/%, JZECٛea7C7'}
7cMȷ +N R8SO-
S;`k)(aH>IRjT9ISck)!eyRw(7Q!+zܧt<[qܗ7y3-wU[7Cb *;;)X XEٛ 15uqHJuW[2dڨ^u]6beMP NUS=OE^wDӪķdZz .fYwGC\&Y+|2kwgT)CٛaT4>]
gMI>Enܱ \|eKǗoR 1LA|у"bڧg
o{lH6u
:@J5pݔSN,eͰG9}7䝪5H6;vSˆwSO;yZ9`s)lU}iETR g,^SU@ٛ=PEu:l =q Hz+(r[U|_bATRKҶt:؎Gq,; OU P仆4@PfkGߗS;*/ݶtnIJ S?CE-`W({3|zα 2}::pQzS#>\T?|b O@VOklȮ
ޝiذ :*yӹ>E)tbAVRP6/ ,_Qd?V"f4mE^%}l?ܽR"Kʄ4=$y:>E.K? (=b>Оw}
^?Ċ>l:pQz QuG|)C{$}zȢǡxnAս%m [
=[q({,F ^Cg 8H"ߧp3%>.VPM)/x:a=V4ӛ$%2}:\ S 8f͈ECٛ 15Ol_J\~LKe/ns gl
p#*KĿ8/ 4kgZMbz;jlvyfmդO1$ uHKhYM;2a _GS[(52[l-%R8chwmܵs7ɲ#) ۽,E^ G,۴#NQY,Z坂ҁ=ܖ2'}GcSt^آQ#*z qe>1/ E>t=6tz \ǧ4.VGV98R8iETv`z I^c}>Q&:
*KG R,ݖN{lF ,`M>쯷w d)~5XʖN=G 8*K=V4O1b{kyL뾼C, =qZl=R$OfF1aH>Uȧ=qSkG
dzG{>=l ~&EL_=l >lGTlY]㠲Rn@!i+y*>=eo{5s 2K Eev=fwE,b Qo2k k}
7{)ry*>=e\PWR} #c8}, E 8ZJHY|lPu|l-%-q}:Ֆ(rk):=3?!>=k*K=;-"ȼkƆhgLҖNTIb^ȋ4ʶX $>&wDE
ݜ$) I)ŢON )t mghI)){7O` 7bL5\uR8SSCFl2i)|ƮqsKbXO,qyXA=k2d>^;-zHÏm
A9%}$qtأU t[˖NTc*!*L Nb< eTOiz nƚ}QGmE^ [8|)kń?Q GTջ&6p&a07qy} ULKAc/XO,z {$u|mj أ%m{ ntDE}ZՏgZاp3[:ۧp3[z"w o{j[:=5DE ǜ`v AS-4ʶXGNw8L M.#V
d)zR[<[:{"OeϘ[A#>=bq=1g;=A 3'" 7ہ,E
ݜ$??wl=z Oy3-e͈ϐPfأ 3')yޣDZ\:5xy_Eu[ 8~H RouxQjK86Q{țR$u|V4.VSآ~Y([Dq }F=VKɖvDE#nNEuq짪b?PҒe>cqߏ5 )ts(w?DAÇ ~HiKg@NAÇ Gq=lh[}Sϖ;z c+nKR(Ne@ߛRנ>=6o`[p_- d)|Z*KWDZ8ܐorޫ =OATy-9)b@ٛ/%s4ʶXhgG
;, Lϖ="/mZL/yoS?ܩ_
d)z"E̐ǡD[Y3EFLI =uǏDEx!K?:®aKiz(Iba%쯷w z )tsاpg:E=!K >ħW48ǿwT
-wܗgKG, Ӫw =㾼S5d)z )ts(}
7{C䁤NoU|qPY:ENR
'}
TN2Q2y>U G
ݜ$)!hSct|Z;,cŖLSI eߺo Y oڿtyyǡͲghANn璘ǭoKOf&"¦$S({3s VYPf5q 2C) J
QAtr{8Pu|ngykd5WcC6٭-eKg/wl9; ʶXHJ}x1;nPg/w?bp:yS728*/n,E#k;n0d-O( D=lq\G_ <'
nV?"XqC ӧUQp x[}OebQ{ϖ,yYși8ニ-_O7 GgG}
7=k#>c c*3}4=q!Hg3&ɢ}LS tqbBaS + GW_-z .`{udF Y3,NsdI[,9I>=H)/[EN2kwgl=tۼ7VBeOIV[{DE
ݜ$)Aib{7O1'>R8S;3C JZx _Cɣ{Y3EdR$OfCUlȴOf
eo+]v7(}
7 mBm|:k}qT_OfcM)6p?k 6pDE8H>xt5Qx4Be"ҫ,({3*K-) Q`.|F+Pϖԭg큲7{ <}
7oV> ֳPfl EOflQլCBٛ{$7XOW Fs5갵XA_4`"c]L%-5dzGCٛaM9gNRS"/rwؐ OΙϨoGv
{DĿ2~B(rT)tsx:c;n! {r1ꇏP72Վ, l `+ Q1[c= =dA9I;EC1 {QYΎ,ԙ6>jzF+qޣQ9Ij&7@ qM-w?\[ETUa;, E>=[:hml-%V49飇4= [yDq'> G離bqǺ JZE^¿Xz?f+~DE,=U|_m8Y~{ ;ݿTa(b%mI = }:e52!sv}Y/I/n,;`X-"g~'-?8InJqR$>=\3}g3&|AӺ/qTY1C ތ"t =qh_S蠾xl-z X"߭-Iɫ& E̐QY:|) QA z <", Gz BbZReșIˊ 2~jX4/#=l zȂXG+:ǭ ^8>z|朸ATl=t
Y;j KQ䶈;z;*Kj )=ܷO Ӻ/TVx1Qi abVl)d-`\*b"y3{ s)zHSY}yՁ!MX- + ,ݫсl)z eg{K Q1dӖNo=փ G?%!eyECٛ^=FLIMGtv ey ה{$%[8z e\GCރ ըS 07~$-2k ~&\[,٧ =J\C"ql4W*iщ[m bz(i=w㳟~{ |ߧcY?!*{k::Q([:R[ɼ3WY
! +>c75q&-;ft5Q;y#=eoFۃO+^߫{un$ G;InJҧؔ4]"/r̻jln9mnƚ}:!Kul9;im`7Pޯ- !nNnƚ}:@E.Ku,s7bJOC G
ݜ$)܌g8!i+ރ$_O_8!Ku|zH#pܔO!qPM7Ywc >ezșIm|tq$)I[,B/n[<ДY;ck)!)Ŗ Ge5\gM> 쏳 >ĺEz?
\:lţu}߷uC̖N#ҶtxPZ ޔ= QQ(KeoFߗn[:.R=(_fGl[ m8wvF|4i,]tŪLPfo_-46ڝ" GCCYUR{T-w=q /&`nK[C|\ X`Nw8U|_m?/7"AOE߷CDZ&DeϨgL 7ՠǭأ"CYAfm 2;a[ s1A|X0 -ŪrmZ2khlV;k |YATp- o @[)vwa E_<}ߖӱ(#%[:=jE6z5b oĔe:l)bjFley({3Է{?b! RB#7Q7[8,o7h UoZJy`k;6M]pCc^L <пQY
$%c8 _<$OQjtz 62~[,N=ґ1;/hl44 |k)aM!Mc>['n|q} {k:@O{T" -NY2%ANM!;nܣO]:ק ʶXy\ PR8w[8)%߶t./FWRlOCxtRՠb{G#ʶX'>3}'jUX#eގ,֖q$yMuآ=*K1%-SlE 'z >l-%V4Ģܿ[ҙ8|\*NMg))$RŇ x(M&m^({3zR<1u95ۘb<ӗUdux)E^dG:A+{az;yґ+yY/I[,h٧{` z ըS {ibAۻEomm)3^>; aBy2k ;\,;~ Of&" 8PWɔMI=_ Yw)dxmK SI 8$7%SlJe5d?wՔ؎[Xcu):xy\ǧ t[˖NTn>{BGT8 )(b,ײ`nOff+*- Ge,mymjF;z#ʶX5qSkkfkz#ʶX5܈xGkm@RޣQWmҚ
cc{ks^fTrmZJHJ?ߥsyz걶zvQYlGL0l5Q!?>[K q=IJ E.{8[EN=l=wՔSRt!͐Ö}s EōSPtorv܂R~({3Pu|<-<6ouߪ~jx Vl) GobzX} ֹ{O(> Cx'
^[:ӲOG=aObeșߩ-wGmPql-z ެc27U2} snu}z oc;, ӳc"/r̻jlsvlmK Gm<"/rwظ=e[,.S5bBNA#$J7m}=U|T
ʩۖ{q3lA(K)>92kwg;ECٛ!Ka #vx1Z~ykd5WcCv]2'}/[kvi7InƮy# Ae5s CTAq3챁A+Fs5dO{?/>Xl4ۘb$SilZ(rOe217!,/!mKʖ"fĖ GCS=*-|փRآ$Ʈ,v=F8OxP_
b%z;(zPv !
n"wT
d)z ^=cXSt?\>ރ GK[
n#*Lj2Qǖ;\: /ixӾkۼEx7@
GeXq;\ -EO˥458&*" ތIlF]s56~;wÖN Os҉gșIlI)z -O) Q!({3@_[z
oK %m}Ȃsq߶t\[ʖNqGQ/&C 8^[: PRY(㨫wiMۆucv [SsґnRw(ruLC{({eT
Q{ϖick)IJ8PWɔ"m鼠4^Lq,Zh;7
>.=l(/K?ЎVi NJKږ_< (re\'Ocv>+d)R' [8^[:X}I!_\Y(rMC.=bga/K?| ) l8.-
fQt^ c[h,V_Y36K
V?(eP6[wz-2_Gde5vxyQiXczD=dn5ըC5-8z-a7u ;E|kz n{^A}ۼe>cװGXe5 7d駐q?/>\SXEcM>DEoDž_N} {TO|GY8,I"e[,6,%^L;qd֦?/> H`.U|7ly >Aep^jzH̷~8e,=nQnmXgȵ# =*K=NsyO:ΥOsSY:d)+(GW?|Z[d֦X5XY3v
{^y$%O qPY:|c8e}`cU_g |1L ̉O){GG,ܐ/?m露g5/KynfȬMcݳT3k
-"
;k .2] / .;ET8*KȬMcݳaN[yejgl* t NR U[[:wPYFg֦e3kS46]lf-ujRd֦fR' ~iaG5C E[S5܈xΘS[Tn Ǯ$eKǿ5!KQ>d֦ /, Kc/MbBBO >EP6 5q 7"ޡ*>.}lO#[t[S"q 4*>YM;t;~8loM5q#szT?|qym RnDCsKKO#[toMY3v+K`riREÅ_ZXɬMcfRilVZ 6vN6:;(~82u$%/|܊ t 6,S'Ail)siAJK]^;أǑn= Gtl],=inz;^=^[:XKU]`QL = =uLѿuY34
YaMBk=VVVPWɔNJUwK9=#h_ VVV)?kbQv]#)mہ=t
^P=, 8^KO*KWdҹ/o,Ŵ˛@QSOa NbKe>cÅW7dGB QYFAҹ u x1}f=[pG
GRTkd S3=[:=?{"/
zG[y aa7d駘3=[:e[,߁-wC{{7OQU|z e\jب^ubQv]#)mہ=t
^P=, 8^KO*KWdҹ/o,Ŵ˛@QSOa NbKe>cab~k[:qpC~":C?:h )~ X}I"/ߑ] ! LOq$Kb[p
YAU2K9=C sb DE{?/>lGL
\%[:8݁ uY3vku
QпRЉACٛAipZl=<6v2gK _J-V
|)q?/>T WE)6vjY&؎[P>,EvPROBE1.PAS p
! " # o$ & % ' ) ( + * , - / . 0 1 2 3 4 5 7 6 8 9 : ; < = > ? @ A B C D E F G H I J K L M N O Q P S R T V U W X Y \ Z [ ^ ] _ ` a b e d c g f h i l j k m o n #[T*M]#bE/4f}K_c!5N֊&>dyGR"*z;,ݫ~j܋ f+`J\C !Я}bPf5b叽GSDZtԷyoP;k wjnFs {Lqs Sֶtm
-E=t7 9I({3hݣL7h(S֧ghw5mLIlNYpC~l~|Fz'86Qqs Y
d)N5=gk=Q\[U|_bkK [8S-TU~|/|ƮqTizQ\e7N}ܟ%?Qtܽg; jK8SU{e۩R?Qtfto-I߶tʰY55DEɹ{6?Quޓс8~
zcSck=q{$Q\Y Ǧp#--y$q+&}0G-x[oGiz 9Iv%APROBE.PAS 2
! " $ # ) % * ' ( & , / . 0 - + 1 o_֣
зmM
W`}߷,
G Ÿ IT*bݯ
Ū'ԍ7 i==qZl=k K1%ŻQEJ){}[8iu|ITvI Znj9l%#4ӻїz`g 'Fnm(
ʚ
QJF AǮtF KgSGtFΞ#p,FΞ{vٽg{v-FnY֩FΞxǞxǞxǞxۘd`A<=mLVԳS ;{!FncMz`gϾѱ;b# ~ 1
v2?1rkh.F]7
v/Fn A#x;Qc%q#Xb&xPC}Wˑ]tLJ
rdV`:`2?1-}Wf4
vWEcxQ''o%RF&Z҇gPm\}(ء#ËE
LgP# zM )(ء-
h,/D[ڨg-}Y) 41r85dKydVyv[C`;#^ ڶ v !7
vl2;$E^ۑe>Cl3gnkKG
Y-w L =?{TM[:Ep Rl-ܐQ҂-z ^;;g [f=<~?pSK =*R- q{vJ [!EuAb@z՟5ͫ-ǖzmp
>-ǖzf OU|F_ܰuh[ ^
d)a=x(E?GO糵 x1}JmnJ
[W7bJ
/&l X"ZJO;z 46z@Rߧ!ǖybӧ}q 8}
'Fn="N T`:`oy6p
LaFN]j4$4
vP#e# Fmȭ0]۶/,(AO<Υ `6rbjM^L å[k;
v T-} Ʀ.q~kmRQc9|+KxܩyH`"f aLVtW/T/qǽ4rYq~qi|i`Xv VB]vqi)j9r÷oR oQ \~J[R o{Ok)
Emǰ l%Եm
bg-GnsV/Yq~-k%F֢^ d%Kw ! yH`"f J z֟`= %< 1︗Fn#K1/8o~-oioR\MRUk}xd%Kb?bKh-
wZo ʦ!Vx|sB1r>o 85 #B1rk bE #6ȗBZ4/!.r#'`M όwK#?Kmj[R(Zԑj9{Hbp IG+˦NȓNGnw~ԩwK#zs8r a}~O[KbG&b6ϟRs>ێ'F:ԯSu8V]Ӻ Y#{iqػ8T/o6rbq8T/oU>1rxR]pZj_ dH 1rxM 륺1B+N/ޢi˩ N #eK{gnx<'oXˑq/\0,HQD`.&+Y:FmPb94yJ&o/F.J_xks4ӻ] Γ&F. t4&+YY[7jh#eM,,AA4KR(ZJmvo;RˑG&b6ϟ} iwIm=#V"8r x[
5: JLzǡ+|( 1r[T-5xmt>b'5PuOc+hdo/S?a8`,ԏ]pAOoTk|,
.#Fn E OK-FyV*p%r?ƇY[ 1rk=}u[ ^~njK%l|)J tQƇP|)E#NrRcRRzM>?3^?~ԩwK#n76R]tLJ
rd&Fn n/5o
2?R&oTbv ~6#_
Ek]tLJ#$ԫmKP_扑'z~%ό'F ȭWJomLo;ߨKacWzu|QO"CӸz~ժԫsi<=K͑=p9pli(Fn="N txY/i<28uit[l84#Gf:<\x8V@Q=4 /D6} } ;#E3uȦA!NՙMLYu w*F.4*xpiߗS1r_Ht[l} P% u ~f<1r_m#3㉑ %rdV`xb䂿 _t[lVǝ <=KTߗS1r_m1oǝ <%w$6=6~_NN^Wf`Kxܩ .b֖ṔcK걥!\A3㉑ 8
T9bbBXuʦN3sgQ]KX^jD_B]#r·O9r>s?}qKmHp%r?A}/hHp%r yH`"f غc \
țVC1ӑg_6u*F ȭ a}~ukfz"Fnǽ4r\D_B]#q Wm|Pԑ龥ޥB\P?bZ 1Y҉ܠ !uvfֳj^r Wo)-r)7]Z'~5p$qzR OUⅾQTȭM [].#Fnm|/R-r)#G1Oֈ}k#o- Υ~ȓNGnw~ԩwK#6u_oiw)ԏևmLVt"ٙl%|I~F ޮm[jX1~'?4;6rև Gsz.v/
ի4Z~j%F֢^ _-G y I .5!i%o&ߟ %Ny-iKC%N,%lש:s EU?3^ݏM+}NT#{i6÷o^O~nQTȭ^ \0Y[7Jdƾ,ԏ`-Y[Vu),e 域MY[V\`z~KS68Y[V:v ,,o1rK.Kgo
tqV Z6،:vt6u#؍,
FyVG\`76u*ߩo4~: 1rA ;֢p%Kn#jM:u?3^'&_-G.kSGnR?bzs8r^[6p(kߖ8S?3^'&_g 1rױMmk#xofKǝ#Ft:rKcKxܩwK#D{q/\0Gc7 R9c~su{mYׅvLW=H]as)9KRqz f `zkt[l-\ JcS*5\r|1\
R9>.G\08J%<[. V*G å6uG+9Kdwߏ/1\ZˑGGKMHyz b3R/qbI#mu-} KxܩwK#mڋ]۶÷1\D{LK%2;[=ǽ4r8ձomF åQ.#D{q/\0G åF
l~#ձ駦>KI_6.#IdwR Nkj)7^n pulV8r:y!\ Rb3(\b3(ط#Fn/bKh-r#'`kt[l_1\mt[l&ߩߗSIc3XcKxi?bI#J åswK#D{q/\0'ߩo4-6T\0G åF%2;5mƫyMspulE _
{ s֠[2)A}+oi/|Wˑ
tQD.oio4÷Repu^Uk}xF AǮ 1r"JQnlT"CS(E\`7J)n8~ ?>iF.; |/]+p{VbfU?b#ƦN&_?b#<|+FطE #x :7JdƾMJdwڏkZmԌ6RgbBⅽ<;YS^jdo%hdo#ؽ 6M\/bj4ӻї~#L`R(Z.^#W ܗ V #gQ +N/U*A7*su[ASRLJ/o~Ppmj[KR(Zr#'`k\(o'&lJdwZRRi oMxȍ\0g[::=o%2;V:#Fn/bKh-ї06uZˑG&b6ϟN:-pKP_ۋR9K Nǝ#Ft:r˦N-K痠I#Q356u*)E ǝǽ4rY[7J#S N}1r ?(FmPbV/xG.s᷻!`9r}.obo5÷R7J/q8-N/\ǽ4r]A7
?(5>>ow 1r"JQ"3mdo~vcSFطS N#KZԱ t`>^cSRK#q/\`~ ?(5~cSc731oK%2;mJ å$r
Wf#ձG\0G åFcT"CίձGN'/c3ҏ{ScDNL\0G åQT9ocT"C~P|)Eb3Z% 1r-nF}Uz?b䂹ǫTSxaqzUC1rܤ۾v|4K TVx[9MuilWԥ
tAKa ,Fz؏T|#n7
?((FnmI #_
EkP*q
z b3J1#Ef6ht[lF?~O\0ydF?~7KNT/-6 jjb3{s[Uo A#3XT<%[< Gsz.v/u#=^wFiw)/aqz} iwI ?#3ӗ]&&6:V+1rx}ѱR6bv}1GgGZv#GfF>s?_#"FnێG}yd&i?b6pAqzM1Yz #Fn C#aQ=rH]QbTpٿA+-Au1ĽyaV< Tc_Y?K5]'̒@eMN '1vZ%ۯ'u߿u~0UϒYO]=N0 I0%_w8EqYhiԵ|ôBB< 9 ߎ;w;J>§dfW`U{n!;Np;Q8%N
1|[s!:;^ioǝ(,̮ 8zR^Y~UBl wt V6ùيwTr=k/`Ňz}9q5fW>l'u9rxC>Ӟ Oܵ>ڌL+^gkJ;
fW` QiaO [)kөlp;G㸠Mw. =# Vfpt ܂Yܔ.zB |bC q/\-w#:?dV 3Idk}iV܌UnwfIUBl3ݧU2&~fV!C q/ן[-S8VIk*%[>ܟ>,?[a!fBLY՞vL $
{pG04_2l,_9JJXq D}dMd ̯O`zK9-ʅcq:baS{R^pǽC=NJ@MIXS6˗r]U D}d-[)[saS2;vm0˗r
OS5 q+SI)-D%aOY+m|2V՜=^_ӿw:QK?k;XOfG5~47lk!np5wОvы},ҧUn3W a;%Bt*i{ _bٴzp{cD *
1s!8wS wO'žᑺm[[ rL"CShLVGfb䖾zMGf#FnmtLRt!. 1rk{|)Eێ瑙Gr#'`k\H åձ1\%< 1︗FnR!\
Wf-sV^RtձY^-GnR!} V.GPoј۶K >K.j9rxJM΅ѷH?域
ˢ1m5*5A7p.,} 6](rwK#΅6եQTs}Q4PM2w|KomK]ܳG^
{΅6եQȉ/h\H å yH`"f j><.`R/q'dKydV/qbq/F&oC:6[4涭8F&҇cu eZF&oC1\ڏ(ޢ1m5*5A>,} 6](>S+V%9?R wCVw;J}*%wϴiN3zG`ٷ \{nJf[!x*!ח|ZӕkMoM'9]厒{nv*p!V¸iX%i&>3ͪ䞛aV!R'v!ח`I) zB 2yT b{}92{!Rb?^_ӿwƹY~RpJRBOJU>JɖJs+^OJ|O >ɷ!,Bԧha,vJ!`JfI))Jfw0n
1s>p^C-uTw37*aq.z3 vPROBE2.DOC I
! " # $ % & ' ( o) + * - , . / 0 2 1 3 4 5 6 7 9 8 ; : < = > @ ? A B F C D E G H ! jg3y;xO`my|k[߁O yaiVͶ!넉,%[>ewJS$=~W9o}*asy wvM f JZi,&>3A{7M:ߠC< >W>J b{}Nq0c0$r5{af M'5
#t,DQoL;, ;|J^wUL}SJZؓR;uiL+m8ph9ąćz}9q 8onю9SO vΡS+ah;*wsS)k}٧fNɬC)[%>{OV!O 6q9r B |
)!s!:ƹ<9U/ClZ=uf>q\BS2kSU .z}v
1)P'~1ĽyqW k5Tk;X2tG^%BO蹻5DZJZR5?/vы}*a!J5*wsO Is RTNilQ =#|,.ċ^bS"9bP4GǷNwfW`Jfzte埲h TZi,r5M ^-O[4涭8F&蚦1\ڠ.vWˑ LӇgS]EilK}<#[:6>K)<=Km)N/{i䂹AN]7ydKyd֏`.Ꙡ
9<ҏ( 9$#-6Kk.5M].sGfFc%<2#ѷ CL"C~P|)EMӇG å yd;5%T<%[< Gsz.v/u#=^wFiw)/aqz} iwI ?#3ӗ]&&6:V+1rx}ѱR6fЀ̧lLhW`,vdP]Qbgjm֚ݧiP͒P َȄ]bt䞛tLܩCfZoM,DvыB ύ b{}Nq0c;+e~':W d~ׂ;Vo'4]36ڿ*%̎U8b>7bC[[fV *#>X\%mF+m
OЋ b{}9o#UxW KȫUNIiX\%$w-i
]gw܆|ʖwV!mW +տ %9bKfU* ܱJXڤ?`fWzA*P%sNkϠOW {.|IJӷ l Qł8g!EU2&~gWzͧlū67B V's!Zs+ O#}NQ]}q ['JsY4.DsX{k?%6~C
1s[C q/SUTLW e03f!RfG*a!r
zS2C]%
zv!3Mt~\x+m9o b{}Nq0cy:tڴ I2s3%v[B$gQrݩc L̒~OSDV#\j-O"[3i0obڴ%!8fRBU$g̿vLd} B]%ROʵdvы]0o#UxW Ş !8fRB\)X\ܝ>]^?R}S6bO ~ӻ۠(\%vI]{V0} k3$g;jύxvȎ>eC<@6ح!8fRB\)X\ܝ>]^?R}S6bO ~ӻ۠(\%vI]{V0}1xKɨWTr=k/YO ~gl0 1shWIim<ڬ&
J 1Paw=Q7
~w.ql0k=.U wxOדy C<@ׁsq1Ľ ^a NJw!k0ߎITdV 4٘W ;{lƹ<@vB |^q1Ľ ^a *iMrvT<݅D/vLɬ]sbO o~*aƿ C<@ zC q/8wDZJZ{.A-2N:A//CMwы}(:W {.b߀l! b{}9v?IwZ!x)#N.so┌/T)DG1 ~o&֍ٓM~h?2.P?}]ɒ%$Njf\.PPDerdqw!O㮇Flv8nqMM8e*ɧk 3.|vUanqC6@8"Nn0a>sqqU j1.P#qv4ϴ A5~]nhPߨ^wru?UȢCث][]ogV!U~mѻN
Y4v{UO]V ] *dءd*`j$ή&*ɧ۸ T.c7 V
Ը *.[%@*][5N>Jbp0aꉳ Bn,erF|Hǟ=܉_boLɬq6OtUTL 3u8}V `|̧l§&~!X% y TUB}9:;w~OO!oJJ*a!. \(Y%Lr %y wzfū_blye#!۲
{=^OX~Rp^mَv?KuiY-ۑgs!x>~q1Ľ RӉ_boS*ah[JFݬMmZO > SGUX]rJf.*amzR^}Z%LƹHC< b{}Nq0c0 5}S2J;b
OS0*a!U>;vmpXJߕ?h~1ĽX8w1GǷNwfW`Jf;Jr!ϒY*c.!V9zG`
|ƴJXv*aGabv~PROBE2.PAS Y
o! " $ # % & ' ( * ) + , - . / 0 1 2 3 4 5 7 6 8 9 : ; = < > ? @ A B C D E F G H I J K L N M O P R Q U S T V X W g(/1iORL:Dv|AՎ]T 6 =OnՔ?}]ɒ%$Nɚ Aȭ
] >|>§)/g *d!UnAȭ
]F'9rx%fR8VIkqG\#x9b, UB_;] fn+=ƹKa+֮tJ?# b{}Nq0cN'9]厒{nU YW +a[+מE/}Z%(Z!xr^CuwOk;>M}@0S6%3_]bͶbn\DnקlsS2.*]bL,JlsHoǔxY>َ7S2)k '~1Ľ Nwы}3OYvVmmwJf=DY"ٯ`ٷ+מE/IZb!ZsG9b]a 2ԝNr %y ߫=>%?R w!VV=7%^JQrϵB l!]%쭟8w1}6L`˧lJf0>e~[m-쪰O BnUڢw!zz Vثz*i9J6wFzϮ|>* @ثF3n0=vC BnH]fr+U#Aȭ>2Uߨ^wUav8Ϯ VثF3-zgr8J T[erdqQߐ_[jBq{Hc
]FdS]%M6dS=Z; ԏgmbd S
] Bnl0a7H٭ ] Bnl05g>]##N>e*IF>O,O/gWI8;tn/!:Y!Jv3ul0%֍U Z!4gMqv^ pvUq@q*`JGd>URj@q*`j$n'6
TjjS5 糫$ 4r'w2U ljBi$ήR` VCNt1ĽRrsy w@?~wJf'(+-Cook! OuW %ׂQJs+a)vPܝȾS $/T8/6`o`nLdߩr:{ qM=7U
OuY q^y8N+Ɩ
b{};}*dU>W+ezSh #kv/> ]{uǴJX,%[`v8ZS&RfG*aa,N{GSz];P|ai:.n+!8Ps>%sw"t5;)[!+Ϊ͓U+Xʵdvы}gj x Ys Cuwsy ŎJXA%e03f1zG>]Qbflk0+^{#>͒~O3X%,wDJX㜹wyV'ĔN' Bnu,[%U~;7w[ 캊y~p+F֧B Wzn|>J߉B JeN;q>
Y4vbV]%{ ~pEcEuoHN6;3߉pkN1[?=HYݦ {UjpvUR {UjpvUao=n0R"ݒN1oN%F쪰OWW\i$ή&*)
T _M(NN\.%-s}ϯQ$ήpw,n''q Htu?UȢC^w-;gWI8;3pޡnu *dء麑8J?8tnjB j\xM h ug4JZGv)nd[nj
.P#qv;gO6E6|q >.dd
wqH#vg|vmNk-;gWIO#qvӵqN>Jbpjw Bn^F3-zgrQkѭzKȭ Z7gW}|h11{gW` V.P#qvUاw ; \_qv4C5?ӏgWIp>]N
2y7W[,;^][%o jH] xN.*{W]V ] *dءd*`j$ή&v)nS` V.P#qv+{;{)
wq >.dd(s@lg6v--WIꉳ[[ow EUW'n?羝w EU*'nm<=/x<Ug\ }S[Oc7|$+#F*)w)nIWgh?Oп8J
܂2j\ EկL3QM Zf͵\ UqC_H]% , /n0R"ݒN1p'd!~"qv@l\ EˍU-Ns+ήpwZ =@L8J
] 27&eU_v)(sv?A2xp> j}Q&w68 gWm<=[/Zgl 28zӋ-NNug j O/TЩ[*~N
Ϸ(s,zou$n9io%[{vD̸r$
鳫Ihm-vv>ʯƌk|9-7NE>A2q=3(sv?A2qH]zRb-Ns+ή
[=F䦊Y)n'P[ϓx٭]ɒ%$Nj xgp>]%tS~FM|vUaBP๑8* {Y8Jlvg%gxvUa &66gWScxzn
pqv4gM~-N >K1Y)Ym!t-;gWI>_OM|vUaBPbc#qvU88ƌ8Jlvg-Wm<=7x?]%|vU''. Fp
p)UdSN6E:x٭]ɒ%$Nj}Q/xOпL\1"j$nC]% wB J6dp EXY qvUNN\k)NVn Up'd!ո)?ާ͍khss/Zn$ήB_ׂr_ܨ^f$n+U[ow Eկz2 cvzm֍UGF>O,O/gWo)ή&*)? U=qvӕC}.:֭~'7? 4*f3 xǬ gWIp>]NG{Y O#qvU ] Bnl0%i©Af0erdq8* Aȭ
]F쪰OWn v43fQ6727_7N. t-4Mqv4gMqv+{;q^8{) @xEه} $;eCʍX8MGX}
|>M
=qv+7܈`q7w٭OM^_gsSWUCʍ"gڥ,YB┬:)}8e*ɧkhoHcƵ\ ~']%|vU''6gW--c>sq--7gWG3 =dgq.nh&㯇H]f y4f\[ow Eˍ5Ҙqm<=/x<F|vU 糫ĵzRF*}WŹMqv4C +6X<r~Oׂrg\ {Ϯ|>*ZJy{WŹfP=/x<~`(sc~'ݲ|v$#g'$x 5R?^(NNw 5j5$vH]%tS!?WoZ~'_o0erdqQAf0erdq8JJG` V.P#qv;g d}Q^MqdS j}Q&wRL,!qJO $;eCʍX8MGX}
|>M
=qv+7܈`q7w٭O-;fwr9Pٻ)p$nc!w2U H_O7WX5 糫$^Cثi?#ή8io%E*Ϲ7^6L6EȭpDfq*Bdcfegq.n$b nh8J߉vqH1+ήkh8JIy{UNN\k)7gWIKtK:=ļ:ÝEcaqH]%.E{2v)(sX<'_ >K1Y)Y/ܼOпL\1"j$n_ٻ6Uy.a}.1O]%Ɉ,0'Oп VpC*)~&3 Y4v(ِ--ce
w-;gWIrc^Mlt虸rch$ή|n\12_%Z:['JYk\.T8J߉k- 1ʍ8JZ/Zi̸|;~')~bϔ)~bꉳ$NȢCثqSO5ׂr+S:mTӇ*|W{`ܥD% b^NȢC \cgq.nh&㯇܈ UR( d;xWUdSN6E:)}o?}vkbd SB|gp>]%t--W~m<=/x<䳫$v8Ϯ
!
M#qvU2ƌkh8Jlvgu/Zxz._`xEt--W~m<=[/ZN>Jb0NN\ r4gW--ci̸l 2ƌ8v!7gW}l rߨ^wUav8Ϯ҇W*0"7UG3 =dU{*}W4f\ EˍUɦ8*ӵ_\˼|;_%k|9-W+䳫p>]''U`DnY/Z^5Ҙq--7gW'*ii?hxzy_gWIp>]f 6g\ l 28*lh{3z._`xE*iDfL6/$F:l, u$ήd${vUqX3Y14gW}rc諁lG>ڑ7p4UҒhgʍQ}.n\[f\3c\ۮ:) ,~*In ثz&$
鳫kkqC^MM3Zc(s@f5Ӹ!c G]^3c 糫N0@;D\.T8=E##g'N?2.P\!J6w7gWkp>]ud"qvձq^pB 4gW O>s tɷi>wH]u|::C0=߉~]uLqw jH]upwu}v4$Z7gWo)ή
Skp>]ud"qvI
2y7727KSzzɮ^
eCq)P
vbPROBE3.PAS g
! o# " % $ & ' ( * ) + , - / . 0 1 2 3 4 5 6 7 8 : 9 ; < = > ? @ A C B D E G F H I J K L M N O P R Q T S V U W X Y Z [ \ ] ^ _ ` a c f e b d !i0^]m>?~b3,Rg@Q1Şk
Tg}uRH6Qj"Z_qi:
q }7Fe,F Rܩ{4,YVm Bj7R~zL>&RۄVᮌ_ Rc'?#,r`#6ShtO+7B*{R5n=NoyIeYT_6U~KžlRT
:[K>2XH6A8YzX}/ȪqI3RzK&^'RF7D n-7Ȕob!ٜ^d^R~@VA>`
dSK{hyN,4nЉ80ZBo)B*s=Hu-c O3N\UgYe.U~@mguON,3N B*S3B*S~@;CYoyIeYʼn6҉Tpw,UK/Ȫ^6UŽ;CY:~^m 3Ū^6UŽ;CY3 qI'R9pc}nj%FU2x/z{U]㡺 t$αZ'?#,6 ]9 !g3ouT]F9v:NcԸA'tk R9clN3e)NPN,e֥/h^6UŽ;CY:McZ [K荐{RyláW v o{2b_6~5$&,LlT o#S+7Mȑan~S{L>&RߍTMTț%
Az ?(6P=8g(K=3 /&nJ$@*%hY^3UŽ;CY:b龱n~Ϫڑ7KB*S]6 eYp
dUq/PN,?u eYm 3Ū}B*S9P{ '@V ej%e};" ;Qgx4̱+l RߍTė?R9pce!1t`!1t`!1t/*7{Td-UڜU * `mU[V"rWzz ɦ[~6u - :w4}ub!7VҍnTÊBuRH6Qj"Z_j~B4v_}M,YZBj}9̱ g5ggV# ;qu ),VwXBjݵFsDdnj-v=Bjc*ܕCj{R9gTPlTDLv{3,r7H# ;qTD^_R9`X]E t"L=R9m m=u+N^R9MԋYE,_kFJ k4[ob!A'Kw=?3:efb!.0=}d{RۄVᮌ_ Rc'?#,r &˽A'E3{gXg٪H {>uks g{ ɦg *Wz=pIge[]oɭog;lv&R9M
R9`szt/(̱ Vjj~KˏmWp؉TlqNāzL>&R9pw,U~@gXʼn6҉XYHO{v{d-]~lb_6P3NYU~@gX^g\ob!1tK/ER
qI*z_^" ;4Y^M,'==nBjc~K% žl׳m ˳ly=}@gwtb!yoi$^Bj}MnuS~NeE9vR!n)U?|NeE9vB4v_}M,$ {mH v=B*9
RhY
˭Kj0NNV=h5#E e) ?{XHiܠq`#STʲ'@Vg(K'RF7D n-7Ȕob!ٜ^d:gX3Vj0Nޮ{V:, Nzg4#5yg ڳrMN,4nЉ80ZBo)B*9
RŽm VauS
Ɖ6ɪд(6T
:[K>2XHO:,Kq
dUq/PN,4nЉ80ZBo)B*s=Hu-c O8;CY*%hYUK3Ū:gtb!7VR{ce!ԸA'tk Qw4}ub!>&WH7Vֺ:Ͽ3ېBrRTÊB,YZBj# ;q؉j]W{{RۄVuXH{z~, + + 7BM~ېBrR eyYH4KKHmęc' []݃qB
uR.{Z RcTd-~m"q'Z ͭ\c
AsltTDg-33 ɦ[y.7f7^WE=BgTUgkkB*b`mjܘulz9
A:eB*bzkƏUOrM s]ThFh^'R9 ^EzqNāVIc!7VֺAk{<6{Ѻ:Ͽ3ېڸA't뿈c!O~FXH_cnEkilh)d_~l.z. eyf'
_4[ob!ri
Rj=wb!{FA%7w--Ekyoub!JEoHԯUTm[7UR見~ K6:ruR8toE63tD,^6~g({=NXdb!}>&,-!g3ouu U]㡺 tXBGHR
:[K>2XHmL6)r~R.v21FMx4:{2b_6EfidfM,v#x_ Rc'?#,r &n_6Peiѹd*{ճjPY/qIUuf:M,r &gyo-e} oU;Z귪Q7ʁlo$K w͍ɦ[슿eϮ 8sDe B*ѴpW' l4`
TBo !Nj8s߈3N_6 < |B*O1tK@?Xʟ覄'p[mzG ~b_6P݆T" ;q[F9v҉T F9vR
r|UX:c5r`:UnY֥=3:Ehݔv=:CooH [P
\%v=B*];-dk4|XH>2XH*o,rHF9vL)wfknL6R?u\,҈_F9vB*WFl}(7ט+R9טl^kj_9B*WMk}`AzV}`A.N,r1tK=3YU5bLUA.?XH*c龱Sl
gWIf@m ˳,PN,r1tKVeu8sl4Z%tEw. \FrŖ3_B*Sl9CY]E \FSl9CYK荐Ub#rP,8sߙR9rP{Rb`m Tߗ[~y8s_hL6Ҹ1rӭ%F r}M,r &tRBU("{V0&B*bB*6ƃХb N}AJ荐 {TMxCB*Ct;Sn<];-5] 5eiuG#ib!7VR9 b!A'KŠ?= VUB*6ҥߍKŠ?= _NҸA'tk G\ x P3B*bz^'R9dvwxwZ #ѩkAjT,i1dGB*[_,1-B*R:aw,ʼn6bU <: r|UXf,TMTț%
Azb= %g'@g=CYY,XH6ʲ'@Vg(K'RF
wG eQ:rҩ{4 > J荐{Ry<#r=r3'a!qNāVB*z,뿈c!6A8Ym VauS
Ɖ6ɪmRKZi1TlqNāzL>&R9`sztv%hY
˭Kj0NNV=;RIJi1TlqNāzL>&R9MjG,Q҉T)?u eYm 3Ū}B*{dUa@&R_L6R#o(NAxDUhYg(K=3Ū ^'Rw,ʼn6҉Tڜ^}"YJ荐{Ry<~O?P8;CY:);CY3VIc!s{K} B*H߳ZBo/y>ce!Πu)N:p
ԩz];CY ˭Kg(~mNSHO>K*l8:,,ξO5Xeu-x~&R9M
R9טx˓'+z luy2P"Y7zXuVtt,]|?TʵMB*R^V o#p=ިA?#wT8ha[;uF@<||Ϫ臨'yʁ= GH->~TȔob!7VR9gT<2X~&R9`E9v/ ϮF R܉TDprEEUU3 ɦ[i1 "YΣUl+z \:0sB*b#S}QKmu k]ê ש5T'o,>~gnB*6ґ(:!='==n3qXHW76#EwcmiёHvZ!='==n3bOTdB*F/(7̱hL6//U~@ g_'^'R6ґ~/M.R
q؉NS јlqc{(B*BL6 ub!?a# tRt/U~@ g4ɦ[7f7^XHOHѽTeErF9vR:ɦ[/(7̱B*F:2e֥^"9z# ;i*7M4n:yo6{ XHXYH*oｺq],uRJ {T*g;SUk T {TTeErF9vR}AJ荐ʟcm+&n:mk# tR
q؉N%FcƍY'fF'Rmd-8s\:mk# tR
q؉N%FcƍY'f 7VR97VR+ i1dʢt wARa 'u
ߗcvb! 3VIc!XYH{v{[KŲ:z,r.ʼn6Pg_;N:UKg(au eyOj
:[YHF:2UbV#Sӭ%FH v=B*~n[@&R_L6R#oaՋbz{E36{ Ⱦ$@= A{ ];-dk4|XHXYHmܠq`_DﱐZ x++k~UmH!D}hm|g XH4KKH eQ:rAgATco ΐZ(yڜqDn{ {=NXH-AW_= gTBjq&U,`!a#6 ]9 !O~FXH eqfXH d=R97D nu{,r7 'Kq
d*,.}8z;Yp
TGbP Hӭ%F r}M,r7 'KK8
b[>`hzvhrbP H^{lv E4
GTM=[G zVw=?+:ʁ+ LK}QKmuj.ԋrEE&Wӭ"{ԺZ__GU<[XՑ+ʽG%xz]\eL67XH*cB*W90qFLv{\U \F90q}l 8lUF^1fiDX;Un=>;c< RBoT !M
R9yo5>ߗcvb!U3VIc!+ <ލTwce!m]}o-7B<뱲ʁ+ HG;쌵Y7D nTBoT`#?edb!d-U;fVH\AxuXG oBB*n,r`# 7D n-7ꮝF5N,r
t"L=R9TDOZ*KgH:M|vtS*Qx귰ds#W!7VҍnT
)$w(O{JPiXH*;CY3VWӃc&
weZ {T?a!p
i
gR
'@V_ǘ3+lNҸA't+ ڍtdZ;0ggҸA'tkz# !>q B*b閪 yD
ԗdGG"kc=JldZm 砽Tk罥{ Z xqNāVBMŠYp
)$w(OO:>iXH~ lsL,V_H!{ֹjP-,ns%=c!Q0<\}IxDW E\}IxD叅qgㄅcZ=_ gR7D nu{,~ssRQj* )d:
*KƦ?~3N5Ӊݏ`U~!YWU\^U~Bj6܆ʽGKmub!nfmHF%: " xmK荐Z {TDg
zEwk݆*Q#SVN Z7}ґuRH6Qj"Z_c f!}>&㥐Z=.j_tc!wn
ېZ5^;
[uS0^݆Ԫ3 p発
Uğvg
!'mާyzL>&RMnV
*KRdՠ*L'~TtjPYOBjcqQêAe &WH7VֺBtLuRH6Qj"Z_=pXHc&
weZ {Tl]}o-7B*{R^V o#ݣ= [9>B*c f!L9*,3B*b+ܿՠ9<)W$_p՛XH퍕)r@NKcU܉Tlu=gnZgG{ >gy,yBj}Mnuӧz7
)$7g>2JBgvnC
!g76mmll}ln~s.? *dϺqc֟bPęc'XHBg76m) E9vBwgR~3N:Rg
:[]E HpF ѧz7^H-v=B*|߳
e&N,r &npߎ kFV5z\LxtS1m |ob!>qB*R^V o#p=ިA?#wT8W==P<ˋgyOγ|??R{ce!
RESCUE.COM VERSION 2.0
Author: Steve Mitton
7662 Fallswood Way
Lorton, Va. 22039 (tel 703 339-5842)
Language: TURBO PASCAL ver 3.0
Note RESCUE.PA wa writte fo publi domai us only I
i no intende fo commercia use.
Purpose:
T locat los tex i memor an writ i t fil
calle RESCUE.TXTWBoL>&R9pce!L9*,3B*bɻKƮBR\ob!'mާyz1t7x2ob!1tXhsءꬓw|_ֳTq
N\%Nc-Td}cl=ukI^| ZϪͽ'nʼn6;ʁlAG9vҌˏmWz9zVjR53ىb db!1tX<Ŗ37H|vUŖ3XH@L6zcn >OgUemnb*q[lL,r &7bgg([ؗ
zV_6oThe files named .CPM are actually .COM files for CP/M. If you copy the files to a
CP/M system without using 22DISK, just rename all *.CPM to .COM
FW܌Tx ,,r\OTgw,r\O|a x'>հb ly'*;CY^R9Es?Q?|NeE9vB*\Oĉ _6Pęc',r*3/=* E9v҉Tx*z'NAL,rs?Q gy\}ґ,rSʟ5\ 5XH퍕 _sⱐbz=jG,Q wRȞuKƦ?~3N:ԟB ضjtc:9vRD$@c{{ ɦ[s*֟q>MWm
Background:
Man time a ove anxiou programmer especiall i
TURBϠ PASCAL wil attemp t ru ne o update
progra befor th tex i save t file Thi
practic ca caus muc grie i th progra get hun
u i a infinit loop o th progra cause war
boo bac t th operatin system Severa article
hav bee publishe i magazineYSqb!1tK땃Vmsݣ9gU_ms+8-@&R9Mų6WcG(AU~ M,r)Weƚ3ʁlo,^yd*=}fAx\B}PߛXH@L67<23Vg_~lb_6,] =CYR Гj9M,r &W oAﱖЫl4Zzd.&R9M+AK^ s՝kl4Zzd_ߛXH@L67MWm=CYHˏmWp 7ʁlo,^y%S9h5Jˏǭ] u=Td}c-*NŠETL}Ix{ ɦ[@AJ~ K~{
an clu newsletter
whic outline fou ste proces t recove los
text Th algorith use t accomplis thi tas i a
follows:
1.Locat los tex i memor wit DDT.COM
transien progra fro Digita Researc tha
i provide wit thei CP/ operatin system
notin th addres wher th tex start an
ends.tex whe i i loaded However i fo an
reaso yo thin you tex i i th firs 16
o memory us th CP/͠ sav comman a
follows
A>save 63 rescue.16K
Thi fil ca the b calle b DDT.COM
move t highe memor an the rescue wit
RESCUE.CO a follows:
ocumentation
2. Display Help Menu
3. Begin search for lost text using commands in menu
4. Mark START address - 'S' command
5Continusearc fo en o los tex usin command in menu
6. Mark END address - 'E' command
7. Verify START/END addresses and drive to write RESCUE.TXT
8. If step #7 is OK
(a) Write file RESCUE.TXT
(b) EXIT program
fro th las addres shown
Rescue.co alway keep trac o las addres
scanned.
===> TO RECLAIM AN AREA OF MEMORY <===
S -- T specif STARTIN addres fo rescue.txt Se
not unde 'A above.
E -- T specif a ENDIN address Th star addres
mus b marke befor an en addres i selected
Onc bot star an en
2. Calculat th siz o th tex usin DDT' 'h
command conver thi t decima an divid b
25 (decimal t ge th numbe o page t
sav (i decimal).
3.Mov tex s that i start a addres 10HE
usin th DD 'm command.
4. Save text usin th CP/M 'save' command
RESCUE.CO͠ simplifie thi cumbersom
A>ddt rescue.16k (type this)
DDT VER 2.2 (see this)
NEXT PC (watch for '_' prompt)
4000 100
_m100,4000,4100 (type this)
_^C
A loaRESCUŠan proceed)
2
A -- To specify an ADDRotherwise
(a) Make necessary corrections using commands in menu
(b) Continue at step #7
Rescue operating commands:
Q -- To QUIT rescue operation.
===> TO SEARCH THROUGH MEMORY <===
B -- T BEGI th search Th defaul addres t begi
th scrol i 16000 sinc RESCUE.CO i 16K.
Note: I i doubtfu tha RESCU wil overwrit you
addresse hav bee chosen
th use wil b giv chanc t verif thes
addresse a wel a th driv yo wan RESCUE.TX
sen to.
WARNING: T b sur you fil contain a END-OF-
FIL characte selec th addres o th
lin tha i a leas tw line belo
wher yo se th en o you text.
process I
provide saf an use friendl mechanis tha wil
enabl it use t comfortabl searc memor an ente
th addresse wher th tex begin an ends Wit
thi informatio RESCUE.CO wil writ tha specifie
bloc o memor t th fil RESCUE.TXT.
1
Detailed Operationa Algorithm
. Displa buil i dESS to start/restart scrolling.
Note: TURBϠ PASCA an WOR STA alway loa you
tex a th sam address.
TURBO PASCAL ver 3.0 loads text beginning at 31733.
WOR STA ve 3. load tex beginnin a 33901.
^S -- Temporarily pauses or resumes scroll.
M -- Halts scroll and displays help MENU.
C -- CONTINUŠ th scrol
D -- T specif th DRIV tha rescue.tx i t b sen
t ( thr P) I no selecte th defaul driv i
assumed.
W -- T WRITŠ RESCUE.TXT t th dis i th driv
specified Yo wil b give chanc t verif th
driv selecte an th star an endin addresse
befor RESCUE.TX i written.
Command notes:
1.An erro wil resukQ[_ě/R+l8wB^op k =^
'ƶ$&!XnF2*st! @A.r|^̖d`lz%U,7#_VqI _[퇺CԖ9wloF| T`{} TCz)qW"U7#_Vqq O= (zI XnF *qy
u륿 @ccc3R%_ ]?O8V]f˪8AxBwm w\eG\dVȗUqh< x1oF2Rȟ16RLDI:r+ \z iq͝>q#W~HM٥#W:t*O HMٙt*V X=V_ґX8Q?묳?I:r;o68YIGb;¦#Wd#8
64ˠ syste usin WOR STAR RESCU ca recove
fil u to about 25 i length.
I' b delighte t hea an feedback successe o
failures Goo luck!!
4
rpݣ ӰT7i3&-⿂^CZřJGuۂx<1S?9sՅi+Tר%փE_~]c[l`c3 =Wnzs.P5* V7Pv5=9It \C.:
W{` @\i(y2~''Ie5D(L#GUe5. Չ: xmIM':3t \YE
6 m,tyb m7|ޱL#GϲZY^elâOnقmmIMCt \ٿ @/8g^l\c[l`c'튾ƀfT:O{\u{yeK譱-I6ɓv-ekDes]ރJGu-_+оϜEV`Lތ<]l J7*HlpV6QA
y ژnãґ)eH|Y~ G tC5yPlavZRESCUE.PAS q
o " ! $ # % ' & ( ) + * - , / . 0 1 2 3 4 5 7 6 8 9 : < ; = ? > @ B A C D E F G I H J K L N M O Q P R T S U W V X Y Z \ [ ^ ] _ ` a b d c e g f j i k h m n p o l w#6 RȗU7#_k$0XWsу^=|Λ #[dT:O{\SFGĤjY/nґrpݣ `ML ]&jbYޘƶ$&O^T:O{\ 5$a&VNهX<$lt \*L&jbE 5vu `z32= |{yJ:rK(AVe]ȱ
=:h * _|Q
%yT:r{~o#5)2Fb-tU@\d5Q#W#?5R08#i/+#ތ<]yOpBLO)CjB/Fjx#\Nm=Lt6A0n?\k`pzӑ[)ޑ= \h{3wrB tdzJR#D =W-I6ɓvZL#GU,b4*l`]c&qvѿҸq2[ g`=S?9s6E_d$wzҾ>? + ^L#ທ =WNbwB^o=Xc[l`c'zu
Iҟ1ƶdΉ/WثIb >q`~ƶdjbs=~$F&:[-I6IpHE?Sˉzp 8&^ =/r½(f*s=Ie-21U3=_<ڟ \\NvNˉD
Ûtv O{7#LZVK#pu\dkcIJGn- Ns9QK5ֳ$ pN~^#mI%!-x - ybq&T:rkzz2I$Rdw[2F
3=_\:cf_ @z }5RtH5V`]vF*x_q.dF
Uȭ=$C/Htl7K"?NO{ ֍tN4I^Mt'=z=U#+ՄJGnrpݣg{ԃHD
62i8yMtL#?93g* ԲHar?rKlFb5iNV`HX/{' Nf*Vӓz!i?* $^#5IkTG;S?9s ]h.2icKيLX6Z ]m>,zL#G5袯QcK#V̖ m-xT:O.== ǫ
ONN7ހQ-2ތ|YB ,2[r ٝsǹ-2[d<]U3m6Q+QȲL ґrpy O{.
{3CN)G [輑΅6 = L
#I:r^:r;}{:ȭ}\u Gm{mlFKD?e.jOssb䪋|Dg8WYM [wen4T:r- _ \u} y }#WY-tUGjvEtj t`6\w >>rխuzy Lӑnທ\5t䑫nMϽ6y#W݊_j U'9:Uc OG 궙p}[U\yNO۪(6fQ9 ?9j;rխB\e'=&j
JtxT<bdygґM }wl>rխ}< uzGplF'=O&:OMuEtjy f* *.
G>>rx/% Wߎlfw|#W{-l"o䪋:o*kMGw ͦWͧ _}8(8J `9{T]=o`9y 28 !? "9 ! ! >2 :D]SXN]D [ (!e }̈́A8Q0G: x@!\ w#
( yV. V!h 6 #
(*(.(!8}(*(̈́w#>?> w#a{ |͒} ͛Ɛ'@'7||}>" C " 6 # " " ͐ͩ* B" [ R5 * " ^#V#a}.;
OJ
, ;
!U
>,k- o& 0%,`
}g; }؉ }颋.:}8c~I$I~L*kٷx˸;
}0G,͙< },-(-J
!
>0
a`
o8 Oþ
>u m. `1pF,t6|!wS<.z}[ |%FXc~ur1}Oٯx(<˸ͨ 8;
!~Jͨ 0O!> <ͨ 8 = 7 <`
O ;
7 0
W-J
OT0 j
oD,:j
!I}袋.}8c~I$I~L!>xW^8/w >u J
u`
}>(;
xQ
}} ˸T}ٕ(0D=C ,= ( [ 0%D , 7 ͏ ?(8u x O - ; 8˸x X
,-xG}; }م 9; .>#n 0[ D = - nx P ,-(-˸G,-; }ٕ? 9.>͏ 8u ?= u+-(>O 0u O 8^#V#N#FO /o&9O /o&9!9(> (G!9 w#E͊w}8u RB0 >R@ RR! +ͨ z R! +ͨ z <! +ͨ z <! +ͨ z <! #ͨ z <! +ͨ z T]KB! z> S>))0 = |JJDMgo>jB0 7?= u`
`
77 `
= O n f^VNF! DLT\I!!53!r1!\! > x
#-= o˸xO(- }( x>8(C ,C `iM! >u |; |J>| )=|(DM bo˸ͦ 88 ͦx(0 8> Mx(>-Ͳ{(a y(Ͱͦ
\z(>.Ͳ (Ͱ ~ͦ{>EͲ>+|(|Dg>-Ͳ|/
0:p # ~ # +>0w #,- 6 0#J˸}րogM | . ͫCopyright (C) 1984 BORLAND Inc A KayproDelete2/920/92P = E R T ### &&& ~7#~ =%
o& ͦ oͦ ܐԩͣ }!! "8~#( }:$= +*!Z!*B!!:(=2!Z: <2!! ! :O: :O: ! *B͏ ?x P , 78ƀ8ƀ8ox٨! دoGOW_gɷ ɷ|لg{ً_zيWyىOxوG|ٔg{ٛ_zٚWyٙOx٘Gxٸyٹzٺ{ٻ|ټx٨ xx(ͼ ?}ٽÏ }ց; <(; 7D = |٤g{٣_z٢Wy١Ox٠GD
u J
}x>u u}ƀ/ƀo;
-J
}0W-J
W,}l˸ͨ 8 ;
`
x( -ͨ 8J
-ͨ 8,J
}l8;*!`
! >u`
`
u--- J
,,,-xGg?+2n* 8t
z~,->u xu "
(C = ~ > x 0w #xG%P %P ZJDM%P = _ ~6 5 i+~ hìx-Sx9?+ {Η@}|C C gZJDM0D ,7}o˸ #yO!@ 9i&
# w# /w#* ###w* N#FB ͟r+s> ! T]>)j)0 0= UR! #U* ^#V#N#F#^#V>">!2 DM" ~x(L * : O (o: " C}=( ?* - N#Fp+qq#p! * F+N+++V+^Bq#p>>> S RѷR * s#r$ s#r" S " ! N#FB(^x * 6 #[ <(H* ! K q#p##K [ ! * ! 4 #4! x * $ * >w " " {_! " * nf}(HR0n f"
^ VMDn fu tqp
J= B== ͯ }8= ͵ }/ͭ !* ###~-_ ~(4Q6 * >2 >* ##w: >* ##~* #~(E[ ( (
(
!] [ ( (
((w#(6 !] ~ -#8~ >7 [>OkͼMs
#rkͼpX
á[
[
(( #w(q* #~ [
(
* ##~6 ͜O$* #~(08 ʦ =ʦ ==ʩ =ʬ ò +###~-_ q46 ͡> * : 4^ q}Ò* |(b Ŕ; Copyright (C) 1985 by Steve Mitton (tel 703 339-5842).͐b Ŕ: Released to the PUBLIC DOMAIN for non-commercial use.͐b R͐b Ŕ" The purpose of RESCUE.COM is:͐b Ŕ6 (1) to SEARCH the TPA for a lost program text͐b Ŕand once found,͐b Ŕ/ (2) to WRITE it to disk as RESCUE.TXT.͐b ŔA In principal, a lost text can be recovered after a WARM BOOT͐b Ŕ?(control--c), and sometimes after a COLD BOOT (restart button).͐b R w#! 9! E9!! 9~(+F͊!" 9! (#>2 * Ͳ" |>" : (
͆ * 6 #w* 6 #6 !\ $ ![ (̈́(
#:~CON TRMKBDLSTAUXUSR>2 $* #~ Ͷ$* : > >w###6 #6 ++p>2 S -$Ͷ: * 6###w w#w$ w#w: ##N#F* B> w#w#[ s#r >2 S$Ͷ$* 6 # - Nw#Fwq#p#6#w#w#w* : (
͒* s#r* s#r" * 5 K B ! >u ~#fo{_" * R0Rn fR0K qpu ts rNF ( ^ VNF^ V* S u tK qp R* R(~ w ~wnf ut" 6 # * * ! " " * NFy( * " * B0C n f* [ R* " * RS [ s#r^#VS >O" w2 x2 ! " "
@* >2 " ! " " " !\ Ͳ* : ! ~6 go(\ R* s#r _2 x( s xM|( M6 -#͐ͦ[ R8
(G> ͒C~͒#* ͦC!h !l TRUEFALSEͦ! 9^#(~#(G~͒#>
͒>
Ò
" F! [(#RR0* 4#4> RR * 4 #4(>>2 $* V(/˖: (#~+ x y2!͵(
=( X: (R* : (###~-_ -͌X> : (" ͟"* ^˞* V˖0 S RѷR8A* N#F#s#r$ 0})jS\́A When a program crashes, load RESCUE.COM immediately. Be sure͐b Ŕ?sure to insert a disk that has enough empty space to accept the͐b ŔArecovered file. The drive you select to write the file RESCUE.TXT͐b Ŕ8on is automatically reset by RESCUE.COM to a R/W status.͐b Ŕ; Learn how to use RESCUE.COM before you really need it.͐b Ŕ8In an emergency, you want to be right -- the first time!͐b Ŕ? Note: In a 64k computer, its memory is deployed like this:͐: * ^ F* < >2 6 " ~͟* - w#ww# ͟" ~ <@* Ͳ !\ <ʮ!\ $ > >2 * |>! * \ $ \ <(! : [1 Á \ ! (f" > 2 : ! <" F( #~ #6 e>! [" N>! ~8>O6* " w
(= (&(" ( : (N 8y(~#x+% (6* #~[* #~ * ~(h#" b= 8(T]DMR0 -a%}̈́o* ! ~6 o& ͠ |ͣ }%^C
User break 1: %
I/O %
Run-time % error ͒%, PC= [ R " ͍%
Program aborted * 1 ! ͍!28 ͲQ2 "}͠ E ! o& }2x*x& ( *}s"t"v!h+._b !h
*v!n͝ *n! NEʌ ! *ts*v *v͡Ô ! *ts! !͡! !͡!@ }2! }2! }2cŔ- RESCUE.COM ver 2.0͐#
b Ŕ1 0 -- 100 reserved for CP/M͐b Ŕ= 100 -- 16,000 occupied by RESCUE.COM itself͐b Ŕ6 16,000 -- 60,000 Transient Program Area͐b Ŕ5 60,000 -- 64,000 CP/M Operating System͐b R͐b Ŕ0 ===> M -- GO TO MENU <=== b ͠ ET&c*& !!}oEʏ&! }2_Ö&! }2_*_& Ŕ
́START ADDRESS = !! ! @́
́END ADDRESS = !! ! @́
ddress] ͐b Ŕ7 A -- [at any time] to specify a start/restart ADDRESS ͐b Ŕ*^S -- temporary pause/resume search scroll͐b Ŕ! M -- pause display to go to MENU͐b Ŕ8 C -- to CONTINUE the scroll from the last address shown͐b R͐b R͐b Ŕ3 ===> TO RECLAIM AN AREA OF MEMORY <===͐b R͐b Ŕ2 S -- to specify a STARTING address for rescue.txt͐b ŔC E -- to specify an ENDING address [important: be sure this address͐b Ŕ; is at least* error ** file write error ??͐b ,*Hn& }2*H#"H*H! NEʉ+R! ́
́!Warning *** End of 64K memory ***! ͐b *& *H! ͯEʾ+*H! ͳ !͡+*H!͡Ŕ !
! q́
!! ! @b H!Ͳ"N*N!E;,*N͙"HZ,*N! ͼ ͙"H H!Ͳ*NR! ! @b (+}2!
m!H tEʟ,͏+*& ! - E,!
*& e.H!ͲD-*& !
NE,-(+}2*& !
NE-͏umber ??͐b -ÿ5`&E35͜&*& }oE05-ÿ5Ŕ
! ́!** error ** end address too smalĺ START ADDRESS = !! ! @́ END ADDRESS = !! ! @b -6R! ́
́#Start address has not been selected͐b -%8M R 6R͐b -%8Q R6R! ́
́ Abort rescue operation? ͐b ! *& !Y aEʫ6R! ́
́** Continue RESCUE ** ͐b -6R! ́
́Abort at user request͐b ! }2%8S R7Ŕ
́&SelectWrite file RESCUE.TXT tob *& @ RQ'Ŕ default drive? ͐b È'A RB҈'Ŕ drive *& ́? ͐b ! *& !Y aEʤ'$+*& !@ R}2 RESCUE TXT!' !! ! ! !
! ! o& }2T! ! o& }2T*T& Q! ! k EW(Ŕ
́Writing file . . .͐b w(ŔCannot open file͐b $+!!Eʪ(!͙! R"Q(!! ͼ ͙! R"Q!!ͼ ! ͙! two lines below the end of your program͐b Ŕ8 so that a proper End-of-File will be included.] ͐b Ŕ< D -- to specify the DRIVE that rescue.txt is to be sent to.͐b Ŕ< W -- to WRITE rescue.txt to the disk in the drive specified͐b Ŕ'Command selected -> GOOD LUCK b ! ! ! R͐b ͕ cR͐b -*& A R53Ŕ
́Address to resume scrolĺ
́+ will resume scroll at last address -> b !!4 *& }oE"3R! ́ ** Input +(+}2Æ,)-!
!. e.H!ͲÆ,D-!
!. e.H!Ͳ͠ E,! o& }2*& ( }2*& ! NEʱ-͠ Ey-! o& }2*& ( }2*& ! NEʱ-Æ,*H! ͯE-*H! ͳ *N͡-*H*N͡Ŕ( ===> MENU <===͐b R͐b Ŕ2 Q -- to QUIT rescue.com at any time͐b R͐b R͐b Ŕ3 ===> TO SEARCH THROUGH MEMORY <=== ͐b R͐b Ŕ; B -- to BEGIN the search [at 16,000, the default a RESCUE.TXT starting address -> b !!4 *& EI7! }2!A }2Ä7Ŕ
! ́ ** Input error ** bad number ??͐b -%8W R7`&Eʰ7͜&*& }oEʭ7-7Ŕ
! ́ ** error ** memory not marked ??͐b -%8R! ́
́** error ** bad command ??͐b -*& Ef2 ́
! ́ ** error ** memory not marked ??͐b -Ï7R! ́
́}2VŔStart address = !! ! @͐b ŔEnd address = !! ! @͐b ŔNumber of sectors = *V& ! ! ͐b Ŕ. . .͐b ! *V& 5zʛ*}2U*Q! "Q! *Q ! }2S! }2P! ! o& }2T*T& ! aE**S& #}2S *! }2P*S& ! N*P& }oE)*S& ! NEʐ*R! ́#** Warning ** error writing sector *U& ! ͐b *U& #÷)! ! o& }2T*T& Q! ! k E*ŔRESCUE.TXT written͐b ! }2$+R! ́ *error ** bad number ??͐b -)3!C }2R͐b %8B RY3! z!͡!%+%8C Rm3!%+%8D Rx4Ŕ
́%Select the drive to write RESCUE.TXT.́
́2 selects default drive, or select 'A' thru 'P'͐b ! *& Q!A !P k }oED4!@ }2Ŕ
́Default drive selected͐b r4Ŕ
́Drive *& ́ selected͐b -%8E R6*& E5Ŕ
́!Select RESCUE.TXT end address -> b !!4 *& }oE5Ŕ
! ́ ** Input error ** bad n$
ͫCopyright (C) 1984 BORLAND Inc A KayproDelete2/920/92P = E R T ### &&& ~7#~ =%
o& ͦ oͦ ܐԩͣ }!! "8~#( }:$= +*!Z!*B!!:(=2!Z: <2!! ! :O: :O: ! *B͏ ?x P , 78ƀ8ƀ8ox٨! دoGOW_gɷ ɷ|لg{ً_zيWyىOxوG|ٔg{ٛ_zٚWyٙOx٘Gxٸyٹzٺ{ٻ|ټx٨ xx(ͼ ?}ٽÏ }ց; <(; 7D = |٤g{٣_z٢Wy١Ox٠GD
u J
}x>u u}ƀ/ƀo;
-J
}0W-J
W,}l˸ͨ 8 ;
`
x( -ͨ 8J
-ͨ 8,J
}l8;*!`
! >u`
`
u--- J
,,,-xGg?+2n* 8t
z~,->u xu H\< z5+)+< z {0Gɯgo||H}||/g}/o#}o& K [ xAJS JDM!b" !6J" DM 'ͬͬd ͬ
ͬ}
w ͦWͧ _}8(8J `9{T]=o`9y x 0w #xG%P %P ZJDM%P = _ ~6 5 i+~ hìx-Sx9?+ {Η@}|C C gZJDM0D ,7}o˸ #yO!@ 9i&
# w# /w#! !45(!.+/ 0y0(
d!kZ!{Z ͈ ͈o& : ( y
͠ |( * " x2 y( >28 !? "9 ! ! >2 :D]SXN]D [ (!e }̈́A8Q0G: x@!\ w#
( yV. V!h 6 #
(*(.(!8}(*(̈́w#>?> w#a{ |͒} ͛Ɛ'@'7||}>" C " 6 # " " ͐ͩ* B" [ R5 * " ^#V#a}.;
OJ
, ;
!U
>,k- o& 0%,`
}g; }؉ }颋.:}8c~I$I~L*kٷx˸;
}0G,͙< },-(-J
!
>0
a`
o8 Oþ
>u m. `1pF,t6|!wS<.z}[ |%FXc~ur1}Oٯx(<˸ͨ 8;
!~Jͨ 0O!> <ͨ 8 = 7 <`
O ;
7 0
W-J
OT0 j
oD,:j
!I}袋.}8c~I$I~L!>xW^8/w >u J
u`
}>(;
xQ
}} ˸T}ٕ(0D=C ,= ( [ 0%D , 7 ͏ ?(8u x O - ; 8˸x X
,-xG}; }م 9; .>#n 0[ D = - nx P ,-(-˸G,-; }ٕ? 9.>͏ 8u ?= u+-(>O 0u O 8 w#! 9! E9!! 9~(+F͊!" 9! (#>2 * Ͳ" |>" : (
͆ * 6 #w* 6 #6 !\ $ ![ (̈́(
#:~CON TRMKBDLSTAUXUSR>2 $* #~ Ͷ$* : > >w###6 #6 ++p>2 S -$Ͷ: * 6###w w#w$ w#w: ##N#F* B> w#w#[ s#r >2 S$Ͷ$* 6 # - Nw#Fwq#p#6#w#w#w* : (
͒^#V#N#FO /o&9O /o&9!9(> (G!9 w#E͊w}8u RB0 >R@ RR! +ͨ z R! +ͨ z <! +ͨ z <! +ͨ z <! #ͨ z <! +ͨ z T]KB! z> S>))0 = |JJDMgo>jB0 7?= u`
`
77 `
= O n f^VNF! DLT\I!!53!r1!\! > x
#-= o˸xO(- }( x>8(C ,C `iM! >u |; |J>| )=|(DM bo˸ͦ 88 ͦx(0 8> Mx(>-Ͳ{(a y(Ͱͦ
\z(>.Ͳ (Ͱ ~ͦ{>EͲ>+|(|Dg>-Ͳ|/
0:p # ~ # +>0w #,- 6 0#J˸}րogM | . %
: * ^ F* < >2 6 " ~͟* - w#ww# ͟" ~ <@* Ͳ !\ <ʮ!\ $ > >2 * |>! * \ $ \ <(! : [1 Á \ ! (f" > 2 : ! <" F( #~ #6 e>! [" N>! ~8>O6* " w
(= (&(" ( : (N 8y(~#x+% (6* #~[* #~ * ~(h#" b= 8(T]DMR0 -a%}̈́o* ! ~6 o& ͠ |ͣ }%^C
User break 1: %
I/O %
Run-time % error ͒%, PC= [ R " ͍%
Program aborted * 1 ! ͍!28 ͲQ2 "}͠ E ! o& }2x*x& ( *}s"t"v!h+._b !h
*v!n͝ *n! NEʌ ! *ts*v *v͡Ô ! *ts! !͡! !͡!@ }2! }2! }2cŔ- RESCUE.COM ver 2.0͐* ###w* N#FB ͟r+s> ! T]>)j)0 0= UR! #U* ^#V#N#F#^#V>">!2 DM" ~x(L * : O (o: " C}=( ?* - N#Fp+qq#p! * F+N+++V+^Bq#p>>> S RѷR * s#r$ s#r" S " ! N#FB(^x * 6 #[ <(H* ! K q#p##K [ ! * ! 4 #4! x * $ * >w " " {_! " * nf}(HR0n f"
^ VMDn fu tqpb Ŕ1 0 -- 100 reserved for CP/M͐b Ŕ= 100 -- 16,000 occupied by RESCUE.COM itself͐b Ŕ6 16,000 -- 60,000 Transient Program Area͐b Ŕ5 60,000 -- 64,000 CP/M Operating System͐b R͐b Ŕ0 ===> M -- GO TO MENU <=== b ͠ ET&c*& !!}oEʏ&! }2_Ö&! }2_*_& Ŕ
́START ADDRESS = !! ! @́
́END ADDRESS = !! ! @́
J= B== ͯ }8= ͵ }/ͭ !* ###~-_ ~(4Q6 * >2 >* ##w: >* ##~* #~(E[ ( (
(
!] [ ( (
((w#(6 !] ~ -#8~ >7 [>OkͼMs
#rkͼpX
á[
[
(( #w(q* #~ [
(
* ##~6 ͜O$* #~(08 ʦ =ʦ ==ʩ =ʬ ò +###~-_ q46 ͡> * : 4^ q}Ò* |(b Ŕ; Copyright (C) 1985 by Steve Mitton (tel 703 339-5842).͐b Ŕ: Released to the PUBLIC DOMAIN for non-commercial use.͐b R͐b Ŕ" The purpose of RESCUE.COM is:͐b Ŕ6 (1) to SEARCH the TPA for a lost program text͐b Ŕand once found,͐b Ŕ/ (2) to WRITE it to disk as RESCUE.TXT.͐b ŔA In principal, a lost text can be recovered after a WARM BOOT͐b Ŕ?(control--c), and sometimes after a COLD BOOT (restart button).͐b R* s#r* s#r" * 5 K B ! >u ~#fo{_" * R0Rn fR0K qpu ts rNF ( ^ VNF^ V* S u tK qp R* R(~ w ~wnf ut" 6 # * * ! " " * NFy( * " * B0C n f* [ R* " * RS [ s#r^#VS >O" w2 x2 ! " "
@* >2 " ! " " " !\ Ͳ* : ! ~6 go(\ R* s#r _2 x( s xWrite file RESCUE.TXT tob *& @ RQ'Ŕ default drive? ͐b È'A RB҈'Ŕ drive *& ́? ͐b ! *& !Y aEʤ'$+*& !@ R}2 RESCUE TXT!' !! ! ! !
! ! o& }2T! ! o& }2T*T& Q! ! k EW(Ŕ
́Writing file . . .͐b w(ŔCannot open file͐b $+!!Eʪ(!͙! R"Q(!! ͼ ͙! R"Q!!ͼ ! ͙! M|( M6 -#͐ͦ[ R8
(G> ͒C~͒#* ͦC!h !l TRUEFALSEͦ! 9^#(~#(G~͒#>
͒>
Ò
" F! [(#RR0* 4#4> RR * 4 #4(>>2 $* V(/˖: (#~+ x y2!͵(
=( X: (R* : (###~-_ -͌X> : (" ͟"* ^˞* V˖0 S RѷR8A* N#F#s#r$ 0})jS\́A When a program crashes, load RESCUE.COM immediately. Be sure͐b Ŕ?sure to insert a disk that has enough empty space to accept the͐b ŔArecovered file. The drive you select to write the file RESCUE.TXT͐b Ŕ8on is automatically reset by RESCUE.COM to a R/W status.͐b Ŕ; Learn how to use RESCUE.COM before you really need it.͐b Ŕ8In an emergency, you want to be right -- the first time!͐b Ŕ? Note: In a 64k computer, its memory is deployed like this:͐&
}2VŔStart address = !! ! @͐b ŔEnd address = !! ! @͐b ŔNumber of sectors = *V& ! ! ͐b Ŕ. . .͐b ! *V& 5zʛ*}2U*Q! "Q! *Q ! }2S! }2P! ! o& }2T*T& ! aE**S& #}2S *! }2P*S& ! N*P& }oE)*S& ! NEʐ*R! ́#** Warning ** error writing sector *U& ! ͐b *U& #÷)! ! o& }2T*T& Q! ! k E*ŔRESCUE.TXT written͐b ! }2$+R! ́ *error ** bad number ??͐b -)3!C }2R͐b %8B RY3! z!͡!%+%8C Rm3!%+%8D Rx4Ŕ
́%Select the drive to write RESCUE.TXT.́
́2 selects default drive, or select 'A' thru 'P'͐b ! *& Q!A !P k }oED4!@ }2Ŕ
́Default drive selected͐b r4Ŕ
́Drive *& ́ selected͐b -%8E R6*& E5Ŕ
́!Select RESCUE.TXT end address -> b !!4 *& }oE5Ŕ
! ́ ** Input error ** bad nddress] ͐b Ŕ7 A -- [at any time] to specify a start/restart ADDRESS ͐b Ŕ*^S -- temporary pause/resume search scroll͐b Ŕ! M -- pause display to go to MENU͐b Ŕ8 C -- to CONTINUE the scroll from the last address shown͐b R͐b R͐b Ŕ3 ===> TO RECLAIM AN AREA OF MEMORY <===͐b R͐b Ŕ2 S -- to specify a STARTING address for rescue.txt͐b ŔC E -- to specify an ENDING address [important: be sure this address͐b Ŕ; is at least! 9"1P * . "
USQ Version 1.19 Dave Rand 07/28/1983 2 2:
Use: USQ afn [afn afn ...] [destination drive:] >2
* ! 6x
: ʗ2 _ ! 6 ~#a{_:>
: _ ! l 2 <2m]"! "!X
=:Q P
Output drive = :P 2@ : _͋"*"*~ #pwb" *}
No file(s) found. *""* |g}o| g} o%|
Out of memory. Use more specific filenames. *"
$$. ""** error ** file write error ??͐b ,*Hn& }2*H#"H*H! NEʉ+R! ́
́!Warning *** End of 64K memory ***! ͐b *& *H! ͯEʾ+*H! ͳ !͡+*H!͡Ŕ !
! q́
!! ! @b H!Ͳ"N*N!E;,*N͙"HZ,*N! ͼ ͙"H H!Ͳ*NR! ! @b (+}2!
m!H tEʟ,͏+*& ! - E,!
*& e.H!ͲD-*& !
NE,-(+}2*& !
NE-͏umber ??͐b -ÿ5`&E35͜&*& }oE05-ÿ5Ŕ
! ́!** error ** end address too smalĺ START ADDRESS = !! ! @́ END ADDRESS = !! ! @b -6R! ́
́#Start address has not been selected͐b -%8M R 6R͐b -%8Q R6R! ́
́ Abort rescue operation? ͐b ! *& !Y aEʫ6R! ́
́** Continue RESCUE ** ͐b -6R! ́
́Abort at user request͐b ! }2%8S R7Ŕ
́&Select two lines below the end of your program͐b Ŕ8 so that a proper End-of-File will be included.] ͐b Ŕ< D -- to specify the DRIVE that rescue.txt is to be sent to.͐b Ŕ< W -- to WRITE rescue.txt to the disk in the drive specified͐b Ŕ'Command selected -> GOOD LUCK b ! ! ! R͐b ͕ cR͐b -*& A R53Ŕ
́Address to resume scrolĺ
́+ will resume scroll at last address -> b !!4 *& }oE"3R! ́ ** Input "!X
6 ! Gxwgʯ#Ò! "=!P D :2D!PQ 6 D <
No directory space. Aborting. "K
Files has illegal decode size. Aborting. P "|rs#r#s#r#*+N! _ iu*͆D <µ
Close failed... g
ERROR - Checksum error in file 1P :1 ~#_+(+}2Æ,)-!
!. e.H!ͲÆ,D-!
!. e.H!Ͳ͠ E,! o& }2*& ( }2*& ! NEʱ-͠ Ey-! o& }2*& ( }2*& ! NEʱ-Æ,*H! ͯE-*H! ͳ *N͡-*H*N͡Ŕ( ===> MENU <===͐b R͐b Ŕ2 Q -- to QUIT rescue.com at any time͐b R͐b R͐b Ŕ3 ===> TO SEARCH THROUGH MEMORY <=== ͐b R͐b Ŕ; B -- to BEGIN the search [at 16,000, the default a RESCUE.TXT starting address -> b !!4 *& EI7! }2!A }2Ä7Ŕ
! ́ ** Input error ** bad number ??͐b -%8W R7`&Eʰ7͜&*& }oEʭ7-7Ŕ
! ́ ** error ** memory not marked ??͐b -%8R! ́
́** error ** bad command ??͐b -*& Ef2 ́
! ́ ** error ** memory not marked ??͐b -Ï7R! ́
́'
|}~# **,~#"*"" X *
5"*>O**}q#"͆yi** D ¼ *ڒ*"
Disk full. Aborting. go
Premature EOF on file... aborted. g:!=2:C>C4>==2:2 : O:\O>=2yO!P k##^#VzJy2 z>ʈ{/ :P ʞ_ P <º: _ =! _ #:P ~#P <ºì: G: < x@>:! ~ #
>.!%~ 5#
*!P *Y@G:a: ~# x âê
ö - Ð f "J * "!" ! " 2O! " "]""! 1! ++""M>28 !"9 :] ! í 1