#46 Article 413 Posted at 1993/10/07 12:25:04 by yav (MAP3787) [HESPER]

Subject: Hesperides Data Encryption Standard (only DOS exe)

===============================================================================
【名    称】  HESPER.EXE - Hesperides Data Encryption Standard (only exe)
【登 録 名】  HESPER_X.LZH
【制作者名】  yav (HBA00622@niftyserve.or.jp UHD98984@pcvan.or.jp)
【掲載者名】  yav (HBA00622@niftyserve.or.jp UHD98984@pcvan.or.jp)
【転載月日】  1993/10/07
【作成方法】  lha x hesper_x.lzh
【検索キー】  HESPER_X.LZH  %HBA00622
【転    載】  ソースもいっしょに
------------------------------------------------------------------------------
unix/DOS汎用の簡単な暗号化フィルタ hesper の DOSの実行形式ファイルです.
ドキュメントは hesper.lzhのなかにはいってす.

                                HBA00622@niftyserve.or.jp
                                UHD98984@pcvan.or.jp
                                                yav

ファイル名を【HESPER_X.LZH】と指定してダウンロードしてください
というわけで,コンパイラを持ってない人のために実行形式です.はいっ.
<<< hesper_x.lzh for MS-DOS ( use ish & LHarc ) [ 115 lines ] >>>
!!3+!;gR!2"DRo-@Gm?9VG*EXcQ~!&"H[x5ypgCC}aRY-}v6&)!!!!!!!!!!!!!!!!!!!!!!!!gR*1
!!3+!;gR!2"DRo-@Gm?9VG*EXcQ~!&"H[x5ypgCC}aRY-}v6&)!!!!!!!!!!!!!!!!!!!!!!!!gR*1
!!3+!;gR!2"DRo-@Gm?9VG*EXcQ~!&"H[x5ypgCC}aRY-}v6&)!!!!!!!!!!!!!!!!!!!!!!!!gR*1
"/5NE:BbBlO~!"1("[!!,1mb9W[=c>l=a5K71WD*l"CL!y9Q63$]Ro!vZVJU!!*v732e!!Qr{~DV3*
$[JXE1O}7gZvwphXP":@Q!6z]x-^$1!H\sme7q<m$k7)+cYBcPhZ5{2oQf_^5$)ev;NOOJX)yFovil
%_b7d)wNX4E:uF"iv2n1[qHYapcBq^o4/)!cXX|TM4&q5jfe}AxTgA}As*}xR$h2N(f\,R\IrV$e'?
&!A?VGQUpW(SSTZp<2}c,=N8hxWCRU}B&6$a$KrS!j{4M4{5p-EDmg)fvJNR&v/wWu<q\^)\NQZdi_
'Sa9ssf63BZMMvnDv'*W\[+nX=22f4jd46zKa!Iw6q>rM6i*({y8;:xA(FuXZQr\iNreyM]>2|Cz6-
(?<0XA\\|:<se\eAhxNleur$vv}2\YzpN2og7%}6[puRpI'!2O4bnO^:U0X\Z8p%6i4JyA;L"9\STc
)?O_DG9!R>AUq}*D0[d<N]6Mt'_3uW^rp-tI?Bb@$Thg:\e<Qi9$ghe??^ou{yovUehFZrNFj?!>"4
*7G2IRzlkye$qnE-*QOzc{!5|%pawIKoVfvOJwH&oN^;0C!&T*bb&kfk8{u%a0,5jJPxy7$+;w<LnB
+/2\dvIcOU'j))C:SS8xAQZq>{yq]R?,6BOZ9fa8Q&KpQ'!:vr+hm^*:VJ/Igaj[IS0m;3Q)VWib&B
,G4))0!|xah(Gk?OMMT3C0{Dhef9KG'3'f{(WLhz3K$osbOW!qi>yNjg0D2TqZ]a<8KWkNbcMGfMyW
-7L+Nt;k$Ns=+/xHlH?<@(:q>0CKFq$FZ/Aj?|_[0n/2LI2Utc>&"^m,r"wo<~s|G7Zngga93N\c!<
/K3B",r,@:Tb55gH*sP^ZbZVWo!/YPqh^wEex>mF4Ys=hID,]G^18fUwCL>S'<+k+yU1wjPMEIqVus
0[ZM:~b6c2HtM=Td3_&cw~]\KSV2lB!8XMY^)2TGT{;g]W%?g/-!WJKtJlXx1/I,c_$f:"/2b-kh!u
1!9+\[?{PA<NZPY{6"@U/a_2L+e+&]XUW:lA<ID^w:yw-TjesH/J'm9Gut?k1?)Eb?65)?A}mUn+Wk
2!87Q\r^t$)0%<H(R*<dSfZeUf8wupH6{=a]9"kC8mmY}MkWNp{?)%?A;ZQS$^JH*2%n:yfo!OjI!J
37<<$qrz;J8)]s?yvB5A8E0WcEFrz+QPm0"{X?hm8IuzuwMz0k@(&P%F,rSf>y*=uGK$xK(${DGkjn
4O?a>I79w[>l{F_*yu]L%03JpDGZ"*a7%EFaFVv$(mP*P8SkG>TFhi]{e'%~xfJ\dG|?3K@8tm+a(8
5C$KVsUzmr6d!}b0>a,qi"EbWh],pJK<<%v3/k?yRL|::yOCa*4G={x_9{kE%>dATzB!>Gk27_'^mC
6!!0<=8T(Zl%rTHY}31R=A3+j[5-"%;qUXg4ZIResIT}GC/nG[(KGU&c1_mY80*G]?1XJV{'d&9{A:
73!Ho5"V5X2??4H!diD(6QFR%J[Pj~z*OpX?,*iEaVJ--TkCob)J>hJWeM(VO_$tdL+"hUK(B@Gzx0
8!L&@$CRIxL6(ge|V]9yueXyOTLm!@^E2%DYuq7fP'fA!biz{mD'>VIC]N-hGIn>SMqNc})W=>z^IA
9KBHl,xui:"mf70y?C[o}'W1jpq3jB1>PR\w=';&Fe7o'9W:J:5CXkm1"igc\vwBJ*Wd$5&|HM<w}9
:7[2sO0%=ll_=Yh4un?^<QOCNGXCJjoP$b)"C]}4xZx0jt(4&:i(l5Ml"ORG:n_^$KN,0XlRU>JFNv
;O8SK[Q]fVxdivM4""K^=->m5f)CKQ/m0IR]92c|5^FzL!Xdi!9d/Av]AzK[h|=fuash'r_a)_nAk$
<?EELY};X]b-33K}DQMIFBgIPg)alfi9t;-;*F@%"0X1ja)DJvQeaz!3fvu\q!<CoQ+Xq9TI=T9^&n
=/T5WWL1wXy6hbG]2mQaW|:^?X,II5FVTXdy&x|QXb4T-k=~:9sW!]\PFMWwb~+Lnv-&<\O0r+7}wm
>S?!hP@niYHoJ[!^Ab<10<|K<mG[Ps*9d'n}m)KQZ8?0km8wVdgFJKYY,%U^Xhz+EbTQkLE~K>EVJS
?&A5fz&AtS!Ea\7e1A>r{zs6}"$~vzZDMyvGi"VhjDA_t);1_i>f4}>^?*V50xSMN>0)792^_yhh_U
@SLKs@5;YH0<O@^:j{&b[mEC<bl\2egm_&ADWbZ1mWFg8-\z0=hmr$"x0wpZvb5%{e$hXVE^d&;)-i
AKSBBgjmK&71G{7_SDCgu00=emZ2%X6|/E{QCJ%$i&Nrr<48)|C~|(&k8D(>=C2jXg6{SVG4w\3|f[
BK4[*~CYSQ"I|u+?<GTqk1*PMXRuiDD*!mL4Vs\W-B59$_I-F6K-id!H7)'cZ&4Q)4&Yv<yZcDb>HY
CSbOqfOx:7]XdHU9Wzc)3Zf{\GJ+Gl*^[8(v$s-Uj!%4VsJ6mY|]H<MnG9g^W0Z~luEY\@<nPNePq2
DC7$hp\9co}X|L<CrW7g886p!X<Z^E?>5yISWKJU]9r}CFyz{'rkhtR@ylyM,;;-66\_Nfp}eM?|;q
EO;Sh/AqR4N6T!jY$<!+9^/hnz3W-HNv$Ze9V,HnPzVW=>QTiQvKT4<QQ}j5**D+xU7TP;<o0wOBjr
FWF&3:XASss!uFk{lce8tBsv3bs[z0Q[Y?K6Fq&5S&Jyex9n[q[Djg1|9%b1(n\MAvc2-McG:I{{&^
G[%;,\XZ\8Fn[3w1xv[314Sj=S^;Sf)_:qA2Hq1xhZn~-DC9R4qysYA&0xr*Sh}9q@Adja^6Ipn;eG
H[":c"mGz]4XHG'N[0pQ/%kcDC++PS!O+O%G=AT/7h0L?;7e=wpD\c1r$tv9sZhrT/*4b[7vY,-<N9
I!(Gi<Qz5~E:dU@ss5?dUG!H-|VyGaJT2!Eb+wNo1J!<^(xRF2iJj'G<NsU;]wKHSDK'Mie)0]2@v_
JKQR'\)PwqYN>h)XKQF[YOqQ"G57J@p+*zY8Y4Y,&T9B^(d3"G+EcO*Z/qoK?D+fyqLc4X"o5:I~L@
K/7B1m=b$I^kuF)1QR-VU^k<v15r$d!oFy/wn~thOo<+L'uEhSmEUp_{}BT01A$Lnd&zTT!L5\aUxt
L!'=<@-gQD59axU(VmB7;ly$Ymyp=mY$w19X!rgQut6QSWDp}APrTRV6qe'eyQGbV?[P:Ky^DjX&2/
M[2?/NChx49W2?gk}YZhH/M6U/<ND~rqZtxwZM5O^m4tLs$yf]}SiB=nlSwB'dV3=K?j?KMNOM&Lg/
N7UH<6&/44?mf1Iboe<<_Rb)ar8iOk/phZ7|)7!1'P;mzg4?(U;F=+}XRyRP2q*^=U3d0U_vI&NP"?
OKG_2bu/c6D*br*uXW7PI%<+KQzR<Hl3bh;ACXm^Xh:-GbH5P{=S{Cx1*iz!:EEDVcdp5'x??[\M{?
P**ZbN?&-~Fj"@7fPTElvJ1|hULLT0=pdx(hCU5HSb=kNd$u2d-cB&;E2*)&EM|h[~wfu[>NH<VV$:
--- hesper_x.lzh (50/115) ---
QW:%YSUl-<-M_oT6<(s^cx8H?K_zpR6}*4gjPR>sP&1gPtz85{7*{rqEK})y}D:Kq-dS$Qp8yoFajC
R&VDmh[m{0bdbQ]UN>ut*)-G,\MOeQPdca,{)_d?un6!-u{_]Y-D4]f$Q{@=B8KVkCnG^kSdv50u$s
S?T%Gk6j\+rukXMv&vr3RpZ+ZV'pNaKs&L%wpdZ^&~mR/PiHnU+XCd!~LMg?@"m<ZuSO\)xJ;>-]wI
TGQCH0N&Tg7Vz,IO"+XAFUO(tB<l-+CH6PY!H\v]p"Tuhw&qcHFy:?G5FW%$I!m?8@Y<NM'r)}cnN8
UWN'&34qqIDm&7[4EA>o":w+T2do)5*wawS4t]/}Gp2U^V;SaWHq<AuO:ANk"x1^oJOM"]x{F<jLdl
V/%Z*$A>lueL*bF2l>IX8iSE\E|p=eC3gKM3w1FcqTS|Fu58wN;2L1l"%Z7LnH@jbt1Pi2n}ZEwBDi
W[;(;4T![}*p1xG]y%rKyQ(kYm5dOZ$JuRP7vy1'{zqE%hWp|3/aAOfbf{\kR|$n|Y|"?Q1@X)fu^@
X_(/{&TtyV[i)$nIvlG-JS<*Wfva@:x3VeURTP)(TXmD<EWLq~Fw]H8FlO09(:18lqg4B"$t)cwJD|
YK<ZH,5[tKYRXC%Nzgu,>jr;dhuqkW'+Y;W=mwlZJ]8_Rsduc39F7>tSu7uh}Da21SUY=$eEM~-"g0
Z_bYd!OG/CimpJujzec9c8EW=QCp1G^t3c^<H1"s&>P>&g_:k92ae_[h[MYVDoI)>vi^HCkpe5/Y?y
[C;W<})939\2AJ6?)iFbwz$ReLU$g"NrHpN2*Z;T)Np|yoSDF2+:UEXa(@g6JLVO=TK$TkWF|zrok5
\K-_0>nXl_?[A52F{=4~q;t2;M,-)XybP>BpkQB^j$|f$>aZOaB"XuD,AB<We;DI9k|y4b-=$3((*Q
]S=,maJRjx^mJnDpl04%6~QUiXw&Qw7WJ?WKc!U9@Lw\%"'Na}Hb1\1=2Jc"_q=H\Q:AtNW?[Xm*bL
^!X]G<9P6H-I{HtG'f+bjs\5%Xho^jm_pa>P^shJ?|%V=2(R50P5Nq8M&n0hI+QHPA-A>sTQi${-H\
_;^@)Kp~>|/S|{c9POwegL!044mTR7gb0,H0r(!\4Oe-9T,$x$Ou8Dm=KT;{Q]_+_|^knx9(>C-PW@
a_X_*HSiD4i{e6XoDYem*(?wiUTk|*9y[_C:p1^7!4d^=%FBorZ1eV5+[>Dgw:S4wUyAtsi=B:|o_:
c;^+cEgU'lyk5E>SX+VPli)L]_nwTE&6{W}CV~z!Qd,G-*1H;9/aNM_dO\@1mZ6xz5^UbJ7y4Swb!B
"7**BE)2*XQP5pj,aUnKWIKc:S9A{{qVoT8-cr[PTO!b0=EpVqxYOH:ygWhg[dR&,RKH5g7J/yd(!\
$[>RAx}6IgaE2D{wt\TqgS_"[a8k;UQ'{H"I2uo1!U0DCsd_Ol!_QBb/oWNQ>Rv-L'(o-0jD{y9p[s
%*b^:6BAS[R?b'"0RynDiLm[U'Cp]PE]!mb45+wte-PJ,mx0aafAYv@ziWkQb}N=b&Dj,eh1<dTfI0
&7Z9kq2%Pw1e$f8|JdvrVOrmoE>kCBsaJ1w,Hsa3apS9vw)nmka8x+cEE]OztOmCqc&htZrZkEhIZC
'G7YexuevHujP1gjj3GYr]EEv|^;?d((P4)!mEAiXf9L&b?d[1|;NG-"QtZDK1_Zs/vyC8(%[WVC'8
(;%TgW&3E=GEa!|X1-M@?=+d&Kzkl_i\PUfp1%QoH'Vi4XjRsjEXWB_-35fQz8{3ZzO+^k'DO;%aek
)CQR>1pl]XNQQMPu&B%)Rdda{j8v=!h@GJ6d_nCt}RDYy*0AiRNf<n}>]ku!*)glM&rE@6Jcpb:p+p
*;G$J7\>&v?w|T1pOUg-WCV@J}g"s'SP{I2)pOC1iL+NYax>Ug9cs{KoG1&y2I&1W>(Hl_;cSB$;w-
+S6TpYS'-/H'p089g}{?('vlXVL3Mp,4rsf1'sPXqV:Ubj%5hSCsD&'&"6i2@Dc@o$MzD!KbJeUK>9
,S\blY8h-~CG,]OWC{\[W&2V|SUTRv1|Q?YuV+z^SGb08tO*wT0'm%vOc2zcbZ8*Plf'nz*^s|S$fu
-W%UTmE@WU|3BG]ohk!Iz;[q5w%E[{Do4a<LkB=}4qqvaR"EL9DxnypjMpav]H]W}@boo(s9=xP@/k
/W)/Gn/]7=z:b7w|J]\"_,<Oi6gTZhuzxeNXNay|rY7Y8AAdw4*SjNiOQZD_Qr-FLR30Q%xVl|_gvn
0S0=Ot^~7i,;VX{I^Nc)VLnst1]w$>ao0B;|YI8jS%!,gY(pzisB:zDLUntT2d2\p@XWF5bM*WSQIs
17A9XMlg[72KUC!5mV67xAS(0a3;*Uw<\{A,}+3J$H,L5rI\h]CQ%[HF)vyp9ftc"n)ehFYQ$z&8sJ
2_;[?O\Qa2_%HI$cOx'l3e[Kv>nZ6vG?'}LWW1:t5{D$G*B:F=c>G[LJT<s5-p%qW$7+\x)sbFW{@m
3;YNxe}LT(r]*N+&Uw<Zka]a@f5tVo=jjx)03z7H4BjTjuDhPi7d0Xj8m^S'U(T1hAvx,tzS*mgpPn
4[4M!_SOZ'lrfi;GR]IM;\f~)EDC'@K@9jHvg30*A@!}Gx[@%{1&P8'ta{S'hZL3[|emJpkKCyR8G-
5C2]=X>$pG7&Ez2-l)]uNKVZq;M$F~}@zfNJG*AACIt\}m*ehsBsGug1it2>f|;*MT4a6bh;5-c'Yc
67FT?}_b5_JK>_zc-F|U{\=p698_1^L6)n[]7;|l$\,dXTvPI+||-b|hQ@T4N6S!;ex6X7OpP*MUJ!
7?(Y8j:VC4{bVaK)5kDYc4f?W<Fga(Bvd,]7FH(_W{0rubxzA3?%tbN6MepndUf"(XW];'Z'"}d/yB
8;+5(-|,\V$_S*rGK~t2/)d\K2_3?gpA)SnvYx}XPi\dmoTsjEw&S})?2_TB86h8Q|fmKt\B'Att=;
9WCCy4^!HY$!0zK-3z^rT6"[q)ZWQ/[_GF(:w'MNo)F[L*Jq@/P,wfCF-=6_!n9Cky+3<n}@0hK\_o
:S+W98('<[]LXZ)JpM:wzR}j$)X/EP!}$cVG:$6W2QgY=m]gJ5cQ1Gp_<nSQ%jW:FJ)/grSV^z^EJL
;7RGDxPb8H+%DV-${F4{IJZP9XsneXi;Pe=|tyr3WMjYi?X@49TX"A*OylDTI6_y!ethZ=@s05kX}R
<7Z)yvb!P7cSPqk,RsiFu*OyeexYVFVTjo/QSETa:ma;Kq@>Y"b9H_Vw-gt:@grG;kqo:DX\Pg7*(g
=3\+u}n6{64)1~tWK:V=5Oe?z:[UJR<*^1<uwlx$n[zXRz:<gdXy-M-7Uz*Y1WE+"L;nM"-M*4e,U?
>3:0pLe?j|2e0jJk7lL]=5[bxY{?RF9L2R5C)|E!G+\B[]:9c=jixvzr9]&0zmssTMZ-5P(0|4qTDf
?&T'aSVnFD>S[7p!5qaQ?n)jOD@^;:['C&Na7*%b'Sjh"]1AMcJLy?"_XH=UgB+=R2WltGr$*y$(bZ
@[0T5851}-(8^,LH%/4S1)ABHg!0R+/eU&Q>@Idu&A|%--udh+_XjS*}s,tie*"U,{Bxdk{TdIFI95
A//^MTesz2S0dq'Reowb]A|SGJ=dw\I^v}z!w4fqz/"L<2p3f8oAk'"6(nJnBK\{8lMhm&lEJOXG__
BW/*V0U}Qpof({+Z_9X62K|'lgzQoXJ$2~pz>}Z)NnGp}QZW=9F;&}5a,W\F\a&{:hVva"OIpWO|-C
C/)A\&*"zIaaZh|-w{?qrd[-<<-B+*@0iu\neq@G[brPU{2pT)=SO++IWMWGiC)5u8PcX6Xn'Xn6q;
--- hesper_x.lzh (100/115) ---
DG\YDfo[35Q0QD'T+M$=|_G+4h'T5Y('pjfcv/QDwKt{j\Mti9y!'/P3}!J{yQ6\('sZxHm7Ww:t"F
ESR2OYZN-36UT!Yi$cNV4eqzdCO7mVoPNpHj4TLc?~Y>C0vk|OWxx26}n3s|c:uQ6~d]^^EZ]d6%Q]
F?]6Wr0dATAdi9v&a)aIf[D-5sajEXHNHD_L{*jpnlvlo--iinNx?jc}|1AJZ6isKcL=$ZlhCZ|4${
G;@LIO23n9xEzZiI|Zx8lZL"oO^!C7*yf$Ck(x2<gGr:c}['FKTwZIdRtaG=lVd2]kmC7UwIMz&-u7
H_Y-yGd=bGg*b{FTeZoeDS-W[h@,kxdnp'bNa(X7J!LOOuu7A41dnOB4J4$>2;n\Xs"L8;73cjAf,G
IK:6Xd>UOMc4\te4D-y6Ae{!_"I<qrk3]aej3qkWN9{uc:pS:sgFhRagn>7GAcsz7^UlFE{1fQuGz|
J[G=me\7_"\UG5]F>lx>M_)[X@U9&vBIARHZrfhLfcm}=J^Ilb>=Hbs9nn,Ok-q'HsIM{-;=x8R8%W
KGP0n-H\+]|Tr)I1DJU$sIzb&k(nJN5e-'*ur7i~^):%433eJ|j@m<<_aa?\4"U-TWvtsvqsz=j}r%
LS(_j|g@Ia{33&L,&jD&Ez5<uWrSd0O~kTNA},VN[0e]c<9I&:s({4Mv\[{5{D'0Z6*?XcOdozRQ@X
MWG\kY]-jnS06$XuY%]XK8VFBJLvg2avkFCcSprE$1}zI1?@,!juxdjowbyB>(2_Wv$cJ*Pk/td}SE
N7E/&(OCW_V>/cj4AvEwXJ]9l/4VWFJk3'&<kdTo](i@IE1N/eV&+[=--D{_t*}pby7l\<4VZ(+qEt
O!3@!K!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!rjX4
aS"G2NL_TI'U}03{Z}!"a}luCjgRH!|~v;a$nR{3Mj28u-+f$qKb;J8pY!1*dTS6w$4;UL2v8(jmss
cWP_uq]jr<>ggv<,j{g3C'r4d"j58-0:)d*48+EbX+SnEx^JROkB"==G[=06WNYwu_{w0su$e'})0$
--- hesper_x.lzh (115/115) ---
..