Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP
Posting-Version: Notesfiles; site iuvax.UUCP
Path: utzoo!watmath!clyde!burl!ulysses!mhuxr!mhuxn!ihnp4!inuxc!iubugs!iuvax!franco
From: franco@iuvax.UUCP
Newsgroups: net.sources
Subject: Write boot sector - double sided
Message-ID: <11700028@iuvax.UUCP>
Date: Thu, 13-Mar-86 23:56:00 EST
Article-I.D.: iuvax.11700028
Posted: Thu Mar 13 23:56:00 1986
Date-Received: Sat, 15-Mar-86 21:47:00 EST
Lines: 98
Nf-ID: #N:iuvax:11700028:000:5847
Nf-From: iuvax!franco    Mar 13 23:56:00 1986


begin 644 dblboo.prg
M8!H   >Z   $#   #_8   -6             "I/+GP   _&*FT !" M  S0
MK0 4T*T '-"\   ! "\ +PT_ #\\ $I.0=_\    #$ZY    H"\\     $Y!
M(B\ !# \ ,A.0DYU3E;__$)Y   ;BC/\  $  !N*8 92>0  &XH,>7T    ;
MBFWP3EY.=4Y6__Q">0  &/9@%"Z\   8]C\Y   4QDZY   &(%2/2GD  !CV
M9^1AKDY>3G5.5O_\3KD   ;4+KP  !3(+SP  !3(+SP  !E +SP  !NZ3KD 
M  =(W_P    ,,\   !3&0GD  !3"8!@P>0  %,+1R-'\   6RC"\  %2>0  
M%,(,>0 *   4PFW>,_P  @  %MXNO   $^(O/   %,8O/   %LI.N0  !:!0
MCSZY   4QDZY   $X"Z\   )%C\Y   90$)G/SD  !3&3KD   4T7(\NO   
M"3HP.0  &4#C0#\ 0F<_.0  %,9.N0  !31<CRZ\   )8# Y   90,'\  ,_
M $)G/SD  !3&3KD   4T7(\NO   "8DP.0  &4#!_  %/P!"9S\Y   4QDZY
M   %-%R/+KP   FU,#D  !E P?P !C\ 0F<_.0  %,9.N0  !31<CV$ _J(N
MO   "= P.0  &4#!_  )/P!"9S\Y   4QDZY   %-%R/+KP   G^,#D  !E 
MYT _ $)G/SD  !3&3KD   4T7(]"N0  &T9">0  &[0S_  !   ;C$)Y   8
M^$)Y   ;2C/\  $  !3$/KD  !3$/SD  !M*/SD  !CX/SD  !N,/SD  !NT
M+SD  !M&+SP  !E"/SP "$ZY   'BM_\    $C/    ;A$IY   ;A&8D+KP 
M  H9,#D  !E P?P "3\ 0F<_.0  %,9.N0  !31<CV B+KP   HN,#D  !E 
MP?P "3\ 0F<_.0  %,9.N0  !31<CTIY   ;A&8 _OPNO   "ELP.0  &4#!
M_  ,/P!"9S\Y   4QDZY   %-%R/(_P 94,A   6\C/\  ,  !N",_P  0  
M&[ ^N0  &[ _.0  &X(O.0  %O(O/   &4(_/  23KD   >*W_P    ,+KP 
M  J#,#D  !E P?P #S\ 0F<_.0  %,9.N0  !31<CRZ\   *MC Y   90.E 
M/P!"9S\Y   4QDZY   %-%R/80#\]BZ\   *W3 Y   90,'\ !(_ $)G/SD 
M !3&3KD   4T7(\NO   "O@P.0  &4#!_  4/P!"9S\Y   4QDZY   %-%R/
M0KD  !M&0GD  !NT,_P  0  &XQ">0  &/A">0  &THS_  !   4Q#ZY   4
MQ#\Y   ;2C\Y   8^#\Y   ;C#\Y   ;M"\Y   ;1B\\   90C\\  E.N0  
M!XK?_    !(SP   &[)*>0  &[)F)"Z\   +)S Y   90,'\ !0_ $)G/SD 
M !3&3KD   4T7(]@(BZ\   +/C Y   90,'\ !0_ $)G/SD  !3&3KD   4T
M7(]*>0  &[)F /ZX+KP   MK,#D  !E P?P %C\ 0F<_.0  %,9.N0  !31<
MCRZ\   +E# Y   90,'\ !<_ $)G/SD  !3&3KD   4T7(]A /NJ/KD  !3&
M3KD   4*3KD   <V3EY.=4Y6__PS_  #   ;D$)Y   ;DD)Y   ;EC/N  @ 
M !N<3KD   943EY.=4Y6__PS_ !E   ;D$)Y   ;DD)Y   ;EC/N  @  !N<
M3KD   943EY.=4Y6__HS[@ *   4RC/N  P  !3,0F[__B!N  X0$$B P'P 
M_S)N__[3R=/\   /XC* 4JX #E)N__Y*0&;:,_P "   &Y S_  !   ;DE-N
M__XS[O_^   ;EC/N  @  !N<3KD   943EY.=4Y6__PC[@ (   /SB/N !  
M  _6("X $-"\    6B/    /VC/\ &0  !N00GD  !N2,_P "P  &Y8@;@ ,
M,]   !N<3KD   94(&X ##"Y   ;G"/\   /X@  #\XC_   $>(   _6(_P 
M !;V   /VB/\   4R@  #]).7DYU3E;__#/\ (   !N00GD  !N20GD  !N6
M,^X "   &YQ.N0  !E0@;@ *,+D  !'B3EY.=2/\   ;D   #\HB/   #\IP
M<TY"3G5.5O_V,^X "   &TPP+@ (T'S_]L'\  -(P-"\   'NBU __H]?  !
M__Y@'B!N__H0$$B ,F[__M/)T_P  !M,,H!2KO_Z4F[__@QN  3__FW:+KD 
M !N&3KD    ^0D P.0  &W1.7DYU3E;_^B/\   ;3   %*HC_   &/H  !2N
M(_P  !M4   4LB/\   ;=   %+8C_   &Z@  !2Z(_P  !NV   4OB/\   4
MJ@  &X8^O  *80#_1C/Y   ;=   &XYP 4Y>3G5.5O_\/KP $V$ _RIP 4Y>
M3G5.5O_\/KP 34ZY   &:B!N  @PN0  &W8@;@ ,,+D  !MX(&X $#"Y   ;
M>B!N !0PN0  &WQ"0# Y   ;=$Y>3G4CWP  #]Y.3B\Y   /WDYU(]\   _>
M3DTO.0  #]Y.=2/?   /WDY!+SD   _>3G4  0 " 0$" 0$  0$" 0$! 0$ 
M             0   0 #!0 %!0   0$" 0 0!P$" 0             ! 0$"
M 0$" 0$" 0$! 0(! 0$                " 0$! 0$& 0$$ 0$! P$" 0$$
M @$( 0$        ! 0$) 0$! 0$! 0  !0$                         
M                                   $ P ( P & 0 ( 0 ( 0 $ 0$#
M 0$ !0 ! 0$ !0   0$  0$                                  @( 
M                                   % 0 % 0 ! 0 ! 0 "!0 & 0 "
M 0 ! 0 &!0       0$  0 " 0 " 0$! 0$                      0(#
M 0(! 0$! 0$  0$  0(@($1A=F4@)B!386YD>2=S($1O=6)L92!3:61E9"!(
M86-K+@ @*$UA:V5S($1O=6)L92!3:61E9"!$:7-K<R!";V]T86)L92XI " @
M/'=I=&@@=&AA;FMS('1O(%)I8VAA<F0@1G)I8VL@0"!!=&%R:3X (%!U="!"
M;V]T86)L92!3:6YG;&4@4VED960@1&ES:R!I;B!$<FEV92!!+  @=&AE;B!P
M<F5S<R!T:&4@4TA)1E0@:V5Y+@ @(" @(" @(" @(" @(" @(" @(" @(" @
M(" @(" @(" @(" @(" @(" @("  ($YO=R!R96%D:6YG(&)O;W0@<V5C=&]R
M+B  (%-E8W1O<B!R96%D(&EN(&]K+B  ($5R<F]R(')E861I;F<@<V5C=&]R
M+B!0<F5S<R!32$E&5"!T;R!R971R>2X ($YO=R!M;V1I9GEI;F<@8F]O="!S
M96-T;W(@:6X@;65M;W)Y+BX@ "!0=70@=&AE(&1O=6)L92!S:61E9"!D:7-K
M('1O('=R:71E(&)O;W0@<V5C=&]R(&]N "!I;B!D<FEV92!!+"!T:&5N('!R
M97-S('1H92!32$E&5"!K97DN "!.;W<@=W)I=&EN9R!B;V]T('-E8W1O<BXN
M " @(" @(" @(" @(" @(" @(" @(" @(" @(" @(" @(" @(" @(" @(" @
M("  (%-E8W1O<B!W<F]T92!O=70@;VLN(  @17)R;W(@=W)I=&EN9R!S96-T
M;W(N(%!R97-S(%-(2494('1O(')E=')Y+@!296UO=F4@;F]W(&)O;W1A8FQE
M(&1O=6)L92!S:61E9"!F;&]P<'DN %1H96XL('!R97-S('1H92!32$E&5"!K
M97D@=&\@97AI="!T;R!'14T@9&5S:W1O<"X 7V-R>7-T86RB     #Y?8W1R
M;%]C;J0    'NE]S;&]W    H@    !*7W=A:71K97FB     ')?;6%I;@  
M *(     H%]V7V-L<G=KH@    3@7W9?8VQS=G>B    !0I?=E]G=&5X=*( 
M   %-%]V7V]P;G9WH@    6@7W9Q7VME>5^B    !B!?9W-X,0   *(    &
M5%]G<W@R    H@    947VEI;V9F  "A    #\Y?:6]O9F8  *$    /UE]P
M:6]F9@  H0    _27W!O;V9F  "A    #]I?=F1I     *(    &5%]C<GES
M7VEFH@    9J7V%P<&Q?:6ZB    !M1?87!P;%]E>*(    '-E]G<F%F7VAA
MH@    =(7V=E;61O<P"B    !ZI?8FEO<P   *(    'FE]X8FEO<P  H@  
M  >*7VEN=&EN  "A    #^)?:6YT;W5T *$    1XE]L7V]U=   H0   !/B
M7V,       "A    %*I?:0       *$    4PE]C;W5N=   H0   !3$7VAA
M;F1L90"A    %,9?9'5M;7D  *$    4R%]P='-I;@  H0   !3*7VQ?:6YT
M:6ZA    %LI?<V5R:6%L;J$    6\E]P='-O=70 H0   !;V7VME>5]S=&&A
M    &/9?=')A8VMN;Z$    8^%]G;&]B86P H0   !CZ7VQ?<'1S:6ZA    
M&1A?:&5I9VAT *$    90%]B=69F97( H0   !E"7V)U9@    "A    &T)?
M9FEL;&5R *$    ;1E]S:61E;F\ H0   !M*7V-O;G1R;VRA    &TQ?:6YT
M7VEN *$    ;5%]I;G1?;W5TH0   !MT7V1I<VMT>7"A    &X)?<F1S=&%T
M=:$    ;A%]A9%]C    H0   !N&7W-L;W=C;G2A    &XI?<V5C=&YO *$ 
M   ;C%]G;%]A<&EDH0   !N.7V-O;G1R; "A    &Y!?861D<E]I;J$    ;
MJ%]E>&5C9FQAH0   !NP7W=R<W1A='6A    &[)?9&5V;F\  *$    ;M%]A
M9&1R7V]UH0   !NV7W=I9'1H  "A    &[H    $+AX(" @0" 8&"!(&!@8&
M!@P&" @*" H&!@8&" 8&!@@&" 8,!@@&#@8(!@X&" 8.!@P&#@8(!@P&" 8(
M!@8(!@8&!@8&!@H,!@@&#@8*!@X&" H&#@8," @&!@8&"@P&#@8(!@P&# 8.
M!@@&#@8(!@@&!@@&!@8&!@8&"@P&" 8.!@H&#@8("@8.!@@&#@8,!@80!@8(
M!A &!@@&$ @<%@@," 80"! (!@@*!@H&! 8$!@0&!! &!@@&"@H$!A(4(!@&
M" X$!@0&! 8$!@0&! 8$#@0F"@H*"@@*" @(" @ '1T='1T='1T='1T='1T=
M'1T='1T='1T='1T='1T='1T='1T='1T='1T='1T='1T='1T='1T='1T='1T=
G'1T='1T='1T='1T='1T='1T='1T='1T='1T='1T='1T='1T='1T=
 
end