PFLORIANGSA V1.3-1 DEC-9321-DEC-1993 22:40DEC C V1.3-000A  $READONLY$0$BSS$$DATA$$LINK$ $LITERAL$i$CODE$ $ABS$DECC$GA___CTYPEDECC$GA_STDERR DECC$GA_STDINDECC$GA_STDOUT DECC$GPRINTF DECC$GETS DECC$STRCAT DECC$MEMCMP DECC$STRLEN DECC$STRCPYRMS$_SYN0JAPPLY_DEFAULTS0JCTRLYASTSYS$EXIT0J EXIT_HANDLERSYS$QIOWLIB$ENABLE_CTRL0JXREAD_VBN0Jh WRITE_VBN0J8 UPDATE_BLOCK0Jx0UNDELETE(J FLORIAN SYS$ASSIGN LIB$GETDVI SYS$DCLEXH LIB$DISABLE_CTRLSTR$MATCH_WILD(J__MAIN DECC$MAIN DECC$EXITOTS$MOVEOTS$FILL OTS$MOVEM ====. =;(=*0=.*8=;*@= H= P= X= `=h=*p=PB files succesfully prepared for undeletion: %u =@2 files partially prepared for undeletion: %u =@2 undeletion requests rejected : %u (= SYS$COMMAND8=0' Usage: $ MC FLORIAN disk: [filename] `=@6 filename must not include a directory specification =pg valid example: $ MC FLORIAN SYS$USER: *.COM invalid example: $ MC FLORIAN SYS$USER: [MYDIR]*.COM =H> After running FLORIAN, you must execute ANALYZE/DISK/REPAIR @=0' to complete the undeletion process ! h=H< For each undeletable file user confirmation is requested. =  Valid answers are: =8- Y or T or 1 ... undelete this file =8/ N or F or 0 or ... file remains deleted  =8+ Q or Ctrl/Z ... immediately exit P= A ... undelete all files; no more questions YQ or TQ or 1Q ... undelete this file, then exit *** device %s not a disk =@2*** not a Files-11 Structure Level 2 disk volume  = undelete %s ? [N]: 8= *** invalid answer P=(*** %s undeleted partially p=wo*** undeletion request for %s rejected missing fields in the specification of filename are taken from *.*;* =0h;=0 SYS$QIOW;=0;=0 =0;=0 =00;=` t;= DECC$MEMCMP8OTS$FILL8OTS$MOVE=00;=p|  DECC$STRCPY DECC$STRCAT7RMS$_SYN DECC$STRLEN7DECC$GA___CTYPE;= J@= H ^;`;h;p;x;;;;;;;;;;;;;T;;;;;;;; ;(;0;8;@;H;P;X;`@;h;p;x;;;;;;;;;;;;;T;;;;;;;; ;(;0;8;@;H;P;X;`@;h;p;x;;;;;; LIB$GETDVI DECC$GPRINTF=0h ;=| SYS$EXIT8 OTS$MOVEM SYS$ASSIGN DECC$GETS=V;P LIB$DISABLE_CTRLSTR$MATCH_WILD SYS$DCLEXH=0;=0 ! DECC$EXIT # DECC$MAIN=0;=0 =0h;= %LIB$ENABLE_CTRL =#4G~^ ^(GG#0B  = > 8b@Zk =Pb#@ B4G(bG@ZkG] ](0#kG#~0^8^@~HPX޴`GG=GG!?H=$.GPBGGQ$J$>@Zk @@"CG.PJ>p}/[}Kp}?,@H<.J^ e@z/Z#AzK'H<$@ %@BY/YK_4GG0]8]@}HPXݤ`p#k#4G~4G^^~ GGbc D0B8b@ZkD4@G]]} 0#kGp#4G~h^p^x~GG#bB  `"c bG= @ZkTGB@"0#b@ZkTGBx"4#b@ZkTGB"8#b@ZkG, BHGG@ZkGGG6/6"yJP @BXKHb}"G?G$GG (@ZkGTG<c "` B(b@ZkGh]p]x}#k#4G~^G G#[}""G>GG G{(@Zk=!v H v HG] 0#k#0G~^G G# [}""G>GG G({(@Zk=!v H v HG] 0#k#G~s J^4!J G# JG2?HGSF` As1J _J_&D 4R"G"D4U3G!v H3.J)G ӢGRJ2vJ5@wSJWF@_բ"[{}"B5"G޶GG G(@Zk=!v H v HG] 0#k@.R @JUFà#G~4J^^ ~(08޴@HP>XGG}Gb2H "3xJ0BJ4#tF8#tH}r1@J}.RHp JR HS}J1"JtF}> ݢtH(c 1@6JGF ݲ }. GSpJtFp>>GCGb#EB1_G0@B GL '0vJCP HC0FI f(v@JB&"3v`JGCFA!v H"RJCC5D9(B0bGtG@Zk3GGb#O_DG G( GG G' Gp JR@J1"JQBG ¤Gb#8_ 0A/G]] }(08ݤ@HP=X`#kGGG8B"GG@ZkGG bb#_0@G`#4G~h^p^x~޴GG#xG`"GpX0= h"`= (  =="\",=$="XBb@Zk4GBb "@Zk4GBp"b@Zk4GBb8"@Zk4GBp"b@Zk4GBb"@Zk4GB("b@Zk4GBb"@Zk4GB"b@Zk4GBb0"@Zk4GB@"b@Zk4GBb"@Zk4GB"b@Zk4GBb"@Zk4GB"b@Zk4GBb("@Zk4GBh"b@Zk4G4G B(b@Zkc `G8"="b#_G` B(bG4G@Zk@B"@ZkC"`, `HxgD` B@%"(bTG@Zk@B"@Zk=`H@B!?H D=@ZkGG0}`H`b@B0"3JHbG`F0}G4G@Zk4G BG(b@ZkB`"b8}"GGGGG@Zk B(bG4G@Zk8$ "8D BTG$b@Zk4G BG(b@Zk(,G,=BHGG@Zk"4G`ݲd#d=/`Jf= PBuJXbY8K(" G8?f,H}"GTGDHGD#G (@Zk4G B(bG@ZkH4G$vH BC(b@Zk#(  PB}"TGG4G GXbG(G@Zk$vH vH B(bG4G@Zk( " 4G0HXDBb@Zk4G B(bG@Zk( #( B( $Ơ =0?H 4GRHXRHb vHqH@F#$1@"" 4G$ò@Zk4G BG(b@Zk@B#"HbX"GGGG@Zk4G B(bG@ZkB#"bh"8}"GGGG@Zk4G BG(b@Zk8ݠGG0p@}"#tGPBGG Xb(@Zk4G B(bG@Zk@,4GH BG(b@ZkB #"bd"TG@Zk4G BG(b@ZkŤTD4DT4@Ŵ4G_4GF B4G(b@Zkà("b#@_4GG&  B(b4G@Zk B(bG4G@Zk( &Ơ"&vH"( 0H(# 4!0D(#"B(C"1"G?F1BQB"GG@ZkTGB"6X"@Zk=# _,H$D "B71B6.6JDF@"B71BC"U/"ZUKU?@B@ZkTG B`Hb "8K="G @Zk%'%$# <@&@ BG(b4G@ZkŤDBGB"b="TG@Zk4GPBXb`"@Zk4G B(b4G@Zk@B`"@Zk`,a= FHH1@7)B\"BkGB"b4G@Zk@B`"@Zk7@a,b= FHH5@5@fF`F4B B4G(b4G@ZkŤD4@Ŵ(=,G,B=HGG@ZkGGv/v"yJPB( XbXKH}"G?#G޴GGG (@Zk4G BG(b@ZkH4G vH BC(b@Zk? ("b#D#$B(_4G B(bG@ZkB("b(#"_"tG@ZkLŠGb#_ B(bG4G@ZkL("D GPŠH"0@PŰB="bTG@Zk(,G,=BHGG@ZkGGv/v"yJPB(= XbXKH}"G?#G>GGG (@Zk4G BG(b@ZkHݠ4G&vH BC(b@ZkŤD4@Ŵ0@4#$GH DECC$MAIN4$<b# DECC$MAIN4#D@H DECC$MAIN4!XGl DECC$EXIT4"`b# DECC$EXIT4!h@l DECC$EXIT4 G DECC$STRLEN4 @ DECC$STRLEN4 hG| DECC$STRCPY4 x@| DECC$STRCPY4 G DECC$STRCPY4 @ DECC$STRCPY4 G DECC$STRCAT4 b# DECC$STRCAT4 @ DECC$STRCAT4 G DECC$STRCAT4 b# DECC$STRCAT4 @ DECC$STRCAT4 @GX DECC$STRCAT4 Hb# DECC$STRCAT4 T@X DECC$STRCAT4 G DECC$STRLEN4 @ DECC$STRLEN4 G DECC$STRCPY4 @ DECC$STRCPY4 G DECC$STRLEN4 @ DECC$STRLEN4 G DECC$STRCPY4 @ DECC$STRCPY4 G DECC$STRLEN4 @ DECC$STRLEN4 G DECC$STRCPY4 @ DECC$STRCPY4 G$ DECC$STRCPY4  @$ DECC$STRCPY4 (G< DECC$STRCAT4 ,b# DECC$STRCAT4 8@< DECC$STRCAT4 @GT DECC$STRCAT4 Db# DECC$STRCAT4 P@T DECC$STRCAT4DGPSYS$EXIT4Hb#SYS$EXIT4L@PSYS$EXIT 4G DECC$GPRINTF4b# DECC$GPRINTF4@ DECC$GPRINTF4G DECC$GPRINTF4b# DECC$GPRINTF4@ DECC$GPRINTF4G DECC$GPRINTF4b# DECC$GPRINTF4@ DECC$GPRINTF4G DECC$GPRINTF4b# DECC$GPRINTF4@ DECC$GPRINTF4(G<OTS$FILL48@<OTS$FILL4\GSYS$QIOW4db#SYS$QIOW4@SYS$QIOW4%GLIB$ENABLE_CTRL4&b#LIB$ENABLE_CTRL4%@LIB$ENABLE_CTRL4GDSYS$QIOW48{#XSYS$QIOW4@@DSYS$QIOW4GSYS$QIOW4{#SYS$QIOW4@SYS$QIOW4GSYS$QIOW4{#8SYS$QIOW4@SYS$QIOW4 G DECC$MEMCMP4 b#x DECC$MEMCMP4 @ DECC$MEMCMP4p G OTS$FILL4 @ OTS$FILL4D GP DECC$GPRINTF4H b# DECC$GPRINTF4L @P DECC$GPRINTF4T Gd DECC$GPRINTF4X b# DECC$GPRINTF4` @d DECC$GPRINTF4h Gx DECC$GPRINTF4p b# DECC$GPRINTF4t @x DECC$GPRINTF4| G DECC$GPRINTF4 b# DECC$GPRINTF4 @ DECC$GPRINTF4 G DECC$GPRINTF4 b# DECC$GPRINTF4 @ DECC$GPRINTF4 G DECC$GPRINTF4 b# DECC$GPRINTF4 @ DECC$GPRINTF4 G DECC$GPRINTF4 b# DECC$GPRINTF4 @ DECC$GPRINTF4 G DECC$GPRINTF4 b# DECC$GPRINTF4 @ DECC$GPRINTF4 G DECC$GPRINTF4 b# DECC$GPRINTF4 @ DECC$GPRINTF4 G DECC$GPRINTF4 b# DECC$GPRINTF4 @ DECC$GPRINTF4 G DECC$GPRINTF4 b# DECC$GPRINTF4 @ DECC$GPRINTF4 G, DECC$GPRINTF4 b# DECC$GPRINTF4( @, DECC$GPRINTF40 G@ DECC$GPRINTF48 b# DECC$GPRINTF4< @@ DECC$GPRINTF4D GT DECC$GPRINTF4H b# DECC$GPRINTF4P @T DECC$GPRINTF4X Gh DECC$GPRINTF4` b# DECC$GPRINTF 4d @h DECC$GPRINTF4l G| DECC$GPRINTF4p b# DECC$GPRINTF4x @| DECC$GPRINTF4 G DECC$GPRINTF4 b# DECC$GPRINTF4 @ DECC$GPRINTF4 G SYS$EXIT4 b#SYS$EXIT4 @ SYS$EXIT4 G SYS$EXIT4 b#SYS$EXIT4 @ SYS$EXIT4  G DECC$STRLEN4  @ DECC$STRLEN4  G DECC$STRCAT4  b# DECC$STRCAT4  @ DECC$STRCAT4  G, DECC$STRLEN4 ( @, DECC$STRLEN4 4 GL DECC$STRLEN4 H @L DECC$STRLEN4` G SYS$ASSIGN4l b# SYS$ASSIGN4 @ SYS$ASSIGN4 G SYS$EXIT4 b#SYS$EXIT4 @ SYS$EXIT4 G LIB$GETDVI4 b# LIB$GETDVI4 @ LIB$GETDVI4 G SYS$EXIT4 b#SYS$EXIT4 @ SYS$EXIT4G DECC$GPRINTF4 b# DECC$GPRINTF4@ DECC$GPRINTF4G(SYS$EXIT4 b#SYS$EXIT4$@(SYS$EXIT44GHOTS$FILL4D@HOTS$FILL4dGSYS$QIOW4lb#SYS$QIOW4@SYS$QIOW4GSYS$EXIT4b#SYS$EXIT4@SYS$EXIT4G SYS$EXIT4b#SYS$EXIT4@ SYS$EXIT4GXSYS$QIOW4Db#SYS$QIOW4T@XSYS$QIOW4lGSYS$EXIT4pb#SYS$EXIT4|@SYS$EXIT4G DECC$GPRINTF4b# DECC$GPRINTF4@ DECC$GPRINTF4GSYS$EXIT4b#SYS$EXIT4@SYS$EXIT4G, SYS$DCLEXH4 b# SYS$DCLEXH4(@, SYS$DCLEXH44GDSYS$EXIT4<b#SYS$EXIT4@@DSYS$EXIT4DGh SYS$ASSIGN4Lb# SYS$ASSIGN4d@h SYS$ASSIGN4pGSYS$EXIT4tb#SYS$EXIT4|@SYS$EXIT4G LIB$GETDVI4b# LIB$GETDVI4@ LIB$GETDVI 4GSYS$EXIT4b#SYS$EXIT4@SYS$EXIT4G SYS$QIOW4b#SYS$QIOW4@ SYS$QIOW4G$SYS$EXIT4b#SYS$EXIT4 @$SYS$EXIT44GDSYS$EXIT4<b#SYS$EXIT4@@DSYS$EXIT<DG\LIB$DISABLE_CTRL<Lb#LIB$DISABLE_CTRL<X@\LIB$DISABLE_CTRL4dGtSYS$EXIT4lb#SYS$EXIT4p@tSYS$EXIT4GSYS$EXIT4b#SYS$EXIT4@SYS$EXIT4GSYS$EXIT4b#SYS$EXIT4@SYS$EXIT4GSYS$EXIT4b#SYS$EXIT4@SYS$EXIT4@GpOTS$MOVE4l@pOTS$MOVE4tGOTS$MOVE4@OTS$MOVE4 G DECC$STRLEN4 @ DECC$STRLEN4GSTR$MATCH_WILD4b#STR$MATCH_WILD4@STR$MATCH_WILD4<GPSYS$EXIT4Db#SYS$EXIT4L@PSYS$EXIT4`Gx DECC$GPRINTF4hb# DECC$GPRINTF4t@x DECC$GPRINTF4|G DECC$GETS4b# DECC$GETS4@ DECC$GETS4GSYS$EXIT4b#SYS$EXIT4@SYS$EXIT4 G DECC$STRLEN4 @ DECC$STRLEN4G DECC$GPRINTF4b# DECC$GPRINTF4@ DECC$GPRINTF4 G DECC$STRLEN4 @ DECC$STRLEN4@GTSYS$EXIT4Hb#SYS$EXIT4P@TSYS$EXIT4pGOTS$FILL4@OTS$FILL4GSYS$QIOW4b#SYS$QIOW4@SYS$QIOW4GSYS$EXIT4b#SYS$EXIT4@SYS$EXIT4 GSYS$EXIT4b#SYS$EXIT4@SYS$EXIT4HGXSYS$EXIT4Lb#SYS$EXIT4T@XSYS$EXIT4XGt DECC$MEMCMP4`b# DECC$MEMCMP4p@t DECC$MEMCMP4GSYS$EXIT4b#SYS$EXIT4@SYS$EXIT 4G DECC$GPRINTF4b# DECC$GPRINTF4@ DECC$GPRINTF4GOTS$FILL4@OTS$FILL4G\SYS$QIOW4b#SYS$QIOW4X@\SYS$QIOW4dGtSYS$EXIT4lb#SYS$EXIT4p@tSYS$EXIT4GSYS$EXIT4b#SYS$EXIT4@SYS$EXIT >=.&%FLORIANDEC C V1.3-000A ?= 4=TRANSFER$BREAK$GO #= __iscntrl =  #= 44=apply_defaults4= 8 8 : : @ J M N D 0 h h h f f, $= 4 =  = 44=ctrlyast4=)! o o o $= 04 = x = 44= exit_handler4=e]\ u u z z      $= 4 = ` = 4X4=read_vbn4=1)(     $= 4 =  = h44= write_vbnh4=1)(     $= 4 =  = 484= update_block4=                    $= 4 .=  4=  =  = @ = 04x4=undelete04=80                            '$ 8    $= p4 =  =  44= florian 4=YQ                    ! ! ! " ) ' . 0 / / 0 0 1 `   J 9 9 O T O > ? @ > ? > > B C D L T T k \ o o p t s g d j h j m o o o o        E        X $=  4 .=   4=  =  .=   4=  =  .=   4=  =  .=   4=  =  =  H= 44=__main =  =